diff --git a/.gitattributes b/.gitattributes
index ed877487a..98603d9fe 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -5,4 +5,19 @@
*.Gen linguist-language=Mathematica
*.conf linguist-language=Mathematica
*.Fac linguist-language=Mathematica
-
+Tests export-ignore
+FeynCalc/DocSource export-ignore
+FeynCalc/DocOutput export-ignore
+FeynCalc/Phi export-ignore
+install.m export-ignore
+.project export-ignore
+.gitignore export-ignore
+.gitattributes export-ignore
+docbuild.xml export-ignore
+issue_template.md export-ignore
+SUPPORT.md export-ignore
+README.MD export-ignore
+.WolframResources export-ignore
+edit_documentation.sh export-ignore
+use_documentation.sh export-ignore
+LICENSE export-ignore
diff --git a/.gitignore b/.gitignore
index 7ad209fab..ab2783f81 100644
--- a/.gitignore
+++ b/.gitignore
@@ -2,14 +2,23 @@ FeynCalc/FeynArts
FeynCalc/FeynArts/*
FeynCalc/Database/*.db
FeynCalc/Examples/Temp
+FeynCalc/Examples/*/WIP
+FeynCalc/Examples/WIP
FeynCalc/Database/*.start
FeynCalc/Database/*.m
+FeynCalc/Database/*.nb
FeynCalc/Tarcer/*.mx
FeynCalc/AddOns/*
FeynCalc/Documentation
FeynCalc/Documentation/*
+FeynCalc/DocOutputHold
+FeynCalc/DocOutput/SearchIndex/*
+FeynCalc/DocOutput/English/SearchIndex/*
+FeynCalc/Ignore*
FeynCalc/FCConfig.m
build/*
.settings/*
.amateras
+/.DS_Store
+/.gitignore
diff --git a/.project b/.project
index d73fea635..42e4e5cc7 100644
--- a/.project
+++ b/.project
@@ -16,7 +16,7 @@
- 1446741392778
+ 1537241074983
26
@@ -25,12 +25,75 @@
- 1446741392779
+ 1537241074984
26
org.eclipse.ui.ide.multiFilter
- 1.0-name-matches-false-false-FeynArts
+ 1.0-name-matches-true-false-FeynArts
+
+
+
+ 1537241074986
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-Phi
+
+
+
+ 1537241074987
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-Tests
+
+
+
+ 1537241074989
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-build
+
+
+
+ 1537241074990
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-DocOutput
+
+
+
+ 1537241074997
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-Examples
+
+
+
+ 1537241074999
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-AddOns
+
+
+
+ 1537241075001
+
+ 26
+
+ org.eclipse.ui.ide.multiFilter
+ 1.0-name-matches-true-false-Database
diff --git a/FeynCalc/AddOns/FUnitTools/FUnitTools.m b/FeynCalc/AddOns/FUnitTools/FUnitTools.m
index 9e3fc3428..c142638a2 100644
--- a/FeynCalc/AddOns/FUnitTools/FUnitTools.m
+++ b/FeynCalc/AddOns/FUnitTools/FUnitTools.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Tools for working with FeynCalc's unit tests *)
@@ -31,7 +31,10 @@
FUnitCreateUnitTestsTypesetting::usage = \
"FUnitCreateUnitTestsTypesetting[TestName,Tests] is like FUnitCreateUnitTests \
but with the sole purpose of creating unit tests for typesetting, \
-i.e. the TraditionalForm output."
+i.e. the TraditionalForm output. Notice that when creating typesetting tests, \
+the list elements must not be strings, i.e. li = {FV[p,mu], FV[q,nu]}. Then \
+FUnitCreateUnitTestsTypesetting[fcstFV,li] does the job and the output (copied as\
+Input Text) can be directly pasted into the test file."
AddMakeBoxes::usage =
"AddMakeBoxes is an option for FUnitCreateUnitTestsTypesetting, which \
@@ -43,22 +46,44 @@
Begin["`FUnitTools`Private`"];
-$FUnitToolsVersion="0.1";
+$FUnitToolsVersion="0.2";
$FUnitToolsDirectory =
ToFileName[{$FeynCalcDirectory, "AddOns", "FUnitTools"}];
Options[FUnitCreateUnitTestsTypesetting] = {
- AddMakeBoxes -> True
+ AddMakeBoxes -> True,
+ "ZeroIDValue" -> 0
};
-FUnitCreateUnitTests[n_String, l_List] :=
- MapIndexed[{n <> "-ID" <> ToString[First[#2]], #, ToString[ToExpression[#], FormatType -> InputForm]} &, l];
+Options[FUnitCreateUnitTests] = {
+ AddMakeBoxes -> True,
+ "ZeroIDValue" -> 0
+};
+
+Options[FUnitExtractUnitTests] = {
+ Names -> False
+};
+
+FUnitCreateUnitTests[n_String, l_List, OptionsPattern[]] :=
+ MapIndexed[{n <> "-ID" <>
+ If[ StringQ[OptionValue["ZeroIDValue"]],
+ ToString[OptionValue["ZeroIDValue"]]<>ToString[First[#2]],
+ ToString[OptionValue["ZeroIDValue"]+First[#2]]
+ ],
+ #, ToString[ToExpression[#], FormatType -> InputForm]} &, l]
+
+
FUnitCreateUnitTestsTypesetting[n_String, l_List, OptionsPattern[]] :=
- MapIndexed[{n <> "-ID" <> ToString[First[#2]],
+ MapIndexed[{n <> "-ID" <>
+
+ If[ StringQ[OptionValue["ZeroIDValue"]],
+ ToString[OptionValue["ZeroIDValue"]]<>ToString[First[#2]],
+ ToString[OptionValue["ZeroIDValue"]+First[#2]]
+ ],
If[OptionValue[AddMakeBoxes],
- StringReplace[ToString[System`MakeBoxees[#, TraditionalForm]],
+ StringReplace[ToString[System`MakeBoxees[#, TraditionalForm], InputForm],
"MakeBoxees" -> "MakeBoxes"],
ToString[#]
],
@@ -69,17 +94,20 @@
],
InputForm, CharacterEncoding -> "Unicode"]} &, l];
-FUnitExtractUnitTests[{dir__, file_}, testVar_] :=
+FUnitExtractUnitTests[{dir__, file_}, testVar_, OptionsPattern[]] :=
Module[{li},
Get[FileNameJoin[{ParentDirectory@$FeynCalcDirectory, "Tests", dir, file <> ".test"}]];
li = "Tests`" <> First[{dir}] <> "`" <> testVar;
li = ToExpression[li];
- Map[#[[2]] &, li]
+ If[ OptionValue[Names],
+ Map[#[[1;;2]] &, li],
+ Map[#[[2]] &, li]
+ ]
];
(* Print startup message *)
-If[ Global`$FeynCalcStartupMessages =!= False,
+If[ $FeynCalcStartupMessages =!= False,
Print[Style["FUnitTools ", "Text", Bold], Style[$FUnitToolsVersion <> " loaded.", "Text"]]
];
diff --git a/FeynCalc/AddOns/FVProjection/Examples/Vectors.m b/FeynCalc/AddOns/FVProjection/Examples/Vectors.m
index 8c8d92346..49be42152 100644
--- a/FeynCalc/AddOns/FVProjection/Examples/Vectors.m
+++ b/FeynCalc/AddOns/FVProjection/Examples/Vectors.m
@@ -4,9 +4,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Simple operations with 4-vectors using FVProjection *)
diff --git a/FeynCalc/AddOns/FVProjection/FVProjection.m b/FeynCalc/AddOns/FVProjection/FVProjection.m
index c780b110e..deb034b0e 100644
--- a/FeynCalc/AddOns/FVProjection/FVProjection.m
+++ b/FeynCalc/AddOns/FVProjection/FVProjection.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Toy add-on for FeynCalc for obtaining transverse and
@@ -19,19 +19,19 @@
FVProjectionT::usage=
"FVProjectionT[x_,mu_,p_] returns the transverse component of the 4-vector \
-x^mu with respect to the the 4-vector p";
+x^mu with respect to the 4-vector p";
FVProjectionL::usage=
"FVProjectionL[x_,mu_,p_] returns the longitudinal component of the 4-vector \
-x^mu with respect to the the 4-vector p";
+x^mu with respect to the 4-vector p";
FVProjectorT::usage=
"FVProjectorT[mu,nu,p] returns the transverse projector with respect to \
-the the 4-vector p";
+the 4-vector p";
FVProjectorL::usage=
"FVProjectorL[mu,nu,p] returns the longitudinal projector with respect to \
-the the 4-vector p";
+the 4-vector p";
$FVProjectionVersion::usage=
"$FVProjectionVersion is the string that represents the version of FVProjection";
@@ -126,7 +126,7 @@
(* Print startup message *)
-If[ Global`$FeynCalcStartupMessages =!= False,
+If[ $FeynCalcStartupMessages =!= False,
Print[Style["FVProjector ", "Text", Bold], Style[$FVProjectionVersion <> " loaded.", "Text"]]
];
diff --git a/FeynCalc/AddOns/FVProjection/Tests/General/General.mt b/FeynCalc/AddOns/FVProjection/Tests/General/General.mt
index 244026e9e..a3b851844 100644
--- a/FeynCalc/AddOns/FVProjection/Tests/General/General.mt
+++ b/FeynCalc/AddOns/FVProjection/Tests/General/General.mt
@@ -2,9 +2,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Unit tests for FVProjection *)
diff --git a/FeynCalc/AddOns/FVProjection/Tests/General/General.test b/FeynCalc/AddOns/FVProjection/Tests/General/General.test
index 3c3b7c6df..2f924cf3f 100644
--- a/FeynCalc/AddOns/FVProjection/Tests/General/General.test
+++ b/FeynCalc/AddOns/FVProjection/Tests/General/General.test
@@ -2,9 +2,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
diff --git a/FeynCalc/AddOns/FVProjection/Tests/MUnitTestSuite.mt b/FeynCalc/AddOns/FVProjection/Tests/MUnitTestSuite.mt
index 46859cfac..90624d327 100644
--- a/FeynCalc/AddOns/FVProjection/Tests/MUnitTestSuite.mt
+++ b/FeynCalc/AddOns/FVProjection/Tests/MUnitTestSuite.mt
@@ -2,9 +2,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Test Suite for FVProjection via MUnit *)
diff --git a/FeynCalc/AddOns/FeynArtsLoader/FeynArtsLoader.m b/FeynCalc/AddOns/FeynArtsLoader/FeynArtsLoader.m
new file mode 100644
index 000000000..cbf38e65a
--- /dev/null
+++ b/FeynCalc/AddOns/FeynArtsLoader/FeynArtsLoader.m
@@ -0,0 +1,82 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: FeynArtsLoader *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: A simple loader to load the patched FeynArts from
+ $FeynArtsDirectory *)
+
+(* ------------------------------------------------------------------------ *)
+
+
+Begin["`Package`"]
+End[]
+
+Begin["`FeynArtsLoader`Private`"];
+
+
+If[ $FeynCalcStartupMessages,
+ PrintTemporary[Style["Loading FeynArts from " <> $FeynArtsDirectory, "Text"]];
+];
+
+(* Load the .m files *)
+Block[ {loadfa, fafiles, strm, patch=True, str},
+ If[ $FAPatch,
+ (* Check if FeynArts needs to be patched *)
+ If[(fafiles = FileNames["FeynArts.m", $FeynArtsDirectory])=!={},
+ strm = OpenRead[First[fafiles]];
+ If[ Head[strm] =!= InputStream,
+ Message[General::noopen, First[fafiles]];
+ Abort[]
+ ];
+ While[ ToString[str] != "EndOfFile",
+ str = Read[strm, String];
+ If[ StringMatchQ[ToString[str], "*patched for use with FeynCalc*", IgnoreCase -> True],
+ patch = False
+ ]
+ ];
+ Close[First[fafiles]],
+ Message[General::noopen, FileNameJoin[{$FeynArtsDirectory, "FeynArts.m"}]];
+ Message[FeynCalc::faerror, $FeynArtsDirectory];
+ patch = False
+ ];
+ (* Apply the patch *)
+ If[ patch,
+ FAPatch[]
+ ]
+ ];
+ loadfa=Block[ {Print= System`Print},Get[FileNameJoin[{$FeynArtsDirectory, "FeynArts.m"}]]];
+ If[loadfa =!=$Failed,
+ (* If everything went fine *)
+ If[ $FeynCalcStartupMessages,
+ Print[ Style["FeynArts ", "Text", Bold],
+ Style[StringReplace[ToString[FeynArts`$FeynArtsVersion],"FeynArts "->""] <>" patched for use with FeynCalc, for documentation see the ",
+ "Text"],
+ Style[DisplayForm@ButtonBox["manual", BaseStyle -> "Hyperlink", ButtonFunction :>
+ SystemOpen[First@FileNames[{"*.pdf", "*.PDF"}, FileNameJoin[{$FeynArtsDirectory, "manual"}]]],
+ Evaluator -> Automatic, Method -> "Preemptive"], "Text"],
+ Style[" or visit ", "Text"],
+ Style[DisplayForm@ButtonBox["www.feynarts.de.", ButtonData :> {URL["http://www.feynarts.de/"], None},
+ BaseStyle -> "Hyperlink", ButtonNote -> "www.feynarts.de/"],"Text"]
+ ];
+ Print[ Style["If you use FeynArts in your research, please cite","Text"]];
+ Print [Style[" \[Bullet] T. Hahn, Comput. Phys. Commun., 140, 418-431, 2001, arXiv:hep-ph/0012260","Text"]];
+ ],
+ (* If FeynArts didn't load *)
+ Message[FeynCalc::faerror, $FeynArtsDirectory];
+ ];
+];
+
+FeynCalc`Private`AddToTheContextPath = Join[FeynCalc`Private`AddToTheContextPath,{"FeynArts`"}];
+
+End[]
+
+
diff --git a/FeynCalc/AddOns/TARCER/9801383.pdf b/FeynCalc/AddOns/TARCER/9801383.pdf
new file mode 100644
index 000000000..28519f5ff
Binary files /dev/null and b/FeynCalc/AddOns/TARCER/9801383.pdf differ
diff --git a/FeynCalc/AddOns/TARCER/README.MD b/FeynCalc/AddOns/TARCER/README.MD
new file mode 100755
index 000000000..f54af363b
--- /dev/null
+++ b/FeynCalc/AddOns/TARCER/README.MD
@@ -0,0 +1,24 @@
+# Description
+TARCER is a Mathematica program for the reduction of two-loop propagator integrals .
+
+# Requirements
+
+The latest versions of TARCER are designed as an addon for FeynCalc. To use TARCER you need FeynCalc and Mathematica (at least version 8).
+
+# Installation
+
+TARCER is bundled with FeynCalc. When you install FeynCalc using the automatic installer, TARCER will be installed as well.
+
+# Usage
+
+For usage information see the accompanying paper [arXiv:hep-ph/9801383](https://arxiv.org/abs/hep-ph/9801383) and the supplied examples.
+
+# Acknowledgments
+
+If you use TARCER in you work, please cite
+
+* R. Mertig and R. Scharf, Comput. Phys. Commun., 111, 265-273, 1998, arXiv:hep-ph/9801383
+
+# License
+
+* As the rest of the FeynCalc code, the code of TARCER is licensed under GNU GPLv3.
diff --git a/FeynCalc/AddOns/TARCER/TARCER.m b/FeynCalc/AddOns/TARCER/TARCER.m
new file mode 100644
index 000000000..132f7875c
--- /dev/null
+++ b/FeynCalc/AddOns/TARCER/TARCER.m
@@ -0,0 +1,102 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: TARCER *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1998-2018 Rolf Mertig
+ Copyright (C) 1998-2018 Rainer Scharf
+ Copyright (C) 1998-2018 Frederik Orellana
+ Copyright (C) 2014-2018 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Loader for TARCER *)
+
+(* ------------------------------------------------------------------------ *)
+
+$TARCERVersion::usage=
+"$FeynHelpersVersion is the string that represents the version of TARCER";
+
+$TARCERDirectory::usage=
+"$TARCERDirectory is the string that represents the full path to the TARCER \
+directory";
+
+GenerateTarcerMX::usage =
+"GenerateTarcerMX creates the *.mx file for TARCER. This is necessary to use
+TARCER and has to be done only once. The evaluation usually takes a
+couple of minutes."
+
+TARCER::taerror =
+"TARCER*.mx file not found or damaged. Please evaluate the command \
+GenerateTarcerMX[] to create it and then restart Mathematica.";
+
+Begin["`Package`"]
+
+
+
+End[]
+
+Begin["`TARCER`Private`"];
+
+$TARCERVersion = "2.0";
+
+$TARCERDirectory = ToFileName[{$FeynCalcDirectory, "AddOns", "TARCER"}];
+
+tarcerfilenames = FileNames["tarcer"<> StringReplace[$System,{"-"->"","Microsoft"->"","("->"",")"->""," "->""}] <>"*.mx", $TARCERDirectory,IgnoreCase->True];
+
+TarcerDialogText = "TARCER*.mx file not found or damaged. Creating a new \
+file can take couple of minutes, but this has to be done only once. \
+After the new file is generated you need to restart Mathematica. Should \
+we generate the new TARCER*.mx now?"
+
+GenerateTarcerMX[]:=
+ If[ Get@ToFileName[$TARCERDirectory, "TARCERSource.m"]=!= $Failed,
+ Print["Succesfully created ", Last@FileNames["*.mx", $TARCERDirectory]]
+ ]
+
+needNewTarcerMX[]:=
+ If[ TrueQ[$Notebooks],
+
+ If[ ChoiceDialog[TarcerDialogText],
+ GenerateTarcerMX[]
+ ]
+ ];
+
+If[ tarcerfilenames==={},
+ Message[TARCER::taerror];
+ needNewTarcerMX[]
+];
+
+If[ Length[tarcerfilenames]>1,
+ Print[Style["Found multiple versions of TARCER: ", "Text"]];
+ Print[TableForm[tarcerfilenames]];
+ Print[Style["FeynCalc will load ","Text"], Last[tarcerfilenames]]
+];
+
+If[ tarcerfilenames=!={},
+ If[ Get[Last[tarcerfilenames]]===$Failed,
+ Message[TARCER::taerror];
+ needNewTarcerMX[]
+ ];
+
+ FeynCalc`Private`AddToTheContextPath = Join[FeynCalc`Private`AddToTheContextPath,{"Tarcer`"}];
+
+
+ (* Print startup message *)
+ If[ $FeynCalcStartupMessages,
+ Print[ Style["TARCER ", "Text", Bold],
+ Style[$TARCERVersion <> ", for more information see the accompanying ", "Text"],
+ Style[DisplayForm@ButtonBox["publication.", BaseStyle -> "Hyperlink", ButtonFunction :>
+ SystemOpen[ToFileName[{$TARCERDirectory},"9801383.pdf"]],
+ Evaluator -> Automatic, Method -> "Preemptive"], "Text"],
+ Style[" If you use TARCER in your research, please cite","Text"]
+ ];
+ Print [Style[" \[Bullet] R. Mertig and R. Scharf, Comput. Phys. Commun., 111, 265-273, 1998, arXiv:hep-ph/9801383","Text"]];
+ ]
+]
+
+End[]
+
+
diff --git a/FeynCalc/AddOns/TARCER/TARCERSource.m b/FeynCalc/AddOns/TARCER/TARCERSource.m
new file mode 100644
index 000000000..7b21b08bf
--- /dev/null
+++ b/FeynCalc/AddOns/TARCER/TARCERSource.m
@@ -0,0 +1,4255 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: TARCER *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1998-2018 Rolf Mertig
+ Copyright (C) 1998-2018 Rainer Scharf
+ Copyright (C) 1998-2018 Frederik Orellana
+ Copyright (C) 2014-2018 Vladyslav Shtabovenko
+*)
+
+(* :Summary: TARCER is a Mathematica program for the reduction
+ of two-loop propagator integrals *)
+
+(* ------------------------------------------------------------------------ *)
+
+(*
+
+COMMENTS (VS 04.8.2011) changed typsetting for SEpsilon
+COMMENTS (RM 19.8.2011) changed typsetting for SEpsilon
+COMMENTS (RM 20.7.2011) changed the way .mx files are named
+COMMENTS (RM 14.3..2004) uncommented a global variable assignement.changed default setting of $RankLimit to {2,5}.
+COMMENTS (RM 31.10.2003) Change default settings of TarcerExpand, modify $BasisIntegras for massless integrals,
+changed default setting of $RankLimit to {1,6}.
+COMMENTS (RM 28.10.2003) Fixed a bug in TarcerExpand (only introduced recently),
+changed default setting of $RankLimit to {1,5}.
+COMMENTS (RM 24.9.2003) Relaxed a condition in equation (61) and (6153)
+COMMENTS (RM 18.9.2003): Fixed things for 5.0, eliminated a TVI symmetry (causing infinite recursion) and added
+TFI decomposition into products of TAI's (was somehow missing but shows up in, e.g., the 2-loop Higss selfenergy).
+Putting TFI back into the Tarcer context, because the fcloops context created trouble ...
+Changed default of $Comment to False.
+COMMENTS (FO 8.9.2002.): Changed context of TFI to HighEnergyPhysics`fcloops`TFI` and updated other HighEnergyPhysics`*
+ contexts.
+COMMENTS (FO 15.3.2001.): Changed PreFactor into Prefactor1 to avoid conflict with FeynArts and FeynCalc.
+COMMENTS (FO 15.3.2001.): Changed context of Zeta2 and made definition dependent on not having loaded FeynCalc.
+COMMENTS (RM 25.4.): TFISimplify (like TFIRecurse, but without trule[9]).
+COMMENTS (RM 23.4.): bug fixed in tlrule[17].
+COMMENTS (RM 6.4.): special TVR relations added to TVR.
+COMMENTS (RM 22.3.): TVI Symmetry added to TVR.
+COMMENTS (RM 18.3.): More rules added to $TTable.
+COMMENTS (RM 18.2.): More rules added to $TTable.
+COMMENTS (RM 21.2.): Included $TTable. added tlrule[25]
+COMMENTS (RM 20.2.): $RankLimit = {0,6} ; Changed TarcerRecurse such that special TJR and TVR
+ (reducing D -> D-2) are used first.
+COMMENTS (RM 15.2.): $RankLimit = {0,8} ;
+The following test now works:
+
+ Print["test 1 : TFI[D, pp, {0, 0, 0, 1, 3}, {{1, MW}, {1, MZ}, {0, 0}, {1, MZ}, {1,MW}}] = ",
+ Timing[t1 =TarcerRecurse[TFI[D, pp, {0, 0, 0, 1, 3}, {{1, MW}, {1, MZ}, {0, 0}, {1, MZ}, {1,MW}}]]
+ ] // InputForm
+ ]
+
+ Print["test 2 : TFI[d, pp, 0, {0, 0, 0, 0, 4},{{1, m1}, {1, m2}, 0, 0, 0}] = ",
+ Timing[t2 =TarcerRecurse[TFI[D, pp, 0, {0, 0, 0, 0, 4},{{1, m1}, {1, m2}, 0, 0, 0}]];
+ ] // InputForm
+ ]
+
+COMMENTS (RM 13.2.): tlrule[11] and trule[12] made more restrictive: inhibiting thus a recursion if {n5,m5} equals {0,0}.
+COMMENTS (RM 12.2.): tlrule[15] made safer (in order to not get 0 :> 0 );
+ TFIRecurse made safer (to not get into a recursion);
+ There is still something wrong with the tlrule's ; since
+ TFIRecurse[TFI[D, pp, {0, 0, 0, 1, 3}, {{1, MW}, {1, MZ}, {0, 0}, {1, MZ}, {1, MW}}]]
+ doesn't work ..
+COMMENTS (RM 5.2.): tlrule[10] slightly changed to cover more cases.
+COMMENTS (RM 2.2.): FunctionExpand added in tlrule[9]. Option TimeConstraint added to
+ TarcerRecurse (because TimeConstrained is buggy under Linux).
+COMMENTS (RM 1.2.): Changed TarcerRecurse. New TLR definition.
+ default $RankLimit={0,6};
+$Remember=True;
+COMMENTS (RM 19.1.): changes are: tlrule[22] and tlrule[23], minor efficiency changes (Expand3 = Identity)
+ and other small programming optimizations.
+COMMENTS (RM 22.1.): changes are: bug in tlrule[23] fixed, new tlrule[24], new option Factor to
+ TarcerReduce (doesn't change anything by default, but allows for improved Factoring).
+
+See also: hep-ph/9801383, published in Comput. Phys. Commun. 111 (1998) 265-273 *)
+
+
+Unset[$Post];
+$Post = (#;) &;
+If[$Notebooks =!= True, $Post = (#;) &];
+
+$HistoryLength = 0;
+
+BeginPackage["Tarcer`",{"FeynCalc`"}];
+
+TarcerRecurse::usage =
+"TarcerRecurse[expr] applies recurrence relations for all TFI's \
+(and TVI, TJI, TBI, TAI) in expr. For evaluation and Laurent \
+expansion of the resulting basis integrals use TarcerExpand.";
+
+TarcerExpand::usage =
+"TarcerExpand[expr, d -> (4+e), order] or TarcerExpand[epxr, d -> \
+(4-e), order] or TarcerExpand[expr, d -> (4 - 2 om)substitutes \
+integrals as specified by the option TarcerRules, and does a Laurent \
+expansion in the variable around 0 at the right hand side of the \
+second argument (i.e., you can use whatever convention you like ...). \
+The same effect as TarcerExpand[TarcerRecurse[expr], ...] can be \
+achieved by setting the option TarcerRecurse of TarcerExpand to True. \
+TarcerExpand[expr, d -> (4+e)] is equivalent to TarcerExpand[expr, d -> \
+(4+e), 0].";
+
+TarcerReduce::usage =
+"TarcerReduce is an option to TarcerExpand. It should be set to a \
+list of basic integrals.";
+
+Cayley::usage =
+"Cayley[m1,m2,m3,m4,m5,Sqrt[pp]] is the Cayley determinant.";
+
+Cayleyu::usage =
+"Cayleyu are the sub-Cayley-determinants as described in Tarasov's \
+paper.";
+
+CayleyD::usage =
+"CayleyD are the sub-Cayley-determinants as described in Tarasov's \
+paper.";
+
+Prefactor1::usage =
+"Prefactor1[expr] may be used to prohibit TarcerExpand from \
+Taylor-expanding expr.";
+
+SEpsilon::usage =
+"Sepsilon[d] is an abbreviation for Exp[(d-4)/2 EulerGamma].";
+
+TFI::usage =
+"TFI[d, pp, {{n1,m1},{n2,m2},{n3,m3},{n4,m4},{n5,m5}}] is
+ the 2-loop d-dimensional integral
+ 1/( (q1^2 - m1^2)^n1 (q2^2 - m2^2)^n2 ((q1-p)^2 - m3^2)^n3 *
+ ((q2-p)^2 - m4^2)^n4 ((q1-q2)^2 - m5^2)^n5 ) .
+
+ TFI[d, pp, {x,y,z,v,w}, {{n1,m1},{n2,m2},{n3,m3},{n4,m4},{n5,m5}}]
+ has as additional factors in the numerator \
+(q1^2)^x*(q2^2)^y*(q1.p)^z*
+ (q2.p)^v*(q1.q2)^w .
+
+ TFI[d, pp, dp, {a,b}, {{n1,m1},{n2,m2},{n3,m3},{n4,m4},{n5,m5}}]
+ has as additional factors in the numerator (OPEDelta.q1)^a * \
+(OPEDelta.q2)^b;
+ dp is (OPEDelta.p).";
+
+TFIRecurse::usage =
+"TFIRecurse[expr] applies the recursion algorithm implemented in \
+TARCER.nb (following Tarasov) to TFI's (and TVI's, TJI's, TBI's, \
+TAI's in expr.";
+
+TFISimplify::usage =
+"TFISimplify[expr] applies the recursion algorithm implemented in \
+TARCER.nb (following Tarasov) to TFI's (and TVI's, TJI's, TBI's, \
+TAI's in expr, except k1.k2.";
+
+TVI::usage =
+"TVI[d,pp,{ {n1,m1},{n2,m2},{n3,m3},{n4,m4}}] is the massive 2-loop \
+integral with four propagators in d dimensions. ";
+
+TJI::usage =
+"TJI[d, pp, { {n1,m1},{n2,m2},{n3,m3} }] is the massive 2-loop \
+integral with three propagators in d dimensions. ";
+
+TKI::usage =
+"TKI[d, 0, { {n1,m1},{n2,m2},{n3,m3} }] is the bubble massive \
+2-loop selfenergy type integral with three propagators in d \
+dimensions. ";
+
+TBI::usage =
+"TBI[d, pp, { {n1,m1},{n2,m2} }] is the massive 1-loop selfenergy \
+type integral with two propagators in d dimensions.";
+
+TAI::usage =
+"TAI[d, pp, { {n1,m1} }] is the massive 1-loop selfenergy type \
+integral with one propagator in d dimensions.";
+
+TFR::usage =
+"TFR is similar in syntax to TFI but applies once the recurrence \
+relations derived for TFI.";
+
+TVR::usage =
+"TVR is similar in syntax to TVI but applies once the recurrence \
+relations derived for TVI.";
+
+TJR::usage =
+"TJR is similar in syntax to TJI but applies once the recurrence \
+relations derived for TJI.";
+
+TBR::usage =
+"TBR is similar in syntax to TBI but applies once the recurrence \
+relations derived for TBI.";
+
+TAR::usage =
+"TAR is similar in syntax to TAI but applies once the recurrence \
+relations derived for TAI.";
+
+$RankLimit::usage =
+"$RankLimit is the list of integers specifying the highest possible \
+sums of exponents of scalar products; i.e., {a+b, r+s} means that at \
+most (Delta.k1)^a * (Delta.k2)^2 * (p.k1)^r * (p.k2)^s in the \
+numerator will be calculated (a,b,r,s have to be non-negative \
+integares). $RankLimit has to be set in the TARCER.nb notebook. In \
+the tarcer.mx file this is not possible anymore.";
+
+$TarcerRecursed::usage =
+"If $Comment is set to True all integrals\n\t\twhich are reduced \
+are collected in the global variable $TarcerRecured.";
+
+$BasisIntegrals::usage =
+"$BasisIntegrals is a list of some basis integrals. It is the \
+default setting of TarcerReduce of TarcerExpand.";
+
+$Comment::usage =
+"$Comment can be set to True or False. If set to False no comments \
+are generated.";
+
+$CommentNotebook::usage =
+"$Comment can be set to True or False. Setting it to True will \
+generate a separate notebook (if and only if $Comment is True) where \
+the used recursion relations are displayed.";
+
+$RecursionStop::usage =
+"$RecursionStop sets an upper limit on the total number of \
+recursion levels. Its purpose is to inhibit erroneous infinite \
+recursions.";
+
+$TTable::usage =
+"$TTable is a list of precomputed reductions. $TTable is the \
+default setting of the option Table of TarcerRecurse. ";
+
+$TarcerVersion::usage=
+"contains the version of TARCER."
+
+Begin["`Private`"];
+trVerbose::usage="";
+pal1::usage="";
+pal2::usage="";
+
+m1::usage="";
+m2::usage="";
+m3::usage="";
+m4::usage="";
+m5::usage="";
+hCayley::usage="";
+hCayleyD::usage="";
+cD::usage="";
+cu::usage="";
+setd::usage="";
+notnecessaryf::usage="";
+gamma::usage="";
+test::usage="";
+ia::usage="";
+ib::usage="";
+ir::usage="";
+es::usage="";
+top::usage="";
+set::usage="";
+factor::usage="";
+
+$TarcerVersion = "2.0";
+
+If[ !ValueQ[$RankLimit],
+ $RankLimit = {2, 5};
+];
+
+Expand3 = Identity;
+$CheckRecursion = False;
+$PutPalettes = False;
+atime = AbsoluteTime[];
+
+
+SEpsilon /:
+ MakeBoxes[SEpsilon[d_], fmt_] :=
+ InterpretationBox @@ {StyleBox[SubscriptBox["S", ToBoxes[First[Variables[d]], fmt]], FontWeight -> "Bold"], SEpsilon[d], Editable -> False}
+
+MakeBoxes[SEpsilon[d_]^n_, fmt_] :=
+ InterpretationBox @@ {StyleBox[SubsuperscriptBox["S", ToBoxes[First[Variables[d]], fmt], n], FontWeight -> "Bold"], SEpsilon[d], Editable -> False}
+
+Prefactor1 /:
+ MakeBoxes[Prefactor1[d_], fmt_] :=
+ InterpretationBox @@ {MakeBoxes[d, fmt], Prefactor1[d], Editable -> False}
+
+MakeBoxes[Schiebe[i_, pm_String] , _] :=
+ InterpretationBox[StyleBox[SuperscriptBox[i, pm], FontWeight -> "Bold"], Schiebe[i, pm], Editable -> True]
+
+CayleyD /:
+ MakeBoxes[CayleyD[i_Integer][_], _] :=
+ FractionBox[SubscriptBox["\[CapitalDelta]", i], "\[CapitalDelta]"];
+
+CayleyD /:
+ MakeBoxes[CayleyD[i_Integer, j_Integer][_], _] :=
+ FractionBox[SubscriptBox["\[CapitalDelta]", 10 i + j], "\[CapitalDelta]"];
+
+CayleyD /:
+ MakeBoxes[CayleyD[i_Integer, j_Integer, k_Integer][_], _] :=
+ FractionBox[SubscriptBox["\[CapitalDelta]", 100 i + 10 j + k], "\[CapitalDelta]"];
+
+Cayley /:
+ MakeBoxes[Cayley[i_Integer][_], _] :=
+ SubscriptBox["\[CapitalDelta]", i];
+
+Cayley /:
+ MakeBoxes[Cayley[i_Integer, j_Integer][_], _] :=
+ SubscriptBox["\[CapitalDelta]", 10 i + j];
+
+Cayley /:
+ MakeBoxes[Cayley[i_Integer, j_Integer, k_Integer][_], _] :=
+ SubscriptBox["\[CapitalDelta]", 100 i + 10 j + k];
+
+Cayleyu /:
+ MakeBoxes[Cayleyu[i_Integer, j_Integer, k_Integer][_], _] :=
+ SubscriptBox["u", 100 i + 10 j + k];
+
+MakeBoxes[PP, _] :=
+ InterpretationBox[SuperscriptBox[p, 2], PP];
+
+MakeBoxes[m1^(p_), _] :=
+ InterpretationBox[SubsuperscriptBox[m, 1, p], m1^p];
+
+MakeBoxes[m2^(p_), _] :=
+ InterpretationBox[SubsuperscriptBox[m, 2, p], m2^p];
+
+MakeBoxes[m3^(p_), _] :=
+ InterpretationBox[SubsuperscriptBox[m, 3, p], m3^p];
+
+MakeBoxes[m4^(p_), _] :=
+ InterpretationBox[SubsuperscriptBox[m, 4, p], m4^p];
+
+MakeBoxes[m5^(p_), _] :=
+ InterpretationBox[SubsuperscriptBox[m, 5, p], m5^p];
+
+m6 = Sqrt[PP];
+
+MakeBoxes[m1, _] :=
+ InterpretationBox[SubscriptBox[m, 1], m1];
+
+MakeBoxes[m2, _] :=
+ InterpretationBox[SubscriptBox[m, 2], m2];
+
+MakeBoxes[m3, _] :=
+ InterpretationBox[SubscriptBox[m, 3], m3];
+
+MakeBoxes[m4, _] :=
+ InterpretationBox[SubscriptBox[m, 4], m4];
+
+MakeBoxes[m5, _] :=
+ InterpretationBox[SubscriptBox[m, 5], m5];
+
+mbt[z_] :=
+ ToBoxes[z, TraditionalForm];
+
+redblue[z_ /; Head[z] =!= Plus] :=
+ mbt[z];
+
+redblue[z_ - 1] :=
+ StyleBox[mbt[z], FontColor -> RGBColor[1, 0, 0]];
+
+redblue[z_Subscript - 2] :=
+ StyleBox[SubscriptBox[OverscriptBox[z[[1]], "_"], z[[2]]], FontColor -> RGBColor[1, 0, 0]];
+
+redblue[z_ - 2] :=
+ StyleBox[OverscriptBox[mbt[z], "_"], FontColor -> RGBColor[1, 0, 0]];
+redblue[z_ - 3] :=
+ StyleBox[UnderscriptBox[OverscriptBox[mbt[z], "_"], "_"], FontColor -> RGBColor[1, 0, 0]];
+
+redblue[z_ + 1] :=
+ StyleBox[mbt[z], FontColor -> RGBColor[0, 0, 1]];
+
+redblue[z_ + 2] :=
+ StyleBox[OverscriptBox[mbt[z], "_"], FontColor -> RGBColor[0, 0, 1]];
+
+redblue[z_Subscript + 2] :=
+ StyleBox[SubscriptBox[OverscriptBox[z[[1]], "_"], z[[2]]], FontColor -> RGBColor[0, 0, 1]];
+
+TFI /:
+ MakeBoxes[TFI[d_, pp_, {ur__}, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", ur}]], TFI[d, pp, {ur}, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFI /:
+ MakeBoxes[TFI[d_, pp_, dp_, any__, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", Apply[Sequence, Flatten[{any}]]}]], TFI[d, pp, dp, any, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] /; Head[dp] =!= List;
+
+TFI /:
+ MakeBoxes[TFI[dpp__, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[First[{dpp}], TraditionalForm], ")"}]], TFI[dpp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] && Head[Last[{dpp}]] =!= List;
+
+TVI /:
+ MakeBoxes[TVI[dpp__, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["V", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TVI][dpp, {den}], Editable -> True}) /. Hold[TVI] -> TVI
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] && Head[Last[{dpp}]] =!= List;
+
+TJI /:
+ MakeBoxes[TJI[d_, 0, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["K", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], Hold[TJI][d, 0, {den}], Editable -> True}) /. Hold[TJI] -> TJI
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TJI /:
+ MakeBoxes[TJI[dpp__, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["J", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TJI][dpp, {den}], Editable -> True}) /. Hold[TJI] -> TJI
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TKI /:
+ MakeBoxes[TKI[d_, ___, {den__}], fmt_] :=
+ (
+ SubsuperscriptBox[StyleBox["K", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]]
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TKI /:
+ MakeBoxes[TKI[dpp__, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["K", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TKI][dpp, {den}], Editable -> True}) /. Hold[TKI] -> TKI
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TBI /:
+ MakeBoxes[TBI[d_, ___, {den__}], fmt_] :=
+ (
+ SubsuperscriptBox[StyleBox["B", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]]
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TBI /:
+ MakeBoxes[TBI[d_, pp___, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["B", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], TBI[d, pp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TAI /:
+ MakeBoxes[TAI[d_, ___, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["A", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], TAI[d, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFIC /:
+ MakeBoxes[TFIC[d_, pp_, {0, 0, i_, 0, 0}, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", i, "0"}]], TFIC[d, pp, {0, 0, i, 0, 0}, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFIC /:
+ MakeBoxes[TFIC[d_, pp_, {0, 0, 0, i_, 0}, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", "0", i}]], TFIC[d, pp, {0, 0, 0, i, 0}, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFIC /:
+ MakeBoxes[TFIC[dpp__, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[First[{dpp}], TraditionalForm], ")"}]], TFIC[dpp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] && Head[Last[{dpp}]] =!= List;
+
+TVIC /:
+ MakeBoxes[TVIC[dpp__, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["V", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TVIC][dpp, {den}], Editable -> True}) /. Hold[TVIC] -> TVIC
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] && Head[Last[{dpp}]] =!= List;
+
+TJIC /:
+ MakeBoxes[TJIC[d_, 0, {den__}], fmt_] :=
+ ((InterpretationBox @@ {SubsuperscriptBox[StyleBox["K", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], Hold[TJIC][d, 0, {den}], Editable -> True}) /. Hold[TJIC] -> TJIC
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt]
+
+TJIC /:
+ MakeBoxes[TJIC[dpp__, {den__}], fmt_] :=
+ ((InterpretationBox @@ {SubsuperscriptBox[StyleBox["J", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TJIC][dpp, {den}], Editable -> True}) /. Hold[TJIC] -> TJIC
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt]
+
+TBIC /:
+ MakeBoxes[TBIC[d_, ___, {den__}], fmt_] :=
+ (
+ SubsuperscriptBox[StyleBox["B", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]]
+ ) /;MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TBIC /:
+ MakeBoxes[TBIC[d_, pp___, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["B", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], TBIC[d, pp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TAIC /:
+ MakeBoxes[TAIC[d_, ___, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["A", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], TAIC[d, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFR /:
+ MakeBoxes[TFR[d_, pp_, {0, 0, i_, 0, 0}, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", i, "0"}]], TFR[d, pp, {0, 0, i, 0, 0}, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFR /:
+ MakeBoxes[TFR[d_, pp_, {0, 0, 0, i_, 0}, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", "0", i}]], TFR[d, pp, {0, 0, 0, i, 0}, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TFR /:
+ MakeBoxes[TFR[dpp__, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[First[{dpp}], TraditionalForm], ")"}]], TFR[dpp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] && Head[Last[{dpp}]] =!= List;
+
+TVR /:
+ MakeBoxes[TVR[dpp__, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["V", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TVR][dpp, {den}], Editable -> True}) /. Hold[TVR] -> TVR
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt] && Head[Last[{dpp}]] =!= List;
+
+TJR /:
+ MakeBoxes[TJR[d_, 0, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["K", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], Hold[TJR][d, 0, {den}], Editable -> True}) /. Hold[TJR] -> TJR
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt]
+
+TJR /:
+ MakeBoxes[TJR[dpp__, {den__}], fmt_] :=
+ (
+ (InterpretationBox @@ {SubsuperscriptBox[StyleBox["J", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[{dpp}[[1]], TraditionalForm], ")"}]], Hold[TJR][dpp, {den}], Editable -> True}) /. Hold[TJR] -> TJR
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TBR /:
+ MakeBoxes[TBR[d_, ___, {den__}], fmt_] :=
+ (
+ SubsuperscriptBox[StyleBox["B", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]]
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TBR /:
+ MakeBoxes[TBR[d_, pp___, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["B", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], TBR[d, pp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+TAR /:
+ MakeBoxes[TAR[d_, ___, {den__}], fmt_] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["A", SingleLetterItalics -> False, FontWeight -> "Bold"], RowBox @@ {(redblue /@ {den})},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")"}]], TAR[d, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, fmt];
+
+n1 /:
+ MakeBoxes[n1, TraditionalForm] :=
+ SubscriptBox["\[Nu]", 1];
+n2 /:
+ MakeBoxes[n2, TraditionalForm] :=
+ SubscriptBox["\[Nu]", 2];
+n3 /:
+ MakeBoxes[n3, TraditionalForm] :=
+ SubscriptBox["\[Nu]", 3];
+n4 /:
+ MakeBoxes[n4, TraditionalForm] :=
+ SubscriptBox["\[Nu]", 4];
+n5 /:
+ MakeBoxes[n5, TraditionalForm] :=
+ SubscriptBox["\[Nu]", 5];
+
+MakeBoxes[ParD[i_]^j_, TraditionalForm] :=
+ SubsuperscriptBox["\[PartialD]", i, j];
+
+MakeBoxes[ParD[i_], TraditionalForm] ^=
+ SubscriptBox["\[PartialD]", i];
+
+MakeBoxes[DPlus, TraditionalForm] :=
+ StyleBox[SuperscriptBox["d", "+"], FontWeight -> "Bold", SingleLetterItalics -> False];
+
+MakeBoxes[TpD[_, b_], TraditionalForm] :=
+ MakeBoxes[b, TraditionalForm]
+
+If[ $PutPalettes === True,
+ tobut[a_] :=
+ ButtonBox[ToBoxes[a, StandardForm], ButtonStyle -> "Paste"];
+ If[ Head[pal1] === NotebookObject,
+ NotebookClose[pal1]];
+ pal1 = NotebookPut[
+ Notebook[{Cell[BoxData[GridBox[Join[Transpose@{
+ Table[tobut@(Subscript[m, j]^2), {j, 5}],
+ Table[tobut@Subscript[\[Nu], j], {j, 5}],
+ Table[tobut@Schiebe[i, "+"], {i, 5}],
+ Table[tobut@Schiebe[i, "-"], {i, 5}]}, {
+ tobut /@ {PP, Subscript[\[CapitalDelta], \[Placeholder]], Subscript[u, \[Placeholder]], \[ScriptCapitalC] }}],
+ RowSpacings -> 0, ColumnSpacings -> 0]], NotebookDefault]},
+ Editable -> True,
+ WindowToolbars -> {},
+ WindowSize -> {Fit, Fit},
+ WindowMargins -> {{0, Automatic}, {0, Automatic}},
+ WindowFrame -> "Palette",
+ WindowElements -> {},
+ WindowFrameElements -> "CloseBox",
+ WindowClickSelect -> False,
+ ScrollingOptions -> {"PagewiseScrolling" -> True},
+ ShowCellBracket -> False,
+ CellMargins -> {{0, 0}, {0, 0}},
+ Active -> True,
+ CellOpen -> True,
+ ShowCellLabel -> False,
+ ShowCellTags -> False,
+ ImageMargins -> {{0, 0}, {0, 0}},
+ Magnification -> 2, Visible -> True]
+ ];
+ SetOptions[pal1, WindowMargins -> {{0, Automatic}, {Automatic, 0}}];
+ SetOptions[pal1, Visible -> True, WindowSize -> {Fit, Fit}];
+
+ If[ Head[pal2] === NotebookObject,
+ NotebookClose[pal2]
+ ];
+
+ pal2 = NotebookPut[Notebook[{Cell[BoxData[GridBox[
+
+ JJJ = Join[
+ {tobut /@ {
+ TFI[d + 2, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}],
+ TVI[d + 2, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}],
+ TJI[d + 2, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}],
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}],
+ TBI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}],
+ TAI[d, {Subscript[\[Nu], 1]}]}},
+ {tobut /@ {
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}],
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}],
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}],
+ TKI[d - 2, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}],
+ TBI[d - 2, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}],
+ TAI[d - 2, {Subscript[\[Nu], 1]}]}}
+ ], RowSpacings -> 0, ColumnSpacings -> 0]], NotebookDefault]},
+
+ Editable -> True,
+ WindowToolbars -> {},
+ WindowSize -> {FitAll, FitAll},
+ WindowMargins -> {{0, Automatic}, {0, Automatic}},
+ WindowFrame -> "Palette",
+ WindowElements -> {},
+ WindowFrameElements -> "CloseBox",
+ WindowClickSelect -> False,
+ ScrollingOptions -> {"PagewiseScrolling" -> True},
+ ShowCellBracket -> False,
+ CellMargins -> {{0, 0}, {0, 0}},
+ Active -> True,
+ CellOpen -> True,
+ ShowCellLabel -> False,
+ ShowCellTags -> False,
+ ImageMargins -> {{0, 0}, {0, 0}},
+ Magnification -> 2, Visible -> True]
+ ];
+ SetOptions[pal2, WindowMargins -> {{Automatic, 15}, {Automatic, 4}}];
+ SetOptions[pal2, Visible -> True, WindowSize -> {Fit, Fit}];
+ SetOptions[pal2, WindowSize -> {Fit, Fit}]
+];
+
+OperatorApplyF[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TFI[d_, {n15__}] :>
+ TFI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TFI[d_, {n15__}] :>
+ TFI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TFI[__], Factor] &, x == y]
+ ];
+
+OperatorApplyV[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TVI[d_, {n15__}] :>
+ TVI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TVI[d_, {n15__}] :>
+ TVI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TVI[__], Factor] &, x == y]
+ ];
+
+OperatorApplyJ[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TJI[d_, {n15__}] :>
+ TJI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TJI[d_, {n15__}] :>
+ TJI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TJI[__], Factor] &, x == y]
+ ];
+
+OperatorApplyK[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TKI[d_, {n15__}] :>
+ TKI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TKI[d_, {n15__}] :>
+ TKI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TKI[__], Factor] &, x == y]
+ ];
+
+OperatorApplyK[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TKI[d_, {n15__}] :>
+ TKI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TKI[d_, {n15__}] :>
+ TKI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TKI[__], Factor] &, x == y]
+ ];
+
+OperatorApplyB[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TBI[d_, {n15__}] :>
+ TBI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TBI[d_, {n15__}] :>
+ TBI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TBI[__], Factor] &, x == y]
+ ];
+
+OperatorApplyA[x_ == y_] :=
+ Block[{sch},
+ sch = {
+ Schiebe[i_, "+"]^ni_. TAI[d_, {n15__}] :>
+ TAI[d, ReplacePart[{n15}, {n15}[[i]] + ni, i]],
+ Schiebe[i_, "-"]^ni_. TAI[d_, {n15__}] :>
+ TAI[d, ReplacePart[{n15}, {n15}[[i]] - ni, i]]
+ };
+ Map[Collect[Expand[#] //. sch, TAI[__], Factor] &, x == y]
+ ];
+
+MassDerivative[STLI[any__, { {al_, m1_}, {be_, m2_}, {ga_, m3_}, {de_, m4_}, {ep_, m5_}}], {{0, d1_}, {0, d2_}, {0, d3_}, {0, d4_}, {0, d5_}}] :=
+ Pochhammer[al, d1] Pochhammer[be, d2] Pochhammer[ga, d3] Pochhammer[de, d4] Pochhammer[ep, d5] *
+ STLI[any, {{al + d1, m1}, {be + d2, m2}, {ga + d3, m3}, {de + d4, m4}, {ep + d5, m5}}];
+
+TarasovT[abrs__, qq_ /; Head[qq] =!= List] :=
+ TarasovT[abrs, qq, {"g", "g", "g", "g", "g"}]
+
+TarasovT[r_, s_, qq_, {alp1_, alp2_, alp3_, alp4_, alp5_}] :=
+ Block[{ al1, al2, al3, al4, al5, alrul, new, Q1, Q11, Q12, Q2, Q22, dum1, dum2, be1, be2, ga1, ga2, rho},
+
+ If[ alp1 === 0,
+ al1 = 0
+ ];
+
+ If[ alp2 === 0,
+ al2 = 0
+ ];
+
+ If[ alp3 === 0,
+ al3 = 0
+ ];
+
+ If[ alp4 === 0,
+ al4 = 0
+ ];
+
+ If[ alp5 === 0,
+ al5 = 0
+ ];
+
+ alrul = Select[{ al1 :> I ParD[1], al2 :> I ParD[2], al3 :> I ParD[3], al4 :> I ParD[4], al5 :> I ParD[5]}, ! MatchQ[#, 0 :> _] &];
+
+ Q1 = al3 al5 + al4 al5 + al2 al3 + al3 al4;
+ Q2 = al4 al5 + al3 al5 + al1 al4 + al3 al4;
+ Q11 = 1/(-4) ( al2 + al4 + al5 );
+ Q22 = 1/(-4) ( al1 + al3 + al5 );
+ Q12 = 1/(-2) al5;
+ new =
+ I^(-r-s) ( D[ Exp[ I qq ( be1 Q1 + be2 Q2 + be1^2 Q11 + be2^2 Q22 + be1 be2 Q12 ) rho ], {be1, r}, {be2, s}] ) /.
+ Join[alrul, {be1 :> 0, be2 :> 0, rho :> -Pi^2/Pi^2 DPlus}];
+
+ Map[(Select[#, (FreeQ[#, ParD] && FreeQ[#, DPlus]) &] TpD[qq, Select[#, (! (FreeQ[#, ParD] && FreeQ[#, DPlus])) &]]) &,
+ (Expand[new, ParD] + dum1 dum2)] /. {dum1 :> 0, dum2 :> 0}
+ ];
+
+TarasovT[r_, s_, pp_, dp_ /; Head[dp] =!= List] :=
+ TarasovT[r, s, pp, dp, {"g", "g", "g", "g", "g"}]
+
+TarasovT[a_, b_, r_, s_, pp_, dp_, {alp1_, alp2_, alp3_, alp4_, alp5_}] :=
+ Block[{al1, al2, al3, al4, al5, alrul, new, Q1, Q11, Q12, Q2, Q22, dum1, dum2, be1, be2, ga1, ga2, rho},
+
+ If[alp1 === 0, al1 = 0]; If[alp2 === 0, al2 = 0];
+ If[alp3 === 0, al3 = 0]; If[alp4 === 0, al4 = 0];
+ If[alp5 === 0, al5 = 0];
+
+ alrul = Select[{al1 :> I ParD[1], al2 :> I ParD[2], al3 :> I ParD[3], al4 :> I ParD[4], al5 :> I ParD[5]}, !(MatchQ[#1, 0 :> _]) &];
+
+ Q1 = al3 al5 + al4 al5 + al2 al3 + al3 al4;
+ Q2 = al4 al5 + al3 al5 + al1 al4 + al3 al4;
+ Q11 = -(1/4) (al2 + al4 + al5); Q22 = -(1/4) (al1 + al3 + al5);
+ Q12 = -(al5/2);
+ new =
+ I^(-r - s - a - b) *
+ D[Exp[I ((be1 pp + ga1 dp) Q1 + (be2 pp + ga2 dp) Q2 + be1 (be1 pp + 2 ga1 dp) Q11 + be2 (be2 pp + 2 ga2 dp) Q22 + (be1 be2 pp + (be1 ga2 + be2 ga1) dp) Q12) rho],
+ {be1, r}, {be2, s}, {ga1, a}, {ga2, b}] /. Join[alrul, {be1 :> 0, be2 :> 0, ga1 :> 0, ga2 :> 0, rho :> -((Pi^2 DPlus)/Pi^2)}];
+
+ (Select[#1, FreeQ[#1, ParD] && FreeQ[#1, DPlus] &] TpD[pp, Select[#1, ! (FreeQ[#1, ParD] && FreeQ[#1, DPlus]) &]] &) /@ (Expand[new] + dum1 dum2) /.
+ {dum1 :> 0, dum2 :> 0}
+ ];
+
+ApplyTarasovT[tij_, exp_] :=
+ Block[{dump},
+ dump = Product[ParD[j]^dummy, {j, 5}];
+
+ Expand[tij exp] /. (STLI[de_, pp_, pe__List] TpD[_, DPlus^i_. t_]) :>
+ MassDerivative[STLI[ de /. de :> (de + 2 i), pp, pe], t dump /. Times -> List /. Power[_, n_] :> {0, n} /. dummy -> 0]
+ ];
+
+Prefactor1 /:
+ Prefactor1[a_]^n_ :=
+ Prefactor1[a^n];
+
+MakeBoxes[Block, StandardForm] :=
+ StyleBox["Block", FontSize -> 16, FontWeight -> "Bold", FontColor -> RGBColor[1, 0.2, 0.2]];
+
+MakeBoxes[Cayley, StandardForm] :=
+ StyleBox["Cayley", FontColor -> RGBColor[1, 0, 0.4]];
+
+MakeBoxes[CayleyD, StandardForm] :=
+ StyleBox["CayleyD", FontColor -> RGBColor[1, 0.2, 1]];
+
+MakeBoxes[Cayleyu, StandardForm] :=
+ StyleBox["Cayleyu", FontColor -> RGBColor[0.8, 0.8, 0.4]];
+
+MakeBoxes[IFF, StandardForm] :=
+ StyleBox["IFF", FontColor -> RGBColor[0.6, 0.4, 1]];
+
+MakeBoxes[MakeFun, StandardForm] :=
+ StyleBox["MakeFun", FontColor -> RGBColor[1, 0.6, 0.6]];
+
+MakeBoxes[TFI, StandardForm] :=
+ StyleBox["TFI", FontColor -> RGBColor[1, 0.6, 0]];
+
+MakeBoxes[TFR, StandardForm] :=
+ StyleBox["TFR", FontColor -> RGBColor[0, 0.6, 0]];
+
+MakeBoxes[ToArgs, StandardForm] :=
+ StyleBox["ToArgs", FontColor -> RGBColor[0.2, 0.6, 1]];
+
+MakeBoxes[TVI, StandardForm] :=
+ StyleBox["TVI", FontColor -> RGBColor[0.2, 0.4, 0.8]];
+
+MakeBoxes[TVR, StandardForm] :=
+ StyleBox["TVR", FontColor -> RGBColor[0.2, 0.8, 1]];
+
+PQ[_Integer?Positive] :=
+ True;
+
+PNQ[0] =
+ True;
+
+PNQ[_Integer?Positive] :=
+ True;
+
+FactorC[z_] :=
+ FactorC[z] = Factor[z]
+
+TFI[depp__, {a___, b_Integer, c___}] :=
+ TFI[depp, {a, {b, 0}, c}];
+
+TFI[depp__, {a___, {0, m_ /; m =!= 0}, b___}] :=
+ TFI[depp, {a, {0, 0}, b}];
+
+TFI[a__, {0, 0}, b__List] := TFI[a, b];
+
+TFI[d_, pp_, _, {0, 0}, {x1_, x2_, x3_, x4_, x5_}, list_List] :=
+ TFI[d, pp, {x1, x2, x3, x4, x5}, list];
+
+TFI[d_, pp_, dp_, {a_, b_}, {0, 0, 0, 0, 0}, list_List] :=
+ TFI[d, pp, dp, {a, b}, list];
+
+TFI[d_, pp_, dp_ /; Head[dp] =!= List, {0, 0, 0, 0, 0}, list_List] :=
+ TFI[d, pp, list];
+
+TFI[d_, pp_, dp_ /; Head[dp] =!= List, list_List] :=
+ TFI[d, pp, list];
+
+TFI[d_, pp_, dp_ /; Head[dp] =!= List, {x1_, x2_, x3_, x4_, x5_}, list_List] :=
+ TFI[d, pp, {x1, x2, x3, x4, x5}, list];
+
+TFI[__, {{_, _}, {0, 0}, {_, _}, {0, 0}, {_, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {_, _}, {0, 0}, {_, _}, {_, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {_, _}, {_, 0}, {_, _}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{_, 0}, {_, _}, {0, 0}, {_, _}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{_, _}, {_, 0}, {_, _}, {0, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{_, _}, {0, 0}, {_, _}, {_, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {0, 0}, {0, 0}, {_, 0}, {_, _}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {0, 0}, {_, 0}, {0, 0}, {_, _}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {_, 0}, {0, 0}, {0, 0}, {_, _}}] :=
+ 0;
+
+TFI[__, {{_, 0}, {0, 0}, {0, 0}, {0, 0}, {_, _}}] :=
+ 0;
+
+TFI[__, {{_, _}, {_, 0}, {0, 0}, {0, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{_, 0}, {_, _}, {0, 0}, {0, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{_, _}, {0, 0}, {0, 0}, {_, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{_, 0}, {0, 0}, {0, 0}, {_, _}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {_, 0}, {_, _}, {0, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {_, _}, {_, 0}, {0, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {0, 0}, {_, _}, {_, 0}, {0, 0}}] :=
+ 0;
+
+TFI[__, {{0, 0}, {0, 0}, {_, 0}, {_, _}, {0, 0}}] :=
+ 0;
+
+If[ $Notebooks,
+
+ mbt[z_] :=
+ ToBoxes[z, TraditionalForm];
+
+ redblue[z_ /; Head[z] =!= Plus] :=
+ mbt[z];
+
+ redblue[(z_) - 1] :=
+ StyleBox[mbt[z], FontColor -> RGBColor[1, 0, 0]];
+
+ redblue[(z_Subscript) - 2] :=
+ StyleBox[SubscriptBox[OverscriptBox[z[[1]], "_"], z[[2]]], FontColor -> RGBColor[1, 0, 0]];
+
+ redblue[(z_) - 2] :=
+ StyleBox[OverscriptBox[mbt[z], "_"], FontColor -> RGBColor[1, 0, 0]];
+
+ redblue[(z_) - 3] :=
+ StyleBox[UnderscriptBox[OverscriptBox[mbt[z], "_"], "_"], FontColor -> RGBColor[1, 0, 0]];
+
+ redblue[(z_) + 1] :=
+ StyleBox[mbt[z], FontColor -> RGBColor[0, 0, 1]];
+
+ redblue[(z_) + 2] :=
+ StyleBox[OverscriptBox[mbt[z], "_"], FontColor -> RGBColor[0, 0, 1]];
+
+ redblue[(z_Subscript) + 2] :=
+ StyleBox[SubscriptBox[OverscriptBox[z[[1]], "_"], z[[2]]], FontColor -> RGBColor[0, 0, 1]];
+
+ TFI /:
+ MakeBoxes[TFI[d_, pp_, {ur__}, {den__}], TraditionalForm] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", Rule[SingleLetterItalics, False],
+ Rule[FontWeight, "Bold"]], RowBox @@ {redblue /@ {den}},
+ RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ", ur}]], TFI[d, pp, {ur}, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, TraditionalForm];
+
+ TFI /:
+ MakeBoxes[TFI[d_, pp_, dp_, any__, {den__}], TraditionalForm] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", Rule[SingleLetterItalics, False],
+ Rule[FontWeight, "Bold"]], RowBox @@ {redblue /@ {den}}, RowBox[{"(", ToBoxes[d, TraditionalForm], ")", " ",
+ Sequence @@ Flatten[{any}]}]], TFI[d, pp, dp, any, {den}], Editable -> True}
+ ) /; Head[dp] =!= List;
+
+ TFI /:
+ MakeBoxes[TFI[dpp__, {den__}], TraditionalForm] :=
+ (
+ InterpretationBox @@ {SubsuperscriptBox[StyleBox["F", Rule[SingleLetterItalics, False], Rule[FontWeight, "Bold"]],
+ RowBox @@ {redblue /@ {den}}, RowBox[{"(", ToBoxes[First[{dpp}], TraditionalForm], ")"}]], TFI[dpp, {den}], Editable -> True}
+ ) /; MemberQ[{StandardForm, TraditionalForm}, TraditionalForm] && Head[Last[{dpp}]] =!= List;
+];
+
+
+TJI[de_, pp_, {{n1_Integer, m1_}, {n2_Integer, m2_}, {n3_Integer, m3_}}] :=
+ (
+ TJI[de, pp, {{n1, m1}, {n2, m2}, {n3, m3}}] =
+ TJI[de, pp, Reverse[Sort[{{n1, m1}, {n2, m2}, {n3, m3}}]]]
+ ) /; !OrderedQ[{{n3, m3}, {n2, m2}, {n1, m1}}];
+
+TJI[_, 0, {{_, 0}, {_, 0}, {_, 0}}] :=
+ 0
+
+TBI[de_, pp_, {{n1_Integer, m1_}, {n2_Integer, m2_}}] :=
+ (
+ TJI[de, pp, {{n1, m1}, {n2, m2}}] =
+ TBI[de, pp, Reverse[Sort[{{n1, m1}, {n2, m2}}]]]
+ ) /; !OrderedQ[{{n2, m2}, {n1, m1}}];
+
+TBI[_, 0, {{_, 0}, {_, 0}}] :=
+ 0;
+
+TAI[_, _, {{_Integer, 0}}] :=
+ 0;
+
+\[CapitalDelta]\[ScriptCapitalC] =
+ (-(1/2)) Det[{
+ {0, 1, 1, 1, 1},
+ {1, 0, Subscript[\[Mu], 6], Subscript[\[Mu], 4], Subscript[\[Mu], 3]},
+ {1, Subscript[\[Mu], 6], 0, Subscript[\[Mu], 2], Subscript[\[Mu], 1]},
+ {1, Subscript[\[Mu], 4], Subscript[\[Mu], 2], 0, Subscript[\[Mu], 5]},
+ {1, Subscript[\[Mu], 3], Subscript[\[Mu], 1], Subscript[\[Mu], 5], 0}}
+];
+
+checkli = {
+ \[ScriptCapitalC] ->
+ \[CapitalDelta]\[ScriptCapitalC],
+
+ Subscript[\[CapitalDelta], i_] :>
+ D[\[CapitalDelta]\[ScriptCapitalC], Subscript[\[Mu], i]],
+
+ Subscript[\[Mu], 6] :> PP,
+ Subscript[\[Mu], i_] :> ToExpression[StringJoin["m", ToString[i]]]^2,
+ Subscript[m, 1] :> Sqrt[m1^2],
+ Subscript[m, 2] :> Sqrt[m2^2], Subscript[m, 3] :> Sqrt[m3^2],
+ Subscript[m, 4] :> Sqrt[m4^2],
+ Subscript[m, 5] :> Sqrt[m5^2],
+
+ Subscript[\[CapitalDelta], i_, j_, k_] :>
+ Subscript[\[Mu], i]^2 + Subscript[\[Mu], j]^2 + Subscript[\[Mu], k]^2 - 2*(Subscript[\[Mu], i]*Subscript[\[Mu], j] +
+ Subscript[\[Mu], j]*Subscript[\[Mu], k] + Subscript[\[Mu], k]*Subscript[\[Mu], i]),
+
+ Subscript[u, i_, j_, k_] :>
+ Subscript[\[Mu], i] - Subscript[\[Mu], j] - Subscript[\[Mu], k],
+
+ Subscript[\[CapitalSigma], i_] :>
+ 3*d - 2*Sum[Subscript[\[Nu], j], {j, 1, i}] - 2,
+
+ Subscript[\[Nu], 1] :> n1,
+ Subscript[\[Nu], 2] :> n2,
+ Subscript[\[Nu], 3] :> n3,
+ Subscript[\[Nu], 4] :> n4,
+ Subscript[\[Nu], 5] :> n5
+};
+
+
+Subscript[\[CapitalDelta], i_, j_, k_] :=
+ Subscript[\[CapitalDelta], Sequence @@ Sort[{i, j, k}]] /; !OrderedQ[{i, j, k}];
+
+ToArgs[z_] :=
+ Expand[z //. checkli];
+
+setd[hCayley[m1_, m2_, m3_, m4_, m5_, p_], set[hCayley[m1, m2, m3, m4, m5, p],
+ factor[ToArgs[\[ScriptCapitalC]] /. PP -> p^2]]
+] /. { hCayley :> Cayley, setd :> SetDelayed, set :> Set, factor :> Factor};
+
+Do[ setd[hCayley[i][{m1_, m2_, m3_, m4_, m5_, p_}],
+ set[hCayley[i][{m1, m2, m3, m4, m5, p}],
+ factor[ToArgs[Subscript[\[CapitalDelta], i]] /. PP -> p^2]]] /. {
+ hCayley :> Cayley, setd :> SetDelayed, set :> Set, factor :> Factor}, {i, 6}
+];
+
+
+Cayley[i_, j_, k_][m_List] :=
+ Cayley[i, j, k][m] =
+ Block[{mm = m},
+ While[
+ Length[mm] < 7,
+ AppendTo[mm, Last[mm]]
+ ];
+
+ FactorC[mm[[i]]^4 - 2*mm[[j]]^2*mm[[i]]^2 - 2*mm[[k]]^2*mm[[i]]^2 + mm[[j]]^4 + mm[[k]]^4 - 2*mm[[j]]^2*mm[[k]]^2]
+ ];
+
+Cayleyu[i_, j_, k_][m_List] :=
+ Cayleyu[i, j, k][mm] =
+ Block[{mm = m},
+ While[
+ Length[mm] < 7,
+ AppendTo[mm, Last[mm]]
+ ];
+
+ FactorC[mm[[i]]^2 - mm[[j]]^2 - mm[[k]]^2]
+ ];
+
+Do[setd[hCayleyD[i][{m1_, m2_, m3_, m4_, m5_, p_}],
+ set[hCayleyD[i][{m1, m2, m3, m4, m5, p}],
+ factor[(ToArgs[Subscript[\[CapitalDelta], i]] /. PP -> p^2)/\[ScriptCapitalC][m1, m2, m3, m4, m5, p]]]] /.
+ {hCayleyD :> CayleyD, setd :> SetDelayed, set :> Set, factor :> Factor, \[ScriptCapitalC] :> Cayley}, {i, 6}
+];
+
+setd[hCayleyD[1, 2, 5][{m1_, m2_, m3_, m4_, m5_, p_}],
+ set[hCayleyD[1, 2, 5][{m1, m2, m3, m4, m5, p}],
+ factor[(ToArgs[Subscript[\[CapitalDelta], 1, 2, 5]] /. PP -> p^2)/\[ScriptCapitalC][m1, m2, m3, m4, m5, p]]]
+] /. {hCayleyD :> CayleyD, setd :> SetDelayed, set :> Set, factor :> Factor, \[ScriptCapitalC] :> Cayley};
+
+setd[hCayleyD[1, 3, 6][{m1_, m2_, m3_, m4_, m5_, p_}],
+ set[hCayleyD[1, 3, 6][{m1, m2, m3, m4, m5, p}],
+ factor[(ToArgs[Subscript[\[CapitalDelta], 1, 3, 6]] /. PP -> p^2)/\[ScriptCapitalC][m1, m2, m3, m4, m5, p]]]
+] /. {hCayleyD :> CayleyD, setd :> SetDelayed, set :> Set, factor :> Factor, \[ScriptCapitalC] :> Cayley};
+
+setd[hCayleyD[3, 4, 5][{m1_, m2_, m3_, m4_, m5_, p_}],
+ set[hCayleyD[3, 4, 5][{m1, m2, m3, m4, m5, p}],
+ factor[(ToArgs[Subscript[\[CapitalDelta], 3, 4, 5]] /. PP -> p^2)/\[ScriptCapitalC][m1, m2, m3, m4, m5, p]]]
+] /. {hCayleyD :> CayleyD, setd :> SetDelayed, set :> Set, factor :> Factor, \[ScriptCapitalC] :> Cayley};
+
+nutonandDelta[w_, 5] :=
+ w /. {
+ Subscript[\[Nu], 1] :> n1,
+ Subscript[\[Nu], 2] :> n2,
+ Subscript[\[Nu], 3] :> n3,
+ Subscript[\[Nu], 4] :> n4,
+ Subscript[\[Nu], 5] :> n5,
+ Subscript[\[CapitalDelta], ijk__] :> \[ScriptCapitalC]*cD[ijk],
+ Subscript[u, ijk__] :> cu[ijk],
+ Subscript[D, ijk__] :> TA[D, ijk],
+ Subscript[\[Rho], ijk__] :> TA[\[Rho], ijk],
+ Subscript[\[Phi], ijk__] :> TA[\[Phi], ijk],
+ Subscript[\[Sigma], i_, j_, k_] :> TA[\[Sigma], d, i, j, k, Subscript[\[Nu], i], Subscript[\[Nu], j], Subscript[\[Nu], k]],
+ Subscript[h, i_, j_, k_] :> TA[h, d, i, j, k, Subscript[\[Nu], i], Subscript[\[Nu], j], Subscript[\[Nu], k]],
+ Subscript[S, i_, j_, k_] :> TA[S, d, i, j, k, Subscript[\[Nu], i], Subscript[\[Nu], j], Subscript[\[Nu], k]],
+ Subscript[\[CapitalSigma], i_] :> ToArgs[Subscript[\[CapitalSigma], i]]} /. {
+
+ Subscript[\[Nu], 1] :> n1,
+ Subscript[\[Nu], 2] :> n2,
+ Subscript[\[Nu], 3] :> n3,
+ Subscript[\[Nu], 4] :> n4,
+ Subscript[\[Nu], 5] :> n5,
+ Subscript[m, 1] :> m1,
+ Subscript[m, 2] :> m2,
+ Subscript[m, 3] :> m3,
+ Subscript[m, 4] :> m4,
+ Subscript[m, 5] :> m5
+ };
+
+nutonandDelta[w_] :=
+ w /. {
+ Subscript[\[Nu], 1] :> n1,
+ Subscript[\[Nu], 2] :> n2,
+ Subscript[\[Nu], 3] :> n3,
+ Subscript[\[Nu], 4] :> n4,
+ Subscript[\[Nu], 5] :> n5,
+ Subscript[\[CapitalDelta], ijk__] :> cD[ijk],
+ Subscript[u, ijk__] :> cu[ijk],
+ Subscript[D, ijk__] :> TA[D, ijk],
+ Subscript[\[Rho], ijk__] :> TA[\[Rho], ijk],
+ Subscript[\[Phi], ijk__] :> TA[\[Phi], ijk],
+ Subscript[\[Sigma], i_, j_, k_] :> TA[\[Sigma], d, i, j, k, Subscript[\[Nu], i],
+ Subscript[\[Nu], j], Subscript[\[Nu], k]],
+ Subscript[h, i_, j_, k_] :> TA[h, d, i, j, k, Subscript[\[Nu], i], Subscript[\[Nu], j], Subscript[\[Nu], k]],
+ Subscript[S, i_, j_, k_] :> TA[S, d, i, j, k, Subscript[\[Nu], i], Subscript[\[Nu], j],
+ Subscript[\[Nu], k]],
+ Subscript[\[CapitalSigma], i_] :> ToArgs[Subscript[\[CapitalSigma], i]]} /. {
+
+ Subscript[\[Nu], 1] :> n1,
+ Subscript[\[Nu], 2] :> n2,
+ Subscript[\[Nu], 3] :> n3,
+ Subscript[\[Nu], 4] :> n4,
+ Subscript[\[Nu], 5] :> n5,
+ Subscript[m, 1] :> m1,
+ Subscript[m, 2] :> m2,
+ Subscript[m, 3] :> m3,
+ Subscript[m, 4] :> m4,
+ Subscript[m, 5] :> m5
+ };
+
+addPeP[TFR[d_, pp_, li1_, rest_]] :=
+ TFR[d, pp, li1, rest];
+
+addPeP[TFI[d_, pp_, li1_List]] :=
+ TFI[d, pp, li1];
+
+addPeP[TFR[d_, pp_, dp_Symbol, li1_, rest_]] :=
+ TFR[d, pp, dp, li1, rest];
+
+addPeP[TFI[d_, pp_, dp_Symbol, li1_List]] :=
+ TFI[d, pp, dp, li1];
+
+addPeP[TVI[d_, pp_, li1_List]] :=
+ TVI[d, pp, li1];
+
+(* TODO ??? *)
+nnnnnaddPeP[(any_)[d_, pp_, li1_List, rest__List]] :=
+ any[d, pp, li1, rest] /; any =!= List
+
+addPeP[z_List] := Append[z, Sqrt[PP]];
+
+addPeP[TFI[d_, z_List]] :=
+ TFI[d, PP, z];
+
+addPeP[TVI[d_, z_List]] :=
+ TVI[d, PP, z];
+
+addPeP[TJI[d_, z_List]] :=
+ TJI[d, PP, z];
+
+addPeP[TFR[d_, z_List]] :=
+ TFR[d, PP_, z];
+
+addPeP[TFR[d_, pl_List, z_List]] :=
+ TFR[d, PP_, pl, z];
+
+addPeP[TVR[d_, z__List]] :=
+ TVR[d, PP_, z];
+
+addPeP[TJR[d_, z__List]] :=
+ TJR[d, PP_, z];
+
+nutomass[w_] :=
+ w /. {
+ Subscript[\[Nu], 1] + (i1_.) :> {n1 + i1, m1},
+ Subscript[\[Nu], 2] + (i2_.) :> {n2 + i2, m2},
+ Subscript[\[Nu], 3] + (i3_.) :> {n3 + i3, m3},
+ Subscript[\[Nu], 4] + (i4_.) :> {n4 + i4, m4},
+ Subscript[\[Nu], 5] + (i5_.) :> {n5 + i5, m5}} /.
+ {in1_Integer, in2_Integer, in3_Integer, in4_Integer} :> {{in1, m1}, {in2, m2}, {in3, m3}, {in4, m4}} /.
+ {in1_Integer, in2_Integer, in3_Integer} :> {{in1, m1}, {in2, m2}, {in3, m3}};
+
+Clear[maybeF];
+
+maybeF[z_Times] :=
+ FactorC[z] /; FreeQ[z, TFI] && FreeQ[z, TVI] && FreeQ[z, TJI] && Length[Cases[z, cD[__], -1]] > 1;
+
+maybeF[z_] := z;
+
+SetAttributes[top, Listable];
+SetAttributes[IFF, HoldAll];
+
+Clear[MakeFun];
+
+MakeFun[(c_.) TFI[t__] == (rhs_), eqn_String, IFF[conds_], mrel_: {}] :=
+ Block[{nm, nmrel, setdel, pat, blank, pattern, patternTest, identitL},
+ nmrel = Select[Flatten[{mrel}], FreeQ[#1, Factor] & ];
+ HoldForm @@ {setdel[
+ addPeP[TFR @@ top /@ nutomass[{t}]] /. nmrel,
+ Hold[Condition][Hold[CompoundExpression][
+ Hold[TComment][eqn, addPeP[nutomass[TFR[t]]] /.
+ TFR -> TFIC /. {Pattern :> pat, Blank :> blank} /. pat[PP, blank[]] :> PP /. nmrel],
+
+ Collect[ TT = Expand3[nutonandDelta[(1/c) (rhs /. TFI[te__] :> addPeP[nutomass[TFI[te]]]), 5]],
+ TFI[__], maybeF[(Collect[Numerator[#1], cD[__], Factor]/Collect[Denominator[#1], cD[__], Factor] & ) /@
+ Factor[#1]] & ] /. nmrel
+ ],
+
+ nutonandDelta[IFF[conds], 5]]] /. top[i_Integer] -> i /. top :> (patternTest[pattern[#1, blank[]], PQ] & ) /.
+ patternTest[pattern[dm_ /; MemberQ[{d, PP, DP, m1, m2, m3, m4, m5}, dm], blank[]], _] :>
+ pattern[dm, blank[]] /. {blank :> Blank, pattern :> Pattern, patternTest :> PatternTest}} /.
+ cD[ijk__] -> Hold[CayleyD[ijk]][addPeP[BLA = nutomass[Last[{t}]] /. nmrel /. {_, ma_} :> ma]] /.
+ addPeP -> Identity /. Hold[CompoundExpression] -> CompoundExpression /. Hold[Condition][a_, IFF[b_]] -> a /; b /.
+ Hold[Set] -> Set /. Hold[TComment] -> TComment /. Hold[CayleyD[ijk__]] -> CayleyD[ijk] /. {setdel :> SetDelayed} /.
+ Identity -> identit /. identit[a_] -> a
+ ];
+
+MakeFun[(c_.) TFI[t__] == (rhs_), eqn_String, mrel_: {}] :=
+ Block[{nm, nmrel, setdel, pat, blank, pattern, patternTest, identit},
+ nmrel = Select[Flatten[{mrel}], FreeQ[#1, Factor] & ];
+
+ HoldForm @@ {setdel[
+ addPeP[TFR @@ top /@ nutomass[{t}]] /. nmrel,
+
+ Hold[CompoundExpression][Hold[TComment][eqn, addPeP[nutomass[TFR[t]]] /. TFR -> TFIC /. {Pattern :> pat, Blank :> blank} /.
+ pat[PP, blank[]] :> PP /. nmrel],
+ Collect[TT = Expand3[nutonandDelta[(1/c)*(rhs /. TFI[te__] :> addPeP[nutomass[TFI[te]]])]], TFI[__],
+ maybeF[(Collect[Numerator[#1], cD[__], Factor] / Collect[Denominator[#1], cD[__], Factor] & ) /@ Factor[#1]] & ] /. nmrel]
+ ] /. top[i_Integer] -> i /. top :> (patternTest[pattern[#1, blank[]], PQ] & ) /.
+ patternTest[ pattern[dm_ /; MemberQ[{d, PP, DP, m1, m2, m3, m4, m5}, dm], blank[]], _] :> pattern[dm, blank[]] /.
+ {blank :> Blank, pattern :> Pattern, patternTest :> PatternTest}} /.
+ cD[ijk__] -> Hold[CayleyD[ijk]][addPeP[nutomass[Last[{t}]] /. addPeP -> Identity /. nmrel /.
+ {nuu_, ma_} :> ma]] /. Hold[CompoundExpression] -> CompoundExpression /. Hold[Condition][a_, IFF[b_]] -> a /; b /.
+ Hold[Set] -> Set /. Hold[TComment] -> TComment /. Hold[CayleyD[ijk__]] -> CayleyD[ijk] /. {setdel :> SetDelayed} /.
+ addPeP -> Identity /. Identity -> identit /. identit[a_] -> a
+ ] /; Head[mrel] =!= IFF;
+
+MakeFun[(c_.) TVI[t__] == (rhs_), eqn_String, IFF[conds_], mrel_: {}] :=
+ Block[{nm, nmrel, setdel, pat, blank, pattern, patternTest, identit},
+ nmrel =
+ Select[Flatten[{mrel}], FreeQ[#1, Factor] & ];
+
+ nmrel =
+ Join[nmrel, {
+ Subscript[m, 1] :> m1,
+ Subscript[m, 2] :> m2,
+ Subscript[m, 3] :> m3,
+ Subscript[m, 4] :> m4,
+ Subscript[\[CapitalSigma], i_] :>
+ ToArgs[Subscript[\[CapitalSigma], i]]}
+ ];
+ HoldForm @@ {setdel[
+ addPeP[TVR @@ top /@ nutomass[{t}]] /. nmrel,
+
+ Hold[Condition][Hold[CompoundExpression][Hold[TComment][eqn, addPeP[nutomass[TVR[t]]] /.
+ TVR -> TVIC /. {Pattern :> pat, Blank :> blank} /. pat[PP, blank[]] :> PP /. nmrel],
+
+ Collect[TT = Expand3[nutonandDelta[(1/c) (rhs /. TVI[te__] :> addPeP[nutomass[TVI[te]]])]],
+ TVI[__], maybeF[(Collect[Numerator[#1], cu[__], Factor]/ Collect[Denominator[#1], cu[__], Factor] & ) /@
+ Factor[#1]] & ] /. \[ScriptCapitalC] -> 1 /. nmrel], nutonandDelta[IFF[conds]]]
+ ] /.
+ top[i_Integer] -> i /. top :> (patternTest[pattern[#1, blank[]], PQ] & ) /.
+ patternTest[pattern[dm_ /; MemberQ[{d, PP, m1, m2, m3, m4}, dm], blank[]], _] :>
+ pattern[dm, blank[]] /. {blank :> Blank, pattern :> Pattern, patternTest :> PatternTest}} /.
+ HoldPattern[TA[aijk__]] -> Hold[TA[aijk]][addPeP[nutomass[Last[{t}]] /. nmrel /. {_, ma_} :> ma]] /.
+ cD[ijk__] -> Hold[Cayley[ijk]][addPeP[nutomass[Last[{t}]] /. nmrel /. {_, ma_} :> ma]] /. cu[ijk__] ->
+ Hold[Cayleyu[ijk]][addPeP[nutomass[Last[{t}]] /. addPeP -> Identity /. nmrel /. {_, ma_} :> ma]] /.
+ Hold[CompoundExpression] -> CompoundExpression /. Hold[Condition][a_, IFF[b_]] -> a /; b /. Hold[Set] -> Set /.
+ Hold[TComment] -> TComment /. addPeP -> Identity /. Hold[Cayleyu[ijk__]] -> Cayleyu[ijk] /.
+ Hold[Cayley[ijk__]] -> Cayley[ijk] /. Hold[TA] -> TA /. {setdel :> SetDelayed} /. Identity -> identit /. identit[a_] -> a
+ ];
+
+MakeFun[(c_.) TVI[t__] == (rhs_), eqn_String, mrel_: {}] :=
+ Block[{nm, nmrel, setdel, pat, blank, pattern, patternTest},
+ nmrel = Select[Flatten[{mrel}], FreeQ[#1, Factor] & ];
+
+ nmrel = Join[nmrel, {
+ Subscript[m, 1] :> m1,
+ Subscript[m, 2] :> m2,
+ Subscript[m, 3] :> m3,
+ Subscript[m, 4] :> m4,
+ Subscript[\[CapitalSigma], i_] :> ToArgs[Subscript[\[CapitalSigma], i]]}];
+
+ HoldForm @@ {setdel[
+ addPeP[TVR @@ top /@ nutomass[{t}]] /. nmrel,
+
+ Hold[CompoundExpression][Hold[TComment][eqn, addPeP[nutomass[TVR[t]]] /.
+ TVR -> TVIC /. {Pattern :> pat, Blank :> blank} /. pat[PP, blank[]] :> PP /. nmrel],
+
+ Collect[TT = Expand3[nutonandDelta[(1/c)*(rhs /. TVI[te__] :> addPeP[nutomass[TVI[te]]])]],
+ TVI[__], maybeF[(Collect[Numerator[#1], cu[__], Factor]/ Collect[Denominator[#1], cu[__], Factor] & ) /@
+ Factor[#1]] & ] /. nmrel /. \[ScriptCapitalC] -> 1]
+ ] /.
+ top[i_Integer] -> i /. top :> (patternTest[pattern[#1, blank[]], PQ] & ) /.
+ patternTest[pattern[dm_ /; MemberQ[{d, PP, m1, m2, m3, m4}, dm], blank[]], _] :> pattern[dm, blank[]] /.
+ {blank :> Blank, pattern :> Pattern, patternTest :> PatternTest}} /. cD[ijk__] ->
+ Hold[Cayley[ijk]][addPeP[nutomass[Last[{t}]] /. nmrel /. {nuu_, ma_Symbol} :> ma]] /.
+ cu[ijk__] -> Hold[Cayleyu[ijk]][addPeP[nutomass[Last[{t}]] /.
+ nmrel /. {nuu_, ma_Symbol} :> ma]] /. Hold[CompoundExpression] -> CompoundExpression /.
+ Hold[Set] -> Set /. Hold[TComment] -> TComment /. addPeP -> Identity /. Hold[Cayleyu[ijk__]] -> Cayleyu[ijk] /.
+ Hold[Cayley[ijk__]] -> Cayley[ijk] /. {setdel :> SetDelayed} /. Identity -> identit /. identit[a_] -> a
+ ] /; Head[mrel] =!= IFF;
+
+MakeFun[(c_.) TJI[t__] == (rhs_), eqn_String, IFF[conds_], mrel_: {}] :=
+ Block[{nm, nmrel, result, setdel, pat, blank, pattern, patternTest, tT},
+
+ \[ScriptCapitalC] = 1;
+
+ nmrel = Select[Flatten[{mrel}], FreeQ[#1, Factor] & ];
+
+ nmrel =
+ Join[nmrel, {
+ Subscript[m, 1] :> m1,
+ Subscript[m, 2] :> m2,
+ Subscript[m, 3] :> m3,
+ Subscript[m, 4] :> m4,
+ Subscript[\[CapitalSigma], i_] :>
+ ToArgs[Subscript[\[CapitalSigma], i]]}
+ ];
+
+ result =
+ HoldForm @@ {setdel[
+ addPeP[TJR @@ top /@ nutomass[{tT = t}]] /. nmrel,
+
+ Hold[Condition][Hold[CompoundExpression][Hold[TComment][eqn, addPeP[nutomass[TJR[t]]] /. TJR -> TJIC /.
+ {Pattern :> pat, Blank :> blank} /. pat[PP, blank[]] :> PP /. nmrel],
+ TJ = Collect[ TT = Expand3[nutonandDelta[(1/c) (rhs /. TJI[te__] :> addPeP[nutomass[TJI[te]]])]], TJI[__],
+ maybeF[(Collect[Numerator[#1], cu[__], Factor]/Collect[Denominator[#1], cu[__], Factor] & ) /@ Factor[#1]] & ] /.
+ \[ScriptCapitalC] -> 1 /. nmrel], nutonandDelta[IFF[conds]]]
+ ] /.
+ top[i_Integer] -> i /. top :> (patternTest[pattern[#1, blank[]], PQ] & ) /.
+ patternTest[pattern[dm_ /; MemberQ[{d, PP, m1, m2, m3, m4}, dm], blank[]], _] :>
+ pattern[dm, blank[]] /. {blank :> Blank, pattern :> Pattern, patternTest :> PatternTest}} /.
+ HoldPattern[TA[aijk__]] -> Hold[TA][aijk][addPeP[nutomass[Last[{t}]] /. nmrel /. {_, ma_} :> ma]] /. cD[ijk__] ->
+ Hold[Cayley[ijk]][addPeP[nutomass[Last[{t}]] /. nmrel /. {_, ma_Symbol} :> ma]] /. cu[ijk__] ->
+ Hold[Cayleyu[ijk]][addPeP[nutomass[Last[{t}]] /. nmrel /. {_, ma_Symbol} :> ma]] /.
+ Hold[CompoundExpression] -> CompoundExpression /. Hold[Condition][a_, IFF[b_]] -> a /; b /.
+ Hold[Set] -> Set /. Hold[TComment] -> TComment /. Hold[Cayleyu[ijk__]] -> Cayleyu[ijk] /.
+ Hold[Cayley[ijk__]] -> Cayley[ijk] /. Hold[TA] -> TA /. {setdel :> SetDelayed}; \[ScriptCapitalC] =. ;
+
+ result
+ ];
+
+SetAttributes[paTT, HoldFirst];
+
+MakeFun[(c_.) TKI[t__] == (rhs_), eqn_String, IFF[conds_], mrel_: {}] :=
+ MakeFun[c TJI[t] == rhs /. TKI -> TJI, eqn, IFF[conds], mrel] /.
+ {PP :> 0, Sqrt[PP] :> 0, Pattern :> paTT} /. paTT[0, _] -> 0 /. paTT -> Pattern /. TJIC[d_, li_List] :> TJIC[d, 0, li];
+
+MakeFun[(c_.) TBI[t__] == (rhs_), eqn_String, IFF[conds_], mrel_: {}] :=
+ MakeFun[c TJI[t] == rhs /. TBI -> TJI, eqn, IFF[conds], mrel] /.
+ {TJI :> TBI, TJR :> TBR, TJIC :> TBIC};
+
+MakeFun[(c_.) TAI[t__] == (rhs_), eqn_String, IFF[conds_], mrel_: {}] :=
+ MakeFun[c TJI[t] == rhs /. TAI -> TJI, eqn, IFF[conds], mrel] /. {TJI :> TAI, TJR :> TAR, TJIC :> TAIC};
+
+Interchange[z_, (i_) \[LeftRightArrow] (j_)] :=
+ nuExplicit[z] /. {
+
+ Subscript[\[Nu], i] :> Subscript[\[Nu], j],
+ Subscript[\[Nu], j] :> Subscript[\[Nu], i],
+ Subscript[m, i] :> Subscript[m, j],
+ Subscript[m, j] :> Subscript[m, i],
+ Subscript[\[CapitalDelta], ij__] :>
+ Subscript[\[CapitalDelta], ij] /. {i :> j, j :> i},
+ Subscript[u, ij__] :> (Subscript[u, ij] /. {i :> j, j :> i}),
+ Subscript[h, ij__] :> (Subscript[h, ij] /. {i :> j, j :> i}),
+ Subscript[\[Phi], ij__] :> (Subscript[\[Phi], ij] /. {i :> j, j :> i}),
+ Subscript[\[Rho], ij__] :> (Subscript[\[Rho], ij] /. {i :> j, j :> i}),
+ Subscript[\[Sigma], ij__] :> (Subscript[\[Sigma], ij] /. {i :> j, j :> i}),
+ Subscript[D, ij__] :> (Subscript[D, ij] /. {i :> j, j :> i})} /. {
+
+ TFI[depp__, args_List] :> TFI[depp, Sort[args]] /; ! OrderedQ[args],
+ TVI[depp__, args_List] :> TVI[depp, Sort[args]] /; ! OrderedQ[args],
+ TJI[depp__, args_List] :> TJI[depp, Sort[args]] /; ! OrderedQ[args],
+ TBI[depp__, args_List] :> TBI[depp, Sort[args]] /; ! OrderedQ[args]
+ };
+
+Interchange[z_, (i_) \[LeftRightArrow] (j_), vw__] :=
+ Interchange[Interchange[z, i \[LeftRightArrow] j], vw];
+
+Interchange[z_, {(i_) \[LeftRightArrow] (j_)}] :=
+ Interchange[Interchange[z, i \[LeftRightArrow] j]];
+
+Interchange[z_, {(i_) \[LeftRightArrow] (j_), vw__}] :=
+ Interchange[Interchange[z, i \[LeftRightArrow] j], vw];
+
+
+nuExplicit[z_] :=
+ z /.
+ Subscript[\[CapitalSigma], i_] :>
+ Expand[3*d - 2 - 2*Sum[Subscript[\[Nu], j], {j, 1, i}]] /. {
+
+ Subscript[\[Sigma], i_, j_, k_] :>
+ (-(1/4))*(d - Subscript[\[Nu], i] - 2*Subscript[\[Nu], j])*Subscript[\[Phi], i, j, k] -
+ (1/4)*(d - 2*Subscript[\[Nu], i] - Subscript[\[Nu], j])*Subscript[\[Phi], j, i, k] -
+ (1/4)*(2*d - 2*Subscript[\[Nu], i] - 2*Subscript[\[Nu], j] - Subscript[\[Nu], k] - 1)*Subscript[\[Phi], k, i, j],
+
+ Subscript[h, i_, j_, k_] :>
+ (-(1/2))*(d - 2*Subscript[\[Nu], j] - Subscript[\[Nu], k])*Subscript[m, k]^2*
+ Subscript[\[Phi], i, j, k] - (1/2)*(2*d - Subscript[\[Nu], i] - 2*Subscript[\[Nu], j] -
+ 2*Subscript[\[Nu], k] - 1)*Subscript[m, i]^2*Subscript[\[Phi], k, i, j] + (d - Subscript[\[Nu], j] -
+ 2*Subscript[\[Nu], k]) Subscript[\[Rho], i, j, k],
+ Subscript[S, i_, j_, k_] :>
+ (-(d - 2*Subscript[\[Nu], j] - Subscript[\[Nu], k])) Subscript[m, k]^2*
+ Subscript[\[Phi], j, i, k] - (d - Subscript[\[Nu], j] - 2*Subscript[\[Nu], k])*
+ Subscript[m, j]^2 Subscript[\[Phi], k, i, j] + 2*(2*d - Subscript[\[Nu], i] - 2*Subscript[\[Nu], j] -
+ 2*Subscript[\[Nu], k] - 1)*Subscript[\[Rho], i, j, k]
+ };
+
+MakeBoxes[TA[a_, ___Symbol, ijk___Integer][__], _] :=
+ SubscriptBox[a, RowBox[{ijk}]]
+
+MakeBoxes[TA[a_, ___Symbol, ijk___Integer, ___Symbol][__], _] :=
+ SubscriptBox[a, RowBox[{ijk}]]
+
+TA[args__][mar_List] :=
+ TA[args][mar] = ta[args][mar];
+
+ta[D, i_Integer, j_Integer, k_Integer][{em__}] :=
+ With[
+ {q = Last[{em}], mi = {em}[[i]], mj = {em}[[j]], mk = {em}[[k]]},
+
+ Factor[
+ q^8 - 4*q^6*(mi^2 + mj^2 + mk^2) + q^4*(6*(mi^4 + mj^4 + mk^4) + 4*(mi^2*mj^2 + mk^2*mi^2 + mk^2*mj^2)) -
+ 4*q^2*(mi^6 + mj^6 + mk^6 - mi^2*(mj^4 + mk^4) - mj^2*(mi^4 + mk^4) - mk^2*(mi^4 + mj^4) +
+ 10*mi^2*mj^2*mk^2) + Cayley[i, j, k][{em}]^2
+ ]
+ ];
+
+ta[\[Rho], i_Integer, j_Integer, k_Integer][{em__}] :=
+ With[
+ {q = Last[{em}], mi = {em}[[i]], mj = {em}[[j]], mk = {em}[[k]]},
+
+ Factor[
+ -q^6 + 3*q^4*(mi^2 + mj^2 + mk^2) - q^2*(3*(mi^4 + mj^4 + mk^4) +
+ 2*(mi^2*mj^2 + mk^2*mi^2 + mk^2*mj^2)) + (mi^6 + mj^6 +
+ mk^6 - mi^2*(mj^4 + mk^4) - mj^2*(mi^4 + mk^4) - mk^2*(mi^4 + mj^4) + 10*mi^2*mj^2*mk^2)]
+ ];
+
+ta[\[Phi], i_Integer, j_Integer, k_Integer][{em__}] :=
+ With[
+ {q = Last[{em}], mi = {em}[[i]], mj = {em}[[j]], mk = {em}[[k]]},
+
+ 4*Factor[q^4 + 2*q^2*(mi^2 - mj^2 - mk^2) + (mj^2 - mk^2)^2 + mi^2*(2*mj^2 + 2*mk^2 - 3*mi^2)]
+ ];
+
+ta[\[Sigma], d_, i_Integer, j_Integer, k_Integer, \[Nu]i_Integer, \[Nu]j_Integer, \[Nu]k_Integer][{em__}] :=
+ Factor[
+ (-(1/4))*(d - \[Nu]i - 2*\[Nu]j)*
+ TA[\[Phi], i, j, k][{em}] - (1/4)*(d - 2*\[Nu]i - \[Nu]j)*
+ TA[\[Phi], j, i, k][{em}] - (1/4)*(2*d - 2*\[Nu]i - 2*\[Nu]j - \[Nu]k - 1)*TA[\[Phi], k, i, j][{em}]
+ ];
+
+ta[h, d_, i_Integer, j_Integer, k_Integer, \[Nu]i_Integer, \[Nu]j_Integer, \[Nu]k_Integer][{em__}] :=
+ With[
+ {mk = {em}[[k]]},
+
+ Factor[
+ (-(1/2))*(d - 2*\[Nu]j - \[Nu]k)*mk^2*
+ TA[\[Phi], i, j, k][{em}] - (1/2)*(2*d - \[Nu]i - 2*\[Nu]j - 2*\[Nu]k - 1)*mi^2*
+ TA[\[Phi], k, i, j][{em}] + (d - \[Nu]j - 2 \[Nu]k) TA[\[Rho], i, j, k][{em}]
+ ]
+ ];
+
+ta[S, d_, i_Integer, j_Integer, k_Integer, \[Nu]i_Integer, \[Nu]j_Integer, \[Nu]k_Integer][{em__}] :=
+ With[
+ {mj = {em}[[j]], mk = {em}[[k]]},
+
+ Factor[
+ (-(d - 2*\[Nu]j - \[Nu]k))*mk^2* TA[\[Phi], j, i, k][{em}] - (d - \[Nu]j - 2*\[Nu]k)*mj^2*
+ TA[\[Phi], k, i, j][{em}]*test*
+ test*2*(2*d - \[Nu]i - 2*\[Nu]j - 2*\[Nu]k - 1)*
+ TA[\[Rho], i, j, k][{em}]
+ ]
+ ];
+
+TVIKernel[d_, PP, lis_] :=
+ (-PP)^(d - n1 - n2 - n3 - n4)*(m1^2/(-PP))^s1*(m2^2/(-PP))^s2*(m3^2/(-PP))^s3*(m4^2/(-PP))^s4*TVIpsi[d, lis /. {m1 -> s1, m2 -> s2, m3 -> s3, m4 -> s4}];
+
+TVIPsi[d_, {{n1_, s1_}, {n2_, s2_}, {n3_, s3_}, {n4_, s4_}}] :=
+ (-1)^(n1 + n2 + n3 + n4 + 1)*((gamma[-s1]*gamma[d/2 - n1 - s1])/gamma[n1])*
+ ((gamma[-s2]*gamma[d/2 - n2 - s2])/gamma[n2])*
+ ((gamma[-s3]*gamma[d/2 - n3 - s3])/gamma[n3])*
+ ((gamma[-s4]*gamma[n4 + s4])/gamma[n4])*
+ (gamma[n1 + n2 + n3 + n4 + s1 + s2 + s3 + s4 - d]/gamma[3*(d/2) - n1 - n2 - n3 - n4 - s1 - s2 - s3 - s4])*
+ (gamma[n1 + n3 + s1 + s3 - d/2]/gamma[n1 + n3 + n4 + s1 + s3 + s4 - d/2])*
+ (gamma[d - n1 - n3 - n4 - s1 - s3 - s4]/gamma[d - n1 - n3 - s1 - s3]);
+
+CheckTVIRecursion[expr_] :=
+ If[ $CheckRecursion === True,
+
+ Block[{rel, kern, nkern, z1, z2, z3, z4},
+ rel = Extract[expr /. TVIC -> TVIkernel, {1, 2, 1, 1, 2}] -
+ Extract[expr /. TVI -> TVIkernel, {1, 2, 1, 2}];
+
+ If[ {TVIkernel} === Union[Head /@ Cases[rel, (ff_)[__] /; Context[ff] =!= "System`", 4]],
+ rel = Collect[Numerator[Together[rel]], TVI[__], Factor];
+ kern = rel /. TVIkernel -> TVIKernel;
+
+ kern = kern /. {PP -> -1, m1 -> Sqrt[z1], m2 -> Sqrt[z2], m3 -> Sqrt[z3], m4 -> Sqrt[z4]}; kern = PowerExpand[kern];
+ kern = Expand[kern];
+
+ kern = kern /. {z1^(s1 + (w1_.))*z2^(s2 + (w2_.))*z3^(s3 + (w3_.))*z4^(s4 + (w4_.))*(fac_) :> (fac /. {
+ s1 -> s1 - w1, s2 -> s2 - w2, s3 -> s3 - w3, s4 -> s4 - w4})};
+
+ kern = kern /. TVIpsi -> TVIPsi /. {gamma[zz_] :> gamma[Expand[zz]]} /. {gamma[(zz_) + (nn_Integer)] :>
+ gamma[zz] Pochhammer[zz, nn]};
+
+ kern = kern /. {gamma[_] :> 1};
+
+ kern = kern /. {(-1)^((_) + (ww_Integer)) :> (-1)^ww} /. {(-1)^(_) :> 1};
+
+ nkern = Table[kern /. Thread[{d, n1, n2, n3, n4, s1, s2, s3, s4} -> Table[Random[], {9}]], {3}];
+ nkern,
+
+ Print["Matching Error"]
+ ]
+ ],
+
+ If[$Notebooks, FCPrint[1,"Off"]]
+ ];
+
+TJIKernel[d_, PP, lis_] :=
+ (-PP)^(d - n1 - n2 - n3) (m1^2/(-PP))^s1 (m2^2/(-PP))^s2*(m3^2/(-PP))^s3 TJIpsi[d, lis /. {m1 -> s1, m2 -> s2, m3 -> s3}];
+
+TJIPsi[d_, {{n1_, s1_}, {n2_, s2_}, {n3_, s3_}}] :=
+ Evaluate[TVIPsi[d, {{n1, s1}, {n2, s2}, {n3, s3}, {0, 0}}]/gamma[0]];
+
+Clear[CheckTJIRecursion];
+
+CheckTJIRecursion[expr_] :=
+ If[$CheckRecursion === True,
+ Block[ {rel, kern, nkern, z1, z2, z3},
+ rel = Extract[expr /. TJIC -> TJIkernel, {1, 2, 1, 1, 2}] - Extract[expr /. TJI -> TJIkernel, {1, 2, 1, 2}];
+ REL = rel;
+ If[{TJIkernel} === Union[Head /@ Cases[rel, (ff_)[__] /; Context[ff] =!= "System`", 4]],
+ rel = Collect[Numerator[Together[rel]], TJI[__], Factor];
+ kern = rel /. TJIkernel -> TJIKernel;
+ kern = kern /. {PP -> -1, m1 -> Sqrt[z1], m2 -> Sqrt[z2], m3 -> Sqrt[z3]};
+ kern = PowerExpand[kern];
+ kern = Expand[kern];
+ kern = kern /. {z1^(s1 + (w1_.)) z2^(s2 + (w2_.))*z3^(s3 + (w3_.)) (fac_) :> (fac /. {s1 -> s1 - w1, s2 -> s2 - w2, s3 -> s3 - w3})};
+ kern = kern /. TJIpsi -> TJIPsi /. {gamma[zz_] :> gamma[Expand[zz]]} /. {gamma[(zz_) + (nn_Integer)] :> gamma[zz] Pochhammer[zz, nn]};
+ kern = kern /. {gamma[_] :> 1};
+ kern = kern /. {(-1)^((_) + (ww_Integer)) :> (-1)^ww} /. {(-1)^(_) :> 1};
+ nkern = Table[ kern /. Thread[{d, n1, n2, n3, s1, s2, s3} -> Table[Random[], {7}]], {3}];
+ nkern,
+
+ Print["Matching Error"]]
+ ],
+
+ If[$Notebooks, FCPrint[1,"Off"]]
+ ];
+
+TFR[d_, pp_, {{n1_, m1_}, {n2_, m2_}, {0, 0}, {0, 0}, {0, 0}}] :=
+ TAI[d, pp, {{n1, m1}}]*TAI[d, {{n2, m2}}];
+
+Subscript[e, 35] =
+ 2*Subscript[\[Nu], 1]*\[ScriptCapitalC]*Schiebe[1, "+"]*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (
+ (d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3] - Subscript[\[Nu], 5])*Subscript[\[CapitalDelta], 1] +
+ Subscript[\[CapitalDelta], 3, 4, 5]*(Subscript[\[Nu], 5] Schiebe[5, "+"]*(Schiebe[2, "-"] - Schiebe[1, "-"]) -
+ Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[1, "-"]) + Subscript[\[CapitalDelta], 2]*(Subscript[\[Nu], 1]*Schiebe[1, "+"]*(Schiebe[5, "-"] - Schiebe[2, "-"]) +
+ Subscript[\[Nu], 3]*Schiebe[3, "+"]*(Schiebe[5, "-"] - Schiebe[4, "-"]) + Subscript[\[Nu], 5] - Subscript[\[Nu], 1]) +
+ Subscript[\[CapitalDelta], 6]*(Subscript[\[Nu], 1]*Schiebe[1, "+"]*Schiebe[3, "-"] +
+ Subscript[\[Nu], 5] Schiebe[5, "+"]*(Schiebe[3, "-"] - Schiebe[4, "-"]) + Subscript[\[Nu], 3] - Subscript[\[Nu], 1])
+ ) * TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 35] =
+ OperatorApplyF[Subscript[e, 35]];
+
+Subscript[h, 351] =
+ Subscript[s, 35] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 351] =
+MakeFun[Subscript[h, 351], "(35_1)", IFF[Subscript[\[Nu], 1] > 1 && Cayley[m1, m2, m3, m4, m5, Sqrt[PP]] =!= 0]];
+
+Subscript[f, 352] =
+MakeFun[Interchange[Subscript[h, 351], 1 \[LeftRightArrow] 2, 3 \[LeftRightArrow] 4], "(35_2)",
+ IFF[Subscript[\[Nu], 2] > 1 && Cayley[m1, m2, m3, m4, m5, Sqrt[PP]] =!= 0]];
+
+Subscript[f, 353] =
+MakeFun[Interchange[Subscript[h, 351], 1 \[LeftRightArrow] 3, 2 \[LeftRightArrow] 4], "(35_3)",
+ IFF[Subscript[\[Nu], 3] > 1 && Cayley[m1, m2, m3, m4, m5, Sqrt[PP]] =!= 0]];
+
+Subscript[f, 354] =
+MakeFun[Interchange[Subscript[h, 351], 1 \[LeftRightArrow] 4, 2 \[LeftRightArrow] 3], "(35_4)",
+ IFF[Subscript[\[Nu], 4] > 1 && Cayley[m1, m2, m3, m4, m5, Sqrt[PP]] =!= 0]];
+
+Subscript[e, 3501] =
+ (d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3] - Subscript[\[Nu], 5])*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (Subscript[\[Nu], 5]*(Schiebe[1, "-"] - Schiebe[2, "-"]) Schiebe[5, "+"] +
+ Subscript[\[Nu], 3]*Schiebe[1, "-"]*Schiebe[3, "+"])*TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2],
+ Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 3501] =
+ OperatorApplyF[Subscript[e, 3501]];
+
+Subscript[h, 3501] =
+ Subscript[s, 3501];
+
+Subscript[f, 3501] =
+ MakeFun[Subscript[s, 3501], "(3501)", IFF[PP === m5^2], {m1 :> 0, m2 :> m5, m3 :> m5}]
+
+Subscript[e, 3502] =
+ (d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3] - Subscript[\[Nu], 5])*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (Subscript[\[Nu], 5]*(Schiebe[1, "-"] - Schiebe[2, "-"])*Schiebe[5, "+"] + Subscript[\[Nu], 3]*Schiebe[1, "-"]*Schiebe[3, "+"])*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 3502] =
+ OperatorApplyF[Subscript[e, 3502]];
+
+Subscript[h, 3502] =
+ Subscript[s, 3502];
+
+Subscript[f, 3502] =
+ MakeFun[Subscript[h, 3502], "(3502)", IFF[PP === m5^2], {m4 :> 0, m2 :> m5, m3 :> m5}];
+
+Subscript[h, 3503] =
+ Interchange[Subscript[s, 3502], 1 \[LeftRightArrow] 2, 3 \[LeftRightArrow] 4];
+
+Subscript[f, 3503] =
+ MakeFun[Subscript[h, 3503], "(3503)", IFF[PP === m5^2], {m2 :> 0, m1 :> m5, m4 :> m5}];
+
+
+Subscript[h, 3504] =
+Interchange[Subscript[s, 3502], 1 \[LeftRightArrow] 3, 2 \[LeftRightArrow] 4];
+
+Subscript[f, 3504] =
+MakeFun[Subscript[h, 3504], "(3504)", IFF[PP === m5^2], {m3 :> 0, m1 :> m5, m4 :> m5}];
+
+Subscript[e, 41] =
+ 2*Subscript[\[Nu], 5]*\[ScriptCapitalC]*Schiebe[5, "+"]*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (Subscript[\[CapitalDelta], 1, 3, 6]*(Subscript[\[Nu], 3] Schiebe[3, "+"]*(Schiebe[4, "-"] - Schiebe[5, "-"]) +
+ Subscript[\[Nu], 1] Schiebe[1, "+"]*(Schiebe[2, "-"] - Schiebe[5, "-"])) +
+ (d - Subscript[\[Nu], 1] - Subscript[\[Nu], 3] - 2 Subscript[\[Nu], 5])*Subscript[\[CapitalDelta], 5] +
+ Subscript[\[CapitalDelta], 2]*(Subscript[\[Nu], 5] Schiebe[5, "+"]*(Schiebe[1, "-"] - Schiebe[2, "-"]) +
+ Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[1, "-"] + Subscript[\[Nu], 1] - Subscript[\[Nu], 5]) +
+ Subscript[\[CapitalDelta], 4]*(Subscript[\[Nu], 1]*Schiebe[1, "+"]*Schiebe[3, "-"] +
+ Subscript[\[Nu], 5] Schiebe[5, "+"]*(Schiebe[3, "-"] - Schiebe[4, "-"]) +
+ Subscript[\[Nu], 3] - Subscript[\[Nu], 5]))*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 41] =
+ OperatorApplyF[Subscript[e, 41]];
+
+Subscript[h, 41] =
+ Subscript[s, 41] /. Subscript[\[Nu], 5] -> Subscript[\[Nu], 5] - 1;
+
+Subscript[f, 41] =
+ MakeFun[Subscript[h, 41], "(41)", IFF[Subscript[\[Nu], 5] > 1 && Cayley[m1, m2, m3, m4, m5, Sqrt[PP]] =!= 0]];
+
+Subscript[e, 43] = (d - Subscript[\[Nu], 1] - Subscript[\[Nu], 3] - 2*Subscript[\[Nu], 5])*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (Subscript[\[Nu], 1] Schiebe[1, "+"]*(Schiebe[5, "-"] - Schiebe[2, "-"]) +
+ Subscript[\[Nu], 3] Schiebe[3, "+"]*(Schiebe[5, "-"] - Schiebe[4, "-"]))*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 43] =
+ OperatorApplyF[Subscript[e, 43]];
+
+Subscript[e,44] =
+ (d - Subscript[\[Nu], 2] - Subscript[\[Nu], 4] - 2*Subscript[\[Nu], 5])*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (Subscript[\[Nu], 2] Schiebe[2, "+"]*(Schiebe[5, "-"] - Schiebe[1, "-"]) + Subscript[\[Nu], 4]*
+ Schiebe[4, "+"]*(Schiebe[5, "-"] - Schiebe[3, "-"]))*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 44] =
+ OperatorApplyF[Subscript[e, 44]];
+
+Subscript[e, 45] =
+ Subscript[\[CapitalDelta], 1, 3, 6]*
+ Schiebe[1, "+"] TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}] ==
+ (Subscript[u, 6, 1, 3]*(Subscript[\[Nu], 1]*Schiebe[1, "+"]*Schiebe[3, "-"] + Subscript[\[Nu], 5]*Schiebe[5, "+"]*(Schiebe[3, "-"] - Schiebe[4, "-"])) -
+
+ 2*Subscript[u, 1, 3, 6]*(Subscript[\[Nu], 2]* Schiebe[2, "+"]*(Schiebe[5, "-"] - Schiebe[1, "-"]) +
+ Subscript[\[Nu], 4] Schiebe[4, "+"]*(Schiebe[5, "-"] - Schiebe[3, "-"]) -
+ Subscript[\[CapitalSigma], 5] - Subscript[\[Nu], 1] + 3*Subscript[\[Nu], 3]) +
+ 2*Subscript[m, 3]^2*(Subscript[\[Nu], 5] Schiebe[5, "+"]*(Schiebe[1, "-"] - Schiebe[2, "-"]) +
+ Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[1, "-"] + Subscript[\[Nu], 1] - Subscript[\[Nu], 3]))*
+ TFI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4], Subscript[\[Nu], 5]}];
+
+Subscript[s, 45] =
+ OperatorApplyF[Subscript[e, 45]];
+
+Subscript[f, 43] =
+MakeFun[Subscript[s, 43], "(43)", IFF[Subscript[\[Nu], 1] + Subscript[\[Nu], 3] + 2*Subscript[\[Nu], 5] - (d /. _Symbol :> 4) =!= 0],
+ {m5 :> 0, m4 :> m3, m2 :> m1}];
+
+Subscript[f, 44] =
+ MakeFun[Subscript[s, 44], "(44)", {m5 :> 0, m4 :> m3, m2 :> m1}];
+
+Subscript[f, 50] =
+ HoldForm[TFR[d_, PP_, {{(n1_)?PQ, m1_}, {(n2_)?PQ, m2_}, {(n3_)?PQ, m3_}, {(n4_)?PQ, m4_}, {(n5_)?PQ, m5_}}] :=
+ (
+ TComment["(50)", TFIC[d, PP, {{n1, m1}, {n2, m2}, {n3, m3}, {n4, m4}, {n5, m5}}]];
+ Block[{
+
+ r1, r2, r3, r4, r5, r6, r7, r8, r9, r10, r11, r12, r13, r14, r15,
+ r16, r17, r18, r19, r20, r21, r22, r23, r24, r25, r26, r27, r28, r29,
+ r30, r31, r32, r33, r34, r35, r36, r37, r38, r39, r40, r41, r42, r43,
+ r44, r45, r46, r47, r48, r49, r50, r51, r52, r53, r54, r55, r56, r57,
+ r58, r59, r60, r61, r62, r63, r64, r65, r66, r67, r68, r69, r70, r71,
+ r72, r73, r74, r75, r76, r77, r78, r79, r80, r81, r82, r83, r84, r85,
+ r86, r87, r88, r89, r90, r91, r92, r93, r94, r95, r96, r97, r98, r99,
+ r100, r101, r102, r103, r104, r105, r106, r107, r108, r109, r110,
+ r111, r112, r113, r114, r115, r116, r117, r118, r119, r120, r121,
+ r122, r123, r124, r125, r126, r127, r128, r129, r130, r131, r132,
+ r133, r134, r135, r136, r137, r138, r139, r140, r141, r142, r143,
+ r144, r145, r146, r147, r148, r149, r150, r151, r152, r153, r154,
+ r155, r156, r157, r158, r159, r160, r161, r162, r163, r164, r165,
+ r166, r167, r168, r169, r170, r171, r172, r173, r174, r175, r176,
+ r177, r178, r179, r180, r181, r182, r183, r184, r185, r186, r187,
+ r188, r189, r190, r191, r192, r193, r194, r195, r196, r197, r198,
+ r199, r200, r201, r202, r203, r204, r205, r206, r207, r208, r209,
+ r210, r211, r212, r213, r214, r215, r216, r217, r218, r219, r220,
+ r221, r222, r223, r224, r225, r226, r227, r228, r229, r230, r231,
+ r232, r233, r234, r235, r236, r237, r238, r239, r240, r241, r242,
+ r243, r244, r245, r246, r247, r248, r249, r250, r251, r252, r253,
+ r254, r255, r256, r257, r258, r259, r260, r261, r262, r263, r264,
+ r265, r266, r267, r268, r269, r270, r271, r272, r273, r274, r275,
+ r276, r277, r278, r279, r280, r281, r282, r283, r284, r285, r286,
+ r287, r288, r289, r290, r291, r292, r293, r294, r295, r296, r297,
+ r298, r299, r300, r301, r302, r303, r304, r305, r306},
+
+
+ r1 = 3 - d;
+ r2 = 4 - d;
+ r3 = -(m1^2*m2^2*m3^2) + m2^4*m3^2 + m2^2*m3^4 + m1^4*m4^2 - m1^2*m2^2*m4^2 - m1^2*m3^2*m4^2 - m2^2*m3^2*m4^2 +
+ m1^2*m4^4 + m1^2*m2^2*m5^2 - m2^2*m3^2*m5^2 - m1^2*m4^2*m5^2 + m3^2*m4^2*m5^2 + m1^2*m3^2*PP -
+ m2^2*m3^2*PP - m1^2*m4^2*PP + m2^2*m4^2*PP - m1^2*m5^2*PP - m2^2*m5^2*PP - m3^2*m5^2*PP - m4^2*m5^2*PP + m5^4*PP +
+ m5^2*PP^2;
+ r4 = -4 + d;
+ r5 = -3 + d;
+ r6 = -7 + 2*d;
+ r7 = -(m2^2*r4) + m3^2*r5 - m5^2*r5 + m4^2*r6;
+ r8 = -10 + 3*d;
+ r9 = -m3^2 + m4^2;
+ r10 = -11 + 3*d;
+ r11 = -(m4^2*r10) - 3*m5^2*r5 + m3^2*r6;
+ r12 = m2^2*r11 + m5^4*r5 + m2^4*r8 + m4^2*r4*r9 + m5^2*r5*r9;
+ r13 = -6 + d;
+ r14 = -(m4^2*r13) + m5^2*r5;
+ r15 = -3*m3^2 - m4^2*r10 + m5^2*r5;
+ r16 = m3^2*r14 + m2^2*r15 + m2^4*r4 - 2*m3^4*r5 - 3*m4^2*m5^2*r5 + m5^4*r5 + m4^4*r8;
+ r17 = m3^2 + 2*m4^2;
+ r18 = -1 + d;
+ r19 = -(m3^2*r13) - 2*m4^2*r18 + 2*m5^2*r5;
+ r20 = 2*m2^4 - 3*m3^4 + d*m3^4 - 3*m3^2*m4^2 + 2*m4^4 + m2^2*r19 - 2*m5^4*r5 + m5^2*r17*r5;
+ r21 = 2 + d;
+ r22 = 2*m5^2 - m4^2*r21 + m2^2*r4 - m3^2*r4;
+ r23 = -7 + d;
+ r24 = 6*m4^2 - 4*m5^2;
+ r25 = 3*m3^2 + m4^2*r18 + m5^2*r23;
+ r26 = -6*m4^4 - 2*m4^2*m5^2*r23 + m3^2*r24 + 2*m2^2*r25 - 2*m2^4*r4 - m3^4*r4;
+ r27 = m3^4 + m3^2*m4^2 - 2*m4^4;
+ r28 = m3^2 + m4^2*r23;
+ r29 = -2*m4^2*r18 + m3^2*r21 + 2*m5^2*r23;
+ r30 = -6*m2^4 + 2*m5^2*r28 - m2^2*r29 + r27*r4;
+ r31 = m1^4*r22 + m1^2*r26 + m3^2*r30 + m1^6*r4;
+ r32 = m3 - m4;
+ r33 = m3 + m4;
+ r34 = 2*m3^2 + m4^2;
+ r35 = -17 + 3*d;
+ r36 = m3^2*r23 + m4^2*r35;
+ r37 = -9 + d;
+ r38 = 17 - 3*d;
+ r39 = 5*m3^2 + m4^2*r37 + m5^2*r38;
+ r40 = 1 + d;
+ r41 = 5*m4^2 - m5^2*r23 + m2^2*r4 - m3^2*r40;
+ r42 = m5^4*r35 - m5^2*r36 + m2^2*r39 - 2*m1^4*r4 + m2^4*r4 - r32*r33*r34*r4 + m1^2*r41;
+ r43 = m1^2 - m2^2 + m3^2 - m4^2;
+ r44 = 2*m5^2*r13 + r4*r43;
+ r45 = m3^4*r12 + m1^4*r16 + m1^2*m3^2*r20 + PP*r31 + PP^2*r42 + PP^3*r44 + m1^6*r7;
+ r46 = m2^2 + m4^2;
+ r47 = 13 - 3*d;
+ r48 = m4^2*r47 - m5^2*r5 + m3^2*r6;
+ r49 = m5^4*r5 + m5^2*r32*r33*r5 + m4^2*r4*r9;
+ r50 = -18 + 4*d;
+ r51 = -(m4^2*r13) - 3*m5^2*r5;
+ r52 = 2*m3^4*r5 + m4^2*m5^2*r5 + m5^4*r5 + m4^4*r50 + m3^2*r51;
+ r53 = -3*m4^2 + 2*m5^2*r5;
+ r54 = m4^4*r47 + 2*m3^4*r5 + m4^2*m5^2*r5 - 2*m5^4*r5 + m3^2*r53;
+ r55 = m4^2*r13 + 6*m3^2*r5 - 2*m5^2*r5;
+ r56 = 3*m4^2 + m3^2*r5 - m5^2*r5;
+ r57 = 7 - 2*d;
+ r58 = m3^2*r5 + 3*m5^2*r5 + m4^2*r57;
+ r59 = m2^6*r4 + m2^2*m4^2*r55 + m2^4*r56 + m4^4*r58;
+ r60 = m4^2 - m3^2*r5;
+ r61 = 10 - 3*d;
+ r62 = 2*m5^2 + 3*m4^2*r4 + m3^2*r61;
+ r63 = m4^2 + m5^2*r5;
+ r64 = -4*m4^2*m5^2 + 3*m4^4*r4 - 2*m3^4*r5 + 2*m3^2*r63;
+ r65 = m4^2 + m3^2*r5 - m5^2*r5;
+ r66 = 2*m3^2*r5 + 2*m5^2*r5 + m4^2*r61;
+ r67 = 3*m2^4*r4 + 2*m2^2*r65 + m4^2*r66;
+ r68 = -3*m2^6*r4 - 2*m1^4*m4^2*r5 + 2*m4^2*m5^2*r60 + m2^4*r62 + m2^2*r64 + m1^2*r67 - 3*m4^4*r4*r9;
+ r69 = -13 + 3*d;
+ r70 = m3^2*r5 + m4^2*r69;
+ r71 = m4^2 - 3*m2^2*r4 - m3^2*r5 + m5^2*r5;
+ r72 = -5 + d;
+ r73 = m3^2 + m5^2*r69 + m4^2*r72;
+ r74 = 3*m2^4*r4 - m5^4*r5 + m5^2*r70 + m1^2*r71 + m2^2*r73 + 3*m4^2*r4*r9;
+ r75 = m1^2 - m2^2 + m3^2 - m4^2 - 2*m5^2;
+ r76 = m2^8*r4 + m2^6*r48 + m4^4*r49 + 2*m1^4*m4^2*r46*r5 + m2^4*r52 + m2^2*m4^2*r54 - m1^2*r59 + PP*r68 + PP^2*r74 + PP^3*r4*r75;
+ r77 = m3^2 - m4^2 + m5^2;
+ r78 = -2*m2^2 + m4^2 + m5^2;
+ r79 = -2*m1^2 - m3^2 - m4^2 + m5^2;
+ r80 = m1^4 + PP^2 - m1^2*r77 + m3^2*r78 + PP*r79;
+ r81 = m3^2 + m4^2;
+ r82 = m3^2 + m4^2 + m5^2;
+ r83 = m1^2 + m3^2 - m5^2;
+ r84 = m1^4 + 2*m3^2*m4^2 - m4^4 + PP^2 - m2^2*r77 + m5^2*r81 - m1^2*r82 - 2*PP*r83;
+ r85 = m1 - m3;
+ r86 = -PP + r85^2;
+ r87 = m1 + m3;
+ r88 = -PP + r87^2;
+ r89 = m2 - m4;
+ r90 = m2 + m4;
+ r91 = -m1^2 - m2^2 - m3^2 - m4^2 + 2*m5^2;
+ r92 = PP^2 + r85*r87*r89*r90 + PP*r91;
+ r93 = m2^2 - 3*m4^2;
+ r94 = m4 - m5;
+ r95 = m4 + m5;
+ r96 = 2*m3^2 - m4^2 + m5^2;
+ r97 = -m1^2 - m2^2 - 2*m3^2 + 3*m5^2;
+ r98 = PP^2 + m1^2*r93 + m2^2*r94*r95 + m4^2*r96 + PP*r97;
+ r99 = -2 + d;
+ r100 = -m1^2 + m2^2;
+ r101 = m2^2 + m1^2*r72;
+ r102 = m3^2*r101 - 2*m3^4*r4 + m2^2*r100*r4;
+ r103 = 9 - 2*d;
+ r104 = m2^2*r23 + m3^2*r72;
+ r105 = 2*m1^4 + m2^4*r103 + m1^2*r104 + m2^2*m3^2*r5;
+ r106 = -9 + 2*d;
+ r107 = m1 - m2;
+ r108 = m1 + m2;
+ r109 = -(r106*r107*r108) + m3^2*r4;
+ r110 = m2^2*r102 + m4^2*r105 + m4^4*r109 - m4^6*r4;
+ r111 = m1^2 + m2^2;
+ r112 = m2^2*r4 - 2*m1^2*r72;
+ r113 = -19 + 5*d;
+ r114 = m3^2*r112 + m3^4*r113 + m2^2*r111*r4;
+ r115 = m3^2*r5 + m2^2*r6;
+ r116 = 2*m1^4 + 2*m1^2*r115 + m2^4*r13 + m3^4*r72 - 2*m2^2*m3^2*r99;
+ r117 = m2^2*r106 + m3^2*r4 - m1^2*r99;
+ r118 = m2^2*r114 - m4^2*r116 + m4^4*r117 - m4^6*r6;
+ r119 = -(m2^2*r5) + 2*m3^2*r57 + m1^2*r72;
+ r120 = m1^2*r18 + 2*m3^2*r4 - m2^2*r5;
+ r121 = m2^2*r119 + m4^2*r120 + 2*m4^4*r5;
+ r122 = m3^2*r5 + m4^2*r72;
+ r123 = -2*m2^2*r4 - m4^2*r69 + m3^2*r72;
+ r124 = m2^2*r122 + m1^2*r123 + 2*m2^4*r4 + 2*m4^2*r32*r33*r4;
+ r125 = -3*m4^2 + m2^2*r4 - m3^2*r72;
+ r126 = m3^2 - m4^2*r72;
+ r127 = -2*m3^2*m4^2 - 2*m1^2*r125 - 2*m2^2*r126 + m4^4*r18 - 4*m2^4*r4 + m3^4*r72;
+ r128 = -(m2^2*r18) + 2*m4^2*r5 + m1^2*r72 + 2*m3^2*r72;
+ r129 = m5^2*r127 - m5^4*r128 - r124*r32*r33 + m5^6*r72;
+ r130 = -m1^2 + m2^2 + m3^2 - m4^2;
+ r131 = -14 + 3*d;
+ r132 = -(m3^2*r13) + m4^2*r131 + m1^2*r4 + 5*m2^2*r4;
+ r133 = -2*m5^4 + m5^2*r132 + r130*r32*r33*r4;
+ r134 = m5^2*r118 + m5^4*r121 + PP*r129 + PP^2*r133 + r110*r32*r33 - 2*m5^2*PP^3*r4 + m5^6*r5*r89*r90;
+ r135 = m3 - m4 - m5;
+ r136 = m3 + m4 - m5;
+ r137 = m3 - m4 + m5;
+ r138 = m3 + m4 + m5;
+ r139 = -10 + d;
+ r140 = 13 - 2*d;
+ r141 = d*m4^2 + 2*m3^2*r5;
+ r142 = -8 + d;
+ r143 = m4^2*r142 - m3^2*r99 + m5^2*r99;
+ r144 = m3^2*m4^2*r139 + m4^4*r140 - m5^2*r141 + m2^2*r143 + m3^4*r5 + m5^4*r5;
+ r145 = 3*m3^4 - 12*m3^2*m4^2 + 7*m4^4;
+ r146 = 3*m3^2 + 4*m4^2;
+ r147 = m3^2 - 11*m4^2;
+ r148 = 7*m3^4 + 10*m3^2*m4^2 - 17*m4^4 - 5*m5^4 - 2*m5^2*r147;
+ r149 = m2^2 + 2*m3^2 + m4^2;
+ r150 = -m2^4 + m2^2*m3^2 + m3^4 + 3*m2^2*m4^2 + m3^2*m4^2 - m4^4 + m5^4 - m5^2*r149;
+ r151 = 3*m3^6 + 6*m3^4*m4^2 - 17*m3^2*m4^4 + 8*m4^6 + 3*m5^6 - m5^2*r145 - m5^4*r146 + m2^2*r148 - d*r150*r77 + 6*m2^4*r94*r95;
+ r152 = -(m3^2*m4) + m4^3;
+ r153 = 11 - 2*d;
+ r154 = -(d*m3^2*m4^2) + m4^4*r153 + m3^4*r5;
+ r155 = m4^2 + m3^2*r5;
+ r156 = r142*r32*r33 + m5^2*r99;
+ r157 = 11 - 3*d;
+ r158 = -8 + 3*d;
+ r159 = m5^2*r158 + m4^2*r21;
+ r160 = -3*m3^4 + 2*m4^2*m5^2*r106 + m5^4*r157 + m3^2*r159 - m4^4*r18;
+ r161 = -2*m2^6 + m5^2*r154 - 2*m5^4*r155 + m2^4*r156 + m2^2*r160 + r152^2*r4 + m5^6*r5;
+ r162 = m4^2*r23 - 3*m3^2*r72;
+ r163 = -4*m2^2 + m4^2*r18 + m3^2*r23;
+ r164 = -m3^4 + m4^4;
+ r165 = -(m2^4*r13) + m2^2*r162 + m1^2*r163 + r164*r4 + m1^4*r99;
+ r166 = -19 + 4*d;
+ r167 = m4^2 + m3^2*r72;
+ r168 = m3^2 + m4^2*r69;
+ r169 = -2*r168 + 4*m2^2*r4;
+ r170 = -m3^4 + m2^4*r13 - m4^4*r166 + 2*m2^2*r167 + m1^2*r169 + 2*m3^2*m4^2*r72 + m1^4*r99;
+ r171 = m1^2 - m2^2 + 4*m4^2;
+ r172 = -(m5^2*r170) + r165*r32*r33 + m5^6*r72 - m5^4*r171*r72;
+ r173 = m2^2 + m3^2;
+ r174 = -(m4^2*r13) + r131*r173 + m1^2*r8;
+ r175 = m5^2*r174 - 2*m5^4*r4 + r130*r32*r33*r4;
+ r176 = 2*m1^6*m4^2 + m1^4*r144 + m1^2*r151 + m3^2*r161 + PP*r172 + PP^2*r175 - 2*m5^2*PP^3*r4;
+ r177 = m3^2 + m4^2 - m5^2;
+ r178 = -2*m1^2 + m3^2 - m4^2 + m5^2;
+ r179 = -m3^2 + m4^2 + m5^2;
+ r180 = m2^2*r177 + m4^2*r178 + PP*r179;
+ r181 = -2*m2^2 - m3^2 + m4^2 + m5^2;
+ r182 = m1^2*r177 + m3^2*r181 + PP*r77;
+ r183 = -(m2^2*r13) - 2*m3^2*r5;
+ r184 = m1^2*r183 - 2*m3^4*r4 + m2^4*r57 + m1^4*r72 - m2^2*m3^2*r99;
+ r185 = 3*m2^2*r4 + m3^2*r72;
+ r186 = m2^4*r106 + 2*m1^2*r185 + m1^4*r40 - 2*m2^2*m3^2*r6;
+ r187 = r111*r13 - m3^2*r4;
+ r188 = m2^2*r184 + m4^2*r186 - m4^4*r187 + m4^6*r4;
+ r189 = 2*m1^2 + m3^2*r10 + 2*m2^2*r5;
+ r190 = m2^2*r5 + m3^2*r72 + 2*m1^2*r99;
+ r191 = m2^2*r189 - m4^2*r190 - m4^4*r5;
+ r192 = -(m3^2*r5) - m4^2*r72;
+ r193 = 2*m2^2*r4 + m4^2*r69 - m3^2*r72;
+ r194 = m2^2*r192 + m1^2*r193 - 2*m2^4*r4 + 2*m4^2*r4*r9;
+ r195 = m2^2 + m4^2 + m3^2*r72;
+ r196 = -(m3^2*r6) - m4^2*r72;
+ r197 = m2^4*r157 + 2*m1^2*r195 + 2*m2^2*r196 + 2*m4^2*r17*r4 + m1^4*r72;
+ r198 = m4^2*r10 - 2*m2^2*r5 + 2*m1^2*r72 + m3^2*r72;
+ r199 = r107*r108*r194 + m5^2*r197 - m5^4*r198 + m5^6*r72;
+ r200 = m1^2 - m2^2 - m3^2 + m4^2;
+ r201 = m1^2 + m2^2 + m3^2 + 5*m4^2;
+ r202 = 2*m5^4 - r107*r108*r200 - m5^2*r201;
+ r203 = r107*r108*r110 - m5^2*r188 - m5^4*r191 + PP*r199 + 2*m5^2*PP^3*r4 + PP^2*r202*r4 + m5^6*r5*r89*r90;
+ r204 = m4^2 + m5^2;
+ r205 = -2*m5^2*r5 + m4^2*r99;
+ r206 = 18 - 5*d;
+ r207 = m4^2*r206 + m5^2*r8 - 2*m3^2*r99;
+ r208 = m2^2*r207 + 2*m2^4*r4 - m3^4*r5 - m3^2*r204*r5 + r205*r94*r95;
+ r209 = 2*m3^2*m4^2 + m4^4*r142 + 2*m3^4*r5;
+ r210 = -(m4^2*r18) + m3^2*r5;
+ r211 = 3 - 2*d;
+ r212 = m5^2 + m4^2*r157 + m3^2*r211;
+ r213 = m4^2*r106 + m3^2*r4;
+ r214 = -(d*m3^4) + 10*m3^2*m4^2 - 2*d*m3^2*m4^2 - 2*m4^4 + d*m4^4 + 2*m5^2*r213 - 2*m5^4*r4;
+ r215 = d*m3^2*m4^4 - 2*m4^6 - m5^2*r209 + m5^4*r210 + m2^4*r212 + m2^2*r214 + m2^6*r4 + m5^6*r5 - m3^4*m4^2*r99;
+ r216 = m4^2*r13 + m3^2*r99;
+ r217 = m3^2*r5 - m4^2*r72;
+ r218 = 13 - 4*d;
+ r219 = 3*m3^2 + m5^2*r218 + m4^2*r23;
+ r220 = m4^2*r142 + m5^2*r61;
+ r221 = 2*m3^4 + 2*m4^2*m5^2 - m4^4*r13 + m3^2*r220 + 2*m5^4*r6;
+ r222 = m4^2*m5^2*r216 + m5^4*r217 + m2^4*r219 + m2^2*r221 - m5^6*r5 + m2^6*r99;
+ r223 = -(m3^2*r10) + m4^2*r5;
+ r224 = 4*m3^2*m4^2 + m1^2*r122 + m4^4*r13 + m2^2*r223 + m1^4*r4 - m2^4*r4 - m3^4*r99;
+ r225 = -m3^2 + m2^2*r72 - m4^2*r72;
+ r226 = -2*m4^2*r106 + 2*m3^2*r69;
+ r227 = m1^4*r106 + m2^4*r106 - m4^4*r13 - 2*m1^2*r225 + m2^2*r226 - 4*m3^2*m4^2*r4 - m3^4*r99;
+ r228 = m3^2 + 3*m4^2;
+ r229 = r107*r108*r224 - m5^2*r227 + m5^6*r72 - m5^4*r228*r72;
+ r230 = m4^2*r131 + m1^2*r4 + m2^2*r4 + m3^2*r8;
+ r231 = 2*m5^4*r106 - m5^2*r230 - r107*r108*r200*r4;
+ r232 = m1^4*r208 - m1^2*r215 - m3^2*r222 + PP*r229 + PP^2*r231 + 2*m5^2*PP^3*r4 + m1^6*r7;
+ r233 = -2*m3^2 + m4^2;
+ r234 = -m2^2 + m4^2 - 2*m5^2;
+ r235 = -m1^2 + m2^2 + m5^2;
+ r236 = m1^4 + m5^4 + m2^2*r233 + m1^2*r234 + PP*r235 - m5^2*r46;
+ r237 = -m2^2 + m5^2;
+ r238 = m2^2 + m3^2 - 2*m4^2 + m5^2;
+ r239 = -m1^2 + m2^2 - m5^2;
+ r240 = m1^4 + m3^2*r237 - m1^2*r238 + PP*r239;
+ r241 = m3^2 + 3*m4^2 - m5^2; r242 = -3*m3^2 - m4^2 + m5^2;
+ r243 = m5^4 - m5^2*r228 + m1^2*r241 + m2^2*r242 + 2*PP*r32*r33 + 2*m4^2*r9;
+ r244 = 2*m1^2 + m2^2 + m4^2;
+ r245 = -2*m1^2 - m3^2 - m4^2 + 3*m5^2;
+ r246 = m1^4 - 3*m2^2*m3^2 + m5^4 + PP^2 + m4^2*r173 - m5^2*r244 + PP*r245;
+ r247 = -2*m3^2 + m4^2 + m5^2;
+ r248 = -m2^4 - m4^2*m5^2 + PP*r235 + m2^2*r247 + m1^2*r46;
+ r249 = m2^2*r153 + m1^2*r5; r250 = 2*m1^2 + m2^2*r4;
+ r251 = m2^2*r13 + m1^2*r139;
+ r252 = r107*r108*r250 + m3^2*r251 - m3^4*r4;
+ r253 = m1^2*r140 + 2*m3^2*r4 + m2^2*r72;
+ r254 = m3^4*r249 + m4^2*r252 + m4^4*r253 - m4^6*r4 + m2^2*m3^2*r100*r99;
+ r255 = 2*m3^2 + m4^2*r13;
+ r256 = -2*m3^2*r5 + m2^2*r99 - m4^2*r99;
+ r257 = -11 + 2*d;
+ r258 = -(m4^4*r106) + 2*m3^2*m4^2*r23 - m3^4*r257;
+ r259 = 4*m4^2 + m3^2*r13;
+ r260 = -2*m2^4 + 6*m3^2*m4^2 + 2*m2^2*r259 + m4^4*r37 + m3^4*r5;
+ r261 = -5*m3^4*m4^2 + m2^4*r255 + m1^4*r256 + m2^2*r258 + m1^2*r260 - m2^6*r4 + m3^6*r5 + m4^6*r6 - 3*m3^2*m4^4*r72;
+ r262 = m3^4 + m3^2*m4^2 + m4^4;
+ r263 = m1^4 + m2^4 - 2*r262 + m1^2*r81 + m2^2*r81;
+ r264 = m1^2 + m2^2 - m3^2 - m4^2;
+ r265 = -(r13*r32*r33) + m2^2*r99;
+ r266 = -2*m1^2*r265 - r32^2*r33^2*r4 + 2*m2^2*r13*r9 + m1^4*r99 + m2^4*r99;
+ r267 = m3^2*r13 + m4^2*r4;
+ r268 = -16 + 3*d;
+ r269 = m3^2*r13 - m4^2*r268 + m2^2*r4;
+ r270 = 2*m2^2*r267 + 2*m1^2*r269 + r13*r228*r32*r33 + m2^4*r61 + m1^4*r99;
+ r271 = 2*m2^2 + m4^2*r23 - m3^2*r72;
+ r272 = -(m5^2*r270) - 2*m5^4*r271 + r266*r32*r33;
+ r273 = 2*m3^2 - 2*m4^2 - m5^2;
+ r274 = m1^2*r5 - m2^2*r5 + r273*r72;
+ r275 = r200*r254 + m5^2*r261 + PP*r272 + 2*m5^2*PP^2*r274 + m5^4*r263*r5 - m5^6*r264*r5;
+ r276 = -2*m2^2*m3^2 - 2*m3^4 + 3*m3^2*m4^2 - m4^4 + 3*m3^2*m5^2 + 2*m4^2*m5^2 - m5^4 + m1^2*r177 + PP*r77;
+ r277 = -(m4^2*r106) + m2^2*r4 - m3^2*r5;
+ r278 = -2*m3^4 - m3^2*m4^2*r13 + m2^2*r196 + m2^4*r4 + m4^4*r4;
+ r279 = m4^2*r131 + m3^2*r8;
+ r280 = m2^2*r279 - 2*m2^4*r4 + m4^2*r32*r33*r99;
+ r281 = m1^4*r277 + m2^2*r278 + m1^2*r280;
+ r282 = 11*m3^2 - 3*d*m3^2 + 9*m4^2 - 2*d*m4^2;
+ r283 = 15 - 4*d;
+ r284 = m4^2*r106 + m2^2*r283 + m3^2*r5;
+ r285 = m4^4*r13 + 4*m3^2*m4^2*r5 - m3^4*r99;
+ r286 = -m4^2 + m3^2*r5;
+ r287 = -(m4^2*r5) + m3^2*r6;
+ r288 = 2*m2^2*r287 + m2^4*r72 - 2*r286*r81;
+ r289 = -2*m3^2*m4^4 + m2^4*r282 + m1^4*r284 + m2^2*r285 + m1^2*r288 - m4^6*r4 + m1^6*r5 + m2^6*r6 + m3^4*m4^2*r99;
+ r290 = 2*m2^2 - m3^2 - m4^2;
+ r291 = 2*m1^4 + 2*m2^4 - m3^4 - m4^4 + m1^2*r290 - m2^2*r81;
+ r292 = m2^2 - m3^2 + m4^2;
+ r293 = m1^4*r4 + m2^4*r4 - 2*m1^2*r292*r4 + 2*m2^2*r4*r9 - r32^2*r33^2*r99; r294 = m3^2*r13 - m4^2*r131;
+ r295 = m2^2*r13 - r4*r81;
+ r296 = m1^4*r131 + 2*m2^2*r294 - 2*m1^2*r295 - 2*m3^2*m4^2*r4 + m4^4*r8 - m2^4*r99 - m3^4*r99;
+ r297 = 2*m4^2 - m2^2*r5 + m1^2*r72;
+ r298 = r107*r108*r293 - m5^2*r296 + 2*m5^4*r297;
+ r299 = -2*m5^2*r32*r33*r5 + 2*m5^4*r72;
+ r300 = r130*r281 - m5^2*r289 + PP*r298 + PP^2*r299 - m5^6*r264*r5 + m5^4*r291*r5;
+ r301 = -2*m2^2*m3^2 - m3^2*m4^2 + m4^4 + m5^4 - m5^2*r17 + m1^2*r177 + PP*r77;
+ r302 = m2^2 + 2*m3^2 - 3*m4^2;
+ r303 = -m1^2 + m2^2 - 3*m5^2;
+ r304 = m1^4 - m2^2*m4^2 - m5^4 + m5^2*r149 - m1^2*r302 + PP*r303;
+ r305 = -(
+ (r45 TBI[d, PP, {{1, m4}, {1, m2}}] TBI[d, PP, {{2, m1}, {1, m3}}])/(4*r3)) +
+ (r76 TBI[d, PP, {{1, m3}, {1, m1}}] TBI[d, PP, {{2, m2}, {1, m4}}])/(4*r3) -
+ (r80 TBI[d, PP, {{2, m1}, {1, m3}}] TBI[d, PP, {{2, m2}, {1, m4}}])/2 -
+ (r45 TBI[d, PP, {{1, m4}, {1, m2}}] TBI[d, PP, {{2, m3}, {1, m1}}])/(4*r3) -
+ (r84 TBI[d, PP, {{2, m2}, {1, m4}}] TBI[d, PP, {{2, m3}, {1, m1}}])/2 -
+ r86*r88*TBI[d, PP, {{1, m4}, {1, m2}}] TBI[d, PP, {{2, m3}, {2, m1}}] +
+ (r76 TBI[d, PP, {{1, m3}, {1, m1}}] TBI[d, PP, {{2, m4}, {1, m2}}])/(4*r3) -
+ (r92*TBI[d, PP, {{2, m1}, {1, m3}}] TBI[d, PP, {{2, m4}, {1, m2}}])/2 -
+ (r98*TBI[d, PP, {{2, m3}, {1, m1}}] TBI[d, PP, {{2, m4}, {1, m2}}])/2 -
+ r86*r88*TBI[d, PP, {{1, m4}, {1, m2}}] TBI[d, PP, {{3, m1}, {1, m3}}] -
+ r86*r88*TBI[d, PP, {{1, m4}, {1, m2}}] TBI[d, PP, {{3, m3}, {1, m1}}] -
+ r3*TFI[r99, PP, {{1, m1}, {1, m2}, {1, m3}, {1, m4}, {1, m5}}] -
+ (r134*TVI[d, PP, {{1, m5}, {1, m1}, {2, m4}, {1, m3}}])/(4*r3) -
+ (r135*r136*r137*r138*TVI[d, PP, {{1, m5}, {1, m1}, {2, m4}, {2, m3}}])/2 -
+ (r176*TVI[d, PP, {{1, m5}, {1, m2}, {2, m3}, {1, m4}}])/(4*r3) +
+ (r180*TVI[d, PP, {{1, m5}, {1, m2}, {2, m3}, {2, m4}}])/2 -
+ r182*TVI[d, PP, {{1, m5}, {1, m2}, {3, m3}, {1, m4}}] +
+ (r203 TVI[d, PP, {{1, m5}, {1, m3}, {2, m2}, {1, m1}}])/(4*r3) +
+ (r232*TVI[d, PP, {{1, m5}, {1, m4}, {2, m1}, {1, m2}}])/(4*r3) +
+ (r236*TVI[d, PP, {{1, m5}, {1, m4}, {2, m1}, {2, m2}}])/2 +
+ r240*TVI[d, PP, {{1, m5}, {1, m4}, {3, m1}, {1, m2}}] +
+ (r45*TVI[d, PP, {{1, m5}, {2, m1}, {1, m4}, {1, m3}}])/(4*r3) +
+ (r86*r88*TVI[d, PP, {{1, m5}, {2, m1}, {1, m4}, {2, m3}}])/2 +
+ (r92*TVI[d, PP, {{1, m5}, {2, m1}, {2, m4}, {1, m3}}])/2 -
+ (r76*TVI[d, PP, {{1, m5}, {2, m2}, {1, m3}, {1, m4}}])/(4*r3) -
+ (r243*TVI[d, PP, {{1, m5}, {2, m2}, {2, m3}, {1, m4}}])/2 +
+ (r45*TVI[d, PP, {{1, m5}, {2, m3}, {1, m2}, {1, m1}}])/(4*r3) +
+ (r86*r88*TVI[d, PP, {{1, m5}, {2, m3}, {1, m2}, {2, m1}}])/2 +
+ (r246*TVI[d, PP, {{1, m5}, {2, m3}, {2, m2}, {1, m1}}])/2 -
+ (r76*TVI[d, PP, {{1, m5}, {2, m4}, {1, m1}, {1, m2}}])/(4*r3) +
+ (r248*TVI[d, PP, {{1, m5}, {2, m4}, {2, m1}, {1, m2}}])/2 +
+ r86*r88*TVI[d, PP, {{1, m5}, {3, m1}, {1, m4}, {1, m3}}] +
+ r86*r88*TVI[d, PP, {{1, m5}, {3, m3}, {1, m2}, {1, m1}}] +
+ (r275*TVI[d, PP, {{2, m5}, {1, m1}, {1, m4}, {1, m3}}])/(4*r3) +
+ (r276*TVI[d, PP, {{2, m5}, {1, m1}, {1, m4}, {2, m3}}])/2 -
+ (r180*TVI[d, PP, {{2, m5}, {1, m1}, {2, m4}, {1, m3}}])/2 -
+ (r275*TVI[d, PP, {{2, m5}, {1, m2}, {1, m3}, {1, m4}}])/(4*r3) +
+ (r180*TVI[d, PP, {{2, m5}, {1, m2}, {1, m3}, {2, m4}}])/2 -
+ (r276*TVI[d, PP, {{2, m5}, {1, m2}, {2, m3}, {1, m4}}])/2 -
+ (r300*TVI[d, PP, {{2, m5}, {1, m3}, {1, m2}, {1, m1}}])/(4*r3) -
+ (r240*TVI[d, PP, {{2, m5}, {1, m3}, {1, m2}, {2, m1}}])/2 -
+ (r236*TVI[d, PP, {{2, m5}, {1, m3}, {2, m2}, {1, m1}}])/2 +
+ (r300*TVI[d, PP, {{2, m5}, {1, m4}, {1, m1}, {1, m2}}])/(4*r3) +
+ (r236*TVI[d, PP, {{2, m5}, {1, m4}, {1, m1}, {2, m2}}])/2 +
+ (r240*TVI[d, PP, {{2, m5}, {1, m4}, {2, m1}, {1, m2}}])/2 +
+ (r182*TVI[d, PP, {{2, m5}, {2, m1}, {1, m4}, {1, m3}}])/2 -
+ (r301*TVI[d, PP, {{2, m5}, {2, m2}, {1, m3}, {1, m4}}])/2 -
+ (r304*TVI[d, PP, {{2, m5}, {2, m3}, {1, m2}, {1, m1}}])/2 +
+ (r248*TVI[d, PP, {{2, m5}, {2, m4}, {1, m1}, {1, m2}}])/2;
+
+
+
+ r306 = Factor /@ r305/(PP*r1*r2); r306]) /;
+ n1 === 1 && n2 === 1 && n3 === 1 && n4 === 1 && n5 === 1 && MatchQ[d, _Symbol + _Integer?Positive] && PP =!= 0 && Cayley[m1, m2, m3, m4, m5, Sqrt[PP]] =!= 0
+ ];
+
+Subscript[e, 51] =
+ Subscript[\[CapitalDelta], 1, 3, 4]*Subscript[\[Nu], 1]*
+ Schiebe[1, "+"] TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (2*Subscript[m, 3]^2*Subscript[\[Nu], 3]*
+ Schiebe[3, "+"]*(Schiebe[1, "-"] - Schiebe[4, "-"]) + Subscript[u, 4, 1, 3]*Subscript[\[Nu], 1]*
+ Schiebe[1, "+"]*(Schiebe[3, "-"] - Schiebe[4, "-"]) + Subscript[u, 1, 3, 4]*(d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 3]) +
+ 2*Subscript[m, 3]^2*(Subscript[\[Nu], 1] - Subscript[\[Nu], 3]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2],Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 51] =
+ OperatorApplyV[Subscript[e, 51]];
+
+Subscript[h, 51] =
+ Subscript[s, 51] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1
+
+Subscript[f, 51] =
+ MakeFun[Subscript[h, 51], "(51)", IFF[Subscript[\[Nu], 1] > 1 && Subscript[\[CapitalDelta], 1, 3, 4] =!= 0]];
+
+CheckTVIRecursion[Subscript[f, 51]]
+
+Subscript[e, 52] =
+ Subscript[\[CapitalDelta], 2, 4, 6]*Subscript[\[Nu], 2]*
+ Schiebe[2, "+"]*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (2*Subscript[m, 1]^2*Subscript[\[Nu], 1] Schiebe[1, "+"]*(Schiebe[4, "-"] - Schiebe[2, "-"]) +
+ 2*Subscript[m, 3]^2*Subscript[\[Nu], 3]* Schiebe[3, "+"]*(Schiebe[4, "-"] - Schiebe[2, "-"]) -
+ 2*Subscript[m, 4]^2*Subscript[\[Nu], 4]*Schiebe[4, "+"]*Schiebe[2, "-"] +
+ (2*Subscript[m, 2]^2 - Subscript[u, 4, 2, 6])*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[4, "-"] -
+ (Subscript[\[CapitalSigma], 4] + 2)*(Schiebe[4, "-"] - Schiebe[2, "-"]) +
+ Subscript[u, 2, 4, 6]*(d - 3*Subscript[\[Nu], 2]) + 2*Subscript[m, 4]^2*(Subscript[\[Nu], 4] - Subscript[\[Nu], 2]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 52] =
+ OperatorApplyV[Subscript[e, 52]]
+
+Subscript[h, 52] =
+ nuExplicit[Subscript[s, 52]] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1;
+
+Subscript[f, 52] =
+ MakeFun[Subscript[h, 52], "(52)", IFF[Subscript[\[Nu], 2] > 1 && Subscript[\[CapitalDelta], 2, 4, 6] =!= 0]];
+
+
+Subscript[h, 53] =
+ Interchange[Subscript[s, 51], 1 \[LeftRightArrow] 3] /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1;
+
+Subscript[f, 53] =
+ MakeFun[Subscript[h, 53], "(53)", IFF[Subscript[\[Nu], 3] > 1 && Subscript[\[CapitalDelta], 3, 1, 4] =!= 0]];
+
+
+Subscript[e, 54] =
+ 2*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"]*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (Subscript[u, 4, 1, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"] + Subscript[\[Nu], 1]*
+ Schiebe[1, "+"]*(Schiebe[4, "-"] - Schiebe[3, "-"]) + (d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 3]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 54] =
+ OperatorApplyV[Subscript[e, 54]];
+
+Subscript[h, 54] =
+ Subscript[s, 54] /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1;
+
+Subscript[f, 54] =
+MakeFun[Subscript[h, 54], "(54)", IFF[Subscript[\[Nu], 3] > 1 && m3 =!= 0]];
+
+Subscript[e, 55] =
+ 2*Subscript[m, 4]^2*Subscript[\[Nu], 4]*Schiebe[4, "+"]*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (Subscript[u, 3, 1, 4]*Subscript[\[Nu], 1]*Schiebe[1, "+"] + Subscript[u, 6, 2, 4]*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+ Subscript[\[Nu], 1]*Schiebe[1, "+"]*(Schiebe[3, "-"] - Schiebe[4, "-"]) -
+ Subscript[\[Nu], 2]*Schiebe[2, "+"] Schiebe[4, "-"] + (d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 4]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 55] =
+ OperatorApplyV[Subscript[e, 55]];
+
+Subscript[h, 55] =
+ Subscript[s, 55] /. Subscript[\[Nu], 4] -> Subscript[\[Nu], 4] - 1;
+
+Subscript[f, 55] =
+ MakeFun[Subscript[h, 55], "(55)", IFF[Subscript[\[Nu], 4] > 1 && m4 =!= 0 && Subscript[\[Nu], 3] > 1]];
+
+Subscript[e, 56] =
+ 2*Subscript[m, 4]^2*Subscript[\[Nu], 4]*Schiebe[4, "+"]*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (-2*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"] + Subscript[u, 6, 2, 4]*Subscript[\[Nu], 2]*Schiebe[2, "+"] -
+ 2*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] - Subscript[\[Nu], 2]*Schiebe[2, "+"]*
+ Schiebe[4, "-"] + (2*d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3] -
+ 2*Subscript[\[Nu], 4]))*TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 56] =
+ OperatorApplyV[Subscript[e, 56]];
+
+Subscript[h, 56] =
+ Subscript[s, 56] /. Subscript[\[Nu], 4] -> Subscript[\[Nu], 4] - 1;
+
+Subscript[f, 56] =
+ MakeFun[Subscript[h, 56], "(56)", IFF[Subscript[\[Nu], 4] > 1 && m4 =!= 0 && Subscript[\[Nu], 3] === 1]];
+
+Subscript[e, 59] =
+ (2*Subscript[m, 1]^2*Subscript[u, 1, 3, 4]*(d - Subscript[\[Nu], 1] -
+ 2*Subscript[\[Nu], 3]) + (Subscript[\[Nu], 3] - 1)*Subscript[u, 4, 1, 3]^2 + 4*Subscript[m, 1]^2*
+ Subscript[m, 3]^2*(Subscript[\[Nu], 1] - Subscript[\[Nu], 3]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (Subscript[u, 4, 1, 3]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*
+ Schiebe[4, "-"]*(Schiebe[4, "-"] - Schiebe[1, "-"]) -
+ 4*Subscript[m, 1]^2*Subscript[m, 3]^2*Subscript[\[Nu], 3] Schiebe[3, "+"]*
+ Schiebe[1, "-"] + (4*Subscript[m, 1]^2*Subscript[m, 3]^2 +
+ Subscript[u, 4, 1, 3]^2)*Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[4, "-"] +
+ Subscript[u, 4, 1, 3]*(Subscript[\[Nu], 3] - 1)*Schiebe[1, "-"] -
+ (d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3] + 1)*Subscript[u, 4, 1, 3]*Schiebe[3, "-"] +
+ (d - 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 3] + 1)*Subscript[u, 4, 1, 3]*Schiebe[4, "-"])*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 59] =
+ OperatorApplyV[Subscript[e, 59]];
+
+Subscript[h, 59] =
+ Subscript[s, 59];
+
+Subscript[f, 59] =
+ MakeFun[Subscript[h, 59], "(59)",
+ IFF[Subscript[\[CapitalDelta], 1, 3, 4] == 0 && 4*Subscript[m, 3]^2*Subscript[m, 1]^2 - 4*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Subscript[m, 1]^2 +
+ 2*d*Subscript[u, 1, 3, 4]*Subscript[m, 1]^2 - 4*Subscript[\[Nu], 3]*Subscript[u, 1, 3, 4]*Subscript[m, 1]^2 -
+ 2*Subscript[u, 1, 3, 4]*Subscript[m, 1]^2 + Subscript[\[Nu], 3]*Subscript[u, 4, 1, 3]^2 - Subscript[u, 4, 1, 3]^2 =!= 0 &&
+ n1 === 1 && n2 === 1 && n4 === 1 && MatchQ[d, _Integer]]];
+
+Subscript[e, 60] =
+ 2*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"]*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (Subscript[u, 4, 1, 3]*Subscript[\[Nu], 3]*Schiebe[3, "+"] + Subscript[\[Nu], 3]*Schiebe[3, "+"]*(Schiebe[4, "-"] - Schiebe[1, "-"]) +
+ (d - Subscript[\[Nu], 3] - 2*Subscript[\[Nu], 1]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 60] =
+ OperatorApplyV[Subscript[e, 60]];
+
+Subscript[h, 60] =
+ Subscript[s, 60] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[notnecessaryf, 60] =
+ MakeFun[Subscript[h, 60], "(60)", IFF[Subscript[\[Nu], 1] > 1 && m1 =!= 0]];
+
+Subscript[e, 61] =
+ (d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3])*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ Subscript[\[Nu], 3]* Schiebe[3, "+"]*(Schiebe[1, "-"] - Schiebe[4, "-"])*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 61] =
+ OperatorApplyV[Subscript[e, 61]];
+
+Subscript[h, 61] =
+ Subscript[s, 61];
+
+Subscript[f, 61] =
+ MakeFun[Subscript[h, 61], "(61)", IFF[m1 === 0 && m3 === m4]];
+
+Subscript[h, 6153] =
+ Interchange[Subscript[s, 61], 1 \[LeftRightArrow] 3];
+
+Subscript[f, 6153] =
+ MakeFun[Subscript[h, 6153], "(6153)", IFF[m3 === 0 && m1 === m4]];
+
+Subscript[e, 62] =
+ (PP - Subscript[m, 2]^2)*(Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] + 2*Subscript[\[Nu], 4] + 2)*
+ Schiebe[4, "+"]* TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ ((Subscript[m, 1]^2 - Subscript[u, 6, 1, 2])*Subscript[\[Nu], 1]*Schiebe[1, "+"] +
+ 4*Subscript[m, 2]^2*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+ 2*Subscript[m, 1]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] +
+ (Subscript[\[CapitalSigma], 4] - 2*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"] -
+ 2*Subscript[m, 1]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"])*
+ Schiebe[2, "-"]*Schiebe[4, "+"] + (PP - Subscript[m, 2]^2)*Subscript[\[Nu], 1]* Schiebe[1, "+"]*Schiebe[4, "+"]*Schiebe[3, "-"] -
+ Subscript[\[CapitalSigma], 4])* TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 62] =
+ OperatorApplyV[Subscript[e, 62]];
+
+Subscript[h, 62] =
+ nuExplicit[Subscript[s, 62]] /. Subscript[\[Nu], 4] -> Subscript[\[Nu], 4] - 1;
+
+Subscript[f, 62] =
+ MakeFun[Subscript[h, 62], "(62)", IFF[PP =!= m2^2 && Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] + 2*Subscript[\[Nu], 4] =!= 0], {m4 :> 0, m3 :> m1, n2 :> 1}];
+Subscript[e, 63] =
+ (PP - Subscript[m, 2]^2)*((Subscript[m, 3]^2 - Subscript[m, 1]^2)*(d - 2*Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3] +
+ 2*Subscript[\[Nu], 4]) + 2*Subscript[m, 3]^2*(Subscript[\[Nu], 3] - Subscript[\[Nu], 1]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ ((Subscript[m, 1]^2 - Subscript[m, 3]^2)*((2*Subscript[m, 1]^2*Subscript[\[Nu], 1] Schiebe[1, "+"] +
+ 2*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] - Subscript[\[CapitalSigma], 4] - 2)*
+ (Schiebe[2, "-"] - Schiebe[4, "-"]) - 4*Subscript[m, 2]^2*Subscript[\[Nu], 2]*Schiebe[2, "+"] Schiebe[4, "-"]) +
+
+ 2*(PP - Subscript[m, 2]^2)*(Subscript[m, 3]^2*Subscript[\[Nu], 3]*
+ Schiebe[3, "+"]*(Schiebe[1, "-"] - Schiebe[4, "-"]) + Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"]*
+ (Schiebe[4, "-"] - Schiebe[3, "-"])))* TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 63] =
+ OperatorApplyV[Subscript[e, 63]];
+
+Subscript[h, 63] =
+ nuExplicit[Subscript[s, 63]];
+
+Subscript[f, 63] =
+ MakeFun[Subscript[h, 63], "(63)", IFF[PP =!= m2^2 && Cayley[1, 3, 4][{m1, m2, m3, m4}] =!= 0], {m4 :>0}];
+
+Subscript[f, 63] =
+ MakeFun[Subscript[h, 63], "(63)", IFF[PP =!= m2^2 && Cayley[1, 3, 4][{m1, m2, m3, m4}] =!= 0], {m4 :> 0, n1 :> 1, n3 :> 1}];
+
+Subscript[r, 6552] =
+ nuExplicit[Subscript[e, 52]] /. Subscript[\[CapitalDelta], 2, 4, 6] -> 0;
+
+formal =
+ Solve[Subscript[e, 55] /. TVI[__] -> 1, Schiebe[4, "+"]][[1, 1]] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1;
+
+Subscript[n, 6552] =
+ OperatorApplyV[Subscript[r, 6552] /. formal];
+
+Subscript[s, 6552] =
+ -Subscript[n, 6552][[2, 4]] == Subscript[n, 6552][[2]] - Subscript[n, 6552][[2, 4]];
+
+Subscript[f, 6552] =
+ MakeFun[Subscript[s, 6552], "(6552)", IFF[Subscript[\[CapitalDelta], 2, 4, 6] === 0 &&
+ Expand[2*(Subscript[\[Nu], 2] - Subscript[\[Nu], 4])* m4^2 + (3*Subscript[\[Nu], 2] - d)*
+ Subscript[u, 2, 4, 6] + Subscript[\[Nu], 2]*Subscript[u, 6, 2, 4]] =!= 0]
+ ];
+
+Subscript[r, 6552] =
+ nuExplicit[Subscript[e, 52]] /. Subscript[\[CapitalDelta], 2, 4, 6] -> 0;
+
+Subscript[n, 6552] =
+ OperatorApplyV[Subscript[r, 6552]];
+
+
+Subscript[s, 6552] =
+ -Subscript[n, 6552][[2, 5]] == Subscript[n, 6552][[2]] - Subscript[n, 6552][[2, 5]];
+
+Subscript[f, 6552] =
+ MakeFun[Subscript[s, 6552], "(6552)", IFF[Subscript[\[CapitalDelta], 2, 4, 6] === 0 &&
+ Expand[-2*Subscript[\[Nu], 2]*Subscript[m, 4]^2 + 2*Subscript[\[Nu], 4]*Subscript[m, 4]^2 + d*Subscript[u, 2, 4, 6] -
+ 3*Subscript[\[Nu], 2]*Subscript[u, 2, 4, 6]] =!= 0]];
+
+Subscript[r, 6553] =
+ nuExplicit[Subscript[s, 55]] /. Subscript[u, 3, 1, 4] -> 0 /. Subscript[u, 6, 2, 4] -> 0 /. Subscript[m, 4] -> 0;
+
+Subscript[h, 6553] =
+ -Subscript[r, 6553][[2, 1]] == Subscript[r, 6553][[2]] - Subscript[r, 6553][[2, 1]];
+
+Subscript[f, 6553] =
+ MakeFun[Subscript[h, 6553], "(6553)", IFF[Subscript[u, 6, 2, 4] === 0 && Subscript[u, 1, 3, 4] === 0], m4 :> 0];
+
+Subscript[e, 66] =
+ 4*PP*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*
+ TVI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (-((6*d - 6*Subscript[\[Nu], 1] - 5*Subscript[\[Nu], 2] - 6*Subscript[\[Nu], 3] - 4*Subscript[\[Nu], 4] -
+ 6*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"]) + (Subscript[u, 6, 2, 4] - 4*Subscript[m, 2]^2)*
+ Subscript[\[Nu], 2]*Schiebe[2, "+"] - 6*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] +
+ 2*(Subscript[u, 6, 2, 4] - Subscript[m, 4]^2)*Subscript[\[Nu], 4]*Schiebe[4, "+"] -
+ Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[4, "-"] - 2*Subscript[\[Nu], 4]*Schiebe[4, "+"]*Schiebe[2, "-"]))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 66] =
+ OperatorApplyV[Subscript[e, 66]];
+
+Subscript[h, 66] =
+ Subscript[s, 66] /. {
+ Subscript[\[Nu], 1] :> Subscript[\[Nu], 1] - 1,
+ Subscript[\[Nu], 2] :> Subscript[\[Nu], 2] - 1,
+ Subscript[\[Nu], 3] :> Subscript[\[Nu], 3] - 1, d :> d - 2
+ };
+
+Subscript[f, 66] =
+ MakeFun[Subscript[h, 66], "(66)", IFF[PP =!= 0 && Subscript[\[Nu], 1] > 1 && Subscript[\[Nu], 2] > 1 && Subscript[\[Nu], 3] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 67] =
+ 4*PP*Subscript[\[Nu], 1]*(Subscript[\[Nu], 1] + 1)*Schiebe[1, "+"] Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*
+ TVI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ ((6*d - 6*Subscript[\[Nu], 1] - 5*Subscript[\[Nu], 2] - 6*Subscript[\[Nu], 3] - 4*Subscript[\[Nu], 4]) -
+ 2*(Subscript[u, 2, 4, 6] + 3*Subscript[m, 1]^2)*Subscript[\[Nu], 1] Schiebe[1, "+"] +
+ (Subscript[u, 6, 2, 4] - 4*Subscript[m, 2]^2) Subscript[\[Nu], 2]*Schiebe[2, "+"] -
+ 6*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] + 2*(Subscript[u, 6, 2, 4] - Subscript[m, 4]^2) Subscript[\[Nu], 4]*Schiebe[4, "+"] +
+ 2*Subscript[\[Nu], 1] Schiebe[1, "+"]*(Schiebe[4, "-"] - Schiebe[2, "-"]) -
+ Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[4, "-"] - 2*Subscript[\[Nu], 4]*Schiebe[4, "+"]*Schiebe[2, "-"])*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 67] =
+ OperatorApplyV[Subscript[e, 67]];
+
+Subscript[e, 67] =
+ 4*PP*Subscript[\[Nu], 1]*(Subscript[\[Nu], 1] + 1)*Schiebe[1, "+"] Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*
+ TVI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (2*(2*d - 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3] - Subscript[\[Nu], 4]) -
+ 2*(Subscript[u, 2, 4, 6] + 2*Subscript[m, 1]^2)*Subscript[\[Nu], 1]*Schiebe[1, "+"] -
+ 4*Subscript[m, 2]^2*Subscript[\[Nu], 2]*Schiebe[2, "+"] - 4*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] +
+ 2*Subscript[u, 6, 2, 4]*Subscript[\[Nu], 4]*Schiebe[4, "+"] + 2*Subscript[\[Nu], 1]*
+ Schiebe[1, "+"]*(Schiebe[4, "-"] - Schiebe[2, "-"]) - 2*Subscript[\[Nu], 4]*Schiebe[4, "+"]*Schiebe[2, "-"])*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 67] =
+ OperatorApplyV[Subscript[e, 67]];
+
+Subscript[h, 67] =
+ Subscript[s, 67] /. {Subscript[\[Nu], 1] :> Subscript[\[Nu], 1] - 2, Subscript[\[Nu], 2] :> Subscript[\[Nu], 2] - 1, d :> d - 2};
+
+Subscript[f, 67] =
+ MakeFun[Subscript[h, 67], "(67)", IFF[PP =!= 0 && Subscript[\[Nu], 1] > 2 && Subscript[\[Nu], 2] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[h, 6713] =
+ Interchange[Subscript[s, 67], 1 \[LeftRightArrow] 3] /. {Subscript[\[Nu], 3] :> Subscript[\[Nu], 3] - 2, Subscript[\[Nu], 2] :> Subscript[\[Nu], 2] - 1, d :> d - 2};
+
+Subscript[f, 6713] =
+ MakeFun[Subscript[h, 6713], "(6713)", IFF[PP =!= 0 && Subscript[\[Nu], 3] > 2 && Subscript[\[Nu], 2] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 68] =
+ 4*PP*Subscript[m, 4]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 2]*(Subscript[\[Nu], 2] + 1)*Schiebe[2, "+"]*
+ Schiebe[2, "+"]*TVI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}] ==
+ (-(((Subscript[m, 1]^2 - Subscript[m, 3]^2)*(2*d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2] -
+ 2*Subscript[\[Nu], 3] - 2*Subscript[\[Nu], 4]) + Subscript[m, 4]^2*(2*Subscript[\[Nu], 1] +
+ Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3])) - Subscript[u, 1, 3, 4]*(2*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"] +
+ Subscript[u, 2, 4, 6]*Subscript[\[Nu], 2]*Schiebe[2, "+"]) +
+ Subscript[u, 3, 1, 4]*(2*Subscript[m, 3]^2*Subscript[\[Nu], 3]*Schiebe[3, "+"] + Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[4, "-"]) -
+ 2*Subscript[m, 4]^2*(Subscript[\[Nu], 2]*Schiebe[2, "+"] + Subscript[\[Nu], 4]*Schiebe[4, "+"])*(Schiebe[3, "-"] - Schiebe[1, "-"])))*
+ TVI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3], Subscript[\[Nu], 4]}];
+
+Subscript[s, 68] =
+ OperatorApplyV[Subscript[e, 68]];
+
+Subscript[h, 68] =
+ Subscript[s, 68] /. {Subscript[\[Nu], 1] :> Subscript[\[Nu], 1] - 1, Subscript[\[Nu], 2] :> Subscript[\[Nu], 2] - 2, d :> d - 2};
+
+Subscript[f, 68] =
+ MakeFun[Subscript[h, 68], "(68)", IFF[PP =!= 0 && m4 =!= 0 && Subscript[\[Nu], 1] > 1 && Subscript[\[Nu], 2] > 2 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[h, 6813] =
+ Interchange[Subscript[s, 68], 1 \[LeftRightArrow] 3] /. {Subscript[\[Nu], 2] :> Subscript[\[Nu], 2] - 2, Subscript[\[Nu], 3] :> Subscript[\[Nu], 3] - 1, d :> d - 2};
+
+Subscript[f, 6813] =
+ MakeFun[Subscript[h, 6813], "(6813)", IFF[PP =!= 0 && m4 =!= 0 && Subscript[\[Nu], 2] > 2 && Subscript[\[Nu], 3] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 70] =
+ (3*d - 10)*(d - 3)^2*Subscript[m, 4]^2 TVI[d, {1, 1, 1, 1}] ==
+ (1/(4*PP))*((3*d - 10)*Subscript[\[CapitalDelta], 1, 3, 4]*(Subscript[\[CapitalDelta], 2, 4, 6] + Subscript[u, 2, 4, 6]*(Schiebe[2, "-"] - Schiebe[4, "-"])) -
+ 8*(d - 4)^2*PP*Subscript[m, 3]^2*Subscript[m, 4]^2*Schiebe[4, "-"])*TVI[-2 + d, {1, 1, 1,1}] + ((d - 3)*
+ Subscript[m, 4]^2*(4*Subscript[m, 1]^2*(d - 4)*Schiebe[1, "+"]*
+ Schiebe[1, "+"] - 8*(d - 3)*Subscript[m, 2]^2*Schiebe[2, "+"] Schiebe[2, "+"] + (3*d - 10)*(d - 3)*Schiebe[2, "+"]) +
+ Subscript[u, 6, 2, 4]*((1/2)*(3*d - 10)* Subscript[u, 1, 3, 4]*(Schiebe[1, "+"] - Schiebe[3, "+"]) + (d - 2)*(d - 3)*
+ Subscript[m, 4]^2*Schiebe[1, "+"])*Schiebe[2, "+"] - Subscript[m, 4]^2*((d - 4)^2*Subscript[u, 1, 3, 4]* Schiebe[2, "+"] +
+ (3*d - 10)*Subscript[u, 4, 1, 3]* Schiebe[3, "+"])*Schiebe[1, "+"])*Schiebe[4, "-"]*
+ TVI[d, {1, 1, 1, 1}] - (d - 3)* Subscript[m, 4]^2*(4*(d - 4)*Subscript[m, 1]^2*Schiebe[1, "+"] + (d - 2)*(Subscript[u, 6, 2, 4]*Schiebe[2, "+"] -
+ 2*Subscript[m, 4]^2*Schiebe[4, "+"]))*Schiebe[1, "+"]* Schiebe[3, "-"]* TVI[d, {1, 1, 1, 1}] + (1/2)*(3*d - 10)*
+ Subscript[u, 1, 3, 4]*(Subscript[u, 6, 2, 4]*Schiebe[2, "+"] - 2*Subscript[m, 4]^2*Schiebe[4, "+"])*
+ (Schiebe[3, "+"]*Schiebe[1, "-"] - Schiebe[1, "+"]*Schiebe[3, "-"])*TVI[d, {1, 1, 1, 1}];
+
+Subscript[s, 70] =
+ OperatorApplyV[Subscript[e, 70]];
+
+Subscript[h, 70] =
+ Subscript[s, 70];
+
+Subscript[f, 70] =
+ MakeFun[Subscript[h, 70], "(70)", IFF[m4 =!= 0 && PP =!= 0 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 71] =
+ 2*Subscript[D, 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (2*Subscript[h, 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"] +
+ 2*Subscript[h, 2, 1, 3]*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+ 4*Subscript[m, 3]^2*Subscript[\[Sigma], 1, 2, 3]*Subscript[\[Nu], 3]* Schiebe[3, "+"] +
+ Subscript[m, 3]^2*Subscript[\[Phi], 2, 1, 3]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[1, "-"] +
+ Subscript[m, 3]^2*Subscript[\[Phi], 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[2, "-"] -
+ 2*Subscript[\[Rho], 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[3, "-"] +
+ (1/2)*Subscript[\[CapitalSigma], 3]*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3])*Subscript[\[Phi], 3, 2, 1])*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 71] =
+ OperatorApplyJ[Subscript[e, 71]];
+
+Subscript[h, 71] =
+ nuExplicit[Subscript[s, 71]] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1 /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1;
+
+Subscript[f, 71] =
+ MakeFun[Subscript[h, 71], "(71)", IFF[Subscript[\[Nu], 1] > 1 && Subscript[\[Nu], 2] > 1 && Subscript[D, 1, 2, 3] =!= 0]];
+
+
+Subscript[h, 7123] =
+ Interchange[Subscript[s, 71], 2 \[LeftRightArrow] 3] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1 /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1;
+
+Subscript[f, 7123] =
+ MakeFun[Subscript[h, 7123], "(7123)", IFF[Subscript[\[Nu], 1] > 1 && Subscript[\[Nu], 3] > 1 && Subscript[D, 1, 3, 2] =!= 0]];
+
+
+Subscript[h, 7113] =
+ Interchange[Subscript[s, 71], 1 \[LeftRightArrow] 3] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1 /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1;
+
+Subscript[f, 7113] =
+ MakeFun[Subscript[h, 7113], "(7113)", IFF[Subscript[\[Nu], 2] > 1 && Subscript[\[Nu], 3] > 1 && Subscript[D, 3, 2, 1] =!= 0]];
+
+Subscript[e, 78] =
+ 2*Subscript[m, 1]^2*Subscript[D, 1, 2, 3]*
+ Subscript[\[Nu], 1]*(Subscript[\[Nu], 1] + 1)*Schiebe[1, "+"]*
+ Schiebe[1, "+"]*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ ((-Subscript[\[CapitalSigma], 3])*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3])*Subscript[\[Rho], 1, 2, 3] +
+ Subscript[m, 2]^2*Subscript[m, 3]^2*Subscript[\[Phi], 1, 2, 3]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[1, "-"] +
+ Subscript[m, 1]^2*Subscript[m, 3]^2*Subscript[\[Phi], 2, 1, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[2, "-"] +
+ Subscript[m, 1]^2*Subscript[m, 2]^2*Subscript[\[Phi], 3, 1, 2]*Subscript[\[Nu], 1]*Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[3, "-"] +
+ (d - 2 - 2*Subscript[\[Nu], 1])*Subscript[D, 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"] +
+ Subscript[m, 1]^2*Subscript[S, 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"] + Subscript[m, 2]^2*Subscript[S, 2, 1, 3]*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+ Subscript[m, 3]^2*Subscript[S, 3, 1, 2]*Subscript[\[Nu], 3]*Schiebe[3, "+"])* TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 78] =
+ OperatorApplyJ[Subscript[e, 78]];
+
+Subscript[h, 78] =
+ nuExplicit[Subscript[s, 78]] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 2;
+
+Subscript[f, 78] =
+ MakeFun[Subscript[h, 78], "(78)", IFF[Subscript[\[Nu], 1] > 2 && m1 =!= 0 && Subscript[D, 1, 2, 3] =!= 0]];
+
+Subscript[e, 80] =
+ Subscript[\[Nu], 1]*(d - 2*Subscript[\[Nu], 1] - 2)*
+ Subscript[\[CapitalDelta], 2, 3, 6]*Schiebe[1, "+"]*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2],
+ Subscript[\[Nu], 3]}] ==
+ (-4*Subscript[m, 2]^2*Subscript[m, 3]^2*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*Schiebe[1, "-"] +
+ 2*Subscript[m, 2]^2*((PP - Subscript[m, 2]^2)*(2*d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2] -
+ 2*Subscript[\[Nu], 3] - 1) - Subscript[m, 3]^2*(2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - 1))*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+ 2*Subscript[m, 3]^2*((PP - Subscript[m, 3]^2)*(2*d - 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] - Subscript[\[Nu], 3] - 1) -
+ Subscript[m, 2]^2*(2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3] - 1))*Subscript[\[Nu], 3]*Schiebe[3, "+"] -
+ Subscript[\[CapitalSigma], 3]*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] -
+ Subscript[\[Nu], 3])*Subscript[u, 6, 2, 3])*TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 80] =
+ OperatorApplyJ[Subscript[e, 80]];
+
+Subscript[h, 80] =
+ nuExplicit[Subscript[s, 80]] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 80] =
+ MakeFun[Subscript[h, 80], "(80)", IFF[Subscript[\[Nu], 1] > 1 && Subscript[\[CapitalDelta], 2, 3, 6] =!= 0], m1 :> 0];
+
+Subscript[e, 81] =
+ PP*(Subscript[\[CapitalSigma], 3] + 2)*Subscript[\[Nu], 1]*
+ Schiebe[1, "+"]*Subscript[\[Nu], 2]*Schiebe[2, "+"]*TJI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (PP*(d - 2*Subscript[\[Nu], 3]) + Subscript[m, 1]^2*(d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2]) +
+ Subscript[m, 2]^2*(d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2]) -
+ 2*Subscript[m, 3]^2*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3]) -
+ 2*Subscript[m, 3]^2*(PP - Subscript[m, 3]^2)*Subscript[\[Nu], 3]*Schiebe[3, "+"] +
+ Subscript[m, 1]^2*(PP - Subscript[m, 1]^2 -
+ 3*Subscript[m, 2]^2 + 3*Subscript[m, 3]^2 -
+ Schiebe[2, "-"] + Schiebe[3, "-"])*Subscript[\[Nu], 1]*Schiebe[1, "+"] +
+ Subscript[m, 2]^2*(PP - 3*Subscript[m, 1]^2 - Subscript[m, 2]^2 + 3*Subscript[m, 3]^2 - Schiebe[1, "-"] +
+ Schiebe[3, "-"])*Subscript[\[Nu], 2]*Schiebe[2, "+"])*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 81] =
+ OperatorApplyJ[Subscript[e, 81]];
+
+Subscript[h, 81] =
+ nuExplicit[Subscript[s, 81]] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1 /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1 /. d -> d - 2;
+
+Subscript[f, 81] =
+ MakeFun[Subscript[h, 81], "(81)", IFF[PP =!= 0 && Subscript[\[Nu], 1] > 1 && Subscript[\[Nu], 2] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+
+Subscript[h, 8123] =
+ Interchange[Subscript[s, 81], 2 \[LeftRightArrow] 3] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1 /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1 /. d -> d - 2;
+
+Subscript[f, 8123] =
+ MakeFun[Subscript[h, 8123], "(8123)", IFF[PP =!= 0 && Subscript[\[Nu], 1] > 1 && Subscript[\[Nu], 3] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[h, 8113] =
+ Interchange[Subscript[s, 81], 1 \[LeftRightArrow] 3] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1 /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1 /. d -> d - 2;
+
+Subscript[f, 8113] =
+ MakeFun[Subscript[h, 8113], "(8113)", IFF[PP =!= 0 && Subscript[\[Nu], 2] > 1 && Subscript[\[Nu], 3] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+
+Subscript[e, 82] =
+ (-PP)*Subscript[m, 1]^2*(Subscript[\[CapitalSigma], 3] + 2)*
+ Subscript[\[Nu], 1]*(Subscript[\[Nu], 1] + 1)*Schiebe[1, "+"]*Schiebe[1, "+"]*TJI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] +
+ (1/2)*PP*(Subscript[\[CapitalSigma], 3] + 2)*(Subscript[\[CapitalSigma], 3] + 4)*Subscript[\[Nu], 1]*Schiebe[1, "+"]*
+ TJI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ ((-(1/2))*PP^2*(d + 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3]) +
+ (1/2)*
+ PP*(Subscript[m, 1]^2*(6*Subscript[\[Nu], 1] + 6*Subscript[\[Nu], 2] + 6*Subscript[\[Nu], 3] - 7*d) +
+ Subscript[m, 2]^2*(7*d - 2*Subscript[\[Nu], 1] - 4*Subscript[\[Nu], 2] - 10*Subscript[\[Nu], 3]) +
+ Subscript[m, 3]^2*(7*d - 2*Subscript[\[Nu], 1] - 10*Subscript[\[Nu], 2] - 4*Subscript[\[Nu], 3])) +
+ (Subscript[m, 2]^2)^2*(d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2]) + (Subscript[m, 3]^2)^2*
+ (d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3]) +
+ Subscript[m, 1]^2* Subscript[m, 2]^2*(d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2]) +
+
+ Subscript[m, 1]^2*Subscript[m, 3]^2*(d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 3]) - 4*Subscript[m, 2]^2*
+ Subscript[m, 3]^2*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3]) -
+ Subscript[m, 1]^2*(2*PP^2 - PP*(2*Subscript[m, 1]^2 + Subscript[m, 2]^2 + Subscript[m, 3]^2) +
+ Subscript[m, 1]^2*(Subscript[m, 2]^2 + Subscript[m, 3]^2) + 3*(Subscript[m, 2]^2 - Subscript[m, 3]^2)^2)*Subscript[\[Nu], 1]*Schiebe[1, "+"] +
+
+ Subscript[m, 2]^2*(PP^2 + (PP - Subscript[m, 2]^2)*(3*Subscript[m, 1]^2 - 5*Subscript[m, 3]^2 + Schiebe[1, "-"] -
+ Schiebe[3, "-"]) - (Subscript[m, 2]^2)^2)*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+
+ Subscript[m, 3]^2*(PP^2 + (PP - Subscript[m, 3]^2)*(3*Subscript[m, 1]^2 - 5*Subscript[m, 2]^2 + Schiebe[1, "-"] -
+ Schiebe[2, "-"]) - (Subscript[m, 3]^2)^2)*Subscript[\[Nu], 3]*Schiebe[3, "+"] -
+ (1/2)*PP*(Subscript[\[CapitalSigma], 3] + 2)*(Schiebe[1, "-"] - Schiebe[2, "-"] - Schiebe[3, "-"]) -
+ Subscript[m, 1]^2*(Subscript[m, 2]^2 - Subscript[m, 3]^2)*Subscript[\[Nu], 1]*Schiebe[1, "+"]*(Schiebe[2, "-"] - Schiebe[3, "-"]))*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[r, 82] =
+ OperatorApplyJ[Subscript[e, 82]];
+
+Subscript[s, 82] =
+ Subscript[r, 82][[1, 2]] == -Subscript[r, 82][[1, 1]] + Subscript[r, 82][[2]];
+
+Subscript[h, 82] = nuExplicit[Subscript[s, 82]] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 2 /. d -> d - 2;
+
+Subscript[f, 82] =
+ MakeFun[Subscript[h, 82], "(82)", IFF[PP =!= 0 && Subscript[\[Nu], 1] > 2 && m1 =!= 0 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+
+Subscript[h, 8213] =
+ Interchange[Subscript[s, 82], 1 \[LeftRightArrow] 3] /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 2 /. d -> d - 2;
+
+Subscript[f, 8213] =
+ MakeFun[Subscript[h, 8213], "(8213)", IFF[PP =!= 0 && m3 =!= 0 && Subscript[\[Nu], 3] > 2 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[h, 8212] =
+ Interchange[Subscript[s, 82], 1 \[LeftRightArrow] 2] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 2 /. d -> d - 2;
+
+Subscript[f, 8212] =
+ MakeFun[Subscript[h, 8212], "(8212)", IFF[PP =!= 0 && Subscript[\[Nu], 2] > 2 && m2 =!= 0 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 83] =
+ PP*(Subscript[\[CapitalSigma], 3] + 2)*(Subscript[\[CapitalSigma], 3] + 4)*Subscript[\[Nu], 1]*
+ Schiebe[1, "+"]*TJI[2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ ((-PP^2)*(d + 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3]) +
+ PP*(Subscript[m, 2]^2*(7*d - 2*Subscript[\[Nu], 1] - 4*Subscript[\[Nu], 2] - 10*Subscript[\[Nu], 3]) +
+ Subscript[m, 3]^2*(7*d - 2*Subscript[\[Nu], 1] - 10*Subscript[\[Nu], 2] - 4*Subscript[\[Nu], 3])) +
+ 2*(Subscript[m, 2]^2)^2*(d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2]) +
+ 2*(Subscript[m, 3]^2)^2*(d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 3]) -
+ 8*Subscript[m, 2]^2*Subscript[m, 3]^2*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3]) +
+ 2*Subscript[m, 2]^2*(PP^2 - (PP - Subscript[m, 2]^2)*(5*Subscript[m, 3]^2 -
+ Schiebe[1, "-"] + Schiebe[3, "-"]) - (Subscript[m, 2]^2)^2)*Subscript[\[Nu], 2]*Schiebe[2, "+"] +
+ 2*Subscript[m, 3]^2*(PP^2 - (PP - Subscript[m, 3]^2)*(5*Subscript[m, 2]^2 - Schiebe[1, "-"] + Schiebe[2, "-"]) -
+ (Subscript[m, 3]^2)^2)*Subscript[\[Nu], 3]*Schiebe[3, "+"] -
+ PP*(Subscript[\[CapitalSigma], 3] + 2)*(Schiebe[1, "-"] - Schiebe[2, "-"] - Schiebe[3, "-"]))*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 83] =
+ OperatorApplyJ[Subscript[e, 83]];
+
+Subscript[h, 83] =
+ nuExplicit[Subscript[s, 83]] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1 /. d -> d - 2;
+
+Subscript[f, 83] =
+ MakeFun[Subscript[h, 83], "(83)", IFF[PP =!= 0 && Subscript[\[Nu], 1] > 1 && MatchQ[d, _Symbol + _Integer?Positive]], m1 :> 0];
+
+Subscript[t, 1] =
+ Subscript[m, 1]^2 + Subscript[m, 2]^2 + Subscript[m, 3]^2;
+
+Subscript[t, 2] =
+ 3*(Subscript[m, 1]^4 + Subscript[m, 2]^4 + Subscript[m, 3]^4) +
+ 2*(Subscript[m, 1]^2*Subscript[m, 2]^2 + Subscript[m, 1]^2*Subscript[m, 3]^2 +
+ Subscript[m, 2]^2*Subscript[m, 3]^2);
+
+Subscript[t, 3] =
+ Subscript[m, 1]^2*(Subscript[m, 1]^4 - Subscript[m, 2]^4 - Subscript[m, 3]^4) +
+ Subscript[m, 2]^2*(Subscript[m, 2]^4 - Subscript[m, 1]^4 - Subscript[m, 3]^4) +
+ Subscript[m, 3]^2*(Subscript[m, 3]^4 - Subscript[m, 1]^4 - Subscript[m, 2]^4) +
+ 10*Subscript[m, 1]^2*Subscript[m, 2]^2*Subscript[m, 3]^2;
+
+f[\[Mu]1_, \[Mu]2_, \[Mu]3_] :=
+ \[Mu]1*(PP - \[Mu]1)*(-2*(d - 4)*PP^2 + PP*(4*Subscript[t, 1]*(5*d - 18) - 24*\[Mu]1*(2*d - 7)) -
+ 2*(4*d - 13)*Subscript[t, 1]^2 + 2*(9*d - 31)*Subscript[t, 2] - 24*\[Mu]2*\[Mu]3*(4*d - 13) - 24*\[Mu]1^2*(2*d - 7));
+
+Subscript[f, 1, 2, 3] =
+ f[Subscript[m, 1]^2, Subscript[m, 2]^2, Subscript[m, 3]^2];
+
+Subscript[f, 2, 1, 3] =
+ f[Subscript[m, 2]^2, Subscript[m, 1]^2, Subscript[m, 3]^2];
+
+Subscript[f, 3, 2, 1] =
+ f[Subscript[m, 3]^2, Subscript[m, 2]^2, Subscript[m, 1]^2];
+
+g[\[Mu]1_, \[Mu]2_, \[Mu]3_] :=
+ ((\[Mu]1*\[Mu]2)/(d - 4))*(4*(d - 4)*PP^2 - 4*(7*d - 24)*PP*(3*\[Mu]3 - 2*Subscript[t, 1]) -
+ Subscript[t, 1]^2*(23*d - 80) + Subscript[t, 2]*(9*d - 32) - 12*\[Mu]3^2*(d - 4) + 12*\[Mu]1*\[Mu]2*(7*d - 24));
+
+Subscript[g, 1, 2, 3] =
+ g[Subscript[m, 1]^2, Subscript[m, 2]^2, Subscript[m, 3]^2];
+
+Subscript[g, 1, 3, 2] =
+ g[Subscript[m, 1]^2, Subscript[m, 3]^2, Subscript[m, 2]^2];
+
+Subscript[g, 2, 3, 1] =
+ g[Subscript[m, 2]^2, Subscript[m, 3]^2, Subscript[m, 1]^2];
+
+
+Subscript[e, 87] =
+ 3*PP*(d - 3)*(d - 4)*(3*d - 8)*(3*d - 10)*TJI[d, {1, 1, 1}] ==
+ ((d - 4)^2*PP^3 - 2*PP^2*Subscript[t, 1]*(d - 4)*(6*d - 23) +
+ PP*(5*Subscript[t, 1]^2*(15*d^2 - 117*d + 224) -
+ Subscript[t, 2]*(42*d^2 - 331*d + 640)) - (1/4)*(d - 5)*(Subscript[t, 3]*(27*d - 90) -
+ Subscript[t, 1]*Subscript[t, 2]*(3*d - 2) - 2*Subscript[t, 1]^3*(5*d - 26)) +
+ Subscript[f, 1, 2, 3]*Schiebe[1, "+"] +
+ Subscript[f, 2, 1, 3]*Schiebe[2, "+"] +
+ Subscript[f, 3, 2, 1]*Schiebe[3, "+"] +
+ Subscript[g, 1, 2, 3]*Schiebe[1, "+"]*Schiebe[2, "+"]*Schiebe[3, "-"] +
+ Subscript[g, 1, 3, 2]*Schiebe[1, "+"]*Schiebe[2, "-"]*Schiebe[3, "+"] +
+ Subscript[g, 2, 3, 1]*Schiebe[1, "-"]*Schiebe[2, "+"]*Schiebe[3, "+"])*TJI[-2 + d, {1, 1, 1}];
+
+Subscript[s, 87] =
+ OperatorApplyJ[Subscript[e, 87]];
+
+Subscript[h, 87] =
+ Subscript[s, 87];
+
+Subscript[f, 87] =
+ MakeFun[Subscript[h, 87], "(87)", IFF[PP =!= 0 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 90] =
+ 3*PP*(d - 3)*(d - 4)*(3*d - 10)*Schiebe[1, "+"]*TJI[d, {1, 1, 1}] ==
+ ((-Subscript[m, 1]^2)*(PP^2*(7*d - 24) - 2*PP*((4*d - 15)*Subscript[t, 1] - (d - 5)*
+ Subscript[m, 1]^2) + (3/2)*(d - 5)*Subscript[t, 1]^2 + (5/2)*(d - 3)*Subscript[t, 2] -
+ 2*(5*d - 17)*(Subscript[m, 1]^2)^2 - 2*(13*d - 45)*Subscript[m, 2]^2*Subscript[m, 3]^2)*
+ Schiebe[1, "+"] + 2*Subscript[m, 2]^2*(PP - Subscript[m, 2]^2)*((d - 3)*(PP + Subscript[m, 2]^2 -
+ 5*Subscript[m, 3]^2) + (7*d - 25)*Subscript[m, 1]^2)*Schiebe[2, "+"] +
+ 2*Subscript[m, 3]^2*(PP - Subscript[m, 3]^2)*((d - 3)*(PP - 5*Subscript[m, 2]^2 +
+ Subscript[m, 3]^2) + (7*d - 25)*Subscript[m, 1]^2)*Schiebe[3, "+"] - (d - 3)*(d - 4)*PP^2 +
+
+ PP*((7*d - 30)*(d - 3)*Subscript[t, 1] - (7*d - 31)*(3*d - 10)*Subscript[m, 1]^2) +
+ (1/4)*(d - 5)*((17*d - 66)*Subscript[t, 1]^2 - (3*d - 14)*Subscript[t, 2] -
+ 4*(3*d - 10)*((Subscript[m, 1]^2)^2 + 5*Subscript[m, 2]^2*Subscript[m, 3]^2)) +
+ (2/(d - 4))*(((PP + Subscript[m, 2]^2)*(7*d - 24) + (d - 4)*Subscript[m, 1]^2 -
+ (5*d - 18)*Subscript[m, 3]^2)*Subscript[m, 1]^2*Subscript[m, 2]^2*Schiebe[1, "+"]*Schiebe[2, "+"]*Schiebe[3,"-"] +
+ ((PP + Subscript[m, 3]^2)*(7*d - 24) + (d - 4)*Subscript[m, 1]^2 -
+ (5*d - 18)*Subscript[m, 2]^2)*Subscript[m, 1]^2*Subscript[m, 3]^2*Schiebe[1, "+"]*Schiebe[2, "-"]*Schiebe[3, "+"] -
+ 2*((PP + Subscript[m, 2]^2 + Subscript[m, 3]^2)*(d - 3) +
+ (d - 4)*Subscript[m, 1]^2)*Subscript[m, 2]^2*Subscript[m, 3]^2*Schiebe[1, "-"]*Schiebe[2, "+"]*Schiebe[3, "+"]))*TJI[-2 + d, {1, 1, 1}];
+
+Subscript[s, 90] =
+ OperatorApplyJ[Subscript[e, 90]];
+
+Subscript[h, 90] =
+ Subscript[s, 90];
+
+Subscript[f, 90] =
+ MakeFun[Subscript[h, 90], "(90)", IFF[PP =!= 0 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 91.1] =
+ (d - 2)*Subscript[\[Nu], 1]*Schiebe[1, "+"]*TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (-Subscript[u, 1, 2, 3] - Schiebe[1, "-"] + Schiebe[2, "-"] + Schiebe[3, "-"])*
+ TKI[-2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 91.1] =
+ OperatorApplyK[Subscript[e, 91.1]];
+
+Subscript[e, 91.2] =
+ (d - 2)*Subscript[\[Nu], 2]*Schiebe[2, "+"]*Subscript[\[Nu], 3]*Schiebe[3, "+"]*
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2],Subscript[\[Nu], 3]}] ==
+ (-2*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"] + (d - 2 - 2*Subscript[\[Nu], 1]))*
+ TKI[-2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 91.2] =
+ OperatorApplyK[Subscript[e, 91.2]];
+
+Subscript[e, 91.3] =
+ (d - 2)*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3])*
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (-(Subscript[\[CapitalDelta], 1, 2, 3] + Subscript[u, 1, 2, 3]*Schiebe[1, "-"] + Subscript[u, 2, 1, 3]*Schiebe[2, "-"] +
+ Subscript[u, 3, 1, 2]*Schiebe[3, "-"])) TKI[-2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 91.3] =
+ OperatorApplyK[Subscript[e, 91.3]];
+
+Subscript[e, 91.4] =
+ Subscript[\[CapitalDelta], 1, 2, 3]*Subscript[\[Nu], 1]*Schiebe[1, "+"] TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (Subscript[u, 1, 2, 3]*(d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2]) +
+ 2*Subscript[m, 2]^2*(Subscript[\[Nu], 1] - Subscript[\[Nu], 2]) +
+ Subscript[u, 3, 1, 2]*Subscript[\[Nu], 1]*Schiebe[1, "+"] (Schiebe[2, "-"] - Schiebe[3, "-"]) +
+ 2*Subscript[m, 2]^2*Subscript[\[Nu], 2]*Schiebe[2, "+"]*(Schiebe[1, "-"] - Schiebe[3, "-"]))*
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 91.4] =
+ OperatorApplyK[Subscript[e, 91.4]];
+
+Subscript[h, 911] =
+ Subscript[s, 91.1] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 911] =
+ MakeFun[Subscript[h, 911], "(911)", IFF[Subscript[\[Nu], 1] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[h, 912] =
+ Subscript[s, 91.2] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1 /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1;
+
+Subscript[f, 912] =
+ MakeFun[Subscript[h, 912], "(912)", IFF[Subscript[\[Nu], 2] > 1 && Subscript[\[Nu], 3] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[h, 913] =
+ Subscript[s, 91.3];
+
+Subscript[f, 913] =
+ MakeFun[Subscript[h, 913], "(913)", IFF[(n2 === 1 || n3 === 1) && MatchQ[d, _Symbol + _Integer?Positive]], n1 :> 1];
+
+Subscript[h, 914] =
+ Subscript[s, 91.4] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 914] =
+ MakeFun[Subscript[h, 914], "(914)", IFF[Subscript[\[CapitalDelta], 1, 2, 3] =!= 0 && Subscript[\[Nu], 1] > 1 && MatchQ[d, _Symbol]]];
+
+
+Subscript[e, 92] =
+ 2*Subscript[m, 2]*Subscript[m,3]*(Subscript[m, 2] + Subscript[m, 3])*(d - 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] -
+ 2*Subscript[\[Nu], 3] - 1)*Schiebe[1, "+"] TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (Subscript[m, 2]*((d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3] - 1)*(Schiebe[1, "+"]*Schiebe[2, "-"] -1) +
+ (Subscript[\[Nu], 1] - Subscript[\[Nu], 2] + 1)*Schiebe[1, "+"]*Schiebe[3, "-"]) +
+ Subscript[m, 3]*((d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2] - Subscript[\[Nu], 3] - 1)*(Schiebe[1, "+"]*Schiebe[3, "-"] - 1) +
+ (Subscript[\[Nu], 1] - Subscript[\[Nu], 3] + 1)*Schiebe[1, "+"]*Schiebe[2, "-"]))*
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 92] =
+ OperatorApplyK[Subscript[e, 92]];
+
+Subscript[e, 93] =
+ 2*Subscript[m, 2]^2*(d - 2*Subscript[\[Nu], 1] - 2)*(d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2] -
+ Subscript[\[Nu], 3] - 1)*(d - 2*Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3])*Schiebe[1, "+"]*
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (d - 2*Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 3])*(d - 2*Subscript[\[Nu], 1] -
+ 2*Subscript[\[Nu], 2])*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - Subscript[\[Nu], 3])*
+ TKI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 93] =
+ OperatorApplyK[Subscript[e, 93]];
+
+Subscript[h, 93] =
+ Subscript[s, 93] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 93] =
+ MakeFun[Subscript[h, 93], "(93)", IFF[Subscript[\[Nu], 1] > 1 && Subscript[m, 2] =!= 0], {m1 :> 0, m3 :> m2}];
+
+Subscript[e, 94] =
+ Subscript[\[CapitalDelta], 1, 2, 6]*Subscript[\[Nu], 1]*Schiebe[1, "+"]*TBI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}] ==
+ (Subscript[u, 6, 1, 2]*(Subscript[\[Nu], 1]*Schiebe[1, "+"]*Schiebe[2, "-"] - d + Subscript[\[Nu], 1] + 2*Subscript[\[Nu], 2]) +
+ 2*Subscript[m, 2]^2*(Subscript[\[Nu], 2]*Schiebe[2, "+"]*Schiebe[1, "-"] - d + 2*Subscript[\[Nu], 1] + Subscript[\[Nu], 2]))*
+ TBI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}];
+
+Subscript[s, 94] =
+ OperatorApplyB[Subscript[e, 94]];
+
+Subscript[h, 94] =
+ Subscript[s, 94] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 94] =
+ MakeFun[Subscript[h, 94], "(94)", IFF[Subscript[\[CapitalDelta], 1, 2, 6] =!= 0 && Subscript[\[Nu], 1] > 1]];
+
+Subscript[n, 9401] =
+ Subscript[s, 94] /. Subscript[\[CapitalDelta], 1, 2, 6] -> 0 /. Subscript[u, 6, 1, 2] -> 0;
+
+Subscript[h, 9401] =
+ -Subscript[n, 9401][[2, 2]] == Subscript[n, 9401][[2, 1]];
+
+Subscript[f, 9401] =
+ MakeFun[Subscript[h, 9401], "(9401)", IFF[Subscript[\[CapitalDelta], 1, 2, 6] === 0 && Subscript[u, 6, 1, 2] === 0 && m2 =!= 0]];
+
+Subscript[n, 9402] =
+Interchange[Subscript[s, 94] /. Subscript[\[CapitalDelta], 1, 2, 6] -> 0 /. Subscript[u, 6, 1, 2] -> 0, 1 \[LeftRightArrow] 2];
+
+Subscript[h, 9402] =
+ -Subscript[n, 9402][[2, 1]] == Subscript[n, 9402][[2, 2]];
+
+Subscript[f, 9402] =
+ MakeFun[Subscript[h, 9402], "(9402)", IFF[Subscript[\[CapitalDelta], 1, 2, 6] === 0 && Subscript[u, 6, 1, 2] === 0 && m1 =!= 0]];
+
+Subscript[e, 95] =
+ 2*PP*Subscript[\[Nu], 1]*Schiebe[1, "+"] TBI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}] == (Subscript[u, 1, 2, 6] +
+ Schiebe[1, "-"] - Schiebe[2, "-"])*TBI[-2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}];
+
+Subscript[s, 95] =
+ OperatorApplyB[Subscript[e, 95]];
+
+Subscript[h, 95] =
+ Subscript[s, 95] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 95] =
+ MakeFun[Subscript[h, 95], "(95)", IFF[Subscript[\[Nu], 1] > 1 && MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 96] =
+ 2*PP*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] - 1)*TBI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}] ==
+ (Subscript[\[CapitalDelta], 1, 2, 6] + Subscript[u, 1, 2, 6]*Schiebe[1, "-"] + Subscript[u, 2, 1, 6]*Schiebe[2, "-"])*
+ TBI[-2 + d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2]}];
+
+Subscript[s, 96] =
+ OperatorApplyB[Subscript[e, 96]];
+
+Subscript[h, 96] =
+ Subscript[s, 96];
+
+Subscript[f, 96] =
+ MakeFun[Subscript[h, 96], "(96)", IFF[MatchQ[d, _Symbol + _Integer?Positive]], n1 :> 1];
+
+Subscript[e, 97] =
+ 2*Subscript[m, 1]^2*Subscript[\[Nu], 1]*Schiebe[1, "+"] TAI[d, {Subscript[\[Nu], 1]}] ==
+ (d - 2*Subscript[\[Nu], 1]) TAI[d, {Subscript[\[Nu], 1]}];
+
+Subscript[s, 97] =
+ OperatorApplyA[Subscript[e, 97]];
+
+Subscript[h, 97] =
+ Subscript[s, 97] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 97] =
+ MakeFun[Subscript[h, 97], "(97)", IFF[Subscript[\[Nu], 1] > 1 && MatchQ[d, _Symbol]]];
+
+Subscript[e, 98] =
+ (d - 2*Subscript[\[Nu], 1])*TAI[d, {Subscript[\[Nu], 1]}] == -2*Subscript[m, 1]^2*
+ TAI[-2 + d, {Subscript[\[Nu], 1]}];
+
+Subscript[s, 98] =
+ OperatorApplyA[Subscript[e, 98]];
+
+Subscript[h, 98] =
+ Subscript[s, 98];
+
+Subscript[f, 98] =
+ MakeFun[Subscript[h, 98], "(98)", IFF[MatchQ[d, _Symbol + _Integer?Positive]]];
+
+Subscript[e, 99] =
+ Subscript[\[Nu], 1]*(d - 2*Subscript[\[Nu], 2] - 2*Subscript[\[Nu], 3])*(d - Subscript[\[Nu], 2] -
+ Subscript[\[Nu], 3] - 1)*Schiebe[1, "+"]*TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (-Subscript[\[Nu], 2])*(-d + 2*Subscript[\[Nu], 2] + 2)*(-2*d + Subscript[\[Nu], 1] + 2*Subscript[\[Nu], 2] + 2*Subscript[\[Nu], 3] + 2)*
+ Schiebe[2, "+"]*TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 99] =
+ OperatorApplyJ[Subscript[e, 99]];
+
+Subscript[h, 99] =
+ Subscript[s, 99] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1;
+
+Subscript[f, 99] =
+ MakeFun[Subscript[h, 99], "(99)", IFF[m1^2 === PP && Subscript[\[Nu], 1] > 1], {m2 :> 0, m3 :> 0}];
+
+Subscript[h, 9912] =
+ Interchange[ Subscript[s, 99] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1, 1 \[LeftRightArrow] 2];
+
+Subscript[f, 9912] =
+ MakeFun[Subscript[h, 9912], "(9912)", IFF[m2^2 === PP && Subscript[\[Nu], 2] > 1], {m1 :> 0, m3 :> 0}];
+
+Subscript[h, 9913] =
+ Interchange[Subscript[s, 99] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1, 1 \[LeftRightArrow] 3];
+
+Subscript[f, 9913] =
+ MakeFun[Subscript[h, 9913], "(9913)", IFF[m3^2 === PP && Subscript[\[Nu], 3] > 1], {m1 :> 0, m2 :> 0}];
+
+Subscript[e, 100] =
+ 2*Subscript[m, 2]^2*(1 - Subscript[\[Nu], 2])*Subscript[\[Nu], 2]*Schiebe[2, "+"]*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] ==
+ (d - 2*Subscript[\[Nu], 2])*(1 - Subscript[\[Nu], 2])*TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}] -
+ Subscript[\[Nu], 1]*(-d + 2*Subscript[\[Nu], 1] + 2)*Schiebe[1, "+"]*Schiebe[2, "-"]*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2], Subscript[\[Nu], 3]}];
+
+Subscript[s, 100] =
+ OperatorApplyJ[Subscript[e, 100]];
+
+Subscript[h, 100] =
+ Subscript[s, 100];
+
+Subscript[f, 100] =
+ MakeFun[Subscript[h, 100] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1, "(100)", IFF[Subscript[\[Nu], 2] > 2 && m2 =!= 0], m1 :> 0];
+
+Subscript[h, 1002] =
+ Interchange[Subscript[s, 100], 1 \[LeftRightArrow] 3];
+
+Subscript[f, 1002] =
+ MakeFun[Subscript[h, 1002] /. Subscript[\[Nu], 2] -> Subscript[\[Nu], 2] - 1, "(1002)", IFF[Subscript[\[Nu], 2] > 2 && m2 =!= 0], m3 :> 0];
+
+Subscript[h, 1003] =
+ Interchange[Subscript[s, 100], 1 \[LeftRightArrow] 3, 1 \[LeftRightArrow] 2];
+
+Subscript[f, 1003] =
+ MakeFun[Subscript[h, 1003] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1, "(1003)", IFF[Subscript[\[Nu], 1] > 2 && m1 =!= 0], m3 :> 0];
+
+Subscript[h, 1004] =
+ Interchange[Subscript[s, 100], 1 \[LeftRightArrow] 2];
+
+Subscript[f, 1004] =
+ MakeFun[Subscript[h, 1004] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1, "(1004)", IFF[Subscript[\[Nu], 1] > 2 && m1 =!= 0], m2 :> 0];
+
+Subscript[h, 1005] =
+ Interchange[Subscript[s, 100], 2 \[LeftRightArrow] 3];
+
+Subscript[f, 1005] =
+ MakeFun[Subscript[h, 1005] /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1, "(1005)",
+ IFF[Subscript[\[Nu], 3] > 2 && m3 =!= 0], m1 :> 0];
+
+Subscript[h, 1006] =
+ Interchange[Subscript[s, 100], 2 \[LeftRightArrow] 3, 1 \[LeftRightArrow] 2];
+
+Subscript[f, 1006] =
+ MakeFun[Subscript[h, 1006] /. Subscript[\[Nu], 3] -> Subscript[\[Nu], 3] - 1, "(1006)", IFF[Subscript[\[Nu], 3] > 2 && m3 =!= 0], m2 :> 0];
+
+Subscript[s, 150] =
+ TFI[d, PP, {{n1, m1}, {n2, m2}, {n3, m3}, {-1, m4}, {n5, m5}}] ==
+ TFI[d, PP, {{n1, m1}, {n2 - 1, m2}, {n3, m3}, {0, 0}, {n5, m5}}] -
+ 2*TFI[d, PP, {0, 0, 0, 1, 0}, {{n1, m1}, {n2, m2}, {n3, m3}, {0, 0}, {n5, m5}}] + (PP + m2^2 - m4^2)*
+ TFI[d, PP, {{n1, m1}, {n2, m2}, {n3, m3}, {0, 0}, {n5, m5}}];
+
+Subscript[h, 150] =
+ Subscript[s, 150];
+
+Subscript[f, 150] =
+ MakeFun[Subscript[h, 150], "(150)"];
+
+Subscript[s, 151] =
+ TFI[d, PP, DP, {a, b}, {{n1, m1}, {n2, m2}, {n3, m3}, {-1, m4}, {n5, m5}}] ==
+ TFI[d, PP, DP, {a, b}, {{n1, m1}, {n2 - 1, m2}, {n3, m3}, {0, 0}, {n5, m5}}] -
+ 2*TFI[d, PP, DP, {a, b}, {0, 0, 0, 1, 0}, {{n1, m1}, {n2, m2}, {n3, m3}, {0, 0}, {n5, m5}}] +
+ (PP + m2^2 - m4^2)*TFI[d, PP, DP, {a, b}, {{n1, m1}, {n2, m2}, {n3, m3}, {0, 0}, {n5, m5}}];
+
+Subscript[h, 151] =
+ Subscript[s, 151];
+
+Subscript[f, 151] =
+ ReplacePart[MakeFun[Subscript[h, 151], "(151)"], {a_, b_}, {1, 1, 4}];
+
+Subscript[s, 152] =
+ TVI[d, PP, {{n1, m1}, {n2, m2}, {n3, m3}, {-1, m4}}] ==
+ TVI[d, PP, {{n1, m1}, {n2 - 1, m2}, {n3, m3}, {0, 0}}] -
+ 2*TFI[d, PP, {0, 0, 0, 1, 0}, {{0, 0}, {n2, m2}, {n3, m3}, {0, 0}, {n1, m1}}] +
+ (PP + m2^2 - m4^2)*TVI[d, PP, {{n1, m1}, {n2, m2}, {n3, m3}, {0, 0}}];
+
+Subscript[h, 152] =
+ Subscript[s, 152];
+
+Subscript[f, 152] =
+ MakeFun[Subscript[h, 152], "(152)"];
+
+Subscript[s, 153] =
+ TVI[d, PP, {{n1, m1}, {-1, m2}, {n3, m3}, {n4, m4}}] ==
+ TFI[d, PP, {0, 1, 0, 0, 0}, {{0, 0}, {0, 0}, {n3, m3}, {n4, m4}, {n1, m1}}] +
+ m2^2*TVI[d, PP, {{n1, m1}, {0, 0}, {n3, m3}, {n4, m4}}];
+
+Subscript[h, 153] =
+ Subscript[s, 153];
+
+Subscript[f, 153] =
+ MakeFun[Subscript[h, 153], "(153)"];
+
+Subscript[s, 200] =
+ 16*Subscript[m, 1]^2*
+ Subscript[\[Nu],
+ 1]*(d - Subscript[\[Nu], 1] - Subscript[\[Nu], 2] -
+ Subscript[\[Nu], 3])*
+ TJI[d, {1 + Subscript[\[Nu], 1], Subscript[\[Nu], 2],
+ Subscript[\[Nu], 3]}] ==
+ (-(1 + 3*d - 3*Subscript[\[Nu], 1] - 4*Subscript[\[Nu], 2]))*
+ Subscript[\[Nu], 3]*
+ TJI[d, {-1 + Subscript[\[Nu], 1], Subscript[\[Nu], 2],
+ 1 + Subscript[\[Nu], 3]}] -
+ Subscript[\[Nu],
+ 2]*(1 + 3*d - 3*Subscript[\[Nu], 1] - 4*Subscript[\[Nu], 3])*
+ TJI[d, {-1 + Subscript[\[Nu], 1], 1 + Subscript[\[Nu], 2],
+ Subscript[\[Nu], 3]}] +
+ (-1 + 2*d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 2])*
+ Subscript[\[Nu], 3]*
+ TJI[d, {Subscript[\[Nu], 1], -1 + Subscript[\[Nu], 2],
+ 1 + Subscript[\[Nu], 3]}] -
+ (-6*d^2 + 22*d*Subscript[\[Nu], 1] -
+ 16*Subscript[\[Nu], 1]^2 - Subscript[\[Nu], 2] +
+ 6*d*Subscript[\[Nu], 2] -
+ 13*Subscript[\[Nu], 1]*Subscript[\[Nu], 2] -
+ Subscript[\[Nu], 3] + 6*d*Subscript[\[Nu], 3] -
+ 13*Subscript[\[Nu], 1]*Subscript[\[Nu], 3] -
+ 4*Subscript[\[Nu], 2]*Subscript[\[Nu], 3])*
+ TJI[d, {Subscript[\[Nu], 1], Subscript[\[Nu], 2],
+ Subscript[\[Nu], 3]}] +
+ Subscript[\[Nu],
+ 2]*(-1 + 2*d - Subscript[\[Nu], 1] - 2*Subscript[\[Nu], 3])*
+ TJI[d, {Subscript[\[Nu], 1],
+ 1 + Subscript[\[Nu], 2], -1 + Subscript[\[Nu], 3]}];
+Subscript[h, 200] =
+Subscript[s, 200] /. Subscript[\[Nu], 1] -> Subscript[\[Nu], 1] - 1
+Subscript[f, 200] =
+MakeFun[Subscript[h, 200], "(200)",
+ IFF[Subscript[\[Nu], 1] > 1 && m1 =!= 0 && PP === m1^2], {m2 :> m1, m3 :> m1}];
+
+Subscript[f, 201] =
+ HoldForm[TJR[d_, PP_, {{(n1_)?PQ, 0}, {(n2_)?PQ, 0}, {(n3_)?PQ, m3_}}] :=
+ (
+ TComment["(201)", TJIC[d, {{n1, 0}, {n2, 0}, {n3, m3}}]];
+ -(((d - n1 - n2)*(-2 - d + 2*n1 + 2*n2)*(3*d - 2*n1 - 2*n2 - 2*n3)*(-1 - d + n1 + n2 + n3)*
+ TJI[d, PP, {{-1 + n1, 0}, {n2, 0}, {n3, m3}}])/(2*m3^2*(d - 2*n1)*(-1 + n1)*(2*d - 2*n1 - 2*n2 - n3)*(1 +
+ 2*d - 2*n1 - 2*n2 - n3)))
+ ) /; n1 > 1 && m3 =!= 0 && PP === m3^2];
+
+Subscript[f, 202] =
+ HoldForm[TJR[d_, PP_, {{(n1_)?PQ, 0}, {(n3_)?PQ, m3_}, {(n2_)?PQ, 0}}] :=
+ (
+ TComment["(202)", TJIC[d, {{n1, 0}, {n2, 0}, {n3, m3}}]];
+ -(((d - n1 - n2)*(-2 - d + 2*n1 + 2*n2)*(3*d - 2*n1 - 2*n2 - 2*n3)*(-1 - d + n1 + n2 + n3)*
+ TJI[d, m3^2, {{-1 + n1, 0}, {n2, 0}, {n3, m3}}])/(2*m3^2*(d - 2*n1)*(-1 + n1)*(2*d - 2*n1 - 2*n2 - n3)*(1 +
+ 2*d - 2*n1 - 2*n2 - n3)))) /; n1 > 1 && m3 =!= 0 && PP === m3^2];
+
+Subscript[f, 203] =
+ HoldForm[TJR[d_, 0, {{(n1_)?PQ, 0}, {(n2_)?PQ, m2_}, {(n3_)?PQ, m2_}}] :=
+ (
+ TComment["(203)", TJIC[d, 0, {{n1, 0}, {n2, m2}, {n3, m2}}]];
+ ((d - 2*(-1 + n1 + n2))*(1 + d - n1 - n2 - n3)*(d - 2*(-1 + n1 + n3))*
+ TJR[d, 0, {{-1 + n1, 0}, {n2, m2}, {n3, m2}}])/(2*m2^2*(d - 2*n1)*(1 + d - 2*n1 - n2 - n3)*(2 + d - 2*n1 - n2 - n3)))];
+
+
+Subscript[f, 204] =
+ HoldForm[TJR[d_, 0, {{(n2_)?PQ, m2_}, {(n1_)?PQ, 0}, {(n3_)?PQ, m2_}}] :=
+ (
+ TComment["(204)", TJIC[d, 0, {{n2, m2}, {n1, 0}, {n3, m2}}]];
+ ((d - 2*(-1 + n1 + n2))*(1 + d - n1 - n2 - n3)*(d - 2*(-1 + n1 + n3))*
+ TJR[d, 0, {{-1 + n1, 0}, {n2, m2}, {n3, m2}}])/(2*m2^2*(d - 2*n1)*(1 + d - 2*n1 - n2 - n3)*(2 + d - 2*n1 - n2 - n3)))];
+
+Subscript[f, 205] =
+ HoldForm[TJR[d_,
+ 0, {{(n2_)?PQ, m2_}, {(n3_)?PQ, m2_}, {(n1_)?PQ, 0}}] :=
+ (
+ TComment["(205)", TJIC[d, 0, {{n2, m2}, {n3, m2}, {n1, 0}}]];
+ ((d - 2*(-1 + n1 + n2))*(1 + d - n1 - n2 - n3)*(d - 2*(-1 + n1 + n3))*
+ TJR[d, 0, {{-1 + n1, 0}, {n2, m2}, {n3, m2}}])/(2* m2^2*(d - 2*n1)*(1 + d - 2*n1 - n2 - n3)*(2 + d - 2*n1 - n2 - n3)))];
+
+If[ MatchQ[$RankLimit, {_Integer?NonNegative, _Integer? NonNegative}],
+ $TarasovTdeltaplimit = $RankLimit[[1]];
+ $TarasovTplimit = $RankLimit[[2]],
+
+ $TarasovTdeltaplimit = 2;
+ $TarasovTplimit = 2
+];
+
+tarti =
+ Timing[
+ ia = 0;
+ ib = 0;
+ ir = 0;
+ es = 0;
+ Do[
+ If[ 0 < ia + ib + ir + es,
+ WriteString["stdout", {ia, ib, ir, es}];
+ Set @@ {Subscript[s, 10^4 + 1000*ia + 100*ib + 10*ir + es],
+
+ TFI[d, PP, DP, {ia, ib}, {0, 0, ir, es, 0}, {{n1, m1}, {n2, m2}, {n3, m3}, {n4, m4}, {n5, m5}}] ==
+ ApplyTarasovT[TarasovT[ia, ib, ir, es, PP, DP],
+
+ STLI[d, PP, {{n1, m1}, {n2, m2}, {n3, m3}, {n4, m4}, {n5, m5}}]] /. STLI -> TFI}
+ ],
+ {ia, 0, $TarasovTdeltaplimit}, {ib, 0, $TarasovTdeltaplimit - ia}, {ir, 0, $TarasovTplimit}, {es, 0, $TarasovTplimit - ir}
+ ]
+ ];
+
+matarti =
+ Timing[
+ ia = 0;
+ ib = 0;
+ ir = 0;
+ es = 0;
+ Do[
+ If[0 < ia + ib + ir + es,
+ WriteString["stdout", {ia, ib, ir, es}];
+ Subscript[f, 10^4 + 1000*ia + 100*ib + 10*ir + es] =
+ MakeFun[Subscript[s, 10^4 + 1000*ia + 100*ib + 10*ir + es],
+ StringJoin["(1", ToString[ia], ToString[ib], ToString[ir], ToString[es], ")"]] /. PQ :> PNQ
+ ],
+ {ia, 0, $TarasovTdeltaplimit}, {ib, 0, $TarasovTdeltaplimit - ia}, {ir, 0, $TarasovTplimit}, {es, 0, $TarasovTplimit - ir}
+ ]
+ ]
+
+(*TODO ...*)
+Share[]
+
+TVR[2 + (d_Symbol), pp_, {{1, m1_}, {1, m1_}, {2, 0}, {1, m1_}}] :=
+ ((-6*m1^2 + 2*d*m1^2 + 3*pp)*TAI[d, 0, {{1, m1}}]^2)/(12*(-3 + d)*(-1 + d)*m1^2*pp) +
+ ((4*m1^2 - pp)*TAI[d, 0, {{1, m1}}]*TBI[d, pp, {{1, m1}, {1, m1}}])/(4*(-3 + d)*(-1 + d)* m1^2) -
+ ((6*m1^2 - 2*d*m1^2 - 7*pp + 2*d*pp)*TJI[d, pp, {{1, m1}, {1, m1}, {1, 0}}])/(6*(-2 + d)*(-1 + d)*pp) +
+ ((-4*m1^2 + pp)*(-6*m1^2 + 2*d*m1^2 + 3*pp)*TJI[d, pp, {{2, m1}, {1, m1}, {1, 0}}])/(6*(-3 + d)*(-2 + d)*(-1 + d)*pp) /; m1 =!= 0 && pp =!= 0;
+
+TVR[4 + (d_Symbol), pp_, {{1, m1_}, {1, m1_}, {2, 0}, {1, m1_}}] :=
+ -((-96*d*m1^6 + 352*d^2*m1^6 - 384*d^3*m1^6 + 128*d^4*m1^6 -
+ 192*m1^4*pp + 1008*d*m1^4*pp - 1632*d^2*m1^4*pp +
+ 912*d^3*m1^4*pp - 144*d^4*m1^4*pp + 288*m1^2*pp^2 -
+ 1536*d*m1^2*pp^2 + 2316*d^2*m1^2*pp^2 - 1086*d^3*m1^2*pp^2 + 66*d^4*m1^2*pp^2 + 72*d*pp^3 - 166*d^2*pp^3 + 81*d^3*pp^3 +
+ 4*d^4*pp^3)*TAI[d, 0, {{1, m1}}]^2)/ (36*(-1 + d)^2*d^2*(1 + d)*(-4 + 3*d)*(-2 + 3*d)* pp^2) +
+ ((4*m1^2 - pp)^2*TAI[d, 0, {{1, m1}}]*TBI[d, pp, {{1, m1}, {1, m1}}])/(4*(-1 + d)^2*d*(1 + d)) -
+ ((288*m1^8 - 1152*d*m1^8 + 1504*d^2*m1^8 - 768*d^3*m1^8 + 128*d^4*m1^8 - 816*m1^6*pp + 2480*d*m1^6*pp -
+ 2224*d^2*m1^6*pp + 736*d^3*m1^6*pp - 80*d^4*m1^6*pp + 864*m1^4*pp^2 - 2196*d*m1^4*pp^2 +
+ 1446*d^2*m1^4*pp^2 - 252*d^3*m1^4*pp^2 - 6*d^4*m1^4*pp^2 - 432*m1^2*pp^3 + 1086*d*m1^2*pp^3 -
+ 895*d^2*m1^2*pp^3 + 315*d^3*m1^2*pp^3 - 44*d^4*m1^2*pp^3 + 4*d*pp^4 - 2*d^2*pp^4 - 4*d^3*pp^4 + 2*d^4*pp^4)*
+ TJI[d, pp, {{1, m1}, {1, m1}, {1, 0}}])/(18*(-2 + d)*(-1 + d)^2*d*(1 + d)*(-4 + 3*d)*(-2 + 3*d)*pp^2) +
+ (m1^2*(4*m1^2 - pp)*(-96*m1^6 + 352*d*m1^6 - 384*d^2*m1^6 + 128*d^3*m1^6 + 240*m1^4*pp - 624*d*m1^4*pp +
+ 384*d^2*m1^4*pp - 48*d^3*m1^4*pp - 192*m1^2*pp^2 + 420*d*m1^2*pp^2 - 162*d^2*m1^2*pp^2 -
+ 18*d^3*m1^2*pp^2 + 72*pp^3 - 154*d*pp^3 + 81*d^2*pp^3 - 8*d^3*pp^3)*
+ TJI[d, pp, {{2, m1}, {1, m1}, {1, 0}}])/(18*(-2 + d)*(-1 + d)^2*d*(1 + d)*(-4 + 3*d)*(-2 + 3*d)*pp^2) /; m1 =!= 0 && pp =!= 0;
+
+TVR[4 + (d_Symbol), pp_, {{1, m1_}, {1, m1_}, {3, 0}, {1, m1_}}] :=
+ ((-72*d^2*m1^6 + 144*d^3*m1^6 - 88*d^4*m1^6 + 16*d^5*m1^6 -
+ 240*d*m1^4*pp + 572*d^2*m1^4*pp - 398*d^3*m1^4*pp +
+ 84*d^4*m1^4*pp - 2*d^5*m1^4*pp - 96*m1^2*pp^2 + 480*d*m1^2*pp^2 -
+ 744*d^2*m1^2*pp^2 + 390*d^3*m1^2*pp^2 - 50*d^4*m1^2*pp^2 + 4*d^5*m1^2*pp^2 - 24*d*pp^3 +
+ 54*d^2*pp^3 - 27*d^3*pp^3)*TAI[d, 0, {{1, m1}}]^2)/ (24*(-3 + d)*(-1 + d)^2*d*(1 + d)*(-4 + 3*d)*(-2 + 3*d)*
+ m1^2*pp^2) + ((4*m1^2 - pp)^2*TAI[d, 0, {{1, m1}}]* TBI[d, pp, {{1, m1}, {1, m1}}])/(8*(-3 + d)*(-1 + d)^2*(1 + d)* m1^2) +
+ ((-72*d*m1^6 + 144*d^2*m1^6 - 88*d^3*m1^6 + 16*d^4*m1^6 - 96*m1^4*pp + 260*d*m1^4*pp - 166*d^2*m1^4*pp +
+ 12*d^3*m1^4*pp + 6*d^4*m1^4*pp + 160*m1^2*pp^2 - 300*d*m1^2*pp^2 + 50*d^2*m1^2*pp^2 +
+ 90*d^3*m1^2*pp^2 - 24*d^4*m1^2*pp^2 - 48*pp^3 + 114*d*pp^3 - 67*d^2*pp^3 + 4*d^3*pp^3 + 2*d^4*pp^3)*
+ TJI[d, pp, {{1, m1}, {1, m1}, {1, 0}}])/ (12*(-2 + d)*(-1 + d)^2*(1 + d)*(-4 + 3*d)*(-2 + 3*d)* pp^2) -
+ ((-4*m1^2 + pp)*(72*d*m1^6 - 144*d^2*m1^6 + 88*d^3*m1^6 - 16*d^4*m1^6 + 96*m1^4*pp - 236*d*m1^4*pp +
+ 122*d^2*m1^4*pp + 12*d^3*m1^4*pp - 10*d^4*m1^4*pp - 96*m1^2*pp^2 +
+ 180*d*m1^2*pp^2 - 30*d^2*m1^2*pp^2 - 46*d^3*m1^2*pp^2 + 8*d^4*m1^2*pp^2 + 24*pp^3 - 54*d*pp^3 + 27*d^2*pp^3)*
+ TJI[d, pp, {{2, m1}, {1, m1}, {1, 0}}])/(12*(-3 + d)*(-2 + d)*(-1 + d)^2*(1 + d)*(-4 + 3*d)*(-2 + 3*d)*pp^2) /; m1 =!= 0 && pp =!= 0;
+
+TVR[6 + (d_Symbol), pp_, {{1, m1_}, {1, m1_}, {4, 0}, {1, m1_}}] :=
+ ((2304*d*m1^10 - 4608*d^2*m1^10 - 3520*d^3*m1^10 + 6976*d^4*m1^10 + 1472*d^5*m1^10 - 2624*d^6*m1^10 -
+ 256*d^7*m1^10 + 256*d^8*m1^10 + 4608*m1^8*pp -
+ 9600*d*m1^8*pp - 7680*d^2*m1^8*pp + 9312*d^3*m1^8*pp + 11680*d^4*m1^8*pp -
+ 6560*d^5*m1^8*pp - 2880*d^6*m1^8*pp + 1088*d^7*m1^8*pp +
+ 32*d^8*m1^8*pp + 6912*m1^6*pp^2 - 35712*d*m1^6*pp^2 + 1056*d^2*m1^6*pp^2 +
+ 85296*d^3*m1^6*pp^2 - 37032*d^4*m1^6*pp^2 - 20484*d^5*m1^6*pp^2 + 8700*d^6*m1^6*pp^2 -
+ 12*d^7*m1^6*pp^2 - 84*d^8*m1^6*pp^2 - 20736*m1^4*pp^3 + 58752*d*m1^4*pp^3 + 40560*d^2*m1^4*pp^3 -
+ 150536*d^3*m1^4*pp^3 + 18980*d^4*m1^4*pp^3 + 48946*d^5*m1^4*pp^3 - 6748*d^6*m1^4*pp^3 -
+ 146*d^7*m1^4*pp^3 + 128*d^8*m1^4*pp^3 + 3456*m1^2*pp^4 - 13824*d*m1^2*pp^4 - 4176*d^2*m1^2*pp^4 +
+ 35784*d^3*m1^2*pp^4 - 8332*d^4*m1^2*pp^4 - 10162*d^5*m1^2*pp^4 + 1122*d^6*m1^2*pp^4 -
+ 80*d^7*m1^2*pp^4 - 8*d^8*m1^2*pp^4 + 864*d*pp^5 - 216*d^2*pp^5 - 2268*d^3*pp^5 + 486*d^4*pp^5 + 729*d^5*pp^5)*
+ TAI[d, 0, {{1, m1}}]^2)/(432*(-3 + d)*(-1 + d)^2* d^2*(1 + d)*(2 + d)*(3 + d)*(-4 + 3*d)*(-2 + 3*d)*(2 + 3*d)* m1^2*pp^3) +
+ ((4*m1^2 - pp)^3*TAI[d, 0, {{1, m1}}]*TBI[d, pp, {{1, m1}, {1, m1}}])/(16*(-3 + d)*(-1 + d)^2*d*(1 + d)*(3 + d)*m1^2) -
+ ((-1152*m1^10 + 2880*d*m1^10 + 320*d^2*m1^10 - 3648*d^3*m1^10 + 1088*d^4*m1^10 + 768*d^5*m1^10 -
+ 256*d^6*m1^10 - 192*m1^8*pp + 1312*d*m1^8*pp + 2080*d^2*m1^8*pp - 6880*d^3*m1^8*pp + 4032*d^4*m1^8*pp - 192*d^5*m1^8*pp -
+ 160*d^6*m1^8*pp + 6336*m1^6*pp^2 - 6960*d*m1^6*pp^2 - 16960*d^2*m1^6*pp^2 + 17292*d^3*m1^6*pp^2 -
+ 1828*d^4*m1^6*pp^2 - 828*d^5*m1^6*pp^2 + 68*d^6*m1^6*pp^2 - 9504*m1^4*pp^3 +
+ 3624*d*m1^4*pp^3 + 26104*d^2*m1^4*pp^3 - 10938*d^3*m1^4*pp^3 - 4976*d^4*m1^4*pp^3 +
+ 330*d^5*m1^4*pp^3 + 400*d^6*m1^4*pp^3 + 6336*m1^2*pp^4 - 3640*d*m1^2*pp^4 - 14584*d^2*m1^2*pp^4 +
+ 9190*d^3*m1^2*pp^4 + 1374*d^4*m1^2*pp^4 - 600*d^5*m1^2*pp^4 - 56*d^6*m1^2*pp^4 - 864*pp^5 +
+ 732*d*pp^5 + 1864*d^2*pp^5 - 1695*d^3*pp^5 + 148*d^4*pp^5 + 36*d^5*pp^5 + 4*d^6*pp^5)*
+ TJI[d, pp, {{1, m1}, {1, m1}, {1, 0}}])/(216*(-2 + d)*(-1 + d)^2*
+ d*(1 + d)*(3 + d)*(-4 + 3*d)*(-2 + 3*d)*(2 + 3*d)*pp^3) +
+ ((-4*m1^2 + pp)*(1152*m1^10 - 2880*d*m1^10 - 320*d^2*m1^10 +
+ 3648*d^3*m1^10 - 1088*d^4*m1^10 - 768*d^5*m1^10 +
+ 256*d^6*m1^10 + 576*m1^8*pp - 2208*d*m1^8*pp - 2304*d^2*m1^8*pp +
+ 8000*d^3*m1^8*pp - 4256*d^4*m1^8*pp - 32*d^5*m1^8*pp + 224*d^6*m1^8*pp - 6336*m1^6*pp^2 +
+ 6288*d*m1^6*pp^2 + 16320*d^2*m1^6*pp^2 - 14868*d^3*m1^6*pp^2 + 684*d^4*m1^6*pp^2 +
+ 804*d^5*m1^6*pp^2 - 12*d^6*m1^6*pp^2 + 6912*m1^4*pp^3 - 3192*d*m1^4*pp^3 - 18160*d^2*m1^4*pp^3 +
+ 7950*d^3*m1^4*pp^3 + 3128*d^4*m1^4*pp^3 - 78*d^5*m1^4*pp^3 - 160*d^6*m1^4*pp^3 -
+ 3456*m1^2*pp^4 + 1800*d*m1^2*pp^4 + 8136*d^2*m1^2*pp^4 - 4322*d^3*m1^2*pp^4 -
+ 1042*d^4*m1^2*pp^4 + 128*d^5*m1^2*pp^4 + 16*d^6*m1^2*pp^4 + 432*pp^5 - 324*d*pp^5 - 972*d^2*pp^5 + 729*d^3*pp^5)*
+ TJI[d, pp, {{2, m1}, {1, m1}, {1, 0}}])/(216*(-3 + d)*(-2 + d)*(-1 + d)^2*
+ d*(1 + d)*(3 + d)*(-4 + 3*d)*(-2 + 3*d)*(2 + 3*d)*pp^3) /; m1 =!= 0 && pp =!= 0;
+
+TVR[6 + (d_Symbol), pp_, {{2, m1_}, {1, m1_}, {3, 0}, {1, m1_}}] :=
+ -((-1536*d*m1^10 + 2560*d^2*m1^10 + 3200*d^3*m1^10 -
+ 3584*d^4*m1^10 - 2176*d^5*m1^10 + 1024*d^6*m1^10 +
+ 512*d^7*m1^10 - 3072*m1^8*pp + 6528*d*m1^8*pp + 5376*d^2*m1^8*pp - 7520*d^3*m1^8*pp -
+ 5568*d^4*m1^8*pp + 3232*d^5*m1^8*pp + 1344*d^6*m1^8*pp - 320*d^7*m1^8*pp - 2304*m1^6*pp^2 +
+ 13824*d*m1^6*pp^2 + 192*d^2*m1^6*pp^2 - 31584*d^3*m1^6*pp^2 + 11232*d^4*m1^6*pp^2 +
+ 8088*d^5*m1^6*pp^2 - 2304*d^6*m1^6*pp^2 - 24*d^7*m1^6*pp^2 + 6912*m1^4*pp^3 - 19584*d*m1^4*pp^3 -
+ 12688*d^2*m1^4*pp^3 + 50584*d^3*m1^4*pp^3 - 7516*d^4*m1^4*pp^3 - 16982*d^5*m1^4*pp^3 +
+ 2564*d^6*m1^4*pp^3 + 310*d^7*m1^4*pp^3 - 1152*m1^2*pp^4 + 4608*d*m1^2*pp^4 + 1392*d^2*m1^2*pp^4 -
+ 11896*d^3*m1^2*pp^4 + 2820*d^4*m1^2*pp^4 + 3374*d^5*m1^2*pp^4 - 414*d^6*m1^2*pp^4 +
+ 8*d^7*m1^2*pp^4 - 288*d*pp^5 + 72*d^2*pp^5 + 756*d^3*pp^5 - 162*d^4*pp^5 - 243*d^5*pp^5)*
+ TAI[d, 0, {{1, m1}}]^2)/(144*(-1 + d)^2*d^2*(1 + d)*(2 + d)*(3 + d)*(-4 + 3*d)*(-2 + 3*d)*(2 + 3*d)*
+ m1^2*pp^3) + ((4*m1^2 - pp)^3*TAI[d, 0, {{1, m1}}]*TBI[d, pp, {{1, m1}, {1, m1}}])/(16*(-1 + d)^2*
+ d*(1 + d)*(3 + d)*m1^2) - ((2304*m1^10 - 5760*d*m1^10 - 640*d^2*m1^10 + 7296*d^3*m1^10 - 2176*d^4*m1^10 - 1536*d^5*m1^10 +
+ 512*d^6*m1^10 - 1344*m1^8*pp + 1120*d*m1^8*pp - 1376*d^2*m1^8*pp + 5280*d^3*m1^8*pp - 4896*d^4*m1^8*pp + 1280*d^5*m1^8*pp -
+ 64*d^6*m1^8*pp - 5184*m1^6*pp^2 + 7584*d*m1^6*pp^2 + 14800*d^2*m1^6*pp^2 - 21496*d^3*m1^6*pp^2 +
+ 6120*d^4*m1^6*pp^2 + 280*d^5*m1^6*pp^2 - 184*d^6*m1^6*pp^2 + 9504*m1^4*pp^3 -
+ 3720*d*m1^4*pp^3 - 27296*d^2*m1^4*pp^3 + 15378*d^3*m1^4*pp^3 + 4114*d^4*m1^4*pp^3 -
+ 666*d^5*m1^4*pp^3 - 674*d^6*m1^4*pp^3 - 6336*m1^2*pp^4 + 5720*d*m1^2*pp^4 + 13712*d^2*m1^2*pp^4 -
+ 13926*d^3*m1^2*pp^4 + 1284*d^4*m1^2*pp^4 + 946*d^5*m1^2*pp^4 - 80*d^6*m1^2*pp^4 + 864*pp^5 -
+ 1020*d*pp^5 - 1636*d^2*pp^5 + 2311*d^3*pp^5 - 693*d^4*pp^5 + 20*d^5*pp^5 + 4*d^6*pp^5)*
+ TJI[d, pp, {{1, m1}, {1, m1}, {1, 0}}])/(72*(-2 + d)*(-1 + d)^2*d*(1 + d)*(3 + d)*(-4 + 3*d)*(-2 + 3*d)*(2 + 3*d)*pp^3) +
+ ((4*m1^2 - pp)*(-768*m1^10 + 1664*d*m1^10 + 768*d^2*m1^10 - 2176*d^3*m1^10 + 512*d^5*m1^10 + 192*m1^8*pp +
+ 288*d*m1^8*pp + 704*d^2*m1^8*pp - 2272*d^3*m1^8*pp + 1024*d^4*m1^8*pp +
+ 64*d^5*m1^8*pp + 1920*m1^6*pp^2 - 1824*d*m1^6*pp^2 - 5472*d^2*m1^6*pp^2 + 4584*d^3*m1^6*pp^2 -
+ 168*d^5*m1^6*pp^2 - 2304*m1^4*pp^3 + 616*d*m1^4*pp^3 + 6192*d^2*m1^4*pp^3 -
+ 1946*d^3*m1^4*pp^3 - 1128*d^4*m1^4*pp^3 - 230*d^5*m1^4*pp^3 + 1152*m1^2*pp^4 - 600*d*m1^2*pp^4 -
+ 2744*d^2*m1^2*pp^4 + 1414*d^3*m1^2*pp^4 + 374*d^4*m1^2*pp^4 - 16*d^5*m1^2*pp^4 - 144*pp^5 +
+ 108*d*pp^5 + 324*d^2*pp^5 - 243*d^3*pp^5)*TJI[d, pp, {{2, m1}, {1, m1}, {1, 0}}])/(72*(-2 + d)*(-1 + d)^2*
+ d*(1 + d)*(3 + d)*(-4 + 3*d)*(-2 + 3*d)*(2 + 3*d)*pp^3) /; m1 =!= 0 && pp =!= 0;
+
+TFR[d_, PP_ /; Head[PP] =!= List, {{0, _}, {n2_, m2_}, {n3_, m3_}, {n4_, m4_}, {n5_, m5_}}] :=
+ TVI[d, PP, {{n5, m5}, {n2, m2}, {n3, m3}, {n4, m4}}];
+
+TFR[d_, PP_ /; Head[PP] =!= List, {{n2_, m2_}, {0, _}, {n4_, m4_}, {n3_, m3_}, {n5_, m5_}}] :=
+ TVI[d, PP, {{n5, m5}, {n2, m2}, {n3, m3}, {n4, m4}}];
+
+TFR[d_, PP_ /; Head[PP] =!= List, {{n3_, m3_}, {n4_, m4_}, {0, _}, {n2_, m2_}, {n5_, m5_}}] :=
+ TVI[d, PP, {{n5, m5}, {n2, m2}, {n3, m3}, {n4, m4}}];
+
+TFR[d_, PP_ /; Head[PP] =!= List, {{n4_, m4_}, {n3_, m3_}, {n2_, m2_}, {0, _}, {n5_, m5_}}] :=
+ TVI[d, PP, {{n5, m5}, {n2, m2}, {n3, m3}, {n4, m4}}];
+
+TFR[d_, PP_ /; Head[PP] =!= List, {{n1_, m1_}, {n2_, m2_}, {n3_, m3_}, {n4_, m4_}, {0, _}}] :=
+ TBI[d, PP, {{n1, m1}, {n3, m3}}]*TBI[d, PP, {{n2, m2}, {n4, m4}}];
+
+TVI[d_, PP_, {{0, _}, {n2_, m2_}, {n3_, m3_}, {n4_, m4_}}] :=
+ TAI[d, 0, {{n3, m3}}]*TBI[d, PP, {{n2, m2}, {n4, m4}}];
+
+TVI[d_, PP_, {{n1_, m1_}, {n2_, m2_}, {0, _}, {n4_, m4_}}] :=
+ TAI[d, 0, {{n1, m1}}]*TBI[d, PP, {{n2, m2}, {n4, m4}}];
+
+TVI[d_, _, {{n1_, m1_}, {0, _}, {n3_, m3_}, {n4_, m4_}}] :=
+ TJI[d, 0, {{n1, m1}, {n3, m3}, {n4, m4}}];
+
+TVI[d_, PP_, {{n1_, m1_}, {n2_, m2_}, {n3_, m3_}, {0, _}}] :=
+ TJI[d, PP, {{n2, m2}, {n1, m1}, {n3, m3}}];
+
+TJI[d_, _, {{0, _}, {n2_, m2_}, {n3_, m3_}}] :=
+ TAI[d, 0, {{n2, m2}}]*TAI[d, 0, {{n3, m3}}];
+
+TJI[d_, _, {{n1_, m1_}, {0, _}, {n3_, m3_}}] :=
+ TAI[d, 0, {{n1, m1}}]*TAI[d, 0, {{n3, m3}}];
+
+TJI[d_, _, {{n1_, m1_}, {n2_, m2_}, {0, _}}] :=
+ TAI[d, 0, {{n1, m1}}]*TAI[d, 0, {{n2, m2}}];
+
+TBI[d_, _, {{0, _}, {n2_, m2_}}] :=
+ TAI[d, 0, {{n2, m2}}];
+
+TBI[d_, _, {{n1_, m1_}, {0, _}}] :=
+ TAI[d, 0, {{n1, m1}}];
+
+TAI[d_, {{n_Integer, m_}}] :=
+ TAI[d, 0, {{n, m}}];
+
+TAI[d_, {n_Integer, m_}] :=
+ TAI[d, 0, {{n, m}}];
+
+TAI[d_, 0, {n_Integer, m_}] :=
+ TAI[d, 0, {{n, m}}];
+
+$TLRComment = False;
+TLRComment[s_String] :=
+ WriteString["stdout", s, " "] /; $TLRComment === True;
+
+applytlrules[y_, fun_] :=
+ fun[y /. TFI -> TLR /. TLRules /. TLR -> TFI];
+
+TFIRecurse[z_, f_: Identity] :=
+ (FixedPoint[(applytlrules[#1, f] ) & , z, 1000] /. TAI[dim_, pp_, list_List]/;pp=!=0:>TAI[dim,0,list]);
+
+applytlrules2[y_, fun_] :=
+ fun[y /. TFI -> TLR /. TLRules2 /. TLR -> TFI];
+
+TFISimplify[z_, f_: Identity] :=
+ (FixedPoint[applytlrules2[#1, f] & , z, 1000]/. TAI[dim_, pp_, list_List]/;pp=!=0:>TAI[dim,0,list]);
+
+ExpandMaybe =
+ Identity;
+
+fN[li_List] := fN[li] = li /. {0, _} :> {0, 0};
+TLR[depp__, {a___, b_Integer, c___}] := TLR[depp, {a, {b, 0}, c}];
+
+tlrule[1] =
+ TLR[d_, pp_, {0, 0, 0, 0, 0}, pr_] :> (NoTLRComment["tlrule1"]; TFI[d, pp, pr /. {0, _} :> {0, 0}] );
+
+tlrule[2] =
+ TLR[dpp__, {(v_)?PQ, w_, x_, y_, z_}, {{(n1_)?PQ, m1_}, nm2_, nm3_, nm4_, nm5_}] :>
+ (
+ TLRComment["tlrule2"];
+ ExpandMaybe[
+ If[ v <= n1,
+ If[ m1 === 0,
+ TLR[dpp, {0, w, x, y, z}, {{n1 - v, 0}, nm2, nm3, nm4, nm5}],
+ Sum[Binomial[v, i] TLR[dpp, {0, w, x, y, z}, {fN[{n1 - i, m1}], nm2, nm3, nm4, nm5}]*(m1^2)^(v - i), {i, 0, v}]
+ ],
+ If[ m1 === 0,
+ TLR[dpp, {v - n1, w, x, y, z}, {{0, 0}, nm2, nm3, nm4, nm5}],
+ Sum[Binomial[n1, i] TLR[dpp, {v - n1, w, x, y, z}, {fN[{n1 - i, m1}], nm2, nm3, nm4, nm5}]*(m1^2)^(n1 - i), {i, 0, n1}]
+ ]
+ ]
+ ]
+ );
+
+tlrule[3] =
+ TLR[dpp__, {v_, (w_)?PQ, x_, y_, z_}, {nm1_, {(n2_)?PQ, m2_}, nm3_, nm4_, nm5_}] :>
+ (
+ TLRComment["tlrule3"];
+ ExpandMaybe[
+ If[ w <= n2,
+ If[ m2 === 0,
+ TLR[dpp, {v, 0, x, y, z}, {nm1, {n2 - w, 0}, nm3, nm4, nm5}],
+ Sum[Binomial[w, i] TLR[dpp, {v, 0, x, y, z}, {nm1, fN[{n2 - i, m2}], nm3, nm4, nm5}]*(m2^2)^(w - i), {i, 0, w}]
+ ],
+ If[ m2 === 0,
+ TLR[dpp, {v, w - n2, x, y, z}, {nm1, {0, 0}, nm3, nm4, nm5}],
+ Sum[Binomial[n2, i] TLR[dpp, {v, w - n2, x, y, z}, {nm1, fN[{n2 - i, m2}], nm3, nm4, nm5}]*(m2^2)^(n2 - i), {i, 0, n2}]]]]
+ );
+
+tlrule[4] =
+ TLR[dpp__, {v_, w_, (x_)?PQ, y_, z_}, {{(n1_)?PQ, m1_}, nm2_, {(n3_)?PQ, m3_}, nm4_, nm5_}] :>
+ (
+ TLRComment["tlrule4"];
+ ExpandMaybe[
+ (1/2)*TLR[dpp, {v + 1, w, x - 1, y, z}, {{n1, m1}, nm2, {n3, m3}, nm4, nm5}] -
+ (1/2)*TLR[dpp, {v, w, x - 1, y, z}, {{n1, m1}, nm2, fN[{n3 - 1, m3}], nm4, nm5}] +
+ (1/2)*({dpp}[[2]] - m3^2)*TLR[dpp, {v, w, x - 1, y, z}, {{n1, m1}, nm2, {n3, m3}, nm4, nm5}]]
+ );
+
+tlrule[5] =
+ TLR[dpp__, {v_, w_, x_, (y_)?PQ, z_}, {{n1_, m1_}, {(n2_)?PQ, m2_}, nm3_, {(n4_)?PQ, m4_}, nm5_}] :>
+ (
+ TLRComment["tlrule5"];
+ ExpandMaybe[
+ (1/2)*TLR[dpp, {v, w + 1, x, y - 1, z}, {{n1, m1}, {n2, m2}, nm3, {n4, m4}, nm5}] -
+ (1/2)*TLR[dpp, {v, w, x, y - 1, z}, {{n1, m1}, {n2, m2}, nm3, fN[{n4 - 1, m4}], nm5}] +
+ (1/2)*({dpp}[[2]] - m4^2) TLR[dpp, {v, w, x, y - 1, z}, {{n1, m1}, {n2, m2}, nm3, {n4, m4}, nm5}]]
+ );
+
+tlrule[6] =
+ TLR[dpp__, {v_, w_, x_, y_, (z_)?PQ}, {{n1_, m1_}, {n2_, m2_}, nm3_, nm4_, {(n5_)?PQ, m5_}}] :>
+ (
+ TLRComment["tlrule6"];
+ ExpandMaybe[
+ (1/2)*TLR[dpp, {v + 1, w, x, y, z - 1}, {{n1, m1}, {n2, m2}, nm3, nm4, {n5, m5}}] -
+ (1/2)*TLR[dpp, {v, w, x, y, z - 1}, {{n1, m1}, {n2, m2}, nm3, nm4, fN[{n5 - 1, m5}]}] +
+ (1/2)*TLR[dpp, {v, w + 1, x, y, z - 1}, {{n1, m1}, {n2, m2}, nm3, nm4, {n5, m5}}] -
+ (1/2)*m5^2*TLR[dpp, {v, w, x, y, z - 1}, {{n1, m1}, {n2, m2}, nm3, nm4, {n5, m5}}]]
+ );
+
+tlrule[7] =
+ TLR[d_, pp_, dp___, {(v_)?PQ, w_, x_, y_, z_}, {{0, _}, nm2_, {(n3_)?PQ, m3_}, nm4_, nm5_}] :>
+ (
+ TLRComment["tlrule7"];
+ ExpandMaybe[
+ TLR[d, pp, dp, {v - 1, w, x, y, z}, {{0, 0}, nm2, fN[{n3 - 1, m3}], nm4, nm5}] +
+ 2*TLR[d, pp, dp, {v - 1, w, x + 1, y, z}, {{0, 0}, nm2, {n3, m3}, nm4, nm5}] -
+ (pp - m3^2)*TLR[d, pp, dp, {v - 1, w, x, y, z}, {{0, 0}, nm2, {n3, m3}, nm4, nm5}]
+ ]
+ );
+
+tlrule[8] =
+ TLR[d_, pp_, dp___, {v_, (w_)?PQ, x_, y_, z_}, {nm1_, {0, _}, nm3_, {(n4_)?PQ, m4_}, nm5_}] :>
+ (
+ TLRComment["tlrule8"];
+ ExpandMaybe[
+ TLR[d, pp, dp, {v, w - 1, x, y, z}, {nm1, {0, 0}, nm3, fN[{n4 - 1, m4}], nm5}] +
+ 2*TLR[d, pp, dp, {v, w - 1, x, y + 1, z}, {nm1, {0, 0}, nm3, {n4, m4}, nm5}] - (pp - m4^2)*
+ TLR[d, pp, dp, {v, w - 1, x, y, z}, {nm1, {0, 0}, nm3, {n4, m4}, nm5}]
+ ]
+ );
+
+tlrule[9] =
+ TLR[d_, pp_, {v_, w_, x_, y_, (z_)?PQ}, {nm1_, nm2_, nm3_, nm4_, {0, _}}] :>
+ (
+ TLRComment["tlrule9"];
+ FunctionExpand[
+ ExpandMaybe[
+ Sum[(Gamma[k + 1/2]*Gamma[d/2 - 1/2]*Binomial[z, 2*k]*Binomial[k, i]*Binomial[k, j]*(-1)^(i + j)*pp^(i + j - z)*
+ TLR[d, pp, {v + i, w + j, x + z - 2*i, y + z - 2*j, 0}, {nm1, nm2, nm3, nm4, {0, 0}}])/(Gamma[1/2]*
+ Gamma[k + d/2 - 1/2]), {k, 0, Floor[z/2]}, {i, 0, k}, {j, 0, k}]
+ ]
+ ]
+ );
+
+tlrule[10] =
+ TLR[_, _, {_, _, (x_)?PNQ, (y_)?PNQ, _}, {{(_)?PQ, _}, {(_)?PQ, _}, {0, _}, {0, _}, _}] :> (TLRComment["tlrule10"]; 0 /; OddQ[x + y]);
+
+tlrule[11] =
+ TLR[d_, pp_, {v_, w_, (x_)?PQ, (y_)?PQ, z_}, {nm1_, nm2_, {0, _}, {0, _}, {(n5_)?PQ, m5_}}] :>
+ (
+ TLRComment["tlrule11"];
+ ExpandMaybe[(pp/(d + x + y - 2))*((x - 1)*TLR[d, pp, {v + 1, w, x - 2, y, z}, {nm1, nm2, {0, 0}, {0, 0}, {n5, m5}}] +
+ y*TLR[d, pp, {v, w, x - 1, y - 1, z + 1}, {nm1, nm2, {0, 0}, {0, 0}, {n5, m5}}])] /; EvenQ[x + y] && x > 1);
+
+tlrule[12] =
+ TLR[d_, pp_, {v_, w_, (x_)?PQ, (y_)?PQ, z_}, {nm1_, nm2_, {0, _}, {0, _}, {(n5_)?PQ, m5_}}] :>
+ (
+ TLRComment["tlrule12"];
+ ExpandMaybe[
+ (pp/(d + x + y - 2))*((y - 1)*TLR[d, pp, {v, w + 1, x, y - 2, z}, {nm1, nm2, {0, 0}, {0, 0}, {n5, m5}}] +
+ x*TLR[d, pp, {v, w, x - 1, y - 1, z + 1}, {nm1, nm2, {0, 0}, {0, 0}, {n5, m5}}])] /; EvenQ[x + y] && y > 1
+ );
+
+tlrule[13] =
+ TLR[d_, pp_, {0, 0, 0, (y_)?PQ, 0}, {nm1_, {0, 0}, nm3_, {(n4_)?PQ, m4_}, nm5_}] :>
+ (
+ TLRComment["tlrule13"];
+ Sum[Binomial[y, i]*pp^(y - i)*(-1)^i*TLR[d, pp, {0, 0, 0, i, 0}, {nm3, {n4, m4}, nm1, {0, 0}, nm5}], {i, 0, y}]
+ );
+
+tlrule[14] =
+ TLR[d_, pp_, {0, 0, (x_)?PQ, 0, 0}, {{0, 0}, nm2_, {(n3_)?PQ, m3_}, nm4_, nm5_}] :>
+ (
+ TLRComment["tlrule14"];
+ Sum[Binomial[x, i]*pp^(x - i)*(-1)^i* TLR[d, pp, {0, 0, i, 0, 0}, {{n3, m3}, nm4, {0, 0}, nm2, nm5}], {i, 0, x}]);
+
+tlrule[15] =
+ HoldPattern[TLR[_, _, {_, _, _, _, _}, {{_, 0}, {_, 0}, {0, _}, {0, _}, {0, _}}]] :> (TLRComment["tlrule15"]; 0);
+
+tlrule[16] =
+ TLR[_, _, {0, 0, (x_)?PQ, (y_)?PQ, 0}, {{_, _}, {_, _}, {0, _}, {0, _}, {0, _}}] :> (TLRComment["tlrule16"]; 0 /; OddQ[x] || OddQ[y]);
+
+tlrule[17] =
+ TLR[d_, pp_, {(a_)?PQ, b_, 0, de_, 0}, {{0, _}, {n2_, m2_}, {0, _}, {n4_, m4_}, {n5_, m5_}}] :>
+ (
+ TLRComment["tlrule17"];
+ Sum[Binomial[a, i]*Binomial[i, j]*(1 + (-1)^j)*2^(j - 1)*
+ TLR[d, pp, {a - i, b + i - j, 0, de,j}, {{n5, m5}, {n2, m2}, {0, 0}, {n4, m4}, {0, 0}}], {i, 0, a}, {j, 0, i}]
+ );
+
+tlrule[18] =
+ TLR[d_, pp_, dp_, {(a_)?PNQ, (b_)?PNQ}, {1, 0, 0, 0, 0}, {{0, 0}, {n2_, m2_}, {n3_, m3_}, {n4_, m4_}, {n5_, m5_}}] :>
+ (
+ TLRComment["tlrule18"];
+ Sum[Binomial[a, i]*Binomial[b,j]*((pp + m3^2)*TLR[d, pp, dp, {i, j}, {{n3, m3}, {n4, m4}, {0, 0}, {n2, m2}, {n5, m5}}] +
+ TLR[d, pp, dp, {i, j}, {{n3 - 1, m3}, {n4, m4}, {0, 0}, {n2, m2}, {n5, m5}}] -
+ 2*TLR[d, pp, dp, {i, j}, {0, 0, 1, 0, 0}, {{n3, m3}, {n4, m4}, {0, 0}, {n2, m2}, {n5, m5}}])*(-1)^(i + j)*dp^(a + b - i - j), {i, 0, a}, {j, 0, b}]
+ );
+
+tlrule[19] =
+ TLR[d_, pp_, dp_, {(a_)?PNQ, (b_)?PNQ}, {0, 1, 0, 0, 0}, {{n1_, m1_}, {0, 0}, {n3_, m3_}, {n4_, m4_}, {n5_, m5_}}] :>
+ (
+ TLRComment["tlrule18"];
+ Sum[Binomial[a, i]*Binomial[b, j]*((pp + m4^2)* TLR[d, pp, dp, {i, j}, {{n3, m3}, {n4, m4}, {n1, m1}, {0, 0}, {n5, m5}}] +
+ TLR[d, pp, dp, {i, j}, {{n3, m3}, {n4 - 1, m4}, {n1, m1}, {0, 0}, {n5, m5}}] -
+ 2*TLR[d, pp, dp, {i, j}, {0, 0, 0, 1, 0}, {{n3, m3}, {n4, m4}, {n1, m1}, {0, 0}, {n5, m5}}])*(-1)^(i + j)*dp^(a + b - i - j), {i, 0, a}, {j, 0, b}]
+ );
+
+tlrule[20] =
+ TLR[d_, pp_, {(v_)?PQ, w_, x_, y_, 0}, {{0, _}, nm2_, {0, _}, nm4_, {(n5_)?PQ, m5_}}] :>
+ (
+ TLRComment["tlrule20"];
+ Sum[Binomial[i, r]*Binomial[v, i]*Binomial[x, j]*2^r*TLR[d, pp, {v - i, -r + i + w, j, x - j + y, r}, {{n5, m5}, nm2, 0, nm4, 0}], {j, 0, x}, {i, 0, v}, {r, 0, i}]
+ );
+
+tlrule[21] =
+ TLR[d_, pp_, {v_, (w_)?PQ, x_, y_, 0}, {nm1_, {0, _}, nm3_, {0, _}, nm5_}] :>
+ (
+ TLRComment["tlrule21"];
+ TLR[d, pp, {w, v, y, x, 0}, {{0, 0}, nm1, {0, 0}, nm3, nm5}]
+ );
+
+tlrule[22] =
+ TLR[d_, pp_, dp_, {0, (b_)?PNQ}, {0, (w_)?PNQ, 0, (y_)?PNQ, 1}, {nm1_, nm2_, nm3_, nm4_, {0, 0}}] :>
+ (
+ TLRComment["tlrule22"]; (1/pp)*
+ TLR[d, pp, dp, {0, b}, {0, w, 1, y + 1, 0}, {nm1, nm2, nm3, nm4, {0, 0}}]
+ );
+
+tlrule[23] =
+ TLR[d_, pp_, dp_, {1, (b_)?PNQ}, {0, (w_)?PNQ, 0, (y_)?PNQ, 1}, {nm1_, nm2_, nm3_, nm4_, {0, 0}}] :>
+ (
+ TLRComment["tlrule23"];
+ (1/((1 - d)*pp))*TLR[d, pp, dp, {0, b + 1}, {0, w, 2, y, 0}, {nm1, nm2, nm3, nm4, {0, 0}}] -
+ ((d*dp)/((1 - d)*pp^2))*TLR[d, pp, dp, {0, b}, {0, w, 2, y + 1, 0}, {nm1, nm2, nm3, nm4, {0, 0}}] - (1/(1 - d))*
+ TLR[d, pp, dp, {0, b + 1}, {1, w, 0, y, 0}, {nm1, nm2, nm3, nm4, {0, 0}}] + (dp/((1 - d)*pp))*
+ TLR[d, pp, dp, {0, b}, {1, w, 0, y + 1, 0}, {nm1, nm2, nm3, nm4, {0, 0}}]
+ );
+
+tlrule[24] =
+ TLR[d_, pp_, dp_, {2, (b_)?PNQ}, {0, (w_)?PNQ, 0, (y_)?PNQ, 1}, {nm1_, nm2_, nm3_, nm4_, {0, 0}}] :>
+ (
+ TLRComment["tlrule24"];
+ 2*dp*(1/((1 - d)*pp^2))* TLR[d, pp, dp, {0, b + 1}, {0, w, 3, y, 0}, {nm1, nm2, nm3, nm4, {0, 0}}] -
+ (((d + 2)*dp^2)/((1 - d)*pp^3))*TLR[d, pp, dp, {0, b}, {0, w, 3, y + 1, 0}, {nm1, nm2, nm3, nm4, {0, 0}}] -
+ ((2*dp)/((1 - d)*pp))*TLR[d, pp, dp, {0, b + 1}, {1, w, 1, y, 0}, {nm1, nm2, nm3, nm4, {0, 0}}] + ((3*dp^2)/((1 - d)*pp^2))*
+ TLR[d, pp, dp, {0, b}, {1, w, 1, y + 1, 0}, {nm1, nm2, nm3, nm4, {0, 0}}]
+ );
+
+tlrule[25] =
+ TLR[dim_, pp_, {a_, b_, (c_)?PNQ, (d_)?PQ, 0}, {nm1_, nm2_, nm3_, {0, _}, nm5_}] :>
+ (
+ TLRComment["tlrule25"];
+ TLR[dim, pp, {b, a, d, c, 0}, {nm2, nm1, {0, 0}, nm3, nm5}]
+ ) /; d > c;
+
+TLRules = Array[tlrule, 25];
+
+TLRules2 = Drop[TLRules, {9, 9}];
+
+TLR[__, {{_, _}, {0, _}, {_, _}, {0, _}, {_, 0}}] :=
+ 0;
+TLR[__, {{0, _}, {_, _}, {0, _}, {_, _}, {_, 0}}] :=
+ 0;
+TLR[__, {{0, _}, {_, _}, {_, 0}, {_, _}, {0, _}}] :=
+ 0;
+TLR[__, {{_, 0}, {_, _}, {0, _}, {_, _}, {0, _}}] :=
+ 0;
+TLR[__, {{_, _}, {_, 0}, {_, _}, {0, _}, {0, _}}] :=
+ 0;
+TLR[__, {{_, _}, {0, _}, {_, _}, {_, 0}, {0, _}}] :=
+ 0;
+
+SetAttributes[seeetDelayed, HoldAll];
+
+seeetDelayed[TLR[a__], b_] :=
+ SetDelayed @@ {TLR[a], b};
+
+lis1 =
+ Permutations[{{0, _}, {0, _}, {0, _}, {_, _}, {_, 0}}];
+
+lis2 =
+ Table[TLR[__, lis1[[i]]] :> 0, {i, Length[lis1]}] /. RuleDelayed -> seeetDelayed;
+
+Clear[lis1, lis2];
+
+TJIS[d_, (M_)^2, {{\[Alpha]_, 0}, {\[Beta]_, 0}, {\[Gamma]_, 0}}] :=
+ SMu^2*(((-1)^(\[Alpha] + \[Beta] + \[Gamma] + 1)/(-M^2)^(\[Alpha] + \[Beta] + \[Gamma] - 4))*
+ Exp[(-I)*Pi*(d - 4)]*(Gamma[\[Alpha] + \[Beta] + \[Gamma] - d]/Gamma[(3/2)*d - \[Alpha] - \[Beta] - \[Gamma]])*
+ (Gamma[d/2 - \[Alpha]]/Gamma[\[Alpha]])*(Gamma[d/2 - \[Beta]]/ Gamma[\[Beta]])*(Gamma[d/2 - \[Gamma]]/Gamma[\[Gamma]]));
+
+TJIS[d_, (M_)^2, {{\[Beta]_, 0}, {\[Gamma]_, 0}, {\[Alpha]_, M_}}] :=
+ TJIS[d, M^2, {{\[Alpha], M}, {\[Beta], 0}, {\[Gamma], 0}}];
+
+TJIS[d_, (M_)^2, {{\[Beta]_, 0}, {\[Alpha]_, M_}, {\[Gamma]_, 0}}] :=
+ TJIS[d, M^2, {{\[Alpha], M}, {\[Beta], 0}, {\[Gamma], 0}}];
+
+TJIS[d_, (M_)^2, {{\[Alpha]_, M_}, {\[Beta]_, 0}, {\[Gamma]_, 0}}] :=
+ (SMu^2/(M^2)^(\[Alpha] + \[Beta] + \[Gamma] - 4))*(-1)^(\[Alpha] + \[Beta] + \[Gamma] +1)*
+ (Gamma[\[Alpha] + \[Beta] + \[Gamma] - d]/(Gamma[\[Alpha]]* Gamma[\[Beta]]*Gamma[\[Gamma]]))*
+ ((Gamma[d/2 - \[Gamma]]*Gamma[d/2 - \[Beta]])/ Gamma[d - \[Beta] - \[Gamma]])*((Gamma[\[Beta] + \[Gamma] - d/2]*
+ Gamma[2*d - \[Alpha] - 2*\[Beta] - 2*\[Gamma]])/ Gamma[(3*d)/2 - \[Alpha] - \[Beta] - \[Gamma]]);
+
+TJIS[d_, 0, {{\[Beta]_, 0}, {\[Alpha]_, M_}, {\[Gamma]_, 0}}] :=
+ TJIS[d, 0, {{\[Alpha], M}, {\[Beta], 0}, {\[Gamma], 0}}];
+
+TJIS[d_, 0, {{\[Beta]_, 0}, {\[Gamma]_, 0}, {\[Alpha]_, M_}}] :=
+ TJIS[d, 0, {{\[Alpha], M}, {\[Beta], 0}, {\[Gamma], 0}}];
+
+TJIS[d_, 0, {{\[Alpha]_, M_}, {\[Beta]_, 0}, {\[Gamma]_, 0}}] :=
+ (SMu^2/(M^2)^(\[Alpha] + \[Beta] + \[Gamma] - 4))*(-1)^(\[Alpha] + \[Beta] + \[Gamma] + 1)*
+ (Gamma[\[Alpha] + \[Beta] + \[Gamma] - d]/(Gamma[\[Alpha]]* Gamma[\[Beta]]*Gamma[\[Gamma]]))*
+ ((Gamma[\[Beta] + \[Gamma] - d/2]*Gamma[d/2 - \[Beta]]* Gamma[d/2 - \[Gamma]])/Gamma[d/2]);
+
+TJIS[d_, 0, {{\[Beta]_, M_}, {\[Alpha]_, 0}, {\[Gamma]_, M_}}] :=
+ TJIS[d, 0, {{\[Alpha], 0}, {\[Beta], M}, {\[Gamma], M}}];
+
+TJIS[d_, 0, {{\[Beta]_, M_}, {\[Gamma]_, M_}, {\[Alpha]_, 0}}] :=
+ TJIS[d, 0, {{\[Alpha], 0}, {\[Beta], M}, {\[Gamma], M}}];
+
+TJIS[d_, 0, {{\[Alpha]_, 0}, {\[Beta]_, M_}, {\[Gamma]_, M_}}] :=
+ (SMu^2/(M^2)^(\[Alpha] + \[Beta] + \[Gamma] - 4))*(-1)^(\[Alpha] + \[Beta] + \[Gamma] + 1)*
+ (Gamma[\[Alpha] + \[Beta] + \[Gamma] - d]/(Gamma[\[Beta]]* Gamma[\[Gamma]]))*(Gamma[d/2 - \[Alpha]]/Gamma[d/2])*
+ ((Gamma[\[Alpha] + \[Gamma] - d/2]*Gamma[\[Alpha] + \[Beta] - d/2])/ Gamma[2*\[Alpha] + \[Beta] + \[Gamma] - d]);
+
+TJIS[d_, 0, {{\[Alpha]_, 0}, {\[Beta]_, M_}, {\[Gamma]_, M_}}] :=
+ (SMu^2*(-1)^(\[Alpha] + \[Beta] + \[Gamma] + 1)*Gamma[\[Alpha] + \[Beta] + \[Gamma] - d]*Gamma[d/2 - \[Alpha]]*
+ (Gamma[\[Alpha] + \[Gamma] - d/2]*Gamma[\[Alpha] + \[Beta] - d/2]))/((M^2)^(\[Alpha] + \[Beta] + \[Gamma] - 4)*(Gamma[\[Beta]]*
+ Gamma[\[Gamma]])*Gamma[d/2]*Gamma[2*\[Alpha] + \[Beta] + \[Gamma] - d]);
+
+TAIS[d_, 0, {{1, M_}}] :=
+ (-I)*M^2*SMu*Gamma[(4 - d)/2 - 1]
+
+TBIS[_, 0, {{_, 0}, {_, 0}}] :=
+ 0;
+
+TBIS[d_, (M_)^2, {{\[Alpha]_, 0}, {\[Beta]_, 0}}] :=
+ I*SMu*(((-1)^(\[Alpha] + \[Beta])/(-M^2)^(\[Alpha] + \[Beta] - 2))*
+ Exp[(-I)*Pi*((d - 4)/2)]*(Gamma[\[Alpha] + \[Beta] - d/2]/(Gamma[\[Alpha]]*Gamma[\[Beta]]))*
+ ((Gamma[d/2 - \[Alpha]]*Gamma[d/2 - \[Beta]])/ Gamma[d - \[Alpha] - \[Beta]]));
+
+TJIS[d_Symbol, (M_)^2, {{1, M_}, {1, M_}, {1, M_}}] :=
+ M^2*SMu^2*(-(6/(-4 + d)^2) + 17/(2*(-4 + d)) + (1/8)*(-59 - 2*Pi^2) + (-4 + d)^3*FCGV["TJI111e"] +
+ (1/ 1920)*((-4 + d)^2*(16755 - 4750*Pi^2 - 14*Pi^4 + 3840*Pi^2*Log[2] - 12080*Zeta[3])) +
+ (1/96)*(-4 + d)*(195 + 98*Pi^2 - 48*Zeta[3]));
+
+$CommentNotebook = True;
+
+TComment[s_String, b_] :=
+ If[
+ If[ !ValueQ[$TarcerRecursed], $TarcerRecursed = {}]; !MemberQ[$TarcerRecursed, {s, b}],
+ AppendTo[$TarcerRecursed, {s, b}];
+
+ If[ $Notebooks && $CommentNotebook === True,
+
+ If[ $commentnb === False,
+ $commentnb = True;
+ $cnb = NotebookCreate[StyleDefinitions -> "NaturalColor.nb", Magnification -> 1.5];
+ SetOptions[$cnb, WindowMargins -> {{0, Automatic}, {Automatic, 0}}]; SetOptions[$cnb, WindowSize -> {500, 300}];
+ NotebookWrite[$cnb, Cell[BoxData[ToBoxes[b /. Rule[TFIC, TFI], StandardForm]], "Input", CellDingbat -> StringJoin[s, " "]]],
+
+ NotebookWrite[$cnb, Cell[BoxData[ToBoxes[b /. Rule[TFIC, TFI], StandardForm]], "Input", CellDingbat -> StringJoin[s, " "]]]
+ ],
+
+ Print[s, b /. {TFIC :> TFI, TVIC :> TVI, TJIC :> TJI, TBIC :> TBI, TAIC :> TAI}]
+ ]
+ ] /; $Comment === True;
+
+$TTable = {};
+
+FEPrint[a__String] :=
+ Print[a] /; $Notebooks === False;
+
+FEPrint[a__String] :=
+ If[ Head[$cnb] === NotebookObject,
+ NotebookWrite[$cnb, Cell[StringJoin @@ {a}, "SmallText"]];
+ SelectionMove[$cnb, After, Cell]
+ ] /; $Notebooks === True;
+
+Options[TarcerRecurse] = {
+ FCVerbose -> False,
+ Factor -> Factor,
+ TimeConstraint -> Infinity,
+ Table :> $TTable,
+ Together -> Together,
+ Replace -> {}
+};
+
+TarcerRecurse[expr_, OptionsPattern[]] :=
+ Catch[
+ Block[{ basisdone, factorfun, fertig, dummm1, dummm2, getvars,
+ te, time, cutoff, tog, ttable, facfun, nexp, oldexpr, rec,
+ special, sti, tl, tcheck, tjrd, tvrd, together, vars, $cc = 0,
+ $cv, t0, tvars, time0},
+
+ time0 = AbsoluteTime[];
+
+ If [OptionValue[FCVerbose]===False,
+ trVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ trVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1, "TarcerRecurse: Entering.", FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: Entering with", expr, FCDoControl->trVerbose];
+
+
+ If[ !MatchQ[ttable,
+ {__RuleDelayed}],
+ ttable = {}
+ ];
+
+ ttable = OptionValue[Table];
+
+ special = OptionValue[Replace];
+ cutoff = OptionValue[TimeConstraint];
+ together = OptionValue[Together];
+ factorfun = OptionValue[Factor];
+
+ $commentnb = False;
+
+ tog =
+ ((If[ #1 > 1001,
+ If[ $Comment,
+ FEPrint[
+ StringJoin[
+ "coefficient # ",
+ If[ ValueQ[$cv],
+ ToString[$cc],
+ ""
+ ],
+ If[ ValueQ[$cv],
+ StringJoin[" (", ToString[$cv], ")"],
+ ""
+ ],
+ " simplified, "
+ ], ToString[#1]]]]; #2) &
+ )[LeafCount[#1], $cc++; together[#1]]&;
+
+ If[ !ValueQ[$TarcerRecursed],
+ $TarcerRecursed = {}
+ ];
+
+ $TarcerRecursed = {};
+
+ FCPrint[1, "TarcerRecurse: Applying ToTFi.", FCDoControl->trVerbose];
+ time=AbsoluteTime[];
+ t0 = ToTFi[expr] /. {TFi :> TFI, ToTFi :> Identity};
+ FCPrint[1, "TarcerRecurse: ToFi done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: After ToTFi: ", t0, FCDoControl->trVerbose];
+
+ If[ ttable =!= {},
+ FCPrint[1, "TarcerRecurse: Applying custom reduction rules (Table).", FCDoControl->trVerbose];
+ time=AbsoluteTime[];
+ t0 = t0 /. ttable;
+ FCPrint[1, "TarcerRecurse: Done applying custom reduction rules , timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: After applying custom reduction rules: ", t0, FCDoControl->trVerbose]
+ ];
+
+ getvars = Select[Variables[#1], MatchQ[#1, TFI[__] | TVI[__] | TJI[__] | TBI[__] | TAI[__]] & ] & ;
+
+ If[ !FreeQ[t0, TFI],
+
+ FCPrint[1, "TarcerRecurse: Applying TFIRecuse.", FCDoControl->trVerbose];
+ time=AbsoluteTime[];
+ t0 = TFIRecurse[t0];
+ FCPrint[1, "TarcerRecurse: TFIRecuse done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: After TFIRecuse: ", t0, FCDoControl->trVerbose];
+
+
+ If[ ttable =!= {},
+ FCPrint[1, "TarcerRecurse: Applying custom reduction rules (Table).", FCDoControl->trVerbose];
+ time=AbsoluteTime[];
+ t0 = t0 /. ttable;
+ FCPrint[1, "TarcerRecurse: Done applying custom reduction rules , timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: After applying custom reduction rules: ", t0, FCDoControl->trVerbose]
+ ];
+
+
+ t0 = Collect[t0, getvars[t0], tog]
+ ];
+
+ If[ !FreeQ[t0, TVI[_Plus, __]],
+
+ tvrd = Select[DownValues[TVR], !FreeQ[#1, TVI[_ - 2, __]]&] /. TVR -> TVI;
+ FCPrint[3, "TarcerRecurse: Available rules for TVR: ", t0, FCDoControl->trVerbose];
+
+
+ t0 = t0 /. tvrd /. tvrd /. tvrd /. tvrd;
+
+
+ t0 = Collect[t0, getvars[t0], tog];
+
+ If[ !FreeQ[t0, TVI[_Plus, __]],
+ t0 = Collect[t0 = t0 //. tvrd, getvars[t0], tog]
+ ]
+ ];
+
+
+ tjrd = Select[DownValues[TJR], ! FreeQ[#1, TJI[_ - 2, __]] & ] /. TJR -> TJI;
+
+ If[ !FreeQ[t0, TJI[_Plus, __]],
+ (*tjrd = Select[DownValues[TJR], ! FreeQ[#1, TJI[_ - 2, __]] & ] /. TJR -> TJI;*)
+ t0 = Collect[t0 = t0 /. tjrd /. tjrd /. tjrd /. tjrd, getvars[t0], tog];
+
+ If[ !FreeQ[t0, TJI[_Plus, __]],
+ t0 = Collect[t0 = t0 //. tjrd, getvars[t0], tog]
+ ]
+ ];
+
+ rec[exp_, {ti_, tr_}] :=
+ (
+ sti = ToString[ti];
+
+ FCPrint[4, "TarcerRecurse: rec: Entering with ", exp ," ",{ti,tr}, FCDoControl->trVerbose];
+
+ If[ FreeQ[exp, ti],
+ exp,
+ nexp = exp;
+
+ If[ $Comment,
+ (
+ If[ #1 === 1,
+ FEPrint[StringJoin[sti, " level, there is 1 ", sti]],
+ FEPrint[StringJoin[sti, " level, there are "], ToString[#1], StringJoin[" ", sti, "'s "]]] & )
+ [Count[nexp, ti[__], -1]]
+ ];
+
+ nexp = nexp /. ti -> tr /. tr -> ti;
+ FCPrint[4, "TarcerRecurse: rec: After ti -> tr replacements ", nexp , FCDoControl->trVerbose];
+
+ If[ !FreeQ[nexp, TJI[_Plus, __]],
+ nexp = nexp //. tjrd;
+ FCPrint[4, "TarcerRecurse: rec: After tjrd replacements ", nexp , FCDoControl->trVerbose];
+ ];
+
+ tvars = getvars[nexp]; $cc = 0; $cv = Length[tvars];
+ nexp = Collect[nexp, tvars, tog];
+
+ If[ cutoff =!= Infinity,
+ If[ AbsoluteTime[] - time0 > cutoff,
+ Throw[$Failed]]
+ ];
+ nexp
+ ]
+ );
+ basisdone = 0;
+
+ tl = {{TFI, TFR}, {TVI, TVR}, {TJI, TJR}, {TBI, TBR}, {TAI, TAR}};
+
+ FCPrint[3, "TarcerRecurse: Intermediate result: ", t0, FCDoControl->trVerbose];
+
+
+ FCPrint[1, "TarcerRecurse: Doing the final recursion.", FCDoControl->trVerbose];
+ time=AbsoluteTime[];
+ Do[
+ FCPrint[4, "TarcerRecurse: Iteration: ", i , FCDoControl->trVerbose];
+ t0 = FixedPoint[rec[#1, tl[[i]]] & , t0, 100];
+ FCPrint[4, "TarcerRecurse: After rec: ", t0 , FCDoControl->trVerbose];
+
+
+ If[ Head[t0] === Plus,
+ fertig = Select[t0, ! FreeQ[#1, tl[[i, 1]]]];
+ basisdone = basisdone + fertig; t0 = t0 - fertig
+ ], {i, Length[tl]}
+ ];
+ FCPrint[1, "TarcerRecurse: Final recursion done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: After the final recursion: ", t0, FCDoControl->trVerbose];
+
+ t0 = t0 + basisdone;
+ $cv =. ;
+
+ t0 = Collect[t0, {TAI[__], TAI[a1__]*TAI[a2__], TAI[__], TBI[__], TJI[__], TVI[__], TFI[__]}, factorfun];
+
+ If[ $Comment,
+ FEPrint["the result has ", ToString[Length[t0 + dummm1 + dummm2] - 2], " terms"]
+ ];
+
+ If[ $Notebooks,
+ SetSelectedNotebook[EvaluationNotebook[]]
+ ];
+
+ t0 = t0 /. TAI[dim_, pp_, list_List]/;pp=!=0:>TAI[dim,0,list];
+
+ FCPrint[1, "TarcerRecurse: Leaving.", FCDoControl->trVerbose];
+ FCPrint[3, "TarcerRecurse: Leaving with: ", t0, FCDoControl->trVerbose];
+
+ t0
+ ]
+ ];
+
+Options[TarcerExpand] = {
+ TarcerReduce :> $BasisIntegrals,
+ TarcerRecurse -> False, Zeta -> True,
+ Replace -> {Prefactor1 -> Identity, EulerGamma -> 0}
+};
+
+TarcerExpand[expr_, d_Symbol -> fe_ /; Length[Variables[fe]] === 1, ru___Rule] :=
+ TarcerExpand[expr, d -> fe, 0, ru];
+
+TarcerExpand[expr_, d_Symbol -> fe_, (order_Integer)?NonNegative, opts___Rule] :=
+ Block[{
+ t1, t2, t3, t4, numfa, z2rule, restfa, ta0, tarcNumericalFactor, tarcFactor1, eeps, ints, vars,
+ t0, recurse, zeta2replace},
+
+ eeps = Variables[fe][[1]];
+ tarcNumericalFactor[x_] :=
+ If[ NumberQ[x],
+ x,
+ If[ Head[x] === Times,
+ If[ NumberQ[First[x]],
+ First[x],
+ 1
+ ],
+ 1
+ ]
+ ];
+
+ tarcFactor1[x_] :=
+ Block[{factor1t1, factor1t2, factor1t3, mt, mi, m1, mp1, nx = x, iIii},
+
+ mt = #1 /. Plus -> mi /. mi -> Plus /. m1 -> -1 /. mp1 -> (-(Plus[##1]) & ) /. iIii -> I &;
+
+ mi[y_, z__] :=
+ m1*mp1[y, z] /; (
+ If[ Head[#1] === Complex,
+ False,
+ If[ #1 < 0,
+ True,
+ False]
+ ]&)[tarcNumericalFactor[y]];
+
+ nx = x /. Complex[0, b_] -> b*iIii;
+
+ If[ Head[nx] =!= Plus,
+ mt[nx /. Plus -> (Factor1[Plus[##1]] & )],
+
+ factor1t1 = List @@ (#1 /. Plus -> factor1t3 & ) /@ nx;
+ factor1t2 = PolynomialGCD @@ factor1t1 /. factor1t3 -> Plus;
+ mt[factor1t2 Plus @@ ((#1 /. factor1t3 -> Plus)/factor1t2 & ) /@ factor1t1]
+ ]
+ ];
+
+
+ Catch[
+ e = eeps;
+ {ints, recurse, zeta2replace} = {TarcerReduce, TarcerRecurse, Zeta} /. Flatten[{opts, Options[TarcerExpand]}];
+
+ If[ zeta2replace =!= True,
+ z2rule = {},
+ z2rule = Pi^2 :> 6*ToExpression["Zeta2"]
+ ];
+
+ ints = Flatten[ints];
+
+ If[ recurse =!= True,
+ ta0 = expr,
+ ta0 = TarcerRecurse[expr]
+ ];
+
+ t1 = ta0 /. ints /. {
+ SEpsilon[de_] :> SEpsilon[ToString[d]],
+ Prefactor1[de_] :> Prefactor1[ToString[de, InputForm]]
+ };
+
+ vars = Select[Variables[t1], Length[#1] > 0 & ];
+
+ If[ !FreeQ[vars, TFI | TVI | TJI | TKI | TBI | TAI],
+ Print["Returning the list of remaining integrals."];
+ Throw[Select[vars, !FreeQ[#1, TFI | TVI | TJI | TKI | TBI | TAI] & ]]
+ ];
+
+ t1 = t1 /. d -> fe; polygafu[2, 1] = -2*Zeta[3];
+
+ polygafu[2, 2] = 2 - 2*Zeta[3];
+
+ polygafu[x_, y_] :=
+ polygafu[x, y] = FunctionExpand[PolyGamma[x, y]];
+
+ t2 = Normal[t1 + O[e]^(order + 1)] /. PolyGamma -> polygafu /. (Replace /. {opts} /. Options[TarcerExpand]);
+
+ t3 = Collect[t2, e, Expand[#1] /. z2rule & ];
+ t3 = t2 /. ToString[d] :> fe;
+
+ t4 = tarcFactor1[Expand[t3]] //. pre : (Prefactor1 | SEpsilon)[a_]*Prefactor1[b_] :> Prefactor1[a*b] /. Prefactor1[1] :>
+ 1 /. Prefactor1[xy_] :> Prefactor1[xy /. st_String :> ToExpression[st]] /. Prefactor1[(m_)^e*(xx_)]*(m_)^(any_) :>
+ Prefactor1[m^(e + any)*xx] /. z2rule;
+
+
+ If[ Head[t4] === Times,
+ numfa = tarcNumericalFactor[t4];
+ restfa = Select[t4, FreeQ[#1, eeps | Log | Zeta] & ];
+
+ extracoll[z_, e] :=
+ Block[{},
+ If[ Head[z] === Plus,
+ (extracoll[#1, e] & ) /@ z,
+ z /. xy_Plus :>
+ If[ Length[Variables[xy]] === 0,
+ xy,
+ Collect[xy, Complement[Variables[xy], {e}]]
+ ]
+ ]
+ ];
+
+ (Select[t4, !FreeQ[#1, Prefactor1] & ]*(restfa/numfa)) . extracoll[Collect[Expand[(numfa*Select[t4, FreeQ[#1, Prefactor1] & ])/restfa], e], e],
+
+ t4
+ ] /. s_String :> ToExpression[s] /. d -> fe /. (Replace /. {opts} /. Options[TarcerExpand])]] /; Length[Variables[fe]] === 1;
+
+tfch = {
+ TFR :> Hold[TFR],
+ TVR :> Hold[TVR],
+ TJR :> Hold[TJR],
+ TBR :> Hold[TBR],
+ TAR :> Hold[TAR],
+ TComment :> Hold[TComment]
+};
+
+rtfch =
+ Reverse /@ tfch;
+
+SetAttributes[condrest, HoldRest];
+
+Clear[remember];
+remember[zi_HoldForm] :=
+ Block[{z = zi /. tfch},
+ If[ !FreeQ[z, Condition],
+ Hold[HoldForm][
+ Hold[SetDelayed][z[[1, 1]], ReplacePart[z[[1, 2]], Prepend[Extract[z, {1, 2, 1}, Hold],
+ z[[1, 1]] /. PatternTest -> pt /. pt[a_, _] :> a /. Pattern -> pat /. pat[a_, _] :> a], 1]]
+ ] /. Hold[HoldForm] -> HoldForm /. rtfch /. Hold[SetDelayed] -> SetDelayed /. Hold -> Set,
+ Hold[HoldForm][
+ Hold[SetDelayed][z[[1, 1]], Prepend[Extract[z, {1, 2}, Hold], z[[1, 1]] /. PatternTest -> pt /.
+ pt[a_, _] :> a /. Pattern -> pat /. pat[a_, _] :> a]]
+ ] /.
+ Hold[HoldForm] -> HoldForm /. rtfch /. Hold[SetDelayed] -> SetDelayed /. Hold -> Set]
+ ];
+
+$TarasovTdeltaplimit
+
+aa2 = Array[Subscript[f, #1] &, 10000 + ($TarasovTdeltaplimit + 1)*1000];
+
+bb12 = Select[aa2, Head[#1] =!= Subscript &];
+Clear[aa2];
+
+Print["there are ", Length[bb12], " recursion equations for $RankLimit = ", $RankLimit];
+
+If[ $Remember === True,
+
+ RCHECK = True;
+ nb = remember /@ bb12,
+ nb = bb12
+];
+
+Clear[bb12];
+
+
+(* Checks of the recursion relations *)
+CheckTVIRecursion[Subscript[f, 52]];
+CheckTVIRecursion[Subscript[f, 53]];
+CheckTVIRecursion[Subscript[f, 51]];
+CheckTVIRecursion[Subscript[f, 54]];
+CheckTVIRecursion[Subscript[f, 55]];
+CheckTVIRecursion[Subscript[f, 56]]
+CheckTVIRecursion[Subscript[notnecessaryf, 60]];
+CheckTVIRecursion[Subscript[f, 63]];
+CheckTVIRecursion[Subscript[f, 66]];
+CheckTVIRecursion[Subscript[f, 67]];
+CheckTVIRecursion[Subscript[f, 6713]];
+CheckTVIRecursion[Subscript[f, 68]];
+CheckTVIRecursion[Subscript[f, 6813]];
+CheckTJIRecursion[Subscript[f, 7113]];
+CheckTJIRecursion[Subscript[f, 71]];
+CheckTJIRecursion[Subscript[f, 7123]];
+CheckTJIRecursion[Subscript[f, 78]];
+CheckTJIRecursion[Subscript[f, 80]];
+CheckTJIRecursion[Subscript[f, 81]];
+CheckTJIRecursion[Subscript[f, 8113]];
+CheckTJIRecursion[Subscript[f, 8123]];
+CheckTJIRecursion[Subscript[f, 82]];
+CheckTJIRecursion[Subscript[f, 8213]];
+CheckTJIRecursion[Subscript[f, 8212]];
+CheckTJIRecursion[Subscript[f, 83]];
+CheckTJIRecursion[Subscript[f, 100]];
+CheckTJIRecursion[Subscript[f, 1002]];
+CheckTJIRecursion[Subscript[f, 1003]];
+CheckTJIRecursion[Subscript[f, 1004]];
+CheckTJIRecursion[Subscript[f, 1005]];
+CheckTJIRecursion[Subscript[f, 1006]];
+
+
+
+$Post =.
+ReleaseHold[nb];
+$Comment = False;
+End[];
+EndPackage[];
+
+
+$BasisIntegrals = {
+ TAI[d_, 0, {{1, M_}}] ->
+ -I*E^(1/2*(4 - d)*EulerGamma)*M^2*Gamma[-1 + (4 - d)/2]*Prefactor1[(M^2)^(1/2*(-4 + d))*SEpsilon[d]],
+
+ TBI[d_, pp_, {{1, 0},{1, 0}}] ->
+ (I*E^(((4 - d)*EulerGamma)/2)*Gamma[2 - d/2]*Gamma[-1 + d/2]^2*Prefactor1[ (-pp)^((-4 + d)/2)*SEpsilon[d]])/Gamma[-2 + d],
+
+ TJI[d_, pp_, {{1,0},{1,0},{1,0}}] ->
+ -((pp*Gamma[3 - d]*Gamma[-1 + d/2]^3*E^((4 - d)*EulerGamma)*Prefactor1[(-pp)^(-4 + d)*SEpsilon[d]^2])/(Gamma[-3 + (3*d)/2] )),
+
+ TJI[d_, M_^2, {{1,M_},{1,0},{1,0}}] ->
+ (M^2*Gamma[3 - d]*Gamma[2 - d/2]*Gamma[-1 + d/2]^2*Gamma[-5 + 2*d]*E^((4 - d)*EulerGamma) Prefactor1[(M^2)^(-4 + d)*SEpsilon[d]^2])/(Gamma[-2 + d]*Gamma[-3 + (3*d)/2]),
+
+ TJI[d_Symbol, (M_)^2, {{1, M_}, {1, M_}, {1, M_}}]->
+ M^2*Prefactor1[(M^2)^(-4 + d)*SEpsilon[d]^2]*(-6/(-4 + d)^2 + 17/(2*(-4 + d)) + (-59 - 2*Pi^2)/8 + (-4 + d)^3*FCGV["TJI111e"] +
+ ((-4 + d)^2*(16755 - 4750*Pi^2 - 14*Pi^4 + 3840*Pi^2*Log[2] - 12080*Zeta[3]))/1920 + ((-4 + d)*(195 + 98*Pi^2 - 48*Zeta[3]))/96),
+
+ TJI[d_, 0, {{1, M_}, {1, M_}, {1, 0}}]->(M^2*Gamma[3 - d]*Gamma[2 - d/2]^2*Gamma[-1 + d/2]*E^((4 - d)*EulerGamma)*
+ Prefactor1[(M^2)^(-4 + d)*SEpsilon[d]^2])/(Gamma[4 - d]*Gamma[d/2]),
+
+ TJI[d_, 0, {{1,M_},{1,0},{1,0}}] ->(M^2*Gamma[3 - d]*Gamma[2 - d/2]*Gamma[-1 + d/2]^2*E^((4 - d)*EulerGamma)*Prefactor1[(M^2)^(-4 + d)*SEpsilon[d]^2])/Gamma[d/2]
+};
+
+filename= ToFileName[{$TARCERDirectory},StringJoin["tarcer", StringReplace[$System,{"-"->"","Microsoft"->"","("->"",")"->""," "->""}], StringJoin @@
+ ToString /@ $RankLimit, ".mx"]];
+
+DumpSave[filename, {
+ Tarcer`Cayley,
+ Tarcer`CayleyD,
+ Tarcer`Cayleyu,
+ Tarcer`Prefactor1,
+ Tarcer`TarcerRecurse,
+ Tarcer`TFIRecurse,
+ Tarcer`TFISimplify,
+ Tarcer`SEpsilon,
+ Tarcer`TarcerExpand,
+ Tarcer`TarcerReduce,
+ Tarcer`TAI,
+ Tarcer`TAR,
+ Tarcer`TBI,
+ Tarcer`TBR,
+ Tarcer`TFI,
+ Tarcer`TFR,
+ Tarcer`TJI,
+ Tarcer`TJR,
+ Tarcer`TKI,
+ Tarcer`TVI,
+ Tarcer`TVR,
+ Tarcer`$BasisIntegrals,
+ Tarcer`$Comment,
+ Tarcer`$CommentNotebook,
+ Tarcer`$RankLimit,
+ Tarcer`$RecursionStop,
+ Tarcer`$TTable,
+ Tarcer`Private`applytlrules,
+ Tarcer`Private`applytlrules2,
+ Tarcer`Private`ExpandMaybe,
+ Tarcer`Private`FactorC,
+ Tarcer`Private`FEPrint,
+ Tarcer`Private`fN,
+ Tarcer`Private`mbt,
+ Tarcer`Private`PNQ,
+ Tarcer`Private`PQ,
+ Tarcer`Private`ta,
+ Tarcer`Private`TA,
+ Tarcer`Private`TAIC,
+ Tarcer`Private`TBIC,
+ Tarcer`Private`TComment,
+ Tarcer`Private`TLRComment,
+ Tarcer`Private`TFIC,
+ Tarcer`Private`TJIC,
+ Tarcer`Private`TLR,
+ Tarcer`Private`tlrule,
+ Tarcer`Private`redblue,
+ Tarcer`Private`TLRules,
+ Tarcer`Private`TLRules2,
+ Tarcer`Private`TVIC,
+ Tarcer`Private`$TLRComment,
+ Tarcer`$TarcerVersion
+}];
+
+
+
+
+$HistoryLength = \[Infinity];
+
+Print["Elapsed time: ", Round[AbsoluteTime[] - Tarcer`Private`atime]/60. min];
+Print["File size: ", Round[FileByteCount[filename]/1024.^2], "MB"];
diff --git a/FeynCalc/Changelog.md b/FeynCalc/Changelog.md
index 72d98d35d..c0e6e6601 100644
--- a/FeynCalc/Changelog.md
+++ b/FeynCalc/Changelog.md
@@ -1,1080 +1,1281 @@
-### Version 9.2.0 (November 2016)
-
-#### Important changes
- * New handy functions `FCAbbreviate`, `FCHideEpsilon`, `FCShowEpsilon`, `FCLoopIBPReducableQ`, `FCFactorOut`, `SelectFree2`, `SelectNotFree2`
- * Finally we have shortcuts for spinors with D-dimensional momenta: `SpinorUD`, `SpinorUBarD`, `SpinorVD`, `SpinorVBarD`
- * New option `$KeepLogDivergentScalelessIntegrals` permits consistent 1-loop computations, where UV and IR divergences are regularized with different epsilons.
- * `Examples/FeynRules` now contains several FeynRules models (with more to come) with additional scripts that show how such models can be used with patched `FeynArts`. This should be useful for new users.
- * `DiracTrace` has received a lot of internfal refactoring and should be now faster and much more stable. Thanks to Peng Sun for motivating me to do so. I hope to get `DiracSimplify` refactored as well in the next release.
-
-
-
-#### Commit log
-
-* Added an example calculation to the test-suite. (a4cdd648)
-* Fixed wrong option name in FCDiracIsolate. (202f3e2)
-* Added some missing unit tests for FCLoop-functions. (c81660f1)
-* Added few tree-level electroweak examples. (4909891)
-* Added FCAbbreviate, a new function that introduces abbreviations for FeynCalc expressions that should be exported to other tools. (a7a27e5); Example:
-
- ```
- FCAbbreviate[SPD[p, k] FAD[{q, SMP["m_e"]}, {q + p, m}], {q}, {p, k}, Head -> spd]
- ```
-
-* Now FCLoopBasisFindCompletion can complete the basis using a list of user-supplied propagators given as the value of the Method option (4b70dcb)
-
- ```
- FCLoopBasisFindCompletion[FAD[q1 + p, +q2 - k] SPD[q1, q2], {q1, q2}, Method -> {FAD[{q2 + k, m}], FAD[{q1 - p, m}], +SPD[p, q2], SPD[k, q1]}]
- ```
-
-* Added new option FCLoopIBPReducableQ to FCLoopExtract and FCLoopIsolate. This allows to extract/isolate only those loop integrals that are IBP reducable. (20af417)
-
- ```
- FCLoopExtract[a FCI[FAD[{q, 0, 2}]] + b FCI[FAD[{q, 0, 1}]], {q},loop, FCLoopIBPReducableQ -> True]
- FCLoopIsolate[a FCI[FAD[{q, 0, 2}]] + b FCI[FAD[{q, 0, 1}]], {q}, Head -> loop, FCLoopIBPReducableQ -> True]
-
- ```
-* Added new function FCLoopIBPReducableQ for a quick check if the given loop integrals has propagators raised to integer powers. (b699150); Example:
-
- ```
- FCLoopIBPReducableQ[FCI[SPD[q,q]^2FAD[{q,0,1}]]]
-
- ```
-* Some minor refactoring in FDS. (681ef0e)
-* Improved FCLoopBasisFindCompletion to use scalar products as extra propagators. The old behavior can be achieved via the option Method->NullSpace. The new default is however Method->ScalarProduct. (38386fa); Example:
-
- ```
- FCLoopBasisFindCompletion[FAD[{q1, m, 2}, {q1 + q3, m}, {q2 \[Minus] q3}, q2], {q1, q2, q3}]
- FCLoopBasisFindCompletion[FAD[{q1, m, 2}, {q1 + q3, m}, {q2 \[Minus] q3}, q2], {q1, q2, q3}, Method -> NullSpace]
- ```
-
-* Version bump to 9.2 (c8c8cfb)
-* Fixed a bug in FDS related to $KeepLogDivergentScaleless set to True. (a411e67)
-* Improved debugging output in FDS. (fe21cbe)
-* Fixed a bug with D-dim Eps not disappearing when indices are the same. (906cac6)
-* Fixed a small bug in FCShowEpsilon. (0c25ba0)
-* Improved FCHideEpsilon and FCShowEpsilon to work also for D=4-Epsilon via the option D. (16b814e)
-* Fixed a bug in FourDivergence related to the differentiation of FADs. (b372e2b)
-* Added new shortcuts for spinors with D-dimensional momenta: SpinorUD, SpinorUBarD, SpinorVD, SpinorVBarD. (201b058); Example:
-
- ```
- SpinorUD[p, m] // FCI // StandardForm
- SpinorVD[p, m] // FCI // StandardForm
- SpinorUBarD[p, m] // FCI // StandardForm
- SpinorVBarD[p, m] // FCI // StandardForm
- ```
-
-* Some cross-checks in ToPaVe, SPC, OneLoop,OneLoopSimplify. (0d832c2)
-* Improved typesetting of the SMP's for renormalization. (1c7b512)
-* Added FeynRules model for pure QED with counterterms following Bohm, Denner and Joos. (fc14872)
-* Added new SMP objects for renormalization calculations. (f2eabd6)
-* Perofrmance improvement in DiracTrace. (3c40740)
-* Added two convenience functions FCHideEpsilon and FCShowEpsilon for doing the substitution 1/Eps - EulerGamma + Log[4Pi] -> Delta. (6cddeb0); Example:
-
- ```
- FCHideEpsilon[1/Epsilon - EulerGamma + Log[4 Pi]]
- FCShowEpsilon[SMP["Delta"]]
- ```
-
-* Fixed a bug in FCReplaceD, so that DiracGamma does not loose the dimension anymore. (9544275)
-* Fixed a bug in FourDivergence related to the differentiation of D-dim Dirac matrices. (dad4b85)
-* Added FCFactorOut option to Collect2. Currently this only allows to factor out a global prefactor. (54f513a); Example:
-
- ```
- Collect2[Together[a (1 + x) + 4 b (1 + y)], {a, b}, FCFactorOut -> 4]
- ```
-
-* Added FCFactorOut, a small convenience function for factoring out user-specified prefactors. (31f3543); Example:
-
- ```
- FCFactorOut[(a + 3 b), 3 b]
- ```
-
-* Added SelectFree2 and SelectNotFree2. They act like SelectFree and SelectNotFree, but with an Expand2 before the selection. (d6fb941); Example:
-
- ```
- SelectFree2[a (b + c) + d, b]
- SelectFree[a (b + c) + d, b]
- SelectNotFree2[a (b + c) + d, b]
- SelectNotFree[a (b + c) + d, b]
- ```
-
-* Added FeynArts model (generated with FeynRules) for QCD in the background field formalism. The reason is that this model is missing in the standard FeynArts. (991e340)
-* Fixed a small bug in DiracTrick. (f567f82)
-* Added an extra check for DiracTrick. (75466d4)
-* Made DotSimplify finish faster if there is nothing to simplify. (db0a586)
-* Added new option DiracSigmaExplicit to FCDiracIsolate. (9cf7654)
-* Some improvements in TID for the BMHV scheme. In particular, unless BMHV scheme has been explicitly selected, amplitudes that are partly 4-dim and partly D-dim will not be tolerated anymore. (aa89a44)
-* Refactoring DiracSimplify. (7f3dc3d)
-* DiracTrick: Adjusted Larin's scheme (12fd5ac)
-* Made DiracTrick a bit faster by evaluating simple traces before entering the main loop. (f419c0d)
-* Added option FCDiracIsolate to DiracTrick. This is for calling DiracTrick from internal functions. (f40ec42)
-* Cleaning up the code of DiracTrace. (ab363ab)
-* Some more adjustments for DiracTrace and DiracTrick. (edc954a)
-* Improved performance of DiracTrace on big traces. (64f5120)
-* Some more refactoring in DiracTrick. (2be6dd4)
-* Improved performance of DiracTrace for West->False. (972c7c9)
-* DiracTrick: Finally separated rules for different schemes. (8bb589a)
-* DirackTrick: Cleaned up the rules for moving g^5. (1a63162)
-* DiracTrick: Use cached FCFastContract instead of coneins. (d4ed905)
-* DiracTrick: Get rid of scev in favor of FCUseCache. (7446399)
-* DiracTrick: Refactoring continues 2. (7a37313)
-* DirackTrick: Refactoring continues. (f026c48)
-* Continuing refactoring in DiracTrick. (3a743a1)
-* Added option LorentzIndex to FCDiracIsolate that allows inclusion of Lorezntz tensors into isolated heads.dch[GS[p].GS[l]] + dch[GA[i].GA[j].GA[k] MT[mu, nu]] (beb0713; Example:
-
- ```
- FCDiracIsolate[ MT[mu, nu] GA[i, j, k] + GS[p, l] + MT[mu, nu] GA[mu, j, k], LorentzIndex -> True, Head -> dch]
- ```
-
-* Fixed in a bug in the handling of unknown non-commutative objects by DiracTrick. (fe1e459)
-* DiracTrick: Splitting of DiracChains is now handled by FCDiracIsolate. (4e269d0)
-* DiracTrick: Fatoring out of SUNT matrices is now handled by FCDiracIsolate. Moreover, gamma5Present checks if g^5 is present at all. (d60406a)
-* Improved InsideDiracTrace simplifications of DiracTrick. (2d550c6)
-* DiracTrick refactoring in progress. (b6db370)
-* Improved test suite to show time required to run single tests. (2689240)
-* Started refactoring of DiracTrick. (a552eaa)
-* Fixed handling of Larin's scheme in Anti5. (174bb74)
-* Updated description of Larin's scheme. (174f98e)
-* Minor cleanups in FCI and FCE. (e86d145)
-* Added example for the computation of the self-energy diagrams in pure Yang-Mills using background field formalism according to Abbott. (2845af6)
-* Improved handling of Dirac traces that contain unknown non-commutative objects. (1aa3f96)
-* DiracTrace improvement with Expand. (b1ff3f7)
-* Rempoved some old code from DiracTrace (981ab92)
-* Implemented new trace function in DiracTrace. (c6025e4)
-* Test (2941b9e)
-* Some more improvements in DiracTrace. (dfe1dc5)
-* Some fixes in DiracTrace plus now we it uses DiracTrick instead of DiracSimplify. (57b1b2a)
-* More refactoring in DiracTrace. (685a1c4)
-* Even more refactoring in DiracTrace. (6be8f53)
-* More refactoring in DiracTrace (1dcb5bb)
-* More refactoring in DiracTrace. (a06533e)
-* Some more refactoring in DiracTrace. (5187efd)
-* Some more refactoring in DiracTrace. (b185f3c)
-* Some fixes for Larin's scheme in DiracTrace. (cda3f15)
-* Improved splitting between SUNT and DiracGamma in DotSimplify. (45ebe1e)
-* Fixed a bug in the new InsideDiracTrace simplification of DiracTrick. (da94751)
-* Added new option InsideDiracTrace to DiracTrick. (a5b63dc)
-* Added new option DiracGammaCombine to DiracTrick and improved handling of chiral projectors. (5416c72)
-* Some refactoring in DiracTrick. (87f3d4b)
-* Fixed typo in the description of TarcerToFC (6abb381)
-* Added new option DiracGammaCombine to FCDiracIsolate. (2d5e8aa); Example:
-*
- ```
- FCDiracIsolate[GA[nu].(GS[p] + GS[q] + GS[k] + m).GA[mu], Head -> dch]
-
- FCDiracIsolate[GA[nu].(GS[p] + GS[q] + GS[k] + m).GA[mu], Head -> dch,
- DiracGammaCombine -> False]
- ```
-
-* Some refactoring in FCDiracIsolate. (79fdd36)
-* Improved the muon decay example. (b79005d)
-* Added an example for using Tdec to compute some multi-loop decompositions that appear in the renormalization of the Gross-Neveu model at 4-loops. (de1cf3b)
-* Fixed a bug in Tdec related to wrong determination of symmetries in multi-loop integrals. (f4bb647)
-* Added several new SMP typesettings: m_qu and m_qd for up- and down-type quark masses m_l for lepton masses Q_u and Q_D for up- and down-type quark charges g_W and g'_W for the weak couplings (5a1c91c); Example:
-
- ```
- ?SMP
- SMP[]
- ```
-
-* Added the option PaVeIntegralHeads to FCLoopCanonicalize, FCLoopIsolate and FCLoopSplit. This allows to specify extra heads that should be treated as PaVe integrals. (b5ee87b); Example:
-
- ```
- FCLoopSplit[Foobar[x], {}, PaVeIntegralHeads -> Join[OptionValue[FCLoopIsolate, PaVeIntegralHeads], {Foobar}]]
-
- FCLoopIsolate[Foobar[x], {}, PaVeIntegralHeads -> Join[OptionValue[FCLoopIsolate, PaVeIntegralHeads],
- {Foobar}],Head -> loop]
- ```
-
-* Added new !experimental! global option $KeepLogDivergentScalelessIntegrals that forces FeynCalc not to put log divergent scaleless integral 1/q^4 to zero. This is important e.g. for EFTs, where IR and UV divergences must be distinguished. (d1610d0); Example:
-
- ```
- $KeepLogDivergentScalelessIntegrals=True;
- TID[FVD[q,mu]FVD[q,nu]FAD[{q,0,3}],q]
- ```
-
-* Fixed typos in the description of the ABJ example. (5262505)
-* Small refactoring in OneLoop. (4d53ccd)
-* Fixed a small bug (just caused a warning) in PaVeReduce when PaVe functions have user-defined options. (40f3338)
-* Improved automatic installer to allow installing FeynCalc and FeynArts from local tarballs. For example: (e2a13c0)
-
-### Version 9.1.0 (August 2016)
-
-#### Important changes
-* Many new hadndy functions: `FCTraceExpand`, `FCTraceFactor`, `FCGetDimensions`, `FCCanonicalizeDummyIndices`, `TarcerToFC`, `FCReplaceD`, `FCColorIsolate`, `FCDiracIsolate`, `DeclareFCTensor`, `UnDeclareFCTensor`, `CommutatorOrder`
-* Improved support for using `FeynCalc` with custom `FeynRules`-models (see http://www.feyncalc.org/forum/1042.html for more details)
-* `$LimitTo4` is now disabled by default. Even when set to `True`, it is applied only to 1- and 2-point functions (see http://www.feyncalc.org/forum/1077.html for more details).
-
-#### Commits log
-* Added g-2 calculation to the examples testsuite (a3e66b1)
-* Paclet version updated to 9.1 (fa6c7e7)
-* Rebuilt the documentation. (31f3710)
-* Fixed a small typo in the documentation. (9262470)
-* Updated the changelog for FeynCalc 9.1 (91ae94d)
-* Updated `README.MD` (9e99cd)
-* Fixed a bug in the computation of chiral traces, when West's formula is not used. (0a25312); Example:
- ```
- $BreitMaison = True;
- (DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True] - DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True, West -> False]) // Simplify
- ```
-* Fixed usage information of `GluonGhostVertex` (thanks to H. Patel). (16a6cbf)
-* For now commented out syntax check in `DataType` (leads to problems with FeynHelpers). (1c534a8)
-* Added an example for the g-2 calculation in QED at 1-loop and corrected few spelling errors. (96aa208) See `Examples/QED/QEDElectronGMinusTwoOneLoop.m`
-* Added several new unit tests for `TARCER` . (c2be321)
-* Small cleanups in `FeynCalc.m` and `SUNTrace` to prevent unnecessary pollution of the Global context. (ee76da2)
-* Some improvements in `FCTraceExpand` and `FCTraceFactor`. In particular, now `FCTraceFactor` can properly treat nested Dirac traces. (f985c16); Example:
- ```
- FCTraceExpand[DiracTrace[GA[i, i] + GA[j, j] DiracTrace[GA[a] + GA[b] DiracTrace[GA[x]]]]]
- ```
-* Added option CustomIndexNames to `FCCanonicalizeDummyIndices` and made many improvements to the code. Now one can use `FCCanonicalizeDummyIndices` with arbitrary custom indices, which are treated on the same footing as the built-in indices LorentzIndex, `SUNIndex` und `SUNFIndex`. Einstein's convention is always assumed, though. (1403efe); Example:
- ```
- FCCanonicalizeDummyIndices[ T1[MyIndex2[a], MyIndex1[b]] v1[MyIndex1[b]] v2[MyIndex2[a]] + T1[MyIndex2[c], MyIndex1[f]] v1[MyIndex1[f]] v2[MyIndex2[c]], Head -> {MyIndex1, MyIndex2}, CustomIndexNames -> {{MyIndex1, {i1}}, {MyIndex2, {i2}}}]
- ```
-* Made automatic expansion of `DiracGamma[Momentum[a]+...]` work also for dimensions other than 4. (4f6169c); Example:
- ```
- DiracGamma[Momentum[a, D] + Momentum[b, D] + Momentum[c, D], D]
- ```
-* Added checks against predefined scalar products involving loop momenta. This should prevent some stupid mistakes (6fd45b0); Example
- ```
- SP[q, q] = 0;
- Tdec[{q, mu}, {p}]
- ```
-* Added a global variable `$ScalarProducts` that keeps track of vector pairs for which a scalar product has been defined. This is useful e.g. if one needs to check if the given variable can be used as a general 4-vector (i.e. loop momentum) or if it already has some rules attached to it. (d15191f)
-* Added new function CommutatorOrder that orders any `Commutator` and `AntiCommutator` lexicographically. (3039650); Example:
- ```
- CommutatorOrder[Commutator[a, b] + Commutator[b, a]]
- ```
-* Small refactoring in `DotSimplify`. (6e6b01e)
-* Improved `ExpandScalarProduct` to work on arbitrary tensor declared via `DeclareFCTensor`. (fc05a8e); Example
-
- ```
- DeclareFCTensor[myTens];
- ExpandScalarProduct[myTens[z, Momentum[a + b], Momentum[c + d]]]
- UnDeclareFCTensor[myTens];
- ```
-
-* Added `DeclareFCTensor` and `UnDeclareFCTensor`. Now it is possible to declare new tensor heads, just like this done for new non-commutative objects. (bbbe8af)
-* Improved error messages for several function. (d5a0572)
-* Added `TensorArgsList`, an internal list of possible heads that may appear as arguments of tensors. (d815c58)
-
-* Updated list of publications. (12d4b27)
-* Added options `EpsEvaluate` to `ExpandScalarProduct`. This way one can now do both operations via `ExpandScalarProduct[expr, EpsEvaluate->True]`. (a83592d); Example:
- ```
- ExpandScalarProduct[SP[a + b, c] LC[e, f][g + h, j] LC[][i1, i2, i3, i4 + i5], EpsEvaluate -> True, Momentum -> {a, g}]
- ```
-* Improved `FCCanonicalizeDummyIndices` to allow exclusion of certain index heads (via the `Head` option) and definition of own renaming functions (via the `Function` option). (065ad89)
-* Added `FCColorIsolate`, a handy helper function to extract color structures. (5cf9f56); Example:
- ```
- FCColorIsolate[SUNF[x, y, z]^2 SUNT[a, b] x + SUNT[c] SUND[i, j, k]]
- ```
-* Added `SUNHeadsList`, an internal list of colored objects. (9bfd660)
-* Added `ToDiracSigma` which is essentialy the inverse of `DiracSigmaExplicit`. (2098ee5); Example:
- ```
- ToDiracSigma[GA[i, j], GA[i], GA[j]]
- ```
-* Added `Chisholm2` that applies Chisholm identity to eliminate terms of type `GA[i,j,5]`. (7a5c381); Example:
- ```
- Chisholm2[GA[i, j, 5]]
- ```
-* Fixed a bug in `EpsChisholm`. (0819112); Example:
- ```
- EpsChisholm[(SpinorUBar[p1, m1].SpinorV[p2, m2] + SpinorUBar[p1,m1].GS[k].SpinorV[p2, m2])]
- ```
-* Fixed a small bug in `Collect2`. (e08933a); Example:
- ```
- Collect2[Sum[xa[i], {i, 1, 10}] + VAR Sum[xb[i], {i, 1, 10}] + VAR Sum[xx[i], {i, 1, 10}] + VAR^2 Sum[xy[i], {i, 1, 10}] + VAR^2 Sum[xz[i], {i, 1, 10}], VAR, Factoring -> False, IsolateFast -> True, IsolateNames -> KK] // FRH
- ```
-* Refactored `FermionSpinSum` and added treatment of D-dimensional Dirac spinors (thanks to O. Gituliar). (bc9ce8d); Example:
- ```
- FermionSpinSum[ChangeDimension[Spinor[p1, m1].GA[i].GA[5].Spinor[p2, m2] Spinor[p2, +m2].GA[5].GA[i].Spinor[p1, m1], D], Momentum -> {p1, p2}]
- ```
-* Removed obsolete option `SUNFToTraces`. (a9e729e)
-* Added `FCDiracIsolate`, a handy helper function to extract Dirac structures. (ad6af8b); Example:
- ```
- FCDiracIsolate[ yy GA[i] + xx SpinorUBar[p1, m1].GA[5].SpinorVBar[p2, m2] + zz + DiracTrace[GA[i, j]]]
- ```
-* Added an option to disable `DiracSimplify` in `Chisholm` and `DiracReduce`. (0e4093a)
-* Small performance improvement in `Collect2`. (c0db8ab); Example
- ```
- Collect2[yy (xx*Sum[p[i] i^2, {i, 1, 100000}] + abc) + abc2, {abc, abc2}, Factoring -> False] // AbsoluteTiming // First
- ```
-* Improved `FCPrepareFAAmp` to handle `FASclarProduct` (thanks to Francesco S). (16671c9)
-* Refactored `EpsChisholm`. (8287f45)
-* Removed `LeviCivitaSign` option from `DiracTrace`, `TR` and `Chisholm`. Instead the value should be set through `$LeviCivitaSign`. A more user-friendly configuration might be added in future. (0551b73)
-* Fixed inconsistent treatment of `$LeviCivitaSign` when it set not to the default value (thanks to Christopher Lester). (e05ed33); Example:
- ```
- $LeviCivitaSign = -I;
- DiracReduce[GA[i1, i2, 5]]
- ```
-* Refactored `Chisholm` and added the `LeviCivitaSign` option (thanks to Christopher Lester). (cb44558);
-* Version number bump to 9.1; Development versions are now extra indicated to avoid confustion with stable versions. (e0c75a6)
-* `Eps` should not evaluate to explicit values when it has integer arguments. The result is not-well defined when no distinction between upper and lower indices is made (thanks to Christopher Lester). (a4699d4); Example:
- ```
- Eps[0, 1, 2, 3]
- ```
-
-* Fixed a bug in `ApartFF` related to singular kinematica (thanks to Shaowu Zhang). (329d5d2); Example:
- ```
- FCClearScalarProducts[];
- ScalarProduct[k, k] = 0;
- ScalarProduct[p, p] = m^2;
- ApartFF[FAD[{q1, m}, {q1 - p}, {q1 - 2 p, m}, {q1 - k - 2 p, m}], {q1}]
- ```
-* Improved `FAPatch` to recognize that a `FeynArts`/`FeynRules` model have already been patched. (21f5783)
-* Fixed a bug (#issue 9) in `DoPolarizationsSums` (thanks to Luca Mantani). (8944ff3); Example
- ```
- ScalarProduct[p1, p1] = 0;
- DoPolarizationSums[Pair[Momentum[Polarization[p1, -I], D], Momentum[Polarization[p1, I], D]], p1, 0]
- ```
-* Fixed a small bug in `FCE` when applied to metric tensors with explicit Lorentz indices (thanks to Wen Chen). (a7d66ff); Example:
- ```
- FCE[Pair[ExplicitLorentzIndex[0], LorentzIndex[a]]]
- ```
-* Small fix in `Write2`. (b618ce9)
-* Introduced automatic ordering of masses in `B0` in the `PaVe` notation. (0fc0088); Example:
- ```
- PaVeReduce[PaVe[2, {p10, p12, p20}, {m1^2, m2^2, m3^2}]]
- ```
-* More debugging output in `OneLoop`. (e2ae9c9)
-* Fixed a bug in the definition of `A00`. (a8c783f); Example:
- ```
- $LimitTo4 = True;
- A00[m1^2]
- ```
-* Fixed a bug in `PaVeReduce` that prevented detection of zero Gram deteriminants in C and D functions. (55080de); Example
- ```
- PaVeReduce[PaVe[1, 2, {(p1 - p2)^2, p1^2, p2^2}, {m2^2, m1^2, m0^2}]]
- ```
-* Added `ToPaVe2`, a function that converts direct Passarino-Veltman functions like `A0`, `B1` etc. to `PaVe` ones. (913a50d); Example:
- ```
- B0[p^2,m1^2,m2^2]//ToPaVe2
- ```
-* Added an extra test to `SUNSimplify`. Confirms the result from (a355845)
-* Adjusted and extended `PaVe` related unit tests. (13987d1)
-* More cleanups in `PaVeIntegrals.m` (0bf24e7)
-* Moved extra simplifications of `B0` functions into `PaVeReduce`. (d21e164)
-* Cleanups in `PaVeIntegrals.m` (faf1f86)
-* Moved all the `$LimitTo4=True` simplifications out of `PaVe`. They are not applied, unless `PaVeAutoReduce` is set to `True`. (64cd9a4)
-* Added `A00`. (1c75e8b)
-* `PaVeAutoReduce` for `PaVe` functions is set to `False` by default. (4163a13)
-* `$LimitTo4` is splitted into `$LimitTo4` (for tadpoles and bubbles) and `$LimitTo4IRUnsafe` (for triangles and boxes). Also, the description of the option is now much less cryptic. (fcfe3e7)
-* Added the option `A0ToB0` directly to `PaVeReduce`. (547dacb)
-* Added some extra `B0`-cases to `PaVeReduce`. (bb535ec)
-* Added the option `PaVeAutoReduce` to `PaVeReduce`. (9ab155e)
-* Improved `PaVeReduce` to handle more different cases (also with zero Gram determinants). (18dcc4d)
-* Fixed a bug in `FCLoopSplit`. (961960b); Example:
- ```
- FCLoopSplit[+1/6 (m1^2 + m2^2) + A0[m2^2]/6 + 1/3 m1^2 B0[0, m1^2, m2^2] + +1/6 (m1^2 - m2^2) B1[0, m1^2, m2^2], {}]
- ```
-* Added `FCReplaceD`, a function that facilitates taking the limit D->4 without unwanted effects on the FeynCalc functions. (a49487e); Example:
- ```
- FCReplaceD[ScaleMu^(D - 4) SPD[p, p]*D, D -> 4 - 2 Epsilon]
- ```
-* Small fix in `FUnitTools` related to the recreation of typesetting tests. (c409a14)
-* Added a `CovariantD` with explicit fundamental color indices. Although it can't be used in FeynRule, it is still very useful when deriving Feynman rules by hand. (732a6a9); Example:
- ```
- CovariantD[i, SUNFIndex[a], SUNFIndex[b], Explicit -> True]
- ```
-* Improved typesetting of `QuantumFields`. Now it is possible to add more (custom) indices that will be typeset correctly. (4659077)
-* Added four new field types to be put into `QuantumField`: `QuarkFieldPsi`, `QuarkFieldPsiDagger`, `QuarkFieldChi`, `QuarkFieldChiDagger`. Currently, only typesetting is attached to them. (562d408)
-* `FCCanonicalizeDummyIndices` can now work also with SU(N) indices, as well as one custom index head (via `Head` option). (6eebc67); Example:
- ```
- FCCanonicalizeDummyIndices[T1[MyIndex[a], MyIndex[b]] v1[MyIndex[b]] v2[MyIndex[c]], Head -> MyIndex]
- ```
-* `FCFAConvert` can now rename also SU(N) indices by supplying the index names via `SUNIndexNames` and `SUNFIndexNames`. (90e3b59)
-* Adjusted `FDS` to be a bit smarter on 1-loop integrals with same masses. (ed92327); Example:
- ```
- FDS[Apart2[FAD[{qp, m}, {qp - q}, {qp, M, 2}, {qp - q, M, 2}]] - ApartFF[FAD[{qp, m}, {qp - q}, {qp, M, 2}, {qp - q, M, 2}], {qp}], qp]
- ```
-* Let `FCTraceExpand` set the PreservePropagatorStructures of internal `DotSimplify`. This (together with `DiracGammaExpand` set to `False`) seems to be the most convenient and sensible way to do expansions of `DiracTraces`. (b155314); Example:
- ```
- DiracTrace[((GSD[k + p] + M).GA[5].GSD[l - p].GAD[nu].(GSD[l] + M).GAD[la].GSD[k + l] + (GSD[k1 + p1] + M).GA[6].GSD[l1 - p1].GAD[nu].(GSD[l] + M).GAD[la].GSD[k1 + l1]).(GSD[x] + M)] // FCTraceExpand[#, DiracGammaExpand -> False] &
- ```
-* Some refactoring in `DiracSimplify`. Also `InsideDiracTrace` simplifications are now applied agagin after `DiracTrick`. (cd9d228); Example
- ```
- DiracSimplify[GA[i].(GS[p] + M).GA[j].GA[6].GA[k].GA[j],InsideDiracTrace -> True]
- ```
-* Added new option `PreservePropagatorStructures` to `DotSimplify`. If set to `True`, numerators of fermionic propagators like `(GS[p]+m)` that appear in chains of Dirac matrices will not be expanded. (4d9f34d); Example:
- ```
- DotSimplify[(GA[i].SUNT[a] (GS[p] + M).GA[j].GA[6].GA[k].GA[j] FAD[p + k, M] +
- GA[i].(GS[p1] + M).GA[j].GA[7].GA[j].GA[k] FAD[p1 + k, M]).(GS[q] + m).(GA[l].(GS[p] + M).GA[n] + GA[n].(GS[p] + M).GA[l]), PreservePropagatorStructures -> True]
- ```
-* Corrected a typo in `FeynCalc.m` (f840d00)
-* Improved debugging output in `OneLoop`. (ce133d6)
-* Added new option `FCCheckSyntax`. As checking the syntax in `DiracSimplify` slows things down a lot on big expressions, it is better to make it optional and turned off by default. (34e6aeb); Example
- ```
- DiracSimplify[SUNT[a] SUNT[b]]
- DiracSimplify[SUNT[a] SUNT[b], FCCheckSyntax -> True]
- ```
-* Fixed a bug in `DiracTrick` related to `$Larin=True` (thanks to Steffen Schwertfeger ) (03756b2); Example:
- ```
- $BreitMaison = False;
- $Larin = True;
- DiracTrick[GAD[a, b, c].GA[5].GAD[b, a, m]]
- ```
-* Fixed a minor bug in `TarcerToFC`. (cbf6334)
-* Added `TarcerToFC`, a small tool to convert integrals in the `Tarcer` notation to the `FeynCalc` notation. (fb06f22); Example:
- ```
- TarcerToFC[ Tarcer`TFI[D,Pair[Momentum[p, D], Momentum[p, D]], {0, 0, 3, 2,0}, {{4, 0}, {2, 0}, {1, 0}, {0, 0}, {1, 0}}], {q1, q2}]
- ```
-* Moved `FromTFI` to the `QCD` directory. (1fd22cf)
-* Fixed treatment of `FAD`'s with propagator powers equal to zero, i.e. `FAD[{q,m,0}]` now evaluates to `1`. (654f569); Example:
- ```
- FAD[{q1 - p, 0, 0}]
- ```
-* More debugging output in `PaVeReduce`. (cd4f508)
-* Some more cleanups in the source code of `TARCER`. (fc6851c)
-* Fixed a bug in `TARCER` related to wrong `tlrules` (thanks to Yan, http://www.feyncalc.org/forum/1060.html) (19a53ff); Example:
- ```
- TarcerRecurse[
- TFI[D, Pair[Momentum[p, D], Momentum[p, D]], {0, 0, 3, 2, 0}, {{4, 0}, {2, 0}, {1, 0}, {0, 0}, {1, 0}}]]
- ```
-* Small cleanups in tlrules in `TARCER`. (1be65e1)
-* Fixed a small bug in `FeynRule`. (87315c0) Example:
- ```
- FeynRule[2*(QuantumField[AntiQuarkField].LeftRightPartialD[
- + i1].QuantumField[QuarkField]), {QuantumField[QuarkField][p1],
- +QuantumField[AntiQuarkField][p2]}]
- ```
-
-* Updated the `FeynCalc` startup message. (ac87b5d)
-* Removed the `eps(l)^mu eps(l)_mu = -1` rule, which is not compatible with D-dimensional polarization vectors (thanks to keith-hamilton for reporting Issue #8). (56482a9); Example:
- ```
- SPD[p1, p1] = 0;
- SPD[p2, p2] = 0;
- Pair[LorentzIndex[Subscript[\[Alpha], 1], D], Momentum[Polarization[p1, I, Transversality -> True], D]] Pair[LorentzIndex[Subscript[\[Alpha], 1], D], Momentum[Polarization[p1, -I, Transversality -> True], D]] Pair[LorentzIndex[Subscript[\[Alpha], 2], D], Momentum[Polarization[p2, I, Transversality -> True], D]] Pair[LorentzIndex[Subscript[\[Alpha], 2], D], Momentum[Polarization[p2, -I, Transversality -> True], D]] // DoPolarizationSums[#, p1, n, Contract -> False] & // DoPolarizationSums[#, p2, n, Contract -> False] & // Contract
- ```
-* Added a unit test for `OneLoop` (thanks to Yi-Bo Yang). (1d0f03e)
-* Added unit tests for `PairContract`. (a578fb1)
-* Set `PairContract[0,x]` to `0`. (e588312)
-* Fixed a bug in the handling of `PairContract` heads in the input of `Contract`. (f1cd4a5); Example:
- ```
- Contract[PairContract[LorentzIndex[i, D], Momentum[p, D]]]
- ```
-* Some extra debuggin output for `OneLoop`. (a7aefb7)
-* Modified the syntax of `DiracGamma`. From now we have `DiracGamma[0] === 0`. It is also forbidden to enter things like `DiracGamma[1]`, `DiracGamma[2]`, `DiracGamma[3]` etc. Instead, one should use `DiracGamma[ExplicitLorentzIndex[1]]` etc. Of course, `DiracGamma[5]`, `DiracGamma[6]` and `DiracGamma[7]` are still allowed. (537e019)
-* All model parameters like masses, coupling constants and mixing angles can be now represented via `SMP[par]`. `FeynArts` patching was updated accordingly. `FCFAConvert` will introduce `SMP` objects if the option `SMP` is set to `True`. (29b8535)
-* Refactored `FAPatch`. Also added the option `PatchModelsOnly` to patch only the model files in the `FeynArts` `Models` directory (thanks to Xing-Bo Yuan for the suggestion). (da16d74)
-* Adjusted `FCFAConvert` and `FCPrepareFAAmp` to work with amplitudes generated by unpatched `FeynArts`. (0826e85)
-* Fixed `DiracSpinor` to `Spinor` conversion. (1aeca0a); Example
- ```
- DiracSpinor[p, m]
- ```
-* Updated `.gitignore`. (701faa9)
-* Added 3 more tree level QCD examples for photon gluon, photon quark and quark antiquark processes. (ae26f38); See `Examples/QCD/QCDGammaStarGToQiQBari.m`, `Examples/QCD/QCDQiGammaStarToQiGTree.m`, `Examples/QCD/QCDQiQBariToGammaStarGTree.m`
-
-* Added `FCCanonicalizeDummyIndices`, a function that canonicalizes dummy Lorentz indices. (0c877bd); Example
- ```
- FCCanonicalizeDummyIndices[Uncontract[SP[q, p]^4, q, p, Pair -> All], LorentzIndexNames -> {mu, nu, rho, si}]
- ```
-
-* Added ABJ anomaly example to the test suite. (36fae9b)
-* Some improvements in the documentation. (479b773)
-* Added an extra Contract to `FCMultiLoopTID`. (41b84b3); Example
- ```
- FCMultiLoopTID[FVD[q1, mu] FVD[q2, nu] LCD[mu, nu][a,b] FAD[{q1 - p1, m1}, {q2 - p2, m2}, {q1 - q2}], {q1, q2}]
- ```
-* Improved Documentation for `TID`. (0aff5ff)
-* Added a unit test for `ToPaVe` in `TID`. (8d072c0)
-* Add an option `Head` to `Collect2` that allows to wrap prefactors into the given Head. (57decb6); Examples:
- ```
- Collect2[Expand[(a + b + c)^2 (b + d)^3], {a, d}, Head -> hh]
- ```
-* Improved `ApartFF` (actually `FCApart`) to set loop integrals that vanish in DR to zero by default. Not having this was an omission in the original implementation. The "old" behavior can be recovered by setting the option `DropScaleless` to `False`. (8e859cb) ; Examples:
-
- ```
- FCApart[FAD[{p, m0}, {-k1 + p, m1}] SPD[k1, p]^2 SPD[p, p], {p}, FDS -> False]
- FCApart[FAD[{p, m0}, {-k1 + p, m1}] SPD[k1, p]^2 SPD[p, p], {p}, FDS -> False, DropScaleless -> False]
- ```
-
-* Block wrong syntax in `ApartFF`. (d48a409); Examples:
- ```
- ApartFF[SPD[q, q] FAD[{q, m}], q]
- ApartFF[SPD[q, q] FAD[{q, m}], {q}]
- ```
-* Minor improvement in `FCLoopIsolate`. (3a75ac2)
-* Even more improvements for the options parsing in `Contract`. (0431062)
-* Improved `Contract` to contract multiple occurence of Eps tensors in a more efficient way. Thanks to Jos Vermaseren for the useful explanation. (5b28976); Example:
- ```
- Contract[LC[i1, i2, i3, dum1] LC[i4, i5, i6, dum1] LC[i10, i11, i12, dum2] LC[i7, i8, i9, dum2]] // FCE
- ```
-* Some cleanups in `Contract.m` (mostly just spacing.) (5ce91d9)
-* Some more improvements in the options parsing and debugging output in `Contract`. (61506cb)
-* Some improvement in the options parsing in `Contract`. (b2e94a5)
-* Small fix in `Isolate`. (ac994f3)
-* Fixed a bug in `DiracSimplify` with `DiracSubstitute67` not being applied to spinor chains. (7f9204c); Examples:
- ```
- DiracSimplify[Spinor[-Momentum[p2], 0, 1].GS[Polarization[k1, -I]].GS[k1].GS[Polarization[k2, -I]].GA[7].Spinor[Momentum[p1], 0, 1], DiracSubstitute67 -> True]
- ```
-* Refactored `ToLarin`. (f937c6b)
-* Removed premature memoization in `DiracTrace`. This doesn't really give a performance gain but rather causes a lot of problems with different gamma^5 schemes. Now we memoize only where it is necessary and safe. (b96cbe9)
-* Added an example for the calcuation of the Adler-Bell-Jackiw anomaly in QED. (8d28e06); See `Examples/QED/QEDABJAxialAnomaly.m`
-* Some refactoring and performance improvements in `Contract`. (ccb705b)
-* Improved calculation of chiral traces in 4 dimensions. (0ab7ee4)
-* Degraded `$West` to `West`, which is now an option of `DiracTrace` and `TR`. Also, `West` has now no effect on the calculations of the chiral traces in 4 dimensions. (033bd54); Examples:
- ```
- $BreitMaison = True;
- DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True] // Factor2
- DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True, West -> False] // Factor2
- DiracTrace[GA[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True] // Factor2
- DiracTrace[GA[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True, West -> False] // Factor2
- ```
-* Some performance improvements in `DiracTrace`. (d9748c9)
-* Some refactoring and better debugging output in `DiracTrace` and `TR`. (0ccf4d9)
-* Some refactoring and better option parsing in `DiracSimplify`. (beffe33)
-* Ensured that Tr[T^a]=0 where T^a is a single color matrix in the fundamental rep is always applied on the level of SUNTFs. (b1e777e); Example:
- ```
- FCI[SUNTF[a,x,x]]
- ```
-* Added the options `EpsEvaluate` and `ToPaVe` to `TID`. (69539b9)
-* Fixed a bug in `TID` (missing `Contract` at the beginning) reported by YI-Bo Yang. (b78bb62); Example:
- ```
- TID[FAD[{q, m}] FV[q, i]^2 FV[q, j] FV[q, k], q]
- ```
-* Fixed a bug in `FCE` related to `ExplicitLorentzIndex` (thanks to Wen Chern). (ab5f6c1); Example:
- ```
- Eps[ExplicitLorentzIndex[0], ExplicitLorentzIndex[1], Momentum[p],Momentum[q]]//FCE
- ```
-* Added the option `BReduce` to `PaVeReduce`. Set to `False` by default. (e11575); Example:
- ```
- Factor2[(B1[p^2, m0^2, m1^2] // PaVeReduce[#, BReduce -> True] &)]
- ```
-* Improved `FCTraceExpand` to use `DiracGammaExpand` and `FCTraceFactor`. (770810d); Examples:
- ```
- FCTraceExpand[DiracTrace[GS[p + b]]]
- FCTraceExpand[DiracTrace[GS[p + b]], DiracGammaExpand -> False]
- ```
-* Fixed mixing of dimensions in shifts of `FDS` (affected `Eps` tensors contracted with loop momentum). (7840801); Example:
- ```
- FDS[LC[][p1, p2, p3, l] FAD[{l - p, m}, {l + q, m}, l - t], l] // FCE
- ```
-* Set `$LimitTo4=False` as default. Otherwise, IR divergent C-functions might lead to inconsistencies. (2629530)
-* Added `EpsilonUV` and `EpsilonIR` to be able to distinguish between UV and IR divergences in dim reg, when this is needed. Currently those are just placeholders with attached typesetting. (c391187)
-* Added a new option `IsolateFast` to `Isolate`. This way one can isolate special types of very large expressions in a much faster way. (1c0c0e6); Examples:
- ```
- Isolate[Total[Table[Sqrt[TZ[i] + 2 ZZ[i]]/+HH[ToString[i] + ToString[i + 2] + ToString[i + 4]], {i, 1,100}]]] // AbsoluteTiming
- Isolate[Total[Table[Sqrt[TZ[i] + 2 ZZ[i]]/+HH[ToString[i] + ToString[i + 2] + ToString[i + 4]], {i, 1,100}]], IsolateFast -> True] // AbsoluteTiming
- Isolate[Total[Table[Sqrt[TZ[i] + 2 ZZ[i]]/+HH[ToString[i] + ToString[i + 2] + ToString[i + 4]], {i, 1, 10000}]], IsolateFast -> True] // AbsoluteTiming
- ```
-* Added the option `FinalSubstitutions` to `FCFAConvert`. (183e102)
-* Made `MT`, `MTD` and `MTE` orderless. (bb49ab6); Example:
- ```
- MT[a, b] === MT[b, a]
- ```
-* Fixed a small bug in `Isolate`. (d8de71b); Example:
- ```
- Isolate[-1 x]
- ```
-* Made `Expand2` faster recognize that the expression is already fully expanded. (37a5728)
-* Refactored `Collect2` and improved the performance on large expressions by switching to `CoefficientArrays`. (bff4790)
-* Fixed a small bug in `FeynmanParametrize`. (2c44965)
-* Refactored the unit testing framework to work as a bash script without Wolfram Workbench. Mathematica 8 and 9 require `MUnit` that can be pulled out of the WWB files. (ee7068c); Examples (under Linux):
- ```
- inttetsts.sh math
- inttetsts.sh math Lorentz
- inttetsts.sh math Dirac
- inttetsts.sh math Loop
- examples.sh
- ```
-* Improved `FCApart`'s internal algorithm and added new option `MaxIterations` to break the fractioning after a given number of iterations. (1225fe1); Example:
- ```
- FCApart[SPD[k1, p] SPD[p, p] FAD[{p, m0}], {p}, MaxIterations -> 1, FDS -> False]
- FCApart[SPD[k1, p] SPD[p, p] FAD[{p, m0}], {p}, MaxIterations -> 2, FDS -> False]
- ```
-* Added `FCGetDimensions`, an auxiliary function for checking the dimensionality of the expression. (fd5621b); Example:
- ```
- FCGetDimensions[{FV[p, mu], FVD[p, mu], FVE[p, mu]}]
- ```
-
-* Fixed wrong context in the unit tests for `FourLaplacian`. (b8562dd)
-* Added `FCTraceFactor` for factoring constants out of `Dirac` traces. (a04902b); Example:
- ```
- FCTraceFactor[DiracTrace[(a + b).(a - b).DiracTrace[GA[i].c.GA[j]].(a + b)]]
- ```
-* Fixed a bug in `Write2` related to `FortranFormatDoublePrecision` (thanks to Wen-Long Sang). (ea03857); Example:
- ```
- Write2["sang.abc", abc = 0.6*(-8 + 12 Log[5 + y[1]]), abc1 = 1/x^(2/3), FormatType -> FortranForm, Precision -> 10];
- Import["sang.abc", "Text"]
-
- Write2["sang.abc", abc = 0.6*(-8 + 12 Log[5 + y[1]]), abc1 = 1/x^(2/3), FormatType -> FortranForm, Precision -> 3];
- Import["sang.abc", "Text"]
-
- Write2["sang.abc", abc = 0.6*(-8 + 12 Log[5 + y[1]]), abc1 = 1/x^(2/3), FormatType -> FortranForm, FortranFormatDoublePrecision -> False];
- Import["sang.abc", "Text"]
- ```
-
-
-* Improved `FCI` convertion of `FeynAmpDenominator`'s with dimensions other than `D`. (fa58485); Example:
- ```
- FCI[FCI[FAD[q1, {-p + q1, m}, Dimension -> 4]]]
- ```
-
-* Added `FCTraceExpand`, a function that expands traces without evaluating them. (a9e8745); Example
- ```
- FCTraceExpand[DiracTrace[GA[i, i] + GA[j, j].DiracTrace[GA[a] + GA[b]]]]
- ```
-* Integrated FeynCalcManual.nb into main documentation. (10c5210)
-* Catch wrong expressions like `Momentum[LorentzIndex[mu]]` or `LorentzIndex[Momentum[p]]` and warn the user immediately. (15fa095)
-
-### Version 9.0.1 (2016)
- * For publishing reasons, the license has been changed from LGPL 3 to GPL 3
- * Fixed bugs that were discovered since the relese of FeynCalc 9.0.0
- * Converted an example of using Integrate2 from FeynCalcManual.nb to a proper .m file
-
-### Version 9.0.0 (2016)
-
- * Introduced `FCFAConvert` for automatic conversion of the CreateFeynAmp
- output into FeynCalc input.
- * Added `FCMultiLoopTID` for tensor decomposition of multiloop integrals.
- * Documentation ported from the old HelpBrowser to the new Documentation Center.
- * Make entering of `FAD`'s with propagators that have exponents simpler.
- Now to enter e.g. `FAD[q,{q,m},{q,m},q-p,q-p,q-p]` one can simply write `FAD[q,{q,m,2},{q-p,0,3}]`.
- * `ApartFF` is the new powerful replacement for `SPC` and `Apart2`. It uses `FCApart` as a backend and works for multiloop integrals. The "FF" in the name of the function is to honour Feng Feng, the author (arXiv:1204.2314) of the algorithm used in `FCApart`.
- * Added Added `FCApart` for partial fractioning loop integrals with linearly dependent propagators. The algorithm comes from the work of Feng Feng (arXiv:1204.2314).
- * Added `FCLoopExtract`, a new helper function for extracting loop integrals from the given expression.
- * Added `FCLoopBasisIncompleteQ`, `FCLoopBasisOverdeterminedQ` and `FCLoopBasisFindCompletion` for studying the space formed by the propagators of the given loop integral.
- * Now it is finally possible to enter `FAD`s also like `FAD[{q, m}, {q, m}, {q + p - k}]` where the last propagator is massless.
- * Improved `PaVe` to set scaleless integrals to zero.
- * New add-on `FUnitTools` for working with unit tests.
- * Added possibility to set scalar products directly via `SP`, `SPD` and `SPE`.
- * Added `TFIOrder` that can exploit some symmetries between Tarcer's scalar 2-loop integrals `TFI`.
- * Many improvements to `ToTFI` (thanks to Anne Ernst!)
- * Add new option `MultiLoop` to `FCLoopIsolate`. This allows to isolate only those integrals that depend on all of the loop momenta.
- * `$DisableMemSet` can be used to deactivate `MemSet`,
- * New option `PDEHeads` for `PropagatorDenominatorExplicit`. It allows to wrap what used to be `FAD` into used defined heads, so that one can can
- better keep track of scalar products that come from the denominator.
- * Spinors can be now D-dimensional
- * Added `$FCCheckProgress` to activate `FCMonitor` when needed. Note that `FCMonitor` slows things down for simple calculations, so it is better to activate it only for large expressions. Here is an example of activating FCMonitor (curently only TID supports it)
- ```
- int = -EL^3 Spinor[Momentum[p2, D], ME, 1].GAD[Lor3].(ME + GSD[p2 + q]).GAD[Lor1].(ME +
- GSD[p1 + q]).GAD[Lor3].Spinor[Momentum[p1, D], ME, 1] FAD[{p1 + q, ME}, {p2 + q, ME}, q];
- $FCCheckProgress = True;
- TID[int, q]
- ```
-
- * Added `FCSplit` for splitting expressions into pieces that contain given variables and pieces that do not. `FCSplit[expr,{v1, v2, ...}]` splits `expr` into pieces that are free of any occurence of `v1`, `v2`, ... and pieces that contain those variables. This works both on sums and products. The output is provided in the form of a two element list. One can recover the original expression by applying `Total` to that list. For example
- ```
- FCSplit[(z + a)^2 + (z + b)^2, {z}]
- FCSplit[(z + a)^2 + (z + b)^2, {a}]
- FCSplit[(z + a)^2 + (z + b)^2, {b}]
- ```
-
-
- * Introduced `$DisableMemSet` for deactivating `MemSet`, which is often needed for debugging.
- * Added a new option `PDEHeads` to `PropagatorDenominatorExplicit`. It allows to wrap what used to be `FAD` into user defined heads, so that one can better keep track of scalar products that come from the denominator.
- * Allowed spinors to depend on D-dimensional external momenta to be compatible with the CDR scheme. `ChangeDimension` now doesn't force the spinors to depend only on 4-dimensional momenta.
- * Introduced `FCLoopCanonicalize` and `FCLoopSolutionList`, that are useful for canonicalizing free Lorentz indices of 1-loop tensor integrals. See [https://github.com/FeynCalc/feyncalc/blob/master/Tests/LoopIntegrals/FCLoopCanonicalize.test] and
- [https://github.com/FeynCalc/feyncalc/blob/master/Tests/LoopIntegrals/FCLoopSolutionList.test] for examples.
-
- * Introduced `FCLoopIsolate` and `FCLoopSplit`. These two functions should facilitate manipulation, separation and sorting of arbitrary loop integrals in the given expressions. `FCLoopSplit[expr,{q1,q2,...}]` separates `expr` into following four pieces:
- * terms that are free of loop integrals
- * terms with scalar loop integrals
- * terms with tensor loop integrals, where all loop momenta are contracted
- * terms with tensor loop integrals, where at least some loop momenta have free indices
- The result is returned as a list with the 4 above elements. For example
-
- ```
- FCLoopSplit[zzz + (FVD[q, mu] FVD[p, mu] a + SPD[p, q] b) FAD[q, q + p] + yyy FAD[{q, m}], {q}]
- ```
-
- `FCLoopIsolate[expr,{q1,q2,...}]` wraps loop integrals into heads specified by the user. This is useful when you want to know which loop integrals appear appear in the given expression. For example,
-
- ```
- FCLoopIsolate[zzz + (FVD[q, mu] FVD[p, mu] a + SPD[p, q] b) FAD[q, q + p] + yyy FAD[{q, m}], {q}]
- ```
-
- * Added new options `PaVeAutoReduce` and `PaVeAutoOrder` that can be used to inhibit automatic reduction of A and B coefficient functions into `A0` and `B0`. Compare e.g.
- ```
- PaVe[0, 0, {p}, {m, m}]
- ```
-
- to
-
- ```
- PaVe[0, 0, {p}, {m, m}, PaVeAutoReduce -> False]
-
- ```
-
- * New function `FCDeclareHeader` to be used for FeynCalc add-ons that go into the `AddOn` directory.
-
- * Some functions now support a new function `FCVerbose` that allows a more concise debugging output as compared to using `$VeryVerbose`. For example
- ```
- TID[FVD[q, mu] FVD[q, nu] FAD[q, {q + p, m}], q, FCVerbose -> 3]
- ```
-
- * Added an option `IsolateNames` to `FRH` to enable applying `ReleaseHold` only on specified `HoldForm` expressions. Compare e.g.
- ```
- iso = Isolate[(a + b) F[q], q, IsolateNames -> KK1] + Isolate[(c + d) F[q1], q1, IsolateNames -> KK2];
- FRH[iso]
- ```
- with
- ```
- FRH[iso, IsolateNames -> KK1]
- FRH[iso, IsolateNames -> KK2]
- FRH[iso, IsolateNames -> {KK1, KK2}]
- ```
-
- * Added new option `ExcludeMasses` for `Apart2` to disable factoring and not to apply partial fractoning on propagators that contain specified masses. This gives you a more fine
- grained control of partial fractioning. Compare e.g.
- ```
- Apart2[FAD[p, {p, m1}, {p, m2}]]
- ```
-
- to
-
- ```
- Apart2[FAD[p, {p, m1}, {p, m2}], ExcludeMasses -> {m1}]
- ```
-
- * Added options `$TypesettingDim4`, `$TypesettingDimE` and `$TypesettingDimD` to modify the typesetting of momenta, Dirac matrices, metric tensors and polarization vectors in `4`, `D-4`, and `D`-dimensions.
- For example, now you can do `$TypesettingDim4="";` to remove bars from 4-dimensional objects. Thanks to Yu Lu for the suggestion.
-
- * You might have been wondering, why FeynCalc must be installed to the directory `HighEnergyPhysics` and not just `FeynCalc`. Well, this used to be liked that for some legacy reasons but is actually not necessary nowadays. From now on FeynCalc lives in `FeynCalc` and it is started simply via ```<ToExpression[x]}`. We understand that this additional step may pose some inconveniences to you, but from the point of view of Mathematica programming and interoperability between different packages, this solution seems to be the cleanest way to avoid troubles in future.
+ FCGetDiracGammaScheme[]
- For example, ```Lagrangian["QCD"]``` now returns
-```
--(1/4) FieldStrength[FCGV["\[Alpha]"], FCGV["\[Beta]"],
- FCGV["a"]].FieldStrength[FCGV["\[Alpha]"],
- FCGV["\[Beta]"], FCGV["a"]]
-```
- instead of
-```
--(1/4) FieldStrength[\[Alpha], \[Beta], a].FieldStrength[\[Alpha], \[Beta], a]
-```
- as it used to be. Now suppose that before invoking Lagrangian["QCD"] you defined \[Alpha] = 1/137. With the new output using FCGV nothing changes. With the old output
- you would have got
-```
--(1/4) FieldStrength[1/137, \[Beta], a].FieldStrength[1/137, \[Beta], a]
-```
- which is clearly not what you want.
+ * Example: Show available g^5 schemes
- * To circumvent problems related to the patching of FeynArts, from now on FeynCalc will look for FeynArts only in the directory `FeynArts`
-inside `FeynCal`. Nevertheless, it is still possible to specify an alternative directory by setting ```FeynCalc`$FeynArtsDirectory="path"``` before loading FeynCalc. The patching code was moved to FeynCalc, i.e. now it will run even when Phi is not loaded.
+ ?FCSetDiracGammaScheme[]
- * The TARCER notebook have been converted into a source file (`TARCER.m`). Furthermore, generated TARCER*.mx files are not distributed anymore with the source code. When you first try to load TARCER, a dialog will appear with the suggestion to generate the .mx file now. This process has to be done only once and takes only a couple of minutes. After that, the generated .mx will be automatically loaded whenever you want to use TARCER.
+ * Example: Switch to the BMHV scheme
- * Prior to this commit FeynCalc used to switch the format of output cells to `TraditionalForm`. Now it will only issue a warning message suggesting the user to do this by himself or herself. Such messages can be disabled by setting `$FCAdvice` to False. So if you despise all the fancy typesetting and prefer to work with `StandardForm`, FeynCalc will respect your decision.
+ FCSetDiracGammaScheme["BMHV"]
- * To avoid clashes with built-in functions of recent Mathematica versions, we had to rename some FeynCalc functions:
- * `PartialD` -> `FCPartialD`
- * `Symmetrize` -> `FCSymmetrize`
- * `AntiSymmetrize` -> `FCAntiSymmetrize`
+ * Example: Switch to the NDR scheme
-* To avoid further confusion about the handling of Dirac Gamma 5 in FeynCalc, it is now forbidden to enter
-g^5 or the chiral projectors g^6 and g^7 as D-dimensional objects. Hence,`GAD[5]` or `DiracGamma[5,D]` will now generate error messages. This is not really a significant change, since before FeynCalc would silently convert `GAD[5]` to `GA[5]` without issuing any warnings, contrary to what the user might have expected from entering `GAD[5]`. The thing is that internally, FeynCalc always works with `DiracGamma[5]`. As far as dimensional regularization is concerned, the scheme to handle g^5 is determined by the values of `$BreitMaison` and `$Larin` and not by the dimension of g^5. Even in NDR, where g^5 is normally assumed to be D-dimensional, FeynCalc uses just `DiracGamma[5]`. Note that this is just a technicality of the implementation, nothing really related to physics.
+ FCSetDiracGammaScheme["NDR"]
-* Tensor decomposition routines have been updated to improve performance and usability. Before actually performing the decomposition, `Tdec` will now first check `TIDL` (Tensor Integral Decomposition Library) to see if the required integral is already contained there. If yes, the formula will be fetched from there. This behavior is controlled by the new option `UseTIDL` which is set to `True` by default. Furthermore, `Tdec` can now recognize symmetries in the indices of 1-loop integrals which significantly speeds up the computations. For multiloop integrals the symmetries recognition is not implemented yet. Another turbo for `Tdec` is the option `UseParallelization` (`True` by default) that activates parallelization code in the solver of linear equations `Solve3`. This can make things up to 40% faster and works for all kinds of integrals. Last but not least, a couple of new decompositions have been added to TIDL, just in case.
+* Added a new scheme for handling g^5: `"NDR-Drop"`. It is like `"NDR"` but all the remaining traces with one g^5 (that NDR can't evaluate) are set to zero. It is meant to be applied in calculations where we know in advance that g^5 does not pose any issues. (031368f5)
-* Fixed a bug in `DoPolarizationSums` [reported](http://www.feyncalc.org/forum/0853.html) by Kyrylo Bondarenko.
+* Modified `ComplexConjugate` to automatically apply `FCRenameDummyIndices`. This can be turned off using the option named the same way. (d7708286)
-* Adjusted the typesetting of SU(N) objects such that adjoint indices are now always upstairs while the fundamental indices are downstairs.
-* Added additional SU(N) objects to work with SU(N) T-matrices that have explicit fundamental indices. See
-the [announcement](http://www.feyncalc.org/forum/0843.html) on the mailing list for more details.
-* Added examples for computing 2->2 tree level parton processes in QCD.
-* Imporved DoPolarizationSums to handle massive and massless vector bosons in a proper way. See
-the [announcement](http://www.feyncalc.org/forum/0843.html) on the mailing list for more details.
-* Updated `FCPrepareFAAmp` to handle the main steps in converting the output of FeynArts to FeynCalc. See the updated wiki [page](https://github.com/FeynCalc/feyncalc/wiki/FeynArts#fatofc) for more details.
+* The default behavior of `DiracSimplify` was changed to automatically evaluate Dirac traces. Now there is no need to use the replacement `DiracTrace->Tr` (b74b4c20)
-* Fixed a bug in `FourDivergence` (actually in `Contract`) [reported](http://www.feyncalc.org/forum/0755.html) by Sun.
+ * Example: Evaluate a Dirac trace using `DiracSimplify`
-* Added typesetting for `AlphaStrong` (QCD coupling constant) and `AlphaFS` (fine-structure constant).
+ DiracTrace[GA[a,b,c,d]] // DiracSimplify
-* Handling of algebraic simplifications for Dirac matrices in `DiracTrick` has been reworked to improve performance and provide better support for the Breitenlohner-Maison-'t Hooft-Veltman scheme.
+* Vectors in the `FeynCalcExternal` representation that contain a minus sign will have it factored out automatically, so that e.g. `FV[-p,mu]` will become `-FV[p,mu]`. (249d8b22)
-* Fixed a bug in `PowerSimplify` [reported](http://www.feyncalc.org/forum/0815.html) by Sun Qingfeng
+* Changed the handling of the output format type to address the issue #30 (9f409e1f). In particular, `FeynCalc` will now change only the output format of the current front end session, not the global `Mathematica` option as before. This behavior is controlled by the new global option `$FCTraditionalFormOutput`. The default value is `False`. One can load `FeynCalc` with the `TraditionalForm` typesetting via
-* * Improved `EpsEvaluate` to always expand sums of momenta as [requested](http://www.feyncalc.org/forum/0812.html) by Lingxiao Xu.
+ $FCTraditionalFormOutput = True;
+ << FeynCalc`
-* Improved TraditionalForm formatting of metric tensors, vectors, Dirac matrices, Dirac slashes and scalar products. Now all 4- and D-4-dimensional quantities are displayed with a bar or a hat respectively on top of the symbol. The D-dimensional quantities remain as they are. This change allows to easily distinguish between D- , 4- and D-4-dimensional objects without deactivating TraditionalForm.
+ Or one can also write `$FCTraditionalFormOutput = True` to `FCConfig.m` so that this value will be set each time `FeynCalc` is loaded. Finally two new functions `FCDisableTraditionalFormOutput[]` and `FCEnableTraditionalFormOutput[]` allow to switch between `StandardForm` and `TraditionalForm` on the fly
-* Introduced `FeynCalcInternal` shortcuts for D-4-dimensional metric tensors (`MTE`), vectors (`FVE`), Dirac matrices (`GAE`), Dirac slashes (`GSE`) and scalar products (`SPE`).
+ * Example: Switch between different output formats in a `FeynCalc` session
-* Extended polarization vectors to allow for vectors that are not transverse, i.e. not orthogonal to their momentum. This behavior is controlled by the option `Transversality` that applies to `Polarization` and `PolarizationVector`.
+ < "FCMetricTensor", "Factor1" -> "FCFactor1", "Factor2" -> "FCFactor2"};
+ << FeynCalc`
+
+ FCDisableTraditionalFormOutput[]
+ (* Output format changed to StandardForm for the current session *)
+
+* Moved the loader of `TARCER` into a separate file. So we can (and should) load `TARCER` via `$LoadAddOns={"TARCER"}`. The old `$LoadTARCER` is now deprecated. Reason: More consistency when loading additional packages that interact with `FeynCalc` (851efb72)
-### Version 8.2.0 (2012)
+ * Example: Load `FeynCalc` and `TARCER`
-* Added **FeynArts 3.7** - unpatched. On first load it will be patched automatically.
-* When running the first time set *$LoadPHI=True* before executing
- Needs``` [HighEnergyPhysics`FeynCalc`]```, then it will be patched automatically.
-* Updated **PHI** to work with **FeynArts 3.7**, which can now be kept in a subdir.
+ $LoadAddOns={"TARCER"}
+ <2`. (45496b34)
+* Removed `$SpinorChainMinimal` and `ChisholmSpinor`. (153c344d)
+* Removed the option `Dimension` in `Eps`. Reason: `Eps` is an `FCI` object so that the dimension of the indices or momenta is always unambiguous (a82bb76e)
+* Removed `MomentumCombine2`. Reason: it only duplicated `MomentumCombine`. (4233f90e)
+* Removed `Upper`, `Lower`, `Contract1`, `$Covariant` and `$LorentzIndices`. Reason: With the introduction of Cartesian tensors in `FeynCalc` 9.3, there is no more ambiguity regarding the positions of the indices. Moreover, `Upper` and `Lower` never were fully integrated into `FeynCalc`. (76a6ae59) (9a3ba199)
+* Removed `CrossProduct`, `DotProduct` and `ThreeVector`. Reason: Now that we have native support for symbolic Cartesian vectors, they are not needed anymore. (4c7ff29a)
+* Removed the typesetting option `$PairBrackets`. Reason: The option is obsolete. Once a scalar product is multiplied by something else, it will automatically have brackets around it, so that setting `$PairBrackets=True` is never needed. (7d3e6eef)
+* Removed `DiracSimplify2`. Reason: All settings related to gamma_5 should be handled by setting a suitable scheme. Otherwise, inconsistencies are unavoidable. (80f64f83)
+* Removed `UVPart`. Reason: In the current form it is useless and wrong (thanks to M. Beneke for the suggestion). It was replaced by `PaVeUVPart` (cebaf7a5)
+* Eliminated `TemporalIndex[]`. Reason: There is really no point to reinvent the wheel and use this peculiar object instead of just `LorentzIndex[0]`. No harm done, since the name `TemporalIndex` never maid it into a stable version (3be9fee8)
+* Removed the option `DenominatorOrder` option from `OneLoop`. Reason: ongoing progress in the attempts to refactor `OneLoop` (26641c4c)
+* Removed the option `ChangeDimension` from `TID`. Reason: Automatic or implicit changes of the dimension are dangerous and may easily to unwanted side effects or even inconsistent results. It is better to avoid that completely. (6fbd3f22)
+* Removed `FCMonitor` and `FCMonitorStub`. Reason: They are not used in `TID` anymore. (8e4b3ffa)
+* Removed `MakeFeynCalcPrivateContext` and `$IndexPrefix`. Reason: Some very old routines that were largely obsolete already in the version 9. (c7510662)
+* Removed the legacy syntax of `DiracTrick`, where one could enter Dirac matrices without `DOT`s. (69957a9f)
+* Removed the unfinished experimental function `SquareAmplitude2`. Reason: It never became sufficiently stable and ready to be used and hence was also never mentioned in the documentation. (ee1149f7)
-* Minimal updates for **Mathematica 8.0**.
-* Added a patched o **FeynArts 3.4**.
+---
-### Version 7.0.0 (2009/2010)
+* Renamed the option `DiracSimpCombine` of `DiracSimplify` to `DiracGammaCombine`. (6da10564)
+* Renamed the `DiracCanonical` option of `DiracSimplify` to `DiracOrder`. (7fc6846e)
+* Renamed the option `SpinPolarizationSum` of `FermionSpinSum` to `Head`. (c56581f6)
+* Renamed `MemoryAvailable` and `$MemoryAvailable` to `FCMemoryAvailable` and `$FCMemoryAvailable`. Reason: `MemoryAvailable` is a system variable since `Mathematica` 11.0. (3c18c338)
+* Renamed `PropagatorDenominatorExplicit` to `FeynAmpDenominatorExplicit`. Reason: more consistent naming scheme. This way it fits to other functions that start with `FeynAmpDenominator`. Of course, `PropagatorDenominatorExplicit` still works in order not to break the existing codes. (8bfefcda)
+* Renamed `SquareAmplitude` to `SquareAmplitude2`. Reason: `SquareAmplitude2` is an experimental function that never became sufficiently stable. The name `SquareAmplitude` will be used for a different function. (23667615)
+* Removed a call to `ChangeDimension` from `Explicit`. Reason: The `Dimension` option should already handle this, so that we don't need to call another function. (d1dd1def)
+* Renamed the `PDEHead` option in `FeynAmpDenominatorExplicit` to `Head`. (51fc4da4)
-* Bug fixes.
-* Updates for **Mathematica 7.0** and new **FeynArts**.
-
-### Version 6.0.0 (2007)
-
-* Bug fixes.
-* Updates for **Mathematica 6.0** and new **FeynArts**.
-* For **Mathematica 6** only. Rolf patched **FeynCalc** to be compatible with **Mathematica 6** (not **PHI**, not **FeynArts**) and zipped it together, including fully evaluated documentation notebooks in *HighEnergyPhysics/Documentation/English/*. Notice that this version does not load **PHI** nor **FeynArts** by default. Notice also that the changes are not entered into CVS yet, due to lack of time.
-
-### Version 5.1.0 (2006)
-
-* Bug fixes.
-* Updates for **Mathematica 5.2** and new **FeynArts**.
-
-### Version 5.0.0b (2003)
-
-* Bug fixes.
-* Adjustments for **Mathematica 5.0**.
-* More reorganization by Frederik Orellana.
-* Inclusion of help system, **PHI** and **FeynArts**.
-
-### Version 4.9.beta (2002)
-
-* Improved *DiracOrder*.
-* Added *FeynCalcToLaTeX*.
-* Fixed the cyclicity problem with *Gamma[5]*.
-* Simplified installation mechanism.
-* Fixed things for **Mathematica 5.0** and **FeynArts** and patching and all that.
-* Other bugfixes.
-
-### Version 4.2.0 (2002)
-
-* Changed to use *DOT* everywhere instead of *DOT*.
-* **FeynArts 3** support: Exclude *ShapeData* from autoloading.
-* Keep *PolarizationVector* unevaluated when given **FeynArts** arguments.
-* Added support for other multiplications than *DOT*.
-* Added *FieldDerivative* and *CovariantFieldDerivative*.
-* Added *$Multiplications*, *$DistributiveFunctions* and *$Containers* to allow customization of *FieldDerivative*.
-* *DOT* moved into main context.
-* Have *ExpandScalarProduct* expand also *Pair[LorentzIndex[mu], Momentum[a] * Momentum [b] +...]*.
-* Small bug fix of *FourVector*: *fci* not defined.
-* *IsolateHead* dropped. *IsolateNames* used instead everwhere.
-* Some more box definitions for *PartialD*.
-* Split *FeynCalcBook.nb* in two.
-* New directory *fcdevel* with files under development (or just unfinished).
-* New directory *fcloops* with (1,2) loop related files.
-* Changed usage into *"usage"*.
-* Had *Contract* contract also denominators.
-* Moved *Vectors* into context ```FORM2FeynCalc` ```.
-* Moved *FORMEpilog*, *FORMProlog* and *TraceDimension* into context *FeynCalc2FORM*
-* Fixed Breit-Maison problem of *FeynCalcInternal*.
-* Had *FeynRule* and *FunctionalD* know about *ExplicitSUNIndex*.
-* Dropped ```Global` ``` symbols in *SquareAmplitude*.
-* Small bug fix in *Uncontract*.
-* Let Uncontract accept option *Dimension -> Automatic*.
-* Have *Uncontract* uncontract also denominators.
-* Changed option of *A0* *A0ToB0* from *True* to *False*.
-* Code moved from *FeynCalc.m* to new files; should improve maintainability.
-* Moved *SUNSimplify.m* and *SUNTrace.m* from *qcd* to *fctools*,
-*qcd/InverseMellin.m* -> *fctables/InverseMellin.m* and
-*qcd/ToLarin.m* -> *fctools/ToLarin.m* (corrections of Rolf).
-* Moved a few more files to more logical places.
-* Changed usage to *"usage"* everywhere.
-* Moved *IsolagePrint* and *IsolateSplit* into context *Isolate*.
-* Changed *QCDScaleMu* into *ScaleMu*.
-* Dropped *SUNF2*.
-* Changed option of *SUNSimplify* *SUNTrace* from *True* to *False*.
-* Made *SUNSimplify* trace also term proportional to the identity matrix when
-* *SUNTrace* is set to *True*.
-* *FeynCalc.m*:
- * Added support for *:>* to *OptionsSelect*.
- * Placed *FDr* and *CDr* in correct contexts.
- * Bugfixed check for integer arguments in *SUND* and *SUNDeltaContract: Added ExplicitSUNIndex*.
- * *SUND*: No longer set all *SUND[a,a,b]* to *0* if a is not an integer, only when
- a has head *SUNIndex*.
-* *DiracSimplify.m*: * Defined *print1*, *print2*, *print3*
-* *OneLoop.m*: Changed a few debug printing statements.
-* Fixed *SumOver* to comply with **FeynArts 3**.
-* **PHI**:
- * As far as possible dropped using explicit contexts, use *MakeContext* instead.
- * Small fix of *ArgumentsSupply*.
- * Moved *FieldDerivative* and *CovariantFieldDerivative* (and *CDr* and *FDr*) into *HighEnergyPhysics/fctools/*.
- * Implemented compatibility with **FeynCalc**'s *PartialD*-operator notation.
- * Removed many comments. They don't give useful information and clutter things.
- * Changed the possible settings of *B0Evaluation* to strings to facilitate extensibility and reduce the number of defined symbols.
- * Introduced *LeutwylerJBarEvaluation* instead of *ExplicitLeutwylerJBar*.
- * Implemented above-threshold evaluation of *VeltmanB0* (and *LeutwylerJBar*).
- * Dropped *FANonCommutative*, *FAMetricTensorm*, *FAPolarizationVector*, *FAFourVector*, *FADiracMatrix*, *FAIndices* in favour of *NonCommutative* in consistence with *FAPatch.m*.
- * Had *FAPatch.m* add *$FermionHeads* to *$NonCommuting* in *Setup.m*,
- as well as set *FeynCalcInternal -> False* for *FourVector*, *MetricTensor*,
- *DiracSlash*.
- * End all usage definitions with a full stop.
- * Changed *Dot* to *DOT*.
-* *Objects.m*:
- * Dropped *RemoveIntegerIndices*.
- * Changed to have head *ExplicitSUNIndex* on integers (instead of nothing) in compliance with **FeynCalc**.
- * *setLeftRightComponents* fixed to have *Explicit* in right context.
- * Fixed bug in *WriteOutUMatrices* causing *NM[a[x], UMatrix[b]] + UMatrix[UIdentity]* not to work (reported by P.Buettiker).
- * Fixed bug in *UIndicesSupply*, putting *DOT* in correct context.
- * Fixed bug in *UExp* (reported by Paul Buettiker):
- When zeros were in *$UExpansionCoefficients MM*, *UFieldMatrix* didn't work.
-* *Utilities.m*:
- * Added support for *WFFactor* in *DiscardOrders* (Don't discard if order is not known).
- * *MandelstamReduce* now has renormalized masses as default.
- * Added first sketch of *PHIToLaTeX*.
-* Palettes.m: LoadLagrangian now keeps lagrangians given as strings in context ``` Global` ``` (instead of ``` HighEnergyPhysics`PHI`Objects` ``` ).
-* *Renormalization.m*:
- * Fixed small bug causing LeutwylerJBar causing problem with LeutwylerSigma.
- * Readded *C0Evaluation -> "none"*, *D0Evaluation -> "none"* to *Options[VeltmanExpand]*.
-* *Couplings.m*:
- * Added *PHIModel* as option of *WFFactor*, *PMFactor*, *DCFactor*.
- * Added *Drop* as option of *DoSumOver*.
- * Fixed problem with *FCToFA* causing possible substitution of multiple pairs of identical indices in a product.
- * Added *DiracSlash* to *FCToFA*.
- * Dropped *Projection* in *FCToFA*, since *RemoveIntegerIndices* has been dropped.
- * Fixed bug in *XName* causing existing coupling vectors not to be found.
- * Fixed bug in *VerticesSpecifications*. Multiple order of a coupling are now correctly merged into e.g. one coupling with orders {2, 4} instead of two couplings. (*orderJoin*).
- * Fixed problem with *DiscardCT* and **FeynArts 3** .
- * Fixed bug in *FixCouplingIndices*. *SUNDelta*, *SUND* and *SUNF* are now also supported in coupling vectors.
- * Updated *DoSumOver* to comply with **FeynArts 3**.
- * Improved *WFFactor*, *DCFactor* and *PMFactor* to behave better if a file is not there.
- * *DCRenormalize* now correctly uses the inverse factor.
-
-* *Channels.m*
- * Dropped *RemoveIntegerIndices* and *Projection*.
- * Fixed bug with *SU2F* in *SUNReduce*.
- * Added support for *ExplicitSUNIndex*.
-* *PHIStart.m*
- * Dropped *RemoveIntegerIndices*.
- * Switched to *UNablaHatDelta* with "scalar weak source", remember to switch back if vectors or axial-vectors are needed.
-* *ChPTW34.m*: Fix missing comma in N29.
-* *ChPTW32.m*: Fix Typo (``` QuantumField` ``` instead of ```QuantumField```).
-
-
-### Version 4.1.1 (2001)
-* Help System: Following the instructions above, the FeynCalc Book is now viewable via the
-Mathematica help browser. It is possible to look up help pages on individual
-functions by selecting them in a notebook with the cursor and then clicking
-on AddOns in the help browser.
-* **PHI/FeynArts**: Support for **FeynArts** through the new sub-package **PHI**, which is now fully integrated in **FeynCalc**. **PHI** adds support for Chiral Perturbation Theory including tools for dealing with a large number of Feynman rules, derivative couplings, field expansion, etc. Moreover, some examples of using **PHI** are provided which should also be generally instructive. The examples can be found at
-http://www.feyncalc.org/examples/index.html. Information about **PHI** can be found at http://www.feyncalc.org/examples/phi/index.html.
-* The *ReadProtected* Attribute has been removed from all functions.
-* Moved the file *FeynCalcBook.nb* into the new directory *English* and
-added the file *BrowserCategories.m* to allow lookup via the
-Mathematica help browser.
-* Changes in *FeynCalc.m*:
- * All **FeynCalc** definitions are now cleared upon reload,
- hopefully improved the way filenames and paths are determined,
- * Added support for loading from *~/.Mathematica*.
- * Added support for loading **PHI** and **FeynArts**.
- * Added *$Abbreviations*.
- * Added a few definitions to *DeltaFunction*.
- * Fixed bug in *DiracTrace* reported by A. Kyrieleis.
- * Fixed bug in *DiracTrace* causing *Tr[DiracSlash[p,p]]* to give p^2 instead of 4 p^2 (reported by W. Broniowski and L. Trueman and A. Krishna).
- * Fixed small display bug of *Spinor* reported by A. Krishna.
- * Added *FCIntegrate* and *FCNIntegrate* which are options of the new
- (still experimental) function *FeynmanDoIntegrals* fixed bug in the display definition for *Pair* causing infinite recursion.
- * Added two new functions (still very experimental) *FeynmanReduce* and *FeynmanDoIntegrals*.
- * Very small addition to *Integrate2*.
- * Added option *InitialFunction* to *FeynRule*.
- * Fixed bug in *ComplexConjugate*'s treatment of *DiracGamma[5]*,
-reported by T.Rashba and V. Khotilovich.
- * Fixed bugs related to Mac OS's filesystem in *FeynCalc.m*, *FORM2FeynCalc.m*, *FeynCalc2FORM.m*, *OneLoop.m*, *PaVeReduce.m*, *RHI.m*, *SquareAmplitude.m*, *Write2.m*.
- * Fixed bug in *FeynCalc2FORM.m* reported by V. Khotilovich.
- * Fixed forgotten small bugs in *FeynCalcExternal.m*.
- * Changed *FeynCalcExternal.m*, *OneLoopSimplify.m*, *TID.m*
- to allow other symbols for *Dimension* than *D*.
- * Completely rewrote *FeynmanParametrize1.m*. It is still experimental, but in progress and intended to be much more general than *FeynmanParametrize.m*.
- * Small changes in *OneLoop.m*, *PaVeReduce.m* to write out to more readable file names.
- * Fixed forgotten Blank in *SimplifyPolyLog.m*.
- * Added the following new general utility functions:
-*NumericQ1*, *Combinations*, *MLimit*, *TimedIntegrate*, *SelectSplit*.
- * Added check for integers in SU(N) related functions.
- * Small change in *TARCER.nb* to avoid name conflict with **FeynCalc** and **FeynArts**.
- * Various very small spelling fixes etc.
-
-### Version 4.0 (2000)
- * Reorganized for open-source and extensibility.
-
-### Version 3.0.1.1
- * Two bug-fixes for *OneLoop*.
-
-### Version 3.0 (1998)
- * Typesetting features of **Mathematica 3.0**.
-
-### Version 2.2beta9 (1995)
-* Updated version of **FeynCalc** compatible with **Mathematica 2.2**.
-
-### Version 2.2
-
-### Version 1.13 (1992)
-
-### Version 1.0 (1991)
- * Initial release written by Rolf Mertig.
\ No newline at end of file
+* Modified the syntax of `FCLoopBasisExtract` so that the dimensions are now given via the `SetDimensions` option. Reason: This unifies the behavior among the other `FCLoopBasis*` functions. Furthermore, the new `FCTopology` option allows to include loop momenta that are not actually present in the input expression. This is useful when working with integral topologies. (8ab84fdd)
+
+## New functions and symbols
+
+
+### Noncommutative algebra
+
+* Added new function `FCMatrixIsolate` that combines the application of `FCDiracIsolate`, `FCColorIsolate` and `FCPauliIsolate`. This is very useful for amplitude manipulations that affect the matrix structure of the expression, i.e. for taking the complex conjugate. (20030293)
+
+* Added new function `DiracSigmaExpand` that handles expansions of `DiracSigma`s. (2ed72ef9)
+
+ * Example: Expand a suitable `DiracSigma`
+
+ DiracSigma[GSD[p]+GSD[q],GSD[r]]//DiracSigmaExpand
+
+* Outsourced `DiracSubstitute67` out of `DiracSimplify`. Now it is a proper function for replacing chirality projectors with their definitions. (9efa4451)
+
+ * Example: Substitute chirality projectors with their explicit definitions
+
+ SpinorUBar[p1].GA[6].SpinorU[p2] // DiracSubstitute67
+
+ SpinorUBar[p1].GA[7].SpinorU[p2] // DiracSubstitute67
+
+* Added `DiracSubstitute5`. It is a small auxiliary function that replaces `GA[5]` with `GA[6]-GA[7]`. This can be useful, e.g. if the spinor chains should be written in a particular way, always involving chiral projectors. (7b234636)
+
+ * Example: Rewrite a spinor chain with g^5 in terms of chirality projectors
+
+ SpinorUBar[p1].GA[5].SpinorU[p2] // DiracSubstitute5
+
+* Introduced `ToDiracGamma67`, which is an inverse of `DiracSubstitute67`. By default, only terms that can be directly converted to a chirality projector are taken into account. If the options `All` is set to `True`, every occurrence of g^5 will be converted to chirality projectors (ce5c3f8f)
+
+ * Example: Introduce chirality projectors in suitable Dirac matrix chains
+
+ ToDiracGamma67[GA[mu].(1/2 + GA[5]/2).GA[nu]]
+
+ ToDiracGamma67[GA[mu, 5, nu], All -> True]
+
+
+* Added `SirlinSimplify`, a dedicated function for applying Sirlin's relations to Dirac spinor chains. Previously these relations were encoded in the code of `DiracSimplify` but now they can be applied using a separate function (9f74883b)
+
+ * Example: Apply Sirlin's relations to a suitable spinor chain
+
+ SirlinSimplify[SpinorUBar[p3, m3].GA[mu, rho, nu, 7].SpinorU[p1, m1] SpinorUBar[p4, m4].
+ GA[mu, tau, nu, 7].SpinorU[p2, m2]]
+
+* Added `SpinorChainTrick`, an analogon of `DiracTrick` for products of spinor chains. This is an auxiliary function that will be called by higher level functions that deal with the Dirac algebra. (f0ead943)
+
+ * Example: Combine two spinor chains by canonicalizing the Lorentz indices
+
+ SpinorChainTrick[a SpinorUBar[p1, m1].GA[mu].SpinorU[p2, m2] SpinorVBar[p1, m1].
+ GA[mu].SpinorV[p4, m4] + b SpinorUBar[p1, m1].GA[nu].SpinorU[p2, m2] SpinorVBar[p1, m1].GA[nu].
+ SpinorV[p4, m4]]
+
+
+* Added `SpinorChainChiralSplit`, a function that introduces chiral projectors in spinor chains that contain no gamma^5 or chiral projectors. Could be useful for working with chiral theories. (7cc4169f)
+
+ * Example: Rewrite a spinor chain free of g^5 in terms of chains with chirality projectors
+
+ SpinorChainChiralSplit[SpinorUBar[p1, m1].GSD[p].SpinorV[p2, m2]]
+
+* Added new function `SpinorChainTranspose`. It transposes the closed spinor chains in the expression, thus effectively switching `u` and `v` spinors. The `Select` option can be used for a flexible choice of chains that should be transposed. (7b832a61)
+
+ * Example: Transpose some spinor chains
+
+ SpinorChainTranspose[SpinorVBarD[p1, m1].GAD[mu].(GSD[p] + m).GAD[mu].SpinorUD[p2, m2]]
+
+ SpinorChainTranspose[SpinorUBarD[p1, m1].GAD[mu].(GSD[p] + m).GAD[mu].SpinorVD[p2, m2]]
+
+ SpinorChainTranspose[SpinorUBarD[p1, m1].GAD[mu].(GSD[p] + m).GAD[mu].SpinorVD[p2, m2], Select -> {{SpinorUBarD[_, _], SpinorVD[_, _]}}]
+
+
+* Added new function `FCChargeConjugateTransposed` (a shortcut is just `FCCCT`). Given an expression in the Dirac space x, it obtains C x^T C^(-1), where C is the charge conjugation matrix. This is handy when dealing with Majorana spinors. (16e51495)
+
+ * Example: Apply charge conjugation to some Dirac matrix chains
+
+ FCChargeConjugateTransposed[GA[mu, nu, rho], Explicit -> True]
+
+ FCChargeConjugateTransposed[GA[5], Explicit -> True]
+
+* Added `UnDeclareCommutator` and `UnDeclareAntiCommutator` that can remove the previously set values of commutators and anticommutators. (eccb96ca)
+
+ * Example: Specify that `A`-fields commute with each other and remove this property later on
+
+ Commutator[QuantumField[FCPartialD[LorentzIndex[xxx_]], A], QuantumField[A]] = 0;
+ DotSimplify[ExpandPartialD[QuantumField[A].QuantumField[A].LeftPartialD[nu]]]
+
+ UnDeclareCommutator[QuantumField[FCPartialD[LorentzIndex[xxx_]], A], QuantumField[A]];
+ DotSimplify[ExpandPartialD[QuantumField[A].QuantumField[A].LeftPartialD[nu]]]
+
+* Introduced initial support for Dirac matrix chains with explicit Dirac indices (via `DiracChain`). This particularly useful when importing amplitudes from `QGRAF` (fd49dd63) (4468a00e) (a6b577d9) (5799b97b)
+
+ * Example: Some expressions with open Dirac indices that are now possible
+
+ (* A Kronecker delta in the Dirac space*)
+ DIDelta[i, j]
+
+ (* A standalone Dirac matrix with open Dirac indices *)
+ DCHN[GAD[mu], i, j]
+
+ (* A chain of Dirac matrices with open Dirac indices *)
+ DCHN[GAD[mu].GAD[nu], i, j]
+
+ (* A single UBar spinor with an open Dirac index *)
+ DCHN[SpinorUBar[p, m], i]
+
+ (* A single VBar spinor with an open Dirac index *)
+ DCHN[SpinorVBar[p, m], i]
+
+ (* A single U spinor with an open Dirac index *)
+ DCHN[i, SpinorU[p, m]]
+
+ (* A single V spinor with an open Dirac index *)
+ DCHN[i, SpinorV[p, m]]
+
+ (* UBar spinor contracted with a chain of Dirac matrices *)
+ DCHN[GAD[mu].GAD[nu], SpinorUBar[p, m], j]
+
+ (* VBar spinor contracted with a chain of Dirac matrices *)
+ DCHN[GAD[mu].GAD[nu], SpinorVBar[p, m], j]
+
+ (* U spinor contracted with a chain of Dirac matrices *)
+ DCHN[GAD[mu].GAD[nu], i, SpinorU[p, m]]
+
+ (* V spinor contracted with a chain of Dirac matrices *)
+ DCHN[GAD[mu].GAD[nu], i, SpinorV[p, m]]
+
+* Introduced `DiracChainJoin` to handle contractions of the Dirac indices (4d3649a6) (18ac295d) (0575c06f)
+
+ * Example: Contract the Dirac indices to obtain a closed spin chain
+
+ DCHN[SpinorUBar[p1, m1], i] DCHN[GAD[mu].GAD[nu], i, j] DCHN[j, SpinorV[p2, m2]] //
+ DiracChainJoin
+
+* Added DiracChainExpand, a function to expand Dirac chains with explicit indices using linearity. (4e938efe)
+
+* Added DiracChainFactor, an auxiliary function to factor out commutative objects out of DiracChains. (97b47b24)
+
+* Added new function DiracChainCombine, which is an inverse operation to DiracChainExpand. (90431dfc)
+
+* Added `PauliSigmaExpand` and `PauliSigmaCombine` which are essentially analogons of `DiracGammaExpand` and `DiracSigmaCombine` for Pauli matrices. (a99b9882)
+
+ * Example: Perform some expansions of Pauli matrices or undo them
+
+ PauliSigmaExpand[SIS[q].SIS[p - q]]
+
+ PauliSigmaExpand[SIS[a + b].SIS[c + d], Momentum -> {a}]
+
+ PauliSigmaExpand[CSIS[a + b].CSIS[c + d], Momentum -> All]
+
+ PauliSigmaCombine[SIS[p] + SIS[q]]
+* Added `FCPauliIsolate`. It is like `FCDiracIsolate`, but for Pauli matrices. (20a1af91)
+
+ * Example: Isolate Pauli matrices and spinors in the expression
+
+ FCPauliIsolate[c1 SI[i] + c2 PauliXi[-I].SIS[p].PauliEta[I]]
+
+* Added new function `PauliOrder`. It is like `DiracOrder` but for Pauli matrices. (2759035e)
+
+ * Example: Change the order of Pauli matrices using their commutation/anticommutation properties
+
+ PauliOrder[CSI[i, j], {j, i}]
+
+* Added `PauliTrick` to have initial support for simplifying chains of Pauli matrices. As far as `D-1` dimensional Pauli matrices are concerned one can use `FCSetPauliSigmaScheme` to specify whether the 3D anticommutator relation should be used in D-1 dimensions. (498504f0)
+
+ * Example: Simplify some chains of Pauli matrices
+
+ CSIS[p1].CSI[i].CSIS[p2] // PauliTrick // Contract
+
+ CSID[i, j, i] // PauliTrick // Contract
+
+* Added new option `PauliReduce` to `PauliTrick`. It specifies whether a chain of Pauli matrices should be reduced to at most one matrix by rewriting every pair of matrices in terms of commutator and anticommutator. When set to False, `PauliTrick` will try to use anticommutation relations to simplify Pauli chains. (e2299af2)
+
+ * Example: Simplify a chain of Pauli matrices without the full reduction
+
+ CSIS[p].CSI[j].CSIS[p].CSIS[i] // PauliTrick[#, PauliReduce -> False] &
+
+* Added `PauliSimplify`, an analogon of `DiracSimplify` but for Pauli matrices. (c8039c5c)
+
+### Loop integrals
+
+* Added `FCTopology`. Although currently it is just a placeholder for topologies, it is enormously useful in real calculations. (7239fd6f)
+
+* Introduced new propagator heads to support many new types of integral previously not available in `FeynCalc`. Covariant integrals that appear in such EFTs as HQET, NRQCD or SCET can be entered using the new `SFAD` (Standard FeynAmp denominator) head. The Cartesian analogon of `SFAD` is called `CFAD` (Cartesian FeynAmp denominator). Nonstandard integrals that cannot be represented via `SFAD` or `CFAD` can be introduced using `GFAD` (Generic FeynAmp denominator).
+The support for the manipulation of the new integral is still somewhat experimental but will be improved in the future versions of the package
+
+
+ * Example: New propagators now available in `FeynCalc`
+
+ (* The standard covariant propagator, corresponds to FAD[{p,m}]*)
+ SFAD[{{p, 0}, m^2}]
+
+ (* The standard covariant propagator with the opposite I eta prescription*)
+ SFAD[{{p, 0}, {m^2, -1}}]
+
+ (* Covariant Euclidean propagator in 4D *)
+ SFAD[{{p, 0}, {-m^2, -1}}]
+
+ (* Massive covariant eikonal propagator *)
+ SFAD[{{0, p.q}, m^2}]
+
+ (* Massless covariant eikonal propagator *)
+ SFAD[{{0, p.q}, m^2}]
+
+ (* The standard Cartesian propagator *)
+ CFAD[{{p, 0}, m^2}]
+
+ (* The standard Cartesian propagator with the opposite I eta prescription*)
+ CFAD[{{p, 0}, {m^2, 1}}]
+
+ (* Cartesian propagator with a different mass term sign *)
+ CFAD[{{p, 0}, -m^2}]
+
+ (* Massive Cartesian eikonal propagator *)
+ CFAD[{{0, p.q}, m^2}]
+
+ (* Massless Cartesian eikonal propagator *)
+ CFAD[{{0, p.q}}]
+
+ (* A special nonlinear propagator*)
+ GFAD[SPD[p1, q] SPD[p2, q] + x SPD[p1, p2]]
+
+
+* Added some new placeholders: `Zeta4`, `Zeta6`, `Zeta8`, `Zeta10` and `Li4`. Those are mainly to be used in conjunction with `SimplifyPolyLog`. The `Conjugate` of a `ZetaX` is the object itself (44cdfef7) (966c8004) (d25f1125) (13ceb2a9)
+
+ * Example: Simplify an expression using `SimplifyPolyLog`
+
+ c1 Pi^4 + c2 Pi^6 + c4 Pi^8 + c5 Pi^10 // SimplifyPolyLog
+
+
+* Added `FCGramMatrix` and `FCGramDeterminant` that compute the Gramian out of the given list of momenta. (d3009020)
+
+
+ * Example: Compute the Gramian for the 4-momenta `p1`, `p2` and `p3`
+
+ FCGramMatrix[{p1, p2, p3}]
+
+ * Example: Compute the Gramian for the 3-momenta `p1`, `p2` and `p3`. This is needed when doing tensor reduction of Cartesian integrals
+
+ FCGramMatrix[{p1, p2, p3}, Head -> {CartesianPair, CartesianMomentum}, Dimension -> D - 1]
+
+* Extracted `N`-point to 4-point reduction from `OneLoop` and moved it to a separate function `NPointTo4Point`. (fd8949d3)
+
+ * Example: Rewrite a massless scalar pentagon in terms of boxes
+
+ FCClearScalarProducts[];
+ NPointTo4Point[ FCI@FAD[{q, m0}, {q + p1, 0}, {q + p2, 0}, {q + p3, 0}, {q + p4, 0}], q, FCE -> True, FCVerbose -> -1]
+
+
+* Added `PaVeUVPart`. This function returns UV divergent parts of arbitrary Passarino-Veltman functions. The algorithm is courtesy of G. Sulyok, cf. Phys. Part. Nuclei Lett. (2017) 14:631, arXiv:hep-ph/0609282. (03d50607)
+
+ * Example: Obtain the UV-pole of the massive `B1111` Passarino-Veltman coefficient function
+
+ FCClearScalarProducts[];
+ PaVeUVPart[PaVe[1, 1, 1, 1, {SPD[p1, p1]}, {m0^2, m1^2}]]
+
+* Added `FCLoopBasisGetSize`, a tiny convenience function that returns the number of linearly independent propagators for a topology with the given number of loop of external momenta. (33ce898a)
+
+ * Example: Get the number of linearly independent propagators (size of the topology) for a topology with 4 loop momenta and one external momentum
+
+ FCLoopBasisGetSize[4, 1]
+
+* Added `FCLoopBasisSplit` an auxiliary function for identifying multi-loop integrals that factorize. (9e22d22a)
+
+ * Example: Separate some factorizable multiloop integrals into separate pieces
+
+ FCLoopBasisSplit[FCI@FAD[{q1, m}, {q2 - q3, m}], {q1, q2}, Head -> loopInt]
+
+ FCLoopBasisSplit[ FCI@FAD[{q1, m}, {q2, m}, {q3 - q4, 0}, {q3 - p, m}, {q5}], {q1, q2, q3, q4, q5}, Head -> loopInt]
+
+* Added `FCLoopBasisIntegralToPropagators`, a handy auxiliary function that converts the given loop integral into a list of the corresponding propagators and scalar products. The powers of propagators can be counted if the options `Tally` is set to `True`. (2db802f3)
+
+ * Example: Convert the given integrals to a list of propagators as required e.g. for topology identification or IBP reduction
+
+ FCLoopBasisIntegralToPropagators[SPD[p, q]^2 FCI[SPD[p, q]] SFAD[q, p - q], {q}, Tally -> True, Negative -> True, Pair -> True]
+
+ FCLoopBasisIntegralToPropagators[GFAD[{p1.q p2.q + x, 2}] SFAD[p1], {p1, p2}, Tally -> True]
+
+* Added new auxiliary function `FCLoopBasisPropagatorsToTopology` to facilitate the extraction of the topologies from the expressions with loop integrals. (9b3cd7e1)
+
+ * Example: Convert the given list of propagators to a list `Pair`'s
+
+ FCLoopBasisPropagatorsToTopology[{SFAD[{q, m}], SPD[q, p]}]
+
+
+* Added `ToSFAD`, a function that converts `FAD`s and `PropagatorDenominator`s to `SFAD`s and `StandardPropagatorDenominator`s. (f300d7f6)
+
+ * Example: Convert some integrals in the `FAD`-notation to the `SFAD`-notation
+
+ ToSFAD[FAD[p]]
+
+ ToSFAD[x + FAD[{p, m}, q] FAD[{p, m1}, q, {r - q, m2, 2}]]
+
+* Added `CTdec`, a Cartesian version of `Tdec`. (d77968e0)
+
+ * Example: Calculate some tensor reductions for Cartesian integrals
+
+ CTdec[{{l, i1}, {l, i2}}, {p1}]
+
+ CTdec[{{l1, i1}, {l2, i2}}, {p1, p2}, List -> False]
+
+* Added `FCLoopMixedToCartesianAndTemporal`. The purpose of this function is to rewrite (when possible) integrals with both Lorentz and Cartesian or temporal indices to integrals that are free of Lorentz indices (448de342)
+
+ * Example: Rewrite some integrals
+
+ FCLoopMixedToCartesianAndTemporal[FCI@SFAD[{{q, q.p}, m^2}], {q}]
+
+ FCLoopMixedToCartesianAndTemporal[ FCI[TC[k] FVD[k, mu] FAD[k, k + p]], {k}]
+
+* Added `FCLoopPropagatorPowersCombine`, `FCLoopPropagatorPowersExpand`, `FCLoopRemoveNegativePropagatorPowers` and `FCLoopNonIntegerPropagatorsFreeQ` to manage the propagator powers of `CFADs`, `SFADs` and `GFADs`. These functions were mainly introduced to manage various new propagators inside `FeynCalc`. They are probably not very useful for the normal users but can be handy when writing codes on top of `FeynCalc` (ff57f617)
+
+ * Example: Combine identical propagators of a loop integral raised to different powers into one propagator
+
+ FCLoopPropagatorPowersCombine[ SFAD[{{q, 0}, {m, 1}, 3}, {{q, 0}, {m, 1}, 4}]]
+
+
+ * Example: Rewrite propagators raised to an integer power as a list inside `FeynAmpDenominator` (relevant only for the `FCI` representation)
+
+ FCLoopPropagatorPowersExpand[FCI[SFAD[{q, m, 2}, q + p]]]
+
+
+ * Example: Rewrite propagators raised to negative integer powers as scalar products
+
+ FCLoopRemoveNegativePropagatorPowers[SFAD[{q, m}, q + p, {q, m, -2}]]
+
+ * Example: Check if the given integral is free of propagator raised to noninteger (e.g. fractional or symbolic) powers
+
+ FCLoopNonIntegerPropagatorPowersFreeQ[FCI@CFAD[{q + p, mm, 2}]]
+ (* True *)
+
+ FCLoopNonIntegerPropagatorPowersFreeQ[FCI@CFAD[{q + p, mm, n}]]
+ (* False *)
+
+ FCLoopNonIntegerPropagatorPowersFreeQ[FCI@CFAD[{q + p, mm, 0.5}]]
+ (* False *)
+
+* Added new function `FCLoopSamePropagatorHeadsQ` to detect integrals that simultaneously contain both purely Cartesian and purely Lorentzian propagators. Currently, those cannot be properly handled in `FeynCalc` (bc9a42f2)
+
+ * Example: Check if the given integral is free of propagators with different `Head`s
+
+ FCLoopSamePropagatorHeadsQ[FCI[SFAD[q,q-p]]]
+ (* True *)
+
+ FCLoopSamePropagatorHeadsQ[FeynAmpDenominatorCombine[CFAD[q, q - p] SFAD[l, l + k]]]
+ (* False *)
+
+ FCLoopSamePropagatorHeadsQ[FeynAmpDenominatorCombine[FAD[q, q - p] SFAD[l, l + k]]]
+ (* False *)
+
+
+* Added new function `FCLoopMixedIntegralQ` to detect mixed Lorentz-Cartesian integrals. (3c6863cc)
+
+ * Example: Check if the given integral is a mixed one
+
+ FCLoopMixedIntegralQ[FCI[FVD[p, mu] SFAD[q, q - p]]]
+ (* False *)
+
+ FCLoopMixedIntegralQ[FeynAmpDenominatorCombine[GFAD[TC[q] + EN] SFAD[q]]]
+ (* True *)
+
+
+* Added new function `FCLoopEikonalPropagatorFreeQ` to detect eikonal propagators. (9f31f2fb)
+
+ * Example: Check if the given integral is free of eikonal propagators
+
+ FCLoopEikonalPropagatorFreeQ[FCI@SFAD[p, p - q]]
+ (* True *)
+
+ FCLoopEikonalPropagatorFreeQ[FCI@CFAD[{{0, p.q}}]]
+ (* False *)
+
+
+* Added `FCLoopBasisCreateScalarProducts`, an auxiliary function that creates a list of all loop-momentum dependent scalar products from the given lists of loop and external momenta. (8778efb7)
+
+ * Example: Generate all `D`-dimensional scalar products for 2-loop 3-point function
+
+ FCLoopBasisCreateScalarProducts[{l1, l2}, {p1, p2, p3}, {D}, Pair]
+ (* True *)
+
+* Added `$FCShowIEta` to control whether the `I Eta` should be explicitly shown in the `TraditionalForm` typesetting or not. If it is clear that all propagators have `+ I Eta`, it is more useful to set `$FCShowIEta=False`. (300bfb08)
+
+
+### Kinematics and amplitudes
+
+* Introduced `FCRerouteMomenta`, a handy function that can automatically change the routing of the external momenta to make the amplitudes look simpler. It uses the supplied 4-momentum conservation and tries to minimize the number of momenta in propagators, 4-vectors, scalar products, Dirac slashes etc. (bcabba99) (26814232)
+
+ * Example: Rewrite the amplitude in a more compact way using the momentum conservation relation `l1+l2=p1+p2+kp`
+
+ amp = (-I)*Spinor[-Momentum[l2], ME, 1].GA[Lor3].Spinor[Momentum[l1], ME, 1]*Spinor[Momentum[p1], SMP["m_Q"], 1] .
+ GS[Polarization[kp, -I, Transversality -> True]].(GS[kp + p1] + SMP["m_Q"]) . GA[Lor3] . Spinor[-Momentum[p2], SMP["m_Q"], 1]*
+ FAD[kp + p1 + p2, Dimension -> 4]*FAD[{-l1 - l2 - p2, SMP["m_Q"]}, Dimension -> 4]*SDF[cq, cqbar]*SMP["e"]^3*SMP["Q_u"]^2
+
+ FCRerouteMomenta[amp, {l1, l2}, {p1, p2, kp}]
+
+
+* Added new function `FCPermuteMomentaRules`, a convenience function for generating replacement rules for all possible permutations (renamings) of the given set of momenta. (9ff9423e)
+
+ * Example: Give a set of rules for all possible permutations of the momenta `p1`, `p2` and `p3`
+
+ FCPermuteMomentaRules[{p1, p2, p3}]
+
+* Added `FCReplaceMomenta`, a convenience function for replacing 4-momenta and 3-momenta in the given expressions. (3c5c8ae3) (d00dc59f) (28123ca9)
+
+ * Example: Apply the substitutions `p1 -> P + 1/2 q` and `p2 -> P - 1/2 q` to the given amplitude
+
+ amp = (-I)*Spinor[-Momentum[l2], ME, 1].GA[Lor3].Spinor[Momentum[l1], ME, 1]*Spinor[Momentum[p1], SMP["m_Q"], 1] .
+ GS[Polarization[kp, -I, Transversality -> True]].(GS[kp + p1] + SMP["m_Q"]) . GA[Lor3] . Spinor[-Momentum[p2], SMP["m_Q"], 1]*
+ FAD[kp + p1 + p2, Dimension -> 4]*FAD[{-l1 - l2 - p2, SMP["m_Q"]}, Dimension -> 4]*SDF[cq, cqbar]*SMP["e"]^3*SMP["Q_u"]^2
+
+ FCReplaceMomenta[amp, {p1 -> P + 1/2 q, p2 -> P - 1/2 q}]
+
+
+ * Notice that `FCReplaceMomenta` is not suitable for expanding in 4-momenta (soft limits etc.) as it does not check for cases where a particular substitution yields a singularity. For example, the following code obviously returns a nonsensical result
+
+ FCClearScalarProducts[];
+ SPD[q] = 0;
+ FCReplaceMomenta[FAD[q + p], {p -> 0}]
+
+
+* Added new `DataType` `FCVariable` so that symbols marked as `FCVariable` will be pulled out from `Momentum`, `CartesianMomentum` and `TemporalMomentum`. (d0754e8b) (955fb6f2)
+
+ * Example: For `SPD[c1 p1 + c2 p2, q]` with `c1` and `c2` being some constants (not 4-momenta), `ExpandScalarProduct` does not work properly
+
+ SPD[c1 p1 + c2 p2, q] // ExpandScalarProduct
+
+ Prior to `FeynCalc` 9.3 the only solution was to write the expression explicitly using the FCI notation
+
+ Pair[c1 Momentum[ p1, D] + c2 Momentum[ p2, D], Momentum[q, D]] // ExpandScalarProduct
+
+ Now we can explicitly declare `c1` and `c2` to be of the type `FCVariable` so that everything works as expected
+
+ DataType[c1, FCVariable] = True;
+ DataType[c2, FCVariable] = True;
+ SPD[c1 p1 + c2 p2, q] // ExpandScalarProduct
+
+ Notice that this also works for propagators, e.g. in `FAD[{q + c1 p1, m}]` as well as Dirac and Pauli matrices. Use `DataType[c1, FCVariable] = False` etc. to undo the declaration for a particular variable.
+
+* Added `ToStandardMatrixElement`. This function wraps spinor chains, color strutctures and polarization vectors into head `StandardMatrixElement`. This functionality was previously available only via `OneLoop`. The idea of having standard matrix elements is described in Denner's famous paper in Fortschritte der Physik, Vol. 41, Nummer 4, 1991, Section 5. (d456057a) (15238e61) (f70658ae)
+
+ * Example: Decompose the given product of spinor chains into pieces with different chiral projectors
+
+
+ exp = Spinor[Momentum[k2, D], 0, 1].GAD[mu].Spinor[-Momentum[k1, D], 0, 1] *
+ Spinor[-Momentum[ps, D], SMP["m_s"], 1].GAD[mu].Spinor[Momentum[pd, D], SMP["m_d"], 1]
+
+ ToStandardMatrixElement[exp]
+
+* Added `SquareAmplitude`, a simple function that multiplies amplitudes with their complex conjugates and returns the result without doing any evaluations. This function is particularly useful when some amplitudes evaluated with `FeynCalc` should be passed to `FORM` for calculating the amplitude squared (8165ef48)
+
+ * Example: Construct the squared matrix element for a sum of three amplitudes `M1`, `M2` and `M3`
+
+
+ exp = SquareAmplitude[{M1, M2, M3}, {M1cc, M2cc, M3cc}]
+
+ Total[exp]
+
+ If the sum of the amplitudes corresponds to real corrections, i.e. the amplitudes are purely real, we can obtain a shorter expression
+
+ SquareAmplitude[{M1, M2, M3}, {M1cc, M2cc, M3cc}, Real->True,List->False]
+
+### Tensors and vectors
+
+* Added new function FreeIndexFreeQ for checking whether the expression contains free (i.e. uncontracted) indices. (0e75d46c)
+
+* Added new objects for non-relativistic calculations. (a82bb76e)
+
+ * Example: Following new tensor objects are now available
+
+
+ (* Temporal component of the 4-vector p^mu *)
+ TC[p]
+
+ (* Cartesian 3-vectors *)
+ {CV[p, i], CVD[p, i], CVE[p, i]}
+
+ (* Cartesian scalar products *)
+ {CSP[p, q], CSPD[p, q], CSPE[p, q]}
+
+ (* Cartesian Kronecker deltas *)
+ {KD[i, j], KDD[i, j], KDE[i, j]}
+
+ (* Cartesian Levi-Civita tensors *)
+ {CLC[i, j, k], CLCD[i, j, k], CLC[][p1, p2, p3], CLCD[][p1, p2, p3]}
+
+ (* Dirac matrices with a spatial index *)
+ {CGA[i], CGAD[i], CGAE[i]}
+
+ (* Dirac matrices contracted with a 3-vector *)
+ {CGS[p], CGSD[p], CGSE[p]}
+
+ (* Dirac matrix with a temporal index *)
+ TGA[]
+
+ (* Pauli matrices with a Lorentz index *)
+ {SI[mu], SID[mu], SIE[mu]}
+
+ (* Pauli matrices contracted with a 4-vector *)
+ {SIS[p], SISD[p], SISE[p]}
+
+ (* Pauli matrices with a spatial index *)
+ {CSI[i], CSID[i], CSIE[i]}
+
+ (* Pauli matrices contracted with a 3-vector *)
+ {CSIS[p], CSISD[p], CSISE[p]}
+
+ * Notice that the support for nonrelativistic calculations is still somewhat experimental and will be improved in the future versions of `FeynCalc`.
+
+* Added `ThreeDivergence` to differentiate w.r.t Cartesian vectors. It is essentialy the 3D analogon of `FourDivergence` (88d0213e)
+
+
+ * Example: Differentiate the given expression w.r.t `p^i`
+
+
+ ThreeDivergence[CSPD[p, r] CFAD[{p + q, m}], CVD[p, i]]
+
+
+* Introduced `CartesianScalarProduct` to set scalar products of Cartesian vectors and `SetTemporalComponent` to set values of the temporal components of 4-vectors. (3b0c4b1b)
+
+ * Example: Specify the value of the Cartesian scalar product `p.q`
+
+ FCClearScalarProducts[];
+ CSP[p, q] = mm;
+ ExpandScalarProduct[CSP[p + r, q + s]]
+
+ * Example: Specify the value of the temporal component of `p^mu`
+
+ FCClearScalarProducts[];
+ TC[p] = x;
+ ExpandScalarProduct[TC[p + r]]
+
+* Added `EpsContractFreeQ` that can quickly check if the given expression contains epsilon tensors that can be contracted with each other. This is an auxiliary function that is useful when writing involved codes on top of `FeynCalc` (5b02fd19)
+
+ * Example: Check some expressions
+
+
+ EpsContractFreeQ[FCI[LC[p1, p2, p3, p4]]]
+ (* True *)
+
+ EpsContractFreeQ[FCI[LC[p1, p2, p3, mu] LC[q1, q2, q3, q4]]]
+ (* False *)
+
+* Added `DummyIndexFreeQ` that can quickly check if the given expression contains dummy indices. This is an auxiliary function that is useful when writing involved codes on top of `FeynCalc` (f0547fb9) (db47ddf0)
+
+ * Example: Check some expressions
+
+
+ DummyIndexFreeQ[FCI[FV[p, mu] FV[q, nu]], {LorentzIndex}]
+ (* True *)
+
+ DummyIndexFreeQ[FCI[FV[p, mu] FV[q, mu]], {LorentzIndex}]
+ (* False *)
+
+ DummyIndexFreeQ[FCI[SUNT[a, b]], {SUNIndex}]
+ (* True *)
+
+ DummyIndexFreeQ[FCI[SUNT[a, a]], {SUNIndex}]
+ (* False *)
+
+* Added `CartesianToLorentz`, a function that replaces Cartesian Dirac slashes and Cartesian scalar products with corresponding Lorentz tensors and temporal components. (44a6e961)
+
+ * Example: Eliminate `ga^i p^i` in favor of `ga^mu p_mu` and `ga^0 p^0`
+
+ CGS[p] // CartesianToLorentz
+
+
+ * Example: Eliminate `p^i q^i` in favor of `p^mu q_mu` and `p^0 q^0`
+
+ CSP[p, q] // CartesianToLorentz
+
+* Added `LorentzToCartesian`, a function that decomposes selected Lorentz tensors into their Cartesian and temporal components. (1430daf2)
+
+
+ * Example: Decompose `p^mu q_mu` into its temporal and spatial components
+
+ SPD[p, q] // LorentzToCartesian
+
+
+ * Example: Rewrite `eps^{mu nu rho si} p_rho q_si` as a linear combination of 3D Levi-Civita tensors
+
+ LC[mu, nu][p, q] // LorentzToCartesian
+
+
+
+* Added `FCSetMetricSignature` and `FCGetMetricSignature`. Notice that currently the metric signature is mainly used by the functions `CartesianToLorentz` and `LorentzToCartesian`. It is e.g. not possible to set the signature to `{1,1}` and have Euclidean Dirac matrices (30c2c217)
+
+ * Example: Get the current metric signature
+
+ FCGetMetricSignature[]
+ (* {1,-1} i.e. mostly minus *)
+
+ * Example: Changing the metric signature to mostly plus naturally modifies the output of `LorentzToCartesian`
+
+ FCSetMetricSignature[{-1, 1}]
+ SPD[p, q] // LorentzToCartesian
+
+
+* Added `FCSchoutenBruteForce`, a function that attempts to automatically simplify the given expression by applying Schouten's identity. Notice that what this function does is pure heuristics so that there is no warranty that it can achieve all possible simplifications (f23523b6) (21092852)
+
+ * Example: Simplify the given expression using Schouten's identity
+
+ exp = LC[][p1, p2, p3, p4] SP[p5, p6] +
+ LC[][p2, p3, p4, p5] SP[p1, p6] + LC[][p3, p4, p5, p1] SP[p2, p6] +
+ LC[][p4, p5, p1, p2] SP[p3, p6]
+
+ FCSchoutenBruteForce[exp, {}, {}, Rule -> False]
+
+
+
+* Outsourced contractions of epsilon tensors to `EpsContract`. (2d1d8f6f)
+
+ * Example: Calculate some contractions of epsilon tensors
+
+ LC[][p1, p2, p3, p4] LC[][p1, p2, p5, p6] // EpsContract
+
+ CLC[][p1, p2, p3] CLC[][p1, p2, p4] // EpsContract
+
+### Miscellaneous
+
+* Added new function `FCCheckVersion` that can abort the evaluation if the current `FeynCalc` version is too old.
+
+* Added `SMPToSymbol`, a small function for converting `SMP`s to symbols. (e473b3a4)
+
+* Introduced `FCSubsetQ`, a cheap replacement for the standard `SubsetQ`, which is unfortunately not available in `Mathematica` 8 and 9. The syntax is identical to that of `SubsetQ` (5a4eca2c)
+
+* Introduced `FCDuplicateFreeQ`, a cheap replacement for the standard `DuplicateFreeQ`, which is unfortunately not available in `Mathematica` 8 and 9. The syntax is identical to that of `DuplicateFreeQ` (b44bd2f7)
+
+* Added new auxiliary function `FCProductSplit` for splitting products into lists w.r.t a list of the given variables. (efedef66)
+
+
+ * Example: Fish out `a` and `b` from the product `a*b*c*d`
+
+ FCProductSplit[a b c d, {a, b}]
+
+
+* Added `FCReplaceAll` and `FCReplaceRepeated`, two handy functions for applying replacement rules sequentially. This avoid writing long chains of `ex /. rule1 /. rule2 /. rule3` etc. (00a34b65)
+
+
+ * Example: Apply a sequence of replacement rules to `a*c`
+
+ FCReplaceRepeated[a c, {a -> b}, {c -> d}, {d -> e}, {b -> f}]
+
+* Introduced `FCPatternFreeQ`. It is just a convenience function that makes it easier to check for patterns in the arguments of `FeynCalc` functions and helps to avoid duplicated code. (212c2cba)
+
+ * Example: Check some expressions
+
+
+ FCPatternFreeQ[{FV[p, mu]}]
+ (* True *)
+
+ FCPatternFreeQ[{FV[p, _]}]
+ (* False *)
+
+* Added `FCCheckSyntax`, a helper function that attempts to identify errors in the user input. Notice that such checks are very expensive performance-wise, so they should not be used on a regular basis. Furthermore, `FCCheckSyntax` is not guaranteed to detect all possible syntax errors (6541e10d) (41b8b8eb)
+
+ * Example: Check some expressions
+
+
+ FCCheckSyntax[GA[mu]*GA[nu]]
+ (* Typical mistake, using Times instead of Dot in noncommutative products *)
+
+ FCCheckSyntax[FV[p, mu]*FV[q, mu]*FV[r, mu]]
+ (* Another common mistake, Einstein summation convention violated *)
+
+
+* Added a new function `FCCompareResults`. It offers a convenient way to compare intermediate of final results to the known values. This function was originally written for example calculations to compare the final results with the literature. (1dab575b) (6287947b)
+
+ * Example: Compare some expressions
+
+
+ FCCompareResults[{4, 4}, {2^2, 8/2}]
+ (* The results agree *)
+
+ FCCompareResults[{3, 5}, {2^2, 8/2}]
+ (* The results disagree *)
+
+
+
+* Added `ExpandAll2` for fast expansions of very large expressions (like in Dirac traces). It is a very special auxiliary
+function that is probably useful only in very special cases. The syntax is identical to that of `ExpandAll` (089eb9e6)
+
+ * Example: Benchmark against `ExpandAll`
+
+
+ exp = Sum[p[i], {i, 1, 100}] Sum[q[i], {i, 1, 1000}];
+
+ AbsoluteTiming[ExpandAll[exp];]
+
+ AbsoluteTiming[ExpandAll2[exp];]
+ (* In `Mathematica` 11.0 ExpandAll2 is almost 60% faster than ExpandAll! *)
+
+
+* Added `FCMakeIndex`. It is a small convenience function for generating indices, i.e. `LorentzIndex`, `SUNIndex` etc. from the output of diagram generators such as `FeynArts` and `QGRAF`. Notice that `FeynCalc` currently does not offer a native interface to `QGRAF`. This is planned for future versions of the package. (2fad0817)
+
+ * Example: Generate some indices
+
+ FCMakeIndex["Lor", "1"]
+
+ FCMakeIndex["Lor", {3, 1, 4}, LorentzIndex]
+
+ FCMakeIndex["Sun", {"a", 1, -4}]
+
+
+* Added new `SMP` objects. (d53496a9) (da890b9f) (f4bb3b73) (eaf5339f)
+
+ * Example: Show all available `SMP`'s
+
+ SMP[]
+
+* Added `FCShowReferenceCard` and a sample reference card for `FeynArts`. (a1d90ef2)
+
+
+ * Example: Show the reference card for `FeynArts`
+
+
+ FCShowReferenceCard[{"FeynArts"}]
+
+
+* Added `TypesettingExplicitLorentzIndex` to allow user defined typesetting of explicit Lorentz indices. This was essentially added as a reaction to a request for MSE ([https://mathematica.stackexchange.com/questions/133114/how-to-differentiate-between-superscript-indices-and-powers-in-the-output/134146#134146](URL)) (8b1102de)
+
+
+ * Example: Make explicit Lorentz indices look red
+
+ TypesettingExplicitLorentzIndex = Function[x, Style[x, Red]];
+
+ exp = 4 M^2 u FV[k, 0]^2 - 4 M^2 u FV[k, 3]^2 -
+ 4 M SP[k, k] - 2 M u FV[k, 0] FV[k, 3]^2 +
+ 4 M u FV[k, 0] FV[k, 2] - u^2 FV[k, 2]^2
+
+* Added `FCGetNotebookDirectory[]`, a simple convenience function that is like `NotebookDirectory[]`, but works also when the Front End is not available. This is especially useful when running some .m scripts from the terminal (600c95ba)
+
+* Added `FCReloadFunctionFromFile`, an auxiliary function that is useful for debugging the existing `FeynCalc` functions without reloading the kernel. This is a helper function for developers that is not meant to be employed by the users (c51fe7d0)
+
+
+ * Example: Reload the definition of `Collect2`
+
+ FCReloadFunctionFromFile[Collect2, FileNameJoin[{$FeynCalcDirectory, "Shared", "Collect.m"}]]
+
+* Introduced `FCProgressBar`. It is a small auxiliary function that can be used to show the current progress of processing a list of objects with a given function. (d72b205e)
+
+ * Example: Show the progress of some calculation
+
+ FCProgressBar["Calculating something ", i, 10], {i, 1, 10}]
+
+
+## New options, features and other improvements
+
+#### Miscellaneous
+
+* Improved `FCUseCache` to take NR quantitites into account when caching. (ca446ee4)
+* Allowed `SquareAmplitude` to handle amplitudes of different length (e.g. RV- contributions). (ba642612)
+* Modified the debugging interface to have negative values of `FCVerbose` parsed correctly. (0771fa6e)
+* Improved factoring of momenta arguments in `DotSimplify`. (bacfa855)
+* Improved `Cases2` not to generate erroneous messages when handling functions that must have more than one argument (e.g. `PolyLog`s) (d34a9e64)
+* Modified the behavior of `ComplexConjugate` not to abort the evaluation if the expression cannot be strictly factored into Dirac, Pauli and color parts. This should fix Issue #51. (e53bdc0d)
+* Improved `FCRenameDummyIndices` and `FCCanonicalizeDummyIndices` to work with `DiracIndex`. (74540c36)
+* Added new internal variable ```FeynCalc`Private`AddToTheWhiteListedContextAdditions```. It is meant for packages that add stuff to the `Global` context so that there will be no warning messages when `$FCCheckContext` is set to `True`. (d57682f4)
+* Added new option `FreeQ` to `FCGetDimensions` that allows to specify objects to be ignored when extraction dimensions present in the expression. (32aff18b)
+* Made `FC{Dirac,Color,Pauli,Matrix}Isolate` listable. (14d5ac71)
+* Improved `FCRenamingDummyIndices`. (0f1ecb94)
+* Added new option `DiracIndexNames` to `FCCanonicalizeDummyIndices`. (53fec02e)
+* Improved the `Conjugate` option of `ComplexConjugate` following the suggestion of JP-Ellis from https://github.com/FeynCalc/feyncalc/pull/48 (4327daf7)
+* Completely refactored ComplexConjugate, adding support for DiracChains and PauliSigmas. (82bdedc9)
+* Added the `TimeConstrained` option to FCColorIsolate. (0c29d439)
+* Improved `Uncontract` to handle `DiracChain`s. (ba756e9c)
+* Improved `FCCanonicalizeDummyIndices` to handle `DiracChain`s. (4801967e)
+* Improved `DotSimplify` to apply DiracChainFactor when the input contains `DiracChain` symbols. (9f268817)
+* Various functions now support the option `FCE -> True` to convert the output to the `FeynCalcExternal` form.
+* Added new option `Expand` to `NTerms`. (e8cc7378)
+* Moved `OptionsSelect` and `$Gauge` from `FeynCalc.m` to `Phi`. (7bc5d54d)
+* Added an option `Conjugate` to `ComplexConjugate`. Now it is possible to wrap arbitrary variables into `Conjugate` heads, i.e. coupling constants. (cc79324f)
+* Improved `MomentumCombine` to work also on `Eps` tensors. This can be disabled via the option `LC->False` (thanks to Pablo Sanchez Puertas for the suggestion) (4bfe6e59)
+* Added a new option `ChangeDimension` to `FCGetDimensions`. When set to true, the dimensions of Cartesian objects will be determined with respect to the Lorentz objects from which they originate. In this case the dimension of `CV[p,i]` will be 4 and not 3. This is mainly required for functions related to the Dirac algebra, which need to check the dimensions in order to be conistent with different gamma_5 schemes. (d231c3ec)
+* Added new option `Head` to `FCFactorOut` (e508b29b)
+* Added new option `Full` to `ExpandScalarProduct`. Together with the momentum options it allows even more fine-grained expansions, e.g. for `ExpandScalarProduct[SP[l+p1+p2+p3,q1+q2+q3+q4],Momentum->l,Full->False]`. This helps to avoid an unnecessary proliferation of terms. (64c6e504)
+* Added a new option `ExpandScalarProduct` to `Contract`. When set to `False`, scalar product will not be expanded which should give a speed up on QCD diagrams with 3- and 4-gluon vertices. (50e860b1)
+* Changed the behavior of `Collect2` on expressions that contain none of the specified monomials. Now such expressions will be factored (according to the `Factoring` option) in the output. This is a more consistent behavior compared to what we had before. (c9219af6)
+* Improved `Collect2` so that it can now thread over (lists of) replacement rules. This is particularly useful when applying `Collect2` to the output of `Solve`. (5c334b7d)
+* Changed the ordering of InitialFunction and `FCFactorOut` in `Collect2`. It is better to first factor out the overall coefficient and then apply the `InitialFunction` (e.g. `Expand`). (3dc17555)
+* Modified the option `Factoring` of `Collect2` so that one can specify the maximal `LeafCount`. Terms that are more complicated than that will not be factorized. (f9a12d59)
+
+* New options added to `Collect2`
+ * `TimeConstrained`, specifies the maximal amount of seconds that can be spent on factoring a single term. Default value: `Infinity` (958d5536)
+ * `Head->{h1,h2}`, will wrap the product of the monomial and the coefficient into `h2` (cba0b153)
+ * `InitialFunction -> fun`, applies `fun` to the expression before collecting the monomials (cba0b153)
+ * `IntermediateSubstitutions`, specifies a set of replacement rules to applies to the expressions after applying `InitialFunction` (cba0b153)
+ * `Numerator` and `FactoringDenominator`. These options are meant for cases where `Collect2` is used on fractions, i.e. `Collect2[(....)/(....),...]`. With `Numerator->True` `Collect2` will be applied only to the numerator but not the denominator. `FactoringDenominator` allows to specify a function that will applied to the denominator, e.g. `Factor2`. (1e48d104)
+
+* Miscellaneous improvements and optimizations in various functions
+ * `Contract`: (f1538e4e)
+ * `ExpandScalarProduct`: (7bb494c4) (358365b3)
+ * `FourDivergence`: (f00d8584)
+ * `SUNSimplify`: (ef8500a5)
+ * `PairContract`: (b538f4eb)
+ * `MomentumCombine`: (f2da34ad)
+ * `ChangeDimension`: (262aa4b0)
+ * `DoPolarizationSums`: (40710e25)
+ * `EpsEvaluate`: (3627da9b)
+ * `FCSplit`: (5c42c5f6)
+ * `Collect2`: (4573748f)
+
+#### Typesetting
+
+* Improved typesetting of `Eps` to have explicit distinction between `4`- and `D`-dimensional Levi-Civita tensors. (38151c96)
+* Improved the typesetting rules to avoid unnecessary calls to `FCI` and `MomentumExpand`. (e11aa3ae)
+* Improved typesetting of `FAD`s so that now objects like `FAD[p,Dimension->4]` or `FAD[{p+q,m}, Dimension->D-4]` will have the momenta displayed with the correct bars and hats. This way now one can immediately see the dimension of a `FAD`. (30542a78)
+* Improved typesetting of `FeynAmpDenominator`. (1e802f06)
+* Improved typesetting of four vectors. (87fab6da)
+
+#### `FeynArts`
+
+* Improved `FCPrepareFAAmp` to support the new `PropagatorDenominator` syntax of `FeynArts` 3.12 (thanks to Will, ) (6946116f)
+* Improved `FCPrepareFAAmp` to handle the input from `FeynArts` with explicit Dirac indices (issue # 46). (7eed481b)
+* Added new option `FAModelsDirectory` to `FAPatch` so that we can also patch models that are not in `FeynArts/Models`. (9341acea)
+* Patch `FCFAConvert` to support empty diagram lists (#43) (e01b3b8b)
+* Updated `FCPrepareFAAmp` to handle Majorana spinors. (a84199f2)
+* Improved `FCFAConvert` to handle `FeynArts` models with `SUND`s in the Feynman rules (thanks to A. Hayreter). (59002150)
+* Added a new option `Prefactor` to `FCFAConvert`. (8e8d0b96)
+* Added new option `Contract` to `FCFAConvert`. Sometimes it is convenient to carry out all the Lorentz contractions immediately after generating the amplitudes. (c5e593bd)
+* Improved handling of CKM matrix element when converting from `FeynArts` to `FeynCalc`. (90d42d47)
+* Updated `FeynArts` patching function to protect the `SI` shortcut. (b818e820)
+
+#### Dirac algebra
+
+* Modified the behavior of `DiracReduce` not to output DiracSigmas with `FCE` applied to their arguments. (2c4793f5)
+* Improved performance of `DiracSimplify` on contractions from large traces. (834cefa9)
+* Improved formulas used in `PauliTrick`. (e687d04c)
+* Updated `FCPauliIsolate` to have similar features as `FCDiracIsolate`. (096a12c0)
+* Added new option `FeynAmpDenominatorCombine` to `FCFAConvert`. When set to False, propagators raised to integer powers will be returned e.g. as `FAD[p1+p2]^2` instead of `FAD[p1+p2,p1+p2]`. This should emulate the old behavior of `FeynArts` before the change that occurred on the 19.03.2019. (ec976f75)
+* Improved `DiracSimplify` on expressions with Cartesian tensors. (8921a977)
+* Added new option `CartesianIndex` to `FCDiracIsolate`. (006f65f2)
+* Added new options `LorentzIndexNames` and `CartesianIndexNames` to `ToStandardMatrixElement`. This way we can choose nicer looking indices when applying the function. (9020ffe5)
+* Improved the parsing of `FeynArts` amplitudes with 4-fermions when using the `UndoChiralSplittings` option. (6f018947) (221af0f3)
+* Improved handling of 4-fermion diagrams in `DiracSimplify` and `ToStandardMatrixElement`. (d6699ac3)
+* Improved BMHV algebra in `DiracTrick` so that chiral structures of the expression (`GA[6]` and `GA[7]`) do not get messed up when moving chiral projectors past other matrices. (081fb5e0)
+* Added new options `DiracSimplify` and `DiracEquation` to `ToStandardMatrixElement` to have more fine grained control over the process. (f43caece)
+* Added new options `LorentzIndexNames` and `CartesianIndexNames` to `DiracSimplify`. This can help to avoid additional index canonicalizations when applying DiracSimplify to a list of amplitudes. (50f01060)
+* Small optimization in `DiracSimplify` regarding Sirlin relations. (69cb590d)
+* Made `DiracSimplify` listable. (61872d54)
+* Added new options `LorentzIndexNames` and `CartesianIndexNames` to `SpinorChainTrick`. (a63eb61b)
+* Added new option `FCTraceExpand` to `FCDiracIsolate` and changed the default value of the factoring option to `{Factor2, 5000}`. (21235227)
+* Improved `DiracTrace` to evaluate simple traces before entering the main evaluation function via `DiracTrick`. (d60a0b6b)
+* Improved `DiracSimplify` not to miss certain contractions. (6a01f4dd)
+* Allowed `DiracChain` symbols to factor out an overall numerical coefficient. (e71bf706)
+* Added additional simplifications in `DiracTrick` for the `NDR-Drop` scheme. (021c5030)
+* Added fast mode to `DiracTrace`. (53d2e07a)
+* Modified `DiracEquation` not to mess up the chiral structure of the input expressions. (43799615)
+* Refactored `Anti5` to call `DiracTrick` for all g^5-related manipulations. (f3a23a7f)
+* Improved `DiracSimplify` to try to repeat the attempt to calculate the trace at a latter stage. This is mainly relevant for NDR, where the trace might become simpler at a latter stage. (64ea28f3)
+* Improved `Chisholm`, `DiracOrder`, `EspChisholm`, `FCChargeConjugateTransposed` and `SpinorChainTranspose` to handle `DiraChain` objects. (3c48b725)
+* Improved `FCDiracIsolate`, `FCPauliIsolate` and `FCColorIsolat` to wrap the prefactor of the matrix chain into a user-specified head via the Head option. (47f48b2f)
+* Improved `DiracSimplify` to handle `DiracChain`s. (1b1b1d1d)
+* Improved `DiracTrick` to support `DiracChain`s. (553ff9c4)
+* Added a fast mode to `DiracChainJoin`. (a327b9d4)
+* Improved `FermionSpinSum` to handle amplitudes squared that involve Majorana spinors. The reordering of spinors in the corresponding chains can be turned off via the option `SpinorChainTranspose`. (71b9d256)
+* Added a new option `FCJoinDOTs` to `DotSimplify`. This allows to inhibit the joining of DOTs when `Expanding` is set to False. The same option is now also available in `FCDiracIsolate`, `DiracTrick`, `Chisholm`, `DiracOrder` and `EpsChisholm`. (34f08996) (c280442e)
+
+* New options added to `FCDiracIsolate`
+ * `Polarization`, when set to `True`, also tensors contracted with polarization vectors will be isolated together with the Dirac structures. Default value: `False` (bae9eadd)
+ * `Spinor->Join`, when the already existing option `Spinor` is set to `Join`, products of spinor chains will be wrapped into one head, which is useful for a range of special identities. (fbdfcecf)
+ * `TimeConstrained`, specifies the maximal amount of seconds that can be spent on factoring a single term in the application of `Collect2`. Default value: `3` (fcf27e17)
+
+* New options added to `DiracSimplify`
+ * `DiracSubstitute5`, when set to `True`, the function `DiracSubstitute5` will be applied to the input expression . Default value: `False` (7de810df)
+ * `DiracTrace`, when set to `False`, `DiracSimplify` will completely ignore all Dirac traces in the expression. Default value: `True`. (3a439bbe)
+ * `Expand2`, when set to `False`, `Expand2` will not be applied to the final result. Default value: `True`. (ac506e16)
+
+* Miscellaneous improvements and optimizations in various functions
+ * `DotSimplify`: (f66d9973) (f3accd1d) (e7830814) (9d622473)
+ * `DiracTrick`: (4212b34c) (d8d8a496) (e3097739) (a72ac349) (3ab2aa76) (748255e6) (92a7db05) (45e04933) (86517dda)
+ * `DiracOrder`: (7fd172af) (a9af59b3)
+ * `DiracEquation`: (86517dda)
+ * `DiracTrace`: (f9457758) (60eee612)
+ * `DiracReduce`: (389021fd)
+ * `Chisholm`: (5208ffb2) (a9af59b3) (d3030b84)
+ * `DiracGammaCombine`: (a9af59b3)
+ * `DiracGammaExpand`: (a9af59b3) (53fbf542)
+ * `EpsChhisholm`: (a9af59b3)
+ * `FCDiracIsolate`: (4b2f7ed9) (86517dda)
+ * `FCTraceExpand`: (9d622473)
+ * `DiracSimplify`: (153c344d) (6e74bd96) (47faf5eb) (86517dda)
+ * `DiracTrace`: (78f8de5a) (bb826aa8) (47faf5eb) (f1538e4e)
+
+#### Cartesian tensors
+
+* Improvemenets of various functions to support Cartesian tensors: `Contract`, `DiracSigmaExplicit`, `DiracTrace`, `DiracOrder`, `DiracSimplify`, `DiracOrder`, `DiracTrick`, `ToDiracSigma`, `DiracEquation`, `DotSimplify`, `DiracSigmaExplicit`, `DiracGammaCombine`, `DiracGammaExpand`, `FCDiracIsolate`, `FCTraceExpand`, `FCTraceFactor`, `ToLarin`, `EpsChisholm`, `Chisholm`, `EpsEvaluate`, `ExpandScalarProduct`, `FCGetDimensions`, `MomentumCombine`, `MomentumExpand`, `FeynAmpDenominatorSplit`, `FCCanonicalizeDummyIndices`, `FCLoopIsolate`, `FCGramDeterminant`, `FCGramMatrix`, `PaVeReduce`, `FCLoopSolutionList`, `FCLoopCanonicalize`, `ChangeDimension`, `FCRenameDummyIndices`, `ComplexConjugate`, `FCReplaceD`, `PropagatorDenominatorExplicit`, `FeynAmpDenominatorCombine`, `Calc`, `Tr2`, `Trick`, `Anti5`, `DoPolarizationSums`, `PolarizationSums`, `Uncontract`, `FermionSpinSum` `FCClearScalarProducts` `Eps` (4827b5d3) (f7797f05) (aed41980) (209de41e) (4202cc6c) (265cd258) (c229666e) (98cbefc3) (f7c77b20) (2839e4b4) (0f4e03b4) (265638e9) (0cd763c8) (ed5b7c53) (789da180) (23b138d8) (a374b2fd) (081f2ec5) (b20b55f5) (108702ee) (112f2707) (d1feae49) (ac18f860) (36148aca) (afeb7f22) (75f1091e) (b40a399c) (4fb85670) (ca8f1396) (b572d81e) (3d3923d0) (ddd968e0) (51477c4e) (2caa6cfb) (1aa319d4) (17ce0a3f) (2d42c7c3) (cc8221dc) (518d4cd4) (0829849d) (626114ab) (2d1d8f6f) (123c5e52) (5c43cf49) (6ad513ec)
+
+#### Loop integrals
+
+* Improved performance in `FCLoopExtract`, `FCLoopIsolate` and `FCMultiLoopTID` (98a10039).
+* Improved performance of `FCApart` by using memoization. (9f19c326)
+* Added new option `MaxIterations` to `PaVeReduce`, so that one can limit the depth of the reduction. (4d32be8c)
+* Improved `FCLoopBasisIntegralToPropagators` and `FCLoopBasisIntegralToPropagators` to allow for lists of propagators in the input. (b48a10e9)
+* Added new option `PaVeOrder` to `ToPaVe`. When used together with `PaVeAutoOrder` this will completely disable the reordering of the arguments using symmetries of the `PaVe` functions. (0938f7d4)
+* Improved `TarcerToFC` to properly recover the external momentum from scalar products using the new option ScalarProduct. (a2af7454)
+* Added some additional rank 4 2-loop tensor decompositions to `TIDL`. (d83b42e6)
+* Improved `PaVeReduce` not to remove external isolations. (69225bad)
+* Improved `FCApart` to handle nonlinear loop integrals. (f5b0f90a)
+* Improved `FCMultiLoopTID` to handle NR integrals. (dd56a002)
+* Improved `FCLoopBasisExtract` and `FCLoopBasisOverdeterminedQ` not to freak out on nonlinear/nonstandard integrals. (bc886f6d)
+* Improved `ApartFF` and `FCApart` to avoid issues with `Collect2` never finishing due to bugs in ` Mathematica` 's `Factor`. The option `Factoring` is now given as a list, e.g. `{Factor2, 5000}`. The second value is the maximal `LeafCount`. Coefficients that have a higher LeafCount value will not be factored but left as they are. The option `TimeConstrained` is passed to `Collect2`. Here we set `3` seconds as a safe default. If the user exprects more compact results when facotrization is allowed to try harder, he or she should modify the options `Factoring` and `TimeConstrained` accordingly. (bbc38955)
+* Improved `TID` and `FCMultiLoopTID` to handle input with `DiracChains`. (69481170)
+* Added an option `Collecting` to `PaVeReduce` to prevent some reductions from never terminating (thanks to C. Bobeth). (0eea4f8f)
+* Added new option `Momentum` to `FeynAmpDenominatorCombine`. It makes it possible to combine only those `FADs` that depend on the given set of momenta. (ee4245e4)
+* Added new option `Head` to `Tdec`. (b1e2b5bd)
+* Added new option `TID` to `ToTFI` (thanks to P. Schicho for the suggestion). (231d64a0)
+* Added new option `Subtract` to `FCHideEpsilon` and `FCShowEpsilon`. This allows one to specify what will be abbreviated together with `1/Eps`, i.e. we are not limited to `1/Eps - EulerGamma + Log[4Pi]` anymore. (0c70248a)
+* Modified `FCApart` not to mess with the propagators when `FDS` is set to `False` and to apply `FCE` (when needed) even to expressions that do not require partial fractioning. (37214903)
+* Added new option `List` to `FeynAmpDenominatorSplit`. Now we can also obtain a splitted `FAD` as a list of single denominators. (e60fe5e6)
+* Improved `TID` to avoid issues with `Collect2` never finishing due to bugs in `Mathematica`'s `Factor`. The option `Factoring` is now given as a list, e.g. `{Factor2, 5000}`. The second value is the maximal `LeafCount`. Coefficients that have a higher `LeafCount` value will not be factored but left as they are. The option `TimeConstrained` is passed to `Collect2`. Here we set 3 seconds as a safe default. If the user expects more compact results when factorization is allowed to try harder, he or she should modify the options `Factoring` and `TimeConstrained` accordingly. (21c9c3d0)
+
+* New options added to `FCLoopIsolate` and `FCLoopExtract`
+ * `FAD`, `SFAD`, `CFAD`, `GFAD`. When set to `False` the corresponding denominator will be ignored. Default values: `True` (57d8f075)
+ * `Numerator`, when set to `False` only denominators will be isolated. This is meant for the cases when we are interested only in propagators but not in the scalar products (e.g. when we are doing a topology identification). Default value: `True` (54c14e95)
+
+* New options added to `FCLoopBasisFindCompletion`
+ * `Check`, when set to `False`, we can also supply less propagators than needed to complete the basis via `Method`. As long as those propagators fit properly, they will be accepted. Default value `True` (2defcf3f)
+ * `Abort`, when we have a user supplied list of propagators and `Abort` is set to `True`, `FCLoopBasisFindCompletion` will immediately stop once it encounters a propagator that cannot be used to complete the basis. This options makes sense only when `Check` is set to `False`. Default value: `False` (4cd8c36f)
+ * `ExpandScalarProduct`. Internally we need to apply `ExpandScalarProduct` to check the basis completion, but sometimes we want to custom propagators to be returned unexpanded. Now this is possible when `ExpandScalarProduct` is set to `False`. Default value: `True` (6e1219da)
+
+* New options added to `FeynAmpDenominatorExplicit`
+ * `Denominator`, to wrap propagator denominators in the given head. Default value: `Identity`. (51fc4da4)
+ * `ExpandScalarProduct`, when set to `False`, `ExpandScalarProduct` will not be applied to the result. Default value `True`. (3572db28)
+ * `MomentumCombine`, when set to `False`, `MomentumCombine` will not be applied to the result. Default value `True`. (3572db28)
+ * `SmallVariable`, when set to `True`, `SmallVariable`'s in the propagator denominators will be set to zero. Default value `False`. (cdbc121b)
+
+ * `Mandelstam`, when set to a non-empty list that is a valid second argument of `TrickMandelstam`, this function will be applied to the result. Default value: `{}`. (cdbc121b)
+
+* New options added to `SimplifyPolyLog`
+ * `EulerGamma`, when set to `True`, all `EulerGamma` will be dropped when simplifying `PolyGamma` functions. Default value: `False` (dde6afdd)
+ * `Sqrt`, when set to `False`, functions with square roots in their arguments will not be simplified. Default value: `True` (0bc92d2a)
+ * `Log`, when set to `False`, `Log`s will not be simplified. Default value: `True` (8d750492)
+ * `Trig`, when set to `False`, trigonometric functions (`ArcSihn`, `ArcCosh`, `ArcTanh`) will not be simplified. Default value: `True` (7fb37a60)
+ * `PolyLog`, when set to `False`, polylogs will not be simplified. Default value: `True` (28168962)
+ * `Nielsen`, when set to `False`, `Nielsen` will be converted to `PolyLogs` in the final result. Default value: `True` (5bb8131a)
+
+* New options added to `ApartFF`
+ * `MaxIterations`, determines the maximal number of interations to achieve full partial fractioning. Default value: `Infinity` (47a532c9)
+ * `Numerator`, when set to `False`, partial fractioning will be applied only to the propagator denominators, but not numerators. This is sometimes more useful when dealing with multiloop integrals. Default value: `True` (8918b220)
+
+
+* Miscellaneous improvements and optimizations in various functions
+ * `FCLoopBasisOverdeterminedQ`: (52bf243d) (1d5d7271) (207b7f76)
+ * `FCLoopBasisIncompleteQ`: (52bf243d)
+ * `FCLoopBasisIntegralToPropagators`: (467e86cb) (11b153be) (6195d440) (a2e5485d) (8ce4ac38) (20676a4b) (b28b0d2b)
+ * `FCLoopIsolate`: (4d641b95) (d9f4ed15)
+ * `FCLoopBasisExtract`: (467e86cb) (05085495) (1bada3da) (05732bb0) (207b7f76)
+ * `FCLoopExtract`: (c6443ae3)
+ * `OneLoopSimplify`: (a7a28ff2)
+ * `OneLoop`: (51a658bf) (46f15431)
+ * `FCMultiLoopTID`: (46c78f0f) (d3ea5b04) (ea1f0769)
+ * `TID`: (cb109c2a) (97f9fe6c) (1a1c13b8) (278d2b28) (d0ab6d53) (43cd70fa) (ab863779) (aa8e6bf4)
+ * `FDS`: (fed3b259) (1a1c13b8) (4763a181) (6e0f5c7c) (81df755e) (2c671abf) (bf4dcd4e) (427c4434) (d5d68b15) (f62cc928) (3d41a694)
+ * `SimplifyPolyLog`: (4429da9a) (bd2f788f) (e4d9bb99) (357463ec) (615022b1) (925e489f) (29135ecc)
+ * `ToPaVe`: (3299a73d) (3395a452)
+ * `ToPaVe2`: (e360de81)
+ * `ApartFF`: (1a1c13b8) (278d2b28) (06de9161) (5a2b39ab) (d8e70625)
+ * `FeynAmpDenominatorSplit`: (92f81fd1)
+ * `FeynAmpDenominatorCombine`: (7a7493c2) (9bd0eccf) (95529a5a) (0d764f97)
+
+
+## Bug fixes
+
+* Fixed `DCHN` typesetting for spinors with D-dimensional momenta. (b08e3edd)
+* Fix an infinite loop in `ExpandAll2[]`. (#45) (22628122)
+* Fixed `UndoChiralSplittings` in `FCPrepareFAAmp` for explicit Dirac indices. (2d2904f2)
+* Fixed a bug in `GhostPropagator`, where the sign from `QCDFeynmanRuleConvention` was ignored. (b79b3573)
+* Fixed/improved some descriptions of the functions. (f5a6900d)
+* Fixed a bug in `DiracSimplify` not recognizing traces free of Dirac matrices. (a186d537)
+* Fixed a bug in `ComplexConjugate` regarding the conjugation of `FCChargeConjugateTransposed` expressions. (348918b4)
+* Corrected EW examples where the gauge terms of weak bosons were missing in the unitarity gauge. Thanks to N. Steinberg. (b9338605)
+* Fixed a bug in `DiracChainCombine` that did not take into account products of `DCHN`s in the input. (bac01220)
+* Cleaned up the source code following the WWB warnings. (4d8715ad)
+* Fixed a performance issue in `FCDiracIsolate` that made `FCFADiraChain` join painfully slow at 2-loops. (4360a634)
+* Fixed not working cases of `diracTrickEvalFast` in `DiracTrick`. The new debugging option Evaluate should help in catching such cases via unit tests. (b563a17b)
+* Fixed a small bug in `DiracTrace` when traces of `DOT[1,1]` and alike are not fully evaluated. (555a1739)
+* Fixed bugs in `TID` and `FCMultiLoopTID` when we have loop momenta inside Dirac traces that cannot or should not be evaluated. (e638daba)
+* Fixed a bug in `FCPrepareFAAmp` when specyfing explicit SU(N) indices in the FA input. (3d34989e)
+* Fixed multiple typos (thanks to Hermès BÉLUSCA - MAÏTO). (eca73ac6)
+* Fixed the option `ExceptHeads` in `FCColorIsolate` so that it can be used to filter out `SU(N)` constants in `StandardMatrixElement`. (55d97635)
+* Fixed a typo in `FeynCalc.m` (66d4b984)
+* Fixed a bug in `Tr2`. (b7e8be20)
+* Rebuild the new documentation for `FeynCalc` 9.3. This should solve Issue #20, Issue #25, Issue #36 and Issue #44 (c6d41ea8)
+* Fix the renormalization example. (f1639276)
+* Reworked error messages in mixed dimensions in schemes other than BMHV. This way the user should better understand what is going wrong. (45363084)
+* `TID`: Do not fail with weird error messages when the loop momentum is inside a list. (8ee8b593)
+* Fixed a bug in the detection of variables leaking into the `Global` context. (97d0e853)
+* Fixed an issue with `$SystemMemory` missing in `Mathematica` 8 and 9. (1b7cb9cf)
+* Disabled automatic expansion of momenta in Dirac spinors. Otherwise it is impossible to apply `MomentumCombine` when needed. (7ba7fcfd)
+* Do not allow `Uncontract` act on expressions with symbolic or negative powers: this inevitably generates wrong results. (ea32f1e1)
+* Blocked obviously illegal `SUNIndex` and `SUNFIndex` objects. (44002e8f)
+* Fixed a bug when `FCSplit` would not immediately abort the evaluation although the second argument is not a list. (76a8b277)
+* Fixed a bug, where a conversion rule was missing in `TarcerToFC`. (428f4d18)
+* Fixed several bugs in `DotSimplify` that prevented an efficient application of predefined commutation and anticommutation rules. (eff659e1)
+* Added a workaround for products of non-commutative objects in DOTs to be handled by `DotSimplify` (GitHub Issue #42). (0ebd271b)
+* Fixed a bug in `FCProductSplit`. (347fab47)
+* Fix for the accidental removal of the `PropagatorDenominatorExplicit` compatibility mode. (e235e369)
+* Fixed wrong factoring option in `Solve3`. (15b624ac)
+* Fixed a bug in `FCCanonicalizeDummyIndices` when it would erroneously rename free indices. (3fb80784)
+* Fixed a bug when `FCLoopBasis` functions would not abort the evaluation when applied to expressions free of the loop momenta. (4163772a)
+* Removed obsolete rules for Polarization that did not honor the `Transversality` option (thanks to ChiMaoShuPhy, GitHub Issue #41). (357cac41)
+* Resolved possible issues with Cartesian quantities in `FourDivergence`. (fbac6b35)
+* When a Cartesian scalar product of type p^2 is set to zero, the corresponding `CartesianMomentum` must be set to zero as well. (2e588be6)
+* `Collect2` should abort if the input contains `SeriesData`. This usually happens when one forgets to apply `Normal` after a series expansion. (ac08a472)
+* Fixed another small bug in `TID` for NR integrals. (81faa558)
+* Fixed some bugs in the treatment of NR integrals. (b0804303)
+* Fixed some bugs in the typesetting. (ca7a9743)
+* Fixed a small bug in `DiracEquation`. (3d3c9921)
+* Fixed a bug in `Spinor` with `HoldForm` in the momentum slot. (df57486c)
+* Fixed some more bugs related to the reduction of integrals with temporal components. (3f9d6b7c)
+* Fixed a bug in `FCApart`. (bff5237f)
+* Fixed a bug in `FCApart` related to `SFADs` and `CFADs`. (6777a01e)
+* Fixed another bug in `Write2` (thanks to F. Saturnino). (e312281d)
+* Fixed another bug in `Write2` (thanks to F. Saturnino). (62d395fa)
+* Fixed missing link to `FCCanonicalizeDummyIndices`. (e003b3fe)
+* Fixed a bug in `Write2` (thanks to F. Saturnino). (23625442)
+* Make `FCLoopBasisIntegralToPropagators` be less strict on integrals with linear combinations of scalar products in the numerators (thanks to H. BÉLUSCA - MAÏTO, GitHub Issue #38). (7cc253f8)
+* Fixed some more bugs in the symmetrizer of `Tdec` (thanks to H. BÉLUSCA - MAÏTO, GitHub Issue #37) (25e17ce2)
+* Fixed a small bug in `FCReplaceMomenta`. (95ff78d9)
+* Fixed a bug in `Tdec` related to the missing symmetrizations for multiloop integrals (thanks to H. BÉLUSCA - MAÏTO, GitHub Issue #35). (6cbbffbe)
+* Fixed some tests. (b3a0226a)
+* Fixed a small bug in `FCLoopBasisIntegralToPropagatorsFCLoopBasisIntegralToPropagators`. (46ff60a2)
+* Fixed a small bug in FDS related to the handling of `SFADs`. (14be10b9)
+* Fixed a bug in `FCLoopBasisIntegralToTopology` related to a wrong extraction of propagator powers. (8014a58c)
+* Fixed a bug in `FCCanonicalizeDummyIndices` that Lorentz indices were always canonicalized, even when this was turned off via the `Head` option. (808ca5b5)
+* Fixed a bug in `FCApart`, where `f` was wrongly assumed to be nonzero. (405023b2)
+* Fixed a bug in `FCCanonicalizeDummyIndices` in conjunction with Dirac traces. (676407b7)
+* Fixed a bug in `FCLoopBasisFindCompletion` when the list of user-supplied propagators contains duplicate entries. (a6adb95a)
+* Fixed a bug with wrong propagator powers reported by `FCLoopBasisExtract` for `SFAD`s and `CFAD`s. (3f2b6e3b)
+* Fixed a performance regression in the typesetting of `FeynAmpDenominator` (`FCI` version). (4c5351ff)
+* Fixed `FCFAConvert` to properly handle `FeynArts` models with an explicit `Eps` (thanks to Gang Li). (4496d289)
+* `OneLoop`: Fix typos. (c272ef8e)
+* Fixed some issues with `Mathematica` 9 and 8 (thanks to Gang Li). (6ee20946)
+* Fixed inconsistent behavior of `FDS`. If a loop integral factorizes into a product of loop integtrals, `FDS` can often detect that and give the result in such a way, that a single `FAD` is rewritten as a product of `FAD`s. This behavior is controlled by the option `FeynAmpDenominatorCombine`. The default value is `False` (to be compatible with the old behavior). Setting this option to `True` activates the factorization. (8a7553f4)
+* Small fix in `Solve3`. (c7a74d74)
+* Fixed a small bug in `FCPrepareFAAmp`. (84ca61dc)
+* Small fix in `FeynAmpDenominatorSimplify` to handle cases like `FAD[{p,m}]^2 - FAD[{p,m},{p,m}]` when no loop momentum is specified. (e9bae655)
+* Small fix in `FUnitTools`. (2523f6fd)
+* Small fix in the automatic installer. (54065442)
+* Fixed several bugs in `FeynCalc2FORM`. (43b6352e)
+* Do not call `SirlinSimplify` from `DiracSimplify` if the expression is not strictly 4-dimensional. (a2a18a42)
+* `FCCanonicalizeDummyIndices`: Do not expand the expression if there is nothing to canonicalize. (d6feaa03)
+* Disabled memoization in `TrickMandelstam` to prevent problems with `ScalarProduct[x,y]=z`. (82b4d8fc)
+* Do not generate nrfail messages, if the expression contains only an `ExplicitLorentzIndex[0]`. (ae8c109f)
+* Do not automatically project all `ExplicitLorentzIndex` objects to 4 dimensions. (edffee97)
+* Disabled `SimplifyPolyLog` on expression that contain patterns. This often leads to wrong and/or unpredictable results. (aabe103f)
+* Removed memoization in `PairContract`. Otherwise one gets issues with many other functions after changing definitions of the scalar product. (b70704d4)
+* Fixed issues with `TID` when `Dimension` is not `D`. (0bd9c1ec)
+* Some more fixes in `SimplifyPolyLog`. (b468ad64)
+* Small fix in the `FeynArts` patcher (thanks to Will). (e0b620f3)
+* Fixed a bug in `FCAbbreviate`. (0e58c3ae)
+* Fixed the two loop QCD ghost example. (01fedaef)
+* Fixed improper blocking of non-scalar 5-point functions in `NPointTo4Point`. (d88303fb)
+* Fixed wrong sign in `NPointTo4Point` (thanks to Pablo Sanchez Puertas). (37d80c7f)
+* Fixed handling of BMHV in `FCMultiLoopTID` and blocked input in wrong dimensions. (0a394469)
+* Fixed a small bug in `DiracTrick`, where an internal variable entered the final result (thanks to Graczyk Krzysztof). (a29eebf0)
+* Fixed a small bug in `TID` with some indices remaining uncontracted in the final output. (c50521df)
+* Fixed a bug in `TID` related to the BMHV scheme. (d26489e8)
+* Fixed missing `PartialD -> FCPartialD` replacements in PHI. (090eb50d)
+* Fixed a bug in `ExpandScalarProduct` (thanks to Simone Biondini). (7d72b11e)
+* Added another check against incorrect `Pair` expressions. (2de6c8c0)
+* Fixed a bug in `FCLoopMixedToCartesianAndTemporal` when the input contains `FADs`. (7b863558)
+* Fixed a bug in `SUNTF` related to the pattern matching. (0cb39274)
+* Fixed a bug in `DiracReduce` when too complicated Dirac structures could not be reduced to `SPVAT`. (e2e3d2ed)
+* Fixed `Chisholm` and `DiracReduce` failing on spinor chains. (28d942a7)
+* Fixed another bug in `FCLoopBasisIntegralToPropagators`. (62130671)
+* Fixed a bug in `FCGetNotebookDirectory`. (dd014f8d)
+* Fixed a small bug in the `FeynRules` QCD model. (e92ae81f)
+* Minor fixes in the bundled add-ons. (ddbe1247)
+* Fixed some leakage of `FeynCalc` internal symbols into the `Global` context after loading `FeynCalc`. Furthermore, the file `.testing` in the `FeynCalc` directory now allows `FeynCalc` to decide whether the current version is a development or a stable version. (0e1fc2cd)
+* Added a fix to `FCLoopSplit` to work around a bug in Factor in `Mathematica` 11.0.1 (c.f. ) (7efbbacc)
+* Small fix in `TR`. (81b862dd)
+* Fixed a bug in `SpinorChainTrick` related to the canonicalization of Lorentz indices in spinor chains. (7a79835c)
+* Fixed a bug in `OneLoopSimplify` related to an excessive use of `Isolate` that leads to issues with noncommutative objects (thanks to Adrian). (60ef0c62)
+* Small fix in `README.md` for the examples. (52d25d50)
+* Fixed possible memoization issues in `SimplifyPolyLog`. (fa423bee)
+* Fixed an issue with `FDS` when it is used with specifying loop momenta. (e7f5308d)
+* Minor fixes in `FCCompareResults`. (95478e03)
+* Fixed a small bug in `FCLoopIsolate`. (46a2de4a)
+* Fixed a bug when `FCMultiLoopTID` would ignore tensor integrals that depend on a smaller number of loop momenta then given in the second argument of the function (thanks to P. Schicho). (9a0a9834)
+* A tiny fix in `PaVeReduce`. (e6a76e46)
+* Small improvements in `FAPatch` (better text output). (2e1a3b5b)
+* Minor corrections in the `FeynRules` models. (eff81a4a)
+* Fixed some false warnings in `PolarizationSum` when working with `D`-dimensional polarization vectors. (be849046)
+* Fixed a small bug in `ComplexConjugate` (`SUNDeltaContract` not converted back into `SUNDelta`). (6d80a841)
+* Small fix in `FCCheckSyntax`. (d93d0c08)
+* Fixed a small bug in `DiracTrick` (`Eps` has no options anymore). (4753508e)
+* Fixed an issue with user defined `$RankLimit` when generating `Tarcer.mx` (4a472353)
+* Fixed a bug in `FCPrepareFAAmp` related to the convestion of the SU(N) Kronecker delta. (ebaa2504)
+* Fixed a bug in the definition of `TFR` in `Tarcer` (thanks to P. Schicho). (4abdafda)
+* Some minor corrections to `PaVeUVPart`. (fb4c8255)
+* Several minor corrections in `DiracTrick`. (ba08afba)
+* Fixed a small bug in `TarcerToFC` regarding nonstandard dimensions. (4222c8aa)
+* Fixed a bug in the typesetting of `FAD`s. (c809f4a4)
+* Fixed a bug in the typesetting of `TemporalPair`. (fc044986)
+* Fixed a regression bug in `TarasovT` (thanks to Zhang). (33641020)
+* Fixed a bug in `FCCanonicalizeDummyIndices` related to contractions of Lorentz and Cartesian indices in different dimensions. (df50e5ae)
+* Fixed some issues in `DotSimplify` related to the new `FCJoinDots` option. (998d8081)
+* Fixed a bug in `FCE` related to issues with `FAD`'s having nonstandard dimensions. (b59338a8)
+* Fixed a bug in `DiracTrick` regarding the cyclicity simplifications of traces with chiral projections (thanks to Ula). (4b5ca9bd)
+* Fixed a bug in `DiracTrick` regarding wrong anticommutation properties of combinations of chiral projectors (thanks to Ula). (3d446a33)
+* Fixed a bug with premature memoization in `ToTFI` (thanks to Philipp Schicho) (88ea81c8)
+* Fixed an infinite recursion bug in `PaVe` (thanks to Xiaonu Xiong). (c4c0c644)
+* Fixed a bug where `DiracSimplify` was ignoring products of `D`-dimensional spinors (thanks to James McKay). (46710a7e)
+* Fixed a minor bug in `EpsEvaluate` (thanks to Pablo Sanchez Puertas). (5f3031ee)
+* Fixed a bug that `SP[p]=p2` was not setting the value of `SP[p,p]` likeweise for `CSP` and other dimensions. (233af78a)
+* Fixed a bug with `DiracTrace` ignoring the change of `$LeviCivitaSign` (thanks to James G.). (e1553275)
+* Fixed a small bug in `Uncontract`. (d6eb09eb)
+* Fixed a small bug in the definition of `Eps`. (1797ce4f)
+* Small fix in `SetMandelstam` for more than 4 momenta. (4abb8e06)
+* Fixed a small bug in `MomentumCombine`. (2b64ab92)
+* Fixed two example files to work with `FeynArts` using unitarity gauge. (e70fc629)
+* Fixed a bug in `FCRenameDummyIndices` (thanks to Luigi Delle Rose). (4853e427)
+* Fixed a bug in `ChangeDimension` related to `Eps` tensors. (1cf89752)
+* Fixed a bug with missing `DiracSigmaExplicit` in DiracTrace (Issue #23, thanks to sbilmis). (341e27ea)
+* Fixed a bug in `Contract` related to the BMHV scheme (thanks to H.Patel). (88739e50)
+* Small fix for `PD` in `FCE` and `FCI`. (9811355c)
+* Minor fixes in `MomentumExpand`, `FourDivergence`, `ToTFI`, `FCLoopBasis` and `NPointTo4Point`. (f136eaad)
+* Minor fix in `FCPrepareFAAmp`. (e065592f)
+* Fixed a bug in the new definition of `Pair`. (b9e787ad)
+* Fixed a bug in `MomentumCombine`. (867bf9f3)
+* Small fix in `Contract`. (b7e3bd13)
+* Fixed a bug with `PropagatorDenominator[0,0]` (c6335b6e)
+* Blocked some malformed `Pair` arguments. (6376f481)
+* Fixed premature memoization in `ToPaVe` (thanks to Michael Park, ). (b78c3c4c)
+* Improved `PaVe` to block functions that have wrong number of kinematic invariants. (a2f7280c)
+* Improved typesetting of four vectors raised to powers. (6947b64d)
+* Fixed `FCCanonicalizeDummyIndices` not canonicalizing some combinations of dummy indices. (381d019a)
+* Fixed a bug in `OneLoop` when the number of propagators is too high (thanks to Jongping Hsu). (cf9da445)
+* Fixed a small bug in the definition of scaleless `PaVe`s (2528ca9b)
+* Fixed wrong definiton of `E0` in ToPaVe. (41ca39d5)
+* Fixed a bug related to `$KeepLogDivergentScalelessIntegrals`. (0ea126eb)
+* Fixed an infinite recursion bug in the symmetry of `D`-functions. (8aca4503)
+* Fixed a bug in `FCReplaceD`. (2ad3c226)
+* Fixed a bug in `DiracTrick` (related to issue #18). (468d9627)
+* Fixed a bug in `DotSimplify` (related to issue #18). (a5670f24)
+* Fixed an infinite recursion bug with `B0`. (59618b02)
+* Blocked further wrong/inconsistent arguments for `GA`, `GAD`, `GAE`, `GS`, `GSD`, `GSE`, `DiracGamma`, `DiracMatrix` and `DiracSlash`. (7e95dc01)
+* Fixed incorrect behavior of `DiracMatrix[mu,nu,...]`. (f988e5a7)
+* Fixed another bug in `ApartFF` (thanks again to Zhang Shao Wu). (5b98e326)
+* Fixed issue #19 (Documentation doesn't work until restart). Thanks to Szabolcs Horvát. (d399819e)
+* Fixed a bug in `ApartFF` (thanks to Zhang Shao Wu). (6d77c2e1)
+* Fixed a small bug in `OneLoop` related to terms free of loop integrals. (a484bc08)
+* Fixed remaining issue with `FAD[{0,0}]` (c4a9b299)
diff --git a/FeynCalc/ChangelogOld.md b/FeynCalc/ChangelogOld.md
new file mode 100644
index 000000000..8b42ea535
--- /dev/null
+++ b/FeynCalc/ChangelogOld.md
@@ -0,0 +1,1080 @@
+### Version 9.2.0 (November 2016)
+
+#### Important changes
+ * New handy functions `FCAbbreviate`, `FCHideEpsilon`, `FCShowEpsilon`, `FCLoopIBPReducableQ`, `FCFactorOut`, `SelectFree2`, `SelectNotFree2`
+ * Finally we have shortcuts for spinors with D-dimensional momenta: `SpinorUD`, `SpinorUBarD`, `SpinorVD`, `SpinorVBarD`
+ * New option `$KeepLogDivergentScalelessIntegrals` permits consistent 1-loop computations, where UV and IR divergences are regularized with different epsilons.
+ * `Examples/FeynRules` now contains several FeynRules models (with more to come) with additional scripts that show how such models can be used with patched `FeynArts`. This should be useful for new users.
+ * `DiracTrace` has received a lot of internfal refactoring and should be now faster and much more stable. Thanks to Peng Sun for motivating me to do so. I hope to get `DiracSimplify` refactored as well in the next release.
+
+
+
+#### Commit log
+
+* Added an example calculation to the test-suite. (a4cdd648)
+* Fixed wrong option name in FCDiracIsolate. (202f3e2)
+* Added some missing unit tests for FCLoop-functions. (c81660f1)
+* Added few tree-level electroweak examples. (4909891)
+* Added FCAbbreviate, a new function that introduces abbreviations for FeynCalc expressions that should be exported to other tools. (a7a27e5); Example:
+
+ ```
+ FCAbbreviate[SPD[p, k] FAD[{q, SMP["m_e"]}, {q + p, m}], {q}, {p, k}, Head -> spd]
+ ```
+
+* Now FCLoopBasisFindCompletion can complete the basis using a list of user-supplied propagators given as the value of the Method option (4b70dcb)
+
+ ```
+ FCLoopBasisFindCompletion[FAD[q1 + p, +q2 - k] SPD[q1, q2], {q1, q2}, Method -> {FAD[{q2 + k, m}], FAD[{q1 - p, m}], +SPD[p, q2], SPD[k, q1]}]
+ ```
+
+* Added new option FCLoopIBPReducableQ to FCLoopExtract and FCLoopIsolate. This allows to extract/isolate only those loop integrals that are IBP reducable. (20af417)
+
+ ```
+ FCLoopExtract[a FCI[FAD[{q, 0, 2}]] + b FCI[FAD[{q, 0, 1}]], {q},loop, FCLoopIBPReducableQ -> True]
+ FCLoopIsolate[a FCI[FAD[{q, 0, 2}]] + b FCI[FAD[{q, 0, 1}]], {q}, Head -> loop, FCLoopIBPReducableQ -> True]
+
+ ```
+* Added new function FCLoopIBPReducableQ for a quick check if the given loop integrals has propagators raised to integer powers. (b699150); Example:
+
+ ```
+ FCLoopIBPReducableQ[FCI[SPD[q,q]^2FAD[{q,0,1}]]]
+
+ ```
+* Some minor refactoring in FDS. (681ef0e)
+* Improved FCLoopBasisFindCompletion to use scalar products as extra propagators. The old behavior can be achieved via the option Method->NullSpace. The new default is however Method->ScalarProduct. (38386fa); Example:
+
+ ```
+ FCLoopBasisFindCompletion[FAD[{q1, m, 2}, {q1 + q3, m}, {q2 \[Minus] q3}, q2], {q1, q2, q3}]
+ FCLoopBasisFindCompletion[FAD[{q1, m, 2}, {q1 + q3, m}, {q2 \[Minus] q3}, q2], {q1, q2, q3}, Method -> NullSpace]
+ ```
+
+* Version bump to 9.2 (c8c8cfb)
+* Fixed a bug in FDS related to $KeepLogDivergentScaleless set to True. (a411e67)
+* Improved debugging output in FDS. (fe21cbe)
+* Fixed a bug with D-dim Eps not disappearing when indices are the same. (906cac6)
+* Fixed a small bug in FCShowEpsilon. (0c25ba0)
+* Improved FCHideEpsilon and FCShowEpsilon to work also for D=4-Epsilon via the option D. (16b814e)
+* Fixed a bug in FourDivergence related to the differentiation of FADs. (b372e2b)
+* Added new shortcuts for spinors with D-dimensional momenta: SpinorUD, SpinorUBarD, SpinorVD, SpinorVBarD. (201b058); Example:
+
+ ```
+ SpinorUD[p, m] // FCI // StandardForm
+ SpinorVD[p, m] // FCI // StandardForm
+ SpinorUBarD[p, m] // FCI // StandardForm
+ SpinorVBarD[p, m] // FCI // StandardForm
+ ```
+
+* Some cross-checks in ToPaVe, SPC, OneLoop,OneLoopSimplify. (0d832c2)
+* Improved typesetting of the SMP's for renormalization. (1c7b512)
+* Added FeynRules model for pure QED with counterterms following Bohm, Denner and Joos. (fc14872)
+* Added new SMP objects for renormalization calculations. (f2eabd6)
+* Perofrmance improvement in DiracTrace. (3c40740)
+* Added two convenience functions FCHideEpsilon and FCShowEpsilon for doing the substitution 1/Eps - EulerGamma + Log[4Pi] -> Delta. (6cddeb0); Example:
+
+ ```
+ FCHideEpsilon[1/Epsilon - EulerGamma + Log[4 Pi]]
+ FCShowEpsilon[SMP["Delta"]]
+ ```
+
+* Fixed a bug in FCReplaceD, so that DiracGamma does not loose the dimension anymore. (9544275)
+* Fixed a bug in FourDivergence related to the differentiation of D-dim Dirac matrices. (dad4b85)
+* Added FCFactorOut option to Collect2. Currently this only allows to factor out a global prefactor. (54f513a); Example:
+
+ ```
+ Collect2[Together[a (1 + x) + 4 b (1 + y)], {a, b}, FCFactorOut -> 4]
+ ```
+
+* Added FCFactorOut, a small convenience function for factoring out user-specified prefactors. (31f3543); Example:
+
+ ```
+ FCFactorOut[(a + 3 b), 3 b]
+ ```
+
+* Added SelectFree2 and SelectNotFree2. They act like SelectFree and SelectNotFree, but with an Expand2 before the selection. (d6fb941); Example:
+
+ ```
+ SelectFree2[a (b + c) + d, b]
+ SelectFree[a (b + c) + d, b]
+ SelectNotFree2[a (b + c) + d, b]
+ SelectNotFree[a (b + c) + d, b]
+ ```
+
+* Added FeynArts model (generated with FeynRules) for QCD in the background field formalism. The reason is that this model is missing in the standard FeynArts. (991e340)
+* Fixed a small bug in DiracTrick. (f567f82)
+* Added an extra check for DiracTrick. (75466d4)
+* Made DotSimplify finish faster if there is nothing to simplify. (db0a586)
+* Added new option DiracSigmaExplicit to FCDiracIsolate. (9cf7654)
+* Some improvements in TID for the BMHV scheme. In particular, unless BMHV scheme has been explicitly selected, amplitudes that are partly 4-dim and partly D-dim will not be tolerated anymore. (aa89a44)
+* Refactoring DiracSimplify. (7f3dc3d)
+* DiracTrick: Adjusted Larin's scheme (12fd5ac)
+* Made DiracTrick a bit faster by evaluating simple traces before entering the main loop. (f419c0d)
+* Added option FCDiracIsolate to DiracTrick. This is for calling DiracTrick from internal functions. (f40ec42)
+* Cleaning up the code of DiracTrace. (ab363ab)
+* Some more adjustments for DiracTrace and DiracTrick. (edc954a)
+* Improved performance of DiracTrace on big traces. (64f5120)
+* Some more refactoring in DiracTrick. (2be6dd4)
+* Improved performance of DiracTrace for West->False. (972c7c9)
+* DiracTrick: Finally separated rules for different schemes. (8bb589a)
+* DirackTrick: Cleaned up the rules for moving g^5. (1a63162)
+* DiracTrick: Use cached FCFastContract instead of coneins. (d4ed905)
+* DiracTrick: Get rid of scev in favor of FCUseCache. (7446399)
+* DiracTrick: Refactoring continues 2. (7a37313)
+* DirackTrick: Refactoring continues. (f026c48)
+* Continuing refactoring in DiracTrick. (3a743a1)
+* Added option LorentzIndex to FCDiracIsolate that allows inclusion of Lorezntz tensors into isolated heads.dch[GS[p].GS[l]] + dch[GA[i].GA[j].GA[k] MT[mu, nu]] (beb0713; Example:
+
+ ```
+ FCDiracIsolate[ MT[mu, nu] GA[i, j, k] + GS[p, l] + MT[mu, nu] GA[mu, j, k], LorentzIndex -> True, Head -> dch]
+ ```
+
+* Fixed in a bug in the handling of unknown non-commutative objects by DiracTrick. (fe1e459)
+* DiracTrick: Splitting of DiracChains is now handled by FCDiracIsolate. (4e269d0)
+* DiracTrick: Fatoring out of SUNT matrices is now handled by FCDiracIsolate. Moreover, gamma5Present checks if g^5 is present at all. (d60406a)
+* Improved InsideDiracTrace simplifications of DiracTrick. (2d550c6)
+* DiracTrick refactoring in progress. (b6db370)
+* Improved test suite to show time required to run single tests. (2689240)
+* Started refactoring of DiracTrick. (a552eaa)
+* Fixed handling of Larin's scheme in Anti5. (174bb74)
+* Updated description of Larin's scheme. (174f98e)
+* Minor cleanups in FCI and FCE. (e86d145)
+* Added example for the computation of the self-energy diagrams in pure Yang-Mills using background field formalism according to Abbott. (2845af6)
+* Improved handling of Dirac traces that contain unknown non-commutative objects. (1aa3f96)
+* DiracTrace improvement with Expand. (b1ff3f7)
+* Rempoved some old code from DiracTrace (981ab92)
+* Implemented new trace function in DiracTrace. (c6025e4)
+* Test (2941b9e)
+* Some more improvements in DiracTrace. (dfe1dc5)
+* Some fixes in DiracTrace plus now we it uses DiracTrick instead of DiracSimplify. (57b1b2a)
+* More refactoring in DiracTrace. (685a1c4)
+* Even more refactoring in DiracTrace. (6be8f53)
+* More refactoring in DiracTrace (1dcb5bb)
+* More refactoring in DiracTrace. (a06533e)
+* Some more refactoring in DiracTrace. (5187efd)
+* Some more refactoring in DiracTrace. (b185f3c)
+* Some fixes for Larin's scheme in DiracTrace. (cda3f15)
+* Improved splitting between SUNT and DiracGamma in DotSimplify. (45ebe1e)
+* Fixed a bug in the new InsideDiracTrace simplification of DiracTrick. (da94751)
+* Added new option InsideDiracTrace to DiracTrick. (a5b63dc)
+* Added new option DiracGammaCombine to DiracTrick and improved handling of chiral projectors. (5416c72)
+* Some refactoring in DiracTrick. (87f3d4b)
+* Fixed typo in the description of TarcerToFC (6abb381)
+* Added new option DiracGammaCombine to FCDiracIsolate. (2d5e8aa); Example:
+*
+ ```
+ FCDiracIsolate[GA[nu].(GS[p] + GS[q] + GS[k] + m).GA[mu], Head -> dch]
+
+ FCDiracIsolate[GA[nu].(GS[p] + GS[q] + GS[k] + m).GA[mu], Head -> dch,
+ DiracGammaCombine -> False]
+ ```
+
+* Some refactoring in FCDiracIsolate. (79fdd36)
+* Improved the muon decay example. (b79005d)
+* Added an example for using Tdec to compute some multi-loop decompositions that appear in the renormalization of the Gross-Neveu model at 4-loops. (de1cf3b)
+* Fixed a bug in Tdec related to wrong determination of symmetries in multi-loop integrals. (f4bb647)
+* Added several new SMP typesettings: m_qu and m_qd for up- and down-type quark masses m_l for lepton masses Q_u and Q_D for up- and down-type quark charges g_W and g'_W for the weak couplings (5a1c91c); Example:
+
+ ```
+ ?SMP
+ SMP[]
+ ```
+
+* Added the option PaVeIntegralHeads to FCLoopCanonicalize, FCLoopIsolate and FCLoopSplit. This allows to specify extra heads that should be treated as PaVe integrals. (b5ee87b); Example:
+
+ ```
+ FCLoopSplit[Foobar[x], {}, PaVeIntegralHeads -> Join[OptionValue[FCLoopIsolate, PaVeIntegralHeads], {Foobar}]]
+
+ FCLoopIsolate[Foobar[x], {}, PaVeIntegralHeads -> Join[OptionValue[FCLoopIsolate, PaVeIntegralHeads],
+ {Foobar}],Head -> loop]
+ ```
+
+* Added new !experimental! global option $KeepLogDivergentScalelessIntegrals that forces FeynCalc not to put log divergent scaleless integral 1/q^4 to zero. This is important e.g. for EFTs, where IR and UV divergences must be distinguished. (d1610d0); Example:
+
+ ```
+ $KeepLogDivergentScalelessIntegrals=True;
+ TID[FVD[q,mu]FVD[q,nu]FAD[{q,0,3}],q]
+ ```
+
+* Fixed typos in the description of the ABJ example. (5262505)
+* Small refactoring in OneLoop. (4d53ccd)
+* Fixed a small bug (just caused a warning) in PaVeReduce when PaVe functions have user-defined options. (40f3338)
+* Improved automatic installer to allow installing FeynCalc and FeynArts from local tarballs. For example: (e2a13c0)
+
+### Version 9.1.0 (August 2016)
+
+#### Important changes
+* Many new hadndy functions: `FCTraceExpand`, `FCTraceFactor`, `FCGetDimensions`, `FCCanonicalizeDummyIndices`, `TarcerToFC`, `FCReplaceD`, `FCColorIsolate`, `FCDiracIsolate`, `DeclareFCTensor`, `UnDeclareFCTensor`, `CommutatorOrder`
+* Improved support for using `FeynCalc` with custom `FeynRules`-models (see http://www.feyncalc.org/forum/1042.html for more details)
+* `$LimitTo4` is now disabled by default. Even when set to `True`, it is applied only to 1- and 2-point functions (see http://www.feyncalc.org/forum/1077.html for more details).
+
+#### Commits log
+* Added g-2 calculation to the examples testsuite (a3e66b1)
+* Paclet version updated to 9.1 (fa6c7e7)
+* Rebuilt the documentation. (31f3710)
+* Fixed a small typo in the documentation. (9262470)
+* Updated the changelog for FeynCalc 9.1 (91ae94d)
+* Updated `README.MD` (9e99cd)
+* Fixed a bug in the computation of chiral traces, when West's formula is not used. (0a25312); Example:
+ ```
+ $BreitMaison = True;
+ (DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True] - DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True, West -> False]) // Simplify
+ ```
+* Fixed usage information of `GluonGhostVertex` (thanks to H. Patel). (16a6cbf)
+* For now commented out syntax check in `DataType` (leads to problems with FeynHelpers). (1c534a8)
+* Added an example for the g-2 calculation in QED at 1-loop and corrected few spelling errors. (96aa208) See `Examples/QED/QEDElectronGMinusTwoOneLoop.m`
+* Added several new unit tests for `TARCER` . (c2be321)
+* Small cleanups in `FeynCalc.m` and `SUNTrace` to prevent unnecessary pollution of the Global context. (ee76da2)
+* Some improvements in `FCTraceExpand` and `FCTraceFactor`. In particular, now `FCTraceFactor` can properly treat nested Dirac traces. (f985c16); Example:
+ ```
+ FCTraceExpand[DiracTrace[GA[i, i] + GA[j, j] DiracTrace[GA[a] + GA[b] DiracTrace[GA[x]]]]]
+ ```
+* Added option CustomIndexNames to `FCCanonicalizeDummyIndices` and made many improvements to the code. Now one can use `FCCanonicalizeDummyIndices` with arbitrary custom indices, which are treated on the same footing as the built-in indices LorentzIndex, `SUNIndex` und `SUNFIndex`. Einstein's convention is always assumed, though. (1403efe); Example:
+ ```
+ FCCanonicalizeDummyIndices[ T1[MyIndex2[a], MyIndex1[b]] v1[MyIndex1[b]] v2[MyIndex2[a]] + T1[MyIndex2[c], MyIndex1[f]] v1[MyIndex1[f]] v2[MyIndex2[c]], Head -> {MyIndex1, MyIndex2}, CustomIndexNames -> {{MyIndex1, {i1}}, {MyIndex2, {i2}}}]
+ ```
+* Made automatic expansion of `DiracGamma[Momentum[a]+...]` work also for dimensions other than 4. (4f6169c); Example:
+ ```
+ DiracGamma[Momentum[a, D] + Momentum[b, D] + Momentum[c, D], D]
+ ```
+* Added checks against predefined scalar products involving loop momenta. This should prevent some stupid mistakes (6fd45b0); Example
+ ```
+ SP[q, q] = 0;
+ Tdec[{q, mu}, {p}]
+ ```
+* Added a global variable `$ScalarProducts` that keeps track of vector pairs for which a scalar product has been defined. This is useful e.g. if one needs to check if the given variable can be used as a general 4-vector (i.e. loop momentum) or if it already has some rules attached to it. (d15191f)
+* Added new function CommutatorOrder that orders any `Commutator` and `AntiCommutator` lexicographically. (3039650); Example:
+ ```
+ CommutatorOrder[Commutator[a, b] + Commutator[b, a]]
+ ```
+* Small refactoring in `DotSimplify`. (6e6b01e)
+* Improved `ExpandScalarProduct` to work on arbitrary tensor declared via `DeclareFCTensor`. (fc05a8e); Example
+
+ ```
+ DeclareFCTensor[myTens];
+ ExpandScalarProduct[myTens[z, Momentum[a + b], Momentum[c + d]]]
+ UnDeclareFCTensor[myTens];
+ ```
+
+* Added `DeclareFCTensor` and `UnDeclareFCTensor`. Now it is possible to declare new tensor heads, just like this done for new non-commutative objects. (bbbe8af)
+* Improved error messages for several function. (d5a0572)
+* Added `TensorArgsList`, an internal list of possible heads that may appear as arguments of tensors. (d815c58)
+
+* Updated list of publications. (12d4b27)
+* Added options `EpsEvaluate` to `ExpandScalarProduct`. This way one can now do both operations via `ExpandScalarProduct[expr, EpsEvaluate->True]`. (a83592d); Example:
+ ```
+ ExpandScalarProduct[SP[a + b, c] LC[e, f][g + h, j] LC[][i1, i2, i3, i4 + i5], EpsEvaluate -> True, Momentum -> {a, g}]
+ ```
+* Improved `FCCanonicalizeDummyIndices` to allow exclusion of certain index heads (via the `Head` option) and definition of own renaming functions (via the `Function` option). (065ad89)
+* Added `FCColorIsolate`, a handy helper function to extract color structures. (5cf9f56); Example:
+ ```
+ FCColorIsolate[SUNF[x, y, z]^2 SUNT[a, b] x + SUNT[c] SUND[i, j, k]]
+ ```
+* Added `SUNHeadsList`, an internal list of colored objects. (9bfd660)
+* Added `ToDiracSigma` which is essentialy the inverse of `DiracSigmaExplicit`. (2098ee5); Example:
+ ```
+ ToDiracSigma[GA[i, j], GA[i], GA[j]]
+ ```
+* Added `Chisholm2` that applies Chisholm identity to eliminate terms of type `GA[i,j,5]`. (7a5c381); Example:
+ ```
+ Chisholm2[GA[i, j, 5]]
+ ```
+* Fixed a bug in `EpsChisholm`. (0819112); Example:
+ ```
+ EpsChisholm[(SpinorUBar[p1, m1].SpinorV[p2, m2] + SpinorUBar[p1,m1].GS[k].SpinorV[p2, m2])]
+ ```
+* Fixed a small bug in `Collect2`. (e08933a); Example:
+ ```
+ Collect2[Sum[xa[i], {i, 1, 10}] + VAR Sum[xb[i], {i, 1, 10}] + VAR Sum[xx[i], {i, 1, 10}] + VAR^2 Sum[xy[i], {i, 1, 10}] + VAR^2 Sum[xz[i], {i, 1, 10}], VAR, Factoring -> False, IsolateFast -> True, IsolateNames -> KK] // FRH
+ ```
+* Refactored `FermionSpinSum` and added treatment of D-dimensional Dirac spinors (thanks to O. Gituliar). (bc9ce8d); Example:
+ ```
+ FermionSpinSum[ChangeDimension[Spinor[p1, m1].GA[i].GA[5].Spinor[p2, m2] Spinor[p2, +m2].GA[5].GA[i].Spinor[p1, m1], D], Momentum -> {p1, p2}]
+ ```
+* Removed obsolete option `SUNFToTraces`. (a9e729e)
+* Added `FCDiracIsolate`, a handy helper function to extract Dirac structures. (ad6af8b); Example:
+ ```
+ FCDiracIsolate[ yy GA[i] + xx SpinorUBar[p1, m1].GA[5].SpinorVBar[p2, m2] + zz + DiracTrace[GA[i, j]]]
+ ```
+* Added an option to disable `DiracSimplify` in `Chisholm` and `DiracReduce`. (0e4093a)
+* Small performance improvement in `Collect2`. (c0db8ab); Example
+ ```
+ Collect2[yy (xx*Sum[p[i] i^2, {i, 1, 100000}] + abc) + abc2, {abc, abc2}, Factoring -> False] // AbsoluteTiming // First
+ ```
+* Improved `FCPrepareFAAmp` to handle `FASclarProduct` (thanks to Francesco S). (16671c9)
+* Refactored `EpsChisholm`. (8287f45)
+* Removed `LeviCivitaSign` option from `DiracTrace`, `TR` and `Chisholm`. Instead the value should be set through `$LeviCivitaSign`. A more user-friendly configuration might be added in future. (0551b73)
+* Fixed inconsistent treatment of `$LeviCivitaSign` when it set not to the default value (thanks to Christopher Lester). (e05ed33); Example:
+ ```
+ $LeviCivitaSign = -I;
+ DiracReduce[GA[i1, i2, 5]]
+ ```
+* Refactored `Chisholm` and added the `LeviCivitaSign` option (thanks to Christopher Lester). (cb44558);
+* Version number bump to 9.1; Development versions are now extra indicated to avoid confustion with stable versions. (e0c75a6)
+* `Eps` should not evaluate to explicit values when it has integer arguments. The result is not-well defined when no distinction between upper and lower indices is made (thanks to Christopher Lester). (a4699d4); Example:
+ ```
+ Eps[0, 1, 2, 3]
+ ```
+
+* Fixed a bug in `ApartFF` related to singular kinematica (thanks to Shaowu Zhang). (329d5d2); Example:
+ ```
+ FCClearScalarProducts[];
+ ScalarProduct[k, k] = 0;
+ ScalarProduct[p, p] = m^2;
+ ApartFF[FAD[{q1, m}, {q1 - p}, {q1 - 2 p, m}, {q1 - k - 2 p, m}], {q1}]
+ ```
+* Improved `FAPatch` to recognize that a `FeynArts`/`FeynRules` model have already been patched. (21f5783)
+* Fixed a bug (#issue 9) in `DoPolarizationsSums` (thanks to Luca Mantani). (8944ff3); Example
+ ```
+ ScalarProduct[p1, p1] = 0;
+ DoPolarizationSums[Pair[Momentum[Polarization[p1, -I], D], Momentum[Polarization[p1, I], D]], p1, 0]
+ ```
+* Fixed a small bug in `FCE` when applied to metric tensors with explicit Lorentz indices (thanks to Wen Chen). (a7d66ff); Example:
+ ```
+ FCE[Pair[ExplicitLorentzIndex[0], LorentzIndex[a]]]
+ ```
+* Small fix in `Write2`. (b618ce9)
+* Introduced automatic ordering of masses in `B0` in the `PaVe` notation. (0fc0088); Example:
+ ```
+ PaVeReduce[PaVe[2, {p10, p12, p20}, {m1^2, m2^2, m3^2}]]
+ ```
+* More debugging output in `OneLoop`. (e2ae9c9)
+* Fixed a bug in the definition of `A00`. (a8c783f); Example:
+ ```
+ $LimitTo4 = True;
+ A00[m1^2]
+ ```
+* Fixed a bug in `PaVeReduce` that prevented detection of zero Gram deteriminants in C and D functions. (55080de); Example
+ ```
+ PaVeReduce[PaVe[1, 2, {(p1 - p2)^2, p1^2, p2^2}, {m2^2, m1^2, m0^2}]]
+ ```
+* Added `ToPaVe2`, a function that converts direct Passarino-Veltman functions like `A0`, `B1` etc. to `PaVe` ones. (913a50d); Example:
+ ```
+ B0[p^2,m1^2,m2^2]//ToPaVe2
+ ```
+* Added an extra test to `SUNSimplify`. Confirms the result from (a355845)
+* Adjusted and extended `PaVe` related unit tests. (13987d1)
+* More cleanups in `PaVeIntegrals.m` (0bf24e7)
+* Moved extra simplifications of `B0` functions into `PaVeReduce`. (d21e164)
+* Cleanups in `PaVeIntegrals.m` (faf1f86)
+* Moved all the `$LimitTo4=True` simplifications out of `PaVe`. They are not applied, unless `PaVeAutoReduce` is set to `True`. (64cd9a4)
+* Added `A00`. (1c75e8b)
+* `PaVeAutoReduce` for `PaVe` functions is set to `False` by default. (4163a13)
+* `$LimitTo4` is splitted into `$LimitTo4` (for tadpoles and bubbles) and `$LimitTo4IRUnsafe` (for triangles and boxes). Also, the description of the option is now much less cryptic. (fcfe3e7)
+* Added the option `A0ToB0` directly to `PaVeReduce`. (547dacb)
+* Added some extra `B0`-cases to `PaVeReduce`. (bb535ec)
+* Added the option `PaVeAutoReduce` to `PaVeReduce`. (9ab155e)
+* Improved `PaVeReduce` to handle more different cases (also with zero Gram determinants). (18dcc4d)
+* Fixed a bug in `FCLoopSplit`. (961960b); Example:
+ ```
+ FCLoopSplit[+1/6 (m1^2 + m2^2) + A0[m2^2]/6 + 1/3 m1^2 B0[0, m1^2, m2^2] + +1/6 (m1^2 - m2^2) B1[0, m1^2, m2^2], {}]
+ ```
+* Added `FCReplaceD`, a function that facilitates taking the limit D->4 without unwanted effects on the FeynCalc functions. (a49487e); Example:
+ ```
+ FCReplaceD[ScaleMu^(D - 4) SPD[p, p]*D, D -> 4 - 2 Epsilon]
+ ```
+* Small fix in `FUnitTools` related to the recreation of typesetting tests. (c409a14)
+* Added a `CovariantD` with explicit fundamental color indices. Although it can't be used in FeynRule, it is still very useful when deriving Feynman rules by hand. (732a6a9); Example:
+ ```
+ CovariantD[i, SUNFIndex[a], SUNFIndex[b], Explicit -> True]
+ ```
+* Improved typesetting of `QuantumFields`. Now it is possible to add more (custom) indices that will be typeset correctly. (4659077)
+* Added four new field types to be put into `QuantumField`: `QuarkFieldPsi`, `QuarkFieldPsiDagger`, `QuarkFieldChi`, `QuarkFieldChiDagger`. Currently, only typesetting is attached to them. (562d408)
+* `FCCanonicalizeDummyIndices` can now work also with SU(N) indices, as well as one custom index head (via `Head` option). (6eebc67); Example:
+ ```
+ FCCanonicalizeDummyIndices[T1[MyIndex[a], MyIndex[b]] v1[MyIndex[b]] v2[MyIndex[c]], Head -> MyIndex]
+ ```
+* `FCFAConvert` can now rename also SU(N) indices by supplying the index names via `SUNIndexNames` and `SUNFIndexNames`. (90e3b59)
+* Adjusted `FDS` to be a bit smarter on 1-loop integrals with same masses. (ed92327); Example:
+ ```
+ FDS[Apart2[FAD[{qp, m}, {qp - q}, {qp, M, 2}, {qp - q, M, 2}]] - ApartFF[FAD[{qp, m}, {qp - q}, {qp, M, 2}, {qp - q, M, 2}], {qp}], qp]
+ ```
+* Let `FCTraceExpand` set the PreservePropagatorStructures of internal `DotSimplify`. This (together with `DiracGammaExpand` set to `False`) seems to be the most convenient and sensible way to do expansions of `DiracTraces`. (b155314); Example:
+ ```
+ DiracTrace[((GSD[k + p] + M).GA[5].GSD[l - p].GAD[nu].(GSD[l] + M).GAD[la].GSD[k + l] + (GSD[k1 + p1] + M).GA[6].GSD[l1 - p1].GAD[nu].(GSD[l] + M).GAD[la].GSD[k1 + l1]).(GSD[x] + M)] // FCTraceExpand[#, DiracGammaExpand -> False] &
+ ```
+* Some refactoring in `DiracSimplify`. Also `InsideDiracTrace` simplifications are now applied agagin after `DiracTrick`. (cd9d228); Example
+ ```
+ DiracSimplify[GA[i].(GS[p] + M).GA[j].GA[6].GA[k].GA[j],InsideDiracTrace -> True]
+ ```
+* Added new option `PreservePropagatorStructures` to `DotSimplify`. If set to `True`, numerators of fermionic propagators like `(GS[p]+m)` that appear in chains of Dirac matrices will not be expanded. (4d9f34d); Example:
+ ```
+ DotSimplify[(GA[i].SUNT[a] (GS[p] + M).GA[j].GA[6].GA[k].GA[j] FAD[p + k, M] +
+ GA[i].(GS[p1] + M).GA[j].GA[7].GA[j].GA[k] FAD[p1 + k, M]).(GS[q] + m).(GA[l].(GS[p] + M).GA[n] + GA[n].(GS[p] + M).GA[l]), PreservePropagatorStructures -> True]
+ ```
+* Corrected a typo in `FeynCalc.m` (f840d00)
+* Improved debugging output in `OneLoop`. (ce133d6)
+* Added new option `FCCheckSyntax`. As checking the syntax in `DiracSimplify` slows things down a lot on big expressions, it is better to make it optional and turned off by default. (34e6aeb); Example
+ ```
+ DiracSimplify[SUNT[a] SUNT[b]]
+ DiracSimplify[SUNT[a] SUNT[b], FCCheckSyntax -> True]
+ ```
+* Fixed a bug in `DiracTrick` related to `$Larin=True` (thanks to Steffen Schwertfeger ) (03756b2); Example:
+ ```
+ $BreitMaison = False;
+ $Larin = True;
+ DiracTrick[GAD[a, b, c].GA[5].GAD[b, a, m]]
+ ```
+* Fixed a minor bug in `TarcerToFC`. (cbf6334)
+* Added `TarcerToFC`, a small tool to convert integrals in the `Tarcer` notation to the `FeynCalc` notation. (fb06f22); Example:
+ ```
+ TarcerToFC[ Tarcer`TFI[D,Pair[Momentum[p, D], Momentum[p, D]], {0, 0, 3, 2,0}, {{4, 0}, {2, 0}, {1, 0}, {0, 0}, {1, 0}}], {q1, q2}]
+ ```
+* Moved `FromTFI` to the `QCD` directory. (1fd22cf)
+* Fixed treatment of `FAD`'s with propagator powers equal to zero, i.e. `FAD[{q,m,0}]` now evaluates to `1`. (654f569); Example:
+ ```
+ FAD[{q1 - p, 0, 0}]
+ ```
+* More debugging output in `PaVeReduce`. (cd4f508)
+* Some more cleanups in the source code of `TARCER`. (fc6851c)
+* Fixed a bug in `TARCER` related to wrong `tlrules` (thanks to Yan, http://www.feyncalc.org/forum/1060.html) (19a53ff); Example:
+ ```
+ TarcerRecurse[
+ TFI[D, Pair[Momentum[p, D], Momentum[p, D]], {0, 0, 3, 2, 0}, {{4, 0}, {2, 0}, {1, 0}, {0, 0}, {1, 0}}]]
+ ```
+* Small cleanups in tlrules in `TARCER`. (1be65e1)
+* Fixed a small bug in `FeynRule`. (87315c0) Example:
+ ```
+ FeynRule[2*(QuantumField[AntiQuarkField].LeftRightPartialD[
+ + i1].QuantumField[QuarkField]), {QuantumField[QuarkField][p1],
+ +QuantumField[AntiQuarkField][p2]}]
+ ```
+
+* Updated the `FeynCalc` startup message. (ac87b5d)
+* Removed the `eps(l)^mu eps(l)_mu = -1` rule, which is not compatible with D-dimensional polarization vectors (thanks to keith-hamilton for reporting Issue #8). (56482a9); Example:
+ ```
+ SPD[p1, p1] = 0;
+ SPD[p2, p2] = 0;
+ Pair[LorentzIndex[Subscript[\[Alpha], 1], D], Momentum[Polarization[p1, I, Transversality -> True], D]] Pair[LorentzIndex[Subscript[\[Alpha], 1], D], Momentum[Polarization[p1, -I, Transversality -> True], D]] Pair[LorentzIndex[Subscript[\[Alpha], 2], D], Momentum[Polarization[p2, I, Transversality -> True], D]] Pair[LorentzIndex[Subscript[\[Alpha], 2], D], Momentum[Polarization[p2, -I, Transversality -> True], D]] // DoPolarizationSums[#, p1, n, Contract -> False] & // DoPolarizationSums[#, p2, n, Contract -> False] & // Contract
+ ```
+* Added a unit test for `OneLoop` (thanks to Yi-Bo Yang). (1d0f03e)
+* Added unit tests for `PairContract`. (a578fb1)
+* Set `PairContract[0,x]` to `0`. (e588312)
+* Fixed a bug in the handling of `PairContract` heads in the input of `Contract`. (f1cd4a5); Example:
+ ```
+ Contract[PairContract[LorentzIndex[i, D], Momentum[p, D]]]
+ ```
+* Some extra debuggin output for `OneLoop`. (a7aefb7)
+* Modified the syntax of `DiracGamma`. From now we have `DiracGamma[0] === 0`. It is also forbidden to enter things like `DiracGamma[1]`, `DiracGamma[2]`, `DiracGamma[3]` etc. Instead, one should use `DiracGamma[ExplicitLorentzIndex[1]]` etc. Of course, `DiracGamma[5]`, `DiracGamma[6]` and `DiracGamma[7]` are still allowed. (537e019)
+* All model parameters like masses, coupling constants and mixing angles can be now represented via `SMP[par]`. `FeynArts` patching was updated accordingly. `FCFAConvert` will introduce `SMP` objects if the option `SMP` is set to `True`. (29b8535)
+* Refactored `FAPatch`. Also added the option `PatchModelsOnly` to patch only the model files in the `FeynArts` `Models` directory (thanks to Xing-Bo Yuan for the suggestion). (da16d74)
+* Adjusted `FCFAConvert` and `FCPrepareFAAmp` to work with amplitudes generated by unpatched `FeynArts`. (0826e85)
+* Fixed `DiracSpinor` to `Spinor` conversion. (1aeca0a); Example
+ ```
+ DiracSpinor[p, m]
+ ```
+* Updated `.gitignore`. (701faa9)
+* Added 3 more tree level QCD examples for photon gluon, photon quark and quark antiquark processes. (ae26f38); See `Examples/QCD/QCDGammaStarGToQiQBari.m`, `Examples/QCD/QCDQiGammaStarToQiGTree.m`, `Examples/QCD/QCDQiQBariToGammaStarGTree.m`
+
+* Added `FCCanonicalizeDummyIndices`, a function that canonicalizes dummy Lorentz indices. (0c877bd); Example
+ ```
+ FCCanonicalizeDummyIndices[Uncontract[SP[q, p]^4, q, p, Pair -> All], LorentzIndexNames -> {mu, nu, rho, si}]
+ ```
+
+* Added ABJ anomaly example to the test suite. (36fae9b)
+* Some improvements in the documentation. (479b773)
+* Added an extra Contract to `FCMultiLoopTID`. (41b84b3); Example
+ ```
+ FCMultiLoopTID[FVD[q1, mu] FVD[q2, nu] LCD[mu, nu][a,b] FAD[{q1 - p1, m1}, {q2 - p2, m2}, {q1 - q2}], {q1, q2}]
+ ```
+* Improved Documentation for `TID`. (0aff5ff)
+* Added a unit test for `ToPaVe` in `TID`. (8d072c0)
+* Add an option `Head` to `Collect2` that allows to wrap prefactors into the given Head. (57decb6); Examples:
+ ```
+ Collect2[Expand[(a + b + c)^2 (b + d)^3], {a, d}, Head -> hh]
+ ```
+* Improved `ApartFF` (actually `FCApart`) to set loop integrals that vanish in DR to zero by default. Not having this was an omission in the original implementation. The "old" behavior can be recovered by setting the option `DropScaleless` to `False`. (8e859cb) ; Examples:
+
+ ```
+ FCApart[FAD[{p, m0}, {-k1 + p, m1}] SPD[k1, p]^2 SPD[p, p], {p}, FDS -> False]
+ FCApart[FAD[{p, m0}, {-k1 + p, m1}] SPD[k1, p]^2 SPD[p, p], {p}, FDS -> False, DropScaleless -> False]
+ ```
+
+* Block wrong syntax in `ApartFF`. (d48a409); Examples:
+ ```
+ ApartFF[SPD[q, q] FAD[{q, m}], q]
+ ApartFF[SPD[q, q] FAD[{q, m}], {q}]
+ ```
+* Minor improvement in `FCLoopIsolate`. (3a75ac2)
+* Even more improvements for the options parsing in `Contract`. (0431062)
+* Improved `Contract` to contract multiple occurence of Eps tensors in a more efficient way. Thanks to Jos Vermaseren for the useful explanation. (5b28976); Example:
+ ```
+ Contract[LC[i1, i2, i3, dum1] LC[i4, i5, i6, dum1] LC[i10, i11, i12, dum2] LC[i7, i8, i9, dum2]] // FCE
+ ```
+* Some cleanups in `Contract.m` (mostly just spacing.) (5ce91d9)
+* Some more improvements in the options parsing and debugging output in `Contract`. (61506cb)
+* Some improvement in the options parsing in `Contract`. (b2e94a5)
+* Small fix in `Isolate`. (ac994f3)
+* Fixed a bug in `DiracSimplify` with `DiracSubstitute67` not being applied to spinor chains. (7f9204c); Examples:
+ ```
+ DiracSimplify[Spinor[-Momentum[p2], 0, 1].GS[Polarization[k1, -I]].GS[k1].GS[Polarization[k2, -I]].GA[7].Spinor[Momentum[p1], 0, 1], DiracSubstitute67 -> True]
+ ```
+* Refactored `ToLarin`. (f937c6b)
+* Removed premature memoization in `DiracTrace`. This doesn't really give a performance gain but rather causes a lot of problems with different gamma^5 schemes. Now we memoize only where it is necessary and safe. (b96cbe9)
+* Added an example for the calcuation of the Adler-Bell-Jackiw anomaly in QED. (8d28e06); See `Examples/QED/QEDABJAxialAnomaly.m`
+* Some refactoring and performance improvements in `Contract`. (ccb705b)
+* Improved calculation of chiral traces in 4 dimensions. (0ab7ee4)
+* Degraded `$West` to `West`, which is now an option of `DiracTrace` and `TR`. Also, `West` has now no effect on the calculations of the chiral traces in 4 dimensions. (033bd54); Examples:
+ ```
+ $BreitMaison = True;
+ DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True] // Factor2
+ DiracTrace[GAD[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True, West -> False] // Factor2
+ DiracTrace[GA[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True] // Factor2
+ DiracTrace[GA[i1, i2, i3, i4, i5, i6].GA[5], DiracTraceEvaluate -> True, West -> False] // Factor2
+ ```
+* Some performance improvements in `DiracTrace`. (d9748c9)
+* Some refactoring and better debugging output in `DiracTrace` and `TR`. (0ccf4d9)
+* Some refactoring and better option parsing in `DiracSimplify`. (beffe33)
+* Ensured that Tr[T^a]=0 where T^a is a single color matrix in the fundamental rep is always applied on the level of SUNTFs. (b1e777e); Example:
+ ```
+ FCI[SUNTF[a,x,x]]
+ ```
+* Added the options `EpsEvaluate` and `ToPaVe` to `TID`. (69539b9)
+* Fixed a bug in `TID` (missing `Contract` at the beginning) reported by YI-Bo Yang. (b78bb62); Example:
+ ```
+ TID[FAD[{q, m}] FV[q, i]^2 FV[q, j] FV[q, k], q]
+ ```
+* Fixed a bug in `FCE` related to `ExplicitLorentzIndex` (thanks to Wen Chern). (ab5f6c1); Example:
+ ```
+ Eps[ExplicitLorentzIndex[0], ExplicitLorentzIndex[1], Momentum[p],Momentum[q]]//FCE
+ ```
+* Added the option `BReduce` to `PaVeReduce`. Set to `False` by default. (e11575); Example:
+ ```
+ Factor2[(B1[p^2, m0^2, m1^2] // PaVeReduce[#, BReduce -> True] &)]
+ ```
+* Improved `FCTraceExpand` to use `DiracGammaExpand` and `FCTraceFactor`. (770810d); Examples:
+ ```
+ FCTraceExpand[DiracTrace[GS[p + b]]]
+ FCTraceExpand[DiracTrace[GS[p + b]], DiracGammaExpand -> False]
+ ```
+* Fixed mixing of dimensions in shifts of `FDS` (affected `Eps` tensors contracted with loop momentum). (7840801); Example:
+ ```
+ FDS[LC[][p1, p2, p3, l] FAD[{l - p, m}, {l + q, m}, l - t], l] // FCE
+ ```
+* Set `$LimitTo4=False` as default. Otherwise, IR divergent C-functions might lead to inconsistencies. (2629530)
+* Added `EpsilonUV` and `EpsilonIR` to be able to distinguish between UV and IR divergences in dim reg, when this is needed. Currently those are just placeholders with attached typesetting. (c391187)
+* Added a new option `IsolateFast` to `Isolate`. This way one can isolate special types of very large expressions in a much faster way. (1c0c0e6); Examples:
+ ```
+ Isolate[Total[Table[Sqrt[TZ[i] + 2 ZZ[i]]/+HH[ToString[i] + ToString[i + 2] + ToString[i + 4]], {i, 1,100}]]] // AbsoluteTiming
+ Isolate[Total[Table[Sqrt[TZ[i] + 2 ZZ[i]]/+HH[ToString[i] + ToString[i + 2] + ToString[i + 4]], {i, 1,100}]], IsolateFast -> True] // AbsoluteTiming
+ Isolate[Total[Table[Sqrt[TZ[i] + 2 ZZ[i]]/+HH[ToString[i] + ToString[i + 2] + ToString[i + 4]], {i, 1, 10000}]], IsolateFast -> True] // AbsoluteTiming
+ ```
+* Added the option `FinalSubstitutions` to `FCFAConvert`. (183e102)
+* Made `MT`, `MTD` and `MTE` orderless. (bb49ab6); Example:
+ ```
+ MT[a, b] === MT[b, a]
+ ```
+* Fixed a small bug in `Isolate`. (d8de71b); Example:
+ ```
+ Isolate[-1 x]
+ ```
+* Made `Expand2` faster recognize that the expression is already fully expanded. (37a5728)
+* Refactored `Collect2` and improved the performance on large expressions by switching to `CoefficientArrays`. (bff4790)
+* Fixed a small bug in `FeynmanParametrize`. (2c44965)
+* Refactored the unit testing framework to work as a bash script without Wolfram Workbench. Mathematica 8 and 9 require `MUnit` that can be pulled out of the WWB files. (ee7068c); Examples (under Linux):
+ ```
+ inttetsts.sh math
+ inttetsts.sh math Lorentz
+ inttetsts.sh math Dirac
+ inttetsts.sh math Loop
+ examples.sh
+ ```
+* Improved `FCApart`'s internal algorithm and added new option `MaxIterations` to break the fractioning after a given number of iterations. (1225fe1); Example:
+ ```
+ FCApart[SPD[k1, p] SPD[p, p] FAD[{p, m0}], {p}, MaxIterations -> 1, FDS -> False]
+ FCApart[SPD[k1, p] SPD[p, p] FAD[{p, m0}], {p}, MaxIterations -> 2, FDS -> False]
+ ```
+* Added `FCGetDimensions`, an auxiliary function for checking the dimensionality of the expression. (fd5621b); Example:
+ ```
+ FCGetDimensions[{FV[p, mu], FVD[p, mu], FVE[p, mu]}]
+ ```
+
+* Fixed wrong context in the unit tests for `FourLaplacian`. (b8562dd)
+* Added `FCTraceFactor` for factoring constants out of `Dirac` traces. (a04902b); Example:
+ ```
+ FCTraceFactor[DiracTrace[(a + b).(a - b).DiracTrace[GA[i].c.GA[j]].(a + b)]]
+ ```
+* Fixed a bug in `Write2` related to `FortranFormatDoublePrecision` (thanks to Wen-Long Sang). (ea03857); Example:
+ ```
+ Write2["sang.abc", abc = 0.6*(-8 + 12 Log[5 + y[1]]), abc1 = 1/x^(2/3), FormatType -> FortranForm, Precision -> 10];
+ Import["sang.abc", "Text"]
+
+ Write2["sang.abc", abc = 0.6*(-8 + 12 Log[5 + y[1]]), abc1 = 1/x^(2/3), FormatType -> FortranForm, Precision -> 3];
+ Import["sang.abc", "Text"]
+
+ Write2["sang.abc", abc = 0.6*(-8 + 12 Log[5 + y[1]]), abc1 = 1/x^(2/3), FormatType -> FortranForm, FortranFormatDoublePrecision -> False];
+ Import["sang.abc", "Text"]
+ ```
+
+
+* Improved `FCI` convertion of `FeynAmpDenominator`'s with dimensions other than `D`. (fa58485); Example:
+ ```
+ FCI[FCI[FAD[q1, {-p + q1, m}, Dimension -> 4]]]
+ ```
+
+* Added `FCTraceExpand`, a function that expands traces without evaluating them. (a9e8745); Example
+ ```
+ FCTraceExpand[DiracTrace[GA[i, i] + GA[j, j].DiracTrace[GA[a] + GA[b]]]]
+ ```
+* Integrated FeynCalcManual.nb into main documentation. (10c5210)
+* Catch wrong expressions like `Momentum[LorentzIndex[mu]]` or `LorentzIndex[Momentum[p]]` and warn the user immediately. (15fa095)
+
+### Version 9.0.1 (2016)
+ * For publishing reasons, the license has been changed from LGPL 3 to GPL 3
+ * Fixed bugs that were discovered since the relese of FeynCalc 9.0.0
+ * Converted an example of using Integrate2 from FeynCalcManual.nb to a proper .m file
+
+### Version 9.0.0 (2016)
+
+ * Introduced `FCFAConvert` for automatic conversion of the CreateFeynAmp
+ output into FeynCalc input.
+ * Added `FCMultiLoopTID` for tensor decomposition of multiloop integrals.
+ * Documentation ported from the old HelpBrowser to the new Documentation Center.
+ * Make entering of `FAD`'s with propagators that have exponents simpler.
+ Now to enter e.g. `FAD[q,{q,m},{q,m},q-p,q-p,q-p]` one can simply write `FAD[q,{q,m,2},{q-p,0,3}]`.
+ * `ApartFF` is the new powerful replacement for `SPC` and `Apart2`. It uses `FCApart` as a backend and works for multiloop integrals. The "FF" in the name of the function is to honour Feng Feng, the author (arXiv:1204.2314) of the algorithm used in `FCApart`.
+ * Added `FCApart` for partial fractioning loop integrals with linearly dependent propagators. The algorithm comes from the work of Feng Feng (arXiv:1204.2314).
+ * Added `FCLoopExtract`, a new helper function for extracting loop integrals from the given expression.
+ * Added `FCLoopBasisIncompleteQ`, `FCLoopBasisOverdeterminedQ` and `FCLoopBasisFindCompletion` for studying the space formed by the propagators of the given loop integral.
+ * Now it is finally possible to enter `FAD`s also like `FAD[{q, m}, {q, m}, {q + p - k}]` where the last propagator is massless.
+ * Improved `PaVe` to set scaleless integrals to zero.
+ * New add-on `FUnitTools` for working with unit tests.
+ * Added possibility to set scalar products directly via `SP`, `SPD` and `SPE`.
+ * Added `TFIOrder` that can exploit some symmetries between Tarcer's scalar 2-loop integrals `TFI`.
+ * Many improvements to `ToTFI` (thanks to Anne Ernst!)
+ * Add new option `MultiLoop` to `FCLoopIsolate`. This allows to isolate only those integrals that depend on all of the loop momenta.
+ * `$DisableMemSet` can be used to deactivate `MemSet`,
+ * New option `PDEHeads` for `PropagatorDenominatorExplicit`. It allows to wrap what used to be `FAD` into used defined heads, so that one can
+ better keep track of scalar products that come from the denominator.
+ * Spinors can be now D-dimensional
+ * Added `$FCCheckProgress` to activate `FCMonitor` when needed. Note that `FCMonitor` slows things down for simple calculations, so it is better to activate it only for large expressions. Here is an example of activating FCMonitor (curently only TID supports it)
+ ```
+ int = -EL^3 Spinor[Momentum[p2, D], ME, 1].GAD[Lor3].(ME + GSD[p2 + q]).GAD[Lor1].(ME +
+ GSD[p1 + q]).GAD[Lor3].Spinor[Momentum[p1, D], ME, 1] FAD[{p1 + q, ME}, {p2 + q, ME}, q];
+ $FCCheckProgress = True;
+ TID[int, q]
+ ```
+
+ * Added `FCSplit` for splitting expressions into pieces that contain given variables and pieces that do not. `FCSplit[expr,{v1, v2, ...}]` splits `expr` into pieces that are free of any occurence of `v1`, `v2`, ... and pieces that contain those variables. This works both on sums and products. The output is provided in the form of a two element list. One can recover the original expression by applying `Total` to that list. For example
+ ```
+ FCSplit[(z + a)^2 + (z + b)^2, {z}]
+ FCSplit[(z + a)^2 + (z + b)^2, {a}]
+ FCSplit[(z + a)^2 + (z + b)^2, {b}]
+ ```
+
+
+ * Introduced `$DisableMemSet` for deactivating `MemSet`, which is often needed for debugging.
+ * Added a new option `PDEHeads` to `PropagatorDenominatorExplicit`. It allows to wrap what used to be `FAD` into user defined heads, so that one can better keep track of scalar products that come from the denominator.
+ * Allowed spinors to depend on D-dimensional external momenta to be compatible with the CDR scheme. `ChangeDimension` now doesn't force the spinors to depend only on 4-dimensional momenta.
+ * Introduced `FCLoopCanonicalize` and `FCLoopSolutionList`, that are useful for canonicalizing free Lorentz indices of 1-loop tensor integrals. See [https://github.com/FeynCalc/feyncalc/blob/master/Tests/LoopIntegrals/FCLoopCanonicalize.test] and
+ [https://github.com/FeynCalc/feyncalc/blob/master/Tests/LoopIntegrals/FCLoopSolutionList.test] for examples.
+
+ * Introduced `FCLoopIsolate` and `FCLoopSplit`. These two functions should facilitate manipulation, separation and sorting of arbitrary loop integrals in the given expressions. `FCLoopSplit[expr,{q1,q2,...}]` separates `expr` into following four pieces:
+ * terms that are free of loop integrals
+ * terms with scalar loop integrals
+ * terms with tensor loop integrals, where all loop momenta are contracted
+ * terms with tensor loop integrals, where at least some loop momenta have free indices
+ The result is returned as a list with the 4 above elements. For example
+
+ ```
+ FCLoopSplit[zzz + (FVD[q, mu] FVD[p, mu] a + SPD[p, q] b) FAD[q, q + p] + yyy FAD[{q, m}], {q}]
+ ```
+
+ `FCLoopIsolate[expr,{q1,q2,...}]` wraps loop integrals into heads specified by the user. This is useful when you want to know which loop integrals appear in the given expression. For example,
+
+ ```
+ FCLoopIsolate[zzz + (FVD[q, mu] FVD[p, mu] a + SPD[p, q] b) FAD[q, q + p] + yyy FAD[{q, m}], {q}]
+ ```
+
+ * Added new options `PaVeAutoReduce` and `PaVeAutoOrder` that can be used to inhibit automatic reduction of A and B coefficient functions into `A0` and `B0`. Compare e.g.
+ ```
+ PaVe[0, 0, {p}, {m, m}]
+ ```
+
+ to
+
+ ```
+ PaVe[0, 0, {p}, {m, m}, PaVeAutoReduce -> False]
+
+ ```
+
+ * New function `FCDeclareHeader` to be used for FeynCalc add-ons that go into the `AddOn` directory.
+
+ * Some functions now support a new function `FCVerbose` that allows a more concise debugging output as compared to using `$VeryVerbose`. For example
+ ```
+ TID[FVD[q, mu] FVD[q, nu] FAD[q, {q + p, m}], q, FCVerbose -> 3]
+ ```
+
+ * Added an option `IsolateNames` to `FRH` to enable applying `ReleaseHold` only on specified `HoldForm` expressions. Compare e.g.
+ ```
+ iso = Isolate[(a + b) F[q], q, IsolateNames -> KK1] + Isolate[(c + d) F[q1], q1, IsolateNames -> KK2];
+ FRH[iso]
+ ```
+ with
+ ```
+ FRH[iso, IsolateNames -> KK1]
+ FRH[iso, IsolateNames -> KK2]
+ FRH[iso, IsolateNames -> {KK1, KK2}]
+ ```
+
+ * Added new option `ExcludeMasses` for `Apart2` to disable factoring and not to apply partial fractoning on propagators that contain specified masses. This gives you a more fine
+ grained control of partial fractioning. Compare e.g.
+ ```
+ Apart2[FAD[p, {p, m1}, {p, m2}]]
+ ```
+
+ to
+
+ ```
+ Apart2[FAD[p, {p, m1}, {p, m2}], ExcludeMasses -> {m1}]
+ ```
+
+ * Added options `$TypesettingDim4`, `$TypesettingDimE` and `$TypesettingDimD` to modify the typesetting of momenta, Dirac matrices, metric tensors and polarization vectors in `4`, `D-4`, and `D`-dimensions.
+ For example, now you can do `$TypesettingDim4="";` to remove bars from 4-dimensional objects. Thanks to Yu Lu for the suggestion.
+
+ * You might have been wondering, why FeynCalc must be installed to the directory `HighEnergyPhysics` and not just `FeynCalc`. Well, this used to be liked that for some legacy reasons but is actually not necessary nowadays. From now on FeynCalc lives in `FeynCalc` and it is started simply via ```<ToExpression[x]}`. We understand that this additional step may pose some inconveniences to you, but from the point of view of Mathematica programming and interoperability between different packages, this solution seems to be the cleanest way to avoid troubles in future.
+
+ For example, ```Lagrangian["QCD"]``` now returns
+```
+-(1/4) FieldStrength[FCGV["\[Alpha]"], FCGV["\[Beta]"],
+ FCGV["a"]].FieldStrength[FCGV["\[Alpha]"],
+ FCGV["\[Beta]"], FCGV["a"]]
+```
+ instead of
+```
+-(1/4) FieldStrength[\[Alpha], \[Beta], a].FieldStrength[\[Alpha], \[Beta], a]
+```
+ as it used to be. Now suppose that before invoking Lagrangian["QCD"] you defined \[Alpha] = 1/137. With the new output using FCGV nothing changes. With the old output
+ you would have got
+```
+-(1/4) FieldStrength[1/137, \[Beta], a].FieldStrength[1/137, \[Beta], a]
+```
+ which is clearly not what you want.
+
+ * To circumvent problems related to the patching of FeynArts, from now on FeynCalc will look for FeynArts only in the directory `FeynArts`
+inside `FeynCal`. Nevertheless, it is still possible to specify an alternative directory by setting ```FeynCalc`$FeynArtsDirectory="path"``` before loading FeynCalc. The patching code was moved to FeynCalc, i.e. now it will run even when Phi is not loaded.
+
+ * The TARCER notebook have been converted into a source file (`TARCER.m`). Furthermore, generated TARCER*.mx files are not distributed anymore with the source code. When you first try to load TARCER, a dialog will appear with the suggestion to generate the .mx file now. This process has to be done only once and takes only a couple of minutes. After that, the generated .mx will be automatically loaded whenever you want to use TARCER.
+
+ * Prior to this commit FeynCalc used to switch the format of output cells to `TraditionalForm`. Now it will only issue a warning message suggesting the user to do this by himself or herself. Such messages can be disabled by setting `$FCAdvice` to False. So if you despise all the fancy typesetting and prefer to work with `StandardForm`, FeynCalc will respect your decision.
+
+ * To avoid clashes with built-in functions of recent Mathematica versions, we had to rename some FeynCalc functions:
+ * `PartialD` -> `FCPartialD`
+ * `Symmetrize` -> `FCSymmetrize`
+ * `AntiSymmetrize` -> `FCAntiSymmetrize`
+
+* To avoid further confusion about the handling of Dirac Gamma 5 in FeynCalc, it is now forbidden to enter
+g^5 or the chiral projectors g^6 and g^7 as D-dimensional objects. Hence,`GAD[5]` or `DiracGamma[5,D]` will now generate error messages. This is not really a significant change, since before FeynCalc would silently convert `GAD[5]` to `GA[5]` without issuing any warnings, contrary to what the user might have expected from entering `GAD[5]`. The thing is that internally, FeynCalc always works with `DiracGamma[5]`. As far as dimensional regularization is concerned, the scheme to handle g^5 is determined by the values of `$BreitMaison` and `$Larin` and not by the dimension of g^5. Even in NDR, where g^5 is normally assumed to be D-dimensional, FeynCalc uses just `DiracGamma[5]`. Note that this is just a technicality of the implementation, nothing really related to physics.
+
+* Tensor decomposition routines have been updated to improve performance and usability. Before actually performing the decomposition, `Tdec` will now first check `TIDL` (Tensor Integral Decomposition Library) to see if the required integral is already contained there. If yes, the formula will be fetched from there. This behavior is controlled by the new option `UseTIDL` which is set to `True` by default. Furthermore, `Tdec` can now recognize symmetries in the indices of 1-loop integrals which significantly speeds up the computations. For multiloop integrals the symmetries recognition is not implemented yet. Another turbo for `Tdec` is the option `UseParallelization` (`True` by default) that activates parallelization code in the solver of linear equations `Solve3`. This can make things up to 40% faster and works for all kinds of integrals. Last but not least, a couple of new decompositions have been added to TIDL, just in case.
+
+* Fixed a bug in `DoPolarizationSums` [reported](http://www.feyncalc.org/forum/0853.html) by Kyrylo Bondarenko.
+
+* Adjusted the typesetting of SU(N) objects such that adjoint indices are now always upstairs while the fundamental indices are downstairs.
+* Added additional SU(N) objects to work with SU(N) T-matrices that have explicit fundamental indices. See
+the [announcement](http://www.feyncalc.org/forum/0843.html) on the mailing list for more details.
+* Added examples for computing 2->2 tree level parton processes in QCD.
+* Imporved DoPolarizationSums to handle massive and massless vector bosons in a proper way. See
+the [announcement](http://www.feyncalc.org/forum/0843.html) on the mailing list for more details.
+* Updated `FCPrepareFAAmp` to handle the main steps in converting the output of FeynArts to FeynCalc. See the updated wiki [page](https://github.com/FeynCalc/feyncalc/wiki/FeynArts#fatofc) for more details.
+
+* Fixed a bug in `FourDivergence` (actually in `Contract`) [reported](http://www.feyncalc.org/forum/0755.html) by Sun.
+
+* Added typesetting for `AlphaStrong` (QCD coupling constant) and `AlphaFS` (fine-structure constant).
+
+* Handling of algebraic simplifications for Dirac matrices in `DiracTrick` has been reworked to improve performance and provide better support for the Breitenlohner-Maison-'t Hooft-Veltman scheme.
+
+* Fixed a bug in `PowerSimplify` [reported](http://www.feyncalc.org/forum/0815.html) by Sun Qingfeng
+
+* Improved `EpsEvaluate` to always expand sums of momenta as [requested](http://www.feyncalc.org/forum/0812.html) by Lingxiao Xu.
+
+* Improved TraditionalForm formatting of metric tensors, vectors, Dirac matrices, Dirac slashes and scalar products. Now all 4- and D-4-dimensional quantities are displayed with a bar or a hat respectively on top of the symbol. The D-dimensional quantities remain as they are. This change allows to easily distinguish between D- , 4- and D-4-dimensional objects without deactivating TraditionalForm.
+
+* Introduced `FeynCalcInternal` shortcuts for D-4-dimensional metric tensors (`MTE`), vectors (`FVE`), Dirac matrices (`GAE`), Dirac slashes (`GSE`) and scalar products (`SPE`).
+
+* Extended polarization vectors to allow for vectors that are not transverse, i.e. not orthogonal to their momentum. This behavior is controlled by the option `Transversality` that applies to `Polarization` and `PolarizationVector`.
+
+* Added examples of computing QCD quark self-energy at one loop and explicitly verifying Furrry's theorem in QED at one loop for one and three photons.
+
+* Introduced a new experimental function `FCRenameDummyIndices` that can rename dummy Lorentz and SU(N) indices wihtout invoking `Contract` or `DiracSimplify`.
+
+* Introduced `FCPrint`, a new universal function for debug output.
+* Added a new option `SirlinRelations` that controls whether `DiracSimplify` uses Sirlin's relations to simplify spinor chains.
+
+* Started to implement unit tests (via MUnit).
+
+* Fixed a bug in `ComplexConjugate` [reported](http://www.feyncalc.org/forum/0773.html) by Sun.
+
+
+### Version 8.2.0 (2012)
+
+* Added **FeynArts 3.7** - unpatched. On first load it will be patched automatically.
+* When running the first time set *$LoadPHI=True* before executing
+ Needs``` [HighEnergyPhysics`FeynCalc`]```, then it will be patched automatically.
+* Updated **PHI** to work with **FeynArts 3.7**, which can now be kept in a subdir.
+
+###Version 8.1.0.1 (2012)
+
+* Updated **PHI** to work with **FeynArts 3.7**, which can now be kept in a subdir.
+
+### Version 8.1.0. (2012)
+
+* Fixed *DiracTrick*.
+* Improved *SUNSimplify*, *DiracEquation*.
+* Fixed Hyperlinks in *FeynCalc8.nb*.
+* Fixed Tarcer .mx loading.
+
+### Version 8.0.3 (2011)
+
+* Added ClearAttributes *[FeynAmpDenominator,Orderless]*
+* Added Momentum in *DiracSimplify*
+
+### Version 8.0.2 (2011)
+
+* Fixed more problems.
+* Working on documentation.
+
+### Version 8.0.1 (2011)
+
+* Fixed a problem in *DiracTrace.*
+
+### Version 8.0.0beta3 (2011)
+
+* Fixed a bug in *OneLoop*.
+* Changed *Uncontract*, *TID*.
+
+### Version 8.0.0 (2011)
+
+* Fixed some bugs reported by ibedir.
+
+### Version 8.0.0 (2010)
+
+* Minimal updates for **Mathematica 8.0**.
+* Added a patched o **FeynArts 3.4**.
+
+### Version 7.0.0 (2009/2010)
+
+* Bug fixes.
+* Updates for **Mathematica 7.0** and new **FeynArts**.
+
+### Version 6.0.0 (2007)
+
+* Bug fixes.
+* Updates for **Mathematica 6.0** and new **FeynArts**.
+* For **Mathematica 6** only. Rolf patched **FeynCalc** to be compatible with **Mathematica 6** (not **PHI**, not **FeynArts**) and zipped it together, including fully evaluated documentation notebooks in *HighEnergyPhysics/Documentation/English/*. Notice that this version does not load **PHI** nor **FeynArts** by default. Notice also that the changes are not entered into CVS yet, due to lack of time.
+
+### Version 5.1.0 (2006)
+
+* Bug fixes.
+* Updates for **Mathematica 5.2** and new **FeynArts**.
+
+### Version 5.0.0b (2003)
+
+* Bug fixes.
+* Adjustments for **Mathematica 5.0**.
+* More reorganization by Frederik Orellana.
+* Inclusion of help system, **PHI** and **FeynArts**.
+
+### Version 4.9.beta (2002)
+
+* Improved *DiracOrder*.
+* Added *FeynCalcToLaTeX*.
+* Fixed the cyclicity problem with *Gamma[5]*.
+* Simplified installation mechanism.
+* Fixed things for **Mathematica 5.0** and **FeynArts** and patching and all that.
+* Other bugfixes.
+
+### Version 4.2.0 (2002)
+
+* Changed to use *DOT* everywhere instead of *DOT*.
+* **FeynArts 3** support: Exclude *ShapeData* from autoloading.
+* Keep *PolarizationVector* unevaluated when given **FeynArts** arguments.
+* Added support for other multiplications than *DOT*.
+* Added *FieldDerivative* and *CovariantFieldDerivative*.
+* Added *$Multiplications*, *$DistributiveFunctions* and *$Containers* to allow customization of *FieldDerivative*.
+* *DOT* moved into main context.
+* Have *ExpandScalarProduct* expand also *Pair[LorentzIndex[mu], Momentum[a] * Momentum [b] +...]*.
+* Small bug fix of *FourVector*: *fci* not defined.
+* *IsolateHead* dropped. *IsolateNames* used instead everwhere.
+* Some more box definitions for *PartialD*.
+* Split *FeynCalcBook.nb* in two.
+* New directory *fcdevel* with files under development (or just unfinished).
+* New directory *fcloops* with (1,2) loop related files.
+* Changed usage into *"usage"*.
+* Had *Contract* contract also denominators.
+* Moved *Vectors* into context ```FORM2FeynCalc` ```.
+* Moved *FORMEpilog*, *FORMProlog* and *TraceDimension* into context *FeynCalc2FORM*
+* Fixed Breit-Maison problem of *FeynCalcInternal*.
+* Had *FeynRule* and *FunctionalD* know about *ExplicitSUNIndex*.
+* Dropped ```Global` ``` symbols in *SquareAmplitude*.
+* Small bug fix in *Uncontract*.
+* Let Uncontract accept option *Dimension -> Automatic*.
+* Have *Uncontract* uncontract also denominators.
+* Changed option of *A0* *A0ToB0* from *True* to *False*.
+* Code moved from *FeynCalc.m* to new files; should improve maintainability.
+* Moved *SUNSimplify.m* and *SUNTrace.m* from *qcd* to *fctools*,
+*qcd/InverseMellin.m* -> *fctables/InverseMellin.m* and
+*qcd/ToLarin.m* -> *fctools/ToLarin.m* (corrections of Rolf).
+* Moved a few more files to more logical places.
+* Changed usage to *"usage"* everywhere.
+* Moved *IsolagePrint* and *IsolateSplit* into context *Isolate*.
+* Changed *QCDScaleMu* into *ScaleMu*.
+* Dropped *SUNF2*.
+* Changed option of *SUNSimplify* *SUNTrace* from *True* to *False*.
+* Made *SUNSimplify* trace also term proportional to the identity matrix when
+* *SUNTrace* is set to *True*.
+* *FeynCalc.m*:
+ * Added support for *:>* to *OptionsSelect*.
+ * Placed *FDr* and *CDr* in correct contexts.
+ * Bugfixed check for integer arguments in *SUND* and *SUNDeltaContract: Added ExplicitSUNIndex*.
+ * *SUND*: No longer set all *SUND[a,a,b]* to *0* if a is not an integer, only when
+ a has head *SUNIndex*.
+* *DiracSimplify.m*: * Defined *print1*, *print2*, *print3*
+* *OneLoop.m*: Changed a few debug printing statements.
+* Fixed *SumOver* to comply with **FeynArts 3**.
+* **PHI**:
+ * As far as possible dropped using explicit contexts, use *MakeContext* instead.
+ * Small fix of *ArgumentsSupply*.
+ * Moved *FieldDerivative* and *CovariantFieldDerivative* (and *CDr* and *FDr*) into *HighEnergyPhysics/fctools/*.
+ * Implemented compatibility with **FeynCalc**'s *PartialD*-operator notation.
+ * Removed many comments. They don't give useful information and clutter things.
+ * Changed the possible settings of *B0Evaluation* to strings to facilitate extensibility and reduce the number of defined symbols.
+ * Introduced *LeutwylerJBarEvaluation* instead of *ExplicitLeutwylerJBar*.
+ * Implemented above-threshold evaluation of *VeltmanB0* (and *LeutwylerJBar*).
+ * Dropped *FANonCommutative*, *FAMetricTensorm*, *FAPolarizationVector*, *FAFourVector*, *FADiracMatrix*, *FAIndices* in favour of *NonCommutative* in consistence with *FAPatch.m*.
+ * Had *FAPatch.m* add *$FermionHeads* to *$NonCommuting* in *Setup.m*,
+ as well as set *FeynCalcInternal -> False* for *FourVector*, *MetricTensor*,
+ *DiracSlash*.
+ * End all usage definitions with a full stop.
+ * Changed *Dot* to *DOT*.
+* *Objects.m*:
+ * Dropped *RemoveIntegerIndices*.
+ * Changed to have head *ExplicitSUNIndex* on integers (instead of nothing) in compliance with **FeynCalc**.
+ * *setLeftRightComponents* fixed to have *Explicit* in right context.
+ * Fixed bug in *WriteOutUMatrices* causing *NM[a[x], UMatrix[b]] + UMatrix[UIdentity]* not to work (reported by P.Buettiker).
+ * Fixed bug in *UIndicesSupply*, putting *DOT* in correct context.
+ * Fixed bug in *UExp* (reported by Paul Buettiker):
+ When zeros were in *$UExpansionCoefficients MM*, *UFieldMatrix* didn't work.
+* *Utilities.m*:
+ * Added support for *WFFactor* in *DiscardOrders* (Don't discard if order is not known).
+ * *MandelstamReduce* now has renormalized masses as default.
+ * Added first sketch of *PHIToLaTeX*.
+* Palettes.m: LoadLagrangian now keeps lagrangians given as strings in context ``` Global` ``` (instead of ``` HighEnergyPhysics`PHI`Objects` ``` ).
+* *Renormalization.m*:
+ * Fixed small bug causing LeutwylerJBar causing problem with LeutwylerSigma.
+ * Readded *C0Evaluation -> "none"*, *D0Evaluation -> "none"* to *Options[VeltmanExpand]*.
+* *Couplings.m*:
+ * Added *PHIModel* as option of *WFFactor*, *PMFactor*, *DCFactor*.
+ * Added *Drop* as option of *DoSumOver*.
+ * Fixed problem with *FCToFA* causing possible substitution of multiple pairs of identical indices in a product.
+ * Added *DiracSlash* to *FCToFA*.
+ * Dropped *Projection* in *FCToFA*, since *RemoveIntegerIndices* has been dropped.
+ * Fixed bug in *XName* causing existing coupling vectors not to be found.
+ * Fixed bug in *VerticesSpecifications*. Multiple order of a coupling are now correctly merged into e.g. one coupling with orders {2, 4} instead of two couplings. (*orderJoin*).
+ * Fixed problem with *DiscardCT* and **FeynArts 3** .
+ * Fixed bug in *FixCouplingIndices*. *SUNDelta*, *SUND* and *SUNF* are now also supported in coupling vectors.
+ * Updated *DoSumOver* to comply with **FeynArts 3**.
+ * Improved *WFFactor*, *DCFactor* and *PMFactor* to behave better if a file is not there.
+ * *DCRenormalize* now correctly uses the inverse factor.
+
+* *Channels.m*
+ * Dropped *RemoveIntegerIndices* and *Projection*.
+ * Fixed bug with *SU2F* in *SUNReduce*.
+ * Added support for *ExplicitSUNIndex*.
+* *PHIStart.m*
+ * Dropped *RemoveIntegerIndices*.
+ * Switched to *UNablaHatDelta* with "scalar weak source", remember to switch back if vectors or axial-vectors are needed.
+* *ChPTW34.m*: Fix missing comma in N29.
+* *ChPTW32.m*: Fix Typo (``` QuantumField` ``` instead of ```QuantumField```).
+
+
+### Version 4.1.1 (2001)
+* Help System: Following the instructions above, the FeynCalc Book is now viewable via the
+Mathematica help browser. It is possible to look up help pages on individual
+functions by selecting them in a notebook with the cursor and then clicking
+on AddOns in the help browser.
+* **PHI/FeynArts**: Support for **FeynArts** through the new sub-package **PHI**, which is now fully integrated in **FeynCalc**. **PHI** adds support for Chiral Perturbation Theory including tools for dealing with a large number of Feynman rules, derivative couplings, field expansion, etc. Moreover, some examples of using **PHI** are provided which should also be generally instructive. The examples can be found at
+http://www.feyncalc.org/examples/index.html. Information about **PHI** can be found at http://www.feyncalc.org/examples/phi/index.html.
+* The *ReadProtected* Attribute has been removed from all functions.
+* Moved the file *FeynCalcBook.nb* into the new directory *English* and
+added the file *BrowserCategories.m* to allow lookup via the
+Mathematica help browser.
+* Changes in *FeynCalc.m*:
+ * All **FeynCalc** definitions are now cleared upon reload,
+ hopefully improved the way filenames and paths are determined,
+ * Added support for loading from *~/.Mathematica*.
+ * Added support for loading **PHI** and **FeynArts**.
+ * Added *$Abbreviations*.
+ * Added a few definitions to *DeltaFunction*.
+ * Fixed bug in *DiracTrace* reported by A. Kyrieleis.
+ * Fixed bug in *DiracTrace* causing *Tr[DiracSlash[p,p]]* to give p^2 instead of 4 p^2 (reported by W. Broniowski and L. Trueman and A. Krishna).
+ * Fixed small display bug of *Spinor* reported by A. Krishna.
+ * Added *FCIntegrate* and *FCNIntegrate* which are options of the new
+ (still experimental) function *FeynmanDoIntegrals* fixed bug in the display definition for *Pair* causing infinite recursion.
+ * Added two new functions (still very experimental) *FeynmanReduce* and *FeynmanDoIntegrals*.
+ * Very small addition to *Integrate2*.
+ * Added option *InitialFunction* to *FeynRule*.
+ * Fixed bug in *ComplexConjugate*'s treatment of *DiracGamma[5]*,
+reported by T.Rashba and V. Khotilovich.
+ * Fixed bugs related to Mac OS's filesystem in *FeynCalc.m*, *FORM2FeynCalc.m*, *FeynCalc2FORM.m*, *OneLoop.m*, *PaVeReduce.m*, *RHI.m*, *SquareAmplitude.m*, *Write2.m*.
+ * Fixed bug in *FeynCalc2FORM.m* reported by V. Khotilovich.
+ * Fixed forgotten small bugs in *FeynCalcExternal.m*.
+ * Changed *FeynCalcExternal.m*, *OneLoopSimplify.m*, *TID.m*
+ to allow other symbols for *Dimension* than *D*.
+ * Completely rewrote *FeynmanParametrize1.m*. It is still experimental, but in progress and intended to be much more general than *FeynmanParametrize.m*.
+ * Small changes in *OneLoop.m*, *PaVeReduce.m* to write out to more readable file names.
+ * Fixed forgotten Blank in *SimplifyPolyLog.m*.
+ * Added the following new general utility functions:
+*NumericQ1*, *Combinations*, *MLimit*, *TimedIntegrate*, *SelectSplit*.
+ * Added check for integers in SU(N) related functions.
+ * Small change in *TARCER.nb* to avoid name conflict with **FeynCalc** and **FeynArts**.
+ * Various very small spelling fixes etc.
+
+### Version 4.0 (2000)
+ * Reorganized for open-source and extensibility.
+
+### Version 3.0.1.1
+ * Two bug-fixes for *OneLoop*.
+
+### Version 3.0 (1998)
+ * Typesetting features of **Mathematica 3.0**.
+
+### Version 2.2beta9 (1995)
+* Updated version of **FeynCalc** compatible with **Mathematica 2.2**.
+
+### Version 2.2
+
+### Version 1.13 (1992)
+
+### Version 1.0 (1991)
+ * Initial release written by Rolf Mertig.
diff --git a/FeynCalc/Dirac/Anti5.m b/FeynCalc/Dirac/Anti5.m
index e649438a4..589622cad 100644
--- a/FeynCalc/Dirac/Anti5.m
+++ b/FeynCalc/Dirac/Anti5.m
@@ -2,23 +2,27 @@
-(* :Title: Anti5 *)
+(* :Title: Anti5 *)
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
-(* :Summary: Anti5 anticommutes gamma5's right or left *)
+(* :Summary: Anti5 anticommutes g^5 to the right or the left *)
(* ------------------------------------------------------------------------ *)
Anti5::usage =
-"Anti5[exp] anticommutes all gamma5 one time to the right. \
-Anti5[exp, n] anticommutes all gamma5 n times to the right. \
-Anti5[exp, -n] anticommutes all gamma5 n times to the left.";
+"Anti5[exp] anticommutes all g^5 one time to the right. \
+Anti5[exp, n] anticommutes all g^5 n times to the right. \
+Anti5[exp, -n] anticommutes all g^5 n times to the left.";
+
+Anti5::failmsg =
+"Error! Anti5 has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
(* ------------------------------------------------------------------------ *)
@@ -28,107 +32,250 @@
Begin["`Anti5`Private`"]
-Anti5[expr_Plus, n_] :=
- Map[Anti5[#,n]&,expr];
-Anti5[expr_, _] :=
- expr /; FreeQ2[FeynCalcInternal[expr], {DiracGamma[5],DiracGamma[6],DiracGamma[7]}];
-Anti5[expr_, Infinity] :=
- FixedPoint[Anti5, expr, $RecursionLimit];
-Anti5[expr_, -Infinity] :=
- FixedPoint[Anti5[#,-1]&, expr, $RecursionLimit];
-Anti5[expr_, n_Integer?Positive] :=
- Nest[Anti5, expr, n]/; (n =!= 1);
-Anti5[expr_, n_Integer?Negative] :=
- Nest[Anti5[#,-1]&, expr, -n] /; (n =!= -1);
-Anti5[expr_] :=
- Anti5[expr, 1];
-
-Anti5[xx_, n_] :=
- Block[ {HoldDOT, ruleBMHVRight, ruleAnticommute, ruleNaiveRight,
- ruleBMHVLeft, ruleNaiveLeft, temp, result},
- temp = FeynCalcInternal[xx] /. {1/2+DiracGamma[5]/2:>DiracGamma[6],1/2-DiracGamma[5]/2:>DiracGamma[7]} /. DOT -> HoldDOT;
- HoldDOT[] :=
- 1;
- HoldDOT[a___, DiracGamma[5], DiracGamma[5], b___ ] :=
- HoldDOT[a,b];
- HoldDOT[a___, DiracGamma[6], DiracGamma[6], b___ ] :=
- HoldDOT[a,b];
- HoldDOT[a___, DiracGamma[7], DiracGamma[7], b___ ] :=
- HoldDOT[a,b];
-
- HoldDOT[a___, DiracGamma[6], b___]:=
- (1/2)HoldDOT[a, DiracGamma[5], b] + (1/2)*HoldDOT[a, b]/;
- !MatchQ[{b},{DiracGamma[5],___}|{DiracGamma[6],___}|{DiracGamma[7],___}] &&
- !MatchQ[{a},{___,DiracGamma[5]}|{___,DiracGamma[6]}|{___,DiracGamma[7]}];
- HoldDOT[a___, DiracGamma[7], b___]:=
- -(1/2)HoldDOT[a, DiracGamma[5], b] + (1/2)*HoldDOT[a, b]/;
- !MatchQ[{b},{DiracGamma[5],___}|{DiracGamma[6],___}|{DiracGamma[7],___}] &&
- !MatchQ[{a},{___,DiracGamma[5]}|{___,DiracGamma[6]}|{___,DiracGamma[7]}];
-
- HoldDOT[a___, DiracGamma[5], DiracGamma[6], b___]:=
- HoldDOT[a, DiracGamma[6], b];
- HoldDOT[a___, DiracGamma[5], DiracGamma[7], b___]:=
- -HoldDOT[a, DiracGamma[7], b];
- HoldDOT[a___, DiracGamma[6], DiracGamma[5], b___]:=
- HoldDOT[a, DiracGamma[6], b];
- HoldDOT[a___, DiracGamma[7], DiracGamma[5], b___]:=
- -HoldDOT[a, DiracGamma[5], b];
- HoldDOT[a___, DiracGamma[6], DiracGamma[6], b___]:=
- HoldDOT[a, DiracGamma[6], b];
- HoldDOT[a___, DiracGamma[6], DiracGamma[7], b___]:=
- 0;
- HoldDOT[a___, DiracGamma[7], DiracGamma[7], b___]:=
- HoldDOT[a, DiracGamma[7], b];
- HoldDOT[a___, DiracGamma[7], DiracGamma[6], b___]:=
- 0;
- FCPrint[3,"Entering Anti5 with ", FeynCalcInternal[xx]];
- ruleAnticommute = {
-
- (* Every scheme, 4 dimensions, move gamma^5 to the right *)
- HoldDOT[a___, DiracGamma[5], DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_]],
- b___]/; (n===1) :> (-HoldDOT[a, DiracGamma[y[x]], DiracGamma[5],b]),
-
- (* Naive scheme, D dimensions, move gamma^5 to the right *)
- HoldDOT[a___, DiracGamma[5], DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_,
- dim_Symbol], dim_Symbol], b___]/; (n===1) && !$BreitMaison && !$Larin :>
- -HoldDOT[a, DiracGamma[y[x, dim], dim], DiracGamma[5],b],
-
- (* BMHV scheme, D dimensions, move gamma^5 to the right *)
- HoldDOT[a___, DiracGamma[5], DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_,
- dim_Symbol], dim_Symbol ], b___ ]/; (n===1) && $BreitMaison && !$Larin :>
- -HoldDOT[a, DiracGamma[y[x, dim], dim], DiracGamma[5], b] +
- 2 HoldDOT[a, DiracGamma[y[x, dim-4], dim-4], DiracGamma[5],b],
-
- (* BMHV scheme, D-4 dimensions, move gamma^5 to the right *)
- HoldDOT[a___, DiracGamma[5], DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_,
- dim_Symbol - 4], dim_Symbol - 4], b___ ]/; (n===1) && $BreitMaison && !$Larin :>
- HoldDOT[a, DiracGamma[y[x, dim-4], dim - 4], DiracGamma[5], b],
- (*-------------------------------------------------------------------------------------*)
-
- (* Every scheme, 4 dimensions, move gamma^5 to the left *)
- HoldDOT[a___, DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_]], DiracGamma[5],
- b___]/; (n===-1) :> -HoldDOT[a, DiracGamma[5], DiracGamma[y[x]], b],
-
- (* Naive scheme, D dimensions, move gamma^5 to the left *)
- HoldDOT[a___, DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_,
- dim_Symbol], dim_Symbol], DiracGamma[5], b___]/; (n===-1) && !$BreitMaison && !$Larin :>
- -HoldDOT[a, DiracGamma[5], DiracGamma[y[x, dim], dim], b],
-
- (* BMHV scheme, D dimensions, move gamma^5 to the left *)
- HoldDOT[a___, DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_,
- dim_Symbol], dim_Symbol ], DiracGamma[5], b___ ]/; (n===-1) && $BreitMaison && !$Larin :>
- -HoldDOT[a, DiracGamma[5], DiracGamma[y[x, dim], dim], b] +
- 2 HoldDOT[a, DiracGamma[5], DiracGamma[y[x, dim-4], dim-4], b],
-
- (* BMHV scheme, D-4 dimensions, move gamma^5 to the left *)
- HoldDOT[a___, DiracGamma[(y: LorentzIndex | ExplicitLorentzIndex | Momentum)[x_,
- dim_Symbol - 4], dim_Symbol - 4], DiracGamma[5], b___ ]/; (n===-1) && $BreitMaison && !$Larin :>
- HoldDOT[a, DiracGamma[5], DiracGamma[y[x, dim-4], dim - 4], b]
- };
- result = temp /. ruleAnticommute /. HoldDOT -> DOT;
- FCPrint[3,"Leaving Anti5 with ", result];
- result
- ]/; (n===1 || n===-1);
+a5Verbose::usage="";
+anti5MoveLeft::usage="";
+anti5MoveRight::usage="";
+max::usage="";
+
+
+commonGamma5Properties = FeynCalc`DiracTrick`Private`commonGamma5Properties;
+chiralTrickAnticommuting4DimRight = FeynCalc`DiracTrick`Private`chiralTrickAnticommuting4DimRight;
+chiralTrickAnticommuting4DimLeft = FeynCalc`DiracTrick`Private`chiralTrickAnticommuting4DimLeft;
+chiralTrickAnticommutingDDimRight = FeynCalc`DiracTrick`Private`chiralTrickAnticommutingDDimRight;
+chiralTrickAnticommutingDDimLeft = FeynCalc`DiracTrick`Private`chiralTrickAnticommutingDDimLeft;
+gamma5MoveBMHVRight = FeynCalc`DiracTrick`Private`gamma5MoveBMHVRight;
+gamma5MoveBMHVLeft = FeynCalc`DiracTrick`Private`gamma5MoveBMHVLeft;
+holdDOT = commonGamma5Properties;
+
+Options[Anti5] = {
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False
+};
+
+Anti5[expr_, opts:OptionsPattern[]] :=
+ Anti5[expr, 1, opts];
+
+Anti5[expr_, n_/; !OptionQ[n] && MatchQ[n, Infinity | -Infinity | _Integer], OptionsPattern[]] :=
+ Block[ {new = 0,ex,terms,rest,res, eps, freePart, dsPart, diracObjects,
+ diracObjectsEval, null1, null2, dsHead, time, repRule},
+
+ If [OptionValue[FCVerbose]===False,
+ a5Verbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ a5Verbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ max = n;
+
+ FCPrint[1, "Anti5: Entering Anti5", FCDoControl->a5Verbose];
+ FCPrint[3, "Anti5: Entering with, ", expr , FCDoControl->a5Verbose];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ2[ex, {DiracGamma[5],DiracGamma[6],DiracGamma[7]}],
+ Return[ex]
+ ];
+
+
+ If[ OptionValue[FCDiracIsolate],
+
+ (* This is the normal mode which works well both for large and small expressions *)
+ FCPrint[1, "Anti5: Normal mode.", FCDoControl->a5Verbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "Anti5: Extracting Dirac objects.", FCDoControl->a5Verbose];
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DiracGammaCombine->True, LorentzIndex->False, DiracChain->True];
+ ex = ex /. h_dsHead/; FreeQ2[h,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] :> Identity@@h;
+
+ {freePart,dsPart} = FCSplit[ex,{dsHead}];
+ diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//DeleteDuplicates//Sort;
+ FCPrint[1, "Anti5: Done extracting Dirac objects, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->a5Verbose],
+
+ (* This is the fast mode for single expressions *)
+ FCPrint[1, "Anti5: Fast mode.", FCDoControl->a5Verbose];
+ freePart = 0;
+ dsPart = dsHead[ex];
+ diracObjects = {dsPart}
+ ];
+ FCPrint[3,"Anti5: dsPart: ",dsPart , FCDoControl->a5Verbose];
+ FCPrint[3,"Anti5: freePart: ",freePart , FCDoControl->a5Verbose];
+ FCPrint[3,"Anti5: diracObjects: ",diracObjects , FCDoControl->a5Verbose];
+
+ FCPrint[1, "Anti5: Moving g^5.", FCDoControl->a5Verbose];
+ time=AbsoluteTime[];
+
+ diracObjectsEval = (diracObjects /. DOT->holdDOT /. dsHead->Identity);
+ Switch[n,
+
+ _Integer?Positive,
+ diracObjectsEval = Map[anti5MoveRight[#,0]&,diracObjectsEval],
+ Infinity,
+ diracObjectsEval = Map[anti5MoveRight[#,Infinity]&,diracObjectsEval],
+ _Integer?Negative,
+ diracObjectsEval = Map[anti5MoveLeft[#,0]&,diracObjectsEval],
+ -Infinity,
+ diracObjectsEval = Map[anti5MoveLeft[#,-Infinity]&,diracObjectsEval],
+ _,
+ Message[Anti5::failmsg,"Failed to identify the requested number of iterations."];
+ Abort[]
+ ];
+
+ FCPrint[1, "Anti5: Done moving g^5, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->a5Verbose];
+
+ FCPrint[3, "Anti5: diracObjectsEval: ", diracObjectsEval , FCDoControl->a5Verbose];
+
+ time=AbsoluteTime[];
+ FCPrint[1, "Anti5: Inserting Dirac objects back.", FCDoControl->a5Verbose];
+
+ diracObjectsEval = diracObjectsEval /. {
+ holdDOT->DOT
+ } /. (anti5MoveLeft|anti5MoveRight)[z_,_]-> z;
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"Anti5: repRule: ", repRule, FCDoControl->a5Verbose];
+ res = freePart + ( dsPart/. Dispatch[repRule]);
+ FCPrint[1, "Anti5: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->a5Verbose];
+ FCPrint[3,"Anti5: Intermediate result: ", res, FCDoControl->a5Verbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+
+ FCPrint[1, "Anti5: Leaving.", FCDoControl->a5Verbose];
+ FCPrint[3, "Anti5: Leaving with ", res, FCDoControl->a5Verbose];
+
+ res
+ ];
+
+
+(* ------------------------------------------------------------------------------ *)
+(* ------------------------------------------------------------------------------ *)
+(* -------------- Right movers ---------------------- *)
+(* ------------------------------------------------------------------------------ *)
+(* ------------------------------------------------------------------------------ *)
+
+anti5MoveRight[0, _]:=
+ 0;
+
+anti5MoveRight[DiracChain[ex_, i_, j_], c_]:=
+ DiracChain[anti5MoveRight[ex, c],i,j];
+
+anti5MoveRight[c1_. a_holdDOT + c2_. b_holdDOT + c3_:0, i_]:=
+ anti5MoveRight[c1 a,i] + anti5MoveRight[c2 b,i] + anti5MoveRight[c3,i];
+
+(* 4-dimensions, any scheme, move to the right *)
+anti5MoveRight[r_. ch:holdDOT[___, (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), d__], Infinity] :=
+ r anti5MoveRight[FixedPoint[(# /. chiralTrickAnticommuting4DimRight -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommuting4DimRight)&,
+ chiralTrickAnticommuting4DimRight@@ch]/. chiralTrickAnticommuting4DimRight->holdDOT, Infinity]/; FreeQ[r,holdDOT] &&
+ MatchQ[FCGetDimensions[{d}, ChangeDimension->True],{4}];
+
+(* -> Limited number of rearrangements *)
+anti5MoveRight[r_. holdDOT[b___, ch: (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), c_, d___], n_Integer?NonNegative] :=
+ r anti5MoveRight[FixedPoint[(# /. chiralTrickAnticommuting4DimRight -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommuting4DimRight)&,
+ chiralTrickAnticommuting4DimRight@@Join[{b}/. DiracGamma->diga,{ch,c}, {d} /. DiracGamma->diga]]/.
+ chiralTrickAnticommuting4DimRight->holdDOT /.diga->DiracGamma, n+1]/; FreeQ[r,holdDOT] && (n+1<=max) &&
+ MatchQ[FCGetDimensions[{c}, ChangeDimension->True],{4}];
+
+(* ------------------------------------------------------------------------------ *)
+
+(* D-dimensions, NDR scheme, move to the right *)
+anti5MoveRight[r_. ch:holdDOT[___, (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), d__], Infinity] :=
+ r anti5MoveRight[FixedPoint[(# /. chiralTrickAnticommutingDDimRight -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommutingDDimRight)&,
+ chiralTrickAnticommutingDDimRight@@ch]/. chiralTrickAnticommutingDDimRight->holdDOT, Infinity]/;
+ MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] &&
+ (MatchQ[FCGetDimensions[{d}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{_Symbol}]);
+
+(* -> Limited number of rearrangements *)
+anti5MoveRight[r_. holdDOT[b___, ch: (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), c_, d___], n_Integer?NonNegative] :=
+ r anti5MoveRight[FixedPoint[(# /. chiralTrickAnticommutingDDimRight -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommutingDDimRight)&,
+ chiralTrickAnticommutingDDimRight@@Join[{b}/. DiracGamma->diga,{ch,c}, {d} /. DiracGamma->diga]]/.
+ chiralTrickAnticommutingDDimRight->holdDOT /.diga->DiracGamma, n+1]/;
+ MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] && (n+1<=max) &&
+ MatchQ[FCGetDimensions[{c}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{_Symbol}];
+
+(* ------------------------------------------------------------------------------ *)
+
+(* BMHV scheme, D or D-4 dimensions, move to the right *)
+anti5MoveRight[r_. ch:holdDOT[___, (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), d__], Infinity] :=
+ r anti5MoveRight[FixedPoint[(# /. gamma5MoveBMHVRight -> commonGamma5Properties /. commonGamma5Properties -> gamma5MoveBMHVRight)&,
+ gamma5MoveBMHVRight@@ch]/. gamma5MoveBMHVRight->holdDOT, Infinity]/;
+ MemberQ[{"BMHV"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] &&
+ (!MatchQ[FCGetDimensions[{d}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{4}]);
+
+(* -> Limited number of rearrangements *)
+anti5MoveRight[r_. holdDOT[b___, ch: (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), c_, d___], n_Integer?NonNegative] :=
+ r anti5MoveRight[FixedPoint[(# /. gamma5MoveBMHVRight -> commonGamma5Properties /. commonGamma5Properties -> gamma5MoveBMHVRight)&,
+ gamma5MoveBMHVRight@@Join[{b}/. DiracGamma->diga,{ch,c}, {d} /. DiracGamma->diga]]/.
+ gamma5MoveBMHVRight->holdDOT /.diga->DiracGamma, n+1]/;
+ MemberQ[{"BMHV"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] && (n+1<=max) &&
+ (!MatchQ[FCGetDimensions[{d}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{4}]);
+
+(* ------------------------------------------------------------------------------ *)
+(* ------------------------------------------------------------------------------ *)
+(* -------------- Left movers ---------------------- *)
+(* ------------------------------------------------------------------------------ *)
+(* ------------------------------------------------------------------------------ *)
+
+
+anti5MoveLeft[0, _]:=
+ 0;
+
+anti5MoveLeft[DiracChain[ex_, i_, j_], c_]:=
+ DiracChain[anti5MoveLeft[ex, c],i,j];
+
+anti5MoveLeft[c1_. a_holdDOT + c2_. b_holdDOT + c3_:0, i_]:=
+ anti5MoveLeft[c1 a,i] + anti5MoveLeft[c2 b,i] + anti5MoveLeft[c3,i];
+
+(* 4-dimensions, any scheme, move to the left *)
+anti5MoveLeft[r_. ch:holdDOT[d__, (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), ___], -Infinity] :=
+ r anti5MoveLeft[FixedPoint[(# /. chiralTrickAnticommuting4DimLeft -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommuting4DimLeft)&,
+ chiralTrickAnticommuting4DimLeft@@ch]/. chiralTrickAnticommuting4DimLeft->holdDOT, -Infinity]/; FreeQ[r,holdDOT] &&
+ (MatchQ[FCGetDimensions[{d}, ChangeDimension->True],{4}]);
+
+(* -> Limited number of rearrangements *)
+anti5MoveLeft[r_. holdDOT[b___, c_, ch:(DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), d___], n_Integer?NonPositive] :=
+ r anti5MoveLeft[FixedPoint[(# /. chiralTrickAnticommuting4DimLeft -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommuting4DimLeft)&,
+ chiralTrickAnticommuting4DimLeft@@Join[{b}/. DiracGamma->diga,{c,ch}, {d} /. DiracGamma->diga]]/.
+ chiralTrickAnticommuting4DimLeft->holdDOT /.diga->DiracGamma, n-1]/; FreeQ[r,holdDOT] && (max<=n-1) && MatchQ[FCGetDimensions[{c}, ChangeDimension->True],{4}];
+
+(* ------------------------------------------------------------------------------ *)
+(* D-dimensions, NDR scheme, move to the left *)
+anti5MoveLeft[r_. ch:holdDOT[d__, (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), ___], -Infinity] :=
+ r anti5MoveLeft[FixedPoint[(# /. chiralTrickAnticommutingDDimLeft -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommutingDDimLeft)&,
+ chiralTrickAnticommutingDDimLeft@@ch]/. chiralTrickAnticommutingDDimLeft->holdDOT, -Infinity]/;
+ MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] &&
+ (MatchQ[FCGetDimensions[{d}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{_Symbol}]);
+
+(* -> Limited number of rearrangements *)
+anti5MoveLeft[r_. holdDOT[b___, c_, ch:(DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), d___], n_Integer?NonPositive] :=
+ r anti5MoveLeft[FixedPoint[(# /. chiralTrickAnticommutingDDimLeft -> commonGamma5Properties /. commonGamma5Properties -> chiralTrickAnticommutingDDimLeft)&,
+ chiralTrickAnticommutingDDimLeft@@Join[{b}/. DiracGamma->diga,{c,ch}, {d} /. DiracGamma->diga]]/.
+ chiralTrickAnticommutingDDimLeft->holdDOT /.diga->DiracGamma, n-1]/;
+ MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] && (max<=n-1) &&
+ MatchQ[FCGetDimensions[{c}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{_Symbol}];
+
+(* ------------------------------------------------------------------------------ *)
+
+(* BMHV scheme, D oder D-4 dimensions, move to the left *)
+anti5MoveLeft[r_. ch:holdDOT[d__, (DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), ___], -Infinity] :=
+ r anti5MoveLeft[FixedPoint[(# /. gamma5MoveBMHVLeft -> commonGamma5Properties /. commonGamma5Properties -> gamma5MoveBMHVLeft)&,
+ gamma5MoveBMHVLeft@@ch]/. gamma5MoveBMHVLeft->holdDOT, -Infinity]/;
+ MemberQ[{"BMHV"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] &&
+ !MatchQ[FCGetDimensions[{d}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{4}];
+
+
+(* -> Limited number of rearrangements *)
+anti5MoveLeft[r_. holdDOT[b___, c_, ch:(DiracGamma[5|6|7] | (_. DiracGamma[6] + _. DiracGamma[7])), d___], n_Integer?NonPositive] :=
+ r anti5MoveLeft[FixedPoint[(# /. gamma5MoveBMHVLeft -> commonGamma5Properties /. commonGamma5Properties -> gamma5MoveBMHVLeft)&,
+ gamma5MoveBMHVLeft@@Join[{b}/. DiracGamma->diga,{c,ch}, {d} /. DiracGamma->diga]]/.
+ gamma5MoveBMHVLeft->holdDOT /.diga->DiracGamma, n-1]/;
+ MemberQ[{"BMHV"},FeynCalc`Package`DiracGammaScheme] && FreeQ[r,holdDOT] && (max<=n-1) &&
+ !MatchQ[FCGetDimensions[{d}, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True],{4}];
FCPrint[1,"Anti5.m loaded."];
End[]
diff --git a/FeynCalc/Dirac/Chisholm.m b/FeynCalc/Dirac/Chisholm.m
index 6fc985185..37a518bc4 100755
--- a/FeynCalc/Dirac/Chisholm.m
+++ b/FeynCalc/Dirac/Chisholm.m
@@ -7,9 +7,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Applies the Chisholm identity *)
@@ -17,9 +17,13 @@
(* ------------------------------------------------------------------------ *)
Chisholm::usage =
-"Chisholm[x] substitutes products of three Dirac matrices or \
+"Chisholm[exp] substitutes products of three Dirac matrices or \
slashes by the Chisholm identity.";
+Chisholm::failmsg =
+"Error! Chisholm has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
(* ------------------------------------------------------------------------ *)
Begin["`Package`"]
@@ -27,13 +31,82 @@
Begin["`Chisholm`Private`"]
+chVerbose::usage="";
+
Options[Chisholm] = {
- DiracSimplify -> True,
- FCI -> False
+ Contract -> True,
+ DiracSigmaExplicit -> False,
+ DiracSimplify -> True,
+ DotSimplify -> True,
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> True,
+ FCVerbose -> False,
+ InsideDiracTrace -> False,
+ MaxIterations -> Infinity,
+ Mode -> 1,
+ NonCommutative -> True
};
Chisholm[expr_, OptionsPattern[]] :=
- Block[{ex},
+ Block[{ex, tmp, tmpli, tmpli1, tmpli2, terms,rest,res, holdDOT, eps, freePart, dsPart, diracObjects,
+ diracObjectsEval, null1, null2, dsHead, time, repRule, mode, chisholmRule1, chisholmRule2, maxIterations,
+ nonComm, chisholmRuleInsideTrace},
+
+ mode = OptionValue[Mode];
+ maxIterations = OptionValue[MaxIterations];
+ nonComm = OptionValue[NonCommutative];
+
+ chisholmRule1 = {
+ dsHead[holdDOT[a___,DiracGamma[(lv1:(LorentzIndex|Momentum)[_])], DiracGamma[(lv2:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv3:(LorentzIndex|Momentum)[_])]]] :>
+ (tmpli= LorentzIndex[$MU[Unique[]]]; (
+ Pair[lv1, lv2] dsHead[holdDOT[a,DiracGamma[lv3]]] -
+ Pair[lv1, lv3] dsHead[holdDOT[a,DiracGamma[lv2]]] +
+ Pair[lv2, lv3] dsHead[holdDOT[a,DiracGamma[lv1]]] -
+ $LeviCivitaSign I Eps[lv1,lv2,lv3, tmpli] dsHead[holdDOT[a,DiracGamma[tmpli],DiracGamma[5]]]
+ )),
+ dsHead[holdDOT[a___, DiracGamma[(lv1:(LorentzIndex|Momentum)[_])], DiracGamma[(lv2:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv3:(LorentzIndex|Momentum)[_])], DiracGamma[5]]] :>
+ (tmpli= LorentzIndex[$MU[Unique[]]]; (
+ Pair[lv1, lv2] dsHead[holdDOT[a, DiracGamma[lv3],DiracGamma[5]]] -
+ Pair[lv1, lv3] dsHead[holdDOT[a, DiracGamma[lv2],DiracGamma[5]]] +
+ Pair[lv2, lv3] dsHead[holdDOT[a, DiracGamma[lv1],DiracGamma[5]]] -
+ $LeviCivitaSign I Eps[lv1,lv2,lv3, tmpli] dsHead[holdDOT[a,DiracGamma[tmpli]]])),
+
+ (*The same with the spinors*)
+ dsHead[holdDOT[a___,DiracGamma[(lv1:(LorentzIndex|Momentum)[_])], DiracGamma[(lv2:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv3:(LorentzIndex|Momentum)[_])], b_Spinor]] :>
+ (tmpli= LorentzIndex[$MU[Unique[]]]; (
+ Pair[lv1, lv2] dsHead[holdDOT[a,DiracGamma[lv3], b]] -
+ Pair[lv1, lv3] dsHead[holdDOT[a,DiracGamma[lv2], b]] +
+ Pair[lv2, lv3] dsHead[holdDOT[a,DiracGamma[lv1], b]] -
+ $LeviCivitaSign I Eps[lv1,lv2,lv3, tmpli] dsHead[holdDOT[a,DiracGamma[tmpli],DiracGamma[5], b]]
+ )),
+ dsHead[holdDOT[a___, DiracGamma[(lv1:(LorentzIndex|Momentum)[_])], DiracGamma[(lv2:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv3:(LorentzIndex|Momentum)[_])], DiracGamma[5], b_Spinor]] :>
+ (tmpli= LorentzIndex[$MU[Unique[]]]; (
+ Pair[lv1, lv2] dsHead[holdDOT[a, DiracGamma[lv3],DiracGamma[5], b]] -
+ Pair[lv1, lv3] dsHead[holdDOT[a, DiracGamma[lv2],DiracGamma[5], b]] +
+ Pair[lv2, lv3] dsHead[holdDOT[a, DiracGamma[lv1],DiracGamma[5], b]] -
+ $LeviCivitaSign I Eps[lv1,lv2,lv3, tmpli] dsHead[holdDOT[a,DiracGamma[tmpli],b]]))
+ };
+
+ chisholmRuleInsideTrace = {
+ dsHead[holdDOT[x___DiracGamma, DiracGamma[5]]]/; Length[{x}]<4 && FreeQ2[{x},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] :> 0
+ };
+
+
+ chisholmRule2 = {
+ dsHead[holdDOT[a___, DiracGamma[(lv1:(LorentzIndex|Momentum)[_])], DiracGamma[(lv2:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv3:(LorentzIndex|Momentum)[_])], b___]] :>
+ (tmpli= LorentzIndex[$MU[Unique[]]]; (
+ Pair[lv1, lv2] dsHead[holdDOT[a, DiracGamma[lv3], b]] -
+ Pair[lv1, lv3] dsHead[holdDOT[a, DiracGamma[lv2], b]] +
+ Pair[lv2, lv3] dsHead[holdDOT[a, DiracGamma[lv1], b]] -
+ $LeviCivitaSign I Eps[lv1,lv2,lv3, tmpli] dsHead[holdDOT[a, DiracGamma[tmpli], DiracGamma[5], b]]))
+ };
If[ OptionValue[FCI],
ex = expr,
@@ -44,30 +117,158 @@
Return[ex]
];
+ If[ OptionValue[FCVerbose]===False,
+ chVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ chVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+
+ FCPrint[1, "Chisholm. Entering.", FCDoControl->chVerbose];
+ FCPrint[3, "Chisholm: Entering with ", ex, FCDoControl->chVerbose];
+
+ If[ OptionValue[FCDiracIsolate],
+ (* This is the normal mode which works well both for large and small expressions *)
+ FCPrint[1, "Chisholm: Normal mode.", FCDoControl->chVerbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "Chisholm: Extracting Dirac objects.", FCDoControl->chVerbose];
+
+ If[ !FreeQ[ex, DiracChain],
+ ex = DiracChainExpand[ex, FCI->True];
+ ];
+
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DiracChain->True,
+ DotSimplify->OptionValue[DotSimplify], FCJoinDOTs -> OptionValue[FCJoinDOTs], DiracGammaCombine-> False];
+
+ If[ !FreeQ[ex, DiracChain],
+ ex = ex /. dsHead[DiracChain[x_,i_,j_]] :> DiracChain[dsHead[x],i,j]
+ ];
+
+ {freePart,dsPart} = FCSplit[ex,{dsHead}];
+ FCPrint[3,"Chisholm: dsPart: ",dsPart , FCDoControl->chVerbose];
+ FCPrint[3,"Chisholm: freePart: ",freePart , FCDoControl->chVerbose];
+
+ diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//DeleteDuplicates//Sort;
+ FCPrint[1, "Chisholm: Done extracting Dirac objects, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose];
+
+ time=AbsoluteTime[];
+ Which[
+ mode===1,
+ FCPrint[1, "Chisholm: Applying Chisholm identity (mode 1).", FCDoControl->chVerbose];
+
+ diracObjectsEval = diracObjects /. DOT->holdDOT;
+
+ diracObjectsEval = FixedPoint[(# /. chisholmRule1)&,diracObjectsEval, maxIterations];
+ If[ nonComm,
+ diracObjectsEval = FixedPoint[(# /. chisholmRule2)&,diracObjectsEval, maxIterations]
+ ];
+
+ If [OptionValue[InsideDiracTrace],
+ diracObjectsEval = diracObjectsEval/.chisholmRuleInsideTrace;
+ ];
+
+ FCPrint[1, "Done applying Chisholm identity (mode 1), timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose],
+
+ mode===2,
+ FCPrint[1, "Chisholm: Applying Chisholm identity (mode 2).", FCDoControl->chVerbose];
+ diracObjectsEval = diracObjects /. DOT->holdDOT //. {dsHead[holdDOT[DiracGamma[(lv1:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv2:(LorentzIndex|Momentum)[_])], DiracGamma[5], b___]] :>
+ (tmpli1= LorentzIndex[$MU[Unique[]]]; tmpli2= LorentzIndex[$MU[Unique[]]]; (
+ - $LeviCivitaSign/2 Eps[lv1, lv2, tmpli1, tmpli2] dsHead[holdDOT[DiracSigma[DiracGamma[tmpli1], DiracGamma[tmpli2]],b]] +
+ Pair[lv1, lv2] dsHead[holdDOT[DiracGamma[5],b]]))} //. {
+
+ dsHead[holdDOT[a___, DiracGamma[(lv1:(LorentzIndex|Momentum)[_])], DiracGamma[(lv2:(LorentzIndex|Momentum)[_])], DiracGamma[5], b___]] :>
+ (
+ tmpli1= LorentzIndex[$MU[Unique[]]];
+ tmpli2= LorentzIndex[$MU[Unique[]]];
+ - $LeviCivitaSign/2 Eps[lv1, lv2, tmpli1, tmpli2] dsHead[holdDOT[a,DiracSigma[DiracGamma[tmpli1], DiracGamma[tmpli2]],b]] +
+ Pair[lv1, lv2] dsHead[holdDOT[a,DiracGamma[5],b]])
+ } //. {
+ dsHead[holdDOT[a___, DiracSigma[DiracGamma[lv1_], DiracGamma[lv2_]], DiracGamma[5], b___]] :>
+ (
+ tmpli1= LorentzIndex[$MU[Unique[]]];
+ tmpli2= LorentzIndex[$MU[Unique[]]];
+ -I*$LeviCivitaSign (1/2) dsHead[holdDOT[a,DiracSigma[DiracGamma[tmpli1], DiracGamma[tmpli2]],b]] Eps[lv1, lv2, tmpli1, tmpli2]
+ )
+ };
+ FCPrint[1, "Done applying Chisholm identity (mode 2), timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose],
+ True,
+ Message[Chisholm::failmsg, "Unknown operation mode."];
+ Abort[]
+ ];
+ time=AbsoluteTime[];
+ FCPrint[1, "Chisholm: Inserting Dirac objects back.", FCDoControl->chVerbose];
+
+ diracObjectsEval = diracObjectsEval /. holdDOT[]->1 /.holdDOT->DOT /. dsHead->Identity;
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"Chisholm: repRule: ",repRule , FCDoControl->chVerbose];
+ tmp = freePart + (dsPart/. Dispatch[repRule]);
+ FCPrint[1, "Chisholm: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose];
+ FCPrint[3,"Chisholm: Intermediate result: ", tmp, FCDoControl->chVerbose],
+
+ (* This is the fast mode for standalone Dirac chains *)
+ FCPrint[1, "Chisholm: Fast mode.", FCDoControl->chVerbose];
+ time=AbsoluteTime[];
+
+ Which[
+ mode===1,
+ FCPrint[1, "Chisholm: Applying Chisholm identity (mode 1).", FCDoControl->chVerbose];
+ tmp = ex /. DOT -> holdDOT /. holdDOT[z__] :> dsHead[holdDOT[z]];
+
+ tmp = FixedPoint[(# /. chisholmRule1)&, tmp, maxIterations];
+ If[ nonComm,
+ tmp = FixedPoint[(# /. chisholmRule2)&, tmp, maxIterations]
+ ];
+ FCPrint[1, "Done applying Chisholm identity (mode 1), timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose],
+
+ mode===2,
+ FCPrint[1, "Chisholm: Applying Chisholm identity (mode 2).", FCDoControl->chVerbose];
+ tmp = ex /. DOT -> holdDOT //. {holdDOT[DiracGamma[(lv1:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv2:(LorentzIndex|Momentum)[_])], DiracGamma[5], b___] :>
+ (tmpli1= LorentzIndex[$MU[Unique[]]]; tmpli2= LorentzIndex[$MU[Unique[]]]; (
+ - $LeviCivitaSign/2 Eps[lv1, lv2, tmpli1, tmpli2] holdDOT[DiracSigma[DiracGamma[tmpli1], DiracGamma[tmpli2]],b] +
+ Pair[lv1, lv2] holdDOT[DiracGamma[5],b]))} //. {holdDOT[a___, DiracGamma[(lv1:(LorentzIndex|Momentum)[_])],
+ DiracGamma[(lv2:(LorentzIndex|Momentum)[_])], DiracGamma[5], b___] :>
+ (tmpli1= LorentzIndex[$MU[Unique[]]]; tmpli2= LorentzIndex[$MU[Unique[]]]; (
+ - $LeviCivitaSign/2 Eps[lv1, lv2, tmpli1, tmpli2] holdDOT[a,DiracSigma[DiracGamma[tmpli1], DiracGamma[tmpli2]],b] +
+ Pair[lv1, lv2] holdDOT[a,DiracGamma[5],b]))};
+ FCPrint[1, "Done applying Chisholm identity (mode 2), timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose],
+
+
+ True,
+ Message[Chisholm::failmsg, "Unknown operation mode."];
+ Abort[]
+ ];
+ tmp = tmp/. holdDOT[]->1 /.holdDOT->DOT /. dsHead->Identity
+ ];
+
+ res = tmp;
+
+ If[ OptionValue[Contract],
+ time=AbsoluteTime[];
+ FCPrint[1, "Chisholm: Applying Contract.", FCDoControl->chVerbose];
+ res = Contract[res, FCI->True];
+ FCPrint[1, "Chisholm: Done applying Contract, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose]
+ ];
+
If[ OptionValue[DiracSimplify],
- ex = Contract[DiracSimplify[ex //. chish1 //. chish2]],
- ex = Contract[ex //. chish1 //. chish2]
+ time=AbsoluteTime[];
+ FCPrint[1, "Chisholm: Applying DiracSimplify.", FCDoControl->chVerbose];
+ res = DiracSimplify[res, FCI->True, DiracSigmaExplicit->OptionValue[DiracSigmaExplicit]];
+ FCPrint[1, "Chisholm: Done applying DiracSimplify, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->chVerbose]
];
- ex
+ FCPrint[1, "Chisholm: Leaving.", FCDoControl->chVerbose];
+ FCPrint[3, "Chisholm: Leaving with ", res, FCDoControl->chVerbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
];
-chish1 = (f_. DOT[a_DiracGamma, b_DiracGamma, c_DiracGamma,
- d_DiracGamma, e_DiracGamma, f_DiracGamma, g___]) :>
- Chisholm[Contract[DiracSimplify[DOT[Chisholm[f DOT[a,b,c]] ,Chisholm[d,e,f,g]]],Rename->False]];
-
-chish2 = DOT[a___, DiracGamma[lv1_[pe1_]],DiracGamma[lv2_[pe2_]], DiracGamma[lv3_[pe3_]],b___] :>
- Block[ {index},
- index = Unique[$MU];
- Contract[DiracSimplify[
- (
- Pair[lv1[pe1], lv2[pe2]] DOT[a, DiracGamma[lv3[pe3]], b] -
- Pair[lv1[pe1], lv3[pe3]] DOT[a, DiracGamma[lv2[pe2]], b] +
- Pair[lv2[pe2], lv3[pe3]] DOT[a, DiracGamma[lv1[pe1]], b] -
- $LeviCivitaSign I Eps[ lv1[pe1],lv2[pe2],lv3[pe3],LorentzIndex[index] ]*
- DOT[a, DiracGamma[LorentzIndex[index]].DiracGamma[5], b]
- )], EpsContract->True, Rename->False]
- ];
FCPrint[1,"Chisholm.m loaded"];
End[]
diff --git a/FeynCalc/Dirac/Chisholm2.m b/FeynCalc/Dirac/Chisholm2.m
deleted file mode 100755
index 246a0b8f9..000000000
--- a/FeynCalc/Dirac/Chisholm2.m
+++ /dev/null
@@ -1,66 +0,0 @@
-(* ::Package:: *)
-
-
-(* :Title: Chisholm2 *)
-
-(* :Title: Chisholm2 *)
-
-(*
- This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
-*)
-
-(* :Summary: Applies the Chisholm2 identity *)
-
-(* ------------------------------------------------------------------------ *)
-
-Chisholm2::usage =
-"Chisholm2[x] elininates products of two Dirac matrices and the 5th Dirac matrix \
-by applying the Chisholm identity.";
-
-(* ------------------------------------------------------------------------ *)
-
-Begin["`Package`"]
-End[]
-
-Begin["`Chisholm2`Private`"]
-
-Options[Chisholm2] = {
- DiracSimplify -> True,
- FCI -> False,
- DiracSigmaExplicit -> False
-};
-
-Chisholm2[expr_, OptionsPattern[]] :=
- Block[{ex},
-
- If[ OptionValue[FCI],
- ex = expr,
- ex = FCI[expr]
- ];
-
- If[ FreeQ[ex,DiracGamma],
- Return[ex]
- ];
-
- If[ OptionValue[DiracSimplify],
- ex = FCRenameDummyIndices[Contract[DiracSimplify[ex //. chish,DiracSigmaExplicit->OptionValue[DiracSigmaExplicit]]]],
- ex = FCRenameDummyIndices[Contract[ex //. chish]]
- ];
-
- ex
-
- ];
-
-chish = DOT[a___, DiracGamma[lv1_[pe1_]],DiracGamma[lv2_[pe2_]], DiracGamma[5],b___] :>
- (un1 = Unique[mU1];
- un2 = Unique[mU2];
- Expand[1/2 ( - $LeviCivitaSign Eps[lv1[pe1], lv2[pe2], LorentzIndex[un1],
- LorentzIndex[un2]] DOT[a,DiracSigma[DiracGamma[LorentzIndex[un1]],
- DiracGamma[LorentzIndex[un2]]],b] +
- 2 Pair[lv1[pe1], lv2[pe2]] DOT[a,DiracGamma[5],b])]);
-
-FCPrint[1,"Chisholm2.m loaded"];
-End[]
diff --git a/FeynCalc/Dirac/DiracChainCombine.m b/FeynCalc/Dirac/DiracChainCombine.m
new file mode 100644
index 000000000..be50bbc3e
--- /dev/null
+++ b/FeynCalc/Dirac/DiracChainCombine.m
@@ -0,0 +1,83 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: DiracChainCombine *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: DiracChainCombine *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracChainCombine::usage =
+"DiracChainCombine[expr] is (nearly) the inverse operation to DiracChainExpand.";
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracChainCombine`Private`"];
+
+optDiracGammaCombine::usage="";
+mark::usage="";
+
+rulesMain = {
+ (n1_. DiracChain[x_, i1: (_DiracIndex| _ExplicitDiracIndex| _Spinor), i2: (_DiracIndex| _ExplicitDiracIndex| _Spinor)] +
+ n2_. DiracChain[y_, i1: (_DiracIndex| _ExplicitDiracIndex| _Spinor), i2: (_DiracIndex| _ExplicitDiracIndex| _Spinor)])/;
+ Denominator[n1]===1 && Denominator[n2]===1 && NonCommFreeQ[{n1,n2}] && FreeQ[{n1,n2}, DiracChain] :>
+ DiracChain[mark (n1 x + n2 y), i1, i2],
+
+ (n_. DiracChain[x_, i1: (DiracIndex|ExplicitDiracIndex|Spinor)[__], i2: (DiracIndex|ExplicitDiracIndex|Spinor)[__]] +
+ n_. DiracChain[y_, i1: (DiracIndex|ExplicitDiracIndex|Spinor)[__], i2: (DiracIndex|ExplicitDiracIndex|Spinor)[__]])/;
+ !(Denominator[n]===1 && NonCommFreeQ[n] && FreeQ[n, DiracChain]) :>
+ n DiracChain[mark (x + y), i1, i2],
+
+ (* Works also for Expand[DiracChainExpand[DCHN[1 + GA5, i, j] DCHN[1 + GA5, k, l]]]*)
+ (n1_. DiracChain[x_, i1: (DiracIndex|ExplicitDiracIndex|Spinor)[__], i2: (DiracIndex|ExplicitDiracIndex|Spinor)[__]] +
+ n2_. DiracChain[y_, i1: (DiracIndex|ExplicitDiracIndex|Spinor)[__], i2: (DiracIndex|ExplicitDiracIndex|Spinor)[__]])/;
+ !(Denominator[n1]===1 && Denominator[n2]===1 && NonCommFreeQ[{n1,n2}] && FreeQ[{n1,n2}, DiracChain]) && Expand[(n1-n2)]==0 :>
+ n1 DiracChain[mark (x - y), i1, i2]
+};
+
+
+
+Options[DiracChainCombine] = {
+ DiracGammaCombine -> False,
+ FCE -> False,
+ FCI -> False
+};
+
+DiracChainCombine[expr_, OptionsPattern[]] :=
+ Block[{ex, res, rules=rulesMain},
+
+ optDiracGammaCombine = OptionValue[DiracGammaCombine];
+
+ If[ !OptionValue[FCI],
+ ex = FCI[expr],
+ ex = expr
+ ];
+
+ res = ex //. Dispatch[rules];
+
+ If[ OptionValue[DiracGammaCombine],
+ res = res /. DiracChain[x_,i_,j_]/; !FreeQ[x,mark] :> DiracChain[DiracGammaCombine[x/.mark->1],i,j]
+ ];
+ res = res /. mark -> 1;
+
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+ ];
+
+FCPrint["DiracChainCombine.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/DiracChainExpand.m b/FeynCalc/Dirac/DiracChainExpand.m
new file mode 100644
index 000000000..d996c8a25
--- /dev/null
+++ b/FeynCalc/Dirac/DiracChainExpand.m
@@ -0,0 +1,127 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: DiracChainExpand *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Expands Dirac chains with explicit indices *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracChainExpand::usage =
+"DiracChainExpand[exp] expands all Dirac chains with explicit indices \
+using linearity, e.g. DCHN[GA[p1]+GA[p2]+m,i,j] becomes \
+DCHN[GA[p1],i,j]+DCHN[GA[p2],i,j]+m*DCHN[1,i,j].";
+
+DiracChainExpand::fail =
+"Something went wrong while expanding Dirach chains with explicit indices.
+Evaluation aborted! "
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracChainExpand`Private`"]
+
+optDiracGammaExpand::usage="";
+optDotSimplify::usage="";
+
+null1::usage="";
+null2::usage="";
+chLinExp::usage="";
+chLin::usage="";
+tmp::usage="";
+momList::usage="";
+
+Options[DiracChainExpand] = {
+ DiracChainFactor -> True,
+ DiracGammaExpand -> True,
+ DotSimplify -> True,
+ FCE -> False,
+ FCI -> False,
+ Momentum -> All
+};
+
+DiracChainExpand[expr_, OptionsPattern[]] :=
+ Block[{ex, null1, null2, uniqList, solsList, repRule, ruleDelayed, res, rhs},
+
+ momList = OptionValue[Momentum];
+ optDotSimplify = OptionValue[DotSimplify];
+ optDiracGammaExpand = OptionValue[DiracGammaExpand];
+
+ If[ !OptionValue[FCI],
+ ex = FCI[expr],
+ ex = expr
+ ];
+
+ (* Nothing to do... *)
+ If[ FreeQ[ex,DiracChain],
+ Return[ex]
+ ];
+
+ (* List of all the unique Dirac chains *)
+ uniqList = Cases[ex+null1+null2, DiracChain[__], Infinity]//DeleteDuplicates//Sort;
+
+ (* If the user specified to perform expansion only for some
+ special momenta, let's do it *)
+ If[ momList=!=All && Head[momList]===List,
+ uniqList = Select[uniqList, !FreeQ2[#, momList]&]
+ ];
+ rhs = uniqList /. DiracChain -> chLin /. chLinExp -> DiracChain;
+
+ If[ OptionValue[DiracChainFactor],
+ rhs = DiracChainFactor[rhs, FCI->True]
+ ];
+
+ (* Final replacement rule *)
+ repRule = Thread[ruleDelayed[uniqList, rhs]] /. ruleDelayed->RuleDelayed;
+
+ (* Simple cross check *)
+ If[ !FreeQ2[repRule,{chLin,chLinExp}],
+ Message[DiracChainExpand::fail];
+ Abort[]
+ ];
+
+ res = ex /. Dispatch[repRule];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+
+ ];
+
+chLinExp[null1|null2,__]:=0;
+
+(* For spinors there is nothing to expand *)
+chLin[xx_, i_]:=
+ chLinExp[xx, i];
+
+chLin[xx_, i : (_DiracIndex | _ExplicitDiracIndex | _Spinor), j : (_DiracIndex | _ExplicitDiracIndex | _Spinor)] :=
+ Map[chLinExp[#,i,j]&,expandFu[xx]+null1+null2];
+
+expandFu[xx_]:=
+ (
+ tmp = Expand[xx];
+
+ If[optDiracGammaExpand,
+ tmp = DiracGammaExpand[tmp,FCI->True, Momentum->momList];
+ ];
+
+ If[optDotSimplify,
+ tmp = DotSimplify[tmp,FCI->True];
+ ];
+ tmp
+ );
+
+FCPrint[1,"DiracChainExpand.m loaded."];
+End[]
diff --git a/FeynCalc/Dirac/DiracChainFactor.m b/FeynCalc/Dirac/DiracChainFactor.m
new file mode 100644
index 000000000..4d33f819b
--- /dev/null
+++ b/FeynCalc/Dirac/DiracChainFactor.m
@@ -0,0 +1,83 @@
+(* Wolfram Language package *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: DiracChainFactor *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Factors Dirac chains with explicit indices using linearity *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracChainFactor::usage =
+"DiracChainFactor[expr] factors out all expressions inside a DiracChain to which the \
+chain doesn't apply. For example, all objects that are not Dirac matrices can be \
+safely factrored out from every Dirac chain.";
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracChainFactor`Private`"]
+
+Options[DiracChainFactor] = {
+ FCI -> False,
+ FCE -> False
+};
+
+DiracChainFactor[expr_, OptionsPattern[]] :=
+ Block[ {ex, moms,res, diracChains},
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex, DiracChain],
+ Return[ex]
+ ];
+
+
+
+ diracChains = Cases2[ex, DiracChain];
+
+ If[ diracChains =!= {},
+ res = ex /. Dispatch[Thread[diracChains -> chainFactor[diracChains]]]
+ ];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+ ];
+
+chainFactor[x_] :=
+ x /. DOT -> holdDOT /. DiracChain -> factorDirac /. holdDOT[] -> 1 /.
+ factorDirac -> DiracChain /. holdDOT->DOT;
+
+holdDOT[a___,b_,c___]:=
+ b holdDOT[a,c]/; NonCommFreeQ[b];
+
+holdDOT[a___,b1_ b2_,c___]:=
+ b1 holdDOT[a,b2,c]/; NonCommFreeQ[b1] && !NonCommFreeQ[b2];
+
+factorDirac[a_,i_,j_] :=
+ a DiracChain[1,i,j]/; NonCommFreeQ[a];
+
+factorDirac[a_DiracTrace b_., i_,j_] :=
+ a factorDirac[b,i,j];
+
+factorDirac[a_ b_,i_,j_] :=
+ a factorDirac[b,i,j]/; NonCommFreeQ[a] && !NonCommFreeQ[b];
+
+
+FCPrint[1,"DiracChainFactor.m loaded."];
+End[]
diff --git a/FeynCalc/Dirac/DiracChainJoin.m b/FeynCalc/Dirac/DiracChainJoin.m
new file mode 100644
index 000000000..b1d733ee8
--- /dev/null
+++ b/FeynCalc/Dirac/DiracChainJoin.m
@@ -0,0 +1,198 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: DiracChainJoin *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2018 Rolf Mertig
+ Copyright (C) 1997-2018 Frederik Orellana
+ Copyright (C) 2014-2018 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Joins chains of Dirac matrices with explicit Dirac
+ indices into index free chains *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracChainJoin::usage =
+"DiracChainJoin[exp] joins chains of Dirac matrices with explicit \
+Dirac indices wrapped with a head DiracChain. \n
+Notice that DiracChainJoin is not suitable for creating closed Dirac \
+chains out of the FeynArts output with explicit Dirac indices, e.g. when \
+the model contains 4-fermion operators. Use FCFADiracChainJoin for that.";
+
+DiracChainJoin::failmsg =
+"Error! DiracChainJoin has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracChainJoin`Private`"]
+
+dchjVerbose::usage="";
+li::usage="";
+li1::usage="";
+li2::usage="";
+li3::usage="";
+li4::usage="";
+
+holdDOT::usage="";
+optTraceOfOne::usage="";
+
+Options[DiracChainJoin] = {
+ Drop -> True,
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False,
+ Factoring -> True,
+ TraceOfOne -> 4
+};
+
+DiracChainJoin[expr_, OptionsPattern[]] :=
+ Block[{ ex, tmp, res, diracObjects, diracObjectsEval, null1, null2,
+ dsHead, time, repRule},
+
+ optTraceOfOne = OptionValue[TraceOfOne];
+
+ If [OptionValue[FCVerbose]===False,
+ dchjVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ dchjVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1, "DiracChainJoin. Entering.", FCDoControl->dchjVerbose];
+ FCPrint[3, "DiracChainJoin: Entering with ", expr, FCDoControl->dchjVerbose];
+
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ2[ex,{DiracChain,DiracIndexDelta}],
+ Return[ex]
+ ];
+
+ If[ OptionValue[FCVerbose]===False,
+ dchjVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer?Positive | 0],
+ dchjVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1, "DiracChainJoin: Isolating Dirac chains.", FCDoControl->dchjVerbose];
+ time=AbsoluteTime[];
+
+ If[ OptionValue[FCDiracIsolate],
+
+ tmp = FCDiracIsolate[ex,FCI->True,Head->dsHead, DotSimplify->False, DiracGammaCombine->False, FCJoinDOTs-> False,
+ DiracSigmaExplicit->False, LorentzIndex->False, Spinor->False, DiracGamma->False, DiracChain->True,
+ Factoring -> OptionValue[Factoring]];
+ diracObjects = Cases[tmp+null1+null2, dsHead[_], Infinity]//Sort//DeleteDuplicates;
+
+ FCPrint[1, "DiracChainJoin: Done isolating spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dchjVerbose];
+ FCPrint[3, "DiracChainJoin: After FCDiracIsolate ", tmp, FCDoControl->dchjVerbose];
+
+
+
+ FCPrint[3,"DiracChainJoin: diracObjects: ", diracObjects , FCDoControl->dchjVerbose];
+
+
+ FCPrint[1, "DiracChainJoin: Simplifying Dirac chains.", FCDoControl->dchjVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = Map[(diracChainEval[#])&, (diracObjects/.dsHead->Identity/. DOT->holdDOT)]/.
+ diracChainEval -> Identity /. holdDOT->DOT;
+
+ FCPrint[1, "DiracChainJoin: Done simplifying Dirac chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dchjVerbose];
+ FCPrint[3, "DiracChainJoin: diracObjectsEval: ", diracObjectsEval, FCDoControl->dchjVerbose];
+
+ If[ !FreeQ2[diracObjectsEval,{diracChainEval,holdDOT}],
+ Message[DiracChainJoin::failmsg,"Evaluation of isolated objects failed."];
+ Abort[]
+ ];
+
+ FCPrint[1, "DiracChainJoin: Inserting Dirac objects back.", FCDoControl->dchjVerbose];
+ time=AbsoluteTime[];
+ repRule = MapThread[Rule[#1,#2]&,{diracObjects,diracObjectsEval}];
+ FCPrint[3,"DiracChainJoin: repRule: ",repRule , FCDoControl->dchjVerbose];
+ res = ( tmp/.repRule);
+ FCPrint[1, "DiracChainJoin: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dchjVerbose],
+
+ (*Fast mode*)
+ FCPrint[1, "DiracChainJoin: Using the fast mode.", FCDoControl->dchjVerbose];
+ res = diracChainEval[ex/. DOT->holdDOT] /. diracChainEval -> Identity /. holdDOT->DOT ;
+ FCPrint[3, "DiracChainJoin: Result of the evaluation: ", res, FCDoControl->dchjVerbose]
+ ];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "DiracChainJoin: Leaving.", FCDoControl->dchjVerbose];
+ FCPrint[3, "DiracChainJoin: Leaving with ", res, FCDoControl->dchjVerbose];
+
+
+
+ res
+
+];
+
+(* sbar_i A_ij*)
+diracChainEval[rest_. DiracChain[spinor_Spinor, i_DiracIndex] DiracChain[chain_, i_DiracIndex, j_]]:=
+ diracChainEval[rest DiracChain[chain,spinor,j]];
+
+(* ... A_ij s_j *)
+diracChainEval[rest_. DiracChain[chain_, i:(_DiracIndex|_ExplicitDiracIndex|_Spinor), j_DiracIndex] DiracChain[j_DiracIndex, spinor_Spinor]]:=
+ diracChainEval[rest DiracChain[chain,i,spinor]];
+
+(* sbar_i A_ij s'_j *)
+diracChainEval[rest_. DiracChain[chain_, spinor1_Spinor, spinor2_Spinor]]:=
+ holdDOT[spinor1,chain,spinor2] diracChainEval[rest];
+
+(* (sbar.A)_i (B.s')_i -> sbar.A.B.s' *)
+diracChainEval[rest_. DiracChain[spinor1_Spinor, i_DiracIndex] DiracChain[i_DiracIndex, spinor2_Spinor]]:=
+ holdDOT[spinor1,spinor2] diracChainEval[rest];
+
+(* A_ii -> Tr(A) *)
+diracChainEval[rest_. DiracChain[chain_/;chain=!=1,i_DiracIndex,i_DiracIndex]]:=
+ DiracTrace[chain] diracChainEval[rest];
+
+diracChainEval[rest_. DiracChain[1,i_DiracIndex,i_DiracIndex]]:=
+ optTraceOfOne diracChainEval[rest];
+
+(* A_*i* d_ij *)
+diracChainEval[rest_. DiracChain[a__,i_DiracIndex,b___] DiracIndexDelta[i_DiracIndex,j_DiracIndex]]:=
+ diracChainEval[rest DiracChain[a,j,b]];
+
+(* A_ij B_jk -> (A.B)_ik *)
+diracChainEval[rest_. DiracChain[chain1_,a:(_DiracIndex|_ExplicitDiracIndex|_Spinor),i_DiracIndex] *
+ DiracChain[chain2_,i_DiracIndex,b: (_DiracIndex|_ExplicitDiracIndex|_Spinor)]]:=
+ diracChainEval[rest DiracChain[holdDOT[chain1,chain2],a,b]]/; a=!=i && b=!=i;
+
+(* d_ii -> Tr(1) *)
+diracChainEval[rest_. DiracIndexDelta[i_DiracIndex,i_DiracIndex]]:=
+ optTraceOfOne diracChainEval[rest];
+
+(* d_ij d_jk -> d_ik *)
+diracChainEval[rest_. DiracIndexDelta[i_DiracIndex,j_DiracIndex] DiracIndexDelta[j_DiracIndex,k_DiracIndex]]:=
+ diracChainEval[rest DiracIndexDelta[i,k]];
+
+(* d_ij^2 -> Tr(1) *)
+diracChainEval[rest_. DiracIndexDelta[i_DiracIndex, j_DiracIndex]^2]:=
+ optTraceOfOne diracChainEval[rest]/; i=!=j;
+
+holdDOT[a___,1,b___]:=
+ holdDOT[a,b];
+
+holdDOT[]:=
+ 1;
+
+FCPrint[1,"DiracChainJoin.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/DiracEquation.m b/FeynCalc/Dirac/DiracEquation.m
index 253907982..925fd3ddc 100644
--- a/FeynCalc/Dirac/DiracEquation.m
+++ b/FeynCalc/Dirac/DiracEquation.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Applies Dirac equation to simplify spinor chains *)
@@ -18,7 +18,7 @@
DiracEquation::usage =
"DiracEquation[exp] applies the Dirac equation without \
-expanding exp. If that is needed, use DiracSimplify.";
+expanding exp. If expansions are necessary, use DiracSimplify.";
(* ------------------------------------------------------------------------ *)
@@ -27,10 +27,12 @@
Begin["`DiracEquation`Private`"]
-HoldDOT;
+HoldDOT::usage="";
+tmp::usage="";
Options[DiracEquation] = {
- FeynCalcInternal -> False
+ FCI -> False,
+ FCE -> False
};
DiracEquation[ex_, OptionsPattern[]] :=
@@ -42,11 +44,15 @@
];
(* If there are no spinors or no Dirac matrices, then we can't apply the Dirac equation *)
- If[ FreeQ[expr,Spinor] || FreeQ[expr,DiracGamma],
+ If[ FreeQ2[expr, {Spinor,DiracGamma}],
Return[expr];
];
- res = DotSimplify[diraceq[expr], Expanding->False];
+ res = DotSimplify[FixedPoint[diraceq,expr,5]/.PairContract->Pair, Expanding->False];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
res
@@ -59,9 +65,7 @@
diraceq[x_] :=
x/;FreeQ[x,Spinor];
diraceq[x_] :=
- Expand[ x/. dirac67back /. DOT->HoldDOT //.spCDieqRules /.HoldDOT->DOT, DOT ];
-
-dirac67back = {1/2+DiracGamma[5]/2:>DiracGamma[6],1/2-DiracGamma[5]/2:>DiracGamma[7]};
+ Expand[x/. DOT->HoldDOT //. spCDieqRules /.HoldDOT->DOT, DOT ];
HoldDOT[a___,HoldDOT[b___],c___]:= HoldDOT[a,b,c];
HoldDOT[a___,b1_HoldDOT + b2_HoldDOT + b3_:0 ,c___]:=
@@ -77,7 +81,8 @@
0,
1/n HoldDOT[ z, Spinor[n Momentum[p,dim] + k,m,op], DiracGamma[k,dim],a]
]
- ])/; last[n Momentum[p,dim]+k]===Momentum[p,dim],
+ ]
+ )/; last[n Momentum[p,dim]+k]===Momentum[p,dim],
HoldDOT[ a___,DiracGamma[Momentum[p_, dim_ : 4],dim_ : 4], Spinor[n_. Momentum[p_, dim_ : 4] + k_. ,m_,op___],z___] :>
(m/n HoldDOT[ a,Spinor[ n Momentum[p, dim] + k,m,op ],z] -
If[ (k===0),
@@ -89,7 +94,7 @@
]) /; last[n Momentum[p]+k]===Momentum[p],
HoldDOT[ a___,DiracGamma[Momentum[y_,dim_:4],dim_:4], DiracGamma[Momentum[y_,dim_:4],dim_:4],b___] :>
- ExpandScalarProduct[Momentum[y,dim],Momentum[y,dim]] HoldDOT[a,b],
+ ExpandScalarProduct[Pair[Momentum[y,dim],Momentum[y,dim]]] HoldDOT[a,b],
(* Here the situation is more complicated since we need to move the slash through a certain number
of other Dirac matrices before we reach the spinor. Note that the matrices
@@ -97,16 +102,19 @@
(* reaching the first spinor, if we need to anticommute past another Dirac gamma (not gamma 5) *)
HoldDOT[ z___, s: Spinor[n_. Momentum[p_, dim_ : 4] + k_. ,___],
- a : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_, _ :4] | 5 | 6 | 7, _ : 4] ...,
- DiracGamma[(x : LorentzIndex | ExplicitLorentzIndex | Momentum)[y_,di_:4],di_:4],
- DiracGamma[Momentum[p_,dim_ : 4],dim_ : 4],b___] :>
- -HoldDOT[ z,s,a, DiracGamma[Momentum[p,dim],dim],DiracGamma[x[y,di],di],b] +
- 2(PairContract[x[y,di],Momentum[p,dim]] /. PairContract -> Pair)*HoldDOT[ z,s,a,b]/;
+ a___DiracGamma,
+ DiracGamma[x: (_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum),di_:4],
+ DiracGamma[Momentum[p_,dim_ : 4],dim_ : 4],b___] :> ( tmp =
+ -HoldDOT[ z,s,a, DiracGamma[Momentum[p,dim],dim],DiracGamma[x,di],b] +
+ 2*((PairContract[x,Momentum[p,dim]]*HoldDOT[ z,s,a,b]) )
+ )/;
last[n Momentum[p,dim]+k] === Momentum[p,dim],
+
+
(* reaching the first spinor, if we need to anticommute past a Dirac gamma 5 *)
HoldDOT[ z___, s: Spinor[n_. Momentum[p_, dim_ : 4] + k_. ,___],
- a : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_, _ :4] | 5 | 6 | 7, _ : 4] ...,
+ a___DiracGamma,
DiracGamma[(u:5|6|7)],
DiracGamma[Momentum[p_,dim_ : 4],dim_ : 4],b___] :>
HoldDOT[ z,s,a, Anti5[DiracGamma[u].DiracGamma[Momentum[p,dim],dim]]/.DOT|Times->HoldDOT,b]/;
@@ -114,17 +122,17 @@
(* reaching the last spinor, if we need to anticommute past another Dirac gamma (not gamma 5) *)
HoldDOT[ a___, DiracGamma[Momentum[p_,dim_:4],dim_:4],
- DiracGamma[(x : LorentzIndex | ExplicitLorentzIndex | Momentum)[y_,di_:4],di_:4],
- b : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_, _ :4] | 5 | 6 | 7, _ : 4] ...,
+ DiracGamma[x: (_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum),di_:4],
+ b___DiracGamma,
s: Spinor[n_. Momentum[p_, dim_: 4] + k_.,___],z___] :>
- (-HoldDOT[a,DiracGamma[x[y,di],di],DiracGamma[Momentum[p,dim],dim],b,s,z]+
- 2(PairContract[x[y,di],Momentum[p,dim]] /. PairContract -> Pair)*HoldDOT[a,b,s,z])/;
+ (-HoldDOT[a,DiracGamma[x,di],DiracGamma[Momentum[p,dim],dim],b,s,z]+
+ 2*((PairContract[x,Momentum[p,dim]]*HoldDOT[a,b,s,z]) ))/;
last[n Momentum[p,dim]+k]===Momentum[p,dim],
(* reaching the last spinor, if we need to anticommute past a Dirac gamma 5 *)
HoldDOT[ a___, DiracGamma[Momentum[p_,dim_:4],dim_:4],
DiracGamma[(u:5|6|7)],
- b : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_, _ :4] | 5 | 6 | 7, _ : 4] ...,
+ b___DiracGamma,
s: Spinor[n_. Momentum[p_, dim_: 4] + k_.,___],z___] :>
HoldDOT[a, Anti5[DiracGamma[Momentum[p,dim],dim].DiracGamma[u],-1]/.DOT|Times->HoldDOT,b,s,z]/;
last[n Momentum[p,dim]+k] === Momentum[p,dim]
diff --git a/FeynCalc/Dirac/DiracGammaCombine.m b/FeynCalc/Dirac/DiracGammaCombine.m
index 297feecaf..a7db427e8 100644
--- a/FeynCalc/Dirac/DiracGammaCombine.m
+++ b/FeynCalc/Dirac/DiracGammaCombine.m
@@ -1,13 +1,22 @@
-(* ------------------------------------------------------------------------ *)
-(* ------------------------------------------------------------------------ *)
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
-(* :Summary: The inverse of DiracGammaExpand *)
+(* :Title: DiracGammaCombine *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: The inverse of DiracGammaExpand *)
(* ------------------------------------------------------------------------ *)
DiracGammaCombine::usage =
-"DiracGammaCombine[exp] is (nearly) the inverse operation to \
-DiracGammaExpand.";
+"DiracGammaCombine[exp] is (nearly) the inverse operation to DiracGammaExpand.";
(* ------------------------------------------------------------------------ *)
@@ -16,33 +25,55 @@
Begin["`DiracGammaCombine`Private`"]
-DiracGammaCombine[y_] :=
- If[ !FreeQ2[y,{GS, GSD, GSE}],
- FeynCalcInternal[y]//dircg,
- y//dircg
- ];
-
-dircg[x_Plus] :=
- If[ Length[x] > 8,
- Map[DiracGammaCombine, x],
- x //. gasumrules
- ];
+dgcVerbose::usage="";
-dircg[exp_] :=
- exp //. gasumrules;
-
-(* merge sums of DiracGamma's into one *)
-gasumrules = {
- n1_. DiracGamma[Momentum[x_,di___],di___] +
- n2_. DiracGamma[Momentum[y_,di___],di___] :>
- DiracGamma[ Momentum[n1 x + n2 y,di], di ] /;
- (NumberQ[n1] && NumberQ[n2]),
- (n1_. DiracGamma[Momentum[x_, di___], di___] +
- n2_. DiracGamma[Momentum[x_, di___], di___] ):>
- (n1+n2) DiracGamma[Momentum[x, di], di],
- (n3_. Momentum[x_,di___] + n4_. Momentum[y_,di___]):>
- Momentum[ Expand[n3 x + n4 y],di]/;(NumberQ[n3]&&NumberQ[n4])
+Options[DiracGammaCombine] = {
+ FCE -> False,
+ FCI -> False
};
+DiracGammaCombine[expr_, OptionsPattern[]] :=
+ Block[{ ex, tmp, res, holdDOT, freePart, diracPart, holdPlus, diracList, diracListEval, repRule,
+ null1, null2},
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex, DiracGamma],
+ Return[ex]
+ ];
+
+ ex = (ex/. Plus -> holdPlus);
+ diracList = (Cases[ex+null1+null2,holdPlus[z__]/; !FreeQ[{z},DiracGamma], Infinity])//DeleteDuplicates//Sort;
+
+ diracListEval = diracList /. p_holdPlus :> holdPlus@@Sort[List@@p] //. {
+ holdPlus[a___, n1_. DiracGamma[Momentum[x_,dim_:4],dim_:4], n2_. DiracGamma[Momentum[y_, dim_:4], dim_:4], b___]/;(NumberQ[n1] && NumberQ[n2]) :>
+ holdPlus[a, DiracGamma[Momentum[n1 x + n2 y, dim], dim], b],
+ holdPlus[a___, n1_. DiracGamma[Momentum[x_,dim_:4],dim_:4], n2_. DiracGamma[Momentum[x_, dim_:4], dim_:4], b___]/;(NumberQ[n1] && NumberQ[n2]) :>
+ holdPlus[a, (n1+n2)DiracGamma[Momentum[x, dim], dim], b],
+
+ holdPlus[a___, n1_. DiracGamma[CartesianMomentum[x_,dim1_:3],dim2_:4], n2_. DiracGamma[CartesianMomentum[y_, dim1_:3], dim2_:4], b___]/;(NumberQ[n1] && NumberQ[n2]) :>
+ holdPlus[a, DiracGamma[CartesianMomentum[n1 x + n2 y, dim1], dim2], b],
+
+ holdPlus[a___, n1_. DiracGamma[CartesianMomentum[x_,dim1_:3],dim2_:4], n2_. DiracGamma[CartesianMomentum[x_, dim1_:3], dim2_:4], b___]/;(NumberQ[n1] && NumberQ[n2]) :>
+ holdPlus[a, (n1+n2)DiracGamma[CartesianMomentum[x, dim1], dim2], b]
+
+
+ } /. holdPlus -> Plus;
+
+ repRule = Thread[Rule[diracList,diracListEval]];
+
+ res = ex /. Dispatch[repRule] /. holdPlus -> Plus;
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+
+ ];
+
FCPrint[1,"DiracGammaCombine.m loaded"];
End[]
diff --git a/FeynCalc/Dirac/DiracGammaExpand.m b/FeynCalc/Dirac/DiracGammaExpand.m
index 5123836f2..12da60a48 100644
--- a/FeynCalc/Dirac/DiracGammaExpand.m
+++ b/FeynCalc/Dirac/DiracGammaExpand.m
@@ -2,13 +2,13 @@
(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
-(* :Title: DiracGamma *)
+(* :Title: DiracGammaExpand *)
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Expands Feynman slashes *)
@@ -20,7 +20,7 @@
exp into (DiracGamma[Momentum[a]] + DiracGamma[Momentum[b]] + ...).";
DiracGammaExpand::fail =
-"Something went while expanding momenta contracted with Dirac matrices.
+"Something went wrong while expanding momenta contracted with Dirac matrices.
Evaluation aborted! "
(* ------------------------------------------------------------------------ *)
@@ -31,34 +31,29 @@
Begin["`DiracGammaExpand`Private`"]
Options[DiracGammaExpand] = {
+ DiracSigmaExpand -> True,
+ FCE -> False,
FCI -> False,
Momentum -> All
};
DiracGammaExpand[expr_, OptionsPattern[]] :=
- Block[{x,null1,null2, uniqList, solsList, repRule, momList,gaev,gaevlin,rud},
-
- gaev[xx_,di_:4] :=
- gaevlin[Expand[xx//MomentumExpand, Momentum], di];
-
- gaevlin[xx_Plus, di_:4] :=
- Map[gaevlin[#, di]&, xx];
+ Block[{ex, null1, null2, uniqList, solsList, repRule, momList, ruleDelayed, res},
momList = OptionValue[Momentum];
-
If[ !OptionValue[FCI],
- x = FCI[expr],
- x = expr
+ ex = FCI[expr],
+ ex = expr
];
(* Nothing to do... *)
- If[ FreeQ[x,DiracGamma],
- Return[x]
+ If[ FreeQ[ex,DiracGamma],
+ Return[ex]
];
(* List of all the unique Feynman slashes *)
- uniqList = Cases[x+null1+null2, DiracGamma[arg_ /; ! FreeQ[{arg}, Momentum],_:4], Infinity]//Union;
+ uniqList = Cases[ex+null1+null2, DiracGamma[arg_ /; ! FreeQ2[{arg}, {Momentum,CartesianMomentum}],___], Infinity]//DeleteDuplicates//Sort;
(* If the user specified to perform expansion only for some
special slashed momenta, let's do it *)
@@ -67,7 +62,7 @@
];
(* Final replacement rule *)
- repRule = Thread[rud[uniqList, uniqList/.DiracGamma -> gaev /. gaevlin -> DiracGamma]] /. rud->RuleDelayed;
+ repRule = Thread[ruleDelayed[uniqList, uniqList /.DiracGamma -> gaev /. gaevlin -> DiracGamma]] /. ruleDelayed->RuleDelayed;
(* Simple cross check *)
If[ !FreeQ2[repRule,{gaev,gaevlin}],
@@ -75,9 +70,25 @@
Abort[]
];
- x /. Dispatch[repRule]
+ res = ex /. Dispatch[repRule];
+
+ If[ OptionValue[DiracSigmaExpand],
+ res = DiracSigmaExpand[res, FCI->True, DiracGammaExpand->False, Momentum -> momList]
+ ];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
];
+gaev[xx_,di_:4] :=
+ gaevlin[Expand[MomentumExpand[xx], Momentum], di];
+
+gaevlin[xx_Plus, di_:4] :=
+ Map[gaevlin[#, di]&, xx];
+
FCPrint[1,"DiracGammaExpand.m loaded."];
End[]
diff --git a/FeynCalc/Dirac/DiracOrder.m b/FeynCalc/Dirac/DiracOrder.m
index b8ddd6ba9..5a16c52fa 100644
--- a/FeynCalc/Dirac/DiracOrder.m
+++ b/FeynCalc/Dirac/DiracOrder.m
@@ -1,13 +1,32 @@
-(* ------------------------------------------------------------------------ *)
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: DiracOrder *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
-(* :Summary: *)
+(* :Summary: Lexicographic ordering of Dirac matrices *)
(* ------------------------------------------------------------------------ *)
DiracOrder::usage =
-"DiracOrder[expr] orders the Dirac matrices in expr alphabetically. \
-DiracOrder[expr, orderlist] orders the Dirac matrices in expr according \
-to orderlist.";
+"DiracOrder[exp] orders the Dirac matrices in exp lexicographically. \
+DiracOrder[exp, orderlist] orders the Dirac matrices in exp according \
+to orderlist.\n
+DiracOrder is also an option of DiracSimplify and some other functions dealing \
+with Dirac algebra. If set to True, the function DiracOrder will be applied to \
+the intermediate result to reorder the Dirac matrices lexicographically.
+";
+
+DiracOrder::failmsg =
+"Error! DiracOrder has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
(* ------------------------------------------------------------------------ *)
@@ -16,59 +35,187 @@
Begin["`DiracOrder`Private`"];
-dotLin[z_] :=
- DotSimplify[z, Expanding -> False];
-
-dicomm[a___,DiracGamma[vl_[y__],di___],
- DiracGamma[lv_[z__],dim___],b___] :=
- MemSet[dicomm[a, DiracGamma[vl[y], di], DiracGamma[lv[z], dim], b],
- ((-DiracTrick[a,DiracGamma[lv[z],dim], DiracGamma[vl[y],di],b] +
- ((2 PairContract[vl[y],lv[z]] DiracTrick[a,b])/.PairContract->Pair)
- )/.PairContract->Pair)]/;!OrderedQ[{lv[y],vl[z]}];
-
-dessav[x__] :=
- MemSet[dessav[x], DiracTrick[x]];
-
-diraccanonical[ x_,y__ ] :=
- diraccanonical[x.y];
-
-diraccanonical[x_] :=
- MemSet[diraccanonical[x],
- Block[ {diraccanres}, (*diraccanonicaldef*)
- diraccanres = x //. DOT -> dicomm /. dicomm -> DOT /.
- DOT-> dessav /. DiracTrick -> DOT;
- diraccanres = Expand[dotLin[ diraccanres ], DiracGamma] /.
- Pair -> PairContract /. PairContract->Pair;
- diraccanres
- ]
- ];
+doVerbose::usage="";
+holdDOT::usage="";
+tmp::usage="";
+
+Options[DiracOrder] = {
+ DiracGammaCombine -> False,
+ DiracTrick -> True,
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> True,
+ FCVerbose -> False,
+ MaxIterations -> Infinity
+};
+
+DiracOrder[expr_, (opts:OptionsPattern[])/;opts=!={}] :=
+ DiracOrder[expr, {}, opts];
+
+DiracOrder[expr_, orderList_List/; (!OptionQ[orderList] || orderList==={}), OptionsPattern[]]:=
+ Block[{ex,res,dsHead,dsPart,freePart,null1,null2,diracObjects,tmp, maxIterations, diracObjectsEval, repRule,time},
+
+ maxIterations = OptionValue[MaxIterations];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ2[ex,DiracHeadsList],
+ Return[ex]
+ ];
+
+ If[ OptionValue[FCVerbose]===False,
+ doVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ doVerbose=OptionValue[FCVerbose]
+ ];
+ ];
-DiracOrder[x__] :=
- diracord@@FCI[{x}];
-
-diracord[x_] :=
- FixedPoint[diraccanonical, x, 42];
-diracord[x_,y___,z_] :=
- FixedPoint[diraccanonical, DOT[x,y,z], 42]/;Head[z]=!=List;
-
-diracord[x_,y__,ord_List] :=
- diracord[DOT[x,y],ord];
-
-diracord[x_,ord_List] :=
- MemSet[diracord[x,ord],
- Block[ {diracordrev = Reverse[ord], diracordz, diracordres = x,diracordi},
- Do[ diracordz = diracordrev[[diracordi]];
- diracordres = diracordres//.
- {_[a___,DiracGamma[vl_[y__],di___],
- DiracGamma[lv_[diracordz0_,dime___],dim___],b___] :>
- ((-DiracTrick[a,DiracGamma[lv[diracordz0,dime],dim],
- DiracGamma[vl[y],di],b]+
- (2 PairContract[vl[y],lv[diracordz0,dime]] DiracTrick[a,b] )/.PairContract->Pair))/;
- !FreeQ[lv[diracordz0, dime], diracordz]} /. DOT -> DiracTrick /. DiracTrick -> DOT,
- {diracordi,1,Length[ord]}
+ FCPrint[1, "DiracOrder. Entering.", FCDoControl->doVerbose];
+ FCPrint[3, "DiracOrder: Entering with ", ex, FCDoControl->doVerbose];
+
+ If[ OptionValue[FCDiracIsolate],
+ (* This is the normal mode which works well both for large and small expressions *)
+ FCPrint[1, "DiracOrder: Normal mode.", FCDoControl->doVerbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracOrder: Extracting Dirac objects.", FCDoControl->doVerbose];
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DotSimplify->True, DiracChain->True,
+ DiracGammaCombine->OptionValue[DiracGammaCombine], FCJoinDOTs->OptionValue[FCJoinDOTs]];
+
+
+ {freePart,dsPart} = FCSplit[ex,{dsHead}];
+ FCPrint[3,"DiracOrder: dsPart: ",dsPart , FCDoControl->doVerbose];
+ FCPrint[3,"DiracOrder: freePart: ",freePart , FCDoControl->doVerbose];
+
+ diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//DeleteDuplicates//Sort;
+ FCPrint[1, "DiracOrder: Done extracting Dirac objects, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose];
+
+ time=AbsoluteTime[];
+ If[orderList=!={},
+ FCPrint[1, "DiracOrder: Ordering according to: ", orderList, FCDoControl->doVerbose];
+ diracObjectsEval = Map[diracOrderCustom[#,orderList]&, (diracObjects/. DOT -> holdDOT/.dsHead->Identity)];
+ FCPrint[1, "DiracOrder: Ordering done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose],
+
+ FCPrint[1, "DiracOrder. Using lexicographic ordering.", FCDoControl->doVerbose];
+ diracObjectsEval = Map[diracOrderLex[#,maxIterations]&, (diracObjects/. DOT -> holdDOT/.dsHead->Identity)];
+ FCPrint[1, "DiracOrder: Ordering done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose]
+ ];
+
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracOrder: Inserting Dirac objects back.", FCDoControl->doVerbose];
+
+ diracObjectsEval = diracObjectsEval /. holdDOT[]->1 /.holdDOT->DOT /. PairContract -> Pair;
+ If[ !FreeQ[diracObjectsEval,CartesianPair],
+ diracObjectsEval = diracObjectsEval/. CartesianPair->CartesianPairContract /. CartesianPairContract->CartesianPair
];
- (Expand[dotLin[diracordres], DiracGamma])/.Pair->PairContract/.PairContract->Pair
- ]
+
+ repRule = Thread[Rule[diracObjects, diracObjectsEval]];
+ FCPrint[3,"DiracOrder: repRule: ",repRule , FCDoControl->doVerbose];
+ tmp = freePart + (dsPart/. Dispatch[repRule]);
+ FCPrint[1, "DiracOrder: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose];
+ FCPrint[3,"DiracOrder: Intermediate result: ", tmp, FCDoControl->doVerbose],
+
+ (* This is the fast mode for standalone Dirac chains *)
+ FCPrint[1, "DiracOrder: Fast mode.", FCDoControl->doVerbose];
+ time=AbsoluteTime[];
+ tmp = ex /. DOT -> holdDOT;
+
+ If[orderList=!={},
+ FCPrint[1, "DiracOrder: Ordering according to: ", orderList, FCDoControl->doVerbose];
+ tmp = diracOrderCustom[tmp, orderList];
+ FCPrint[1, "DiracOrder: Ordering done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose],
+
+ FCPrint[1, "DiracOrder. Using lexicographic ordering.", FCDoControl->doVerbose];
+ tmp = diracOrderLex[tmp, maxIterations];
+ FCPrint[1, "DiracOrder: Ordering done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose]
+
+ ];
+ tmp = tmp/. holdDOT[]->1 /.holdDOT->DOT /. PairContract -> Pair;
+ If[ !FreeQ[diracObjectsEval,CartesianPair],
+ diracObjectsEval = diracObjectsEval/. CartesianPair->CartesianPairContract /. CartesianPairContract->CartesianPair
+ ];
+
+ ];
+
+
+ res = tmp;
+
+ (* If orderingList contains an ExplicitLorentzIndex[0], do not apply DiracTrick, since it would mess up the ordering! *)
+ If[ OptionValue[DiracTrick] && FreeQ[orderList,ExplicitLorentzIndex[0]],
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracOrder: Applying DiracTrick.", FCDoControl->doVerbose];
+ res = DiracTrick[res, FCI->True];
+ FCPrint[1, "DiracOrder: Done applying DiracTrick,timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->doVerbose]
+ ];
+
+ FCPrint[1, "DiracOrder: Leaving.", FCDoControl->doVerbose];
+ FCPrint[3, "DiracOrder: Leaving with ", res, FCDoControl->doVerbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+
];
+
+diracOrderLex[x_, maxIterations_]:=
+ FixedPoint[(# /. {
+ holdDOT[a___,DiracGamma[(h1:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar1__], dim1_:4],DiracGamma[(h2:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar2__], dim2_:4],b___]/;
+ !OrderedQ[{h1[First[{ar1}],dim1],h2[First[{ar2}],dim2]}] && h1[First[{ar1}],dim1]=!=h2[First[{ar2}],dim2] :>
+ -holdDOT[a, DiracGamma[h2[ar2],dim2], DiracGamma[h1[ar1],dim1] ,b] +
+ 2 PairContract[h1[ar1],h2[ar2]] holdDOT[a,b],
+
+ (* The g^0 matrices are moved to the very right *)
+ holdDOT[a___,DiracGamma[ExplicitLorentzIndex[0]],DiracGamma[(h2:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar2__], dim2_:4],b___] :>
+ -holdDOT[a, DiracGamma[h2[ar2],dim2], DiracGamma[ExplicitLorentzIndex[0]] ,b] +
+ 2 PairContract[ExplicitLorentzIndex[0],h2[ar2]] holdDOT[a,b],
+
+ holdDOT[a___,DiracGamma[(h:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum|ExplicitLorentzIndex)[ar___], dim_:4],
+ DiracGamma[(h:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum|ExplicitLorentzIndex)[ar___], dim_:4],b___] :>
+ holdDOT[a,b] DiracTrick[DOT[DiracGamma[h[ar],dim].DiracGamma[h[ar],dim]],FCI->True,FCDiracIsolate->False]
+
+
+ })&, x, maxIterations]
+
+customOrdering[x_, currentElement_]:=
+ x //. {
+ holdDOT[a___,DiracGamma[(h1:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar1__], dim1_:4],
+ DiracGamma[(h2:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar2__], dim2_:4],b___]/;
+ !FreeQ[h2[First[{ar2}],dim2],currentElement] && h1[First[{ar1}],dim1]=!=h2[First[{ar2}],dim2] :>
+ -holdDOT[a, DiracGamma[h2[ar2],dim2], DiracGamma[h1[ar1],dim1] ,b] +
+ 2 PairContract[h1[ar1],h2[ar2]] holdDOT[a,b],
+
+ holdDOT[a___,DiracGamma[(h1:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar1__], dim1_:4],DiracGamma[ExplicitLorentzIndex[0]],b___]/;
+ !FreeQ[ExplicitLorentzIndex[0],currentElement] && h1[First[{ar1}],dim1]=!=ExplicitLorentzIndex[0] :>
+ -holdDOT[a, DiracGamma[ExplicitLorentzIndex[0]], DiracGamma[h1[ar1],dim1] ,b] +
+ 2 PairContract[h1[ar1],ExplicitLorentzIndex[0]] holdDOT[a,b],
+
+ holdDOT[a___,DiracGamma[ExplicitLorentzIndex[0]],DiracGamma[(h2:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum)[ar2__], dim2_:4],b___]/;
+ !FreeQ[h2[First[{ar2}],dim2],currentElement] && ExplicitLorentzIndex[0]=!=h2[First[{ar2}],dim2] :>
+ -holdDOT[a, DiracGamma[h2[ar2],dim2], DiracGamma[ExplicitLorentzIndex[0]] ,b] +
+ 2 PairContract[ExplicitLorentzIndex[0],h2[ar2]] holdDOT[a,b],
+
+
+ holdDOT[a___,DiracGamma[(h:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum|ExplicitLorentzIndex)[ar___], dim_:4],
+ DiracGamma[(h:LorentzIndex|Momentum|CartesianIndex|CartesianMomentum|ExplicitLorentzIndex)[ar___], dim_:4],b___] :>
+ holdDOT[a,b] DiracTrick[DOT[DiracGamma[h[ar],dim].DiracGamma[h[ar],dim]],FCI->True,FCDiracIsolate->False]
+};
+
+
+
+diracOrderCustom[x_, orderList_List]:=
+ (
+ tmp=x;
+ Scan[(tmp = customOrdering[tmp,#])&, Reverse[orderList]];
+ tmp
+ );
+
+
+
+
FCPrint[1,"DiracOrder.m loaded."];
End[]
diff --git a/FeynCalc/Dirac/DiracReduce.m b/FeynCalc/Dirac/DiracReduce.m
index 766cfd3ea..91493877e 100644
--- a/FeynCalc/Dirac/DiracReduce.m
+++ b/FeynCalc/Dirac/DiracReduce.m
@@ -1,14 +1,17 @@
+(* ::Package:: *)
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
-(* :Title: DiracReduce *)
+(* :Title: DiracReduce *)
-(* :Author: Rolf Mertig *)
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
-(* ------------------------------------------------------------------------ *)
-(* :History: Last changed July 19th 2000 *)
-(* ------------------------------------------------------------------------ *)
-
-(* :Summary: contraction and simplification rules for gamma matrices *)
+(* :Summary: SPVAT decomposition of Dirac matrix chains *)
(* ------------------------------------------------------------------------ *)
@@ -18,9 +21,9 @@
to the standard basis (S,P,V,A,T) using the Chisholm identity (see Chisholm). \
In the result the basic Dirac structures are wrapped with a head \
DiracBasis. I.e.: S corresponds to DiracBasis[1], \
-P : DiracBasis[DiracMatrix[5]], \
-V : DiracBasis[DiracMatrix[mu]], A: DiracBasis[DiracMatrix[mu, 5]], \
-T: DiracBasis[DiracSigma[DiracMatrix[mu, nu]]]. \
+P : DiracBasis[GA[5]], \
+V : DiracBasis[GA[mu]], A: DiracBasis[GA[mu, 5]], \
+T: DiracBasis[DiracSigma[GA[mu, nu]]]. \
By default DiracBasis is substituted to Identity. \n
Notice that the result of DiracReduce is given in the FeynCalcExternal-way, \
i.e., evtl. you may have to use FeynCalcInternal on result.";
@@ -32,63 +35,85 @@ to the standard basis (S,P,V,A,T) using the Chisholm identity (see Chisholm). \
Begin["`DiracReduce`Private`"]
+drVerbose::usage="";
+
Options[DiracReduce] = {
- DiracSimplify -> True,
- Factoring -> False,
- FinalSubstitutions -> {DiracBasis -> Identity}
+ Contract -> True,
+ DiracGammaCombine -> True,
+ DiracSimplify -> False,
+ DotSimplify -> True,
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False,
+ Factoring -> False,
+ FinalSubstitutions -> {DiracBasis -> Identity}
};
-DiracReduce[x_, {ops___Rule}] :=
- DiracReduce[x, ops];
-
-DiracReduce[x_, ops___Rule] :=
- Block[ {temp = FCI[x], spart, n1, n2, ddb, res, finsub,finsub1,factoring,diracSimplify},
- finsub1 =
- If[ Length[{ops}] === 0,
- {},
- If[ !FreeQ[{ops}, FinalSubstitutions],
- FinalSubstitutions /. {ops},
- Select[Flatten[{ops}], FreeQ[#,Factoring]&]
- ]
+
+DiracReduce[expr_List, opts:OptionsPattern[]] :=
+ Map[DiracReduce[#,opts]&,expr];
+
+DiracReduce[expr_, OptionsPattern[]] :=
+ Block[ {ex, tmp, spart, null1, null2, res, finsub, factoring,diracSimplify, li1, li2},
+
+ finsub = OptionValue[FinalSubstitutions];
+ factoring = OptionValue[Factoring];
+ diracSimplify = OptionValue[DiracSimplify];
+
+ If[ OptionValue[FCVerbose]===False,
+ drVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ drVerbose=OptionValue[FCVerbose]
];
- finsub = Join[finsub1, FinalSubstitutions /. Options[DiracReduce]];
- factoring = Factoring /. {ops} /. Options[DiracReduce];
- diracSimplify = DiracSimplify /. {ops} /. Options[DiracReduce];
+ ];
- (* do first usual DiracSimplify *)
- If[ diracSimplify,
- temp = DiracSimplify[temp, DiracSubstitute67 -> True, DiracSigmaExplicit -> False];
- FCPrint[2,"DiracSimplify done"];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ FCPrint[1, "DiracReduce. Entering.", FCDoControl->drVerbose];
+ FCPrint[3, "DiracReduce: Entering with ", ex, FCDoControl->drVerbose];
+
+ If[ FreeQ2[ex,DiracHeadsList],
+ Return[ex]
+ ];
+
+ tmp = ex /. {DiracGamma[6] :> (1/2 + DiracGamma[5]/2), DiracGamma[7] :> (1/2 - DiracGamma[5]/2)};
+
+ If[ OptionValue[DiracGammaCombine],
+ tmp = DiracGammaCombine[tmp,FCI->True]
];
+
+ If[ OptionValue[DotSimplify],
+ tmp = DotSimplify[tmp,FCI->True]
+ ];
+
(* Chisholm identity recursively *)
- temp = Chisholm[temp,FCI->True, DiracSimplify -> diracSimplify]//DiracOrder;
- FCPrint[2,"Chisholm done"];
- temp = Expand[temp, DiracGamma];
- (* introduce DiracSigma *)
- (* use gamma[m,n, 5] = 1/2 ( eps[m,n,r,s] sig[r,s] + 2 g[m,n] gamma[5] )
- *)
- temp = temp /. DOT[DiracGamma[a_[xx_]], DiracGamma[b_[yy_]], DiracGamma[5]] :>
- (un1 = Unique[mU1];
- un2 = Unique[mU2];
- Expand[1/2 ( - $LeviCivitaSign Eps[a[xx], b[yy], LorentzIndex[un1],
- LorentzIndex[un2]](I/2) (FCI[ DiracMatrix[un1, un2] - DiracMatrix[un2, un1]]) +
- 2 Pair[a[xx], b[yy]] DiracGamma[5])]);
- (* for the renaming of dummy indices *)
- temp = FCRenameDummyIndices[Contract[temp, Rename-> True]];
- (* XXX *)
- temp = temp /. DOT[DiracGamma[a_[xx_]], DiracGamma[b_[yy_]]] :>
- ( -I DiracSigma[DiracGamma[a[xx]], DiracGamma[b[yy]]]+Pair[b[yy], a[xx]]);
+ tmp = Chisholm[tmp,FCI->True, DiracSimplify -> False];
+ FCPrint[3, "DiracReduce: After Chisholm: ", tmp, FCDoControl->drVerbose];
+
+ tmp = DiracOrder[tmp, FCI->True];
+ FCPrint[3, "DiracReduce: After DiracOrder: ", tmp, FCDoControl->drVerbose];
+
+ tmp = Chisholm[tmp,FCI->True,DiracSimplify->False,Mode->2];
+ FCPrint[3, "DiracReduce: After Chisholm: ", tmp, FCDoControl->drVerbose];
+
+ tmp = tmp /. DOT[DiracGamma[a_[xx_]], DiracGamma[b_[yy_]]] :> (-I DiracSigma[DiracGamma[a[xx]], DiracGamma[b[yy]]]+Pair[b[yy], a[xx]]);
+ FCPrint[3, "DiracReduce: After introducing DiracSigma: ", tmp, FCDoControl->drVerbose];
If[ diracSimplify,
- temp = Contract[DiracSimplify[temp, DiracSigmaExplicit -> False]],
- temp = Contract[temp]
+ tmp = DiracSimplify[tmp, DiracSigmaExplicit -> False, FCI->True];
+ FCPrint[3, "DiracReduce: After DiracSimplify: ", tmp, FCDoControl->drVerbose]
];
- temp = Collect2[temp, DiracGamma, Factoring -> factoring];
+ tmp = Collect2[tmp, DiracGamma, Factoring -> factoring];
FCPrint[2,"collecting done"];
(* get the S - part *)
- spart = Select[temp + n1 + n2, FreeQ[#, DiracGamma]&] /. {n1 :> 0, n2 :> 0};
- temp = temp - spart;
+ spart = SelectFree[tmp + null1 + null2, DiracGamma] /. null1|null2 :> 0;
+ tmp = tmp - spart;
+
If[ factoring === False,
spart = Expand[spart] DiracBasis[1],
If[ factoring === True,
@@ -96,15 +121,26 @@ to the standard basis (S,P,V,A,T) using the Chisholm identity (see Chisholm). \
spart = factoring[spart] DiracBasis[1]
]
];
- ddb[y__] :=
- DiracBasis[DOT[y]];
- res = spart + (temp /. DiracSigma[a__] :> DiracBasis[FCE[DiracSigma[a]]] /.
+
+
+ res = spart + (tmp /. DiracSigma[a__] :> DiracBasis[DiracSigma[a]] /.
DOT[DiracGamma[a_], DiracGamma[5]] :>
- DiracBasis[FCE[DOT[DiracGamma[a], DiracGamma[5]]]] /.
- DiracGamma[a_] :> DiracBasis[FCE[DiracGamma[a]]]);
- res = res /. finsub /. finsub;
- res = FCE[res];
+ DiracBasis[DOT[DiracGamma[a], DiracGamma[5]]] /.
+ DiracGamma[a_] :> DiracBasis[DiracGamma[a]]);
res = res /. finsub /. finsub;
+
+ If[ OptionValue[DotSimplify],
+ res = DotSimplify[res,FCI->True]
+ ];
+
+ If[ OptionValue[Contract],
+ res = Contract[res,FCI->True]
+ ];
+
+ If[OptionValue[FCE],
+ res = FCE[res]
+ ];
+
res
];
diff --git a/FeynCalc/Dirac/DiracSigmaExpand.m b/FeynCalc/Dirac/DiracSigmaExpand.m
new file mode 100644
index 000000000..6b8a1558f
--- /dev/null
+++ b/FeynCalc/Dirac/DiracSigmaExpand.m
@@ -0,0 +1,85 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: DiracSigma *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Expands Feynman slashes inside DiracSigma *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracSigmaExpand::usage =
+"DiracSigmaExpand[exp] expands all DiracSigma[DiracGamma[Momentum[a]]+ \
+DiracGamma[Momentum[b]] + ..., ...] into (DiracSigma[DiracGamma[Momentum[a]],\
+...] + DiracSigma[DiracGamma[Momentum[b]], ...] + ...).";
+
+DiracSigmaExpand::fail =
+"Something went wrong while expanding DiracSigma's. Evaluation aborted! "
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracSigmaExpand`Private`"]
+
+Options[DiracSigmaExpand] = {
+ DiracGammaExpand -> False,
+ FCE -> False,
+ FCI -> False,
+ Momentum -> All
+};
+
+DiracSigmaExpand[expr_, OptionsPattern[]] :=
+ Block[{ex,null1,null2, uniqList, repRule, momList,rud, uniqListEval,res},
+
+ momList = OptionValue[Momentum];
+
+ If[ !OptionValue[FCI],
+ ex = FCI[expr],
+ ex = expr
+ ];
+
+ (* Nothing to do... *)
+ If[ FreeQ[ex,DiracSigma],
+ Return[ex]
+ ];
+
+ (* List of all the unique Feynman slashes *)
+ uniqList = Cases[ex+null1+null2, DiracSigma[arg__ /; ! FreeQ2[{arg}, {Momentum,CartesianMomentum}]], Infinity]//DeleteDuplicates//Sort;
+
+ (* If the user specified to perform expansion only for some
+ special slashed momenta, let's do it *)
+ If[ momList=!=All && Head[momList]===List,
+ uniqList = Select[uniqList, !FreeQ2[#, momList]&]
+ ];
+
+ If[ OptionValue[DiracGammaExpand],
+ uniqListEval = DiracGammaExpand[uniqList,FCI->True, Momentum->momList, DiracSigmaExpand->False],
+ uniqListEval = uniqList;
+ ];
+
+ uniqListEval = uniqListEval /. z_DiracSigma :> Distribute[z];
+
+ (* Final replacement rule *)
+ repRule = Thread[rud[uniqList, uniqListEval]] /. rud->RuleDelayed;
+
+ res = ex /. Dispatch[repRule];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+
+ ];
+
+FCPrint[1,"DiracSigmaExpand.m loaded."];
+End[]
diff --git a/FeynCalc/Dirac/DiracSigmaExplicit.m b/FeynCalc/Dirac/DiracSigmaExplicit.m
index 6d60b026f..c1abe4045 100644
--- a/FeynCalc/Dirac/DiracSigmaExplicit.m
+++ b/FeynCalc/Dirac/DiracSigmaExplicit.m
@@ -1,14 +1,28 @@
-(* ------------------------------------------------------------------------ *)
-(* ------------------------------------------------------------------------ *)
+(* ::Package:: *)
+
+
+(* :Title: DiracSigmaExplicit *)
-(* :Summary: substitute DiracSigma in terms of DiracGamma's *)
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Substitute DiracSigma in terms of DiracGamma's *)
(* ------------------------------------------------------------------------ *)
DiracSigmaExplicit::usage =
"DiracSigmaExplicit[exp] inserts in exp the definition of \
-DiracSigma. DiracSigmaExplict is also an option of \
-DiracSimplify.";
+DiracSigma. \n
+DiracSigmaExplict is also an option of various FeynCalc functions \
+that handle the Dirac algebra.";
+
+DiracSigmaExplicit::failmsg =
+"Error! DiracSigmaExplicit has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
(* ------------------------------------------------------------------------ *)
@@ -17,19 +31,85 @@
Begin["`DiracSigmaExplicit`Private`"];
-dirsigex[a_DiracGamma, b_DiracGamma] :=
- dirsigex[a,b] = I/2 (DOT[a, b] - DOT[b, a]);
+dsiVerbose::usage="";
+
+Options[DiracSigmaExplicit] = {
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False
+};
+
+DiracSigmaExplicit[expr_, OptionsPattern[]] :=
+ Block[{ex, res, holdDOT, tmp},
+
+ If [OptionValue[FCVerbose]===False,
+ dsiVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ dsiVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1,"DiracSigmaExplicit: Entering. ", FCDoControl->dsiVerbose];
+ FCPrint[3,"DiracSigmaExplicit: Entering DiracSigmaExplicit with: ", ex, FCDoControl->dsiVerbose];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex, DiracSigma],
+ Return[ex]
+ ];
+
+ tmp = ex /. DOT->holdDOT;
+
+ tmp = tmp //. {
+ holdDOT[x___, c_. DiracSigma[DiracGamma[ExplicitLorentzIndex[0]], (a: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___])],y___]/; NonCommFreeQ[c] :>
+ I c (holdDOT[x,DiracGamma[ExplicitLorentzIndex[0]],a,y]),
+ holdDOT[x___, c_. DiracSigma[(a: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___]),DiracGamma[ExplicitLorentzIndex[0]]],y___]/; NonCommFreeQ[c] :>
+ -I c (holdDOT[x,DiracGamma[ExplicitLorentzIndex[0]], a,y]),
+ holdDOT[x___, c_. DiracSigma[(a: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___]), (b: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___])],y___]/; NonCommFreeQ[c] :>
+ I c (holdDOT[x,a,b,y] + CartesianPair[First[a],First[b]] holdDOT[x,y])
+
+ };
+
+ FCPrint[3,"DiracSigmaExplicit: After applying the 1st set of rules: ", tmp, FCDoControl->dsiVerbose];
+
+ tmp = tmp //. {
+ DiracSigma[DiracGamma[ExplicitLorentzIndex[0]], (a: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___])] :> I holdDOT[DiracGamma[ExplicitLorentzIndex[0]], a],
+ DiracSigma[(a: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___]),DiracGamma[ExplicitLorentzIndex[0]]] :> - I holdDOT[DiracGamma[ExplicitLorentzIndex[0]], a],
+ DiracSigma[(a: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___]), (b: DiracGamma[(_CartesianIndex| _CartesianMomentum), ___])] :> I (holdDOT[a,b] + CartesianPair[First[a],First[b]])
+ };
+
+ FCPrint[3,"DiracSigmaExplicit: After applying the 2nd set of rules: ", tmp, FCDoControl->dsiVerbose];
+
+ tmp = tmp //. {
+ holdDOT[x___, c_. DiracSigma[a_DiracGamma,b_DiracGamma],y___]/; NonCommFreeQ[c] :> I/2 c (holdDOT[x,a,b,y] - holdDOT[x,b,a,y])
+ };
+
+
+ FCPrint[3,"DiracSigmaExplicit: After applying the 3rd set of rules: ", tmp, FCDoControl->dsiVerbose];
+
+ tmp = tmp //. {
+ DiracSigma[a_DiracGamma,b_DiracGamma]:> I/2 (DOT[a, b] - DOT[b, a])
+ } /. holdDOT->DOT;
+
+ FCPrint[3,"DiracSigmaExplicit: After applying the final set of rules: ", tmp, FCDoControl->dsiVerbose];
+
+ res = tmp;
+
+ If[ !FreeQ[res,DiracSigma],
+ Message[DiracSigmaExplicit::failmsg,"Failed to eliminate all occurences of DiracSigma."];
+ Abort[]
+ ];
-dirsigex[DiracMatrix[a_, b_]] :=
- dirsigex[DiracMatrix[a,b]] =
- I/2 (DiracMatrix[a, b] - DiracMatrix[b, a]);
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
-dirsigex[DiracSlash[a_, b_]] :=
- dirsigex[DiracSlash[a,b]] =
- I/2 (DiracSlash[a, b] - DiracSlash[b, a]);
+ res
-DiracSigmaExplicit[x_] :=
- FCI[x]/. DiracSigma -> dirsigex;
+ ];
FCPrint[1,"DiracSigmaExplicit.m loaded"];
End[]
diff --git a/FeynCalc/Dirac/DiracSimplify.m b/FeynCalc/Dirac/DiracSimplify.m
index 7f9b556ac..a0576e769 100755
--- a/FeynCalc/Dirac/DiracSimplify.m
+++ b/FeynCalc/Dirac/DiracSimplify.m
@@ -1,82 +1,32 @@
+(* ::Package:: *)
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
-(* :Title: DiracSimplify *)
+(* :Title: DiracSimplify *)
-(* :Author: Rolf Mertig *)
-
-(* ------------------------------------------------------------------------ *)
-(* :History: File created on 20 December '98 at 23:00 *)
-(* ------------------------------------------------------------------------ *)
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
-(* :Summary: like DiracTrick, but including non-commutative expansion *)
+(* :Summary: Like DiracTrick, but including non-commutative expansions
+ and simplifications of spinor chains *)
(* ------------------------------------------------------------------------ *)
-(* NonCommQ replaced with NonCommFreeQ everywhere due to change (fix) of
- definitions of these functions. F.Orellana, 13/9-2002 *)
-
-
-ChisholmSpinor::usage =
-"ChisholmSpinor[x] uses the Chisholm identity on a DiraGamma between spinors. \
-As an optional second argument 1 or 2 may be \
-given, indicating that ChisholmSpinor should only act on the first \
-resp. second part of a product of spinor chains.";
-
-DiracCanonical::usage =
-"DiracCanonical is an option for DiracSimplify. \
-If set to True DiracSimplify uses the function DiracOrder \
-internally.";
-
-InsideDiracTrace::usage =
-"InsideDiracTrace is an option of DiracSimplify. \
-If set to True, DiracSimplify assumes to operate \
-inside a DiracTrace, i.e., products of an odd number \
-of Dirac matrices are discarded. Furthermore simple \
-traces are calculated (but divided by a factor 4, \
-i.e. : DiracSimplify[DiracMatrix[a,b], InsideDiracTrace->True] \
-yields ScalarProduct[a,b]) \n
-Traces involving more than \
-four DiracGammas and DiracGamma[5] are not performed.";
-
DiracSimplify::usage =
-"DiracSimplify[expr] simplifies products of Dirac matrices \
-in expr and expands non-commutative products. \
+"DiracSimplify[exp] simplifies products of Dirac matrices \
+and expands non-commutative products. \
Double Lorentz indices and four vectors are contracted. \
The Dirac equation is applied. \
-All DiracMatrix[5], DiracMatrix[6] and DiracMatrix[7] are moved to \
+All DiracGamma[5], DiracGamma[6] and DiracGamma[7] are moved to \
the right. The order of the Dirac matrices is not changed.";
-$SpinorMinimal::usage =
-"$SpinorMinimal is a global switch for an additional simplification \
-attempt in DiracSimplify for more than one Spinor-line. \
-The default is False, since otherwise it costs too much time.";
-
-DiracSimpCombine::usage =
-"DiracSimpCombine is an option for DiracSimplify. If set to \
-True, sums of DiracGamma's will be merged as much as \
-possible in DiracGamma[ .. + .. + ]'s.";
-
-DiracSubstitute67::usage =
-"DiracSubstitute67 is an option for DiracSimplify. If set to \
-True the chirality-projectors DiracGamma[6] and DiracGamma[7] are \
-substituted by their definitions.";
-
-SirlinRelations::usage =
-"SirlinRelations is an option for DiracSimplify. If set to\
-True the spinor chains that contain Dirac matrices are simplified \
-using relations derived by Sirlin in Nuclear Physics B192 (1981) 93-99 \
-Contrary to the original paper, the sign of the Levi-Civita tensor is \
-choosen as epsilon^{0123} = 1 which is the standard choice in FeynCalc.";
-
-DiracSimplify::noncom =
-"Wrong syntax! `1` contains Dirac or SU(N) matrices multiplied via \
-Times (commutative multiplication) instead of DOT (non-commutative multiplication). \
-Evaluation aborted!";
-
-DiracSimplify2::usage =
-"DiracSimplify2[exp] simplifies the Dirac structure but leaves \
-any DiracGamma[5] untouched. \
-DiracGamma[6] and DiracGamma[7] are inserted by their definitions.";
+DiracSimplify::failmsg =
+"Error! DiracSimplify encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
(* ------------------------------------------------------------------------ *)
@@ -86,100 +36,103 @@ using relations derived by Sirlin in Nuclear Physics B192 (1981) 93-99 \
Begin["`DiracSimplify`Private`"]
dsVerbose::usage="";
-insideDiracTrace::usage="";
-
-DiracSimplify2[exp_] :=
- Block[ {nn,tt},
- If[ FreeQ[exp,DOT],
- exp,
- nn = DotSimplify[DiracGammaExpand[FeynCalcInternal[exp]] /.
- DiracGamma[6] -> (1/2 + DiracGamma[5]/2) /.
- DiracGamma[7] -> (1/2 - DiracGamma[5]/2)];
- If[ FreeQ[nn, DiracGamma[5]],
- DiracSimplify[nn],
- tt = Cases2[nn, DOT];
- nn/.(Table[tt[[ij]] -> DotSimplify[
- Contract[ tt[[ij]] //.
- {doot[a__, DiracGamma[5], b__] :>
- If[ FreeQ[{a}, DiracGamma[5]],
- DiracSimplify[DOT[a]],
- DiracSimplify2[DOT[b]]
- ].DiracGamma[5].
- If[ FreeQ[{b}, DiracGamma[5] ],
- DiracSimplify2[DOT[a]],
- DiracSimplify[DOT[b]]
- ]
- }]], {ij,Length[tt]}])
- ]
- ]
- ];
+optInsideDiracTrace::usage="";
+optExpanding::usage="";
+optExpandScalarProduct::usage="";
+optDiracGammaCombine::usage="";
+optDiracSubstitute67::usage="";
+optDiracSubstitute5::usage="";
+optDiracSigmaExplicit::usage="";
+optDiracTraceEvaluate::usage="";
+optDiracEquation::usage="";
+optDiracOrder::usage="";
+optFactoring::usage="";
+optEpsContract::usage="";
+optContract::usage="";
+optToDiracGamma67::usage="";
Options[DiracSimplify] = {
- DiracCanonical -> False,
+ Contract -> True,
+ DiracChain -> True,
+ DiracChainJoin -> True,
DiracEquation -> True,
+ DiracGammaCombine -> False,
+ DiracOrder -> False,
DiracSigmaExplicit -> True,
- DiracSimpCombine -> False,
+ DiracSubstitute5 -> False,
DiracSubstitute67 -> False,
+ DiracTrace -> True,
+ DiracTraceEvaluate -> True,
+ EpsContract -> True,
+ Expand2 -> True,
+ ExpandScalarProduct -> True,
Expanding -> True,
FCCheckSyntax -> False,
FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
FCVerbose -> False,
Factoring -> False,
- FeynCalcInternal -> False,
InsideDiracTrace -> False,
- SirlinRelations -> True
+ LorentzIndexNames -> {},
+ CartesianIndexNames -> {},
+ SirlinSimplify -> True,
+ SpinorChainTrick -> True,
+ ToDiracGamma67 -> True
};
+DiracSimplify[expr_List, opts:OptionsPattern[]] :=
+ DiracSimplify[#, opts]&/@expr;
-(*TODO: This syntax is really bad and should be blacklisted! *)
-DiracSimplify[x_,y__, z___?OptionQ] :=
- DiracSimplify[DOT[x,y], z] /; FreeQ[{x,y}, Rule] && FreeQ[{x,y}, RuleDelayed];
-
-
-DiracSimplify[expr_, opts:OptionsPattern[]] :=
- Block[{ex,res,time, null1, null2, holdDOT, freePart, dsPart, diracObjects,
- diracObjectsEval, repRule},
+DiracSimplify[expr_/;Head[expr]=!=List, OptionsPattern[]] :=
+ Block[{ex,res,time, null1, null2, holdDOT, freePart=0, dsPart, diracObjects,
+ diracObjectsEval, repRule, tmp, tmpHead},
If [OptionValue[FCVerbose]===False,
dsVerbose=$VeryVerbose,
- If[MatchQ[OptionValue[FCVerbose], _Integer?Positive | 0],
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
dsVerbose=OptionValue[FCVerbose]
];
];
+ optContract = OptionValue[Contract];
+ optDiracEquation = OptionValue[DiracEquation];
+ optDiracGammaCombine = OptionValue[DiracGammaCombine];
+ optDiracOrder = OptionValue[DiracOrder];
+ optDiracSigmaExplicit = OptionValue[DiracSigmaExplicit];
+ optDiracSubstitute5 = OptionValue[DiracSubstitute5];
+ optDiracSubstitute67 = OptionValue[DiracSubstitute67];
+ optDiracTraceEvaluate = OptionValue[DiracTraceEvaluate];
+ optEpsContract = OptionValue[EpsContract];
+ optExpandScalarProduct = OptionValue[ExpandScalarProduct];
+ optExpanding = OptionValue[Expanding];
+ optInsideDiracTrace = OptionValue[InsideDiracTrace];
+ optToDiracGamma67 = OptionValue[ToDiracGamma67];
+
+ If[ OptionValue[Factoring] === Automatic,
+ optFactoring =
+ Function[x, If[ LeafCount[x] < 5000,
+ Factor[x],
+ x
+ ]
+ ],
+ optFactoring = OptionValue[Factoring]
+ ];
+
FCPrint[1, "DiracSimplify: Entering.", FCDoControl->dsVerbose];
- FCPrint[3, "DiracSimplify: Entering with ", ex, FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: Entering with ", expr, FCDoControl->dsVerbose];
If[ OptionValue[FCI],
ex = expr,
ex = FCI[expr]
];
- If[ OptionValue[InsideDiracTrace],
- insideDiracTrace = True,
- insideDiracTrace = False
- ];
-
- If [OptionValue[FCCheckSyntax],
+ If[ OptionValue[FCCheckSyntax],
time=AbsoluteTime[];
FCPrint[1, "DiracSimplify: Checking the syntax", FCDoControl->dsVerbose];
-
- If[ !FreeQ2[DotExpand[Expand2[DiracSigmaExplicit[ex],{DiracGamma,Spinor,SUNT}]],{
- DiracGamma[a__]*DiracGamma[b__],
- DOT[a:Except[_Spinor]...,DiracGamma[b__],c:Except[_Spinor]...]*
- DOT[d:Except[_Spinor]...,DiracGamma[e__],f:Except[_Spinor]...],
- DOT[a:Except[_Spinor]...,DiracGamma[b__],c:Except[_Spinor]...]*DiracGamma[d__],
- SUNT[a__]*SUNT[b__],
- DOT[a:Except[_Spinor]...,SUNT[b__],c:Except[_Spinor]...]*DOT[d:Except[_Spinor]...,SUNT[e__],f:Except[_Spinor]...],
- DOT[a___,SUNT[b__],c___]*SUNT[d__]
- }],
- Block[{$MessagePrePrint},
- Message[DiracSimplify::noncom, ToString[expr,FormatType->InputForm]]];
- Abort[]
- ];
-
+ FCCheckSyntax[ex,FCI->True];
FCPrint[1, "DiracSimplify: Checking the syntax done", FCDoControl->dsVerbose];
FCPrint[1,"DiracSimplify: Done checking the syntax, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose]
];
@@ -187,1295 +140,358 @@ using relations derived by Sirlin in Nuclear Physics B192 (1981) 93-99 \
If[ FreeQ2[ex,DiracHeadsList],
Return[ex]
];
-(*
+
+ (* Here we separately simplify each chain of Dirac matrices *)
If[ OptionValue[FCDiracIsolate],
(* This is the standard mode for calling DiracSimplify *)
-
+ FCPrint[1,"DiracSimplify: Normal mode.", FCDoControl->dsVerbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracSimplify: Extracting Dirac objects.", FCDoControl->dsVerbose];
(* First of all we need to extract all the Dirac structures in the input. *)
- ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DotSimplify->True, DiracGammaCombine->OptionValue[DiracSimpCombine],Lorentz->True];
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DotSimplify->True, DiracGammaCombine->OptionValue[DiracGammaCombine],
+ DiracSigmaExplicit->OptionValue[DiracSigmaExplicit], LorentzIndex->True, CartesianIndex->True,
+ ToDiracGamma67->optToDiracGamma67, DiracChain->OptionValue[DiracChain]];
+
+ If[ !FreeQ[ex,DiracTrace] && !OptionValue[DiracTrace],
+ ex = ex /. dsHead[zz_]/; !FreeQ[zz,DiracTrace] :> zz
+ ];
{freePart,dsPart} = FCSplit[ex,{dsHead}];
FCPrint[3,"DiracSimplify: dsPart: ",dsPart , FCDoControl->dsVerbose];
FCPrint[3,"DiracSimplify: freePart: ",freePart , FCDoControl->dsVerbose];
+ FCPrint[1, "DiracSimplify: Done extracting Dirac objects, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
- diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//Union;
- FCPrint[3,"DiracSimplify: diracObjects: ",diracObjects , FCDoControl->dsVerbose];
-
- time=AbsoluteTime[];
- FCPrint[1, "DiracSimplify: Applying diracTrickEval", FCDoControl->dsVerbose];
- diracObjectsEval = Map[(diracTrickEvalFast[#]/. diracTrickEvalFast->diracTrickEval)&, (diracObjects/.dsHead->Identity)];
- FCPrint[1,"DiracTrace: diracTrickEval done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
-
- If[ !FreeQ2[diracObjectsEval,{diracTrickEvalFast,diracTrickEval}],
- Message[DiracTrick::failmsg,"Evaluation of isolated objects failed."];
- Abort[]
- ];
-
- repRule = MapThread[Rule[#1,#2]&,{diracObjects,diracObjectsEval}];
- FCPrint[3,"DiracSimplify: repRule: ",repRule , FCDoControl->dsVerbose];
- res = freePart + ( dsPart/.repRule),
-
- (* This is a fast mode for input that is already isolated, e.g. for calling DiracTrick/@exprList
- from internal functions *)
- res = diracTrickEvalFast[ex] /. diracTrickEvalFast->diracTrickEval
- ];*)
+ diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//Sort//DeleteDuplicates;
+ diracObjectsEval = diracObjects;
+ FCPrint[3,"DiracSimplify: diracObjects: ", diracObjects , FCDoControl->dsVerbose];
+ If[ optDiracTraceEvaluate,
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracSimplify: Calculating Dirac traces.", FCDoControl->dsVerbose];
+ diracObjectsEval = diracObjectsEval /. DiracTrace[zz_, opts:OptionsPattern[]] :> DiracTrace[zz,
+ DiracTraceEvaluate->True, Expand-> optExpandScalarProduct, opts];
+ FCPrint[1, "DiracSimplify: Done calculating Dirac traces, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracObjects after calcuating Dirac traces: ", diracObjectsEval , FCDoControl->dsVerbose];
+ diracObjectsEval
- If[ !OptionValue[Expanding],
- (* If Expanding is set to False, just use the Dirac equation and apply DotSimplify.*)
- If[ OptionValue[DiracSigmaExplicit],
- ex = DiracSigmaExplicit[ex]
];
- ex = dotLin[ex];
- If[ OptionValue[DiracEquation] && !FreeQ[ex,Spinor],
- ex = diracEq[ex]
- ],
- (*If Expanding is set to True, the main simplification function (oldDiracSimplify) is applied.*)
- time=AbsoluteTime[];
- FCPrint[1, "DiracSimplify: Applying PairContract.", FCDoControl->dsVerbose];
- FCPrint[3,"DiracSimplify: Doing contractions on ", ex, FCDoControl->dsVerbose];
- ex = ex /. Pair -> PairContract;
- If[ OptionValue[DiracSigmaExplicit],
- ex = DiracSigmaExplicit[ex]
+
+ If[ OptionValue[DiracChainJoin],
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracSimplify: Contracting Dirac indices.", FCDoControl->dsVerbose];
+ diracObjectsEval = diracObjectsEval /. dsHead[x_]/;!FreeQ[x,DiracChain] :>
+ DiracChainJoin[x, FCI->True, FCDiracIsolate->False];
+ FCPrint[1, "DiracSimplify: Done calculating Dirac traces, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracObjects after calcuating Dirac traces: ", diracObjects , FCDoControl->dsVerbose]
];
- FCPrint[1,"DiracSimplify: Done applying PairContract, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+
time=AbsoluteTime[];
- FCPrint[1, "DiracSimplify: Starting oldDiracSimplify", FCDoControl->dsVerbose];
- FCPrint[3,"DiracSimplify: Doing oldDiracSimplify on ", ex, FCDoControl->dsVerbose];
- ex = oldDiracSimplify[ex,Flatten[Join[{opts}, FilterRules[Options[DiracSimplify], Except[{opts}]]]]]/. PairContract -> Pair;
- FCPrint[1,"DiracSimplify: Done doing oldDiracSimplify, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
- ];
+ FCPrint[1, "DiracSimplify: Applying diracSimplifyEval", FCDoControl->dsVerbose];
+ diracObjectsEval = FeynCalc`Package`diracTrickEvalFastFromDiracSimplifyList[(diracObjectsEval/.dsHead->Identity), {optInsideDiracTrace,optDiracOrder}];
+ diracObjectsEval = diracSimplifyEval/@diracObjectsEval;
- (* Covariant normalization of ubar.u or vbar.v (as in Peskin and Schroeder).
- The combinations ubar.v and vbar.u are orthogonal and hence vanish *)
- If[ !FreeQ[ex,Spinor],
- FCPrint[2,"DiracSimplify: Applying spinor normalization on ", ex, FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: After diracSimplifyEval: ", diracObjectsEval, FCDoControl->dsVerbose];
+ FCPrint[1,"DiracSimplify: diracSimplifyEval done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
- ex = ex/. DOT->holdDOT //.
- { holdDOT[Spinor[s_. Momentum[p__],m_, 1],Spinor[s_. Momentum[p__],m_, 1]] -> s 2 m,
- holdDOT[Spinor[- Momentum[p__],m_, 1],Spinor[Momentum[p__],m_, 1]] -> 0,
- holdDOT[Spinor[Momentum[p__],m_, 1],Spinor[- Momentum[p__],m_, 1]] -> 0} /.
- holdDOT -> DOT
- ];
+ If[ !FreeQ2[diracObjectsEval,{FeynCalc`Package`diracTrickEvalFastFromDiracSimplifyList,diracSimplifyEval,holdDOT}],
+ Message[DiracSimplify::failmsg,"Evaluation of isolated objects failed."];
+ Abort[]
+ ];
- res = ex;
- FCPrint[3,"DiracSimplify: Leaving with ", res, FCDoControl->dsVerbose];
- res
- ];
+ FCPrint[1, "DiracSimplify: Inserting Dirac objects back.", FCDoControl->dsVerbose];
+ time=AbsoluteTime[];
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"DiracSimplify: repRule: ", repRule, FCDoControl->dsVerbose];
+ tmp = (dsPart /. Dispatch[repRule]);
+ FCPrint[1, "DiracSimplify: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose],
-(*if the expression contains non-commutative objects, apply DotSimplify*)
-dotLin[x_] :=
- If[ FreeQ[x, DOT],
- x,
- DotSimplify[x, Expanding -> False]
- ];
-(*if the expression contains spinors, apply the Dirac equation*)
-diracEq[x_] :=
- If[ FreeQ[x, Spinor],
- x,
- DiracEquation[x]
- ];
+ (*
+ This is a fast mode for input that is already isolated, e.g. for calling DiracSimplify/@exprList
+ from internal functions
+ *)
+ FCPrint[1,"DiracSimplify: Fast mode.", FCDoControl->dsVerbose];
-dit[x_,ops___Rule] :=
- DiracTrace[diracSimplify@@Join[{x},{ops},
- Flatten[Prepend[{Options[DiracSimplify]},
- InsideDiracTrace -> True]]]
- ];
+ tmp = FeynCalc`Package`diracTrickEvalFastFromDiracSimplifySingle[ex, {tmpHead,optInsideDiracTrace,optDiracOrder}];
-diracSimplify[z_, OptionsPattern[]] :=
- (Contract[z]/.DiracTrace->dit)/;!FreeQ[z,DiracTrace];
+ (* It might happen that after diracTrickEvalFast there are no Dirac matrices left.*)
-dS[x___] :=
- If[ $BreitMaison === True,
- dSBM[x],
- dSNV[x]
- ];
+ FCPrint[3,"DiracSimplify: After diracTrickEvalFast: ", tmp , FCDoControl->dsVerbose];
-dSBM[x___] :=
- MemSet[dSBM[x], DiracTrick[x]];
-dSNV[x___] :=
- MemSet[dSNV[x], DiracTrick[x]];
+ If[ OptionValue[ToDiracGamma67],
+ res = res /. tmpHead[zzz_]/;!FreeQ[{zzz}, DiracGamma[5]] :> tmpHead[ToDiracGamma67[zzz,FCI->True]]
+ ];
+ If[ !FreeQ2[tmp,{DiracHeadsList,tmpHead}],
+ tmp = tmp /. tmpHead -> diracSimplifyEval
+ ];
+ If[ !FreeQ2[tmp,{FeynCalc`Package`diracTrickEvalFastFromDiracSimplifySingle,diracSimplifyEval,holdDOT}],
+ Message[DiracSimplify::failmsg,"Evaluation of isolated objects failed."];
+ Abort[]
+ ]
+ ];
-(* ****************************************************************** *)
+ FCPrint[3, "DiracSimplify: Intermediate result: ", tmp, FCDoControl->dsVerbose];
-(*this is oldDiracSimplify for spinor free expressions*)
-oldDiracSimplify[x_, opts:OptionsPattern[]] :=
- diracSimplify[x, opts] /; FreeQ[x, Spinor];
+ (* To simplify products of spinor chains we need to work with the full expression *)
+ If[ !FreeQ[tmp,Spinor],
-(*this is oldDiracSimplify for expressions that contain spinors*)
-oldDiracSimplify[x_,opts:OptionsPattern[]] :=
- Block[ {ex=x,dre, factoring,dooo,diracga67},
- FCPrint[2,"DiracSimplify: oldDiracSimplify: Entering with ", ex, FCDoControl->dsVerbose];
- factoring = OptionValue[DiracSimplify,{opts},Factoring];
- diracga67 = OptionValue[DiracSimplify,{opts},DiracSubstitute67];
- If[ factoring === True,
- factoring = Factor2
- ];
+ If[ OptionValue[SpinorChainTrick],
- If[ diracga67,
- ex = DiracSubstitute67[ex];
- ];
+ FCPrint[1, "DiracSimplify: Applying SpinorChainTrick.", FCDoControl->dsVerbose];
+ time=AbsoluteTime[];
+ tmp = SpinorChainTrick[tmp, FCI->True,DiracGammaCombine->optDiracGammaCombine, DiracSigmaExplicit->False,
+ LorentzIndexNames->OptionValue[LorentzIndexNames], CartesianIndexNames->OptionValue[CartesianIndexNames]];
- dre = Collect[DotSimplify[DiracTrick[DiracGammaCombine[ex]]]/.
- DOT->dooo,dooo[__]]/.dooo->DOT;
- dre = FixedPoint[ SpinorChainEvaluate[#,opts]&, dre, 142];
- If[ !FreeQ[dre, Eps],
- dre = Contract[dre, EpsContract -> True];
- dre = FixedPoint[ SpinorChainEvaluate[#,opts]&, dre, 142],
- If[ !FreeQ[dre, LorentzIndex],
- dre = Contract[dre, Expanding -> False]
+ FCPrint[1,"DiracSimplify: Done applying SpinorChainTrick, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: After SpinorChainTrick: ", tmp, FCDoControl->dsVerbose];
];
- dre = FixedPoint[ SpinorChainEvaluate[#,opts]&, dre, 142];
- ];
- FCPrint[2,"DiracSimplify: oldDiracSimplify: Doing contractions in ", dre, FCDoControl->dsVerbose];
- If[ !FreeQ[dre, LorentzIndex],
- FCPrint[2,"contracting in oldDiracSimpify"];
- dre = Contract[dre];
- FCPrint[2,"contracting in oldDiracSimpify done"]
- ];
+ If [ OptionValue[SirlinSimplify] && FCGetDimensions[tmp]==={4},
- If[ Length[DownValues[SpinorsandPairs]] > 1,
- dre = (dre /. DOT -> SpinorsandPairs/. SpinorsandPairs->DOT)//dotLin
- ];
+ FCPrint[1, "DiracSimplify: Applying SirlinSimplify.", FCDoControl->dsVerbose];
+ time=AbsoluteTime[];
+ tmp = SirlinSimplify[tmp, FCI->True,DiracGammaCombine->optDiracGammaCombine, DiracSigmaExplicit->False, SpinorChainTrick->False];
- If[ !FreeQ[dre, DiracGamma],
- dre = Expand2[dre, DiracGamma]
- ];
+ FCPrint[1,"DiracSimplify: Done applying SirlinSimplify, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: AfteSirlinSimplify: ", tmp, FCDoControl->dsVerbose]
+ ]
- If[ factoring =!= False,
- dre = factoring[dre]
];
- FCPrint[2,"DiracSimplify: oldDiracSimplify: Leaving with ", dre, FCDoControl->dsVerbose];
-
- dre
- ]/; !FreeQ[x,Spinor];
-
-DiracSubstitute67[x_] :=
- x/. {DiracGamma[6] :> (1/2 + DiracGamma[5]/2),
- DiracGamma[7] :> (1/2 - DiracGamma[5]/2)};
-
-contractli[x_] :=
- MemSet[contractli[x],
- Contract[ x, Expanding -> True, Factoring -> False, EpsContract -> False]
- ];
-
-(*if the expression doesn't contain any non-commutative objects, return it unevaluated*)
-diracSimplify[x_, OptionsPattern[]] :=
- x /; NonCommFreeQ[x];
-
-(*CHANGE 1298 *)
-
-diracSimplify[x_, in:OptionsPattern[]] :=
- If[ $BreitMaison === True,
- diracSimplifyBM[x,in],
- diracSimplifyNV[x,in]
- ];
-
-diracSimplifyBM[x_,in:OptionsPattern[]] :=
- MemSet[diracSimplifyBM[x,in], diracSimplifyGEN[x,in]];
-diracSimplifyNV[x_,in:OptionsPattern[]] :=
- MemSet[diracSimplifyNV[x,in], diracSimplifyGEN[x,in]];
-dirfun[exp_] :=
- Collect2[exp/.DOT->dS, DOT, Factoring -> False];
+ res = freePart + tmp;
-diracSimplifyInsideTrace[ex_] :=
- Block[{diracdt=ex,holdDOT},
- (* bug fix 2005-02-05: this is a problem because of Flat and OneIdentity of Dot ... *)
- (* diracdt = diracdt/.DOT->trIC/. *)
- (* only do cyclicity simplification if there is a simple structure of Dirac matrices *)
- If[ FreeQ[diracdt/. DOT -> holdDOT, holdDOT[a__/; !FreeQ[{a}, holdDOT]]],
- diracdt = diracdt/.DOT->trIC/.
- (* bug fix on September 25th 2003 (RM): due to earlier changes this was overseen:*)
- {trI:>dS, spursav:> dS};
+ If[ optExpanding && OptionValue[Expand2],
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracSimplify: Expanding the result.", FCDoControl->dsVerbose];
+ res = Expand2[res];
+ FCPrint[1,"DiracSimplify: Expanding done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: After expanding: ", res, FCDoControl->dsVerbose]
];
- (* careful: can run into infinite loop ..., adding a cut in FixedPoint, 10.9.2003 *)
- (* even be more careful: and get rid of cyclic simplifications hrere ... *)
- diracdt =
- FixedPoint[dirfun, diracdt, 5](*/.DOT ->trIC/.trI->dS*);
- FCPrint[2,"dir2done, diracdt=", FullForm[diracdt]];
- If[ FreeQ[ diracdt, DOT ],
- diracdt = diracdt/.DiracGamma[_[__],___]->0;
- diracpag = PartitHead[diracdt,DiracGamma];
- If[ diracpag[[2]] === DiracGamma[5],
- diracdt = 0
- ];
- If[ diracpag[[2]] === DiracGamma[6] || diracpag[[2]] === DiracGamma[7],
- diracdt = 1/2 diracpag[[1]]
- ]
+ If[ OptionValue[FCE],
+ res = FCE[res]
];
- diracdt
- ];
-
-
-diracSimplifyGEN[x_, opts:OptionsPattern[]] :=
- If[ FreeQ[x, DiracGamma],
- x,
- Block[ {diracopt,diracdt,diracndt = 0,diraccanopt,diracpdt,diracgasu,
- diracldt,diracjj = 0,diractrlabel,diracga67,diracsifac,
- diracpag,colle, dooT,time},
- (* There are several options *)
-
-
- FCPrint[1, "DiracSimplify: diracSimplifyGEN: Entering", FCDoControl->dsVerbose];
-
-
- diraccanopt = OptionValue[DiracSimplify,{opts},DiracCanonical];
- diractrlabel = OptionValue[DiracSimplify,{opts},InsideDiracTrace];
- diracga67 = OptionValue[DiracSimplify,{opts},DiracSubstitute67];
- diracgasu = OptionValue[DiracSimplify,{opts},DiracSimpCombine];
- diracsifac = OptionValue[DiracSimplify,{opts},Factoring];
+ (*res = ex;*)
+ FCPrint[1,"DiracSimplify: Leaving.", FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: Leaving with ", res, FCDoControl->dsVerbose];
+ res
+ ];
- time=AbsoluteTime[];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Applying DotSimplify.", FCDoControl->dsVerbose];
- FCPrint[3,"DiracSimplify: diracSimplifyGEN: Applying DotSimplify to ", x, FCDoControl->dsVerbose];
- diracdt = dotLin[ x//DiracGammaExpand ];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Done applying DotSimplify, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+(*TODO Figure out some way to treat spinors as well! *)
+diracSimplifyEval[DiracChain[expr_,i_,j_]]:=
+ DiracChain[diracSimplifyEval[expr],i,j]/; !optExpanding
+diracSimplifyEval[DiracChain[expr_,i_,j_]]:=
+ DiracChainExpand[DiracChain[diracSimplifyEval[expr],i,j], FCI->True]/; optExpanding
- time=AbsoluteTime[];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Doing index contractions.", FCDoControl->dsVerbose];
- FCPrint[3,"DiracSimplify: diracSimplifyGEN: Contract indices in ", diracdt, FCDoControl->dsVerbose];
- If[ diracgasu === True,
- diracdt = contractli[DiracGammaCombine[diracdt/.Pair->PairContract]](*/. DOT -> dS*)(*Commented out 27/3-2003, see above*),
- diracdt = contractli[ diracdt ]
- (*/. DOT->dS*)
- ];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Done doing index contractions, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+diracSimplifyEval[expr_]:=
+ Block[{tmp=expr, time, time2, res},
+ (* General algorithm of diracSimplifyEval:
- (* Commented out Sept. 9 203 by RM, in order to fix the 27/3 2003 bug
- diracdt = Expand2[ ExpandScalarProduct[diracdt//fEx], {Pair, DOT}]; *)
+ 1) Apply DiracTrick to the unexpanded expression
+ 2) Expand the expression using DotSimplify and apply DiracTrick again
+ 3) If there are uncontracted indices, contract them
+ 4) If needed, expand scalar products
+ 5) If needed, replace chiral projectors by their explicit values and apply DotSimplify
+ afterwards
- If[ diractrlabel===True,
- FCPrint[2,"DiracSimplify: diracSimplifyGEN: Simplifications inside a Dirac trace.", FCDoControl->dsVerbose];
- FCPrint[3,"DiracSimplify: diracSimplifyGEN: Applying simplifications that are valid only inside a Dirac trace", FCDoControl->dsVerbose];
- diracdt=diracSimplifyInsideTrace[diracdt]
- ];
- (* Change 27/3-2003 by Rolf Mertig, see above (27/3-2003)*)
- FCPrint[2,"dir2a, diracdt=", FullForm[diracdt]];
- (* diracdt = Expand2[ ExpandScalarProduct[diracdt//fEx], {Pair, DOT}]; *)
+ 6) If the expression contains spinors
+ 6.1) If needed, apply the Dirac equation
+ 6.2) If needed, apply Sirlin's relations
- FCPrint[2,"DiracSimplify: diracSimplifyGEN: Expanding scalar products", FCDoControl->dsVerbose];
- diracdt =
- Expand[ ExpandScalarProduct[diracdt//fEx], DOT | Pair];
+ 7) If needed, order the remaining Dirac matrices canonically
+ 8) If needed, factor the result
+ *)
- FCPrint[2,"dir3, diracdt=", FullForm[diracdt]];
- If[ FreeQ[diracdt,DOT],
- diracndt = Expand[(diracdt/.PairContract->ExpandScalarProduct)//DiracGammaExpand];
- If[ diracga67 === True,
- diracndt = Expand[diracndt//DiracSubstitute67]
- ],
- FCPrint[2,"dir3 expanding "];
- (* diracdt = Expand[ diracdt ]; *)
- diracdt = Expand[ diracdt, DOT ];
- FCPrint[2,"dir3 expanding done ", Length[diracdt]];
- If[ Head[diracdt] === Plus,
- diracldt = Length[diracdt],
- If[ diracdt===0,
- diracldt = 0,
- diracldt = 1
- ]
- ];
- diracpdt = diracdt;
-
- (* TODO: Here we would need cyclicity simplifications *)
- (*If[ diractrlabel,
- (* change 2005-02-05
- diracpdt = diracpdt/.DOT->trIC/.trI->dS//. DOT -> trIC/.trI->dS; *)
- diracpdt = DiracTrick[diracpdt]
- ];*)
-(*
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Expanding scalar products", FCDoControl->dsVerbose];
- diracpdt = ExpandScalarProduct[diracpdt]//Expand;*)
-
-
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Subsituting chiral projectors", FCDoControl->dsVerbose];
- If[ diracga67,
- If[!FreeQ2[diracpdt,{DiracGamma[6],DiracGamma[7]}],
- diracpdt = DiracSubstitute67[diracpdt]
- ];
- If[!FreeQ2[diracndt,{DiracGamma[6],DiracGamma[7]}],
- diracndt = DiracSubstitute67[diracndt]
- ]
- ];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Entering", FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: diracSimplifyEval: Entering with: ", tmp, FCDoControl->dsVerbose];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Applying DiracTrick", FCDoControl->dsVerbose];
- diracpdt = fEx[DiracGammaExpand[diracpdt]]//DiracTrick;
- If[ diractrlabel===True,
- FCPrint[2,"DiracSimplify: diracSimplifyGEN: Simplifications inside a Dirac trace.", FCDoControl->dsVerbose];
- FCPrint[3,"DiracSimplify: diracSimplifyGEN: Applying simplifications that are valid only inside a Dirac trace", FCDoControl->dsVerbose];
- diracpdt=diracSimplifyInsideTrace[diracpdt]
- ];
+ (* First application of DiracTrick, no expansions so far *)
+ If[ !FreeQ[tmp, DiracGamma],
+ time=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Applying DiracTrick.", FCDoControl->dsVerbose];
+ tmp = DiracTrick[tmp, FCI -> True, InsideDiracTrace-> optInsideDiracTrace, FCDiracIsolate->False, ToDiracGamma67->optToDiracGamma67];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: DiracTrick done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: After DiracTrick: ", tmp, FCDoControl->dsVerbose]
+ ];
- (*If[ diractrlabel,
- diracpdt = fEx[(diracpdt//DiracGammaExpand)//DiracTrick](*/.
- DOT->trIC/.trI->dS//.DOT->dS/.
- DOT->trIC/.trI->dS *) ,
- diracpdt = fEx[DiracGammaExpand[diracpdt]//DiracTrick]//DiracTrick
- ];*)
+ (*
+ This is mainly relevant for products of traces when using NDR, so that despite of
+ DiracTraceEvaluate->True we may end up with unevaluated traces here, like with
+ DiracSimplify[DiracTrace[GAD[al, be, mu, nu, 5]] DiracTrace[GAD[al, be, mu, nu]]]
+ *)
+ If[ !FreeQ[tmp, DiracTrace] && optDiracTraceEvaluate,
+ tmp = tmp /. DiracTrace[z_, o:OptionsPattern[]] :> DiracTrace[z,
+ DiracTraceEvaluate->True, Expand-> optExpandScalarProduct, o];
+ ];
- (*FCPrint[1,"DiracSimplify: diracSimplifyGEN: Subsituting chiral projectors", FCDoControl->dsVerbose];
- If[ diracga67,
- diracpdt = DiracSubstitute67[ diracpdt/.DOT->dr67 ],
- diracpdt = fEx[ diracpdt ]
- ];*)
+ (* Expansion of Dirac slashes *)
+ If[ !optDiracGammaCombine && !FreeQ[tmp, DiracGamma],
+ tmp = DiracGammaExpand[tmp,FCI->True];
+ ];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Expanding scalar products and other things", FCDoControl->dsVerbose];
- diracndt = diracndt + Expand2[ExpandScalarProduct[diracpdt], DOT];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Doing contractions", FCDoControl->dsVerbose];
- diracndt = diracndt /. PairContract->ExpandScalarProduct;
+ If[ optExpanding && !FreeQ[tmp, DiracGamma],
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Applying Dotsimplify.", FCDoControl->dsVerbose];
+ tmp = DotSimplify[tmp, FCI->True, Expanding -> True, FCJoinDOTs->False];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Dotsimplify done, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: After Dotsimplify: ", tmp, FCDoControl->dsVerbose];
+ ];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Applying DotSimplify", FCDoControl->dsVerbose];
- diracndt = Expand[dotLin[diracndt]];
+ If[ !FreeQ[tmp, DiracGamma],
+ If[ optContract=!=False && !DummyIndexFreeQ[tmp,{LorentzIndex,CartesianIndex}],
+ time2=AbsoluteTime[];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Applying Contract.", FCDoControl->dsVerbose];
+ tmp = Contract[tmp, Expanding->True, EpsContract-> False, Factoring->False];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Contract done, timing: ", N[AbsoluteTime[] - time2, 4] , FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: diracSimplifyEval: After Contract: ", tmp, FCDoControl->dsVerbose];
- If[ diraccanopt===True,
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Applying canonical ordering", FCDoControl->dsVerbose];
- diracndt = DiracOrder[ diracndt ];
- diracndt = Expand[dotLin[diracndt]]
+ time2=AbsoluteTime[];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Applying EpsContract.", FCDoControl->dsVerbose];
+ If[ optEpsContract,
+ tmp = EpsContract[tmp,FCI->True]
];
- ];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: EpsContract done, timing: ", N[AbsoluteTime[] - time2, 4] , FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: diracSimplifyEval: After EpsContract: ", tmp, FCDoControl->dsVerbose];
- If[ diracsifac,
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Factoring the result", FCDoControl->dsVerbose];
- diracndt = Factor2[ diracndt ]
];
- FCPrint[1,"DiracSimplify: diracSimplifyGEN: Leaving DiracSimplify", FCDoControl->dsVerbose];
-
- diracndt/.spursav:> DOT
- ]
- ]; (* end of diracSimplify *)
-
-
-dr67[ b___ ] :=
- dS[ b ]/;FreeQ2[{b},{DiracGamma[6],DiracGamma[7]}];
-
-dr67[ b___,DiracGamma[6],z___ ] :=
- 1/2 dS[b,z] + 1/2 dS[ b,DiracGamma[5],z];
-
-dr67[ b___,DiracGamma[7],z___ ] :=
- 1/2 dS[b,z] - 1/2 dS[ b,DiracGamma[5],z];
-
-dIex[ a___,x_ + y_, b___] :=
- dS[a,x,b] + dS[a,y,b];
-
-dix[y_] :=
- y/.DOT->dIex/.dIex->dS;
-
-(* This is the tricky function which does the expansion of the dr's *)
-fEx[z_] :=
- FixedPoint[ dix, z/.DOT -> dS ];
-
-(* cyclic property *) (* Changed by F.Orellana, 14/1-2002.
- Dropped Kreimer scheme. According to
- Rolf it's wrong *)
-trIC[y___] :=
- tris @@ cyclic[y];
-
-cyclic[x__] :=
- RotateLeft[{x},Position[{x},First[Sort[{x}]]][[1,1]]];
-cyclic[] :=
- {};
-
-(* ************************************************************** *)
-(* fr567def, frlivcdef : two special FreeQ - checking functions *)
- fr567[x__] :=
- True /; FreeQ2[FixedPoint[ReleaseHold, {x}],{DiracGamma[5],DiracGamma[6],DiracGamma[7]}];
-
-(* Properties and special cases of traces (up to a factor 4) *)
-tris[x___] :=
- tris[x] = trI[x];
-
-trI[a_Plus] :=
- Map[tris, a];
-trI[] =
- 1;
-trI[ DiracGamma[5] ] =
- 0;
-trI[ DiracGamma[6] ] =
- 1/2;
-trI[ DiracGamma[7] ] =
- 1/2;
-
-trI[ a:DiracGamma[_[__]].. ,DiracGamma[n_] ] :=
- 0 /;(OddQ[Length[{a}]]&&(n==5 || n==6 || n==7));
-
-trI[ a:DiracGamma[_[__],___].. ,DiracGamma[n_] ] :=
- 0 /;(OddQ[Length[{a}]]&&(n==5 || n==6 || n==7)) && ($BreitMaison === False);
-
-trI[ d:DiracGamma[__].. ] :=
- 0/;(OddQ[Length[{d}]] && fr567[ d ]);
-
-trI[ d:DiracGamma[_[__],___].. ,DiracGamma[5] ] :=
- 0/;Length[{d}]<4;
-
-trI[x_] :=
- x /; FreeQ[ {x},DiracGamma ];
-
-trI[ DiracGamma[a_[b__],___],DiracGamma[c_[d__],___], DiracGamma[6] ] :=
- 1/2 ExpandScalarProduct[ a[b],c[d] ];
-
-trI[ DiracGamma[a_[b__],___],DiracGamma[c_[d__],___], DiracGamma[7] ] :=
- 1/2 ExpandScalarProduct[ a[b],c[d] ];
-
-trI[ x__] :=
- spursav[x]/;
- ( Length[{x}] < 11 && fr567[x]) || ( Length[{x}] < 6 && (!fr567[x]));
-
-(* #################################################################### *)
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Applying DiracTrick.", FCDoControl->dsVerbose];
+ tmp = DiracTrick[tmp, FCI -> True, InsideDiracTrace-> optInsideDiracTrace, FCJoinDOTs->False, ToDiracGamma67->optToDiracGamma67];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: DiracTrick done, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: After DiracTrick: ", tmp, FCDoControl->dsVerbose];
+ ];
+ (* Doing index contractions *)
+ If[ optContract=!=False && !DummyIndexFreeQ[tmp,{LorentzIndex,CartesianIndex}],
+ time2=AbsoluteTime[];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Applying Contract.", FCDoControl->dsVerbose];
+ tmp = Contract[tmp, EpsContract-> False];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Contract done, timing: ", N[AbsoluteTime[] - time2, 4] , FCDoControl->dsVerbose];
+
+ time2=AbsoluteTime[];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: Applying EpsContract.", FCDoControl->dsVerbose];
+ If[ optEpsContract,
+ tmp = EpsContract[tmp,FCI->True]
+ ];
+ FCPrint[2, "DiracSimplify: diracSimplifyEval: EpsContract done, timing: ", N[AbsoluteTime[] - time2, 4] , FCDoControl->dsVerbose];
+ FCPrint[3, "DiracSimplify: diracSimplifyEval: After EpsContract: ", tmp, FCDoControl->dsVerbose];
+ ];
-(* SpinorChainEvaluatedef *)
+ (* Expansion of the scalar products. *)
+ If[ optExpandScalarProduct && !FreeQ[tmp,Momentum],
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Expanding scalar products", FCDoControl->dsVerbose];
+ tmp = ExpandScalarProduct[tmp,FCI->False];
+ FCPrint[2,"DiracSimplify:diracSimplifyEvale: Done expanding the result, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose]
+ ];
-(* #################################################################### *)
-(* Main43 *)
-(* #################################################################### *)
+ (* Substituting the explicit values of Dirac sigma *)
+ If [ optDiracSigmaExplicit && !FreeQ[tmp,DiracSigma],
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Substituting the explicit values of the Dirac sigma.", FCDoControl->dsVerbose];
+ tmp = DiracSigmaExplicit[tmp,FCI->True]
+ ];
-spinlin[x_Plus] :=
- spinlin/@x;
-spinlin[a_] :=
- ((a/.DOT->ddot)//.{
- ddot[x___,z_ b__,c___] :> z ddot[x,b,c]/;NonCommFreeQ[z]===True,
- ddot[x___,z_ ,c___] :> z ddot[x,c]/;NonCommFreeQ[z]===True,
- ddot[x_Spinor,b___,c_Spinor,d_Spinor,e___,f_Spinor,g___]:> ddot[x,b,c] ddot[d,e,f,g]
- })/.ddot[]->1/.ddot->DOT;
+ (* Canonical ordering of the Dirac matrices. *)
+ If[ optDiracOrder,
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Applying DiracOrder.", FCDoControl->dsVerbose];
+ tmp = DiracOrder[tmp, FCI->True, FCJoinDOTs->OptionValue[Expanding]];
+ FCPrint[2,"DiracSimplify:diracSimplifyEvale: Done applying DiracOrder, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose]
+ ];
-(*SetAttributes[ SpinorChainEvaluate, Listable ];*)
-SpinorChainEvaluate[y_, OptionsPattern[]] :=
- y /; FreeQ[y,Spinor];
+ (* Expansion of Dirac slashes *)
+ (*
+ If[ optDiracGammaExpand,
+ FCPrint[1,"DiracSimplify: diracSimplifyEval: Expanding Dirac slashes.", FCDoControl->dsVerbose];
+ tmp = DiracGammaExpand[tmp,FCI->True];
-(* #################################################################### *)
-(* Main44 *)
-(* #################################################################### *)
+ ];*)
-SpinorChainEvaluate[z_Plus,opts:OptionsPattern[]] :=
- Block[ {nz,useSirlin},
- useSirlin = OptionValue[DiracSimplify,{opts},SirlinRelations];
- FCPrint[3,"DiracSimplify: SpinorChainEvaluate: Entering with ", z, FCDoControl->dsVerbose];
- nz = DotSimplify[z];
- If[ Length[nz]>20,
- nz = Collect2[ nz, Spinor,Factoring -> False]
- ];
- If[ Head[nz]=!=Plus,
- nz = SpinorChainEvaluate[nz,opts],
- If[ !useSirlin,
- nz = Map[ spcev0, nz ],
- If[ FreeQ[nz, DOT[Spinor[p1__], (a__ /; FreeQ[{a}, DiracGamma[_,_]]),
- Spinor[p2__]] DOT[Spinor[p3__],
- (b__ /; FreeQ[{b}, DiracGamma[_,_]]) , Spinor[p4__]]],
- nz = Map[ spcev0,nz ],
- (* added ,Spinor, Nov. 2003 , RM*)
- nz = sirlin00[ Expand[Map[ spcev0,z//sirlin0 ], Spinor] ]
- ]
- ]
- ];
- FCPrint[3,"DiracSimplify: SpinorChainEvaluate: Leaving with ", nz, FCDoControl->dsVerbose];
- nz
- ];
-SpinorChainEvaluate[x_,opts:OptionsPattern[]] :=
- Block[ {nz,useSirlin},
- useSirlin = OptionValue[DiracSimplify,{opts},SirlinRelations];
- FCPrint[3,"DiracSimplify: SpinorChainEvaluate: Entering with ", x, FCDoControl->dsVerbose];
- If[ !useSirlin,
- nz = Expand[spcev0[x],
- Spinor
- ],
- If[ FreeQ[x//DotSimplify,
- DOT[Spinor[p1__], (a__ /; FreeQ[{a}, DiracGamma[_,_]]),
- Spinor[p2__]] DOT[Spinor[p3__] ,
- (b__ /; FreeQ[{b}, DiracGamma[_,_]]) , Spinor[p4__]]],
- (* added ,Spinor, Nov. 2003 , RM*)
- nz = Expand[spcev0[x], Spinor],
- nz = sirlin00[ Expand[FixedPoint[spcev0, x//sirlin0, 3 ], Spinor]];
- ]
- ];
- FCPrint[3,"DiracSimplify: SpinorChainEvaluate: Leaving with ", FullForm[nz], FCDoControl->dsVerbose];
- nz
- ]/; !Head[x]===Plus && Head[x]=!=List;
-(* #################################################################### *)
-(* Main45 *)
-(* #################################################################### *)
-
-spcev0[x_] :=
- spcev000[x]/.spcev000->spcev0ev;
-(*
- spcev000[ a_ b_ ] := a spcev000[b] /; NonCommFreeQ[a] === True;
-*)
-spcev000[y_] :=
- y /; NonCommFreeQ[y] === True;
-spcev000[y_Times] :=
- Select[y, FreeQ[#, Spinor]& ] spcev0ev[Select[y,!FreeQ[#, Spinor]&]];
-
-spcev0ev[x_] :=
- ExpandScalarProduct[Contract[Expand[spinlin[x](*, Spinor*)]/.DOT->spcevs/.
- spcev->DOT, Expanding->False]](*//Expand*);
-
-spcevs[xx___] :=
- MemSet[ spcevs[xx], FixedPoint[ spcev,{xx},4 ] ];
-(*spcevsdef*)
-
-(*spcevdef*)
-spcev[y_List] :=
- spcev@@y;
-
-spcev[a___,b_ /; FreeQ2[b,{Pattern, BlankSequence, BlankNullSequence}],c___] :=
- b spcev[a,c] /; NonCommFreeQ[b] === True;
-
-(*added to allow nested structures like phi.(gamm1.gamm2+gamma3.gamma4).phi
-F.Orellana, 26/9-2002*)
-
-spcev[a__] :=
- DOT[a] /; FreeQ[{a}, Spinor];
-(**)
-spcev[] =
- 1;
-
-spcev[x___,Spinor[a__],y___] :=
- Expand[ DiracOrder[ DiracEquation[fEx[DiracGammaExpand[
- DOT[x,Spinor[a],y]]](*/.dR->DOT*)]]]/; FreeQ[{x,y},Spinor];
-
-spcev[x___,Spinor[a__],b___,Spinor[c__],y___] :=
- Block[ {spcevdi,spcevre,spcevj},
- FCPrint[2,"entering spcev with ", InputForm[DOT@@{x,Spinor[a],b,Spinor[c],y}]];
- spcevdi = diracSimplify[DOT[Spinor[a],b,Spinor[c]], InsideDiracTrace->False,
- DiracCanonical->False, Factoring->False, DiracSimpCombine->True];
- spcevdi = Expand[ExpandScalarProduct[spcevdi]];
- spcevdi = Expand[spcevdi];
- If[ !(Head[spcevdi]===Plus),
- spcevre = spinlin[ spcevdi ];
- spcevre = DiracEquation[ spcevre ];,
- spcevre = Sum[DiracEquation[ spinlin[ spcevdi[[spcevj]] ] ],
- {spcevj,1,Length[spcevdi]}];
- ];
- spcevre = DotSimplify[DOT[spcevs[x],spcevre,spcevs[y]]];
- If[ !FreeQ[spcevre, SUNT],
- spcevre = (spcevre/.DOT->dS)
+ (* Substituting the explicit values of the chiral projectors *)
+ If[ optDiracSubstitute67 && !FreeQ2[tmp,{DiracGamma[6],DiracGamma[7]}],
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Substituting the explicit values of the chiral projectors.", FCDoControl->dsVerbose];
+ tmp = DiracSubstitute67[tmp, FCI->True]
];
- spcevre = spcevre//DotSimplify;
- FCPrint[2,"exiting spcev with ",InputForm[spcevre]];
- spcevre
- ] /; FreeQ[{b}, Spinor];
-
-(* Reference of Sirlin-relations: Nuclear Physics B192 (1981) 93-99;
- Note that we take another sign in front of the Levi-Civita tensor
- in eq. (7), since we take (implicitly) \varepsilon^{0123} = 1
-*)
-(* #################################################################### *)
-(* Main441 *)
-(* #################################################################### *)
-
-$SpinorMinimal = False;
-
-sirlin00[x_] :=
- x/;$SpinorMinimal === False;
-
-sirlin00[x_] :=
- MemSet[sirlin00[x],
- Block[ {te, tg5, ntg5, test},
- FCPrint[3,"sirlin001"];
- (* te = sirlin0[x]//ExpandAll; *)
- te = sirlin0[x]//Expand;
- FCPrint[3,"sirlin002"];
- If[ FreeQ2[te,{DiracGamma[6],DiracGamma[7]}]&&
- Head[te]===Plus && !FreeQ[te,DiracGamma[5]],
- tg5 = Select[te, !FreeQ[#,DiracGamma[5]]& ];
- ntg5 = te - tg5;
-(*i.e. te = tg5 + ntg5 *)
- test = Expand[tg5 + ChisholmSpinor[ntg5], Spinor];
- If[ nterms[test] < Length[te],
- te = test
- ]
- ];
- FCPrint[3,"exiting sirlin00"];
- te
- ]
- ]/; $SpinorMinimal === True;
-
-ident3[a_,_] :=
- a;
-
-(* #################################################################### *)
-(* Main442 *)
-(* #################################################################### *)
-(* canonize different dummy indices *) (*sirlin3def*)
-sirlin3a[x_] :=
- ((sirlin3[Expand[Contract[x](*,Spinor*)]/.
- $MU->dum$y]/.dum$y->$MU)/. sirlin3 -> Identity)//Contract;
-
-sirlin3[a_Plus] :=
- sirlin3 /@ a;
-
-sirlin3[ m_. DOT[Spinor[p1__] , (ga1___) , DiracGamma[ LorentzIndex[la_] ] , (ga2___),
-Spinor[p2__]] DOT[Spinor[p3__], (ga3___) , DiracGamma[ LorentzIndex[la_] ], (ga4___),
-Spinor[p4__]]] :=
- Block[ {counter},
- counter = 1;
- While[!FreeQ2[{m,ga1,ga2,ga3,ga4}, {$MU[counter], dum$y[counter]}],
- counter = counter + 1
+ (* Rewriting DiracGamma[5] in terms of the chiral projectors *)
+ If[ optDiracSubstitute5 && !FreeQ[tmp,DiracGamma[5]],
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Rewriting DiracGamma[5] in terms of the chiral projectors.", FCDoControl->dsVerbose];
+ tmp = DiracSubstitute5[tmp, FCI->True]
];
- sirlin3[m DOT[Spinor[p1], ga1, DiracGamma[ LorentzIndex[$MU[counter]]],
- ga2, Spinor[p2]] DOT[Spinor[p3] , ga3 , DiracGamma[ LorentzIndex[$MU[counter]]],
- ga4, Spinor[p4]]]
- ]/; FreeQ[la, $MU];
-sirlin3[ m_. DOT[Spinor[p1__],(ga1___), DiracGamma[ LorentzIndex[la_,di_],di_ ], (ga2___),
-Spinor[p2__]] DOT[Spinor[p3__],(ga3___), DiracGamma[ LorentzIndex[la_,di_],di_ ], (ga4___),
-Spinor[p4__]]] :=
- (m DOT[Spinor[p1], ga1, DiracGamma[ LorentzIndex[$MU[1], di],di ], ga2,
- Spinor[p2]] DOT[Spinor[p3], ga3, DiracGamma[LorentzIndex[$MU[1], di], di], ga4,
- Spinor[p4]])/; FreeQ2[{ga1,ga2,ga3,ga4}, DiracGamma[_,_]];
+ If[ optExpanding && (!optDiracGammaCombine || optDiracSubstitute67),
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Applying Dotsimplify.", FCDoControl->dsVerbose];
+ tmp = DotSimplify[tmp, FCI->True, Expanding -> True];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Dotsimplify done, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: After Dotsimplify: ", tmp, FCDoControl->dsVerbose];
+ ];
-(* #################################################################### *)
-(* Main443 *)
-(* #################################################################### *)
-(* The Sirlin - identities are only valid in 4 dimensions and are
-only needed, if Dirac matrices are around
-*)
-sirlin0[x_] :=
- If[ FreeQ2[x, {LorentzIndex, Momentum}],
- x,
- If[ FreeQ[x, Spinor],
- x,
- If[ !FreeQ[x, DiracGamma[_,_]],
- sirlin3[x]/.sirlin3->Identity,
- sirlin0doit[(x//sirlin2)/.sirlin2->Identity]
- ]
- ]
- ];
+ (* Dirac equation *)
+ If[ !FreeQ[tmp,Spinor] && optDiracEquation,
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Applying DiracEquation.", FCDoControl->dsVerbose];
+ tmp = DiracEquation[tmp, FCI->True];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: DiracEquation done, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose];
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: After DiracEquation: ", tmp, FCDoControl->dsVerbose];
+ ];
-$sirlintime = 242;
-
-SetAttributes[timeconstrained, HoldAll];
-
-If[ $OperatingSystem === "Unix",
- timeconstrained[x__] :=
- TimeConstrained[x],
- timeconstrained[x_,__] :=
- x
-];
-
-sirlin0doit[a_Plus] :=
- timeconstrained[sirlin3a[Contract[
- (Expand[Map[sirlin1, a](*, DOT*)]/.
- sirlin1->sirlin2) /.
- sirlin2 -> sirlin1/.sirlin1->sirlin2/.
- sirlin2 -> Identity,EpsContract->True]] // spcev0,
- 2 $sirlintime, a];
-
-sirlin0doit[a_] :=
- timeconstrained[(sirlin3a[sirlin1[a]/.sirlin1->sirlin2/.
- sirlin2 -> Identity] // spcev0), $sirlintime, a] /;Head[a]=!=Plus;
-
-sirlin2[a_Plus] :=
- sirlin2/@a;
-
-
-sirlin2[m_. DOT[
- Spinor[pa__],
- DiracGamma[Momentum[pj_]],
- DiracGamma[Momentum[pi_]],
- DiracGamma[LorentzIndex[mu_]],
- (vg5___),
- Spinor[pb__]
- ] *
- DOT[
- Spinor[Momentum[pi_],0,qf___] ,
- DiracGamma[LorentzIndex[mu_]] ,
- (vg5___),
- Spinor[Momentum[pj_],0,qf___]
- ]
-] :=
- (-sirlin2[m DOT[
- Spinor[pa] ,
- DiracSlash[pi,pj],
- DiracMatrix[mu],
- vg5 ,
- Spinor[pb]
- ] *
- DOT[
- Spinor[Momentum[pi],0,qf] ,
- DiracMatrix[mu], vg5 ,
- Spinor[Momentum[pj],0,qf]
- ]] +
- 2 m ExpandScalarProduct[Momentum[pi],Momentum[pj]] *
- DOT[
- Spinor[pa],
- DiracMatrix[mu],
- vg5 ,
- Spinor[pb]] *
- DOT[
- Spinor[Momentum[pi],0,qf] ,
- DiracMatrix[mu] , vg5 ,
- Spinor[Momentum[pj],0,qf]])/;
- ({vg5}==={}) || ({vg5}==={DiracGamma[5]});
-
-sirlin22[m_. DOT[
- Spinor[pa__],
- DiracGamma[Momentum[pj_]],
- DiracGamma[Momentum[pi_]],
- DiracGamma[LorentzIndex[mu_]],
- (vg5___),
- Spinor[pb__]] *
- DOT[
- Spinor[Momentum[pi_],0,qf___],
- DiracGamma[LorentzIndex[mu_]],
- (vg5___),
- Spinor[Momentum[pj_],0,qf___]
- ]
-] :=
- (-sirlin2[m DOT[
- Spinor[pa],
- DiracSlash[pi,pj],
- DiracMatrix[mu],
- vg5,
- Spinor[pb]] *
- DOT[
- Spinor[Momentum[pi],0,qf] ,
- DiracMatrix[mu] , vg5 ,
- Spinor[Momentum[pj],0,qf]]] +
- 2 m ExpandScalarProduct[Momentum[pi],Momentum[pj]] *
- DOT[
- Spinor[pa] ,
- DiracMatrix[mu] ,
- vg5,
- Spinor[pb]] *
- DOT[
- Spinor[Momentum[pi],0,qf] ,
- DiracMatrix[mu],
- vg5,
- Spinor[Momentum[pj],0,qf]
- ])/; ({vg5}==={}) || ({vg5}==={DiracGamma[5]});
-
-
-sirlin2[m_. DOT[
- Spinor[pa__] ,
- DiracGamma[Momentum[pi_]] ,
- DiracGamma[Momentum[pj_]] ,
- DiracGamma[LorentzIndex[mu_]],
- (vg5___),
- Spinor[pb__]] *
- DOT[
- Spinor[Momentum[pi_],0,qf___],
- DiracGamma[LorentzIndex[mu_]],
- (vg5___),
- Spinor[Momentum[pj_],0,qf___]
- ]] :=
- (m ExpandScalarProduct[Momentum[pi], Momentum[pj]] *
- DOT[
- Spinor[pa],
- DiracMatrix[$MU[1]],
- Spinor[pb]] *
- DOT[
- Spinor[Momentum[pi],0,qf],
- DiracMatrix[$MU[1]] ,
- Spinor[Momentum[pj],0,qf]
- ] + m ExpandScalarProduct[Momentum[pi], Momentum[pj]] *
- DOT[
- Spinor[pa] ,
- DiracMatrix[$MU[1]],
- DiracGamma[5],
- Spinor[pb]] *
- DOT[
- Spinor[Momentum[pi],0,qf] ,
- DiracMatrix[$MU[1]],
- DiracGamma[5],
- Spinor[Momentum[pj],0,qf]
- ]) /; ({vg5}==={}) || ({vg5}==={DiracGamma[5]});
-
-
-sirlin2[m_. DOT[
- Spinor[p1__],
- (ga1___) ,
- DiracGamma[ LorentzIndex[la_] ],
- DiracGamma[ LorentzIndex[nu_] ],
- DiracGamma[6] ,
- Spinor[p2__]] *
- DOT[
- Spinor[p3__],
- (ga2___) ,
- DiracGamma[ LorentzIndex[la_] ],
- DiracGamma[ LorentzIndex[nu_] ],
- DiracGamma[7] ,
- Spinor[p4__]]] :=
- (m 4 DOT[Spinor[p1] , ga1 , DiracGamma[6] , Spinor[p2] *
- Spinor[p3] , ga2 , DiracGamma[7] , Spinor[p4]]);
-
-sirlin2[m_. DOT[
- Spinor[p1__],
- (ga1___) ,
- DiracGamma[ LorentzIndex[la_] ],
- DiracGamma[ LorentzIndex[nu_] ],
- DiracGamma[7] ,
- Spinor[p2__]] *
- DOT[
- Spinor[p3__],
- (ga2___) ,
- DiracGamma[ LorentzIndex[la_] ],
- DiracGamma[ LorentzIndex[nu_] ],
- DiracGamma[6] ,
- Spinor[p4__]]] :=
- (
- m 4 DOT[Spinor[p1] , ga1 , DiracGamma[7] , Spinor[p2] *
- Spinor[p3] , ga2 , DiracGamma[6] , Spinor[p4]] );
-(* #################################################################### *)
-(* Main444 *)
-(* #################################################################### *)
-
-
-(* eq. (8) *)
-sirlin2[m_. DOT[
- Spinor[p1__], (ga1___) ,
- DiracGamma[ LorentzIndex[mu_] ],
- DiracGamma[ lv_[rho_] ] ,
- DiracGamma[ LorentzIndex[nu_] ], (ga2___) ,
- Spinor[p2__]] *
- DOT[
- Spinor[p3__], (ga3___) ,
- DiracGamma[ LorentzIndex[mu_] ],
- DiracGamma[ lvt_[tau_] ] ,
- DiracGamma[ LorentzIndex[nu_] ], (ga4___) ,
- Spinor[p4__]]
-] :=
- Block[ {ii = 1, ind, la, grho, gtau, gam5},
- While[!FreeQ[{ga1,rho,ga2,ga3,tau,ga4},
- $MU[ii]],
- ii++
+ (* Covariant normalization of ubar.u or vbar.v (as in Peskin and Schroeder).
+ The combinations ubar.v and vbar.u are orthogonal and hence vanish *)
+ If[ !FreeQ[tmp,Spinor],
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: Applying spinor normalization on ", tmp, FCDoControl->dsVerbose];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Spinor normalization done, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose];
+ tmp = tmp/. DOT->holdDOT //.
+ { holdDOT[Spinor[s_. Momentum[p__],m_, 1],Spinor[s_. Momentum[p__],m_, 1]] -> s 2 m,
+ holdDOT[Spinor[- Momentum[p__],m_, 1],Spinor[Momentum[p__],m_, 1]] -> 0,
+ holdDOT[Spinor[Momentum[p__],m_, 1],Spinor[- Momentum[p__],m_, 1]] -> 0} /.
+ holdDOT -> DOT;
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: After spinor normalization: ", tmp, FCDoControl->dsVerbose];
];
- la = DiracGamma[LorentzIndex[$MU[ii]]];
- grho = DiracGamma[lv[rho]];
- gtau = DiracGamma[lvt[tau]];
- gam5 = DiracGamma[5];
- Contract[
- 2 m Pair[lv[rho], lvt[tau]] *
- DOT[Spinor[p1] , ga1 , la , ga2 , Spinor[p2]] *
- DOT[Spinor[p3] , ga3 , la , ga4 , Spinor[p4]] +
- 2 m *
- DOT[Spinor[p1] , ga1 , gtau , ga2 , Spinor[p2]] *
- DOT[Spinor[p3] , ga3 , grho , ga4 , Spinor[p4]] +
- 2 m Pair[lv[rho], lvt[tau]] *
- DOT[Spinor[p1] , ga1 , la , ga2 , gam5 , Spinor[p2]] *
- DOT[Spinor[p3] , ga3 , la , ga4 , gam5 , Spinor[p4]] -
- 2 m *
- DOT[Spinor[p1] , ga1 , gtau , ga2 , gam5 , Spinor[p2]] *
- DOT[Spinor[p3] , ga3 , grho , ga4 , gam5 , Spinor[p4]]
- ]
- ];
-(* eq. (12) of Sirlin *)
-
-sirlin2[m_. DOT[
- Spinor[p1__],
- DiracGamma[LorentzIndex[mu_]],
- DiracGamma[lv_[rho_] ] ,
- DiracGamma[LorentzIndex[sigma_]],
- DiracGamma[lvt_[tau_]],
- DiracGamma[LorentzIndex[nu_]],
- om_ ,
- Spinor[p2__]] *
- DOT[Spinor[p3__],
- DiracGamma[LorentzIndex[mu_]],
- DiracGamma[lva_[alpha_] ] ,
- DiracGamma[LorentzIndex[sigma_]],
- DiracGamma[lvb_[beta_]],
- DiracGamma[ LorentzIndex[nu_]],
- om_ ,
- Spinor[p4__]]
-] :=
- Contract[ m 16 Pair[lvt[tau],lvb[beta]] Pair[lv[rho], lva[alpha]] *
- DOT[
- Spinor[p1],
- DiracMatrix[mu],
- om,
- Spinor[p2]] *
- DOT[
- Spinor[p3],
- DiracMatrix[mu],
- om ,
- Spinor[p4]]
- ]/; (om===DiracGamma[6]) || (om===DiracGamma[7]);
-
-(* eq. (13) of Sirlin *)
-sirlin2[m_. DOT[
- Spinor[p1__],
- DiracGamma[LorentzIndex[mu_]],
- DiracGamma[lv_[rho_] ] ,
- DiracGamma[LorentzIndex[sigma_]],
- DiracGamma[lvt_[tau_] ],
- DiracGamma[LorentzIndex[nu_]],
- om1_ ,
- Spinor[p2__]] *
- DOT[
- Spinor[p3__],
- DiracGamma[LorentzIndex[mu_]],
- DiracGamma[lva_[alpha_] ] ,
- DiracGamma[LorentzIndex[sigma_]],
- DiracGamma[lvb_[beta_] ],
- DiracGamma[LorentzIndex[nu_]], om2_ ,
- Spinor[p4__]]
-] :=
- (m 4 DOT[
- Spinor[p1],
- DiracMatrix[mu],
- DiracGamma[lv[rho]],
- DiracGamma[lvb[beta]],
- om1 ,
- Spinor[p2]] *
- DOT[
- Spinor[p3],
- DiracMatrix[mu],
- DiracGamma[lva[alpha]],
- DiracGamma[lvt[tau]],
- om2,
- Spinor[p4]]) /; ( (om1===DiracGamma[6])&& (om2===DiracGamma[7]) )||
- ((om1===DiracGamma[7])&& (om2===DiracGamma[6]) );
-(* #################################################################### *)
-(* Main445 *)
-(* #################################################################### *)
-
-
-(* in case if no chiral projectors are present: *)
-sirlin2[m_. DOT[
- Spinor[p1__],
- DiracGamma[LorentzIndex[mu_]],
- DiracGamma[lv_[rho_] ] ,
- DiracGamma[LorentzIndex[sigma_]],
- DiracGamma[lvt_[tau_] ],
- DiracGamma[LorentzIndex[nu_]],
- Spinor[p2__]] *
- DOT[
- Spinor[p3__],
- DiracGamma[ LorentzIndex[mu_] ],
- DiracGamma[ lva_[alpha_] ] ,
- DiracGamma[ LorentzIndex[sigma_] ],
- DiracGamma[ lvb_[beta_] ],
- DiracGamma[ LorentzIndex[nu_] ],
- Spinor[p4__]]
-] :=
- Block[ {tmp,re},
- tmp[ome1_,ome2_] :=
- sirlin2[m DOT[
- Spinor[p1],
- DiracMatrix[mu],
- DiracGamma[lv[rho]],
- DiracMatrix[sigma],
- DiracGamma[lvt[tau]],
- DiracMatrix[nu],
- DiracGamma[ome1],
- Spinor[p2]] *
- DOT[
- Spinor[p3],
- DiracMatrix[mu],
- DiracGamma[lva[alpha]],
- DiracMatrix[sigma],
- DiracGamma[lvb[beta]],
- DiracMatrix[nu],
- DiracGamma[ome2],
- Spinor[p4]]];
- re = tmp[6,6] + tmp[6,7] + tmp[7,6] + tmp[7,7];
- re
- ];
+ (* Factoring *)
+ If[ optFactoring=!=False,
+ time2=AbsoluteTime[];
+ FCPrint[2,"DiracSimplify: diracSimplifyEval: Factoring the result.", FCDoControl->dsVerbose];
+ tmp = optFactoring[tmp];
+ FCPrint[2,"DiracSimplify:diracSimplifyEvale: Done factoring, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->dsVerbose]
+ ];
-(* #################################################################### *)
-(* Main446 *)
-(* #################################################################### *)
-
-(* These are the ones calculated by FeynCalc *)
-
-sirlin2[m_. DOT[
- Spinor[pi__] ,
- x1___ ,
- DiracGamma[ LorentzIndex[mu_] ] ,
- DiracGamma[ LorentzIndex[nu_] ] ,
- x2___ ,
- Spinor[pj__]] *
- DOT[
- Spinor[pk__] ,
- x3___ ,
- DiracGamma[ vm_[a_] ] ,
- DiracGamma[ LorentzIndex[mu_] ] ,
- DiracGamma[ LorentzIndex[nu_] ] ,
- x4___ ,
- Spinor[pl__]
- ]
-] :=
- Contract[ m (2 DOT[
- Spinor[pi],
- x1,
- x2,
- Spinor[pj]
- ]*
- DOT[
- Spinor[pk],
- x3 ,
- DiracGamma[vm[a]],
- x4,
- Spinor[pl]
- ] +
- 2 DOT[
- Spinor[pk],
- x3,
- DiracGamma[LorentzIndex[al$mu]],
- x4,
- Spinor[pl]
- ]*
- DOT[
- Spinor[pi],
- x1,
- DiracGamma[vm[a]],
- DiracGamma[LorentzIndex[al$mu]],
- x2,
- Spinor[pj]
- ] - 2 *
- DOT[
- Spinor[pi],
- x1,
- DiracGamma[5],
- x2,
- Spinor[pj]
- ]*
- DOT[
- Spinor[pk] ,
- x3 ,
- DiracGamma[vm[a]],
- DiracGamma[5],
- x4,
- Spinor[pl]
- ] + 2*
- DOT[
- Spinor[pk],
- x3,
- DiracGamma[LorentzIndex[al$mu]] ,
- DiracGamma[5],
- x4,
- Spinor[pl]]*
- DOT[
- Spinor[pi],
- x1,
- DiracGamma[vm[a]] ,
- DiracGamma[LorentzIndex[al$mu]],
- DiracGamma[5] ,
- x2,
- Spinor[pj]
- ])
- ];
+ res = tmp;
-sirlin2[m_. DOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], Spinor[Momentum[pj_], 0, fq___]]*
- DOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pj_]], Spinor[Momentum[pk_], 0, fq___]]] :=
- Contract[m (-(( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pl]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pi]], Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pj], Momentum[pk]])/Pair[Momentum[pi], Momentum[pl]]) +
- ( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5] , Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5] , Spinor[Momentum[pk], 0, fq]]*
- (-(Pair[Momentum[pi], Momentum[pl]]*Pair[Momentum[pj], Momentum[pk]]) + Pair[Momentum[pi], Momentum[pk]]*
- Pair[Momentum[pj], Momentum[pl]] - Pair[Momentum[pi], Momentum[pj]]*Pair[Momentum[pk], Momentum[pl]]))/
- (2 Pair[Momentum[pi], Momentum[pl]]) +
- ( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pk], 0, fq]]*
- (3 Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]] + Pair[Momentum[pi], Momentum[pk]]*
- Pair[Momentum[pj], Momentum[pl]] - Pair[Momentum[pi], Momentum[pj]]*Pair[Momentum[pk], Momentum[pl]]))/
- (2 Pair[Momentum[pi], Momentum[pl]])
- )];
-
-sirlin2[m_. DOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], Spinor[Momentum[pj_], 0, fq___]]*
- DOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pi_]], Spinor[Momentum[pk_], 0, fq___]]] :=
- Contract[m (-(( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pl]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pj]], Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pi], Momentum[pk]])/ Pair[Momentum[pj], Momentum[pl]]) +
- ( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pk], 0, fq]]*
- (Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]] + 3 Pair[Momentum[pi], Momentum[pk]]*
- Pair[Momentum[pj], Momentum[pl]] - Pair[Momentum[pi], Momentum[pj]]*Pair[Momentum[pk], Momentum[pl]]))/
- (2 Pair[Momentum[pj], Momentum[pl]]) +
- ( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5] , Spinor[Momentum[pk], 0, fq]]*
- (-(Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]]) +
- Pair[Momentum[pi], Momentum[pk]]*Pair[Momentum[pj], Momentum[pl]] + Pair[Momentum[pi], Momentum[pj]]*
- Pair[Momentum[pk], Momentum[pl]]))/(2*Pair[Momentum[pj], Momentum[pl]]))] /;
- First[ DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pi]] , Spinor[Momentum[pk], 0, fq]]]===
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]];
-
-sirlin2[ m_. DOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], DiracGamma[5], Spinor[Momentum[pj_], 0, fq___]]*
- DOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pj_]], DiracGamma[5], Spinor[Momentum[pk_], 0, fq___]]] :=
- Contract[ m(DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pj]], Spinor[Momentum[pk], 0, fq]] -
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pj], Momentum[pk]] +
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5], Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pj], Momentum[pk]])];
-
-sirlin2[m_. DOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], DiracGamma[5], Spinor[Momentum[pj_], 0, fq___]]*
- DOT[Spinor[Momentum[pl_], 0,fq___], DiracGamma[Momentum[pi_]], DiracGamma[5], Spinor[Momentum[pk_], 0, fq___]]] :=
- Contract[ m (-( DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pi]], Spinor[Momentum[pk], 0, fq]]) +
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pi], Momentum[pk]] +
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5] , Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], DiracGamma[5] , Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pi], Momentum[pk]])
- ];
+ FCPrint[3,"DiracSimplify: diracSimplifyEval: Leaving with: ", res, FCDoControl->dsVerbose];
-sirlin2[m_. DOT[Spinor[Momentum[pi_], 0, fq___], DiracGamma[Momentum[pl_]], DiracGamma[5], Spinor[Momentum[pj_], 0, fq___]]*
- DOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pj_]], DiracGamma[5], Spinor[Momentum[pk_], 0, fq___]]] :=
- Contract[ m (-(
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pl]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pj]], Spinor[Momentum[pk], 0, fq]]) +
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]], Spinor[Momentum[pk], 0, fq]]*
- Pair[Momentum[pj], Momentum[pl]] +
- DOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[la]] ,
- DiracGamma[5] , Spinor[Momentum[pj], 0, fq]]*
- DOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[la]] ,
- DiracGamma[5] , Spinor[Momentum[pk], 0, fq]]* Pair[Momentum[pj], Momentum[pl]])];
-
-(* #################################################################### *)
-(* Main447 *)
-(* #################################################################### *)
-
-dig[LorentzIndex[a_,___]] :=
- a;
-dig[Momentum[a_,___]] :=
- a;
-dig[x_] :=
- x/;(Head[x]=!=LorentzIndex)&&(Head[x]=!=Momentum);
-dig[_?NumberQ] :=
- {};
-getV[x_List] :=
- Select[Flatten[{x}/.DOT->List]/.DiracGamma -> dige, Head[#]===dige&]/.dige->dig;
-
-(* Get a list of equal gamma matrices *)
-schnitt[x___][y___] :=
- Intersection[
- Select[Flatten[{x}/.DOT->List],!FreeQ[#,LorentzIndex]&],
- Select[Flatten[{y}/.DOT->List],!FreeQ[#,LorentzIndex]&]
- ];
+ res
-(* get a list of not equal slashes and matrices *)
-comp[x___][y___] :=
- Select[Complement[Flatten[Union[{x},{y}]/.DOT->List],
- schnitt[x][y] ],
- !FreeQ2[#, {LorentzIndex, Momentum}]&];
-
-(* sirlin1def *)
-(* do some ordering with sirlin1 ... *)
-sirlin1[m_. DOT[Spinor[p1__], (gam1__) , Spinor[p2__]] DOT[Spinor[p3__], (gam2__) , Spinor[p4__]]] :=
- MemSet[sirlin1[m DOT[Spinor[p1],gam1,Spinor[p2]] DOT[Spinor[p3],gam2,Spinor[p4]]],
- Block[ {schnittmenge, compmenge, result,order, orderl,orderr, leftind, rightind},
- schnittmenge = schnitt[gam1][gam2];
- compmenge = comp[gam1][gam2];
- leftind = comp[gam1][schnittmenge];
- rightind = comp[gam2][schnittmenge];
- FCPrint[3,"entering sirlin1"];
- (* We need at least two dummy indices for the sirlin relations *)
- If[ Length[schnittmenge] > 1,
- (* Test for eq. (12) *)
- If[ (Length[schnittmenge] === 3) && (Length[compmenge] > 3),
- orderl = Join[ Drop[leftind, {1,2}], {schnittmenge[[1]],
- leftind[[1]], schnittmenge[[2]],
- leftind[[2]], schnittmenge[[3]]}] // getV;
- orderr = Join[ Drop[rightind, {1,2}], {schnittmenge[[1]],
- rightind[[1]], schnittmenge[[2]],
- rightind[[2]], schnittmenge[[3]]}] // getV;
- result =
- Expand[m Contract[
- DiracOrder[ DOT[Spinor[p1],gam1,Spinor[p2]], orderl ]*
- DiracOrder[ DOT[Spinor[p3],gam2,Spinor[p4]], orderr ] ]
- ]//sirlin2
- ];
- (* ... *)
- (* Test for eq. (8) *)
- If[ (Length[schnittmenge] === 2) && (Length[compmenge] > 1),
- order = Join[{First[schnittmenge]}, compmenge,
- {Last[schnittmenge]} ] // getV;
- result = sirlin2[ Expand[ m DiracOrder[
- DOT[Spinor[p1],gam1,Spinor[p2]] *
- DOT[Spinor[p3],gam2,Spinor[p4]], order]]//Contract]
- ];
- ];
- If[ !ValueQ[result],
- result = sirlin2[m *
- DOT[Spinor[p1],gam1,Spinor[p2]] *
- DOT[Spinor[p3],gam2,Spinor[p4]]]
- ];
- FCPrint[3,"exiting sirlin1"];
- result
- ]
- ] /; !FreeQ[{gam1}, LorentzIndex];
-
-
-(*ChisholmSpinordef*)
-dsimp[x_] :=
- sirlin0[spcev0[x]];
-ChisholmSpinor[x_, choice_:0] :=
- MemSet[ChisholmSpinor[x,choice],
- Block[ {new = x, indi},
- FCPrint[3,"entering ChisholmSpinor "];
- new = DotSimplify[new];
- If[ choice===1,
- new = new/.{ DOT[Spinor[a__],b__ ,Spinor[c__]] *
- DOT[Spinor[d__],e__ ,Spinor[f__]]:>
- DOT[nospinor[a],b,nospinor[c]] *
- DOT[Spinor[d],e,Spinor[f]]}
- ];
- If[ choice===2,
- new = new/.{ DOT[Spinor[a__],b__ ,Spinor[c__]] *
- DOT[Spinor[d__],e__ ,Spinor[f__]]:>
- DOT[Spinor[a],b,Spinor[c]] *
- DOT[nospinor[d],e,nospinor[f]]}
- ];
- dsimp[Contract[dsimp[new/.{(DOT[Spinor[pe1_, m_, ql___],
- DiracGamma[lv_[k_]] , h___ , Spinor[pe2_, m2_, ql___]]) :>
- Block[ {indi},
- indi = Unique["alpha"];
- -1/Pair[pe1,pe2] ( DOT[Spinor[pe1, m, ql], DiracGamma[pe1],
- DiracGamma[lv[k]] , DiracGamma[pe2],h,
- Spinor[pe2, m2, ql]] -
- Pair[pe1,lv[k]] DOT[Spinor[pe1, m, ql],
- DiracGamma[pe2], h , Spinor[pe2, m2, ql]] -
- Pair[lv[k],pe2] DOT[Spinor[pe1, m, ql],
- DiracGamma[pe1] , h , Spinor[pe2, m2, ql]]-
- I Eps[pe1,lv[k],pe2,LorentzIndex[indi]] *
- DOT[Spinor[pe1, m, ql],
- DiracGamma[LorentzIndex[indi]],
- DiracGamma[5],h,
- Spinor[pe2, m2, ql]]
- )
- ]}/.nospinor->Spinor], EpsContract->True]
- ]
- ]
- ];
+ ]/;Head[expr]=!=DiracChain;
FCPrint[1,"DiracSimplify.m loaded."];
End[]
diff --git a/FeynCalc/Dirac/DiracSubstitute5.m b/FeynCalc/Dirac/DiracSubstitute5.m
new file mode 100644
index 000000000..94f6fde3c
--- /dev/null
+++ b/FeynCalc/Dirac/DiracSubstitute5.m
@@ -0,0 +1,69 @@
+(* ::Package:: *)
+
+
+(* :Title: DiracSubstitute5 *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Substitutes DiracGamma[6] and DiracGamma[7] in terms of
+ DiracGamma[5] *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracSubstitute5::usage =
+"DiracSubstitute5[exp] rewrites DiracGamma[5] in exp in terms of \
+the chirality projectors DiracGamma[6] and DiracGamma[7]. \
+DiracSubstitute5 is also an option of various FeynCalc functions \
+that handle Dirac algebra.";
+
+DiracSubstitute5::failmsg =
+"Error! DiracSubstitute5 has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracSubstitute5`Private`"];
+
+Options[DiracSubstitute5] = {
+ FCE -> False,
+ FCI -> False
+};
+
+DiracSubstitute5[expr_, OptionsPattern[]] :=
+ Block[{ex, res, holdDOT},
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ2[ex, {DiracGamma[5]}],
+ Return[ex]
+ ];
+
+ res = ex /. DiracGamma[5] :> DiracGamma[6]-DiracGamma[7];
+
+
+ If[ !FreeQ2[res,{DiracGamma[5]}],
+ Message[DiracSubstitute5::failmsg,"Failed to eliminate all occurences of DiracGamma[5]."];
+ Abort[]
+ ];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+
+ ];
+
+FCPrint[1,"DiracSubstitute5.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/DiracSubstitute67.m b/FeynCalc/Dirac/DiracSubstitute67.m
new file mode 100644
index 000000000..15469cb3b
--- /dev/null
+++ b/FeynCalc/Dirac/DiracSubstitute67.m
@@ -0,0 +1,72 @@
+(* ::Package:: *)
+
+
+(* :Title: DiracSubstitute67 *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Substitutes DiracGamma[6] and DiracGamma[7] in terms of
+ DiracGamma[5] *)
+
+(* ------------------------------------------------------------------------ *)
+
+DiracSubstitute67::usage =
+"DiracSubstitute67[exp] inserts the explicit definitions of \
+the chirality projectors DiracGamma[6] and DiracGamma[7]. \
+DiracSubstitute67 is also an option of various FeynCalc functions \
+that handle Dirac algebra.";
+
+DiracSubstitute67::failmsg =
+"Error! DiracSubstitute67 has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`DiracSubstitute67`Private`"];
+
+Options[DiracSubstitute67] = {
+ FCE -> False,
+ FCI -> False
+};
+
+DiracSubstitute67[expr_, OptionsPattern[]] :=
+ Block[{ex, res, holdDOT},
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ2[ex, {DiracGamma[6],DiracGamma[7]}],
+ Return[ex]
+ ];
+
+ res = ex /. {
+ DiracGamma[6] :> (1/2 + DiracGamma[5]/2),
+ DiracGamma[7] :> (1/2 - DiracGamma[5]/2)
+ };
+
+
+ If[ !FreeQ2[res,{DiracGamma[6],DiracGamma[7]}],
+ Message[DiracSubstitute67::failmsg,"Failed to eliminate all occurences of chirality projectors."];
+ Abort[]
+ ];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ res
+
+ ];
+
+FCPrint[1,"DiracSubstitute67.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/DiracTrace.m b/FeynCalc/Dirac/DiracTrace.m
index 95c922574..41ca4c04c 100755
--- a/FeynCalc/Dirac/DiracTrace.m
+++ b/FeynCalc/Dirac/DiracTrace.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Dirac trace calculation *)
@@ -17,37 +17,23 @@
DiracTrace::usage =
-"DiracTrace[expr] is the head of Dirac traces. \
-Whether the trace is evaluated depends on the option \
-DiracTraceEvaluate. See also TR. \
-The argument expr may be a product of Dirac matrices or slashes \
-separated by the Mathematica Dot \".\" (assuming DOT has been set to Dot).
-The option Factoring determines the final function to be applied. If \
-it is set to False no simplification is done. \
-It might be set to, e.g., Factor or Factor2 to get simpler results. \
-With the default setting Factoring -> Automatic factorization is performed on \
-not too long (LeafCount[ ] < 5000 ) expressions.
-";
-
-DiracTrace::noncom =
-"Wrong syntax! The Dirac trace of `1` contains Dirac matrices multiplied via \
-Times (commutative multiplication) instead of DOT (non-commutative multiplication). \
-Evaluation aborted!";
-
-DiracTrace::ndranomaly =
-"You are using naive dimensional regularization (NDR), such that in D dimensions \
-gamma^5 anticommutes with all other Dirac matrices. In this scheme \
-(without additional prescriptions) it is not possible to compute traces with an \
-odd number of gamma^5 unambiguously. Evaluation aborted!";
-
-DiracTrace::ilsch =
-"The settings $BreitMaison=`1`, $Larin=`2` do not describe a valid \
-scheme for treating gamma^5 in D dimensions. Evaluation aborted!.";
+"DiracTrace[exp] is the head of Dirac traces. \
+By default the trace is not evaluated. The evaluation occurs only when \
+the option DiracTraceEvaluate is set to True. It is recommended to use \
+DiracSimplify, which will automatically evaluate all Dirac traces in the \
+input expression.";
DiracTrace::failmsg =
"Error! DiracTrace has encountered a fatal problem and must abort the computation. \
The problem reads: `1`"
+DiracTrace::mixmsg = "Expressions that mix D-, 4- and D-4-dimensional quantities are forbidden \
+in Dirac matrix chains unless you are using the t'Hooft-Veltman scheme. For every other scheme, please \
+recheck your input expressions and ensure that all matrices, spinors and tensors are purely \
+D-dimensional. You might want to use FCGetDimensions[exp] to find the offending terms and fix them \
+by hand or ChangeDimension[exp,D] to convert the whole expression to D-dimensions. If you explicitly \
+intend to use the t'Hooft-Veltman scheme, please activate it via FCSetDiracGammaScheme[\"BMHV\"]."
+
(* ------------------------------------------------------------------------ *)
Begin["`Package`"]
@@ -61,21 +47,25 @@ not too long (LeafCount[ ] < 5000 ) expressions.
traceNo5Fun::usage="";
trace5Fun::usage="";
noSpur::usage="";
+leviCivitaSign::usage="";
+optSort::usage="";
Options[DiracTrace] = {
- Contract -> 400000,
- DiracTraceEvaluate-> False,
- EpsContract -> False,
- Expand -> True,
- FCVerbose -> False,
- Factoring -> Automatic,
- FeynCalcExternal -> False,
- FeynCalcInternal -> False,
- Mandelstam -> {},
- PairCollect -> False,
- Schouten-> 0,
- TraceOfOne -> 4,
- West -> True
+ Contract -> True,
+ DiracTraceEvaluate -> False,
+ EpsContract -> False,
+ Expand -> True,
+ FCVerbose -> False,
+ Factoring -> Automatic,
+ FCDiracIsolate -> True,
+ FeynCalcExternal -> False,
+ FeynCalcInternal -> False,
+ Mandelstam -> {},
+ PairCollect -> False,
+ Schouten -> 0,
+ Sort -> True,
+ TraceOfOne -> 4,
+ West -> True
};
@@ -83,32 +73,27 @@ not too long (LeafCount[ ] < 5000 ) expressions.
MakeBoxes[DiracTrace[expr__, OptionsPattern[]], TraditionalForm]:=
RowBox[{"tr","(",TBox[expr], ")"}]
-
-(* gamma67backdef: reinsertion of gamma6 and gamm7 *)
-gamma67back[x_] :=
- x/.DiracGamma[6]->( 1/2 + DiracGamma[5]/2 )/. DiracGamma[7]->( 1/2 - DiracGamma[5]/2 );
-
DiracTrace[0, OptionsPattern[]] :=
0;
-DiracTrace[a_ /; (FreeQ[a, DiracGamma] && !FreeQ[a, DiracGammaT]), b:OptionsPattern[]] :=
- DiracTrace[(a//Transpose)//Reverse, b];
-
DiracTrace[a:Except[_HoldAll]..., x_,y_, z___] :=
- DiracTrace[a,x.y,z]/;FreeQ2[y,{Rule,BlankNullSequence}]&& FreeQ2[x,{Rule,BlankNullSequence}];
+ DiracTrace[a,x.y,z]/;FCPatternFreeQ[{x,y},{Rule}];
DiracTrace[expr_, op:OptionsPattern[]] :=
- Block[ {diTres, ex, tr1,tr2,tr3,time,dsHead,diracObjects,diracObjectsEval,null1,null2,freePart,dsPart,repRule,diTr},
+ Block[{ diTres, ex, tr1, tr2, tr3, time, dsHead, diracObjects,
+ diracObjectsEval, null1, null2, freePart, dsPart, repRule,
+ diTr, holdDOT, insideDiracTrace},
If [OptionValue[FCVerbose]===False,
diTrVerbose=$VeryVerbose,
- If[MatchQ[OptionValue[FCVerbose], _Integer?Positive | 0],
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
diTrVerbose=OptionValue[FCVerbose]
];
];
unitMatrixTrace = OptionValue[TraceOfOne];
+ optSort = OptionValue[Sort];
FCPrint[1, "DiracTrace. Entering.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrace: Entering with ", expr, FCDoControl->diTrVerbose];
@@ -118,71 +103,94 @@ not too long (LeafCount[ ] < 5000 ) expressions.
ex = expr,
ex = FCI[expr]
];
- (*
- time=AbsoluteTime[];
- FCPrint[1, "DiracTrace. Checking the syntax.", FCDoControl->diTrVerbose];
- If [ !FreeQ2[ex,
- {
- (*Times instead of DOT between two Dirac or SU(N) matrices*)
- (DiracGamma | DiracGammaT)[a__]*(DiracGamma | DiracGammaT)[b__],
- SUNT[a__]*SUNT[b__],
- (*Two DOT objects multiplied with each other via Times, unless those are closed spinor chains*)
- DOT[a:Except[_Spinor]...,(DiracGamma | DiracGammaT )[b__],c:Except[_Spinor]...]*
- DOT[d:Except[_Spinor]...,(DiracGamma | DiracGammaT)[e__],f:Except[_Spinor]...],
- (*Open spinor chains*)
- DOT[a_Spinor,b:Except[_Spinor]...],
- (*DOT object multiplied by a Dirac or SU(N) matrix via Times*)
- DOT[a:Except[_Spinor]...,(DiracGamma | DiracGammaT)[b__],c:Except[_Spinor]...]*
- (DiracGamma | DiracGammaT)[d__]}],
- Message[DiracTrace::noncom, InputForm[ex]];
- Abort[]
- ];
- FCPrint[1,"DiracTrace: Syntax check done, timing: ", N[AbsoluteTime[] - time, 4] , FCDoControl->diTrVerbose];
- *)
(* Doing contractions can often simplify the underlying expression *)
time=AbsoluteTime[];
- FCPrint[1, "DiracTrace. Applying Contract.", FCDoControl->diTrVerbose];
- If[ Contract=!=False,
+
+ If[ OptionValue[Contract]=!=False && !DummyIndexFreeQ[ex,{LorentzIndex,CartesianIndex}],
+ FCPrint[1, "DiracTrace. Applying Contract.", FCDoControl->diTrVerbose];
ex = Contract[ex, Expanding->True, EpsContract-> OptionValue[EpsContract], Factoring->False];
+ FCPrint[1,"DiracTrace: Contract done, timing: ", N[AbsoluteTime[] - time, 4] , FCDoControl->diTrVerbose]
];
- FCPrint[1,"DiracTrace: Contract done, timing: ", N[AbsoluteTime[] - time, 4] , FCDoControl->diTrVerbose];
- (* First of all we need to extract all the Dirac structures inside the trace. *)
- ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, Spinor->False, DiracTrace -> False, DiracSigmaExplicit->True];
- ex = ex /. DiracTrace -> diTr;
+ If[ OptionValue[FCDiracIsolate],
+ FCPrint[1, "DiracTrace: Standard mode.", FCDoControl->diTrVerbose];
+ (* First of all we need to extract all the Dirac structures inside the trace. *)
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, Spinor->False, DiracTrace -> False, DiracSigmaExplicit->True];
+ ex = ex /. DiracTrace -> diTr;
- {freePart,dsPart} = FCSplit[ex,{dsHead}];
- FCPrint[3,"DiracTrace: dsPart: ",dsPart , FCDoControl->diTrVerbose];
- FCPrint[3,"DiracTrace: freePart: ",freePart , FCDoControl->diTrVerbose];
- If [ dsPart=!=0,
- (* Check that there is only one dsHead per term and no nested dsHeads *)
- Scan[
- If[ !MatchQ[#, a_. dsHead[b_]/; (FreeQ[{a,b}, dsHead] && !FreeQ[b,DiracGamma])],
- Message[DiracTrace::failmsg, "Irregular trace structure in", InputForm[#]];
- Print[#];
- Abort[]
- ]&, dsPart+dsHead[DiracGamma] ];
- ];
+ {freePart,dsPart} = FCSplit[ex,{dsHead}];
+ FCPrint[3,"DiracTrace: dsPart: ",dsPart , FCDoControl->diTrVerbose];
+ FCPrint[3,"DiracTrace: freePart: ",freePart , FCDoControl->diTrVerbose];
+ If [ dsPart=!=0,
+ (* Check that there is only one dsHead per term and no nested dsHeads *)
+ Scan[
+ If[ !MatchQ[#, a_. dsHead[b_]/; (FreeQ[{a,b}, dsHead] && !FreeQ[b,DiracGamma])],
+ Message[DiracTrace::failmsg, "Irregular trace structure in", InputForm[#]];
+ Print[#];
+ Abort[]
+ ]&, dsPart+dsHead[DiracGamma] ];
+ ];
+
+ (* Now it is guaranteed that dsPart is of the form a*dsHead[x]+b*dsHead[y]+c*dsHead[z]+...
+ So it is safe to extract all the dsHead objects and handle them separately *)
+ diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//Union,
+
+
+ FCPrint[1, "DiracTrace: Fast mode.", FCDoControl->diTrVerbose];
+ (* Fast mode for simple traces *)
+ If[ !FreeQ[ex,DiracGamma],
+ freePart=0;
+ If[ !FreeQ[ex,DiracSigma],
+ ex = DiracSigmaExplicit[ex,FCI->True]
+ ];
- (* Now it is guaranteed that dsPart is of the form a*dsHead[x]+b*dsHead[y]+c*dsHead[z]+...
- So it is safe to extract all the dsHead objects and handle them separately *)
- diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//Union;
+ dsPart=dsHead[ex]/. DiracTrace -> diTr;
+ diracObjects = {dsPart},
+
+ freePart=ex;
+ dsPart=0;
+ diracObjects = {}
+ ];
+
+
+
+ ];
time=AbsoluteTime[];
- FCPrint[1, "DiracTrace. Applying diracTraceEvaluate.", FCDoControl->diTrVerbose];
+ FCPrint[1, "DiracTrace. Applying diracTrickEvalFast.", FCDoControl->diTrVerbose];
+
+ (* Here we try to compute some very simple traces in a faster way *)
+
+ insideDiracTrace = FeynCalc`DiracTrick`Private`insideDiracTrace;
+ FeynCalc`DiracTrick`Private`insideDiracTrace = True;
+
+ diracObjectsEval = Map[FeynCalc`DiracTrick`Private`diracTrickEvalFast[#]&, (diracObjects/.dsHead->Identity)] /. FeynCalc`DiracTrick`Private`diracTrickEvalFast->Identity;
+
+ FeynCalc`DiracTrick`Private`insideDiracTrace = insideDiracTrace;
+
+
+ FCPrint[1,"DiracTrace: After diracTrickEvalFast: ", diracObjectsEval, FCDoControl->diTrVerbose];
diracObjectsEval = Map[diracTraceEvaluate[#, Flatten[Join[{op}, FilterRules[Options[DiracTrace], Except[{op}]]]]]&,
- (diracObjects/.dsHead->Identity)];
+ diracObjectsEval];
diracObjectsEval = diracObjectsEval/. noSpur[x__]:> diTr[DOT[x]]/unitMatrixTrace;
- repRule = MapThread[Rule[#1,#2]&,{diracObjects,diracObjectsEval}];
+ FCPrint[1,"DiracTrace: diracTraceEvaluate finished, timing: ", N[AbsoluteTime[] - time, 4] , FCDoControl->diTrVerbose];
+
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
FCPrint[3,"DiracTrace: repRule: ",repRule , FCDoControl->diTrVerbose];
- tr3 = (unitMatrixTrace freePart) + ( dsPart/.repRule);
+ If[ !FreeQ[freePart,DOT],
+ freePart = freePart /. DOT->holdDOT /. holdDOT[a__]/;NonCommFreeQ[{a}] :> Times[a] /. holdDOT -> DOT
+ ];
+
+ tr3 = (unitMatrixTrace freePart) + ( dsPart /. Dispatch[repRule]);
+
+
(* If the result should contain Mandelstam variables *)
If[ Length[OptionValue[Mandelstam]] > 0,
@@ -200,20 +208,24 @@ not too long (LeafCount[ ] < 5000 ) expressions.
];
diTres = diTres/. diTr->DiracTrace;
+ diTrVerbose=$VeryVerbose;
+
FCPrint[1, "DiracTrace: Leaving.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrace: Leaving with", diTres, FCDoControl->diTrVerbose];
diTres
]/; OptionValue[DiracTraceEvaluate];
-diracTraceEvaluate[expr_,opts:OptionsPattern[]] :=
+
+diracTraceEvaluate[expr_/;FreeQ[expr,DiracGamma], OptionsPattern[]] :=
+ unitMatrixTrace expr;
+
+diracTraceEvaluate[expr_/;!FreeQ[expr,DiracGamma], opts:OptionsPattern[]] :=
Block[ { diractrres, tmp = expr, diractrfact,
diractrcoll, schoutenopt,
- dtmp,dWrap,dtWrap,wrapRule,prepSpur,time,time2,contract,spurHeadList,spurHeadListChiral,spurHeadListNonChiral,
+ dtmp,dWrap,wrapRule,prepSpur,time,time2,contract,spurHeadList,spurHeadListChiral,spurHeadListNonChiral,
gammaFree,gammaPart,
- traceListChiral,traceListNonChiral,repRule,null1,null2
-
- },
+ traceListChiral,traceListNonChiral,repRule,null1,null2,dummyIndexFreeQ},
wrapRule = {dWrap[5]->0, dWrap[6]->1/2, dWrap[7]->1/2, dWrap[LorentzIndex[_,_:4],___]->0,
dWrap[_. Momentum[_,_:4]+_:0,___]->0};
@@ -234,6 +246,16 @@ not too long (LeafCount[ ] < 5000 ) expressions.
FCPrint[1,"DiracTrace: diracTraceEvaluate: Entering", FCDoControl->diTrVerbose];
FCPrint[3,"DiracTrace: diracTraceEvaluate: Entering with: ",expr, FCDoControl->diTrVerbose];
+ (* Even before we compute the trace, we can already decide if the expression contains dummy
+ indices. It is clearly better to do it here, while the expression is still in the most
+ compact form! *)
+ time=AbsoluteTime[];
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Checking if there are indices that need to be contracted. ", FCDoControl->diTrVerbose];
+ dummyIndexFreeQ = DummyIndexFreeQ[tmp,{LorentzIndex,CartesianIndex}];
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Check done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+
+
+
time=AbsoluteTime[];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Applying DiracTrick.", FCDoControl->diTrVerbose];
@@ -244,7 +266,7 @@ not too long (LeafCount[ ] < 5000 ) expressions.
time=AbsoluteTime[];
If[ !FreeQ[tmp, DiracGamma],
- (* If the output of DiracSimplify still contains Dirac matrices, apply DotSimplify and use DiracTrick again *)
+ (* If the output of DiracTrick still contains Dirac matrices, apply DotSimplify and use DiracTrick again *)
(* We need to consider standalone Dirac matrices separately: With the following all of them will be wrapped inside dWrap or dtWrap *)
FCPrint[1,"DiracTrace: diracTraceEvaluate: Calculating the trace.", FCDoControl->diTrVerbose];
@@ -258,13 +280,12 @@ not too long (LeafCount[ ] < 5000 ) expressions.
time2=AbsoluteTime[];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Applying DiracTrick.", FCDoControl->diTrVerbose];
- tmp = DiracTrick[tmp, FCI -> True, InsideDiracTrace->True];
+ tmp = DiracTrick[tmp, FCI -> True, InsideDiracTrace->True, FCJoinDOTs->False];
FCPrint[1,"DiracTrace: diracTraceEvaluate: DiracTrick done, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->diTrVerbose];
FCPrint[3,"DiracTrace: diracTraceEvaluate: After DiracTrick: ", tmp, FCDoControl->diTrVerbose];
-
- tmp = tmp /. {DiracGamma -> dWrap,DiracGammaT -> dtWrap} /. DOT -> prepSpur;
- tmp = tmp /. prepSpur[zzz__] :> spurHead@@({zzz} /. {dWrap -> DiracGamma,dtWrap->DiracGammaT});
+ tmp = tmp /. {DiracGamma -> dWrap} /. DOT -> prepSpur;
+ tmp = tmp /. prepSpur[zzz__] :> spurHead@@({zzz} /. {dWrap -> DiracGamma});
FCPrint[3,"DiracTrace: diracTraceEvaluate: Wrapped in spurHead: ",tmp, FCDoControl->diTrVerbose];
@@ -283,6 +304,21 @@ not too long (LeafCount[ ] < 5000 ) expressions.
Abort[]
];
+ (* Sort the matrices in the traces lexicographically using the cyclicity of the trace*)
+
+ If[ optSort,
+ time2=AbsoluteTime[];
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Applying the cyclicity of the trace to sort the matrices lexicographically.", FCDoControl->diTrVerbose];
+ tmp = tmp /. spurHead[x__]/;(FCGetDimensions[{x},ChangeDimension->True]==={4})-> orderSpurHead[x];
+
+ If[ !FreeQ[tmp,orderSpurHead],
+ Message[DiracTrace::failmsg,"Sorting matrices inside Dirac traces failed."];
+ Abort[]
+ ];
+
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Done sorting matrices lexicographically, timing:", N[AbsoluteTime[] - time2, 4], FCDoControl->diTrVerbose];
+ FCPrint[3,"DiracTrace: diracTraceEvaluate: After sorting matrices lexicographically: ", tmp, FCDoControl->diTrVerbose]
+ ];
(* After all the simplifications we need to split terms that still containd Dirac matrices from those that don't. *)
{gammaFree,gammaPart} = FCSplit[tmp,{spurHead}];
@@ -318,10 +354,10 @@ not too long (LeafCount[ ] < 5000 ) expressions.
];
(* One more check: Traces with mixed dimensions are forbidden in NDR and Larin's scheme, so we abort the computation if this is the case *)
- If [ !$BreitMaison,
+ If [ (FeynCalc`Package`DiracGammaScheme =!= "BMHV"),
Scan[
- If[ Length[FCGetDimensions[#/.DiracGamma[5]->1]]=!=1,
- Message[DiracTrace::failmsg, "Traces with mixed dimensions are forbidden in this g^5 scheme."];
+ If[ Length[FCGetDimensions[#, FreeQ->{DiracGamma[5]},ChangeDimension->True]]=!=1,
+ Message[DiracTrace::mixmsg];
Abort[]
]&, spurHeadListChiral
]
@@ -352,30 +388,37 @@ not too long (LeafCount[ ] < 5000 ) expressions.
FCPrint[1,"DiracTrace: diracTraceEvaluate: Calculating chiral traces.", FCDoControl->diTrVerbose];
(* Purely 4 dimensional traces are always computed in the same way, regardless of the chosen scheme:
Eq 2.18 of R. Mertig, M. Boehm, A. Denner. Comp. Phys. Commun., 64 (1991)) *)
- traceListChiral = spurHeadListChiral/. spurHead[x__]/;(FCGetDimensions[{x}]==={4}) :> spur5In4Dim[x];
+ traceListChiral = spurHeadListChiral/. spurHead[x__]/;(FCGetDimensions[{x},ChangeDimension->True]==={4}) :> spur5In4Dim[x];
(* Choice of the scheme for D-dimensional g^5 *)
If[ !FreeQ[traceListChiral,spurHead],
- Which[
+ Switch[FeynCalc`Package`DiracGammaScheme,
+
(* NDR *)
- !$Larin && !$BreitMaison,
- Message[DiracTrace::ndranomaly];
- Abort[],
+ "NDR",
+ traceListChiral = traceListChiral/. spurHead -> noSpur,
+
+ (* NDR-Discard *)
+ "NDR-Drop",
+ traceListChiral = ConstantArray[0, Length[traceListChiral]],
+
(* Larin *)
- $Larin && !$BreitMaison,
+ "Larin",
FCPrint[3,"DiracTrace: diracTraceEvaluate: Chiral traces will be computed using Larin's scheme", FCDoControl->diTrVerbose];
traceListChiral = traceListChiral/. spurHead -> spur5Larin,
+
(* BMHV *)
- !$Larin && $BreitMaison,
+ "BMHV",
If[ west,
(* BMHV, West's trace formula *)
traceListChiral = traceListChiral/. spurHead -> spur5BMHVWest,
(* BMHV, standard (slow!) trace formula *)
traceListChiral = traceListChiral/. spurHead -> spur5BMHVNoWest
],
- (* Any other combination of $Larin and $BreitMaison doesn't describe a valid scheme *)
- True,
- Message[DiracTrace::ilsch, $BreitMaison, $Larin];
+
+ (* unknown scheme *)
+ _,
+ Message[DiracTrace::failmsg, "Unknown scheme for handling Dirac matrices in dimensional regularization."];
Abort[]
]
];
@@ -384,7 +427,8 @@ not too long (LeafCount[ ] < 5000 ) expressions.
FCPrint[3,"DiracTrace: diracTraceEvaluate: traceListChiral", traceListChiral, FCDoControl->diTrVerbose];
(* Check that there are no uncomputed traces left *)
- If[ !FreeQ2[traceListChiral,{spurHead,DiracGamma,trace5}],
+ If[ !FreeQ2[traceListChiral /. _noSpur:>1 ,{spurHead,DiracGamma,trace5}],
+ Print[traceListChiral];
Message[DiracTrace::failmsg, "Not all chiral traces were evaluated."];
Abort[]
];
@@ -394,59 +438,63 @@ not too long (LeafCount[ ] < 5000 ) expressions.
(* Expansion of scalar products. If some of the scalar products were arlready defined,
they will be inserted here. *)
- If[ OptionValue[DiracTrace,{opts},Expand],
+ If[ OptionValue[DiracTrace,{opts},Expand] && !FreeQ[{traceListNonChiral,traceListChiral,gammaFree,gammaPart}, Momentum],
time2=AbsoluteTime[];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Expanding scalar products", FCDoControl->diTrVerbose];
- traceListNonChiral=Map[ExpandScalarProduct[#,FCI->False]&,traceListNonChiral];
- traceListChiral=Map[ExpandScalarProduct[#,FCI->False]&,traceListChiral];
- gammaFree=ExpandScalarProduct[gammaFree,FCI->False];
- gammaPart=ExpandScalarProduct[gammaPart,FCI->False];
+ traceListNonChiral=Map[ExpandScalarProduct[#,FCI->True]&,traceListNonChiral];
+ traceListChiral=Map[ExpandScalarProduct[#,FCI->True]&,traceListChiral];
+ gammaFree=ExpandScalarProduct[gammaFree,FCI->True];
+ gammaPart=ExpandScalarProduct[gammaPart,FCI->True];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Done expanding the result, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->diTrVerbose]
];
(* Create the substitution rule*)
- repRule = MapThread[Rule[#1,#2]&,{spurHeadListChiral,traceListChiral}];
- repRule = Join[repRule,MapThread[Rule[#1,#2]&,{spurHeadListNonChiral,traceListNonChiral}]];
+ time2=AbsoluteTime[];
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Rebuilding the full result.", FCDoControl->diTrVerbose];
+ repRule = Thread[Rule[spurHeadListChiral,traceListChiral]];
+ repRule = Join[repRule, Thread[Rule[spurHeadListNonChiral,traceListNonChiral]]];
FCPrint[3,"DiracTrace: diracTraceEvaluate: repRule: ", traceListChiral, FCDoControl->diTrVerbose];
(* The trace of any standalone Dirac matrix is zero, g^6 and g^7 are of course special *)
- tmp = (gammaFree/. wrapRule) + (gammaPart/.repRule);
+ tmp = (gammaFree/. wrapRule) + (gammaPart /. Dispatch[repRule]);
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Full result ready, timing: ", N[AbsoluteTime[] - time2, 4], FCDoControl->diTrVerbose];
FCPrint[3,"DiracTrace: diracTraceEvaluate: tmp: ", tmp, FCDoControl->diTrVerbose];
- If[ !FreeQ2[tmp /. noSpur[__]:>1,{spurHead,DiracGamma}],
+ If[ !FreeQ2[tmp /. _noSpur:>1,{spurHead,DiracGamma}],
Message[DiracTrace::failmsg, "Something went wrong while substituting trace results."];
Abort[]
];
];
- FCPrint[1,"DiracTrace: diracTraceEvaluate: Main part finished, timing:",N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[1,"DiracTrace: diracTraceEvaluate: Main part finished, timing: ",N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
(* At this point there should be no Dirac matrices left, by definition.
The only allowed exception are objects wrapped into noSpur *)
- If[ !FreeQ[tmp /. noSpur[__]:>1 ,DiracGamma],
+
+ If[ !FreeQ[tmp /. _noSpur:>1, DiracGamma],
Message[DiracTrace::failmsg,"The output still contains Dirac matrices"];
Abort[]
];
(* If there are uncontracted Lorentz indices, try to contract them *)
- If[ (contract===True || (NumberQ[contract] && LeafCount[tmp] < contract)) && !FreeQ[tmp, LorentzIndex],
+ If[ contract===True && !dummyIndexFreeQ,
time=AbsoluteTime[];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Contracting Lorentz indices. ", FCDoControl->diTrVerbose];
- tmp=Contract[tmp];
+ tmp=Contract[tmp,FCI->True];
FCPrint[3,"DiracTrace: diracTraceEvaluate: After Contract: ", tmp, FCDoControl->diTrVerbose];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Contract done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose]
];
-
(* Special expansion for expressions that contain Levi-Civita tensors*)
If[ !FreeQ[tmp, Eps],
time=AbsoluteTime[];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Treating Eps tensors.", FCDoControl->diTrVerbose];
- tmp = EpsEvaluate[tmp]//Expand;
- tmp = Contract[ tmp, EpsContract -> OptionValue[DiracTrace,{opts},EpsContract],
- Schouten->schoutenopt, Expanding -> False ];
- FCPrint[1,"DiracTrace: diracTraceEvaluate: Done with Eps tensors, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose]
+ tmp = EpsEvaluate[tmp,FCI->True]//Expand;
+ If[ (contract===True || (NumberQ[contract] && LeafCount[tmp] < contract)),
+ tmp = Contract[ tmp, EpsContract -> OptionValue[DiracTrace,{opts},EpsContract],
+ Schouten->schoutenopt, Expanding -> False, FCI->True];
+ ];
];
(* Factor the result, if requested; This is where we put back the prefactor of 4. *)
@@ -459,7 +507,7 @@ not too long (LeafCount[ ] < 5000 ) expressions.
diractrres = diractrfact[unitMatrixTrace tmp]
]
];
- FCPrint[3,"DiracTrace: diracTraceEvaluate: After factoring: ", tmp, FCDoControl->diTrVerbose];
+ FCPrint[3,"DiracTrace: diracTraceEvaluate: After factoring: ", diractrres, FCDoControl->diTrVerbose];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Factoring done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
diractrpc[x__] :=
@@ -477,10 +525,44 @@ not too long (LeafCount[ ] < 5000 ) expressions.
];
FCPrint[1,"DiracTrace: diracTraceEvaluate: Leaving.", FCDoControl->diTrVerbose];
-
+ FCPrint[3,"DiracTrace: diracTraceEvaluate: Leaving with: ", diractrres, FCDoControl->diTrVerbose];
diractrres
];
+(* since the cyclicity of the trace is respected in all the Gamma^5 schemes
+ used in FeynCalc and the sorting does not depend on the values of the scalar
+ products, orderSpurHead is safe for memoization. This might change if we would
+ implement Kreimer's scheme in the future. *)
+
+orderSpurHead[x__DiracGamma, DiracGamma[5]] :=
+ Block[{p1, p2, tmpSpur, li = {x}, pos, tab},
+ tab =
+ Table[
+ (
+ p1 = li[[;; i]];
+ p2 = li[[i + 1 ;;]];
+ {((-1)^Length[p2]), tmpSpur[Sequence @@ p2, Sequence @@ p1]}
+ ), {i, 1,Length[li] - 1}];
+ tab = Join[{{1, tmpSpur[x]}}, tab];
+ pos = First[Ordering[tab /. {_, tmpSpur[b__]} :> List[b]]];
+ tab[[pos]][[1]] spurHead[Sequence @@ (tab[[pos]][[2]]), DiracGamma[5]]
+ ];
+
+
+orderSpurHead[x__DiracGamma,y_DiracGamma/;(y=!=DiracGamma[5] && y=!=DiracGamma[6] && y=!=DiracGamma[7])] :=
+ Block[{p1, p2, tmpSpur, li = {x,y}, pos, tab},
+ tab =
+ Table[
+ (
+ p1 = li[[;; i]];
+ p2 = li[[i + 1 ;;]];
+ {1, tmpSpur[Sequence @@ p2, Sequence @@ p1]}
+ ), {i, 1,Length[li] - 1}];
+ tab = Join[{{1, tmpSpur[x,y]}}, tab];
+ pos = First[Ordering[tab /. {_, tmpSpur[b__]} :> List[b]]];
+ spurHead[Sequence @@ (tab[[pos]][[2]])]
+ ];
+
fastExpand[xx_] :=
Replace[xx, p_. Times[a__, x_Plus] :> Distribute[p a*x, Plus], 1];
@@ -493,7 +575,7 @@ not too long (LeafCount[ ] < 5000 ) expressions.
(* traceNo5Wrap is a higher level function that handles the computation of traces without gamma 5,
all indices different. The trick here is that as soon as we compute a trace for a given number of Dirac matrices,
- we define it is a function (traceNo5fun) so that the result can be retrieved very fast. Combined with the the fast expansion
+ we define it is a function (traceNo5fun) so that the result can be retrieved very fast. Combined with the fast expansion
using fastExpand this provides a rather quick way to obtain Dirac traces. The bottlenecks here are the amount of RAM required
for caching and the general slowness of Mathematica on very large expressions. Traces with up to 14 Dirac matrices should be fine,
after that it becomes too slow *)
@@ -506,7 +588,7 @@ we define it is a function (traceNo5fun) so that the result can be retrieved ver
If[Head[finalRes] === traceNo5Fun,
(* The trace needs to be computed *)
tmpRes = traceNo5 @@ tab;
- If[ ($MemoryAvailable - MemoryInUse[]/1000000.) >1. ,
+ If[ ($FCMemoryAvailable - MemoryInUse[]/1000000.) >1. ,
(* If there is enough memory, we save the computed result as a function *)
args = Sequence @@ (Pattern[#, _] & /@ tab);
setDel[traceNo5Fun[args], fastExpand[tmpRes]] /. setDel -> SetDelayed;
@@ -551,7 +633,7 @@ we define it is a function (traceNo5fun) so that the result can be retrieved ver
If[Head[realRes] === trace5Fun,
(* The trace needs to be computed *)
tmpRes = trace5 @@ (Join[tab, {5}]);
- If[ ($MemoryAvailable - MemoryInUse[]/1000000.) >1. ,
+ If[ ($FCMemoryAvailable - MemoryInUse[]/1000000.) >1. ,
(* If there is enough memory, we save the computed result as a function *)
args = Sequence @@ Join[(Pattern[#, _] & /@ tab), {5}];
setDel[trace5Fun[args], fastExpand[tmpRes]] /. setDel -> SetDelayed;
@@ -597,12 +679,12 @@ we define it is a function (traceNo5fun) so that the result can be retrieved ver
spur5Larin[x__DiracGamma, y:DiracGamma[_[_,dim_],dim_], DiracGamma[5]]:=
Block[{li1,li2,li3, res},
{li1,li2,li3} = LorentzIndex[#,dim]& /@ Unique[{"larLia","larLib","larLic"}];
- If[ FCGetDimensions[{x}]=!={dim},
- Message[DiracTrace::failmsg, "Traces with mixed dimensions are forbidden in Larin's scheme."];
+ If[ FCGetDimensions[{x},ChangeDimension->True]=!={dim},
+ Message[DiracTrace::mixmsg];
Abort[]
];
- res = I/6 leviCivitaSign Eps[y[[1]], li1, li2, li3, Dimension->dim] spurNo5[x,DiracGamma[li1,dim],DiracGamma[li2,dim], DiracGamma[li3,dim]];
- If[ FCGetDimensions[{res}]=!={dim},
+ res = I/6 leviCivitaSign Eps[y[[1]], li1, li2, li3] spurNo5[x,DiracGamma[li1,dim],DiracGamma[li2,dim], DiracGamma[li3,dim]];
+ If[ FCGetDimensions[{res},ChangeDimension->True]=!={dim},
Message[DiracTrace::failmsg, "Something went wrong while computing trace in Larin's scheme."];
Abort[]
];
@@ -617,9 +699,12 @@ we define it is a function (traceNo5fun) so that the result can be retrieved ver
res
]/; EvenQ[Length[{x}]] && Length[{x}]>4;
-spur5BMHVWest[x_DiracGamma,y_DiracGamma,r_DiracGamma,z_DiracGamma, DiracGamma[5]] :=
- EpsEvaluate[leviCivitaSign I Eps[x[[1]],y[[1]],r[[1]],z[[1]]]];
+spur5BMHVWest[DiracGamma[x_,___],DiracGamma[y_,___],DiracGamma[r_,___],DiracGamma[z_,___], DiracGamma[5]] :=
+ EpsEvaluate[leviCivitaSign I Eps[Take[x,1], Take[y,1], Take[r,1], Take[z,1]], FCI->True]/;
+ !MatchQ[FCGetDimensions[{x,y,r,z},ChangeDimension->True],{___,_Symbol-4,___}];
+spur5BMHVWest[DiracGamma[x_,___],DiracGamma[y_,___],DiracGamma[r_,___],DiracGamma[z_,___], DiracGamma[5]] :=
+ 0/; MatchQ[FCGetDimensions[{x,y,r,z},ChangeDimension->True],{___,_Symbol-4,___}];
spur5BMHVNoWest[x__DiracGamma, DiracGamma[5]]:=
Block[{li1,li2,li3,li4, res},
diff --git a/FeynCalc/Dirac/DiracTrick.m b/FeynCalc/Dirac/DiracTrick.m
index ddab39869..39f594692 100755
--- a/FeynCalc/Dirac/DiracTrick.m
+++ b/FeynCalc/Dirac/DiracTrick.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Contraction and simplification rules for Dirac matrices *)
@@ -16,8 +16,10 @@
(* ------------------------------------------------------------------------ *)
DiracTrick::usage =
-"DiracTrick[exp] contracts gamma matrices with each other and \
-performs several simplifications (no expansion, use DiracSimplify for this).";
+"DiracTrick[exp] contracts Dirac matrices with each other and \
+performs several simplifications but no expansions. There are not many \
+cases when a user will need to call this function directly. Use DiracSimplify \
+to achieve maximal simplification of Dirac matrix chains.";
DiracTrick::failmsg =
"Error! DiracTrick has encountered a fatal problem and must abort the computation. \
@@ -27,6 +29,10 @@
(* ------------------------------------------------------------------------ *)
Begin["`Package`"]
+
+diracTrickEvalFastFromDiracSimplifyList;
+diracTrickEvalFastFromDiracSimplifySingle;
+(*TODO: Need to add an option for moving all g^5 to the left!*)
End[]
Begin["`DiracTrick`Private`"]
@@ -34,22 +40,51 @@
diTrVerbose::usage="";
diracTraceSimplify::usage="";
insideDiracTrace::usage="";
+diracOrder::usage="";
+optJoin::usage="";
diga::usage="";
+tmpli::usage="";
Options[DiracTrick] = {
- DiracGammaCombine -> False,
- Expanding -> False,
- FCDiracIsolate -> True,
- FCI -> False,
- FCVerbose -> False,
- InsideDiracTrace -> False
+ Evaluate -> True,
+ DiracChain -> True,
+ DiracGammaCombine -> False,
+ Expanding -> False,
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> False,
+ FCVerbose -> False,
+ InsideDiracTrace -> False,
+ ToDiracGamma67 -> True
};
-(* TODO: Bad syntax that one should get rid off*)
-DiracTrick[] = 1;
+diracTrickEvalFastFromDiracSimplifyList[diracObjects_List, {optInsideDiracTrace_, optDiracOrder_}]:=
+ Block[{tmp1,tmp2,res},
+ tmp1 = insideDiracTrace;
+ tmp2 = diracOrder;
+ insideDiracTrace = optInsideDiracTrace;
+ diracOrder = optDiracOrder;
+ res = (diracTrickEvalFast/@diracObjects) /. diracTrickEvalFast->Identity;
+ insideDiracTrace = tmp1;
+ diracOrder = tmp2;
+ res
+ ];
-DiracTrick[y__ /; FreeQ[{y}, Rule, 1],z_/;Head[z]=!=Rule] :=
- DiracTrick[DOT[y,z],FCI->True];
+diracTrickEvalFastFromDiracSimplifySingle[diracObject_, {tmpHead_, optInsideDiracTrace_, optDiracOrder_}]:=
+ Block[{tmp1,tmp2,res},
+ tmp1 = insideDiracTrace;
+ tmp2 = diracOrder;
+ insideDiracTrace = optInsideDiracTrace;
+ diracOrder = optDiracOrder;
+ res = diracTrickEvalFast[diracObject] /. diracTrickEvalFast->tmpHead;
+ insideDiracTrace = tmp1;
+ diracOrder = tmp2;
+ res
+ ]/; Head[diracObject]=!=DiracChain;
+
+diracTrickEvalFastFromDiracSimplifySingle[DiracChain[diracObject_,i_,j_], {tmpHead_, optInsideDiracTrace_, optDiracOrder_}]:=
+ DiracChain[diracTrickEvalFastFromDiracSimplifySingle[diracObject, {tmpHead, optInsideDiracTrace, optDiracOrder}],i,j]
DiracTrick[expr_,OptionsPattern[]] :=
Block[{ res, tmp, ex, null1, null2, holdDOT, freePart, dsPart, diracObjects,
@@ -93,9 +128,11 @@ create replacement rules (standard) and substitute the results back.
*)
+ optJoin = OptionValue[FCJoinDOTs];
+
If [OptionValue[FCVerbose]===False,
diTrVerbose=$VeryVerbose,
- If[MatchQ[OptionValue[FCVerbose], _Integer?Positive | 0],
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
diTrVerbose=OptionValue[FCVerbose]
];
];
@@ -121,51 +158,93 @@ create replacement rules (standard) and substitute the results back.
If[ OptionValue[FCDiracIsolate],
(* This is the standard mode for calling DiracTrick *)
-
+ FCPrint[1,"DiracTrick: Normal mode.", FCDoControl->diTrVerbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracTrick: Extracting Dirac objects.", FCDoControl->diTrVerbose];
(* First of all we need to extract all the Dirac structures in the input. *)
- ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DotSimplify->True, DiracGammaCombine->OptionValue[DiracGammaCombine],LorentzIndex->True];
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DotSimplify->True, DiracGammaCombine->OptionValue[DiracGammaCombine],
+ FCJoinDOTs -> optJoin, LorentzIndex->True, ToDiracGamma67-> OptionValue[ToDiracGamma67], DiracChain->OptionValue[DiracChain]];
{freePart,dsPart} = FCSplit[ex,{dsHead}];
FCPrint[3,"DiracTrick: dsPart: ",dsPart , FCDoControl->diTrVerbose];
FCPrint[3,"DiracTrick: freePart: ",freePart , FCDoControl->diTrVerbose];
+ FCPrint[1, "DiracTrick: Done extracting Dirac objects, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//Union;
FCPrint[3,"DiracTrick: diracObjects: ",diracObjects , FCDoControl->diTrVerbose];
time=AbsoluteTime[];
- FCPrint[1, "DiracTrick: Applying diracTrickEval", FCDoControl->diTrVerbose];
- (* diracObjectsEval = Map[(diracTrickEvalFast[#]/. diracTrickEvalFast->diracTrickEval)&, (diracObjects/.dsHead->Identity)];*)
+ FCPrint[1, "DiracTrick: Applying diracTrickEvalFast", FCDoControl->diTrVerbose];
diracObjectsEval = diracTrickEvalFast/@(diracObjects/.dsHead->Identity);
+ FCPrint[1,"DiracTrick: diracTrickEvalFast done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[3,"DiracTrick: After diracTrickEvalFast: ", diracObjectsEval, FCDoControl->diTrVerbose];
+
+
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracTrick: Doing contractions", FCDoControl->diTrVerbose];
+
If[ !FreeQ[diracObjectsEval,Pair],
diracObjectsEval = diracObjectsEval /. diracTrickEvalFast[zzz_] :> diracTrickEvalFast[Expand2[zzz,Pair]/. Pair->PairContract /. PairContract->Pair]
];
- diracObjectsEval = diracObjectsEval /. diracTrickEvalFast -> diracTrickEval;
+ If[ !FreeQ[diracObjectsEval,CartesianPair],
+ diracObjectsEval = diracObjectsEval /. diracTrickEvalFast[zzz_] :> diracTrickEvalFast[Expand2[zzz,CartesianPair]/.
+ CartesianPair->CartesianPairContract /. CartesianPairContract->CartesianPair]
+ ];
+
+ FCPrint[1,"DiracTrick: Contractions done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[3,"DiracTrick: After contractions: ", diracObjectsEval, FCDoControl->diTrVerbose];
- FCPrint[3,"DiracTrace: After diracTrickEval: ", diracObjectsEval, FCDoControl->diTrVerbose];
- FCPrint[1,"DiracTrace: diracTrickEval done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "DiracTrick: Applying diracTrickEval", FCDoControl->diTrVerbose];
+
+ If[ OptionValue[Evaluate],
+ diracObjectsEval = diracObjectsEval /. diracTrickEvalFast -> diracTrickEval,
+ diracObjectsEval = diracObjectsEval /. diracTrickEvalFast -> Identity
+ ];
+
+ FCPrint[3,"DiracTrick: After diracTrickEval: ", diracObjectsEval, FCDoControl->diTrVerbose];
+ FCPrint[1,"DiracTrick: diracTrickEval done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+
If[ !FreeQ2[diracObjectsEval,{diracTrickEvalFast,diracTrickEval,holdDOT}],
Message[DiracTrick::failmsg,"Evaluation of isolated objects failed."];
Abort[]
];
- repRule = MapThread[Rule[#1,#2]&,{diracObjects,diracObjectsEval}];
+ FCPrint[1, "DiracTrick: Inserting Dirac objects back.", FCDoControl->diTrVerbose];
+ time=AbsoluteTime[];
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
FCPrint[3,"DiracTrick: repRule: ",repRule , FCDoControl->diTrVerbose];
- res = freePart + ( dsPart/.repRule),
+ res = freePart + ( dsPart /. Dispatch[repRule]);
+ FCPrint[1, "DiracTrick: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose],
+
+ FCPrint[1,"DiracTrick: Fast mode.", FCDoControl->diTrVerbose];
(* This is a fast mode for input that is already isolated, e.g. for calling DiracTrick/@exprList
from internal functions *)
-
res = diracTrickEvalFast[ex];
If[ !FreeQ[diracObjectsEval,Pair],
res = res /. diracTrickEvalFast[zzz_] :> diracTrickEvalFast[Expand2[zzz,Pair]/. Pair->PairContract /. PairContract->Pair]
];
+ If[ !FreeQ[diracObjectsEval,CartesianPair],
+ res = res /. diracTrickEvalFast[zzz_] :> diracTrickEvalFast[Expand2[zzz,CartesianPair]/.
+ CartesianPair->CartesianPairContract /. CartesianPairContract->CartesianPair]
+ ];
+
+ (* It might happen that after diracTrickEvalFast there are no Dirac matrices left.*)
+
+ FCPrint[3,"DiracTrick: After diracTrickEvalFast: ", res , FCDoControl->diTrVerbose];
+
+ If[ OptionValue[ToDiracGamma67],
+ res = res /. diracTrickEvalFast[zzz_]/;!FreeQ[{zzz}, DiracGamma[5]] :> diracTrickEvalFast[ToDiracGamma67[zzz,FCI->True]]
+ ];
+
If[ !FreeQ2[res,{DiracHeadsList,diracTrickEvalFast}],
res = res /. diracTrickEvalFast -> diracTrickEval
];
@@ -181,21 +260,71 @@ create replacement rules (standard) and substitute the results back.
time=AbsoluteTime[];
FCPrint[1, "DiracTrick: Expanding the result.", FCDoControl->diTrVerbose];
res = Expand[res];
- FCPrint[1,"DiracTrace: Expanding done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[1,"DiracTrick: Expanding done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: After expanding: ", res, FCDoControl->diTrVerbose]
];
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
FCPrint[1, "DiracTrick. Leaving.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: Leaving with ", res, FCDoControl->diTrVerbose];
res
];
-diracTrickEvalFast[ex:DiracGamma[__]]:=
- ex/; !insideDiracTrace
+(* Here we can quickly handle trivial contractions of short expressions. Usually such expressions appear
+ when we call DiracTrick from DiracTrace after DotSimplify. Hence, the rules should be as simple, as possible *)
+
+
+diracTrickEvalFast[DiracChain[x_, i_, j_]]:=
+ DiracChain[diracTrickEvalFast[x],i,j];
+
+diracTrickEvalFast[x_DiracGamma]:=
+ x/; !insideDiracTrace && !diracOrder;
+
+
+diracTrickEvalFast[x_DiracGamma]:=
+ 0/; insideDiracTrace && FreeQ2[x, {DiracGamma[6],DiracGamma[7]}];
+
+diracTrickEvalFast[DiracGamma[6|7]]:=
+ (1/2)/; insideDiracTrace;
+
+
+diracTrickEvalFast[DOT[DiracGamma[ExplicitLorentzIndex[0]],DiracGamma[ExplicitLorentzIndex[0]]]]:=
+ 1;
+
+
+diracTrickEvalFast[DOT[x_DiracGamma,y__DiracGamma]]:=
+ DOT[x,y]/; FreeQ2[{x,y},{DiracGamma[5],DiracGamma[6],DiracGamma[7], ExplicitLorentzIndex[0]}] &&
+ (Sort[Cases[{x,y}, (LorentzIndex | Momentum | CartesianIndex | CartesianMomentum)[a_, ___] :> a, Infinity]] ===
+ Union[Cases[{x,y}, (LorentzIndex | Momentum | CartesianIndex | CartesianMomentum)[a_, ___] :> a, Infinity]])/; !insideDiracTrace && !diracOrder;
+
+(* Dirac trace related simplifications *)
+
+diracTrickEvalFast[DOT[b___DiracGamma,di_DiracGamma,c__DiracGamma]] :=
+ diracTrickEvalFast[DOT[c,b, di]]/; !FreeQ2[{di},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] &&
+ FreeQ2[{b,c},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}]/; insideDiracTrace;
+
+
+diracTrickEvalFast[DOT[x__DiracGamma, DiracGamma[5]]]:=
+ 0/; FreeQ2[{x},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && EvenQ[Length[{x}]] && insideDiracTrace &&
+ MatchQ[FCGetDimensions[{x}],{_Symbol}] && (FeynCalc`Package`DiracGammaScheme === "NDR-Drop");
+
+
+diracTrickEvalFast[DOT[x__DiracGamma, DiracGamma[6|7]]]:=
+ 1/2 diracTrickEvalFast[DOT[x]]/; FreeQ2[{x},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && EvenQ[Length[{x}]] && insideDiracTrace &&
+ MatchQ[FCGetDimensions[{x}],{_Symbol}] && (FeynCalc`Package`DiracGammaScheme === "NDR-Drop");
+
+diracTrickEvalFast[DOT[DiracGamma[(arg1:_[_, dim1___]),dim1___], DiracGamma[(arg2:_[_, dim2___]), dim2___]]] :=
+ FCUseCache[ExpandScalarProduct,{PairContract[arg1,arg2] /. PairContract->Pair},{}]/; insideDiracTrace;
-diracTrickEvalFast[DOT[x__DiracGamma]]:=
- 0/; FreeQ2[{x},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && OddQ[Length[{x}]] && insideDiracTrace;
+diracTrickEvalFast[DOT[DiracGamma[(arg1:_[_, dim1___]),dim1___], DiracGamma[(arg2:_[_, dim2___]), dim2___], DiracGamma[6|7]]]:=
+ 1/2 FCUseCache[ExpandScalarProduct,{PairContract[arg1,arg2] /. PairContract->Pair},{}]/; insideDiracTrace;
+
+diracTrickEvalFast[DOT[x_DiracGamma,y__DiracGamma]]:=
+ 0/; FreeQ2[{x,y},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && OddQ[Length[{x,y}]] && insideDiracTrace;
diracTrickEvalFast[DOT[x___DiracGamma,DiracGamma[5],y___DiracGamma]]:=
0/; Length[{x,y}]<4 && FreeQ2[{x,y},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && insideDiracTrace;
@@ -209,32 +338,146 @@ create replacement rules (standard) and substitute the results back.
diracTrickEvalFast[DiracGamma[6|7]]:=
1/2/; insideDiracTrace;
+diracTrickEvalFast[DOT[DiracGamma[(a:6|7)],b___,DiracGamma[(a:6|7)]]] :=
+ diracTrickEvalFast[DOT[b,DiracGamma[a]]]/; insideDiracTrace;
+
+diracTrickEvalFast[DOT[DiracGamma[(h1:5|6|7)],b___,DiracGamma[(h2:5|6|7)]]] :=
+ ga67MatSign[h1,h2] diracTrickEvalFast[DOT[b,ga67Mat[h1,h2]]]/; h1=!=h2 && insideDiracTrace;
+
+(* Generic simplifications *)
+
+diracTrickEvalFast[DOT[b___,DiracGamma[l_LorentzIndex], DiracGamma[l_LorentzIndex], d___]] :=
+ 4 diracTrickEvalFast[DOT[ b,d ]];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[l_LorentzIndex, dim_], DiracGamma[l_LorentzIndex, dim_], d___]] :=
+ dim diracTrickEvalFast[DOT[ b,d ]];
+
+diracTrickEvalFast[DOT[]]:=
+ 1;
+
+diracTrickEvalFast[DOT[b___,DiracGamma[c_Momentum], DiracGamma[c_Momentum], d___ ]] :=
+ FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracTrickEvalFast[DOT[b,d]];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[c_Momentum, dim_], DiracGamma[c_Momentum, dim_], d___]] :=
+ FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracTrickEvalFast[DOT[b,d]];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[l_LorentzIndex, dim_:4], DiracGamma[c_Momentum, dim_:4], DiracGamma[l_LorentzIndex, dim_:4], d___]] :=
+ (2 - dim) diracTrickEvalFast[DOT[ b, DiracGamma[c, dim], d ]];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[5], DiracGamma[5], d___]] :=
+ diracTrickEvalFast[DOT[ b,d ]];
+
+diracTrickEvalFast[DOT[b___, DiracGamma[5], DiracGamma[(hh:6|7)], c___]] :=
+ ga67Val1[hh] diracTrickEvalFast[DOT[b,DiracGamma[hh],c]];
+
+diracTrickEvalFast[DOT[b___, DiracGamma[(hh:6|7)], DiracGamma[5], c___]] :=
+ ga67Val1[hh] diracTrickEvalFast[DOT[b,DiracGamma[hh],c]];
+
+diracTrickEvalFast[DOT[b___, DiracGamma[(hh1:6|7)],DiracGamma[(hh2:6|7)], c___]] :=
+ ga67Val2[hh1,hh2] diracTrickEvalFast[DOT[b, DiracGamma[hh2], c]];
+
+
+diracTrickEvalFast[DOT[b___,DiracGamma[5], c:DiracGamma[_[_,_],_].. , d___]] :=
+ (-1)^Length[{c}] diracTrickEvalFast[DOT[ b,c,DiracGamma[5],d]]/; MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{c}],{_Symbol}];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_,_],_].. ,d___]] :=
+ diracTrickEvalFast[DOT[ b,c,DiracGamma[h],d]]/; EvenQ[Length[{c}]] && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{c}],{_Symbol}];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_,_],_].. ,d___]] :=
+ diracTrickEvalFast[DOT[ b,c,DiracGamma[ga67Switch1[h]],d]]/; OddQ[Length[{c}]] && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{c}],{_Symbol}];
+
+diracTrickEvalFast[DOT[___,DiracGamma[(h:6|7)],DiracGamma[_[_,_],_], DiracGamma[(h:6|7)], ___]] :=
+ 0/; MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]), DiracGamma[(h2:6|7)], c___]] :=
+ diracTrickEvalFast[DOT[b, dg, DiracGamma[h2], c]]/; h1=!=h2 && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{dg}],{_Symbol}];
+
+diracTrickEvalFast[DOT[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]), xy:DiracGamma[_[_] ].. , DiracGamma[(h2:6|7)], c___]] :=
+ diracTrickEvalFast[DOT[b, dg, xy, DiracGamma[h2], c]]/; EvenQ[Length[{xy}]] && h1=!=h2 && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{dg,xy}],{_Symbol}];
+
+diracTrickEvalFast[DOT[___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]), xy:DiracGamma[_[_] ].. , DiracGamma[(h:6|7)], ___]] :=
+ 0/; EvenQ[Length[{xy}]] && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{dg,xy}],{_Symbol}];
+
+
+diracTrickEvalFast[DOT[___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]), xy:DiracGamma[_[_,_],_].. , DiracGamma[(h2:6|7)], ___]] :=
+ 0/; OddQ[Length[{xy}]] && h1=!=h2 && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{dg,xy}],{_Symbol}];
+
+diracTrickEvalFast[DOT[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]), xy:DiracGamma[_[_,_],_].. , DiracGamma[(h:6|7)], c___]] :=
+ diracTrickEvalFast[DOT[b, dg, xy, DiracGamma[h], c]]/; OddQ[Length[{xy}]] && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] &&
+ MatchQ[FCGetDimensions[{dg,xy}],{_Symbol}];
+
+
+diracTrickEvalFast[DOT[b___,DiracGamma[5], c:DiracGamma[_[_]].. , d___]] :=
+ (-1)^Length[{c}] diracTrickEvalFast[DOT[ b,c,DiracGamma[5],d]];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_]].. ,d___]] :=
+ diracTrickEvalFast[DOT[ b,c,DiracGamma[h],d]]/; EvenQ[Length[{c}]];
+
+diracTrickEvalFast[DOT[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_]].. ,d___]] :=
+ diracTrickEvalFast[DOT[ b,c,DiracGamma[ga67Switch1[h]],d]]/; OddQ[Length[{c}]];
+
+diracTrickEvalFast[DOT[___,DiracGamma[(h:6|7)],DiracGamma[_[_]], DiracGamma[(h:6|7)], ___]] :=
+ 0;
+
+diracTrickEvalFast[DOT[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]), DiracGamma[(h2:6|7)], c___]] :=
+ diracTrickEvalFast[DOT[b, dg, DiracGamma[h2], c]]/; h1=!=h2;
+
+diracTrickEvalFast[DOT[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]), xy:DiracGamma[_[_] ].. , DiracGamma[(h2:6|7)], c___]] :=
+ diracTrickEvalFast[DOT[b, dg, xy, DiracGamma[h2], c]]/; EvenQ[Length[{xy}]] && h1=!=h2;
+
+diracTrickEvalFast[DOT[___, DiracGamma[(h:6|7)],DiracGamma[_[_]], xy:DiracGamma[_[_] ].. , DiracGamma[(h:6|7)], ___]] :=
+ 0/; EvenQ[Length[{xy}]];
+
+diracTrickEvalFast[DOT[___, DiracGamma[(h1:6|7)],DiracGamma[_[_]], xy:DiracGamma[_[_]].. , DiracGamma[(h2:6|7)], ___]] :=
+ 0/; OddQ[Length[{xy}]] && h1=!=h2;
+
+diracTrickEvalFast[DOT[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_]]), xy:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], c___]] :=
+ diracTrickEvalFast[DOT[b, dg, xy, DiracGamma[h], c]]/; OddQ[Length[{xy}]];
+
+diracTrickEval[0]:=
+ 0;
+
+diracTrickEval[ex_DiracGamma]:=
+ ex/; !insideDiracTrace;
+
+diracTrickEval[ex_DiracGamma]:=
+ 0/; insideDiracTrace && !MatchQ[ex,DiracGamma[6|7]];
+
+diracTrickEval[ex_DiracGamma]:=
+ 1/2/; insideDiracTrace && MatchQ[ex, DiracGamma[6|7]];
diracTrickEval[ex_/;Head[ex]=!=DiracGamma]:=
Which[
(* NDR, inside Trace *)
- !$BreitMaison && !$Larin && insideDiracTrace,
+ MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme] && insideDiracTrace,
diracTrickEvalCachedNDRInsideTrace[ex],
(* Larin, inside Trace *)
- !$BreitMaison && $Larin && insideDiracTrace,
+ (FeynCalc`Package`DiracGammaScheme === "Larin") && insideDiracTrace,
diracTrickEvalCachedLarinInsideTrace[ex],
(* BMHV, inside Trace *)
- $BreitMaison && !$Larin && insideDiracTrace,
+ (FeynCalc`Package`DiracGammaScheme === "BMHV") && insideDiracTrace,
diracTrickEvalCachedBMHVInsideTrace[ex],
(* NDR *)
- !$BreitMaison && !$Larin,
+ MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme],
diracTrickEvalCachedNDR[ex],
(* Larin *)
- !$BreitMaison && $Larin,
+ (FeynCalc`Package`DiracGammaScheme === "Larin"),
diracTrickEvalCachedLarin[ex],
(* BMHV *)
- $BreitMaison && !$Larin,
+ (FeynCalc`Package`DiracGammaScheme === "BMHV"),
diracTrickEvalCachedBMHV[ex],
(* Else *)
True,
- Message[DiracTrick::failmsg,"Incorrect combination of dimensions and g^5 scheme!"];
+ Message[DiracTrace::mixmsg];
Abort[]
- ];
+ ]/; ex=!=0;
diracTrickEvalCachedNDRInsideTrace[x_] :=
diracTrickEvalInternal[x];
@@ -277,12 +520,11 @@ create replacement rules (standard) and substitute the results back.
diracTrickEvalInternal[ex_/;Head[ex]=!=DiracGamma]:=
Block[{res=ex, holdDOT, time, dim, gamma5Present,noncommPresent,null1,null2,dsHead},
- FCPrint[1, "DiracTrick: diracTrickEval: Entering.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Entering.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: Entering with", ex , FCDoControl->diTrVerbose];
gamma5Present = !FreeQ2[ex,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}];
noncommPresent = !NonCommFreeQ[ex/.DiracGamma->diga];
- dim = FCGetDimensions[ex/.DiracGamma[5|6|7]:>diga];
FCPrint[3, "DiracTrick: diracTrickEval: g^5 present:", gamma5Present, FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: unknown non-commutative objects present:", noncommPresent, FCDoControl->diTrVerbose];
@@ -301,10 +543,10 @@ create replacement rules (standard) and substitute the results back.
If[ insideDiracTrace,
time=AbsoluteTime[];
- FCPrint[1, "DiracTrick: diracTrickEval: Applying diracTraceSimplify ", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Applying diracTraceSimplify ", FCDoControl->diTrVerbose];
res = diracTraceSimplify[res] /. DOT -> holdDOT /. diracTraceSimplify[holdDOT[x__]] :> diracTraceSimplify[x]/.
diracTraceSimplify -> commonGamma5Properties /. commonGamma5Properties -> holdDOT;
- FCPrint[1,"DiracTrace: diracTrickEval: diracTraceSimplify done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[1,"DiracTrick: diracTrickEval: diracTraceSimplify done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: After diracTraceSimplify ", res, FCDoControl->diTrVerbose],
res = res /. DOT -> holdDOT;
];
@@ -313,11 +555,18 @@ create replacement rules (standard) and substitute the results back.
res = Expand2[res,Pair]/. Pair->PairContract /. PairContract->Pair;
];
+ If[ !FreeQ[res,CartesianPair],
+ res = Expand2[res,CartesianPair]/. CartesianPair->CartesianPairContract /. CartesianPairContract->CartesianPair;
+ ];
+
+
If[ FreeQ2[res,DiracHeadsList],
Return[res]
];
- dim = FCGetDimensions[res/.DiracGamma[5|6|7]:>diga];
+ dim = FCGetDimensions[res, FreeQ->{DiracGamma[5],DiracGamma[6],DiracGamma[7]}, ChangeDimension->True];
+
+
noncommPresent = !NonCommFreeQ[res/.DiracGamma->diga];
FCPrint[3, "DiracTrick: diracTrickEval: Dimensions:", dim, FCDoControl->diTrVerbose];
@@ -325,83 +574,89 @@ create replacement rules (standard) and substitute the results back.
If[ gamma5Present,
time=AbsoluteTime[];
- FCPrint[1, "DiracTrick: diracTrickEval: Applying chiralTrick ", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Applying chiralTrick ", FCDoControl->diTrVerbose];
Which[
(* Purely 4-dimensional -> use anticommuting g^5 *)
- dim==={4},
- FCPrint[1, "DiracTrick: diracTrickEval: Purely 4-dim.", FCDoControl->diTrVerbose];
- res = res /. holdDOT -> chiralTrickAnticommuting4Dim;
- res = FixedPoint[(# /. chiralTrickAnticommuting4Dim -> commonGamma5Properties /.
- commonGamma5Properties -> chiralTrickAnticommuting4Dim)&,res];
- res = res /. chiralTrickAnticommuting4Dim -> holdDOT,
+ MatchQ[dim,{4}],
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely 4-dim.", FCDoControl->diTrVerbose];
+ res = res /. holdDOT -> chiralTrickAnticommuting4DimRight;
+ res = FixedPoint[(# /. chiralTrickAnticommuting4DimRight -> commonGamma5Properties /.
+ commonGamma5Properties -> chiralTrickAnticommuting4DimRight)&,res];
+ res = res /. chiralTrickAnticommuting4DimRight -> holdDOT,
(* Purely D-dimensional and NDR -> use anticommuting g^5 *)
- MatchQ[dim,{_Symbol}] && !$BreitMaison && !$Larin,
- FCPrint[1, "DiracTrick: diracTrickEval: Purely D-dim, NDR.", FCDoControl->diTrVerbose];
- res = res /. holdDOT -> chiralTrickAnticommutingDDim;
- res = FixedPoint[(# /. chiralTrickAnticommutingDDim -> commonGamma5Properties /.
- commonGamma5Properties -> chiralTrickAnticommutingDDim)&,res];
- res = res /. chiralTrickAnticommutingDDim -> holdDOT,
+ MatchQ[dim,{_Symbol}] && MemberQ[{"NDR","NDR-Drop"},FeynCalc`Package`DiracGammaScheme],
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely D-dim, NDR.", FCDoControl->diTrVerbose];
+ res = res /. holdDOT -> chiralTrickAnticommutingDDimRight;
+ res = FixedPoint[(# /. chiralTrickAnticommutingDDimRight -> commonGamma5Properties /.
+ commonGamma5Properties -> chiralTrickAnticommutingDDimRight)&,res];
+ res = res /. chiralTrickAnticommutingDDimRight -> holdDOT,
(* Purely D-dimensional and BMHV -> don't move anything around *)
- MatchQ[dim,{_Symbol}] && ($BreitMaison && !$Larin),
- FCPrint[1, "DiracTrick: diracTrickEval: Purely D-dim and Larin.", FCDoControl->diTrVerbose];
+ MatchQ[dim,{_Symbol}] && (FeynCalc`Package`DiracGammaScheme === "BMHV"),
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely D-dim and BMHV.", FCDoControl->diTrVerbose];
Null,
(* Purely D-dimensional and Larin use the substitution rule to eliminate g^5 that are not on the left of the trace *)
- MatchQ[dim,{_Symbol}] && (!$BreitMaison && $Larin),
- FCPrint[1, "DiracTrick: diracTrickEval: Purely D-dim and Larin.", FCDoControl->diTrVerbose];
+ MatchQ[dim,{_Symbol}] && (FeynCalc`Package`DiracGammaScheme === "Larin"),
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely D-dim and Larin.", FCDoControl->diTrVerbose];
res = res /. holdDOT -> chiralTrickLarin /. chiralTrickLarin -> holdDOT,
(* Mixed and BMHV -> don't move g^5 around *)
- MatchQ[dim, {_Symbol - 4} | {4, _Symbol} | {4, _Symbol-4} | {_Symbol-4, _Symbol} | {4, _Symbol-4, _Symbol}] && $BreitMaison && !$Larin,
+ dim=!={} && (FeynCalc`Package`DiracGammaScheme === "BMHV"),
FCPrint[1, "DiracTrick: diracTrickEval: Mixed and BMHV.", FCDoControl->diTrVerbose],
- (* special case that the expression contains only chiral matrices*)
- dim==={} !FreeQ2[res,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && FreeQ[(res/.DiracGamma[5|6|7]:>diga),DiracGamma],
- FCPrint[1, "DiracTrick: diracTrickEval: Chiral only.", FCDoControl->diTrVerbose],
+ (* special case that the expression contains only chiral or g^0 matrices*)
+ dim==={} && !FreeQ2[res,{DiracGamma[5],DiracGamma[6],DiracGamma[7],DiracGamma[ExplicitLorentzIndex[0]]}] && FreeQ[(res/.DiracGamma[5|6|7|ExplicitLorentzIndex[0]]:>diga),DiracGamma],
+ FCPrint[2, "DiracTrick: diracTrickEval: Chiral or g^0 only.", FCDoControl->diTrVerbose],
(* Anything else is most likely an error *)
True,
- Message[DiracTrick::failmsg,"Incorrect combination of dimensions and g^5 scheme!"];
+ Message[DiracTrace::mixmsg];
Abort[]
];
- FCPrint[1,"DiracTrace: diracTrickEval: chiralTrick done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[2,"DiracTrick: diracTrickEval: chiralTrick done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: After chiralTrick ", res, FCDoControl->diTrVerbose];
gamma5Present = !FreeQ2[res,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}]
];
(* Here we do all the simplifications not realted to g^5 *)
- FCPrint[1, "DiracTrick: diracTrickEval: Doing simplifications unrelated to g^5.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Doing simplifications unrelated to g^5.", FCDoControl->diTrVerbose];
Which[
(* Purely 4-dimensional *)
- dim==={4},
- FCPrint[1, "DiracTrick: diracTrickEval: Purely 4-dim.", FCDoControl->diTrVerbose];
- FCPrint[1, "DiracTrick: diracTrickEval: Applying diracology4Dim.", FCDoControl->diTrVerbose];
+ MatchQ[dim,{4}],
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely 4-dim.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Applying diracology4Dim.", FCDoControl->diTrVerbose];
res = res /. holdDOT -> diracology4Dim /. diracology4Dim -> holdDOT;
FCPrint[3, "DiracTrick: diracTrickEval: After diracology4Dim: ", res, FCDoControl->diTrVerbose],
(* Purely D-dimensional *)
MatchQ[dim,{_Symbol}],
- FCPrint[1, "DiracTrick: diracTrickEval: Purely D-dim.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely D-dim.", FCDoControl->diTrVerbose];
res = res /. holdDOT -> diracologyDDim;
res = FixedPoint[(# /. diracologyDDim -> diracologyDDim2 /. diracologyDDim2 -> diracologyDDim)&,res];
res = res /. diracologyDDim -> holdDOT,
(* Purely D-4-dimensional and BMHV *)
- MatchQ[dim,{_Symbol - 4}] && $BreitMaison && !$Larin,
- FCPrint[1, "DiracTrick: diracTrickEval: Purely D-4-dim.", FCDoControl->diTrVerbose];
+ MatchQ[dim,{_Symbol - 4}] && (FeynCalc`Package`DiracGammaScheme === "BMHV"),
+ FCPrint[2, "DiracTrick: diracTrickEval: Purely D-4-dim.", FCDoControl->diTrVerbose];
res = res /. holdDOT -> diracologyDDim;
res = FixedPoint[(# /. diracologyDDim -> diracologyDDim2 /. diracologyDDim2 -> diracologyDDim)&,res];
res = res /. diracologyDDim -> holdDOT,
(* Mixed and BMHV *)
- MatchQ[dim, {4, _Symbol} | {4, _Symbol-4} | {_Symbol-4, _Symbol} | {4, _Symbol-4, _Symbol}] && $BreitMaison && !$Larin,
- FCPrint[1, "DiracTrick: diracTrickEval: Mixed and BMHV.", FCDoControl->diTrVerbose];
+ dim=!={} && (FeynCalc`Package`DiracGammaScheme === "BMHV"),
+ FCPrint[2, "DiracTrick: diracTrickEval: Mixed and BMHV.", FCDoControl->diTrVerbose];
res = res /. holdDOT -> diracologyBMHV1;
res = FixedPoint[(# /. diracologyBMHV1 -> diracologyBMHV2 /. diracologyBMHV2 -> diracologyBMHV1)&,res];
res = res /. diracologyBMHV1 -> holdDOT,
- (* special case that the expression contains only chiral matrices*)
- dim==={} !FreeQ2[res,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && FreeQ[(res/.DiracGamma[5|6|7]:>diga),DiracGamma],
- FCPrint[1, "DiracTrick: diracTrickEval: Chiral only.", FCDoControl->diTrVerbose],
- (* Anything else is most likely an error *)
- True,
- Message[DiracTrick::failmsg,"Incorrect combination of dimensions and g^5 scheme!"];
- Abort[]
+ (* special case that the expression contains only g^0 matrices*)
+ dim==={} && !FreeQ2[res,{DiracGamma[ExplicitLorentzIndex[0]]}] && FreeQ[(res/.DiracGamma[ExplicitLorentzIndex[0]]:>diga),DiracGamma],
+ FCPrint[2, "DiracTrick: diracTrickEval: Only g^0 matrices.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Applying diracology4Dim.", FCDoControl->diTrVerbose];
+ res = res /. holdDOT -> diracology4Dim /. diracology4Dim -> holdDOT;
+ FCPrint[3, "DiracTrick: diracTrickEval: After diracology4Dim: ", res, FCDoControl->diTrVerbose],
+ (* special case that the expression contains only chiral or g^0 matrices*)
+ dim==={} !FreeQ2[res,{DiracGamma[5],DiracGamma[6],DiracGamma[7],DiracGamma[ExplicitLorentzIndex[0]]}] && FreeQ[(res/.DiracGamma[5|6|7|ExplicitLorentzIndex[0]]:>diga),DiracGamma],
+ FCPrint[2, "DiracTrick: diracTrickEval: Chiral or g^0 only.", FCDoControl->diTrVerbose],
+ (* Anything else is most likely an error *)
+ True,
+ Message[DiracTrace::mixmsg];
+ Abort[]
];
- FCPrint[1, "DiracTrick: diracTrickEval: Done with simplifications unrelated to g^5.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Done with simplifications unrelated to g^5.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: After simplifications unrelated to g^5: ", res , FCDoControl->diTrVerbose];
If[ FreeQ2[res,DiracHeadsList],
@@ -409,16 +664,16 @@ create replacement rules (standard) and substitute the results back.
];
(* For BMHV we need to handle g^5 again here*)
- If[ gamma5Present && $BreitMaison && !$Larin,
- FCPrint[1, "DiracTrick: diracTrickEval: Doing special simplifications for the BMHV scheme.", FCDoControl->diTrVerbose];
- res = res /. holdDOT -> gamma5MoveBMHV;
- res = FixedPoint[(# /. gamma5MoveBMHV -> commonGamma5Properties /.
- commonGamma5Properties -> chiralTrickAnticommuting4Dim /. chiralTrickAnticommuting4Dim -> gamma5MoveBMHV)&,res];
- FCPrint[1, "DiracTrick: diracTrickEval: Additional simplifications of g^5 in BMHV.", FCDoControl->diTrVerbose];
- res = res /. gamma5MoveBMHV -> diracologyBMHV1;
+ If[ gamma5Present && (FeynCalc`Package`DiracGammaScheme === "BMHV"),
+ FCPrint[2, "DiracTrick: diracTrickEval: Doing special simplifications for the BMHV scheme.", FCDoControl->diTrVerbose];
+ res = res /. holdDOT -> gamma5MoveBMHVRight;
+ res = FixedPoint[(# /. gamma5MoveBMHVRight -> commonGamma5Properties /.
+ commonGamma5Properties -> chiralTrickAnticommuting4DimRight /. chiralTrickAnticommuting4DimRight -> gamma5MoveBMHVRight)&,res];
+ FCPrint[2, "DiracTrick: diracTrickEval: Additional simplifications of g^5 in BMHV.", FCDoControl->diTrVerbose];
+ res = res /. gamma5MoveBMHVRight -> diracologyBMHV1;
res = FixedPoint[(# /. diracologyBMHV1 -> diracologyBMHV2 /. diracologyBMHV2 -> diracologyBMHV1)&,res];
res = res /. diracologyBMHV1 -> holdDOT;
- FCPrint[1, "DiracTrick: diracTrickEval: Done with special simplifications for the BMHV scheme.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Done with special simplifications for the BMHV scheme.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: After special simplifications for the BMHV scheme: ", res , FCDoControl->diTrVerbose];
];
@@ -430,16 +685,16 @@ create replacement rules (standard) and substitute the results back.
If[ insideDiracTrace && res=!=0,
time=AbsoluteTime[];
- FCPrint[1, "DiracTrick: diracTrickEval: Applying diracTraceSimplify again ", FCDoControl->diTrVerbose];
- res = FCDiracIsolate[res,DotSimplify->False,FCI->True,DiracGammaCombine->False,Head->dsHead];
+ FCPrint[2, "DiracTrick: diracTrickEval: Applying diracTraceSimplify again ", FCDoControl->diTrVerbose];
+ res = FCDiracIsolate[res, DotSimplify->False, FCI->True, DiracGammaCombine->False, FCJoinDOTs->optJoin, Head->dsHead];
res = res /. {dsHead[DiracGamma[5]] :> 0, dsHead[DiracGamma[6|7]] :> 1/2 } /. DOT-> holdDOT/.
dsHead[holdDOT[x__]] :> diracTraceSimplify[x];
res = res /. diracTraceSimplify -> DOT /. dsHead-> Identity /. holdDOT -> DOT;
- FCPrint[1,"DiracTrace: diracTrickEval: diracTraceSimplify done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
+ FCPrint[2,"DiracTrick: diracTrickEval: diracTraceSimplify done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: After diracTraceSimplify ", res, FCDoControl->diTrVerbose]
];
- FCPrint[1, "DiracTrick: diracTrickEval: Leaving.", FCDoControl->diTrVerbose];
+ FCPrint[2, "DiracTrick: diracTrickEval: Leaving.", FCDoControl->diTrVerbose];
FCPrint[3, "DiracTrick: diracTrickEval: Leaving with ", res, FCDoControl->diTrVerbose];
res
];
@@ -450,64 +705,91 @@ create replacement rules (standard) and substitute the results back.
diracology4Dim[]:=
1;
-(* g^mu g^mu *)
+(* g^mu g_mu *)
diracology4Dim[b___,DiracGamma[l_LorentzIndex], DiracGamma[l_LorentzIndex], d___] :=
4 diracology4Dim[ b,d ];
+(* g^i g^i *)
+diracology4Dim[b___,DiracGamma[l_CartesianIndex], DiracGamma[l_CartesianIndex], d___] :=
+ 3 FeynCalc`Package`MetricS diracology4Dim[ b,d ];
+
+(* g^0 g^0 *)
+diracology4Dim[b___,DiracGamma[ExplicitLorentzIndex[0]], DiracGamma[ExplicitLorentzIndex[0]], d___] :=
+ diracology4Dim[ b,d ];
+
+(* g^0 g^i_1 ... g^i_n -> (-1)^n g^i_1 ... g^i_n g^0 *)
+diracology4Dim[ b___, DiracGamma[ExplicitLorentzIndex[0]], Longest[ch : DiracGamma[(_CartesianIndex | _CartesianMomentum)]..], f___ ] :=
+ (-1)^Length[{ch}] diracology4Dim[b,ch,DiracGamma[ExplicitLorentzIndex[0]],f];
+
(* g^mu g^nu g_mu *)
diracology4Dim[b___ , DiracGamma[c_LorentzIndex],
- DiracGamma[(x: LorentzIndex | ExplicitLorentzIndex | Momentum)[y_]],
+ DiracGamma[x: (_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)],
DiracGamma[c_LorentzIndex], d___] :=
- - 2 diracology4Dim[b,DiracGamma[x[y]], d];
+ - 2 diracology4Dim[b,DiracGamma[x], d];
(* g^mu g^nu g^rho g_mu *)
diracology4Dim[b___ , DiracGamma[c_LorentzIndex],
- DiracGamma[(x1: LorentzIndex | ExplicitLorentzIndex | Momentum)[y1_]],
- DiracGamma[(x2: LorentzIndex | ExplicitLorentzIndex | Momentum)[y2_]],
+ DiracGamma[x1: (_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)],
+ DiracGamma[x2: (_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)],
DiracGamma[c_LorentzIndex], d___] :=
- 4 FCUseCache[FCFastContract,{Pair[x1[y1],x2[y2]] diracology4Dim[b, d]},{}];
+ 4 FCUseCache[FCFastContract,{Pair[x1,x2] diracology4Dim[b, d]},{}];
(* g^mu g^nu g^rho g^sigma g_mu *)
diracology4Dim[b___ , DiracGamma[c_LorentzIndex],
- (dg1: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]),
- (dg2: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]),
- (dg3: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]), DiracGamma[c_LorentzIndex], d___] :=
+ (dg1: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]),
+ (dg2: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]),
+ (dg3: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]), DiracGamma[c_LorentzIndex], d___] :=
- 2 diracology4Dim[b, dg3, dg2, dg1, d];
diracology4Dim[b___ , DiracGamma[c_LorentzIndex],
- (dg1: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]),
- (dg2: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]),
- (dg3: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]),
- (dg4: DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]),
+ (dg1: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]),
+ (dg2: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]),
+ (dg3: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]),
+ (dg4: DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]),
DiracGamma[c_LorentzIndex], d___] :=
2 diracology4Dim[b, dg3, dg2, dg1, dg4, d] + 2 diracology4Dim[b, dg4, dg1, dg2, dg3, d];
(* g^mu g^nu_1 ... g^nu_i g_mu -> -2 g^nu_i ... g^nu_1, where i is odd *)
diracology4Dim[ b___, DiracGamma[c_LorentzIndex],
- ch : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]].., DiracGamma[c_LorentzIndex], f___ ] :=
+ ch : DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)].., DiracGamma[c_LorentzIndex], f___ ] :=
-2 diracology4Dim @@ Join[ {b},Reverse[{ch}],{f} ] /; OddQ[Length[{ch}]] && Length[{ch}]>3;
(* g^mu g^nu_1 ... g^nu_i g_mu -> 2 g^nu_i-1 ... g^nu_1 g^nu_i + 2 g^nu_i g^nu_1 ... g^nu_i-1, where i is even *)
diracology4Dim[ b___, DiracGamma[c_LorentzIndex],
- ch : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]..,
- end : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]],
+ ch : DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]..,
+ end : DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)],
DiracGamma[c_LorentzIndex], f___ ] :=
(2 diracology4Dim @@ Join[ {b},Reverse[{ch}],{end}, {f}] + 2 diracology4Dim[ b,end,ch,f ])/; OddQ[Length[{ch}]] && Length[{ch}]>4;
+(* g^0 g^nu_1 ... g^nu_i g^0 -> ... *)
+(* This is rather simplistic and inefficient, but for the time being ... *)
+diracology4Dim[ b___, DiracGamma[ExplicitLorentzIndex[0]],
+ ch : DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)].., DiracGamma[ExplicitLorentzIndex[0]], f___ ] :=
+ Block[{len=Length[{ch}],iVar},
+ (-1)^len diracology4Dim[b,ch,f] + Sum[2 (-1)^(iVar+1) Pair[ExplicitLorentzIndex[0],({ch}[[iVar]])[[1]]] *
+ diracology4Dim@@Join[{b},Drop[{ch}, {iVar, iVar}],{DiracGamma[ExplicitLorentzIndex[0]],f}],{iVar,1,len}]
+ ];
+
+(* g^i g^nu_1 ... g^nu_i g^i -> s ( g^mu g^nu_1 ... g^nu_i g_mu - t g^0 g^nu_1 ... g^nu_i g^0 ) *)
+diracology4Dim[ b___, DiracGamma[c_CartesianIndex],
+ ch : DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)].., DiracGamma[c_CartesianIndex], f___ ] :=
+ (
+ tmpli= LorentzIndex[$MU[Unique[]]];
+ FeynCalc`Package`MetricS (diracology4Dim[b,DiracGamma[tmpli],ch,DiracGamma[tmpli],f] -
+ FeynCalc`Package`MetricT diracology4Dim[b,DiracGamma[ExplicitLorentzIndex[0]],ch,DiracGamma[ExplicitLorentzIndex[0]],f] )
+ );
+
(* Slash(p).Slash(p) *)
diracology4Dim[b___,DiracGamma[c_Momentum], DiracGamma[c_Momentum], d___ ] :=
FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracology4Dim[b,d];
-
-
-
(* Slash(p) g^nu Slash(p) *)
-diracology4Dim[b___ , DiracGamma[c_Momentum], DiracGamma[(x: LorentzIndex | ExplicitLorentzIndex | Momentum)[y_]],
+diracology4Dim[b___ , DiracGamma[c_Momentum], DiracGamma[x: (_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)],
DiracGamma[c_Momentum], d___] :=
- - FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracology4Dim[b,DiracGamma[x[y]], d] + 2 FCUseCache[FCFastContract,{Pair[c,x[y]] diracology4Dim[b, DiracGamma[c], d]},{}];
+ - FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracology4Dim[b,DiracGamma[x], d] + 2 FCUseCache[FCFastContract,{Pair[c,x] diracology4Dim[b, DiracGamma[c], d]},{}];
(* Slash(p) g^nu_1 ... g^nu_n Slash(p), purely 4-dim; Eq 2.10 of R. Mertig, M. Boehm, A. Denner. Comp. Phys. Commun., 64 (1991) *)
-diracology4Dim[b___, DiracGamma[c_Momentum],ch:DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]..,
+diracology4Dim[b___, DiracGamma[c_Momentum],ch:DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]..,
DiracGamma[c_Momentum],f___ ] :=
Block[ {iVar, len = Length[{ch}]},
(-1)^len FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracology4Dim[b,ch,f]
@@ -515,6 +797,19 @@ create replacement rules (standard) and substitute the results back.
Drop[{ch},{iVar, iVar}],{DiracGamma[c],f}]},{}],{iVar, 1,len}]
]/; (Length[{ch}]>0);
+(* g^i g^i p^i p^j *)
+diracology4Dim[b___,DiracGamma[c_CartesianMomentum], DiracGamma[c_CartesianMomentum], d___ ] :=
+ FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracology4Dim[b,d];
+
+(* g^i g^nu_1 ... g^nu_n g^i p^i p^j *)
+diracology4Dim[b___, DiracGamma[c_CartesianMomentum],ch:DiracGamma[(_LorentzIndex | _ExplicitLorentzIndex | _Momentum | _CartesianIndex | _CartesianMomentum)]..,
+ DiracGamma[c_CartesianMomentum],f___ ] :=
+ Block[{len=Length[{ch}],iVar},
+ (-1)^len FeynCalc`Package`MetricS CartesianPair[c,c] diracology4Dim[b,ch,f] +
+ Sum[2 (-1)^(iVar+1) Pair[c,({ch}[[iVar]])[[1]]] *
+ diracology4Dim@@Join[{b},Drop[{ch}, {iVar, iVar}],{DiracGamma[c],f}],{iVar,1,len}]
+ ];
+
(* ------------------------------------------------------------------------ *)
@@ -525,6 +820,11 @@ create replacement rules (standard) and substitute the results back.
diracologyDDim[b___,DiracGamma[l_LorentzIndex, dim_], DiracGamma[l_LorentzIndex, dim_], d___] :=
dim diracologyDDim[ b,d ];
+(* g^i g^i *)
+diracologyDDim[b___,DiracGamma[l_CartesianIndex, dim_], DiracGamma[l_CartesianIndex, dim_], d___] :=
+ (dim-1) FeynCalc`Package`MetricS diracologyDDim[ b,d ];
+
+
(* g^mu g^nu g_mu *)
diracologyDDim[b___ , DiracGamma[c_LorentzIndex, dim_],
DiracGamma[(x: LorentzIndex | ExplicitLorentzIndex | Momentum)[y_, dim_], dim_],
@@ -569,13 +869,17 @@ create replacement rules (standard) and substitute the results back.
Block[ {iVar,jVar,len = Length[{ch}],dsTemp},
FCUseCache[FCFastContract,{(-1)^len ( dim - 2 len ) dsTemp[b,ch,f] - 4 (-1)^len Sum[ (-1)^(jVar-iVar) * Pair[{ch}[[iVar,1]],
{ch}[[jVar,1]] ]*dsTemp@@Join[{b}, Delete[{ch}, {{iVar},{jVar}}], {f}],{iVar,1,len-1},{jVar,iVar+1,len}]},{}]/.
- dsTemp->diracologyDDim/. Pair[aa__]/;!FreeQ[{a},Momentum] :> FCUseCache[ExpandScalarProduct,{Pair[aa]},{}]
+ dsTemp->diracologyDDim/. Pair[z__]/;!FreeQ[{z},Momentum] :> FCUseCache[ExpandScalarProduct,{Pair[z]},{}]
] /; (Length[{ch}]>4);
(* Slash(p) Slash(p) *)
diracologyDDim[b___,DiracGamma[c_Momentum, dim_], DiracGamma[c_Momentum, dim_], d___] :=
FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracologyDDim[b,d];
+(* g^i g^i p^i p^j *)
+diracologyDDim[b___,DiracGamma[c_CartesianMomentum, dim_], DiracGamma[c_CartesianMomentum, dim_], d___ ] :=
+ FCUseCache[ExpandScalarProduct,{Pair[c,c]},{}] diracologyDDim[b,d];
+
(* Slash(p) g^nu Slash(p) *)
diracologyDDim[b___ , DiracGamma[c_Momentum, dim_],
DiracGamma[(x: LorentzIndex | ExplicitLorentzIndex | Momentum)[y_, dim_] ,dim_],
@@ -629,7 +933,7 @@ create replacement rules (standard) and substitute the results back.
ga67MatSign[6,5]=
1;
-ga67MatSignt[6,7]=
+ga67MatSign[6,7]=
0;
ga67MatSign[7,5]=
@@ -654,6 +958,10 @@ create replacement rules (standard) and substitute the results back.
diracTraceSimplify[DOT[x__DiracGamma]]:=
0/; FreeQ2[{x},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && OddQ[Length[{x}]]
+
+diracTraceSimplify[DiracGamma[(arg1:_[_, dim1___]),dim1___], DiracGamma[(arg2:_[_, dim2___]), dim2___]] :=
+ FCUseCache[ExpandScalarProduct,{Pair[arg1,arg2]},{}];
+
diracTraceSimplify[DOT[x___DiracGamma,DiracGamma[6|7],y___DiracGamma]]:=
0/; OddQ[Length[{x,y}]] && FreeQ2[{x,y},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}];
@@ -680,8 +988,11 @@ create replacement rules (standard) and substitute the results back.
diracTraceSimplify[cc1_. DiracGamma[6] + cc2_. DiracGamma[7]]:=
1/2 (cc1+cc2)/; NonCommFreeQ[{cc1,cc2}];
+diracTraceSimplify[cc_. DiracGamma[6|7]]:=
+ 1/2 cc/; NonCommFreeQ[{cc}];
-(* ------------------------------------------------------------------------ *)
+diracTraceSimplify[cc1_. DiracGamma[6] + cc2_. DiracGamma[7]]:=
+ 1/2 (cc1+cc2)/; NonCommFreeQ[{cc1,cc2}];
ga67Val1[7]=
-1;
@@ -734,7 +1045,8 @@ create replacement rules (standard) and substitute the results back.
commonGamma5Properties[b___,cc_. DiracGamma[6]+ cc_. DiracGamma[7],c___] :=
cc commonGamma5Properties[b, c]/; NonCommFreeQ[{cc}];
-(* ------------------------------------------------------------------------ *)
+commonGamma5Properties[___,0,___]:=
+ 0;
ga67Switch1[7]=
6;
@@ -742,110 +1054,243 @@ create replacement rules (standard) and substitute the results back.
ga67Switch1[6]=
7;
-chiralTrickAnticommuting4Dim[b___,DiracGamma[5], c:DiracGamma[_[_]].. , d___] :=
- (-1)^Length[{c}] chiralTrickAnticommuting4Dim[ b,c,DiracGamma[5],d];
+(* Move g^5 to the right: *)
+
+chiralTrickAnticommuting4DimRight[b___,DiracGamma[5], c:DiracGamma[_[_]].. , d___] :=
+ (-1)^Length[{c}] chiralTrickAnticommuting4DimRight[ b,c,DiracGamma[5],d];
+
+chiralTrickAnticommuting4DimRight[b___, DiracGamma[5], (dd1_. (dg:DiracGamma[_[_]]) + dd2_:0 ),d___ ] :=
+ chiralTrickAnticommuting4DimRight[b,(- dd1 dg + dd2), DiracGamma[5],d ]/; NonCommFreeQ[{dd1,dd2}];
+
+chiralTrickAnticommuting4DimRight[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_]].. ,d___] :=
+ chiralTrickAnticommuting4DimRight[ b,c,DiracGamma[h],d]/; EvenQ[Length[{c}]];
+
+chiralTrickAnticommuting4DimRight[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_]].. ,d___] :=
+ chiralTrickAnticommuting4DimRight[ b,c,DiracGamma[ga67Switch1[h]],d]/; OddQ[Length[{c}]];
+
+chiralTrickAnticommuting4DimRight[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), (dd1_. DiracGamma[6] + dd2_. DiracGamma[7]),d___ ] :=
+ chiralTrickAnticommuting4DimRight[b, (cc1 dd1 DiracGamma[6] + cc2 dd2 DiracGamma[7]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommuting4DimRight[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), dd1_. (c:DiracGamma[_[_]]) + dd2_:0, d___ ] :=
+ (
+ dd1 chiralTrickAnticommuting4DimRight[b, c, (cc1 DiracGamma[7] + cc2 DiracGamma[6]), d] +
+ dd2 chiralTrickAnticommuting4DimRight[b, (cc1 DiracGamma[6] + cc2 DiracGamma[7]), d]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommuting4DimRight[b___, (cc1_. + cc2_. DiracGamma[5]), dd1_. (c:DiracGamma[_[_]]) + dd2_:0, d___ ] :=
+ (
+ cc1 chiralTrickAnticommuting4DimRight[b, dd1 c + dd2 , d] -
+ cc2 chiralTrickAnticommuting4DimRight[b, dd1 c - dd2 , DiracGamma[5], d]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommuting4DimRight[b___,(cc2_. DiracGamma[(h:6|7)] + cc1_:0),(dd1_. (dg:DiracGamma[_[_]]) + dd2_:0),d___ ] :=
+ (
+ dd1 chiralTrickAnticommuting4DimRight[b,dg, (cc1 + cc2 DiracGamma[ga67Switch1[h]]),d ] +
+ dd2 chiralTrickAnticommuting4DimRight[b, (cc1 + cc2 DiracGamma[h]),d ]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}]
+
+chiralTrickAnticommuting4DimRight[b___, DiracGamma[(h1:6|7)],DiracGamma[_[_]] + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h2:6|7)], c___] :=
+ mass chiralTrickAnticommuting4DimRight[b, xy, DiracGamma[h2], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommuting4DimRight[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], c___] :=
+ chiralTrickAnticommuting4DimRight[b, dg, xy, DiracGamma[h], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass];
+
+chiralTrickAnticommuting4DimRight[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommuting4DimRight[b, dg, xy, DiracGamma[h2], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommuting4DimRight[b___, DiracGamma[(h:6|7)],DiracGamma[_[_]] + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommuting4DimRight[b, xy, DiracGamma[h], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass];
+
+chiralTrickAnticommuting4DimRight[b___,DiracGamma[(h:6|7)],DiracGamma[_[_]] + mass_:0, DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommuting4DimRight[b, DiracGamma[h], c]/; NonCommFreeQ[mass];
-chiralTrickAnticommuting4Dim[b___, DiracGamma[5], (dd1_. (dg:DiracGamma[_[_]]) + dd2_:0 ),d___ ] :=
- chiralTrickAnticommuting4Dim[b,(- dd1 dg + dd2), DiracGamma[5],d ]/; NonCommFreeQ[{dd1,dd2}];
+chiralTrickAnticommuting4DimRight[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommuting4DimRight[b, dg, DiracGamma[h2], c]/; NonCommFreeQ[mass] && h1=!=h2;
-chiralTrickAnticommuting4Dim[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_]].. ,d___] :=
- chiralTrickAnticommuting4Dim[ b,c,DiracGamma[h],d]/; EvenQ[Length[{c}]];
+chiralTrickAnticommuting4DimRight[b___,DiracGamma[(h:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, c___] :=
+ (chiralTrickAnticommuting4DimRight[b, dg, DiracGamma[ga67Switch1[h]], c] +
+ mass chiralTrickAnticommuting4DimRight[b, DiracGamma[h], c])/; NonCommFreeQ[mass];
-chiralTrickAnticommuting4Dim[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_]].. ,d___] :=
- chiralTrickAnticommuting4Dim[ b,c,DiracGamma[ga67Switch1[h]],d]/; OddQ[Length[{c}]];
-chiralTrickAnticommuting4Dim[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), (dd1_. DiracGamma[6] + dd2_. DiracGamma[7]),d___ ] :=
- chiralTrickAnticommuting4Dim[b, (cc1 dd1 DiracGamma[6] + cc2 dd2 DiracGamma[7]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+(* Move g^5 to the left: *)
-chiralTrickAnticommuting4Dim[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), dd1_. (c:DiracGamma[_[_]]) + dd2_:0, d___ ] :=
+chiralTrickAnticommuting4DimLeft[b___, c:DiracGamma[_[_]].. , DiracGamma[5], d___] :=
+ (-1)^Length[{c}] chiralTrickAnticommuting4DimLeft[ b,DiracGamma[5],c,d];
+
+chiralTrickAnticommuting4DimLeft[b___, (dd1_. (dg:DiracGamma[_[_]]) + dd2_:0 ), DiracGamma[5], d___ ] :=
+ chiralTrickAnticommuting4DimLeft[b, DiracGamma[5], (- dd1 dg + dd2), d ]/; NonCommFreeQ[{dd1,dd2}];
+
+chiralTrickAnticommuting4DimLeft[b___, c:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], d___] :=
+ chiralTrickAnticommuting4DimLeft[ b,DiracGamma[h],c,d]/; EvenQ[Length[{c}]];
+
+chiralTrickAnticommuting4DimLeft[b___, c:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], d___] :=
+ chiralTrickAnticommuting4DimLeft[ b,DiracGamma[ga67Switch1[h]],c,d]/; OddQ[Length[{c}]];
+
+chiralTrickAnticommuting4DimLeft[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), (dd1_. DiracGamma[6] + dd2_. DiracGamma[7]),d___ ] :=
+ chiralTrickAnticommuting4DimLeft[b, (cc1 dd1 DiracGamma[6] + cc2 dd2 DiracGamma[7]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommuting4DimLeft[b___, dd1_. (c:DiracGamma[_[_]]) + dd2_:0, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), d___ ] :=
(
- dd1 chiralTrickAnticommuting4Dim[b, c, (cc1 DiracGamma[7] + cc2 DiracGamma[6]), d] +
- dd2 chiralTrickAnticommuting4Dim[b, (cc1 DiracGamma[6] + cc2 DiracGamma[7]), d]
+ dd1 chiralTrickAnticommuting4DimLeft[b, (cc1 DiracGamma[7] + cc2 DiracGamma[6]), c, d] +
+ dd2 chiralTrickAnticommuting4DimLeft[b, (cc1 DiracGamma[6] + cc2 DiracGamma[7]), d]
)/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
-Off[Optional::opdef];
-chiralTrickAnticommuting4Dim[b___, (cc1_:0 + cc2_. DiracGamma[(h:6|7)]),(dd1_. (dg:DiracGamma[_[_]]) + dd2_:0),d___ ] :=
- chiralTrickAnticommuting4Dim[b,(dd1 dg + dd2), (cc1 + cc2 DiracGamma[ga67Switch1[h]]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
-On[Optional::opdef];
+chiralTrickAnticommuting4DimLeft[b___, dd1_. (c:DiracGamma[_[_]]) + dd2_:0, (cc1_. + cc2_. DiracGamma[5]), d___ ] :=
+ (
+ cc1 chiralTrickAnticommuting4DimLeft[b, dd1 c + dd2 , d] -
+ cc2 chiralTrickAnticommuting4DimLeft[b, DiracGamma[5], dd1 c - dd2, d]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
-chiralTrickAnticommuting4Dim[b___, DiracGamma[(h1:6|7)],DiracGamma[_[_]] + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h2:6|7)], c___] :=
- mass chiralTrickAnticommuting4Dim[b, xy, DiracGamma[h2], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+chiralTrickAnticommuting4DimLeft[b___,(dd1_. (dg:DiracGamma[_[_]]) + dd2_:0),(cc2_. DiracGamma[(h:6|7)] + cc1_:0),d___ ] :=
+ (
+ dd1 chiralTrickAnticommuting4DimLeft[b,(cc1 + cc2 DiracGamma[ga67Switch1[h]]), dg, d ] +
+ dd2 chiralTrickAnticommuting4DimLeft[b, (cc1 + cc2 DiracGamma[h]),d ]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}]
+
+chiralTrickAnticommuting4DimLeft[b___, DiracGamma[(h1:6|7)],DiracGamma[_[_]] + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h2:6|7)], c___] :=
+ mass chiralTrickAnticommuting4DimLeft[b, DiracGamma[h1], xy, c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommuting4DimLeft[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], c___] :=
+ chiralTrickAnticommuting4DimLeft[b, DiracGamma[h], dg, xy, c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass];
-chiralTrickAnticommuting4Dim[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], c___] :=
- chiralTrickAnticommuting4Dim[b, dg, xy, DiracGamma[h], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass];
+chiralTrickAnticommuting4DimLeft[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommuting4DimLeft[b, DiracGamma[h1], dg, xy, c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
-chiralTrickAnticommuting4Dim[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h2:6|7)], c___] :=
- chiralTrickAnticommuting4Dim[b, dg, xy, DiracGamma[h2], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+chiralTrickAnticommuting4DimLeft[b___, DiracGamma[(h:6|7)],DiracGamma[_[_]] + mass_:0, xy:DiracGamma[_[_]].. , DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommuting4DimLeft[b, DiracGamma[h], xy, c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass];
-chiralTrickAnticommuting4Dim[b___, DiracGamma[(h:6|7)],DiracGamma[_[_]] + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h:6|7)], c___] :=
- mass chiralTrickAnticommuting4Dim[b, xy, DiracGamma[h], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass];
+chiralTrickAnticommuting4DimLeft[b___,DiracGamma[(h:6|7)],DiracGamma[_[_]] + mass_:0, DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommuting4DimLeft[b, DiracGamma[h], c]/; NonCommFreeQ[mass];
-chiralTrickAnticommuting4Dim[b___,DiracGamma[(h:6|7)],DiracGamma[_[_]] + mass_:0, DiracGamma[(h:6|7)], c___] :=
- mass chiralTrickAnticommuting4Dim[b, DiracGamma[h], c]/; NonCommFreeQ[mass];
+chiralTrickAnticommuting4DimLeft[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommuting4DimLeft[b, DiracGamma[h1], dg, c]/; NonCommFreeQ[mass] && h1=!=h2;
-chiralTrickAnticommuting4Dim[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, DiracGamma[(h2:6|7)], c___] :=
- chiralTrickAnticommuting4Dim[b, dg, DiracGamma[h2], c]/; NonCommFreeQ[mass] && h1=!=h2;
+chiralTrickAnticommuting4DimLeft[b___,(dg:DiracGamma[_[_]]) + mass_:0, DiracGamma[(h:6|7)], c___] :=
+ (chiralTrickAnticommuting4DimLeft[b, DiracGamma[ga67Switch1[h]], dg, c] +
+ mass chiralTrickAnticommuting4DimLeft[b, DiracGamma[h], c])/; NonCommFreeQ[mass];
-chiralTrickAnticommuting4Dim[b___,DiracGamma[(h:6|7)],(dg:DiracGamma[_[_]]) + mass_:0, c___] :=
- (chiralTrickAnticommuting4Dim[b, dg, DiracGamma[ga67Switch1[h]], c] +
- mass chiralTrickAnticommuting4Dim[b, DiracGamma[h], c])/; NonCommFreeQ[mass];
(* ------------------------------------------------------------------------ *)
-chiralTrickAnticommutingDDim[b___,DiracGamma[5], c:DiracGamma[_[_,_],_].. , d___] :=
- (-1)^Length[{c}] chiralTrickAnticommutingDDim[ b,c,DiracGamma[5],d];
+(* Move g^5 to the right: *)
-chiralTrickAnticommutingDDim[b___, DiracGamma[5], (dd1_. (dg:DiracGamma[_[_,_],_]) + dd2_:0 ),d___ ] :=
- chiralTrickAnticommutingDDim[b,(- dd1 dg + dd2), DiracGamma[5],d ]/; NonCommFreeQ[{dd1,dd2}];
+chiralTrickAnticommutingDDimRight[b___,DiracGamma[5], c:DiracGamma[_[_,_],_].. , d___] :=
+ (-1)^Length[{c}] chiralTrickAnticommutingDDimRight[ b,c,DiracGamma[5],d];
-chiralTrickAnticommutingDDim[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_,_],_].. ,d___] :=
- chiralTrickAnticommutingDDim[ b,c,DiracGamma[h],d]/; EvenQ[Length[{c}]];
+chiralTrickAnticommutingDDimRight[b___, DiracGamma[5], (dd1_. (dg:DiracGamma[_[_,_],_]) + dd2_:0 ),d___ ] :=
+ chiralTrickAnticommutingDDimRight[b,(- dd1 dg + dd2), DiracGamma[5],d ]/; NonCommFreeQ[{dd1,dd2}];
-chiralTrickAnticommutingDDim[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_,_],_].. ,d___] :=
- chiralTrickAnticommutingDDim[ b,c,DiracGamma[ga67Switch1[h]],d]/; OddQ[Length[{c}]];
+chiralTrickAnticommutingDDimRight[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_,_],_].. ,d___] :=
+ chiralTrickAnticommutingDDimRight[ b,c,DiracGamma[h],d]/; EvenQ[Length[{c}]];
-chiralTrickAnticommutingDDim[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), (dd1_. DiracGamma[6] + dd2_. DiracGamma[7]),d___ ] :=
- chiralTrickAnticommutingDDim[b, (cc1 dd1 DiracGamma[6] + cc2 dd2 DiracGamma[7]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+chiralTrickAnticommutingDDimRight[b___,DiracGamma[(h:6|7)], c:DiracGamma[_[_,_],_].. ,d___] :=
+ chiralTrickAnticommutingDDimRight[ b,c,DiracGamma[ga67Switch1[h]],d]/; OddQ[Length[{c}]];
+
+chiralTrickAnticommutingDDimRight[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), (dd1_. DiracGamma[6] + dd2_. DiracGamma[7]),d___ ] :=
+ chiralTrickAnticommutingDDimRight[b, (cc1 dd1 DiracGamma[6] + cc2 dd2 DiracGamma[7]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommutingDDimRight[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), dd1_. (c:DiracGamma[_[_,_],_]) + dd2_:0, d___ ] :=
+ (
+ dd1 chiralTrickAnticommutingDDimRight[b, c, (cc1 DiracGamma[7] + cc2 DiracGamma[6]), d] +
+ dd2 chiralTrickAnticommutingDDimRight[b, (cc1 DiracGamma[6] + cc2 DiracGamma[7]), d]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
-chiralTrickAnticommutingDDim[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), dd1_. (c:DiracGamma[_[_,_],_]) + dd2_:0, d___ ] :=
+chiralTrickAnticommutingDDimRight[b___, (cc1_. + cc2_. DiracGamma[5]), dd1_. (c:DiracGamma[_[_,_],_]) + dd2_:0, d___ ] :=
(
- dd1 chiralTrickAnticommutingDDim[b, c, (cc1 DiracGamma[7] + cc2 DiracGamma[6]), d] +
- dd2 chiralTrickAnticommutingDDim[b, (cc1 DiracGamma[6] + cc2 DiracGamma[7]), d]
+ cc1 chiralTrickAnticommutingDDimRight[b, dd1 c + dd2 , d] - cc2 chiralTrickAnticommutingDDimRight[b, dd1 c - dd2 , DiracGamma[5], d]
)/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
-Off[Optional::opdef];
-chiralTrickAnticommutingDDim[b___, (cc1_:0 + cc2_. DiracGamma[(h:6|7)]),(dd1_. (dg:DiracGamma[_[_,_],_]) + dd2_:0),d___ ] :=
- chiralTrickAnticommutingDDim[b,(dd1 dg + dd2), (cc1 + cc2 DiracGamma[ga67Switch1[h]]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
-On[Optional::opdef];
+chiralTrickAnticommutingDDimRight[b___, (cc2_. DiracGamma[(h:6|7)] + cc1_:0),(dd1_. (dg:DiracGamma[_[_,_],_]) + dd2_:0),d___ ] :=
+ (
+ dd1 chiralTrickAnticommutingDDimRight[b,dg, (cc1 + cc2 DiracGamma[ga67Switch1[h]]),d ] +
+ dd2 chiralTrickAnticommutingDDimRight[b, (cc1 + cc2 DiracGamma[h]),d ]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}]
+
+chiralTrickAnticommutingDDimRight[b___, DiracGamma[(h1:6|7)],DiracGamma[_[_,_],_] + mass_:0, xy:DiracGamma[_[_,_],_].. , DiracGamma[(h2:6|7)], c___] :=
+ mass chiralTrickAnticommutingDDimRight[b, xy, DiracGamma[h2], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommutingDDimRight[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, xy:DiracGamma[_[_,_],_].. , DiracGamma[(h:6|7)], c___] :=
+ chiralTrickAnticommutingDDimRight[b, dg, xy, DiracGamma[h], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass];
+
+chiralTrickAnticommutingDDimRight[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommutingDDimRight[b, dg, xy, DiracGamma[h2], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommutingDDimRight[b___, DiracGamma[(h:6|7)],DiracGamma[_[_,_],_] + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommutingDDimRight[b, xy, DiracGamma[h], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass];
+
+chiralTrickAnticommutingDDimRight[b___,DiracGamma[(h:6|7)],DiracGamma[_[_,_],_] + mass_:0, DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommutingDDimRight[b, DiracGamma[h], c]/; NonCommFreeQ[mass];
-chiralTrickAnticommutingDDim[b___, DiracGamma[(h1:6|7)],DiracGamma[_[_,_],_] + mass_:0, xy:DiracGamma[_[_,_],_].. , DiracGamma[(h2:6|7)], c___] :=
- mass chiralTrickAnticommutingDDim[b, xy, DiracGamma[h2], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+chiralTrickAnticommutingDDimRight[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommutingDDimRight[b, dg, DiracGamma[h2], c]/; NonCommFreeQ[mass] && h1=!=h2;
-chiralTrickAnticommutingDDim[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, xy:DiracGamma[_[_,_],_].. , DiracGamma[(h:6|7)], c___] :=
- chiralTrickAnticommutingDDim[b, dg, xy, DiracGamma[h], c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass];
+chiralTrickAnticommutingDDimRight[b___,DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, c___] :=
+ (chiralTrickAnticommutingDDimRight[b, dg, DiracGamma[ga67Switch1[h]], c] +
+ mass chiralTrickAnticommutingDDimRight[b, DiracGamma[h], c])/; NonCommFreeQ[mass];
-chiralTrickAnticommutingDDim[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h2:6|7)], c___] :=
- chiralTrickAnticommutingDDim[b, dg, xy, DiracGamma[h2], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+(* Move g^5 to the left: *)
-chiralTrickAnticommutingDDim[b___, DiracGamma[(h:6|7)],DiracGamma[_[_,_],_] + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h:6|7)], c___] :=
- mass chiralTrickAnticommutingDDim[b, xy, DiracGamma[h], c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass];
+chiralTrickAnticommutingDDimLeft[b___, c:DiracGamma[_[_,_],_].. , DiracGamma[5], d___] :=
+ (-1)^Length[{c}] chiralTrickAnticommutingDDimLeft[ b,DiracGamma[5],c,d];
-chiralTrickAnticommutingDDim[b___,DiracGamma[(h:6|7)],DiracGamma[_[_,_],_] + mass_:0, DiracGamma[(h:6|7)], c___] :=
- mass chiralTrickAnticommutingDDim[b, DiracGamma[h], c]/; NonCommFreeQ[mass];
+chiralTrickAnticommutingDDimLeft[b___, (dd1_. (dg:DiracGamma[_[_,_],_]) + dd2_:0 ), DiracGamma[5], d___ ] :=
+ chiralTrickAnticommutingDDimLeft[b, DiracGamma[5], (- dd1 dg + dd2), d ]/; NonCommFreeQ[{dd1,dd2}];
-chiralTrickAnticommutingDDim[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, DiracGamma[(h2:6|7)], c___] :=
- chiralTrickAnticommutingDDim[b, dg, DiracGamma[h2], c]/; NonCommFreeQ[mass] && h1=!=h2;
+chiralTrickAnticommutingDDimLeft[b___, c:DiracGamma[_[_,_],_].. , DiracGamma[(h:6|7)], d___] :=
+ chiralTrickAnticommutingDDimLeft[ b,DiracGamma[h],c,d]/; EvenQ[Length[{c}]];
-chiralTrickAnticommutingDDim[b___,DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, c___] :=
- (chiralTrickAnticommutingDDim[b, dg, DiracGamma[ga67Switch1[h]], c] +
- mass chiralTrickAnticommutingDDim[b, DiracGamma[h], c])/; NonCommFreeQ[mass];
+chiralTrickAnticommutingDDimLeft[b___, c:DiracGamma[_[_,_],_].. , DiracGamma[(h:6|7)], d___] :=
+ chiralTrickAnticommutingDDimLeft[ b,DiracGamma[ga67Switch1[h]],c,d]/; OddQ[Length[{c}]];
+
+chiralTrickAnticommutingDDimLeft[b___, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), (dd1_. DiracGamma[6] + dd2_. DiracGamma[7]),d___ ] :=
+ chiralTrickAnticommutingDDimLeft[b, (cc1 dd1 DiracGamma[6] + cc2 dd2 DiracGamma[7]),d ]/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommutingDDimLeft[b___, dd1_. (c:DiracGamma[_[_,_],_]) + dd2_:0, (cc1_. DiracGamma[6] + cc2_. DiracGamma[7]), d___ ] :=
+ (
+ dd1 chiralTrickAnticommutingDDimLeft[b, (cc1 DiracGamma[7] + cc2 DiracGamma[6]), c, d] +
+ dd2 chiralTrickAnticommutingDDimLeft[b, (cc1 DiracGamma[6] + cc2 DiracGamma[7]), d]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommutingDDimLeft[b___, dd1_. (c:DiracGamma[_[_,_],_]) + dd2_:0, (cc1_. + cc2_. DiracGamma[5]), d___ ] :=
+ (
+ cc1 chiralTrickAnticommutingDDimLeft[b, dd1 c + dd2 , d] -
+ cc2 chiralTrickAnticommutingDDimLeft[b, DiracGamma[5], dd1 c - dd2 , d]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}];
+
+chiralTrickAnticommutingDDimLeft[b___, (dd1_. (dg:DiracGamma[_[_,_],_]) + dd2_:0), (cc2_. DiracGamma[(h:6|7)] + cc1_:0), d___ ] :=
+ (
+ dd1 chiralTrickAnticommutingDDimLeft[b, (cc1 + cc2 DiracGamma[ga67Switch1[h]]), dg,d ] +
+ dd2 chiralTrickAnticommutingDDimLeft[b, (cc1 + cc2 DiracGamma[h]),d ]
+ )/; NonCommFreeQ[{cc1,cc2,dd1,dd2}]
+
+chiralTrickAnticommutingDDimLeft[b___, DiracGamma[(h1:6|7)],DiracGamma[_[_,_],_] + mass_:0, xy:DiracGamma[_[_,_],_].. , DiracGamma[(h2:6|7)], c___] :=
+ mass chiralTrickAnticommutingDDimLeft[b, DiracGamma[h1], xy, c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommutingDDimLeft[b___, DiracGamma[(h:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, xy:DiracGamma[_[_,_],_].. , DiracGamma[(h:6|7)], c___] :=
+ chiralTrickAnticommutingDDimLeft[b, DiracGamma[h], dg, xy, c]/; OddQ[Length[{xy}]] && NonCommFreeQ[mass];
+
+chiralTrickAnticommutingDDimLeft[b___, DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommutingDDimLeft[b, DiracGamma[h1], dg, xy, c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommutingDDimLeft[b___, DiracGamma[(h:6|7)],DiracGamma[_[_,_],_] + mass_:0, xy:DiracGamma[_[_] ].. , DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommutingDDimLeft[b, DiracGamma[h], xy, c]/; EvenQ[Length[{xy}]] && NonCommFreeQ[mass];
+
+chiralTrickAnticommutingDDimLeft[b___,DiracGamma[(h:6|7)],DiracGamma[_[_,_],_] + mass_:0, DiracGamma[(h:6|7)], c___] :=
+ mass chiralTrickAnticommutingDDimLeft[b, DiracGamma[h], c]/; NonCommFreeQ[mass];
+
+chiralTrickAnticommutingDDimLeft[b___,DiracGamma[(h1:6|7)],(dg:DiracGamma[_[_,_],_]) + mass_:0, DiracGamma[(h2:6|7)], c___] :=
+ chiralTrickAnticommutingDDimLeft[b, DiracGamma[h1], dg, c]/; NonCommFreeQ[mass] && h1=!=h2;
+
+chiralTrickAnticommutingDDimLeft[b___,(dg:DiracGamma[_[_,_],_]) + mass_:0, DiracGamma[(h:6|7)], c___] :=
+ (chiralTrickAnticommutingDDimLeft[b, DiracGamma[ga67Switch1[h]], dg, c] +
+ mass chiralTrickAnticommutingDDimLeft[b, DiracGamma[h], c])/; NonCommFreeQ[mass];
(* ------------------------------------------------------------------------ *)
chiralTrickLarin[b___,((dg:DiracGamma[_[_,_], dim_]) + mass_:0),DiracGamma[5],d__] :=
Block[{li1,li2,li3},
{li1,li2,li3} = LorentzIndex[#,dim]& /@ Unique[{"dtlarLia","dtlarLib","dtlarLic"}];
- I/6 $LeviCivitaSign Eps[dg[[1]], li1, li2, li3, Dimension->dim] chiralTrickLarin[b,DiracGamma[li1,dim],
+ I/6 $LeviCivitaSign Eps[dg[[1]], li1, li2, li3] chiralTrickLarin[b,DiracGamma[li1,dim],
DiracGamma[li2,dim],DiracGamma[li3,dim],d] + mass chiralTrickLarin[b,DiracGamma[5],d]
]/; !FreeQ2[{d},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && NonCommFreeQ[mass];
@@ -854,7 +1299,7 @@ create replacement rules (standard) and substitute the results back.
{li1,li2,li3} = LorentzIndex[#,dim]& /@ Unique[{"dtlarLia","dtlarLib","dtlarLic"}];
mass chiralTrickLarin[b,DiracGamma[6],d] +
1/2 chiralTrickLarin[b,dg,d] +
- I/12 $LeviCivitaSign Eps[dg[[1]], li1, li2, li3, Dimension->dim] chiralTrickLarin[b,DiracGamma[li1,dim],DiracGamma[li2,dim],DiracGamma[li3,dim],d]
+ I/12 $LeviCivitaSign Eps[dg[[1]], li1, li2, li3] chiralTrickLarin[b,DiracGamma[li1,dim],DiracGamma[li2,dim],DiracGamma[li3,dim],d]
]/; !FreeQ2[{d},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && NonCommFreeQ[mass];
chiralTrickLarin[b___,((dg:DiracGamma[_[_,_], dim_]) + mass_:0),DiracGamma[7],d__] :=
@@ -862,35 +1307,54 @@ create replacement rules (standard) and substitute the results back.
{li1,li2,li3} = LorentzIndex[#,dim]& /@ Unique[{"dtlarLia","dtlarLib","dtlarLic"}];
mass chiralTrickLarin[b,DiracGamma[7],d] +
1/2 chiralTrickLarin[b,dg,d] +
- I/12 $LeviCivitaSign Eps[dg[[1]], li1, li2, li3, Dimension->dim] chiralTrickLarin[b,DiracGamma[li1,dim],DiracGamma[li2,dim],DiracGamma[li3,dim],d]
+ I/12 $LeviCivitaSign Eps[dg[[1]], li1, li2, li3] chiralTrickLarin[b,DiracGamma[li1,dim],DiracGamma[li2,dim],DiracGamma[li3,dim],d]
]/; !FreeQ2[{d},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] && NonCommFreeQ[mass];
(* ------------------------------------------------------------------------ *)
-gamma5MoveBMHV[]:=
+(* Move g^5 to the right: *)
+
+gamma5MoveBMHVRight[]:=
1;
-gamma5MoveBMHV[b___,DiracGamma[(h:5|6|7)],DiracGamma[x_[y__],d_Symbol -4] + mass_:0,f___] :=
- gamma5MoveBMHV[ b,mass + DiracGamma[x[y],d-4],DiracGamma[h],f ]/; NonCommFreeQ[mass];
+gamma5MoveBMHVRight[b___, DiracGamma[(h:5|6|7)],DiracGamma[x_[y__],d_Symbol -4] + mass_:0,f___] :=
+ gamma5MoveBMHVRight[ b,mass + DiracGamma[x[y],d-4],DiracGamma[h],f ]/; NonCommFreeQ[mass];
-gamma5MoveBMHV[b___,DiracGamma[5],DiracGamma[x_[y__],d_Symbol], f___] :=
- 2 gamma5MoveBMHV[b,DiracGamma[x[y],d-4],DiracGamma[5],f] -
- gamma5MoveBMHV[b,DiracGamma[x[y],d],DiracGamma[5],f];
+gamma5MoveBMHVRight[b___,DiracGamma[5],DiracGamma[x_[y__],d_Symbol], f___] :=
+ 2 gamma5MoveBMHVRight[b,DiracGamma[x[y],d-4],DiracGamma[5],f] -
+ gamma5MoveBMHVRight[b,DiracGamma[x[y],d],DiracGamma[5],f];
-gamma5MoveBMHV[b___,DiracGamma[5],DiracGamma[x_[y__],d_Symbol] + mass_, f___] :=
- 2 gamma5MoveBMHV[b,DiracGamma[x[y],d-4],DiracGamma[5],f] +
- gamma5MoveBMHV[b,(mass - DiracGamma[x[y],d]),DiracGamma[5],f]/; NonCommFreeQ[mass];
+gamma5MoveBMHVRight[b___,DiracGamma[5],DiracGamma[x_[y__],d_Symbol] + mass_, f___] :=
+ 2 gamma5MoveBMHVRight[b,DiracGamma[x[y],d-4],DiracGamma[5],f] +
+ gamma5MoveBMHVRight[b,(mass - DiracGamma[x[y],d]),DiracGamma[5],f]/; NonCommFreeQ[mass];
-gamma5MoveBMHV[b___,DiracGamma[6],DiracGamma[x_[y__],d_Symbol] + mass_:0, f___] :=
- (gamma5MoveBMHV[b,DiracGamma[x[y],d-4],DiracGamma[5],f] +
- gamma5MoveBMHV[b,DiracGamma[x[y],d],DiracGamma[7],f] +
- mass gamma5MoveBMHV[b,DiracGamma[6],f])/; NonCommFreeQ[mass];
+gamma5MoveBMHVRight[b___,DiracGamma[(h:6|7)],DiracGamma[x_[y_,_],d_Symbol] + mass_:0, f___] :=
+ (
+ gamma5MoveBMHVRight[b,DiracGamma[x[y,d-4],d-4] + mass,DiracGamma[h],f] +
+ gamma5MoveBMHVRight[b,DiracGamma[x[y]],DiracGamma[ga67Switch1[h]],f]
+ )/; NonCommFreeQ[mass];
-gamma5MoveBMHV[b___,DiracGamma[7],DiracGamma[x_[y__],d_Symbol] + mass_:0, f___] :=
- (- gamma5MoveBMHV[b,DiracGamma[x[y],d-4],DiracGamma[5],f] +
- gamma5MoveBMHV[b,DiracGamma[x[y],d],DiracGamma[6],f] +
- mass gamma5MoveBMHV[b,DiracGamma[7],f])/; NonCommFreeQ[mass];
+(* Move g^5 to the left: *)
+gamma5MoveBMHVLeft[]:=
+ 1;
+
+gamma5MoveBMHVLeft[b___, DiracGamma[x_[y__],d_Symbol -4] + mass_:0, DiracGamma[(h:5|6|7)], f___] :=
+ gamma5MoveBMHVLeft[ b,DiracGamma[h], mass + DiracGamma[x[y],d-4],f ]/; NonCommFreeQ[mass];
+
+gamma5MoveBMHVLeft[b___,DiracGamma[x_[y__],d_Symbol], DiracGamma[5], f___] :=
+ 2 gamma5MoveBMHVLeft[b,DiracGamma[5],DiracGamma[x[y],d-4],f] -
+ gamma5MoveBMHVLeft[b,DiracGamma[5],DiracGamma[x[y],d],f]
+
+gamma5MoveBMHVLeft[b___,DiracGamma[x_[y__],d_Symbol] + mass_, DiracGamma[5], f___] :=
+ 2 gamma5MoveBMHVLeft[b,DiracGamma[5],DiracGamma[x[y],d-4],f] +
+ gamma5MoveBMHVLeft[b,DiracGamma[5],(mass - DiracGamma[x[y],d]),f]/; NonCommFreeQ[mass];
+
+gamma5MoveBMHVLeft[b___,DiracGamma[x_[y_,_],d_Symbol] + mass_:0, DiracGamma[(h:6|7)], f___] :=
+ (
+ gamma5MoveBMHVLeft[b,DiracGamma[h],DiracGamma[x[y,d-4],d-4] + mass,f] +
+ gamma5MoveBMHVLeft[b,DiracGamma[ga67Switch1[h]],DiracGamma[x[y]],f]
+ )/; NonCommFreeQ[mass];
(* ------------------------------------------------------------------------ *)
@@ -908,29 +1372,49 @@ create replacement rules (standard) and substitute the results back.
DiracGamma[LorentzIndex[c_]], f___ ] :=
diracologyBMHV1[b, DiracGamma[LorentzIndex[c]], d, DiracGamma[LorentzIndex[c]], f];
+(* D-1 and 3 -> 3 *)
+diracologyBMHV1[ b___, DiracGamma[CartesianIndex[c_, dimD_Symbol-1], dimD_Symbol], d:DiracGamma[__].. ,
+ DiracGamma[CartesianIndex[c_]], f___ ] :=
+ diracologyBMHV1[b, DiracGamma[CartesianIndex[c]], d, DiracGamma[CartesianIndex[c]], f];
+
(* 4 and D -> 4 *)
diracologyBMHV1[ b___, DiracGamma[LorentzIndex[c_]], d:DiracGamma[__].. ,
DiracGamma[LorentzIndex[c_, dimD_Symbol], dimD_Symbol], f___ ] :=
diracologyBMHV1[b, DiracGamma[LorentzIndex[c]], d, DiracGamma[LorentzIndex[c]], f];
+(* 3 and D-1 -> 3 *)
+diracologyBMHV1[ b___, DiracGamma[CartesianIndex[c_]], d:DiracGamma[__].. ,
+ DiracGamma[CartesianIndex[c_, dimD_Symbol-1], dimD_Symbol], f___ ] :=
+ diracologyBMHV1[b, DiracGamma[CartesianIndex[c]], d, DiracGamma[CartesianIndex[c]], f];
+
(* D and D-4 -> D-4 *)
diracologyBMHV1[ b___, DiracGamma[LorentzIndex[c_, dimD_Symbol], dimD_Symbol], d:DiracGamma[__].. ,
DiracGamma[LorentzIndex[c_, dimD_Symbol-4], dimD_Symbol-4], f___ ] :=
diracologyBMHV1[b,DiracGamma[LorentzIndex[c, dimD-4], dimD-4], d,DiracGamma[LorentzIndex[c, dimD-4], dimD-4], f];
+(* D-1 and D-4 -> D-4 *)
+diracologyBMHV1[ b___, DiracGamma[CartesianIndex[c_, dimD_Symbol-1], dimD_Symbol], d:DiracGamma[__].. ,
+ DiracGamma[CartesianIndex[c_, dimD_Symbol-4], dimD_Symbol-4], f___ ] :=
+ diracologyBMHV1[b,DiracGamma[CartesianIndex[c, dimD-4], dimD-4], d,DiracGamma[CartesianIndex[c, dimD-4], dimD-4], f];
+
(* D-4 and D -> D-4 *)
diracologyBMHV1[ b___, DiracGamma[LorentzIndex[c_, dimD_Symbol-4], dimD_Symbol-4], d:DiracGamma[__].. ,
DiracGamma[LorentzIndex[c_, dimD_Symbol],dimD_Symbol],f___ ] :=
diracologyBMHV1[b,DiracGamma[LorentzIndex[c, dimD-4], dimD-4], d, DiracGamma[LorentzIndex[c, dimD-4], dimD-4],f];
+(* D-4 and D-1 -> D-4 *)
+diracologyBMHV1[ b___, DiracGamma[CartesianIndex[c_, dimD_Symbol-4], dimD_Symbol-4], d:DiracGamma[__].. ,
+ DiracGamma[CartesianIndex[c_, dimD_Symbol-1],dimD_Symbol],f___ ] :=
+ diracologyBMHV1[b,DiracGamma[CartesianIndex[c, dimD-4], dimD-4], d, DiracGamma[CartesianIndex[c, dimD-4], dimD-4],f];
+
(* 4 and D-4 -> 0 *)
-diracologyBMHV1[ ___, DiracGamma[LorentzIndex[c_, dimD_Symbol-4], dimD_Symbol-4], DiracGamma[__].. ,
- DiracGamma[LorentzIndex[c_]], ___ ] :=
+diracologyBMHV1[ ___, DiracGamma[(h:LorentzIndex|CartesianIndex)[c_, dimD_Symbol-4], dimD_Symbol-4], DiracGamma[__].. ,
+ DiracGamma[(h:LorentzIndex|CartesianIndex)[c_]], ___ ] :=
0;
(* D-4 and 4 -> 0 *)
-diracologyBMHV1[ ___, DiracGamma[LorentzIndex[c_]], DiracGamma[__].. ,
- DiracGamma[LorentzIndex[c_, dimD_Symbol-4], dimD_Symbol-4], ___ ] :=
+diracologyBMHV1[ ___, DiracGamma[(h:LorentzIndex|CartesianIndex)[c_]], DiracGamma[__].. ,
+ DiracGamma[(h:LorentzIndex|CartesianIndex)[c_, dimD_Symbol-4], dimD_Symbol-4], ___ ] :=
0;
(* Contractions of neighbouring Dirac matrices in D, 4 and D-4 dimensions *)
@@ -940,6 +1424,10 @@ create replacement rules (standard) and substitute the results back.
DiracGamma[LorentzIndex[c_, dim2_ : 4], dim2_: 4], d___] :=
(PairContract[LorentzIndex[c, dim1],LorentzIndex[c, dim2]]/. PairContract->Pair) diracologyBMHV2[ b,d ];
+diracologyBMHV2[b___,DiracGamma[CartesianIndex[c_, dim1_ : 3], ___],
+ DiracGamma[CartesianIndex[c_, dim2_ : 3], ___], d___] :=
+ (FeynCalc`Package`MetricS CartesianPairContract[CartesianIndex[c, dim1],CartesianIndex[c, dim2]]/. CartesianPairContract->CartesianPair) diracologyBMHV2[ b,d ];
+
(* Simplifications for g^mu g^nu_1 ... g^nu_n g_mu where g^mu is in 4 and
g^nu_i are in D-4 dimensions or vice versa. *)
(* ------------------------------------------------------------------------ *)
@@ -952,13 +1440,15 @@ create replacement rules (standard) and substitute the results back.
(* D-4, (... 4 ... ), D-4 *)
diracologyBMHV2[b___ , DiracGamma[LorentzIndex[c_, dim_Symbol-4], dim_Symbol-4],
- ch : DiracGamma[(LorentzIndex | ExplicitLorentzIndex | Momentum)[_]]..,
+ ch : DiracGamma[((LorentzIndex | ExplicitLorentzIndex | Momentum)[_])]..,
DiracGamma[LorentzIndex[c_, dim_Symbol-4], dim_Symbol-4], d___] :=
(dim - 4) (-1)^Length[{ch}] diracologyBMHV2[b,ch, d];
+(* D, (... 4 ... ), D *)
(* Simplification for g^mu g^nu_1 ... g^nu_n g_mu where g^mu is in D and
g^nu_i are in 4 dimensions. Applies for n>4, since for n<=4 we have
- explicit expressions in the code *)
+ explicit expressions in the code. However, if g^nu_i contain g^0, we
+ apply this formula independently of the length of the chain. *)
(* ------------------------------------------------------------------------ *)
diracologyBMHV2[b___ , DiracGamma[LorentzIndex[c_, dim_Symbol], dim_Symbol],
@@ -967,6 +1457,7 @@ create replacement rules (standard) and substitute the results back.
diracologyBMHV2[b,DiracGamma[LorentzIndex[c]], ch, DiracGamma[LorentzIndex[c]], d] +
(dim - 4) (-1)^Length[{ch}] diracologyBMHV2[b,ch, d]/; Length[{ch}]>4;
+(* D, (... D-4 ... ), D *)
(* Simplification for g^mu g^nu_1 ... g^nu_n g_mu where g^mu is in D and
g^nu_i are in D-4 dimensions. Applies for n>4, since for n<=4 we have
explicit expressions in the code *)
@@ -1220,7 +1711,7 @@ create replacement rules (standard) and substitute the results back.
Sum[ (-1)^(jVar-iVar) * Pair[{ch}[[iVar,1]],
{ch}[[jVar,1]] ]*dsTemp@@Join[{b},
Delete[{ch}, {{iVar},{jVar}}], {f}],{iVar,1,len-1},{jVar,iVar+1,len}
- ]},{}]/.dsTemp->diracologyBMHV2/. Pair[aa__] :> FCUseCache[ExpandScalarProduct,{Pair[aa]},{}]
+ ]},{}]/.dsTemp->diracologyBMHV2 /. Pair[z__] :> FCUseCache[ExpandScalarProduct,{Pair[z]},{}]
] /;(Length[{ch}]>4) && MatchQ[dim, _Symbol | _Symbol-4 ];
diff --git a/FeynCalc/Dirac/EpsChisholm.m b/FeynCalc/Dirac/EpsChisholm.m
index 4140e868f..8e6075bf3 100755
--- a/FeynCalc/Dirac/EpsChisholm.m
+++ b/FeynCalc/Dirac/EpsChisholm.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Applies the Chisholm identity backwards *)
@@ -16,8 +16,8 @@
(* ------------------------------------------------------------------------ *)
EpsChisholm::usage =
-"EpsChisholm[expr] substitutes for a gamma matrix contracted with \
-a Levi Civita tensor (Eps) the Chisholm identity.";
+"EpsChisholm[exp] applies the Chisholm identiy to a Dirac matrix \
+contracted with a Levi-Civita tensor.";
(* ------------------------------------------------------------------------ *)
@@ -27,20 +27,25 @@
Begin["`EpsChisholm`Private`"]
esVerbose::usage="";
+eeps::usage="";
Options[EpsChisholm] = {
- FCI -> False,
- FCVerbose -> False
+ DiracTrick -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> True,
+ FCVerbose -> False
};
EpsChisholm[expr_, OptionsPattern[]] :=
- Block[ {new = 0,ex,terms,rest,res},
+ Block[ {new = 0,ex,terms,rest,res, holdDOT, eps, freePart, dsPart, diracObjects,
+ diracObjectsEval, null1, null2, dsHead, time, repRule},
If [OptionValue[FCVerbose]===False,
esVerbose=$VeryVerbose,
- If[MatchQ[OptionValue[FCVerbose], _Integer?Positive | 0],
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
esVerbose=OptionValue[FCVerbose]
];
];
@@ -57,50 +62,78 @@
Return[ex]
];
- {rest, terms} = FCSplit[ex,{DiracGamma,Eps}];
- FCPrint[3, "EpsChisholm: Relevant part of the expression, ", terms , FCDoControl->esVerbose];
- FCPrint[3, "EpsChisholm: Irrelevant part of the expression, ", rest , FCDoControl->esVerbose];
+ (* This is the normal mode which works well both for large and small expressions *)
+ FCPrint[1, "EpsChisholm: Normal mode.", FCDoControl->esVerbose];
+ time=AbsoluteTime[];
+ FCPrint[1, "EpsChisholm: Extracting Dirac objects.", FCDoControl->esVerbose];
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, DiracGammaCombine->False, LorentzIndex->True, FCJoinDOTs -> OptionValue[FCJoinDOTs],
+ DiracChain->True];
+ ex = ex /. h_dsHead/; FreeQ[h,Eps] :> Identity@@h;
- new = terms /. {Eps[a_,b_,c_,d_]->eeps[a,b,c,d]}//.eepsOrder;
- FCPrint[3, "EpsChisholm: After properly ordering eps tensors: ",
- new , FCDoControl->esVerbose];
+ {freePart,dsPart} = FCSplit[ex,{dsHead}];
+ FCPrint[3,"EpsChisholm: dsPart: ",dsPart , FCDoControl->esVerbose];
+ FCPrint[3,"EpsChisholm: freePart: ",freePart , FCDoControl->esVerbose];
- new = Expand2[new,{eeps,DiracGamma}];
- new = Expand2[new//.epsspcrule,{eeps,DiracGamma}];
+ diracObjects = Cases[dsPart+null1+null2, dsHead[_], Infinity]//DeleteDuplicates//Sort;
- FCPrint[3, "EpsChisholm: After applying Chisholm identity backwards: ",
- new , FCDoControl->esVerbose];
+ FCPrint[1, "EpsChisholm: Done extracting Dirac objects, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->esVerbose];
- res = (new/.eeps->Eps) + rest;
- FCPrint[3, "EpsChisholm: Leaving with: ", res , FCDoControl->esVerbose];
+ time=AbsoluteTime[];
+
+ diracObjectsEval = diracObjects/. Eps->eeps /. DOT->holdDOT //. {
+ dsHead[m_. holdDOT[x__] eeps[a___, LorentzIndex[in_], b__]]/;!FreeQ[{x},in] :>
+ (-1^Length[{b}]) dsHead[m eeps2[a, b, LorentzIndex[in]] holdDOT[x]],
+
+ dsHead[m_. DiracChain[holdDOT[x__],z1_, z2_] eeps[a___, LorentzIndex[in_], b__]]/;!FreeQ[{x},in] :>
+ (-1^Length[{b}]) dsHead[m eeps2[a, b, LorentzIndex[in]] DiracChain[holdDOT[x],z1,z2]]
+ };
+
+ diracObjectsEval = diracObjectsEval/.eeps2->eeps;
+
+ diracObjectsEval = diracObjectsEval //. dsHead[m_. holdDOT[x___, DiracGamma[in_LorentzIndex],y___] eeps[a_,b_,c_,in_LorentzIndex]] :>
+ (Conjugate[$LeviCivitaSign] I ( dsHead[m holdDOT[x,DiracGamma[a], DiracGamma[b], DiracGamma[c], DiracGamma[5],y]]
+ - dsHead[m ExpandScalarProduct[Pair[a,b],FCI->True] holdDOT[x,DiracGamma[c],DiracGamma[5],y]]
+ - dsHead[m ExpandScalarProduct[Pair[b,c],FCI->True] holdDOT[x,DiracGamma[a].DiracGamma[5],y]]
+ + dsHead[m ExpandScalarProduct[Pair[a,c],FCI->True] holdDOT[x,DiracGamma[b],DiracGamma[5],y]]));
+
+ If[ !FreeQ[diracObjectsEval,DiracChain],
+
+ diracObjectsEval = diracObjectsEval //. dsHead[m_. DiracChain[holdDOT[x___, DiracGamma[in_LorentzIndex],y___], z1_, z2_] eeps[a_,b_,c_,in_LorentzIndex]] :>
+ (Conjugate[$LeviCivitaSign] I ( dsHead[m DiracChain[holdDOT[x,DiracGamma[a], DiracGamma[b], DiracGamma[c], DiracGamma[5],y],z1,z2]]
+ - dsHead[m ExpandScalarProduct[Pair[a,b],FCI->True] DiracChain[holdDOT[x,DiracGamma[c],DiracGamma[5],y],z1,z2]]
+ - dsHead[m ExpandScalarProduct[Pair[b,c],FCI->True] DiracChain[holdDOT[x,DiracGamma[a].DiracGamma[5],y],z1,z2]]
+ + dsHead[m ExpandScalarProduct[Pair[a,c],FCI->True] DiracChain[holdDOT[x,DiracGamma[b],DiracGamma[5],y],z1,z2]]))
+ ];
+
+ time=AbsoluteTime[];
+ FCPrint[1, "EpsChisholm: Inserting Dirac objects back.", FCDoControl->esVerbose];
+
+ diracObjectsEval = diracObjectsEval /. holdDOT->DOT /. dsHead->Identity /. eeps->Eps;
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"EpsChisholm: repRule: ", repRule, FCDoControl->esVerbose];
+ res = freePart + ( dsPart/. Dispatch[repRule]);
+ FCPrint[1, "EpsChisholm: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->esVerbose];
+ FCPrint[3,"EpsChisholm: Intermediate result: ", res, FCDoControl->esVerbose];
+
+ If[ OptionValue[DiracTrick],
+ time=AbsoluteTime[];
+ FCPrint[1, "EpsChisholm: Applying DiracTrick.", FCDoControl->esVerbose];
+ res = DiracTrick[res, FCI->True];
+ FCPrint[1, "EpsChisholm: Done applying DiracTrick,timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->esVerbose]
+ ];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+
+ FCPrint[1, "EpsChisholm: Leaving.", FCDoControl->esVerbose];
+ FCPrint[3, "EpsChisholm: Leaving with ", res, FCDoControl->esVerbose];
res
]
-(* change maybe later *)
-SpinorChainEvaluate = DiracSimplify;
-scev = ExpandScalarProduct;
-
-
-eepsOrder = {m_. DOT[x___, DiracGamma[LorentzIndex[in_]], y___] *
- eeps[a___, LorentzIndex[in_], b__] :>
- (-1^Length[{b}]) m DOT[x, DiracGamma[LorentzIndex[in]], y] eeps[a, b, LorentzIndex[in]]};
-
-epsspcrule = {
- (* Inside DOT *)
- m_. DOT[ x___,DiracGamma[LorentzIndex[in_]],y___] eeps[a_,b_,c_,LorentzIndex[in_]] :>
- ( Conjugate[$LeviCivitaSign]* I m ( DOT[x,DiracGamma[a], DiracGamma[b], DiracGamma[c], DiracGamma[5],y] -
- scev[a,b] DOT[x,DiracGamma[c],DiracGamma[5],y] -scev[b,c] DOT[x,DiracGamma[a].DiracGamma[5],y] +
- scev[a,c] DOT[x,DiracGamma[b],DiracGamma[5],y])//SpinorChainEvaluate)//Expand2[#,{DiracGamma,eeps}]&,
- (* Standalone *)
- DiracGamma[LorentzIndex[in_]] eeps[a_,b_,c_,LorentzIndex[in_]] :>
- ( Conjugate[$LeviCivitaSign]* I ( DOT[x,DiracGamma[a],DiracGamma[b],DiracGamma[c], DiracGamma[5],y] -
- scev[a,b] DOT[x,DiracGamma[c],DiracGamma[5],y] -
- scev[b,c] DOT[x,DiracGamma[a],DiracGamma[5],y] +
- scev[a,c] DOT[x,DiracGamma[b],DiracGamma[5],y])//SpinorChainEvaluate)//Expand2[#,{DiracGamma,eeps}]&
-};
-
FCPrint[1,"EpsChisholm.m loaded."];
End[]
diff --git a/FeynCalc/Dirac/FCChargeConjugateTransposed.m b/FeynCalc/Dirac/FCChargeConjugateTransposed.m
new file mode 100755
index 000000000..d17a4cbe5
--- /dev/null
+++ b/FeynCalc/Dirac/FCChargeConjugateTransposed.m
@@ -0,0 +1,215 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: FCChargeConjugateTransposed *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: C x^T C^(-1) for Dirac matrices *)
+
+(* ------------------------------------------------------------------------ *)
+
+FCCCT::usage =
+"FCCCT is an alias for FCChargeConjugateTransposed.";
+
+FCChargeConjugateTransposed::usage =
+"FCChargeConjugateTransposed[exp] represents the application of the charge \
+conjugation operator to the transposed of exp, i.e. C exp^T C^(-1). Here exp \
+is understood to be a single Dirac matrix or a chain thereof. \n
+The option Explicit determines whether to substitute the explicit result or \
+to leave the expression in the unevaluated form. This form will be \
+also maintained if the function does not know how to obtain C exp^T C^(-1) \
+from the given exp.";
+
+FCChargeConjugateTransposed::failmsg =
+"Error! SpinorChainTranspose has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`FCChargeConjugateTransposed`Private`"]
+
+fcctVerbose::usage="";
+
+DeclareNonCommutative[FCChargeConjugateTransposed];
+
+Options[FCChargeConjugateTransposed] = {
+ DotSimplify -> True,
+ Explicit -> False,
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False
+};
+
+FCCCT = FCChargeConjugateTransposed;
+Abbreviation[FCChargeConjugateTransposed] = HoldForm[FCCCT];
+
+FCChargeConjugateTransposed /:
+ MakeBoxes[FCChargeConjugateTransposed[ex_, OptionsPattern[]], TraditionalForm] :=
+ RowBox[{"C", SuperscriptBox[RowBox[{"(", TBox[ex], ")"}], "T"], SuperscriptBox["C", "-1"]}];
+
+FCChargeConjugateTransposed[ex_, OptionsPattern[]]:=
+ ex/; NonCommFreeQ[ex] && FCPatternFreeQ[{ex}];
+
+
+FCChargeConjugateTransposed[expr_, opts:OptionsPattern[]] :=
+ Block[ {ex, time,dsHead,nonDsHead,diracObjects,
+ nonDiracObjects,diracObjectsEval,nonDiracObjectsEval,null1,null2, repRule1,repRule2,res},
+
+ If [OptionValue[FCVerbose]===False,
+ fcctVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ fcctVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1, "FCChargeConjugateTransposed. Entering.", FCDoControl->fcctVerbose];
+ FCPrint[3, "FCChargeConjugateTransposed: Entering with ", expr, FCDoControl->fcctVerbose];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ !FreeQ[ex,DiracSigma],
+ ex = ex/. d_DiracSigma/; !FreeQ2[d,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}] :> DiracSigmaExplicit[d,FCI->True]
+ ];
+
+ If[ OptionValue[FCDiracIsolate],
+ (* Extract all the Dirac structures inside the operator. *)
+
+ If[ !FreeQ[ex, DiracChain],
+ ex = DiracChainExpand[ex, FCI->True];
+ ];
+
+ ex = FCDiracIsolate[ex,FCI->True,Head->dsHead, Factoring-> nonDsHead, DiracChain->True];
+ ex = ex /. dsHead[z_]/;!FreeQ[z,Spinor] :> nonDsHead[z];
+
+ If[ !FreeQ[ex, DiracChain],
+ (* Switch the indices, since it is a transpose *)
+ ex = ex /. dsHead[DiracChain[x_,i_,j_]] :> DiracChain[dsHead[x],j,i]
+ ];
+
+ diracObjects = Cases[ex+null1+null2, dsHead[_], Infinity]//Union;
+ nonDiracObjects = Cases[ex+null1+null2, nonDsHead[_], Infinity]//Union,
+
+
+ (* The operator contains only Dirac structures (fast mode). *)
+
+ If[ TrueQ[FreeQ[ex,Spinor]],
+ ex = dsHead[ex];
+ diracObjects = {ex};
+ nonDiracObjects = {},
+
+ ex = nonDsHead[ex];
+ diracObjects = {};
+ nonDiracObjects = {ex}
+
+ ];
+
+ ];
+
+
+ If[ nonDiracObjects=!={},
+ time=AbsoluteTime[];
+ nonDiracObjectsEval = Map[FCChargeConjugateTransposed[#,Explicit->False,Sequence@@FilterRules[{opts}, Except[Explicit]]]&,
+ nonDiracObjects /. nonDsHead->Identity];
+ FCPrint[1,"FCChargeConjugateTransposed: nonDiracObjectsEval finished, timing: ", N[AbsoluteTime[] - time, 4] , FCDoControl->fcctVerbose];
+ FCPrint[3,"FCChargeConjugateTransposed: nonDiracObjectsEval: ", nonDiracObjectsEval, FCDoControl->fcctVerbose];
+ repRule2 = Thread[Rule[nonDiracObjects,nonDiracObjectsEval]];
+ FCPrint[3,"FCChargeConjugateTransposed: repRule: ",repRule2 , FCDoControl->fcctVerbose],
+
+ repRule2 = {}
+ ];
+
+ If[ diracObjects=!={},
+ time=AbsoluteTime[];
+ diracObjectsEval = Map[cctEvaluateSingle[#]&, diracObjects /. dsHead->Identity /. DOT-> dotHold];
+ (* at this point the chain is already reversed (a.b.c)^T -> c^T.b^T.a^T *)
+
+ FCPrint[3,"FCChargeConjugateTransposed: diracObjectsEval after cctEvaluateSingle: ", diracObjectsEval, FCDoControl->fcctVerbose];
+
+ diracObjectsEval = diracObjectsEval /. cctEvaluateSingle[dotHold[z__]] :> cctEvaluateMultiple[dotHold@@(Reverse[{z}])];
+
+ FCPrint[3,"FCChargeConjugateTransposed: diracObjectsEval after cctEvaluateMultiple: ", diracObjectsEval, FCDoControl->fcctVerbose];
+
+ diracObjectsEval = diracObjectsEval /. cctEvaluateMultiple -> cctEvaluateSplit;
+
+ FCPrint[3,"FCChargeConjugateTransposed: diracObjectsEval after cctEvaluateSplit: ", diracObjectsEval, FCDoControl->fcctVerbose];
+
+ diracObjectsEval = diracObjectsEval/. cctEvaluateSingle[z_] :>
+ FCChargeConjugateTransposed[z,Explicit->False,Sequence@@FilterRules[{opts}, Except[Explicit]]] /. dotHold->DOT;
+
+ FCPrint[1,"FCChargeConjugateTransposed: diracObjectsEval finished, timing: ", N[AbsoluteTime[] - time, 4] , FCDoControl->fcctVerbose];
+
+ If[ OptionValue[DotSimplify],
+ diracObjectsEval = DotSimplify[#,FCI->True,Expanding->False]&/@diracObjectsEval
+ ];
+
+ repRule1 = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"FCChargeConjugateTransposed: repRule: ",repRule1 , FCDoControl->fcctVerbose],
+
+ repRule1 = {}
+ ];
+
+
+
+
+ res = ex /. Dispatch[repRule2] /. Dispatch[repRule1];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "FCChargeConjugateTransposed: Leaving.", FCDoControl->fcctVerbose];
+ FCPrint[3, "FCChargeConjugateTransposed: Leaving with", res, FCDoControl->fcctVerbose];
+
+ res
+
+ ]/; OptionValue[Explicit];
+
+dotHold[]:=
+ 1;
+
+dotHold[a___, cctEvaluateMultiple[1], b___]:=
+ dotHold[a,b];
+
+(* C (si^{mu nu})^T C^(-1) = - si^{mu nu} *)
+cctEvaluateSingle[d_DiracSigma]:=
+ - d/; FreeQ2[d,{DiracGamma[5],DiracGamma[6],DiracGamma[7]}];
+
+(* C (g^mu)^T C^(-1) = - g^mu *)
+cctEvaluateSingle[d_DiracGamma]:=
+ - d/; !MatchQ[d,DiracGamma[5|6|7]];
+
+(* C g^(5|6|7)^T C^(-1) = g^(5|6|7)*)
+cctEvaluateSingle[(d:DiracGamma[5|6|7])]:=
+ d;
+
+(* C (g^mu p_mu +/- m)^T C^(-1) = (-g^mu p_mu +/- m) *)
+cctEvaluateSingle[c1_. d_DiracGamma + c2_:0]:=
+ (- c1 d + c2)/; NonCommFreeQ[{c1,c2}] && FreeQ[{c1,c2}, dotHold] && !MatchQ[d,DiracGamma[5|6|7]];
+
+cctEvaluateMultiple[dotHold[a_]]:=
+ cctEvaluateSingle[a];
+
+cctEvaluateMultiple[dotHold[rest1___, Longest[d: DiracGamma[__]..],
+ rest2___]]:=
+ ((-1)^Length[{d}]) dotHold[cctEvaluateMultiple[dotHold[rest1]], d, cctEvaluateMultiple[dotHold[rest2]]]/; Length[{d}]>1 &&
+ FreeQ2[{d},{DiracGamma[5],DiracGamma[6],DiracGamma[7]}];
+
+cctEvaluateSplit[dotHold[a__]]:=
+ dotHold@@(cctEvaluateSingle/@{a});
+
+FCPrint[1,"FCChargeConjugateTransposed.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/FCDiracIsolate.m b/FeynCalc/Dirac/FCDiracIsolate.m
index 146c9a83c..f90cee42b 100755
--- a/FeynCalc/Dirac/FCDiracIsolate.m
+++ b/FeynCalc/Dirac/FCDiracIsolate.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Isolates chains of Dirac matrices *)
@@ -16,7 +16,7 @@
(* ------------------------------------------------------------------------ *)
FCDiracIsolate::usage =
-"FCDiracIsolate[expr,{q1,q2,...}] wraps chains of Dirac matrices into heads specified \
+"FCDiracIsolate[exp] wraps chains of Dirac matrices into heads specified \
by the user " <> ToString[
Hyperlink[Style["\[RightSkeleton]", "SR"], "paclet:FeynCalc/ref/FCDiracIsolate"],
StandardForm];
@@ -30,118 +30,258 @@
Begin["`FCDiracIsolate`Private`"]
Options[FCDiracIsolate] = {
- ClearHeads -> {FCGV["DiracChain"]},
- Collecting -> True,
- DotSimplify -> True,
- DiracGammaCombine -> True,
- DiracSigmaExplicit -> False,
- ExceptHeads -> {},
- Expanding -> True,
- FCI -> False,
- Factoring -> Factor,
- LorentzIndex -> False,
- Head -> FCGV["DiracChain"],
- Split -> True,
- Isolate -> False,
- IsolateNames -> KK,
- IsolateFast -> False,
- DiracGamma -> True,
- Spinor -> True,
- DiracTrace -> True
+ CartesianIndex -> False,
+ ClearHeads -> {FCGV["DiracChain"]},
+ Collecting -> True,
+ DiracChain -> False,
+ DiracGamma -> True,
+ DiracGammaCombine -> True,
+ DiracSigmaExplicit -> False,
+ DiracTrace -> True,
+ DotSimplify -> True,
+ ExceptHeads -> {},
+ Expanding -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> True,
+ FCTraceExpand -> False,
+ FCVerbose -> False,
+ Factoring -> {Factor2, 5000},
+ Head -> FCGV["DiracChain"],
+ Isolate -> False,
+ IsolateFast -> False,
+ IsolateNames -> KK,
+ LorentzIndex -> False,
+ Polarization -> False,
+ Spinor -> True,
+ Split -> True,
+ TimeConstrained -> 3,
+ ToDiracGamma67 -> False
};
makeSelectionList[expr_,heads_List]:=
MemSet[makeSelectionList[expr,heads],
- Join[heads,Intersection[Cases[SelectFree[expr, heads],l_LorentzIndex:>l[[1]],Infinity],
- Cases[SelectNotFree[expr, heads],l_LorentzIndex:>l[[1]],Infinity]]]
+ Join[heads,Intersection[Cases[SelectFree[expr, heads], l: (_LorentzIndex| _CartesianIndex) :> l[[1]] ,Infinity],
+ Cases[SelectNotFree[expr, heads], l: (_LorentzIndex| _CartesianIndex) :> l[[1]] ,Infinity]]]
];
-FCDiracIsolate[expr_, OptionsPattern[]] :=
- Block[ {res, null1, null2, ex,tmp, head, restHead,selectionList,lorHead,tmpHead,tmpHead2},
+holdDOT[]=1;
- head = OptionValue[Head];
+FCDiracIsolate[expr_List, opts:OptionsPattern[]]:=
+ FCDiracIsolate[#, opts]&/@expr;
+
+FCDiracIsolate[expr_/; Head[expr]=!=List, OptionsPattern[]] :=
+ Block[{ res, null1, null2, ex,tmp, head, selectionList,
+ time, fcdiVerbose, headsList, headsOrig, optTimeConstrained,
+ optHead, headR, allHeads, allHeadsEval, headNoMatrix},
+
+ If [OptionValue[FCVerbose]===False,
+ fcdiVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ fcdiVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ optTimeConstrained = OptionValue[TimeConstrained];
+ headsOrig = Complement[DiracHeadsList,OptionValue[ExceptHeads]];
+ headsList = headsOrig;
+
+ If[ OptionValue[Polarization],
+ headsList = Join[headsList,{Polarization}];
+ ];
+
+ If[ OptionValue[LorentzIndex]===All,
+ headsList = Join[headsList,{LorentzIndex}];
+ ];
+
+ If[ OptionValue[CartesianIndex]===All,
+ headsList = Join[headsList,{CartesianIndex}];
+ ];
+
+ optHead = OptionValue[Head];
+
+ If[MatchQ[optHead,{_,_}],
+ {head, headR} = optHead,
+
+ head = optHead;
+ headR = Identity
+ ];
If[OptionValue[FCI],
ex = expr/. (Map[Rule[#, Identity] &, OptionValue[ClearHeads]]),
ex = FCI[expr]/. (Map[Rule[#, Identity] &, OptionValue[ClearHeads]])
];
+ FCPrint[3, "FCDiracIsolate: Entering with: ", ex, FCDoControl->fcdiVerbose];
- If[ FreeQ2[ex,DiracHeadsList],
- Return[ex]
+ If[ FreeQ2[ex,headsList],
+ Return[restHead[ex] /. restHead -> headR]
];
If[ OptionValue[DiracSigmaExplicit],
- ex = DiracSigmaExplicit[ex]
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying DiracSigmaExplicit.", FCDoControl->fcdiVerbose];
+ ex = DiracSigmaExplicit[ex, FCI->True];
+ FCPrint[1, "FCDiracIsolate: Done applying DiracSigmaExplicit timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ FCPrint[3, "FCDiracIsolate: After DiracSigmaExplicit: ", ex, FCDoControl->fcdiVerbose]
+ ];
+
+ If[ OptionValue[ToDiracGamma67],
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying ToDiracGamma67.", FCDoControl->fcdiVerbose];
+ ex = ToDiracGamma67[ex, FCI->True];
+ FCPrint[1, "FCDiracIsolate: Done applying ToDiracGamma67 timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ FCPrint[3, "FCDiracIsolate: After ToDiracGamma67: ", ex, FCDoControl->fcdiVerbose]
];
If[ OptionValue[DiracGammaCombine],
- ex = DiracGammaCombine[ex];
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying DiracGammaCombine.", FCDoControl->fcdiVerbose];
+ ex = DiracGammaCombine[ex, FCI->True];
+ FCPrint[1, "FCDiracIsolate: Done applying DiracGammaCombine, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ FCPrint[3, "FCDiracIsolate: After DiracGammaCombine: ", ex, FCDoControl->fcdiVerbose]
];
If[ OptionValue[Expanding],
- ex = Expand2[ex, DiracHeadsList];
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying Expand2.", FCDoControl->fcdiVerbose];
+ ex = Expand2[ex, headsList];
+ FCPrint[1, "FCDiracIsolate: Done applying Expand2, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ FCPrint[3, "FCDiracIsolate: After Expand2: ", ex, FCDoControl->fcdiVerbose]
];
If[ OptionValue[DotSimplify] && !FreeQ[ex,DOT],
- tmp = FCSplit[ex, DiracHeadsList, Expanding->OptionValue[Expanding]];
- ex = tmp[[1]]+ DotSimplify[tmp[[2]],Expanding->False]
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying DotSimplify.", FCDoControl->fcdiVerbose];
+ tmp = FCSplit[ex, headsList, Expanding->OptionValue[Expanding]];
+ ex = tmp[[1]]+ DotSimplify[tmp[[2]],Expanding->False,FCI->True, FCJoinDOTs->OptionValue[FCJoinDOTs]];
+ FCPrint[1, "FCDiracIsolate: Done applying DotSimplify, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ FCPrint[3, "FCDiracIsolate: After DotSimplify: ", ex, FCDoControl->fcdiVerbose]
+ ];
+
+ If[ OptionValue[FCTraceExpand],
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying FCTraceExpand.", FCDoControl->fcdiVerbose];
+ ex = FCTraceExpand[ex, FCI->True, SUNTrace->False];
+ FCPrint[1, "FCDiracIsolate: Done applying FCTraceExpand, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ FCPrint[3, "FCDiracIsolate: After FCTraceExpand: ", ex, FCDoControl->fcdiVerbose]
];
If[ OptionValue[Collecting],
- ex = Collect2[ex,DiracHeadsList,Factoring->OptionValue[Factoring]];
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying Collect2.", FCDoControl->fcdiVerbose];
+ ex = Collect2[ex,headsList,Factoring->OptionValue[Factoring],TimeConstrained->optTimeConstrained];
+ FCPrint[1, "FCDiracIsolate: Done applying Collect2, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose]
];
- If[ OptionValue[LorentzIndex],
- res = (Map[(selectionList=makeSelectionList[#,DiracHeadsList]; restHead[SelectFree[#, selectionList]] head[SelectNotFree[#, selectionList]])&,
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Handling Lorentz and Cartesian indices.", FCDoControl->fcdiVerbose];
+ If[ OptionValue[LorentzIndex]===True || OptionValue[CartesianIndex]===True,
+ res = (Map[(selectionList=makeSelectionList[#,headsList]; restHead[SelectFree[#, selectionList]] head[SelectNotFree[#, selectionList]])&,
ex + null1 + null2] /. {null1 | null2 -> 0} /. head[1] -> 1),
- res = (Map[(restHead[SelectFree[#, DiracHeadsList]] head[SelectNotFree[#, DiracHeadsList]]) &,
+
+ res = (Map[(restHead[SelectFree[#, headsList]] head[SelectNotFree[#, headsList]]) &,
ex + null1 + null2] /. {null1 | null2 -> 0} /. head[1] -> 1)
];
+ FCPrint[1, "FCDiracIsolate: Done handling Lorentz and Cartesian indices, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
- res = res /. {head[x_] /; !FreeQ2[x, OptionValue[ExceptHeads]] :> x};
-
- If[ Together[(res /. restHead|head|tmpHead|lorHead|tmpHead2 -> Identity)-ex] =!= 0,
+ If[ Together[(res /. restHead|head -> Identity)-ex] =!= 0,
Message[FCDiracIsolate::fail, ex];
Abort[]
];
+ allHeads = Cases2[res,head];
+ allHeadsEval = allHeads /. DOT->holdDOT;
+
+ allHeadsEval = allHeadsEval /. {head[x_] /; !FreeQ2[x, OptionValue[ExceptHeads]] :> x};
+
If[ OptionValue[Split],
- res = res /. DOT->holdDOT //. {head[a_holdDOT b_holdDOT c_.] :> head[a]head[b c],
- head[holdDOT[r1___,a_Spinor,b___,c_Spinor, d_Spinor, e___, f_Spinor, r2___]]/;FreeQ[{r1,b,e,r2}, Spinor] :>
- head[holdDOT[a,b,c]] head[holdDOT[d,e,f]] head[holdDOT[r1,r2]] }/. holdDOT[] ->1 /. holdDOT -> DOT
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Doing splittings.", FCDoControl->fcdiVerbose];
+
+ allHeadsEval = allHeadsEval //. head[a_holdDOT b_]/; !FreeQ[b, holdDOT] :> head[a] head[b];
+
+ If[ !FreeQ[allHeadsEval,Spinor],
+ allHeadsEval = allHeadsEval /. {
+ head[holdDOT[r1___,a_Spinor,b___,c_Spinor, d_Spinor, e___, f_Spinor, r2___]]/;FreeQ[{r1,b,e,r2}, Spinor] :>
+ head[holdDOT[a,b,c]] head[holdDOT[d,e,f]] head[holdDOT[r1,r2]]}
+ ];
+ FCPrint[1, "FCDiracIsolate: Splittings done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose]
];
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Removing unneeded isolations.", FCDoControl->fcdiVerbose];
(* Here we unisolate objects that are not needed *)
If[ !OptionValue[DiracTrace],
- res = res //. head[x_DiracTrace y_.] :> x head[y];
+ allHeadsEval = allHeadsEval //. head[x_DiracTrace y_.] :> x head[y]
+ ];
+
+ If[ !OptionValue[DiracChain],
+ allHeadsEval = allHeadsEval //. head[x_DiracChain y_.] :> x head[y] //.
+ head[holdDOT[x__] y_.]/; !FreeQ[{x},DiracChain] :> holdDOT[x] head[y]
];
If[ !OptionValue[DiracGamma],
- res = res //. head[x_DiracGamma y_.] :> x head[y] //.
- head[DOT[x__] y_.]/; FreeQ[{x},Spinor] && !FreeQ[{x},DiracGamma] :> DOT[x] head[y];
+ allHeadsEval = allHeadsEval //. head[x_DiracGamma y_.] :> x head[y] //.
+ head[holdDOT[x__] y_.]/; FreeQ[{x},Spinor] && !FreeQ[{x},DiracGamma] :> holdDOT[x] head[y]
];
- If[ !OptionValue[Spinor],
- res = res //. head[DOT[x__] y_.]/; !FreeQ[{x},Spinor] :> DOT[x] head[y];
+ If[ OptionValue[Spinor]===False,
+ allHeadsEval = allHeadsEval //. head[holdDOT[x__] y_.]/; !FreeQ[{x},Spinor] :> holdDOT[x] head[y],
+
+
+ If[ OptionValue[Spinor]===Join,
+ allHeadsEval = allHeadsEval //.
+ head[holdDOT[a_Spinor,b___,c_Spinor] x_.] head[holdDOT[d_Spinor,e___,f_Spinor] y_.]/; FreeQ[{b,e},Spinor] :>
+ head[holdDOT[a,b,c] holdDOT[d,e,f] x y]
+ ]
+
];
- res = res //. head[x_]/; FreeQ2[x,DiracHeadsList] :> x;
+
+ allHeadsEval = allHeadsEval /. holdDOT->DOT //. head[x_]/; FreeQ2[x,headsList] :> x;
+
+ res = res /. Dispatch[Thread[Rule[allHeads,allHeadsEval]]];
+
+ FCPrint[1, "FCDiracIsolate: Done removing unneeded isolations, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
If[ OptionValue[Isolate],
+ time=AbsoluteTime[];
+ FCPrint[1, "FCDiracIsolate: Applying Isolate.", FCDoControl->fcdiVerbose];
res = res/. restHead[x_]:> Isolate[x,IsolateNames->OptionValue[IsolateNames],IsolateFast->OptionValue[IsolateFast]],
- res = res /. restHead -> Identity
+ res = res /. restHead[0]->0 /. restHead -> headR;
+ FCPrint[1, "FCDiracIsolate: Done applying Isolate, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->fcdiVerbose];
+ ];
+
+ tmp = headsList;
+
+ If[ OptionValue[LorentzIndex]===True,
+ tmp = Join[tmp,{LorentzIndex}]
+ ];
+
+ If[ OptionValue[CartesianIndex]===True,
+ tmp = Join[tmp,{CartesianIndex}]
];
- If [ !FreeQ[res/. head[__] :> 1, DiracHeadsList] & || !FreeQ[res,head[]],
+ (* If LorentzIndex/CartesianIndex is set to true, this check guarantees that all Lorentz/Cartesian tensors are inside head *)
+ If [ !FreeQ2[res/. head[__] :> 1, tmp] & || !FreeQ[res,head[]],
Message[FCDiracIsolate::fail, ex];
Abort[]
];
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "FCDiracIsolate: Leaving.", FCDoControl->fcdiVerbose];
+
res
];
+restHead[0]=
+ 0;
+
FCPrint[1,"FCDiracIsolate.m loaded."];
End[]
diff --git a/FeynCalc/Dirac/Schouten.m b/FeynCalc/Dirac/Schouten.m
deleted file mode 100755
index fa1ad3ea4..000000000
--- a/FeynCalc/Dirac/Schouten.m
+++ /dev/null
@@ -1,158 +0,0 @@
-
-
-(* :Title: Schouten *)
-
-(* :Author: Rolf Mertig *)
-
-(* ------------------------------------------------------------------------ *)
-(* :History: File created on 22 June '97 at 23:00 *)
-(* ------------------------------------------------------------------------ *)
-
-(* :Summary: Option and Function *)
-
-(* ------------------------------------------------------------------------ *)
-
-Schouten::usage =
-"Schouten[expr] applies the Schouten identity for four-vectors on at most \
-42 terms in a sum. If Schouten should operate on larger expression you \
-can give a second argument, e.g.: \
-Schouten[expr, 4711] which will work \
-on sums with less than 4711 terms.\n\n
-
-Schouten is also an option of Contract and \
-DiracTrace. It may be set to an integer \
-indicating the maximum number of terms onto which the \
-function Schouten will be applied .";
-
-(* ------------------------------------------------------------------------ *)
-
-Begin["`Package`"]
-End[]
-
-Begin["`Schouten`Private`"]
-
-Schouten[y_, 0] :=
- y;
-Schouten[y_, oparg_:42] :=
- FixedPoint[schouten[#, oparg]&, FeynCalcInternal[y], 14];
-
-liget[_. Eps[x1_[y1_], x2_[y2_], x3_[y3_], x4_[y4_]] Pair[x5_[y5_],
-x6_[y6_]]] :=
- {x1[y1],x2[y2],x3[y3],x4[y4],x5[y5],x6[y6]};
-
-lisch[{a1_,a2_,a3_,a4_,a5_,a6_}] :=
- Pair[a5,a6] Eps[a1,a2,a3,a4];
-
-schouten[x_,opar_:42] :=
- MemSet[schouten[x, opar],
- Block[ {i,nx,temp0,temp,lind,ltemp,ntemp,dummIlabel = False,DUMMI,
- schou,sor, all,result,epc, epsnterms,numberofli, optarg = opar,
- temp1, nxf = 1},
- epc[a_, b_] :=
- If[ Length[Position[PartitHead[a, Eps][[2]],
- LorentzIndex]] False];
- If[ Head[tem]===Plus,
- Length[tem],
- 1
- ]
- ];
- nx = EpsEvaluate[ExpandScalarProduct[x]//Expand]//Expand;
- (* Split the sum into two parts *)
- result = nx;
- If[ (optarg === I) && (Head[nx] === Times),
- nxf = Select[nx, !FreeQ[#, _^(a_/;Head[a] =!= Integer)]&];
- nx = nx/nxf + DUMMI;
- dummIlabel = True;
- optarg = 6
- ];
- all = PartitHead[nx, Eps];
- If[ Head[all[[2]]]===Plus || dummIlabel === True,
- If[ dummIlabel === True,
- temp0 = {0,all[[2]]},
- temp0 = PartitHead[all[[2]], Pair];
- ];
- temp = temp0[[2]];
- If[ ((Head[temp]===Plus) && Length[temp] > 1 &&
- If[ IntegerQ[optarg],
- Length[temp] < optarg,
- False
- ]) || dummIlabel === True,
- ltemp = Length[temp];
- If[ dummIlabel =!= True,
- temp1 = temp[[1]],
- temp1 = temp;
- ltemp = 7
- ];
- numberofli = Length[Position[temp1, LorentzIndex]];
- i = 0;
- temp =
- If[ dummIlabel === True,
- Catch[
- lind = liget[ temp ];
- If[ Length[lind]===6,
- schou = lisch /@
- Map[Append[#, Last[lind]]&,
- NestList[RotateLeft,Take[lind,5],4]];
- sor = schou;
- Do[
- If[ FreeQ[temp, sor[[1]]],
- sor = RotateLeft[sor]
- ],
- {6}
- ];
- If[ !FreeQ[temp, sor[[1]]],
- ntemp = Expand[EpsEvaluate[temp/.sor[[1]]->
- (-Apply[Plus, Drop[sor,1]])]];
- Throw[ntemp]
- ]
- ];
- ],
- Catch[
- While[i < Length[temp], i++;
- If[ !FreeQ2[temp[[i]],{Eps,Pair}],
- lind = liget[ temp[[i]] ];
- If[ Length[lind]===6,
- (* create a list of 5 possible arrangements of terms of Schouten ident. *)
- schou = lisch /@ Map[Append[#, Last[lind]]&,
- NestList[RotateLeft,Take[lind,5],4]];
- sor = Sort[ schou, epc ]//Reverse;
- Do[
- If[ FreeQ[temp, sor[[1]]],
- sor = RotateLeft[sor]
- ],
- {6}
- ];
- FCPrint[2,"sor = ", sor];
- If[ !FreeQ[temp, sor[[1]]],
- ntemp = Expand[EpsEvaluate[temp/.sor[[1]]->
- (-Apply[Plus, Drop[sor,1]])]];
- (* or all LorentzIndices are inside all Eps's *)
- If[ (epsnterms[ntemp] < ltemp) || (Union[Length[ Position[#, LorentzIndex] ]& /@
- Select[ Variables[ntemp], Head[#]===Eps& ]] === {numberofli}),
- Throw[temp = ntemp]
- ]
- ]
- ]
- ]
- ];
- temp
- ]
- ];
- result = (all[[1]]/.DUMMI->0) + temp0[[1]] + temp
- ]
- ];
- result nxf
- ]
- ];
-
-FCPrint[1,"Schouten.m loaded."];
-End[]
diff --git a/FeynCalc/Dirac/SirlinSimplify.m b/FeynCalc/Dirac/SirlinSimplify.m
new file mode 100755
index 000000000..0d396a514
--- /dev/null
+++ b/FeynCalc/Dirac/SirlinSimplify.m
@@ -0,0 +1,549 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: SirlinSimplify *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Applies Sirlin identities for spinor chain products *)
+
+(* ------------------------------------------------------------------------ *)
+
+SirlinSimplify::usage =
+"SirlinSimplify[exp] simplifies spinor chains that contain Dirac matrices \
+using relations derived by Sirlin in Nuclear Physics B192 (1981) 93-99. \
+Contrary to the original paper, the sign of the Levi-Civita tensor is \
+choosen as epsilon^{0123} = 1 which is the standard choice in FeynCalc.";
+
+SirlinSimplify::failmsg =
+"Error! SirlinSimplify has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`SirlinSimplify`Private`"]
+
+sisVerbose::usage="";
+li::usage="";
+li1::usage="";
+li2::usage="";
+li3::usage="";
+li4::usage="";
+
+holdDOT::usage="";
+
+Options[SirlinSimplify] = {
+ Contract -> True,
+ DiracGammaCombine -> True,
+ DiracSigmaExplicit -> False,
+ DiracTrick -> True,
+ FCCanonicalizeDummyIndices -> True,
+ FCDiracIsolate -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> True,
+ FCVerbose -> False,
+ Factoring -> True,
+ SpinorChainTrick -> True
+};
+
+SirlinSimplify[expr_, OptionsPattern[]] :=
+ Block[{ex, tmp, res, diracObjects, diracObjectsEval, null1, null2, dsHead, time, repRule, mode,
+ optDiracSigmaExplicit, optDiracGammaCombine, optContract, optFCCanonicalizeDummyIndices
+ },
+
+ optDiracSigmaExplicit = OptionValue[DiracSigmaExplicit];
+ optDiracGammaCombine = OptionValue[DiracGammaCombine];
+ optContract = OptionValue[Contract];
+ optFCCanonicalizeDummyIndices = OptionValue[FCCanonicalizeDummyIndices];
+
+ FCPrint[1, "SirlinSimplify. Entering.", FCDoControl->sisVerbose];
+ FCPrint[3, "SirlinSimplify: Entering with ", expr, FCDoControl->sisVerbose];
+
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex,Spinor],
+ Return[ex]
+ ];
+
+ If[ OptionValue[FCVerbose]===False,
+ sisVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ sisVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ If[ OptionValue[SpinorChainTrick],
+
+ FCPrint[1, "SirlinSimplify: Applying SpinorChainTrick.", FCDoControl->sisVerbose];
+ time=AbsoluteTime[];
+ tmp = SpinorChainTrick[ex, FCI->True,DiracGammaCombine->optDiracGammaCombine, DiracSigmaExplicit->optDiracSigmaExplicit,
+ Contract -> optContract, FCCanonicalizeDummyIndices -> optFCCanonicalizeDummyIndices, FCJoinDOTs-> OptionValue[FCJoinDOTs]];
+
+ FCPrint[1, "SirlinSimplify: Done applying SpinorChainTrick, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sisVerbose];
+ FCPrint[3, "SirlinSimplify: After SpinorChainTrick: ", tmp, FCDoControl->sisVerbose],
+
+ tmp = ex
+ ];
+
+
+
+ FCPrint[1, "SirlinSimplify: Isolating spinor chains.", FCDoControl->sisVerbose];
+ time=AbsoluteTime[];
+
+ tmp = FCDiracIsolate[tmp,FCI->True,Head->dsHead, DotSimplify->False, DiracGammaCombine->optDiracGammaCombine, FCJoinDOTs-> OptionValue[FCJoinDOTs],
+ DiracSigmaExplicit->optDiracSigmaExplicit, LorentzIndex->False, Spinor->Join, DiracGamma->False, Factoring -> OptionValue[Factoring]];
+
+ FCPrint[1, "SirlinSimplify: Done isolating spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sisVerbose];
+ FCPrint[3, "SirlinSimplify: After FCDiracIsolate ", tmp, FCDoControl->sisVerbose];
+
+
+
+ diracObjects = Cases[tmp+null1+null2, dsHead[_], Infinity]//Sort//DeleteDuplicates;
+ FCPrint[3,"SirlinSimplify: diracObjects: ", diracObjects , FCDoControl->sisVerbose];
+
+
+ FCPrint[1, "SirlinSimplify: Simplifying products of spinor chains.", FCDoControl->sisVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = Map[(spinorChainSirlinEvalSpecial[#])&, (diracObjects/.dsHead->Identity/. DOT->holdDOT)]/.
+ spinorChainSirlinEvalSpecial -> spinorChainSirlinEval /. holdDOT->DOT;
+ FCPrint[1, "SirlinSimplify: Done simplifying products of spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sisVerbose];
+ FCPrint[3, "SirlinSimplify: diracObjectsEval: ", tmp, FCDoControl->sisVerbose];
+
+ If[ OptionValue[DiracTrick],
+
+ FCPrint[1, "SirlinSimplify: Applying DiracTrick to the simplified relations.", FCDoControl->sisVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = diracObjectsEval /. spinorChainSirlinEval[] -> 1 /. zzz_spinorChainSirlinEval :> DiracTrick[First[zzz],FCI->True, FCDiracIsolate->False],
+ diracObjectsEval = diracObjectsEval /. spinorChainSirlinEval -> Identity;
+ FCPrint[1, "SirlinSimplify: DiracTrick done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sisVerbose]
+ ];
+
+
+ If[ !FreeQ2[diracObjectsEval,{spinorChainSirlinEval,holdDOT}],
+ Message[SirlinSimplify::failmsg,"Evaluation of isolated objects failed."];
+ Abort[]
+ ];
+
+ FCPrint[1, "SirlinSimplify: Inserting Dirac objects back.", FCDoControl->sisVerbose];
+ time=AbsoluteTime[];
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"SirlinSimplify: repRule: ",repRule , FCDoControl->sisVerbose];
+ res = (tmp/. Dispatch[repRule]);
+ FCPrint[1, "SirlinSimplify: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sisVerbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "SirlinSimplify: Leaving.", FCDoControl->sisVerbose];
+ FCPrint[3, "SirlinSimplify: Leaving with ", res, FCDoControl->sisVerbose];
+
+
+
+ res
+
+
+
+
+
+
+ ];
+
+
+(* [mu nu] [mu nu] ; [mu nu] [nu mu] *)
+(* ----------------------------------------------------------------------------------------------------------------- *)
+
+(* Sirlin's very useful relations, 4th page of Sirlin's paper *)
+spinorChainSirlinEval[m_. holdDOT[ Spinor[p1__], (ga1___), DiracGamma[LorentzIndex[mu_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n1:6|7)], Spinor[p2__]]*
+ holdDOT[ Spinor[p3__], (ga2___), DiracGamma[LorentzIndex[mu_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n2:6|7)], Spinor[p4__]]] :=
+ 4 spinorChainSirlinEval[m holdDOT[Spinor[p1] , ga1, DiracGamma[n1], Spinor[p2]] holdDOT[Spinor[p3], ga2, DiracGamma[n2], Spinor[p4]]]/; n1=!=n2;
+
+spinorChainSirlinEval[m_. holdDOT[ Spinor[p1__], (ga1___), DiracGamma[LorentzIndex[mu_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n1:6|7)], Spinor[p2__]]*
+ holdDOT[ Spinor[p3__], (ga2___), DiracGamma[LorentzIndex[nu_]], DiracGamma[LorentzIndex[mu_]], DiracGamma[(n2:6|7)], Spinor[p4__]]] :=
+ 4 spinorChainSirlinEval[m holdDOT[Spinor[p1] , ga1, DiracGamma[n1], Spinor[p2]] holdDOT[Spinor[p3], ga2, DiracGamma[n2], Spinor[p4]]]/; n1=!=n2;
+
+
+
+
+(* These are simiar to Sirlin's very useful relations, except for the fact that the chiral projectors are identical *)
+spinorChainSirlinEval[m_. holdDOT[Spinor[p1__],DiracGamma[LorentzIndex[mu_]],DiracGamma[LorentzIndex[nu_]],DiracGamma[(n:6|7)],Spinor[p2__]]*
+ holdDOT[Spinor[p3__],DiracGamma[LorentzIndex[mu_]],DiracGamma[LorentzIndex[nu_]],DiracGamma[(n:6|7)],Spinor[p4__]]]:=
+ (
+ li1 = LorentzIndex[Unique["liS"]];
+ li2 = LorentzIndex[Unique["liS"]];
+ li3 = LorentzIndex[Unique["liS"]];
+ li4 = LorentzIndex[Unique["liS"]];
+
+ (4 spinorChainSirlinEval[holdDOT[Spinor[p1], DiracGamma[n], Spinor[p2]] holdDOT[Spinor[p3], DiracGamma[n], Spinor[p4]]] -
+
+ 1/2 spinorChainSirlinEval[m holdDOT[Spinor[p1], DiracSigma[DiracGamma[li1], DiracGamma[li2]], Spinor[p2]] *
+ holdDOT[ Spinor[p3], DiracSigma[DiracGamma[li1], DiracGamma[li2]], Spinor[p4]]] +
+ 1/4 I (-1)^n $LeviCivitaSign Eps[li1, li2, li3, li4] spinorChainSirlinEval[m holdDOT[Spinor[p1], DiracSigma[DiracGamma[li1], DiracGamma[li2]], Spinor[p2]] *
+ holdDOT[ Spinor[p3], DiracSigma[DiracGamma[li3], DiracGamma[li4]], Spinor[p4]]])
+ );
+
+spinorChainSirlinEval[m_. holdDOT[Spinor[p1__],DiracGamma[LorentzIndex[mu_]],DiracGamma[LorentzIndex[nu_]],DiracGamma[(n:6|7)],Spinor[p2__]]*
+ holdDOT[Spinor[p3__],DiracGamma[LorentzIndex[nu_]],DiracGamma[LorentzIndex[mu_]],DiracGamma[(n:6|7)],Spinor[p4__]]]:=
+ (
+ li1 = LorentzIndex[Unique["liS"]];
+ li2 = LorentzIndex[Unique["liS"]];
+ li3 = LorentzIndex[Unique["liS"]];
+ li4 = LorentzIndex[Unique["liS"]];
+
+ (4 spinorChainSirlinEval[holdDOT[Spinor[p1], DiracGamma[n], Spinor[p2]] holdDOT[Spinor[p3], DiracGamma[n], Spinor[p4]]] +
+
+ 1/2 spinorChainSirlinEval[m holdDOT[Spinor[p1], DiracSigma[DiracGamma[li1], DiracGamma[li2]], Spinor[p2]] *
+ holdDOT[ Spinor[p3], DiracSigma[DiracGamma[li1], DiracGamma[li2]], Spinor[p4]]] +
+ - 1/4 I (-1)^n $LeviCivitaSign Eps[li1, li2, li3, li4] spinorChainSirlinEval[m holdDOT[Spinor[p1], DiracSigma[DiracGamma[li1], DiracGamma[li2]], Spinor[p2]] *
+ holdDOT[ Spinor[p3], DiracSigma[DiracGamma[li3], DiracGamma[li4]], Spinor[p4]]])
+ );
+
+
+
+(* [mu rho nu] [mu tau nu] ; [mu rho nu] [nu tau mu] *)
+(* ----------------------------------------------------------------------------------------------------------------- *)
+
+(* eq. (8) of Sirlin, the result is independent of $LeviCivitaSign. This implements Eqs. 1-2 of Sirlin. Notice that ga1, ga2, ga3 and ga4 are arbitrary. *)
+spinorChainSirlinEval[m_. holdDOT[sp1_Spinor, ga1___, DiracGamma[LorentzIndex[mu_]], DiracGamma[h1_[rho_]], DiracGamma[LorentzIndex[nu_]], ga2___, sp2_Spinor]*
+ holdDOT[sp3_Spinor, ga3___, DiracGamma[LorentzIndex[mu_]], DiracGamma[h2_[tau_]], DiracGamma[LorentzIndex[nu_]], ga4___, sp4_Spinor]] :=
+ Block[ {la, grho, gtau},
+ li = LorentzIndex[Unique["liS"]];
+ la = DiracGamma[li];
+ grho = DiracGamma[h1[rho]];
+ gtau = DiracGamma[h2[tau]];
+
+ 2 Pair[h1[rho], h2[tau]] spinorChainSirlinEval[m holdDOT[sp1, ga1, la, ga2, sp2] holdDOT[sp3, ga3, la, ga4, sp4]] +
+ 2 spinorChainSirlinEval[m holdDOT[sp1, ga1, gtau, ga2, sp2] holdDOT[sp3, ga3, grho, ga4, sp4]] +
+ 2 Pair[h1[rho], h2[tau]] spinorChainSirlinEval[ m holdDOT[sp1 , ga1 , la , ga2 , DiracGamma[5] , sp2] holdDOT[sp3, ga3, la, ga4, DiracGamma[5], sp4]] -
+ 2 spinorChainSirlinEval[m holdDOT[sp1, ga1 , gtau, ga2, DiracGamma[5], sp2] holdDOT[sp3, ga3, grho, ga4, DiracGamma[5], sp4]]
+
+ ];
+
+(* eq. (9) of Sirlin, the result is independent of $LeviCivitaSign. This implements Eqs. 3-4 of Sirlin. Notice that ga1, ga2, ga3 and ga4 are arbitrary. *)
+spinorChainSirlinEval[m_. holdDOT[sp1_Spinor, ga1___, DiracGamma[LorentzIndex[nu_]], DiracGamma[h1_[rho_]], DiracGamma[LorentzIndex[mu_]], ga2___, sp2_Spinor]*
+ holdDOT[sp3_Spinor, ga3___, DiracGamma[LorentzIndex[mu_]], DiracGamma[h2_[tau_]], DiracGamma[LorentzIndex[nu_]], ga4___, sp4_Spinor]] :=
+ Block[ {la, grho, gtau},
+ li = LorentzIndex[Unique["liS"]];
+ la = DiracGamma[li];
+ grho = DiracGamma[h1[rho]];
+ gtau = DiracGamma[h2[tau]];
+
+ 2 Pair[h1[rho], h2[tau]] spinorChainSirlinEval[m holdDOT[sp1, ga1, la, ga2, sp2] holdDOT[sp3, ga3, la, ga4, sp4]] +
+ 2 spinorChainSirlinEval[m holdDOT[sp1, ga1, gtau, ga2, sp2] holdDOT[sp3, ga3, grho, ga4, sp4]] -
+ 2 Pair[h1[rho], h2[tau]] spinorChainSirlinEval[ m holdDOT[sp1 , ga1 , la , ga2 , DiracGamma[5] , sp2] holdDOT[sp3, ga3, la, ga4, DiracGamma[5], sp4]] +
+ 2 spinorChainSirlinEval[m holdDOT[sp1, ga1 , gtau, ga2, DiracGamma[5], sp2] holdDOT[sp3, ga3, grho, ga4, DiracGamma[5], sp4]]
+
+ ];
+
+(* [mu rho si tau nu] [mu rho si tau nu] ; [mu rho si tau nu] [nu rho si tau mu] *)
+(* ----------------------------------------------------------------------------------------------------------------- *)
+
+(* This covers the cases where we have more Dirac matrices between mu and nu...
+i.e. Eqs 10a, 10b, 11, 12, 13 and alike
+spinorChainSirlinEval. *)
+
+(* eq. (12) of Sirlin *)
+spinorChainSirlinEvalSpecial[m_. holdDOT[Spinor[p1__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lv_[rho_]],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvt_[tau_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n:6|7)] , Spinor[p2__]]*
+ holdDOT[Spinor[p3__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lva_[alpha_] ],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvb_[beta_]], DiracGamma[ LorentzIndex[nu_]], DiracGamma[(n:6|7)] , Spinor[p4__]]] :=
+ 16 Pair[lvt[tau],lvb[beta]] Pair[lv[rho], lva[alpha]] *
+ spinorChainSirlinEvalSpecial[ m holdDOT[ Spinor[p1], DiracGamma[LorentzIndex[mu]], DiracGamma[n], Spinor[p2]] *
+ holdDOT[ Spinor[p3], DiracGamma[LorentzIndex[mu]], DiracGamma[n], Spinor[p4]]];
+
+(* reversed version of eq. (12) from Sirlin *)
+spinorChainSirlinEvalSpecial[m_. holdDOT[Spinor[p1__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lv_[rho_]],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvt_[tau_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n:6|7)] , Spinor[p2__]]*
+ holdDOT[Spinor[p3__], DiracGamma[LorentzIndex[nu_]], DiracGamma[lva_[alpha_]],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvb_[beta_]], DiracGamma[ LorentzIndex[mu_]], DiracGamma[(n:6|7)] , Spinor[p4__]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ 4 spinorChainSirlinEvalSpecial[m holdDOT[Spinor[p1],DiracGamma[lvb[beta]],DiracGamma[lvt[tau]],DiracGamma[li],DiracGamma[n],Spinor[p2]] *
+ holdDOT[Spinor[p3],DiracGamma[li],DiracGamma[lva[alpha]],DiracGamma[lv[rho]],DiracGamma[n],Spinor[p4]]]
+ )
+
+
+(* eq. (13) of Sirlin *)
+spinorChainSirlinEvalSpecial[m_. holdDOT[Spinor[p1__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lv_[rho_] ],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvt_[tau_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n1:6|7)] , Spinor[p2__]]*
+ holdDOT[Spinor[p3__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lva_[alpha_] ],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvb_[beta_] ], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n2:6|7)] , Spinor[p4__]]] :=
+ (4 spinorChainSirlinEvalSpecial[m holdDOT[Spinor[p1], DiracGamma[LorentzIndex[mu]], DiracGamma[lv[rho]], DiracGamma[lvb[beta]], DiracGamma[n1], Spinor[p2]] *
+ holdDOT[Spinor[p3], DiracGamma[LorentzIndex[mu]], DiracGamma[lva[alpha]], DiracGamma[lvt[tau]], DiracGamma[n2], Spinor[p4]]]);
+
+(* reversed version of eq. (13) from Sirlin *)
+spinorChainSirlinEvalSpecial[m_. holdDOT[Spinor[p1__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lv_[rho_]],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvt_[tau_]], DiracGamma[LorentzIndex[nu_]], DiracGamma[(n1:6|7)] , Spinor[p2__]]*
+ holdDOT[Spinor[p3__], DiracGamma[LorentzIndex[nu_]], DiracGamma[lva_[alpha_]],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvb_[beta_]], DiracGamma[LorentzIndex[mu_]], DiracGamma[(n2:6|7)] , Spinor[p4__]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ 16 Pair[LorentzIndex[lva[alpha]], LorentzIndex[lvt[tau]]] Pair[LorentzIndex[lvb[beta]], lv[rho]] *
+ spinorChainSirlinEvalSpecial[m holdDOT[Spinor[p1],DiracGamma[li],DiracGamma[n1],Spinor[p2]] holdDOT[Spinor[p3],DiracGamma[li],DiracGamma[n2],Spinor[p4]]]
+ )
+
+
+(* Eq. 5 of Sirlin *)
+spinorChainSirlinEvalSpecial[m_. holdDOT[sp1_Spinor, DiracGamma[LorentzIndex[mu_]], DiracGamma[h1_[rho_]], DiracGamma[LorentzIndex[nu_]], 1/2 + la1_. DiracGamma[5], sp2_Spinor]*
+ holdDOT[sp3_Spinor, DiracGamma[LorentzIndex[mu_]], DiracGamma[h2_[tau_]], DiracGamma[LorentzIndex[nu_]], 1/2 + la2_. DiracGamma[5], sp4_Spinor]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+
+ (1 + 2 la1) (1 + 2 la2) Pair[h1[rho], h2[tau]] spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[li], DiracGamma[6], sp2] holdDOT[sp3, DiracGamma[li], DiracGamma[6], sp4]] +
+
+ (1 - 2 la1) (1 - 2 la2) Pair[h1[rho], h2[tau]] spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[li], DiracGamma[7], sp2] holdDOT[sp3, DiracGamma[li], DiracGamma[7], sp4]] +
+
+ (1 + 2 la1) (1 - 2 la2) spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[h2[tau]], DiracGamma[6], sp2] holdDOT[sp3, DiracGamma[h1[rho]], DiracGamma[7], sp4]] +
+
+ (1 - 2 la1) (1 + 2 la2) spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[h2[tau]], DiracGamma[7], sp2] holdDOT[sp3, DiracGamma[h1[rho]], DiracGamma[6], sp4]]
+
+ )/; NonCommFreeQ[{la1,la2}]
+
+
+(* Eq. 6 of Sirlin *)
+spinorChainSirlinEvalSpecial[m_. holdDOT[sp1_Spinor, DiracGamma[LorentzIndex[nu_]], DiracGamma[h1_[rho_]], DiracGamma[LorentzIndex[mu_]], 1/2 + la1_. DiracGamma[5], sp2_Spinor]*
+ holdDOT[sp3_Spinor, DiracGamma[LorentzIndex[mu_]], DiracGamma[h2_[tau_]], DiracGamma[LorentzIndex[nu_]], 1/2 + la2_. DiracGamma[5], sp4_Spinor]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+
+ (1 + 2 la1) (1 + 2 la2) spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[h2[tau]], DiracGamma[6], sp2] holdDOT[sp3, DiracGamma[h1[rho]], DiracGamma[6], sp4]] +
+
+ (1 - 2 la1) (1 - 2 la2) spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[h2[tau]], DiracGamma[7], sp2] holdDOT[sp3, DiracGamma[h1[rho]], DiracGamma[7], sp4]] +
+
+ (1 + 2 la1) (1 - 2 la2) Pair[h1[rho], h2[tau]] spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[li], DiracGamma[6], sp2] holdDOT[sp3, DiracGamma[li], DiracGamma[7], sp4]] +
+
+ (1 - 2 la1) (1 + 2 la2) Pair[h1[rho], h2[tau]] spinorChainSirlinEvalSpecial[m holdDOT[sp1, DiracGamma[li], DiracGamma[7], sp2] holdDOT[sp3, DiracGamma[li], DiracGamma[6], sp4]]
+
+ )/; NonCommFreeQ[{la1,la2}]
+
+
+
+
+
+(* [mu i1 i2 i3 ... nu] [mu i1 i2 i3 ... nu] ; [mu i1 i2 i3 ... nu] [nu i1 i2 i3 ... mu] *)
+(* ----------------------------------------------------------------------------------------------------------------- *)
+
+
+
+
+
+(* ??? *)
+(*
+m=0
+spinorChainSirlinEval[m_. holdDOT[Spinor[pa__], DiracGamma[Momentum[pj_]], DiracGamma[Momentum[pi_]], DiracGamma[LorentzIndex[mu_]], (vg5___), Spinor[pb__]]*
+ holdDOT[Spinor[Momentum[pi_], 0, qf___], DiracGamma[LorentzIndex[mu_]], (vg5___), Spinor[Momentum[pj_],0,qf___]]] :=
+ (
+ - spinorChainSirlinEval[ m holdDOT[Spinor[pa] , DiracGamma[Momentum[pi]], DiracGamma[Momentum[pj]], DiracGamma[LorentzIndex[mu]], vg5 , Spinor[pb]] *
+ holdDOT[Spinor[Momentum[pi],0,qf], DiracGamma[LorentzIndex[mu]], vg5 , Spinor[Momentum[pj],0,qf]]
+ ] +
+
+ 2 Pair[Momentum[pi], Momentum[pj]] spinorChainSirlinEval[ m holdDOT[Spinor[pa], DiracGamma[LorentzIndex[mu]], vg5, Spinor[pb]] *
+ holdDOT[Spinor[Momentum[pi],0,qf], DiracGamma[LorentzIndex[mu]], vg5, Spinor[Momentum[pj],0,qf]]
+ ]
+ ) /; ({vg5}==={}) || ({vg5}==={DiracGamma[5]});
+*)
+
+(*
+m=0
+spinorChainSirlinEval[m_. holdDOT[Spinor[pa__], DiracGamma[Momentum[pi_]], DiracGamma[Momentum[pj_]], DiracGamma[LorentzIndex[mu_]], (vg5___), Spinor[pb__]]*
+ holdDOT[Spinor[Momentum[pi_],0,qf___], DiracGamma[LorentzIndex[mu_]], (vg5___), Spinor[Momentum[pj_],0,qf___]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+
+ Pair[Momentum[pi], Momentum[pj]] spinorChainSirlinEval[ m holdDOT[ Spinor[pa], DiracGamma[li], Spinor[pb]] *
+ holdDOT[ Spinor[Momentum[pi],0,qf], DiracGamma[li], Spinor[Momentum[pj],0,qf]]
+ ] +
+
+ Pair[Momentum[pi], Momentum[pj]] spinorChainSirlinEval[ m holdDOT[ Spinor[pa], DiracGamma[li], DiracGamma[5], Spinor[pb]] *
+ holdDOT[ Spinor[Momentum[pi],0,qf], DiracGamma[li], DiracGamma[5], Spinor[Momentum[pj],0,qf]]
+ ]
+
+
+ ) /; ({vg5}==={}) || ({vg5}==={DiracGamma[5]});
+*)
+
+
+
+
+
+
+
+(* If the chains do not contain g_5, would need an extra option
+
+*)
+(*spinorChainSirlinEval[m_. holdDOT[Spinor[p1__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lv_[rho_]],
+ DiracGamma[LorentzIndex[sigma_]], DiracGamma[lvt_[tau_] ], DiracGamma[LorentzIndex[nu_]], Spinor[p2__]]*
+ holdDOT[Spinor[p3__], DiracGamma[LorentzIndex[mu_]], DiracGamma[lva_[alpha_]],
+ DiracGamma[ LorentzIndex[sigma_]], DiracGamma[lvb_[beta_]], DiracGamma[LorentzIndex[nu_] ], Spinor[p4__]]] :=
+ Block[ {tmp,re},
+ tmp[ome1_,ome2_] :=
+ spinorChainSirlinEval[m holdDOT[Spinor[p1], DiracGamma[LorentzIndex[mu]], DiracGamma[lv[rho]],
+ DiracGamma[LorentzIndex[sigma]], DiracGamma[lvt[tau]], DiracGamma[LorentzIndex[nu]], DiracGamma[ome1], Spinor[p2]] *
+ holdDOT[Spinor[p3], DiracGamma[LorentzIndex[mu]], DiracGamma[lva[alpha]],
+ DiracGamma[LorentzIndex[sigma]], DiracGamma[lvb[beta]], DiracGamma[LorentzIndex[nu]], DiracGamma[ome2], Spinor[p4]]
+ ];
+ re = tmp[6,6] + tmp[6,7] + tmp[7,6] + tmp[7,7];
+ re
+
+ ];
+*)
+
+
+(* These are the ones calculated by FeynCalc *)
+
+(* This one is for the case that there is nothing between mu and nu, btw mu nu and nu mu should
+equally work ...*)
+(* eventually PairContract is needed here!!! *)
+(*
+spinorChainSirlinEval[m_. holdDOT[Spinor[pi__], x1___, DiracGamma[LorentzIndex[mu_]], DiracGamma[LorentzIndex[nu_]], x2___ , Spinor[pj__]]*
+ holdDOT[Spinor[pk__], x3___, DiracGamma[vm_[a_]], DiracGamma[LorentzIndex[mu_]], DiracGamma[LorentzIndex[nu_]], x4___, Spinor[pl__]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ 2 spinorChainSirlinEval[m holdDOT[Spinor[pi], x1, x2, Spinor[pj]] holdDOT[Spinor[pk], x3, DiracGamma[vm[a]], x4, Spinor[pl]]] +
+ 2 spinorChainSirlinEval[m holdDOT[Spinor[pk], x3, DiracGamma[li], x4, Spinor[pl]] holdDOT[Spinor[pi], x1, DiracGamma[vm[a]], DiracGamma[li], x2, Spinor[pj]]] -
+ 2 spinorChainSirlinEval[m holdDOT[Spinor[pi], x1, DiracGamma[5], x2, Spinor[pj]] holdDOT[Spinor[pk], x3, DiracGamma[vm[a]], DiracGamma[5], x4, Spinor[pl]]] +
+ 2 spinorChainSirlinEval[m holdDOT[Spinor[pk], x3, DiracGamma[li] , DiracGamma[5], x4, Spinor[pl]]*
+ holdDOT[Spinor[pi], x1, DiracGamma[vm[a]], DiracGamma[li], DiracGamma[5], x2, Spinor[pj]]]
+ );
+*)
+(*
+(*???? *)
+spinorChainSirlinEval[m_. holdDOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], Spinor[Momentum[pj_], 0, fq___]]*
+ holdDOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pj_]], Spinor[Momentum[pk_], 0, fq___]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ -Pair[Momentum[pj], Momentum[pk]]/Pair[Momentum[pi], Momentum[pl]] *
+ spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq], DiracGamma[Momentum[pl]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq], DiracGamma[Momentum[pi]], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ (-Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]] +
+ Pair[Momentum[pi], Momentum[pk]] Pair[Momentum[pj], Momentum[pl]] -
+ Pair[Momentum[pi], Momentum[pj]] Pair[Momentum[pk], Momentum[pl]])/(2 Pair[Momentum[pi], Momentum[pl]])*
+ spinorChainSirlinEval[ m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[li]], DiracGamma[5] , Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[li]], DiracGamma[5] , Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ (3 Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]] +
+ Pair[Momentum[pi], Momentum[pk]] Pair[Momentum[pj], Momentum[pl]] -
+ Pair[Momentum[pi], Momentum[pj]]*Pair[Momentum[pk], Momentum[pl]])/(2 Pair[Momentum[pi], Momentum[pl]])*
+ spinorChainSirlinEval[ m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[li]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[li]], Spinor[Momentum[pk], 0, fq]]
+ ]
+ );
+
+(*???? *)
+spinorChainSirlinEval[m_. holdDOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], Spinor[Momentum[pj_], 0, fq___]]*
+ holdDOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pi_]], Spinor[Momentum[pk_], 0, fq___]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ - Pair[Momentum[pi], Momentum[pk]]/ Pair[Momentum[pj], Momentum[pl]] *
+ spinorChainSirlinEval[ m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pl]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pj]], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ (Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]] +
+ 3 Pair[Momentum[pi], Momentum[pk]] Pair[Momentum[pj], Momentum[pl]] -
+ Pair[Momentum[pi], Momentum[pj]]*Pair[Momentum[pk], Momentum[pl]])/(2 Pair[Momentum[pj], Momentum[pl]])*
+ spinorChainSirlinEval[ m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[li]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[li]], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ ( - Pair[Momentum[pi], Momentum[pl]] Pair[Momentum[pj], Momentum[pk]] +
+ Pair[Momentum[pi], Momentum[pk]]*Pair[Momentum[pj], Momentum[pl]] +
+ Pair[Momentum[pi], Momentum[pj]]*Pair[Momentum[pk], Momentum[pl]])/(2 Pair[Momentum[pj], Momentum[pl]])*
+ spinorChainSirlinEval[ m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[LorentzIndex[li]], DiracGamma[5], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[LorentzIndex[li]], DiracGamma[5], Spinor[Momentum[pk], 0, fq]]
+ ]
+
+ )/;
+ First[holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pi]] , Spinor[Momentum[pk], 0, fq]]]===
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]];
+
+
+(*???? *)
+spinorChainSirlinEval[m_. holdDOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], DiracGamma[5], Spinor[Momentum[pj_], 0, fq___]]*
+ holdDOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pj_]], DiracGamma[5], Spinor[Momentum[pk_], 0, fq___]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pj]], Spinor[Momentum[pk], 0, fq]]
+ ] -
+
+ Pair[Momentum[pj], Momentum[pk]] spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[li], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[li], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ Pair[Momentum[pj], Momentum[pk]] spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[li], DiracGamma[5], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[li], DiracGamma[5], Spinor[Momentum[pk], 0, fq]]
+ ]
+ );
+
+(*???? *)
+spinorChainSirlinEval[m_. holdDOT[Spinor[Momentum[pi_], 0, fq___] , DiracGamma[Momentum[pk_]], DiracGamma[5], Spinor[Momentum[pj_], 0, fq___]]*
+ holdDOT[Spinor[Momentum[pl_], 0,fq___], DiracGamma[Momentum[pi_]], DiracGamma[5], Spinor[Momentum[pk_], 0, fq___]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ - spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[Momentum[pk]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[Momentum[pi]], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ Pair[Momentum[pi], Momentum[pk]] spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[li], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[li], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ Pair[Momentum[pi], Momentum[pk]] spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq] , DiracGamma[li], DiracGamma[5] , Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq] , DiracGamma[li], DiracGamma[5] , Spinor[Momentum[pk], 0, fq]]
+ ]
+ );
+
+(*???? *)
+spinorChainSirlinEval[m_. holdDOT[Spinor[Momentum[pi_], 0, fq___], DiracGamma[Momentum[pl_]], DiracGamma[5], Spinor[Momentum[pj_], 0, fq___]]*
+ holdDOT[Spinor[Momentum[pl_], 0, fq___] , DiracGamma[Momentum[pj_]], DiracGamma[5], Spinor[Momentum[pk_], 0, fq___]]] :=
+ (
+ li = LorentzIndex[Unique["liS"]];
+ - spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq], DiracGamma[Momentum[pl]], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq], DiracGamma[Momentum[pj]], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ Pair[Momentum[pj], Momentum[pl]] spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq], DiracGamma[li], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq], DiracGamma[li], Spinor[Momentum[pk], 0, fq]]
+ ] +
+
+ Pair[Momentum[pj], Momentum[pl]] spinorChainSirlinEval[m *
+ holdDOT[Spinor[Momentum[pi], 0, fq], DiracGamma[li], DiracGamma[5], Spinor[Momentum[pj], 0, fq]]*
+ holdDOT[Spinor[Momentum[pl], 0, fq], DiracGamma[li], DiracGamma[5], Spinor[Momentum[pk], 0, fq]]
+ ]
+ );
+*)
+FCPrint[1,"SirlinSimplify.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/SpinorChainChiralSplit.m b/FeynCalc/Dirac/SpinorChainChiralSplit.m
new file mode 100755
index 000000000..28576f9af
--- /dev/null
+++ b/FeynCalc/Dirac/SpinorChainChiralSplit.m
@@ -0,0 +1,122 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: SpinorChainChiralSplit *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Simplification rules for products of spinor chains *)
+
+(* ------------------------------------------------------------------------ *)
+
+SpinorChainChiralSplit::usage =
+"SpinorChainChiralSplit[exp] introduces chirality projectors in spinor chains \
+that contain no GA[5].";
+
+SpinorChainChiralSplit::failmsg =
+"Error! SpinorChainChiralSplit has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`SpinorChainChiralSplit`Private`"]
+
+holdDOT::usage="";
+spchchspVerbose::usage="";
+
+Options[SpinorChainChiralSplit] = {
+ Collecting -> True,
+ DiracSubstitute5 -> True,
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False,
+ Factoring -> Factor,
+ Head -> Identity
+};
+
+SpinorChainChiralSplit[expr_, OptionsPattern[]] :=
+ Block[{ex, tmp, dsHead, dsIso, freePart,dsPart, null1, null2, time, diracObjects, diracObjectsEval, repRule, res, optHead},
+
+ optHead = OptionValue[Head];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex,Spinor],
+ Return[ex]
+ ];
+
+ If[ OptionValue[FCVerbose]===False,
+ spchchspVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ spchchspVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1, "SpinorChainChiralSplit. Entering.", FCDoControl->spchchspVerbose];
+ FCPrint[3, "SpinorChainChiralSplit: Entering with ", ex, FCDoControl->spchchspVerbose];
+
+ If[ MatchQ[ex/.DOT->holdDOT, holdDOT[a_Spinor,b___,c_Spinor]/;FreeQ[{b},Spinor]],
+
+ FCPrint[1, "SpinorChainChiralSplit: Recognized standalone expression.", FCDoControl->spchchspVerbose];
+ tmp = dsHead[ex];
+ diracObjects = {dsHead[ex]},
+
+ FCPrint[1, "SpinorChainChiralSplit: Isolating spinor chains.", FCDoControl->spchchspVerbose];
+ time=AbsoluteTime[];
+ tmp = FCDiracIsolate[ex,FCI->True, Head->dsHead, Spinor->True, Collecting-> OptionValue[Collecting], DiracGamma->False, Factoring -> OptionValue[Factoring]];
+ FCPrint[1, "SpinorChainChiralSplit: Done isolating spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchchspVerbose];
+ FCPrint[3, "SpinorChainChiralSplit: After FCDiracIsolate ", tmp, FCDoControl->spchchspVerbose];
+
+ diracObjects = Cases[tmp+null1+null2, dsHead[_], Infinity]//Sort//DeleteDuplicates;
+
+ ];
+
+ FCPrint[3,"SpinorChainChiralSplit: diracObjects: ", diracObjects , FCDoControl->spchchspVerbose];
+
+
+ FCPrint[1, "SpinorChainChiralSplit: Rewriting products of spinor chains.", FCDoControl->spchchspVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = (diracObjects/.dsHead->Identity/. DOT->holdDOT)/. holdDOT[a_Spinor, b___, c_Spinor]/;
+ FreeQ2[{b},{DiracGamma[5],DiracGamma[6],DiracGamma[7],Spinor}] :> optHead[holdDOT[a,b,DiracGamma[6],c]] + optHead[holdDOT[a,b,DiracGamma[7],c]];
+
+ If[ OptionValue[DiracSubstitute5] && !FreeQ[diracObjectsEval,DiracGamma[5]],
+
+ diracObjectsEval = diracObjectsEval/. holdDOT[a_Spinor, b___,DiracGamma[5],c___, d_Spinor]:>
+ optHead[holdDOT[a, b,DiracGamma[6],c, d]] - optHead[holdDOT[a, b, DiracGamma[7], c, d]]
+ ];
+
+ FCPrint[1, "SpinorChainChiralSplit: Done rewriting products of spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchchspVerbose];
+ FCPrint[3, "SpinorChainChiralSplit: diracObjectsEval: ", diracObjectsEval, FCDoControl->spchchspVerbose];
+
+ FCPrint[1, "SpinorChainChiralSplit: Inserting Dirac objects back.", FCDoControl->spchchspVerbose];
+ time=AbsoluteTime[];
+ repRule = Thread[Rule[diracObjects,(diracObjectsEval/.holdDOT->DOT)]];
+ FCPrint[3,"SpinorChainChiralSplit: repRule: ",repRule , FCDoControl->spchchspVerbose];
+ res = (tmp /. Dispatch[repRule]);
+ FCPrint[1, "SpinorChainChiralSplit: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchchspVerbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "SpinorChainChiralSplit: Leaving.", FCDoControl->spchchspVerbose];
+ FCPrint[3, "SpinorChainChiralSplit: Leaving with ", res, FCDoControl->spchchspVerbose];
+
+ res
+
+ ];
+
+FCPrint[1,"SpinorChainChiralSplit.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/SpinorChainTranspose.m b/FeynCalc/Dirac/SpinorChainTranspose.m
new file mode 100755
index 000000000..d7baebd7c
--- /dev/null
+++ b/FeynCalc/Dirac/SpinorChainTranspose.m
@@ -0,0 +1,156 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: SpinorChainTranspose *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Switch u and v spinors in a spinor chain *)
+
+(* ------------------------------------------------------------------------ *)
+
+SpinorChainTranspose::usage =
+"SpinorChainTranspose[exp] tranposes particular spinor chains in exp, \
+which effectively switches the u and v spinors and reverses the order of \
+the Dirac matrices using charge conjugation operator. This operation is \
+often required in calculations that involve Majorana particles. By default, \
+the function will tranpose all chains of the form vbar.x.u and vbar.x.v. \
+A different or more fine grained choice can be obtained via the option Select.";
+
+SpinorChainTranspose::failmsg =
+"Error! SpinorChainTranspose has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`SpinorChainTranspose`Private`"]
+
+holdDOT::usage="";
+sctrVerbose::usage="";
+
+Options[SpinorChainTranspose] = {
+ Collecting -> True,
+ DotSimplify -> True,
+ FCE -> False,
+ FCI -> False,
+ FCVerbose -> False,
+ Factoring -> Factor,
+ Head -> Identity,
+ Select -> {
+ {SpinorVBar[_,_], SpinorU[_,_]},
+ {SpinorVBar[_,_], SpinorV[_,_]},
+ {SpinorVBarD[_,_], SpinorUD[_,_]},
+ {SpinorVBarD[_,_], SpinorVD[_,_]}
+ },
+ TimeConstrained -> 3
+};
+
+SpinorChainTranspose[expr_, OptionsPattern[]] :=
+ Block[{ex, tmp, dsHead, freePart,dsPart, null1, null2, time, diracObjects, diracObjectsEval,
+ repRule, res, optHead, optSelect, chainPatterns},
+
+ optHead = OptionValue[Head];
+ optSelect = FCI[OptionValue[Select]];
+
+ If[ !MatchQ[optSelect, {{Spinor[__], Spinor[__]}..}],
+ Message[SpinorChainTranspose::failmsg,"The value of the Select option is not a valid list of filters."];
+ Abort[]
+ ];
+
+ chainPatterns = Map[holdDOT[#[[1]], ___, #[[2]]] &, optSelect];
+
+ If[ Length[chainPatterns]===1,
+ chainPatterns = First[chainPatterns],
+ chainPatterns = Alternatives@@chainPatterns
+ ];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex,Spinor],
+ Return[ex]
+ ];
+
+ If[ OptionValue[FCVerbose]===False,
+ sctrVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ sctrVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+ FCPrint[1, "SpinorChainTranspose. Entering.", FCDoControl->sctrVerbose];
+ FCPrint[3, "SpinorChainTranspose: Entering with ", ex, FCDoControl->sctrVerbose];
+
+ If[ !FreeQ[ex,DiracChain],
+ ex = ex//. DiracChain[x___, a_Spinor, b_Spinor] :> DOT[a,x,b]
+ ];
+
+ If[ MatchQ[ex/.DOT->holdDOT, holdDOT[a_Spinor,b___,c_Spinor]/;FreeQ[{b},Spinor]],
+
+ FCPrint[1, "SpinorChainTranspose: Recognized standalone expression.", FCDoControl->sctrVerbose];
+ tmp = dsHead[ex];
+ tmp = tmp /. {
+ dsHead[DOT[a_Spinor,b___,c_Spinor]]/;!MatchQ[holdDOT[a,b,c],chainPatterns] :> DOT[a,b,c]
+ },
+
+ FCPrint[1, "SpinorChainTranspose: Isolating spinor chains.", FCDoControl->sctrVerbose];
+ time=AbsoluteTime[];
+ tmp = FCDiracIsolate[ex,FCI->True, Head->dsHead, Spinor->True, Collecting-> OptionValue[Collecting], DiracGamma->False,
+ Factoring -> OptionValue[Factoring], TimeConstrained -> OptionValue[TimeConstrained]];
+ FCPrint[1, "SpinorChainTranspose: Done isolating spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sctrVerbose];
+ FCPrint[3, "SpinorChainTranspose: After FCDiracIsolate ", tmp, FCDoControl->sctrVerbose];
+
+ tmp = tmp /. {
+ dsHead[DOT[a_Spinor,b___,c_Spinor]]/;!MatchQ[holdDOT[a,b,c],chainPatterns] :> DOT[a,b,c]
+ };
+ ];
+
+ diracObjects = Cases[tmp+null1+null2, dsHead[_], Infinity]//Sort//DeleteDuplicates;
+
+ FCPrint[3,"SpinorChainTranspose: diracObjects: ", diracObjects , FCDoControl->sctrVerbose];
+ FCPrint[1, "SpinorChainTranspose: Trasnposing spinor chains.", FCDoControl->sctrVerbose];
+
+ time=AbsoluteTime[];
+ diracObjectsEval = (diracObjects/.dsHead->Identity /. DOT->holdDOT)/. {
+ holdDOT[Spinor[p1_,r1__], b___, Spinor[p2_,r2__]] :>
+ -1*optHead[DOT[Spinor[-p2,r2], FCChargeConjugateTransposed[DOT[b],FCI->True,Explicit->True,DotSimplify->False],Spinor[-p1,r1]]]
+ } /. holdDOT -> DOT;
+
+ FCPrint[1, "SpinorChainTranspose: Done transposing spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sctrVerbose];
+ FCPrint[3, "SpinorChainTranspose: diracObjectsEval: ", diracObjectsEval, FCDoControl->sctrVerbose];
+
+ If[ OptionValue[DotSimplify],
+ diracObjectsEval = DotSimplify[#,FCI->True,Expanding->False]&/@diracObjectsEval
+ ];
+
+ FCPrint[1, "SpinorChainTranspose: Inserting Dirac objects back.", FCDoControl->sctrVerbose];
+ time=AbsoluteTime[];
+ repRule = Thread[Rule[diracObjects,diracObjectsEval]];
+ FCPrint[3,"SpinorChainTranspose: repRule: ",repRule , FCDoControl->sctrVerbose];
+ res = (tmp /. Dispatch[repRule]);
+ FCPrint[1, "SpinorChainTranspose: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->sctrVerbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "SpinorChainTranspose: Leaving.", FCDoControl->sctrVerbose];
+ FCPrint[3, "SpinorChainTranspose: Leaving with ", res, FCDoControl->sctrVerbose];
+
+ res
+
+ ];
+
+FCPrint[1,"SpinorChainTranspose.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/SpinorChainTrick.m b/FeynCalc/Dirac/SpinorChainTrick.m
new file mode 100755
index 000000000..9851687e5
--- /dev/null
+++ b/FeynCalc/Dirac/SpinorChainTrick.m
@@ -0,0 +1,182 @@
+(* ::Package:: *)
+
+(* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ *)
+
+(* :Title: SpinorChainTrick *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Simplification rules for products of spinor chains *)
+
+(* ------------------------------------------------------------------------ *)
+
+SpinorChainTrick::usage =
+"SpinorChainTrick[exp] applies several simplifications to products of spinor \
+chains.";
+
+SpinorChainTrick::failmsg =
+"Error! SpinorChainTrick has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`SpinorChainTrick`Private`"]
+
+holdDOT::usage="";
+spchtrVerbose::usage="";
+
+Options[SpinorChainTrick] = {
+ CartesianIndexNames -> {},
+ Contract -> True,
+ DiracEquation -> True,
+ DiracGammaCombine -> False,
+ DiracSigmaExplicit -> True,
+ DiracTrick -> True,
+ DotSimplify -> True,
+ FCCanonicalizeDummyIndices -> True,
+ FCE -> False,
+ FCI -> False,
+ FCJoinDOTs -> True,
+ FCVerbose -> False,
+ Factoring -> {Factor2, 5000},
+ LorentzIndexNames -> {}
+};
+
+SpinorChainTrick[expr_, OptionsPattern[]] :=
+ Block[{ex, tmp, dsHead, dsIso, freePart,dsPart, null1, null2, time, diracObjects, optDiracSigmaExplicit,
+ optDiracGammaCombine, diracObjectsEval, repRule, res},
+
+ optDiracSigmaExplicit = OptionValue[DiracSigmaExplicit];
+ optDiracGammaCombine = OptionValue[DiracGammaCombine];
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ If[ FreeQ[ex,Spinor],
+ Return[ex]
+ ];
+
+ If[ OptionValue[FCVerbose]===False,
+ spchtrVerbose=$VeryVerbose,
+ If[MatchQ[OptionValue[FCVerbose], _Integer],
+ spchtrVerbose=OptionValue[FCVerbose]
+ ];
+ ];
+
+
+ FCPrint[1, "SpinorChainTrick. Entering.", FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: Entering with ", ex, FCDoControl->spchtrVerbose];
+
+ FCPrint[1, "SpinorChainTrick: Isolating spinor chains.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ tmp = FCDiracIsolate[ex,FCI->True, Head->dsHead, DotSimplify->True, DiracGammaCombine->optDiracGammaCombine,
+ DiracSigmaExplicit->optDiracSigmaExplicit, LorentzIndex->All, Spinor->Join, DiracGamma->False, FCJoinDOTs-> OptionValue[FCJoinDOTs],
+ Isolate->True, IsolateNames->dsIso, Factoring -> False, FCTraceExpand->True](* /. dsHead->Identity*);
+ FCPrint[1, "SpinorChainTrick: Done isolating spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: After FCDiracIsolate ", tmp, FCDoControl->spchtrVerbose];
+
+ If[ OptionValue[FCCanonicalizeDummyIndices],
+ FCPrint[1, "SpinorChainTrick: Canonicalize dummy Lorentz and Cartesian indices.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+
+ tmp = FCCanonicalizeDummyIndices[tmp , FCI->True, Head->{LorentzIndex,CartesianIndex}, DotSimplify->False,
+ LorentzIndexNames-> OptionValue[LorentzIndexNames], CartesianIndexNames-> OptionValue[CartesianIndexNames]];
+ FCPrint[1, "SpinorChainTrick: Done canonicalize dummy Lorentz and Cartesian indices, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: After FCCanonicalizeDummyIndices ", tmp, FCDoControl->spchtrVerbose]
+ ];
+
+
+ If[ OptionValue[Contract],
+ FCPrint[1, "SpinorChainTrick: Applying Contract.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ tmp = tmp /. dsHead[x_] :> Contract[x, FCI->True];
+ FCPrint[1, "SpinorChainTrick: Contract done, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: After Contract ", tmp, FCDoControl->spchtrVerbose]
+ ];
+
+ tmp = FRH[tmp, IsolateNames->dsIso];
+
+ FCPrint[1, "SpinorChainTrick: Isolating spinor chains (again).", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ tmp = FCDiracIsolate[tmp,FCI->True,Head->dsHead, DotSimplify->False, DiracGammaCombine->optDiracGammaCombine, FCJoinDOTs-> OptionValue[FCJoinDOTs],
+ DiracSigmaExplicit->False, LorentzIndex->All, Spinor->Join, DiracGamma->False, Factoring -> OptionValue[Factoring]];
+ FCPrint[1, "SpinorChainTrick: Done isolating spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: After second FCDiracIsolate ", tmp, FCDoControl->spchtrVerbose];
+
+
+ diracObjects = Cases[tmp+null1+null2, dsHead[_], Infinity]//Sort//DeleteDuplicates;
+ FCPrint[3,"SpinorChainTrick: diracObjects: ", diracObjects , FCDoControl->spchtrVerbose];
+
+
+ FCPrint[1, "SpinorChainTrick: Simplifying products of spinor chains.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = Map[(spinorChainTrickEval[#])&, (diracObjects/.dsHead->Identity/. DOT->holdDOT)] /. spinorChainTrickEval -> Identity /. holdDOT->DOT;
+ FCPrint[1, "SpinorChainTrick: Done simplifying products of spinor chains, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: diracObjectsEval: ", diracObjectsEval, FCDoControl->spchtrVerbose];
+
+
+ If[ OptionValue[DiracEquation],
+ FCPrint[1, "SpinorChainTrick: Applying Dirac equation to the products of spinor chains.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = Map[DiracEquation[#,FCI->True]&, diracObjectsEval];
+ FCPrint[1, "SpinorChainTrick: Done applying Dirac equation, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: diracObjectsEval: ", diracObjectsEval, FCDoControl->spchtrVerbose];
+ ];
+
+ If[ OptionValue[DiracTrick],
+ FCPrint[1, "SpinorChainTrick: Applying DiracTrick to the products of spinor chains.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ diracObjectsEval = Map[DiracTrick[#,FCI->True]&, diracObjectsEval];
+ FCPrint[1, "SpinorChainTrick: Done applying DiracTrick, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: diracObjectsEval: ", diracObjectsEval, FCDoControl->spchtrVerbose];
+ ];
+
+ If[ !FreeQ2[diracObjectsEval,{spinorChainTrickEval,holdDOT}],
+ Message[SpinorChainTrick::failmsg,"Evaluation of isolated objects failed."];
+ Abort[]
+ ];
+
+ FCPrint[1, "SpinorChainTrick: Inserting Dirac objects back.", FCDoControl->spchtrVerbose];
+ time=AbsoluteTime[];
+ repRule = Thread[Rule[diracObjects, diracObjectsEval]];
+ FCPrint[3,"SpinorChainTrick: repRule: ",repRule , FCDoControl->spchtrVerbose];
+ res = ( tmp/. Dispatch[repRule]);
+ FCPrint[1, "SpinorChainTrick: Done inserting Dirac objects back, timing: ", N[AbsoluteTime[] - time, 4], FCDoControl->spchtrVerbose];
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
+ FCPrint[1, "SpinorChainTrick: Leaving.", FCDoControl->spchtrVerbose];
+ FCPrint[3, "SpinorChainTrick: Leaving with ", res, FCDoControl->spchtrVerbose];
+
+
+
+ res
+
+ ];
+
+(* 4 and D *)
+spinorChainTrickEval[c_. holdDOT[a1___, DiracGamma[LorentzIndex[arg_]], b1___] holdDOT[a2___, DiracGamma[LorentzIndex[arg_, dim_Symbol], dim_Symbol], b2___]]:=
+ spinorChainTrickEval[c holdDOT[a1, DiracGamma[LorentzIndex[arg]], b1] holdDOT[a2, DiracGamma[LorentzIndex[arg]], b2]];
+
+(* 4 and D-4 *)
+spinorChainTrickEval[_. holdDOT[___, DiracGamma[LorentzIndex[arg_]], ___] holdDOT[___, DiracGamma[LorentzIndex[arg_, dim_Symbol-4], dim_Symbol-4], ___]]:=
+ 0;
+
+(* D and D - 4 *)
+spinorChainTrickEval[c_. holdDOT[a1___, DiracGamma[LorentzIndex[arg_, dim_Symbol], dim_Symbol], b1___] holdDOT[a2___, DiracGamma[LorentzIndex[arg_, dim_Symbol-4], dim_Symbol-4], b2___]]:=
+ spinorChainTrickEval[c holdDOT[a1, DiracGamma[LorentzIndex[arg, dim-4], dim-4], b1] holdDOT[a2, DiracGamma[LorentzIndex[arg, dim-4], dim-4], b2]];
+
+FCPrint[1,"SpinorChainTrick.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/ToDiracGamma67.m b/FeynCalc/Dirac/ToDiracGamma67.m
new file mode 100755
index 000000000..b404ee0dc
--- /dev/null
+++ b/FeynCalc/Dirac/ToDiracGamma67.m
@@ -0,0 +1,67 @@
+(* ::Package:: *)
+
+
+(* :Title: ToDiracGamma67 *)
+
+(*
+ This software is covered by the GNU General Public License 3.
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
+*)
+
+(* :Summary: Introduces chirality projectors *)
+
+(* ------------------------------------------------------------------------ *)
+
+ToDiracGamma67::usage =
+"ToDiracGamma67[exp] substitutes 1/2(1 + GA[5]) and 1/2(1 - GA[5]) by \
+the chirality projectors DiracGamma[6] and DiracGamma[7].";
+
+(* ------------------------------------------------------------------------ *)
+
+Begin["`Package`"]
+End[]
+
+Begin["`ToDiracGamma67`Private`"]
+
+Options[ToDiracGamma67] = {
+ All -> False,
+ DotSimplify -> False,
+ FCE -> False,
+ FCI -> False
+}
+
+ToDiracGamma67[expr_, OptionsPattern[]] :=
+ Block[{ex},
+
+ If[ OptionValue[FCI],
+ ex = expr,
+ ex = FCI[expr]
+ ];
+
+ ex = ex /.{
+ 1/2+DiracGamma[5]/2 -> DiracGamma[6],
+ 1/2-DiracGamma[5]/2 -> DiracGamma[7],
+ 1+DiracGamma[5] -> 2 DiracGamma[6],
+ 1-DiracGamma[5] -> 2 DiracGamma[7]
+ };
+
+ If[ OptionValue[All],
+ ex = ex /. DiracGamma[5] -> DiracGamma[6] - DiracGamma[7]
+ ];
+
+ If[ OptionValue[DotSimplify],
+ ex = DotSimplify[ex, FCI->True]
+ ];
+
+ If[ OptionValue[FCE],
+ ex = FCE[ex]
+ ];
+
+ ex
+
+]
+
+FCPrint[1,"ToDiracGamma67.m loaded"];
+End[]
diff --git a/FeynCalc/Dirac/ToDiracSigma.m b/FeynCalc/Dirac/ToDiracSigma.m
index a628b58bb..e91a2910c 100755
--- a/FeynCalc/Dirac/ToDiracSigma.m
+++ b/FeynCalc/Dirac/ToDiracSigma.m
@@ -5,9 +5,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Introduces DiracSigma *)
@@ -15,13 +15,13 @@
(* ------------------------------------------------------------------------ *)
ToDiracSigma::usage =
-"ToDiracSigma[ex,x,y] substitutes the neighboring Gamma matrices x and y by \
-DiracSigma and the metric tensor, e.g. ToDiracSigma[GA[i,j],GA[i],GA[j]] \
-gives MT[i, j] - I DiracSigma[GA[i], GA[j]].";
+"ToDiracSigma[exp,x,y] substitutes the neighboring Dirac matrices x and y by \
+DiracSigma and the metric tensor.";
+
+ToDiracSigma::failmsg =
+"Error! ToDiracSigma has encountered a fatal problem and must abort the computation. \
+The problem reads: `1`"
-ToDiracSigma::noddim =
-"Error. ToDiracSigma does not work with Dirac matrices in other dimensions than 4. \
-Evaluation aborted.";
(* ------------------------------------------------------------------------ *)
Begin["`Package`"]
@@ -30,32 +30,42 @@
Begin["`ToDiracSigma`Private`"]
Options[ToDiracSigma] = {
- FCI -> False,
- DotSimplify -> True
+ DotSimplify -> True,
+ FCE -> False,
+ FCI -> False
}
ToDiracSigma[expr_, xx_, yy_, OptionsPattern[]] :=
- Block[{x = FCI[xx], y = FCI[yy], ex},
+ Block[{x, y, ex, holdDOT},
+
+ If[ OptionValue[FCI],
+ ex = expr;
+ {x,y} = FCI[{xx,yy}],
+ {ex,x,y} = FCI[{expr,xx,yy}]
+ ];
+
+ If[ !MatchQ[x,DiracGamma[_]] || !MatchQ[y,DiracGamma[_]],
+ Message[ToDiracSigma::failmsg,"Only Dirac matrices in 4 dimensions are supported."];
+ Abort[]
+ ];
+
+ ex = ex /. DOT -> holdDOT;
- If[ OptionValue[FCI],
- ex = expr,
- ex = FCI[expr]
- ];
+ ex = (ex //. holdDOT[a___, x, y, b___] :> (- I holdDOT[a, DiracSigma[x, y], b] + Pair[First[x], First[y]] holdDOT[a, b]));
- If[ !MatchQ[x,DiracGamma[_]] || !MatchQ[y,DiracGamma[_]],
- Message[ToDiracSigma::noddim];
- Abort[]
- ];
+ ex = ex /. holdDOT[] -> 1 /. holdDOT -> DOT;
- ex = (ex /. DOT[a___, x, y, b___] :> (- I DOT[a, DiracSigma[x, y], b] + Pair[First[x], First[y]] DOT[a, b]) /. DOT[] -> 1);
+ If[ OptionValue[DotSimplify],
+ ex = DotSimplify[ex, FCI->True]
+ ];
- If[ OptionValue[DotSimplify],
- ex = DotSimplify[ex]
- ];
+ If[ OptionValue[FCE],
+ ex = FCE[ex]
+ ];
- ex
+ ex
-]
+ ]
FCPrint[1,"ToDiracSigma.m loaded"];
End[]
diff --git a/FeynCalc/Dirac/ToLarin.m b/FeynCalc/Dirac/ToLarin.m
index 8d72df6e2..b887051e6 100644
--- a/FeynCalc/Dirac/ToLarin.m
+++ b/FeynCalc/Dirac/ToLarin.m
@@ -6,9 +6,9 @@
(*
This software is covered by the GNU General Public License 3.
- Copyright (C) 1990-2016 Rolf Mertig
- Copyright (C) 1997-2016 Frederik Orellana
- Copyright (C) 2014-2016 Vladyslav Shtabovenko
+ Copyright (C) 1990-2020 Rolf Mertig
+ Copyright (C) 1997-2020 Frederik Orellana
+ Copyright (C) 2014-2020 Vladyslav Shtabovenko
*)
(* :Summary: Rewrites chiral traces according to Larin's prescription *)
@@ -16,8 +16,7 @@
(* ------------------------------------------------------------------------ *)
ToLarin::usage =
-"ToLarin[exp] translates gamma[mu].gamma[5] into \
--I/6 Eps[mu,nu,la,si] gamma[nu,la,si].";
+"ToLarin[exp] substitutes GAD[mu].GA[5] with -I/6 LC[mu,nu,la,si] GAD[nu,la,si].";
(* ------------------------------------------------------------------------ *)
@@ -27,15 +26,16 @@
Begin["`ToLarin`Private`"]
Options[ToLarin] = {
- Dimension -> D,
- FCI -> False
+ Dimension -> D,
+ FCE -> False,
+ FCI -> False
};
ToLarin[expr_, OptionsPattern[]] :=
Block[ {ex,fi1,fi2,fi3,drsi,res, dotHold, dim},
- dim = OptionValue[Dimension];
- drsi = $LeviCivitaSign;
+ dim = OptionValue[Dimension];
+ drsi = $LeviCivitaSign;
(*drsi is usually -1 *)
If[ OptionValue[FCI],
@@ -44,11 +44,16 @@
];
ex = ex /. DOT->dotHold;
- ex = ex //. dotHold[a___, DiracGamma[mUU_, dim], DiracGamma[5], b___] :>
+ ex = ex //. dotHold[a___, DiracGamma[mUU: (_LorentzIndex | _Momentum), dim], DiracGamma[5], b___] :>
({fi1, fi2, fi3} = LorentzIndex[#,dim]& /@ Unique[{"du","du","du"}];
- (drsi I/6 Eps[mUU, fi1, fi2, fi3, Dimension->dim] dotHold[a,DiracGamma[fi1,dim],DiracGamma[fi2,dim],DiracGamma[fi3,dim],b]));
+ (drsi I/6 Eps[mUU, fi1, fi2, fi3] dotHold[a,DiracGamma[fi1,dim],DiracGamma[fi2,dim],DiracGamma[fi3,dim],b]));
res = ex /. dotHold -> DOT;
+
+ If[ OptionValue[FCE],
+ res = FCE[res]
+ ];
+
res
];
diff --git a/FeynCalc/DocOutput/English/Guides/FeynCalc.nb b/FeynCalc/DocOutput/English/Guides/FeynCalc.nb
index 1ecd38954..57dd534f5 100644
--- a/FeynCalc/DocOutput/English/Guides/FeynCalc.nb
+++ b/FeynCalc/DocOutput/English/Guides/FeynCalc.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 149253, 4807]
-NotebookOptionsPosition[ 131654, 4273]
-NotebookOutlinePosition[ 133200, 4313]
-CellTagsIndexPosition[ 133157, 4310]
+NotebookDataLength[ 219130, 6920]
+NotebookOptionsPosition[ 195011, 6190]
+NotebookOutlinePosition[ 196601, 6230]
+CellTagsIndexPosition[ 196558, 6227]
WindowTitle->FeynCalc
WindowFrame->Normal*)
@@ -35,7 +35,11 @@ Cell[BoxData[GridBox[{
StripOnInput->False], {"\<\"A0\"\>":>Documentation`HelpLookup[
"paclet:FeynCalc/ref/A0"], "\<\"Abbreviation\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Abbreviation"], "\<\"Amplitude\"\>":>
+ "paclet:FeynCalc/ref/Abbreviation"], "\<\"AlphaFS\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/AlphaFS"], "\<\"AlphaStrong\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/AlphaStrong"], "\<\"Amplitude\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Amplitude"], "\<\"Amputate\"\>":>
Documentation`HelpLookup[
@@ -63,23 +67,39 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Calc"], "\<\"CalcColorFactor\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/CalcColorFactor"], "\<\"Cases\"\>":>
+ "paclet:FeynCalc/ref/CalcColorFactor"], "\<\"CartesianIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CartesianIndex"], "\<\"CartesianMomentum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CartesianMomentum"], "\<\"CartesianPair\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CartesianPair"], \
+"\<\"CartesianPropagatorDenominator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CartesianPropagatorDenominator"], \
+"\<\"CartesianToLorentz\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CartesianToLorentz"], "\<\"Cases\"\>":>
Documentation`HelpLookup["paclet:ref/Cases"], "\<\"Cases2\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Cases2"], "\<\"CF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CF"], "\<\"CFAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CFAD"], "\<\"CGA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CGA"], "\<\"CGAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CGAD"], "\<\"CGAE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CGAE"], "\<\"CGS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CGS"], "\<\"CGSD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CGSD"], "\<\"CGSE\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/CF"], "\<\"ChangeDimension\"\>":>
+ "paclet:FeynCalc/ref/CGSE"], "\<\"ChangeDimension\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/ChangeDimension"], "\<\"ChargeConjugationMatrix\"\
-\>":>Documentation`HelpLookup[
- "paclet:FeynCalc/ref/ChargeConjugationMatrix"], \
-"\<\"ChargeConjugationMatrixInv\"\>":>Documentation`HelpLookup[
- "paclet:FeynCalc/ref/ChargeConjugationMatrixInv"], "\<\"CheckDB\"\>":>
+ "paclet:FeynCalc/ref/ChangeDimension"], "\<\"CheckDB\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/CheckDB"], "\<\"ChiralityProjector\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/ChiralityProjector"], "\<\"Chisholm\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Chisholm"], "\<\"Collect\"\>":>
+ "paclet:FeynCalc/ref/Chisholm"], "\<\"CLC\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CLC"], "\<\"CLCD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CLCD"], "\<\"Collect\"\>":>
Documentation`HelpLookup["paclet:ref/Collect"], "\<\"Collect2\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Collect2"], "\<\"Collect3\"\>":>
@@ -92,7 +112,9 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/CommutatorExplicit"], "\<\"Complement\"\>":>
Documentation`HelpLookup[
- "paclet:ref/Complement"], "\<\"CompleteSquare\"\>":>
+ "paclet:ref/Complement"], "\<\"Complement1\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Complement1"], "\<\"CompleteSquare\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/CompleteSquare"], "\<\"ComplexConjugate\"\>":>
Documentation`HelpLookup[
@@ -108,21 +130,49 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/CovariantD"], "\<\"CovariantFieldDerivative\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/CovariantFieldDerivative"], "\<\"D0\"\>":>
+ "paclet:FeynCalc/ref/CovariantFieldDerivative"], "\<\"CSI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSI"], "\<\"CSID\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSID"], "\<\"CSIE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSIE"], "\<\"CSIS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSIS"], "\<\"CSISD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSISD"], "\<\"CSISE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSISE"], "\<\"CSP\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSP"], "\<\"CSPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSPD"], "\<\"CSPE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CSPE"], "\<\"CTdec\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CTdec"], "\<\"CV\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CV"], "\<\"CVD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CVD"], "\<\"CVE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CVE"], "\<\"D0\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/D0"], "\<\"DataType\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DataType"], "\<\"DB0\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/DB0"], "\<\"DB1\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DB1"], "\<\"DCHN\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DB1"], "\<\"DeclareNonCommutative\"\>":>
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DeclareFCTensor\"\>":>
Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeclareFCTensor"], \
+"\<\"DeclareNonCommutative\"\>":>Documentation`HelpLookup[
"paclet:FeynCalc/ref/DeclareNonCommutative"], "\<\"DeltaFunction\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DeltaFunction"], \
"\<\"DeltaFunctionDoublePrime\"\>":>Documentation`HelpLookup[
"paclet:FeynCalc/ref/DeltaFunctionDoublePrime"], \
"\<\"DeltaFunctionPrime\"\>":>Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DeltaFunctionPrime"], "\<\"DiracEquation\"\>":>
+ "paclet:FeynCalc/ref/DeltaFunctionPrime"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChain\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainFactor"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracEquation\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracEquation"], "\<\"DiracGamma\"\>":>
Documentation`HelpLookup[
@@ -130,9 +180,11 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracGammaCombine"], "\<\"DiracGammaExpand\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DiracGammaExpand"], "\<\"DiracGammaT\"\>":>
+ "paclet:FeynCalc/ref/DiracGammaExpand"], "\<\"DiracIndex\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DiracGammaT"], "\<\"DiracMatrix\"\>":>
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DiracMatrix\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracMatrix"], "\<\"DiracOrder\"\>":>
Documentation`HelpLookup[
@@ -140,15 +192,19 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracReduce"], "\<\"DiracSigma\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DiracSigma"], "\<\"DiracSigmaExplicit\"\>":>
+ "paclet:FeynCalc/ref/DiracSigma"], "\<\"DiracSigmaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSigmaExpand"], "\<\"DiracSigmaExplicit\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracSigmaExplicit"], "\<\"DiracSimplify\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracSlash\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DiracSlash"], "\<\"DiracSpinor\"\>":>
+ "paclet:FeynCalc/ref/DiracSlash"], "\<\"DiracSubstitute5\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DiracSpinor"], "\<\"DiracTrace\"\>":>
+ "paclet:FeynCalc/ref/DiracSubstitute5"], "\<\"DiracSubstitute67\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute67"], "\<\"DiracTrace\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DiracTrace"], "\<\"DiracTrick\"\>":>
Documentation`HelpLookup[
@@ -159,63 +215,208 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/DotExpand"], "\<\"DotSimplify\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/DotSimplify"], "\<\"Eps\"\>":>
+ "paclet:FeynCalc/ref/DotSimplify"], "\<\"DummyIndexFreeQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DummyIndexFreeQ"], "\<\"DuplicateFreeQ\"\>":>
+ Documentation`HelpLookup["paclet:ref/DuplicateFreeQ"], "\<\"Eps\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Eps"], "\<\"EpsChisholm\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/EpsChisholm"], "\<\"EpsEvaluate\"\>":>
+ "paclet:FeynCalc/ref/EpsChisholm"], "\<\"EpsContract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/EpsContract"], "\<\"EpsContractFreeQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/EpsContractFreeQ"], "\<\"EpsEvaluate\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/EpsEvaluate"], "\<\"Epsilon\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Epsilon"], "\<\"Expand\"\>":>
+ "paclet:FeynCalc/ref/Epsilon"], "\<\"EpsilonIR\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/EpsilonIR"], "\<\"EpsilonUV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/EpsilonUV"], "\<\"Expand\"\>":>
Documentation`HelpLookup["paclet:ref/Expand"], "\<\"Expand2\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Expand2"], "\<\"ExpandPartialD\"\>":>
+ "paclet:FeynCalc/ref/Expand2"], "\<\"ExpandAll\"\>":>
+ Documentation`HelpLookup["paclet:ref/ExpandAll"], "\<\"ExpandAll2\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandAll2"], "\<\"ExpandPartialD\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/ExpandPartialD"], "\<\"ExpandScalarProduct\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"Explicit\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Explicit"], "\<\"ExplicitLorentzIndex\"\>":>
+ "paclet:FeynCalc/ref/Explicit"], "\<\"ExplicitDiracIndex\"\>":>
Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitDiracIndex"], "\<\"ExplicitLorentzIndex\"\
+\>":>Documentation`HelpLookup[
"paclet:FeynCalc/ref/ExplicitLorentzIndex"], \
"\<\"ExplicitPartialD\"\>":>Documentation`HelpLookup[
- "paclet:FeynCalc/ref/ExplicitPartialD"], "\<\"ExplicitSUNIndex\"\>":>
+ "paclet:FeynCalc/ref/ExplicitPartialD"], "\<\"ExplicitSUNFIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitSUNFIndex"], "\<\"ExplicitSUNIndex\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/ExplicitSUNIndex"], "\<\"Factor\"\>":>
Documentation`HelpLookup["paclet:ref/Factor"], "\<\"Factor1\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Factor1"], "\<\"Factor2\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Factor2"], "\<\"FAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FAD"], "\<\"FAPatch\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FAPatch"], "\<\"FCAbbreviate\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FAD"], "\<\"FCAntiSymmetrize\"\>":>
+ "paclet:FeynCalc/ref/FCAbbreviate"], "\<\"FCAntiSymmetrize\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/FCAntiSymmetrize"], "\<\"FCApart\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCApart"], "\<\"FCClearScalarProducts\"\>":>
+ "paclet:FeynCalc/ref/FCApart"], "\<\"FCCanonicalizeDummyIndices\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCClearScalarProducts"], "\<\"FCE\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>
+ "paclet:FeynCalc/ref/FCCanonicalizeDummyIndices"], "\<\"FCCCT\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCI"], "\<\"FCIntegral\"\>":>
+ "paclet:FeynCalc/ref/FCCCT"], "\<\"FCChargeConjugateTransposed\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCChargeConjugateTransposed"], "\<\"FCCheckSyntax\
+\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCCheckSyntax"], "\<\"FCCheckVersion\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCCheckVersion"], "\<\"FCClearScalarProducts\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCClearScalarProducts"], \
+"\<\"FCCompareResults\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCCompareResults"], "\<\"FCDiracIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCDiracIsolate"], "\<\"FCDuplicateFreeQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCDuplicateFreeQ"], "\<\"FCE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"], "\<\"FCF\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCIntegral"], "\<\"FCLoopExtract\"\>":>
+ "paclet:FeynCalc/ref/FCF"], "\<\"FCFAConvert\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCLoopExtract"], "\<\"FCLoopIsolate\"\>":>
+ "paclet:FeynCalc/ref/FCFAConvert"], "\<\"FCFactorOut\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCLoopIsolate"], "\<\"FCMultiLoopTID\"\>":>
+ "paclet:FeynCalc/ref/FCFactorOut"], "\<\"FCFADiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCFADiracChainJoin"], "\<\"FCGetDimensions\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetDimensions"], \
+"\<\"FCGetDiracGammaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetDiracGammaScheme"], \
+"\<\"FCGetNotebookDirectory\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetNotebookDirectory"], \
+"\<\"FCGetPauliSigmaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetPauliSigmaScheme"], "\<\"FCGramDeterminant\"\
+\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGramDeterminant"], "\<\"FCGramMatrix\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGramMatrix"], "\<\"FCHideEpsilon\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCHideEpsilon"], "\<\"FCI\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"FCIntegral\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCIntegral"], \
+"\<\"FCLoopBasisCreateScalarProducts\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisCreateScalarProducts"], \
+"\<\"FCLoopBasisExtract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisExtract"], \
+"\<\"FCLoopBasisGetSize\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisGetSize"], "\<\"FCLoopBasisIncompleteQ\
+\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisIncompleteQ"], \
+"\<\"FCLoopBasisIntegralToPropagators\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisIntegralToPropagators"], \
+"\<\"FCLoopBasisOverdeterminedQ\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisOverdeterminedQ"], \
+"\<\"FCLoopBasisPropagatorsToTopology\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisPropagatorsToTopology"], \
+"\<\"FCLoopBasisSplit\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopBasisSplit"], "\<\"FCLoopCanonicalize\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopCanonicalize"], \
+"\<\"FCLoopEikonalPropagatorFreeQ\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopEikonalPropagatorFreeQ"], \
+"\<\"FCLoopExtract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopExtract"], "\<\"FCLoopIBPReducableQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopIBPReducableQ"], "\<\"FCLoopIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopIsolate"], "\<\"FCLoopMixedIntegralQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopMixedIntegralQ"], \
+"\<\"FCLoopMixedToCartesianAndTemporal\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopMixedToCartesianAndTemporal"], \
+"\<\"FCLoopNonIntegerPropagatorPowersFreeQ\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ"], \
+"\<\"FCLoopPropagatorPowersCombine\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopPropagatorPowersCombine"], \
+"\<\"FCLoopPropagatorPowersExpand\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopPropagatorPowersExpand"], \
+"\<\"FCLoopRemoveNegativePropagatorPowers\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers"], \
+"\<\"FCLoopSamePropagatorHeadsQ\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopSamePropagatorHeadsQ"], \
+"\<\"FCLoopSolutionList\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopSolutionList"], "\<\"FCLoopSplit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCLoopSplit"], "\<\"FCMakeIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCMakeIndex"], "\<\"FCMatrixIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCMatrixIsolate"], "\<\"FCMultiLoopTID\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/FCMultiLoopTID"], "\<\"FCPartialD\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCPartialD"], "\<\"FCSymmetrize\"\>":>
+ "paclet:FeynCalc/ref/FCPartialD"], "\<\"FCPatternFreeQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPatternFreeQ"], "\<\"FCPauliIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPauliIsolate"], "\<\"FCPermuteMomentaRules\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPermuteMomentaRules"], "\<\"FCPrepareFAAmp\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPrepareFAAmp"], "\<\"FCProductSplit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCProductSplit"], "\<\"FCProgressBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCProgressBar"], "\<\"FCRenameDummyIndices\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCRenameDummyIndices"], "\<\"FCReplaceAll\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCReplaceAll"], "\<\"FCReplaceMomenta\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FCSymmetrize"], "\<\"FermionSpinSum\"\>":>
+ "paclet:FeynCalc/ref/FCReplaceMomenta"], "\<\"FCReplaceRepeated\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCReplaceRepeated"], "\<\"FCRerouteMomenta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCRerouteMomenta"], \
+"\<\"FCSchoutenBruteForce\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSchoutenBruteForce"], \
+"\<\"FCSetDiracGammaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSetDiracGammaScheme"], \
+"\<\"FCSetPauliSigmaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSetPauliSigmaScheme"], "\<\"FCShowEpsilon\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCShowEpsilon"], "\<\"FCSplit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSplit"], "\<\"FCSubsetQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSubsetQ"], "\<\"FCSymmetrize\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSymmetrize"], "\<\"FCTopology\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCTopology"], "\<\"FCTraceExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCTraceExpand"], "\<\"FCTraceFactor\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCTraceFactor"], "\<\"FermionSpinSum\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/FermionSpinSum"], "\<\"FeynAmpDenominator\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/FeynAmpDenominator"], \
"\<\"FeynAmpDenominatorCombine\"\>":>Documentation`HelpLookup[
"paclet:FeynCalc/ref/FeynAmpDenominatorCombine"], \
+"\<\"FeynAmpDenominatorExplicit\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorExplicit"], \
"\<\"FeynAmpDenominatorSimplify\"\>":>Documentation`HelpLookup[
"paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"], \
"\<\"FeynAmpDenominatorSplit\"\>":>Documentation`HelpLookup[
@@ -245,7 +446,9 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/FourLaplacian"], "\<\"FourVector\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/FourVector"], "\<\"FreeQ\"\>":>
+ "paclet:FeynCalc/ref/FourVector"], "\<\"FreeIndexFreeQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FreeIndexFreeQ"], "\<\"FreeQ\"\>":>
Documentation`HelpLookup["paclet:ref/FreeQ"], "\<\"FreeQ2\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/FreeQ2"], "\<\"FRH\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/FRH"], "\<\"FromTFI\"\>":>
@@ -254,10 +457,12 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/FunctionalD"], "\<\"FV\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/FV"], "\<\"FVD\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/FVD"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FVD"], "\<\"FVE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FVE"], "\<\"GA\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GA5\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/GA5"], "\<\"GAD\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"], "\<\"Gamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"], "\<\"GAE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAE"], "\<\"Gamma\"\>":>
Documentation`HelpLookup["paclet:ref/Gamma"], "\<\"Gamma1\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Gamma1"], "\<\"Gamma2\"\>":>
@@ -272,7 +477,13 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/GaugeField"], "\<\"GaugeXi\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/GaugeXi"], "\<\"GhostPropagator\"\>":>
+ "paclet:FeynCalc/ref/GaugeXi"], "\<\"GenericPropagatorDenominator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GenericPropagatorDenominator"], "\<\"GenPaVe\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GenPaVe"], "\<\"GFAD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GFAD"], "\<\"GhostPropagator\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/GhostPropagator"], "\<\"GluonField\"\>":>
Documentation`HelpLookup[
@@ -286,7 +497,8 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/GluonVertex"], "\<\"GS\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/GS"], "\<\"GSD\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/GSD"], "\<\"Gstrong\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GSD"], "\<\"GSE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GSE"], "\<\"Gstrong\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Gstrong"], "\<\"Hill\"\>":>
Documentation`HelpLookup[
@@ -322,8 +534,10 @@ Cell[BoxData[GridBox[{
"paclet:FeynCalc/ref/IntegrateByParts"], "\<\"InverseMellin\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/InverseMellin"], "\<\"Isolate\"\>":>
- Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Isolate"], "\<\"Kummer\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Isolate"], "\<\"KD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/KD"], "\<\"KDD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/KDD"], "\<\"KDE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/KDE"], "\<\"Kummer\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Kummer"], "\<\"Lagrangian\"\>":>
Documentation`HelpLookup[
@@ -341,10 +555,13 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/LeviCivita"], "\<\"Li2\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Li2"], "\<\"Li3\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/Li3"], "\<\"Log\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Li3"], "\<\"Li4\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Li4"], "\<\"Log\"\>":>
Documentation`HelpLookup["paclet:ref/Log"], "\<\"LorentzIndex\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/LorentzIndex"], "\<\"Map\"\>":>
+ "paclet:FeynCalc/ref/LorentzIndex"], "\<\"LorentzToCartesian\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LorentzToCartesian"], "\<\"Map\"\>":>
Documentation`HelpLookup["paclet:ref/Map"], "\<\"Map2\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Map2"], "\<\"MemSet\"\>":>
Documentation`HelpLookup[
@@ -366,7 +583,11 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/NonCommFreeQ"], "\<\"NonCommQ\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/NonCommQ"], "\<\"NTerms\"\>":>
+ "paclet:FeynCalc/ref/NonCommQ"], "\<\"NotebookDirectory\"\>":>
+ Documentation`HelpLookup[
+ "paclet:ref/NotebookDirectory"], "\<\"NPointTo4Point\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/NPointTo4Point"], "\<\"NTerms\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/NTerms"], "\<\"NumericalFactor\"\>":>
Documentation`HelpLookup[
@@ -389,11 +610,31 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/PartialIntegrate"], "\<\"PartitHead\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/PartitHead"], "\<\"PaVe\"\>":>
+ "paclet:FeynCalc/ref/PartitHead"], "\<\"PauliEta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliEta"], "\<\"PauliOrder\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliOrder"], "\<\"PauliSigma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"], "\<\"PauliSigmaCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigmaCombine"], "\<\"PauliSigmaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigmaExpand"], "\<\"PauliSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSimplify"], "\<\"PauliTrick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliTrick"], "\<\"PauliXi\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeReduce\"\>":>
+ "paclet:FeynCalc/ref/PauliXi"], "\<\"PaVe\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/PaVeReduce"], "\<\"PD\"\>":>
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeOrder\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeOrder"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"PaVeUVPart\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeUVPart"], "\<\"PD\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/PD"], "\<\"PlusDistribution\"\>":>
Documentation`HelpLookup[
@@ -413,19 +654,29 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/PowerSimplify"], "\<\"PropagatorDenominator\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/PropagatorDenominator"], \
-"\<\"PropagatorDenominatorExplicit\"\>":>Documentation`HelpLookup[
- "paclet:FeynCalc/ref/PropagatorDenominatorExplicit"], \
-"\<\"QuantumField\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PropagatorDenominator"], "\<\"QuantumField\"\>":>
+ Documentation`HelpLookup[
"paclet:FeynCalc/ref/QuantumField"], "\<\"QuarkField\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/QuarkField"], "\<\"QuarkGluonVertex\"\>":>
+ "paclet:FeynCalc/ref/QuarkField"], "\<\"QuarkFieldChi\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QuarkFieldChi"], "\<\"QuarkFieldChiDagger\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QuarkFieldChiDagger"], "\<\"QuarkFieldPsi\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QuarkFieldPsi"], "\<\"QuarkFieldPsiDagger\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QuarkFieldPsiDagger"], "\<\"QuarkGluonVertex\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/QuarkGluonVertex"], "\<\"QuarkPropagator\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/QuarkPropagator"], "\<\"ReleaseHold\"\>":>
Documentation`HelpLookup[
- "paclet:ref/ReleaseHold"], "\<\"RightPartialD\"\>":>
+ "paclet:ref/ReleaseHold"], "\<\"ReplaceAll\"\>":>
+ Documentation`HelpLookup[
+ "paclet:ref/ReplaceAll"], "\<\"ReplaceRepeated\"\>":>
+ Documentation`HelpLookup[
+ "paclet:ref/ReplaceRepeated"], "\<\"RightPartialD\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/RightPartialD"], "\<\"RussianTrick\"\>":>
Documentation`HelpLookup[
@@ -439,7 +690,8 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/ScaleMu"], "\<\"Schouten\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Schouten"], "\<\"SD\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/SD"], "\<\"Select\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SD"], "\<\"SDF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SDF"], "\<\"Select\"\>":>
Documentation`HelpLookup["paclet:ref/Select"], "\<\"SelectFree\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SelectFree"], "\<\"SelectNotFree\"\>":>
@@ -451,11 +703,22 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/Series3"], "\<\"SetMandelstam\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SetMandelstam"], "\<\"SimplifyDeltaFunction\"\>":>
+ "paclet:FeynCalc/ref/SetMandelstam"], "\<\"SFAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SFAD"], "\<\"SI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SI"], "\<\"SID\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SID"], "\<\"SIE\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SIE"], "\<\"SimplifyDeltaFunction\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SimplifyDeltaFunction"], \
"\<\"SimplifyPolyLog\"\>":>Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SimplifyPolyLog"], "\<\"SmallDelta\"\>":>
+ "paclet:FeynCalc/ref/SimplifyPolyLog"], "\<\"SirlinSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SirlinSimplify"], "\<\"SIS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SIS"], "\<\"SISD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SISD"], "\<\"SISE\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SISE"], "\<\"SmallDelta\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SmallDelta"], "\<\"SmallEpsilon\"\>":>
Documentation`HelpLookup[
@@ -463,7 +726,9 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SmallVariable"], "\<\"SMP\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SMP"], "\<\"SMVertex\"\>":>
+ "paclet:FeynCalc/ref/SMP"], "\<\"SMPToSymbol\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SMPToSymbol"], "\<\"SMVertex\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/SMVertex"], "\<\"Sn\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Sn"], "\<\"Solve\"\>":>
Documentation`HelpLookup["paclet:ref/Solve"], "\<\"Solve2\"\>":>
@@ -471,19 +736,41 @@ Cell[BoxData[GridBox[{
"paclet:FeynCalc/ref/Solve2"], "\<\"Solve3\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Solve3"], "\<\"SP\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/SP"], "\<\"SPD\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/SPD"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPD"], "\<\"SPE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPE"], "\<\"Spinor\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorU\"\>":>
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorChainChiralSplit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorChainChiralSplit"], \
+"\<\"SpinorChainTranspose\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorChainTranspose"], \
+"\<\"SpinorChainTrick\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorChainTrick"], "\<\"SpinorU\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorUBar\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorV\"\>":>
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorV\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SplittingFunction\"\>":>
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBarD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SplittingFunction\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SplittingFunction"], "\<\"SquareAmplitude\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SplittingFunction"], "\<\"SumP\"\>":>
+ "paclet:FeynCalc/ref/SquareAmplitude"], \
+"\<\"StandardPropagatorDenominator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/StandardPropagatorDenominator"], "\<\"StringChomp\
+\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/StringChomp"], "\<\"SubsetQ\"\>":>
+ Documentation`HelpLookup["paclet:ref/SubsetQ"], "\<\"SumP\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/SumP"], "\<\"SumS\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/SumS"], "\<\"SumT\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/SumT"], "\<\"SUND\"\>":>
@@ -494,35 +781,66 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SUNDeltaContract"], "\<\"SUNF\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SUNF"], "\<\"SUNFDeltaContract\"\>":>
+ "paclet:FeynCalc/ref/SUNF"], "\<\"SUNFDelta\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SUNDeltaContract"], "\<\"SUNIndex\"\>":>
+ "paclet:FeynCalc/ref/SUNFDelta"], "\<\"SUNFDeltaContract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNFDeltaContract"], "\<\"SUNFIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNFIndex"], "\<\"SUNFSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNFSimplify"], "\<\"SUNIndex\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SUNIndex"], "\<\"SUNN\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SUNN"], "\<\"SUNSimplify\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/SUNSimplify"], "\<\"SUNT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNT"], "\<\"SUNTF\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNTF"], "\<\"SUNTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTrace"], "\<\"TC\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/TC"], "\<\"Tdec\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SUNT"], "\<\"SUNTrace\"\>":>
+ "paclet:FeynCalc/ref/Tdec"], "\<\"TemporalMomentum\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/SUNTrace"], "\<\"Tdec\"\>":>
+ "paclet:FeynCalc/ref/TemporalMomentum"], "\<\"TemporalPair\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Tdec"], "\<\"TensorFunction\"\>":>
+ "paclet:FeynCalc/ref/TemporalPair"], "\<\"TensorFunction\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/TensorFunction"], "\<\"Tf\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/Tf"], "\<\"TID\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Tf"], "\<\"TFIOrder\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TFIOrder"], "\<\"TGA\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CGA"], "\<\"ThreeDivergence\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ThreeDivergence"], "\<\"TID\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/TID"], "\<\"TIDL\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/TIDL"], "\<\"ToDistribution\"\>":>
+ "paclet:FeynCalc/ref/TIDL"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToDiracGamma67"], "\<\"ToDiracSigma\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/ToDistribution"], "\<\"Together\"\>":>
+ "paclet:FeynCalc/ref/ToDiracSigma"], "\<\"ToDistribution\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToDistribution"], "\<\"ToFI\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToFI"], "\<\"Together\"\>":>
Documentation`HelpLookup[
"paclet:ref/Together"], "\<\"ToHypergeometric\"\>":>
Documentation`HelpLookup[
"paclet:FeynCalc/ref/ToHypergeometric"], "\<\"ToLarin\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/ToLarin"], "\<\"ToTFI\"\>":>
+ "paclet:FeynCalc/ref/ToLarin"], "\<\"ToPaVe\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToPaVe"], "\<\"ToPaVe2\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToPaVe2"], "\<\"ToSFAD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToSFAD"], "\<\"ToStandardMatrixElement\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToStandardMatrixElement"], "\<\"ToTFI\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/ToTFI"], "\<\"TR\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/TR"], "\<\"Tr2\"\>":>
Documentation`HelpLookup["paclet:FeynCalc/ref/Tr2"], "\<\"Trick\"\>":>
@@ -533,14 +851,23 @@ Cell[BoxData[GridBox[{
Documentation`HelpLookup[
"paclet:FeynCalc/ref/TrickMandelstam"], "\<\"Uncontract\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Uncontract"], "\<\"UnDeclareNonCommutative\"\>":>
+ "paclet:FeynCalc/ref/Uncontract"], "\<\"UnDeclareAntiCommutator\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/UnDeclareNonCommutative"], "\<\"UVPart\"\>":>
+ "paclet:FeynCalc/ref/UnDeclareAntiCommutator"], \
+"\<\"UnDeclareCommutator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/UnDeclareCommutator"], \
+"\<\"UnDeclareFCTensor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/UnDeclareFCTensor"], "\<\"UnDeclareNonCommutative\
+\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/UnDeclareNonCommutative"], "\<\"Write2\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/UVPart"], "\<\"Write2\"\>":>
+ "paclet:FeynCalc/ref/Write2"], "\<\"Zeta10\"\>":>
Documentation`HelpLookup[
- "paclet:FeynCalc/ref/Write2"], "\<\"Zeta2\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/Zeta2"]},
+ "paclet:FeynCalc/ref/Zeta10"], "\<\"Zeta2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Zeta2"], "\<\"Zeta4\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Zeta4"], "\<\"Zeta6\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Zeta6"], "\<\"Zeta8\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Zeta8"]},
Appearance->None,
MenuAppearance->Automatic,
MenuStyle->"GuideFunction"]],
@@ -559,7 +886,7 @@ Cell[BoxData[GridBox[{
Row[{"Tutorials",
Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
StripOnInput->False], {"\<\"Short introduction\"\>":>
- Documentation`HelpLookup["paclet:FeynCalc/ref/Intro"]},
+ Documentation`HelpLookup["paclet:FeynCalc/Tutorials/Intro"]},
Appearance->None,
MenuAppearance->Automatic,
MenuStyle->"GuideTutorial"]],
@@ -605,12 +932,13 @@ FeynCalc.html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]},
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$12530],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$16351],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/guide/FeynCalc", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]
}], "AnchorBar"]}
}]], "AnchorBarGrid",
@@ -633,91 +961,6 @@ semi-automatic evaluation of Feynman Diagrams"
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Learning Resources"
-}], "GuideLearningResourcesSection",
- WholeCellGroupOpener->True],
-
-Cell[BoxData[GridBox[{
- {Cell[BoxData[GridBox[{
- {Cell[BoxData[GridBox[{
- {
- GraphicsBox[RasterBox[CompressedData["
-1:eJztlOly2mYUhj2T2+ifTu+ol5AbyF0krZ04TZvNrDa7EGIVAoxBCIHYkYTZ
-wdhxiBcapz96A32FBMEfOEnT6Ux+5MyLRsNIzznnPefTj/cf/Hz/3tbW1k/4
-/YCfdv/39/jfQhDyuXXllhLWxa9oHXhzc+NwumNxbqF4jI1HDbGaYmzEUExT
-NBZe0YuXrwmgLCtWm33n8e7DR9sBJpjLi3NpdfKGtEqyhnJZXlPGEA/tmSwE
-8/We2e32Pn7y9NGvOxTN5MWCoEkUDLjB/0QKk9lKMOkAIyuK2+NLH2XEoiQW
-i2KhmDdUuCvFKt9kthFMj5dSFHX/wBkKR/F6QSrNJc35X5TCYrETTLPF5vVR
-T3afPfxl2x9gpHJZKpWLmkpFg39HClFPIVqs+wTTYrVbrLbfnv3x/OWrdCZb
-qlTnqkhlXYsUH/mlQvFWCqvtgGCGQpGrq6tIlK3W6hVd1VpZl8FfT3GrBbvd
-QTBdbi88d7l9bDyB12v1RlXXJ1KUb6XALAgmw4QDTAidb+/sJpKHjaZcbzRr
-uhZ8tGnwa7VFiuoiReXA4SKYlD/gdHn3zDa3l8IzSutYabVkVcV9Q1bqTRmE
-PbM1wwsfW6jXV1M4nJ5V4PX1jONSuEln+E6vD7W7veNOt9XupNIZl8eXL0hx
-LonV9dMML4gujzcSixNdwD2iTh8VOMpk3R4qHIkB2B8M8ev2B6VKDf/zuTwT
-ipyfn2eyORiO0bBcUlbUpqLoXcAonBeCGQzh28Bho35/jl3ih+OT4Wg8GI2l
-cvUwnbm8vLy4uHg3j+l0qrZaSFGQyoViST1uwyhZbXl9NMFk4xzKofwMThnK
-HE9OKVrLI5Uq/cFgNptdzwP7Bj4Kbnc6yVTaR9Gdbq/d7cIomg4SzFQq/eHD
-X0K+AJqu/nCEYhS19X4Rf85jNo+zszc0EwKwPxz2BkO4xAQj673DEF21elPH
-YlgeH/1+U7Q7XZZLjE4mI7g0PoFLGATBBAql6ky9WtSJr/FkcrqRicjyAtw2
-+jqZRGPceu9oE2NqKqr+WLXWSB4exROpvFgkaEiUTB1hqDlBXHqFd9eZcGnV
-z2X7pXIVnLdvp7hiQPr9Ku0uJvyEbHYHPllY9eWTDVnFKmIng+EogOgXhuCK
-Fj7L9NMBrBOAJottOSMI9eAQwVvAw1FWR6nHnc/WiS1C76dnZ1hvvE48vMrv
-zFd3owgmnESRmBGXSC1n9G+1sXeUit5fvDLhxP13JroGE7LvO33+wOqMvpoJ
-P6fTd7jCz6b2tfkahcLkOVoWTKjb7dXrjS/URua3HP8Abdya4A==
- "], {{0,
- 0}, {28, 35}}, {0, 255},
- ColorFunction->RGBColor],
- Background->GrayLevel[0.952941],
- ImageSize->{28, 35},
- PlotRange->{{0, 28}, {0, 35}}], GridBox[{
- {""},
- {Cell["Tutorials", "GuideTutorialsSection",
- WholeCellGroupOpener->True]},
- {Cell[BoxData[
- TemplateBox[{
- Cell["Short introduction"],"paclet:FeynCalc/ref/Intro"},
- "RefLink",
- BaseStyle->{"GuideTutorial"}]], "GuideTutorial"]}
- },
- GridBoxDividers->{"Rows" -> {{False}}}]}
- },
- GridBoxAlignment->{"Rows" -> {{Top}}},
- GridBoxSpacings->{"Columns" -> {{0.3}}}]], "GuideWebResource"]},
- {""}
- },
- GridBoxSpacings->{"Rows" -> {{2}}}]], "GuideWebResource"]}
- },
- GridBoxAlignment->{
- "Columns" -> {{Left, Center}},
- "Rows" -> {{Top}}}]], "GuideLearningResourcesGrid"]
-}, Closed]],
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Reference"
-}], "GuideReferenceSection",
- WholeCellGroupOpener->True],
-
-Cell["", "SectionHeaderSpacer"],
-
-Cell[CellGroupData[{
-
Cell["Basic objects", "GuideFunctionsSubsection",
CellID->1344981135],
@@ -742,40 +985,38 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["AlphaStrong"]],"paclet:FeynCalc/ref/AlphaStrong"},
+ TextData["AntiQuarkField"]],"paclet:FeynCalc/ref/AntiQuarkField"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " ",
+ ", ",
Cell[BoxData[
- SubscriptBox["\[Alpha]", "s"]], "InlineFormula"],
- " in QCD"
-}], "GuideText",
- CellID->1235023741],
-
-Cell[TextData[{
+ TemplateBox[{Cell[
+ TextData["QuarkField"]],"paclet:FeynCalc/ref/QuarkField"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["AlphaFS"]],"paclet:FeynCalc/ref/AlphaFS"},
+ TextData["QuarkFieldPsi"]],"paclet:FeynCalc/ref/QuarkFieldPsi"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " fine-strucutre constant"
-}], "GuideText",
- CellID->1076523595],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["AntiQuarkField"]],"paclet:FeynCalc/ref/AntiQuarkField"},
+ TextData["QuarkFieldPsiDagger"]],
+ "paclet:FeynCalc/ref/QuarkFieldPsiDagger"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["QuarkFieldChi"]],"paclet:FeynCalc/ref/QuarkFieldChi"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["QuarkField"]],"paclet:FeynCalc/ref/QuarkField"},
+ TextData["QuarkFieldChiDagger"]],
+ "paclet:FeynCalc/ref/QuarkFieldChiDagger"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
@@ -805,214 +1046,338 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ChiralityProjector"]],"paclet:FeynCalc/ref/ChiralityProjector"},
+ TextData["CGA"]],"paclet:FeynCalc/ref/CGA"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes ",
+ ", ",
Cell[BoxData[
- SubscriptBox["P", "L"]], "InlineFormula"],
- " or ",
+ TemplateBox[{Cell[
+ TextData["CGS"]],"paclet:FeynCalc/ref/CGS"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
Cell[BoxData[
- SubscriptBox["P", "R"]], "InlineFormula"]
-}], "GuideText",
- CellID->745071340],
-
-Cell[TextData[{
+ TemplateBox[{Cell[
+ TextData["CGAD"]],"paclet:FeynCalc/ref/CGAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DeltaFunction"]],"paclet:FeynCalc/ref/DeltaFunction"},
+ TextData["CGSD"]],"paclet:FeynCalc/ref/CGSD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DeltaFunctionPrime"]],"paclet:FeynCalc/ref/DeltaFunctionPrime"},
+ TextData["CGAE"]],"paclet:FeynCalc/ref/CGAE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DeltaFunctionDoublePrime"]],
- "paclet:FeynCalc/ref/DeltaFunctionDoublePrime"},
+ TextData["CGSE"]],"paclet:FeynCalc/ref/CGSE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
+ " ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " Dirac delta function and its derivatives"
+ " representation of Dirac matrices with Cartesian indices or Dirac matrices \
+contracted to 3-momenta"
}], "GuideText",
- CellID->1851196232],
+ CellID->747406905],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracGamma"]],"paclet:FeynCalc/ref/DiracGamma"},
+ TextData["CSI"]],"paclet:FeynCalc/ref/CSI"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracMatrix"]],"paclet:FeynCalc/ref/DiracMatrix"},
+ TextData["CSID"]],"paclet:FeynCalc/ref/CSID"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracSlash"]],"paclet:FeynCalc/ref/DiracSlash"},
+ TextData["CSIE"]],"paclet:FeynCalc/ref/CSIE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GA"]],"paclet:FeynCalc/ref/GA"},
+ TextData["CSIS"]],"paclet:FeynCalc/ref/CSIS"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GA5"]],"paclet:FeynCalc/ref/GA5"},
+ TextData["CSISD"]],"paclet:FeynCalc/ref/CSISD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GS"]],"paclet:FeynCalc/ref/GS"},
+ TextData["CSISE"]],"paclet:FeynCalc/ref/CSISE"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Pauli matrices with Cartesian indices or Pauli matrices \
+contracted to 3-momenta"
+}], "GuideText",
+ CellID->1899175563],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CSP"]],"paclet:FeynCalc/ref/CSP"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GAD"]],"paclet:FeynCalc/ref/GAD"},
+ TextData["CSPD"]],"paclet:FeynCalc/ref/CSPD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GSD"]],"paclet:FeynCalc/ref/GSD"},
+ TextData["CSPE"]],"paclet:FeynCalc/ref/CSPE"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes scalar products of 3-momenta"
+}], "GuideText",
+ CellID->2127308002],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CV"]],"paclet:FeynCalc/ref/CV"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GAE"]],"paclet:FeynCalc/ref/GAE"},
+ TextData["CVD"]],"paclet:FeynCalc/ref/CVD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["GSE"]],"paclet:FeynCalc/ref/GSE"},
+ TextData["CVE"]],"paclet:FeynCalc/ref/CVE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
+ " ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " representation of Dirac matrices and slashes"
+ " representation of 3-vectors"
}], "GuideText",
- CellID->1686448459],
+ CellID->1787264376],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracGammaT"]],"paclet:FeynCalc/ref/DiracGammaT"},
+ TextData["CartesianIndex"]],"paclet:FeynCalc/ref/CartesianIndex"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " tranpose of a Dirac matrix"
+ " Cartesian index"
}], "GuideText",
- CellID->264840152],
+ CellID->1483374883],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracSigma"]],"paclet:FeynCalc/ref/DiracSigma"},
+ TextData["CartesianMomentum"]],"paclet:FeynCalc/ref/CartesianMomentum"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes ",
+ " internal representation of 3-momenta"
+}], "GuideText",
+ CellID->1693164442],
+
+Cell[TextData[{
Cell[BoxData[
- RowBox[{
- FractionBox["I", "2"], "[",
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"], ",",
- SuperscriptBox["\[Gamma]", "\[Nu]"]}], "]"}]], "InlineFormula"]
+ TemplateBox[{Cell[
+ TextData["CartesianPair"]],"paclet:FeynCalc/ref/CartesianPair"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " special pairing used in the internal representation to represent Kronecker \
+deltas, 3-vectors or Cartesian scalar products"
}], "GuideText",
- CellID->1624859494],
+ CellID->40531547],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracSpinor"]],"paclet:FeynCalc/ref/DiracSpinor"},
+ TextData["DeltaFunction"]],"paclet:FeynCalc/ref/DeltaFunction"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Spinor"]],"paclet:FeynCalc/ref/Spinor"},
+ TextData["DeltaFunctionPrime"]],"paclet:FeynCalc/ref/DeltaFunctionPrime"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SpinorU"]],"paclet:FeynCalc/ref/SpinorU"},
+ TextData["DeltaFunctionDoublePrime"]],
+ "paclet:FeynCalc/ref/DeltaFunctionDoublePrime"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " Dirac delta function and its derivatives"
+}], "GuideText",
+ CellID->1851196232],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SpinorUBar"]],"paclet:FeynCalc/ref/SpinorUBar"},
+ TextData["DiracGamma"]],"paclet:FeynCalc/ref/DiracGamma"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SpinorV"]],"paclet:FeynCalc/ref/SpinorV"},
+ TextData["GA"]],"paclet:FeynCalc/ref/GA"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SpinorVBar"]],"paclet:FeynCalc/ref/SpinorVBar"},
+ TextData["GA5"]],"paclet:FeynCalc/ref/GA5"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes spinors"
-}], "GuideText",
- CellID->307637975],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Eps"]],"paclet:FeynCalc/ref/Eps"},
+ TextData["GS"]],"paclet:FeynCalc/ref/GS"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["LC"]],"paclet:FeynCalc/ref/LC"},
+ TextData["GAD"]],"paclet:FeynCalc/ref/GAD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["LCD"]],"paclet:FeynCalc/ref/LCD"},
+ TextData["GSD"]],"paclet:FeynCalc/ref/GSD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["LeviCivita"]],"paclet:FeynCalc/ref/LeviCivita"},
+ TextData["GAE"]],"paclet:FeynCalc/ref/GAE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash] ", "GuideEmDash"],
- "totally antisymmetric epsilon (Levi-Civita) tensor"
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["GSE"]],"paclet:FeynCalc/ref/GSE"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Dirac matrices and slashes"
+}], "GuideText",
+ CellID->1686448459],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracIndexDelta"]],"paclet:FeynCalc/ref/DiracIndexDelta"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DIDelta"]],"paclet:FeynCalc/ref/DIDelta"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " Kronecker delta in the Dirac space"
+}], "GuideText",
+ CellID->1098539957],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracSigma"]],"paclet:FeynCalc/ref/DiracSigma"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes ",
+ Cell[BoxData[
+ RowBox[{"I", "/",
+ RowBox[{"2", "[",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"], ",",
+ SuperscriptBox["\[Gamma]", "\[Nu]"]}], "]"}]}]], "InlineFormula"]
+}], "GuideText",
+ CellID->1624859494],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Eps"]],"paclet:FeynCalc/ref/Eps"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["LC"]],"paclet:FeynCalc/ref/LC"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["LCD"]],"paclet:FeynCalc/ref/LCD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CLC"]],"paclet:FeynCalc/ref/CLC"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CLCD"]],"paclet:FeynCalc/ref/CLCD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] ", "GuideEmDash"],
+ "totally antisymmetric epsilon (Levi-Civita) tensor"
}], "GuideText",
CellID->1680708588],
Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsilonUV"]],"paclet:FeynCalc/ref/EpsilonUV"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsilonIR"]],"paclet:FeynCalc/ref/EpsilonIR"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
TextData["Epsilon"]],"paclet:FeynCalc/ref/Epsilon"},
@@ -1043,6 +1408,24 @@ Cell[TextData[{
}], "GuideText",
CellID->1483552361],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ExplicitDiracIndex"]],"paclet:FeynCalc/ref/ExplicitDiracIndex"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracIndex"]],"paclet:FeynCalc/ref/DiracIndex"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " Dirac index"
+}], "GuideText",
+ CellID->1133806213],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1086,6 +1469,24 @@ Cell[TextData[{
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SFAD"]],"paclet:FeynCalc/ref/SFAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CFAD"]],"paclet:FeynCalc/ref/CFAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["GFAD"]],"paclet:FeynCalc/ref/GFAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
@@ -1097,6 +1498,24 @@ Cell[TextData[{
}], "GuideText",
CellID->1131303773],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DCHN"]],"paclet:FeynCalc/ref/DCHN"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracChain"]],"paclet:FeynCalc/ref/DiracChain"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] ", "GuideEmDash"],
+ "a Dirac chain with explicit open Dirac indices"
+}], "GuideText",
+ CellID->1183747723],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1136,10 +1555,16 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FourVector"]],"paclet:FeynCalc/ref/FourVector"},
+ TextData["FCTopology"]],"paclet:FeynCalc/ref/FCTopology"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of a loop integral family topology"
+}], "GuideText",
+ CellID->351247141],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
TextData["FV"]],"paclet:FeynCalc/ref/FV"},
@@ -1202,14 +1627,26 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Gstrong"]],"paclet:FeynCalc/ref/Gstrong"},
+ TextData["KD"]],"paclet:FeynCalc/ref/KD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["KDD"]],"paclet:FeynCalc/ref/KDD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["KDE"]],"paclet:FeynCalc/ref/KDE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " QCD coupling constant"
+ " representation of the Cartesian Kronecker delta"
}], "GuideText",
- CellID->1005983702],
+ CellID->279506458],
Cell[TextData[{
Cell[BoxData[
@@ -1217,23 +1654,23 @@ Cell[TextData[{
TextData["Li2"]],"paclet:FeynCalc/ref/Li2"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " dilog function"
-}], "GuideText",
- CellID->832103768],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
TextData["Li3"]],"paclet:FeynCalc/ref/Li3"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Li4"]],"paclet:FeynCalc/ref/Li4"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " trilog function"
+ " polylogarithms of different weghts"
}], "GuideText",
- CellID->431072089],
+ CellID->1843949061],
Cell[TextData[{
Cell[BoxData[
@@ -1243,17 +1680,11 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " internal representation of momenta"
+ " internal representation of 4-momenta"
}], "GuideText",
CellID->316776695],
Cell[TextData[{
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["MetricTensor"]],"paclet:FeynCalc/ref/MetricTensor"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
Cell[BoxData[
TemplateBox[{Cell[
TextData["MT"]],"paclet:FeynCalc/ref/MT"},
@@ -1298,10 +1729,40 @@ Cell[TextData[{
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" special pairing used in the internal representation to represent the \
-metric, 4-vectors or scalar products"
+metric, scalar products or 4-vectors"
}], "GuideText",
CellID->1889374617],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PauliSigma"]],"paclet:FeynCalc/ref/PauliSigma"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " internal representation of Pauli matrices"
+}], "GuideText",
+ CellID->1326672219],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PauliEta"]],"paclet:FeynCalc/ref/PauliEta"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PauliXi"]],"paclet:FeynCalc/ref/PauliXi"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Pauli spinors"
+}], "GuideText",
+ CellID->339455499],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1351,6 +1812,27 @@ Cell[TextData[{
TextData["PD"]],"paclet:FeynCalc/ref/PD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["StandardPropagatorDenominator"]],
+ "paclet:FeynCalc/ref/StandardPropagatorDenominator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CartesianPropagatorDenominator"]],
+ "paclet:FeynCalc/ref/CartesianPropagatorDenominator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["GenericPropagatorDenominator"]],
+ "paclet:FeynCalc/ref/GenericPropagatorDenominator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" internal representation of propagator denominators"
@@ -1420,95 +1902,198 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SmallDelta"]],"paclet:FeynCalc/ref/SmallDelta"},
+ TextData["SI"]],"paclet:FeynCalc/ref/SI"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SmallEpsilon"]],"paclet:FeynCalc/ref/SmallEpsilon"},
+ TextData["SID"]],"paclet:FeynCalc/ref/SID"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes some small positive numbers"
-}], "GuideText",
- CellID->137238398],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SmallVariable"]],"paclet:FeynCalc/ref/SmallVariable"},
+ TextData["SIE"]],"paclet:FeynCalc/ref/SIE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " small variable to be used as a regulator in PaVe functions"
-}], "GuideText",
- CellID->590785021],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SP"]],"paclet:FeynCalc/ref/SP"},
+ TextData["SIS"]],"paclet:FeynCalc/ref/SIS"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SPD"]],"paclet:FeynCalc/ref/SPD"},
+ TextData["SISD"]],"paclet:FeynCalc/ref/SISD"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SPE"]],"paclet:FeynCalc/ref/SPE"},
+ TextData["SISE"]],"paclet:FeynCalc/ref/SISE"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
+ " ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes scalar products of 4-momenta"
+ " external representation of Pauli matrices with Lorentz indices or Pauli \
+matrices contracted to 4-momenta"
}], "GuideText",
- CellID->305275299],
+ CellID->1616434352],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SUND"]],"paclet:FeynCalc/ref/SUND"},
+ TextData["SmallDelta"]],"paclet:FeynCalc/ref/SmallDelta"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash] totally symmetric", "GuideEmDash"],
- " structure constant ",
+ ", ",
Cell[BoxData[
- SubscriptBox["d", "abc"]], "InlineFormula"],
- " in SU(N)"
+ TemplateBox[{Cell[
+ TextData["SmallEpsilon"]],"paclet:FeynCalc/ref/SmallEpsilon"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes some small positive numbers"
}], "GuideText",
- CellID->1136659773],
+ CellID->137238398],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SUNF"]],"paclet:FeynCalc/ref/SUNF"},
+ TextData["SmallVariable"]],"paclet:FeynCalc/ref/SmallVariable"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
- StyleBox["\[LongDash] totally antisymmetric", "GuideEmDash"],
- " structure constant ",
- Cell[BoxData[
- SubscriptBox["f", "abc"]], "InlineFormula"],
- " in SU(N)"
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " small variable to be used as a regulator in PaVe functions"
}], "GuideText",
- CellID->920034572],
+ CellID->590785021],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SUNN"]],"paclet:FeynCalc/ref/SUNN"},
+ TextData["Spinor"]],"paclet:FeynCalc/ref/Spinor"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash] number of colors ", "GuideEmDash"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorU"]],"paclet:FeynCalc/ref/SpinorU"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorUBar"]],"paclet:FeynCalc/ref/SpinorUBar"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorV"]],"paclet:FeynCalc/ref/SpinorV"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorVBar"]],"paclet:FeynCalc/ref/SpinorVBar"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorUD"]],"paclet:FeynCalc/ref/SpinorUD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorUBarD"]],"paclet:FeynCalc/ref/SpinorUBarD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorVD"]],"paclet:FeynCalc/ref/SpinorVD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SpinorVBarD"]],"paclet:FeynCalc/ref/SpinorVBarD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes Dirac spinors"
+}], "GuideText",
+ CellID->307637975],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SP"]],"paclet:FeynCalc/ref/SP"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SPD"]],"paclet:FeynCalc/ref/SPD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SPE"]],"paclet:FeynCalc/ref/SPE"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes scalar products of 4-momenta"
+}], "GuideText",
+ CellID->305275299],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SUND"]],"paclet:FeynCalc/ref/SUND"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] totally symmetric", "GuideEmDash"],
+ " structure constant ",
+ Cell[BoxData[
+ SubscriptBox["d", "abc"]], "InlineFormula"],
+ " in SU(N)"
+}], "GuideText",
+ CellID->1136659773],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SUNF"]],"paclet:FeynCalc/ref/SUNF"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] totally antisymmetric", "GuideEmDash"],
+ " structure constant ",
+ Cell[BoxData[
+ SubscriptBox["f", "abc"]], "InlineFormula"],
+ " in SU(N)"
+}], "GuideText",
+ CellID->920034572],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SUNN"]],"paclet:FeynCalc/ref/SUNN"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] number of colors ", "GuideEmDash"],
Cell[BoxData[
SubscriptBox["N", "c"]], "InlineFormula"],
"in SU(N)"
@@ -1537,6 +2122,59 @@ Cell[TextData[{
}], "GuideText",
CellID->1428923217],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["TC"]],"paclet:FeynCalc/ref/TC"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes the temporal component of a 4-vector, e.g. ",
+ Cell[BoxData[
+ SuperscriptBox["p", "0"]], "InlineFormula"]
+}], "GuideText",
+ CellID->1810653371],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["TGA"]],"paclet:FeynCalc/ref/CGA"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes the temporal component of a Dirac matrix, i.e. ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "0"]], "InlineFormula"]
+}], "GuideText",
+ CellID->564637115],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["TemporalMomentum"]],"paclet:FeynCalc/ref/TemporalMomentum"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " internal representation of temporal components of 4-momenta"
+}], "GuideText",
+ CellID->579398612],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["TemporalPair"]],"paclet:FeynCalc/ref/TemporalPair"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " special pairing used in the internal representation to represent temporal \
+components of 4-vectors"
+}], "GuideText",
+ CellID->461177124],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1559,14 +2197,36 @@ Cell[TextData[{
TextData["Zeta2"]],"paclet:FeynCalc/ref/Zeta2"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Zeta4"]],"paclet:FeynCalc/ref/Zeta4"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Zeta6"]],"paclet:FeynCalc/ref/Zeta6"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Zeta8"]],"paclet:FeynCalc/ref/Zeta8"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Zeta10"]],"paclet:FeynCalc/ref/Zeta10"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes ",
- Cell[BoxData[
- SubscriptBox["\[Zeta]", "2"]], "InlineFormula"]
+ " Riemann zeta functions of different weghts"
}], "GuideText",
- CellID->1924638314]
-}, Closed]],
+ CellID->495570479]
+}, Open ]],
Cell[CellGroupData[{
@@ -1672,6 +2332,22 @@ Cell[TextData[{
}], "GuideText",
CellID->1504394922],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ExpandAll2"]],"paclet:FeynCalc/ref/ExpandAll2"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ExpandAll"]],"paclet:ref/ExpandAll"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1363219802],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1707,6 +2383,17 @@ Cell[TextData[{
}], "GuideText",
CellID->187460383],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCAbbreviate"]],"paclet:FeynCalc/ref/FCAbbreviate"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " introduces abbreviations"
+}], "GuideText",
+ CellID->250574594],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1718,6 +2405,83 @@ Cell[TextData[{
}], "GuideText",
CellID->333715746],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCDuplicateFreeQ"]],"paclet:FeynCalc/ref/FCDuplicateFreeQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DuplicateFreeQ"]],"paclet:ref/DuplicateFreeQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1948712237],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCFactorOut"]],"paclet:FeynCalc/ref/FCFactorOut"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " factor out the given prefactor"
+}], "GuideText",
+ CellID->457240651],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCCheckSyntax"]],"paclet:FeynCalc/ref/FCCheckSyntax"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " attempts to detect syntax errors in the input expressions"
+}], "GuideText",
+ CellID->1944469376],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCCheckVersion"]],"paclet:FeynCalc/ref/FCCheckVersion"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks the FeynCalc version"
+}], "GuideText",
+ CellID->999406468],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCCompareResults"]],"paclet:FeynCalc/ref/FCCompareResults"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " compares results of different calculations"
+}], "GuideText",
+ CellID->1139098210],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCGetNotebookDirectory"]],
+ "paclet:FeynCalc/ref/FCGetNotebookDirectory"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["NotebookDirectory"]],"paclet:ref/NotebookDirectory"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->959045627],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1775,13 +2539,84 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCSplit"]],"paclet:FeynCalc/ref/FCSplit"},
+ TextData["FCMakeIndex"]],"paclet:FeynCalc/ref/FCMakeIndex"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["PartitHead"]],"paclet:FeynCalc/ref/PartitHead"},
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " generates indices from strings (useful e.g. for QGRAF input)"
+}], "GuideText",
+ CellID->1710347762],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCPatternFreeQ"]],"paclet:FeynCalc/ref/FCPatternFreeQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains any patterns"
+}], "GuideText",
+ CellID->912750390],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCProgressBar"]],"paclet:FeynCalc/ref/FCProgressBar"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " a simplistic progress bar"
+}], "GuideText",
+ CellID->639244384],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCReplaceAll"]],"paclet:FeynCalc/ref/FCReplaceAll"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ReplaceAll"]],"paclet:ref/ReplaceAll"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1734464827],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCReplaceRepeated"]],"paclet:FeynCalc/ref/FCReplaceRepeated"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ReplaceRepeated"]],"paclet:ref/ReplaceRepeated"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1126439252],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCSplit"]],"paclet:FeynCalc/ref/FCSplit"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCProductSplit"]],"paclet:FeynCalc/ref/FCProductSplit"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PartitHead"]],"paclet:FeynCalc/ref/PartitHead"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
@@ -1798,7 +2633,7 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " alternative to ",
+ " alternatives to ",
Cell[BoxData[
TemplateBox[{Cell[
TextData["Select"]],"paclet:ref/Select"},
@@ -1807,6 +2642,22 @@ Cell[TextData[{
}], "GuideText",
CellID->898863791],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCSubsetQ"]],"paclet:FeynCalc/ref/FCSubsetQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SubsetQ"]],"paclet:ref/SubsetQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1409575124],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -1983,375 +2834,917 @@ Cell[TextData[{
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Series3"]],"paclet:FeynCalc/ref/Series3"},
+ TextData["Series3"]],"paclet:FeynCalc/ref/Series3"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternatives to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Series"]],"paclet:ref/Series"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1659205566],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Solve2"]],"paclet:FeynCalc/ref/Solve2"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Solve3"]],"paclet:FeynCalc/ref/Solve3"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternatives to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Solve"]],"paclet:ref/Solve"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1809157918],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SumP"]],"paclet:FeynCalc/ref/SumP"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SumS"]],"paclet:FeynCalc/ref/SumS"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SumT"]],"paclet:FeynCalc/ref/SumT"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " different summations"
+}], "GuideText",
+ CellID->869117662]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Lorentz and Cartesian tensors", "GuideFunctionsSubsection",
+ CellID->385817707],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Amputate"]],"paclet:FeynCalc/ref/Amputate"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " amputates 4-vectors, Dirac matrices or Levi-Civita tensors"
+}], "GuideText",
+ CellID->2009629793],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CartesianToLorentz"]],"paclet:FeynCalc/ref/CartesianToLorentz"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrties certain Cartesian tensors in terms of Lorentz tensors"
+}], "GuideText",
+ CellID->912975989],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ChangeDimension"]],"paclet:FeynCalc/ref/ChangeDimension"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " changes dimension of Lorentz or Cartesian indices and momenta"
+}], "GuideText",
+ CellID->512359346],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CompleteSquare"]],"paclet:FeynCalc/ref/CompleteSquare"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " completes the square of a second order polynomial in the momentum ",
+ Cell["x", "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1524292158],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Contract"]],"paclet:FeynCalc/ref/Contract"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " contracts Lorentz or Cartesian indices of tensors and Dirac matrices"
+}], "GuideText",
+ CellID->231212511],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DeclareFCTensor"]],"paclet:FeynCalc/ref/DeclareFCTensor"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " declares the given head to be a tensor"
+}], "GuideText",
+ CellID->462667998],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DummyIndexFreeQ"]],"paclet:FeynCalc/ref/DummyIndexFreeQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains dummy indices"
+}], "GuideText",
+ CellID->1666870466],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsContract"]],"paclet:FeynCalc/ref/EpsContract"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites products of Levi-Civita tensors in terms of scalar products"
+}], "GuideText",
+ CellID->1913592904],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsContractFreeQ"]],"paclet:FeynCalc/ref/EpsContractFreeQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains products of LeviCivita tensors"
+}], "GuideText",
+ CellID->1678264313],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsEvaluate"]],"paclet:FeynCalc/ref/EpsEvaluate"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " applies total antisymmetry and linearity to all Levi-Civita tensors"
+}], "GuideText",
+ CellID->1041255969],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ExpandScalarProduct"]],
+ "paclet:FeynCalc/ref/ExpandScalarProduct"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " expands scalar products of sums of momenta"
+}], "GuideText",
+ CellID->693139341],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCCanonicalizeDummyIndices"]],
+ "paclet:FeynCalc/ref/FCCanonicalizeDummyIndices"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " canonicalizes dummy indices"
+}], "GuideText",
+ CellID->530074450],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCClearScalarProducts"]],
+ "paclet:FeynCalc/ref/FCClearScalarProducts"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " removes all user-specific definitions of scalar products"
+}], "GuideText",
+ CellID->343872275],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCGetDimensions"]],"paclet:FeynCalc/ref/FCGetDimensions"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " returns the space-time dimensions of objects in the expression"
+}], "GuideText",
+ CellID->1454317304],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCPermuteMomentaRules"]],
+ "paclet:FeynCalc/ref/FCPermuteMomentaRules"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " generates rules for permutations of momenta"
+}], "GuideText",
+ CellID->458315879],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCRenameDummyIndices"]],
+ "paclet:FeynCalc/ref/FCRenameDummyIndices"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " renames dummy indices"
+}], "GuideText",
+ CellID->548161550],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCReplaceMomenta"]],"paclet:FeynCalc/ref/FCReplaceMomenta"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " replaces momenta in the expression"
+}], "GuideText",
+ CellID->956858169],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCRerouteMomenta"]],"paclet:FeynCalc/ref/FCRerouteMomenta"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " improves routing of the external momenta using momentum conservation"
+}], "GuideText",
+ CellID->1163869201],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCSchoutenBruteForce"]],
+ "paclet:FeynCalc/ref/FCSchoutenBruteForce"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " brute force application of the Schouten identity to minimize the number of \
+terms"
+}], "GuideText",
+ CellID->1554099869],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FourDivergence"]],"paclet:FeynCalc/ref/FourDivergence"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates partial derivative with respect to a 4-vector"
+}], "GuideText",
+ CellID->987343741],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FourLaplacian"]],"paclet:FeynCalc/ref/FourLaplacian"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates the Laplacian"
+}], "GuideText",
+ CellID->1285601191],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FreeIndexFreeQ"]],"paclet:FeynCalc/ref/FreeIndexFreeQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains free indices"
+}], "GuideText",
+ CellID->894822474],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["LorentzToCartesian"]],"paclet:FeynCalc/ref/LorentzToCartesian"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrties Lorentz tensors in terms of Cartesian tensors"
+}], "GuideText",
+ CellID->2030923756],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["MomentumCombine"]],"paclet:FeynCalc/ref/MomentumCombine"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " inverse operation to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["MomentumExpand"]],"paclet:FeynCalc/ref/MomentumExpand"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " and ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ExpandScalarProduct"]],
+ "paclet:FeynCalc/ref/ExpandScalarProduct"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1809925827],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["MomentumExpand"]],"paclet:FeynCalc/ref/MomentumExpand"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " expands ",
+ ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Momentum"],
+ "[a+b+ ...]"
+}], "GuideText",
+ CellID->344422616],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PairContract"]],"paclet:FeynCalc/ref/PairContract"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PairContract2"]],"paclet:FeynCalc/ref/PairContract2"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PairContract3"]],"paclet:FeynCalc/ref/PairContract3"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " like Pair but with local contraction properties"
+}], "GuideText",
+ CellID->2009219923],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ScalarProduct"]],"paclet:FeynCalc/ref/ScalarProduct"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " defines scalar products of 4-vectors"
+}], "GuideText",
+ CellID->874103215],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Schouten"]],"paclet:FeynCalc/ref/Schouten"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " applies Schouten identity (random guess)"
+}], "GuideText",
+ CellID->218430270],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SetMandelstam"]],"paclet:FeynCalc/ref/SetMandelstam"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " defines the Mandelstam variables"
+}], "GuideText",
+ CellID->579030092],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["TensorFunction"]],"paclet:FeynCalc/ref/TensorFunction"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " defines an unspecified Lorentz tensor"
+}], "GuideText",
+ CellID->1156270314],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ThreeDivergence"]],"paclet:FeynCalc/ref/ThreeDivergence"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates partial derivative with respect to a 3-vector"
+}], "GuideText",
+ CellID->1174118505],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["TrickMandelstam"]],"paclet:FeynCalc/ref/TrickMandelstam"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " simplifies the expression by eliminating one of the Mandelstam variables"
+}], "GuideText",
+ CellID->629389521],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Uncontract"]],"paclet:FeynCalc/ref/Uncontract"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " uncontracts Lorentz indices of tensors and Dirac matrices"
+}], "GuideText",
+ CellID->715481727],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["UnDeclareFCTensor"]],"paclet:FeynCalc/ref/UnDeclareFCTensor"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " undeclares the given head to be a tensor"
+}], "GuideText",
+ CellID->397784278]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Dirac algebra", "GuideFunctionsSubsection",
+ CellID->46643246],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Anti5"]],"paclet:FeynCalc/ref/Anti5"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " anticommutes all ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " matrices to the left or to the right"
+}], "GuideText",
+ CellID->2131819227],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Chisholm"]],"paclet:FeynCalc/ref/Chisholm"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " alternatives to ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["Series"]],"paclet:ref/Series"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+ " substitutes products of 3 Dirac matrices by the Chisholm identity"
}], "GuideText",
- CellID->1659205566],
+ CellID->1211971239],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Solve2"]],"paclet:FeynCalc/ref/Solve2"},
+ TextData["DiracEquation"]],"paclet:FeynCalc/ref/DiracEquation"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " applies the Dirac equation"
+}], "GuideText",
+ CellID->333117850],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Solve3"]],"paclet:FeynCalc/ref/Solve3"},
+ TextData["DiracGammaCombine"]],"paclet:FeynCalc/ref/DiracGammaCombine"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
+ " ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " alternatives to ",
+ " inverse operation to ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Solve"]],"paclet:ref/Solve"},
+ TextData["DiracGammaExpand"]],"paclet:FeynCalc/ref/DiracGammaExpand"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
}], "GuideText",
- CellID->1809157918],
+ CellID->615769661],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SumP"]],"paclet:FeynCalc/ref/SumP"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["SumS"]],"paclet:FeynCalc/ref/SumS"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["SumT"]],"paclet:FeynCalc/ref/SumT"},
+ TextData["DiracGammaExpand"]],"paclet:FeynCalc/ref/DiracGammaExpand"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " different summations"
+ " expands sums of momenta contracted with Dirac matrices"
}], "GuideText",
- CellID->869117662]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Lorentz tensors", "GuideFunctionsSubsection",
- CellID->385817707],
+ CellID->1531032786],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Amputate"]],"paclet:FeynCalc/ref/Amputate"},
+ TextData["DiracOrder"]],"paclet:FeynCalc/ref/DiracOrder"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " amputates 4-vectors, Dirac matrices or Levi-Civita tensors"
+ " orders the Dirac matrices in expression lexicographically"
}], "GuideText",
- CellID->2009629793],
+ CellID->688938496],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ChangeDimension"]],"paclet:FeynCalc/ref/ChangeDimension"},
+ TextData["DiracReduce"]],"paclet:FeynCalc/ref/DiracReduce"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " changes dimension of Lorentz indices and momenta"
+ " reduces all 4-dimensional Dirac matrices to the standard basis \
+(SPVAT-decomposition) "
}], "GuideText",
- CellID->512359346],
+ CellID->1740429042],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["CompleteSquare"]],"paclet:FeynCalc/ref/CompleteSquare"},
+ TextData["DiracSigmaExpand"]],"paclet:FeynCalc/ref/DiracSigmaExpand"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " completes the square of a second order polynomial in the momentum x"
+ " applies linearity to the arguments of ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracSigma"]],"paclet:FeynCalc/ref/DiracSigma"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
}], "GuideText",
- CellID->1524292158],
+ CellID->766933896],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Contract"]],"paclet:FeynCalc/ref/Contract"},
+ TextData["DiracSigmaExplicit"]],"paclet:FeynCalc/ref/DiracSigmaExplicit"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " contracts Lorentz indices of tensors and Dirac matrices"
+ " inserts the explicit definition of ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracSigma"]],"paclet:FeynCalc/ref/DiracSigma"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
}], "GuideText",
- CellID->231212511],
+ CellID->297775359],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["EpsEvaluate"]],"paclet:FeynCalc/ref/EpsEvaluate"},
+ TextData["DiracSimplify"]],"paclet:FeynCalc/ref/DiracSimplify"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " applies total antisymmetry and linearity to all Levi-Civita tensors"
+ " simplifies products of Dirac matrices and expands non-commutative \
+products"
}], "GuideText",
- CellID->1913592904],
+ CellID->255459663],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ExpandScalarProduct"]],
- "paclet:FeynCalc/ref/ExpandScalarProduct"},
+ TextData["DiracSubstitute5"]],"paclet:FeynCalc/ref/DiracSubstitute5"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " expands scalar products of sums of momenta"
+ " rewrites ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " as ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "6"], "-",
+ SuperscriptBox["\[Gamma]", "7"]}]], "InlineFormula"]
}], "GuideText",
- CellID->693139341],
+ CellID->1930796468],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCClearScalarProducts"]],
- "paclet:FeynCalc/ref/FCClearScalarProducts"},
+ TextData["DiracSubstitute67"]],"paclet:FeynCalc/ref/DiracSubstitute67"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " removes all user-specific specific definitions of scalar products"
+ " inserts explicit definitions of the chirality projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"]
}], "GuideText",
- CellID->343872275],
+ CellID->859911226],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCRenameDummyIndices"]],
- "paclet:FeynCalc/ref/FCRenameDummyIndices"},
+ TextData["DiracTrace"]],"paclet:FeynCalc/ref/DiracTrace"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " renames dummy Lorentz and SU(N) indices"
+ " computes traces of Dirac matrices"
}], "GuideText",
- CellID->548161550],
+ CellID->1463755561],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FourDivergence"]],"paclet:FeynCalc/ref/FourDivergence"},
+ TextData["DiracTrick"]],"paclet:FeynCalc/ref/DiracTrick"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " calculates partial derivative with respect to a 4-vector"
+ " contracts Dirac matrices with each other and performs several \
+simplifications but no expansions"
}], "GuideText",
- CellID->987343741],
+ CellID->1334035786],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FourLaplacian"]],"paclet:FeynCalc/ref/FourLaplacian"},
+ TextData["EpsChisholm"]],"paclet:FeynCalc/ref/EpsChisholm"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " calculates the Laplacian"
+ " substitutes Chisholm identity for a Dirac matrix contracted with a \
+Levi-Civita tensor"
}], "GuideText",
- CellID->1285601191],
+ CellID->525715973],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["MomentumCombine"]],"paclet:FeynCalc/ref/MomentumCombine"},
+ TextData["FCCCT"]],"paclet:FeynCalc/ref/FCCCT"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ",",
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData[" MomentumCombine2"]],"paclet:FeynCalc/ref/MomentumCombine"},
+ TextData["FCChargeConjugateTransposed"]],
+ "paclet:FeynCalc/ref/FCChargeConjugateTransposed"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " inverse operations to ",
+ " transposes chains of Dirac matrices and applies change conjugation, e.g. \
+",
+ Cell["x", "InlineFunctionSans"],
+ " becomes ",
Cell[BoxData[
- TemplateBox[{Cell[
- TextData["MomentumExpand"]],"paclet:FeynCalc/ref/MomentumExpand"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " and ",
+ RowBox[{"C", " ",
+ SuperscriptBox["x", "T"],
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}]], "InlineFormula"]
+}], "GuideText",
+ CellID->731234667],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ExpandScalarProduct"]],
- "paclet:FeynCalc/ref/ExpandScalarProduct"},
+ TextData["FCDiracIsolate"]],"paclet:FeynCalc/ref/FCDiracIsolate"},
"RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Dirac matrices and spinors into specified heads "
}], "GuideText",
- CellID->1809925827],
+ CellID->264220763],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["MomentumExpand"]],"paclet:FeynCalc/ref/MomentumExpand"},
+ TextData["FCGetDiracGammaScheme"]],
+ "paclet:FeynCalc/ref/FCGetDiracGammaScheme"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " expands ",
- ButtonBox["Momentum",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Momentum"],
- "[a+b+ ...]"
+ " shows the current scheme for treating Dirac matrices in dimensional \
+regularization."
}], "GuideText",
- CellID->344422616],
+ CellID->1841016351],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["PairContract"]],"paclet:FeynCalc/ref/PairContract"},
+ TextData["DiracChainJoin"]],"paclet:FeynCalc/ref/DiracChainJoin"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["PairContract2"]],"paclet:FeynCalc/ref/PairContract2"},
+ TextData["FCFADiracChainJoin"]],"paclet:FeynCalc/ref/FCFADiracChainJoin"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["PairContract3"]],"paclet:FeynCalc/ref/PairContract3"},
+ TextData["DiracChainCombine"]],"paclet:FeynCalc/ref/DiracChainCombine"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " like Pair but with local contraction properties"
-}], "GuideText",
- CellID->2009219923],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ScalarProduct"]],"paclet:FeynCalc/ref/ScalarProduct"},
+ TextData["DiracChainExpand"]],"paclet:FeynCalc/ref/DiracChainExpand"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " defines scalar products of 4-vectors"
-}], "GuideText",
- CellID->874103215],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SetMandelstam"]],"paclet:FeynCalc/ref/SetMandelstam"},
+ TextData["DiracChainFactor"]],"paclet:FeynCalc/ref/DiracChainFactor"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " defines the Mandelstam variables"
+ " manipulations of matrix chains with explicit Dirac indices"
}], "GuideText",
- CellID->579030092],
+ CellID->2051310471],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["TensorFunction"]],"paclet:FeynCalc/ref/TensorFunction"},
+ TextData["FCSetDiracGammaScheme"]],
+ "paclet:FeynCalc/ref/FCSetDiracGammaScheme"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " defines an unspecified Lorentz tensor"
+ " sets the current scheme for treating Dirac matrices in dimensional \
+regularization."
}], "GuideText",
- CellID->1156270314],
+ CellID->1516554292],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["TrickMandelstam"]],"paclet:FeynCalc/ref/TrickMandelstam"},
+ TextData["SirlinSimplify"]],"paclet:FeynCalc/ref/SirlinSimplify"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " simplifies the expression by eliminating one of the Mandelstam variables"
+ " applies Sirlin's relations to products of spinor chains"
}], "GuideText",
- CellID->629389521],
+ CellID->599004464],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Uncontract"]],"paclet:FeynCalc/ref/Uncontract"},
+ TextData["SpinorChainChiralSplit"]],
+ "paclet:FeynCalc/ref/SpinorChainChiralSplit"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " uncontracts Lorentz indices of tensors and Dirac matrices"
+ " introduces chirality projectors in spinor chains free of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"]
}], "GuideText",
- CellID->715481727]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Dirac algebra", "GuideFunctionsSubsection",
- CellID->46643246],
+ CellID->249077307],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Anti5"]],"paclet:FeynCalc/ref/Anti5"},
+ TextData["SpinorChainTranspose"]],
+ "paclet:FeynCalc/ref/SpinorChainTranspose"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " anticommutes all ",
- Cell[BoxData[
- SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
- " matrices to the left or to the right"
+ " tranposes a closed spinor chains"
}], "GuideText",
- CellID->2131819227],
+ CellID->666948297],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Chisholm"]],"paclet:FeynCalc/ref/Chisholm"},
+ TextData["SpinorChainTrick"]],"paclet:FeynCalc/ref/SpinorChainTrick"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " substitutes products of 3 Dirac matrices by the Chisholm identity"
+ " simplifies products of spinor chains"
}], "GuideText",
- CellID->1211971239],
+ CellID->544222991],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracEquation"]],"paclet:FeynCalc/ref/DiracEquation"},
+ TextData["ToDiracGamma67"]],"paclet:FeynCalc/ref/ToDiracGamma67"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " applies the Dirac equation"
+ " replaces ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "2"}],
+ RowBox[{"(",
+ RowBox[{"1", "\[PlusMinus]",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}]}]], "InlineFormula"],
+ " with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]",
+ RowBox[{"6", "/", "7"}]]], "InlineFormula"]
}], "GuideText",
- CellID->333117850],
+ CellID->829753496],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracGammaCombine"]],"paclet:FeynCalc/ref/DiracGammaCombine"},
+ TextData["ToDiracSigma"]],"paclet:FeynCalc/ref/ToDiracSigma"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
@@ -2359,146 +3752,134 @@ Cell[TextData[{
" inverse operation to ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracGammaExpand"]],"paclet:FeynCalc/ref/DiracGammaExpand"},
+ TextData["DiracSigmaExplicit"]],"paclet:FeynCalc/ref/DiracSigmaExplicit"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
}], "GuideText",
- CellID->615769661],
+ CellID->803577072],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracGammaExpand"]],"paclet:FeynCalc/ref/DiracGammaExpand"},
+ TextData["ToLarin"]],"paclet:FeynCalc/ref/ToLarin"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " expands sums of momenta contracted with Dirac matrices"
-}], "GuideText",
- CellID->1531032786],
-
-Cell[TextData[{
+ " substitutes ",
Cell[BoxData[
- TemplateBox[{Cell[
- TextData["DiracOrder"]],"paclet:FeynCalc/ref/DiracOrder"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " orders the Dirac matrices in expression alphabetically"
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SuperscriptBox["\[Gamma]", "5"]}]], "InlineFormula"],
+ " according to the Larin scheme"
}], "GuideText",
- CellID->688938496],
+ CellID->1707494307]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Pauli algebra", "GuideFunctionsSubsection",
+ CellID->1019637263],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracReduce"]],"paclet:FeynCalc/ref/DiracReduce"},
+ TextData["FCGetPauliSigmaScheme"]],
+ "paclet:FeynCalc/ref/FCGetPauliSigmaScheme"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " reduces all 4-dimensional Dirac matrices to the standard basis \
-(SPVAT-decomposition) "
-}], "GuideText",
- CellID->1740429042],
-
-Cell[TextData[{
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracSigmaExplicit"]],"paclet:FeynCalc/ref/DiracSigmaExplicit"},
+ TextData["FCSetPauliSigmaScheme"]],
+ "paclet:FeynCalc/ref/FCSetPauliSigmaScheme"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " inserts the explicit definition of ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["DiracSigma"]],"paclet:FeynCalc/ref/DiracSigma"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+ " specifies the threatment of Pauli matrices in dimensional regularization"
}], "GuideText",
- CellID->297775359],
+ CellID->1574223047],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracSimplify"]],"paclet:FeynCalc/ref/DiracSimplify"},
+ TextData["FCPauliIsolate"]],"paclet:FeynCalc/ref/FCPauliIsolate"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " simplifies products of Dirac matrices and expands non-commutative \
-products"
+ " wraps Pauli matrices and spinors into specified heads "
}], "GuideText",
- CellID->255459663],
+ CellID->1157786320],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracTrace"]],"paclet:FeynCalc/ref/DiracTrace"},
+ TextData["PauliOrder"]],"paclet:FeynCalc/ref/PauliOrder"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " computes traces of Dirac matrices"
+ " orders the Pauli matrices in expression lexicographically"
}], "GuideText",
- CellID->1463755561],
+ CellID->1399324995],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DiracTrick"]],"paclet:FeynCalc/ref/DiracTrick"},
+ TextData["PauliSigmaCombine"]],"paclet:FeynCalc/ref/PauliSigmaCombine"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " contracts Dirac matrices with each other and performs several \
-simplifications but no expansions"
+ " inverse operation to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["PauliSigmaExpand"]],"paclet:FeynCalc/ref/PauliSigmaExpand"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
}], "GuideText",
- CellID->1334035786],
+ CellID->552290354],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["EpsChisholm"]],"paclet:FeynCalc/ref/EpsChisholm"},
+ TextData["PauliSigmaExpand"]],"paclet:FeynCalc/ref/PauliSigmaExpand"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " substitutes Chisholm identity for a Dirac matrix contracted with a \
-Levi-Civita tensor"
+ " expands sums of momenta contracted with Pauli matrices"
}], "GuideText",
- CellID->525715973],
+ CellID->719502163],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Schouten"]],"paclet:FeynCalc/ref/Schouten"},
+ TextData["PauliSimplify"]],"paclet:FeynCalc/ref/PauliSimplify"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " applies Schouten identity"
+ " simplifies products of Pauli matrices and expands non-commutative \
+products"
}], "GuideText",
- CellID->218430270],
+ CellID->88133699],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ToLarin"]],"paclet:FeynCalc/ref/ToLarin"},
+ TextData["PauliTrick"]],"paclet:FeynCalc/ref/PauliTrick"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " substitutes ",
- Cell[BoxData[
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"],
- SuperscriptBox["\[Gamma]", "5"]}]], "InlineFormula"],
- " according to the Larin scheme"
+ " contracts Pauli matrices with each other and performs several \
+simplifications but no expansions"
}], "GuideText",
- CellID->1707494307]
-}, Closed]],
+ CellID->1853386914]
+}, Open ]],
Cell[CellGroupData[{
@@ -2579,7 +3960,7 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash] ", "GuideEmDash"],
- "declares non-commutative objects"
+ "declares noncommutative objects"
}], "GuideText",
CellID->795497081],
@@ -2614,6 +3995,42 @@ Cell[TextData[{
}], "GuideText",
CellID->1861924278],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCMatrixIsolate"]],"paclet:FeynCalc/ref/FCMatrixIsolate"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Dirac, Pauli and SU(N) objects into specified heads "
+}], "GuideText",
+ CellID->1313775346],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCTraceExpand"]],"paclet:FeynCalc/ref/FCTraceExpand"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " expands traces using linearity wihtout calculating them"
+}], "GuideText",
+ CellID->570329733],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCTraceFactor"]],"paclet:FeynCalc/ref/FCTraceFactor"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " pulls c-numbers out of traces"
+}], "GuideText",
+ CellID->563873312],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -2628,7 +4045,7 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " checks if the expression contains non-commutative quantities"
+ " checks if the expression contains noncommutative quantities"
}], "GuideText",
CellID->1355907511],
@@ -2650,6 +4067,32 @@ Cell[TextData[{
}], "GuideText",
CellID->1719074274],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["UnDeclareAntiCommutator"]],
+ "paclet:FeynCalc/ref/UnDeclareAntiCommutator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " removes definitions of anticommutators"
+}], "GuideText",
+ CellID->1938046161],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["UnDeclareCommutator"]],
+ "paclet:FeynCalc/ref/UnDeclareCommutator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " removes definitions of commutators"
+}], "GuideText",
+ CellID->899466843],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -2659,10 +4102,10 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " undeclares non-commutative objects"
+ " undeclares noncommutative objects"
}], "GuideText",
CellID->1309406098]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
@@ -2696,7 +4139,7 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["SUNFDeltaContract"]],"paclet:FeynCalc/ref/SUNDeltaContract"},
+ TextData["SUNFDeltaContract"]],"paclet:FeynCalc/ref/SUNFDeltaContract"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
@@ -2734,7 +4177,7 @@ Cell[TextData[{
" computes traces over SU(N) matrices"
}], "GuideText",
CellID->1561361899]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
@@ -2827,152 +4270,401 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " Passarino-Veltman 4-point integrals (boxes)"
+ " Passarino-Veltman 4-point integrals (boxes)"
+}], "GuideText",
+ CellID->143835829],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DB0"]],"paclet:FeynCalc/ref/DB0"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " derivative of ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["B0"]],"paclet:FeynCalc/ref/B0"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " with respect to the external momentum"
+}], "GuideText",
+ CellID->883206687],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DB1"]],"paclet:FeynCalc/ref/DB1"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " derivative of ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["B1"]],"paclet:FeynCalc/ref/B1"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " with respect to the external momentum"
+}], "GuideText",
+ CellID->439407944],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCApart"]],"paclet:FeynCalc/ref/FCApart"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " backend of ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ApartFF"]],"paclet:FeynCalc/ref/ApartFF"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", works only on single loop integrals"
+}], "GuideText",
+ CellID->1595882694],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCGramMatrix"]],"paclet:FeynCalc/ref/FCGramMatrix"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " generates the Gram matrix from the given momenta"
+}], "GuideText",
+ CellID->649428922],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCGramDeterminant"]],"paclet:FeynCalc/ref/FCGramDeterminant"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates the Gram determinant"
+}], "GuideText",
+ CellID->1635464308],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCHideEpsilon"]],"paclet:FeynCalc/ref/FCHideEpsilon"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " substitutes ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "\[Epsilon]"}], "-",
+ SubscriptBox["\[Gamma]", "E"], "+",
+ RowBox[{"Log",
+ RowBox[{"(",
+ RowBox[{"4", "\[Pi]"}], ")"}]}]}]], "InlineFormula"],
+ " with ",
+ Cell["\[CapitalDelta]", "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1893254602],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCShowEpsilon"]],"paclet:FeynCalc/ref/FCShowEpsilon"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " substitutes ",
+ Cell["\[CapitalDelta]", "InlineFunctionSans"],
+ " with ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "\[Epsilon]"}], "-",
+ SubscriptBox["\[Gamma]", "E"], "+",
+ RowBox[{"Log",
+ RowBox[{"(",
+ RowBox[{"4", "\[Pi]"}], ")"}]}]}]], "InlineFormula"]
+}], "GuideText",
+ CellID->157928460],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCIntegral"]],"paclet:FeynCalc/ref/FCIntegral"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " head of loop integrals"
+}], "GuideText",
+ CellID->333845561],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisIncompleteQ"]],
+ "paclet:FeynCalc/ref/FCLoopBasisIncompleteQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the propagators of a loop integral do not form a basis"
+}], "GuideText",
+ CellID->1110841143],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisOverdeterminedQ"]],
+ "paclet:FeynCalc/ref/FCLoopBasisOverdeterminedQ"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the propagators of a loop integral are linearly dependent"
+}], "GuideText",
+ CellID->714568367],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisSplit"]],"paclet:FeynCalc/ref/FCLoopBasisSplit"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the loop integral factorizes into a product of separate integrals"
+}], "GuideText",
+ CellID->251142308],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisGetSize"]],"paclet:FeynCalc/ref/FCLoopBasisGetSize"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " returns the number of propagators in a topology"
+}], "GuideText",
+ CellID->316443304],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisPropagatorsToTopology"]],
+ "paclet:FeynCalc/ref/FCLoopBasisPropagatorsToTopology"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliary function that generates a list of propagators to describe a \
+topology"
+}], "GuideText",
+ CellID->298868397],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisCreateScalarProducts"]],
+ "paclet:FeynCalc/ref/FCLoopBasisCreateScalarProducts"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliary function that generates all possible loop momenta dependent \
+scalar products"
+}], "GuideText",
+ CellID->1836590028],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCLoopBasisExtract"]],"paclet:FeynCalc/ref/FCLoopBasisExtract"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliart function that extracts the scalar products from a loop integral"
}], "GuideText",
- CellID->143835829],
+ CellID->1180959289],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DB0"]],"paclet:FeynCalc/ref/DB0"},
+ TextData["FCLoopBasisIntegralToPropagators"]],
+ "paclet:FeynCalc/ref/FCLoopBasisIntegralToPropagators"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " derivative of ",
+ " auxiliary function that converts a loop integral into a list of propagators"
+}], "GuideText",
+ CellID->145221909],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["B0"]],"paclet:FeynCalc/ref/B0"},
+ TextData["FCLoopCanonicalize"]],"paclet:FeynCalc/ref/FCLoopCanonicalize"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " with respect to the external momentum"
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliary function that canonicalizes free Lorentz indices of 1-loop \
+integrals"
}], "GuideText",
- CellID->883206687],
+ CellID->1336937891],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["DB1"]],"paclet:FeynCalc/ref/DB1"},
+ TextData["FCLoopEikonalPropagatorFreeQ"]],
+ "paclet:FeynCalc/ref/FCLoopEikonalPropagatorFreeQ"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " derivative of ",
+ " checks if the integral contains eikonal propagators"
+}], "GuideText",
+ CellID->1371085902],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["B1"]],"paclet:FeynCalc/ref/B1"},
+ TextData["FCLoopExtract"]],"paclet:FeynCalc/ref/FCLoopExtract"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " with respect to the external momentum"
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " extracts loop integrals"
}], "GuideText",
- CellID->439407944],
+ CellID->1906541245],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCApart"]],"paclet:FeynCalc/ref/FCApart"},
+ TextData["FCLoopIBPReducableQ"]],
+ "paclet:FeynCalc/ref/FCLoopIBPReducableQ"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " backend of ",
+ " checks if the integral contains propagators raised to integer powers"
+}], "GuideText",
+ CellID->1217639042],
+
+Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ApartFF"]],"paclet:FeynCalc/ref/ApartFF"},
+ TextData["FCLoopIsolate"]],"paclet:FeynCalc/ref/FCLoopIsolate"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- ", works only on single loop integrals"
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps loop integrals into specified heads"
}], "GuideText",
- CellID->1595882694],
+ CellID->757005022],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCIntegral"]],"paclet:FeynCalc/ref/FCIntegral"},
+ TextData["FCLoopMixedIntegralQ"]],
+ "paclet:FeynCalc/ref/FCLoopMixedIntegralQ"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " head of loop integrals"
+ " checks if the integral depends on both 4-vectors and 3-vectors"
}], "GuideText",
- CellID->333845561],
+ CellID->659374071],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCLoopBasisIncompleteQ"]],
- "paclet:FeynCalc/ref/FCLoopBasisIncompleteQ"},
+ TextData["FCLoopMixedToCartesianAndTemporal"]],
+ "paclet:FeynCalc/ref/FCLoopMixedToCartesianAndTemporal"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " checks if the propagators of a loop integral do not form a basis"
+ " eliminates the dependence on 4-vectors by trading them for temporal \
+components and 3-vectors."
}], "GuideText",
- CellID->1110841143],
+ CellID->246441420],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCLoopBasisOverdeterminedQ"]],
- "paclet:FeynCalc/ref/FCLoopBasisOverdeterminedQ"},
+ TextData["FCLoopNonIntegerPropagatorPowersFreeQ"]],
+ "paclet:FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " checks if the propagators of a loop integral are linearly dependent"
+ " checks if the integral has propagators raised to noninteger powers."
}], "GuideText",
- CellID->714568367],
+ CellID->1419686490],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCLoopBasisFindCompletion"]],
- "paclet:FeynCalc/ref/FCLoopBasisFindCompletion"},
+ TextData["FCLoopPropagatorPowersCombine"]],
+ "paclet:FeynCalc/ref/FCLoopPropagatorPowersCombine"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " determines propagators that need to be included in the loop integral to \
-ensure that its propagators form a basis"
+ " combines same propagators into one raised to the corresponding integer \
+power"
}], "GuideText",
- CellID->251142308],
+ CellID->1595269881],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCLoopCanonicalize"]],"paclet:FeynCalc/ref/FCLoopCanonicalize"},
+ TextData["FCLoopPropagatorPowersExpand"]],
+ "paclet:FeynCalc/ref/FCLoopPropagatorPowersExpand"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " auxiliary function that canonicalizes free Lorentz indices of 1-loop \
-integrals"
+ " rewrites propagators raised to ineger powers as a products of \
+propagators."
}], "GuideText",
- CellID->1336937891],
+ CellID->253977384],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCLoopExtract"]],"paclet:FeynCalc/ref/FCLoopExtract"},
+ TextData["FCLoopSamePropagatorHeadsQ"]],
+ "paclet:FeynCalc/ref/FCLoopSamePropagatorHeadsQ"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " extracts loop integrals"
+ " checks if the integral contains different types of propagators."
}], "GuideText",
- CellID->1906541245],
+ CellID->1024109807],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["FCLoopIsolate"]],"paclet:FeynCalc/ref/FCLoopIsolate"},
+ TextData["FCLoopRemoveNegativePropagatorPowers"]],
+ "paclet:FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " wraps loop integrals into specified heads"
+ " rewrites propagators rasied to negative integer powers as numerators."
}], "GuideText",
- CellID->757005022],
+ CellID->2097424491],
Cell[TextData[{
Cell[BoxData[
@@ -3031,6 +4723,25 @@ Cell[TextData[{
}], "GuideText",
CellID->127777310],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FeynAmpDenominatorExplicit"]],
+ "paclet:FeynCalc/ref/FeynAmpDenominatorExplicit"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " in terms of scalar products and masses"
+}], "GuideText",
+ CellID->2037908586],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -3095,14 +4806,14 @@ Cell[TextData[{
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" rewrites ",
- Cell[BoxData[{
- TemplateBox[{Cell[
- TextData["Gamma"]],"paclet:ref/Gamma"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"], "\n",
- RowBox[{"[",
- RowBox[{"n", " ", "+", " ", "m"}], "]"}]}], "InlineFunctionSans"],
- " where n is an integer"
+ Cell[TextData[Cell[BoxData[
+ FormBox[
+ RowBox[{"Gamma", "[",
+ RowBox[{"n", "+", "m"}], "]"}], TraditionalForm]], "InlineFormula"]],
+ "InlineFunctionSans"],
+ " where ",
+ Cell["n", "InlineFunctionSans"],
+ " is an integer"
}], "GuideText",
CellID->1684971587],
@@ -3216,52 +4927,6 @@ Cell[TextData[{
}], "GuideText",
CellID->305598727],
-Cell[TextData[{
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["IFPDOff"]],"paclet:FeynCalc/ref/IFPDOff"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " changes from ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["IFPD"]],"paclet:FeynCalc/ref/IFPD"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " representation to ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
-}], "GuideText",
- CellID->554636843],
-
-Cell[TextData[{
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["IFPDOn"]],"paclet:FeynCalc/ref/IFPDOn"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " changes from ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " representation to ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["IFPD"]],"paclet:FeynCalc/ref/IFPD"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
-}], "GuideText",
- CellID->1378134869],
-
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -3281,14 +4946,14 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["OneLoop"]],"paclet:FeynCalc/ref/OneLoop"},
+ TextData["NPointTo4Point"]],"paclet:FeynCalc/ref/NPointTo4Point"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " calculates 1-loop Feynman diagram amplitudes"
+ " rewrites IR-finite 1-loop pentagons in terms of box integrals"
}], "GuideText",
- CellID->965355169],
+ CellID->842283836],
Cell[TextData[{
Cell[BoxData[
@@ -3322,7 +4987,7 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["PaveOrder"]],"paclet:FeynCalc/ref/PaveOrder"},
+ TextData["PaVeOrder"]],"paclet:FeynCalc/ref/PaVeOrder"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
@@ -3375,21 +5040,14 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["PropagatorDenominatorExplicit"]],
- "paclet:FeynCalc/ref/PropagatorDenominatorExplicit"},
+ TextData["PaVeUVPart"]],"paclet:FeynCalc/ref/PaVeUVPart"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " rewrites ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " in terms of scalar products and masses"
+ " returns the UV-divergent pieces of arbitrary Passarino-Veltman functions."
}], "GuideText",
- CellID->2037908586],
+ CellID->2127045206],
Cell[TextData[{
Cell[BoxData[
@@ -3403,19 +5061,6 @@ Cell[TextData[{
}], "GuideText",
CellID->334277431],
-Cell[TextData[{
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["ScalarProductCancel"]],
- "paclet:FeynCalc/ref/ScalarProductCancel"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " cancels scalar products with propagators"
-}], "GuideText",
- CellID->839585187],
-
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -3454,6 +5099,12 @@ Cell[TextData[{
CellID->1554094936],
Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["CTdec"]],"paclet:FeynCalc/ref/CTdec"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
Cell[BoxData[
TemplateBox[{Cell[
TextData["Tdec"]],"paclet:FeynCalc/ref/Tdec"},
@@ -3558,34 +5209,110 @@ Cell[TextData[{
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " converts scalar 1-loop integrals to Passarino Veltman scalar functions "
+ " converts scalar 1-loop integrals to Passarino-Veltman scalar functions "
}], "GuideText",
CellID->242380689],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["TrickIntegrate"]],"paclet:FeynCalc/ref/TrickIntegrate"},
+ TextData["ToPaVe2"]],"paclet:FeynCalc/ref/ToPaVe2"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " integration of some special distributions"
+ " rewrites Passarino-Veltman functions ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["A0"]],"paclet:FeynCalc/ref/A0"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["A00"]],"paclet:FeynCalc/ref/A00"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["B0"]],"paclet:FeynCalc/ref/B0"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["B1"]],"paclet:FeynCalc/ref/B1"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["B00"]],"paclet:FeynCalc/ref/B00"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["B11"]],"paclet:FeynCalc/ref/B11"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["C0"]],"paclet:FeynCalc/ref/C0"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " and ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["D0"]],"paclet:FeynCalc/ref/D0"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " as ",
+ ButtonBox["PaVe",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PaVe"],
+ " objects."
+}], "GuideText",
+ CellID->94253587],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ToSFAD"]],"paclet:FeynCalc/ref/ToSFAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " converts ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FAD"]],"paclet:FeynCalc/ref/FAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ "'s to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SFAD"]],"paclet:FeynCalc/ref/SFAD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ "'s "
}], "GuideText",
- CellID->485753619],
+ CellID->43212878],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["UVPart"]],"paclet:FeynCalc/ref/UVPart"},
+ TextData["TrickIntegrate"]],"paclet:FeynCalc/ref/TrickIntegrate"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " discards UV-finite integrals"
+ " integration of some special distributions"
}], "GuideText",
- CellID->91877457]
-}, Closed]],
+ CellID->485753619]
+}, Open ]],
Cell[CellGroupData[{
@@ -3643,67 +5370,53 @@ Cell[TextData[{
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["Write2"]],"paclet:FeynCalc/ref/Write2"},
+ TextData["SMPToSymbol"]],"paclet:FeynCalc/ref/SMPToSymbol"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " writes the given settings in sequence followed by a newline to the \
-specified output file"
-}], "GuideText",
- CellID->390527761]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Feynman rules and amplitudes", "GuideFunctionsSubsection",
- CellID->1448855878],
-
-Cell[TextData[{
+ " converts ",
Cell[BoxData[
TemplateBox[{Cell[
- TextData["BackgroundGluonVertex"]],
- "paclet:FeynCalc/ref/BackgroundGluonVertex"},
+ TextData["SMP"]],"paclet:FeynCalc/ref/SMP"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " ",
- "3-gluon vertex in the background field gauge"
+ "'s to symbols"
}], "GuideText",
- CellID->594655451],
+ CellID->849708221],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ChargeConjugationMatrix"]],
- "paclet:FeynCalc/ref/ChargeConjugationMatrix"},
+ TextData["Write2"]],"paclet:FeynCalc/ref/Write2"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " charge conjugation matrix"
+ " writes the given settings in sequence followed by a newline to the \
+specified output file"
}], "GuideText",
- CellID->231184642],
+ CellID->390527761]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Feynman rules and amplitudes", "GuideFunctionsSubsection",
+ CellID->1448855878],
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
- TextData["ChargeConjugationMatrixInv"]],
- "paclet:FeynCalc/ref/ChargeConjugationMatrixInv"},
+ TextData["BackgroundGluonVertex"]],
+ "paclet:FeynCalc/ref/BackgroundGluonVertex"},
"RefLink",
BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " inverse of ",
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["ChargeConjugationMatrix"]],
- "paclet:FeynCalc/ref/ChargeConjugationMatrix"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+ " ",
+ "3-gluon vertex in the background field gauge"
}], "GuideText",
- CellID->2057902261],
+ CellID->594655451],
Cell[TextData[{
Cell[BoxData[
@@ -3968,19 +5681,6 @@ Cell[TextData[{
}], "GuideText",
CellID->202849658],
-Cell[TextData[{
- Cell[BoxData[
- TemplateBox[{Cell[
- TextData["QCDFeynmanRuleConvention"]],
- "paclet:FeynCalc/ref/QCDFeynmanRuleConvention"},
- "RefLink",
- BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " sign convention for QCD Feynman rules"
-}], "GuideText",
- CellID->1044703852],
-
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -4018,6 +5718,22 @@ Cell[TextData[{
}], "GuideText",
CellID->1449625308],
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["SquareAmplitude"]],"paclet:FeynCalc/ref/SquareAmplitude"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " writes ",
+ Cell[BoxData[
+ RowBox[{"|", " ", "\[ScriptCapitalM]", " ",
+ SuperscriptBox["|", "2"]}]], "InlineFormula"],
+ " as a list of amplitude products"
+}], "GuideText",
+ CellID->390518825],
+
Cell[TextData[{
Cell[BoxData[
TemplateBox[{Cell[
@@ -4040,8 +5756,22 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" some SM vertices"
}], "GuideText",
- CellID->1716995820]
-}, Closed]],
+ CellID->1716995820],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ToStandardMatrixElement"]],
+ "paclet:FeynCalc/ref/ToStandardMatrixElement"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Dirac structures, color structures and polarization vectors with a \
+special head"
+}], "GuideText",
+ CellID->847406609]
+}, Open ]],
Cell[CellGroupData[{
@@ -4267,7 +5997,194 @@ Cell[TextData[{
" database of splitting functiosn"
}], "GuideText",
CellID->2052229439]
-}, Closed]],
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Deprecated or legacy functions", "GuideFunctionsSubsection",
+ CellID->1393825317],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["AlphaStrong"]],"paclet:FeynCalc/ref/AlphaStrong"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " ",
+ Cell[BoxData[
+ SubscriptBox["\[Alpha]", "s"]], "InlineFormula"],
+ " in QCD"
+}], "GuideText",
+ CellID->1235023741],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["AlphaFS"]],"paclet:FeynCalc/ref/AlphaFS"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " fine-strucutre constant"
+}], "GuideText",
+ CellID->1076523595],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ChiralityProjector"]],"paclet:FeynCalc/ref/ChiralityProjector"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes ",
+ Cell[BoxData[
+ SubscriptBox["P", "L"]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ SubscriptBox["P", "R"]], "InlineFormula"]
+}], "GuideText",
+ CellID->745071340],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracMatrix"]],"paclet:FeynCalc/ref/DiracMatrix"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ ", ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["DiracSlash"]],"paclet:FeynCalc/ref/DiracSlash"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Dirac matrices and slashes"
+}], "GuideText",
+ CellID->878821469],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FourVector"]],"paclet:FeynCalc/ref/FourVector"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of 4-vectors"
+}], "GuideText",
+ CellID->2116157651],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["Gstrong"]],"paclet:FeynCalc/ref/Gstrong"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " QCD coupling constant"
+}], "GuideText",
+ CellID->1005983702],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["IFPDOff"]],"paclet:FeynCalc/ref/IFPDOff"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " changes from ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["IFPD"]],"paclet:FeynCalc/ref/IFPD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " representation to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->554636843],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["IFPDOn"]],"paclet:FeynCalc/ref/IFPDOn"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " changes from ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FeynAmpDenominator"]],"paclet:FeynCalc/ref/FeynAmpDenominator"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " representation to ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["IFPD"]],"paclet:FeynCalc/ref/IFPD"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1378134869],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["LeviCivita"]],"paclet:FeynCalc/ref/LeviCivita"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] ", "GuideEmDash"],
+ "totally antisymmetric epsilon (Levi-Civita) tensor"
+}], "GuideText",
+ CellID->2081581299],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["MetricTensor"]],"paclet:FeynCalc/ref/MetricTensor"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of the metric tensor"
+}], "GuideText",
+ CellID->458785969],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["OneLoop"]],"paclet:FeynCalc/ref/OneLoop"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates 1-loop Feynman diagram amplitudes"
+}], "GuideText",
+ CellID->965355169],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["ScalarProductCancel"]],
+ "paclet:FeynCalc/ref/ScalarProductCancel"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " cancels scalar products with propagators"
+}], "GuideText",
+ CellID->839585187]
+}, Open ]],
Cell[" ", "FooterCell"]
},
@@ -4283,10 +6200,9 @@ TaggingRules->{
ButtonBox[
"Wolfram Language", ButtonData -> "paclet:guide/WolframRoot",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "ExampleCounter" -> 1, "ExamplePageLinks" -> {}, "NeedPlatMsgIn" ->
- None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 15, 56.660198}",
+ Left], "ExampleCounter" -> 1, "NeedPlatMsgIn" -> None, "RootCaptions" ->
+ "", "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 52, 23.081141}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -4294,10 +6210,11 @@ TaggingRules->{
"None", "summary" ->
"FeynCalc is a Mathematica package for algebraic calculations in Quantum \
Field Theory and semi-automatic evaluation of Feynman Diagrams",
- "synonyms" -> {}, "title" -> "FeynCalc", "titlemodifier" -> "",
- "windowtitle" -> "FeynCalc", "type" -> "Guide", "uri" ->
- "FeynCalc/guide/FeynCalc"}},
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ "synonyms" -> {}, "tabletags" ->
+ DocumentationBuild`Make`Private`tabletaggingrules$15730, "title" ->
+ "FeynCalc", "titlemodifier" -> "", "windowtitle" -> "FeynCalc", "type" ->
+ "Guide", "uri" -> "FeynCalc/guide/FeynCalc"}},
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "Reference.nb",
CharacterEncoding -> "UTF-8"]
]
@@ -4312,503 +6229,699 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 30583, 595, 70, "AnchorBarGrid",
+Cell[580, 21, 49243, 923, 70, "AnchorBarGrid",
CellID->1],
Cell[CellGroupData[{
-Cell[31188, 620, 50, 1, 70, "GuideTitle",
+Cell[49848, 948, 50, 1, 70, "GuideTitle",
CellID->942062912],
-Cell[31241, 623, 240, 7, 70, "GuideAbstract",
+Cell[49901, 951, 240, 7, 70, "GuideAbstract",
CellID->2001916300]
}, Open ]],
Cell[CellGroupData[{
-Cell[31518, 635, 274, 11, 70, "GuideLearningResourcesSection"],
-Cell[31795, 648, 2481, 52, 70, "GuideLearningResourcesGrid"]
-}, Closed]],
-Cell[34291, 703, 257, 11, 70, "GuideReferenceSection"],
-Cell[34551, 716, 31, 0, 70, "SectionHeaderSpacer"],
-Cell[CellGroupData[{
-Cell[34607, 720, 70, 1, 70, "GuideFunctionsSubsection",
+Cell[50178, 963, 70, 1, 70, "GuideFunctionsSubsection",
CellID->1344981135],
-Cell[34680, 723, 482, 16, 70, "GuideText",
+Cell[50251, 966, 482, 16, 70, "GuideText",
CellID->552658513],
-Cell[35165, 741, 361, 13, 70, "GuideText",
- CellID->1235023741],
-Cell[35529, 756, 297, 10, 70, "GuideText",
- CellID->1076523595],
-Cell[35829, 768, 494, 16, 70, "GuideText",
+Cell[50736, 984, 1273, 41, 70, "GuideText",
CellID->917048888],
-Cell[36326, 786, 466, 16, 70, "GuideText",
+Cell[52012, 1027, 466, 16, 70, "GuideText",
CellID->1033282217],
-Cell[36795, 804, 432, 15, 70, "GuideText",
- CellID->745071340],
-Cell[37230, 821, 739, 23, 70, "GuideText",
+Cell[52481, 1045, 1213, 41, 70, "GuideText",
+ CellID->747406905],
+Cell[53697, 1088, 1220, 41, 70, "GuideText",
+ CellID->1899175563],
+Cell[54920, 1131, 642, 22, 70, "GuideText",
+ CellID->2127308002],
+Cell[55565, 1155, 627, 22, 70, "GuideText",
+ CellID->1787264376],
+Cell[56195, 1179, 303, 10, 70, "GuideText",
+ CellID->1483374883],
+Cell[56501, 1191, 330, 10, 70, "GuideText",
+ CellID->1693164442],
+Cell[56834, 1203, 407, 11, 70, "GuideText",
+ CellID->40531547],
+Cell[57244, 1216, 739, 23, 70, "GuideText",
CellID->1851196232],
-Cell[37972, 846, 1863, 64, 70, "GuideText",
+Cell[57986, 1241, 1497, 52, 70, "GuideText",
CellID->1686448459],
-Cell[39838, 912, 307, 10, 70, "GuideText",
- CellID->264840152],
-Cell[40148, 924, 474, 16, 70, "GuideText",
+Cell[59486, 1295, 500, 16, 70, "GuideText",
+ CellID->1098539957],
+Cell[59989, 1313, 479, 16, 70, "GuideText",
CellID->1624859494],
-Cell[40625, 942, 1186, 40, 70, "GuideText",
- CellID->307637975],
-Cell[41814, 984, 832, 28, 70, "GuideText",
+Cell[60471, 1331, 988, 34, 70, "GuideText",
CellID->1680708588],
-Cell[42649, 1014, 316, 10, 70, "GuideText",
+Cell[61462, 1367, 676, 22, 70, "GuideText",
CellID->1891570253],
-Cell[42968, 1026, 504, 17, 70, "GuideText",
+Cell[62141, 1391, 504, 17, 70, "GuideText",
CellID->1483552361],
-Cell[43475, 1045, 488, 16, 70, "GuideText",
+Cell[62648, 1410, 489, 16, 70, "GuideText",
+ CellID->1133806213],
+Cell[63140, 1428, 488, 16, 70, "GuideText",
CellID->476236246],
-Cell[43966, 1063, 497, 16, 70, "GuideText",
+Cell[63631, 1446, 497, 16, 70, "GuideText",
CellID->2139347147],
-Cell[44466, 1081, 498, 16, 70, "GuideText",
+Cell[64131, 1464, 1008, 34, 70, "GuideText",
CellID->1131303773],
-Cell[44967, 1099, 1088, 34, 70, "GuideText",
+Cell[65142, 1500, 496, 16, 70, "GuideText",
+ CellID->1183747723],
+Cell[65641, 1518, 1088, 34, 70, "GuideText",
CellID->1476055339],
-Cell[46058, 1135, 808, 28, 70, "GuideText",
+Cell[66732, 1554, 328, 10, 70, "GuideText",
+ CellID->351247141],
+Cell[67063, 1566, 626, 22, 70, "GuideText",
CellID->495428205],
-Cell[46869, 1165, 301, 10, 70, "GuideText",
+Cell[67692, 1590, 301, 10, 70, "GuideText",
CellID->1403563110],
-Cell[47173, 1177, 295, 10, 70, "GuideText",
+Cell[67996, 1602, 295, 10, 70, "GuideText",
CellID->1275284258],
-Cell[47471, 1189, 301, 10, 70, "GuideText",
+Cell[68294, 1614, 301, 10, 70, "GuideText",
CellID->1257907745],
-Cell[47775, 1201, 295, 10, 70, "GuideText",
- CellID->1005983702],
-Cell[48073, 1213, 279, 10, 70, "GuideText",
- CellID->832103768],
-Cell[48355, 1225, 280, 10, 70, "GuideText",
- CellID->431072089],
-Cell[48638, 1237, 309, 10, 70, "GuideText",
+Cell[68598, 1626, 646, 22, 70, "GuideText",
+ CellID->279506458],
+Cell[69247, 1650, 636, 22, 70, "GuideText",
+ CellID->1843949061],
+Cell[69886, 1674, 311, 10, 70, "GuideText",
CellID->316776695],
-Cell[48950, 1249, 820, 28, 70, "GuideText",
+Cell[70200, 1686, 634, 22, 70, "GuideText",
CellID->651468345],
-Cell[49773, 1279, 293, 10, 70, "GuideText",
+Cell[70837, 1710, 293, 10, 70, "GuideText",
CellID->1386416972],
-Cell[50069, 1291, 375, 11, 70, "GuideText",
+Cell[71133, 1722, 375, 11, 70, "GuideText",
CellID->1889374617],
-Cell[50447, 1304, 324, 10, 70, "GuideText",
+Cell[71511, 1735, 321, 10, 70, "GuideText",
+ CellID->1326672219],
+Cell[71835, 1747, 483, 16, 70, "GuideText",
+ CellID->339455499],
+Cell[72321, 1765, 324, 10, 70, "GuideText",
CellID->1384558840],
-Cell[50774, 1316, 315, 10, 70, "GuideText",
+Cell[72648, 1777, 315, 10, 70, "GuideText",
CellID->2003827822],
-Cell[51092, 1328, 313, 10, 70, "GuideText",
+Cell[72966, 1789, 313, 10, 70, "GuideText",
CellID->827330458],
-Cell[51408, 1340, 523, 17, 70, "GuideText",
+Cell[73282, 1801, 1198, 38, 70, "GuideText",
CellID->1486910634],
-Cell[51934, 1359, 315, 10, 70, "GuideText",
+Cell[74483, 1841, 315, 10, 70, "GuideText",
CellID->1015009742],
-Cell[52252, 1371, 314, 10, 70, "GuideText",
+Cell[74801, 1853, 314, 10, 70, "GuideText",
CellID->146220986],
-Cell[52569, 1383, 482, 16, 70, "GuideText",
+Cell[75118, 1865, 482, 16, 70, "GuideText",
CellID->522984542],
-Cell[53054, 1401, 491, 16, 70, "GuideText",
+Cell[75603, 1883, 491, 16, 70, "GuideText",
CellID->1059337536],
-Cell[53548, 1419, 500, 16, 70, "GuideText",
+Cell[76097, 1901, 1215, 41, 70, "GuideText",
+ CellID->1616434352],
+Cell[77315, 1944, 500, 16, 70, "GuideText",
CellID->137238398],
-Cell[54051, 1437, 343, 10, 70, "GuideText",
+Cell[77818, 1962, 343, 10, 70, "GuideText",
CellID->590785021],
-Cell[54397, 1449, 635, 22, 70, "GuideText",
+Cell[78164, 1974, 1732, 58, 70, "GuideText",
+ CellID->307637975],
+Cell[79899, 2034, 635, 22, 70, "GuideText",
CellID->305275299],
-Cell[55035, 1473, 381, 13, 70, "GuideText",
+Cell[80537, 2058, 381, 13, 70, "GuideText",
CellID->1136659773],
-Cell[55419, 1488, 384, 13, 70, "GuideText",
+Cell[80921, 2073, 384, 13, 70, "GuideText",
CellID->920034572],
-Cell[55806, 1503, 353, 12, 70, "GuideText",
+Cell[81308, 2088, 353, 12, 70, "GuideText",
CellID->1328328343],
-Cell[56162, 1517, 610, 20, 70, "GuideText",
+Cell[81664, 2102, 610, 20, 70, "GuideText",
CellID->1428923217],
-Cell[56775, 1539, 383, 14, 70, "GuideText",
+Cell[82277, 2124, 377, 12, 70, "GuideText",
+ CellID->1810653371],
+Cell[82657, 2138, 390, 12, 70, "GuideText",
+ CellID->564637115],
+Cell[83050, 2152, 350, 10, 70, "GuideText",
+ CellID->579398612],
+Cell[83403, 2164, 382, 11, 70, "GuideText",
+ CellID->461177124],
+Cell[83788, 2177, 383, 14, 70, "GuideText",
CellID->1763987334],
-Cell[57161, 1555, 344, 12, 70, "GuideText",
- CellID->1924638314]
-}, Closed]],
+Cell[84174, 2193, 1001, 34, 70, "GuideText",
+ CellID->495570479]
+}, Open ]],
Cell[CellGroupData[{
-Cell[57542, 1572, 71, 1, 70, "GuideFunctionsSubsection",
+Cell[85212, 2232, 71, 1, 70, "GuideFunctionsSubsection",
CellID->218620916],
-Cell[57616, 1575, 437, 14, 70, "GuideText",
+Cell[85286, 2235, 437, 14, 70, "GuideText",
CellID->1010301503],
-Cell[58056, 1591, 445, 14, 70, "GuideText",
+Cell[85726, 2251, 445, 14, 70, "GuideText",
CellID->1271388718],
-Cell[58504, 1607, 457, 14, 70, "GuideText",
+Cell[86174, 2267, 457, 14, 70, "GuideText",
CellID->1736502128],
-Cell[58964, 1623, 630, 21, 70, "GuideText",
+Cell[86634, 2283, 630, 21, 70, "GuideText",
CellID->1287756566],
-Cell[59597, 1646, 294, 10, 70, "GuideText",
+Cell[87267, 2306, 294, 10, 70, "GuideText",
CellID->1747124358],
-Cell[59894, 1658, 441, 14, 70, "GuideText",
+Cell[87564, 2318, 441, 14, 70, "GuideText",
CellID->1504394922],
-Cell[60338, 1674, 324, 10, 70, "GuideText",
+Cell[88008, 2334, 453, 14, 70, "GuideText",
+ CellID->1363219802],
+Cell[88464, 2350, 324, 10, 70, "GuideText",
CellID->1596546686],
-Cell[60665, 1686, 623, 21, 70, "GuideText",
+Cell[88791, 2362, 623, 21, 70, "GuideText",
CellID->187460383],
-Cell[61291, 1709, 336, 9, 70, "GuideText",
+Cell[89417, 2385, 301, 9, 70, "GuideText",
+ CellID->250574594],
+Cell[89721, 2396, 336, 9, 70, "GuideText",
CellID->333715746],
-Cell[61630, 1720, 521, 16, 70, "GuideText",
+Cell[90060, 2407, 475, 14, 70, "GuideText",
+ CellID->1948712237],
+Cell[90538, 2423, 305, 9, 70, "GuideText",
+ CellID->457240651],
+Cell[90846, 2434, 337, 9, 70, "GuideText",
+ CellID->1944469376],
+Cell[91186, 2445, 308, 9, 70, "GuideText",
+ CellID->999406468],
+Cell[91497, 2456, 328, 9, 70, "GuideText",
+ CellID->1139098210],
+Cell[91828, 2467, 497, 15, 70, "GuideText",
+ CellID->959045627],
+Cell[92328, 2484, 521, 16, 70, "GuideText",
CellID->27396530],
-Cell[62154, 1738, 503, 16, 70, "GuideText",
+Cell[92852, 2502, 503, 16, 70, "GuideText",
CellID->1283386980],
-Cell[62660, 1756, 523, 16, 70, "GuideText",
+Cell[93358, 2520, 523, 16, 70, "GuideText",
CellID->2100021916],
-Cell[63186, 1774, 998, 33, 70, "GuideText",
+Cell[93884, 2538, 336, 9, 70, "GuideText",
+ CellID->1710347762],
+Cell[94223, 2549, 327, 9, 70, "GuideText",
+ CellID->912750390],
+Cell[94553, 2560, 304, 9, 70, "GuideText",
+ CellID->639244384],
+Cell[94860, 2571, 459, 14, 70, "GuideText",
+ CellID->1734464827],
+Cell[95322, 2587, 479, 14, 70, "GuideText",
+ CellID->1126439252],
+Cell[95804, 2603, 1189, 39, 70, "GuideText",
CellID->898863791],
-Cell[64187, 1809, 325, 9, 70, "GuideText",
+Cell[96996, 2644, 447, 14, 70, "GuideText",
+ CellID->1409575124],
+Cell[97446, 2660, 325, 9, 70, "GuideText",
CellID->1647672763],
-Cell[64515, 1820, 442, 15, 70, "GuideText",
+Cell[97774, 2671, 442, 15, 70, "GuideText",
CellID->683465492],
-Cell[64960, 1837, 449, 15, 70, "GuideText",
+Cell[98219, 2688, 449, 15, 70, "GuideText",
CellID->1650215271],
-Cell[65412, 1854, 311, 10, 70, "GuideText",
+Cell[98671, 2705, 311, 10, 70, "GuideText",
CellID->1498216592],
-Cell[65726, 1866, 434, 15, 70, "GuideText",
+Cell[98985, 2717, 434, 15, 70, "GuideText",
CellID->253353205],
-Cell[66163, 1883, 319, 10, 70, "GuideText",
+Cell[99422, 2734, 319, 10, 70, "GuideText",
CellID->1212078011],
-Cell[66485, 1895, 444, 15, 70, "GuideText",
+Cell[99744, 2746, 444, 15, 70, "GuideText",
CellID->178528196],
-Cell[66932, 1912, 320, 10, 70, "GuideText",
+Cell[100191, 2763, 320, 10, 70, "GuideText",
CellID->1298957094],
-Cell[67255, 1924, 455, 15, 70, "GuideText",
+Cell[100514, 2775, 455, 15, 70, "GuideText",
CellID->1374272511],
-Cell[67713, 1941, 443, 15, 70, "GuideText",
+Cell[100972, 2792, 443, 15, 70, "GuideText",
CellID->1627933292],
-Cell[68159, 1958, 514, 16, 70, "GuideText",
+Cell[101418, 2809, 514, 16, 70, "GuideText",
CellID->1708462303],
-Cell[68676, 1976, 624, 21, 70, "GuideText",
+Cell[101935, 2827, 624, 21, 70, "GuideText",
CellID->1659205566],
-Cell[69303, 1999, 619, 21, 70, "GuideText",
+Cell[102562, 2850, 619, 21, 70, "GuideText",
CellID->1809157918],
-Cell[69925, 2022, 627, 22, 70, "GuideText",
+Cell[103184, 2873, 627, 22, 70, "GuideText",
CellID->869117662]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
-Cell[70589, 2049, 71, 1, 70, "GuideFunctionsSubsection",
+Cell[103848, 2900, 85, 1, 70, "GuideFunctionsSubsection",
CellID->385817707],
-Cell[70663, 2052, 334, 10, 70, "GuideText",
+Cell[103936, 2903, 334, 10, 70, "GuideText",
CellID->2009629793],
-Cell[71000, 2064, 337, 10, 70, "GuideText",
+Cell[104273, 2915, 357, 10, 70, "GuideText",
+ CellID->912975989],
+Cell[104633, 2927, 350, 10, 70, "GuideText",
CellID->512359346],
-Cell[71340, 2076, 355, 10, 70, "GuideText",
+Cell[104986, 2939, 388, 11, 70, "GuideText",
CellID->1524292158],
-Cell[71698, 2088, 330, 10, 70, "GuideText",
+Cell[105377, 2952, 343, 10, 70, "GuideText",
CellID->231212511],
-Cell[72031, 2100, 349, 10, 70, "GuideText",
+Cell[105723, 2964, 327, 10, 70, "GuideText",
+ CellID->462667998],
+Cell[106053, 2976, 337, 10, 70, "GuideText",
+ CellID->1666870466],
+Cell[106393, 2988, 350, 10, 70, "GuideText",
CellID->1913592904],
-Cell[72383, 2112, 344, 11, 70, "GuideText",
+Cell[106746, 3000, 356, 10, 70, "GuideText",
+ CellID->1678264313],
+Cell[107105, 3012, 349, 10, 70, "GuideText",
+ CellID->1041255969],
+Cell[107457, 3024, 344, 11, 70, "GuideText",
CellID->693139341],
-Cell[72730, 2125, 371, 11, 70, "GuideText",
+Cell[107804, 3037, 343, 11, 70, "GuideText",
+ CellID->530074450],
+Cell[108150, 3050, 362, 11, 70, "GuideText",
CellID->343872275],
-Cell[73104, 2138, 343, 11, 70, "GuideText",
+Cell[108515, 3063, 352, 10, 70, "GuideText",
+ CellID->1454317304],
+Cell[108870, 3075, 349, 11, 70, "GuideText",
+ CellID->458315879],
+Cell[109222, 3088, 325, 11, 70, "GuideText",
CellID->548161550],
-Cell[73450, 2151, 343, 10, 70, "GuideText",
+Cell[109550, 3101, 325, 10, 70, "GuideText",
+ CellID->956858169],
+Cell[109878, 3113, 360, 10, 70, "GuideText",
+ CellID->1163869201],
+Cell[110241, 3125, 387, 12, 70, "GuideText",
+ CellID->1554099869],
+Cell[110631, 3139, 343, 10, 70, "GuideText",
CellID->987343741],
-Cell[73796, 2163, 310, 10, 70, "GuideText",
+Cell[110977, 3151, 310, 10, 70, "GuideText",
CellID->1285601191],
-Cell[74109, 2175, 896, 28, 70, "GuideText",
+Cell[111290, 3163, 333, 10, 70, "GuideText",
+ CellID->894822474],
+Cell[111626, 3175, 350, 10, 70, "GuideText",
+ CellID->2030923756],
+Cell[111979, 3187, 696, 21, 70, "GuideText",
CellID->1809925827],
-Cell[75008, 2205, 401, 14, 70, "GuideText",
+Cell[112678, 3210, 401, 14, 70, "GuideText",
CellID->344422616],
-Cell[75412, 2221, 707, 22, 70, "GuideText",
+Cell[113082, 3226, 707, 22, 70, "GuideText",
CellID->2009219923],
-Cell[76122, 2245, 321, 10, 70, "GuideText",
+Cell[113792, 3250, 321, 10, 70, "GuideText",
CellID->874103215],
-Cell[76446, 2257, 317, 10, 70, "GuideText",
+Cell[114116, 3262, 315, 10, 70, "GuideText",
+ CellID->218430270],
+Cell[114434, 3274, 317, 10, 70, "GuideText",
CellID->579030092],
-Cell[76766, 2269, 325, 10, 70, "GuideText",
+Cell[114754, 3286, 325, 10, 70, "GuideText",
CellID->1156270314],
-Cell[77094, 2281, 361, 10, 70, "GuideText",
+Cell[115082, 3298, 346, 10, 70, "GuideText",
+ CellID->1174118505],
+Cell[115431, 3310, 361, 10, 70, "GuideText",
CellID->629389521],
-Cell[77458, 2293, 336, 10, 70, "GuideText",
- CellID->715481727]
-}, Closed]],
+Cell[115795, 3322, 336, 10, 70, "GuideText",
+ CellID->715481727],
+Cell[116134, 3334, 333, 10, 70, "GuideText",
+ CellID->397784278]
+}, Open ]],
Cell[CellGroupData[{
-Cell[77831, 2308, 68, 1, 70, "GuideFunctionsSubsection",
+Cell[116504, 3349, 68, 1, 70, "GuideFunctionsSubsection",
CellID->46643246],
-Cell[77902, 2311, 398, 13, 70, "GuideText",
+Cell[116575, 3352, 398, 13, 70, "GuideText",
CellID->2131819227],
-Cell[78303, 2326, 341, 10, 70, "GuideText",
+Cell[116976, 3367, 341, 10, 70, "GuideText",
CellID->1211971239],
-Cell[78647, 2338, 311, 10, 70, "GuideText",
+Cell[117320, 3379, 311, 10, 70, "GuideText",
CellID->333117850],
-Cell[78961, 2350, 501, 15, 70, "GuideText",
+Cell[117634, 3391, 501, 15, 70, "GuideText",
CellID->615769661],
-Cell[79465, 2367, 346, 10, 70, "GuideText",
+Cell[118138, 3408, 346, 10, 70, "GuideText",
CellID->1531032786],
-Cell[79814, 2379, 333, 10, 70, "GuideText",
+Cell[118487, 3420, 336, 10, 70, "GuideText",
CellID->688938496],
-Cell[80150, 2391, 369, 11, 70, "GuideText",
+Cell[118826, 3432, 369, 11, 70, "GuideText",
CellID->1740429042],
-Cell[80522, 2404, 505, 15, 70, "GuideText",
+Cell[119198, 3445, 504, 15, 70, "GuideText",
+ CellID->766933896],
+Cell[119705, 3462, 505, 15, 70, "GuideText",
CellID->297775359],
-Cell[81030, 2421, 361, 11, 70, "GuideText",
+Cell[120213, 3479, 361, 11, 70, "GuideText",
CellID->255459663],
-Cell[81394, 2434, 313, 10, 70, "GuideText",
+Cell[120577, 3492, 504, 17, 70, "GuideText",
+ CellID->1930796468],
+Cell[121084, 3511, 498, 15, 70, "GuideText",
+ CellID->859911226],
+Cell[121585, 3528, 313, 10, 70, "GuideText",
CellID->1463755561],
-Cell[81710, 2446, 377, 11, 70, "GuideText",
+Cell[121901, 3540, 377, 11, 70, "GuideText",
CellID->1334035786],
-Cell[82090, 2459, 368, 11, 70, "GuideText",
+Cell[122281, 3553, 368, 11, 70, "GuideText",
CellID->525715973],
-Cell[82461, 2472, 300, 10, 70, "GuideText",
- CellID->218430270],
-Cell[82764, 2484, 445, 15, 70, "GuideText",
+Cell[122652, 3566, 749, 25, 70, "GuideText",
+ CellID->731234667],
+Cell[123404, 3593, 342, 10, 70, "GuideText",
+ CellID->264220763],
+Cell[123749, 3605, 393, 12, 70, "GuideText",
+ CellID->1841016351],
+Cell[124145, 3619, 1128, 34, 70, "GuideText",
+ CellID->2051310471],
+Cell[125276, 3655, 392, 12, 70, "GuideText",
+ CellID->1516554292],
+Cell[125671, 3669, 342, 10, 70, "GuideText",
+ CellID->599004464],
+Cell[126016, 3681, 434, 13, 70, "GuideText",
+ CellID->249077307],
+Cell[126453, 3696, 336, 11, 70, "GuideText",
+ CellID->666948297],
+Cell[126792, 3709, 327, 10, 70, "GuideText",
+ CellID->544222991],
+Cell[127122, 3721, 574, 20, 70, "GuideText",
+ CellID->829753496],
+Cell[127699, 3743, 495, 15, 70, "GuideText",
+ CellID->803577072],
+Cell[128197, 3760, 445, 15, 70, "GuideText",
CellID->1707494307]
-}, Closed]],
+}, Open ]],
+Cell[CellGroupData[{
+Cell[128679, 3780, 70, 1, 70, "GuideFunctionsSubsection",
+ CellID->1019637263],
+Cell[128752, 3783, 589, 18, 70, "GuideText",
+ CellID->1574223047],
+Cell[129344, 3803, 343, 10, 70, "GuideText",
+ CellID->1157786320],
+Cell[129690, 3815, 337, 10, 70, "GuideText",
+ CellID->1399324995],
+Cell[130030, 3827, 501, 15, 70, "GuideText",
+ CellID->552290354],
+Cell[130534, 3844, 345, 10, 70, "GuideText",
+ CellID->719502163],
+Cell[130882, 3856, 360, 11, 70, "GuideText",
+ CellID->88133699],
+Cell[131245, 3869, 377, 11, 70, "GuideText",
+ CellID->1853386914]
+}, Open ]],
Cell[CellGroupData[{
-Cell[83246, 2504, 91, 1, 70, "GuideFunctionsSubsection",
+Cell[131659, 3885, 91, 1, 70, "GuideFunctionsSubsection",
CellID->1113739100],
-Cell[83340, 2507, 314, 10, 70, "GuideText",
+Cell[131753, 3888, 314, 10, 70, "GuideText",
CellID->1482543113],
-Cell[83657, 2519, 492, 16, 70, "GuideText",
+Cell[132070, 3900, 492, 16, 70, "GuideText",
CellID->1937939922],
-Cell[84152, 2537, 299, 10, 70, "GuideText",
+Cell[132565, 3918, 299, 10, 70, "GuideText",
CellID->526201837],
-Cell[84454, 2549, 699, 21, 70, "GuideText",
+Cell[132867, 3930, 699, 21, 70, "GuideText",
CellID->369276061],
-Cell[85156, 2572, 338, 11, 70, "GuideText",
+Cell[133569, 3953, 337, 11, 70, "GuideText",
CellID->795497081],
-Cell[85497, 2585, 451, 16, 70, "GuideText",
+Cell[133909, 3966, 451, 16, 70, "GuideText",
CellID->284457576],
-Cell[85951, 2603, 329, 11, 70, "GuideText",
+Cell[134363, 3984, 329, 11, 70, "GuideText",
CellID->1861924278],
-Cell[86283, 2616, 523, 16, 70, "GuideText",
+Cell[134695, 3997, 350, 10, 70, "GuideText",
+ CellID->1313775346],
+Cell[135048, 4009, 340, 10, 70, "GuideText",
+ CellID->570329733],
+Cell[135391, 4021, 314, 10, 70, "GuideText",
+ CellID->563873312],
+Cell[135708, 4033, 522, 16, 70, "GuideText",
CellID->1355907511],
-Cell[86809, 2634, 481, 16, 70, "GuideText",
+Cell[136233, 4051, 481, 16, 70, "GuideText",
CellID->1719074274],
-Cell[87293, 2652, 345, 11, 70, "GuideText",
+Cell[136717, 4069, 349, 11, 70, "GuideText",
+ CellID->1938046161],
+Cell[137069, 4082, 336, 11, 70, "GuideText",
+ CellID->899466843],
+Cell[137408, 4095, 344, 11, 70, "GuideText",
CellID->1309406098]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
-Cell[87675, 2668, 69, 1, 70, "GuideFunctionsSubsection",
+Cell[137789, 4111, 69, 1, 70, "GuideFunctionsSubsection",
CellID->121380019],
-Cell[87747, 2671, 316, 10, 70, "GuideText",
+Cell[137861, 4114, 316, 10, 70, "GuideText",
CellID->821249197],
-Cell[88066, 2683, 345, 10, 70, "GuideText",
+Cell[138180, 4126, 345, 10, 70, "GuideText",
CellID->1593535902],
-Cell[88414, 2695, 349, 10, 70, "GuideText",
+Cell[138528, 4138, 350, 10, 70, "GuideText",
CellID->210505242],
-Cell[88766, 2707, 519, 16, 70, "GuideText",
+Cell[138881, 4150, 519, 16, 70, "GuideText",
CellID->1595578132],
-Cell[89288, 2725, 311, 10, 70, "GuideText",
+Cell[139403, 4168, 311, 10, 70, "GuideText",
CellID->1561361899]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
-Cell[89636, 2740, 71, 1, 70, "GuideFunctionsSubsection",
+Cell[139751, 4183, 71, 1, 70, "GuideFunctionsSubsection",
CellID->1137355821],
-Cell[89710, 2743, 307, 10, 70, "GuideText",
+Cell[139825, 4186, 307, 10, 70, "GuideText",
CellID->484191528],
-Cell[90020, 2755, 329, 10, 70, "GuideText",
+Cell[140135, 4198, 329, 10, 70, "GuideText",
CellID->1364110476],
-Cell[90352, 2767, 315, 10, 70, "GuideText",
+Cell[140467, 4210, 315, 10, 70, "GuideText",
CellID->863977560],
-Cell[90670, 2779, 810, 28, 70, "GuideText",
+Cell[140785, 4222, 810, 28, 70, "GuideText",
CellID->512824359],
-Cell[91483, 2809, 311, 10, 70, "GuideText",
+Cell[141598, 4252, 311, 10, 70, "GuideText",
CellID->1115857362],
-Cell[91797, 2821, 306, 10, 70, "GuideText",
+Cell[141912, 4264, 306, 10, 70, "GuideText",
CellID->143835829],
-Cell[92106, 2833, 481, 16, 70, "GuideText",
+Cell[142221, 4276, 481, 16, 70, "GuideText",
CellID->883206687],
-Cell[92590, 2851, 481, 16, 70, "GuideText",
+Cell[142705, 4294, 481, 16, 70, "GuideText",
CellID->439407944],
-Cell[93074, 2869, 496, 16, 70, "GuideText",
+Cell[143189, 4312, 496, 16, 70, "GuideText",
CellID->1595882694],
-Cell[93573, 2887, 301, 10, 70, "GuideText",
+Cell[143688, 4330, 331, 10, 70, "GuideText",
+ CellID->649428922],
+Cell[144022, 4342, 325, 10, 70, "GuideText",
+ CellID->1635464308],
+Cell[144350, 4354, 562, 19, 70, "GuideText",
+ CellID->1893254602],
+Cell[144915, 4375, 561, 19, 70, "GuideText",
+ CellID->157928460],
+Cell[145479, 4396, 301, 10, 70, "GuideText",
CellID->333845561],
-Cell[93877, 2899, 373, 11, 70, "GuideText",
+Cell[145783, 4408, 373, 11, 70, "GuideText",
CellID->1110841143],
-Cell[94253, 2912, 383, 11, 70, "GuideText",
+Cell[146159, 4421, 383, 11, 70, "GuideText",
CellID->714568367],
-Cell[94639, 2925, 428, 12, 70, "GuideText",
+Cell[146545, 4434, 366, 10, 70, "GuideText",
CellID->251142308],
-Cell[95070, 2939, 376, 11, 70, "GuideText",
+Cell[146914, 4446, 342, 10, 70, "GuideText",
+ CellID->316443304],
+Cell[147259, 4458, 408, 12, 70, "GuideText",
+ CellID->298868397],
+Cell[147670, 4472, 414, 12, 70, "GuideText",
+ CellID->1836590028],
+Cell[148087, 4486, 369, 10, 70, "GuideText",
+ CellID->1180959289],
+Cell[148459, 4498, 403, 11, 70, "GuideText",
+ CellID->145221909],
+Cell[148865, 4511, 376, 11, 70, "GuideText",
CellID->1336937891],
-Cell[95449, 2952, 309, 10, 70, "GuideText",
+Cell[149244, 4524, 372, 11, 70, "GuideText",
+ CellID->1371085902],
+Cell[149619, 4537, 309, 10, 70, "GuideText",
CellID->1906541245],
-Cell[95761, 2964, 326, 10, 70, "GuideText",
+Cell[149931, 4549, 371, 11, 70, "GuideText",
+ CellID->1217639042],
+Cell[150305, 4562, 326, 10, 70, "GuideText",
CellID->757005022],
-Cell[96090, 2976, 540, 16, 70, "GuideText",
+Cell[150634, 4574, 366, 11, 70, "GuideText",
+ CellID->659374071],
+Cell[151003, 4587, 425, 12, 70, "GuideText",
+ CellID->246441420],
+Cell[151431, 4601, 406, 11, 70, "GuideText",
+ CellID->1419686490],
+Cell[151840, 4614, 401, 12, 70, "GuideText",
+ CellID->1595269881],
+Cell[152244, 4628, 396, 12, 70, "GuideText",
+ CellID->253977384],
+Cell[152643, 4642, 380, 11, 70, "GuideText",
+ CellID->1024109807],
+Cell[153026, 4655, 406, 11, 70, "GuideText",
+ CellID->2097424491],
+Cell[153435, 4668, 540, 16, 70, "GuideText",
CellID->284159366],
-Cell[96633, 2994, 365, 11, 70, "GuideText",
+Cell[153978, 4686, 365, 11, 70, "GuideText",
CellID->1711785091],
-Cell[97001, 3007, 367, 11, 70, "GuideText",
+Cell[154346, 4699, 367, 11, 70, "GuideText",
CellID->777565246],
-Cell[97371, 3020, 346, 11, 70, "GuideText",
+Cell[154716, 4712, 346, 11, 70, "GuideText",
CellID->127777310],
-Cell[97720, 3033, 406, 12, 70, "GuideText",
+Cell[155065, 4725, 561, 17, 70, "GuideText",
+ CellID->2037908586],
+Cell[155629, 4744, 406, 12, 70, "GuideText",
CellID->164601953],
-Cell[98129, 3047, 476, 15, 70, "GuideText",
+Cell[156038, 4758, 476, 15, 70, "GuideText",
CellID->1822975320],
-Cell[98608, 3064, 355, 10, 70, "GuideText",
+Cell[156517, 4775, 355, 10, 70, "GuideText",
CellID->727371440],
-Cell[98966, 3076, 337, 10, 70, "GuideText",
+Cell[156875, 4787, 337, 10, 70, "GuideText",
CellID->1377966861],
-Cell[99306, 3088, 544, 18, 70, "GuideText",
+Cell[157215, 4799, 522, 18, 70, "GuideText",
CellID->1684971587],
-Cell[99853, 3108, 488, 16, 70, "GuideText",
+Cell[157740, 4819, 488, 16, 70, "GuideText",
CellID->1716225519],
-Cell[100344, 3126, 290, 10, 70, "GuideText",
+Cell[158231, 4837, 290, 10, 70, "GuideText",
CellID->671837658],
-Cell[100637, 3138, 510, 16, 70, "GuideText",
+Cell[158524, 4849, 510, 16, 70, "GuideText",
CellID->1636252055],
-Cell[101150, 3156, 544, 16, 70, "GuideText",
+Cell[159037, 4867, 544, 16, 70, "GuideText",
CellID->1675333030],
-Cell[101697, 3174, 348, 10, 70, "GuideText",
+Cell[159584, 4885, 348, 10, 70, "GuideText",
CellID->373844893],
-Cell[102048, 3186, 388, 12, 70, "GuideText",
+Cell[159935, 4897, 388, 12, 70, "GuideText",
CellID->1693861457],
-Cell[102439, 3200, 507, 16, 70, "GuideText",
+Cell[160326, 4911, 507, 16, 70, "GuideText",
CellID->305598727],
-Cell[102949, 3218, 664, 21, 70, "GuideText",
- CellID->554636843],
-Cell[103616, 3241, 663, 21, 70, "GuideText",
- CellID->1378134869],
-Cell[104282, 3264, 468, 14, 70, "GuideText",
+Cell[160836, 4929, 468, 14, 70, "GuideText",
CellID->136967693],
-Cell[104753, 3280, 318, 10, 70, "GuideText",
- CellID->965355169],
-Cell[105074, 3292, 334, 10, 70, "GuideText",
+Cell[161307, 4945, 348, 10, 70, "GuideText",
+ CellID->842283836],
+Cell[161658, 4957, 334, 10, 70, "GuideText",
CellID->479804421],
-Cell[105411, 3304, 482, 15, 70, "GuideText",
+Cell[161995, 4969, 482, 15, 70, "GuideText",
CellID->932281504],
-Cell[105896, 3321, 483, 16, 70, "GuideText",
+Cell[162480, 4986, 483, 16, 70, "GuideText",
CellID->200996743],
-Cell[106382, 3339, 984, 33, 70, "GuideText",
+Cell[162966, 5004, 984, 33, 70, "GuideText",
CellID->1268052330],
-Cell[107369, 3374, 567, 17, 70, "GuideText",
- CellID->2037908586],
-Cell[107939, 3393, 337, 10, 70, "GuideText",
+Cell[163953, 5039, 353, 10, 70, "GuideText",
+ CellID->2127045206],
+Cell[164309, 5051, 337, 10, 70, "GuideText",
CellID->334277431],
-Cell[108279, 3405, 342, 11, 70, "GuideText",
- CellID->839585187],
-Cell[108624, 3418, 520, 16, 70, "GuideText",
+Cell[164649, 5063, 520, 16, 70, "GuideText",
CellID->1574102580],
-Cell[109147, 3436, 460, 17, 70, "GuideText",
+Cell[165172, 5081, 460, 17, 70, "GuideText",
CellID->1554094936],
-Cell[109610, 3455, 327, 10, 70, "GuideText",
+Cell[165635, 5100, 499, 16, 70, "GuideText",
CellID->1979909722],
-Cell[109940, 3467, 335, 10, 70, "GuideText",
+Cell[166137, 5118, 335, 10, 70, "GuideText",
CellID->613914279],
-Cell[110278, 3479, 314, 11, 70, "GuideText",
+Cell[166475, 5130, 314, 11, 70, "GuideText",
CellID->1765084008],
-Cell[110595, 3492, 316, 10, 70, "GuideText",
+Cell[166792, 5143, 316, 10, 70, "GuideText",
CellID->982645341],
-Cell[110914, 3504, 875, 27, 70, "GuideText",
+Cell[167111, 5155, 875, 27, 70, "GuideText",
CellID->2096516005],
-Cell[111792, 3533, 516, 17, 70, "GuideText",
+Cell[167989, 5184, 516, 17, 70, "GuideText",
CellID->1860467462],
-Cell[112311, 3552, 342, 10, 70, "GuideText",
+Cell[168508, 5203, 342, 10, 70, "GuideText",
CellID->242380689],
-Cell[112656, 3564, 328, 10, 70, "GuideText",
- CellID->485753619],
-Cell[112987, 3576, 298, 10, 70, "GuideText",
- CellID->91877457]
-}, Closed]],
+Cell[168853, 5215, 1746, 62, 70, "GuideText",
+ CellID->94253587],
+Cell[170602, 5279, 622, 22, 70, "GuideText",
+ CellID->43212878],
+Cell[171227, 5303, 328, 10, 70, "GuideText",
+ CellID->485753619]
+}, Open ]],
Cell[CellGroupData[{
-Cell[113322, 3591, 73, 1, 70, "GuideFunctionsSubsection",
+Cell[171592, 5318, 73, 1, 70, "GuideFunctionsSubsection",
CellID->198236928],
-Cell[113398, 3594, 320, 10, 70, "GuideText",
+Cell[171668, 5321, 320, 10, 70, "GuideText",
CellID->1077126346],
-Cell[113721, 3606, 305, 10, 70, "GuideText",
+Cell[171991, 5333, 305, 10, 70, "GuideText",
CellID->1438938037],
-Cell[114029, 3618, 347, 10, 70, "GuideText",
+Cell[172299, 5345, 347, 10, 70, "GuideText",
CellID->1856631784],
-Cell[114379, 3630, 328, 10, 70, "GuideText",
+Cell[172649, 5357, 328, 10, 70, "GuideText",
CellID->440214481],
-Cell[114710, 3642, 361, 11, 70, "GuideText",
+Cell[172980, 5369, 469, 16, 70, "GuideText",
+ CellID->849708221],
+Cell[173452, 5387, 361, 11, 70, "GuideText",
CellID->390527761]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
-Cell[115108, 3658, 85, 1, 70, "GuideFunctionsSubsection",
+Cell[173850, 5403, 85, 1, 70, "GuideFunctionsSubsection",
CellID->1448855878],
-Cell[115196, 3661, 355, 12, 70, "GuideText",
+Cell[173938, 5406, 355, 12, 70, "GuideText",
CellID->594655451],
-Cell[115554, 3675, 335, 11, 70, "GuideText",
- CellID->231184642],
-Cell[115892, 3688, 534, 17, 70, "GuideText",
- CellID->2057902261],
-Cell[116429, 3707, 329, 10, 70, "GuideText",
+Cell[174296, 5420, 329, 10, 70, "GuideText",
CellID->1847839027],
-Cell[116761, 3719, 308, 10, 70, "GuideText",
+Cell[174628, 5432, 308, 10, 70, "GuideText",
CellID->2013380245],
-Cell[117072, 3731, 339, 11, 70, "GuideText",
+Cell[174939, 5444, 339, 11, 70, "GuideText",
CellID->2016043479],
-Cell[117414, 3744, 362, 10, 70, "GuideText",
+Cell[175281, 5457, 362, 10, 70, "GuideText",
CellID->397456419],
-Cell[117779, 3756, 520, 16, 70, "GuideText",
+Cell[175646, 5469, 520, 16, 70, "GuideText",
CellID->747107785],
-Cell[118302, 3774, 707, 21, 70, "GuideText",
+Cell[176169, 5487, 707, 21, 70, "GuideText",
CellID->599890035],
-Cell[119012, 3797, 320, 10, 70, "GuideText",
+Cell[176879, 5510, 320, 10, 70, "GuideText",
CellID->593077025],
-Cell[119335, 3809, 328, 11, 70, "GuideText",
+Cell[177202, 5522, 328, 11, 70, "GuideText",
CellID->1711779075],
-Cell[119666, 3822, 370, 11, 70, "GuideText",
+Cell[177533, 5535, 370, 11, 70, "GuideText",
CellID->1327458149],
-Cell[120039, 3835, 368, 11, 70, "GuideText",
+Cell[177906, 5548, 368, 11, 70, "GuideText",
CellID->2002786353],
-Cell[120410, 3848, 317, 10, 70, "GuideText",
+Cell[178277, 5561, 317, 10, 70, "GuideText",
CellID->1230786365],
-Cell[120730, 3860, 305, 10, 70, "GuideText",
+Cell[178597, 5573, 305, 10, 70, "GuideText",
CellID->837206947],
-Cell[121038, 3872, 379, 12, 70, "GuideText",
+Cell[178905, 5585, 379, 12, 70, "GuideText",
CellID->1427392211],
-Cell[121420, 3886, 301, 10, 70, "GuideText",
+Cell[179287, 5599, 301, 10, 70, "GuideText",
CellID->866592844],
-Cell[121724, 3898, 304, 10, 70, "GuideText",
+Cell[179591, 5611, 304, 10, 70, "GuideText",
CellID->30813872],
-Cell[122031, 3910, 309, 10, 70, "GuideText",
+Cell[179898, 5623, 309, 10, 70, "GuideText",
CellID->660953776],
-Cell[122343, 3922, 305, 10, 70, "GuideText",
+Cell[180210, 5635, 305, 10, 70, "GuideText",
CellID->183769818],
-Cell[122651, 3934, 314, 10, 70, "GuideText",
+Cell[180518, 5647, 314, 10, 70, "GuideText",
CellID->2139004592],
-Cell[122968, 3946, 304, 10, 70, "GuideText",
+Cell[180835, 5659, 304, 10, 70, "GuideText",
CellID->819406206],
-Cell[123275, 3958, 329, 10, 70, "GuideText",
+Cell[181142, 5671, 329, 10, 70, "GuideText",
CellID->202849658],
-Cell[123607, 3970, 350, 11, 70, "GuideText",
- CellID->1044703852],
-Cell[123960, 3983, 310, 10, 70, "GuideText",
+Cell[181474, 5683, 310, 10, 70, "GuideText",
CellID->1894290270],
-Cell[124273, 3995, 306, 10, 70, "GuideText",
+Cell[181787, 5695, 306, 10, 70, "GuideText",
CellID->1081498198],
-Cell[124582, 4007, 325, 11, 70, "GuideText",
+Cell[182096, 5707, 325, 11, 70, "GuideText",
CellID->1449625308],
-Cell[124910, 4020, 311, 10, 70, "GuideText",
+Cell[182424, 5720, 445, 14, 70, "GuideText",
+ CellID->390518825],
+Cell[182872, 5736, 311, 10, 70, "GuideText",
CellID->1907820234],
-Cell[125224, 4032, 292, 10, 70, "GuideText",
- CellID->1716995820]
-}, Closed]],
+Cell[183186, 5748, 292, 10, 70, "GuideText",
+ CellID->1716995820],
+Cell[183481, 5760, 397, 12, 70, "GuideText",
+ CellID->847406609]
+}, Open ]],
Cell[CellGroupData[{
-Cell[125553, 4047, 61, 1, 70, "GuideFunctionsSubsection",
+Cell[183915, 5777, 61, 1, 70, "GuideFunctionsSubsection",
CellID->16428002],
-Cell[125617, 4050, 307, 10, 70, "GuideText",
+Cell[183979, 5780, 307, 10, 70, "GuideText",
CellID->573273780],
-Cell[125927, 4062, 436, 13, 70, "GuideText",
+Cell[184289, 5792, 436, 13, 70, "GuideText",
CellID->58857743],
-Cell[126366, 4077, 322, 10, 70, "GuideText",
+Cell[184728, 5807, 322, 10, 70, "GuideText",
CellID->2085845974],
-Cell[126691, 4089, 491, 16, 70, "GuideText",
+Cell[185053, 5819, 491, 16, 70, "GuideText",
CellID->113893828],
-Cell[127185, 4107, 307, 10, 70, "GuideText",
+Cell[185547, 5837, 307, 10, 70, "GuideText",
CellID->398578851],
-Cell[127495, 4119, 1013, 34, 70, "GuideText",
+Cell[185857, 5849, 1013, 34, 70, "GuideText",
CellID->1016459733],
-Cell[128511, 4155, 837, 28, 70, "GuideText",
+Cell[186873, 5885, 837, 28, 70, "GuideText",
CellID->1266157],
-Cell[129351, 4185, 331, 10, 70, "GuideText",
+Cell[187713, 5915, 331, 10, 70, "GuideText",
CellID->1817035294],
-Cell[129685, 4197, 296, 10, 70, "GuideText",
+Cell[188047, 5927, 296, 10, 70, "GuideText",
CellID->1052156503],
-Cell[129984, 4209, 303, 10, 70, "GuideText",
+Cell[188346, 5939, 303, 10, 70, "GuideText",
CellID->1278270450],
-Cell[130290, 4221, 310, 11, 70, "GuideText",
+Cell[188652, 5951, 310, 11, 70, "GuideText",
CellID->1690213129],
-Cell[130603, 4234, 681, 22, 70, "GuideText",
+Cell[188965, 5964, 681, 22, 70, "GuideText",
CellID->1901226625],
-Cell[131287, 4258, 325, 10, 70, "GuideText",
+Cell[189649, 5988, 325, 10, 70, "GuideText",
CellID->2052229439]
-}, Closed]],
-Cell[131627, 4271, 23, 0, 70, "FooterCell"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[190011, 6003, 87, 1, 70, "GuideFunctionsSubsection",
+ CellID->1393825317],
+Cell[190101, 6006, 361, 13, 70, "GuideText",
+ CellID->1235023741],
+Cell[190465, 6021, 297, 10, 70, "GuideText",
+ CellID->1076523595],
+Cell[190765, 6033, 432, 15, 70, "GuideText",
+ CellID->745071340],
+Cell[191200, 6050, 508, 16, 70, "GuideText",
+ CellID->878821469],
+Cell[191711, 6068, 307, 10, 70, "GuideText",
+ CellID->2116157651],
+Cell[192021, 6080, 295, 10, 70, "GuideText",
+ CellID->1005983702],
+Cell[192319, 6092, 664, 21, 70, "GuideText",
+ CellID->554636843],
+Cell[192986, 6115, 663, 21, 70, "GuideText",
+ CellID->1378134869],
+Cell[193652, 6138, 330, 10, 70, "GuideText",
+ CellID->2081581299],
+Cell[193985, 6150, 318, 10, 70, "GuideText",
+ CellID->458785969],
+Cell[194306, 6162, 318, 10, 70, "GuideText",
+ CellID->965355169],
+Cell[194627, 6174, 342, 11, 70, "GuideText",
+ CellID->839585187]
+}, Open ]],
+Cell[194984, 6188, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/Index/_0.cfs b/FeynCalc/DocOutput/English/Index/_0.cfs
index 554d49cc1..d7817cbb9 100644
Binary files a/FeynCalc/DocOutput/English/Index/_0.cfs and b/FeynCalc/DocOutput/English/Index/_0.cfs differ
diff --git a/FeynCalc/DocOutput/English/Index/segments_3 b/FeynCalc/DocOutput/English/Index/segments_3
index 4a6a6e33b..0886c1960 100644
Binary files a/FeynCalc/DocOutput/English/Index/segments_3 and b/FeynCalc/DocOutput/English/Index/segments_3 differ
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$AL.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$AL.nb
index 6a984ea8c..9623031e4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$AL.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$AL.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11713, 428]
-NotebookOptionsPosition[ 7775, 300]
-NotebookOutlinePosition[ 10551, 382]
-CellTagsIndexPosition[ 10446, 376]
+NotebookDataLength[ 12678, 455]
+NotebookOptionsPosition[ 8824, 332]
+NotebookOutlinePosition[ 11564, 412]
+CellTagsIndexPosition[ 11457, 406]
WindowTitle->$AL
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$AL\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$AL"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$AL.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$167133],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/$AL",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Amputate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Amputate"], "\<\"Uncontract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Uncontract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$AL\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$AL"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/$AL.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$290538],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/$AL",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$AL", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$AL", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1542492909],
+ CellID->1044316929],
Cell[CellGroupData[{
@@ -117,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->651399108],
+ CellID->900191581],
Cell[CellGroupData[{
@@ -166,7 +200,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{164, 22},
+ ImageSize->{169, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$AL",
@@ -226,7 +260,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{140, 22},
+ ImageSize->{147, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$AL",
@@ -291,9 +325,7 @@ Cell[TextData[{
ButtonNote->"Uncontract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$AL",
- CellID->1837478580]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -310,10 +342,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 59.011071}",
+ "built" -> "{2020, 1, 5, 19, 4, 11.894594}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -321,11 +353,11 @@ TaggingRules->{
"None", "summary" ->
"$AL is the head for dummy indices which may be introduced by Amputate \
and Uncontract. By default it is unset, but may be set to anything.",
- "synonyms" -> {}, "title" -> "$AL", "titlemodifier" -> "", "windowtitle" ->
- "$AL", "type" -> "Symbol", "uri" -> "FeynCalc/ref/$AL"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$AL", "titlemodifier" ->
+ "", "windowtitle" -> "$AL", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/$AL"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -333,8 +365,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -343,93 +376,87 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3331, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4416, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1542492909]},
+ CellID->1044316929]},
"$AL"->{
- Cell[3964, 123, 259, 8, 27, "Input",
+ Cell[5049, 157, 259, 8, 27, "Input",
CellTags->"$AL",
CellID->1748317670],
- Cell[4226, 133, 981, 40, 43, "Output",
+ Cell[5311, 167, 981, 40, 40, "Output",
CellTags->"$AL",
CellID->1100154070],
- Cell[5222, 176, 133, 5, 27, "Input",
+ Cell[6307, 210, 133, 5, 27, "Input",
CellTags->"$AL",
CellID->21626364],
- Cell[5380, 185, 259, 8, 27, "Input",
+ Cell[6465, 219, 259, 8, 27, "Input",
CellTags->"$AL",
CellID->1906689813],
- Cell[5642, 195, 891, 38, 43, "Output",
+ Cell[6727, 229, 891, 38, 40, "Output",
CellTags->"$AL",
CellID->1144687300],
- Cell[6548, 236, 127, 5, 27, "Input",
+ Cell[7633, 270, 127, 5, 27, "Input",
CellTags->"$AL",
CellID->1815261796],
- Cell[6678, 243, 311, 15, 32, "Text",
+ Cell[7763, 277, 311, 15, 33, "Text",
CellTags->"$AL",
- CellID->2020117315],
- Cell[7345, 280, 388, 15, 32, "Text",
- CellTags->"$AL",
- CellID->1837478580]}
+ CellID->2020117315]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9626, 344},
- {"$AL", 9756, 348}
+ {"PrimaryExamplesSection", 10719, 377},
+ {"$AL", 10850, 381}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3089, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 441, 12, 97, "Usage",
+Cell[3667, 99, 280, 11, 45, "ObjectNameGrid"],
+Cell[3950, 112, 441, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3331, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4416, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1542492909],
+ CellID->1044316929],
Cell[CellGroupData[{
-Cell[3744, 113, 195, 6, 25, "ExampleSection",
- CellID->651399108],
+Cell[4829, 147, 195, 6, 26, "ExampleSection",
+ CellID->900191581],
Cell[CellGroupData[{
-Cell[3964, 123, 259, 8, 27, "Input",
+Cell[5049, 157, 259, 8, 27, "Input",
CellTags->"$AL",
CellID->1748317670],
-Cell[4226, 133, 981, 40, 43, "Output",
+Cell[5311, 167, 981, 40, 40, "Output",
CellTags->"$AL",
CellID->1100154070]
}, Open ]],
-Cell[5222, 176, 133, 5, 27, "Input",
+Cell[6307, 210, 133, 5, 27, "Input",
CellTags->"$AL",
CellID->21626364],
Cell[CellGroupData[{
-Cell[5380, 185, 259, 8, 27, "Input",
+Cell[6465, 219, 259, 8, 27, "Input",
CellTags->"$AL",
CellID->1906689813],
-Cell[5642, 195, 891, 38, 43, "Output",
+Cell[6727, 229, 891, 38, 40, "Output",
CellTags->"$AL",
CellID->1144687300]
}, Open ]],
-Cell[6548, 236, 127, 5, 27, "Input",
+Cell[7633, 270, 127, 5, 27, "Input",
CellTags->"$AL",
CellID->1815261796],
-Cell[6678, 243, 311, 15, 32, "Text",
+Cell[7763, 277, 311, 15, 33, "Text",
CellTags->"$AL",
CellID->2020117315]
}, Open ]],
-Cell[7004, 261, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8089, 295, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7072, 266, 270, 12, 31, "SeeAlsoSection",
+Cell[8157, 300, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7345, 280, 388, 15, 32, "Text",
- CellTags->"$AL",
- CellID->1837478580]
+Cell[8430, 314, 352, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7748, 298, 23, 0, 42, "FooterCell"]
+Cell[8797, 330, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Abbreviations.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Abbreviations.nb
index 6473c6bb3..a75683a29 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Abbreviations.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Abbreviations.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7107, 216]
-NotebookOptionsPosition[ 4698, 148]
-NotebookOutlinePosition[ 6839, 205]
-CellTagsIndexPosition[ 6763, 200]
+NotebookDataLength[ 8226, 245]
+NotebookOptionsPosition[ 6036, 186]
+NotebookOutlinePosition[ 8017, 237]
+CellTagsIndexPosition[ 7974, 234]
WindowTitle->$Abbreviations
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$Abbreviations\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$Abbreviations"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Abbreviation\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Abbreviation"], "\<\"OneLoop\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"WriteOut\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/WriteOut"], "\<\"WriteOutPaVe\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/WriteOutPaVe"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$Abbreviations\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$Abbreviations"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
Abbreviations.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$166776],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$Abbreviations", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$290083],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$Abbreviations", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,18 @@ Abbreviations.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$Abbreviations", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$Abbreviations", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -139,9 +179,7 @@ Cell[TextData[{
ButtonNote->"WriteOutPaVe"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$Abbreviations",
- CellID->1391380109]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -158,10 +196,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 57.525452}",
+ "built" -> "{2020, 1, 5, 19, 4, 10.988118}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -170,11 +208,12 @@ TaggingRules->{
"$Abbreviations are a list of string substitution rules used when \
generating names for storing intermediate results. It is used by OneLoop and \
PaVeReduce.The elements of the list should be of the form \"name\" -> \
-\"abbreviation\".", "synonyms" -> {}, "title" -> "$Abbreviations",
- "titlemodifier" -> "", "windowtitle" -> "$Abbreviations", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/$Abbreviations"}},
+\"abbreviation\".", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "$Abbreviations", "titlemodifier" -> "", "windowtitle" ->
+ "$Abbreviations", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/$Abbreviations"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -183,41 +222,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "$Abbreviations"->{
- Cell[3759, 110, 897, 33, 70, "Text",
- CellTags->"$Abbreviations",
- CellID->1391380109]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"$Abbreviations", 6645, 193}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3421, 82, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 542, 14, 70, "Usage",
+Cell[4010, 105, 291, 11, 70, "ObjectNameGrid"],
+Cell[4304, 118, 542, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3486, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4871, 136, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3759, 110, 897, 33, 70, "Text",
- CellTags->"$Abbreviations",
- CellID->1391380109]
+Cell[5144, 150, 850, 31, 70, "SeeAlso"]
}, Open ]],
-Cell[4671, 146, 23, 0, 70, "FooterCell"]
+Cell[6009, 184, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$BreitMaison.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$BreitMaison.nb
index 136b104a9..87971ecd4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$BreitMaison.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$BreitMaison.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6709, 206]
-NotebookOptionsPosition[ 4353, 139]
-NotebookOutlinePosition[ 6443, 195]
-CellTagsIndexPosition[ 6369, 190]
+NotebookDataLength[ 7550, 221]
+NotebookOptionsPosition[ 5353, 162]
+NotebookOutlinePosition[ 7341, 213]
+CellTagsIndexPosition[ 7298, 210]
WindowTitle->$BreitMaison
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$BreitMaison\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$BreitMaison"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCSetDiracGammaScheme\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSetDiracGammaScheme"], \
+"\<\"FCGetDiracGammaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetDiracGammaScheme"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$BreitMaison\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$BreitMaison"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
BreitMaison.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$167474],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$BreitMaison", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$290978],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$BreitMaison", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +98,26 @@ BreitMaison.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$BreitMaison", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$BreitMaison", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["$BreitMaison"], "InlineFormula"],
- " \[LineSeparator]",
- "The Breitenlohner-Maison ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " scheme is currently not supported by the Dirac algebra functions.Use \
-Tracer if you need it (PHI supplies the functions FCToTracer and \
-TracerToFC)."
+ " \[LineSeparator]is a legacy switch for the \
+Breitenlohner-Maison-t'Hooft-Veltman scheme. Use FCSetDiracGammaScheme to \
+specify a scheme for handling Dirac matrices in dimensional regularization \
+and FCGetDiracGammaScheme to check the current setting."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,27 +143,19 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Tr",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Tr",
- ButtonNote->"Tr"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["$Larin",
+ StyleBox[ButtonBox["FCSetDiracGammaScheme",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/$Larin",
- ButtonNote->"$Larin"],
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["West",
+ StyleBox[ButtonBox["FCGetDiracGammaScheme",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/West",
- ButtonNote->"West"],
+ ButtonData->"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCGetDiracGammaScheme"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$BreitMaison",
- CellID->1928344928]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -149,22 +172,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 0.635216}",
+ "built" -> "{2020, 1, 5, 19, 4, 12.967783}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "$BreitMaison The Breitenlohner-Maison \\[Gamma]5 scheme is currently not \
-supported by the Dirac algebra functions.Use Tracer if you need it (PHI \
-supplies the functions FCToTracer and TracerToFC).", "synonyms" -> {},
- "title" -> "$BreitMaison", "titlemodifier" -> "", "windowtitle" ->
- "$BreitMaison", "type" -> "Symbol", "uri" -> "FeynCalc/ref/$BreitMaison"}},
+ "$BreitMaison is a legacy switch for the \
+Breitenlohner-Maison-t'Hooft-Veltman scheme. Use FCSetDiracGammaScheme to \
+specify a scheme for handling Dirac matrices in dimensional regularization \
+and FCGetDiracGammaScheme to check the current setting.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "$BreitMaison", "titlemodifier" -> "",
+ "windowtitle" -> "$BreitMaison", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/$BreitMaison"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -173,41 +198,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "$BreitMaison"->{
- Cell[3797, 113, 514, 21, 70, "Text",
- CellTags->"$BreitMaison",
- CellID->1928344928]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"$BreitMaison", 6253, 183}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3167, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 592, 17, 70, "Usage",
+Cell[3754, 100, 289, 11, 70, "ObjectNameGrid"],
+Cell[4046, 113, 543, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3524, 99, 270, 12, 70, "SeeAlsoSection",
+Cell[4614, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3797, 113, 514, 21, 70, "Text",
- CellTags->"$BreitMaison",
- CellID->1928344928]
+Cell[4887, 144, 424, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4326, 137, 23, 0, 70, "FooterCell"]
+Cell[5326, 160, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Covariant.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Covariant.nb
deleted file mode 100644
index 209260e8c..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Covariant.nb
+++ /dev/null
@@ -1,156 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5338, 147]
-NotebookOptionsPosition[ 3371, 94]
-NotebookOutlinePosition[ 5260, 143]
-CellTagsIndexPosition[ 5217, 140]
-WindowTitle->$Covariant
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$Covariant\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$Covariant"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$Covariant.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$167819],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$Covariant", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["$Covariant", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["$Covariant"], "InlineFormula"],
- " \[LineSeparator]",
- "the boolean setting of $Covariant determines whether Lorentz indices \
-are displayed as lower indices (True) or as upper ones (False)."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"$Covariant",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 2.111582}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "$Covariant the boolean setting of $Covariant determines whether Lorentz \
-indices are displayed as lower indices (True) or as upper ones (False).",
- "synonyms" -> {}, "title" -> "$Covariant", "titlemodifier" -> "",
- "windowtitle" -> "$Covariant", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$Covariant"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{}
-*)
-(*CellTagsIndex
-CellTagsIndex->{}
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[582, 21, 2253, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2838, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 447, 12, 70, "Usage",
- CellID->982511436],
-Cell[3344, 92, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCMemoryAvailable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCMemoryAvailable.nb
new file mode 100644
index 000000000..d7ee96aac
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCMemoryAvailable.nb
@@ -0,0 +1,255 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8031, 245]
+NotebookOptionsPosition[ 4954, 159]
+NotebookOutlinePosition[ 7525, 226]
+CellTagsIndexPosition[ 7405, 220]
+WindowTitle->$FCMemoryAvailable
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$FCMemoryAvailable\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$FCMemoryAvailable"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
+FCMemoryAvailable.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$291420],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$FCMemoryAvailable", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["$FCMemoryAvailable", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["$FCMemoryAvailable"], "InlineFormula"],
+ " \[LineSeparator]",
+ "is a global variable which is set to an integer ",
+ StyleBox["n",
+ FontSlant->"Italic"],
+ ", where ",
+ StyleBox["n",
+ FontSlant->"Italic"],
+ " is the available amount of main memory in MB. The default is 128. It \
+should be increased if possible. The higher $FCMemoryAvailable can be, the \
+more intermediate steps do not have to be repeated by FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->78056813],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->512569663],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["$FCMemoryAvailable"], "Input",
+ CellTags->"$FCMemoryAvailable",
+ CellLabel->"In[1]:=",
+ CellID->695439641],
+
+Cell[BoxData[
+ FormBox["4096", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"$FCMemoryAvailable",
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"$FCMemoryAvailable",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 13.916115}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "$FCMemoryAvailable is a global variable which is set to an integer n, \
+where n is the available amount of main memory in MB. The default is 128. It \
+should be increased if possible. The higher $FCMemoryAvailable can be, the \
+more intermediate steps do not have to be repeated by FeynCalc.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$FCMemoryAvailable",
+ "titlemodifier" -> "", "windowtitle" -> "$FCMemoryAvailable", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/$FCMemoryAvailable"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3932, 112, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->78056813]},
+ "$FCMemoryAvailable"->{
+ Cell[4563, 141, 120, 3, 27, "Input",
+ CellTags->"$FCMemoryAvailable",
+ CellID->695439641],
+ Cell[4686, 146, 202, 6, 35, "Output",
+ CellTags->"$FCMemoryAvailable"]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7064, 207},
+ {"$FCMemoryAvailable", 7208, 211}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
+Cell[3205, 89, 702, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3932, 112, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->78056813],
+Cell[CellGroupData[{
+Cell[4343, 131, 195, 6, 26, "ExampleSection",
+ CellID->512569663],
+Cell[CellGroupData[{
+Cell[4563, 141, 120, 3, 27, "Input",
+ CellTags->"$FCMemoryAvailable",
+ CellID->695439641],
+Cell[4686, 146, 202, 6, 35, "Output",
+ CellTags->"$FCMemoryAvailable"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[4927, 157, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCS.nb
index ad68cbfcd..5d2249f79 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCS.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCS.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8036, 249]
-NotebookOptionsPosition[ 5110, 159]
-NotebookOutlinePosition[ 7439, 225]
-CellTagsIndexPosition[ 7333, 219]
+NotebookDataLength[ 8271, 259]
+NotebookOptionsPosition[ 5372, 170]
+NotebookOutlinePosition[ 7688, 236]
+CellTagsIndexPosition[ 7582, 230]
WindowTitle->$FCS
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$168169],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$292286],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/$FCS",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$FCS", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$FCS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +118,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->275219115],
+ CellID->361639652],
Cell[TextData[{
"Basic Examples",
@@ -115,7 +126,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->318828667],
+ CellID->353242586],
Cell[CellGroupData[{
@@ -145,7 +156,7 @@ Cell[BoxData[
",", "\<\"SDF\"\>", ",", "\<\"SOD\"\>", ",", "\<\"SP\"\>",
",", "\<\"SPC\"\>", ",", "\<\"SPD\"\>", ",", "\<\"SPE\"\>",
",", "\<\"SPL\"\>"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{412, 54},
+ ImageSize->{428, 52},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$FCS",
@@ -160,7 +171,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"$FCS",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -169,21 +180,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 3.627449}",
+ "built" -> "{2020, 1, 5, 19, 4, 15.989055}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"$FCS is a list of functions with a short name. E.g. GA[nu] can be used \
-instead of DiracGamma[nu].", "synonyms" -> {}, "title" -> "$FCS",
- "titlemodifier" -> "", "windowtitle" -> "$FCS", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$FCS"}, "SearchTextTranslated" -> ""},
+instead of DiracGamma[nu].", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "$FCS", "titlemodifier" -> "", "windowtitle" -> "$FCS", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/$FCS"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -192,7 +203,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -201,56 +212,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3284, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[3546, 105, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->275219115]},
+ CellID->361639652]},
"$FCS"->{
- Cell[3894, 121, 73, 2, 35, "Subsubsection",
+ Cell[4156, 132, 73, 2, 36, "Subsubsection",
CellTags->"$FCS",
CellID->1728378026],
- Cell[3992, 127, 92, 3, 27, "Input",
+ Cell[4254, 138, 92, 3, 27, "Input",
CellTags->"$FCS",
CellID->376757099],
- Cell[4087, 132, 957, 20, 75, "Output",
+ Cell[4349, 143, 957, 20, 73, "Output",
CellTags->"$FCS",
CellID->194077646]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 6921, 202},
- {"$FCS", 7051, 206}
+ {"PrimaryExamplesSection", 7169, 213},
+ {"$FCS", 7300, 217}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 401, 12, 83, "Usage",
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[3120, 89, 401, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3284, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[3546, 105, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->275219115],
-Cell[3674, 111, 195, 6, 25, "ExampleSection",
- CellID->318828667],
+ CellID->361639652],
+Cell[3936, 122, 195, 6, 26, "ExampleSection",
+ CellID->353242586],
Cell[CellGroupData[{
-Cell[3894, 121, 73, 2, 35, "Subsubsection",
+Cell[4156, 132, 73, 2, 36, "Subsubsection",
CellTags->"$FCS",
CellID->1728378026],
Cell[CellGroupData[{
-Cell[3992, 127, 92, 3, 27, "Input",
+Cell[4254, 138, 92, 3, 27, "Input",
CellTags->"$FCS",
CellID->376757099],
-Cell[4087, 132, 957, 20, 75, "Output",
+Cell[4349, 143, 957, 20, 73, "Output",
CellTags->"$FCS",
CellID->194077646]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5083, 157, 23, 0, 42, "FooterCell"]
+Cell[5345, 168, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCShowIEta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCShowIEta.nb
new file mode 100644
index 000000000..fd30580e2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCShowIEta.nb
@@ -0,0 +1,348 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10145, 338]
+NotebookOptionsPosition[ 6730, 236]
+NotebookOutlinePosition[ 9078, 296]
+CellTagsIndexPosition[ 8994, 291]
+WindowTitle->$FCShowIEta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$FCShowIEta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$FCShowIEta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
+FCShowIEta.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$291847],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$FCShowIEta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["$FCShowIEta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["$FCShowIEta"], "InlineFormula"],
+ " \[LineSeparator]The boolean setting of $FCShowIEta detrmines whether I \
+\[Eta] should be displayed in the typesetting of GFAD and \
+GenericPropagatorDenominator objects or not. This setting affects only the \
+TraditionalForm typesetting and has absolutely no influence on the internal \
+handling of propagator denominators in FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->669615664],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1364419805],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["$FCShowIEta"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->710731682],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2143783398]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1378639796],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->427014609]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"$FCShowIEta", "=", "False"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->462213996],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1909211131]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2000350143],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{74, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->92097782]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"$FCShowIEta", "=", "True"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->942085505],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1291376477]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"$FCShowIEta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 14.888195}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "$FCShowIEta The boolean setting of $FCShowIEta detrmines whether I \
+\\[Eta] should be displayed in the typesetting of GFAD and \
+GenericPropagatorDenominator objects or not. This setting affects only the \
+TraditionalForm typesetting and has absolutely no influence on the internal \
+handling of propagator denominators in FeynCalc.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "$FCShowIEta", "titlemodifier" -> "",
+ "windowtitle" -> "$FCShowIEta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/$FCShowIEta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3813, 107, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->669615664]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8851, 284}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2286, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2872, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[3163, 89, 625, 14, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3813, 107, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->669615664],
+Cell[CellGroupData[{
+Cell[4225, 126, 196, 6, 26, "ExampleSection",
+ CellID->1364419805],
+Cell[CellGroupData[{
+Cell[4446, 136, 80, 2, 27, "Input",
+ CellID->710731682],
+Cell[4529, 140, 190, 6, 35, "Output",
+ CellID->2143783398]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4756, 151, 173, 6, 27, "Input",
+ CellID->1378639796],
+Cell[4932, 159, 454, 13, 61, "Output",
+ CellID->427014609]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5423, 177, 106, 3, 27, "Input",
+ CellID->462213996],
+Cell[5532, 182, 191, 6, 35, "Output",
+ CellID->1909211131]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5760, 193, 173, 6, 27, "Input",
+ CellID->2000350143],
+Cell[5936, 201, 393, 12, 61, "Output",
+ CellID->92097782]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6366, 218, 105, 3, 27, "Input",
+ CellID->942085505],
+Cell[6474, 223, 190, 6, 35, "Output",
+ CellID->1291376477]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6703, 234, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCT.nb
index 11c57b95f..fd6f6a75d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCT.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9627, 334]
-NotebookOptionsPosition[ 5972, 217]
-NotebookOutlinePosition[ 8682, 296]
-CellTagsIndexPosition[ 8576, 290]
+NotebookDataLength[ 9673, 335]
+NotebookOptionsPosition[ 6159, 224]
+NotebookOutlinePosition[ 8825, 301]
+CellTagsIndexPosition[ 8719, 295]
WindowTitle->$FCT
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$168508],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$292719],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/$FCT",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$FCT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$FCT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +118,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->700707134],
+ CellID->1799296695],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -115,13 +128,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1464216787],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$FCT",
- CellID->1394179374],
+ CellID->1539302137],
Cell[BoxData[
RowBox[{
@@ -159,7 +166,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$FCT",
@@ -203,7 +210,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$FCT",
@@ -227,10 +234,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 5.100052}",
+ "built" -> "{2020, 1, 5, 19, 4, 16.995257}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -238,11 +245,11 @@ TaggingRules->{
"None", "summary" ->
"$FCT Setting the global variable $FCT to True changes the default \
typesetting rules for the noncommutative multiplication operator Dot[].",
- "synonyms" -> {}, "title" -> "$FCT", "titlemodifier" -> "", "windowtitle" ->
- "$FCT", "type" -> "Symbol", "uri" -> "FeynCalc/ref/$FCT"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$FCT", "titlemodifier" ->
+ "", "windowtitle" -> "$FCT", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/$FCT"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -250,8 +257,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -260,82 +268,75 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3324, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[3586, 105, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->700707134]},
+ CellID->1799296695]},
"$FCT"->{
- Cell[3935, 121, 73, 2, 35, "Subsubsection",
- CellTags->"$FCT",
- CellID->1394179374],
- Cell[4011, 125, 145, 5, 27, "Input",
+ Cell[4198, 132, 145, 5, 27, "Input",
CellTags->"$FCT",
CellID->699494043],
- Cell[4181, 134, 187, 6, 27, "Input",
+ Cell[4368, 141, 187, 6, 27, "Input",
CellTags->"$FCT",
CellID->990751357],
- Cell[4371, 142, 579, 24, 38, "Output",
+ Cell[4558, 149, 579, 24, 37, "Output",
CellTags->"$FCT",
CellID->2085231403],
- Cell[4965, 169, 147, 5, 27, "Input",
+ Cell[5152, 176, 147, 5, 27, "Input",
CellTags->"$FCT",
CellID->1335241160],
- Cell[5137, 178, 188, 6, 27, "Input",
+ Cell[5324, 185, 188, 6, 27, "Input",
CellTags->"$FCT",
CellID->1905190274],
- Cell[5328, 186, 578, 24, 38, "Output",
+ Cell[5515, 193, 578, 24, 37, "Output",
CellTags->"$FCT",
CellID->189104595]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7826, 261},
- {"$FCT", 7956, 265}
+ {"PrimaryExamplesSection", 8058, 269},
+ {"$FCT", 8190, 273}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 441, 12, 99, "Usage",
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[3120, 89, 441, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3324, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[3586, 105, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->700707134],
-Cell[3714, 111, 196, 6, 25, "ExampleSection",
- CellID->1464216787],
+ CellID->1799296695],
Cell[CellGroupData[{
-Cell[3935, 121, 73, 2, 35, "Subsubsection",
- CellTags->"$FCT",
- CellID->1394179374],
-Cell[4011, 125, 145, 5, 27, "Input",
+Cell[3999, 124, 196, 6, 26, "ExampleSection",
+ CellID->1539302137],
+Cell[4198, 132, 145, 5, 27, "Input",
CellTags->"$FCT",
CellID->699494043],
Cell[CellGroupData[{
-Cell[4181, 134, 187, 6, 27, "Input",
+Cell[4368, 141, 187, 6, 27, "Input",
CellTags->"$FCT",
CellID->990751357],
-Cell[4371, 142, 579, 24, 38, "Output",
+Cell[4558, 149, 579, 24, 37, "Output",
CellTags->"$FCT",
CellID->2085231403]
}, Open ]],
-Cell[4965, 169, 147, 5, 27, "Input",
+Cell[5152, 176, 147, 5, 27, "Input",
CellTags->"$FCT",
CellID->1335241160],
Cell[CellGroupData[{
-Cell[5137, 178, 188, 6, 27, "Input",
+Cell[5324, 185, 188, 6, 27, "Input",
CellTags->"$FCT",
CellID->1905190274],
-Cell[5328, 186, 578, 24, 38, "Output",
+Cell[5515, 193, 578, 24, 37, "Output",
CellTags->"$FCT",
CellID->189104595]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5945, 215, 23, 0, 42, "FooterCell"]
+Cell[6132, 222, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCTraditionalFormOutput.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCTraditionalFormOutput.nb
new file mode 100644
index 000000000..da78801a8
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FCTraditionalFormOutput.nb
@@ -0,0 +1,246 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8342, 236]
+NotebookOptionsPosition[ 5383, 161]
+NotebookOutlinePosition[ 7899, 219]
+CellTagsIndexPosition[ 7856, 216]
+WindowTitle->$FCTraditionalFormOutput
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$FCTraditionalFormOutput\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$FCTraditionalFormOutput"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
+FCTraditionalFormOutput.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$293149],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$FCTraditionalFormOutput", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["$FCTraditionalFormOutput", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["$FCTraditionalFormOutput"], "InlineFormula"],
+ " \[LineSeparator]The boolean setting of $FCTraditionalFormOutput \
+determines which output format type should be used in the notebook front end \
+when FeynCalc is loaded. If set to True, FeynCalc will activate the \
+TraditionalForm output. Otherwise, the StandardForm output (Mathematica's \
+default) will be used. This setting only changes the output format of the \
+current notebook, i.e. it is not persistent and will not modify the global \
+options of Mathematica. If unsure, it is recommended to set \
+$FCTraditionalFormOutput to True, so that you can benefit from the nice \
+FeynCalc typesetting for various QFT quantities."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->455133749],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["$FCTraditionalFormOutput"], "Input",
+ CellLabel->"In[13]:=",
+ CellID->1499223899],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[13]=",
+ CellID->825857747]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"$FCTraditionalFormOutput",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 18.096385}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "$FCTraditionalFormOutput The boolean setting of $FCTraditionalFormOutput \
+determines which output format type should be used in the notebook front end \
+when FeynCalc is loaded. If set to True, FeynCalc will activate the \
+TraditionalForm output. Otherwise, the StandardForm output (Mathematica's \
+default) will be used. This setting only changes the output format of the \
+current notebook, i.e. it is not persistent and will not modify the global \
+options of Mathematica. If unsure, it is recommended to set \
+$FCTraditionalFormOutput to True, so that you can benefit from the nice \
+FeynCalc typesetting for various QFT quantities.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "$FCTraditionalFormOutput", "titlemodifier" ->
+ "", "windowtitle" -> "$FCTraditionalFormOutput", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/$FCTraditionalFormOutput"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[596, 21, 2351, 54, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2950, 77, 301, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3276, 92, 930, 18, 171, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4231, 114, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->455133749],
+Cell[4972, 140, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5028, 144, 95, 2, 70, "Input",
+ CellID->1499223899],
+Cell[5126, 148, 191, 6, 35, "Output",
+ CellID->825857747]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[5356, 159, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcStuff.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcStuff.nb
index be46d3514..277bcc52f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcStuff.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcStuff.nb
@@ -10,10 +10,10 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5203, 145]
-NotebookOptionsPosition[ 3308, 93]
-NotebookOutlinePosition[ 5125, 141]
-CellTagsIndexPosition[ 5082, 138]
+NotebookDataLength[ 5445, 155]
+NotebookOptionsPosition[ 3570, 104]
+NotebookOutlinePosition[ 5381, 152]
+CellTagsIndexPosition[ 5338, 149]
WindowTitle->$FeynCalcStuff
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FeynCalcStuff.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$168842],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$302809],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/$FeynCalcStuff", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ FeynCalcStuff.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$FeynCalcStuff", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$FeynCalcStuff", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -103,19 +114,19 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 6.762475}",
+ "built" -> "{2019, 3, 29, 17, 55, 47.588952}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"$FeynCalcStuff is the list of availabe stuff in FeynCalc.",
- "synonyms" -> {}, "title" -> "$FeynCalcStuff", "titlemodifier" -> "",
- "windowtitle" -> "$FeynCalcStuff", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$FeynCalcStuff"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$FeynCalcStuff",
+ "titlemodifier" -> "", "windowtitle" -> "$FeynCalcStuff", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/$FeynCalcStuff"}},
CellContext->"Global`",
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->Notebook[{
@@ -140,13 +151,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 2298, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 359, 11, 70, "Usage",
+Cell[2887, 76, 291, 11, 70, "ObjectNameGrid"],
+Cell[3181, 89, 359, 11, 70, "Usage",
CellID->982511436],
-Cell[3281, 91, 23, 0, 70, "FooterCell"]
+Cell[3543, 102, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcVersion.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcVersion.nb
index 2c8f24089..5c9d89e67 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcVersion.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FeynCalcVersion.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7512, 235]
-NotebookOptionsPosition[ 4463, 145]
-NotebookOutlinePosition[ 6877, 211]
-CellTagsIndexPosition[ 6759, 205]
+NotebookDataLength[ 7451, 234]
+NotebookOptionsPosition[ 4615, 151]
+NotebookOutlinePosition[ 6949, 215]
+CellTagsIndexPosition[ 6831, 209]
WindowTitle->$FeynCalcVersion
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FeynCalcVersion.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$169186],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$293576],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/$FeynCalcVersion", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ FeynCalcVersion.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$FeynCalcVersion", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$FeynCalcVersion", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,7 +117,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1421813232],
+ CellID->614101205],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -114,13 +127,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->753980873],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$FeynCalcVersion",
- CellID->1483320671],
+ CellID->211792166],
Cell[CellGroupData[{
@@ -130,13 +137,12 @@ Cell[BoxData["$FeynCalcVersion"], "Input",
CellID->806604709],
Cell[BoxData[
- FormBox["\<\"9.0.0\"\>", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ FormBox["\<\"9.3.0\"\>", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$FeynCalcVersion",
- CellLabel->"Out[1]=",
- CellID->1396918294]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -146,7 +152,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"$FeynCalcVersion",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -155,21 +161,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 8.183592}",
+ "built" -> "{2020, 1, 5, 19, 4, 19.178713}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"$FeynCalcVersion is a string that represents the version of FeynCalc.",
- "synonyms" -> {}, "title" -> "$FeynCalcVersion", "titlemodifier" -> "",
- "windowtitle" -> "$FeynCalcVersion", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$FeynCalcVersion"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$FeynCalcVersion",
+ "titlemodifier" -> "", "windowtitle" -> "$FeynCalcVersion", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/$FeynCalcVersion"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -177,8 +184,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -187,56 +195,47 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3327, 93, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3589, 104, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1421813232]},
+ CellID->614101205]},
"$FeynCalcVersion"->{
- Cell[3938, 120, 85, 2, 35, "Subsubsection",
- CellTags->"$FeynCalcVersion",
- CellID->1483320671],
- Cell[4048, 126, 116, 3, 27, "Input",
+ Cell[4221, 133, 116, 3, 27, "Input",
CellTags->"$FeynCalcVersion",
CellID->806604709],
- Cell[4167, 131, 230, 7, 36, "Output",
- CellTags->"$FeynCalcVersion",
- CellID->1396918294]}
+ Cell[4340, 138, 209, 6, 35, "Output",
+ CellTags->"$FeynCalcVersion"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 6297, 188},
- {"$FeynCalcVersion", 6440, 192}
+ {"PrimaryExamplesSection", 6495, 196},
+ {"$FeynCalcVersion", 6638, 200}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 371, 11, 82, "Usage",
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[3193, 89, 371, 11, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3327, 93, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3589, 104, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1421813232],
-Cell[3718, 110, 195, 6, 25, "ExampleSection",
- CellID->753980873],
+ CellID->614101205],
Cell[CellGroupData[{
-Cell[3938, 120, 85, 2, 35, "Subsubsection",
- CellTags->"$FeynCalcVersion",
- CellID->1483320671],
+Cell[4001, 123, 195, 6, 26, "ExampleSection",
+ CellID->211792166],
Cell[CellGroupData[{
-Cell[4048, 126, 116, 3, 27, "Input",
+Cell[4221, 133, 116, 3, 27, "Input",
CellTags->"$FeynCalcVersion",
CellID->806604709],
-Cell[4167, 131, 230, 7, 36, "Output",
- CellTags->"$FeynCalcVersion",
- CellID->1396918294]
+Cell[4340, 138, 209, 6, 35, "Output",
+ CellTags->"$FeynCalcVersion"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[4436, 143, 23, 0, 42, "FooterCell"]
+Cell[4588, 149, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb
index cf3977a3e..1b419b04e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb
@@ -3,71 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8777, 280]
-NotebookOptionsPosition[ 5202, 177]
-NotebookOutlinePosition[ 7850, 248]
-CellTagsIndexPosition[ 7719, 242]
+NotebookDataLength[ 9262, 296]
+NotebookOptionsPosition[ 6044, 204]
+NotebookOutlinePosition[ 8515, 270]
+CellTagsIndexPosition[ 8384, 264]
WindowTitle->$FortranContinuationCharacter
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/$FortranContinuationCharacter\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$FortranContinuationCharacter"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Write2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Write2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/$FortranContinuationCharacter\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$FortranContinuationCharacter"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
FortranContinuationCharacter.html"], StandardForm]], "Input",
- TextClipboardType -> "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$169520],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$FortranContinuationCharacter", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$294004],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$FortranContinuationCharacter", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -75,8 +98,18 @@ FortranContinuationCharacter.html"], StandardForm]], "Input",
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$FortranContinuationCharacter", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$FortranContinuationCharacter", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +141,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1062133],
+ CellID->1696140808],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,13 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->365290600],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$FortranContinuationCharacter",
- CellID->1942758352],
+ CellID->1341373379],
Cell[CellGroupData[{
@@ -133,16 +162,16 @@ Cell[BoxData["$FortranContinuationCharacter"], "Input",
Cell[BoxData[
FormBox["\<\"&\"\>", TraditionalForm]], "Output",
- ImageSize->{15, 15},
+ ImageSize->{16, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$FortranContinuationCharacter",
CellLabel->"Out[1]=",
CellID->1216489439]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -168,9 +197,7 @@ Cell[TextData[{
ButtonNote->"Write2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$FortranContinuationCharacter",
- CellID->1130623945]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -187,23 +214,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 9.759081}",
+ "built" -> "{2020, 1, 5, 19, 4, 20.184533}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"$FortranContinuationCharacter is the continuation character used in \
-Write2.", "synonyms" -> {}, "title" -> "$FortranContinuationCharacter",
- "titlemodifier" -> "", "windowtitle" -> "$FortranContinuationCharacter",
- "type" -> "Symbol", "uri" ->
+Write2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "$FortranContinuationCharacter", "titlemodifier" -> "", "windowtitle" ->
+ "$FortranContinuationCharacter", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/$FortranContinuationCharacter"}, "SearchTextTranslated" ->
""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -211,8 +238,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -221,67 +249,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3433, 95, 385, 15, 31, "PrimaryExamplesSection",
+ Cell[4434, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1062133]},
+ CellID->1696140808]},
"$FortranContinuationCharacter"->{
- Cell[4041, 122, 98, 2, 35, "Subsubsection",
- CellTags->"$FortranContinuationCharacter",
- CellID->1942758352],
- Cell[4164, 128, 143, 3, 27, "Input",
+ Cell[5068, 157, 143, 3, 27, "Input",
CellTags->"$FortranContinuationCharacter",
CellID->1374118326],
- Cell[4310, 133, 239, 7, 36, "Output",
+ Cell[5214, 162, 239, 7, 35, "Output",
CellTags->"$FortranContinuationCharacter",
- CellID->1216489439],
- Cell[4917, 163, 243, 9, 31, "Text",
- CellTags->"$FortranContinuationCharacter",
- CellID->1130623945]}
+ CellID->1216489439]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7099, 222},
- {"$FortranContinuationCharacter", 7252, 226}
+ {"PrimaryExamplesSection", 7984, 250},
+ {"$FortranContinuationCharacter", 8141, 254}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[601, 21, 2352, 54, 51, "AnchorBarGrid",
+Cell[601, 21, 3119, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2956, 77, 72, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3031, 80, 377, 11, 82, "Usage",
+Cell[3723, 100, 306, 11, 45, "ObjectNameGrid"],
+Cell[4032, 113, 377, 11, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3433, 95, 385, 15, 31, "PrimaryExamplesSection",
+Cell[4434, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1062133],
-Cell[3821, 112, 195, 6, 25, "ExampleSection",
- CellID->365290600],
+ CellID->1696140808],
Cell[CellGroupData[{
-Cell[4041, 122, 98, 2, 35, "Subsubsection",
- CellTags->"$FortranContinuationCharacter",
- CellID->1942758352],
+Cell[4847, 147, 196, 6, 26, "ExampleSection",
+ CellID->1341373379],
Cell[CellGroupData[{
-Cell[4164, 128, 143, 3, 27, "Input",
+Cell[5068, 157, 143, 3, 27, "Input",
CellTags->"$FortranContinuationCharacter",
CellID->1374118326],
-Cell[4310, 133, 239, 7, 36, "Output",
+Cell[5214, 162, 239, 7, 35, "Output",
CellTags->"$FortranContinuationCharacter",
CellID->1216489439]
-}, Open ]],
-Cell[4564, 143, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]]
}, Open ]],
+Cell[5480, 173, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4644, 149, 270, 12, 31, "SeeAlsoSection",
+Cell[5548, 178, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4917, 163, 243, 9, 31, "Text",
- CellTags->"$FortranContinuationCharacter",
- CellID->1130623945]
+Cell[5821, 192, 181, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5175, 175, 23, 0, 42, "FooterCell"]
+Cell[6017, 202, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Gauge.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Gauge.nb
index 844de1bf6..eec5deda3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Gauge.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Gauge.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6273, 191]
-NotebookOptionsPosition[ 3945, 123]
-NotebookOutlinePosition[ 6014, 180]
-CellTagsIndexPosition[ 5946, 175]
+NotebookDataLength[ 7026, 211]
+NotebookOptionsPosition[ 4890, 153]
+NotebookOutlinePosition[ 6819, 203]
+CellTagsIndexPosition[ 6776, 200]
WindowTitle->$Gauge
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$Gauge\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$Gauge"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$Gauge.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$169853],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/$Gauge",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Gauge\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Gauge"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$Gauge\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$Gauge"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$Gauge.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$294437],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$Gauge", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$Gauge", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$Gauge", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"Gauge"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$Gauge",
- CellID->1591453554]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 11.276561}",
+ "built" -> "{2020, 1, 5, 19, 4, 21.229034}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -145,11 +175,11 @@ TaggingRules->{
"$Gauge (= 1/xi) is a constant specifying the gauge fixing parameter of \
QED in Lorentz gauge. The usual choice is Feynman gauge, $Gauge=1. Notice \
that $Gauge is used by some functions, the option Gauge by others.",
- "synonyms" -> {}, "title" -> "$Gauge", "titlemodifier" -> "",
- "windowtitle" -> "$Gauge", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$Gauge", "titlemodifier" ->
+ "", "windowtitle" -> "$Gauge", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/$Gauge"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -158,41 +188,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "$Gauge"->{
- Cell[3686, 109, 217, 9, 70, "Text",
- CellTags->"$Gauge",
- CellID->1591453554]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"$Gauge", 5837, 168}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 2987, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 518, 13, 70, "Usage",
+Cell[3568, 97, 283, 11, 70, "ObjectNameGrid"],
+Cell[3854, 110, 518, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3413, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4397, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3686, 109, 217, 9, 70, "Text",
- CellTags->"$Gauge",
- CellID->1591453554]
+Cell[4670, 141, 178, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3918, 121, 23, 0, 70, "FooterCell"]
+Cell[4863, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Larin.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Larin.nb
index d9f67a4cb..3134a35aa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Larin.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$Larin.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10223, 324]
-NotebookOptionsPosition[ 6342, 215]
-NotebookOutlinePosition[ 9381, 292]
-CellTagsIndexPosition[ 9273, 286]
+NotebookDataLength[ 7514, 222]
+NotebookOptionsPosition[ 5330, 163]
+NotebookOutlinePosition[ 7305, 214]
+CellTagsIndexPosition[ 7262, 211]
WindowTitle->$Larin
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$Larin\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$Larin"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$Larin.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCSetDiracGammaScheme\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSetDiracGammaScheme"], \
+"\<\"FCGetDiracGammaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetDiracGammaScheme"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$Larin\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$Larin"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$Larin.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$170198],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/$Larin",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$294880],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$Larin", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,41 +98,27 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$Larin", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$Larin", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["$Larin"], "InlineFormula"],
- " \[LineSeparator]",
- "If set to True, the Larin-Gorishny-Atkyampo-DelBurgo-scheme for ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " in ",
- StyleBox["D",
- FontSlant->"Italic"],
- "-dimensions is used, i.e. before evaluating traces (but after moving ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " anticommuting in all dimensions to the right of the Dirac string) a \
-product gamma[mu].gamma5 is substituted to -I/6 Eps[mu,al,be,si] \
-gamma[al,be,si], where all indices live in ",
- StyleBox["D",
- FontSlant->"Italic"],
- "-dimensions now. Especially the Levic-Civita tensor is taken to be ",
- StyleBox["D",
- FontSlant->"Italic"],
- "-dimensional, i.e., contraction of two Eps's results in ",
- StyleBox["D",
- FontSlant->"Italic"],
- "'s. This has (FOR ONE AXIAL-VECTOR-CURRENT ONLY, it is not so clear if \
-this scheme also works for more than one fermion line involving ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- ") the same effect as the Breitenlohner-Maison-'t Hooft-Veltman scheme."
+ " \[LineSeparator] is a legacy switch for the \
+Larin-Gorishny-Atkyampo-DelBurgo scheme. The modern way is to use \
+FCSetDiracGammaScheme to specify a scheme for handling Dirac matrices in \
+dimensional regularization and FCGetDiracGammaScheme to check the current \
+setting."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -118,60 +129,6 @@ this scheme also works for more than one fermion line involving ",
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1471140951],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1585615479],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$Larin",
- CellID->1690224764],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["$Larin"], "Input",
- CellTags->"$Larin",
- CellLabel->"In[1]:=",
- CellID->1245299015],
-
-Cell[BoxData[
- FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$Larin",
- CellLabel->"Out[1]=",
- CellID->1660409352]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -186,29 +143,20 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[RawData["\<\
Cell[TextData[{
- ButtonBox[\"Tr\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/Tr\",
- ButtonNote->\"Tr\"],
- \", \",
- ButtonBox[\"$BreitMaison\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/$BreitMaison\",
- ButtonNote->\"$BreitMaison\"],
- \", \",
- ButtonBox[\"West\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/West\",
- ButtonNote->\"West\"],
- \".\"
-}], \"Text\",
- CellTags->\"$Larin\",
- CellID->181403197]\
-\>"], "Text",
- CellTags->"$Larin",
- CellID->181403197]
+ StyleBox[ButtonBox["FCSetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCGetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCGetDiracGammaScheme"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -216,7 +164,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"$Larin",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -225,29 +173,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 12.606587}",
+ "built" -> "{2020, 1, 5, 19, 4, 22.087028}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "$Larin If set to True, the Larin-Gorishny-Atkyampo-DelBurgo-scheme for \
-\\[Gamma]5 in D-dimensions is used, i.e. before evaluating traces (but after \
-moving \\[Gamma]5 anticommuting in all dimensions to the right of the Dirac \
-string) a product gamma[mu].gamma5 is substituted to -I/6 Eps[mu,al,be,si] \
-gamma[al,be,si], where all indices live in D-dimensions now. Especially the \
-Levic-Civita tensor is taken to be D-dimensional, i.e., contraction of two \
-Eps's results in D's. This has (FOR ONE AXIAL-VECTOR-CURRENT ONLY, it is not \
-so clear if this scheme also works for more than one fermion line involving \
-\\[Gamma]5) the same effect as the Breitenlohner-Maison-'t Hooft-Veltman \
-scheme.", "synonyms" -> {}, "title" -> "$Larin", "titlemodifier" -> "",
+ "$Larin is a legacy switch for the Larin-Gorishny-Atkyampo-DelBurgo \
+scheme. The modern way is to use FCSetDiracGammaScheme to specify a scheme \
+for handling Dirac matrices in dimensional regularization and \
+FCGetDiracGammaScheme to check the current setting.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "$Larin", "titlemodifier" -> "",
"windowtitle" -> "$Larin", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$Larin"}, "SearchTextTranslated" -> ""},
+ "FeynCalc/ref/$Larin"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -256,79 +199,33 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4381, 120, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1471140951]},
- "$Larin"->{
- Cell[4993, 147, 75, 2, 35, "Subsubsection",
- CellTags->"$Larin",
- CellID->1690224764],
- Cell[5093, 153, 97, 3, 27, "Input",
- CellTags->"$Larin",
- CellID->1245299015],
- Cell[5193, 158, 211, 7, 36, "Output",
- CellTags->"$Larin",
- CellID->1660409352],
- Cell[5772, 188, 528, 22, 311, "Text",
- CellTags->"$Larin",
- CellID->181403197]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 8764, 266},
- {"$Larin", 8898, 270}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3142, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 1486, 38, 180, "Usage",
+Cell[3723, 100, 283, 11, 70, "ObjectNameGrid"],
+Cell[4009, 113, 557, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4381, 120, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1471140951],
-Cell[4772, 137, 196, 6, 25, "ExampleSection",
- CellID->1585615479],
-Cell[CellGroupData[{
-Cell[4993, 147, 75, 2, 35, "Subsubsection",
- CellTags->"$Larin",
- CellID->1690224764],
-Cell[CellGroupData[{
-Cell[5093, 153, 97, 3, 27, "Input",
- CellTags->"$Larin",
- CellID->1245299015],
-Cell[5193, 158, 211, 7, 36, "Output",
- CellTags->"$Larin",
- CellID->1660409352]
-}, Open ]],
-Cell[5419, 168, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5499, 174, 270, 12, 31, "SeeAlsoSection",
+Cell[4591, 131, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[5772, 188, 528, 22, 311, "Text",
- CellTags->"$Larin",
- CellID->181403197]
+Cell[4864, 145, 424, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[6315, 213, 23, 0, 70, "FooterCell"]
+Cell[5303, 161, 23, 0, 70, "FooterCell"]
}
]
*)
(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LeviCivitaSign.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LeviCivitaSign.nb
index 83a102547..af82b428f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LeviCivitaSign.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LeviCivitaSign.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9955, 332]
-NotebookOptionsPosition[ 6695, 236]
-NotebookOutlinePosition[ 9003, 295]
-CellTagsIndexPosition[ 8919, 290]
+NotebookDataLength[ 10231, 343]
+NotebookOptionsPosition[ 6950, 247]
+NotebookOutlinePosition[ 9292, 307]
+CellTagsIndexPosition[ 9208, 302]
WindowTitle->$LeviCivitaSign
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ LeviCivitaSign.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$170533],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$295326],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/$LeviCivitaSign", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,17 +74,27 @@ LeviCivitaSign.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$LeviCivitaSign", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$LeviCivitaSign", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["$LeviCivitaSign"], "InlineFormula"],
" \[LineSeparator]is a global variable that determines the sign in the \
result of a Dirac trace of four gamma matrices and gamma5. $LeviCivitaSign \
-is by default set to -1 which corresponds to the convention \
-Tr[LeviCivita[a,b,c,d,5]] = -4*I*Eps[a,b,c,d]. Setting $LeviCivitaSign=-I \
-will switch to the FORM-convention."
+is by default set to -1 which corresponds to the convention Tr[LC[a,b,c,d,5]] \
+= -4*I*Eps[a,b,c,d]. Setting $LeviCivitaSign=-I will switch to the \
+FORM-convention."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,7 +120,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->62338071],
+ CellID->887122515],
Cell[CellGroupData[{
@@ -119,7 +130,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1709334668],
+ CellID->1894416738],
Cell[CellGroupData[{
@@ -130,7 +141,7 @@ Cell[BoxData["$LeviCivitaSign"], "Input",
Cell[BoxData[
FormBox[
RowBox[{"-", "1"}], TraditionalForm]], "Output",
- ImageSize->{21, 15},
+ ImageSize->{22, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[1]=",
@@ -169,7 +180,7 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{87, 18},
+ ImageSize->{85, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[2]=",
@@ -213,7 +224,7 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{66, 18},
+ ImageSize->{64, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[3]=",
@@ -237,7 +248,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"$LeviCivitaSign",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -246,10 +257,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 14.224707}",
+ "built" -> "{2020, 1, 5, 19, 4, 23.052180}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -257,14 +268,14 @@ TaggingRules->{
"None", "summary" ->
"$LeviCivitaSign is a global variable that determines the sign in the \
result of a Dirac trace of four gamma matrices and gamma5. $LeviCivitaSign is \
-by default set to -1 which corresponds to the convention \
-Tr[LeviCivita[a,b,c,d,5]] = -4*I*Eps[a,b,c,d]. Setting $LeviCivitaSign=-I \
-will switch to the FORM-convention.", "synonyms" -> {}, "title" ->
+by default set to -1 which corresponds to the convention Tr[LC[a,b,c,d,5]] = \
+-4*I*Eps[a,b,c,d]. Setting $LeviCivitaSign=-I will switch to the \
+FORM-convention.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"$LeviCivitaSign", "titlemodifier" -> "", "windowtitle" ->
"$LeviCivitaSign", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/$LeviCivitaSign"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -272,8 +283,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -282,58 +294,57 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3566, 96, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[3820, 107, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->62338071]}
+ CellID->887122515]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8778, 283}
+ {"PrimaryExamplesSection", 9065, 295}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 2302, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 616, 14, 130, "Usage",
+Cell[2892, 76, 292, 11, 45, "ObjectNameGrid"],
+Cell[3187, 89, 608, 14, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3566, 96, 386, 15, 31, "PrimaryExamplesSection",
+Cell[3820, 107, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->62338071],
+ CellID->887122515],
Cell[CellGroupData[{
-Cell[3977, 115, 196, 6, 25, "ExampleSection",
- CellID->1709334668],
+Cell[4232, 126, 196, 6, 26, "ExampleSection",
+ CellID->1894416738],
Cell[CellGroupData[{
-Cell[4198, 125, 85, 2, 27, "Input",
+Cell[4453, 136, 85, 2, 27, "Input",
CellID->1712420789],
-Cell[4286, 129, 205, 7, 36, "Output",
+Cell[4541, 140, 205, 7, 35, "Output",
CellID->2017735240]
}, Open ]],
Cell[CellGroupData[{
-Cell[4528, 141, 205, 6, 27, "Input",
+Cell[4783, 152, 205, 6, 27, "Input",
CellID->722943498],
-Cell[4736, 149, 645, 26, 39, "Output",
+Cell[4991, 160, 645, 26, 35, "Output",
CellID->24019145]
}, Open ]],
-Cell[5396, 178, 78, 1, 31, "Notes",
+Cell[5651, 189, 78, 1, 32, "Notes",
CellID->1734027625],
Cell[CellGroupData[{
-Cell[5499, 183, 309, 9, 45, "Input",
+Cell[5754, 194, 309, 9, 45, "Input",
CellID->1075951969],
-Cell[5811, 194, 606, 25, 39, "Output",
+Cell[6066, 205, 606, 25, 35, "Output",
CellID->1430392236]
}, Open ]],
-Cell[6432, 222, 63, 1, 31, "Notes",
+Cell[6687, 233, 63, 1, 32, "Notes",
CellID->223764811],
-Cell[6498, 225, 143, 5, 27, "Input",
+Cell[6753, 236, 143, 5, 27, "Input",
CellID->955635605]
}, Open ]]
}, Open ]],
-Cell[6668, 234, 23, 0, 42, "FooterCell"]
+Cell[6923, 245, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LimitTo4.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LimitTo4.nb
index 3094d765c..fdfbb0bfa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LimitTo4.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LimitTo4.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8706, 290]
-NotebookOptionsPosition[ 5343, 188]
-NotebookOutlinePosition[ 7857, 258]
-CellTagsIndexPosition[ 7746, 252]
+NotebookDataLength[ 9460, 308]
+NotebookOptionsPosition[ 6384, 217]
+NotebookOutlinePosition[ 8755, 282]
+CellTagsIndexPosition[ 8644, 276]
WindowTitle->$LimitTo4
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$LimitTo4\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$LimitTo4"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$LimitTo4.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"OneLoop\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$LimitTo4\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$LimitTo4"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$LimitTo4.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$170872],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$LimitTo4", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$295759],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$LimitTo4", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$LimitTo4", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$LimitTo4", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +142,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1772191243],
+ CellID->336697932],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -115,13 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->199274007],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$LimitTo4",
- CellID->1433837082],
+ CellID->269137595],
Cell[CellGroupData[{
@@ -132,16 +163,16 @@ Cell[BoxData["$LimitTo4"], "Input",
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$LimitTo4",
CellLabel->"Out[1]=",
CellID->477908355]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -179,9 +210,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$LimitTo4",
- CellID->1267840867]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -198,10 +227,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 15.736072}",
+ "built" -> "{2020, 1, 5, 19, 4, 24.101436}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -209,11 +238,11 @@ TaggingRules->{
"None", "summary" ->
"$LimitTo4 is a variable with default setting True. If set to False, no \
limit Dimension -> 4 is performed after tensor integral decomposition.",
- "synonyms" -> {}, "title" -> "$LimitTo4", "titlemodifier" -> "",
- "windowtitle" -> "$LimitTo4", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$LimitTo4"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$LimitTo4",
+ "titlemodifier" -> "", "windowtitle" -> "$LimitTo4", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/$LimitTo4"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -221,8 +250,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -231,67 +261,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3363, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4528, 129, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1772191243]},
+ CellID->336697932]},
"$LimitTo4"->{
- Cell[3974, 121, 78, 2, 35, "Subsubsection",
- CellTags->"$LimitTo4",
- CellID->1433837082],
- Cell[4077, 127, 102, 3, 27, "Input",
+ Cell[5160, 158, 102, 3, 27, "Input",
CellTags->"$LimitTo4",
CellID->731036389],
- Cell[4182, 132, 213, 7, 36, "Output",
+ Cell[5265, 163, 213, 7, 35, "Output",
CellTags->"$LimitTo4",
- CellID->477908355],
- Cell[4763, 162, 538, 21, 32, "Text",
- CellTags->"$LimitTo4",
- CellID->1267840867]}
+ CellID->477908355]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7224, 232},
- {"$LimitTo4", 7360, 236}
+ {"PrimaryExamplesSection", 8307, 262},
+ {"$LimitTo4", 8443, 266}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2249, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 3180, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2833, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2888, 78, 450, 12, 97, "Usage",
+Cell[3764, 100, 286, 11, 45, "ObjectNameGrid"],
+Cell[4053, 113, 450, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3363, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4528, 129, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1772191243],
-Cell[3754, 111, 195, 6, 25, "ExampleSection",
- CellID->199274007],
+ CellID->336697932],
Cell[CellGroupData[{
-Cell[3974, 121, 78, 2, 35, "Subsubsection",
- CellTags->"$LimitTo4",
- CellID->1433837082],
+Cell[4940, 148, 195, 6, 26, "ExampleSection",
+ CellID->269137595],
Cell[CellGroupData[{
-Cell[4077, 127, 102, 3, 27, "Input",
+Cell[5160, 158, 102, 3, 27, "Input",
CellTags->"$LimitTo4",
CellID->731036389],
-Cell[4182, 132, 213, 7, 36, "Output",
+Cell[5265, 163, 213, 7, 35, "Output",
CellTags->"$LimitTo4",
CellID->477908355]
-}, Open ]],
-Cell[4410, 142, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]]
}, Open ]],
+Cell[5505, 174, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4490, 148, 270, 12, 31, "SeeAlsoSection",
+Cell[5573, 179, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4763, 162, 538, 21, 32, "Text",
- CellTags->"$LimitTo4",
- CellID->1267840867]
+Cell[5846, 193, 496, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[5316, 186, 23, 0, 42, "FooterCell"]
+Cell[6357, 215, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LoadAddOns.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LoadAddOns.nb
new file mode 100644
index 000000000..b36f561e1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LoadAddOns.nb
@@ -0,0 +1,167 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 5670, 158]
+NotebookOptionsPosition[ 3694, 106]
+NotebookOutlinePosition[ 5606, 155]
+CellTagsIndexPosition[ 5563, 152]
+WindowTitle->$LoadAddOns
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$LoadAddOns\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$LoadAddOns"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
+LoadAddOns.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$296193],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$LoadAddOns", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["$LoadAddOns", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"$LoadAddOns", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]specifies which addons should be loaded with FeynCalc. \
+E.g. $LoadAddOns={\"FeynHelpers\"}. The value must be set before loading \
+FeynCalc. The default value is False."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"$LoadAddOns",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 25.091827}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "$LoadAddOns[] specifies which addons should be loaded with FeynCalc. \
+E.g. $LoadAddOns={\"FeynHelpers\"}. The value must be set before loading \
+FeynCalc. The default value is False.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "$LoadAddOns", "titlemodifier" -> "", "windowtitle" ->
+ "$LoadAddOns", "type" -> "Symbol", "uri" -> "FeynCalc/ref/$LoadAddOns"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2286, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2872, 76, 288, 11, 70, "ObjectNameGrid"],
+Cell[3163, 89, 501, 13, 70, "Usage",
+ CellID->982511436],
+Cell[3667, 104, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LorentzIndices.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LorentzIndices.nb
deleted file mode 100644
index 01f560681..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$LorentzIndices.nb
+++ /dev/null
@@ -1,486 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13707, 476]
-NotebookOptionsPosition[ 9038, 331]
-NotebookOutlinePosition[ 12255, 422]
-CellTagsIndexPosition[ 12136, 416]
-WindowTitle->$LorentzIndices
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$LorentzIndices\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$LorentzIndices"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
-LorentzIndices.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$171208],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$LorentzIndices", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["$LorentzIndices", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["$LorentzIndices"], "InlineFormula"],
- " \[LineSeparator]",
- "is a global variable. If set to True the dimension of LorentzIndex is \
-displayed as an index."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->346811000],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1445910327],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$LorentzIndices",
- CellID->1537148561],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "True"}], ";"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[1]:=",
- CellID->1716323912],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}]}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[2]:=",
- CellID->1846109645],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm]], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{84, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$LorentzIndices",
- CellLabel->"Out[2]=",
- CellID->988227023]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[3]:=",
- CellID->1902297841],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",", "n"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "n"}], "]"}]}], "]"}]}]], "Output",
- ImageSize->{372, 33},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$LorentzIndices",
- CellLabel->"Out[3]//StandardForm=",
- CellID->2067378900]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MTD", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], " ",
- RowBox[{"FVD", "[",
- RowBox[{"p", ",", "\[Beta]"}], "]"}],
- RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "//", "FCI"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[4]:=",
- CellID->1893710771],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- SubscriptBox[
- FormBox["\[Mu]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{118, 21},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$LorentzIndices",
- CellLabel->"Out[4]=",
- CellID->1671614812]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[5]:=",
- CellID->1327558227],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "D"}], "]"}]}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "D"}], "]"}]}], "]"}]}]], "Output",
- ImageSize->{372, 50},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$LorentzIndices",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1816548467]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "False"}], ";"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[6]:=",
- CellID->326767008]
-}, Open ]]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"$LorentzIndices",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 17.135660}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "$LorentzIndices is a global variable. If set to True the dimension of \
-LorentzIndex is displayed as an index.", "synonyms" -> {}, "title" ->
- "$LorentzIndices", "titlemodifier" -> "", "windowtitle" ->
- "$LorentzIndices", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$LorentzIndices"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3362, 94, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->346811000]},
- "$LorentzIndices"->{
- Cell[3973, 121, 84, 2, 35, "Subsubsection",
- CellTags->"$LorentzIndices",
- CellID->1537148561],
- Cell[4060, 125, 158, 5, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1716323912],
- Cell[4243, 134, 351, 10, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1846109645],
- Cell[4597, 146, 917, 38, 40, "Output",
- CellTags->"$LorentzIndices",
- CellID->988227023],
- Cell[5551, 189, 135, 4, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1902297841],
- Cell[5689, 195, 563, 17, 67, "Output",
- CellTags->"$LorentzIndices",
- CellID->2067378900],
- Cell[6289, 217, 320, 10, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1893710771],
- Cell[6612, 229, 1263, 54, 42, "Output",
- CellTags->"$LorentzIndices",
- CellID->1671614812],
- Cell[7912, 288, 135, 4, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1327558227],
- Cell[8050, 294, 761, 23, 84, "Output",
- CellTags->"$LorentzIndices",
- CellID->1816548467],
- Cell[8826, 320, 158, 5, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->326767008]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 10910, 375},
- {"$LorentzIndices", 11051, 379}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 412, 12, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3362, 94, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->346811000],
-Cell[3752, 111, 196, 6, 25, "ExampleSection",
- CellID->1445910327],
-Cell[CellGroupData[{
-Cell[3973, 121, 84, 2, 35, "Subsubsection",
- CellTags->"$LorentzIndices",
- CellID->1537148561],
-Cell[4060, 125, 158, 5, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1716323912],
-Cell[CellGroupData[{
-Cell[4243, 134, 351, 10, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1846109645],
-Cell[4597, 146, 917, 38, 40, "Output",
- CellTags->"$LorentzIndices",
- CellID->988227023]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5551, 189, 135, 4, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1902297841],
-Cell[5689, 195, 563, 17, 67, "Output",
- CellTags->"$LorentzIndices",
- CellID->2067378900]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6289, 217, 320, 10, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1893710771],
-Cell[6612, 229, 1263, 54, 42, "Output",
- CellTags->"$LorentzIndices",
- CellID->1671614812]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7912, 288, 135, 4, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->1327558227],
-Cell[8050, 294, 761, 23, 84, "Output",
- CellTags->"$LorentzIndices",
- CellID->1816548467]
-}, Open ]],
-Cell[8826, 320, 158, 5, 27, "Input",
- CellTags->"$LorentzIndices",
- CellID->326767008]
-}, Open ]]
-}, Open ]],
-Cell[9011, 329, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MIntegrate.nb
index 8cb943cc5..4b7e86943 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MIntegrate.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8821, 298]
-NotebookOptionsPosition[ 5321, 191]
-NotebookOutlinePosition[ 7881, 263]
-CellTagsIndexPosition[ 7768, 257]
+NotebookDataLength[ 9009, 296]
+NotebookOptionsPosition[ 5972, 205]
+NotebookOutlinePosition[ 8301, 270]
+CellTagsIndexPosition[ 8188, 264]
WindowTitle->$MIntegrate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$MIntegrate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$MIntegrate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPEIntegrateDelta\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPEIntegrateDelta"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$MIntegrate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$MIntegrate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
MIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$171881],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$MIntegrate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$296630],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$MIntegrate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ MIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$MIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$MIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +141,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1773590494],
+ CellID->613466333],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -117,13 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->911946191],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$MIntegrate",
- CellID->896374065],
+ CellID->452494624],
Cell[CellGroupData[{
@@ -135,28 +163,16 @@ Cell[BoxData["$MIntegrate"], "Input",
Cell[BoxData[
FormBox[
RowBox[{"{", "}"}], TraditionalForm]], "Output",
- ImageSize->{17, 15},
+ ImageSize->{16, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$MIntegrate",
CellLabel->"Out[1]=",
CellID->1034422222]
+}, Open ]]
}, Open ]],
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["OPEIntegrateDelta",
- BaseStyle->"AddOnsLink",
- ButtonData:>"OPEIntegrateDelta",
- ButtonNote->"OPEIntegrateDelta"],
- "."
-}], "Text",
- CellTags->"$MIntegrate",
- CellID->404160805],
-
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -182,9 +198,7 @@ Cell[TextData[{
ButtonNote->"OPEIntegrateDelta"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$MIntegrate",
- CellID->193164279]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -201,21 +215,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 20.236347}",
+ "built" -> "{2020, 1, 5, 19, 4, 26.063412}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"$MIntegrate is a list of integrations done by Mathematica inside \
-OPEIntegrateDelta.", "synonyms" -> {}, "title" -> "$MIntegrate",
- "titlemodifier" -> "", "windowtitle" -> "$MIntegrate", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/$MIntegrate"}, "SearchTextTranslated" -> ""},
+OPEIntegrateDelta.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "$MIntegrate", "titlemodifier" -> "", "windowtitle" -> "$MIntegrate",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/$MIntegrate"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -223,8 +238,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -233,73 +249,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3366, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4375, 128, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1773590494]},
+ CellID->613466333]},
"$MIntegrate"->{
- Cell[3977, 123, 79, 2, 35, "Subsubsection",
- CellTags->"$MIntegrate",
- CellID->896374065],
- Cell[4081, 129, 107, 3, 27, "Input",
+ Cell[5007, 157, 107, 3, 27, "Input",
CellTags->"$MIntegrate",
CellID->1439168966],
- Cell[4191, 134, 231, 8, 36, "Output",
+ Cell[5117, 162, 231, 8, 35, "Output",
CellTags->"$MIntegrate",
- CellID->1034422222],
- Cell[4437, 145, 229, 10, 32, "Text",
- CellTags->"$MIntegrate",
- CellID->404160805],
- Cell[5022, 177, 257, 9, 32, "Text",
- CellTags->"$MIntegrate",
- CellID->193164279]}
+ CellID->1034422222]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7147, 234},
- {"$MIntegrate", 7285, 238}
+ {"PrimaryExamplesSection", 7843, 250},
+ {"$MIntegrate", 7981, 254}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3033, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 440, 14, 82, "Usage",
+Cell[3619, 97, 288, 11, 45, "ObjectNameGrid"],
+Cell[3910, 110, 440, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3366, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4375, 128, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1773590494],
-Cell[3757, 113, 195, 6, 25, "ExampleSection",
- CellID->911946191],
+ CellID->613466333],
Cell[CellGroupData[{
-Cell[3977, 123, 79, 2, 35, "Subsubsection",
- CellTags->"$MIntegrate",
- CellID->896374065],
+Cell[4787, 147, 195, 6, 26, "ExampleSection",
+ CellID->452494624],
Cell[CellGroupData[{
-Cell[4081, 129, 107, 3, 27, "Input",
+Cell[5007, 157, 107, 3, 27, "Input",
CellTags->"$MIntegrate",
CellID->1439168966],
-Cell[4191, 134, 231, 8, 36, "Output",
+Cell[5117, 162, 231, 8, 35, "Output",
CellTags->"$MIntegrate",
CellID->1034422222]
-}, Open ]],
-Cell[4437, 145, 229, 10, 32, "Text",
- CellTags->"$MIntegrate",
- CellID->404160805],
-Cell[4669, 157, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]]
}, Open ]],
+Cell[5375, 174, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4749, 163, 270, 12, 31, "SeeAlsoSection",
+Cell[5443, 179, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5022, 177, 257, 9, 32, "Text",
- CellTags->"$MIntegrate",
- CellID->193164279]
+Cell[5716, 193, 214, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5294, 189, 23, 0, 42, "FooterCell"]
+Cell[5945, 203, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MU.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MU.nb
index 849664446..64068a89f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MU.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MU.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9261, 319]
-NotebookOptionsPosition[ 5787, 211]
-NotebookOutlinePosition[ 8363, 284]
-CellTagsIndexPosition[ 8258, 278]
+NotebookDataLength[ 9476, 310]
+NotebookOptionsPosition[ 6414, 218]
+NotebookOutlinePosition[ 8783, 284]
+CellTagsIndexPosition[ 8678, 278]
WindowTitle->$MU
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$MU\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$MU"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$MU.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$172228],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/$MU",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Chisholm\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Chisholm"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$MU\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$MU"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$MU.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$297071],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/$MU",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$MU", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$MU", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +143,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->941736283],
+ CellID->823558675],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,13 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1922664524],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$MU",
- CellID->1771415745],
+ CellID->2038655610],
Cell[CellGroupData[{
@@ -133,38 +164,16 @@ Cell[BoxData["$MU"], "Input",
Cell[BoxData[
FormBox["$MU", TraditionalForm]], "Output",
- ImageSize->{36, 15},
+ ImageSize->{35, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$MU",
CellLabel->"Out[1]=",
CellID->418655578]
+}, Open ]]
}, Open ]],
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["Chisholm",
- BaseStyle->"AddOnsLink",
- ButtonData:>"Chisholm",
- ButtonNote->"Chisholm"],
- ", ",
- ButtonBox["Contract",
- BaseStyle->"AddOnsLink",
- ButtonData:>"Contract",
- ButtonNote->"Contract"],
- ", ",
- ButtonBox["DiracSimplify",
- BaseStyle->"AddOnsLink",
- ButtonData:>"DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"$MU",
- CellID->265635386],
-
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -202,9 +211,7 @@ Cell[TextData[{
ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$MU",
- CellID->58635825]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -212,7 +219,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"$MU",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -221,10 +228,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 21.848260}",
+ "built" -> "{2020, 1, 5, 19, 4, 27.130561}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -232,11 +239,12 @@ TaggingRules->{
"None", "summary" ->
"$MU is the head of dummy indices which may be introduced by Chisholm, \
Contract, DiracSimplify, FermionSpinSum and various QCD functions. By default \
-it is unset, but can be set to anything.", "synonyms" -> {}, "title" -> "$MU",
- "titlemodifier" -> "", "windowtitle" -> "$MU", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$MU"}, "SearchTextTranslated" -> ""},
+it is unset, but can be set to anything.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "$MU", "titlemodifier" -> "", "windowtitle" ->
+ "$MU", "type" -> "Symbol", "uri" -> "FeynCalc/ref/$MU"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -244,8 +252,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -254,73 +263,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3384, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4552, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->941736283]},
+ CellID->823558675]},
"$MU"->{
- Cell[3995, 122, 72, 2, 35, "Subsubsection",
- CellTags->"$MU",
- CellID->1771415745],
- Cell[4092, 128, 90, 3, 27, "Input",
+ Cell[5185, 159, 90, 3, 27, "Input",
CellTags->"$MU",
CellID->816086457],
- Cell[4185, 133, 206, 7, 36, "Output",
- CellTags->"$MU",
- CellID->418655578],
- Cell[4406, 143, 429, 20, 32, "Text",
+ Cell[5278, 164, 206, 7, 35, "Output",
CellTags->"$MU",
- CellID->265635386],
- Cell[5191, 185, 554, 21, 32, "Text",
- CellTags->"$MU",
- CellID->58635825]}
+ CellID->418655578]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7688, 255},
- {"$MU", 7817, 259}
+ {"PrimaryExamplesSection", 8360, 264},
+ {"$MU", 8490, 268}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3172, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 494, 13, 97, "Usage",
+Cell[3750, 100, 280, 11, 45, "ObjectNameGrid"],
+Cell[4033, 113, 494, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3384, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4552, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->941736283],
-Cell[3774, 112, 196, 6, 25, "ExampleSection",
- CellID->1922664524],
+ CellID->823558675],
Cell[CellGroupData[{
-Cell[3995, 122, 72, 2, 35, "Subsubsection",
- CellTags->"$MU",
- CellID->1771415745],
+Cell[4964, 149, 196, 6, 26, "ExampleSection",
+ CellID->2038655610],
Cell[CellGroupData[{
-Cell[4092, 128, 90, 3, 27, "Input",
+Cell[5185, 159, 90, 3, 27, "Input",
CellTags->"$MU",
CellID->816086457],
-Cell[4185, 133, 206, 7, 36, "Output",
+Cell[5278, 164, 206, 7, 35, "Output",
CellTags->"$MU",
CellID->418655578]
-}, Open ]],
-Cell[4406, 143, 429, 20, 32, "Text",
- CellTags->"$MU",
- CellID->265635386],
-Cell[4838, 165, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]]
}, Open ]],
+Cell[5511, 175, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4918, 171, 270, 12, 31, "SeeAlsoSection",
+Cell[5579, 180, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5191, 185, 554, 21, 32, "Text",
- CellTags->"$MU",
- CellID->58635825]
+Cell[5852, 194, 520, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[5760, 209, 23, 0, 42, "FooterCell"]
+Cell[6387, 216, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MemoryAvailable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MemoryAvailable.nb
deleted file mode 100644
index ee6a862ba..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$MemoryAvailable.nb
+++ /dev/null
@@ -1,256 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8048, 246]
-NotebookOptionsPosition[ 4780, 153]
-NotebookOutlinePosition[ 7412, 222]
-CellTagsIndexPosition[ 7294, 216]
-WindowTitle->$MemoryAvailable
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$MemoryAvailable\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$MemoryAvailable"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
-MemoryAvailable.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$171546],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$MemoryAvailable", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["$MemoryAvailable", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["$MemoryAvailable"], "InlineFormula"],
- " \[LineSeparator]",
- "is a global variable which is set to an integer ",
- StyleBox["n",
- FontSlant->"Italic"],
- ", where ",
- StyleBox["n",
- FontSlant->"Italic"],
- " is the available amount of main memory in MB. The default is 128. It \
-should be increased if possible. The higher $MemoryAvailable can be, the more \
-intermediate steps do not have to be repeated by FeynCalc."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->512773512],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1833099213],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$MemoryAvailable",
- CellID->343639326],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["$MemoryAvailable"], "Input",
- CellTags->"$MemoryAvailable",
- CellLabel->"In[1]:=",
- CellID->695439641],
-
-Cell[BoxData[
- FormBox["4096", TraditionalForm]], "Output",
- ImageSize->{33, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$MemoryAvailable",
- CellLabel->"Out[1]=",
- CellID->1467745985]
-}, Open ]]
-}, Open ]]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"$MemoryAvailable",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 18.689783}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "$MemoryAvailable is a global variable which is set to an integer n, \
-where n is the available amount of main memory in MB. The default is 128. It \
-should be increased if possible. The higher $MemoryAvailable can be, the more \
-intermediate steps do not have to be repeated by FeynCalc.", "synonyms" -> {},
- "title" -> "$MemoryAvailable", "titlemodifier" -> "", "windowtitle" ->
- "$MemoryAvailable", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$MemoryAvailable"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3654, 101, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->512773512]},
- "$MemoryAvailable"->{
- Cell[4265, 128, 84, 2, 35, "Subsubsection",
- CellTags->"$MemoryAvailable",
- CellID->343639326],
- Cell[4374, 134, 116, 3, 27, "Input",
- CellTags->"$MemoryAvailable",
- CellID->695439641],
- Cell[4493, 139, 221, 7, 36, "Output",
- CellTags->"$MemoryAvailable",
- CellID->1467745985]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 6833, 199},
- {"$MemoryAvailable", 6976, 203}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 698, 19, 112, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3654, 101, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->512773512],
-Cell[4044, 118, 196, 6, 25, "ExampleSection",
- CellID->1833099213],
-Cell[CellGroupData[{
-Cell[4265, 128, 84, 2, 35, "Subsubsection",
- CellTags->"$MemoryAvailable",
- CellID->343639326],
-Cell[CellGroupData[{
-Cell[4374, 134, 116, 3, 27, "Input",
- CellTags->"$MemoryAvailable",
- CellID->695439641],
-Cell[4493, 139, 221, 7, 36, "Output",
- CellTags->"$MemoryAvailable",
- CellID->1467745985]
-}, Open ]]
-}, Open ]]
-}, Open ]],
-Cell[4753, 151, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$NonComm.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$NonComm.nb
index 5231b1ff2..80a4768ff 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$NonComm.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$NonComm.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9247, 299]
-NotebookOptionsPosition[ 5969, 198]
-NotebookOutlinePosition[ 8397, 267]
-CellTagsIndexPosition[ 8287, 261]
+NotebookDataLength[ 10102, 314]
+NotebookOptionsPosition[ 7154, 226]
+NotebookOutlinePosition[ 9415, 289]
+CellTagsIndexPosition[ 9305, 283]
WindowTitle->$NonComm
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$NonComm\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$NonComm"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$NonComm.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"NonCommQ\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/NonCommQ"], "\<\"NonCommutative\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/NonCommutative"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$NonComm\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$NonComm"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$NonComm.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$172569],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$NonComm", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$297507],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$NonComm", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,14 +96,23 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$NonComm", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$NonComm", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["$NonComm"], "InlineFormula"],
- " \[LineSeparator]",
- "contains a list of all non-commutative heads present."
+ " \[LineSeparator]contains a list of all noncommutative heads present."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -106,7 +138,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1491486043],
+ CellID->1285384359],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -114,13 +148,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->249210430],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$NonComm",
- CellID->2045411989],
+ CellID->1652586844],
Cell[CellGroupData[{
@@ -133,31 +161,33 @@ Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- "ChiralityProjector", ",", "DiracGamma", ",", "DiracGammaT", ",",
- "DiracMatrix", ",", "DiracSigma", ",", "DiracSlash", ",", "DiracSpinor",
- ",", "GA", ",",
+ "ChiralityProjector", ",", "DiracGamma", ",", "DiracMatrix", ",",
+ "DiracSigma", ",", "DiracSlash", ",", "Spinor", ",", "GA", ",",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]], ",", "GAD", ",", "GAE", ",", "GS", ",", "GSD", ",",
"GSE", ",", "LeftPartialD", ",", "LeftRightPartialD", ",",
- "LeftRightPartialD2", ",", "FCPartialD", ",", "PauliSigma", ",",
+ "LeftRightPartialD2", ",", "FCPartialD", ",", "OPESum", ",",
"QuantumField", ",", "RightPartialD", ",", "Spinor", ",", "SpinorU", ",",
- "SpinorUBar", ",", "SpinorV", ",", "SpinorVBar", ",", "SUNT", ",", "C",
- ",", "CovariantD", ",", "OPESum", ",", "FieldStrength", ",",
- "QuarkGluonVertex", ",", "QuarkPropagator", ",", "Twist2AlienOperator",
- ",", "Twist2CounterOperator", ",", "Twist2QuarkOperator"}], "}"}],
+ "SpinorUBar", ",", "SpinorV", ",", "SpinorVBar", ",", "SUNT", ",",
+ "PauliSigma", ",", "PauliXi", ",", "PauliEta", ",", "TGA", ",", "CGA",
+ ",", "CGAD", ",", "CGAE", ",", "CGS", ",", "CGSD", ",", "CGSE", ",", "SI",
+ ",", "SID", ",", "SIE", ",", "CSI", ",", "CSID", ",", "CSIE", ",",
+ "FeynCalc`Package`dotsimpHold", ",", "FCChargeConjugateTransposed", ",",
+ "CovariantD", ",", "FieldStrength", ",", "QuarkGluonVertex", ",",
+ "QuarkPropagator", ",", "Twist2AlienOperator", ",",
+ "Twist2CounterOperator", ",", "Twist2QuarkOperator"}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{505, 118},
+ ImageSize->{571, 141},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$NonComm",
- CellLabel->"Out[1]=",
- CellID->1539262372]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -189,9 +219,7 @@ Cell[TextData[{
ButtonNote->"NonCommutative"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"$NonComm",
- CellID->1040108898]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -199,7 +227,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"$NonComm",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -208,21 +236,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 23.412519}",
+ "built" -> "{2020, 1, 5, 19, 4, 28.233456}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "$NonComm contains a list of all non-commutative heads present.",
- "synonyms" -> {}, "title" -> "$NonComm", "titlemodifier" -> "",
- "windowtitle" -> "$NonComm", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$NonComm"}, "SearchTextTranslated" -> ""},
+ "$NonComm contains a list of all noncommutative heads present.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$NonComm",
+ "titlemodifier" -> "", "windowtitle" -> "$NonComm", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/$NonComm"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -230,8 +258,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -240,67 +269,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3271, 93, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4350, 125, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1491486043]},
+ CellID->1285384359]},
"$NonComm"->{
- Cell[3882, 120, 77, 2, 35, "Subsubsection",
- CellTags->"$NonComm",
- CellID->2045411989],
- Cell[3984, 126, 101, 3, 27, "Input",
+ Cell[4984, 154, 101, 3, 27, "Input",
CellTags->"$NonComm",
CellID->1876740578],
- Cell[4088, 131, 1066, 24, 139, "Output",
- CellTags->"$NonComm",
- CellID->1539262372],
- Cell[5522, 178, 405, 15, 31, "Text",
- CellTags->"$NonComm",
- CellID->1040108898]}
+ Cell[5088, 159, 1292, 26, 162, "Output",
+ CellTags->"$NonComm"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7765, 241},
- {"$NonComm", 7900, 245}
+ {"PrimaryExamplesSection", 8988, 270},
+ {"$NonComm", 9124, 274}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3100, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 364, 11, 82, "Usage",
+Cell[3683, 98, 285, 11, 45, "ObjectNameGrid"],
+Cell[3971, 111, 354, 10, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3271, 93, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4350, 125, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1491486043],
-Cell[3662, 110, 195, 6, 25, "ExampleSection",
- CellID->249210430],
+ CellID->1285384359],
Cell[CellGroupData[{
-Cell[3882, 120, 77, 2, 35, "Subsubsection",
- CellTags->"$NonComm",
- CellID->2045411989],
+Cell[4763, 144, 196, 6, 26, "ExampleSection",
+ CellID->1652586844],
Cell[CellGroupData[{
-Cell[3984, 126, 101, 3, 27, "Input",
+Cell[4984, 154, 101, 3, 27, "Input",
CellTags->"$NonComm",
CellID->1876740578],
-Cell[4088, 131, 1066, 24, 139, "Output",
- CellTags->"$NonComm",
- CellID->1539262372]
-}, Open ]],
-Cell[5169, 158, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5088, 159, 1292, 26, 162, "Output",
+ CellTags->"$NonComm"]
}, Open ]]
}, Open ]],
+Cell[6407, 189, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[5249, 164, 270, 12, 31, "SeeAlsoSection",
+Cell[6475, 194, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5522, 178, 405, 15, 31, "Text",
- CellTags->"$NonComm",
- CellID->1040108898]
+Cell[6748, 208, 364, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5942, 196, 23, 0, 42, "FooterCell"]
+Cell[7127, 224, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$PairBrackets.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$PairBrackets.nb
deleted file mode 100644
index c51a17925..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$PairBrackets.nb
+++ /dev/null
@@ -1,457 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12549, 447]
-NotebookOptionsPosition[ 7931, 300]
-NotebookOutlinePosition[ 11095, 391]
-CellTagsIndexPosition[ 10980, 385]
-WindowTitle->$PairBrackets
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$PairBrackets\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$PairBrackets"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
-PairBrackets.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$172904],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$PairBrackets", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["$PairBrackets", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["$PairBrackets"], "InlineFormula"],
- " \[LineSeparator]",
- "determines whether brackets are drawn around scalar products in the \
-notebook interface."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1920407048],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->647383568],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$PairBrackets",
- CellID->1808422763],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["$PairBrackets"], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[1]:=",
- CellID->1003413520],
-
-Cell[BoxData[
- FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$PairBrackets",
- CellLabel->"Out[1]=",
- CellID->639679557]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{"p", ",", "q"}], "]"}],
- RowBox[{"SP", "[",
- RowBox[{"r", ",", "s"}], "]"}]}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[2]:=",
- CellID->768283968],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["s",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{92, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$PairBrackets",
- CellLabel->"Out[2]=",
- CellID->150154476]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"$PairBrackets", "=", "True"}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[3]:=",
- CellID->2050781191],
-
-Cell[BoxData[
- FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$PairBrackets",
- CellLabel->"Out[3]=",
- CellID->1935357180]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{"p", ",", "q"}], "]"}],
- RowBox[{"SP", "[",
- RowBox[{"r", ",", "s"}], "]"}]}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[4]:=",
- CellID->759242831],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["s",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{128, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$PairBrackets",
- CellLabel->"Out[4]=",
- CellID->251865328]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"$PairBrackets", "=", "False"}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[5]:=",
- CellID->1858587379],
-
-Cell[BoxData[
- FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"$PairBrackets",
- CellLabel->"Out[5]=",
- CellID->8691638]
-}, Open ]]
-}, Open ]]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"$PairBrackets",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 24.989520}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "$PairBrackets determines whether brackets are drawn around scalar \
-products in the notebook interface.", "synonyms" -> {}, "title" ->
- "$PairBrackets", "titlemodifier" -> "", "windowtitle" -> "$PairBrackets",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/$PairBrackets"},
- "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3343, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1920407048]},
- "$PairBrackets"->{
- Cell[3954, 121, 82, 2, 35, "Subsubsection",
- CellTags->"$PairBrackets",
- CellID->1808422763],
- Cell[4061, 127, 111, 3, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->1003413520],
- Cell[4175, 132, 218, 7, 36, "Output",
- CellTags->"$PairBrackets",
- CellID->639679557],
- Cell[4430, 144, 221, 8, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->768283968],
- Cell[4654, 154, 975, 40, 39, "Output",
- CellTags->"$PairBrackets",
- CellID->150154476],
- Cell[5666, 199, 136, 4, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->2050781191],
- Cell[5805, 205, 218, 7, 36, "Output",
- CellTags->"$PairBrackets",
- CellID->1935357180],
- Cell[6060, 217, 221, 8, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->759242831],
- Cell[6284, 227, 1188, 48, 39, "Output",
- CellTags->"$PairBrackets",
- CellID->251865328],
- Cell[7509, 280, 137, 4, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->1858587379],
- Cell[7649, 286, 216, 7, 36, "Output",
- CellTags->"$PairBrackets",
- CellID->8691638]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 9786, 344},
- {"$PairBrackets", 9926, 348}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[585, 21, 2266, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2854, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 405, 12, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3343, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1920407048],
-Cell[3734, 111, 195, 6, 25, "ExampleSection",
- CellID->647383568],
-Cell[CellGroupData[{
-Cell[3954, 121, 82, 2, 35, "Subsubsection",
- CellTags->"$PairBrackets",
- CellID->1808422763],
-Cell[CellGroupData[{
-Cell[4061, 127, 111, 3, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->1003413520],
-Cell[4175, 132, 218, 7, 36, "Output",
- CellTags->"$PairBrackets",
- CellID->639679557]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4430, 144, 221, 8, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->768283968],
-Cell[4654, 154, 975, 40, 39, "Output",
- CellTags->"$PairBrackets",
- CellID->150154476]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5666, 199, 136, 4, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->2050781191],
-Cell[5805, 205, 218, 7, 36, "Output",
- CellTags->"$PairBrackets",
- CellID->1935357180]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6060, 217, 221, 8, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->759242831],
-Cell[6284, 227, 1188, 48, 39, "Output",
- CellTags->"$PairBrackets",
- CellID->251865328]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7509, 280, 137, 4, 27, "Input",
- CellTags->"$PairBrackets",
- CellID->1858587379],
-Cell[7649, 286, 216, 7, 36, "Output",
- CellTags->"$PairBrackets",
- CellID->8691638]
-}, Open ]]
-}, Open ]]
-}, Open ]],
-Cell[7904, 298, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$RenameFeynCalcObjects.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$RenameFeynCalcObjects.nb
new file mode 100644
index 000000000..26c17673c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$RenameFeynCalcObjects.nb
@@ -0,0 +1,236 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 7885, 227]
+NotebookOptionsPosition[ 5460, 163]
+NotebookOutlinePosition[ 7516, 214]
+CellTagsIndexPosition[ 7473, 211]
+WindowTitle->$RenameFeynCalcObjects
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/$RenameFeynCalcObjects\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/$RenameFeynCalcObjects"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/$\
+RenameFeynCalcObjects.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$297942],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/$RenameFeynCalcObjects", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["$RenameFeynCalcObjects", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"$RenameFeynCalcObjects", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]specifies a List of replacement rules that allow to \
+rename FeynCalc objects on the run to avoid conflicts with other package \
+before FeynCalc is loaded (monkey patching). The value of \
+$RenameFeynCalcObjects must be specified before loading FeynCalc"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The following code (when executed on a fresh kernel with the last two lines \
+uncommented) allows to load FeynCalc and Roman Lee's LiteRed on the same \
+kernel without shadowing issues\
+\>", "Notes",
+ CellID->379603153],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"$RenameFeynCalcObjects", "=",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"\"\\"", "\[Rule]", "\"\\""}],
+ ",",
+ RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",",
+ RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "}"}]}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{"(*",
+ RowBox[{"<<", "FeynCalc`"}], "*)"}]}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"(*",
+ RowBox[{"<<", "LiteRed`"}], "*)"}]}]}], "Input",
+ CellID->1698473390]
+}, Closed]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"$RenameFeynCalcObjects",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 29.304776}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "$RenameFeynCalcObjects[] specifies a List of replacement rules that \
+allow to rename FeynCalc objects on the run to avoid conflicts with other \
+package before FeynCalc is loaded (monkey patching). The value of \
+$RenameFeynCalcObjects must be specified before loading FeynCalc",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "$RenameFeynCalcObjects",
+ "titlemodifier" -> "", "windowtitle" -> "$RenameFeynCalcObjects", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/$RenameFeynCalcObjects"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[594, 21, 2330, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2927, 76, 299, 11, 70, "ObjectNameGrid"],
+Cell[3229, 89, 596, 14, 70, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3850, 107, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[4583, 133, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4617, 135, 229, 5, 70, "Notes",
+ CellID->379603153],
+Cell[4849, 142, 569, 16, 70, "Input",
+ CellID->1698473390]
+}, Closed]],
+Cell[5433, 161, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$SpinorMinimal.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$SpinorMinimal.nb
deleted file mode 100644
index efe06f121..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$SpinorMinimal.nb
+++ /dev/null
@@ -1,200 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6360, 191]
-NotebookOptionsPosition[ 3997, 123]
-NotebookOutlinePosition[ 6094, 180]
-CellTagsIndexPosition[ 6018, 175]
-WindowTitle->$SpinorMinimal
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/$SpinorMinimal\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/$SpinorMinimal"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/$\
-SpinorMinimal.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$173240],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/$SpinorMinimal", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["$SpinorMinimal", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["$SpinorMinimal"], "InlineFormula"],
- " \[LineSeparator]",
- "is a global switch for an additional simplification attempt in \
-DiracSimplify for more than one Spinor-line. The default is False, since \
-otherwise it costs too much time."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"$SpinorMinimal",
- CellID->329467642]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"$SpinorMinimal",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 26.612519}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "$SpinorMinimal is a global switch for an additional simplification \
-attempt in DiracSimplify for more than one Spinor-line. The default is False, \
-since otherwise it costs too much time.", "synonyms" -> {}, "title" ->
- "$SpinorMinimal", "titlemodifier" -> "", "windowtitle" ->
- "$SpinorMinimal", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/$SpinorMinimal"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "$SpinorMinimal"->{
- Cell[3707, 109, 248, 9, 70, "Text",
- CellTags->"$SpinorMinimal",
- CellID->329467642]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"$SpinorMinimal", 5902, 168}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 490, 13, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3434, 95, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3707, 109, 248, 9, 70, "Text",
- CellTags->"$SpinorMinimal",
- CellID->329467642]
-}, Open ]],
-Cell[3970, 121, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$VeryVerbose.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$VeryVerbose.nb
index ac354744b..644834116 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/$VeryVerbose.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/$VeryVerbose.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13754, 465]
-NotebookOptionsPosition[ 8115, 285]
-NotebookOutlinePosition[ 11872, 395]
-CellTagsIndexPosition[ 11756, 389]
+NotebookDataLength[ 13776, 466]
+NotebookOptionsPosition[ 8296, 292]
+NotebookOutlinePosition[ 11997, 400]
+CellTagsIndexPosition[ 11881, 394]
WindowTitle->$VeryVerbose
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ VeryVerbose.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$173585],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$298379],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/$VeryVerbose", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ VeryVerbose.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["$VeryVerbose", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["$VeryVerbose", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +119,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1051520274],
+ CellID->1852257957],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,13 +129,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->313296919],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"$VeryVerbose",
- CellID->61376549],
+ CellID->1682360856],
Cell[CellGroupData[{
@@ -133,7 +140,7 @@ Cell[BoxData["$VeryVerbose"], "Input",
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"$VeryVerbose",
@@ -286,7 +293,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"$VeryVerbose",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -295,10 +302,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 27.879889}",
+ "built" -> "{2020, 1, 5, 19, 4, 30.267116}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -306,12 +313,12 @@ TaggingRules->{
"None", "summary" ->
"$VeryVerbose is a global variable with default setting 0. If set to 1, \
2, ..., less and more intermediate comments and informations are displayed \
-during calculations.", "synonyms" -> {}, "title" -> "$VeryVerbose",
- "titlemodifier" -> "", "windowtitle" -> "$VeryVerbose", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/$VeryVerbose"}, "SearchTextTranslated" ->
- ""},
+during calculations.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "$VeryVerbose", "titlemodifier" -> "", "windowtitle" -> "$VeryVerbose",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/$VeryVerbose"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -319,8 +326,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -329,144 +337,137 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3404, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3666, 106, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1051520274]},
+ CellID->1852257957]},
"$VeryVerbose"->{
- Cell[4015, 122, 79, 2, 35, "Subsubsection",
- CellTags->"$VeryVerbose",
- CellID->61376549],
- Cell[4119, 128, 107, 3, 27, "Input",
+ Cell[4300, 135, 107, 3, 27, "Input",
CellTags->"$VeryVerbose",
CellID->32384538],
- Cell[4229, 133, 213, 7, 36, "Output",
+ Cell[4410, 140, 213, 7, 35, "Output",
CellTags->"$VeryVerbose",
CellID->108969208],
- Cell[4457, 143, 159, 5, 27, "Input",
+ Cell[4638, 150, 159, 5, 27, "Input",
CellTags->"$VeryVerbose",
CellID->1791846668],
- Cell[4641, 152, 304, 11, 27, "Input",
+ Cell[4822, 159, 304, 11, 27, "Input",
CellTags->"$VeryVerbose",
CellID->836037655],
- Cell[4970, 167, 164, 4, 23, "Print",
+ Cell[5151, 174, 164, 4, 24, "Print",
CellTags->"$VeryVerbose",
CellID->862952163],
- Cell[5137, 173, 331, 9, 23, "Print",
+ Cell[5318, 180, 331, 9, 24, "Print",
CellTags->"$VeryVerbose",
CellID->1766474446],
- Cell[5471, 184, 165, 4, 23, "Print",
+ Cell[5652, 191, 165, 4, 22, "Print",
CellTags->"$VeryVerbose",
CellID->213277068],
- Cell[5639, 190, 320, 9, 23, "Print",
+ Cell[5820, 197, 320, 9, 24, "Print",
CellTags->"$VeryVerbose",
CellID->1505382833],
- Cell[5962, 201, 337, 9, 23, "Print",
+ Cell[6143, 208, 337, 9, 24, "Print",
CellTags->"$VeryVerbose",
CellID->314971425],
- Cell[6302, 212, 261, 8, 23, "Print",
+ Cell[6483, 219, 261, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->396106533],
- Cell[6566, 222, 261, 8, 23, "Print",
+ Cell[6747, 229, 261, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->398041849],
- Cell[6830, 232, 262, 8, 23, "Print",
+ Cell[7011, 239, 262, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->2061966610],
- Cell[7095, 242, 261, 8, 23, "Print",
+ Cell[7276, 249, 261, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->341728577],
- Cell[7359, 252, 262, 8, 23, "Print",
+ Cell[7540, 259, 262, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->1928467842],
- Cell[7624, 262, 262, 8, 23, "Print",
+ Cell[7805, 269, 262, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->1801016605],
- Cell[7913, 274, 148, 5, 27, "Input",
+ Cell[8094, 281, 148, 5, 27, "Input",
CellTags->"$VeryVerbose",
CellID->153803702]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10033, 330},
- {"$VeryVerbose", 10172, 334}
+ {"PrimaryExamplesSection", 10254, 338},
+ {"$VeryVerbose", 10394, 342}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 2290, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 472, 13, 97, "Usage",
+Cell[2877, 76, 289, 11, 45, "ObjectNameGrid"],
+Cell[3169, 89, 472, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3404, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3666, 106, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1051520274],
-Cell[3795, 112, 195, 6, 25, "ExampleSection",
- CellID->313296919],
+ CellID->1852257957],
Cell[CellGroupData[{
-Cell[4015, 122, 79, 2, 35, "Subsubsection",
- CellTags->"$VeryVerbose",
- CellID->61376549],
+Cell[4079, 125, 196, 6, 26, "ExampleSection",
+ CellID->1682360856],
Cell[CellGroupData[{
-Cell[4119, 128, 107, 3, 27, "Input",
+Cell[4300, 135, 107, 3, 27, "Input",
CellTags->"$VeryVerbose",
CellID->32384538],
-Cell[4229, 133, 213, 7, 36, "Output",
+Cell[4410, 140, 213, 7, 35, "Output",
CellTags->"$VeryVerbose",
CellID->108969208]
}, Open ]],
-Cell[4457, 143, 159, 5, 27, "Input",
+Cell[4638, 150, 159, 5, 27, "Input",
CellTags->"$VeryVerbose",
CellID->1791846668],
Cell[CellGroupData[{
-Cell[4641, 152, 304, 11, 27, "Input",
+Cell[4822, 159, 304, 11, 27, "Input",
CellTags->"$VeryVerbose",
CellID->836037655],
Cell[CellGroupData[{
-Cell[4970, 167, 164, 4, 23, "Print",
+Cell[5151, 174, 164, 4, 24, "Print",
CellTags->"$VeryVerbose",
CellID->862952163],
-Cell[5137, 173, 331, 9, 23, "Print",
+Cell[5318, 180, 331, 9, 24, "Print",
CellTags->"$VeryVerbose",
CellID->1766474446],
-Cell[5471, 184, 165, 4, 23, "Print",
+Cell[5652, 191, 165, 4, 22, "Print",
CellTags->"$VeryVerbose",
CellID->213277068],
-Cell[5639, 190, 320, 9, 23, "Print",
+Cell[5820, 197, 320, 9, 24, "Print",
CellTags->"$VeryVerbose",
CellID->1505382833],
-Cell[5962, 201, 337, 9, 23, "Print",
+Cell[6143, 208, 337, 9, 24, "Print",
CellTags->"$VeryVerbose",
CellID->314971425],
-Cell[6302, 212, 261, 8, 23, "Print",
+Cell[6483, 219, 261, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->396106533],
-Cell[6566, 222, 261, 8, 23, "Print",
+Cell[6747, 229, 261, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->398041849],
-Cell[6830, 232, 262, 8, 23, "Print",
+Cell[7011, 239, 262, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->2061966610],
-Cell[7095, 242, 261, 8, 23, "Print",
+Cell[7276, 249, 261, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->341728577],
-Cell[7359, 252, 262, 8, 23, "Print",
+Cell[7540, 259, 262, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->1928467842],
-Cell[7624, 262, 262, 8, 23, "Print",
+Cell[7805, 269, 262, 8, 22, "Print",
CellTags->"$VeryVerbose",
CellID->1801016605]
}, Open ]]
}, Open ]],
-Cell[7913, 274, 148, 5, 27, "Input",
+Cell[8094, 281, 148, 5, 27, "Input",
CellTags->"$VeryVerbose",
CellID->153803702]
}, Open ]]
}, Open ]],
-Cell[8088, 283, 23, 0, 70, "FooterCell"]
+Cell[8269, 290, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0.nb
index 1d8558816..d97e41c89 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13529, 515]
-NotebookOptionsPosition[ 8495, 340]
-NotebookOutlinePosition[ 11746, 442]
-CellTagsIndexPosition[ 11640, 436]
+NotebookDataLength[ 14255, 528]
+NotebookOptionsPosition[ 9594, 369]
+NotebookOutlinePosition[ 12591, 462]
+CellTagsIndexPosition[ 12485, 456]
WindowTitle->A0
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/A0\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/A0"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/A0.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$15154],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/A0",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"C0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/C0"], "\<\"D0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/D0"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/A0\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/A0"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/A0.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$19146],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/A0",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["A0", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["A0", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1998129281],
+ CellID->1555578576],
Cell[CellGroupData[{
@@ -122,7 +157,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1924683111],
+ CellID->1015792116],
Cell[CellGroupData[{
@@ -137,7 +172,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"A0ToB0", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{119, 15},
+ ImageSize->{115, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"A0",
@@ -155,9 +190,7 @@ Cell[TextData[{
FormBox[
SubscriptBox["B", "0"], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"A0",
- CellID->1026580483],
+}], "Notes"],
Cell[CellGroupData[{
@@ -177,7 +210,7 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{58, 21},
+ ImageSize->{59, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"A0",
@@ -220,7 +253,7 @@ Cell[BoxData[
HoldForm],
TraditionalForm]}], "+",
SuperscriptBox["m", "2"]}], TraditionalForm]], "Output",
- ImageSize->{164, 21},
+ ImageSize->{172, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"A0",
@@ -244,9 +277,7 @@ Cell[TextData[{
RowBox[{
SubscriptBox["A", "0"], "(", "0", ")"}], TraditionalForm]]],
" is set to 0."
-}], "Text",
- CellTags->"A0",
- CellID->1221823578],
+}], "Notes"],
Cell[CellGroupData[{
@@ -258,7 +289,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"A0",
@@ -278,7 +309,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"A0",
@@ -331,9 +362,7 @@ Cell[TextData[{
ButtonNote->"PaVe"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"A0",
- CellID->70965860]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -350,21 +379,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 15, 58.864970}",
+ "built" -> "{2020, 1, 5, 18, 52, 25.309540}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"A0[m^2] is the Passarino-Veltman one-point integral A0.",
- "synonyms" -> {}, "title" -> "A0", "titlemodifier" -> "", "windowtitle" ->
- "A0", "type" -> "Symbol", "uri" -> "FeynCalc/ref/A0"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "A0", "titlemodifier" ->
+ "", "windowtitle" -> "A0", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/A0"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -373,7 +402,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -382,141 +411,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3401, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4607, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1998129281]},
+ CellID->1555578576]},
"A0"->{
- Cell[4035, 128, 127, 4, 27, "Input",
+ Cell[5241, 163, 127, 4, 27, "Input",
CellTags->"A0",
CellID->2057887955],
- Cell[4165, 134, 268, 10, 36, "Output",
+ Cell[5371, 169, 268, 10, 35, "Output",
CellTags->"A0",
CellID->542622550],
- Cell[4448, 147, 267, 12, 33, "Text",
- CellTags->"A0",
- CellID->1026580483],
- Cell[4740, 163, 140, 5, 31, "Input",
+ Cell[5909, 196, 140, 5, 33, "Input",
CellTags->"A0",
CellID->1031510571],
- Cell[4883, 170, 359, 14, 42, "Output",
+ Cell[6052, 203, 359, 14, 42, "Output",
CellTags->"A0",
CellID->575686779],
- Cell[5257, 187, 205, 7, 27, "Input",
+ Cell[6426, 220, 205, 7, 27, "Input",
CellTags->"A0",
CellID->756011783],
- Cell[5487, 198, 139, 5, 31, "Input",
+ Cell[6656, 231, 139, 5, 33, "Input",
CellTags->"A0",
CellID->120916988],
- Cell[5629, 205, 587, 22, 42, "Output",
+ Cell[6798, 238, 587, 22, 42, "Output",
CellTags->"A0",
CellID->1401567293],
- Cell[6231, 230, 207, 7, 27, "Input",
+ Cell[7400, 263, 207, 7, 27, "Input",
CellTags->"A0",
CellID->2110559283],
- Cell[6441, 239, 243, 9, 33, "Text",
- CellTags->"A0",
- CellID->1221823578],
- Cell[6709, 252, 116, 4, 27, "Input",
+ Cell[7841, 283, 116, 4, 27, "Input",
CellTags->"A0",
CellID->2090810903],
- Cell[6828, 258, 203, 7, 36, "Output",
+ Cell[7960, 289, 203, 7, 35, "Output",
CellTags->"A0",
CellID->482521519],
- Cell[7068, 270, 180, 6, 27, "Input",
+ Cell[8200, 301, 180, 6, 27, "Input",
CellTags->"A0",
CellID->1362180972],
- Cell[7251, 278, 203, 7, 36, "Output",
+ Cell[8383, 309, 203, 7, 35, "Output",
CellTags->"A0",
- CellID->359954026],
- Cell[7822, 308, 631, 27, 31, "Text",
- CellTags->"A0",
- CellID->70965860]}
+ CellID->359954026]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10258, 383},
- {"A0", 10387, 387}
+ {"PrimaryExamplesSection", 11345, 412},
+ {"A0", 11475, 416}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3205, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 518, 17, 84, "Usage",
+Cell[3782, 100, 279, 11, 45, "ObjectNameGrid"],
+Cell[4064, 113, 518, 17, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3401, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4607, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1998129281],
+ CellID->1555578576],
Cell[CellGroupData[{
-Cell[3814, 118, 196, 6, 25, "ExampleSection",
- CellID->1924683111],
+Cell[5020, 153, 196, 6, 26, "ExampleSection",
+ CellID->1015792116],
Cell[CellGroupData[{
-Cell[4035, 128, 127, 4, 27, "Input",
+Cell[5241, 163, 127, 4, 27, "Input",
CellTags->"A0",
CellID->2057887955],
-Cell[4165, 134, 268, 10, 36, "Output",
+Cell[5371, 169, 268, 10, 35, "Output",
CellTags->"A0",
CellID->542622550]
}, Open ]],
-Cell[4448, 147, 267, 12, 33, "Text",
- CellTags->"A0",
- CellID->1026580483],
+Cell[5654, 182, 230, 10, 33, "Notes"],
Cell[CellGroupData[{
-Cell[4740, 163, 140, 5, 31, "Input",
+Cell[5909, 196, 140, 5, 33, "Input",
CellTags->"A0",
CellID->1031510571],
-Cell[4883, 170, 359, 14, 42, "Output",
+Cell[6052, 203, 359, 14, 42, "Output",
CellTags->"A0",
CellID->575686779]
}, Open ]],
-Cell[5257, 187, 205, 7, 27, "Input",
+Cell[6426, 220, 205, 7, 27, "Input",
CellTags->"A0",
CellID->756011783],
Cell[CellGroupData[{
-Cell[5487, 198, 139, 5, 31, "Input",
+Cell[6656, 231, 139, 5, 33, "Input",
CellTags->"A0",
CellID->120916988],
-Cell[5629, 205, 587, 22, 42, "Output",
+Cell[6798, 238, 587, 22, 42, "Output",
CellTags->"A0",
CellID->1401567293]
}, Open ]],
-Cell[6231, 230, 207, 7, 27, "Input",
+Cell[7400, 263, 207, 7, 27, "Input",
CellTags->"A0",
CellID->2110559283],
-Cell[6441, 239, 243, 9, 33, "Text",
- CellTags->"A0",
- CellID->1221823578],
+Cell[7610, 272, 206, 7, 33, "Notes"],
Cell[CellGroupData[{
-Cell[6709, 252, 116, 4, 27, "Input",
+Cell[7841, 283, 116, 4, 27, "Input",
CellTags->"A0",
CellID->2090810903],
-Cell[6828, 258, 203, 7, 36, "Output",
+Cell[7960, 289, 203, 7, 35, "Output",
CellTags->"A0",
CellID->482521519]
}, Open ]],
Cell[CellGroupData[{
-Cell[7068, 270, 180, 6, 27, "Input",
+Cell[8200, 301, 180, 6, 27, "Input",
CellTags->"A0",
CellID->1362180972],
-Cell[7251, 278, 203, 7, 36, "Output",
+Cell[8383, 309, 203, 7, 35, "Output",
CellTags->"A0",
CellID->359954026]
}, Open ]]
}, Open ]],
-Cell[7481, 289, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8613, 320, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7549, 294, 270, 12, 31, "SeeAlsoSection",
+Cell[8681, 325, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7822, 308, 631, 27, 31, "Text",
- CellTags->"A0",
- CellID->70965860]
+Cell[8954, 339, 598, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[8468, 338, 23, 0, 42, "FooterCell"]
+Cell[9567, 367, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0ToB0.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0ToB0.nb
index 474ef05fb..6d0afcb0c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0ToB0.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/A0ToB0.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10158, 366]
-NotebookOptionsPosition[ 6717, 259]
-NotebookOutlinePosition[ 9237, 331]
-CellTagsIndexPosition[ 9129, 325]
+NotebookDataLength[ 10315, 347]
+NotebookOptionsPosition[ 7320, 257]
+NotebookOutlinePosition[ 9615, 321]
+CellTagsIndexPosition[ 9507, 315]
WindowTitle->A0ToB0
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/A0ToB0\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/A0ToB0"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/A0ToB0.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"A0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/A0"], "\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"C0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/C0"], "\<\"D0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/D0"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/A0ToB0\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/A0ToB0"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/A0ToB0.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$15512],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/A0ToB0",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$19599],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/A0ToB0", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["A0ToB0", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["A0ToB0", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -130,7 +166,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2052047591],
+ CellID->848113550],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -138,13 +176,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1955337335],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"A0ToB0",
- CellID->2064085766],
+ CellID->397079176],
Cell[CellGroupData[{
@@ -159,48 +191,16 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"A0ToB0", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{119, 15},
+ ImageSize->{115, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"A0ToB0",
CellLabel->"Out[1]=",
CellID->1727801355]
+}, Open ]]
}, Open ]],
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["A0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"A0",
- ButtonNote->"A0"],
- ", ",
- ButtonBox["B0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"B0",
- ButtonNote->"B0"],
- ", ",
- ButtonBox["C0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"C0",
- ButtonNote->"C0"],
- ", ",
- ButtonBox["D0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"D0",
- ButtonNote->"D0"],
- ", ",
- ButtonBox["PaVe",
- BaseStyle->"AddOnsLink",
- ButtonData:>"PaVe",
- ButtonNote->"PaVe"],
- "."
-}], "Text",
- CellTags->"A0ToB0",
- CellID->1120307520],
-
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -250,9 +250,7 @@ Cell[TextData[{
ButtonNote->"PaVe"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"A0ToB0",
- CellID->1722982066]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -260,7 +258,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"A0ToB0",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -269,21 +267,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 0.761609}",
+ "built" -> "{2020, 1, 5, 18, 52, 27.616744}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"A0ToB0 is an option for A0. If set to True, A0[m^2] is expressed by (1 + \
-B0[0, m^2, m^2]) m^2.", "synonyms" -> {}, "title" -> "A0ToB0",
- "titlemodifier" -> "", "windowtitle" -> "A0ToB0", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/A0ToB0"}, "SearchTextTranslated" -> ""},
+B0[0, m^2, m^2]) m^2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "A0ToB0", "titlemodifier" -> "", "windowtitle" -> "A0ToB0", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/A0ToB0"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -291,8 +289,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, 21}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -301,73 +300,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3854, 117, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5133, 153, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2052047591]},
+ CellID->848113550]},
"A0ToB0"->{
- Cell[4466, 144, 75, 2, 35, "Subsubsection",
- CellTags->"A0ToB0",
- CellID->2064085766],
- Cell[4566, 150, 130, 4, 27, "Input",
+ Cell[5765, 182, 130, 4, 27, "Input",
CellTags->"A0ToB0",
CellID->750354701],
- Cell[4699, 156, 273, 10, 36, "Output",
- CellTags->"A0ToB0",
- CellID->1727801355],
- Cell[4987, 169, 554, 30, 32, "Text",
+ Cell[5898, 188, 273, 10, 35, "Output",
CellTags->"A0ToB0",
- CellID->1120307520],
- Cell[5897, 221, 778, 33, 31, "Text",
- CellTags->"A0ToB0",
- CellID->1722982066]}
+ CellID->1727801355]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8533, 302},
- {"A0ToB0", 8667, 306}
+ {"PrimaryExamplesSection", 9177, 301},
+ {"A0ToB0", 9310, 305}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3281, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 960, 35, 85, "Usage",
+Cell[3862, 101, 283, 11, 45, "ObjectNameGrid"],
+Cell[4148, 114, 960, 35, 87, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3854, 117, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5133, 153, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2052047591],
-Cell[4245, 134, 196, 6, 25, "ExampleSection",
- CellID->1955337335],
+ CellID->848113550],
Cell[CellGroupData[{
-Cell[4466, 144, 75, 2, 35, "Subsubsection",
- CellTags->"A0ToB0",
- CellID->2064085766],
+Cell[5545, 172, 195, 6, 26, "ExampleSection",
+ CellID->397079176],
Cell[CellGroupData[{
-Cell[4566, 150, 130, 4, 27, "Input",
+Cell[5765, 182, 130, 4, 27, "Input",
CellTags->"A0ToB0",
CellID->750354701],
-Cell[4699, 156, 273, 10, 36, "Output",
+Cell[5898, 188, 273, 10, 35, "Output",
CellTags->"A0ToB0",
CellID->1727801355]
-}, Open ]],
-Cell[4987, 169, 554, 30, 32, "Text",
- CellTags->"A0ToB0",
- CellID->1120307520],
-Cell[5544, 201, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]]
}, Open ]],
+Cell[6198, 202, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[5624, 207, 270, 12, 31, "SeeAlsoSection",
+Cell[6266, 207, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5897, 221, 778, 33, 31, "Text",
- CellTags->"A0ToB0",
- CellID->1722982066]
+Cell[6539, 221, 739, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[6690, 257, 23, 0, 42, "FooterCell"]
+Cell[7293, 255, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Abbreviation.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Abbreviation.nb
index 6fd6bd480..3410f129a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Abbreviation.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Abbreviation.nb
@@ -3,69 +3,105 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10136, 334]
-NotebookOptionsPosition[ 6788, 236]
-NotebookOutlinePosition[ 9366, 305]
-CellTagsIndexPosition[ 9252, 299]
+NotebookDataLength[ 11696, 373]
+NotebookOptionsPosition[ 8449, 280]
+NotebookOutlinePosition[ 10982, 347]
+CellTagsIndexPosition[ 10866, 341]
WindowTitle->Abbreviation
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Abbreviation\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Abbreviation"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"$Abbreviations\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/$Abbreviations"], "\<\"OneLoop\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"WriteOut\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/WriteOut"], "\<\"WriteOutPaVe\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/WriteOutPaVe"], "\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonVertex"], "\<\"QuarkPropagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuarkPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Abbreviation\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Abbreviation"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Abbreviation.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$15953],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Abbreviation", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$20043],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Abbreviation", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +109,18 @@ Abbreviation.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Abbreviation", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Abbreviation", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +155,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->974762014],
+ CellID->1627590208],
Cell[CellGroupData[{
@@ -119,7 +165,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->891133844],
+ CellID->786552231],
Cell[CellGroupData[{
@@ -150,7 +196,7 @@ Cell[BoxData[
TraditionalForm]}]], "(",
FormBox["p",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{54, 21},
+ ImageSize->{61, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Abbreviation",
@@ -227,9 +273,7 @@ Cell[TextData[{
ButtonNote->"QuarkPropagator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Abbreviation",
- CellID->1098399815]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -237,7 +281,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Abbreviation",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -246,10 +290,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 5.658213}",
+ "built" -> "{2020, 1, 5, 18, 52, 28.783117}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -258,12 +302,12 @@ TaggingRules->{
"Abbreviation is a function used by OneLoop and PaVeReduce for generating \
smaller files when saving results to the hard disk. The convention is that a \
definition like GP = GluonPropagator should be accompanied by the definition \
-Abbreviation[GluonPropagator] = HoldForm[GP].", "synonyms" -> {}, "title" ->
- "Abbreviation", "titlemodifier" -> "", "windowtitle" -> "Abbreviation",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/Abbreviation"},
- "SearchTextTranslated" -> ""},
+Abbreviation[GluonPropagator] = HoldForm[GP].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Abbreviation", "titlemodifier" -> "",
+ "windowtitle" -> "Abbreviation", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Abbreviation"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -271,8 +315,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -281,61 +326,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3511, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5216, 142, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->974762014]},
+ CellID->1627590208]},
"Abbreviation"->{
- Cell[4143, 125, 284, 9, 27, "Input",
+ Cell[5849, 171, 284, 9, 27, "Input",
CellTags->"Abbreviation",
CellID->333600762],
- Cell[4430, 136, 519, 21, 42, "Output",
+ Cell[6136, 182, 519, 21, 41, "Output",
CellTags->"Abbreviation",
- CellID->908274881],
- Cell[5317, 180, 1429, 51, 52, "Text",
- CellTags->"Abbreviation",
- CellID->1098399815]}
+ CellID->908274881]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8813, 282},
- {"Abbreviation", 8951, 286}
+ {"PrimaryExamplesSection", 10518, 327},
+ {"Abbreviation", 10658, 331}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3732, 88, 53, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 580, 14, 115, "Usage",
+Cell[4319, 111, 289, 11, 45, "ObjectNameGrid"],
+Cell[4611, 124, 580, 14, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3511, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5216, 142, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->974762014],
+ CellID->1627590208],
Cell[CellGroupData[{
-Cell[3923, 115, 195, 6, 25, "ExampleSection",
- CellID->891133844],
+Cell[5629, 161, 195, 6, 26, "ExampleSection",
+ CellID->786552231],
Cell[CellGroupData[{
-Cell[4143, 125, 284, 9, 27, "Input",
+Cell[5849, 171, 284, 9, 27, "Input",
CellTags->"Abbreviation",
CellID->333600762],
-Cell[4430, 136, 519, 21, 42, "Output",
+Cell[6136, 182, 519, 21, 41, "Output",
CellTags->"Abbreviation",
CellID->908274881]
}, Open ]]
}, Open ]],
-Cell[4976, 161, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6682, 207, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5044, 166, 270, 12, 31, "SeeAlsoSection",
+Cell[6750, 212, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5317, 180, 1429, 51, 52, "Text",
- CellTags->"Abbreviation",
- CellID->1098399815]
+Cell[7023, 226, 1384, 49, 72, "SeeAlso"]
}, Open ]],
-Cell[6761, 234, 23, 0, 42, "FooterCell"]
+Cell[8422, 278, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AlphaFS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AlphaFS.nb
new file mode 100644
index 000000000..632d093de
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AlphaFS.nb
@@ -0,0 +1,308 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8874, 298]
+NotebookOptionsPosition[ 5883, 207]
+NotebookOutlinePosition[ 7973, 264]
+CellTagsIndexPosition[ 7889, 259]
+WindowTitle->AlphaFS
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/AlphaFS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/AlphaFS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/AlphaFS.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$20484],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/AlphaFS", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["AlphaFS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["AlphaFS"], "InlineFormula"],
+ " \[LineSeparator] is a shortcut for SMP[\"alpha_fs\"] which represents \
+the fine-structure constant."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1465817695],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The shortcut AlphaFS is deprecated, please use ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " instead!"
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1531727520],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2068155801],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["AlphaFS"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->527800968],
+
+Cell[BoxData[
+ FormBox["\[Alpha]", TraditionalForm]], "Output",
+ ImageSize->{14, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1767187053]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "InputForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->353669473],
+
+Cell["SMP[\"alpha_fs\"]", "Output",
+ ImageSize->{120, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//InputForm=",
+ CellID->1961649519]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"AlphaFS",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 52, 29.841000}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "AlphaFS is a shortcut for SMP[\"alpha_fs\"] which represents the \
+fine-structure constant.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "AlphaFS", "titlemodifier" -> "", "windowtitle" -> "AlphaFS", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/AlphaFS"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4591, 146, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1531727520]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7745, 252}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 2268, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2850, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3159, 91, 385, 11, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3569, 106, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1465817695],
+Cell[4311, 132, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4345, 134, 197, 6, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4591, 146, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1531727520],
+Cell[CellGroupData[{
+Cell[5004, 165, 196, 6, 26, "ExampleSection",
+ CellID->2068155801],
+Cell[CellGroupData[{
+Cell[5225, 175, 76, 2, 27, "Input",
+ CellID->527800968],
+Cell[5304, 179, 194, 6, 35, "Output",
+ CellID->1767187053]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5535, 190, 101, 3, 27, "Input",
+ CellID->353669473],
+Cell[5639, 195, 178, 5, 51, "Output",
+ CellID->1961649519]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5856, 205, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AlphaStrong.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AlphaStrong.nb
new file mode 100644
index 000000000..d78d74be4
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AlphaStrong.nb
@@ -0,0 +1,311 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9021, 301]
+NotebookOptionsPosition[ 6016, 210]
+NotebookOutlinePosition[ 8125, 267]
+CellTagsIndexPosition[ 8041, 262]
+WindowTitle->AlphaStrong
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/AlphaStrong\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/AlphaStrong"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+AlphaStrong.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$20915],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/AlphaStrong", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["AlphaStrong", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["AlphaStrong"], "InlineFormula"],
+ " \[LineSeparator] is a shortcut for ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " which represents the strong coupling constant."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->169594564],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The shortcut AlphaStrong is deprecated, please use ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " instead!"
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->524235950],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->73102174],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["AlphaStrong"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->242614212],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Alpha]", "s"], TraditionalForm]], "Output",
+ ImageSize->{22, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->757680076]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "InputForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1787119639],
+
+Cell["SMP[\"alpha_s\"]", "Output",
+ ImageSize->{112, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//InputForm=",
+ CellID->573753393]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"AlphaStrong",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 52, 30.950803}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "AlphaStrong is a shortcut for SMP[\"alpha_s\"] which represents the \
+strong coupling constant.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "AlphaStrong", "titlemodifier" -> "", "windowtitle" -> "AlphaStrong",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/AlphaStrong"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4703, 148, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->524235950]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7898, 255}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2285, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2871, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3184, 91, 470, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3679, 108, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->169594564],
+Cell[4420, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4454, 136, 200, 6, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4703, 148, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->524235950],
+Cell[CellGroupData[{
+Cell[5115, 167, 194, 6, 26, "ExampleSection",
+ CellID->73102174],
+Cell[CellGroupData[{
+Cell[5334, 177, 80, 2, 27, "Input",
+ CellID->242614212],
+Cell[5417, 181, 215, 7, 37, "Output",
+ CellID->757680076]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5669, 193, 102, 3, 27, "Input",
+ CellID->1787119639],
+Cell[5774, 198, 176, 5, 51, "Output",
+ CellID->573753393]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5989, 208, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amplitude.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amplitude.nb
index 9e9afba0e..4dd894cb8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amplitude.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amplitude.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 53348, 1772]
-NotebookOptionsPosition[ 48339, 1618]
-NotebookOutlinePosition[ 51804, 1713]
-CellTagsIndexPosition[ 51689, 1707]
+NotebookDataLength[ 26823, 868]
+NotebookOptionsPosition[ 22694, 747]
+NotebookOutlinePosition[ 25711, 827]
+CellTagsIndexPosition[ 25598, 821]
WindowTitle->Amplitude
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Amplitude\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Amplitude"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Amplitude.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmp\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmp"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Amplitude\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Amplitude"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Amplitude.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$16295],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Amplitude", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$21347],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Amplitude", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Amplitude", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Amplitude", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->771979163],
+ CellID->1985527587],
Cell[CellGroupData[{
@@ -122,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1992079685],
+ CellID->565997814],
Cell[CellGroupData[{
@@ -135,7 +167,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["98", TraditionalForm]], "Output",
- ImageSize->{18, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Amplitude",
@@ -143,9 +175,7 @@ Cell[BoxData[
CellID->680936529]
}, Open ]],
-Cell["This is the amplitude of a gluon self-energy diagram:", "Text",
- CellTags->"Amplitude",
- CellID->1145607079],
+Cell["This is the amplitude of a gluon self-energy diagram:", "Notes"],
Cell[CellGroupData[{
@@ -323,12 +353,11 @@ Cell[BoxData[
RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}], "-",
RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}]}],
TraditionalForm], ")"}]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{521, 148},
+ ImageSize->{522, 111},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Amplitude",
- CellLabel->"Out[2]=",
- CellID->1321530464]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -341,107 +370,89 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{"-",
- RowBox[{"(",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubsuperscriptBox["g", "s", "2"], " ",
- FormBox[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]}]], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
RowBox[{
- FormBox[
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
SuperscriptBox[
FormBox[
FormBox[
@@ -450,13 +461,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
+ TraditionalForm]]}], "-",
SuperscriptBox[
FormBox[
FormBox[
@@ -465,35 +472,25 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -502,13 +499,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
+ TraditionalForm]]}], "-",
SuperscriptBox[
FormBox[
FormBox[
@@ -517,35 +510,25 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -554,13 +537,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
+ TraditionalForm]]}], "-",
SuperscriptBox[
FormBox[
FormBox[
@@ -569,36 +548,26 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
+ TraditionalForm]]}], ")"}]}]}], ")"}], " ",
+ RowBox[{"(",
RowBox[{
- FormBox[
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
SuperscriptBox[
FormBox[
FormBox[
@@ -607,14 +576,10 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]], "-",
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -623,34 +588,24 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
SuperscriptBox[
FormBox[
FormBox[
@@ -659,13 +614,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- FormBox[
+ TraditionalForm]], "+",
SuperscriptBox[
FormBox[
FormBox[
@@ -674,34 +625,24 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
SuperscriptBox[
FormBox[
FormBox[
@@ -710,14 +651,10 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]], "-",
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -726,881 +663,75 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm], "-",
+ TraditionalForm]]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}], ")"}]}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{486, 260},
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q"], D],
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q"], D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[FeynCalc`FCGV["p"] - FeynCalc`FCGV["q"], D],
+ FeynCalc`Momentum[FeynCalc`FCGV["p"] - FeynCalc`FCGV["q"], D]]],
+ Editable->False]}], ")"}]}], ")"}]}],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{472, 210},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Amplitude",
- CellLabel->"Out[3]=",
- CellID->377476222]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
-Cell[TextData[{
- "This is the amplitude for graph 6.2 from the paper Z.Phys C ",
- StyleBox["70:",
- FontWeight->"Bold"],
- "637-654, 1996:"
-}], "Text",
- CellTags->"Amplitude",
- CellID->1089097550],
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"FeynAmp", "[",
- RowBox[{"q1", ",", "q2", ",",
- RowBox[{"EpsEvaluate", "[",
- RowBox[{"Trick", "[",
- RowBox[{"Explicit", "[",
- RowBox[{"Amplitude", "[", "\"\\"", "]"}], "]"}], "]"}], "]"}]}],
- "]"}]], "Input",
- CellTags->"Amplitude",
- CellLabel->"In[4]:=",
- CellID->657797482],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"\[Integral]",
- RowBox[{
- SuperscriptBox["\[DifferentialD]", "D"],
- FormBox["q1",
- TraditionalForm]}]}],
- RowBox[{"\[Integral]",
- RowBox[{
- SuperscriptBox["\[DifferentialD]", "D"],
- FormBox["q2",
- TraditionalForm]}]}], "(",
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"2", " ", "\[ImaginaryI]", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}], "m"],
- TraditionalForm]}], ")"}], " ",
- SubsuperscriptBox["g", "s", "4"], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci6",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci9",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci5",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci6",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci8",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci5",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci8",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci9",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}], ")"}],
- RowBox[{"m", "-", "1"}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
- RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}]}],
- TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{569, 485},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Amplitude",
- CellLabel->"Out[4]=",
- CellID->1560610372]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
Cell[TextData[{
StyleBox[ButtonBox["FeynAmp",
@@ -1609,9 +740,7 @@ Cell[TextData[{
ButtonNote->"FeynAmp"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Amplitude",
- CellID->587564717]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1619,7 +748,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Amplitude",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1628,10 +757,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 7.428216}",
+ "built" -> "{2020, 1, 5, 18, 52, 32.078733}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1643,11 +772,12 @@ defined names is obtained with Amplitude[]. New amplitudes can be added to \
the file \"Amplitude.m\". It is strongly recommended to use names that \
reflect the process. The option Gauge -> 1 means `t Hooft Feynman gauge; \
Polarization -> 0 gives unpolarized OPE-type amplitudes, Polarization -> 1 \
-the polarized ones.", "synonyms" -> {}, "title" -> "Amplitude",
- "titlemodifier" -> "", "windowtitle" -> "Amplitude", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Amplitude"}, "SearchTextTranslated" -> ""},
+the polarized ones.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Amplitude", "titlemodifier" -> "", "windowtitle" -> "Amplitude", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Amplitude"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1655,8 +785,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1665,115 +796,80 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3695, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4684, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->771979163]},
+ CellID->1985527587]},
"Amplitude"->{
- Cell[4328, 128, 154, 5, 27, "Input",
+ Cell[5317, 160, 154, 5, 27, "Input",
CellTags->"Amplitude",
CellID->1213293963],
- Cell[4485, 135, 211, 7, 36, "Output",
+ Cell[5474, 167, 211, 7, 35, "Output",
CellTags->"Amplitude",
CellID->680936529],
- Cell[4711, 145, 114, 2, 32, "Text",
- CellTags->"Amplitude",
- CellID->1145607079],
- Cell[4850, 151, 140, 4, 27, "Input",
+ Cell[5795, 181, 140, 4, 27, "Input",
CellTags->"Amplitude",
CellID->69921964],
- Cell[4993, 157, 4796, 173, 169, "Output",
- CellTags->"Amplitude",
- CellID->1321530464],
- Cell[9826, 335, 128, 4, 27, "Input",
+ Cell[5938, 187, 4775, 172, 132, "Output",
+ CellTags->"Amplitude"],
+ Cell[10750, 364, 128, 4, 27, "Input",
CellTags->"Amplitude",
CellID->863772966],
- Cell[9957, 341, 13010, 414, 281, "Output",
- CellTags->"Amplitude",
- CellID->377476222],
- Cell[22982, 758, 195, 7, 32, "Text",
- CellTags->"Amplitude",
- CellID->1089097550],
- Cell[23202, 769, 326, 10, 27, "Input",
- CellTags->"Amplitude",
- CellID->657797482],
- Cell[23531, 781, 24173, 800, 506, "Output",
- CellTags->"Amplitude",
- CellID->1560610372],
- Cell[48072, 1604, 225, 9, 32, "Text",
- CellTags->"Amplitude",
- CellID->587564717]}
+ Cell[10881, 370, 11219, 342, 231, "Output",
+ CellTags->"Amplitude"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 50537, 1666},
- {"Amplitude", 50672, 1670}
+ {"PrimaryExamplesSection", 24939, 797},
+ {"Amplitude", 25076, 801}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 3003, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 783, 17, 144, "Usage",
+Cell[3587, 97, 286, 11, 45, "ObjectNameGrid"],
+Cell[3876, 110, 783, 17, 154, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3695, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4684, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->771979163],
+ CellID->1985527587],
Cell[CellGroupData[{
-Cell[4107, 118, 196, 6, 25, "ExampleSection",
- CellID->1992079685],
+Cell[5097, 150, 195, 6, 26, "ExampleSection",
+ CellID->565997814],
Cell[CellGroupData[{
-Cell[4328, 128, 154, 5, 27, "Input",
+Cell[5317, 160, 154, 5, 27, "Input",
CellTags->"Amplitude",
CellID->1213293963],
-Cell[4485, 135, 211, 7, 36, "Output",
+Cell[5474, 167, 211, 7, 35, "Output",
CellTags->"Amplitude",
CellID->680936529]
}, Open ]],
-Cell[4711, 145, 114, 2, 32, "Text",
- CellTags->"Amplitude",
- CellID->1145607079],
+Cell[5700, 177, 70, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4850, 151, 140, 4, 27, "Input",
+Cell[5795, 181, 140, 4, 27, "Input",
CellTags->"Amplitude",
CellID->69921964],
-Cell[4993, 157, 4796, 173, 169, "Output",
- CellTags->"Amplitude",
- CellID->1321530464]
+Cell[5938, 187, 4775, 172, 132, "Output",
+ CellTags->"Amplitude"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9826, 335, 128, 4, 27, "Input",
+Cell[10750, 364, 128, 4, 27, "Input",
CellTags->"Amplitude",
CellID->863772966],
-Cell[9957, 341, 13010, 414, 281, "Output",
- CellTags->"Amplitude",
- CellID->377476222]
-}, Open ]],
-Cell[22982, 758, 195, 7, 32, "Text",
- CellTags->"Amplitude",
- CellID->1089097550],
-Cell[CellGroupData[{
-Cell[23202, 769, 326, 10, 27, "Input",
- CellTags->"Amplitude",
- CellID->657797482],
-Cell[23531, 781, 24173, 800, 506, "Output",
- CellTags->"Amplitude",
- CellID->1560610372]
+Cell[10881, 370, 11219, 342, 231, "Output",
+ CellTags->"Amplitude"]
}, Open ]]
}, Open ]],
-Cell[47731, 1585, 31, 0, 29, "SectionFooterSpacer"]
+Cell[22127, 716, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[47799, 1590, 270, 12, 31, "SeeAlsoSection",
+Cell[22195, 721, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[48072, 1604, 225, 9, 32, "Text",
- CellTags->"Amplitude",
- CellID->587564717]
+Cell[22468, 735, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[48312, 1616, 23, 0, 42, "FooterCell"]
+Cell[22667, 745, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amputate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amputate.nb
index 1470c0aa0..e12b2dd10 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amputate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Amputate.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11933, 419]
-NotebookOptionsPosition[ 8001, 295]
-NotebookOutlinePosition[ 10779, 374]
-CellTagsIndexPosition[ 10668, 368]
+NotebookDataLength[ 13917, 483]
+NotebookOptionsPosition[ 10034, 363]
+NotebookOutlinePosition[ 12646, 436]
+CellTagsIndexPosition[ 12534, 430]
WindowTitle->Amputate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Amputate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Amputate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Amputate.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GA"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"GS\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GS"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Amputate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Amputate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Amputate.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$16635],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Amputate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$21786],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Amputate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Amputate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Amputate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -95,6 +136,62 @@ amputates also p.q1 and p.q2; Pair\[Rule]All amputates all except OPEDelta."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1409029404],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Amputate", "]"}]], "Input",
+ CellTags->"Amputate",
+ CellLabel->"In[194]:=",
+ CellID->1884550851],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Pair", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Unique", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{274, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Amputate",
+ CellLabel->"Out[194]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -110,7 +207,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1776549739],
+ CellID->1219110035],
Cell[CellGroupData[{
@@ -120,68 +217,46 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->279009291],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Amputate", "]"}]], "Input",
- CellTags->"Amputate",
- CellLabel->"In[1]:=",
- CellID->1884550851],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"Pair", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"Unique", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{292, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Amputate",
- CellLabel->"Out[1]=",
- CellID->697719830]
-}, Open ]],
+ CellID->377177486],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracSlash", "[", "p", "]"}], ".",
- RowBox[{"DiracSlash", "[", "q", "]"}]}]], "Input",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "q", "]"}]}]], "Input",
CellTags->"Amputate",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->479729855],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{91, 18},
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Amputate",
- CellLabel->"Out[2]=",
- CellID->1732499360]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -190,27 +265,23 @@ Cell[BoxData[
RowBox[{"Amputate", "[",
RowBox[{"%", ",", "q"}], "]"}]], "Input",
CellTags->"Amputate",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1612122659],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$2188", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ RowBox[{"$AL$41318", "\[InvisibleApplication]",
+ RowBox[{"(", "1", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -223,16 +294,15 @@ Cell[BoxData[
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- RowBox[{"$AL$2188", "\[InvisibleApplication]",
+ RowBox[{"$AL$41318", "\[InvisibleApplication]",
RowBox[{"(", "1", ")"}]}],
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{197, 23},
+ ImageSize->{214, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Amputate",
- CellLabel->"Out[3]=",
- CellID->42958207]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -262,10 +332,10 @@ Cell[TextData[{
ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracMatrix",
+ StyleBox[ButtonBox["GA",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData->"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracSimplify",
@@ -274,10 +344,10 @@ Cell[TextData[{
ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSlash",
+ StyleBox[ButtonBox["GS",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
+ ButtonData->"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracTrick",
@@ -286,9 +356,7 @@ Cell[TextData[{
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Amputate",
- CellID->1266124166]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -305,10 +373,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 9.030852}",
+ "built" -> "{2020, 1, 5, 18, 52, 33.254118}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -316,11 +384,11 @@ TaggingRules->{
"None", "summary" ->
"Amputate[exp, q1, q2, ...] amputates Eps and DiracGamma. \
Amputate[exp,q1,q2,Pair->{p}] amputates also p.q1 and p.q2; Pair->All \
-amputates all except OPEDelta.", "synonyms" -> {}, "title" -> "Amputate",
- "titlemodifier" -> "", "windowtitle" -> "Amputate", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Amputate"}, "SearchTextTranslated" -> ""},
+amputates all except OPEDelta.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Amputate", "titlemodifier" -> "", "windowtitle" -> "Amputate", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Amputate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -329,7 +397,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -337,90 +405,86 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3452, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1776549739]},
"Amputate"->{
- Cell[4085, 126, 134, 4, 27, "Input",
+ Cell[5625, 168, 136, 4, 70, "Input",
CellTags->"Amputate",
CellID->1884550851],
- Cell[4222, 132, 403, 14, 36, "Output",
- CellTags->"Amputate",
- CellID->697719830],
- Cell[4662, 151, 189, 6, 27, "Input",
+ Cell[5764, 174, 385, 13, 37, "Output",
+ CellTags->"Amputate"],
+ Cell[6843, 223, 173, 6, 27, "Input",
CellTags->"Amputate",
CellID->479729855],
- Cell[4854, 159, 633, 24, 39, "Output",
- CellTags->"Amputate",
- CellID->1732499360],
- Cell[5524, 188, 151, 5, 27, "Input",
+ Cell[7019, 231, 699, 27, 37, "Output",
+ CellTags->"Amputate"],
+ Cell[7755, 263, 151, 5, 27, "Input",
CellTags->"Amputate",
CellID->1612122659],
- Cell[5678, 195, 1007, 39, 44, "Output",
- CellTags->"Amputate",
- CellID->42958207],
- Cell[7053, 257, 906, 33, 32, "Text",
- CellTags->"Amputate",
- CellID->1266124166]}
+ Cell[7909, 270, 901, 34, 40, "Output",
+ CellTags->"Amputate"]},
+ "PrimaryExamplesSection"->{
+ Cell[6210, 194, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1219110035]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9890, 339},
- {"Amputate", 10025, 343}
+ {"Amputate", 11896, 407},
+ {"PrimaryExamplesSection", 12390, 423}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3363, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 546, 15, 98, "Usage",
- CellID->982511436],
+Cell[3946, 104, 285, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3452, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1776549739],
+Cell[4256, 119, 546, 15, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3865, 116, 195, 6, 25, "ExampleSection",
- CellID->279009291],
+Cell[4827, 138, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1409029404],
+Cell[5569, 164, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4085, 126, 134, 4, 27, "Input",
+Cell[5625, 168, 136, 4, 70, "Input",
CellTags->"Amputate",
CellID->1884550851],
-Cell[4222, 132, 403, 14, 36, "Output",
- CellTags->"Amputate",
- CellID->697719830]
+Cell[5764, 174, 385, 13, 37, "Output",
+ CellTags->"Amputate"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4662, 151, 189, 6, 27, "Input",
+Cell[6210, 194, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1219110035],
+Cell[CellGroupData[{
+Cell[6623, 213, 195, 6, 26, "ExampleSection",
+ CellID->377177486],
+Cell[CellGroupData[{
+Cell[6843, 223, 173, 6, 27, "Input",
CellTags->"Amputate",
CellID->479729855],
-Cell[4854, 159, 633, 24, 39, "Output",
- CellTags->"Amputate",
- CellID->1732499360]
+Cell[7019, 231, 699, 27, 37, "Output",
+ CellTags->"Amputate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5524, 188, 151, 5, 27, "Input",
+Cell[7755, 263, 151, 5, 27, "Input",
CellTags->"Amputate",
CellID->1612122659],
-Cell[5678, 195, 1007, 39, 44, "Output",
- CellTags->"Amputate",
- CellID->42958207]
+Cell[7909, 270, 901, 34, 40, "Output",
+ CellTags->"Amputate"]
}, Open ]]
}, Open ]],
-Cell[6712, 238, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8837, 308, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6780, 243, 270, 12, 31, "SeeAlsoSection",
+Cell[8905, 313, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7053, 257, 906, 33, 32, "Text",
- CellTags->"Amputate",
- CellID->1266124166]
+Cell[9178, 327, 814, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[7974, 293, 23, 0, 42, "FooterCell"]
+Cell[10007, 361, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AnomalousDimension.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AnomalousDimension.nb
index 009f936ba..be10c86c1 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AnomalousDimension.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AnomalousDimension.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 52076, 1823]
-NotebookOptionsPosition[ 41495, 1487]
-NotebookOutlinePosition[ 47521, 1662]
-CellTagsIndexPosition[ 47397, 1656]
+NotebookDataLength[ 50887, 1772]
+NotebookOptionsPosition[ 42581, 1518]
+NotebookOutlinePosition[ 47051, 1642]
+CellTagsIndexPosition[ 46927, 1636]
WindowTitle->AnomalousDimension
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/AnomalousDimension\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/AnomalousDimension"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SplittingFunction\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SplittingFunction"], "\<\"SumS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SumS"], "\<\"SumT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SumT"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/AnomalousDimension\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/AnomalousDimension"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
AnomalousDimension.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$16978],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/AnomalousDimension", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$22229],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/AnomalousDimension", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,20 @@ AnomalousDimension.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["AnomalousDimension", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["AnomalousDimension", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -92,32 +129,33 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1584787184],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->730833760],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1860609483],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -134,17 +172,46 @@ Cell[BoxData[
RowBox[{"Polarization", "\[Rule]", "1"}], ",",
RowBox[{"Simplify", "\[Rule]", "FullSimplify"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{277, 15},
+ ImageSize->{258, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
CellLabel->"Out[1]=",
CellID->1686866166]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell["Polarized case:", "Text",
- CellTags->"AnomalousDimension",
- CellID->2007063734],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->398661237],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1902264668],
+
+Cell["Polarized case:", "Notes"],
Cell[CellGroupData[{
@@ -153,7 +220,7 @@ Cell[BoxData[
RowBox[{"AnomalousDimension", ",",
RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1676073016],
Cell[BoxData[
@@ -163,12 +230,11 @@ Cell[BoxData[
RowBox[{"Polarization", "\[Rule]", "1"}], ",",
RowBox[{"Simplify", "\[Rule]", "FullSimplify"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{277, 15},
+ ImageSize->{258, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[2]=",
- CellID->455353582]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[TextData[{
@@ -179,16 +245,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1291876789],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gnsqq0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->146201031],
Cell[BoxData[
@@ -207,12 +271,11 @@ Cell[BoxData[
FractionBox["4",
RowBox[{"m", "+", "1"}]], "-", "6"}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{225, 43},
+ ImageSize->{237, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[3]=",
- CellID->615808229]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[TextData[{
@@ -223,16 +286,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1792202903],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsqg0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1170655896],
Cell[BoxData[
@@ -244,12 +305,11 @@ Cell[BoxData[
FractionBox["16",
RowBox[{"m", "+", "1"}]]}], ")"}], " ",
SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
- ImageSize->{112, 43},
+ ImageSize->{117, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[4]=",
- CellID->2056489351]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[TextData[{
@@ -260,16 +320,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1242785256],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgq0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1302484886],
Cell[BoxData[
@@ -281,12 +339,11 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}]], "-",
FractionBox["8", "m"]}], ")"}], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
- ImageSize->{115, 43},
+ ImageSize->{120, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[5]=",
- CellID->339795493]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[TextData[{
@@ -297,16 +354,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->102826276],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgg0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->255541888],
Cell[BoxData[
@@ -329,12 +384,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"8", " ",
SubscriptBox["T", "f"]}], "3"]}], TraditionalForm]], "Output",
- ImageSize->{283, 43},
+ ImageSize->{300, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[6]=",
- CellID->724940306]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[TextData[{
@@ -345,16 +399,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1117022044],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gpsqq1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1738556670],
Cell[BoxData[
@@ -379,12 +431,11 @@ Cell[BoxData[
FractionBox["1", "m"]}], ")"}], " ",
SubscriptBox["C", "F"], " ",
SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
- ImageSize->{385, 46},
+ ImageSize->{402, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[7]=",
- CellID->297175504]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[TextData[{
@@ -395,16 +446,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1509439590],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gnsqq1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->1025475425],
Cell[BoxData[
@@ -624,12 +673,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}], "2"]}]], "-",
FractionBox["2", "3"]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{571, 389},
+ ImageSize->{579, 385},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[8]=",
- CellID->1707320400]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[TextData[{
@@ -640,16 +688,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->26937910],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsqg1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->1790656955],
Cell[BoxData[
@@ -791,12 +837,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}], "3"]]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{473, 283},
+ ImageSize->{483, 257},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[9]=",
- CellID->578210880]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[TextData[{
@@ -807,16 +852,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1644657872],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgq1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[10]:=",
+ CellLabel->"In[9]:=",
CellID->1820360375],
Cell[BoxData[
@@ -1030,12 +1073,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}], "3"]]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{534, 397},
+ ImageSize->{557, 354},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[10]=",
- CellID->1694165204]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[TextData[{
@@ -1046,16 +1088,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->462099557],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgg1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[11]:=",
+ CellLabel->"In[10]:=",
CellID->1613754345],
Cell[BoxData[
@@ -1223,12 +1263,11 @@ Cell[BoxData[
FractionBox["10", "m"], "+", "1"}], ")"}], " ",
SubscriptBox["C", "F"], " ",
SubscriptBox["T", "f"]}]}], TraditionalForm]], "Output",
- ImageSize->{478, 326},
+ ImageSize->{502, 281},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[11]=",
- CellID->1244918806]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[TextData[{
@@ -1239,16 +1278,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized (different representation):"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->721182810],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "GSGG1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[12]:=",
+ CellLabel->"In[11]:=",
CellID->889064365],
Cell[BoxData[
@@ -1389,12 +1426,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}], "3"]}]]}], TraditionalForm]], "Output",\
- ImageSize->{441, 316},
+ ImageSize->{447, 292},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[12]=",
- CellID->1840404969]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[TextData[{
@@ -1406,9 +1442,7 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
":"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1805318835],
+}], "Notes"],
Cell[CellGroupData[{
@@ -1421,7 +1455,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"ij", ",", "1", ",", "17", ",", "2"}], "}"}]}], "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[13]:=",
+ CellLabel->"In[12]:=",
CellID->621534472],
Cell[BoxData[
@@ -1430,12 +1464,11 @@ Cell[BoxData[
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{144, 15},
+ ImageSize->{169, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AnomalousDimension",
- CellLabel->"Out[13]=",
- CellID->494342750]
+ CellLabel->"Out[12]="]
}, Open ]]
}, Open ]],
@@ -1478,9 +1511,7 @@ Cell[TextData[{
ButtonNote->"SumT"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1774979938]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1497,22 +1528,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 10.549577}",
+ "built" -> "{2020, 1, 5, 18, 52, 34.453606}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"AnomalousDimension[name] is a database of anomalous dimensions of twist \
-2 operators.", "synonyms" -> {}, "title" -> "AnomalousDimension",
- "titlemodifier" -> "", "windowtitle" -> "AnomalousDimension", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/AnomalousDimension"},
- "SearchTextTranslated" -> ""},
+2 operators.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "AnomalousDimension", "titlemodifier" -> "", "windowtitle" ->
+ "AnomalousDimension", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/AnomalousDimension"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1521,7 +1552,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1529,302 +1560,220 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3382, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1584787184]},
"AnomalousDimension"->{
- Cell[4016, 123, 154, 4, 27, "Input",
+ Cell[5374, 161, 154, 4, 70, "Input",
CellTags->"AnomalousDimension",
CellID->1953214619],
- Cell[4173, 129, 362, 12, 36, "Output",
+ Cell[5531, 167, 362, 12, 37, "Output",
CellTags->"AnomalousDimension",
CellID->1686866166],
- Cell[4550, 144, 85, 2, 31, "Text",
- CellTags->"AnomalousDimension",
- CellID->2007063734],
- Cell[4660, 150, 226, 6, 27, "Input",
+ Cell[6622, 217, 226, 6, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1676073016],
- Cell[4889, 158, 361, 12, 36, "Output",
- CellTags->"AnomalousDimension",
- CellID->455353582],
- Cell[5265, 173, 263, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1291876789],
- Cell[5553, 187, 152, 4, 27, "Input",
+ Cell[6851, 225, 341, 11, 37, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[7442, 251, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->146201031],
- Cell[5708, 193, 569, 21, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->615808229],
- Cell[6292, 217, 262, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1792202903],
- Cell[6579, 231, 152, 4, 27, "Input",
+ Cell[7597, 257, 549, 20, 55, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[8395, 292, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1170655896],
- Cell[6734, 237, 392, 14, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->2056489351],
- Cell[7141, 254, 262, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1242785256],
- Cell[7428, 268, 152, 4, 27, "Input",
+ Cell[8550, 298, 371, 13, 57, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[9170, 326, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1302484886],
- Cell[7583, 274, 390, 14, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->339795493],
- Cell[7988, 291, 261, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->102826276],
- Cell[8274, 305, 151, 4, 27, "Input",
+ Cell[9325, 332, 370, 13, 55, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[9944, 360, 151, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->255541888],
- Cell[8428, 311, 701, 25, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->724940306],
- Cell[9144, 339, 263, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1117022044],
- Cell[9432, 353, 153, 4, 27, "Input",
+ Cell[10098, 366, 681, 24, 57, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[11029, 405, 153, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1738556670],
- Cell[9588, 359, 796, 27, 67, "Output",
- CellTags->"AnomalousDimension",
- CellID->297175504],
- Cell[10399, 389, 263, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1509439590],
- Cell[10687, 403, 153, 4, 27, "Input",
+ Cell[11185, 411, 776, 26, 61, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[12211, 452, 153, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1025475425],
- Cell[10843, 409, 6715, 222, 410, "Output",
- CellTags->"AnomalousDimension",
- CellID->1707320400],
- Cell[17573, 634, 260, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->26937910],
- Cell[17858, 648, 152, 4, 27, "Input",
+ Cell[12367, 458, 6694, 221, 406, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[19310, 694, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1790656955],
- Cell[18013, 654, 4224, 144, 304, "Output",
- CellTags->"AnomalousDimension",
- CellID->578210880],
- Cell[22252, 801, 262, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1644657872],
- Cell[22539, 815, 153, 4, 27, "Input",
+ Cell[19465, 700, 4204, 143, 278, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[23918, 858, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1820360375],
- Cell[22695, 821, 6332, 216, 418, "Output",
- CellTags->"AnomalousDimension",
- CellID->1694165204],
- Cell[29042, 1040, 261, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->462099557],
- Cell[29328, 1054, 153, 4, 27, "Input",
+ Cell[24073, 864, 6310, 215, 375, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[30632, 1094, 153, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1613754345],
- Cell[29484, 1060, 5020, 170, 347, "Output",
- CellTags->"AnomalousDimension",
- CellID->1244918806],
- Cell[34519, 1233, 288, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->721182810],
- Cell[34832, 1247, 152, 4, 27, "Input",
+ Cell[30788, 1100, 4999, 169, 302, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[36063, 1284, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->889064365],
- Cell[34987, 1253, 4489, 143, 337, "Output",
- CellTags->"AnomalousDimension",
- CellID->1840404969],
- Cell[39491, 1399, 330, 11, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1805318835],
- Cell[39846, 1414, 315, 10, 27, "Input",
+ Cell[36218, 1290, 4468, 142, 313, "Output",
+ CellTags->"AnomalousDimension"],
+ Cell[41003, 1448, 315, 10, 27, "Input",
CellTags->"AnomalousDimension",
CellID->621534472],
- Cell[40164, 1426, 347, 11, 36, "Output",
- CellTags->"AnomalousDimension",
- CellID->494342750],
- Cell[40879, 1460, 574, 22, 32, "Text",
- CellTags->"AnomalousDimension",
- CellID->1774979938]}
+ Cell[41321, 1460, 327, 10, 35, "Output",
+ CellTags->"AnomalousDimension"]},
+ "PrimaryExamplesSection"->{
+ Cell[5954, 186, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->398661237]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 43353, 1531},
- {"AnomalousDimension", 43498, 1535}
+ {"AnomalousDimension", 44423, 1562},
+ {"PrimaryExamplesSection", 46784, 1629}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3224, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 415, 12, 82, "Usage",
- CellID->982511436],
+Cell[3817, 100, 295, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3382, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1584787184],
+Cell[4137, 115, 415, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3795, 113, 196, 6, 25, "ExampleSection",
- CellID->1860609483],
+Cell[4577, 131, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->730833760],
+Cell[5318, 157, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4016, 123, 154, 4, 27, "Input",
+Cell[5374, 161, 154, 4, 70, "Input",
CellTags->"AnomalousDimension",
CellID->1953214619],
-Cell[4173, 129, 362, 12, 36, "Output",
+Cell[5531, 167, 362, 12, 37, "Output",
CellTags->"AnomalousDimension",
CellID->1686866166]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4550, 144, 85, 2, 31, "Text",
- CellTags->"AnomalousDimension",
- CellID->2007063734],
Cell[CellGroupData[{
-Cell[4660, 150, 226, 6, 27, "Input",
+Cell[5954, 186, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->398661237],
+Cell[CellGroupData[{
+Cell[6366, 205, 196, 6, 26, "ExampleSection",
+ CellID->1902264668],
+Cell[6565, 213, 32, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[6622, 217, 226, 6, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1676073016],
-Cell[4889, 158, 361, 12, 36, "Output",
- CellTags->"AnomalousDimension",
- CellID->455353582]
+Cell[6851, 225, 341, 11, 37, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[5265, 173, 263, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1291876789],
+Cell[7207, 239, 210, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[5553, 187, 152, 4, 27, "Input",
+Cell[7442, 251, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->146201031],
-Cell[5708, 193, 569, 21, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->615808229]
+Cell[7597, 257, 549, 20, 55, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[6292, 217, 262, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1792202903],
+Cell[8161, 280, 209, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[6579, 231, 152, 4, 27, "Input",
+Cell[8395, 292, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1170655896],
-Cell[6734, 237, 392, 14, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->2056489351]
+Cell[8550, 298, 371, 13, 57, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[7141, 254, 262, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1242785256],
+Cell[8936, 314, 209, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[7428, 268, 152, 4, 27, "Input",
+Cell[9170, 326, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1302484886],
-Cell[7583, 274, 390, 14, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->339795493]
+Cell[9325, 332, 370, 13, 55, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[7988, 291, 261, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->102826276],
+Cell[9710, 348, 209, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[8274, 305, 151, 4, 27, "Input",
+Cell[9944, 360, 151, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->255541888],
-Cell[8428, 311, 701, 25, 64, "Output",
- CellTags->"AnomalousDimension",
- CellID->724940306]
+Cell[10098, 366, 681, 24, 57, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[9144, 339, 263, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1117022044],
+Cell[10794, 393, 210, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[9432, 353, 153, 4, 27, "Input",
+Cell[11029, 405, 153, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1738556670],
-Cell[9588, 359, 796, 27, 67, "Output",
- CellTags->"AnomalousDimension",
- CellID->297175504]
+Cell[11185, 411, 776, 26, 61, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[10399, 389, 263, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1509439590],
+Cell[11976, 440, 210, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[10687, 403, 153, 4, 27, "Input",
+Cell[12211, 452, 153, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1025475425],
-Cell[10843, 409, 6715, 222, 410, "Output",
- CellTags->"AnomalousDimension",
- CellID->1707320400]
+Cell[12367, 458, 6694, 221, 406, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[17573, 634, 260, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->26937910],
+Cell[19076, 682, 209, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[17858, 648, 152, 4, 27, "Input",
+Cell[19310, 694, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1790656955],
-Cell[18013, 654, 4224, 144, 304, "Output",
- CellTags->"AnomalousDimension",
- CellID->578210880]
+Cell[19465, 700, 4204, 143, 278, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[22252, 801, 262, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1644657872],
+Cell[23684, 846, 209, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[22539, 815, 153, 4, 27, "Input",
+Cell[23918, 858, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1820360375],
-Cell[22695, 821, 6332, 216, 418, "Output",
- CellTags->"AnomalousDimension",
- CellID->1694165204]
+Cell[24073, 864, 6310, 215, 375, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[29042, 1040, 261, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->462099557],
+Cell[30398, 1082, 209, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[29328, 1054, 153, 4, 27, "Input",
+Cell[30632, 1094, 153, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->1613754345],
-Cell[29484, 1060, 5020, 170, 347, "Output",
- CellTags->"AnomalousDimension",
- CellID->1244918806]
+Cell[30788, 1100, 4999, 169, 302, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[34519, 1233, 288, 10, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->721182810],
+Cell[35802, 1272, 236, 8, 41, "Notes"],
Cell[CellGroupData[{
-Cell[34832, 1247, 152, 4, 27, "Input",
+Cell[36063, 1284, 152, 4, 27, "Input",
CellTags->"AnomalousDimension",
CellID->889064365],
-Cell[34987, 1253, 4489, 143, 337, "Output",
- CellTags->"AnomalousDimension",
- CellID->1840404969]
+Cell[36218, 1290, 4468, 142, 313, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]],
-Cell[39491, 1399, 330, 11, 42, "Text",
- CellTags->"AnomalousDimension",
- CellID->1805318835],
+Cell[40701, 1435, 277, 9, 41, "Notes"],
Cell[CellGroupData[{
-Cell[39846, 1414, 315, 10, 27, "Input",
+Cell[41003, 1448, 315, 10, 27, "Input",
CellTags->"AnomalousDimension",
CellID->621534472],
-Cell[40164, 1426, 347, 11, 36, "Output",
- CellTags->"AnomalousDimension",
- CellID->494342750]
+Cell[41321, 1460, 327, 10, 35, "Output",
+ CellTags->"AnomalousDimension"]
}, Open ]]
}, Open ]],
-Cell[40538, 1441, 31, 0, 29, "SectionFooterSpacer"]
+Cell[41675, 1474, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[40606, 1446, 270, 12, 31, "SeeAlsoSection",
+Cell[41743, 1479, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[40879, 1460, 574, 22, 32, "Text",
- CellTags->"AnomalousDimension",
- CellID->1774979938]
+Cell[42016, 1493, 523, 20, 56, "SeeAlso"]
}, Open ]],
-Cell[41468, 1485, 23, 0, 42, "FooterCell"]
+Cell[42554, 1516, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Anti5.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Anti5.nb
index 6c00b7eeb..94dc66a31 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Anti5.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Anti5.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18889, 724]
-NotebookOptionsPosition[ 12625, 510]
-NotebookOutlinePosition[ 16515, 628]
-CellTagsIndexPosition[ 16406, 622]
+NotebookDataLength[ 24372, 935]
+NotebookOptionsPosition[ 17878, 720]
+NotebookOutlinePosition[ 21450, 825]
+CellTagsIndexPosition[ 21341, 819]
WindowTitle->Anti5
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Anti5\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Anti5"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Anti5.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracOrder\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracOrder"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Anti5\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Anti5"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Anti5.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$17327],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Anti5",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$22719],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Anti5",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,38 +98,109 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Anti5", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Anti5", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"Anti5", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "anticommutes all ",
+ " \[LineSeparator]anticommutes all ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "in exp to the right. Anti5[exp, n] anticommutes all ",
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in exp to the right."
+ }]]},
+ {"", Cell[TextData[{
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]",
- RowBox[{"5", " "}]], TraditionalForm]]],
- "n times to the right. Anti5[exp, -n] anticommutes all ",
+ RowBox[{"Anti5", "[",
+ RowBox[{"exp", ",", "n"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]anticommutes all ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " n times to the left."
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " ",
+ Cell[BoxData["n"], "InlineFormula"],
+ "-times to the right."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"Anti5", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"-", "n"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]anticommutes all ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " ",
+ Cell[BoxData["n"], "InlineFormula"],
+ "-times to the left."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {},
+ "Rows" -> {None, None, {None}}, "RowsIndexed" -> {}}},
CellID->982511436],
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->863395348],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Anti5", "]"}]], "Input",
+ CellLabel->"In[54]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{", "}"}], TraditionalForm]], "Output",
+ ImageSize->{16, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[54]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -116,27 +212,27 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->840004482],
+ CellID->2006703176],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->719455314],
+ CellID->1562593174],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracMatrix", "[",
+ RowBox[{"GA", "[",
RowBox[{"5", ",", "\[Mu]"}], "]"}], " "}]], "Input",
CellTags->"Anti5",
CellLabel->"In[1]:=",
@@ -144,14 +240,26 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"5", ",", "\[Mu]"}], ")"}], TraditionalForm]], "Output",
- ImageSize->{118, 15},
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{49, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[1]=",
- CellID->294517214]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -176,22 +284,27 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{55, 18},
+ ImageSize->{60, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[2]=",
- CellID->1246682665]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"Anti5", "[",
RowBox[{"%", ",",
RowBox[{"-", "1"}]}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1609506190],
Cell[BoxData[
@@ -207,37 +320,70 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 18},
+ ImageSize->{49, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[3]=",
- CellID->741917191]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracMatrix", "[",
+ RowBox[{"GA", "[",
RowBox[{
"5", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
"]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1286690073],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{
- "5", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
- ")"}], TraditionalForm]], "Output",
- ImageSize->{171, 15},
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Gamma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{124, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[4]=",
- CellID->733245772]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -246,7 +392,7 @@ Cell[BoxData[
RowBox[{"Anti5", "[",
RowBox[{"%", ",", "2"}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->197831622],
Cell[BoxData[
@@ -280,12 +426,11 @@ Cell[BoxData[
FormBox["\[Delta]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{116, 19},
+ ImageSize->{124, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[5]=",
- CellID->446711059]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -294,7 +439,7 @@ Cell[BoxData[
RowBox[{"Anti5", "[",
RowBox[{"%%", ",", "Infinity"}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->1010214576],
Cell[BoxData[
@@ -328,12 +473,11 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{116, 19},
+ ImageSize->{124, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[6]=",
- CellID->1568263833]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -343,7 +487,7 @@ Cell[BoxData[
RowBox[{"%", ",",
RowBox[{"-", "Infinity"}]}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[7]:=",
+ CellLabel->"In[5]:=",
CellID->1359760692],
Cell[BoxData[
@@ -377,30 +521,33 @@ Cell[BoxData[
FormBox["\[Delta]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{116, 19},
+ ImageSize->{124, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[7]=",
- CellID->177899299]
+ CellLabel->"Out[5]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"In the naive ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "- scheme D-dimensional ",
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ "-scheme ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional ",
+ Cell[BoxData["\[Gamma]"], "InlineFormula"],
+ "-matrices anticommute with",
Cell[BoxData[
- FormBox["\[Gamma]", TraditionalForm]]],
- "-matrices anticommute with ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
"."
-}], "Text",
- CellTags->"Anti5",
- CellID->1633748802],
+}], "Notes"],
Cell[CellGroupData[{
@@ -408,7 +555,7 @@ Cell[BoxData[
RowBox[{"GA5", ".",
RowBox[{"GAD", "[", "\[Mu]", "]"}]}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[8]:=",
+ CellLabel->"In[1]:=",
CellID->1799781971],
Cell[BoxData[
@@ -425,12 +572,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{44, 18},
+ ImageSize->{48, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[8]=",
- CellID->1994871864]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -438,7 +584,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Anti5", "[", "%", "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[9]:=",
+ CellLabel->"In[2]:=",
CellID->42617734],
Cell[BoxData[
@@ -454,12 +600,78 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{59, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Anti5",
- CellLabel->"Out[9]=",
- CellID->1660721309]
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["Anti5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Anti5",
+ ButtonNote->"Anti5"],
+ " also works in the t'Hooft-Veltman-Breitenlohner-Maison scheme"
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Anti5", "[",
+ RowBox[{"GA5", ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{120, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[3]:="]
}, Open ]]
}, Open ]],
@@ -501,9 +713,7 @@ Cell[TextData[{
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Anti5",
- CellID->1283449801]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -511,7 +721,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Anti5",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -520,22 +730,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 12.506137}",
+ "built" -> "{2020, 1, 5, 18, 52, 36.057309}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "Anti5[exp] anticommutes all \\[Gamma]^5in exp to the right. Anti5[exp, \
-n] anticommutes all \\[Gamma] 5 n times to the right. Anti5[exp, -n] \
-anticommutes all \\[Gamma]^5 n times to the left.", "synonyms" -> {}, "title" ->
- "Anti5", "titlemodifier" -> "", "windowtitle" -> "Anti5", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Anti5"}, "SearchTextTranslated" -> ""},
+ "Anti5[exp] anticommutes all \\[Gamma]^5 in exp to the right. Anti5[exp, \
+n] anticommutes all \\[Gamma]^5 n-times to the right. Anti5[exp, -n] \
+anticommutes all \\[Gamma]^5 n-times to the left.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Anti5", "titlemodifier" -> "",
+ "windowtitle" -> "Anti5", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Anti5"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -543,8 +754,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -553,179 +765,178 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3707, 107, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6410, 203, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->840004482]},
+ CellID->2006703176]},
"Anti5"->{
- Cell[4339, 136, 174, 6, 27, "Input",
+ Cell[7044, 232, 165, 6, 27, "Input",
CellTags->"Anti5",
CellID->2080632323],
- Cell[4516, 144, 273, 9, 36, "Output",
- CellTags->"Anti5",
- CellID->294517214],
- Cell[4826, 158, 122, 4, 27, "Input",
+ Cell[7212, 240, 515, 21, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[7764, 266, 122, 4, 27, "Input",
CellTags->"Anti5",
CellID->1232582412],
- Cell[4951, 164, 487, 19, 39, "Output",
- CellTags->"Anti5",
- CellID->1246682665],
- Cell[5475, 188, 164, 6, 27, "Input",
+ Cell[7889, 272, 466, 18, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[8522, 301, 164, 6, 27, "Input",
CellTags->"Anti5",
CellID->1609506190],
- Cell[5642, 196, 457, 18, 39, "Output",
- CellTags->"Anti5",
- CellID->741917191],
- Cell[6136, 219, 214, 7, 27, "Input",
+ Cell[8689, 309, 437, 17, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[9163, 331, 205, 7, 27, "Input",
CellTags->"Anti5",
CellID->1286690073],
- Cell[6353, 228, 334, 11, 36, "Output",
- CellTags->"Anti5",
- CellID->733245772],
- Cell[6724, 244, 144, 5, 27, "Input",
+ Cell[9371, 340, 1082, 45, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[10490, 390, 144, 5, 27, "Input",
CellTags->"Anti5",
CellID->197831622],
- Cell[6871, 251, 904, 36, 40, "Output",
- CellTags->"Anti5",
- CellID->446711059],
- Cell[7812, 292, 153, 5, 27, "Input",
+ Cell[10637, 397, 884, 35, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[11558, 437, 153, 5, 27, "Input",
CellTags->"Anti5",
CellID->1010214576],
- Cell[7968, 299, 905, 36, 40, "Output",
- CellTags->"Anti5",
- CellID->1568263833],
- Cell[8910, 340, 171, 6, 27, "Input",
+ Cell[11714, 444, 884, 35, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[12635, 484, 171, 6, 27, "Input",
CellTags->"Anti5",
CellID->1359760692],
- Cell[9084, 348, 904, 36, 40, "Output",
- CellTags->"Anti5",
- CellID->177899299],
- Cell[10003, 387, 372, 15, 33, "Text",
- CellTags->"Anti5",
- CellID->1633748802],
- Cell[10400, 406, 149, 5, 27, "Input",
+ Cell[12809, 492, 884, 35, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[14209, 553, 149, 5, 27, "Input",
CellTags->"Anti5",
CellID->1799781971],
- Cell[10552, 413, 472, 19, 39, "Output",
- CellTags->"Anti5",
- CellID->1994871864],
- Cell[11061, 437, 120, 4, 27, "Input",
+ Cell[14361, 560, 451, 18, 40, "Output",
+ CellTags->"Anti5"],
+ Cell[14849, 583, 120, 4, 27, "Input",
CellTags->"Anti5",
CellID->42617734],
- Cell[11184, 443, 461, 18, 39, "Output",
- CellTags->"Anti5",
- CellID->1660721309],
- Cell[12013, 484, 570, 21, 32, "Text",
- CellTags->"Anti5",
- CellID->1283449801]}
+ Cell[14972, 589, 440, 17, 40, "Output",
+ CellTags->"Anti5"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14535, 554},
- {"Anti5", 14667, 558}
+ {"PrimaryExamplesSection", 19835, 766},
+ {"Anti5", 19968, 770}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[577, 21, 2232, 52, 51, "AnchorBarGrid",
+Cell[577, 21, 3187, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2812, 75, 48, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2863, 78, 819, 25, 105, "Usage",
+Cell[3767, 100, 282, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4074, 115, 1177, 37, 211, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3707, 107, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5276, 156, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->863395348],
+Cell[6017, 182, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[6073, 186, 88, 2, 70, "Input"],
+Cell[6164, 190, 185, 6, 35, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6410, 203, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->840004482],
+ CellID->2006703176],
Cell[CellGroupData[{
-Cell[4119, 126, 195, 6, 25, "ExampleSection",
- CellID->719455314],
+Cell[6823, 222, 196, 6, 26, "ExampleSection",
+ CellID->1562593174],
Cell[CellGroupData[{
-Cell[4339, 136, 174, 6, 27, "Input",
+Cell[7044, 232, 165, 6, 27, "Input",
CellTags->"Anti5",
CellID->2080632323],
-Cell[4516, 144, 273, 9, 36, "Output",
- CellTags->"Anti5",
- CellID->294517214]
+Cell[7212, 240, 515, 21, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4826, 158, 122, 4, 27, "Input",
+Cell[7764, 266, 122, 4, 27, "Input",
CellTags->"Anti5",
CellID->1232582412],
-Cell[4951, 164, 487, 19, 39, "Output",
- CellTags->"Anti5",
- CellID->1246682665]
+Cell[7889, 272, 466, 18, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5475, 188, 164, 6, 27, "Input",
+Cell[8392, 295, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8522, 301, 164, 6, 27, "Input",
CellTags->"Anti5",
CellID->1609506190],
-Cell[5642, 196, 457, 18, 39, "Output",
- CellTags->"Anti5",
- CellID->741917191]
+Cell[8689, 309, 437, 17, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6136, 219, 214, 7, 27, "Input",
+Cell[9163, 331, 205, 7, 27, "Input",
CellTags->"Anti5",
CellID->1286690073],
-Cell[6353, 228, 334, 11, 36, "Output",
- CellTags->"Anti5",
- CellID->733245772]
+Cell[9371, 340, 1082, 45, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6724, 244, 144, 5, 27, "Input",
+Cell[10490, 390, 144, 5, 27, "Input",
CellTags->"Anti5",
CellID->197831622],
-Cell[6871, 251, 904, 36, 40, "Output",
- CellTags->"Anti5",
- CellID->446711059]
+Cell[10637, 397, 884, 35, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7812, 292, 153, 5, 27, "Input",
+Cell[11558, 437, 153, 5, 27, "Input",
CellTags->"Anti5",
CellID->1010214576],
-Cell[7968, 299, 905, 36, 40, "Output",
- CellTags->"Anti5",
- CellID->1568263833]
+Cell[11714, 444, 884, 35, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8910, 340, 171, 6, 27, "Input",
+Cell[12635, 484, 171, 6, 27, "Input",
CellTags->"Anti5",
CellID->1359760692],
-Cell[9084, 348, 904, 36, 40, "Output",
- CellTags->"Anti5",
- CellID->177899299]
+Cell[12809, 492, 884, 35, 40, "Output",
+ CellTags->"Anti5"]
+}, Open ]]
}, Open ]],
-Cell[10003, 387, 372, 15, 33, "Text",
- CellTags->"Anti5",
- CellID->1633748802],
Cell[CellGroupData[{
-Cell[10400, 406, 149, 5, 27, "Input",
+Cell[13742, 533, 105, 2, 9, "ExampleDelimiter"],
+Cell[13850, 537, 334, 12, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[14209, 553, 149, 5, 27, "Input",
CellTags->"Anti5",
CellID->1799781971],
-Cell[10552, 413, 472, 19, 39, "Output",
- CellTags->"Anti5",
- CellID->1994871864]
+Cell[14361, 560, 451, 18, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11061, 437, 120, 4, 27, "Input",
+Cell[14849, 583, 120, 4, 27, "Input",
CellTags->"Anti5",
CellID->42617734],
-Cell[11184, 443, 461, 18, 39, "Output",
- CellTags->"Anti5",
- CellID->1660721309]
+Cell[14972, 589, 440, 17, 40, "Output",
+ CellTags->"Anti5"]
}, Open ]]
}, Open ]],
-Cell[11672, 465, 31, 0, 29, "SectionFooterSpacer"]
+Cell[CellGroupData[{
+Cell[15461, 612, 105, 2, 9, "ExampleDelimiter"],
+Cell[15569, 616, 202, 6, 32, "Notes"],
+Cell[15774, 624, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[15927, 632, 141, 4, 27, "Input"],
+Cell[16071, 638, 723, 28, 40, "Output"]
+}, Open ]],
+Cell[16809, 669, 127, 4, 27, "Input"]
+}, Open ]]
+}, Open ]],
+Cell[16963, 677, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11740, 470, 270, 12, 31, "SeeAlsoSection",
+Cell[17031, 682, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12013, 484, 570, 21, 32, "Text",
- CellTags->"Anti5",
- CellID->1283449801]
+Cell[17304, 696, 532, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[12598, 508, 23, 0, 42, "FooterCell"]
+Cell[17851, 718, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiCommutator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiCommutator.nb
index 7c6154bd9..7ebcda5bc 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiCommutator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiCommutator.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 19091, 691]
-NotebookOptionsPosition[ 11848, 455]
-NotebookOutlinePosition[ 16234, 585]
-CellTagsIndexPosition[ 16116, 579]
+NotebookDataLength[ 19309, 682]
+NotebookOptionsPosition[ 12854, 478]
+NotebookOutlinePosition[ 16771, 591]
+CellTagsIndexPosition[ 16653, 585]
WindowTitle->AntiCommutator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/AntiCommutator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/AntiCommutator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Commutator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Commutator"], "\<\"CommutatorExplicit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CommutatorExplicit"], \
+"\<\"DeclareNonCommutative\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeclareNonCommutative"], "\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DotSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/AntiCommutator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/AntiCommutator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
AntiCommutator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$17675],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/AntiCommutator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$23172],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/AntiCommutator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +100,31 @@ AntiCommutator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["AntiCommutator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["AntiCommutator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"AntiCommutator", "[",
- RowBox[{"x", ",", " ", "y"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "= c defines the anti-commutator of the non commuting objects x and y."
+ RowBox[{
+ RowBox[{"AntiCommutator", "[",
+ RowBox[{"x", ",", " ", "y"}], "]"}], "=", "c"}]], "InlineFormula"],
+ " \[LineSeparator]defines the anti-commutator of the non commuting \
+objects ",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["y"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -108,7 +150,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->32103671],
+ CellID->150157100],
Cell[CellGroupData[{
@@ -118,7 +160,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1005734859],
+ CellID->1241487278],
Cell[TextData[{
"This declares ",
@@ -128,9 +170,7 @@ Cell[TextData[{
StyleBox["b",
FontFamily->"Courier"],
" as noncommutative variables."
-}], "Text",
- CellTags->"AntiCommutator",
- CellID->1525212065],
+}], "Notes"],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
@@ -163,12 +203,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\"}\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{57, 15},
+ ImageSize->{61, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[2]=",
- CellID->479481037]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -184,12 +223,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"a", ".", "b"}], "+",
RowBox[{"b", ".", "a"}]}], TraditionalForm]], "Output",
- ImageSize->{63, 15},
+ ImageSize->{74, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[3]=",
- CellID->147684859]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -220,12 +258,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"a", "-",
RowBox[{"2", " ", "b"}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{229, 15},
+ ImageSize->{254, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[4]=",
- CellID->1027223948]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -244,24 +281,18 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "-",
- RowBox[{"2", " ", "b"}]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}]}], "+",
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"a", "-",
- RowBox[{"2", " ", "b"}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{229, 15},
+ RowBox[{"-",
+ RowBox[{"a", ".", "b"}]}], "-",
+ RowBox[{"b", ".", "a"}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"a", ".", "a"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"b", ".", "b"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{195, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[5]=",
- CellID->980600157]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[BoxData[
@@ -273,9 +304,7 @@ Cell[BoxData[
CellLabel->"In[6]:=",
CellID->422937377],
-Cell["Defining {c,d} = z results in replacements of c.d by z-d.c.", "Text",
- CellTags->"AntiCommutator",
- CellID->405748459],
+Cell["Defining {c,d} = z results in replacements of c.d by z-d.c.", "Notes"],
Cell[CellGroupData[{
@@ -289,12 +318,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["z", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[7]=",
- CellID->1400406202]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -312,12 +340,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"d", " ", "z"}], "-",
RowBox[{"d", ".", "d", ".", "c"}]}], TraditionalForm]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{89, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[8]=",
- CellID->1500489599]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -336,12 +363,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
OverscriptBox["z", "~"], TraditionalForm]], "Output",
- ImageSize->{14, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[9]=",
- CellID->225220528]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -366,12 +392,11 @@ Cell[BoxData[
OverscriptBox["c", "~"], ".",
OverscriptBox["d", "~"], ".",
OverscriptBox["d", "~"]}]}], TraditionalForm]], "Output",
- ImageSize->{79, 20},
+ ImageSize->{89, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiCommutator",
- CellLabel->"Out[10]=",
- CellID->1740531218]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[BoxData[
@@ -446,9 +471,7 @@ Cell[TextData[{
ButtonNote->"DotSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"AntiCommutator",
- CellID->1793111208]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -456,7 +479,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"AntiCommutator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -465,22 +488,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 14.093782}",
+ "built" -> "{2020, 1, 5, 18, 52, 37.334212}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"AntiCommutator[x, y] = c defines the anti-commutator of the non \
-commuting objects x and y.", "synonyms" -> {}, "title" -> "AntiCommutator",
- "titlemodifier" -> "", "windowtitle" -> "AntiCommutator", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/AntiCommutator"}, "SearchTextTranslated" ->
- ""},
+commuting objects x and y.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "AntiCommutator", "titlemodifier" -> "", "windowtitle" ->
+ "AntiCommutator", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/AntiCommutator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -489,7 +512,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -498,201 +521,169 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3394, 95, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[4827, 137, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->32103671]},
+ CellID->150157100]},
"AntiCommutator"->{
- Cell[4004, 122, 221, 10, 32, "Text",
- CellTags->"AntiCommutator",
- CellID->1525212065],
- Cell[4228, 134, 169, 5, 27, "Input",
+ Cell[5613, 174, 169, 5, 27, "Input",
CellTags->"AntiCommutator",
CellID->756062925],
- Cell[4422, 143, 163, 5, 27, "Input",
+ Cell[5807, 183, 163, 5, 27, "Input",
CellTags->"AntiCommutator",
CellID->1726378547],
- Cell[4588, 150, 502, 20, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->479481037],
- Cell[5127, 175, 143, 4, 27, "Input",
+ Cell[5973, 190, 482, 19, 35, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[6492, 214, 143, 4, 27, "Input",
CellTags->"AntiCommutator",
CellID->693384404],
- Cell[5273, 181, 286, 10, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->147684859],
- Cell[5596, 196, 285, 9, 27, "Input",
+ Cell[6638, 220, 266, 9, 35, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[6941, 234, 285, 9, 27, "Input",
CellTags->"AntiCommutator",
CellID->1495920503],
- Cell[5884, 207, 546, 20, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->1027223948],
- Cell[6467, 232, 277, 9, 27, "Input",
+ Cell[7229, 245, 525, 19, 37, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[7791, 269, 277, 9, 27, "Input",
CellTags->"AntiCommutator",
CellID->871283752],
- Cell[6747, 243, 545, 20, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->980600157],
- Cell[7307, 266, 237, 7, 38, "Input",
+ Cell[8071, 280, 405, 14, 35, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[8491, 297, 237, 7, 38, "Input",
CellTags->"AntiCommutator",
CellID->422937377],
- Cell[7547, 275, 124, 2, 32, "Text",
- CellTags->"AntiCommutator",
- CellID->405748459],
- Cell[7696, 281, 197, 6, 27, "Input",
+ Cell[8832, 310, 197, 6, 27, "Input",
CellTags->"AntiCommutator",
CellID->1154888291],
- Cell[7896, 289, 216, 7, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->1400406202],
- Cell[8149, 301, 201, 6, 27, "Input",
+ Cell[9032, 318, 195, 6, 35, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[9264, 329, 201, 6, 27, "Input",
CellTags->"AntiCommutator",
CellID->400792382],
- Cell[8353, 309, 297, 10, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->1500489599],
- Cell[8687, 324, 269, 9, 38, "Input",
+ Cell[9468, 337, 276, 9, 35, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[9781, 351, 269, 9, 38, "Input",
CellTags->"AntiCommutator",
CellID->392638266],
- Cell[8959, 335, 238, 8, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->225220528],
- Cell[9234, 348, 272, 8, 38, "Input",
+ Cell[10053, 362, 218, 7, 35, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[10308, 374, 272, 8, 38, "Input",
CellTags->"AntiCommutator",
CellID->598753128],
- Cell[9509, 358, 423, 15, 41, "Output",
- CellTags->"AntiCommutator",
- CellID->1740531218],
- Cell[9947, 376, 260, 7, 38, "Input",
+ Cell[10583, 384, 402, 14, 39, "Output",
+ CellTags->"AntiCommutator"],
+ Cell[11000, 401, 260, 7, 38, "Input",
CellTags->"AntiCommutator",
CellID->108727372],
- Cell[10210, 385, 196, 6, 27, "Input",
+ Cell[11263, 410, 196, 6, 27, "Input",
CellTags->"AntiCommutator",
CellID->873286670],
- Cell[10409, 393, 246, 8, 38, "Input",
- CellTags->"AntiCommutator",
- CellID->702830390],
- Cell[11011, 423, 795, 27, 32, "Text",
+ Cell[11462, 418, 246, 8, 38, "Input",
CellTags->"AntiCommutator",
- CellID->1793111208]}
+ CellID->702830390]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13696, 499},
- {"AntiCommutator", 13835, 503}
+ {"PrimaryExamplesSection", 14690, 522},
+ {"AntiCommutator", 14831, 526}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3350, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 451, 13, 82, "Usage",
+Cell[3939, 102, 291, 11, 45, "ObjectNameGrid"],
+Cell[4233, 115, 569, 18, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3394, 95, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4827, 137, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->32103671],
+ CellID->150157100],
Cell[CellGroupData[{
-Cell[3805, 114, 196, 6, 25, "ExampleSection",
- CellID->1005734859],
-Cell[4004, 122, 221, 10, 32, "Text",
- CellTags->"AntiCommutator",
- CellID->1525212065],
-Cell[4228, 134, 169, 5, 27, "Input",
+Cell[5239, 156, 196, 6, 26, "ExampleSection",
+ CellID->1241487278],
+Cell[5438, 164, 172, 8, 32, "Notes"],
+Cell[5613, 174, 169, 5, 27, "Input",
CellTags->"AntiCommutator",
CellID->756062925],
Cell[CellGroupData[{
-Cell[4422, 143, 163, 5, 27, "Input",
+Cell[5807, 183, 163, 5, 27, "Input",
CellTags->"AntiCommutator",
CellID->1726378547],
-Cell[4588, 150, 502, 20, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->479481037]
+Cell[5973, 190, 482, 19, 35, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5127, 175, 143, 4, 27, "Input",
+Cell[6492, 214, 143, 4, 27, "Input",
CellTags->"AntiCommutator",
CellID->693384404],
-Cell[5273, 181, 286, 10, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->147684859]
+Cell[6638, 220, 266, 9, 35, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5596, 196, 285, 9, 27, "Input",
+Cell[6941, 234, 285, 9, 27, "Input",
CellTags->"AntiCommutator",
CellID->1495920503],
-Cell[5884, 207, 546, 20, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->1027223948]
+Cell[7229, 245, 525, 19, 37, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6467, 232, 277, 9, 27, "Input",
+Cell[7791, 269, 277, 9, 27, "Input",
CellTags->"AntiCommutator",
CellID->871283752],
-Cell[6747, 243, 545, 20, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->980600157]
+Cell[8071, 280, 405, 14, 35, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
-Cell[7307, 266, 237, 7, 38, "Input",
+Cell[8491, 297, 237, 7, 38, "Input",
CellTags->"AntiCommutator",
CellID->422937377],
-Cell[7547, 275, 124, 2, 32, "Text",
- CellTags->"AntiCommutator",
- CellID->405748459],
+Cell[8731, 306, 76, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[7696, 281, 197, 6, 27, "Input",
+Cell[8832, 310, 197, 6, 27, "Input",
CellTags->"AntiCommutator",
CellID->1154888291],
-Cell[7896, 289, 216, 7, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->1400406202]
+Cell[9032, 318, 195, 6, 35, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8149, 301, 201, 6, 27, "Input",
+Cell[9264, 329, 201, 6, 27, "Input",
CellTags->"AntiCommutator",
CellID->400792382],
-Cell[8353, 309, 297, 10, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->1500489599]
+Cell[9468, 337, 276, 9, 35, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8687, 324, 269, 9, 38, "Input",
+Cell[9781, 351, 269, 9, 38, "Input",
CellTags->"AntiCommutator",
CellID->392638266],
-Cell[8959, 335, 238, 8, 36, "Output",
- CellTags->"AntiCommutator",
- CellID->225220528]
+Cell[10053, 362, 218, 7, 35, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9234, 348, 272, 8, 38, "Input",
+Cell[10308, 374, 272, 8, 38, "Input",
CellTags->"AntiCommutator",
CellID->598753128],
-Cell[9509, 358, 423, 15, 41, "Output",
- CellTags->"AntiCommutator",
- CellID->1740531218]
+Cell[10583, 384, 402, 14, 39, "Output",
+ CellTags->"AntiCommutator"]
}, Open ]],
-Cell[9947, 376, 260, 7, 38, "Input",
+Cell[11000, 401, 260, 7, 38, "Input",
CellTags->"AntiCommutator",
CellID->108727372],
-Cell[10210, 385, 196, 6, 27, "Input",
+Cell[11263, 410, 196, 6, 27, "Input",
CellTags->"AntiCommutator",
CellID->873286670],
-Cell[10409, 393, 246, 8, 38, "Input",
+Cell[11462, 418, 246, 8, 38, "Input",
CellTags->"AntiCommutator",
CellID->702830390]
}, Open ]],
-Cell[10670, 404, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11723, 429, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10738, 409, 270, 12, 31, "SeeAlsoSection",
+Cell[11791, 434, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[11011, 423, 795, 27, 32, "Text",
- CellTags->"AntiCommutator",
- CellID->1793111208]
+Cell[12064, 448, 748, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[11821, 453, 23, 0, 42, "FooterCell"]
+Cell[12827, 476, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiQuarkField.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiQuarkField.nb
index a42411c55..679604f72 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiQuarkField.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiQuarkField.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8449, 275]
-NotebookOptionsPosition[ 5206, 179]
-NotebookOutlinePosition[ 7674, 246]
-CellTagsIndexPosition[ 7558, 240]
+NotebookDataLength[ 9271, 299]
+NotebookOptionsPosition[ 6236, 210]
+NotebookOutlinePosition[ 8575, 274]
+CellTagsIndexPosition[ 8459, 268]
WindowTitle->AntiQuarkField
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/AntiQuarkField\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/AntiQuarkField"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"QuantumField\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QuantumField"], "\<\"QuarkField\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuarkField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/AntiQuarkField\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/AntiQuarkField"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
AntiQuarkField.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$18024],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/AntiQuarkField", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$23621],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/AntiQuarkField", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ AntiQuarkField.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["AntiQuarkField", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["AntiQuarkField", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->670436164],
+ CellID->1486930793],
Cell[CellGroupData[{
@@ -117,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1694773864],
+ CellID->1966272740],
Cell[CellGroupData[{
@@ -129,12 +163,11 @@ Cell[BoxData["AntiQuarkField"], "Input",
Cell[BoxData[
FormBox[
OverscriptBox["\[Psi]", "_"], TraditionalForm]], "Output",
- ImageSize->{17, 15},
+ ImageSize->{16, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiQuarkField",
- CellLabel->"Out[1]=",
- CellID->1958170632]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -170,9 +203,7 @@ Cell[TextData[{
ButtonNote->"QuarkField"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"AntiQuarkField",
- CellID->1809382525]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -180,7 +211,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"AntiQuarkField",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -189,10 +220,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 15.566147}",
+ "built" -> "{2020, 1, 5, 18, 52, 38.579294}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -200,11 +231,12 @@ TaggingRules->{
"None", "summary" ->
"AntiQuarkField is the name of a fermionic field. AntiQuarkField is just \
a name with no functional properties. Only typesetting rules are attached.",
- "synonyms" -> {}, "title" -> "AntiQuarkField", "titlemodifier" -> "",
- "windowtitle" -> "AntiQuarkField", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/AntiQuarkField"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "AntiQuarkField",
+ "titlemodifier" -> "", "windowtitle" -> "AntiQuarkField", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/AntiQuarkField"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -213,7 +245,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -222,61 +254,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3393, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4490, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->670436164]},
+ CellID->1486930793]},
"AntiQuarkField"->{
- Cell[4026, 123, 112, 3, 27, "Input",
+ Cell[5124, 157, 112, 3, 27, "Input",
CellTags->"AntiQuarkField",
CellID->820739788],
- Cell[4141, 128, 244, 8, 36, "Output",
- CellTags->"AntiQuarkField",
- CellID->1958170632],
- Cell[4753, 159, 411, 15, 31, "Text",
- CellTags->"AntiQuarkField",
- CellID->1809382525]}
+ Cell[5239, 162, 223, 7, 37, "Output",
+ CellTags->"AntiQuarkField"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7112, 223},
- {"AntiQuarkField", 7252, 227}
+ {"PrimaryExamplesSection", 8128, 255},
+ {"AntiQuarkField", 8270, 259}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3132, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 450, 12, 97, "Usage",
+Cell[3721, 99, 291, 11, 45, "ObjectNameGrid"],
+Cell[4015, 112, 450, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3393, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4490, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->670436164],
+ CellID->1486930793],
Cell[CellGroupData[{
-Cell[3805, 113, 196, 6, 25, "ExampleSection",
- CellID->1694773864],
+Cell[4903, 147, 196, 6, 26, "ExampleSection",
+ CellID->1966272740],
Cell[CellGroupData[{
-Cell[4026, 123, 112, 3, 27, "Input",
+Cell[5124, 157, 112, 3, 27, "Input",
CellTags->"AntiQuarkField",
CellID->820739788],
-Cell[4141, 128, 244, 8, 36, "Output",
- CellTags->"AntiQuarkField",
- CellID->1958170632]
+Cell[5239, 162, 223, 7, 37, "Output",
+ CellTags->"AntiQuarkField"]
}, Open ]]
}, Open ]],
-Cell[4412, 140, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5489, 173, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4480, 145, 270, 12, 31, "SeeAlsoSection",
+Cell[5557, 178, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4753, 159, 411, 15, 31, "Text",
- CellTags->"AntiQuarkField",
- CellID->1809382525]
+Cell[5830, 192, 364, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5179, 177, 23, 0, 42, "FooterCell"]
+Cell[6209, 208, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiSymmetrize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiSymmetrize.nb
deleted file mode 100644
index 9f1065d81..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/AntiSymmetrize.nb
+++ /dev/null
@@ -1,339 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.2' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9750, 329]
-NotebookOptionsPosition[ 6170, 219]
-NotebookOutlinePosition[ 8766, 292]
-CellTagsIndexPosition[ 8650, 286]
-WindowTitle->AntiSymmetrize
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/AntiSymmetrize\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/AntiSymmetrize"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-AntiSymmetrize.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$15333],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/AntiSymmetrize", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["AntiSymmetrize", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"AntiSymmetrize", "[",
- RowBox[{"expr", ",", " ",
- RowBox[{"{",
- RowBox[{"a1", ",", " ", "a2", ",", " ", "..."}], "}"}]}], "]"}]],
- "InlineFormula"],
- " \[LineSeparator]",
- "antisymmetrizes expr with respect to the variables a1,a2, ... "
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1316427813],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1874060199],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"AntiSymmetrize", "[",
- RowBox[{
- RowBox[{"f", "[",
- RowBox[{"a", ",", "b"}], "]"}], ",",
- RowBox[{"{",
- RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
- CellTags->"AntiSymmetrize",
- CellLabel->"In[1]:=",
- CellID->74722925],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"AntiSymmetrize", "(",
- RowBox[{
- RowBox[{"f", "(",
- RowBox[{"a", ",", "b"}], ")"}], ",",
- RowBox[{"{",
- RowBox[{"a", ",", "b"}], "}"}]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{209, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"AntiSymmetrize",
- CellLabel->"Out[1]=",
- CellID->1137948626]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"AntiSymmetrize", "[",
- RowBox[{
- RowBox[{"f", "[",
- RowBox[{"x", ",", "y", ",", "z"}], "]"}], ",",
- RowBox[{"{",
- RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]], "Input",
- CellTags->"AntiSymmetrize",
- CellLabel->"In[2]:=",
- CellID->685327648],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"AntiSymmetrize", "(",
- RowBox[{
- RowBox[{"f", "(",
- RowBox[{"x", ",", "y", ",", "z"}], ")"}], ",",
- RowBox[{"{",
- RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{243, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"AntiSymmetrize",
- CellLabel->"Out[2]=",
- CellID->275948597]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["Symmetrize",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Symmetrize",
- ButtonNote->"Symmetrize"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"AntiSymmetrize",
- CellID->145979915]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"AntiSymmetrize",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2015, 11, 6, 22, 55, 58.662309}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "AntiSymmetrize[expr, {a1, a2, ...}] antisymmetrizes expr with respect to \
-the variables a1,a2, ... ", "synonyms" -> {}, "title" -> "AntiSymmetrize",
- "titlemodifier" -> "", "windowtitle" -> "AntiSymmetrize", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/AntiSymmetrize"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.2 for Linux x86 (64-bit) (July 6, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.2 for Linux x86 (64-bit) (July 6, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3480, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1316427813]},
- "AntiSymmetrize"->{
- Cell[4114, 127, 264, 9, 27, "Input",
- CellTags->"AntiSymmetrize",
- CellID->74722925],
- Cell[4381, 138, 389, 13, 36, "Output",
- CellTags->"AntiSymmetrize",
- CellID->1137948626],
- Cell[4807, 156, 285, 9, 27, "Input",
- CellTags->"AntiSymmetrize",
- CellID->685327648],
- Cell[5095, 167, 411, 14, 36, "Output",
- CellTags->"AntiSymmetrize",
- CellID->275948597],
- Cell[5874, 204, 254, 10, 32, "Text",
- CellTags->"AntiSymmetrize",
- CellID->145979915]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 8016, 263},
- {"AntiSymmetrize", 8157, 267}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 537, 16, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3480, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1316427813],
-Cell[CellGroupData[{
-Cell[3893, 117, 196, 6, 25, "ExampleSection",
- CellID->1874060199],
-Cell[CellGroupData[{
-Cell[4114, 127, 264, 9, 27, "Input",
- CellTags->"AntiSymmetrize",
- CellID->74722925],
-Cell[4381, 138, 389, 13, 36, "Output",
- CellTags->"AntiSymmetrize",
- CellID->1137948626]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4807, 156, 285, 9, 27, "Input",
- CellTags->"AntiSymmetrize",
- CellID->685327648],
-Cell[5095, 167, 411, 14, 36, "Output",
- CellTags->"AntiSymmetrize",
- CellID->275948597]
-}, Open ]]
-}, Open ]],
-Cell[5533, 185, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5601, 190, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[5874, 204, 254, 10, 32, "Text",
- CellTags->"AntiSymmetrize",
- CellID->145979915]
-}, Open ]],
-Cell[6143, 217, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart1.nb
index e6574b5bd..39498f600 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart1.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6205, 193]
-NotebookOptionsPosition[ 3968, 126]
-NotebookOutlinePosition[ 5947, 182]
-CellTagsIndexPosition[ 5879, 177]
+NotebookDataLength[ 6965, 213]
+NotebookOptionsPosition[ 4917, 156]
+NotebookOutlinePosition[ 6758, 205]
+CellTagsIndexPosition[ 6715, 202]
WindowTitle->Apart1
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Apart1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Apart1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Apart1.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Apart3\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Apart3"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Apart1\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Apart1"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Apart1.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$18358],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Apart1",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24055],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Apart1", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Apart1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Apart1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -117,9 +149,7 @@ Cell[TextData[{
ButtonNote->"Apart3"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Apart1",
- CellID->104867705]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -136,10 +166,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 17.009567}",
+ "built" -> "{2020, 1, 5, 18, 52, 39.710427}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -147,11 +177,11 @@ TaggingRules->{
"None", "summary" ->
"Apart1[expr, x] is equivalent to Apart[expr, x], but it fixes a \
Mathematica bug relevant when expr contains complex numbers.",
- "synonyms" -> {}, "title" -> "Apart1", "titlemodifier" -> "",
- "windowtitle" -> "Apart1", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Apart1", "titlemodifier" ->
+ "", "windowtitle" -> "Apart1", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Apart1"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -160,41 +190,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Apart1"->{
- Cell[3707, 112, 219, 9, 70, "Text",
- CellTags->"Apart1",
- CellID->104867705]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Apart1", 5771, 170}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 2989, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 540, 16, 70, "Usage",
+Cell[3570, 97, 283, 11, 70, "ObjectNameGrid"],
+Cell[3856, 110, 540, 16, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3434, 98, 270, 12, 70, "SeeAlsoSection",
+Cell[4421, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3707, 112, 219, 9, 70, "Text",
- CellTags->"Apart1",
- CellID->104867705]
+Cell[4694, 144, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3941, 124, 23, 0, 70, "FooterCell"]
+Cell[4890, 154, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart2.nb
index e8392295a..4bbda2caa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart2.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13469, 468]
-NotebookOptionsPosition[ 9187, 330]
-NotebookOutlinePosition[ 12131, 415]
-CellTagsIndexPosition[ 12021, 409]
+NotebookDataLength[ 17647, 604]
+NotebookOptionsPosition[ 13394, 471]
+NotebookOutlinePosition[ 16208, 550]
+CellTagsIndexPosition[ 16098, 544]
WindowTitle->Apart2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Apart2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Apart2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Apart2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FAD"], "\<\"FeynAmpDenominator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominator"], "\<\"ApartFF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ApartFF"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Apart2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Apart2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Apart2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$18704],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Apart2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24499],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Apart2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Apart2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Apart2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +130,60 @@ Please use ApartFF instead."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1451633961],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Apart2", "]"}]], "Input",
+ CellTags->"Apart2",
+ CellLabel->"In[223]:=",
+ CellID->1571464480],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"ExcludeMasses", "\[Rule]",
+ RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{242, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Apart2",
+ CellLabel->"Out[223]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +199,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1089764331],
+ CellID->1660425432],
Cell[CellGroupData[{
@@ -118,30 +209,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1867734952],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Apart2", "]"}]], "Input",
- CellTags->"Apart2",
- CellLabel->"In[1]:=",
- CellID->1571464480],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factoring", "\[Rule]", "True"}], ",",
- RowBox[{"ExcludeMasses", "\[Rule]",
- RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{266, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Apart2",
- CellLabel->"Out[1]=",
- CellID->1842118848]
-}, Open ]],
+ CellID->29687880],
Cell[CellGroupData[{
@@ -154,7 +222,7 @@ Cell[BoxData[
RowBox[{"q", ",", "M"}], "}"}], ",",
RowBox[{"q", "-", "p"}]}], "]"}]], "Input",
CellTags->"Apart2",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1580962822],
Cell[BoxData[
@@ -163,35 +231,60 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
"\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`m^2, "]"],
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
Editable->False], ")"}], ".",
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
"\[InvisibleSpace]",
- SuperscriptBox["M", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`M^2, "]"],
+ SuperscriptBox["M", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`M^2],
Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{241, 48},
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{216, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Apart2",
- CellLabel->"Out[2]=",
- CellID->1281611536]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -199,52 +292,103 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Apart2", "[", "%", "]"}]], "Input",
CellTags->"Apart2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->867958772],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], "-",
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]]}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["M", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`M^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm]}],
RowBox[{
SuperscriptBox["m", "2"], "-",
SuperscriptBox["M", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{234, 61},
+ ImageSize->{306, 63},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Apart2",
- CellLabel->"Out[3]=",
- CellID->496976710]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -253,7 +397,7 @@ Cell[BoxData[
RowBox[{"StandardForm", "[",
RowBox[{"FCE", "[", "%", "]"}], "]"}]], "Input",
CellTags->"Apart2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->168515472],
Cell[BoxData[
@@ -274,12 +418,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["m", "2"], "-",
SuperscriptBox["M", "2"]}]]], "Output",
- ImageSize->{315, 40},
+ ImageSize->{317, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Apart2",
- CellLabel->"Out[4]//StandardForm=",
- CellID->638625530]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -321,9 +464,7 @@ Cell[TextData[{
ButtonNote->"ApartFF"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Apart2",
- CellID->1960323984]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -331,7 +472,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Apart2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -340,10 +481,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 18.319132}",
+ "built" -> "{2020, 1, 5, 18, 52, 40.594627}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -351,11 +492,11 @@ TaggingRules->{
"None", "summary" ->
"Apart2[expr] partial fractions very simple 1-loop integrals of the form \
1/[(q^2-m1^2)(q^2-m2^2)]. Since FeynCalc 9 this function is deprecated. \
-Please use ApartFF instead.", "synonyms" -> {}, "title" -> "Apart2",
- "titlemodifier" -> "", "windowtitle" -> "Apart2", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Apart2"}, "SearchTextTranslated" -> ""},
+Please use ApartFF instead.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Apart2", "titlemodifier" -> "", "windowtitle" -> "Apart2", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Apart2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -363,8 +504,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -372,104 +514,98 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3391, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1089764331]},
"Apart2"->{
- Cell[4025, 124, 130, 4, 27, "Input",
+ Cell[5390, 162, 132, 4, 70, "Input",
CellTags->"Apart2",
CellID->1571464480],
- Cell[4158, 130, 362, 12, 36, "Output",
- CellTags->"Apart2",
- CellID->1842118848],
- Cell[4557, 147, 276, 10, 27, "Input",
+ Cell[5525, 168, 343, 11, 37, "Output",
+ CellTags->"Apart2"],
+ Cell[6561, 215, 276, 10, 27, "Input",
CellTags->"Apart2",
CellID->1580962822],
- Cell[4836, 159, 1296, 34, 69, "Output",
- CellTags->"Apart2",
- CellID->1281611536],
- Cell[6169, 198, 123, 4, 27, "Input",
+ Cell[6840, 227, 1756, 59, 64, "Output",
+ CellTags->"Apart2"],
+ Cell[8633, 291, 123, 4, 27, "Input",
CellTags->"Apart2",
CellID->867958772],
- Cell[6295, 204, 1103, 42, 82, "Output",
- CellTags->"Apart2",
- CellID->496976710],
- Cell[7435, 251, 159, 5, 27, "Input",
+ Cell[8759, 297, 2905, 93, 84, "Output",
+ CellTags->"Apart2"],
+ Cell[11701, 395, 159, 5, 27, "Input",
CellTags->"Apart2",
CellID->168515472],
- Cell[7597, 258, 624, 23, 74, "Output",
- CellTags->"Apart2",
- CellID->638625530],
- Cell[8589, 304, 556, 21, 70, "Text",
- CellTags->"Apart2",
- CellID->1960323984]}
+ Cell[11863, 402, 604, 22, 70, "Output",
+ CellTags->"Apart2"]},
+ "PrimaryExamplesSection"->{
+ Cell[5929, 186, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660425432]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11083, 374},
- {"Apart2", 11216, 378}
+ {"Apart2", 15317, 516},
+ {"PrimaryExamplesSection", 15954, 537}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3181, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 497, 13, 98, "Usage",
- CellID->982511436],
+Cell[3762, 100, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3391, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1089764331],
+Cell[4070, 115, 497, 13, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3804, 114, 196, 6, 25, "ExampleSection",
- CellID->1867734952],
+Cell[4592, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1451633961],
+Cell[5334, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4025, 124, 130, 4, 27, "Input",
+Cell[5390, 162, 132, 4, 70, "Input",
CellTags->"Apart2",
CellID->1571464480],
-Cell[4158, 130, 362, 12, 36, "Output",
- CellTags->"Apart2",
- CellID->1842118848]
+Cell[5525, 168, 343, 11, 37, "Output",
+ CellTags->"Apart2"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4557, 147, 276, 10, 27, "Input",
+Cell[5929, 186, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660425432],
+Cell[CellGroupData[{
+Cell[6342, 205, 194, 6, 26, "ExampleSection",
+ CellID->29687880],
+Cell[CellGroupData[{
+Cell[6561, 215, 276, 10, 27, "Input",
CellTags->"Apart2",
CellID->1580962822],
-Cell[4836, 159, 1296, 34, 69, "Output",
- CellTags->"Apart2",
- CellID->1281611536]
+Cell[6840, 227, 1756, 59, 64, "Output",
+ CellTags->"Apart2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6169, 198, 123, 4, 27, "Input",
+Cell[8633, 291, 123, 4, 27, "Input",
CellTags->"Apart2",
CellID->867958772],
-Cell[6295, 204, 1103, 42, 82, "Output",
- CellTags->"Apart2",
- CellID->496976710]
+Cell[8759, 297, 2905, 93, 84, "Output",
+ CellTags->"Apart2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7435, 251, 159, 5, 27, "Input",
+Cell[11701, 395, 159, 5, 27, "Input",
CellTags->"Apart2",
CellID->168515472],
-Cell[7597, 258, 624, 23, 74, "Output",
- CellTags->"Apart2",
- CellID->638625530]
+Cell[11863, 402, 604, 22, 70, "Output",
+ CellTags->"Apart2"]
}, Open ]]
}, Open ]],
-Cell[8248, 285, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12494, 428, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8316, 290, 270, 12, 31, "SeeAlsoSection",
+Cell[12562, 433, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8589, 304, 556, 21, 70, "Text",
- CellTags->"Apart2",
- CellID->1960323984]
+Cell[12835, 447, 517, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[9160, 328, 23, 0, 70, "FooterCell"]
+Cell[13367, 469, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart3.nb
index 3e3b355e5..41a9bfdff 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Apart3.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6044, 189]
-NotebookOptionsPosition[ 3863, 123]
-NotebookOutlinePosition[ 5787, 178]
-CellTagsIndexPosition[ 5719, 173]
+NotebookDataLength[ 6807, 209]
+NotebookOptionsPosition[ 4813, 153]
+NotebookOutlinePosition[ 6600, 201]
+CellTagsIndexPosition[ 6557, 198]
WindowTitle->Apart3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Apart3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Apart3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Apart3.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Apart1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Apart1"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Apart3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Apart3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Apart3.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$19042],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Apart3",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24937],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Apart3", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Apart3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Apart3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"Apart1"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Apart3",
- CellID->13488114]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,21 +163,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 19.742911}",
+ "built" -> "{2020, 1, 5, 18, 52, 41.777749}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Apart3[expr, x] is equivalent to Map2[Factor2, \
-Collect2[Apart1[expr,x],x]].", "synonyms" -> {}, "title" -> "Apart3",
- "titlemodifier" -> "", "windowtitle" -> "Apart3", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Apart3"}},
+Collect2[Apart1[expr,x],x]].", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Apart3", "titlemodifier" -> "", "windowtitle" -> "Apart3", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Apart3"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -156,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Apart3"->{
- Cell[3603, 109, 218, 9, 70, "Text",
- CellTags->"Apart3",
- CellID->13488114]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Apart3", 5612, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 2989, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 436, 13, 70, "Usage",
+Cell[3570, 97, 283, 11, 70, "ObjectNameGrid"],
+Cell[3856, 110, 436, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3330, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4317, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3603, 109, 218, 9, 70, "Text",
- CellTags->"Apart3",
- CellID->13488114]
+Cell[4590, 141, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3836, 121, 23, 0, 70, "FooterCell"]
+Cell[4786, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ApartFF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ApartFF.nb
index 1c082935e..6930847d3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ApartFF.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ApartFF.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 33951, 1205]
-NotebookOptionsPosition[ 29770, 1078]
-NotebookOutlinePosition[ 32089, 1137]
-CellTagsIndexPosition[ 32003, 1132]
+NotebookDataLength[ 104475, 3442]
+NotebookOptionsPosition[ 98732, 3263]
+NotebookOutlinePosition[ 101257, 3328]
+CellTagsIndexPosition[ 101133, 3322]
WindowTitle->ApartFF
WindowFrame->Normal*)
@@ -79,12 +79,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$19386],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$25419],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/ApartFF", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]
}], "AnchorBar"]}
}]], "AnchorBarGrid",
@@ -94,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ApartFF", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ApartFF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[CellGroupData[{
@@ -146,7 +157,7 @@ Cell[TextData[Cell[BoxData[
Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
CellGroupingRules->{"SectionGrouping", 50},
- CellID->1395703577],
+ CellID->2020340374],
Cell["", "SectionHeaderSpacer"],
@@ -167,7 +178,34 @@ multivariate polynomials,\t\t\t\t",
" objects, i.e. it is less general. For the original $Apart see ",
"https://github.com/F-Feng/APart"
}], "Notes",
- CellID->610107001]
+ CellID->610107001],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ApartFF", "]"}]], "Input",
+ CellLabel->"In[42]:=",
+ CellID->1116592623],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DropScaleless", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynAmpDenominator", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{516, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[42]=",
+ CellID->1861839595]
+}, Open ]]
}, Closed]]
}, Open ]],
@@ -184,109 +222,109 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(6)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->997211955],
+ CellID->1068520360],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(6)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2050896417],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "ApartFF", "]"}]], "Input",
- CellLabel->"In[1]:=",
- CellID->1116592623],
+ CellID->1045479996],
Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Collecting", "\[Rule]", "True"}], ",",
- RowBox[{"DropScaleless", "\[Rule]", "True"}], ",",
- RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
- RowBox[{"FeynAmpDenominator", "\[Rule]", "True"}], ",",
- RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{561, 54},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1861839595]
-}, Open ]],
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{
RowBox[{"SPD", "[",
RowBox[{"q", ",", "q"}], "]"}],
RowBox[{"FAD", "[",
RowBox[{"{",
- RowBox[{"q", ",", "m"}], "}"}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}]}]], "Input",
CellLabel->"In[2]:=",
CellID->591868896],
Cell[BoxData[
FormBox[
- RowBox[{
+ FractionBox[
FormBox[
SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm], " ",
- FormBox[
- FractionBox["1",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`m^2, "]"],
- Editable->False]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{88, 47},
+ TraditionalForm],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->1506674849],
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
FractionBox[
SuperscriptBox["m", "2"],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{63, 51},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->415169895]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{
RowBox[{"SPD", "[",
RowBox[{"q", ",", "p"}], "]"}],
@@ -298,298 +336,389 @@ Cell[BoxData[{
RowBox[{"{",
RowBox[{"q", "-", "p"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"q", "-", "r"}], "}"}]}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellLabel->"In[3]:=",
+ RowBox[{"q", "-", "r"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
CellID->1827687893],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "r"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q - $CellContext`r)^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{298, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->2016661296],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
TraditionalForm],
- TraditionalForm], "2"], "+",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{"2", " ",
- SuperscriptBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- FormBox["r",
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["r",
+ TraditionalForm]}],
TraditionalForm],
- TraditionalForm], "2"]}]}],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox["p",
- TraditionalForm]}], "+",
- FormBox["q",
- TraditionalForm], "+",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q - $CellContext`r, D],
+ FeynCalc`Momentum[$CellContext`q - $CellContext`r, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{167, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
- ImageSize->{507, 50},
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJzt3XtQFdcdB3Bs/0jrOBOo44yNISkvQQgQdeqjSA2JxiZqOiFpSyx0CkGo
+BdFiGxs0GZuO00ZGRSfahECmRCXaokljY2LrqEHwgQ9ofEO4IPKQKPK4wH3f
+W7hNMYG7e865+979fmbiEIfdPb/fObvuvdzlG5KxKjnrGwEBAWu+NfRHcvra
+pPz89JefCxz6n5/krVmRnbc886m83y7PXp4/J+ObQ3+ZNvTfm+MCAoa/9gAA
+gKa4es5szlqSMC3k0WU7Lg+4ZdsWAEAklqbd75zvdXlsTW//MGzx0W65tgUA
+EIvbOej03kgN1OYlZNaY5doWAEBsAxc3LS9utMq+LQCAKNzmS+UllXeccm8L
+ACAKt+XG4f2fdto9Hlf/jYY+pguSkG0BAMRhby1PiwyNjBkS/Uji+kuDMm0L
+AMDA2X36r797PmnB77e8lrM45jsTYzP2dzgY93B27/plTz69YetLT4Y/tOjg
+Fy6JhgoA4Ju76/CPHghffeS20+O6/c+lkwJn7+1guxK57x556oGHf7mvydx1
+/XKHFZ8UAwCZ9Zz4WUj0K1csw1/3X8gOefDZT3vY9tB3Ki0s5tWrFilGBwBA
+ZK7JCItc/Zn33SvL1Q2xUzOretjuqPrP/yoiKv8zvP8FAMoYqMubGpru/ZSq
+o23vssSVn7B+SGLw4pqoiKxz/ZIMDwCAxHJlXfTkWT/P31i0vfAPBduPfcH2
+Fr+r//onm5dOnhCWe+CSGW/vA4ACbA1/jvte8rFuvDUPABplb3pjxkOLDt3B
+ZQwAtMhtuXninRdDJkz+8Vsn2vFZCQAAAADQCWfnweyVNX1KDwMAwG/O1ncX
+LsFvjQRtWACGZDKZ+BcGrmMAoFGO9r9nLJo/bG5U0MT4BO+XT+dWMz4bAQCg
+PNyPAYDW4ToGAFqH6xgYkJ5CHvVUywhdFgUgKj2FPOqplhG6LApAXHoKedRT
+LSN0WRSANPQU8qinWkbosiiA/3N0VKRMTz0j5EEUupBHW9vRXQeu9KviHRpX
+b21FefVtH7+sTHu1jBBaFIBWOdr3Z86bFJzi/3WMLuTRcesfq3/xtpruBwYv
+F6W+fKTra+PVai0j/C8KQLPsrRXrij4qnBHu93WMLuTRdefj1Dk5gu75xOe+
+ezR19orq3pGbKg3XMsLPogA0y96yr6D4Wm/Tzpmk65jLfLFi6+aSPeWlm3J+
+mvJ8XjXbL2B1tr83P+qFU6RTX+BRRh+UmErpvvvvxVFLDnepvxYPfUynX0UB
+aJWteXdBaYPFY28mXMdcd4+/9Pgzf/l8+HWU3bTt0QcXfMiYVGs+kxI+Y7vJ
+zvc9wo8yGjmV0nL1lbgYxqAkZWrx0Md0+lMUgDZZG8sKykzeE41wHTOfy4uK
+zD3vjRNytu36QXDi3g7G91i6jycFf39XG99WtEe59zjzV/h+nJmcSmlr3DI9
+fNkZps8iKFOLhz6m05+iADTJWl/4WHxsvFd08Pj7AiPiklbV+Yo+6z+X/vCU
+5Ore4a9dnQeSgmeV3mTLJBq6opxMDp25s5nnHkaMo4zeJTmV0nrttbhpuXUD
+LLtVpBYPQ0ynP0UBaJ2jpWRWBPf9WNfh+UGBiXuGb0Cs9W8lTpm+jf811Qhn
+99mK92t7hm9EbI2bZ8as5Du1/D4KJ5pUyr7TL0QmlLeT7y4VrsXDEtNJXRSA
+jhCuY45bH7wYG3R/2MKsDZvWz/7uIxuvU37eoKcqLTIyrdJ702Ct3zgn4c0b
+3Kez30fxiTKV0np945wnSloo7pUUrOV/6GM66YsCMKLek6mh09b694N7V3fl
+2mdfp9lWyFGYuPtq1iX/8YKZ+Qd7CtRCHdPpd1EAxmA+mxUekVPr9/su1paD
+RcXHbhFeYgk9Cv1oDr2x7V8dfr7gk7kW2phOYUUB6Jt78Mapv61PCJoQ9erx
+bgFvvLhtd7psnCejWEeh4bJ0dnOPhIZctTDEdAovCgAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAEAOyKqWFNrLBZ2RhzH6jKxqSaG9XNAZeRikz8iqlhTaywWd
+kYfB+oysakmhvVzQGXkYoc+iZFW7Bxt25T0+ddKEoJB5OWX1g75ficuY4s2d
+zc2Eri7ePSAKnAM6Iw8j9FmkrOrBK1tW7TjdabN3ndvxzOT74zc12MZ8j+wp
+3r6yuVl3QVEXH0SBc0Fn5GGIPjNkVTs7D2avrOEIAbDfOnak48szfKAuN3TK
+0qreUd+iRIr3mGxuH4TWxQdR4FzQGXnop8+0MdbE/bS+u3AJzQ88zGfTp80d
+E+PBn+ItNO6cK3mcIptbYF2EARiYWAsPaOh/BdLGWBNQnu/u7spfP7FmbDIj
+T4o3bXi3xVSxrbjK58tEzuRxcja3wLpIAzAwkRYeUNH9CqSNsfbtXmT23Kig
+ifEJ/JHZru6Tf/pN6TUf74Zzp3hTh3e37VkUHLXigq9AS87kcc5sbrHqIg3A
+wIQtPGCj9xVIHWNNQL5vcQ82lL9e+p8+n3vnTPEWI7ybO3mcnM0tsC7SAIxL
+rIUHNPS+AuljrAlI57vt5odbi2t6vC8cXD2XPvi4/Ws/2eNM8RYhvJsneZyc
+zS2wLtIADEu0hQcU9L4C6WOsSXjPd+ftQysivz0u4EvjxscVfj7qdOdK8RYY
+3s2fPE6RzS20Lsroc6MRb+EBgQFWIHWMtQyIKd6iB5Ejm1sxalp4oHW0MdZy
+4U3xFjuIHNncylHbwgPNYoixlpPPFG8pgsiRza0QlS48AAAAAFq8z0kBAGgA
+9XNSAIawAFTJZDLxzJpY1zGlq9QS/hlBw8UiSp9BzSifk7r3bV/B+TgVCIBW
+A/gNrysBQOtwHQMArcN1DEB0xsi/k5CmG6jpwXNRc1FqHhsrNdVikPw76Wi6
+gZoePBc1F6XmsbFSVS0Gy78Tn6YbqOnBc1FzUWoeGytV1mKE/DtJabqBmh48
+FzUXpeaxsRKpFkdHRcr0VEE5RXT5dzJmU6oTd2KmcgGCxp59BWbEkA2Xvs+O
+9v2Z8yYFp/jfWLr8O9mzKdXJV2KmggGCmH2ZZ8S4DZe0z/bWinVFHxXOCPe7
+sXT5d0pkU0rxPLXwfY5JzFQwQFDPs09PxhkxdMOl67O9ZV9B8bXepp0zSY0V
+Gh/Jm01JuxPGuEPKz1kxlUbcJzklkCIxUx5qm32BR/FxXMoFI9eM6Lvhiq18
+W/PugtIGi8feTGgsbXwkN55sSgaMcYc01zHW0iiyk4gpgeTETDmobPaFH8UH
+2gUjy4zovuHKrHxrY1lBmclbBaGxtPGRPLizKYfRPm9LF3fIkjtJnYxJv09y
+SiBnYqaMVDT7TEdhezSbNh9ThhkxQMMVWfnW+sLH4mPjvaKDx98XGBGXtKrO
+VyqUGPGRnNmULFjjDsn3TuylEfdJkRJITsyUnNpmX4yjjEW9YKSfEQM0XPGV
+72gpmRXB/Q+E3/GRQy+YK96v7Rm+ynNmUzJgjjskX8fYSyPtkyYlkJyYKSdV
+zL4IEaVj0S8YWWdEpw1XfuUTGut3fGRPVVpkZFql959ArmxKeuxxh+TrGHtp
+fPukTAmkSMyUkypmX2BEqU/0C0beGdFhwzW28oXERxKzKQkkjjsUPRmTi3YT
+M+WZfdEmgnrBqHZGNNZwEtX0WWh8JG82JYHEcYdiJ2Ny0XBipjyzL9pE0C4Y
+9c6IxhpOHI0a+ixWfKTPbEriRpLGHUqRjMlFo4mZ8sy+eBPBsGDUOSNaaziZ
+OvsMAAAAAHz+C87NI6E=
+ "], {{0, 93}, {408, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{408, 93},
+ PlotRange->{{0, 408}, {0, 93}}]], "Output",
+ ImageSize->{412, 93},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->1046578815]
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->720970276]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{"FAD", "[",
RowBox[{
RowBox[{"{", "q", "}"}], ",",
RowBox[{"{",
RowBox[{"q", "-", "p"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"q", "+", "p"}], "}"}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellLabel->"In[4]:=",
+ RowBox[{"q", "+", "p"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
CellID->1902480830],
Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"p", "+", "q"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{214, 48},
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{170, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->2016279001],
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
+ FormBox[
+ FractionBox["1",
RowBox[{
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
RowBox[{
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox["p",
- TraditionalForm]}]}], ")"}], "2"]}]}]]}],
- TraditionalForm]], "Output",
- ImageSize->{231, 47},
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ RowBox[{"2", " ",
+ FormBox["p",
+ TraditionalForm]}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[(-2) FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], (-2)
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{268, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->370459499]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{
RowBox[{"SPD", "[",
RowBox[{"p", ",", "q1"}], "]"}],
@@ -604,32 +733,14 @@ Cell[BoxData[{
RowBox[{"q2", ",", "m"}], "}"}], ",",
RowBox[{"q1", "-", "p"}], ",",
RowBox[{"q2", "-", "p"}], ",",
- RowBox[{"q1", "-", "q2"}]}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{",
- RowBox[{"q1", ",", "q2", ",", "q3"}], "}"}]}], "]"}]}], "Input",
- CellLabel->"In[5]:=",
+ RowBox[{"q1", "-", "q2"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
CellID->21286566],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
+ FractionBox[
+ RowBox[{
RowBox[{"(",
FormBox[
RowBox[{
@@ -640,410 +751,2484 @@ Cell[BoxData[
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox["q2",
+ FormBox["q1",
TraditionalForm],
TraditionalForm]}],
- TraditionalForm], ")"}], "2"], " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q1", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q1^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q2", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q2^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q1)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q2", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q2)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "q2"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q1 - $CellContext`q2)^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{546, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->1152232710],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
+ TraditionalForm], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["q1",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "3"],
- RowBox[{"8", " ",
- RowBox[{
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{376, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "3"],
+ RowBox[{"8", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ",
RowBox[{"(",
RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"8", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{545, 329},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "-", "p"}], ",", "0"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{144, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{253, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "If the propagators should not altered via momentum shifts (e.g. because \
+they belong to a previously identified topology), use ",
+ Cell[BoxData[
+ RowBox[{"FDS", "\[Rule]", "False"}]], "InlineFormula"]
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"FDS", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"-",
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]]}],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{362, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q2", ",", "p"}], "]"}],
+ RowBox[{"SPD", "[",
+ RowBox[{"q1", ",", "p"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q2", ",", "m"}], "}"}], ",",
+ RowBox[{"q1", "-", "p"}], ",",
+ RowBox[{"q2", "-", "p"}], ",",
+ RowBox[{"q2", "-", "q1"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["q2",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`q1 + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`q1 + $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{376, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{503, 206},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}], ",",
+ RowBox[{"FDS", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], "-",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}]}], ")"}]}],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
FormBox[
- FormBox["q1",
+ FormBox["p",
TraditionalForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"8", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["q1",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
-
- ImageSize->{566, 303},
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{517, 364},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->1286760799]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -1078,8 +3263,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"ApartFF",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1088,10 +3273,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 21.039238}",
+ "built" -> "{2020, 1, 5, 18, 52, 42.751459}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1102,11 +3287,11 @@ decomposing them into simpler integrals that contain only linearly \
independent propagators. It uses FCApart as a backend and works and is \
suitable also for multiloop integrals. ApartFF effectively replaces the older \
function Apart2 and ScalarProductCancel which are now considered legacy.",
- "synonyms" -> {}, "title" -> "ApartFF", "titlemodifier" -> "",
- "windowtitle" -> "ApartFF", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ApartFF"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ApartFF",
+ "titlemodifier" -> "", "windowtitle" -> "ApartFF", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/ApartFF"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1114,8 +3299,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1124,89 +3310,140 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[5968, 175, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7083, 213, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->997211955]}
+ CellID->1068520360]},
+ "RasterizedOutput"->{
+ Cell[12640, 442, 4328, 79, 114, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->720970276]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 31860, 1125}
+ {"PrimaryExamplesSection", 100865, 3311},
+ {"RasterizedOutput", 101009, 3315}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2966, 73, 51, "AnchorBarGrid",
+Cell[579, 21, 2995, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[3548, 96, 50, 1, 42, "ObjectName",
- CellID->1224892054],
+Cell[3577, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3623, 101, 775, 19, 127, "Usage",
+Cell[3886, 112, 775, 19, 136, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4423, 124, 739, 24, 31, "NotesSection",
+Cell[4686, 135, 739, 24, 31, "NotesSection",
CellGroupingRules->{"SectionGrouping", 50},
- CellID->1395703577],
-Cell[5165, 150, 31, 0, 14, "SectionHeaderSpacer"],
-Cell[5199, 152, 720, 17, 108, "Notes",
- CellID->610107001]
+ CellID->2020340374],
+Cell[5428, 161, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5462, 163, 720, 17, 70, "Notes",
+ CellID->610107001],
+Cell[CellGroupData[{
+Cell[6207, 184, 111, 3, 70, "Input",
+ CellID->1116592623],
+Cell[6321, 189, 701, 17, 75, "Output",
+ CellID->1861839595]
+}, Open ]]
}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5968, 175, 387, 15, 31, "PrimaryExamplesSection",
+Cell[7083, 213, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->997211955],
+ CellID->1068520360],
Cell[CellGroupData[{
-Cell[6380, 194, 196, 6, 25, "ExampleSection",
- CellID->2050896417],
+Cell[7496, 232, 196, 6, 26, "ExampleSection",
+ CellID->1045479996],
+Cell[7695, 240, 92, 2, 27, "Input"],
Cell[CellGroupData[{
-Cell[6601, 204, 110, 3, 27, "Input",
- CellID->1116592623],
-Cell[6714, 209, 700, 17, 75, "Output",
- CellID->1861839595]
+Cell[7812, 246, 220, 8, 27, "Input",
+ CellID->591868896],
+Cell[8035, 256, 738, 27, 64, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7451, 231, 330, 11, 45, "Input",
- CellID->591868896],
-Cell[7784, 244, 735, 24, 68, "Output",
- CellID->1506674849],
-Cell[8522, 270, 346, 13, 72, "Output",
- CellID->415169895]
+Cell[8810, 288, 130, 4, 27, "Input"],
+Cell[8943, 294, 625, 21, 64, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8905, 288, 502, 17, 45, "Input",
+Cell[9605, 320, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9735, 326, 392, 14, 27, "Input",
CellID->1827687893],
-Cell[9410, 307, 1858, 63, 69, "Output",
- CellID->2016661296],
-Cell[11271, 372, 2842, 116, 71, "Output",
- CellID->1046578815]
+Cell[10130, 342, 2340, 89, 60, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12507, 436, 130, 4, 27, "Input"],
+Cell[12640, 442, 4328, 79, 114, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->720970276]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[14150, 493, 365, 12, 45, "Input",
+Cell[17017, 527, 105, 2, 70, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[17147, 533, 255, 9, 70, "Input",
CellID->1902480830],
-Cell[14518, 507, 1121, 32, 69, "Output",
- CellID->2016279001],
-Cell[15642, 541, 1103, 45, 68, "Output",
- CellID->370459499]
+Cell[17405, 544, 1670, 60, 61, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[19112, 609, 130, 4, 70, "Input"],
+Cell[19245, 615, 2724, 93, 61, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[16782, 591, 641, 21, 45, "Input",
+Cell[22018, 714, 105, 2, 70, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[22148, 720, 493, 17, 70, "Input",
CellID->21286566],
-Cell[17426, 614, 2766, 83, 69, "Output",
- CellID->1152232710],
-Cell[20195, 699, 8976, 346, 324, "Output",
- CellID->1286760799]
+Cell[22644, 739, 3645, 130, 67, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[26326, 874, 157, 5, 70, "Input"],
+Cell[26486, 881, 22702, 737, 350, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[49237, 1624, 105, 2, 70, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[49367, 1630, 309, 11, 70, "Input"],
+Cell[49679, 1643, 1531, 56, 60, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[51247, 1704, 130, 4, 70, "Input"],
+Cell[51380, 1710, 2290, 75, 67, "Output"]
+}, Open ]],
+Cell[53685, 1788, 233, 5, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[53943, 1797, 177, 5, 70, "Input"],
+Cell[54123, 1804, 3066, 101, 67, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[57238, 1911, 105, 2, 70, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[57368, 1917, 454, 15, 70, "Input"],
+Cell[57825, 1934, 3607, 129, 64, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[61469, 2068, 157, 5, 70, "Input"],
+Cell[61629, 2075, 12981, 411, 227, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[74647, 2491, 204, 6, 70, "Input"],
+Cell[74854, 2499, 23267, 730, 385, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[29198, 1049, 31, 0, 29, "SectionFooterSpacer"]
+Cell[98160, 3234, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[29266, 1054, 270, 12, 31, "SeeAlsoSection",
+Cell[98228, 3239, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[29539, 1068, 189, 5, 55, "SeeAlso",
+Cell[98501, 3253, 189, 5, 70, "SeeAlso",
CellID->929782353]
}, Open ]],
-Cell[29743, 1076, 23, 0, 42, "FooterCell"]
+Cell[98705, 3261, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0.nb
index 86022a469..65dd4c8f5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13930, 510]
-NotebookOptionsPosition[ 9147, 351]
-NotebookOutlinePosition[ 12369, 446]
-CellTagsIndexPosition[ 12263, 440]
+NotebookDataLength[ 15506, 553]
+NotebookOptionsPosition[ 11001, 407]
+NotebookOutlinePosition[ 13937, 492]
+CellTagsIndexPosition[ 13831, 486]
WindowTitle->B0
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/B0\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/B0"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/B0.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$20092],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/B0",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B1"], "\<\"B00\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B00"], "\<\"B11\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B11"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/B0\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/B0"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/B0.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$26324],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/B0",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["B0", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["B0", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -101,6 +138,61 @@ B0Unique to True simplifies B0[a,0,a] and B0[0,0,a]."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->783933584],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B0", "]"}]], "Input",
+ CellTags->"B0",
+ CellLabel->"In[1]:=",
+ CellID->1219933183],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"BReduce", "\[Rule]", "False"}], ",",
+ RowBox[{"B0Unique", "\[Rule]", "False"}], ",",
+ RowBox[{"B0Real", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{335, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"B0",
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -116,7 +208,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->866000110],
+ CellID->2057314077],
Cell[CellGroupData[{
@@ -126,31 +218,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->885377523],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "B0", "]"}]], "Input",
- CellTags->"B0",
- CellLabel->"In[1]:=",
- CellID->1219933183],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"BReduce", "\[Rule]", "False"}], ",",
- RowBox[{"B0Unique", "\[Rule]", "False"}], ",",
- RowBox[{"B0Real", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{358, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B0",
- CellLabel->"Out[1]=",
- CellID->1197548514]
-}, Open ]],
+ CellID->1428194661],
Cell[CellGroupData[{
@@ -162,7 +230,7 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1494166331],
Cell[BoxData[
@@ -184,32 +252,23 @@ Cell[BoxData[
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{114, 21},
+ ImageSize->{120, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0",
- CellLabel->"Out[2]=",
- CellID->1350980966]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"B0", ",",
- RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
- CellTags->"B0",
- CellLabel->"In[3]:=",
- CellID->643767668],
-
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"0", ",", "0", ",",
- SuperscriptBox["m", "2"]}], "]"}]], "Input",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
+ RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->510341898],
Cell[BoxData[
@@ -226,12 +285,11 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{124, 21},
+ ImageSize->{130, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0",
- CellLabel->"Out[4]=",
- CellID->170690020]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -240,9 +298,11 @@ Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{
SuperscriptBox["m", "2"], ",", "0", ",",
- SuperscriptBox["m", "2"]}], "]"}]], "Input",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
+ RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1178094654],
Cell[BoxData[
@@ -259,12 +319,11 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm], "+", "2"}], TraditionalForm]], "Output",
- ImageSize->{125, 21},
+ ImageSize->{132, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0",
- CellLabel->"Out[5]=",
- CellID->2121507054]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -275,7 +334,7 @@ Cell[BoxData[
RowBox[{"m", "^", "2"}], ",",
RowBox[{"m", "^", "2"}]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->828170126],
Cell[BoxData[
@@ -289,12 +348,11 @@ Cell[BoxData[
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{102, 21},
+ ImageSize->{107, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0",
- CellLabel->"Out[6]=",
- CellID->271170246]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -342,9 +400,7 @@ Cell[TextData[{
ButtonNote->"PaVe"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"B0",
- CellID->1803724154]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -361,10 +417,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 24.274773}",
+ "built" -> "{2020, 1, 5, 18, 52, 45.377340}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -373,11 +429,12 @@ TaggingRules->{
"B0[pp, ma^2, mb^2] is the Passarino-Veltman two-point integral B0. All \
arguments are scalars and have dimension mass^2. If the option BReduce is set \
to True, certain B0's are reduced to A0's. Setting the option B0Unique to \
-True simplifies B0[a,0,a] and B0[0,0,a].", "synonyms" -> {}, "title" -> "B0",
- "titlemodifier" -> "", "windowtitle" -> "B0", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/B0"}, "SearchTextTranslated" -> ""},
+True simplifies B0[a,0,a] and B0[0,0,a].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "B0", "titlemodifier" -> "", "windowtitle" ->
+ "B0", "type" -> "Symbol", "uri" -> "FeynCalc/ref/B0"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -386,7 +443,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -394,124 +451,110 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3669, 103, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->866000110]},
"B0"->{
- Cell[4301, 132, 122, 4, 27, "Input",
+ Cell[5698, 170, 122, 4, 70, "Input",
CellTags->"B0",
CellID->1219933183],
- Cell[4426, 138, 388, 13, 36, "Output",
- CellTags->"B0",
- CellID->1197548514],
- Cell[4851, 156, 254, 9, 31, "Input",
+ Cell[5823, 176, 367, 12, 37, "Output",
+ CellTags->"B0"],
+ Cell[6885, 224, 254, 9, 33, "Input",
CellTags->"B0",
CellID->1494166331],
- Cell[5108, 167, 617, 24, 42, "Output",
- CellTags->"B0",
- CellID->1350980966],
- Cell[5740, 194, 256, 8, 27, "Input",
- CellTags->"B0",
- CellID->643767668],
- Cell[6021, 206, 173, 6, 31, "Input",
+ Cell[7142, 235, 596, 23, 42, "Output",
+ CellTags->"B0"],
+ Cell[7775, 263, 271, 8, 33, "Input",
CellTags->"B0",
CellID->510341898],
- Cell[6197, 214, 500, 19, 42, "Output",
- CellTags->"B0",
- CellID->170690020],
- Cell[6734, 238, 199, 7, 31, "Input",
+ Cell[8049, 273, 480, 18, 42, "Output",
+ CellTags->"B0"],
+ Cell[8566, 296, 297, 9, 33, "Input",
CellTags->"B0",
CellID->1178094654],
- Cell[6936, 247, 501, 19, 42, "Output",
- CellTags->"B0",
- CellID->2121507054],
- Cell[7474, 271, 196, 7, 27, "Input",
+ Cell[8866, 307, 480, 18, 42, "Output",
+ CellTags->"B0"],
+ Cell[9383, 330, 196, 7, 27, "Input",
CellTags->"B0",
CellID->828170126],
- Cell[7673, 280, 425, 16, 42, "Output",
- CellTags->"B0",
- CellID->271170246],
- Cell[8466, 319, 639, 27, 70, "Text",
- CellTags->"B0",
- CellID->1803724154]}
+ Cell[9582, 339, 405, 15, 42, "Output",
+ CellTags->"B0"]},
+ "PrimaryExamplesSection"->{
+ Cell[6251, 195, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2057314077]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11121, 396},
- {"B0", 11250, 400}
+ {"B0", 12944, 453},
+ {"PrimaryExamplesSection", 13687, 479}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3209, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 786, 21, 116, "Usage",
- CellID->982511436],
+Cell[3786, 100, 279, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3669, 103, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->866000110],
+Cell[4090, 115, 786, 21, 120, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4081, 122, 195, 6, 25, "ExampleSection",
- CellID->885377523],
+Cell[4901, 140, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->783933584],
+Cell[5642, 166, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4301, 132, 122, 4, 27, "Input",
+Cell[5698, 170, 122, 4, 70, "Input",
CellTags->"B0",
CellID->1219933183],
-Cell[4426, 138, 388, 13, 36, "Output",
- CellTags->"B0",
- CellID->1197548514]
+Cell[5823, 176, 367, 12, 37, "Output",
+ CellTags->"B0"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4851, 156, 254, 9, 31, "Input",
+Cell[6251, 195, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2057314077],
+Cell[CellGroupData[{
+Cell[6664, 214, 196, 6, 26, "ExampleSection",
+ CellID->1428194661],
+Cell[CellGroupData[{
+Cell[6885, 224, 254, 9, 33, "Input",
CellTags->"B0",
CellID->1494166331],
-Cell[5108, 167, 617, 24, 42, "Output",
- CellTags->"B0",
- CellID->1350980966]
+Cell[7142, 235, 596, 23, 42, "Output",
+ CellTags->"B0"]
}, Open ]],
-Cell[5740, 194, 256, 8, 27, "Input",
- CellTags->"B0",
- CellID->643767668],
Cell[CellGroupData[{
-Cell[6021, 206, 173, 6, 31, "Input",
+Cell[7775, 263, 271, 8, 33, "Input",
CellTags->"B0",
CellID->510341898],
-Cell[6197, 214, 500, 19, 42, "Output",
- CellTags->"B0",
- CellID->170690020]
+Cell[8049, 273, 480, 18, 42, "Output",
+ CellTags->"B0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6734, 238, 199, 7, 31, "Input",
+Cell[8566, 296, 297, 9, 33, "Input",
CellTags->"B0",
CellID->1178094654],
-Cell[6936, 247, 501, 19, 42, "Output",
- CellTags->"B0",
- CellID->2121507054]
+Cell[8866, 307, 480, 18, 42, "Output",
+ CellTags->"B0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7474, 271, 196, 7, 27, "Input",
+Cell[9383, 330, 196, 7, 27, "Input",
CellTags->"B0",
CellID->828170126],
-Cell[7673, 280, 425, 16, 42, "Output",
- CellTags->"B0",
- CellID->271170246]
+Cell[9582, 339, 405, 15, 42, "Output",
+ CellTags->"B0"]
}, Open ]]
}, Open ]],
-Cell[8125, 300, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10014, 358, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8193, 305, 270, 12, 70, "SeeAlsoSection",
+Cell[10082, 363, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8466, 319, 639, 27, 70, "Text",
- CellTags->"B0",
- CellID->1803724154]
+Cell[10355, 377, 604, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[9120, 349, 23, 0, 70, "FooterCell"]
+Cell[10974, 405, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B00.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B00.nb
index 57c7b5050..89519a572 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B00.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B00.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21558, 798]
-NotebookOptionsPosition[ 15947, 606]
-NotebookOutlinePosition[ 19515, 715]
-CellTagsIndexPosition[ 19408, 709]
+NotebookDataLength[ 20918, 772]
+NotebookOptionsPosition[ 16055, 613]
+NotebookOutlinePosition[ 19139, 703]
+CellTagsIndexPosition[ 19032, 697]
WindowTitle->B00
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/B00\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/B00"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/B00.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$19739],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/B00",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"B1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B1"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/B00\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/B00"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/B00.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$25875],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/B00",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["B00", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["B00", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -100,32 +136,33 @@ arguments are scalars and have dimension mass^2."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->880086936],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1465599537],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->2098798442],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -140,226 +177,183 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{123, 15},
+ ImageSize->{114, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B00",
CellLabel->"Out[1]=",
CellID->729895507]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["B0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"B0",
- ButtonNote->"B0"],
- ", ",
- ButtonBox["B1",
- BaseStyle->"AddOnsLink",
- ButtonData:>"B1",
- ButtonNote->"B1"],
- ", ",
- ButtonBox["PaVe",
- BaseStyle->"AddOnsLink",
- ButtonData:>"PaVe",
- ButtonNote->"PaVe"],
- "."
-}], "Text",
- CellTags->"B00",
- CellID->2061897287],
+Cell[CellGroupData[{
Cell[TextData[{
- "Remember that SP[p] is a short hand input for ScalarProduct[p,p], i.e., ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["p", "2"], TraditionalForm]]],
- "."
-}], "Text",
- CellTags->"B00",
- CellID->2041843191],
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->525586557],
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"SP", "[", "p", "]"}]], "Input",
- CellTags->"B00",
- CellLabel->"In[2]:=",
- CellID->592752912],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B00",
- CellLabel->"Out[2]=",
- CellID->2024988940]
-}, Open ]],
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1507522507],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B00", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1556776794],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- RowBox[{"(",
- RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ RowBox[{"2", " ", "m", " ", "M"}], "+",
+ SuperscriptBox["M", "2"], "-",
+ FormBox[
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "+",
- SuperscriptBox["m", "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], " ",
- RowBox[{"(",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ", "m", " ", "M"}], "+",
+ SuperscriptBox["M", "2"], "-",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}]], "-",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
RowBox[{
- FractionBox["1", "2"], " ",
FormBox[
- TagBox[
+ SuperscriptBox[
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["M", "2"], ")"}],
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "3"], " ",
- SuperscriptBox["m", "2"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ TraditionalForm], "2"],
+ TraditionalForm]}]], "+",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["M", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "-",
+ FormBox[
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "+",
- RowBox[{
- FractionBox["1", "18"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]], "-",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+",
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm]}], "+",
- RowBox[{"3", " ",
- SuperscriptBox["m", "2"]}], "+",
- RowBox[{"3", " ",
- SuperscriptBox["M", "2"]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{557, 167},
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{493, 97},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B00",
- CellLabel->"Out[3]=",
- CellID->2088825026]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -367,21 +361,19 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B00", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1244341296],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
+ RowBox[{"-",
+ FractionBox[
RowBox[{
- FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"4", " ",
@@ -389,9 +381,8 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]}], ")"}], " ",
FormBox[
@@ -403,45 +394,36 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}], "+",
- RowBox[{
- FractionBox["1", "3"], " ",
+ TraditionalForm]}],
+ RowBox[{"4", " ",
RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- RowBox[{"6", " ",
- SuperscriptBox["m", "2"]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["m", "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{420, 43},
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{301, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B00",
- CellLabel->"Out[4]=",
- CellID->1967668942]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -449,36 +431,37 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B00", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"], ",",
RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1245211962],
Cell[BoxData[
FormBox[
- RowBox[{"FeynCalc`PaVeIntegrals`Private`b00", "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"00\"\>"], "(",
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"], ",",
- RowBox[{"BReduce", "\[Rule]", "False"}]}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{438, 21},
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{125, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B00",
- CellLabel->"Out[5]=",
- CellID->870366776]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -489,33 +472,46 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->1891605192],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "1"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{178, 41},
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"0", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]]}], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{230, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B00",
- CellLabel->"Out[6]=",
- CellID->1063864886]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -528,34 +524,47 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[7]:=",
+ CellLabel->"In[5]:=",
CellID->1823175928],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], " ",
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- SuperscriptBox["M", "2"], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "1"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{195, 41},
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]]}], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{246, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B00",
- CellLabel->"Out[7]=",
- CellID->524392254]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -597,9 +606,7 @@ Cell[TextData[{
ButtonNote->"PaVe"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"B00",
- CellID->1890318949]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -607,7 +614,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"B00",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -616,10 +623,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 22.699067}",
+ "built" -> "{2020, 1, 5, 18, 52, 44.085009}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -627,11 +634,11 @@ TaggingRules->{
"None", "summary" ->
"B00[pp, ma^2, mb^2] is the Passarino-Veltman B00-function, i.e., the \
coefficient function of the metric tensor. All arguments are scalars and have \
-dimension mass^2.", "synonyms" -> {}, "title" -> "B00", "titlemodifier" -> "",
- "windowtitle" -> "B00", "type" -> "Symbol", "uri" -> "FeynCalc/ref/B00"},
- "SearchTextTranslated" -> ""},
+dimension mass^2.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "B00",
+ "titlemodifier" -> "", "windowtitle" -> "B00", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/B00"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -639,8 +646,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -648,158 +656,124 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3569, 102, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->880086936]},
"B00"->{
- Cell[4202, 131, 123, 4, 27, "Input",
+ Cell[5507, 168, 123, 4, 70, "Input",
CellTags->"B00",
CellID->356334892],
- Cell[4328, 137, 269, 10, 36, "Output",
+ Cell[5633, 174, 269, 10, 35, "Output",
CellTags->"B00",
CellID->729895507],
- Cell[4612, 150, 367, 20, 32, "Text",
- CellTags->"B00",
- CellID->2061897287],
- Cell[4982, 172, 223, 8, 33, "Text",
- CellTags->"B00",
- CellID->2041843191],
- Cell[5230, 184, 116, 4, 27, "Input",
- CellTags->"B00",
- CellID->592752912],
- Cell[5349, 190, 326, 13, 41, "Output",
- CellTags->"B00",
- CellID->2024988940],
- Cell[5712, 208, 231, 8, 31, "Input",
+ Cell[6596, 220, 232, 8, 33, "Input",
CellTags->"B00",
CellID->1556776794],
- Cell[5946, 218, 4260, 143, 188, "Output",
- CellTags->"B00",
- CellID->2088825026],
- Cell[10243, 366, 231, 8, 31, "Input",
+ Cell[6831, 230, 3259, 125, 118, "Output",
+ CellTags->"B00"],
+ Cell[10127, 360, 232, 8, 33, "Input",
CellTags->"B00",
CellID->1244341296],
- Cell[10477, 376, 1825, 67, 64, "Output",
- CellTags->"B00",
- CellID->1967668942],
- Cell[12339, 448, 281, 9, 31, "Input",
+ Cell[10362, 370, 1458, 55, 65, "Output",
+ CellTags->"B00"],
+ Cell[11857, 430, 282, 9, 33, "Input",
CellTags->"B00",
CellID->1245211962],
- Cell[12623, 459, 581, 21, 42, "Output",
- CellTags->"B00",
- CellID->870366776],
- Cell[13241, 485, 201, 7, 31, "Input",
+ Cell[12142, 441, 566, 22, 42, "Output",
+ CellTags->"B00"],
+ Cell[12745, 468, 201, 7, 33, "Input",
CellTags->"B00",
CellID->1891605192],
- Cell[13445, 494, 630, 23, 62, "Output",
- CellTags->"B00",
- CellID->1063864886],
- Cell[14112, 522, 268, 9, 31, "Input",
+ Cell[12949, 477, 949, 36, 65, "Output",
+ CellTags->"B00"],
+ Cell[13935, 518, 268, 9, 33, "Input",
CellTags->"B00",
CellID->1823175928],
- Cell[14383, 533, 661, 24, 62, "Output",
- CellTags->"B00",
- CellID->524392254],
- Cell[15412, 580, 493, 21, 31, "Text",
- CellTags->"B00",
- CellID->1890318949]}
+ Cell[14206, 529, 982, 37, 65, "Output",
+ CellTags->"B00"]},
+ "PrimaryExamplesSection"->{
+ Cell[5963, 191, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->525586557]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17822, 650},
- {"B00", 17952, 654}
+ {"B00", 17956, 658},
+ {"PrimaryExamplesSection", 18889, 690}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3121, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 680, 20, 99, "Usage",
- CellID->982511436],
+Cell[3699, 99, 280, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3569, 102, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->880086936],
+Cell[4004, 114, 680, 20, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3981, 121, 196, 6, 25, "ExampleSection",
- CellID->2098798442],
+Cell[4709, 138, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1465599537],
+Cell[5451, 164, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4202, 131, 123, 4, 27, "Input",
+Cell[5507, 168, 123, 4, 70, "Input",
CellTags->"B00",
CellID->356334892],
-Cell[4328, 137, 269, 10, 36, "Output",
+Cell[5633, 174, 269, 10, 35, "Output",
CellTags->"B00",
CellID->729895507]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4612, 150, 367, 20, 32, "Text",
- CellTags->"B00",
- CellID->2061897287],
-Cell[4982, 172, 223, 8, 33, "Text",
- CellTags->"B00",
- CellID->2041843191],
Cell[CellGroupData[{
-Cell[5230, 184, 116, 4, 27, "Input",
- CellTags->"B00",
- CellID->592752912],
-Cell[5349, 190, 326, 13, 41, "Output",
- CellTags->"B00",
- CellID->2024988940]
-}, Open ]],
+Cell[5963, 191, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->525586557],
+Cell[CellGroupData[{
+Cell[6375, 210, 196, 6, 26, "ExampleSection",
+ CellID->1507522507],
Cell[CellGroupData[{
-Cell[5712, 208, 231, 8, 31, "Input",
+Cell[6596, 220, 232, 8, 33, "Input",
CellTags->"B00",
CellID->1556776794],
-Cell[5946, 218, 4260, 143, 188, "Output",
- CellTags->"B00",
- CellID->2088825026]
+Cell[6831, 230, 3259, 125, 118, "Output",
+ CellTags->"B00"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10243, 366, 231, 8, 31, "Input",
+Cell[10127, 360, 232, 8, 33, "Input",
CellTags->"B00",
CellID->1244341296],
-Cell[10477, 376, 1825, 67, 64, "Output",
- CellTags->"B00",
- CellID->1967668942]
+Cell[10362, 370, 1458, 55, 65, "Output",
+ CellTags->"B00"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12339, 448, 281, 9, 31, "Input",
+Cell[11857, 430, 282, 9, 33, "Input",
CellTags->"B00",
CellID->1245211962],
-Cell[12623, 459, 581, 21, 42, "Output",
- CellTags->"B00",
- CellID->870366776]
+Cell[12142, 441, 566, 22, 42, "Output",
+ CellTags->"B00"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13241, 485, 201, 7, 31, "Input",
+Cell[12745, 468, 201, 7, 33, "Input",
CellTags->"B00",
CellID->1891605192],
-Cell[13445, 494, 630, 23, 62, "Output",
- CellTags->"B00",
- CellID->1063864886]
+Cell[12949, 477, 949, 36, 65, "Output",
+ CellTags->"B00"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14112, 522, 268, 9, 31, "Input",
+Cell[13935, 518, 268, 9, 33, "Input",
CellTags->"B00",
CellID->1823175928],
-Cell[14383, 533, 661, 24, 62, "Output",
- CellTags->"B00",
- CellID->524392254]
+Cell[14206, 529, 982, 37, 65, "Output",
+ CellTags->"B00"]
}, Open ]]
}, Open ]],
-Cell[15071, 561, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15215, 570, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15139, 566, 270, 12, 31, "SeeAlsoSection",
+Cell[15283, 575, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[15412, 580, 493, 21, 31, "Text",
- CellTags->"B00",
- CellID->1890318949]
+Cell[15556, 589, 457, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[15920, 604, 23, 0, 42, "FooterCell"]
+Cell[16028, 611, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Real.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Real.nb
index f80888bb9..bec6e4b9b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Real.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Real.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10846, 383]
-NotebookOptionsPosition[ 6649, 247]
-NotebookOutlinePosition[ 9551, 332]
-CellTagsIndexPosition[ 9443, 326]
+NotebookDataLength[ 10282, 347]
+NotebookOptionsPosition[ 6881, 244]
+NotebookOutlinePosition[ 9356, 313]
+CellTagsIndexPosition[ 9248, 307]
WindowTitle->B0Real
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/B0Real\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/B0Real"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/B0Real.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/B0Real\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/B0Real"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/B0Real.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$20437],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/B0Real",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$26768],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/B0Real", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["B0Real", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["B0Real", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +139,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->955343210],
+ CellID->953528149],
Cell[CellGroupData[{
@@ -117,11 +149,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1561501857],
+ CellID->434066379],
-Cell["By default the arguments are not assumed real.", "Text",
- CellTags->"B0Real",
- CellID->130288840],
+Cell["By default the arguments are not assumed real.", "Notes"],
Cell[CellGroupData[{
@@ -134,60 +164,31 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{
+ TagBox[
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "s", ",", "s"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "2"}], TraditionalForm]], "Output",
- ImageSize->{96, 15},
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"s", ",", "0", ",", "s"}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{79, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0Real",
- CellLabel->"Out[1]=",
- CellID->997660714]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"B0", "//", "Options"}]], "Input",
- CellTags->"B0Real",
- CellLabel->"In[2]:=",
- CellID->168010706],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"BReduce", "\[Rule]", "False"}], ",",
- RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{350, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B0Real",
- CellLabel->"Out[2]=",
- CellID->994724143]
-}, Open ]],
-
-Cell["With B0Real\[Rule]True, transformation is done.", "Text",
- CellTags->"B0Real",
- CellID->617964813],
+Cell["With B0Real\[Rule]True, transformation is done.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"s", ",", "0", ",", "s", ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}]], "Input",
+ RowBox[{"B0Real", "\[Rule]", "True"}], ",",
+ RowBox[{"B0Unique", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0Real",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->848873063],
Cell[BoxData[
@@ -202,12 +203,11 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm], "+", "2"}], TraditionalForm]], "Output",
- ImageSize->{96, 15},
+ ImageSize->{104, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0Real",
- CellLabel->"Out[3]=",
- CellID->1655563844]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -231,16 +231,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["B0",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/B0",
ButtonNote->"B0"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"B0Real",
- CellID->1839543320]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -248,7 +245,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"B0Real",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -257,10 +254,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 25.763973}",
+ "built" -> "{2020, 1, 5, 18, 52, 46.578599}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -268,11 +265,11 @@ TaggingRules->{
"None", "summary" ->
"B0Real is an option of B0 (default False). If set to True, B0 is assumed \
to be real and the relation B0[a,0,a] = 2 + B0[0,a,a] is applied.",
- "synonyms" -> {}, "title" -> "B0Real", "titlemodifier" -> "",
- "windowtitle" -> "B0Real", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "B0Real", "titlemodifier" ->
+ "", "windowtitle" -> "B0Real", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/B0Real"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -280,8 +277,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -290,101 +288,67 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3337, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4315, 126, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->955343210]},
+ CellID->953528149]},
"B0Real"->{
- Cell[3948, 121, 103, 2, 32, "Text",
- CellTags->"B0Real",
- CellID->130288840],
- Cell[4076, 127, 153, 5, 27, "Input",
+ Cell[5013, 157, 153, 5, 27, "Input",
CellTags->"B0Real",
CellID->1048836421],
- Cell[4232, 134, 443, 17, 36, "Output",
- CellTags->"B0Real",
- CellID->997660714],
- Cell[4712, 156, 121, 4, 27, "Input",
- CellTags->"B0Real",
- CellID->168010706],
- Cell[4836, 162, 389, 13, 36, "Output",
- CellTags->"B0Real",
- CellID->994724143],
- Cell[5240, 178, 104, 2, 31, "Text",
- CellTags->"B0Real",
- CellID->617964813],
- Cell[5369, 184, 200, 6, 27, "Input",
+ Cell[5169, 164, 352, 13, 37, "Output",
+ CellTags->"B0Real"],
+ Cell[5625, 184, 250, 7, 27, "Input",
CellTags->"B0Real",
CellID->848873063],
- Cell[5572, 192, 444, 17, 36, "Output",
- CellTags->"B0Real",
- CellID->1655563844],
- Cell[6384, 232, 223, 10, 31, "Text",
- CellTags->"B0Real",
- CellID->1839543320]}
+ Cell[5878, 193, 424, 16, 37, "Output",
+ CellTags->"B0Real"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8515, 291},
- {"B0Real", 8647, 295}
+ {"PrimaryExamplesSection", 8790, 289},
+ {"B0Real", 8923, 293}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2980, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 443, 12, 99, "Usage",
+Cell[3561, 97, 283, 11, 45, "ObjectNameGrid"],
+Cell[3847, 110, 443, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3337, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4315, 126, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->955343210],
+ CellID->953528149],
Cell[CellGroupData[{
-Cell[3749, 113, 196, 6, 25, "ExampleSection",
- CellID->1561501857],
-Cell[3948, 121, 103, 2, 32, "Text",
- CellTags->"B0Real",
- CellID->130288840],
+Cell[4727, 145, 195, 6, 26, "ExampleSection",
+ CellID->434066379],
+Cell[4925, 153, 63, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4076, 127, 153, 5, 27, "Input",
+Cell[5013, 157, 153, 5, 27, "Input",
CellTags->"B0Real",
CellID->1048836421],
-Cell[4232, 134, 443, 17, 36, "Output",
- CellTags->"B0Real",
- CellID->997660714]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4712, 156, 121, 4, 27, "Input",
- CellTags->"B0Real",
- CellID->168010706],
-Cell[4836, 162, 389, 13, 36, "Output",
- CellTags->"B0Real",
- CellID->994724143]
+Cell[5169, 164, 352, 13, 37, "Output",
+ CellTags->"B0Real"]
}, Open ]],
-Cell[5240, 178, 104, 2, 31, "Text",
- CellTags->"B0Real",
- CellID->617964813],
+Cell[5536, 180, 64, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5369, 184, 200, 6, 27, "Input",
+Cell[5625, 184, 250, 7, 27, "Input",
CellTags->"B0Real",
CellID->848873063],
-Cell[5572, 192, 444, 17, 36, "Output",
- CellTags->"B0Real",
- CellID->1655563844]
+Cell[5878, 193, 424, 16, 37, "Output",
+ CellTags->"B0Real"]
}, Open ]]
}, Open ]],
-Cell[6043, 213, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6329, 213, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6111, 218, 270, 12, 31, "SeeAlsoSection",
+Cell[6397, 218, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6384, 232, 223, 10, 31, "Text",
- CellTags->"B0Real",
- CellID->1839543320]
+Cell[6670, 232, 169, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6622, 245, 23, 0, 42, "FooterCell"]
+Cell[6854, 242, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Unique.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Unique.nb
index dd7d5e3fb..c4ab46600 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Unique.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B0Unique.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10840, 380]
-NotebookOptionsPosition[ 6595, 244]
-NotebookOutlinePosition[ 9526, 329]
-CellTagsIndexPosition[ 9416, 323]
+NotebookDataLength[ 10220, 345]
+NotebookOptionsPosition[ 6851, 243]
+NotebookOutlinePosition[ 9286, 311]
+CellTagsIndexPosition[ 9176, 305]
WindowTitle->B0Unique
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/B0Unique\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/B0Unique"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/B0Unique.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$20776],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/B0Unique", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/B0Unique\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/B0Unique"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/B0Unique.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$27206],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/B0Unique", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["B0Unique", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["B0Unique", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +139,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1380979473],
+ CellID->1501296835],
Cell[CellGroupData[{
@@ -117,11 +149,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->318683481],
+ CellID->791572088],
-Cell["By default transformation is done.", "Text",
- CellTags->"B0Unique",
- CellID->1633725722],
+Cell["By default no transformation is done.", "Notes"],
Cell[CellGroupData[{
@@ -134,77 +164,49 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{
+ TagBox[
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "s", ",", "s"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{95, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B0Unique",
- CellLabel->"Out[1]=",
- CellID->2030362910]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "B0", "]"}]], "Input",
- CellTags->"B0Unique",
- CellLabel->"In[2]:=",
- CellID->1904628151],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"BReduce", "\[Rule]", "False"}], ",",
- RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{350, 15},
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"0", ",", "0", ",", "s"}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{79, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0Unique",
- CellLabel->"Out[2]=",
- CellID->226407255]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["With B0Real\[Rule]False, nothing happens.", "Text",
- CellTags->"B0Unique",
- CellID->1308469818],
+Cell["With B0Real\[Rule]True following transformation is applied", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"0", ",", "0", ",", "s", ",",
- RowBox[{"B0Unique", "\[Rule]", "False"}]}], "]"}]], "Input",
+ RowBox[{"B0Unique", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0Unique",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->224258616],
Cell[BoxData[
FormBox[
- TagBox[
+ RowBox[{
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "0", ",", "s"}], ")"}],
- TraditionalForm],
- HoldForm], TraditionalForm]], "Output",
- ImageSize->{72, 15},
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"0", ",", "s", ",", "s"}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], "+", "1"}], TraditionalForm]], "Output",
+ ImageSize->{102, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B0Unique",
- CellLabel->"Out[3]=",
- CellID->1908481089]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -228,16 +230,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["B0",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/B0",
ButtonNote->"B0"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"B0Unique",
- CellID->993329416]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -254,10 +253,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 27.234711}",
+ "built" -> "{2020, 1, 5, 18, 52, 47.637956}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -265,11 +264,11 @@ TaggingRules->{
"None", "summary" ->
"B0Unique is an option of B0. If set to True, B0[0,0,m2] is replaced with \
(B0[0,m2,m2]+1) and B0[m2,0,m2] simplifies to (B0[0,m2,m2]+2).",
- "synonyms" -> {}, "title" -> "B0Unique", "titlemodifier" -> "",
- "windowtitle" -> "B0Unique", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/B0Unique"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "B0Unique",
+ "titlemodifier" -> "", "windowtitle" -> "B0Unique", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/B0Unique"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -278,7 +277,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -287,101 +286,67 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3345, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4323, 126, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1380979473]},
+ CellID->1501296835]},
"B0Unique"->{
- Cell[3956, 121, 94, 2, 32, "Text",
- CellTags->"B0Unique",
- CellID->1633725722],
- Cell[4075, 127, 154, 5, 27, "Input",
+ Cell[5013, 157, 154, 5, 27, "Input",
CellTags->"B0Unique",
CellID->539333149],
- Cell[4232, 134, 446, 17, 36, "Output",
- CellTags->"B0Unique",
- CellID->2030362910],
- Cell[4715, 156, 128, 4, 27, "Input",
- CellTags->"B0Unique",
- CellID->1904628151],
- Cell[4846, 162, 391, 13, 36, "Output",
- CellTags->"B0Unique",
- CellID->226407255],
- Cell[5252, 178, 101, 2, 32, "Text",
- CellTags->"B0Unique",
- CellID->1308469818],
- Cell[5378, 184, 205, 6, 27, "Input",
+ Cell[5170, 164, 354, 13, 37, "Output",
+ CellTags->"B0Unique"],
+ Cell[5639, 184, 204, 6, 27, "Input",
CellTags->"B0Unique",
CellID->224258616],
- Cell[5586, 192, 375, 14, 36, "Output",
- CellTags->"B0Unique",
- CellID->1908481089],
- Cell[6329, 229, 224, 10, 31, "Text",
- CellTags->"B0Unique",
- CellID->993329416]}
+ Cell[5846, 192, 426, 16, 37, "Output",
+ CellTags->"B0Unique"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8466, 288},
- {"B0Unique", 8601, 292}
+ {"PrimaryExamplesSection", 8708, 287},
+ {"B0Unique", 8844, 291}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 2988, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 439, 12, 99, "Usage",
+Cell[3571, 97, 285, 11, 45, "ObjectNameGrid"],
+Cell[3859, 110, 439, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3345, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4323, 126, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1380979473],
+ CellID->1501296835],
Cell[CellGroupData[{
-Cell[3758, 113, 195, 6, 25, "ExampleSection",
- CellID->318683481],
-Cell[3956, 121, 94, 2, 32, "Text",
- CellTags->"B0Unique",
- CellID->1633725722],
+Cell[4736, 145, 195, 6, 26, "ExampleSection",
+ CellID->791572088],
+Cell[4934, 153, 54, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4075, 127, 154, 5, 27, "Input",
+Cell[5013, 157, 154, 5, 27, "Input",
CellTags->"B0Unique",
CellID->539333149],
-Cell[4232, 134, 446, 17, 36, "Output",
- CellTags->"B0Unique",
- CellID->2030362910]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4715, 156, 128, 4, 27, "Input",
- CellTags->"B0Unique",
- CellID->1904628151],
-Cell[4846, 162, 391, 13, 36, "Output",
- CellTags->"B0Unique",
- CellID->226407255]
+Cell[5170, 164, 354, 13, 37, "Output",
+ CellTags->"B0Unique"]
}, Open ]],
-Cell[5252, 178, 101, 2, 32, "Text",
- CellTags->"B0Unique",
- CellID->1308469818],
+Cell[5539, 180, 75, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5378, 184, 205, 6, 27, "Input",
+Cell[5639, 184, 204, 6, 27, "Input",
CellTags->"B0Unique",
CellID->224258616],
-Cell[5586, 192, 375, 14, 36, "Output",
- CellTags->"B0Unique",
- CellID->1908481089]
+Cell[5846, 192, 426, 16, 37, "Output",
+ CellTags->"B0Unique"]
}, Open ]]
}, Open ]],
-Cell[5988, 210, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6299, 212, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6056, 215, 270, 12, 31, "SeeAlsoSection",
+Cell[6367, 217, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6329, 229, 224, 10, 31, "Text",
- CellTags->"B0Unique",
- CellID->993329416]
+Cell[6640, 231, 169, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6568, 242, 23, 0, 42, "FooterCell"]
+Cell[6824, 241, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B1.nb
index 88e90ec5a..90ce63267 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B1.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 20439, 769]
-NotebookOptionsPosition[ 14744, 570]
-NotebookOutlinePosition[ 18309, 681]
-CellTagsIndexPosition[ 18203, 675]
+NotebookDataLength[ 21466, 803]
+NotebookOptionsPosition[ 16410, 635]
+NotebookOutlinePosition[ 19388, 723]
+CellTagsIndexPosition[ 19282, 717]
WindowTitle->B1
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/B1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/B1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/B1.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$21474],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/B1",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"B00\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B00"], "\<\"B11\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B11"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVeReduce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/B1\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/B1"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/B1.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$28103],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/B1",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["B1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["B1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -99,6 +137,58 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1377241680],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B1", "]"}]], "Input",
+ CellTags->"B1",
+ CellLabel->"In[31]:=",
+ CellID->1893937597],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{114, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"B1",
+ CellLabel->"Out[31]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -114,7 +204,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1201044476],
+ CellID->1493676351],
Cell[CellGroupData[{
@@ -124,118 +214,104 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->887299215],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "B1", "]"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[1]:=",
- CellID->1893937597],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{123, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B1",
- CellLabel->"Out[1]=",
- CellID->1980658046]
-}, Open ]],
+ CellID->261859712],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B1", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"]}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1808836307],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], "+",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
RowBox[{"2", " ",
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
+ FractionBox[
FormBox[
TagBox[
FormBox[
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["M", "2"], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{468, 51},
+ TraditionalForm],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{402, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B1",
- CellLabel->"Out[2]=",
- CellID->1988092032]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,47 +319,39 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B1", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"], ",",
RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1461354182],
Cell[BoxData[
FormBox[
- RowBox[{"B1", "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"], ",",
- RowBox[{"BReduce", "\[Rule]", "False"}]}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{233, 21},
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{119, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B1",
- CellLabel->"Out[3]=",
- CellID->406770555]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"B1", ",",
- RowBox[{"BReduce", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[4]:=",
- CellID->630039750],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -292,9 +360,7 @@ Cell[BoxData[
RowBox[{"SP", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[5]:=",
- CellID->300888921],
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
@@ -320,12 +386,45 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{140, 41},
+ ImageSize->{147, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B1",
- CellLabel->"Out[5]=",
- CellID->1554458660]
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B1", "[",
+ RowBox[{
+ RowBox[{"SPD", "[", "p", "]"}], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{117, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -336,35 +435,67 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"], ",", "0"}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->313475676],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-", "2"}], ")"}]}], "-",
- FractionBox["1", "2"]}], TraditionalForm]], "Output",
- ImageSize->{191, 41},
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SuperscriptBox["m", "2"]}]], "-",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "0", ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{182, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B1",
- CellLabel->"Out[6]=",
- CellID->363524267]
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B1", "[",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",", "0", ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",", "0"}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{106, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -379,30 +510,19 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-", "1"}], ")"}]}], "+",
- FractionBox["1", "4"]}], TraditionalForm]], "Output",
- ImageSize->{191, 41},
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{"0", ",", "0", ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{92, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B1",
- CellLabel->"Out[7]=",
- CellID->1652463561]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -411,7 +531,8 @@ Cell[BoxData[
RowBox[{"B1", "[",
RowBox[{"pp", ",",
RowBox[{"SmallVariable", "[",
- SubsuperscriptBox["m", "e", "2"], "]"}], ",",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}], "]"}], ",",
SubsuperscriptBox["m", "2", "2"]}], "]"}]], "Input",
CellTags->"B1",
CellLabel->"In[8]:=",
@@ -420,94 +541,40 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"pp", "-",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"pp", ",",
+ SubsuperscriptBox["m", "e", "2"], ",",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "pp"}]]}], "-",
FractionBox[
- RowBox[{
- SubsuperscriptBox["m", "2", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ", "pp"}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
FormBox[
TagBox[
FormBox[
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SubsuperscriptBox["m", "2", "2"], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{406, 49},
+ TraditionalForm],
+ RowBox[{"2", " ", "pp"}]]}], TraditionalForm]], "Output",
+ ImageSize->{274, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B1",
- CellLabel->"Out[8]=",
- CellID->94888417]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"B1", "[",
- RowBox[{
- RowBox[{"SmallVariable", "[",
- SubsuperscriptBox["m", "e", "2"], "]"}], ",",
- RowBox[{"SmallVariable", "[",
- SubsuperscriptBox["m", "e", "2"], "]"}], ",", "0"}], "]"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[9]:=",
- CellID->2075391288],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "e", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-", "2"}], ")"}]}], "-",
- FractionBox["1", "2"]}], TraditionalForm]], "Output",
- ImageSize->{191, 41},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B1",
- CellLabel->"Out[9]=",
- CellID->1940611723]
+ CellLabel->"Out[8]="]
}, Open ]]
}, Open ]],
@@ -561,9 +628,7 @@ Cell[TextData[{
ButtonNote->"PaVeReduce"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"B1",
- CellID->1961153968]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -580,21 +645,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 30.317651}",
+ "built" -> "{2020, 1, 5, 18, 52, 50.048738}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"B1[pp, ma^2, mb^2] the Passarino-Veltman B1-function. All arguments are \
-scalars and have dimension mass^2.", "synonyms" -> {}, "title" -> "B1",
- "titlemodifier" -> "", "windowtitle" -> "B1", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/B1"}, "SearchTextTranslated" -> ""},
+scalars and have dimension mass^2.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "B1", "titlemodifier" -> "", "windowtitle" -> "B1", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/B1"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -602,8 +667,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -611,166 +677,134 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3508, 101, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1201044476]},
"B1"->{
- Cell[4141, 130, 122, 4, 27, "Input",
+ Cell[5628, 169, 123, 4, 70, "Input",
CellTags->"B1",
CellID->1893937597],
- Cell[4266, 136, 269, 10, 36, "Output",
- CellTags->"B1",
- CellID->1980658046],
- Cell[4572, 151, 229, 8, 31, "Input",
+ Cell[5754, 175, 249, 9, 35, "Output",
+ CellTags->"B1"],
+ Cell[6697, 220, 230, 8, 33, "Input",
CellTags->"B1",
CellID->1808836307],
- Cell[4804, 161, 2066, 76, 72, "Output",
- CellTags->"B1",
- CellID->1988092032],
- Cell[6907, 242, 279, 9, 31, "Input",
+ Cell[6930, 230, 2092, 83, 65, "Output",
+ CellTags->"B1"],
+ Cell[9059, 318, 280, 9, 33, "Input",
CellTags->"B1",
CellID->1461354182],
- Cell[7189, 253, 548, 21, 42, "Output",
- CellTags->"B1",
- CellID->406770555],
- Cell[7752, 277, 206, 7, 27, "Input",
- CellTags->"B1",
- CellID->630039750],
- Cell[7983, 288, 228, 8, 31, "Input",
- CellTags->"B1",
- CellID->300888921],
- Cell[8214, 298, 750, 29, 62, "Output",
- CellTags->"B1",
- CellID->1554458660],
- Cell[9001, 332, 198, 7, 31, "Input",
+ Cell[9342, 329, 564, 22, 42, "Output",
+ CellTags->"B1"],
+ Cell[11715, 431, 198, 7, 33, "Input",
CellTags->"B1",
CellID->313475676],
- Cell[9202, 341, 686, 25, 62, "Output",
- CellTags->"B1",
- CellID->363524267],
- Cell[9925, 371, 173, 6, 31, "Input",
+ Cell[11916, 440, 767, 30, 62, "Output",
+ CellTags->"B1"],
+ Cell[13359, 502, 173, 6, 33, "Input",
CellTags->"B1",
CellID->241881109],
- Cell[10101, 379, 687, 25, 62, "Output",
- CellTags->"B1",
- CellID->1652463561],
- Cell[10825, 409, 258, 8, 31, "Input",
+ Cell[13535, 510, 376, 14, 42, "Output",
+ CellTags->"B1"],
+ Cell[13948, 529, 292, 9, 33, "Input",
CellTags->"B1",
CellID->2089704958],
- Cell[11086, 419, 1402, 49, 70, "Output",
- CellTags->"B1",
- CellID->94888417],
- Cell[12525, 473, 299, 9, 31, "Input",
- CellTags->"B1",
- CellID->2075391288],
- Cell[12827, 484, 703, 25, 62, "Output",
- CellTags->"B1",
- CellID->1940611723],
- Cell[13898, 532, 804, 33, 31, "Text",
- CellTags->"B1",
- CellID->1961153968]}
+ Cell[14243, 540, 988, 36, 65, "Output",
+ CellTags->"B1"]},
+ "PrimaryExamplesSection"->{
+ Cell[6064, 191, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1493676351]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16557, 613},
- {"B1", 16687, 617}
+ {"B1", 18246, 679},
+ {"PrimaryExamplesSection", 19138, 710}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3299, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 625, 19, 84, "Usage",
- CellID->982511436],
+Cell[3876, 101, 279, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3508, 101, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1201044476],
+Cell[4180, 116, 625, 19, 86, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3921, 120, 195, 6, 25, "ExampleSection",
- CellID->887299215],
+Cell[4830, 139, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1377241680],
+Cell[5572, 165, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4141, 130, 122, 4, 27, "Input",
+Cell[5628, 169, 123, 4, 70, "Input",
CellTags->"B1",
CellID->1893937597],
-Cell[4266, 136, 269, 10, 36, "Output",
- CellTags->"B1",
- CellID->1980658046]
+Cell[5754, 175, 249, 9, 35, "Output",
+ CellTags->"B1"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4572, 151, 229, 8, 31, "Input",
+Cell[6064, 191, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1493676351],
+Cell[CellGroupData[{
+Cell[6477, 210, 195, 6, 26, "ExampleSection",
+ CellID->261859712],
+Cell[CellGroupData[{
+Cell[6697, 220, 230, 8, 33, "Input",
CellTags->"B1",
CellID->1808836307],
-Cell[4804, 161, 2066, 76, 72, "Output",
- CellTags->"B1",
- CellID->1988092032]
+Cell[6930, 230, 2092, 83, 65, "Output",
+ CellTags->"B1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6907, 242, 279, 9, 31, "Input",
+Cell[9059, 318, 280, 9, 33, "Input",
CellTags->"B1",
CellID->1461354182],
-Cell[7189, 253, 548, 21, 42, "Output",
- CellTags->"B1",
- CellID->406770555]
+Cell[9342, 329, 564, 22, 42, "Output",
+ CellTags->"B1"]
}, Open ]],
-Cell[7752, 277, 206, 7, 27, "Input",
- CellTags->"B1",
- CellID->630039750],
Cell[CellGroupData[{
-Cell[7983, 288, 228, 8, 31, "Input",
- CellTags->"B1",
- CellID->300888921],
-Cell[8214, 298, 750, 29, 62, "Output",
- CellTags->"B1",
- CellID->1554458660]
+Cell[9943, 356, 191, 6, 33, "Input"],
+Cell[10137, 364, 712, 27, 56, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10886, 396, 242, 7, 33, "Input"],
+Cell[11131, 405, 547, 21, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9001, 332, 198, 7, 31, "Input",
+Cell[11715, 431, 198, 7, 33, "Input",
CellTags->"B1",
CellID->313475676],
-Cell[9202, 341, 686, 25, 62, "Output",
- CellTags->"B1",
- CellID->363524267]
+Cell[11916, 440, 767, 30, 62, "Output",
+ CellTags->"B1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9925, 371, 173, 6, 31, "Input",
- CellTags->"B1",
- CellID->241881109],
-Cell[10101, 379, 687, 25, 62, "Output",
- CellTags->"B1",
- CellID->1652463561]
+Cell[12720, 475, 211, 6, 33, "Input"],
+Cell[12934, 483, 388, 14, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10825, 409, 258, 8, 31, "Input",
- CellTags->"B1",
- CellID->2089704958],
-Cell[11086, 419, 1402, 49, 70, "Output",
+Cell[13359, 502, 173, 6, 33, "Input",
CellTags->"B1",
- CellID->94888417]
+ CellID->241881109],
+Cell[13535, 510, 376, 14, 42, "Output",
+ CellTags->"B1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12525, 473, 299, 9, 31, "Input",
+Cell[13948, 529, 292, 9, 33, "Input",
CellTags->"B1",
- CellID->2075391288],
-Cell[12827, 484, 703, 25, 62, "Output",
- CellTags->"B1",
- CellID->1940611723]
+ CellID->2089704958],
+Cell[14243, 540, 988, 36, 65, "Output",
+ CellTags->"B1"]
}, Open ]]
}, Open ]],
-Cell[13557, 513, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15258, 580, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13625, 518, 270, 12, 31, "SeeAlsoSection",
+Cell[15326, 585, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13898, 532, 804, 33, 31, "Text",
- CellTags->"B1",
- CellID->1961153968]
+Cell[15599, 599, 769, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[14717, 568, 23, 0, 42, "FooterCell"]
+Cell[16383, 633, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B11.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B11.nb
index c853c01dd..2ebf1bf26 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/B11.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/B11.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 23142, 868]
-NotebookOptionsPosition[ 16981, 654]
-NotebookOutlinePosition[ 20805, 772]
-CellTagsIndexPosition[ 20698, 766]
+NotebookDataLength[ 24652, 910]
+NotebookOptionsPosition[ 19895, 757]
+NotebookOutlinePosition[ 22671, 836]
+CellTagsIndexPosition[ 22564, 830]
WindowTitle->B11
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/B11\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/B11"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/B11.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$21120],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/B11",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"B00\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B00"], "\<\"B1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B1"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/B11\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/B11"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/B11.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$27649],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/B11",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["B11", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["B11", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,6 +146,55 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1000064194],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B11", "]"}]], "Input",
+ CellLabel->"In[79]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{114, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[79]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -124,7 +210,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->68693664],
+ CellID->762842591],
Cell[CellGroupData[{
@@ -134,212 +220,136 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->907881049],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "B11", "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[1]:=",
- CellID->1842812694],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{123, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B11",
- CellLabel->"Out[1]=",
- CellID->190457790]
-}, Open ]],
-
-Cell[TextData[{
- "Remember that SP[p] is a short hand input for ScalarProduct[p,p], i.e. ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["p", "2"], "."}], TraditionalForm]]]
-}], "Text",
- CellTags->"B11",
- CellID->629012065],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SP", "[", "p", "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[2]:=",
- CellID->401652515],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B11",
- CellLabel->"Out[2]=",
- CellID->329962251]
-}, Open ]],
+ CellID->2010682123],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B11", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->63077265],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1",
- RowBox[{"3", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}]],
- RowBox[{"(",
+ RowBox[{"-",
RowBox[{
- RowBox[{
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm], "+",
- SuperscriptBox["m", "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], " ",
+ TraditionalForm], "2"]}]],
+ RowBox[{
RowBox[{"(",
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
+ RowBox[{"D", " ",
+ SuperscriptBox["m", "4"]}], "-",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["m", "2"], " ",
+ SuperscriptBox["M", "2"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["m", "2"], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox["M", "4"]}], "-",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["M", "2"], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm]}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
+ TraditionalForm], "2"]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"], " ",
FormBox[
- TagBox[
+ SuperscriptBox[
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- RowBox[{"3", " ",
- SuperscriptBox["m", "2"]}], "-",
- RowBox[{"3", " ",
- SuperscriptBox["M", "2"]}]}], ")"}]}], "+",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}]}]}], "+",
+ FractionBox[
+ RowBox[{"D", " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]], "-",
+ FractionBox[
+ RowBox[{
FormBox[
TagBox[
FormBox[
@@ -348,13 +358,45 @@ Cell[BoxData[
SuperscriptBox["M", "2"], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{544, 168},
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"D", " ",
+ SuperscriptBox["m", "2"]}], "-",
+ RowBox[{"D", " ",
+ SuperscriptBox["M", "2"]}], "+",
+ RowBox[{"3", " ", "D", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "-",
+ RowBox[{"4", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]]}], TraditionalForm]], "Output",
+ ImageSize->{570, 169},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B11",
- CellLabel->"Out[3]=",
- CellID->740537849]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -362,29 +404,65 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B11", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{124, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->10639178],
Cell[BoxData[
FormBox[
- FractionBox[
- RowBox[{
+ RowBox[{
+ FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-",
+ RowBox[{"D", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], ")"}], " ",
FormBox[
TagBox[
FormBox[
@@ -394,77 +472,53 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}], "+",
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]], "+",
+ FractionBox[
RowBox[{
- FractionBox["1", "6"], " ",
RowBox[{"(",
- RowBox[{
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- RowBox[{"6", " ",
- SuperscriptBox["m", "2"]}]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["m", "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- RowBox[{"3", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{368, 59},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B11",
- CellLabel->"Out[4]=",
- CellID->823230538]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"B11", ",",
- RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[5]:=",
- CellID->1279434093],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{127, 15},
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{356, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B11",
- CellLabel->"Out[5]=",
- CellID->705577970]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -472,12 +526,11 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B11", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[6]:=",
- CellID->26512272],
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
@@ -489,44 +542,18 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm], ",",
SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
+ SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{121, 21},
+ ImageSize->{122, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B11",
- CellLabel->"Out[6]=",
- CellID->1173768318]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"B11", ",",
- RowBox[{"BReduce", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[7]:=",
- CellID->1075715949],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{123, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"B11",
- CellLabel->"Out[7]=",
- CellID->832224142]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -537,7 +564,7 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[8]:=",
+ CellLabel->"In[5]:=",
CellID->1384698038],
Cell[BoxData[
@@ -555,12 +582,38 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{118, 41},
+ ImageSize->{122, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B11",
- CellLabel->"Out[8]=",
- CellID->303443152]
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{"0", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{"0", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{111, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -573,31 +626,83 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[9]:=",
+ CellLabel->"In[7]:=",
CellID->1335567043],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "3"], " ",
- FormBox[
- TagBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], " ",
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SuperscriptBox["M", "2"], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{135, 41},
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox["M", "2"]}]], "+",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox["M", "2"]}]]}], TraditionalForm]], "Output",
+ ImageSize->{283, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"B11",
- CellLabel->"Out[9]=",
- CellID->2037163640]
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{
+ RowBox[{"SmallVariable", "[",
+ SuperscriptBox["M", "2"], "]"}], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{127, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
}, Open ]]
}, Open ]],
@@ -645,9 +750,7 @@ Cell[TextData[{
ButtonNote->"PaVe"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"B11",
- CellID->1685814901]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -664,10 +767,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 28.699694}",
+ "built" -> "{2020, 1, 5, 18, 52, 48.708627}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -675,11 +778,11 @@ TaggingRules->{
"None", "summary" ->
"B11[pp, ma^2, mb^2] is the Passarino-Veltman B11-function, i.e., the \
coefficient function of p^\\[Mu] p^\\[Nu]. All arguments are scalars and have \
-dimension mass\\[Null]^2.", "synonyms" -> {}, "title" -> "B11",
- "titlemodifier" -> "", "windowtitle" -> "B11", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/B11"}, "SearchTextTranslated" -> ""},
+dimension mass\\[Null]^2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "B11", "titlemodifier" -> "", "windowtitle" -> "B11", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/B11"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -687,8 +790,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -697,179 +801,117 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3818, 111, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[6214, 197, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->68693664]},
+ CellID->762842591]},
"B11"->{
- Cell[4449, 140, 124, 4, 27, "Input",
- CellTags->"B11",
- CellID->1842812694],
- Cell[4576, 146, 269, 10, 36, "Output",
- CellTags->"B11",
- CellID->190457790],
- Cell[4860, 159, 235, 8, 33, "Text",
- CellTags->"B11",
- CellID->629012065],
- Cell[5120, 171, 116, 4, 27, "Input",
- CellTags->"B11",
- CellID->401652515],
- Cell[5239, 177, 325, 13, 41, "Output",
- CellTags->"B11",
- CellID->329962251],
- Cell[5601, 195, 229, 8, 31, "Input",
+ Cell[6847, 226, 230, 8, 33, "Input",
CellTags->"B11",
CellID->63077265],
- Cell[5833, 205, 4465, 151, 189, "Output",
- CellTags->"B11",
- CellID->740537849],
- Cell[10335, 361, 229, 8, 31, "Input",
+ Cell[7080, 236, 4441, 162, 190, "Output",
+ CellTags->"B11"],
+ Cell[12389, 438, 230, 8, 33, "Input",
CellTags->"B11",
CellID->10639178],
- Cell[10567, 371, 1855, 72, 80, "Output",
- CellTags->"B11",
- CellID->823230538],
- Cell[12459, 448, 190, 6, 27, "Input",
- CellTags->"B11",
- CellID->1279434093],
- Cell[12652, 456, 270, 10, 36, "Output",
- CellTags->"B11",
- CellID->705577970],
- Cell[12959, 471, 229, 8, 31, "Input",
- CellTags->"B11",
- CellID->26512272],
- Cell[13191, 481, 619, 24, 42, "Output",
- CellTags->"B11",
- CellID->1173768318],
- Cell[13847, 510, 189, 6, 27, "Input",
- CellTags->"B11",
- CellID->1075715949],
- Cell[14039, 518, 269, 10, 36, "Output",
- CellTags->"B11",
- CellID->832224142],
- Cell[14345, 533, 201, 7, 31, "Input",
+ Cell[12622, 448, 1851, 72, 65, "Output",
+ CellTags->"B11"],
+ Cell[15341, 560, 201, 7, 33, "Input",
CellTags->"B11",
CellID->1384698038],
- Cell[14549, 542, 523, 20, 62, "Output",
- CellTags->"B11",
- CellID->303443152],
- Cell[15109, 567, 268, 9, 31, "Input",
+ Cell[15545, 569, 503, 19, 56, "Output",
+ CellTags->"B11"],
+ Cell[16726, 620, 268, 9, 33, "Input",
CellTags->"B11",
CellID->1335567043],
- Cell[15380, 578, 554, 21, 62, "Output",
- CellTags->"B11",
- CellID->2037163640],
- Cell[16302, 622, 637, 27, 31, "Text",
- CellTags->"B11",
- CellID->1685814901]}
+ Cell[16997, 631, 1151, 43, 65, "Output",
+ CellTags->"B11"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 18866, 698},
- {"B11", 18995, 702}
+ {"PrimaryExamplesSection", 21823, 802},
+ {"B11", 21953, 806}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3197, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 929, 29, 101, "Usage",
- CellID->982511436],
+Cell[3775, 100, 280, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3818, 111, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->68693664],
+Cell[4080, 115, 929, 29, 104, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4229, 130, 195, 6, 25, "ExampleSection",
- CellID->907881049],
+Cell[5034, 148, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1000064194],
+Cell[5776, 174, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4449, 140, 124, 4, 27, "Input",
- CellTags->"B11",
- CellID->1842812694],
-Cell[4576, 146, 269, 10, 36, "Output",
- CellTags->"B11",
- CellID->190457790]
+Cell[5832, 178, 86, 2, 70, "Input"],
+Cell[5921, 182, 232, 8, 35, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4860, 159, 235, 8, 33, "Text",
- CellTags->"B11",
- CellID->629012065],
Cell[CellGroupData[{
-Cell[5120, 171, 116, 4, 27, "Input",
- CellTags->"B11",
- CellID->401652515],
-Cell[5239, 177, 325, 13, 41, "Output",
- CellTags->"B11",
- CellID->329962251]
-}, Open ]],
+Cell[6214, 197, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->762842591],
Cell[CellGroupData[{
-Cell[5601, 195, 229, 8, 31, "Input",
+Cell[6626, 216, 196, 6, 26, "ExampleSection",
+ CellID->2010682123],
+Cell[CellGroupData[{
+Cell[6847, 226, 230, 8, 33, "Input",
CellTags->"B11",
CellID->63077265],
-Cell[5833, 205, 4465, 151, 189, "Output",
- CellTags->"B11",
- CellID->740537849]
+Cell[7080, 236, 4441, 162, 190, "Output",
+ CellTags->"B11"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10335, 361, 229, 8, 31, "Input",
- CellTags->"B11",
- CellID->10639178],
-Cell[10567, 371, 1855, 72, 80, "Output",
- CellTags->"B11",
- CellID->823230538]
+Cell[11558, 403, 243, 7, 33, "Input"],
+Cell[11804, 412, 548, 21, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12459, 448, 190, 6, 27, "Input",
- CellTags->"B11",
- CellID->1279434093],
-Cell[12652, 456, 270, 10, 36, "Output",
+Cell[12389, 438, 230, 8, 33, "Input",
CellTags->"B11",
- CellID->705577970]
+ CellID->10639178],
+Cell[12622, 448, 1851, 72, 65, "Output",
+ CellTags->"B11"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12959, 471, 229, 8, 31, "Input",
- CellTags->"B11",
- CellID->26512272],
-Cell[13191, 481, 619, 24, 42, "Output",
- CellTags->"B11",
- CellID->1173768318]
+Cell[14510, 525, 243, 7, 33, "Input"],
+Cell[14756, 534, 548, 21, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13847, 510, 189, 6, 27, "Input",
+Cell[15341, 560, 201, 7, 33, "Input",
CellTags->"B11",
- CellID->1075715949],
-Cell[14039, 518, 269, 10, 36, "Output",
- CellTags->"B11",
- CellID->832224142]
+ CellID->1384698038],
+Cell[15545, 569, 503, 19, 56, "Output",
+ CellTags->"B11"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14345, 533, 201, 7, 31, "Input",
- CellTags->"B11",
- CellID->1384698038],
-Cell[14549, 542, 523, 20, 62, "Output",
- CellTags->"B11",
- CellID->303443152]
+Cell[16085, 593, 212, 6, 33, "Input"],
+Cell[16300, 601, 389, 14, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15109, 567, 268, 9, 31, "Input",
+Cell[16726, 620, 268, 9, 33, "Input",
CellTags->"B11",
CellID->1335567043],
-Cell[15380, 578, 554, 21, 62, "Output",
- CellTags->"B11",
- CellID->2037163640]
+Cell[16997, 631, 1151, 43, 65, "Output",
+ CellTags->"B11"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18185, 679, 279, 8, 33, "Input"],
+Cell[18467, 689, 417, 15, 42, "Output"]
}, Open ]]
}, Open ]],
-Cell[15961, 603, 31, 0, 29, "SectionFooterSpacer"]
+Cell[18911, 708, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16029, 608, 270, 12, 31, "SeeAlsoSection",
+Cell[18979, 713, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[16302, 622, 637, 27, 31, "Text",
- CellTags->"B11",
- CellID->1685814901]
+Cell[19252, 727, 601, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[16954, 652, 23, 0, 42, "FooterCell"]
+Cell[19868, 755, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/BReduce.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/BReduce.nb
index 4b722a0fd..656e78cc3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/BReduce.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/BReduce.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10529, 374]
-NotebookOptionsPosition[ 6718, 253]
-NotebookOutlinePosition[ 9419, 331]
-CellTagsIndexPosition[ 9310, 325]
+NotebookDataLength[ 11258, 387]
+NotebookOptionsPosition[ 7939, 285]
+NotebookOutlinePosition[ 10326, 353]
+CellTagsIndexPosition[ 10217, 347]
WindowTitle->BReduce
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/BReduce\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/BReduce"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/BReduce.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"A0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/A0"], "\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"B00\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B00"], "\<\"B1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B1"], "\<\"B11\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B11"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/BReduce\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/BReduce"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/BReduce.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$22506],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/BReduce", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$29449],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/BReduce", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["BReduce", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["BReduce", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1451632901],
+ CellID->547132226],
Cell[CellGroupData[{
@@ -117,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1774014038],
+ CellID->359745152],
Cell[TextData[{
"By default ",
@@ -129,9 +165,7 @@ Cell[TextData[{
FormBox[
SubscriptBox["A", "0"], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"BReduce",
- CellID->233833972],
+}], "Notes"],
Cell[CellGroupData[{
@@ -151,17 +185,14 @@ Cell[BoxData[
RowBox[{"0", ",", "s", ",", "s"}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{73, 15},
+ ImageSize->{79, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BReduce",
- CellLabel->"Out[1]=",
- CellID->1373932648]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["With BReduce\[Rule]True, transformation is done.", "Text",
- CellTags->"BReduce",
- CellID->174829946],
+Cell["With BReduce\[Rule]True, transformation is done.", "Notes"],
Cell[CellGroupData[{
@@ -175,22 +206,25 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{
+ RowBox[{"-",
FractionBox[
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", "s", ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "s"], "-", "1"}], TraditionalForm]], "Output",
- ImageSize->{70, 42},
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", "s", ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "s"}]]}], TraditionalForm]], "Output",
+ ImageSize->{115, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BReduce",
- CellLabel->"Out[2]=",
- CellID->460346687]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -244,17 +278,15 @@ Cell[TextData[{
ButtonNote->"B11"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"BReduce",
- CellID->1422133579]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"BReduce",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -263,21 +295,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 35.281280}",
+ "built" -> "{2020, 1, 5, 18, 52, 53.668274}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"BReduce is an option for B0, B00, B1, B11 determining whether reductions \
-to A0 and B0 will be done. ", "synonyms" -> {}, "title" -> "BReduce",
- "titlemodifier" -> "", "windowtitle" -> "BReduce", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/BReduce"}, "SearchTextTranslated" -> ""},
+to A0 and B0 will be done. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "BReduce", "titlemodifier" -> "", "windowtitle" -> "BReduce", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/BReduce"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -286,7 +319,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -295,87 +328,67 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3304, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4583, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1451632901]},
+ CellID->547132226]},
"BReduce"->{
- Cell[3916, 121, 271, 12, 33, "Text",
- CellTags->"BReduce",
- CellID->233833972],
- Cell[4212, 137, 153, 5, 27, "Input",
+ Cell[5448, 171, 153, 5, 27, "Input",
CellTags->"BReduce",
CellID->768966684],
- Cell[4368, 144, 374, 14, 36, "Output",
- CellTags->"BReduce",
- CellID->1373932648],
- Cell[4757, 161, 106, 2, 31, "Text",
- CellTags->"BReduce",
- CellID->174829946],
- Cell[4888, 167, 202, 6, 27, "Input",
+ Cell[5604, 178, 353, 13, 37, "Output",
+ CellTags->"BReduce"],
+ Cell[6062, 198, 202, 6, 27, "Input",
CellTags->"BReduce",
CellID->876027895],
- Cell[5093, 175, 436, 17, 63, "Output",
- CellTags->"BReduce",
- CellID->460346687],
- Cell[5897, 215, 779, 33, 31, "Text",
- CellTags->"BReduce",
- CellID->1422133579]}
+ Cell[6267, 206, 523, 20, 55, "Output",
+ CellTags->"BReduce"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8545, 296},
- {"BReduce", 8679, 300}
+ {"PrimaryExamplesSection", 9755, 329},
+ {"BReduce", 9889, 333}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3285, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 404, 12, 82, "Usage",
+Cell[3867, 101, 284, 11, 45, "ObjectNameGrid"],
+Cell[4154, 114, 404, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3304, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4583, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1451632901],
+ CellID->547132226],
Cell[CellGroupData[{
-Cell[3717, 113, 196, 6, 25, "ExampleSection",
- CellID->1774014038],
-Cell[3916, 121, 271, 12, 33, "Text",
- CellTags->"BReduce",
- CellID->233833972],
+Cell[4995, 149, 195, 6, 26, "ExampleSection",
+ CellID->359745152],
+Cell[5193, 157, 230, 10, 33, "Notes"],
Cell[CellGroupData[{
-Cell[4212, 137, 153, 5, 27, "Input",
+Cell[5448, 171, 153, 5, 27, "Input",
CellTags->"BReduce",
CellID->768966684],
-Cell[4368, 144, 374, 14, 36, "Output",
- CellTags->"BReduce",
- CellID->1373932648]
+Cell[5604, 178, 353, 13, 37, "Output",
+ CellTags->"BReduce"]
}, Open ]],
-Cell[4757, 161, 106, 2, 31, "Text",
- CellTags->"BReduce",
- CellID->174829946],
+Cell[5972, 194, 65, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4888, 167, 202, 6, 27, "Input",
+Cell[6062, 198, 202, 6, 27, "Input",
CellTags->"BReduce",
CellID->876027895],
-Cell[5093, 175, 436, 17, 63, "Output",
- CellTags->"BReduce",
- CellID->460346687]
+Cell[6267, 206, 523, 20, 55, "Output",
+ CellTags->"BReduce"]
}, Open ]]
}, Open ]],
-Cell[5556, 196, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6817, 230, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5624, 201, 270, 12, 31, "SeeAlsoSection",
+Cell[6885, 235, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5897, 215, 779, 33, 31, "Text",
- CellTags->"BReduce",
- CellID->1422133579]
+Cell[7158, 249, 739, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[6691, 251, 23, 0, 42, "FooterCell"]
+Cell[7912, 283, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/BackgroundGluonVertex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/BackgroundGluonVertex.nb
index 4438216ed..8331f4856 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/BackgroundGluonVertex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/BackgroundGluonVertex.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 41885, 1478]
-NotebookOptionsPosition[ 36017, 1315]
-NotebookOutlinePosition[ 40166, 1417]
-CellTagsIndexPosition[ 40039, 1411]
+NotebookDataLength[ 36643, 1305]
+NotebookOptionsPosition[ 31321, 1151]
+NotebookOutlinePosition[ 34707, 1239]
+CellTagsIndexPosition[ 34580, 1233]
WindowTitle->BackgroundGluonVertex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/BackgroundGluonVertex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/BackgroundGluonVertex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/BackgroundGluonVertex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/BackgroundGluonVertex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
BackgroundGluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$21819],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/BackgroundGluonVertex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$28560],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/BackgroundGluonVertex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ BackgroundGluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["BackgroundGluonVertex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["BackgroundGluonVertex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -87,58 +121,106 @@ Cell[BoxData[GridBox[{
RowBox[{"q", ",", "nu", ",", "b"}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"k", ",", "la", ",", "c"}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "or BackgroundGluonVertex[ p,mu,a , q,nu,b , k,la,c ] yields the 3-gluon \
-vertex in the background field gauge, where the first set of arguments \
-corresponds to the external background field. BackgroundGluonVertex[{p,mu,a}, \
-{q,nu,b}, {k,la,c}, {s,si,d}] or BackgroundGluonVertex[{mu,a}, {nu,b}, \
-{la,c}, {si,d}] or BackgroundGluonVertex[p,mu,a , q,nu,b , k,la,c , s,si,d] \
-or BackgroundGluonVertex[ mu,a , nu,b , la,c , si,d ] yields the 4-gluon \
-vertex, with {p,mu,a} and {k,la,c} denoting the external background fields. \
-The gauge, dimension and the name of the coupling constant are determined by \
-the options Gauge, Dimension and CouplingConstant. The Feynman rules are \
-taken from L.Abbot ",
- StyleBox["NPB ",
- FontWeight->"Bold"],
- "185 (1981), 189-203; except that all momenta are incoming. Note that \
-Abbot's coupling constant convention is consistent with the default setting \
-of GluonVertex."
+ " \[LineSeparator]yields the 3-gluon vertex in the background field \
+gauge, where the first set of arguments corresponds to the external \
+background field."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"BackgroundGluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "mu", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "nu", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "la", ",", "c"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"s", ",", "si", ",", "d"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the 4-gluon vertex, with ",
+ Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"p", ",", "mu", ",", "a"}], "}"}]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"k", ",", "la", ",", "c"}], "}"}]], "InlineFormula"],
+ " denoting the external background fields."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->582436831],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1132022700],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->666479760],
+ "The gauge, dimension and the name of the coupling constant are determined \
+by the options ",
+ ButtonBox["Gauge",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Gauge",
+ ButtonNote->"Gauge"],
+ ", ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ " and ",
+ ButtonBox["CouplingConstant",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "The Feynman rules are taken from L.Abbot ",
+ StyleBox["NPB ",
+ FontWeight->"Bold"],
+ "185 (1981), 189-203; except that all momenta are incoming. "
+}], "Notes"],
+
+Cell[TextData[{
+ "Note that Abbot's coupling constant convention is consistent with the \
+default setting of ",
+ ButtonBox["GluonVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonVertex",
+ ButtonNote->"GluonVertex"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
@@ -156,16 +238,47 @@ Cell[BoxData[
RowBox[{"CouplingConstant", "\[Rule]",
SubscriptBox["g", "s"]}], ",",
RowBox[{"Gauge", "\[Rule]", "1"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{351, 15},
+ ImageSize->{334, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BackgroundGluonVertex",
CellLabel->"Out[1]=",
CellID->114339715]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->209588052],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->121079241],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"BackgroundGluonVertex", "[",
RowBox[{
@@ -176,7 +289,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"k", ",", "\[Lambda]", ",", "c"}], "}"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1056949570],
Cell[BoxData[
@@ -200,124 +313,87 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- RowBox[{"-",
- FormBox["k",
- TraditionalForm]}], "+",
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["k",
+ TraditionalForm]}], "+",
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm], "+",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["k",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{424, 25},
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{468, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[2]=",
- CellID->617960717]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -334,7 +410,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->196355292],
Cell[BoxData[
@@ -357,7 +433,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -372,110 +448,74 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -489,7 +529,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -504,77 +544,53 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -588,7 +604,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -603,117 +619,80 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{482, 86},
+ ImageSize->{500, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[3]=",
- CellID->949247376]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -729,7 +708,7 @@ Cell[BoxData[
RowBox[{"k", ",", "\[Lambda]", ",", "c"}], "}"}], ",",
RowBox[{"Gauge", "\[Rule]", "\[Alpha]"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->410624714],
Cell[BoxData[
@@ -753,130 +732,89 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- RowBox[{"-",
- FormBox[
- FractionBox[
- FormBox["k",
- TraditionalForm], "\[Alpha]"],
- TraditionalForm]}], "+",
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm], "+",
- FormBox[
- FractionBox[
- FormBox["q",
- TraditionalForm], "\[Alpha]"],
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ TraditionalForm], "\[Alpha]"]}], "+",
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm], "+",
+ FractionBox[
+ FormBox["q",
+ TraditionalForm], "\[Alpha]"]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["k",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{440, 43},
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{482, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[4]=",
- CellID->998908990]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -894,7 +832,7 @@ Cell[BoxData[
RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}], ",",
RowBox[{"Gauge", "\[Rule]", "\[Alpha]"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1007521255],
Cell[BoxData[
@@ -917,7 +855,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -932,7 +870,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
@@ -940,104 +878,68 @@ Cell[BoxData[
RowBox[{"-",
FractionBox[
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "\[Alpha]"]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
FormBox["\[Lambda]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ TraditionalForm]}]]}], "\[Alpha]"]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -1051,7 +953,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -1066,111 +968,75 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "\[Alpha]"], "-",
- RowBox[{
- FormBox[
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
+ FormBox["\[Lambda]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]}]], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]]}], "\[Alpha]"], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -1184,7 +1050,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -1199,84 +1065,59 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{500, 169},
+ ImageSize->{518, 131},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[5]=",
- CellID->686414429]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -1299,16 +1140,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["GluonVertex",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GluonVertex",
- ButtonNote->"GluonVertex"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"BackgroundGluonVertex",
- CellID->648308599]
+Cell[TextData[StyleBox[ButtonBox["GluonVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonVertex",
+ ButtonNote->"GluonVertex"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1325,33 +1161,26 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 32.025409}",
+ "built" -> "{2020, 1, 5, 18, 52, 51.452845}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "BackgroundGluonVertex[{p, mu, a}, {q, nu, b}, {k, la, c}] or \
-BackgroundGluonVertex[p,mu,a , q,nu,b , k,la,c ] yields the 3-gluon vertex in \
-the background field gauge, where the first set of arguments corresponds to \
-the external background field. BackgroundGluonVertex[{p,mu,a}, {q,nu,b}, \
-{k,la,c}, {s,si,d}] or BackgroundGluonVertex[{mu,a}, {nu,b}, {la,c}, {si,d}] \
-or BackgroundGluonVertex[p,mu,a , q,nu,b , k,la,c , s,si,d] or \
-BackgroundGluonVertex[mu,a , nu,b , la,c , si,d ] yields the 4-gluon vertex, \
-with {p,mu,a} and {k,la,c} denoting the external background fields. The \
-gauge, dimension and the name of the coupling constant are determined by the \
-options Gauge, Dimension and CouplingConstant. The Feynman rules are taken \
-from L.Abbot NPB 185 (1981), 189-203; except that all momenta are incoming. \
-Note that Abbot's coupling constant convention is consistent with the default \
-setting of GluonVertex.", "synonyms" -> {}, "title" ->
+ "BackgroundGluonVertex[{p, mu, a}, {q, nu, b}, {k, la, c}] yields the \
+3-gluon vertex in the background field gauge, where the first set of \
+arguments corresponds to the external background field. \
+BackgroundGluonVertex[{p, mu, a}, {q, nu, b}, {k, la, c}, {s, si, d}] yields \
+the 4-gluon vertex, with {p, mu, a} and {k, la, c} denoting the external \
+background fields.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"BackgroundGluonVertex", "titlemodifier" -> "", "windowtitle" ->
"BackgroundGluonVertex", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/BackgroundGluonVertex"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1360,7 +1189,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1368,118 +1197,116 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4525, 115, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->582436831]},
"BackgroundGluonVertex"->{
- Cell[5157, 144, 159, 4, 27, "Input",
+ Cell[7325, 226, 159, 4, 70, "Input",
CellTags->"BackgroundGluonVertex",
CellID->236798928],
- Cell[5319, 150, 425, 13, 36, "Output",
+ Cell[7487, 232, 425, 13, 37, "Output",
CellTags->"BackgroundGluonVertex",
CellID->114339715],
- Cell[5781, 168, 380, 11, 27, "Input",
+ Cell[8605, 281, 380, 11, 27, "Input",
CellTags->"BackgroundGluonVertex",
CellID->1056949570],
- Cell[6164, 181, 3443, 138, 46, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->617960717],
- Cell[9644, 324, 455, 13, 27, "Input",
+ Cell[8988, 294, 2501, 101, 43, "Output",
+ CellTags->"BackgroundGluonVertex"],
+ Cell[11526, 400, 455, 13, 27, "Input",
CellTags->"BackgroundGluonVertex",
CellID->196355292],
- Cell[10102, 339, 10205, 376, 107, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->949247376],
- Cell[20344, 720, 430, 12, 27, "Input",
+ Cell[11984, 415, 7497, 279, 93, "Output",
+ CellTags->"BackgroundGluonVertex"],
+ Cell[19518, 699, 430, 12, 27, "Input",
CellTags->"BackgroundGluonVertex",
CellID->410624714],
- Cell[20777, 734, 3636, 144, 64, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->998908990],
- Cell[24450, 883, 507, 14, 45, "Input",
+ Cell[19951, 713, 2578, 103, 56, "Output",
+ CellTags->"BackgroundGluonVertex"],
+ Cell[22566, 821, 507, 14, 45, "Input",
CellTags->"BackgroundGluonVertex",
CellID->1007521255],
- Cell[24960, 899, 10398, 379, 190, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->686414429],
- Cell[35726, 1301, 249, 9, 31, "Text",
- CellTags->"BackgroundGluonVertex",
- CellID->648308599]}
+ Cell[23076, 837, 7654, 282, 152, "Output",
+ CellTags->"BackgroundGluonVertex"]},
+ "PrimaryExamplesSection"->{
+ Cell[7973, 252, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->209588052]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 38733, 1370},
- {"BackgroundGluonVertex", 38881, 1374}
+ {"BackgroundGluonVertex", 33464, 1199},
+ {"PrimaryExamplesSection", 34437, 1226}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2297, 52, 51, "AnchorBarGrid",
+Cell[593, 21, 3060, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2893, 75, 64, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2960, 78, 1540, 33, 209, "Usage",
- CellID->982511436],
+Cell[3656, 97, 298, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4525, 115, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->582436831],
+Cell[3979, 112, 1544, 42, 165, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[4937, 134, 195, 6, 25, "ExampleSection",
- CellID->666479760],
+Cell[5548, 158, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1132022700],
+Cell[6290, 184, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6324, 186, 537, 19, 70, "Notes",
+ CellID->1067943069],
+Cell[6864, 207, 178, 5, 70, "Notes"],
+Cell[7045, 214, 255, 8, 70, "Notes"],
Cell[CellGroupData[{
-Cell[5157, 144, 159, 4, 27, "Input",
+Cell[7325, 226, 159, 4, 70, "Input",
CellTags->"BackgroundGluonVertex",
CellID->236798928],
-Cell[5319, 150, 425, 13, 36, "Output",
+Cell[7487, 232, 425, 13, 37, "Output",
CellTags->"BackgroundGluonVertex",
CellID->114339715]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5781, 168, 380, 11, 27, "Input",
+Cell[7973, 252, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->209588052],
+Cell[CellGroupData[{
+Cell[8385, 271, 195, 6, 26, "ExampleSection",
+ CellID->121079241],
+Cell[CellGroupData[{
+Cell[8605, 281, 380, 11, 27, "Input",
CellTags->"BackgroundGluonVertex",
CellID->1056949570],
-Cell[6164, 181, 3443, 138, 46, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->617960717]
+Cell[8988, 294, 2501, 101, 43, "Output",
+ CellTags->"BackgroundGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9644, 324, 455, 13, 27, "Input",
+Cell[11526, 400, 455, 13, 27, "Input",
CellTags->"BackgroundGluonVertex",
CellID->196355292],
-Cell[10102, 339, 10205, 376, 107, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->949247376]
+Cell[11984, 415, 7497, 279, 93, "Output",
+ CellTags->"BackgroundGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20344, 720, 430, 12, 27, "Input",
+Cell[19518, 699, 430, 12, 27, "Input",
CellTags->"BackgroundGluonVertex",
CellID->410624714],
-Cell[20777, 734, 3636, 144, 64, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->998908990]
+Cell[19951, 713, 2578, 103, 56, "Output",
+ CellTags->"BackgroundGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24450, 883, 507, 14, 45, "Input",
+Cell[22566, 821, 507, 14, 45, "Input",
CellTags->"BackgroundGluonVertex",
CellID->1007521255],
-Cell[24960, 899, 10398, 379, 190, "Output",
- CellTags->"BackgroundGluonVertex",
- CellID->686414429]
+Cell[23076, 837, 7654, 282, 152, "Output",
+ CellTags->"BackgroundGluonVertex"]
}, Open ]]
}, Open ]],
-Cell[35385, 1282, 31, 0, 29, "SectionFooterSpacer"]
+Cell[30757, 1123, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[35453, 1287, 270, 12, 31, "SeeAlsoSection",
+Cell[30825, 1128, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[35726, 1301, 249, 9, 31, "Text",
- CellTags->"BackgroundGluonVertex",
- CellID->648308599]
+Cell[31098, 1142, 181, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[35990, 1313, 23, 0, 42, "FooterCell"]
+Cell[31294, 1149, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Bracket.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Bracket.nb
index e0a4bb597..753d49040 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Bracket.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Bracket.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6074, 188]
-NotebookOptionsPosition[ 3853, 122]
-NotebookOutlinePosition[ 5815, 177]
-CellTagsIndexPosition[ 5746, 172]
+NotebookDataLength[ 6835, 208]
+NotebookOptionsPosition[ 4807, 152]
+NotebookOutlinePosition[ 6628, 200]
+CellTagsIndexPosition[ 6585, 197]
WindowTitle->Bracket
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Bracket\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Bracket"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Bracket.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Convolute\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Convolute"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Bracket\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Bracket"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Bracket.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$22156],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Bracket", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$29001],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Bracket", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Bracket", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Bracket", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"Convolute"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Bracket",
- CellID->442526235]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,21 +162,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 34.001575}",
+ "built" -> "{2020, 1, 5, 18, 52, 52.749365}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Bracket is an option of Convolute, specifying the variable with respect \
-to which the result is collected.", "synonyms" -> {}, "title" -> "Bracket",
- "titlemodifier" -> "", "windowtitle" -> "Bracket", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Bracket"}},
+to which the result is collected.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Bracket", "titlemodifier" -> "", "windowtitle" -> "Bracket",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Bracket"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Bracket"->{
- Cell[3582, 108, 229, 9, 70, "Text",
- CellTags->"Bracket",
- CellID->442526235]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Bracket", 5637, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 70, "AnchorBarGrid",
+Cell[579, 21, 2999, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 409, 12, 70, "Usage",
+Cell[3581, 97, 284, 11, 70, "ObjectNameGrid"],
+Cell[3868, 110, 409, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3309, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4302, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3582, 108, 229, 9, 70, "Text",
- CellTags->"Bracket",
- CellID->442526235]
+Cell[4575, 140, 190, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3826, 120, 23, 0, 70, "FooterCell"]
+Cell[4780, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/C0.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/C0.nb
index 96ae18e9e..1ae3cb42b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/C0.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/C0.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11543, 400]
-NotebookOptionsPosition[ 7562, 274]
-NotebookOutlinePosition[ 10428, 355]
-CellTagsIndexPosition[ 10324, 349]
+NotebookDataLength[ 12397, 418]
+NotebookOptionsPosition[ 8686, 304]
+NotebookOutlinePosition[ 11391, 379]
+CellTagsIndexPosition[ 11285, 373]
WindowTitle->C0
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/C0\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/C0"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/C0.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$22853],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/C0",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"D0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/D0"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeOrder\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVeOrder"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/C0\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/C0"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/C0.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$29896],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/C0",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["C0", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["C0", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,7 +153,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1857092055],
+ CellID->1362566519],
Cell[CellGroupData[{
@@ -128,7 +163,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2101311426],
+ CellID->2034063019],
Cell[CellGroupData[{
@@ -150,12 +185,11 @@ Cell[BoxData[
")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{182, 15},
+ ImageSize->{190, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"C0",
- CellLabel->"Out[1]=",
- CellID->370674132]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -179,12 +213,11 @@ Cell[BoxData[
")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{182, 15},
+ ImageSize->{190, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"C0",
- CellLabel->"Out[2]=",
- CellID->240939187]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -212,12 +245,11 @@ Cell[BoxData[
")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{182, 15},
+ ImageSize->{190, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"C0",
- CellLabel->"Out[3]=",
- CellID->1857619476]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -265,9 +297,7 @@ Cell[TextData[{
ButtonNote->"PaVeOrder"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"C0",
- CellID->1972879175]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -284,10 +314,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 36.777847}",
+ "built" -> "{2020, 1, 5, 18, 52, 54.761726}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -297,11 +327,11 @@ TaggingRules->{
C0function. The convention for the arguments is that if the denominator of \
the integrand has the form ([q^2-m1^2] [(q+p1)^2-m2^2] [(q+p2)^2-m3^2]), the \
first three arguments of C0 are the scalar products p10 = p1^2, p12 = \
-(p1-p2).(p1-p2), p20 = p2^2.", "synonyms" -> {}, "title" -> "C0",
- "titlemodifier" -> "", "windowtitle" -> "C0", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/C0"}, "SearchTextTranslated" -> ""},
+(p1-p2).(p1-p2), p20 = p2^2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "C0", "titlemodifier" -> "", "windowtitle" -> "C0", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/C0"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -310,7 +340,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -319,89 +349,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3789, 105, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5009, 140, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1857092055]},
+ CellID->1362566519]},
"C0"->{
- Cell[4423, 134, 192, 6, 27, "Input",
+ Cell[5643, 169, 192, 6, 27, "Input",
CellTags->"C0",
CellID->929768353],
- Cell[4618, 142, 411, 15, 36, "Output",
- CellTags->"C0",
- CellID->370674132],
- Cell[5066, 162, 221, 7, 27, "Input",
+ Cell[5838, 177, 391, 14, 37, "Output",
+ CellTags->"C0"],
+ Cell[6266, 196, 221, 7, 27, "Input",
CellTags->"C0",
CellID->281164286],
- Cell[5290, 171, 411, 15, 36, "Output",
- CellTags->"C0",
- CellID->240939187],
- Cell[5738, 191, 345, 11, 27, "Input",
+ Cell[6490, 205, 391, 14, 37, "Output",
+ CellTags->"C0"],
+ Cell[6918, 224, 345, 11, 27, "Input",
CellTags->"C0",
CellID->2033659557],
- Cell[6086, 204, 412, 15, 36, "Output",
- CellTags->"C0",
- CellID->1857619476],
- Cell[6866, 242, 654, 27, 31, "Text",
- CellTags->"C0",
- CellID->1972879175]}
+ Cell[7266, 237, 391, 14, 37, "Output",
+ CellTags->"C0"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9593, 320},
- {"C0", 9723, 324}
+ {"PrimaryExamplesSection", 10703, 350},
+ {"C0", 10833, 354}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3219, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 906, 23, 116, "Usage",
+Cell[3796, 100, 279, 11, 45, "ObjectNameGrid"],
+Cell[4078, 113, 906, 23, 120, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3789, 105, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5009, 140, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1857092055],
+ CellID->1362566519],
Cell[CellGroupData[{
-Cell[4202, 124, 196, 6, 25, "ExampleSection",
- CellID->2101311426],
+Cell[5422, 159, 196, 6, 26, "ExampleSection",
+ CellID->2034063019],
Cell[CellGroupData[{
-Cell[4423, 134, 192, 6, 27, "Input",
+Cell[5643, 169, 192, 6, 27, "Input",
CellTags->"C0",
CellID->929768353],
-Cell[4618, 142, 411, 15, 36, "Output",
- CellTags->"C0",
- CellID->370674132]
+Cell[5838, 177, 391, 14, 37, "Output",
+ CellTags->"C0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5066, 162, 221, 7, 27, "Input",
+Cell[6266, 196, 221, 7, 27, "Input",
CellTags->"C0",
CellID->281164286],
-Cell[5290, 171, 411, 15, 36, "Output",
- CellTags->"C0",
- CellID->240939187]
+Cell[6490, 205, 391, 14, 37, "Output",
+ CellTags->"C0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5738, 191, 345, 11, 27, "Input",
+Cell[6918, 224, 345, 11, 27, "Input",
CellTags->"C0",
CellID->2033659557],
-Cell[6086, 204, 412, 15, 36, "Output",
- CellTags->"C0",
- CellID->1857619476]
+Cell[7266, 237, 391, 14, 37, "Output",
+ CellTags->"C0"]
}, Open ]]
}, Open ]],
-Cell[6525, 223, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7684, 255, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6593, 228, 270, 12, 31, "SeeAlsoSection",
+Cell[7752, 260, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6866, 242, 654, 27, 31, "Text",
- CellTags->"C0",
- CellID->1972879175]
+Cell[8025, 274, 619, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[7535, 272, 23, 0, 42, "FooterCell"]
+Cell[8659, 302, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CA.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CA.nb
index 93c757bb5..39edfda04 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CA.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CA.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9562, 344]
-NotebookOptionsPosition[ 5858, 221]
-NotebookOutlinePosition[ 8457, 299]
-CellTagsIndexPosition[ 8353, 293]
+NotebookDataLength[ 10274, 360]
+NotebookOptionsPosition[ 6836, 249]
+NotebookOutlinePosition[ 9276, 321]
+CellTagsIndexPosition[ 9172, 315]
WindowTitle->CA
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CA\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CA"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/CA.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24217],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/CA",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CF\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CF"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CA\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CA"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CA.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$31673],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CA",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CA", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CA", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->698490347],
+ CellID->1253702121],
Cell[CellGroupData[{
@@ -122,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->518889655],
+ CellID->1260543835],
Cell[CellGroupData[{
@@ -134,12 +167,11 @@ Cell[BoxData["CA"], "Input",
Cell[BoxData[
FormBox[
SubscriptBox["C", "A"], TraditionalForm]], "Output",
- ImageSize->{23, 15},
+ ImageSize->{28, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CA",
- CellLabel->"Out[1]=",
- CellID->1618948920]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -154,12 +186,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["N", TraditionalForm]], "Output",
- ImageSize->{19, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CA",
- CellLabel->"Out[2]=",
- CellID->2112958244]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -171,12 +202,11 @@ Cell[BoxData["SUNN"], "Input",
Cell[BoxData[
FormBox["N", TraditionalForm]], "Output",
- ImageSize->{19, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CA",
- CellLabel->"Out[3]=",
- CellID->981411080]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -212,17 +242,15 @@ Cell[TextData[{
ButtonNote->"SUNSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CA",
- CellID->831413788]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"CA",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -231,21 +259,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 42.742956}",
+ "built" -> "{2020, 1, 5, 18, 52, 59.334402}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"CA is one of the Casimir operator eigenvalues of SU(N) (CA = N).",
- "synonyms" -> {}, "title" -> "CA", "titlemodifier" -> "", "windowtitle" ->
- "CA", "type" -> "Symbol", "uri" -> "FeynCalc/ref/CA"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CA", "titlemodifier" ->
+ "", "windowtitle" -> "CA", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CA"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -254,7 +282,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -263,89 +291,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3359, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4431, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->698490347]},
+ CellID->1253702121]},
"CA"->{
- Cell[3991, 128, 88, 3, 27, "Input",
+ Cell[5065, 161, 88, 3, 27, "Input",
CellTags->"CA",
CellID->373196199],
- Cell[4082, 133, 226, 8, 36, "Output",
- CellTags->"CA",
- CellID->1618948920],
- Cell[4345, 146, 191, 6, 27, "Input",
+ Cell[5156, 166, 205, 7, 37, "Output",
+ CellTags->"CA"],
+ Cell[5398, 178, 191, 6, 27, "Input",
CellTags->"CA",
CellID->686554202],
- Cell[4539, 154, 204, 7, 36, "Output",
- CellTags->"CA",
- CellID->2112958244],
- Cell[4780, 166, 91, 3, 27, "Input",
+ Cell[5592, 186, 183, 6, 35, "Output",
+ CellTags->"CA"],
+ Cell[5812, 197, 91, 3, 27, "Input",
CellTags->"CA",
CellID->1806839104],
- Cell[4874, 171, 203, 7, 36, "Output",
- CellTags->"CA",
- CellID->981411080],
- Cell[5445, 201, 371, 15, 32, "Text",
- CellTags->"CA",
- CellID->831413788]}
+ Cell[5906, 202, 183, 6, 35, "Output",
+ CellTags->"CA"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7630, 264},
- {"CA", 7758, 268}
+ {"PrimaryExamplesSection", 8596, 292},
+ {"CA", 8726, 296}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3071, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 476, 17, 83, "Usage",
+Cell[3648, 98, 279, 11, 45, "ObjectNameGrid"],
+Cell[3930, 111, 476, 17, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3359, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4431, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->698490347],
+ CellID->1253702121],
Cell[CellGroupData[{
-Cell[3771, 118, 195, 6, 25, "ExampleSection",
- CellID->518889655],
+Cell[4844, 151, 196, 6, 26, "ExampleSection",
+ CellID->1260543835],
Cell[CellGroupData[{
-Cell[3991, 128, 88, 3, 27, "Input",
+Cell[5065, 161, 88, 3, 27, "Input",
CellTags->"CA",
CellID->373196199],
-Cell[4082, 133, 226, 8, 36, "Output",
- CellTags->"CA",
- CellID->1618948920]
+Cell[5156, 166, 205, 7, 37, "Output",
+ CellTags->"CA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4345, 146, 191, 6, 27, "Input",
+Cell[5398, 178, 191, 6, 27, "Input",
CellTags->"CA",
CellID->686554202],
-Cell[4539, 154, 204, 7, 36, "Output",
- CellTags->"CA",
- CellID->2112958244]
+Cell[5592, 186, 183, 6, 35, "Output",
+ CellTags->"CA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4780, 166, 91, 3, 27, "Input",
+Cell[5812, 197, 91, 3, 27, "Input",
CellTags->"CA",
CellID->1806839104],
-Cell[4874, 171, 203, 7, 36, "Output",
- CellTags->"CA",
- CellID->981411080]
+Cell[5906, 202, 183, 6, 35, "Output",
+ CellTags->"CA"]
}, Open ]]
}, Open ]],
-Cell[5104, 182, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6116, 212, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5172, 187, 270, 12, 31, "SeeAlsoSection",
+Cell[6184, 217, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5445, 201, 371, 15, 32, "Text",
- CellTags->"CA",
- CellID->831413788]
+Cell[6457, 231, 337, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5831, 219, 23, 0, 42, "FooterCell"]
+Cell[6809, 247, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CF.nb
index d69c604c7..beabdabe5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CF.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CF.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10713, 391]
-NotebookOptionsPosition[ 6640, 254]
-NotebookOutlinePosition[ 9417, 338]
-CellTagsIndexPosition[ 9313, 332]
+NotebookDataLength[ 11405, 405]
+NotebookOptionsPosition[ 7594, 281]
+NotebookOutlinePosition[ 10242, 359]
+CellTagsIndexPosition[ 10138, 353]
WindowTitle->CF
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CF\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CF"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/CF.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24894],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/CF",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CA\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CA"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CF\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CF"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CF.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$35688],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CF",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CF", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,7 +149,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2016701578],
+ CellID->1884678991],
Cell[CellGroupData[{
@@ -126,7 +159,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1606023489],
+ CellID->2080959042],
Cell[CellGroupData[{
@@ -138,12 +171,11 @@ Cell[BoxData["CF"], "Input",
Cell[BoxData[
FormBox[
SubscriptBox["C", "F"], TraditionalForm]], "Output",
- ImageSize->{24, 15},
+ ImageSize->{26, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CF",
- CellLabel->"Out[1]=",
- CellID->1771246704]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -162,12 +194,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["N", "2"], "-", "1"}],
RowBox[{"2", " ", "N"}]], TraditionalForm]], "Output",
- ImageSize->{54, 45},
+ ImageSize->{54, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CF",
- CellLabel->"Out[2]=",
- CellID->1827752058]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -179,12 +210,11 @@ Cell[BoxData["SUNN"], "Input",
Cell[BoxData[
FormBox["N", TraditionalForm]], "Output",
- ImageSize->{19, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CF",
- CellLabel->"Out[3]=",
- CellID->2104582203]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -204,12 +234,11 @@ Cell[BoxData[
RowBox[{"2", " ",
SubscriptBox["C", "A"], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
- ImageSize->{57, 15},
+ ImageSize->{65, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CF",
- CellLabel->"Out[4]=",
- CellID->2114118582]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -245,9 +274,7 @@ Cell[TextData[{
ButtonNote->"SUNSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CF",
- CellID->856648073]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -264,21 +291,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 45.677246}",
+ "built" -> "{2020, 1, 5, 18, 53, 10.624337}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"CF is one of the Casimir operator eigenvalues of SU(N) (CF = (N^2-1)/(2 \
-N)).", "synonyms" -> {}, "title" -> "CF", "titlemodifier" -> "",
- "windowtitle" -> "CF", "type" -> "Symbol", "uri" -> "FeynCalc/ref/CF"},
- "SearchTextTranslated" -> ""},
+N)).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "CF", "titlemodifier" ->
+ "", "windowtitle" -> "CF", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CF"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -286,8 +313,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -296,103 +324,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3464, 103, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4536, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2016701578]},
+ CellID->1884678991]},
"CF"->{
- Cell[4098, 132, 88, 3, 27, "Input",
+ Cell[5170, 165, 88, 3, 27, "Input",
CellTags->"CF",
CellID->606616156],
- Cell[4189, 137, 226, 8, 36, "Output",
- CellTags->"CF",
- CellID->1771246704],
- Cell[4452, 150, 196, 6, 27, "Input",
+ Cell[5261, 170, 205, 7, 37, "Output",
+ CellTags->"CF"],
+ Cell[5503, 182, 196, 6, 27, "Input",
CellTags->"CF",
CellID->943993167],
- Cell[4651, 158, 299, 11, 66, "Output",
- CellTags->"CF",
- CellID->1827752058],
- Cell[4987, 174, 90, 3, 27, "Input",
+ Cell[5702, 190, 278, 10, 59, "Output",
+ CellTags->"CF"],
+ Cell[6017, 205, 90, 3, 27, "Input",
CellTags->"CF",
CellID->721736691],
- Cell[5080, 179, 204, 7, 36, "Output",
- CellTags->"CF",
- CellID->2104582203],
- Cell[5321, 191, 252, 8, 27, "Input",
+ Cell[6110, 210, 183, 6, 35, "Output",
+ CellTags->"CF"],
+ Cell[6330, 221, 252, 8, 27, "Input",
CellTags->"CF",
CellID->1669593560],
- Cell[5576, 201, 283, 10, 36, "Output",
- CellTags->"CF",
- CellID->2114118582],
- Cell[6227, 234, 371, 15, 32, "Text",
- CellTags->"CF",
- CellID->856648073]}
+ Cell[6585, 231, 262, 9, 37, "Output",
+ CellTags->"CF"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8421, 297},
- {"CF", 8551, 301}
+ {"PrimaryExamplesSection", 9420, 325},
+ {"CF", 9550, 329}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3071, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 581, 21, 85, "Usage",
+Cell[3648, 98, 279, 11, 45, "ObjectNameGrid"],
+Cell[3930, 111, 581, 21, 87, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3464, 103, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4536, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2016701578],
+ CellID->1884678991],
Cell[CellGroupData[{
-Cell[3877, 122, 196, 6, 25, "ExampleSection",
- CellID->1606023489],
+Cell[4949, 155, 196, 6, 26, "ExampleSection",
+ CellID->2080959042],
Cell[CellGroupData[{
-Cell[4098, 132, 88, 3, 27, "Input",
+Cell[5170, 165, 88, 3, 27, "Input",
CellTags->"CF",
CellID->606616156],
-Cell[4189, 137, 226, 8, 36, "Output",
- CellTags->"CF",
- CellID->1771246704]
+Cell[5261, 170, 205, 7, 37, "Output",
+ CellTags->"CF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4452, 150, 196, 6, 27, "Input",
+Cell[5503, 182, 196, 6, 27, "Input",
CellTags->"CF",
CellID->943993167],
-Cell[4651, 158, 299, 11, 66, "Output",
- CellTags->"CF",
- CellID->1827752058]
+Cell[5702, 190, 278, 10, 59, "Output",
+ CellTags->"CF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4987, 174, 90, 3, 27, "Input",
+Cell[6017, 205, 90, 3, 27, "Input",
CellTags->"CF",
CellID->721736691],
-Cell[5080, 179, 204, 7, 36, "Output",
- CellTags->"CF",
- CellID->2104582203]
+Cell[6110, 210, 183, 6, 35, "Output",
+ CellTags->"CF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5321, 191, 252, 8, 27, "Input",
+Cell[6330, 221, 252, 8, 27, "Input",
CellTags->"CF",
CellID->1669593560],
-Cell[5576, 201, 283, 10, 36, "Output",
- CellTags->"CF",
- CellID->2114118582]
+Cell[6585, 231, 262, 9, 37, "Output",
+ CellTags->"CF"]
}, Open ]]
}, Open ]],
-Cell[5886, 215, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6874, 244, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5954, 220, 270, 12, 31, "SeeAlsoSection",
+Cell[6942, 249, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6227, 234, 371, 15, 32, "Text",
- CellTags->"CF",
- CellID->856648073]
+Cell[7215, 263, 337, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[6613, 252, 23, 0, 42, "FooterCell"]
+Cell[7567, 279, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CFAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CFAD.nb
new file mode 100644
index 000000000..7bdc708d9
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CFAD.nb
@@ -0,0 +1,692 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19575, 682]
+NotebookOptionsPosition[ 14861, 540]
+NotebookOutlinePosition[ 17515, 603]
+CellTagsIndexPosition[ 17430, 598]
+WindowTitle->CFAD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FAD"], "\<\"SFAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SFAD"], "\<\"GFAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GFAD"], "\<\"FeynAmpDenominator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynAmpDenominator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CFAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CFAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CFAD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$35236],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CFAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CFAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"q1", "+"}], "..."}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"p1", ".", "q2"}], "+"}], "..."}], ","}], "}"}], " ",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], ",", "s"}], "}"}]}], ",", "n"}], "}"}],
+ ",", "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a Cartesian propagator given by 1/[(q1+...)^2 \
++ p1.q2 ... + m^2 + sign*I*eta]^n, where q1^2 and p1.q2 are Cartesian sclar \
+products in D-1 dimensions. For brevity one can also use shorter forms such \
+as CFAD[{q1+ ..., m^2}, ...], CFAD[{q1+ ..., m^2 , n}, ...], CFAD[{q1+ ..., \
+ {m^2, -1}}, ...], CFAD[q1,...] etc. If s is not explicitly specified, then \
+its value is determined by the option EtaSign, which has the default value \
++1. If n is not explicitly specified, then the default value 1 is assumed. \
+Translation into FeynCalc internal form is performed by FeynCalcInternal, \
+where a CFAD is encoded using the special head CartesianPropagatorDenominator."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1721213889],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->413845007],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]",
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->426610684],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->148573723]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1078402331],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}]], TraditionalForm]], "Output",
+ ImageSize->{68, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->996027667]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], ",", "1"}], "}"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1458399229],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1725293840]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->975505501],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}]], TraditionalForm]], "Output",
+ ImageSize->{68, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1140744502]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->539052608],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{104, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->339884090]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->725889266],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
+ ImageSize->{68, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1423715443]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->594476494],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{119, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->83537025]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->816120209],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}]], TraditionalForm]], "Output",
+ ImageSize->{84, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1655409690]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->978317030],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{86, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->1166254423]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->2075220032],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{45, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->1302611691]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FAD",
+ ButtonNote->"FAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SFAD",
+ ButtonNote->"SFAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GFAD",
+ ButtonNote->"GFAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator",
+ ButtonNote->"FeynAmpDenominator"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CFAD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 9.357245}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CFAD[{{q1 + ..., p1.q2 + ...,} {m^2, s}, n}, ...] denotes a Cartesian \
+propagator given by 1/[(q1+...)^2 + p1.q2 ... + m^2 + sign*I*eta]^n, where \
+q1^2 and p1.q2 are Cartesian sclar products in D-1 dimensions. For brevity \
+one can also use shorter forms such as CFAD[{q1+ ..., m^2}, ...], CFAD[{q1+ \
+..., m^2 , n}, ...], CFAD[{q1+ ..., {m^2, -1}}, ...], CFAD[q1,...] etc. If s \
+is not explicitly specified, then its value is determined by the option \
+EtaSign, which has the default value +1. If n is not explicitly specified, \
+then the default value 1 is assumed. Translation into FeynCalc internal form \
+is performed by FeynCalcInternal, where a CFAD is encoded using the special \
+head CartesianPropagatorDenominator.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "CFAD", "titlemodifier" -> "", "windowtitle" -> "CFAD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CFAD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5593, 151, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1721213889]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 17286, 591}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3237, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3816, 100, 281, 11, 45, "ObjectNameGrid"],
+Cell[4100, 113, 1468, 34, 171, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5593, 151, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1721213889],
+Cell[CellGroupData[{
+Cell[6006, 170, 195, 6, 26, "ExampleSection",
+ CellID->413845007],
+Cell[CellGroupData[{
+Cell[6226, 180, 264, 9, 45, "Input",
+ CellID->426610684],
+Cell[6493, 191, 495, 14, 61, "Output",
+ CellID->148573723]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7025, 210, 123, 3, 27, "Input",
+ CellID->1078402331],
+Cell[7151, 215, 434, 17, 61, "Output",
+ CellID->996027667]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7622, 237, 277, 10, 27, "Input",
+ CellID->1458399229],
+Cell[7902, 249, 496, 14, 61, "Output",
+ CellID->1725293840]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8435, 268, 122, 3, 27, "Input",
+ CellID->975505501],
+Cell[8560, 273, 435, 17, 61, "Output",
+ CellID->1140744502]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9032, 295, 244, 9, 27, "Input",
+ CellID->539052608],
+Cell[9279, 306, 510, 15, 61, "Output",
+ CellID->339884090]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9826, 326, 122, 3, 27, "Input",
+ CellID->725889266],
+Cell[9951, 331, 435, 17, 61, "Output",
+ CellID->1423715443]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10423, 353, 250, 9, 27, "Input",
+ CellID->594476494],
+Cell[10676, 364, 675, 19, 61, "Output",
+ CellID->83537025]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11388, 388, 122, 3, 27, "Input",
+ CellID->816120209],
+Cell[11513, 393, 642, 26, 61, "Output",
+ CellID->1655409690]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12192, 424, 198, 7, 27, "Input",
+ CellID->978317030],
+Cell[12393, 433, 643, 19, 59, "Output",
+ CellID->1166254423]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13073, 457, 124, 3, 27, "Input",
+ CellID->2075220032],
+Cell[13200, 462, 576, 24, 59, "Output",
+ CellID->1302611691]
+}, Open ]]
+}, Open ]],
+Cell[13803, 490, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13871, 495, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[14144, 509, 675, 26, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[14834, 538, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGA.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGA.nb
new file mode 100644
index 000000000..537ee346f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGA.nb
@@ -0,0 +1,824 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 21219, 814]
+NotebookOptionsPosition[ 16296, 647]
+NotebookOutlinePosition[ 19413, 741]
+CellTagsIndexPosition[ 19307, 735]
+WindowTitle->CGA
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GA\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GA"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CGA\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CGA"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CGA.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$37024],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CGA",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CGA", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CGA", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "i"]], "InlineFormula"],
+ " in 4 dimensions, where i is a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i]] by FeynCalcInternal"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1170779517],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->320231764],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGA", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->1181136955]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CGA", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{108, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->522903436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CGA", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Output",
+ ImageSize->{240, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->236332518]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{99, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->1496950468]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}], ".",
+ RowBox[{"CGA", "[", "k", "]"}], ".",
+ RowBox[{"CGA", "[", "l", "]"}]}]], "Output",
+ ImageSize->{231, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->260993590]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "]"}]], "Input",\
+
+ CellLabel->"In[6]:=",
+ CellID->246195830],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{267, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->216887395]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[7]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{130, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[7]=",
+ CellID->92770746]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GA",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CGA",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 14.177263}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CGA[i] can be used as input for \\[Gamma]^i in 4 dimensions, where i is \
+a Cartesian index, and is transformed into DiracGamma[CartesianIndex[i]] by \
+FeynCalcInternal", "synonyms" -> {}, "tabletags" -> {}, "title" -> "CGA",
+ "titlemodifier" -> "", "windowtitle" -> "CGA", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CGA"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4508, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1170779517]},
+ "GA"->{
+ Cell[5141, 159, 116, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[5260, 165, 507, 21, 40, "Output",
+ CellTags->"GA",
+ CellID->1181136955],
+ Cell[5804, 191, 217, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[6024, 201, 1799, 74, 40, "Output",
+ CellTags->"GA",
+ CellID->522903436],
+ Cell[7860, 280, 186, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[8049, 288, 267, 8, 51, "Output",
+ CellTags->"GA",
+ CellID->236332518],
+ Cell[8353, 301, 160, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[8516, 308, 1707, 72, 41, "Output",
+ CellTags->"GA",
+ CellID->1496950468],
+ Cell[10260, 385, 200, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[10463, 393, 352, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->260993590],
+ Cell[13814, 535, 259, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+ Cell[14076, 546, 1456, 59, 40, "Output",
+ CellTags->"GA",
+ CellID->92770746]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 18159, 691},
+ {"GA", 18289, 695}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3059, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3637, 98, 280, 11, 45, "ObjectNameGrid"],
+Cell[3920, 111, 563, 15, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4508, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1170779517],
+Cell[CellGroupData[{
+Cell[4921, 149, 195, 6, 26, "ExampleSection",
+ CellID->320231764],
+Cell[CellGroupData[{
+Cell[5141, 159, 116, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[5260, 165, 507, 21, 40, "Output",
+ CellTags->"GA",
+ CellID->1181136955]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5804, 191, 217, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[6024, 201, 1799, 74, 40, "Output",
+ CellTags->"GA",
+ CellID->522903436]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7860, 280, 186, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[8049, 288, 267, 8, 51, "Output",
+ CellTags->"GA",
+ CellID->236332518]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8353, 301, 160, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[8516, 308, 1707, 72, 41, "Output",
+ CellTags->"GA",
+ CellID->1496950468]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10260, 385, 200, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[10463, 393, 352, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->260993590]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10852, 409, 224, 7, 27, "Input",
+ CellID->246195830],
+Cell[11079, 418, 2698, 112, 39, "Output",
+ CellID->216887395]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13814, 535, 259, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+Cell[14076, 546, 1456, 59, 40, "Output",
+ CellTags->"GA",
+ CellID->92770746]
+}, Open ]]
+}, Open ]],
+Cell[15559, 609, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15627, 614, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[15900, 628, 354, 14, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[16269, 645, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGAD.nb
new file mode 100644
index 000000000..40fdb3652
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGAD.nb
@@ -0,0 +1,811 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 20856, 801]
+NotebookOptionsPosition[ 15856, 632]
+NotebookOutlinePosition[ 19047, 728]
+CellTagsIndexPosition[ 18941, 722]
+WindowTitle->CGAD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GAD"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CGAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CGAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CGAD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$36132],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CGAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CGAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CGAD", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "i"]], "InlineFormula"],
+ " in D dimensions, where i is a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i,D-1],D] by FeynCalcInternal"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1776411527],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1771258362],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAD", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->897807242]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CGAD", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{108, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->542846314]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CGAD", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",", "D"}], "]"}]], "Output",
+ ImageSize->{317, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->965503574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{99, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->2098626269]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAD", "[", "i", "]"}], ".",
+ RowBox[{"CGAD", "[", "j", "]"}], ".",
+ RowBox[{"CGAD", "[", "k", "]"}], ".",
+ RowBox[{"CGAD", "[", "l", "]"}]}]], "Output",
+ ImageSize->{263, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->2090925108]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "]"}]], "Input",\
+
+ CellLabel->"In[6]:=",
+ CellID->246195830],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{261, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->10296282]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAD", "[", "i", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGAD", "[", "j", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[7]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{128, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[7]=",
+ CellID->1872250288]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GAD",
+ ButtonNote->"GAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CGAD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 11.735237}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CGAD[] can be used as input for \\[Gamma]^i in D dimensions, where i is \
+a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i,D-1],D] by FeynCalcInternal", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CGAD", "titlemodifier" -> "",
+ "windowtitle" -> "CGAD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CGAD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4518, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1776411527]},
+ "GA"->{
+ Cell[5152, 159, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[5272, 165, 477, 20, 40, "Output",
+ CellTags->"GA",
+ CellID->897807242],
+ Cell[5786, 190, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[6008, 200, 1671, 70, 40, "Output",
+ CellTags->"GA",
+ CellID->542846314],
+ Cell[7716, 275, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[7906, 283, 364, 12, 51, "Output",
+ CellTags->"GA",
+ CellID->965503574],
+ Cell[8307, 300, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[8471, 307, 1583, 68, 41, "Output",
+ CellTags->"GA",
+ CellID->2098626269],
+ Cell[10091, 380, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[10295, 388, 357, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->2090925108],
+ Cell[13495, 524, 262, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+ Cell[13760, 535, 1329, 55, 40, "Output",
+ CellTags->"GA",
+ CellID->1872250288]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 17790, 678},
+ {"GA", 17920, 682}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3065, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3644, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3928, 111, 565, 15, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4518, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1776411527],
+Cell[CellGroupData[{
+Cell[4931, 149, 196, 6, 26, "ExampleSection",
+ CellID->1771258362],
+Cell[CellGroupData[{
+Cell[5152, 159, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[5272, 165, 477, 20, 40, "Output",
+ CellTags->"GA",
+ CellID->897807242]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5786, 190, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[6008, 200, 1671, 70, 40, "Output",
+ CellTags->"GA",
+ CellID->542846314]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7716, 275, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[7906, 283, 364, 12, 51, "Output",
+ CellTags->"GA",
+ CellID->965503574]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8307, 300, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[8471, 307, 1583, 68, 41, "Output",
+ CellTags->"GA",
+ CellID->2098626269]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10091, 380, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[10295, 388, 357, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->2090925108]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10689, 404, 225, 7, 27, "Input",
+ CellID->246195830],
+Cell[10917, 413, 2541, 106, 39, "Output",
+ CellID->10296282]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13495, 524, 262, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+Cell[13760, 535, 1329, 55, 40, "Output",
+ CellTags->"GA",
+ CellID->1872250288]
+}, Open ]]
+}, Open ]],
+Cell[15116, 594, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15184, 599, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[15457, 613, 357, 14, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[15829, 630, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGAE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGAE.nb
new file mode 100644
index 000000000..fcd9d099c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGAE.nb
@@ -0,0 +1,610 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16187, 600]
+NotebookOptionsPosition[ 11752, 452]
+NotebookOutlinePosition[ 14723, 541]
+CellTagsIndexPosition[ 14617, 535]
+WindowTitle->CGAE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GAE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GAE"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CGAE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CGAE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CGAE.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$36579],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CGAE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CGAE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CGAE", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "i"]], "InlineFormula"],
+ " in D-4 dimensions, where i is a Cartesian index, and is transformed \
+into DiracGamma[CartesianIndex[i,D-4],D-4] by FeynCalcInternal"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->112009639],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->295644711],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAE", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->588840135]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CGAE", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{108, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->769200831]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CGAE", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{350, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1184963850]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{99, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->1830924781]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CGAE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAE", "[", "i", "]"}], ".",
+ RowBox[{"CGAE", "[", "j", "]"}], ".",
+ RowBox[{"CGAE", "[", "k", "]"}], ".",
+ RowBox[{"CGAE", "[", "l", "]"}]}]], "Output",
+ ImageSize->{263, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1039059380]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GAE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GAE",
+ ButtonNote->"GAE"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CGAE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 13.006323}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CGAE[i] can be used as input for \\[Gamma]^i in D-4 dimensions, where i \
+is a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i,D-4],D-4] by FeynCalcInternal", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CGAE", "titlemodifier" -> "",
+ "windowtitle" -> "CGAE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CGAE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4527, 130, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->112009639]},
+ "GA"->{
+ Cell[5159, 159, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[5279, 165, 506, 21, 40, "Output",
+ CellTags->"GA",
+ CellID->588840135],
+ Cell[5822, 191, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[6044, 201, 1799, 74, 40, "Output",
+ CellTags->"GA",
+ CellID->769200831],
+ Cell[7880, 280, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[8070, 288, 409, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->1184963850],
+ Cell[8516, 307, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[8680, 314, 1707, 72, 41, "Output",
+ CellTags->"GA",
+ CellID->1830924781],
+ Cell[10424, 391, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[10628, 399, 357, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->1039059380]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13635, 497},
+ {"GA", 13764, 501}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3065, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3644, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3928, 111, 574, 15, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4527, 130, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->112009639],
+Cell[CellGroupData[{
+Cell[4939, 149, 195, 6, 26, "ExampleSection",
+ CellID->295644711],
+Cell[CellGroupData[{
+Cell[5159, 159, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[5279, 165, 506, 21, 40, "Output",
+ CellTags->"GA",
+ CellID->588840135]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5822, 191, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[6044, 201, 1799, 74, 40, "Output",
+ CellTags->"GA",
+ CellID->769200831]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7880, 280, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[8070, 288, 409, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->1184963850]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8516, 307, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[8680, 314, 1707, 72, 41, "Output",
+ CellTags->"GA",
+ CellID->1830924781]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10424, 391, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[10628, 399, 357, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->1039059380]
+}, Open ]]
+}, Open ]],
+Cell[11012, 414, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11080, 419, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11353, 433, 357, 14, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11725, 450, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGS.nb
new file mode 100644
index 000000000..05f945c83
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGS.nb
@@ -0,0 +1,602 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16139, 592]
+NotebookOptionsPosition[ 11705, 444]
+NotebookOutlinePosition[ 14678, 533]
+CellTagsIndexPosition[ 14572, 527]
+WindowTitle->CGS
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GS\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GS"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CGS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CGS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CGS.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$38361],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CGS",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CGS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CGS", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is transformed into DiracGamma[CartesianMomentum[p]] \
+by FeynCalcInternal. CGS[p,q, ...] is equivalent to CGS[p].CGS[q]. ..."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1424978437],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1205738916],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGS", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{38, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->775616537]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Output",
+ ImageSize->{266, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->255576843]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{197, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->14098872]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], ".",
+ RowBox[{"CGS", "[", "q", "]"}], ".",
+ RowBox[{"CGS", "[", "r", "]"}], ".",
+ RowBox[{"CGS", "[", "s", "]"}]}]], "Output",
+ ImageSize->{229, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->636787894]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGS", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[5]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{183, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[5]=",
+ CellID->133254836]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GS",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CGS",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 17.789342}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CGS[p] is transformed into DiracGamma[CartesianMomentum[p]] by \
+FeynCalcInternal. CGS[p,q, ...] is equivalent to CGS[p].CGS[q]. ...",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CGS", "titlemodifier" ->
+ "", "windowtitle" -> "CGS", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CGS"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4399, 127, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1424978437]},
+ "GS"->{
+ Cell[5033, 156, 117, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[5153, 162, 546, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->775616537],
+ Cell[5736, 189, 182, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5921, 198, 270, 8, 51, "Output",
+ CellTags->"GS",
+ CellID->255576843],
+ Cell[6228, 211, 160, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[6391, 218, 2038, 80, 37, "Output",
+ CellTags->"GS",
+ CellID->14098872],
+ Cell[8466, 303, 198, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[8667, 312, 352, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->636787894],
+ Cell[9056, 328, 259, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+ Cell[9318, 339, 1623, 63, 37, "Output",
+ CellTags->"GS",
+ CellID->133254836]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13594, 489},
+ {"GS", 13724, 493}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3059, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3637, 98, 280, 11, 45, "ObjectNameGrid"],
+Cell[3920, 111, 454, 12, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4399, 127, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1424978437],
+Cell[CellGroupData[{
+Cell[4812, 146, 196, 6, 26, "ExampleSection",
+ CellID->1205738916],
+Cell[CellGroupData[{
+Cell[5033, 156, 117, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[5153, 162, 546, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->775616537]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5736, 189, 182, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5921, 198, 270, 8, 51, "Output",
+ CellTags->"GS",
+ CellID->255576843]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6228, 211, 160, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[6391, 218, 2038, 80, 37, "Output",
+ CellTags->"GS",
+ CellID->14098872]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8466, 303, 198, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[8667, 312, 352, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->636787894]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9056, 328, 259, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+Cell[9318, 339, 1623, 63, 37, "Output",
+ CellTags->"GS",
+ CellID->133254836]
+}, Open ]]
+}, Open ]],
+Cell[10968, 406, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11036, 411, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11309, 425, 354, 14, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11678, 442, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGSD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGSD.nb
new file mode 100644
index 000000000..c663c40c8
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGSD.nb
@@ -0,0 +1,591 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15777, 581]
+NotebookOptionsPosition[ 11323, 433]
+NotebookOutlinePosition[ 14314, 522]
+CellTagsIndexPosition[ 14208, 516]
+WindowTitle->CGSD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GSD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GSD"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CGSD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CGSD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CGSD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$37471],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CGSD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CGSD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CGSD", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is transformed into DiracGamma[CartesianMomentum[p, \
+D-1], D] by FeynCalcInternal. CGSD[p,q, ...] is equivalent to \
+CGSD[p].CGSD[q]. ..."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->835218270],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1638821032],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSD", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{36, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->1823526966]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",", "D"}], "]"}]], "Output",
+ ImageSize->{343, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->564219023]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{189, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->77165611]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], ".",
+ RowBox[{"CGSD", "[", "q", "]"}], ".",
+ RowBox[{"CGSD", "[", "r", "]"}], ".",
+ RowBox[{"CGSD", "[", "s", "]"}]}]], "Output",
+ ImageSize->{265, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1335862678]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSD", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGSD", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[5]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{177, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[5]=",
+ CellID->652311159]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GSD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GSD",
+ ButtonNote->"GSD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CGSD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 15.364233}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CGSD[p] is transformed into DiracGamma[CartesianMomentum[p, D-1], D] by \
+FeynCalcInternal. CGSD[p,q, ...] is equivalent to CGSD[p].CGSD[q]. ...",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CGSD", "titlemodifier" ->
+ "", "windowtitle" -> "CGSD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CGSD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4421, 128, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->835218270]},
+ "GS"->{
+ Cell[5054, 157, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[5175, 163, 488, 20, 37, "Output",
+ CellTags->"GS",
+ CellID->1823526966],
+ Cell[5700, 188, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5886, 197, 367, 12, 51, "Output",
+ CellTags->"GS",
+ CellID->564219023],
+ Cell[6290, 214, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[6454, 221, 1778, 72, 37, "Output",
+ CellTags->"GS",
+ CellID->77165611],
+ Cell[8269, 298, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[8471, 307, 357, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1335862678],
+ Cell[8865, 323, 262, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+ Cell[9130, 334, 1426, 57, 37, "Output",
+ CellTags->"GS",
+ CellID->652311159]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13228, 478},
+ {"GS", 13357, 482}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3065, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3644, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3928, 111, 468, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4421, 128, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->835218270],
+Cell[CellGroupData[{
+Cell[4833, 147, 196, 6, 26, "ExampleSection",
+ CellID->1638821032],
+Cell[CellGroupData[{
+Cell[5054, 157, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[5175, 163, 488, 20, 37, "Output",
+ CellTags->"GS",
+ CellID->1823526966]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5700, 188, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5886, 197, 367, 12, 51, "Output",
+ CellTags->"GS",
+ CellID->564219023]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6290, 214, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[6454, 221, 1778, 72, 37, "Output",
+ CellTags->"GS",
+ CellID->77165611]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8269, 298, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[8471, 307, 357, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1335862678]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8865, 323, 262, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+Cell[9130, 334, 1426, 57, 37, "Output",
+ CellTags->"GS",
+ CellID->652311159]
+}, Open ]]
+}, Open ]],
+Cell[10583, 395, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10651, 400, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10924, 414, 357, 14, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11296, 431, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGSE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGSE.nb
new file mode 100644
index 000000000..0840c1114
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CGSE.nb
@@ -0,0 +1,609 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16341, 599]
+NotebookOptionsPosition[ 11885, 451]
+NotebookOutlinePosition[ 14878, 540]
+CellTagsIndexPosition[ 14772, 534]
+WindowTitle->CGSE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GSE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GSE"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CGSE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CGSE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CGSE.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$37916],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CGSE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CGSE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CGSE", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is transformed into DiracGamma[CartesianMomentum[p, \
+D-4], D-4] by FeynCalcInternal. CGSE[p,q, ...] is equivalent to \
+CGSE[p].CGSE[q]. ..."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1573933885],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2095762105],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSE", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{36, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->6667452]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGSE", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{376, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1391062662]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{190, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->1872583708]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSE", "[", "p", "]"}], ".",
+ RowBox[{"CGSE", "[", "q", "]"}], ".",
+ RowBox[{"CGSE", "[", "r", "]"}], ".",
+ RowBox[{"CGSE", "[", "s", "]"}]}]], "Output",
+ ImageSize->{265, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1826053888]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSE", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGSE", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGSE", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[5]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{177, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[5]=",
+ CellID->17522737]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GSE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GSE",
+ ButtonNote->"GSE"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CGSE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 16.579226}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CGSE[p] is transformed into DiracGamma[CartesianMomentum[p, D-4], D-4] \
+by FeynCalcInternal. CGSE[p,q, ...] is equivalent to CGSE[p].CGSE[q]. ...",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CGSE", "titlemodifier" ->
+ "", "windowtitle" -> "CGSE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CGSE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4423, 128, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1573933885]},
+ "GS"->{
+ Cell[5057, 157, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[5178, 163, 544, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->6667452],
+ Cell[5759, 190, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5945, 199, 412, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->1391062662],
+ Cell[6394, 218, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[6558, 225, 2040, 80, 40, "Output",
+ CellTags->"GS",
+ CellID->1872583708],
+ Cell[8635, 310, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[8837, 319, 357, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1826053888],
+ Cell[9231, 335, 262, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+ Cell[9496, 346, 1622, 63, 40, "Output",
+ CellTags->"GS",
+ CellID->17522737]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13792, 496},
+ {"GS", 13922, 500}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3065, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3644, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3928, 111, 470, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4423, 128, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1573933885],
+Cell[CellGroupData[{
+Cell[4836, 147, 196, 6, 26, "ExampleSection",
+ CellID->2095762105],
+Cell[CellGroupData[{
+Cell[5057, 157, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[5178, 163, 544, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->6667452]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5759, 190, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5945, 199, 412, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->1391062662]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6394, 218, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[6558, 225, 2040, 80, 40, "Output",
+ CellTags->"GS",
+ CellID->1872583708]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8635, 310, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[8837, 319, 357, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1826053888]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9231, 335, 262, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+Cell[9496, 346, 1622, 63, 40, "Output",
+ CellTags->"GS",
+ CellID->17522737]
+}, Open ]]
+}, Open ]],
+Cell[11145, 413, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11213, 418, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11486, 432, 357, 14, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11858, 449, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CLC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CLC.nb
new file mode 100644
index 000000000..744b21153
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CLC.nb
@@ -0,0 +1,534 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14434, 524]
+NotebookOptionsPosition[ 10928, 417]
+NotebookOutlinePosition[ 13142, 475]
+CellTagsIndexPosition[ 13057, 470]
+WindowTitle->CLC
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LC"], "\<\"Eps\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CLC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CLC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CLC.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$41056],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CLC",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CLC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CLC", "[",
+ RowBox[{"m", ",", "n", ",", "r"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]evaluates to Eps[CartesianIndex[m], CartesianIndex[n], \
+CartesianIndex[r]] applying FeynCalcInternal. CLC[m,...][p, ...] evaluates to \
+Eps[CartesianIndex[m], ..., CartesianMomentum[p], ...] applying \
+FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1094429429],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->828567318],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1757486067],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{46, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->208315074]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}],
+ "\[IndentingNewLine]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1589908515],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "j", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "k", "]"}]}], "]"}]], "Output",
+ ImageSize->{488, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->316674061]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CLC", "[", "i", "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->361636248],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{54, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1081987388]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->404350264],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}], "]"}]], "Output",
+ ImageSize->{537, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1245969654]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}],
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "l", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->137597559],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["m",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["m",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{160, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1501883334]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["LC",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LC",
+ ButtonNote->"LC"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Eps",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CLC",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 25.508466}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CLC[m, n, r] evaluates to Eps[CartesianIndex[m], CartesianIndex[n], \
+CartesianIndex[r]] applying FeynCalcInternal. CLC[m,...][p, ...] evaluates to \
+Eps[CartesianIndex[m], ..., CartesianMomentum[p], ...] applying \
+FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "CLC",
+ "titlemodifier" -> "", "windowtitle" -> "CLC", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CLC"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4518, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1094429429]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12913, 463}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3045, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3623, 98, 280, 11, 45, "ObjectNameGrid"],
+Cell[3906, 111, 587, 15, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4518, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1094429429],
+Cell[CellGroupData[{
+Cell[4931, 149, 195, 6, 26, "ExampleSection",
+ CellID->828567318],
+Cell[CellGroupData[{
+Cell[5151, 159, 133, 4, 27, "Input",
+ CellID->1757486067],
+Cell[5287, 165, 699, 30, 39, "Output",
+ CellID->208315074]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6023, 200, 171, 6, 45, "Input",
+ CellID->1589908515],
+Cell[6197, 208, 361, 10, 51, "Output",
+ CellID->316674061]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6595, 223, 150, 5, 27, "Input",
+ CellID->361636248],
+Cell[6748, 230, 762, 32, 39, "Output",
+ CellID->1081987388]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7547, 267, 130, 4, 27, "Input",
+ CellID->404350264],
+Cell[7680, 273, 368, 10, 51, "Output",
+ CellID->1245969654]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8085, 288, 254, 8, 27, "Input",
+ CellID->137597559],
+Cell[8342, 298, 1843, 77, 39, "Output",
+ CellID->1501883334]
+}, Open ]]
+}, Open ]],
+Cell[10212, 379, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10280, 384, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10553, 398, 333, 14, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[10901, 415, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CLCD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CLCD.nb
new file mode 100644
index 000000000..2534b7672
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CLCD.nb
@@ -0,0 +1,504 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13799, 494]
+NotebookOptionsPosition[ 10265, 387]
+NotebookOutlinePosition[ 12508, 445]
+CellTagsIndexPosition[ 12423, 440]
+WindowTitle->CLCD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LCD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LCD"], "\<\"Eps\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CLCD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CLCD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CLCD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$40611],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CLCD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CLCD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CLCD", "[",
+ RowBox[{"m", ",", "n", ",", "r"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] evaluates to Eps[CartesianIndex[m, D-1], \
+CartesianIndex[n, D-1], CartesianIndex[r,D-1]] applying FeynCalcInternal. \
+CLC[m,...][p, ...] evaluates to Eps[CartesianIndex[m, D-1], ..., \
+CartesianMomentum[p, D-1], ...] applying FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1254837077],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1862584315],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1128293987],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{45, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1338362699]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2002117803],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"k", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{421, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->297611011]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "[", "p", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1171293590],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{45, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->315491501]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1182317939],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{445, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1130462414]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "[", "p", "]"}],
+ RowBox[{
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "[", "q", "]"}]}], "//", "Contract"}], "//",
+ "Factor2"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->260548459],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{162, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->235673394]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["LCD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LCD",
+ ButtonNote->"LCD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Eps",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CLCD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 24.301511}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CLCD[m, n, r] evaluates to Eps[CartesianIndex[m, D-1], CartesianIndex[n, \
+D-1], CartesianIndex[r,D-1]] applying FeynCalcInternal. CLC[m,...][p, ...] \
+evaluates to Eps[CartesianIndex[m, D-1], ..., CartesianMomentum[p, D-1], ...] \
+applying FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CLCD", "titlemodifier" -> "", "windowtitle" -> "CLCD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CLCD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4552, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1254837077]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12279, 433}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3051, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3630, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3914, 111, 613, 15, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4552, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1254837077],
+Cell[CellGroupData[{
+Cell[4965, 149, 196, 6, 26, "ExampleSection",
+ CellID->1862584315],
+Cell[CellGroupData[{
+Cell[5186, 159, 134, 4, 27, "Input",
+ CellID->1128293987],
+Cell[5323, 165, 699, 30, 39, "Output",
+ CellID->1338362699]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6059, 200, 131, 4, 27, "Input",
+ CellID->2002117803],
+Cell[6193, 206, 580, 19, 69, "Output",
+ CellID->297611011]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6810, 230, 153, 5, 27, "Input",
+ CellID->1171293590],
+Cell[6966, 237, 698, 30, 38, "Output",
+ CellID->315491501]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7701, 272, 131, 4, 27, "Input",
+ CellID->1182317939],
+Cell[7835, 278, 584, 19, 69, "Output",
+ CellID->1130462414]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8456, 302, 334, 12, 27, "Input",
+ CellID->260548459],
+Cell[8793, 316, 726, 29, 37, "Output",
+ CellID->235673394]
+}, Open ]]
+}, Open ]],
+Cell[9546, 349, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9614, 354, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9887, 368, 336, 14, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[10238, 385, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSI.nb
new file mode 100644
index 000000000..cfbeac546
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSI.nb
@@ -0,0 +1,597 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15795, 587]
+NotebookOptionsPosition[ 11372, 439]
+NotebookOutlinePosition[ 14331, 528]
+CellTagsIndexPosition[ 14225, 522]
+WindowTitle->CSI
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$50503],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSI", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for 3-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "i"]], "InlineFormula"],
+ " with 3-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1808755305],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1682874436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSI", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->298525666]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSI", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{116, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->345041319]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CSI", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Output",
+ ImageSize->{240, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1902433105]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{107, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->1347248762]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSI", "[", "i", "]"}], ".",
+ RowBox[{"CSI", "[", "j", "]"}], ".",
+ RowBox[{"CSI", "[", "k", "]"}], ".",
+ RowBox[{"CSI", "[", "l", "]"}]}]], "Output",
+ ImageSize->{227, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1708148611]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CSI",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 51.128169}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSI[i] can be used as input for 3-dimensional \\[Sigma]^i with \
+3-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i]] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CSI", "titlemodifier" -> "", "windowtitle" ->
+ "CSI", "type" -> "Symbol", "uri" -> "FeynCalc/ref/CSI"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4439, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1808755305]},
+ "GA"->{
+ Cell[5073, 158, 116, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[5192, 164, 506, 21, 38, "Output",
+ CellTags->"GA",
+ CellID->298525666],
+ Cell[5735, 190, 217, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[5955, 200, 1799, 74, 38, "Output",
+ CellTags->"GA",
+ CellID->345041319],
+ Cell[7791, 279, 186, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[7980, 287, 268, 8, 51, "Output",
+ CellTags->"GA",
+ CellID->1902433105],
+ Cell[8285, 300, 160, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[8448, 307, 1708, 72, 39, "Output",
+ CellTags->"GA",
+ CellID->1347248762],
+ Cell[10193, 384, 200, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[10396, 392, 353, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->1708148611]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13243, 484},
+ {"GA", 13373, 488}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2985, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3563, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[3846, 110, 568, 15, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4439, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1808755305],
+Cell[CellGroupData[{
+Cell[4852, 148, 196, 6, 26, "ExampleSection",
+ CellID->1682874436],
+Cell[CellGroupData[{
+Cell[5073, 158, 116, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[5192, 164, 506, 21, 38, "Output",
+ CellTags->"GA",
+ CellID->298525666]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5735, 190, 217, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[5955, 200, 1799, 74, 38, "Output",
+ CellTags->"GA",
+ CellID->345041319]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7791, 279, 186, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[7980, 287, 268, 8, 51, "Output",
+ CellTags->"GA",
+ CellID->1902433105]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8285, 300, 160, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[8448, 307, 1708, 72, 39, "Output",
+ CellTags->"GA",
+ CellID->1347248762]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10193, 384, 200, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[10396, 392, 353, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->1708148611]
+}, Open ]]
+}, Open ]],
+Cell[10776, 407, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10844, 412, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11117, 426, 213, 8, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11345, 437, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSID.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSID.nb
new file mode 100644
index 000000000..f593bb5d5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSID.nb
@@ -0,0 +1,595 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15757, 585]
+NotebookOptionsPosition[ 11259, 436]
+NotebookOutlinePosition[ 14294, 526]
+CellTagsIndexPosition[ 14188, 520]
+WindowTitle->CSID
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSID\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSID"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSID.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$49617],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSID",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSID", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSID", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "i"]], "InlineFormula"],
+ " with D-1-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i,D-1],D-1] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1963320274],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->971740313],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->1337342997]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSID", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{116, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->453413292]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CSID", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{348, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->422929861]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{107, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->1187800949]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSID", "[", "i", "]"}], ".",
+ RowBox[{"CSID", "[", "j", "]"}], ".",
+ RowBox[{"CSID", "[", "k", "]"}], ".",
+ RowBox[{"CSID", "[", "l", "]"}]}]], "Output",
+ ImageSize->{263, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->874098158]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"CSID",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 48.805687}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSID[i] can be used as input for D-1-dimensional \\[Sigma]^i with \
+D-1-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i,D-1],D-1] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CSID", "titlemodifier" -> "",
+ "windowtitle" -> "CSID", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSID"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4458, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1963320274]},
+ "GA"->{
+ Cell[5091, 158, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[5211, 164, 478, 20, 38, "Output",
+ CellTags->"GA",
+ CellID->1337342997],
+ Cell[5726, 189, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[5948, 199, 1671, 70, 38, "Output",
+ CellTags->"GA",
+ CellID->453413292],
+ Cell[7656, 274, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[7846, 282, 408, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->422929861],
+ Cell[8291, 301, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[8455, 308, 1584, 68, 39, "Output",
+ CellTags->"GA",
+ CellID->1187800949],
+ Cell[10076, 381, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[10280, 389, 356, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->874098158]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13206, 482},
+ {"GA", 13336, 486}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2989, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3568, 97, 281, 11, 45, "ObjectNameGrid"],
+Cell[3852, 110, 581, 15, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4458, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1963320274],
+Cell[CellGroupData[{
+Cell[4871, 148, 195, 6, 26, "ExampleSection",
+ CellID->971740313],
+Cell[CellGroupData[{
+Cell[5091, 158, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[5211, 164, 478, 20, 38, "Output",
+ CellTags->"GA",
+ CellID->1337342997]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5726, 189, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[5948, 199, 1671, 70, 38, "Output",
+ CellTags->"GA",
+ CellID->453413292]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7656, 274, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[7846, 282, 408, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->422929861]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8291, 301, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[8455, 308, 1584, 68, 39, "Output",
+ CellTags->"GA",
+ CellID->1187800949]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10076, 381, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[10280, 389, 356, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->874098158]
+}, Open ]]
+}, Open ]],
+Cell[10663, 404, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10731, 409, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11004, 423, 213, 8, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11232, 434, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSIE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSIE.nb
new file mode 100644
index 000000000..d4481fb11
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSIE.nb
@@ -0,0 +1,604 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16036, 594]
+NotebookOptionsPosition[ 11540, 445]
+NotebookOutlinePosition[ 14573, 535]
+CellTagsIndexPosition[ 14467, 529]
+WindowTitle->CSIE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSIE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSIE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSIE.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$50060],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSIE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSIE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSIE", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-4-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "i"]], "InlineFormula"],
+ " with D-4-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i,D-4],D-4] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1287863259],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->436570979],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIE", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->1813105389]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSIE", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{116, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->539719871]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CSIE", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{350, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1097057211]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{107, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->714050867]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CSIE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIE", "[", "i", "]"}], ".",
+ RowBox[{"CSIE", "[", "j", "]"}], ".",
+ RowBox[{"CSIE", "[", "k", "]"}], ".",
+ RowBox[{"CSIE", "[", "l", "]"}]}]], "Output",
+ ImageSize->{263, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->148881480]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"CSIE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 49.901202}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSIE[i] can be used as input for D-4-dimensional \\[Sigma]^i with \
+D-4-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i,D-4],D-4] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CSIE", "titlemodifier" -> "",
+ "windowtitle" -> "CSIE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSIE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4458, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1287863259]},
+ "GA"->{
+ Cell[5091, 158, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[5211, 164, 507, 21, 38, "Output",
+ CellTags->"GA",
+ CellID->1813105389],
+ Cell[5755, 190, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[5977, 200, 1799, 74, 38, "Output",
+ CellTags->"GA",
+ CellID->539719871],
+ Cell[7813, 279, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[8003, 287, 409, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->1097057211],
+ Cell[8449, 306, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[8613, 313, 1707, 72, 39, "Output",
+ CellTags->"GA",
+ CellID->714050867],
+ Cell[10357, 390, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[10561, 398, 356, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->148881480]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13485, 491},
+ {"GA", 13615, 495}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2989, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3568, 97, 281, 11, 45, "ObjectNameGrid"],
+Cell[3852, 110, 581, 15, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4458, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1287863259],
+Cell[CellGroupData[{
+Cell[4871, 148, 195, 6, 26, "ExampleSection",
+ CellID->436570979],
+Cell[CellGroupData[{
+Cell[5091, 158, 117, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[5211, 164, 507, 21, 38, "Output",
+ CellTags->"GA",
+ CellID->1813105389]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5755, 190, 219, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[5977, 200, 1799, 74, 38, "Output",
+ CellTags->"GA",
+ CellID->539719871]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7813, 279, 187, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[8003, 287, 409, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->1097057211]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8449, 306, 161, 5, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[8613, 313, 1707, 72, 39, "Output",
+ CellTags->"GA",
+ CellID->714050867]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10357, 390, 201, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[10561, 398, 356, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->148881480]
+}, Open ]]
+}, Open ]],
+Cell[10944, 413, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11012, 418, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11285, 432, 213, 8, 70, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[11513, 443, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSIS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSIS.nb
new file mode 100644
index 000000000..0d67eb41e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSIS.nb
@@ -0,0 +1,508 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13884, 498]
+NotebookOptionsPosition[ 9753, 363]
+NotebookOutlinePosition[ 12614, 447]
+CellTagsIndexPosition[ 12508, 441]
+WindowTitle->CSIS
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSIS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSIS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSIS.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$51830],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSIS",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSIS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSIS", "[", "p", "]"}]], "InlineFormula"],
+ "\[LineSeparator]can be used as input for 3-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "i"],
+ SuperscriptBox["p", "i"]}]], "InlineFormula"],
+ " with 3-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->795695155],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1391789614],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIS", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{40, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->549775037]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Output",
+ ImageSize->{266, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->310280825]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{205, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->1625280260]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], ".",
+ RowBox[{"CSIS", "[", "q", "]"}], ".",
+ RowBox[{"CSIS", "[", "r", "]"}], ".",
+ RowBox[{"CSIS", "[", "s", "]"}]}]], "Output",
+ ImageSize->{261, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->781933207]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"CSIS",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 54.741379}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSIS[p] can be used as input for 3-dimensional \\[Sigma]^i p^i with \
+3-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p]] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CSIS", "titlemodifier" -> "",
+ "windowtitle" -> "CSIS", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSIS"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4501, 131, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->795695155]},
+ "GS"->{
+ Cell[5134, 160, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[5255, 166, 546, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->549775037],
+ Cell[5838, 193, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[6024, 202, 270, 8, 51, "Output",
+ CellTags->"GS",
+ CellID->310280825],
+ Cell[6331, 215, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[6495, 222, 2040, 80, 37, "Output",
+ CellTags->"GS",
+ CellID->1625280260],
+ Cell[8572, 307, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[8774, 316, 356, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->781933207]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11695, 409},
+ {"GS", 11824, 413}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2989, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3568, 97, 281, 11, 45, "ObjectNameGrid"],
+Cell[3852, 110, 624, 17, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4501, 131, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->795695155],
+Cell[CellGroupData[{
+Cell[4913, 150, 196, 6, 26, "ExampleSection",
+ CellID->1391789614],
+Cell[CellGroupData[{
+Cell[5134, 160, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[5255, 166, 546, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->549775037]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5838, 193, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[6024, 202, 270, 8, 51, "Output",
+ CellTags->"GS",
+ CellID->310280825]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6331, 215, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[6495, 222, 2040, 80, 37, "Output",
+ CellTags->"GS",
+ CellID->1625280260]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8572, 307, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[8774, 316, 356, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->781933207]
+}, Open ]]
+}, Open ]],
+Cell[9157, 331, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9225, 336, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9498, 350, 213, 8, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9726, 361, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSISD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSISD.nb
new file mode 100644
index 000000000..6ec4adf78
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSISD.nb
@@ -0,0 +1,504 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13758, 494]
+NotebookOptionsPosition[ 9605, 359]
+NotebookOutlinePosition[ 12485, 443]
+CellTagsIndexPosition[ 12379, 437]
+WindowTitle->CSISD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSISD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSISD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSISD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$50946],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSISD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSISD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSISD", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "i"],
+ SuperscriptBox["p", "i"]}]], "InlineFormula"],
+ " with D-1-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p,D-1],D-1] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->115560600],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1067147800],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISD", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{38, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->1910177905]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSISD", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{374, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->839082628]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{197, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->2078178866]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISD", "[", "p", "]"}], ".",
+ RowBox[{"CSISD", "[", "q", "]"}], ".",
+ RowBox[{"CSISD", "[", "r", "]"}], ".",
+ RowBox[{"CSISD", "[", "s", "]"}]}]], "Output",
+ ImageSize->{297, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->2005860779]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"CSISD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 52.370777}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSISD[p] can be used as input for D-1-dimensional \\[Sigma]^i p^i with \
+D-1-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p,D-1],D-1] by FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CSISD", "titlemodifier" ->
+ "", "windowtitle" -> "CSISD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSISD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4521, 131, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->115560600]},
+ "GS"->{
+ Cell[5154, 160, 119, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[5276, 166, 488, 20, 37, "Output",
+ CellTags->"GS",
+ CellID->1910177905],
+ Cell[5801, 191, 184, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5988, 200, 411, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->839082628],
+ Cell[6436, 219, 162, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[6601, 226, 1780, 72, 37, "Output",
+ CellTags->"GS",
+ CellID->2078178866],
+ Cell[8418, 303, 200, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[8621, 312, 361, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->2005860779]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11563, 405},
+ {"GS", 11692, 409}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2993, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3573, 97, 282, 11, 45, "ObjectNameGrid"],
+Cell[3858, 110, 638, 17, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4521, 131, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->115560600],
+Cell[CellGroupData[{
+Cell[4933, 150, 196, 6, 26, "ExampleSection",
+ CellID->1067147800],
+Cell[CellGroupData[{
+Cell[5154, 160, 119, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[5276, 166, 488, 20, 37, "Output",
+ CellTags->"GS",
+ CellID->1910177905]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5801, 191, 184, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5988, 200, 411, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->839082628]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6436, 219, 162, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[6601, 226, 1780, 72, 37, "Output",
+ CellTags->"GS",
+ CellID->2078178866]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8418, 303, 200, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[8621, 312, 361, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->2005860779]
+}, Open ]]
+}, Open ]],
+Cell[9009, 327, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9077, 332, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9350, 346, 213, 8, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9578, 357, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSISE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSISE.nb
new file mode 100644
index 000000000..7b53e0e38
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSISE.nb
@@ -0,0 +1,514 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14080, 504]
+NotebookOptionsPosition[ 9924, 369]
+NotebookOutlinePosition[ 12807, 453]
+CellTagsIndexPosition[ 12701, 447]
+WindowTitle->CSISE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSISE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSISE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSISE.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$51388],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSISE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSISE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSISE", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-4-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "i"],
+ SuperscriptBox["p", "i"]}]], "InlineFormula"],
+ " with D-4-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p,D-4],D-4] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1925471391],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->541924597],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISE", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{38, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->426328145]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSISE", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{376, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->2088369030]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{198, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->1418190781]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISE", "[", "p", "]"}], ".",
+ RowBox[{"CSISE", "[", "q", "]"}], ".",
+ RowBox[{"CSISE", "[", "r", "]"}], ".",
+ RowBox[{"CSISE", "[", "s", "]"}]}]], "Output",
+ ImageSize->{297, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1996481055]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CSISE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 53.503363}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSISE[p] can be used as input for D-4-dimensional \\[Sigma]^i p^i with \
+D-4-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p,D-4],D-4] by FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CSISE", "titlemodifier" ->
+ "", "windowtitle" -> "CSISE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSISE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4521, 131, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1925471391]},
+ "GS"->{
+ Cell[5154, 160, 119, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[5276, 166, 546, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->426328145],
+ Cell[5859, 193, 184, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[6046, 202, 412, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->2088369030],
+ Cell[6495, 221, 162, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[6660, 228, 2040, 80, 40, "Output",
+ CellTags->"GS",
+ CellID->1418190781],
+ Cell[8737, 313, 200, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[8940, 322, 361, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1996481055]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11884, 415},
+ {"GS", 12014, 419}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2993, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3573, 97, 282, 11, 45, "ObjectNameGrid"],
+Cell[3858, 110, 638, 17, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4521, 131, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1925471391],
+Cell[CellGroupData[{
+Cell[4934, 150, 195, 6, 26, "ExampleSection",
+ CellID->541924597],
+Cell[CellGroupData[{
+Cell[5154, 160, 119, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[5276, 166, 546, 22, 37, "Output",
+ CellTags->"GS",
+ CellID->426328145]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5859, 193, 184, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[6046, 202, 412, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->2088369030]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6495, 221, 162, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[6660, 228, 2040, 80, 40, "Output",
+ CellTags->"GS",
+ CellID->1418190781]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8737, 313, 200, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[8940, 322, 361, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1996481055]
+}, Open ]]
+}, Open ]],
+Cell[9328, 337, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9396, 342, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9669, 356, 213, 8, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9897, 367, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSP.nb
new file mode 100644
index 000000000..dd40cbe06
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSP.nb
@@ -0,0 +1,710 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18643, 700]
+NotebookOptionsPosition[ 13420, 523]
+NotebookOutlinePosition[ 16801, 625]
+CellTagsIndexPosition[ 16695, 619]
+WindowTitle->CSP
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SP\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SP"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"CartesianScalarProduct\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CartesianScalarProduct"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSP.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$53174],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the 3-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p],CartesianMomentum[q]] by \
+FeynCalcInternal. CSP[p] is the same as CSP[p,p] (",
+ Cell[BoxData[
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}]], "InlineFormula"],
+ ")."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1594008258],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->677102301],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CSP", "[", "q", "]"}]}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[1]:=",
+ CellID->1327327216],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{84, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[1]=",
+ CellID->1848840574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[2]:=",
+ CellID->903181536],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{155, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[2]=",
+ CellID->328532068]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CSP", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[3]:=",
+ CellID->1760867040],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{146, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[3]=",
+ CellID->1003652030]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CSP", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[4]:=",
+ CellID->1518821322],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{158, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[4]=",
+ CellID->353053941]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[5]:=",
+ CellID->1767436480],
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{79, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->2133672679]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[6]:=",
+ CellID->736982087],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "a", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "b", "]"}]}], "]"}]], "Output",
+ ImageSize->{467, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->765609064]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[7]:=",
+ CellID->355867518],
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{79, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SP",
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->1556911516]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SP",
+ ButtonNote->"SP"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CartesianScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianScalarProduct",
+ ButtonNote->"CartesianScalarProduct"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CSP",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 58.645468}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSP[p, q] is the 3-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p],CartesianMomentum[q]] by \
+FeynCalcInternal. CSP[p] is the same as CSP[p,p] (= p^2).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CSP", "titlemodifier" -> "", "windowtitle" ->
+ "CSP", "type" -> "Symbol", "uri" -> "FeynCalc/ref/CSP"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4720, 135, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1594008258]},
+ "SP"->{
+ Cell[5353, 164, 204, 7, 27, "Input",
+ CellTags->"SP",
+ CellID->1327327216],
+ Cell[5560, 173, 952, 40, 39, "Output",
+ CellTags->"SP",
+ CellID->1848840574],
+ Cell[6549, 218, 207, 8, 27, "Input",
+ CellTags->"SP",
+ CellID->903181536],
+ Cell[6759, 228, 1273, 53, 37, "Output",
+ CellTags->"SP",
+ CellID->328532068],
+ Cell[8069, 286, 253, 9, 27, "Input",
+ CellTags->"SP",
+ CellID->1760867040],
+ Cell[8325, 297, 1138, 47, 39, "Output",
+ CellTags->"SP",
+ CellID->1003652030],
+ Cell[9500, 349, 187, 6, 27, "Input",
+ CellTags->"SP",
+ CellID->1518821322],
+ Cell[9690, 357, 1193, 48, 39, "Output",
+ CellTags->"SP",
+ CellID->353053941],
+ Cell[10920, 410, 176, 6, 27, "Input",
+ CellTags->"SP",
+ CellID->1767436480],
+ Cell[11099, 418, 242, 8, 51, "Output",
+ CellTags->"SP",
+ CellID->2133672679],
+ Cell[11378, 431, 206, 8, 27, "Input",
+ CellTags->"SP",
+ CellID->736982087],
+ Cell[11587, 441, 342, 10, 51, "Output",
+ CellTags->"SP",
+ CellID->765609064],
+ Cell[11966, 456, 235, 9, 27, "Input",
+ CellTags->"SP",
+ CellID->355867518],
+ Cell[12204, 467, 242, 8, 51, "Output",
+ CellTags->"SP",
+ CellID->1556911516]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15378, 569},
+ {"SP", 15508, 573}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3187, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3765, 100, 280, 11, 45, "ObjectNameGrid"],
+Cell[4048, 113, 647, 18, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4720, 135, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1594008258],
+Cell[CellGroupData[{
+Cell[5133, 154, 195, 6, 26, "ExampleSection",
+ CellID->677102301],
+Cell[CellGroupData[{
+Cell[5353, 164, 204, 7, 27, "Input",
+ CellTags->"SP",
+ CellID->1327327216],
+Cell[5560, 173, 952, 40, 39, "Output",
+ CellTags->"SP",
+ CellID->1848840574]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6549, 218, 207, 8, 27, "Input",
+ CellTags->"SP",
+ CellID->903181536],
+Cell[6759, 228, 1273, 53, 37, "Output",
+ CellTags->"SP",
+ CellID->328532068]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8069, 286, 253, 9, 27, "Input",
+ CellTags->"SP",
+ CellID->1760867040],
+Cell[8325, 297, 1138, 47, 39, "Output",
+ CellTags->"SP",
+ CellID->1003652030]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9500, 349, 187, 6, 27, "Input",
+ CellTags->"SP",
+ CellID->1518821322],
+Cell[9690, 357, 1193, 48, 39, "Output",
+ CellTags->"SP",
+ CellID->353053941]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10920, 410, 176, 6, 27, "Input",
+ CellTags->"SP",
+ CellID->1767436480],
+Cell[11099, 418, 242, 8, 51, "Output",
+ CellTags->"SP",
+ CellID->2133672679]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11378, 431, 206, 8, 27, "Input",
+ CellTags->"SP",
+ CellID->736982087],
+Cell[11587, 441, 342, 10, 51, "Output",
+ CellTags->"SP",
+ CellID->765609064]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11966, 456, 235, 9, 27, "Input",
+ CellTags->"SP",
+ CellID->355867518],
+Cell[12204, 467, 242, 8, 51, "Output",
+ CellTags->"SP",
+ CellID->1556911516]
+}, Open ]]
+}, Open ]],
+Cell[12473, 479, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12541, 484, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[12814, 498, 564, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[13393, 521, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSPD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSPD.nb
new file mode 100644
index 000000000..183198eda
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSPD.nb
@@ -0,0 +1,741 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19332, 731]
+NotebookOptionsPosition[ 13705, 540]
+NotebookOutlinePosition[ 17289, 648]
+CellTagsIndexPosition[ 17182, 642]
+WindowTitle->CSPD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SPD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SPD"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"CartesianScalarProduct\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CartesianScalarProduct"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSPD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSPD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSPD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$52274],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSPD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSPD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the D-1-dimensional scalar product of p with q and \
+is transformed into CartesianPair[CartesianMomentum[p, \
+D-1],CartesianMomentum[q, D-1]] by FeynCalcInternal. CSPD[p] is the same as \
+CSPD[p,p] (",
+ Cell[BoxData[
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}]], "InlineFormula"],
+ ")."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1691364808],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->249504263],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CSPD", "[", "q", "]"}]}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[1]:=",
+ CellID->1779475118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{78, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[1]=",
+ CellID->410944412]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[2]:=",
+ CellID->437622958],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "-",
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}], "+",
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{147, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[2]=",
+ CellID->1423636699]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CSPD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[3]:=",
+ CellID->1031117972],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{138, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[3]=",
+ CellID->415380754]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[4]:=",
+ CellID->87993462],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{150, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[4]=",
+ CellID->1057353478]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[5]:=",
+ CellID->2034315321],
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{87, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1921630357]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[6]:=",
+ CellID->1917897688],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"a", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{575, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->739932073]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[7]:=",
+ CellID->980827421],
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{87, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->942208087]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], ",", " ", "D"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[8]:=",
+ CellID->1873446419],
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Output",
+ ImageSize->{87, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPD",
+ CellLabel->"Out[8]//StandardForm=",
+ CellID->25387914]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SPD",
+ ButtonNote->"SPD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CartesianScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianScalarProduct",
+ ButtonNote->"CartesianScalarProduct"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CSPD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 56.066281}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSPD[p, q] is the D-1-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p, D-1],CartesianMomentum[q, \
+D-1]] by FeynCalcInternal. CSPD[p] is the same as CSPD[p,p] (= p^2).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CSPD", "titlemodifier" ->
+ "", "windowtitle" -> "CSPD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSPD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4745, 136, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1691364808]},
+ "SPD"->{
+ Cell[5378, 165, 207, 7, 27, "Input",
+ CellTags->"SPD",
+ CellID->1779475118],
+ Cell[5588, 174, 856, 37, 39, "Output",
+ CellTags->"SPD",
+ CellID->410944412],
+ Cell[6481, 216, 209, 8, 27, "Input",
+ CellTags->"SPD",
+ CellID->437622958],
+ Cell[6693, 226, 1146, 49, 37, "Output",
+ CellTags->"SPD",
+ CellID->1423636699],
+ Cell[7876, 280, 255, 9, 27, "Input",
+ CellTags->"SPD",
+ CellID->1031117972],
+ Cell[8134, 291, 1011, 43, 39, "Output",
+ CellTags->"SPD",
+ CellID->415380754],
+ Cell[9182, 339, 187, 6, 27, "Input",
+ CellTags->"SPD",
+ CellID->87993462],
+ Cell[9372, 347, 1065, 44, 39, "Output",
+ CellTags->"SPD",
+ CellID->1057353478],
+ Cell[10474, 396, 178, 6, 27, "Input",
+ CellTags->"SPD",
+ CellID->2034315321],
+ Cell[10655, 404, 244, 8, 51, "Output",
+ CellTags->"SPD",
+ CellID->1921630357],
+ Cell[10936, 417, 209, 8, 27, "Input",
+ CellTags->"SPD",
+ CellID->1917897688],
+ Cell[11148, 427, 489, 16, 51, "Output",
+ CellTags->"SPD",
+ CellID->739932073],
+ Cell[11674, 448, 237, 9, 27, "Input",
+ CellTags->"SPD",
+ CellID->980827421],
+ Cell[11914, 459, 243, 8, 51, "Output",
+ CellTags->"SPD",
+ CellID->942208087],
+ Cell[12194, 472, 289, 10, 27, "Input",
+ CellTags->"SPD",
+ CellID->1873446419],
+ Cell[12486, 484, 242, 8, 51, "Output",
+ CellTags->"SPD",
+ CellID->25387914]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15684, 586},
+ {"SPD", 15815, 590}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3193, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3772, 100, 281, 11, 45, "ObjectNameGrid"],
+Cell[4056, 113, 664, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4745, 136, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1691364808],
+Cell[CellGroupData[{
+Cell[5158, 155, 195, 6, 26, "ExampleSection",
+ CellID->249504263],
+Cell[CellGroupData[{
+Cell[5378, 165, 207, 7, 27, "Input",
+ CellTags->"SPD",
+ CellID->1779475118],
+Cell[5588, 174, 856, 37, 39, "Output",
+ CellTags->"SPD",
+ CellID->410944412]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6481, 216, 209, 8, 27, "Input",
+ CellTags->"SPD",
+ CellID->437622958],
+Cell[6693, 226, 1146, 49, 37, "Output",
+ CellTags->"SPD",
+ CellID->1423636699]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7876, 280, 255, 9, 27, "Input",
+ CellTags->"SPD",
+ CellID->1031117972],
+Cell[8134, 291, 1011, 43, 39, "Output",
+ CellTags->"SPD",
+ CellID->415380754]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9182, 339, 187, 6, 27, "Input",
+ CellTags->"SPD",
+ CellID->87993462],
+Cell[9372, 347, 1065, 44, 39, "Output",
+ CellTags->"SPD",
+ CellID->1057353478]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10474, 396, 178, 6, 27, "Input",
+ CellTags->"SPD",
+ CellID->2034315321],
+Cell[10655, 404, 244, 8, 51, "Output",
+ CellTags->"SPD",
+ CellID->1921630357]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10936, 417, 209, 8, 27, "Input",
+ CellTags->"SPD",
+ CellID->1917897688],
+Cell[11148, 427, 489, 16, 51, "Output",
+ CellTags->"SPD",
+ CellID->739932073]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11674, 448, 237, 9, 27, "Input",
+ CellTags->"SPD",
+ CellID->980827421],
+Cell[11914, 459, 243, 8, 51, "Output",
+ CellTags->"SPD",
+ CellID->942208087]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12194, 472, 289, 10, 27, "Input",
+ CellTags->"SPD",
+ CellID->1873446419],
+Cell[12486, 484, 242, 8, 51, "Output",
+ CellTags->"SPD",
+ CellID->25387914]
+}, Open ]]
+}, Open ]],
+Cell[12755, 496, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12823, 501, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[13096, 515, 567, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[13678, 538, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSPE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSPE.nb
new file mode 100644
index 000000000..252ed28f9
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CSPE.nb
@@ -0,0 +1,757 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19846, 747]
+NotebookOptionsPosition[ 14215, 556]
+NotebookOutlinePosition[ 17801, 664]
+CellTagsIndexPosition[ 17694, 658]
+WindowTitle->CSPE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SPE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SPE"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"CartesianScalarProduct\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CartesianScalarProduct"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CSPE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CSPE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CSPE.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$52724],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CSPE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CSPE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the D-4-dimensional scalar product of p with q and \
+is transformed into CartesianPair[CartesianMomentum[p, \
+D-4],CartesianMomentum[q, D-4]] by FeynCalcInternal. CSPE[p] is the same as \
+CSPE[p,p] ( ",
+ Cell[BoxData[
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}]], "InlineFormula"],
+ ")."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->249536683],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->244679970],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CSPE", "[", "q", "]"}]}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[1]:=",
+ CellID->1779475118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{78, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[1]=",
+ CellID->1516094616]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[2]:=",
+ CellID->437622958],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{147, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[2]=",
+ CellID->1038841311]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CSPE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[3]:=",
+ CellID->1031117972],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{138, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[3]=",
+ CellID->1270490467]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[4]:=",
+ CellID->87993462],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{150, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[4]=",
+ CellID->2053769726]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[5]:=",
+ CellID->2034315321],
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{87, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->49409289]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[6]:=",
+ CellID->1917897688],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"a", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{577, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->1531168216]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[7]:=",
+ CellID->980827421],
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{87, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->919943670]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], ",", " ",
+ RowBox[{"D", "-", "4"}]}], "]"}], "]"}], "//", "StandardForm"}]], "Input",\
+
+ CellTags->"SPE",
+ CellLabel->"In[8]:=",
+ CellID->1873446419],
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Output",
+ ImageSize->{87, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[8]//StandardForm=",
+ CellID->1753753047]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SPE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SPE",
+ ButtonNote->"SPE"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CartesianScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianScalarProduct",
+ ButtonNote->"CartesianScalarProduct"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CSPE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 57.348612}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CSPE[p, q] is the D-4-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p, D-4],CartesianMomentum[q, \
+D-4]] by FeynCalcInternal. CSPE[p] is the same as CSPE[p,p] ( = p^2).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CSPE", "titlemodifier" ->
+ "", "windowtitle" -> "CSPE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CSPE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4746, 136, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->249536683]},
+ "SPE"->{
+ Cell[5378, 165, 207, 7, 27, "Input",
+ CellTags->"SPE",
+ CellID->1779475118],
+ Cell[5588, 174, 953, 40, 39, "Output",
+ CellTags->"SPE",
+ CellID->1516094616],
+ Cell[6578, 219, 209, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->437622958],
+ Cell[6790, 229, 1275, 53, 37, "Output",
+ CellTags->"SPE",
+ CellID->1038841311],
+ Cell[8102, 287, 255, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->1031117972],
+ Cell[8360, 298, 1139, 47, 39, "Output",
+ CellTags->"SPE",
+ CellID->1270490467],
+ Cell[9536, 350, 187, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->87993462],
+ Cell[9726, 358, 1195, 48, 42, "Output",
+ CellTags->"SPE",
+ CellID->2053769726],
+ Cell[10958, 411, 178, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->2034315321],
+ Cell[11139, 419, 242, 8, 51, "Output",
+ CellTags->"SPE",
+ CellID->49409289],
+ Cell[11418, 432, 209, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->1917897688],
+ Cell[11630, 442, 490, 16, 51, "Output",
+ CellTags->"SPE",
+ CellID->1531168216],
+ Cell[12157, 463, 237, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->980827421],
+ Cell[12397, 474, 243, 8, 51, "Output",
+ CellTags->"SPE",
+ CellID->919943670],
+ Cell[12677, 487, 314, 11, 27, "Input",
+ CellTags->"SPE",
+ CellID->1873446419],
+ Cell[12994, 500, 244, 8, 51, "Output",
+ CellTags->"SPE",
+ CellID->1753753047]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16194, 602},
+ {"SPE", 16324, 606}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3193, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3772, 100, 281, 11, 45, "ObjectNameGrid"],
+Cell[4056, 113, 665, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4746, 136, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->249536683],
+Cell[CellGroupData[{
+Cell[5158, 155, 195, 6, 26, "ExampleSection",
+ CellID->244679970],
+Cell[CellGroupData[{
+Cell[5378, 165, 207, 7, 27, "Input",
+ CellTags->"SPE",
+ CellID->1779475118],
+Cell[5588, 174, 953, 40, 39, "Output",
+ CellTags->"SPE",
+ CellID->1516094616]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6578, 219, 209, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->437622958],
+Cell[6790, 229, 1275, 53, 37, "Output",
+ CellTags->"SPE",
+ CellID->1038841311]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8102, 287, 255, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->1031117972],
+Cell[8360, 298, 1139, 47, 39, "Output",
+ CellTags->"SPE",
+ CellID->1270490467]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9536, 350, 187, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->87993462],
+Cell[9726, 358, 1195, 48, 42, "Output",
+ CellTags->"SPE",
+ CellID->2053769726]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10958, 411, 178, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->2034315321],
+Cell[11139, 419, 242, 8, 51, "Output",
+ CellTags->"SPE",
+ CellID->49409289]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11418, 432, 209, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->1917897688],
+Cell[11630, 442, 490, 16, 51, "Output",
+ CellTags->"SPE",
+ CellID->1531168216]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12157, 463, 237, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->980827421],
+Cell[12397, 474, 243, 8, 51, "Output",
+ CellTags->"SPE",
+ CellID->919943670]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12677, 487, 314, 11, 27, "Input",
+ CellTags->"SPE",
+ CellID->1873446419],
+Cell[12994, 500, 244, 8, 51, "Output",
+ CellTags->"SPE",
+ CellID->1753753047]
+}, Open ]]
+}, Open ]],
+Cell[13265, 512, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13333, 517, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[13606, 531, 567, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[14188, 554, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CTdec.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CTdec.nb
new file mode 100644
index 000000000..b46ab3ec1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CTdec.nb
@@ -0,0 +1,1046 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 38531, 1036]
+NotebookOptionsPosition[ 34535, 912]
+NotebookOutlinePosition[ 36849, 974]
+CellTagsIndexPosition[ 36729, 968]
+WindowTitle->CTdec
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Tdec\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Tdec"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CTdec\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CTdec"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CTdec.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$53615],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CTdec",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CTdec", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CTdec", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"qi", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"qj", ",", "b"}], "}"}], ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]or CTdec[exp, {{qi, a}, {qj, b}, ...}, {p1, p2, ...}] \
+calculates the tensorial decomposition formulas for Cartesian integrals. The \
+more common ones are saved in TIDL."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->702361445],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CTdec", "]"}]], "Input",
+ CellLabel->"In[214]:=",
+ CellID->131732672],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalc`Package`BasisOnly", "\[Rule]", "False"}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Factor2", ",", "Factor"}], "}"}]}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "True"}], ",",
+ RowBox[{"List", "\[Rule]", "True"}], ",",
+ RowBox[{"UseParallelization", "\[Rule]", "True"}], ",",
+ RowBox[{"UseTIDL", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{470, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[214]=",
+ CellID->1788246199]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2045865683],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->819768586],
+
+Cell[TextData[{
+ "Check that ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"\[Integral]",
+ RowBox[{
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ RowBox[{"f", "(",
+ RowBox[{"p", ",", "q"}], ")"}],
+ SuperscriptBox["q", "i"]}]}], "=", " ",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["p", "i"],
+ SuperscriptBox["p", "2"]],
+ RowBox[{"\[Integral]",
+ RowBox[{
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ RowBox[{"f", "(",
+ RowBox[{"p", ",", "q"}], ")"}],
+ RowBox[{"p", "\[CenterDot]", "q"}]}]}]}]}], TraditionalForm]]]
+}], "Notes",
+ CellID->76274125],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CTdec", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"q", ",", "i"}], "}"}], "}"}], ",",
+ RowBox[{"{", "p", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->272441690],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"X1", "\[Rule]",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ",",
+ RowBox[{"X2", "\[Rule]",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], "}"}], ",",
+ FractionBox[
+ RowBox[{"X1", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "X2"]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{231, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1870429102]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "[",
+ RowBox[{"[", "2", "]"}], "]"}], "/.",
+ RowBox[{"%", "[",
+ RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1508196487],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{82, 44},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1545941508]
+}, Open ]],
+
+Cell[TextData[{
+ "This calculates integral transformation for any ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Integral]",
+ RowBox[{
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ SubscriptBox["q", "1"],
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ SubscriptBox["q", "2"],
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ SubscriptBox["q", "3"]}]}], TraditionalForm]]],
+ " ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"f", "(",
+ RowBox[{"p", ",",
+ RowBox[{
+ SubscriptBox["q",
+ RowBox[{"1", ","}]],
+ SubscriptBox["q", "2"]}], ",",
+ SubscriptBox["q", "3"]}], ")"}], " ",
+ SubsuperscriptBox["q", "1", "i"],
+ SubsuperscriptBox["q", "2", "j"],
+ SubsuperscriptBox["q", "3", "k"]}], TraditionalForm]]],
+ "."
+}], "Notes",
+ CellID->1818046438],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CTdec", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "1"], ",", "i"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "2"], ",", "j"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "3"], ",", "k"}], "}"}]}], "}"}], ",",
+ RowBox[{"{", "p", "}"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1616776154],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJzt3QlUE9f+B3BBFouIshfZaVRExQJaQCxaUStKXagFtKDVVl/dlbaibbVq
+iwoVFRekKFqk4IL4rJwDCv7B+ljdQAXZCghCRAiEBLKSTP4gIiGZCVkGksDv
+c857vhdg8p07d+beWe5c67XbvNerDhs27LsRHf/lvSbok8DANbs/H9Pxf77Y
++t2G/2xd943n1u/X/WddoMva4R0fPu34j1HH73f+bx4AAAAw0BAOIu8IAAAA
+lEt7w63dy13Hj/e9S5a1DWkn5d68XUkXuRhuW+mtmw/JHBm/CgAAgCKgZPqa
+mX6eLnMDQnuyjWA488wLtojf4dT95WzwwbeP22T8LgAkwm3JC1vv5TbR+sOV
+p4tocL4NAF5aH66zNv/iVuHNC5FnzkTF5zRLfX6AsJqbWH3snAi7ubZ1MJyB
+MGtSEwupcChSDoyqv84/onB5rKqz7h8sSifLO48MEGphYmoNU94xAOhCf7p9
+vKXPrfuRS6d6BsXeK24SdQqBiVV7JWi5C2Hyd0/pmL/DIWX84uM49v05ifVc
+qeMqBqS14FjglVqpigrIAcKhd93oo+Vvdfvmfqu888iEXXs18FhBK/RegAJg
+PP/ZVn/ckgVLDt4ltUu/GIRVddnd0PLrByL3TVr+Jmt919g6ZT8HYVdfWPXb
+U5q8YwCJ0Z6FrouqUPoOPO3pb6suVEMHBsgdqzxksrbGGE3tKYfKxNqvWHVJ
+p07/EXF462ceG281vmsKEFKKp7HZikyKqL+lFwaN03eKxK75rLr02OvP2+Tf
+ueJS8q/FZzViNKmMkkOL9xcxBD5VjPCik3dSjJw8caLiDGktjD93j4TZf1GY
+kuGHXkqMov2fHSoRrIIADDB21WkHvXFbYtfZjLRYl0npe99hv/hz7V/VHdUZ
+Ybyua+tpQMjpn481WfJ/zaKWwCz91U5vSti/LPQft9f/vX3VWYXpH9KLjvvv
+vtOEcrhhloe4LxW4lK5I4bGTK1ZOnuioOEMY1bcT/3nN7nwcsLqcKvSVClYy
+/NBKiZy+xD20HGNXAgAv7eTSjLhTEal3rpwM3h8Sk83fl2G9vLR9nrHGe1Z+
+21ZPGTVc03RpaAn2XYy3mOXHPb32ZfBXZ05j2j4/W20N/Tm/PBZxcZZVedxe
+f+KBEvR9lEtK8XfZlEeVeC0kxKU+v3UxPHjf4XPJGQlnr73E3geR5nR/5w1Z
+Qs0qt+GGh8O2J/zXsBQsPFZyRcspKqrkROZn18YHTLCZMKmD3eSPfy4UrOci
+S4YnyRqJT6ZSoj3Z6jAvqVGxzpfAIEN9GOiqp66ioqqha2VH0FVXUR3jHl0j
+y1UDdkP2lehj651NHX7IahH7dnh7Y/b1lJKiE45j3U5XoV/C4hAvzbJdkYO2
+B+O3Fmxi0g+zzMxnbw6JCAmw0FQZ6YAV5w2kOW2RrdftJoG9lFG0296x1zU/
+hQuPkVzhcmJHlZSM+UWUjMRrJBaZS4lZdtDxw73FcB0L9CdO7UUXHTXjZYnE
+dh41Z7WZupqpv9TPoSDUx6E+3scL2hBG8QE7k9k3GsRsQtqJlxaajbGa4bXr
+Rh3WXtKa50dwPFGJ+mPx14JReS08KhPjokhbwd4PR41yCH5GQ3j0wp0ETa3J
+IZ2XARDqk7N7t3y1aLrTyvPVvfqBjOI99pMCBZ8uo+b6fuB4kn9/l2P4jvi0
+F/k1gqM40ZPLMSf2cAz0qBKTraqLKBkJS75bf5cSu+qk07gAJX+oDCg4bn3i
+bN2OverNYEFKtp+Jmva0qGopz0GYpcGOtuu7nrWiZC22/ujPWhzvgZLvfmI+
+Hf0hLfHXor0u7lNz2w2owxU59QkeemoGC5M62z1m6W92742Y8NNzRue1hJKs
+2o5/2ZUnPp7X+zljVsVRB8LKPIG9lJK5yNLpD/4AcguPMIl50csIzucEe9vo
+yeVXyCKGY6BH7fwiYsLaT2cJWLg5qwXtmC1jVccsGYlLvjt8f5dSe3XkNJtl
+2ZiX3QCQGUJK9jRQM1iQTEJ4SFOar4mmoVfCKynvWnac5zubul57c4Tt6O/N
+nNr7ToCsqNneNk4RaMPZcVoLSuZiI1Wtrvv47MrwqSM1bHqtAbs2ac+RbHKv
+0ypmyQH7iZsLBNaTmvO5jVOvkffyDN9xaHGdKXQcw0gut5wihmOgR5WQrPkx
+S0bikhcDLqXErjrlRFiB0vACgBOEnOFtPFxrypEyemvJxVWWOlYBV4lSnzYg
+pJT55o6nO3YyhPb0kMcXf77E9Wl0VkWY06QtKMcRvNaCnOFpoDp89PTv/4iN
+CFporK5uzjd2hd2QHb1tvo25Z+QL/stY1NwVE9ziiQIHIvrTHZOnHa3g+0V5
+hkc/jqEnl28hd0IZjoEeVTIy58csGYlLXgy4lBKrPNTJfqfQEwEA4IaaE2Cq
+McLY2khHR9fC+cvDafUyHfORtidhPh7rw85Hhu6/UEDFe1Q5syzYxQ1lqAhe
+a4FQ7h+YZ6E9YrSl61Ifu1HqJn7/Exi7wqoMn+l+4WXPEYFZGuziIXyI4BDj
+3J3eXHVQhPCoxzGM5HIuZNThGFhRJSJ7fqySkbTkxYFLKdGffe8w68orZX+5
+A1BcbY++tdTQmXFJtt7dwOGS7wUtCxHsVOG/FkjLP1+O1TBanCY4doVb/1+f
+TT1jYhDq/Z+8f0V7PJleuOvjgNxeV6DlFx7lOIadXI450YdjiIgqATzyo5dM
+D7FKXkKylBIlc/mMXXAKAvoNLX+7jaYW9vg9RcSsSToelcHff8R/LTivr3sa
+qOnNvdn9JBn7ZYyvh8+PkZcT4i73vHWeWZN8Kjz1FXpXtu3RjoW/Cw7hl0t4
+lOOYyOTyyok+HKOvqGLCK79wyfQQp+QlJUspscqPLgp8BG+4Bv2CXRPj62io
+qTJs+EiCx85HyvS8BsIidb/eF/+1YFVF+n5koaU6TEXTwjtW1HsRuYzXZBFv
+GaYXHfT+XXho5MCHZzcVxC23Gr/x72IKR6zkcsqJSpyofcE5P1/J9BCz5CUi
+YymxKs74HS6CMxAAlBOn8fbOwLRGuAoN5IDb9M/PP6Y2KsnlaQCAMG7Lg/N/
+FsD8IGCgIa3P4mIeiv9GCAAAAAAAAAAYQJzXSf/Zcl+Z7oUCAABQDJzai/O8
+lHpaXyAHcwEAQ0BlZaXoQwG0IAAAACTS815KV1td/aluIt9LCQAAAAiDcxAA
+AADSgRYEAACAdKAFAQDIBdaUedhT6QEAAAA87CnzREylBwAAAPCwp8wTMZUe
+AAAAwAdlyjyRnwMAAJAWqy499vrztnf3BxB6eezWOeMNtXWtZ26KKaPLeuMA
+YdTcCZ9roK5tFxD0y55dW9csnbNgzcGkFwy+OxWU/GvxWY2yzfzX9WVoU+aJ
++BwAAIC02uv/3r7qLH/PnP786LbTua9Z7KaHpxe/P3pqaLnMMzlxG27M0TdY
+kEzqajM4DUnfWGpbrL5N4nthK73ouP/uO02yzT+OOmUe9ucAAACkxiWl+Lts
+yuN/jx27PuPOq7dtBq1gs43pZ5kU1L8VH9KU6mWkP/ta/bsGg1l2aJKW/vw7
+zfy/1Zzu77whiyLqlKedXJoRdyoi9c6Vk8H7Q2Kye521oE+Zh/05AAAA6XGI
+l2bZrsjBfBFq64M1E10jq2Wd1rXlno+JruvF2p6+P7vq5NSRup+kNvH/GtKc
+tsjW63YTVhNCfRjoqqeuoqKqoWtlR9BVV1Ed4x4ty7zfAAAApNaa50dwPFGJ
+0UIg5HsbPb7LlPnNRNTc1WZjnPgbIoSUstBA2z6sovf1MUbxHvtJgU8xzxE4
+tRdddNSMlyUS23nUnNVm6mqm/vBoFQAAyAX57ifm02PrUO8LcMnZh3ZEl6Df
+R+95Dx4fjPfgteVvtBo95ci/Pa0Fh3h5roHerPMvBc4fWBVHHQgr87DaBG59
+4mzdjgYkndzxLZRsPxM17WlR1XAOAgAA8kDN9rZxinghfA6C0MvjQ6Kf4DEp
+Lr1wJ2G07b6Sd/fqOY3Ja62M3MOKhc41mCUH7CduLqChLwghJXsaqHXdj0ea
+0nxNNA29El7BXXEAAJALVkWY06QtQods1subx6Lud81szW0pvJFClP5pLEbx
+XtvRhO+fdTUX3NbC2E0uE70OZpJRDv3U3BUT3OKJ6I0CQs7wNh6uNeVIGb21
+5OIqSx2rgKtEOAEBAAB5YZYFu7j1vlXecYqwYcJ7KsPeUtGy//1fKRsQVn3u
+9UOeRuqaZst/2H/gwN6dm7/+akvo9WcU9DaCWRrs4nEO69Y4NSfAVGOEsbWR
+jo6uhfOXh9PqZb3BDwAAQBZc8r2gZSGK8IArQr3/k/evj1sxLpy1PfrWUkNn
+xiWMMxQAAABywKxJOh6VIecePbMm+VR46ivMELT87TaaWlPCpD0dAgAA0D8Q
+FqmJJc+3nnMZr8mYAdg1Mb6Ohpoqw4aPJHjsfIQ5egUAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGAIQjjyfIsUAACA/sRt
+K7118yHaPEZ9ayfl3rxdiTq/a3vDrd3LXceP971LhjYEAAAGJU7dX84GH3z7
+uE2Kv6U92UYwnHkGZfLXTpRMXzPTz9OhAQHyw23JC1vv5TbR+sOVp4toUBUB
+wBvCbq5tlXI2IoTVjPmy89aH66zNv7hVePNC5JkzUfE5zYNjxiNmTWpiIR7T
+ooMBwKj66/wjCpfHqjrr/sGidLK888gAoRYmptYw5R0DgB4cUsYvPo5j35+T
+WM+V9G9ZtVeClrsQJn/3FH3aPvrT7eMtfW7dj1w61TMo9l5x02CYahVpLTgW
+eKV2MKzK0IBw6F034mj5W92+ud8q7zwyYddeDTxWgDU3JQByQMvfZK3vGlsn
++fkBwqq67G5o+fUD9L2S8fxnW/1xSxYsOXiXhDGft/JhV19Y9dtTmrxjAInR
+noWui6pQ+g487elvqy5UQwcGKAp6YdA4fadIkXWSVZd06vQfEYe3fuax8Vbj
+u6YGIaV4GputyKSg/1F5yGRtjTGa2lMOlfW937Lq0mOvP2+Tf+eKS8m/Fp/V
+iNHkMUoOLd5fxBD4VDHCi07eSTFy8sSJijOktTD+3D0SZi9JYUqGH3opMYr2
+f3aoRLAKAiAfzNJf7fT6mFKb/eLPtX9Vd1RkhPG6rq2nASGnfz7WZMn/NaPu
+d+yq0w5647bErrMZabEukyJy32yv/3v7qrMK0z+kFx33332nCeVwwywPcV8q
+cCldkcJjJ1esnDzRUXGGMKpvJ/7zmt350GF1OVXoKxWsZPihlRI5fYl7aLmo
+HRYAHLSTSzPiTkWk3rlyMnh/SEw2ao+PVXncXn/igRLRew+z/Lin174M/orM
+aUzb52erraE/55fHwpdlWS8vbZ9nrPGeld+21VNGDdc0XRpagn6vpAOXlOLv
+sikPfUpvsdZCPFzq81sXw4P3HT6XnJFw9tpL7H0QaU73d96QJdTscRtueDhs
+e8J/DUvBwmMlV7ScoqJKTmR+dm18wASbCZM62E3++OdCwXoosmR4kqyR+GQq
+JdqTrQ7zkhoV63wJDDLUh4GueuoqKqoaulZ2BF11FdUx7tE1/DtWe2P29ZSS
+ohOOY91OV4m8rMpuyL4SfWy9s6nDD1ktEt9u7xOHeGmW7YoctD2477UQF5uY
+9MMsM/PZm0MiQgIsNFVGOohcaaQ5bZGt1+0mgb2UUbTb3rHXNTmFC4+RXOFy
+YkeVlIz5RZSMxGskFplLiVl20PHDvcVwHQv0J07tRRcdNeNlicR2HjVntZm6
+mqk//3Mo7cRLC83GWM3w2nWjTlT9pT4O9fE+XtCGMIoP2JnMvtGAexPSmudH
+cDxRiRqir7Xowai8Fh6ViXFRpK1g74ejRjkEP6MhPHrhToKm1uSQzssA2CMF
+GMV77CcFCj5jRs31/cDxJP/+LsfwHRuH9iK/RnAsJ3pyOeZEqE/O7t3y1aLp
+TivPV/fqbKNHlZj4+dGIKBkJS75bf5cSu+qk07gAJX+oDCg4bn3ibN2OverN
+YD5Ktp+Jmva0qGqJO5bM0mBH2/Vdz1pRshZbf/RnLe53P8l3PzGfjv4omPhr
+0V4X96m57QbUQZGc+gQPPTWDhUmdrR+z9De790ZM+Ok5Q+RIAVbFUQfCyjyB
+vZSSucjS6Q/+AHILjzCJedHLCM7nBHvb6MnlV8hcaklWbce/7MoTH8/r/cg4
+etTOLyImrP10loCFm7Na0I7ZMlZ1zJKRuOS7w/d3KbVXR06zWZaNedkNAJkh
+pGRPAzWDBckkhIc0pfmaaBp6JbyS+K5lxxm+s6nrtTcVuqOnN3Nq73sA+KBm
+e9s4RaANasdpLSiZi41UtbqeFmBXhk8dqWHTtR4iRgowSw7YT9xcILC21JzP
+bZx6jb+XX/g3hxbXmULHMYzkcsz5Brs2ac+RbHKvM1j0qBKSNT9myUhc8mLA
+pZTYVaecCCtQGl4AcIKQM7yNh2tNOVJGby25uMpSxyrgKlGKkweElDLf3PF0
+x+6F0J4e8vjiz5f98Bw6qyLMadIWlOMIXmtBzvA0UB0+evr3f8RGBC00Vlc3
+FxjBgjJSgJq7YoJbPFHgQER/umPytKMVfBcZ5Bke/TiGnly+hcxuyI7eNt/G
+3DPyBf8FGvSokpE5P2bJSFzyYsCllFjloU72O4WeCAAAN9ScAFONEcbWRjo6
+uhbOXx5Oq5fyyI+0PQnz8Vgfdj4ydP+FAir+t9E7McuCXdxQBqTgtRYI5f6B
+eRbaI0Zbui71sRulbuL3P74RLKgjBZilwS4ewocIDjHO3enNVQdFCI96HMNI
+LudCfhO3Mnym+4WXPcmwokpE9vxYJSNpyYsDl1KiP/veYdaVV/2zMwLA47U9
++tZSQ2fGJdl6dwOHS74XtCxEsFOF/1ogLf98OVbDaHHauxEs6CMFEOr9n7x/
+RXlImUcv3PVxQG6vK9DyC49yHMNOLsec3QHq/+uzqWdgkIioEsAjP3rJ9BCr
+5CUkSylRMpfP2AWnIKDf0PK322hq9TFKUMEwa5KOR2Xw9x/xXwvO6+ueBmp6
+c292P0+GPlKAWZN8Kjz1FXpXtu3RjoW/Cw6xl0t4lOOYyOTyysl+GePr4fNj
+5OWEuMs9Ewj0FVVMeOUXLpke4pS8pGQpJVb50UWBj6R5jzYAfWLXxPg6Gmqq
+DBs+kuCx85EyPa+BsEjdL/nFfy1YVZG+H1loqQ5T0bTwjhX1XkQu4zUZ613D
+vM5Bwge9fxcegDnw4dlNBXHLrcZv/LuYwhEruZxyohInal9wzs9XMj3ELHmJ
+yFhKrIozfoeL4AwEAOXEaby9MzCtEa5CAzngNv3z84+pjUpyeRoAIIzb8uD8
+nwUwPwgYaEjrs7iYh/3wXggAAAAAAAAAkB3nddJ/ttxXpnuhAAAAFAOn9uI8
+L6We1hfIx1wAwBBQWVkp4jgALQgAAACJ9LyX0tVWV3+qm8j3UgIAAADC4BwE
+AACAdKAFAQAAIB1oQQAA8oI1gSP2xI4AAAAAD3sCRxETOwIAAAA87AkcRUzs
+CAAAAPBBmcBR5OcAAACkxapLj73+vO3d/QGEXh67dc54Q21d65mbYsrost44
+QBg1d8LnGqhr2wUE/bJn19Y1S+csWHMw6QWD704FJf9afFajbJP/dX0Z2gSO
+Ij4HAAAgrfb6v7evOsvfM6c/P7rtdO5rFrvp4enF74+eGlou82RO3IYbc/QN
+FiSTutoMTkPSN5baFqtvk/je2UovOu6/+06TbFOQo07giP05AAAAqXFJKf4u
+m/L4X2XHrs+48+ptm0Er2Gxj+lkmBfVvxYc0pXoZ6c++Vv+uwWCWHZqkpT//
+TjP/bzWn+ztvyKKIOuVpJ5dmxJ2KSL1z5WTw/pCY7F5nLegTOGJ/DgAAQHoc
+4qVZtityMN+F2vpgzUTXyGpZZ3Ztuedjout6sban78+uOjl1pO4nqU38v4Y0
+py2y9brdhNWEUB8Guuqpq6ioauha2RF01VVUx7hHyzL1NwAAAKm15vkRHE9U
+YrQQCPneRo/vMmV+ORE1d7XZGCf+hgghpSw00LYPq+h9fYxRvMd+UuBTzHME
+Tu1FFx0142WJxHYeNWe1mbqaqT88WgUAAHJBvvuJ+fTYOtT7Alxy9qEd0SXo
+99F7XoXHB+NVeG35G61GTznyb09rwSFenmugN+v8S4HzB1bFUQfCyjysNoFb
+nzhbt6MBSSd3fAsl289ETXtaVDWcgwAAgDxQs71tnCJeCJ+DIPTy+JDoJ3jM
+i0sv3EkYbbuv5N29ek5j8lorI/ewYqFzDWbJAfuJmwto6AtCSMmeBmpd9+OR
+pjRfE01Dr4RXcFccAADkglUR5jRpi9Ahm/Xy5rGo+12TW3NbCm+kEKV/GotR
+vNd2NOH7Z13NBbe1MHaTy0Svg5lklEM/NXfFBLd4InqjgJAzvI2Ha005UkZv
+Lbm4ylLHKuAqEU5AAABAXphlwS5uvW+Vd5wibJjwnsqwt1S07H//V8oGhFWf
+e/2Qp5G6ptnyH/YfOLB35+avv9oSev0ZBb2NYJYGu3icw7o1Ts0JMNUYYWxt
+pKOja+H85eG0ellv8AMAAJAFl3wvaFmIIjzgilDv/+T96+NWjAtnbY++tdTQ
+mXEJ4wwFAACAHDBrko5HZci5R8+sST4VnvoKMwQtf7uNptaUMGlPhwAAAPQP
+hEVqYsnzredcxmsyZgB2TYyvo6GmyrDhIwkeOx9hjl4BAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAYfBCOPF8SBQAAoH+0
+k3Jv3q5En3xVbNy20ls3HwrPctTecGv3ctfx433vkqENAQCAQYb2ZBvBcOYZ
+lJlZJcCp+8vZ4INvH7cJ/4iS6Wtm+nk6NCBAfrgteWHrvdwmWn+48nQRDaoi
+APhBWM2yv4kcYTfXtqLNVdT6cJ21+Re3Cm9eiDxzJio+p3kQTGjErElNLMRj
+ynMwMBhVf51/ROHyWFVn3T9YlE6Wdx7ZINTCxNQaprxjAMBj1V4JWu5CmPzd
+Uxnm1OOQMn7xcRz7/pzEeq7QD+lPt4+39Ll1P3LpVM+g2HvFTUo/kyrSWnAs
+8Eqt0q/HUIJw6F034mj5W92+ud8q7zyyYtdeDTxWgDX7JAADBWFVXXY3tPz6
+gWz7FC1/k7W+a2yd8OkF4/nPtvrjlixYcvAuCWO6biXDrr6w6renNHnHANKg
+PQtdF1UxGHrvtKe/rbpQDd0YIF8IKcXT2GxFJqWP32PVJZ06/UfE4a2feWy8
+1SjYUNALg8bpO0Wi1GdWechkbY0xmtpTDpX1vd+y6tJjrz9vk3PPikvJvxaf
+1YjR3jFKDi3eX8QQ+FQxkvP6Ct9JiaLiDGktjD93j4R5FVVhSkYAekExivZ/
+dqhEsCICMJAQcvrnY02W/F9zH3sN+8Wfa/+q7qjCCON1XZvgLsgs/dVOD3XC
+bXbVaQe9cVti19mMtFiXSRH5Le31f29fdVYx+of0ouP+u+80oRxrmOUh7ksF
+rqMrUnKeqPBKFRVnCKP6duI/r9mdTw1Wl1OFnxlUrJIRgFZQ5PQl7qHlg2CW
+e6Rd4Rpt0K2dXJoRdyoi9c6Vk8H7Q2Ky+TsynMa0fX622hr6c3553NcVVWb5
+cU+vfRmo+zqr8ri9/sQDJYI7H+vlpe3zjDXes/LbtnrKqOGapktDSzDvtnBJ
+Kf4um/LQZ+wWtRYS4lKf37oYHrzv8LnkjISz115i7IBIc7q/84YsoTaP23DD
+w2HbE/5rWAqWXER4ZYoqOZH52bXxARNsJkzqYDf5458LBeuhyJLhSbJGEpGp
+oGhPtjrMS2pU4qMvwiJmnt2xYNrSzBZ5RwFoqA8DXfXUVVRUNXSt7Ai66iqq
+Y9yja6Q4MLAbsq9EH1vvbOrwQ1YL383y9sbs6yklRSccx7qdrpLtYWDipVm2
+K3LQ9mDc1oLHJib9MMvMfPbmkIiQAAtNlZEO2KmR5rRFtl63mwT2T0bRbnvH
+XhfkFC45dngliiopGfOLKBmJ10hcMhcUs+yg44d7i5X3OhbCbKglPthBMJl/
+D1oQxcSpveiio2a8LJHYzqPmrDZTVzP1l/Q5FIT6ONTH+3hBG8IoPmBnMvtG
+w7smpJ14aaHZGKsZXrtu1Mm4S7Xm+REcT1SiLkX8tWBUXguPysS4KNJWsPfD
+UaMcgp/REB69cCdBU2tySNc1AIT2Ir9GcEAlo3iP/aRAwUfUqLm+Hzie5N/T
+5Zgce4wDeng5RkWoT87u3fLVoulOK89X9+ppo0eVmGxVXUTJSF743fq7oNhV
+J53GBSj5c2XM0t/sTKEFUVDc+sTZuh171ZvBfJRsPxM17WlR1ZJ1LJmlwY62
+67se1aJkLbb+6M/a/rj1Sb77ifl0tGe5JFmL9rq4T81tN6CNauRx6hM89NQM
+FiZ1NoCd1fa9ERN+es7o6AcR86KXEZzPCXZYWRVHHQgr8wT2T0rmIkunP/i/
+XW7JRY1xQA8vv6hcaklWbce/7MoTH8/r/cw3etTOLyImrP10loCFm7Na0I7W
+MlZ1zJKRpvAHqqDaqyOn2SzLxrzyphSgBVFgCCnZ00DNYEEyCeEhTWm+JpqG
+XgmvJLtr2XF672zqeu1NVe7o5s2c2vseAG6o2d42ThFow+LxWAte56F/sZGq
+VtftfnZl+NSRGjbdq9Kxa7rOFGpBmCUH7CduLhBYW2rO5zZOvYbvyy+5iDEO
+GOHlWMhvsGuT9hzJJvcaNIQeVUKy5scsGWkKXwy4FBS76pQTYQVK26tMoAVR
+XAg5w9t4uNaUI2X01pKLqyx1rAKuEiU9f0BIKfPNHU937FsI7ekhjy/+fNk/
+T6CzKsKcJm1BOY7gshYdyBmeBqrDR0///o/YiKCFxurq5u/GwKC3INTcFRPc
+4okCRyH60x2Tpx2t4Lu8IM/kXVDGOKCHl29UdkN29Lb5NuaekS/4r86gR5WM
+zPkxS0aawhcDLgXFKg91st8p9FCAcoEWRHFRcwJMNUYYWxvp6OhaOH95OK1e
+moM/0vYkzMdjfdj5yND9FwqowmPOccIsC3ZxQxlRgs9adKwH5f6BeRbaI0Zb
+ui71sRulbuL3v+4xMKgtCLM02MVDqFnpOCeLc3d6c71BEZLzMMY4YISXc9RO
+rMrwme4XXvYkw4oqEdnzY5WMFIUvDlwKiv7se4dZV1712y45IKAFUVhtj761
+1NCZcUm23t3A4ZLvBS0LEexR4b8WSMs/X47VMFqc9m4MDEoLglDv/+T9K9oz
+zvTCXR8H5Pa69iy/5OhjHLDDyzFqd4D6//ps6hkYJCKqBPDIj14yPcQtfAnJ
+UlCUzOUzdin5KcibsWTQgigiWv52G00t1GF+CotZk3Q8KoO//4j/WnBeX/c0
+UNObe7PnkTKhFoRZk3wqPPUVej+27dGOhb8Ljq+XS3L0MQ4iw8st6ssYXw+f
+HyMvJ8Rd7pkBoK+oYsIrv3DJ9BCz8CUlS0Gxyo8uCnyEdp9eabAbn6SEuOuN
+HPfd1dwKmnKfTA0q7JoYX0dDTZVhw0cSPHY+UqaHNRAWqfs1wfivBasq0vcj
+Cy3VYSqaFt6xb1+NyG4qiFtuNX7j38WUtzssl/GaLOJVxfSig96/Cw2flENy
+VH2EV7aofcE5P1/J9BB/jSQiY0GxKs74HS5S8jMQAIYgTuPtnYFpjdBlAnLD
+bfrn5x9ThV5QBwBQAtyWB+f/LID5QYB8IK3P4mIetkAfBgAAAAAAAAAAAAAA
+MKTNBQAMDZWVlXDEkAIu5QYAAIOPRK+mBAAAAAAAAAAAAAAAAACGIKyZ+Pqe
+oQ8AOcGqnNjzPwIA+gPWTHx9z9AHgJxgVU4R8z8CAPoD1kx8ss3QB0A/6qNy
+os3/CADoT1gz8Uk3Qx8AAwCtcmLM/wiAYmHVpcdef9727hIsQi+P3TpnvKG2
+rvXMTTFldFlvHCCMmjvhcw3Ute0Cgn7Zs2vrmqVzFqw5mPSCwXengpJ/LT6r
+UbbJ/7q+DGMmPqln6AMKaUhU2k5C8z8CoEja6//evuosf+eH/vzottO5r1ns
+poenF78/empoucwdIG7DjTn6BguSSV27H6ch6RtLbYvVt0l8Z+f0ouP+u+80
+yTYFOcZMfLjM0AcUxpCotN0xes//CIAi4ZJS/F025fHPdcSuz7jz6u3uRyvY
+bGP6WSYF9W/FhzSlehnpz77Wcz+QWXZokpb+/DvN/L/VnO7vvCFL5L7STi7N
+iDsVkXrnysng/SEx2b06gFgz8eEzQx9QFEOj0qLO/wiAQuEQL82yXZGDOVle
+64M1E10jq2Wd6K7lno+JruvF2p79gF11cupI3U9Sm/h/DWlOW2TrdbsJa2+k
+Pgx01VNXUVHV0LWyI+iqq6iOcY+ugdP7IQYqLQAKojXPj+B4ohJjZ0PI9zZ6
+fJcp85uJqLmrzcY48e/TCClloYG2fVhF70sNjOI99pMCn2KeI3BqL7roqBkv
+SyS286g5q83U1Uz94dGqoQYqLQAKgnz3E/PpsXWo58hccvahHdEl6LckJXkP
+Xlv+RqvRU47827PjcYiX5xrozToveHuQVXHUgbAyD2v34tYnztbt2BfTyR3f
+Qsn2M1HTnhZVDd25IQYqLQAKgprtbeMU8UK4O4fQy+NDop/gMTUuvXAnYbTt
+vpJ3tz05jclrrYzcw4qFum3MkgP2EzcX0NAXhJCSPQ3Uum5tIk1pviaahl4J
+r+AK8VADlRYABcGqCHOatEWo9rNe3jwWdb9rZmtuS+GNFKL0D7YwivfajiZ8
+/6xrz+O2FsZucpnodTAT7eYgNXfFBLd4Ivr+hZAzvI2Ha005UkZvLbm4ylLH
+KuAqEfpyQw9UWgAUBbMs2MWt913Hjt7WhgnvqQx7S0XL/vd/pdwXWfW51w95
+Gqlrmi3/Yf+BA3t3bv76qy2h159R0Hc3Zmmwi8c5rLuM1JwAU40RxtZGOjq6
+Fs5fHk6rl/VeKVBOUGkBUBRc8r2gZSGK8IArQr3/k/evj1sxrkG0PfrWUkNn
+xiWMzh4YQqDSAqA4mDVJx6My5Nw5YtYknwpPfYUZgpa/3UZTa0qYtD1LMLhA
+pQVAcSAsUhNLnqNeuYzXZMwA7JoYX0dDTZVhw0cSPHY+whwIAIYUqLQAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGCQQTgw1TEAACisdlLu
+zduV6NPLSIXbVnrrpqyzFLc33Nq93HX8eN+7ZGhDAABAMdGebCMYzjyDMveM
+lDh1fzkbfPDt4zYZl0PJ9DUz/TwdGhAAAFBYCKsZ33etIezm2laZ38zc+nCd
+tfkXtwpvXog8cyYqPqdZxBKZNamJhXjMsgYAAEBMrNorQctdCJO/w57yXjIc
+UsYvPo5j35+TWM+VbUn0p9vHW/rcuh+5dKpnUOy94ibMcySkteBY4JVamIQG
+AAAGEsKquuxuaPn1A6wZ7yVHy99kre8aWyfjOQjj+c+2+uOWLFhy8C5J9PyW
+7OoLq357ijHh8gBC2uEcCAAwlCCkFE9jsxWZFNyWSC8MGqfv1HsyTSmwykMm
+a2uM0dSecqiMKfI3GSWHFu8vYgj+fV167PXnbb2P6Qij5k74XAN1bbuAoF/2
+7Nq6ZumcBWsOJr1gyHboR1jEzLM7FkxbmtnS9QGXkn8tPqtRRMOHGm/AKUtO
+3iCLKhaEXh67dc54Q21d65mbYsowHnRRjLUeVFtHiaLKH0JO/3ysyZL/a8at
+uJilv9rpyT69GLvqtIPeuC2x62xGWqzLpIiIxywPcV+aTu71WXv939tXna1A
+aXm4DTfm6BssSCZ1LZHTkPSNpbbF6tskGS65IcyGWuKDHQST+fda3n1ILzru
+v/tOE+qJGHa8gacsOXmDJqq4i3h+dNvp3NcsdtPD04vfHz01tFx4l1KktR4k
+W0eJog6MdnJpRtypiNQ7V04G7w+JyeZv0DiNafv8bLU19Of8gjljsZiLeodV
+edxef+KBkj63gKilsV5e2j7PWOM9K79tq6eMGq5pujS0BOs2TUeT4OGw7Qn/
+NSwuKcXfZVMe2vRmSFOql5H+7Gs992iYZYcmaenPv9PcV2DRmKW/2ZnytyA8
+pDnd33lDlnDjJyKemIUsHi71+a2L4cH7Dp9Lzkg4e+0lRpuuLDkHSVQ+nNdJ
+/9lyH2MWPnZ9xp1Xb5dPK9hsY/qZ0HUCBVvrwbB1lCjqgKA+DHTVU1dRUdXQ
+tbIj6KqrqI5xj66Rar37XlR7Y/b1lJKiE45j3U5X9XEJC8dgjKLd9o69LnRx
+iJdm2a7IQa0FLfd8THRdL9b2tOnsqpNTR+p+ktokzZf3EG5BOrZ92iJbr9tN
+AtteRDz8ioVNTPphlpn57M0hESEBFpoqIx2wt4my5BwUUXvFrr04z0vg7BlV
+64M1E12Frgsr3For/9ZRoqgDpKOOuuioGS9LJLbzqDmrzdTVTP3vS3fPvK9F
+tRMvLTQbYzXDa9eNur5vgeAXjJrr+4HjSf5N0JrnR3A8UYkWgpq72mxMr3s0
+CClloYG2fViFjFfdUFoQHqN4j/2kQMGH3ETEk6BYGJXXwqMyMc5u2wr2fjhq
+lEPwMxrCoxfuJGhqTQ7pugaC0F7k1wheUVe4nNyWvLD1Xm4TrT9cebqIxp9W
+4aIi1Cdn9275atF0p5Xnq3vVIfSoAtHEaUEQ8r2NHt9ltggeQqAi9ZlziFSk
+/sOtT5yt27HSb8bkUbL9TNS0p0VVS9XVx3FR+C6NkrnI0ukP/r8l3/3EfDrq
+o2Bt+RutRk85wnePhkO8PNdAb9b5l+jf3U5MWPvpLAELN2cJ7c2oLQir4qgD
+YWWeQC3DjidBsbTXxX1qbrsBdcwmpz7BQ0/NYGFSA7cr13sjJvz0nMFDmMS8
+6GUE53OCPScFy8ljVP11/hGFy2NVnXX/YFGvQ6yiReVSS7JqO/5lV574eF7v
+59fRo/L4K5Wrra7+VDfsSvVmBcjZh3ZEl6DcR4eK1EfOoVOR+jo6SQshJXsa
+qHXdNkaa0nxNNA29El5JdVMGx0XhvDRqzuc2Tr3G01OzvW2cIlBG2Hc2+aNt
+9/Xco+E0Jq+1MnIPK5a9fUdrQZglB+wnbi4QeMwYMx5exULJXGykqtX1MAO7
+MnzqSA2b7vtEHZXRdabQjq9oOREOvetdaLT8rW7f9OrnKVrUt9i1SXuOZJN7
+PY2BHpVf3+cgCL08PiT6CfpIWahIfeUcKhWpvyDkDG/j4VpTjpTRW0surrLU
+sQq4SpTurAHHReG9NPrTHZOnHeW/CMWqCHOatEW4xBnFe21HE75/1tVccFsL
+Yze5TPQ6mCnj67u6dD6CJtiCUHNXTHCLJwosHisebsVCzvA0UB0+evr3f8RG
+BC00Vlc3fzfaB33HV7ycXWjPQtdF9X4qRhGjshuyo7fNtzH3jHzBf/UBPSq/
+vloQ1subx6Lut7w5nHBbCm+kEHtd3YCK1HfOLoO9IvUXak6AqcYIY2sjHR1d
+C+cvD6fVSz1EA8dF4b00DjHO3enNieA7zLJgF7feNx5Z9bnXD3kaqWuaLf9h
+/4EDe3du/vqrLaHXn1Fw2S7sxicpIe56I8d9dzW3gtbdgWCWBrt4CO1lqPHe
+wKtYEMr9A/MstEeMtnRd6mM3St3E73/dT/Gg7vgKmLPzp62F8efukXpvH8WM
+2olVGT7T/QLfxVCsqHxEtiAd58cbJrynMuwtFS373wWfkIeK1GdO3pCoSP2k
+7dG3lho6My7h0HjhuCjcl8ajF+76OCC31+MTXPK9oGUhhXK599QNod7/yftX
+1Kek0ePhXCydEVr++XKshtHitHejfVB2fIXMiTCqbyf+85rd+Zbn6nIqR4Gj
+dgeo/6/Ppp5xSyKi4ggqUl85oSJJj5a/3UZTS/ahffguCvel8To3746FvwuO
+W2fWJB2PypDpVEkWzJrkU+GprzC/Xjge7sXC47y+7mmgpjf3ZsO7y6pCO75C
+5mTXxgdMsJkwqYPd5I9/frs7K2bUlzG+Hj4/Rl5OiLvcM5tBX1FxBBVJRE6o
+SNJi18T4OhpqqgwbPpLgsfMRxpilgV4U7kvrRi866P278BhGhEXC943D4uMy
+XpP7+mq+ePgXC6sq0vcjCy3VYSqaFt6xb985yW4qiFtuNX7j38XdF+8UMyeq
+QRYVR1CRsHKiGmRRAR44jbd3BqY1yvguYAAAAEMRt+XB+T8LYH4QAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAC6YL+cHygl2KCDDGxQoMBEvJwfKCPYoIMM
+bFB5QKiFiak1ijIPuyIT8XJ+oIxggw4ysEHlg117NfBYgTxelqicUF7OD5QZ
+bNBBBjboQKM9/W3VBeF3yANhqC/n58OqS4+9/rxNsZpjLiX/WnxWo4g38itM
+7L6j4gw2aP+CDSomZdmm6DkZRfs/O1TCQP8T0A395fw92uv/3r7qrEJ2fuhF
+x/1332lC3a8ULLaoqDiDDToQYIOKSVm2KVpOcvoS99By3N4Wr6zayaUZcaci
+Uu9cORm8PyQmu1dLi/5y/h5cUoq/y6Y8zNclc6nPb10MD953+FxyRsLZay/x
+KG3xl4k0p/s7b8iiCPVgRMYWWSADHlVysEEFwAYd4A0q0WKVZZui5KQ92eow
+L6lR4U7tBhL1YaCrnrqKiqqGrpUdQVddRXWMe7T4kzFyiJdm2a7IQd/IbGLS
+D7PMzGdvDokICbDQVBnpcLpK1quGEi4TaU5bZOt1u0lgG4uILWOB4B5VUrBB
+BcAGHdgNKvlilWWbCudklh10/HBv8dC+jsWpveiio2a8LJHYzqPmrDZTVzP1
+F/+BjtY8P4LjiUq0Mm8r2PvhqFEOwc9oCI9euJOgqTU5pOuED6G9yK+hY+xY
+jMpr4VGZGGf/WMvEfiSeUbzHflLgU4GOmYjYEhSIVFER6pOze7d8tWi608rz
+1b16O+hRJTYoNqikpSTHDSpp3ZPYgG/QvgeYDPZtilGlhXKyq046jQsY2s+/
+cesTZ+t2bIp0ckdpUbL9TNS0p0VVi92ak+9+Yj49tk54+3DqEzz01AwWJnVO
+AMks/c3uvRETfnrO4CFMYl70MoIz1qTz7XVxn5rbbnjchvIzrGWKeiSeVXHU
+gbAyT2AbY8aWpECkisqllmTVdvzLrjzx8bzEev7ptNCjdn4RMWHtp7MELNyc
+1YK2cw+KDSpxKclvg0pc93gKvkHFGGAyyLcpZpUWytleHTnNZlk2TrO0KiWE
+lOxpoGawIJmE8JCmNF8TTUOvhFfi3/6jZnvbOEW8EO4nUDIXG6m+nZSYXRk+
+daSGzbYntDc/EpqdWVyYyxTxSDyz5ID9xM0FNDFjy1wgfUV9i12btOdINrnX
+fIzoUSU0ODboW+KXkvw2qMR1T0IDv0FlG2AyGLYpVpUWysmuOuVEWIHSRxgy
+EHKGt/FwrSlHyuitJRdXWepYBVwlSnIkYFWEOU3agrKTkDM8DVSHj57+/R+x
+EUELjdXVzb9+0Nr9N1IecEQsswvKI/HU3BUT3OKJArULM7bMBSJOVHZDdvS2
++TbmnpEv+E/m0aNKZhBtUIlKSb4btJPYdU8yctmgXaQbYDI4til6lRbKySoP
+dbLfKfTwwhBCzQkw1RhhbG2ko6Nr4fzl4bR6Se+jMcuCXdwihYfVIJT7B+ZZ
+aI8Ybem61MdulLqJ3/8ob38k9QFHxDJ5GI/EM0uDXTxQvgsrtuwFIk7UTqzK
+8JnuF172JMOKKpHBtEHfLFrcUpLvBpWo7klELhuU1/cAE0yDY5uiVmnhnPRn
+3zvMuvKq1wnVkNL26FtLDZ0Zl2TpJnHJ94KWhWA3w0jLP1+O1TBanNbcfZFX
+6gOOiGWiPxKPUO//5P3rY7Q3D6DHxqNA+oraHaD+vz6bMt89GigiqgQGzwbt
+DiN2Kclvg0pc9yQgnw3a1wATsSj1NkWp0mg5KZnLZ+wawqcgtPztNppvrwPK
+glmTdDwqA70jwHl93dNATW/uzYZ3DbXMBxyhZaI/Es+sST4VnvoKs38iHBuv
+AhEV9WWMr4fPj5GXE+IuPyR37wN9RRXT4NmgUpWSfDaoVHVPTHLZoH0NMBGP
+Mm9TlCqNmpNVfnRR4CO0m/RDALsmxtfRUFNl2PCRBI+dj2R9mgBhkZpYgr0I
+VlWk70cWWqrDVDQtvGNru0qf3VQQt9xq/Ma/iynS9CFQl4mKy3hNFoqEHRvn
+AsE9al9ggwrEhg3ai/gbVHbKvk2FqzRqTlbFGb/DRUP3DAQAAIB0uE3//Pxj
+auNAvLYGAADAIIK0PouLedgydO+hAwAAAAAAAAaf/wdDJbXa
+ "], {{0, 210}, {534,
+ 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{534, 210},
+ PlotRange->{{0, 534}, {0, 210}}]], "Output",
+ ImageSize->{538, 210},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[3]=",
+ CellID->106988702]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Contract", "[",
+ RowBox[{"%", " ",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}],
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "j"}], "]"}], " ",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "k"}], "]"}]}], "]"}], "//", "Factor"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->663614938],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{171, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1731509272]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Tdec",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Tdec",
+ ButtonNote->"Tdec"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"CTdec",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 59.944440}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CTdec[{{qi, a}, {qj, b}, ...}, {p1, p2, ...}] or CTdec[exp, {{qi, a}, \
+{qj, b}, ...}, {p1, p2, ...}] calculates the tensorial decomposition formulas \
+for Cartesian integrals. The more common ones are saved in TIDL.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CTdec", "titlemodifier" ->
+ "", "windowtitle" -> "CTdec", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CTdec"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6418, 201, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2045865683]},
+ "RasterizedOutput"->{
+ Cell[12427, 452, 19066, 321, 223, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->106988702]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 36459, 957},
+ {"RasterizedOutput", 36603, 961}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2980, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3560, 97, 282, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3867, 112, 808, 23, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4700, 139, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->702361445],
+Cell[5441, 165, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5497, 169, 109, 3, 70, "Input",
+ CellID->131732672],
+Cell[5609, 174, 748, 20, 74, "Output",
+ CellID->1788246199]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6418, 201, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2045865683],
+Cell[CellGroupData[{
+Cell[6831, 220, 195, 6, 26, "ExampleSection",
+ CellID->819768586],
+Cell[7029, 228, 658, 24, 58, "Notes",
+ CellID->76274125],
+Cell[CellGroupData[{
+Cell[7712, 256, 223, 8, 27, "Input",
+ CellID->272441690],
+Cell[7938, 266, 1563, 60, 60, "Output",
+ CellID->1870429102]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9538, 331, 198, 7, 27, "Input",
+ CellID->1508196487],
+Cell[9739, 340, 1303, 55, 65, "Output",
+ CellID->1545941508]
+}, Open ]],
+Cell[11057, 398, 847, 31, 62, "Notes",
+ CellID->1818046438],
+Cell[CellGroupData[{
+Cell[11929, 433, 495, 17, 27, "Input",
+ CellID->1616776154],
+Cell[12427, 452, 19066, 321, 223, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->106988702]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[31530, 778, 346, 11, 27, "Input",
+ CellID->663614938],
+Cell[31879, 791, 2051, 85, 38, "Output",
+ CellID->1731509272]
+}, Open ]]
+}, Open ]],
+Cell[33957, 880, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[34025, 885, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[34298, 899, 195, 8, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[34508, 910, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CV.nb
new file mode 100644
index 000000000..72a63bdb7
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CV.nb
@@ -0,0 +1,468 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12772, 458]
+NotebookOptionsPosition[ 9456, 356]
+NotebookOutlinePosition[ 11583, 413]
+CellTagsIndexPosition[ 11498, 408]
+WindowTitle->CV
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FV\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"CartesianPair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CartesianPair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CV.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$54958],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CV",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a 3-dimensional Cartesian vector and is transformed \
+into CartesianPair[CartesianMomentum[p], CartesianIndex[i]] by \
+FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1120866059],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1034892246],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->236026604],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->799728704]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->585918220],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{71, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1869621672]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->921449288],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Output",
+ ImageSize->{441, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->772928155]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in CV", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{68, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->526558982]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FV",
+ ButtonNote->"FV"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CV",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 3.622913}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CV[p, i] is a 3-dimensional Cartesian vector and is transformed into \
+CartesianPair[CartesianMomentum[p], CartesianIndex[i]] by FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CV", "titlemodifier" ->
+ "", "windowtitle" -> "CV", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CV"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4532, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1120866059]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11354, 401}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[574, 21, 3153, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3730, 99, 279, 11, 45, "ObjectNameGrid"],
+Cell[4012, 112, 495, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4532, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1120866059],
+Cell[CellGroupData[{
+Cell[4945, 149, 196, 6, 26, "ExampleSection",
+ CellID->1034892246],
+Cell[CellGroupData[{
+Cell[5166, 159, 121, 4, 27, "Input",
+ CellID->236026604],
+Cell[5290, 165, 514, 22, 40, "Output",
+ CellID->799728704]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5841, 192, 145, 5, 27, "Input",
+ CellID->585918220],
+Cell[5989, 199, 775, 32, 40, "Output",
+ CellID->1869621672]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6801, 236, 189, 6, 27, "Input",
+ CellID->921449288],
+Cell[6993, 244, 322, 9, 51, "Output",
+ CellID->772928155]
+}, Open ]],
+Cell[7330, 256, 87, 1, 32, "Notes",
+ CellID->97927264],
+Cell[CellGroupData[{
+Cell[7442, 261, 194, 6, 27, "Input",
+ CellID->1140711302],
+Cell[7639, 269, 897, 39, 40, "Output",
+ CellID->526558982]
+}, Open ]]
+}, Open ]],
+Cell[8563, 312, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8631, 317, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8904, 331, 510, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9429, 354, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CVD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CVD.nb
new file mode 100644
index 000000000..f31205c98
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CVD.nb
@@ -0,0 +1,468 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12721, 458]
+NotebookOptionsPosition[ 9453, 357]
+NotebookOutlinePosition[ 11531, 413]
+CellTagsIndexPosition[ 11446, 408]
+WindowTitle->CVD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FVD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FVD"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"CartesianPair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CartesianPair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CVD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CVD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CVD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$54062],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CVD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CVD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a D-1-dimensional Cartesian vector and is \
+transformed into CartesianPair[CartesianMomentum[p,D], CartesianIndex[i,D]] \
+by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1178806778],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1091380546],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->236026604],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->276595871]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->585918220],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "-",
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{67, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1577923409]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->921449288],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{549, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->347562433]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in CVD", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CVD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{64, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->463360865]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FVD",
+ ButtonNote->"FVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CVD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 1.233768}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CVD[p, i] is a D-1-dimensional Cartesian vector and is transformed into \
+CartesianPair[CartesianMomentum[p,D], CartesianIndex[i,D]] by \
+FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "CVD",
+ "titlemodifier" -> "", "windowtitle" -> "CVD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CVD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4533, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1178806778]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11302, 401}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3145, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3723, 99, 280, 11, 45, "ObjectNameGrid"],
+Cell[4006, 112, 502, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4533, 130, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1178806778],
+Cell[CellGroupData[{
+Cell[4946, 149, 196, 6, 26, "ExampleSection",
+ CellID->1091380546],
+Cell[CellGroupData[{
+Cell[5167, 159, 122, 4, 27, "Input",
+ CellID->236026604],
+Cell[5292, 165, 484, 21, 40, "Output",
+ CellID->276595871]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5813, 191, 146, 5, 27, "Input",
+ CellID->585918220],
+Cell[5962, 198, 709, 30, 40, "Output",
+ CellID->1577923409]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6708, 233, 190, 6, 27, "Input",
+ CellID->921449288],
+Cell[6901, 241, 468, 15, 51, "Output",
+ CellID->347562433]
+}, Open ]],
+Cell[7384, 259, 88, 1, 32, "Notes",
+ CellID->97927264],
+Cell[CellGroupData[{
+Cell[7497, 264, 195, 6, 27, "Input",
+ CellID->1140711302],
+Cell[7695, 272, 835, 37, 40, "Output",
+ CellID->463360865]
+}, Open ]]
+}, Open ]],
+Cell[8557, 313, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8625, 318, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8898, 332, 513, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9426, 355, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CVE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CVE.nb
new file mode 100644
index 000000000..f8b0ab647
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CVE.nb
@@ -0,0 +1,474 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12943, 464]
+NotebookOptionsPosition[ 9615, 362]
+NotebookOutlinePosition[ 11753, 419]
+CellTagsIndexPosition[ 11668, 414]
+WindowTitle->CVE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FVE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FVE"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"CartesianPair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CartesianPair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CVE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CVE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CVE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$54510],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/CVE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CVE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CVE", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a D-4-dimensional Cartesian vector and is \
+transformed into CartesianPair[CartesianMomentum[p,D-4], \
+CartesianIndex[i,D-4]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->343240731],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1073790585],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVE", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->236026604],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->805938732]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->585918220],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{67, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2024962651]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"CVE", "[",
+ RowBox[{"p", ",", "i"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->921449288],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{551, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->689002991]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in CVE", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CVE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{64, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1452036350]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FVE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FVE",
+ ButtonNote->"FVE"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"CVE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 2.411135}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CVE[p, i] is a D-4-dimensional Cartesian vector and is transformed into \
+CartesianPair[CartesianMomentum[p,D-4], CartesianIndex[i,D-4]] by \
+FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "CVE",
+ "titlemodifier" -> "", "windowtitle" -> "CVE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CVE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4537, 130, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->343240731]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11525, 407}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3145, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3723, 99, 280, 11, 45, "ObjectNameGrid"],
+Cell[4006, 112, 506, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4537, 130, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->343240731],
+Cell[CellGroupData[{
+Cell[4949, 149, 196, 6, 26, "ExampleSection",
+ CellID->1073790585],
+Cell[CellGroupData[{
+Cell[5170, 159, 122, 4, 27, "Input",
+ CellID->236026604],
+Cell[5295, 165, 514, 22, 40, "Output",
+ CellID->805938732]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5846, 192, 146, 5, 27, "Input",
+ CellID->585918220],
+Cell[5995, 199, 775, 32, 43, "Output",
+ CellID->2024962651]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6807, 236, 190, 6, 27, "Input",
+ CellID->921449288],
+Cell[7000, 244, 468, 15, 51, "Output",
+ CellID->689002991]
+}, Open ]],
+Cell[7483, 262, 88, 1, 32, "Notes",
+ CellID->97927264],
+Cell[CellGroupData[{
+Cell[7596, 267, 195, 6, 27, "Input",
+ CellID->1140711302],
+Cell[7794, 275, 898, 39, 40, "Output",
+ CellID->1452036350]
+}, Open ]]
+}, Open ]],
+Cell[8719, 318, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8787, 323, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9060, 337, 513, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9588, 360, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Calc.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Calc.nb
index dcc86d8c9..4d47e65ef 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Calc.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Calc.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18254, 704]
-NotebookOptionsPosition[ 12792, 520]
-NotebookOutlinePosition[ 16311, 626]
-CellTagsIndexPosition[ 16203, 620]
+NotebookDataLength[ 18204, 685]
+NotebookOptionsPosition[ 13359, 529]
+NotebookOutlinePosition[ 16296, 613]
+CellTagsIndexPosition[ 16188, 607]
WindowTitle->Calc
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Calc\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Calc"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Calc.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$23528],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Calc",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Trick\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Trick"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Calc\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Calc"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Calc.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$30796],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Calc",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +98,26 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Calc", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Calc", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"Calc", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "performs several basic simplifications. Calc[exp] is the same as \
-DotSimplify[DiracSimplify[Contract[DiracSimplify[Explicit[ \
-SUNSimplify[Trick[exp], Explicit\[Rule]False] ]]]]]."
+ " \[LineSeparator] performs several simplifications that involve \
+Contract, DiracSimplify SUNSimplify, DotSimplify, EpsEvaluate, \
+ExpandScalarProduct, PowerSimplify, Expand2 and Trick."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -105,68 +139,76 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->5943773],
+ CellID->208222125],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1585517748],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"Calc",
- CellID->115873599],
+ CellID->539573558],
Cell[TextData[{
"This calculates ",
Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"],
- SubscriptBox["\[Gamma]", "\[Mu]"]}], TraditionalForm]]],
- " in 4 dimensions and ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox["\[Gamma]", "\[Mu]"]}]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ " dimensions and ",
Cell[BoxData[
- FormBox[
- SubsuperscriptBox["g", "\[Nu]", "\[Nu]"], TraditionalForm]]],
- " in D dimensions."
-}], "Text",
- CellTags->"Calc",
- CellID->117745359],
+ SubsuperscriptBox["g", "\[Nu]", "\[Nu]"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " dimensions."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Calc", "[",
- RowBox[{"{",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Mu]"}], "]"}], ",", " ",
- RowBox[{"MTD", "[",
- RowBox[{"\[Nu]", ",", "\[Nu]"}], "]"}]}], "}"}], "]"}]], "Input",
- CellTags->"Calc",
- CellLabel->"In[1]:=",
- CellID->781527999],
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Mu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"4", ",", "D"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ FormBox["4", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Calc",
- CellLabel->"Out[1]=",
- CellID->1798215567]
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"MTD", "[",
+ RowBox[{"\[Nu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox["D", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"This simplifies ",
Cell[BoxData[
@@ -175,9 +217,7 @@ Cell[TextData[{
SubscriptBox["f", "abc"], " ",
RowBox[{
SubscriptBox["f", "abe"], "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"Calc",
- CellID->1416000027],
+}], "Notes"],
Cell[CellGroupData[{
@@ -189,7 +229,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "b", ",", "e"}], "]"}]}], "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->779661922],
Cell[BoxData[
@@ -206,16 +246,22 @@ Cell[BoxData[
FormBox["e",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{52, 15},
+ ImageSize->{61, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Calc",
- CellLabel->"Out[2]=",
- CellID->1521159153]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{"FV", "[",
@@ -227,83 +273,68 @@ Cell[BoxData[
RowBox[{
RowBox[{"q", "-", "p"}], ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"Calc",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->281198835],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{155, 20},
+ ImageSize->{170, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Calc",
- CellLabel->"Out[3]=",
- CellID->481463556]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -311,7 +342,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Calc", "[", "%", "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1838519780],
Cell[BoxData[
@@ -362,86 +393,66 @@ Cell[BoxData[
FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{158, 20},
+ ImageSize->{185, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Calc",
- CellLabel->"Out[4]=",
- CellID->1244287531]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"GluonVertex", "[",
- RowBox[{"p", ",", "1", ",", "q", ",", "2", ",",
- RowBox[{
- RowBox[{"-", "p"}], "-", "q"}], ",", "3"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "li1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "li2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "p"}], "-", "q"}], ",", "li3"}], "}"}]}], "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->1589340964],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["f",
+ SuperscriptBox["V",
RowBox[{
- FormBox[
- FormBox["ci1",
- TraditionalForm],
+ FormBox["li1",
TraditionalForm],
- FormBox[
- FormBox["ci2",
- TraditionalForm],
+ FormBox["li2",
TraditionalForm],
- FormBox[
- FormBox["ci3",
- TraditionalForm],
- TraditionalForm]}]], " ",
+ FormBox["li3",
+ TraditionalForm]}]], "(",
RowBox[{
- SuperscriptBox["V",
+ FormBox["p",
+ TraditionalForm],
+ FormBox["\<\", \"\>",
+ TraditionalForm],
+ FormBox["q",
+ TraditionalForm],
+ FormBox["\<\", \"\>",
+ TraditionalForm],
+ FormBox[
RowBox[{
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm]}]], "(",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\", \"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\", \"\>",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{
- RowBox[{"-",
- FormBox["p",
- TraditionalForm]}], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{226, 21},
+ RowBox[{"-", "p"}], "-", "q"}],
+ TraditionalForm]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{180, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Calc",
- CellLabel->"Out[5]=",
- CellID->706901544]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -459,21 +470,21 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "p"}], "-", "q"}], ",", "li3"}], "]"}]}], "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[6]:=",
+ CellLabel->"In[2]:=",
CellID->1411490249],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Calc",
- CellLabel->"Out[6]=",
- CellID->1029776951]
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -493,6 +504,12 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
+ StyleBox[ButtonBox["Trick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Trick",
+ ButtonNote->"Trick"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
@@ -504,16 +521,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Trick",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Trick",
- ButtonNote->"Trick"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Calc",
- CellID->573489970]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -521,7 +530,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Calc",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -530,22 +539,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 39.805412}",
+ "built" -> "{2020, 1, 5, 18, 52, 56.969401}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "Calc[exp] performs several basic simplifications. Calc[exp] is the same \
-as DotSimplify[DiracSimplify[Contract[DiracSimplify[Explicit[SUNSimplify[\
-Trick[exp], Explicit->False] ]]]]].", "synonyms" -> {}, "title" -> "Calc",
- "titlemodifier" -> "", "windowtitle" -> "Calc", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Calc"}, "SearchTextTranslated" -> ""},
+ "Calc[exp] performs several simplifications that involve Contract, \
+DiracSimplify SUNSimplify, DotSimplify, EpsEvaluate, ExpandScalarProduct, \
+PowerSimplify, Expand2 and Trick.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Calc", "titlemodifier" -> "", "windowtitle" -> "Calc", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Calc"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -553,8 +562,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -563,149 +573,120 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3403, 96, 385, 15, 31, "PrimaryExamplesSection",
+ Cell[4561, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->5943773]},
+ CellID->208222125]},
"Calc"->{
- Cell[4012, 123, 81, 2, 35, "Subsubsection",
- CellTags->"Calc",
- CellID->115873599],
- Cell[4096, 127, 366, 14, 35, "Text",
- CellTags->"Calc",
- CellID->117745359],
- Cell[4487, 145, 302, 10, 27, "Input",
- CellTags->"Calc",
- CellID->781527999],
- Cell[4792, 157, 253, 9, 36, "Output",
- CellTags->"Calc",
- CellID->1798215567],
- Cell[5060, 169, 234, 10, 33, "Text",
- CellTags->"Calc",
- CellID->1416000027],
- Cell[5319, 183, 276, 9, 27, "Input",
+ Cell[6608, 223, 276, 9, 27, "Input",
CellTags->"Calc",
CellID->779661922],
- Cell[5598, 194, 460, 19, 36, "Output",
- CellTags->"Calc",
- CellID->1521159153],
- Cell[6095, 218, 346, 12, 27, "Input",
+ Cell[6887, 234, 439, 18, 37, "Output",
+ CellTags->"Calc"],
+ Cell[7505, 264, 346, 12, 27, "Input",
CellTags->"Calc",
CellID->281198835],
- Cell[6444, 232, 1721, 73, 41, "Output",
- CellTags->"Calc",
- CellID->481463556],
- Cell[8202, 310, 120, 4, 27, "Input",
+ Cell[7854, 278, 1368, 58, 37, "Output",
+ CellTags->"Calc"],
+ Cell[9259, 341, 120, 4, 27, "Input",
CellTags->"Calc",
CellID->1838519780],
- Cell[8325, 316, 1226, 53, 41, "Output",
- CellTags->"Calc",
- CellID->1244287531],
- Cell[9588, 374, 234, 7, 27, "Input",
+ Cell[9382, 347, 1205, 52, 39, "Output",
+ CellTags->"Calc"],
+ Cell[10766, 411, 361, 13, 27, "Input",
CellTags->"Calc",
CellID->1589340964],
- Cell[9825, 383, 1357, 60, 42, "Output",
- CellTags->"Calc",
- CellID->706901544],
- Cell[11219, 448, 401, 14, 27, "Input",
+ Cell[11130, 426, 664, 28, 40, "Output",
+ CellTags->"Calc"],
+ Cell[11831, 459, 401, 14, 27, "Input",
CellTags->"Calc",
CellID->1411490249],
- Cell[11623, 464, 206, 7, 36, "Output",
- CellTags->"Calc",
- CellID->1029776951],
- Cell[12197, 494, 553, 21, 32, "Text",
- CellTags->"Calc",
- CellID->573489970]}
+ Cell[12235, 475, 185, 6, 35, "Output",
+ CellTags->"Calc"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14689, 564},
- {"Calc", 14817, 568}
+ {"PrimaryExamplesSection", 15292, 574},
+ {"Calc", 15423, 578}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2228, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3173, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2807, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2857, 78, 521, 14, 99, "Usage",
+Cell[3752, 100, 281, 11, 45, "ObjectNameGrid"],
+Cell[4036, 113, 500, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3403, 96, 385, 15, 31, "PrimaryExamplesSection",
+Cell[4561, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->5943773],
-Cell[3791, 113, 196, 6, 25, "ExampleSection",
- CellID->1585517748],
+ CellID->208222125],
Cell[CellGroupData[{
-Cell[4012, 123, 81, 2, 35, "Subsubsection",
- CellTags->"Calc",
- CellID->115873599],
-Cell[4096, 127, 366, 14, 35, "Text",
- CellTags->"Calc",
- CellID->117745359],
+Cell[4973, 149, 195, 6, 26, "ExampleSection",
+ CellID->539573558],
+Cell[5171, 157, 384, 14, 35, "Notes"],
Cell[CellGroupData[{
-Cell[4487, 145, 302, 10, 27, "Input",
- CellTags->"Calc",
- CellID->781527999],
-Cell[4792, 157, 253, 9, 36, "Output",
- CellTags->"Calc",
- CellID->1798215567]
+Cell[5580, 175, 141, 4, 27, "Input"],
+Cell[5724, 181, 166, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5927, 191, 147, 4, 27, "Input"],
+Cell[6077, 197, 166, 5, 35, "Output"]
}, Open ]],
-Cell[5060, 169, 234, 10, 33, "Text",
- CellTags->"Calc",
- CellID->1416000027],
Cell[CellGroupData[{
-Cell[5319, 183, 276, 9, 27, "Input",
+Cell[6280, 207, 105, 2, 9, "ExampleDelimiter"],
+Cell[6388, 211, 195, 8, 33, "Notes"],
+Cell[CellGroupData[{
+Cell[6608, 223, 276, 9, 27, "Input",
CellTags->"Calc",
CellID->779661922],
-Cell[5598, 194, 460, 19, 36, "Output",
- CellTags->"Calc",
- CellID->1521159153]
+Cell[6887, 234, 439, 18, 37, "Output",
+ CellTags->"Calc"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[6095, 218, 346, 12, 27, "Input",
+Cell[7375, 258, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[7505, 264, 346, 12, 27, "Input",
CellTags->"Calc",
CellID->281198835],
-Cell[6444, 232, 1721, 73, 41, "Output",
- CellTags->"Calc",
- CellID->481463556]
+Cell[7854, 278, 1368, 58, 37, "Output",
+ CellTags->"Calc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8202, 310, 120, 4, 27, "Input",
+Cell[9259, 341, 120, 4, 27, "Input",
CellTags->"Calc",
CellID->1838519780],
-Cell[8325, 316, 1226, 53, 41, "Output",
- CellTags->"Calc",
- CellID->1244287531]
+Cell[9382, 347, 1205, 52, 39, "Output",
+ CellTags->"Calc"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[9588, 374, 234, 7, 27, "Input",
+Cell[10636, 405, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[10766, 411, 361, 13, 27, "Input",
CellTags->"Calc",
CellID->1589340964],
-Cell[9825, 383, 1357, 60, 42, "Output",
- CellTags->"Calc",
- CellID->706901544]
+Cell[11130, 426, 664, 28, 40, "Output",
+ CellTags->"Calc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11219, 448, 401, 14, 27, "Input",
+Cell[11831, 459, 401, 14, 27, "Input",
CellTags->"Calc",
CellID->1411490249],
-Cell[11623, 464, 206, 7, 36, "Output",
- CellTags->"Calc",
- CellID->1029776951]
-}, Open ]],
-Cell[11844, 474, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12235, 475, 185, 6, 35, "Output",
+ CellTags->"Calc"]
+}, Open ]]
}, Open ]]
}, Open ]],
+Cell[12459, 486, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[11924, 480, 270, 12, 31, "SeeAlsoSection",
+Cell[12527, 491, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12197, 494, 553, 21, 32, "Text",
- CellTags->"Calc",
- CellID->573489970]
+Cell[12800, 505, 517, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[12765, 518, 23, 0, 42, "FooterCell"]
+Cell[13332, 527, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalcColorFactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalcColorFactor.nb
index 0873e8c91..092fc850d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalcColorFactor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalcColorFactor.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17303, 585]
-NotebookOptionsPosition[ 12786, 451]
-NotebookOutlinePosition[ 15996, 537]
-CellTagsIndexPosition[ 15877, 531]
+NotebookDataLength[ 11187, 378]
+NotebookOptionsPosition[ 7799, 276]
+NotebookOutlinePosition[ 10115, 340]
+CellTagsIndexPosition[ 9998, 334]
WindowTitle->CalcColorFactor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CalcColorFactor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CalcColorFactor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CalcColorFactor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CalcColorFactor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
CalcColorFactor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$23191],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CalcColorFactor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$30335],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CalcColorFactor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +95,28 @@ CalcColorFactor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CalcColorFactor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CalcColorFactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"CalcColorFactor", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "calculates the color factor of expr. CalcColorFactor is useful for \
-application on FeynArts produced amplitudes. CalcColorFactor is just a macro \
-function for CalcColorFactor[x_] := \nIf[FreeQ2[FeynCalcInternal[x], \
-SUNIndex], x, \n SUNSimplify[SUNSimplify[ (If[ \
-!FreeQ[#1, DiracGamma], DiracTrick[#1], #1] & )[ SUNSimplify[x]], Explicit \
--> False], Explicit -> True]]."
+ RowBox[{"CalcColorFactor", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]calculates the color factor of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,6 +127,63 @@ SUNIndex], x, \n SUNSimplify[SUNSimplify[ (If[ \
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->178534245],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ ButtonBox["CalcColorFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CalcColorFactor",
+ ButtonNote->"CalcColorFactor"],
+ " is useful for application on FeynArts produced amplitudes."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CalcColorFactor", "]"}]], "Input",
+ CellLabel->"In[41]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"SUNNToCACF", "\[Rule]", "True"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{152, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[41]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +199,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->251027868],
+ CellID->666716832],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -120,13 +209,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->457961396],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"CalcColorFactor",
- CellID->86935840],
+ CellID->1547004803],
Cell[CellGroupData[{
@@ -155,268 +238,15 @@ Cell[BoxData[
FormBox["d",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{54, 19},
+ ImageSize->{63, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CalcColorFactor",
- CellLabel->"Out[1]=",
- CellID->1436200004]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Amplitude", "[", "\"\\"", "]"}]], "Input",
- CellTags->"CalcColorFactor",
- CellLabel->"In[2]:=",
- CellID->1818256691],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"SUNDeltaContract", "(",
- RowBox[{
- RowBox[{
- SubsuperscriptBox["\[CapitalPi]",
- RowBox[{
- FormBox["ci1",
- TraditionalForm],
- FormBox["ci3",
- TraditionalForm]}],
- RowBox[{
- FormBox["li1",
- TraditionalForm],
- FormBox["li3",
- TraditionalForm]}]], "(",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], ")"}], " ",
- RowBox[{
- SubsuperscriptBox["\[CapitalPi]",
- RowBox[{
- FormBox["ci9",
- TraditionalForm],
- FormBox["ci11",
- TraditionalForm]}],
- RowBox[{
- FormBox["li9",
- TraditionalForm],
- FormBox["li11",
- TraditionalForm]}]], "(",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], ")"}], " ",
- RowBox[{
- SubsuperscriptBox["Q",
- FormBox["ci11",
- TraditionalForm],
- FormBox["li11",
- TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[CapitalPi]", "q"], "(",
- FormBox[
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}], "-",
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}]}],
- TraditionalForm], ")"}], ".",
- SubsuperscriptBox["Q",
- FormBox["ci1",
- TraditionalForm],
- FormBox["li1",
- TraditionalForm]]}], " ",
- RowBox[{"(",
- RowBox[{"-",
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{"2", " ",
- SubscriptBox["T", "f"], " ",
- RowBox[{
- RowBox[{
- SubscriptBox["\[CapitalPi]", "q"], "(",
- FormBox[
- RowBox[{"-",
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}]}],
- TraditionalForm], ")"}], ".",
- SubsuperscriptBox["Q",
- FormBox["ci9",
- TraditionalForm],
- FormBox["li9",
- TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[CapitalPi]", "q"], "(",
- FormBox[
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}], "-",
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}]}],
- TraditionalForm], ")"}], ".",
- SubsuperscriptBox["Q",
- FormBox["ci3",
- TraditionalForm],
- FormBox["li3",
- TraditionalForm]]}]}],
- TraditionalForm], ")"}]}], ")"}]}], ")"}], TraditionalForm]], "Output",\
-
- ImageSize->{503, 81},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"CalcColorFactor",
- CellLabel->"Out[2]=",
- CellID->1553911339]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"CalcColorFactor", "@",
- RowBox[{"Explicit", "@", "%"}]}]], "Input",
- CellTags->"CalcColorFactor",
- CellLabel->"In[3]:=",
- CellID->361683152],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[ImaginaryI]", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["T", "f"], " ",
- SuperscriptBox[
- RowBox[{"(",
- FractionBox["1",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"]], ")"}], "2"], " ",
- SubsuperscriptBox["g", "s", "4"], " ",
- RowBox[{"(",
- RowBox[{
- SubscriptBox["C", "A"], "-",
- RowBox[{"2", " ",
- SubscriptBox["C", "F"]}]}], ")"}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li11",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li11",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm]]}], " ",
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm]]}],
- TraditionalForm], ")"}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{433, 149},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"CalcColorFactor",
- CellLabel->"Out[3]=",
- CellID->1233692379]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -435,16 +265,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["SUNSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SUNSimplify",
- ButtonNote->"SUNSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"CalcColorFactor",
- CellID->1899752684]
+Cell[TextData[StyleBox[ButtonBox["SUNSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNSimplify",
+ ButtonNote->"SUNSimplify"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -461,26 +286,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 38.218385}",
+ "built" -> "{2020, 1, 5, 18, 52, 55.849297}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "CalcColorFactor[expr] calculates the color factor of expr. \
-CalcColorFactor is useful for application on FeynArts produced amplitudes. \
-CalcColorFactor is just a macro function for CalcColorFactor[x_] := \
-If[FreeQ2[FeynCalcInternal[x], SUNIndex], x, SUNSimplify[SUNSimplify[ (If[ \
-!FreeQ[#1, DiracGamma], DiracTrick[#1], #1] & )[SUNSimplify[x]], Explicit -> \
-False], Explicit -> True]].", "synonyms" -> {}, "title" -> "CalcColorFactor",
+ "CalcColorFactor[exp] calculates the color factor of exp.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CalcColorFactor",
"titlemodifier" -> "", "windowtitle" -> "CalcColorFactor", "type" ->
"Symbol", "uri" -> "FeynCalc/ref/CalcColorFactor"},
"SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -488,8 +309,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -498,95 +320,66 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3700, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5823, 186, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->251027868]},
+ CellID->666716832]},
"CalcColorFactor"->{
- Cell[4310, 126, 91, 2, 35, "Subsubsection",
- CellTags->"CalcColorFactor",
- CellID->86935840],
- Cell[4426, 132, 299, 9, 27, "Input",
+ Cell[6456, 215, 299, 9, 27, "Input",
CellTags->"CalcColorFactor",
CellID->1491586567],
- Cell[4728, 143, 471, 19, 40, "Output",
- CellTags->"CalcColorFactor",
- CellID->1436200004],
- Cell[5236, 167, 148, 4, 27, "Input",
- CellTags->"CalcColorFactor",
- CellID->1818256691],
- Cell[5387, 173, 2564, 89, 102, "Output",
- CellTags->"CalcColorFactor",
- CellID->1553911339],
- Cell[7988, 267, 166, 5, 27, "Input",
- CellTags->"CalcColorFactor",
- CellID->361683152],
- Cell[8157, 274, 3975, 140, 170, "Output",
- CellTags->"CalcColorFactor",
- CellID->1233692379],
- Cell[12500, 437, 244, 9, 70, "Text",
- CellTags->"CalcColorFactor",
- CellID->1899752684]}
+ Cell[6758, 226, 450, 18, 40, "Output",
+ CellTags->"CalcColorFactor"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14937, 499},
- {"CalcColorFactor", 15078, 503}
+ {"PrimaryExamplesSection", 9663, 321},
+ {"CalcColorFactor", 9805, 325}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3036, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 751, 17, 165, "Usage",
- CellID->982511436],
+Cell[3626, 97, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3700, 99, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->251027868],
-Cell[4090, 116, 195, 6, 25, "ExampleSection",
- CellID->457961396],
+Cell[3943, 112, 428, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4310, 126, 91, 2, 35, "Subsubsection",
- CellTags->"CalcColorFactor",
- CellID->86935840],
+Cell[4396, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->178534245],
+Cell[5137, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5171, 157, 229, 6, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4426, 132, 299, 9, 27, "Input",
- CellTags->"CalcColorFactor",
- CellID->1491586567],
-Cell[4728, 143, 471, 19, 40, "Output",
- CellTags->"CalcColorFactor",
- CellID->1436200004]
+Cell[5425, 167, 98, 2, 70, "Input"],
+Cell[5526, 171, 236, 8, 35, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5236, 167, 148, 4, 27, "Input",
- CellTags->"CalcColorFactor",
- CellID->1818256691],
-Cell[5387, 173, 2564, 89, 102, "Output",
- CellTags->"CalcColorFactor",
- CellID->1553911339]
-}, Open ]],
+Cell[5823, 186, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->666716832],
Cell[CellGroupData[{
-Cell[7988, 267, 166, 5, 27, "Input",
- CellTags->"CalcColorFactor",
- CellID->361683152],
-Cell[8157, 274, 3975, 140, 170, "Output",
+Cell[6235, 205, 196, 6, 26, "ExampleSection",
+ CellID->1547004803],
+Cell[CellGroupData[{
+Cell[6456, 215, 299, 9, 27, "Input",
CellTags->"CalcColorFactor",
- CellID->1233692379]
-}, Open ]],
-Cell[12147, 417, 31, 0, 70, "SectionFooterSpacer"]
+ CellID->1491586567],
+Cell[6758, 226, 450, 18, 40, "Output",
+ CellTags->"CalcColorFactor"]
}, Open ]]
}, Open ]],
+Cell[7235, 248, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[12227, 423, 270, 12, 70, "SeeAlsoSection",
+Cell[7303, 253, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12500, 437, 244, 9, 70, "Text",
- CellTags->"CalcColorFactor",
- CellID->1899752684]
+Cell[7576, 267, 181, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[12759, 449, 23, 0, 70, "FooterCell"]
+Cell[7772, 274, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalculateCounterTerm.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalculateCounterTerm.nb
index 397f74b79..a37162f7a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalculateCounterTerm.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CalculateCounterTerm.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5326, 147]
-NotebookOptionsPosition[ 3404, 95]
-NotebookOutlinePosition[ 5248, 143]
-CellTagsIndexPosition[ 5205, 140]
+NotebookDataLength[ 7529, 232]
+NotebookOptionsPosition[ 5168, 166]
+NotebookOutlinePosition[ 7088, 216]
+CellTagsIndexPosition[ 7045, 213]
WindowTitle->CalculateCounterTerm
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ CalculateCounterTerm.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$23867],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$31238],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/CalculateCounterTerm", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ CalculateCounterTerm.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CalculateCounterTerm", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CalculateCounterTerm", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -91,6 +104,64 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->982511436],
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->468041515],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This is a rather special function designed for some specific OPE \
+calculations. Not a universal routine for daily use.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CalculateCounterTerm", "]"}]], "Input",
+ CellLabel->"In[240]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Chisholm", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"D", "\[Rule]", "4"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{306, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[240]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
@@ -105,21 +176,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 41.391613}",
+ "built" -> "{2020, 1, 5, 18, 52, 58.155752}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"CalculateCounterTerm[exp, k] calculates the residue of exp.",
- "synonyms" -> {}, "title" -> "CalculateCounterTerm", "titlemodifier" ->
- "", "windowtitle" -> "CalculateCounterTerm", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/CalculateCounterTerm"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CalculateCounterTerm",
+ "titlemodifier" -> "", "windowtitle" -> "CalculateCounterTerm", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CalculateCounterTerm"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -127,8 +199,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -142,15 +215,28 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[592, 21, 2293, 52, 70, "AnchorBarGrid",
+Cell[592, 21, 2321, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2888, 75, 63, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2954, 78, 420, 13, 70, "Usage",
+Cell[2916, 76, 297, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3238, 91, 420, 13, 85, "Usage",
CellID->982511436],
-Cell[3377, 93, 23, 0, 70, "FooterCell"]
+Cell[CellGroupData[{
+Cell[3683, 108, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->468041515],
+Cell[4424, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4458, 136, 144, 3, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[4627, 143, 104, 2, 70, "Input"],
+Cell[4734, 147, 368, 12, 35, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[5141, 164, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianIndex.nb
new file mode 100644
index 000000000..2187a6011
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianIndex.nb
@@ -0,0 +1,397 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11606, 387]
+NotebookOptionsPosition[ 7658, 268]
+NotebookOutlinePosition[ 10397, 342]
+CellTagsIndexPosition[ 10283, 336]
+WindowTitle->CartesianIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LorentzIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LorentzIndex"], "\<\"ExplicitLorentzIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ExplicitLorentzIndex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CartesianIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CartesianIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CartesianIndex.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$32114],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CartesianIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CartesianIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["CartesianIndex"], "InlineFormula"],
+ " \[LineSeparator]is the head of Cartesian indices. The internal \
+representation of a three-dimensional i is CartesianIndex[i]. For other than \
+three dimensions: CartesianIndex[i, Dimension]. CartesianIndex[i, 3] \
+simplifies to CartesianIndex[i]. The first argument cannot be an integer."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1933641052],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1779288678],
+
+Cell["This denotes a 3-dimensional Cartesian index.", "Notes",
+ CellID->1041402073],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianIndex", "[", "i", "]"}]], "Input",
+ CellTags->"LorentzIndex",
+ CellLabel->"In[1]:=",
+ CellID->1526768444],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ ImageSize->{14, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"LorentzIndex",
+ CellLabel->"Out[1]=",
+ CellID->1197436861]
+}, Open ]],
+
+Cell["\<\
+An optional second argument can be given for a dimension different from 3.\
+\>", "Notes",
+ CellID->512979420],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]], "Input",
+ CellTags->"LorentzIndex",
+ CellLabel->"In[2]:=",
+ CellID->1273197083],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ ImageSize->{14, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"LorentzIndex",
+ CellLabel->"Out[2]=",
+ CellID->131600211]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "4"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1172438313],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ ImageSize->{14, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1014527091]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["LorentzIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
+ ButtonNote->"LorentzIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ExplicitLorentzIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExplicitLorentzIndex",
+ ButtonNote->"ExplicitLorentzIndex"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"CartesianIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 0.531766}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CartesianIndex is the head of Cartesian indices. The internal \
+representation of a three-dimensional i is CartesianIndex[i]. For other than \
+three dimensions: CartesianIndex[i, Dimension]. CartesianIndex[i, 3] \
+simplifies to CartesianIndex[i]. The first argument cannot be an integer.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CartesianIndex",
+ "titlemodifier" -> "", "windowtitle" -> "CartesianIndex", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CartesianIndex"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4640, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1933641052]},
+ "LorentzIndex"->{
+ Cell[5360, 161, 138, 4, 27, "Input",
+ CellTags->"LorentzIndex",
+ CellID->1526768444],
+ Cell[5501, 167, 272, 10, 35, "Output",
+ CellTags->"LorentzIndex",
+ CellID->1197436861],
+ Cell[5932, 187, 185, 6, 27, "Input",
+ CellTags->"LorentzIndex",
+ CellID->1273197083],
+ Cell[6120, 195, 271, 10, 35, "Output",
+ CellTags->"LorentzIndex",
+ CellID->131600211]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9748, 316},
+ {"LorentzIndex", 9888, 320}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3152, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3741, 99, 291, 11, 45, "ObjectNameGrid"],
+Cell[4035, 112, 580, 13, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4640, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1933641052],
+Cell[CellGroupData[{
+Cell[5053, 148, 196, 6, 26, "ExampleSection",
+ CellID->1779288678],
+Cell[5252, 156, 83, 1, 32, "Notes",
+ CellID->1041402073],
+Cell[CellGroupData[{
+Cell[5360, 161, 138, 4, 27, "Input",
+ CellTags->"LorentzIndex",
+ CellID->1526768444],
+Cell[5501, 167, 272, 10, 35, "Output",
+ CellTags->"LorentzIndex",
+ CellID->1197436861]
+}, Open ]],
+Cell[5788, 180, 119, 3, 32, "Notes",
+ CellID->512979420],
+Cell[CellGroupData[{
+Cell[5932, 187, 185, 6, 27, "Input",
+ CellTags->"LorentzIndex",
+ CellID->1273197083],
+Cell[6120, 195, 271, 10, 35, "Output",
+ CellTags->"LorentzIndex",
+ CellID->131600211]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6428, 210, 158, 5, 27, "Input",
+ CellID->1172438313],
+Cell[6589, 217, 245, 9, 35, "Output",
+ CellID->1014527091]
+}, Open ]]
+}, Open ]],
+Cell[6861, 230, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6929, 235, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[7202, 249, 414, 14, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[7631, 266, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianMomentum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianMomentum.nb
new file mode 100644
index 000000000..bd391fd50
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianMomentum.nb
@@ -0,0 +1,755 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 20670, 745]
+NotebookOptionsPosition[ 13481, 504]
+NotebookOutlinePosition[ 17631, 627]
+CellTagsIndexPosition[ 17519, 621]
+WindowTitle->CartesianMomentum
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Momentum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Momentum"], "\<\"TemporalMomentum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/TemporalMomentum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CartesianMomentum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CartesianMomentum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CartesianMomentum.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$32559],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CartesianMomentum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CartesianMomentum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the head of a three momentum (p). The internal \
+representation of a three-dimensional p is CartesianMomentum[p]. For other \
+than three dimensions: CartesianMomentum[p, Dimension]. CartesianMomentum[p, \
+3] simplifies to CartesianMomentum[p]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->620582694],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->570090989],
+
+Cell["This is a 3-dimensional momentum.", "Notes",
+ CellID->1432666781],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[1]:=",
+ CellID->600679238],
+
+Cell[BoxData[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], TraditionalForm]], "Output",
+ ImageSize->{19, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[1]=",
+ CellID->1847189121]
+}, Open ]],
+
+Cell["\<\
+As an optional second argument the dimension must be specified if it is \
+different from 3.\
+\>", "Notes",
+ CellID->278592021],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[2]:=",
+ CellID->298033535],
+
+Cell[BoxData[
+ FormBox["p", TraditionalForm]], "Output",
+ ImageSize->{16, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[2]=",
+ CellID->1288297410]
+}, Open ]],
+
+Cell["The dimension index is supressed in the output.", "Notes",
+ CellID->30302725],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"d", "-", "1"}]}], "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[3]:=",
+ CellID->22007276],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ ImageSize->{17, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[3]=",
+ CellID->1337449591]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a1", "=",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"-", "q"}], "]"}]}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[4]:=",
+ CellID->1076166182],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}], TraditionalForm]], "Output",
+ ImageSize->{30, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[4]=",
+ CellID->1841511383]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a1", "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[5]:=",
+ CellID->1156784400],
+
+Cell[BoxData[
+ RowBox[{"-",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}]], "Output",
+ ImageSize->{177, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1296577309]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a2", " ", "=", " ",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"2", "q"}], "]"}]}]}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[6]:=",
+ CellID->1010535805],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm], ")"}], "+",
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}]}], TraditionalForm]], "Output",
+ ImageSize->{105, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[6]=",
+ CellID->1027005270]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a2", "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[7]:=",
+ CellID->856207433],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}]}]], "Output",
+ ImageSize->{382, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->51962391]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"a2", "//", "MomentumExpand"}], "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[8]:=",
+ CellID->265634009],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "+",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}]], "Output",
+ ImageSize->{346, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[8]//StandardForm=",
+ CellID->827290533]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"a2", "//", "MomentumCombine"}], "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[9]:=",
+ CellID->168866988],
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "+", "q"}], "]"}]], "Output",
+ ImageSize->{192, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[9]//StandardForm=",
+ CellID->630640997]
+}, Open ]],
+
+Cell["\<\
+Notice that when changing the dimension, one must specify its value as if the \
+the 3-vector were the spatial component of the corresponding 4-vector\
+\>", "Notes",
+ CellID->257067347],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"d", "-", "1"}]}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->2130880073],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"ChangeDimension", "::", "failmsg"}], "MessageName"], ":",
+ " ", "\<\"Error! ChangeDimension has encountered a fatal problem and must \
+abort the computation. The problem reads: \[NoBreak]\\!\\(\\*FormBox[\\\"\\\\\
+\\\"Unsupported choice of dimension!\\\\\\\"\\\", TraditionalForm]\\)\
+\[NoBreak] \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\
+\\\", ButtonFrame->None, \
+ButtonData:>\\\"paclet:FeynCalc/ref/ChangeDimension\\\", ButtonNote -> \
+\\\"FeynCalc`ChangeDimension::failmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[10]:=",
+ CellID->1857962247],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->1904306707]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",", "d"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[11]:=",
+ CellID->1679956191],
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "d"}]}], "]"}]], "Output",
+ ImageSize->{222, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Momentum",
+ CellLabel->"Out[11]//StandardForm=",
+ CellID->1622166204]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"Clear", "[",
+ RowBox[{"a1", ",", "a2"}], "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[12]:=",
+ CellID->919568834]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Momentum",
+ ButtonNote->"Momentum"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["TemporalMomentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TemporalMomentum",
+ ButtonNote->"TemporalMomentum"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CartesianMomentum",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 1.704825}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CartesianMomentum[p] is the head of a three momentum (p). The internal \
+representation of a three-dimensional p is CartesianMomentum[p]. For other \
+than three dimensions: CartesianMomentum[p, Dimension]. CartesianMomentum[p, \
+3] simplifies to CartesianMomentum[p].", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "CartesianMomentum", "titlemodifier" -> "", "windowtitle" ->
+ "CartesianMomentum", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CartesianMomentum"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4643, 129, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->620582694]},
+ "Momentum"->{
+ Cell[5349, 161, 136, 4, 27, "Input",
+ CellTags->"Momentum",
+ CellID->600679238],
+ Cell[5488, 167, 331, 13, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1847189121],
+ Cell[5995, 191, 183, 6, 27, "Input",
+ CellTags->"Momentum",
+ CellID->298033535],
+ Cell[6181, 199, 210, 7, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1288297410],
+ Cell[6514, 214, 182, 6, 27, "Input",
+ CellTags->"Momentum",
+ CellID->22007276],
+ Cell[6699, 222, 268, 10, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1337449591],
+ Cell[7004, 237, 180, 6, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1076166182],
+ Cell[7187, 245, 355, 14, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1841511383],
+ Cell[7579, 264, 129, 4, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1156784400],
+ Cell[7711, 270, 258, 8, 51, "Output",
+ CellTags->"Momentum",
+ CellID->1296577309],
+ Cell[8006, 283, 295, 9, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1010535805],
+ Cell[8304, 294, 767, 31, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1027005270],
+ Cell[9108, 330, 128, 4, 27, "Input",
+ CellTags->"Momentum",
+ CellID->856207433],
+ Cell[9239, 336, 353, 11, 51, "Output",
+ CellTags->"Momentum",
+ CellID->51962391],
+ Cell[9629, 352, 165, 5, 27, "Input",
+ CellTags->"Momentum",
+ CellID->265634009],
+ Cell[9797, 359, 306, 9, 51, "Output",
+ CellTags->"Momentum",
+ CellID->827290533],
+ Cell[10140, 373, 166, 5, 27, "Input",
+ CellTags->"Momentum",
+ CellID->168866988],
+ Cell[10309, 380, 262, 8, 51, "Output",
+ CellTags->"Momentum",
+ CellID->630640997],
+ Cell[11973, 435, 244, 8, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1679956191],
+ Cell[12220, 445, 308, 10, 51, "Output",
+ CellTags->"Momentum",
+ CellID->1622166204],
+ Cell[12543, 458, 150, 5, 27, "Input",
+ CellTags->"Momentum",
+ CellID->919568834]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15503, 550},
+ {"Momentum", 15638, 554}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 3140, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3732, 98, 294, 11, 45, "ObjectNameGrid"],
+Cell[4029, 111, 589, 14, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4643, 129, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->620582694],
+Cell[CellGroupData[{
+Cell[5055, 148, 195, 6, 26, "ExampleSection",
+ CellID->570090989],
+Cell[5253, 156, 71, 1, 32, "Notes",
+ CellID->1432666781],
+Cell[CellGroupData[{
+Cell[5349, 161, 136, 4, 27, "Input",
+ CellTags->"Momentum",
+ CellID->600679238],
+Cell[5488, 167, 331, 13, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1847189121]
+}, Open ]],
+Cell[5834, 183, 136, 4, 32, "Notes",
+ CellID->278592021],
+Cell[CellGroupData[{
+Cell[5995, 191, 183, 6, 27, "Input",
+ CellTags->"Momentum",
+ CellID->298033535],
+Cell[6181, 199, 210, 7, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1288297410]
+}, Open ]],
+Cell[6406, 209, 83, 1, 32, "Notes",
+ CellID->30302725],
+Cell[CellGroupData[{
+Cell[6514, 214, 182, 6, 27, "Input",
+ CellTags->"Momentum",
+ CellID->22007276],
+Cell[6699, 222, 268, 10, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1337449591]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7004, 237, 180, 6, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1076166182],
+Cell[7187, 245, 355, 14, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1841511383]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7579, 264, 129, 4, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1156784400],
+Cell[7711, 270, 258, 8, 51, "Output",
+ CellTags->"Momentum",
+ CellID->1296577309]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8006, 283, 295, 9, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1010535805],
+Cell[8304, 294, 767, 31, 37, "Output",
+ CellTags->"Momentum",
+ CellID->1027005270]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9108, 330, 128, 4, 27, "Input",
+ CellTags->"Momentum",
+ CellID->856207433],
+Cell[9239, 336, 353, 11, 51, "Output",
+ CellTags->"Momentum",
+ CellID->51962391]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9629, 352, 165, 5, 27, "Input",
+ CellTags->"Momentum",
+ CellID->265634009],
+Cell[9797, 359, 306, 9, 51, "Output",
+ CellTags->"Momentum",
+ CellID->827290533]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10140, 373, 166, 5, 27, "Input",
+ CellTags->"Momentum",
+ CellID->168866988],
+Cell[10309, 380, 262, 8, 51, "Output",
+ CellTags->"Momentum",
+ CellID->630640997]
+}, Open ]],
+Cell[10586, 391, 194, 4, 49, "Notes",
+ CellID->257067347],
+Cell[CellGroupData[{
+Cell[10805, 399, 243, 7, 27, "Input",
+ CellID->2130880073],
+Cell[11051, 408, 687, 14, 60, "Message",
+ CellID->1857962247],
+Cell[11741, 424, 195, 6, 35, "Output",
+ CellID->1904306707]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11973, 435, 244, 8, 27, "Input",
+ CellTags->"Momentum",
+ CellID->1679956191],
+Cell[12220, 445, 308, 10, 51, "Output",
+ CellTags->"Momentum",
+ CellID->1622166204]
+}, Open ]],
+Cell[12543, 458, 150, 5, 27, "Input",
+ CellTags->"Momentum",
+ CellID->919568834]
+}, Open ]],
+Cell[12708, 466, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12776, 471, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[13049, 485, 390, 14, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[13454, 502, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianPair.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianPair.nb
new file mode 100644
index 000000000..65716485d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianPair.nb
@@ -0,0 +1,1131 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 28818, 1121]
+NotebookOptionsPosition[ 20677, 835]
+NotebookOutlinePosition[ 24861, 966]
+CellTagsIndexPosition[ 24753, 960]
+WindowTitle->CartesianPair
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"TemporalPair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/TemporalPair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CartesianPair\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CartesianPair"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CartesianPair.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$33023],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CartesianPair", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CartesianPair", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is a special pairing used in the internal \
+representation."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1689119107],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " may have heads ",
+ ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianIndex"],
+ " or ",
+ ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianMomentum"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "If both ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " have head ",
+ ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianIndex"],
+ ", the Kronecker delta is understood."
+}], "Notes",
+ CellID->2118799541],
+
+Cell[TextData[{
+ "If ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " have head ",
+ ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianMomentum"],
+ ", a Cartesian scalar product is meant."
+}], "Notes",
+ CellID->848101134],
+
+Cell[TextData[{
+ "If one of ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " has head ",
+ ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianIndex"],
+ " and the other ",
+ ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianMomentum"],
+ ", a Cartesian vector ",
+ Cell[BoxData[
+ SuperscriptBox["p", "i"]], "InlineFormula"],
+ " is understood."
+}], "Notes",
+ CellID->669577228]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2048777355],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1523619138],
+
+Cell["This represents a three-dimensional Kronecker delta", "Notes",
+ CellID->108594348],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[1]:=",
+ CellID->1043747934],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{34, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[1]=",
+ CellID->492303314]
+}, Open ]],
+
+Cell["This is a D-1-dimensional Kronecker delta", "Notes",
+ CellID->1900001937],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[2]:=",
+ CellID->1359804749],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[2]=",
+ CellID->150522700]
+}, Open ]],
+
+Cell["\<\
+If the Cartesian indices live in different dimensions, this gets resolved \
+according to the t'Hoft-Veltman-Breitenlohner-Maison prescription\
+\>", "Notes",
+ CellID->1264095069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[3]:=",
+ CellID->1343625376],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{34, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[3]=",
+ CellID->127506986]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{"D", "-", "4"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1397592277],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "^"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1695876987]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{"D", "-", "4"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1349044184],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1857718213]
+}, Open ]],
+
+Cell["A 3-dimensional Cartesian vector", "Notes",
+ CellID->721455208],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[6]:=",
+ CellID->958079821],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[6]=",
+ CellID->714556073]
+}, Open ]],
+
+Cell["A D-1-dimensional Cartesian vector", "Notes",
+ CellID->1682684397],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[7]:=",
+ CellID->106742008],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[7]=",
+ CellID->1365320302]
+}, Open ]],
+
+Cell["3-dimensional scalar products of Cartesian vectors", "Notes",
+ CellID->1100214782],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "q", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[8]:=",
+ CellID->1770091706],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{45, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[8]=",
+ CellID->1726621755]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[9]:=",
+ CellID->227830423],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{27, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[9]=",
+ CellID->563188072]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[10]:=",
+ CellID->25203155],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{94, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[10]=",
+ CellID->1222876519]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], "^",
+ "2"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[11]:=",
+ CellID->1431519685],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "4"], TraditionalForm]], "Output",
+ ImageSize->{27, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[11]=",
+ CellID->1761928129]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], "^",
+ "3"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[12]:=",
+ CellID->721851127],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "6"], TraditionalForm]], "Output",
+ ImageSize->{27, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[12]=",
+ CellID->282397427]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[13]:=",
+ CellID->294431519],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{84, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[13]=",
+ CellID->1642628671]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"-", "q"}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], " ", "+", " ",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "q", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[14]:=",
+ CellID->1586756083],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[14]=",
+ CellID->2130854097]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["TemporalPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TemporalPair",
+ ButtonNote->"TemporalPair"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CartesianPair",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 3.050440}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CartesianPair[a, b] is a special pairing used in the internal \
+representation.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CartesianPair", "titlemodifier" -> "", "windowtitle" -> "CartesianPair",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/CartesianPair"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6799, 224, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2048777355]},
+ "Pair"->{
+ Cell[7524, 256, 236, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->1043747934],
+ Cell[7763, 265, 567, 24, 38, "Output",
+ CellTags->"Pair",
+ CellID->492303314],
+ Cell[8449, 297, 338, 11, 27, "Input",
+ CellTags->"Pair",
+ CellID->1359804749],
+ Cell[8790, 310, 543, 23, 38, "Output",
+ CellTags->"Pair",
+ CellID->150522700],
+ Cell[9560, 344, 287, 9, 27, "Input",
+ CellTags->"Pair",
+ CellID->1343625376],
+ Cell[9850, 355, 567, 24, 38, "Output",
+ CellTags->"Pair",
+ CellID->127506986],
+ Cell[11929, 448, 238, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->958079821],
+ Cell[12170, 457, 533, 23, 40, "Output",
+ CellTags->"Pair",
+ CellID->714556073],
+ Cell[12815, 488, 340, 11, 27, "Input",
+ CellTags->"Pair",
+ CellID->106742008],
+ Cell[13158, 501, 504, 22, 40, "Output",
+ CellTags->"Pair",
+ CellID->1365320302],
+ Cell[13790, 531, 242, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->1770091706],
+ Cell[14035, 540, 616, 26, 37, "Output",
+ CellTags->"Pair",
+ CellID->1726621755],
+ Cell[14688, 571, 241, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->227830423],
+ Cell[14932, 580, 396, 16, 39, "Output",
+ CellTags->"Pair",
+ CellID->563188072],
+ Cell[15365, 601, 266, 8, 27, "Input",
+ CellTags->"Pair",
+ CellID->25203155],
+ Cell[15634, 611, 930, 39, 37, "Output",
+ CellTags->"Pair",
+ CellID->1222876519],
+ Cell[16601, 655, 272, 9, 27, "Input",
+ CellTags->"Pair",
+ CellID->1431519685],
+ Cell[16876, 666, 398, 16, 39, "Output",
+ CellTags->"Pair",
+ CellID->1761928129],
+ Cell[17311, 687, 271, 9, 27, "Input",
+ CellTags->"Pair",
+ CellID->721851127],
+ Cell[17585, 698, 397, 16, 39, "Output",
+ CellTags->"Pair",
+ CellID->282397427],
+ Cell[18019, 719, 317, 9, 45, "Input",
+ CellTags->"Pair",
+ CellID->294431519],
+ Cell[18339, 730, 859, 36, 39, "Output",
+ CellTags->"Pair",
+ CellID->1642628671],
+ Cell[19235, 771, 456, 13, 45, "Input",
+ CellTags->"Pair",
+ CellID->1586756083],
+ Cell[19694, 786, 207, 7, 35, "Output",
+ CellTags->"Pair",
+ CellID->2130854097]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 22550, 880},
+ {"Pair", 22682, 884}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 3108, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3696, 98, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4011, 113, 427, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4463, 130, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1689119107],
+Cell[5205, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5239, 158, 383, 14, 70, "Notes",
+ CellID->1067943069],
+Cell[5625, 174, 307, 11, 70, "Notes",
+ CellID->2118799541],
+Cell[5935, 187, 309, 11, 70, "Notes",
+ CellID->848101134],
+Cell[6247, 200, 503, 18, 70, "Notes",
+ CellID->669577228]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6799, 224, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2048777355],
+Cell[CellGroupData[{
+Cell[7212, 243, 196, 6, 26, "ExampleSection",
+ CellID->1523619138],
+Cell[7411, 251, 88, 1, 32, "Notes",
+ CellID->108594348],
+Cell[CellGroupData[{
+Cell[7524, 256, 236, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->1043747934],
+Cell[7763, 265, 567, 24, 38, "Output",
+ CellTags->"Pair",
+ CellID->492303314]
+}, Open ]],
+Cell[8345, 292, 79, 1, 32, "Notes",
+ CellID->1900001937],
+Cell[CellGroupData[{
+Cell[8449, 297, 338, 11, 27, "Input",
+ CellTags->"Pair",
+ CellID->1359804749],
+Cell[8790, 310, 543, 23, 38, "Output",
+ CellTags->"Pair",
+ CellID->150522700]
+}, Open ]],
+Cell[9348, 336, 187, 4, 49, "Notes",
+ CellID->1264095069],
+Cell[CellGroupData[{
+Cell[9560, 344, 287, 9, 27, "Input",
+ CellTags->"Pair",
+ CellID->1343625376],
+Cell[9850, 355, 567, 24, 38, "Output",
+ CellTags->"Pair",
+ CellID->127506986]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10454, 384, 319, 10, 27, "Input",
+ CellID->1397592277],
+Cell[10776, 396, 549, 23, 39, "Output",
+ CellID->1695876987]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11362, 424, 268, 8, 27, "Input",
+ CellID->1349044184],
+Cell[11633, 434, 187, 6, 35, "Output",
+ CellID->1857718213]
+}, Open ]],
+Cell[11835, 443, 69, 1, 32, "Notes",
+ CellID->721455208],
+Cell[CellGroupData[{
+Cell[11929, 448, 238, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->958079821],
+Cell[12170, 457, 533, 23, 40, "Output",
+ CellTags->"Pair",
+ CellID->714556073]
+}, Open ]],
+Cell[12718, 483, 72, 1, 32, "Notes",
+ CellID->1682684397],
+Cell[CellGroupData[{
+Cell[12815, 488, 340, 11, 27, "Input",
+ CellTags->"Pair",
+ CellID->106742008],
+Cell[13158, 501, 504, 22, 40, "Output",
+ CellTags->"Pair",
+ CellID->1365320302]
+}, Open ]],
+Cell[13677, 526, 88, 1, 32, "Notes",
+ CellID->1100214782],
+Cell[CellGroupData[{
+Cell[13790, 531, 242, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->1770091706],
+Cell[14035, 540, 616, 26, 37, "Output",
+ CellTags->"Pair",
+ CellID->1726621755]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14688, 571, 241, 7, 27, "Input",
+ CellTags->"Pair",
+ CellID->227830423],
+Cell[14932, 580, 396, 16, 39, "Output",
+ CellTags->"Pair",
+ CellID->563188072]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15365, 601, 266, 8, 27, "Input",
+ CellTags->"Pair",
+ CellID->25203155],
+Cell[15634, 611, 930, 39, 37, "Output",
+ CellTags->"Pair",
+ CellID->1222876519]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16601, 655, 272, 9, 27, "Input",
+ CellTags->"Pair",
+ CellID->1431519685],
+Cell[16876, 666, 398, 16, 39, "Output",
+ CellTags->"Pair",
+ CellID->1761928129]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17311, 687, 271, 9, 27, "Input",
+ CellTags->"Pair",
+ CellID->721851127],
+Cell[17585, 698, 397, 16, 39, "Output",
+ CellTags->"Pair",
+ CellID->282397427]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18019, 719, 317, 9, 45, "Input",
+ CellTags->"Pair",
+ CellID->294431519],
+Cell[18339, 730, 859, 36, 39, "Output",
+ CellTags->"Pair",
+ CellID->1642628671]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[19235, 771, 456, 13, 45, "Input",
+ CellTags->"Pair",
+ CellID->1586756083],
+Cell[19694, 786, 207, 7, 35, "Output",
+ CellTags->"Pair",
+ CellID->2130854097]
+}, Open ]]
+}, Open ]],
+Cell[19928, 797, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[19996, 802, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[20269, 816, 366, 14, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[20650, 833, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianPropagatorDenominator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianPropagatorDenominator.nb
new file mode 100644
index 000000000..ddd0151b0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianPropagatorDenominator.nb
@@ -0,0 +1,396 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12322, 386]
+NotebookOptionsPosition[ 9062, 293]
+NotebookOutlinePosition[ 11487, 355]
+CellTagsIndexPosition[ 11402, 350]
+WindowTitle->CartesianPropagatorDenominator
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CFAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CFAD"], "\<\"FeynAmpDenominator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynAmpDenominator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/CartesianPropagatorDenominator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CartesianPropagatorDenominator"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CartesianPropagatorDenominator.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$33478],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CartesianPropagatorDenominator", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CartesianPropagatorDenominator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], "+"}], "..."}], ",",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], "+"}], "..."}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "s"}], "}"}]}], "]"}]}]}]], "InlineFormula"],
+ " \[LineSeparator]encodes a generic Cartesian propagator denominator \
+1/[(q1+...)^2 + q1.p1 + ... + m^2 + s*I eta]^n. \
+CartesianPropagatorDenominator is an internal object. To enter such \
+propagators in FeynCalc you should use CFAD."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2123185487],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1402590542],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->127407996],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2117846260]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->754989132],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{119, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->718503863]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["CFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CFAD",
+ ButtonNote->"CFAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator",
+ ButtonNote->"FeynAmpDenominator"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"CartesianPropagatorDenominator",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 4.421601}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CartesianPropagatorDenominator[CartesianMomentum[q1, D - 1] + ..., \
+CartesianPair[CartesianMomentum[q1, D - 1], CartesianMomentum[p1, D - 1] + \
+..., m^2, {n, s}] encodes a generic Cartesian propagator denominator \
+1/[(q1+...)^2 + q1.p1 + ... + m^2 + s*I eta]^n. \
+CartesianPropagatorDenominator is an internal object. To enter such \
+propagators in FeynCalc you should use CFAD.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "CartesianPropagatorDenominator",
+ "titlemodifier" -> "", "windowtitle" -> "CartesianPropagatorDenominator",
+ "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CartesianPropagatorDenominator"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5416, 151, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2123185487]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11258, 343}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[602, 21, 3224, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3829, 101, 307, 11, 45, "ObjectNameGrid"],
+Cell[4139, 114, 1252, 33, 136, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5416, 151, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2123185487],
+Cell[CellGroupData[{
+Cell[5829, 170, 196, 6, 26, "ExampleSection",
+ CellID->1402590542],
+Cell[CellGroupData[{
+Cell[6050, 180, 412, 12, 45, "Input",
+ CellID->127407996],
+Cell[6465, 194, 496, 14, 61, "Output",
+ CellID->2117846260]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6998, 213, 591, 17, 62, "Input",
+ CellID->754989132],
+Cell[7592, 232, 676, 19, 61, "Output",
+ CellID->718503863]
+}, Open ]]
+}, Open ]],
+Cell[8295, 255, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8363, 260, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8636, 274, 384, 14, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[9035, 291, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianScalarProduct.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianScalarProduct.nb
new file mode 100644
index 000000000..7ea66e73d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianScalarProduct.nb
@@ -0,0 +1,942 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 25738, 932]
+NotebookOptionsPosition[ 18311, 701]
+NotebookOutlinePosition[ 22854, 824]
+CellTagsIndexPosition[ 22737, 818]
+WindowTitle->CartesianScalarProduct
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CSP\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CSP"], "\<\"CSPD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CSPD"], "\<\"CSPE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CSPE"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CartesianScalarProduct\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CartesianScalarProduct"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CartesianScalarProduct.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$33915],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CartesianScalarProduct", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CartesianScalarProduct", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is the input for the scalar product of two Cartesian \
+vectors p and q. CartesianScalarProduct[p] is equivalent to \
+CartesianScalarProduct[p, p]. Expansion of sums of momenta in \
+CartesianScalarProduct is done with ExpandScalarProduct. Scalar products may \
+be set, e.g. via ScalarProduct[a, b] = m^2; but a and b may not contain sums. \
+Note that ScalarProduct[a, b] = m^2 actually sets Cartesian scalar products \
+in different dimensions specified by the value of the SetDimensions option. \
+It is highly recommended to set ScalarProduct's ",
+ StyleBox["before",
+ FontWeight->"Bold"],
+ " any calculation. This improves the performance of FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->167707578],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CartesianScalarProduct", "]"}]], "Input",
+ CellLabel->"In[323]:=",
+ CellID->791476525],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "3"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{435, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[323]=",
+ CellID->1156556837]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->975766033],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->17949486],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[1]:=",
+ CellID->888961720],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{45, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[1]=",
+ CellID->409894593]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ RowBox[{"p", "+", "q"}], ",",
+ RowBox[{"-", "q"}]}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[2]:=",
+ CellID->2091143136],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{117, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[2]=",
+ CellID->1122861444]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "p"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[3]:=",
+ CellID->780031215],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{27, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[3]=",
+ CellID->294886574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[", "q", "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[4]:=",
+ CellID->10314838],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{27, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[4]=",
+ CellID->1042753930]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[5]:=",
+ CellID->158991943],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}], "]"}]], "Output",
+ ImageSize->{467, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1975139879]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q", ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}]}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[6]:=",
+ CellID->1173751525],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{575, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->161163745]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["p", "2"]}], "]"}], " ", "=", " ",
+ RowBox[{"s", "/", "2"}]}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[7]:=",
+ CellID->1579106051],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["s", "2"], TraditionalForm]], "Output",
+ ImageSize->{17, 31},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[7]=",
+ CellID->1362251681]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[", " ",
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ RowBox[{
+ SubscriptBox["p", "1"], "-", "q"}], ",",
+ RowBox[{
+ SubscriptBox["p", "2"], "-", "k"}]}], "]"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[8]:=",
+ CellID->373851414],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ FractionBox["s", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{214, 31},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[8]=",
+ CellID->1239195328]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ RowBox[{
+ SubscriptBox["p", "1"], "-", "q"}], ",",
+ RowBox[{
+ SubscriptBox["p", "2"], "-", "k"}]}], "]"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[9]:=",
+ CellID->54231534],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ FractionBox["s", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{214, 31},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[9]=",
+ CellID->1518630571]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[10]:=",
+ CellID->1715327028]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["CSP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSP",
+ ButtonNote->"CSP"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CSPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSPD",
+ ButtonNote->"CSPD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CSPE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSPE",
+ ButtonNote->"CSPE"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"CartesianScalarProduct",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 5.639878}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CartesianScalarProduct[p, q] is the input for the scalar product of two \
+Cartesian vectors p and q. CartesianScalarProduct[p] is equivalent to \
+CartesianScalarProduct[p, p]. Expansion of sums of momenta in \
+CartesianScalarProduct is done with ExpandScalarProduct. Scalar products may \
+be set, e.g. via ScalarProduct[a, b] = m^2; but a and b may not contain sums. \
+Note that ScalarProduct[a, b] = m^2 actually sets Cartesian scalar products \
+in different dimensions specified by the value of the SetDimensions option. \
+It is highly recommended to set ScalarProduct's before any calculation. This \
+improves the performance of FeynCalc.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "CartesianScalarProduct", "titlemodifier" -> "", "windowtitle" ->
+ "CartesianScalarProduct", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CartesianScalarProduct"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6640, 197, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->975766033]},
+ "ScalarProduct"->{
+ Cell[7271, 226, 169, 5, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->888961720],
+ Cell[7443, 233, 624, 26, 37, "Output",
+ CellTags->"ScalarProduct",
+ CellID->409894593],
+ Cell[8104, 264, 213, 7, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->2091143136],
+ Cell[8320, 273, 1045, 41, 37, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1122861444],
+ Cell[9402, 319, 169, 5, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->780031215],
+ Cell[9574, 326, 405, 16, 39, "Output",
+ CellTags->"ScalarProduct",
+ CellID->294886574],
+ Cell[10016, 347, 145, 4, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->10314838],
+ Cell[10164, 353, 406, 16, 39, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1042753930],
+ Cell[10607, 374, 205, 6, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->158991943],
+ Cell[10815, 382, 354, 10, 51, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1975139879],
+ Cell[11206, 397, 281, 8, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->1173751525],
+ Cell[11490, 407, 499, 16, 51, "Output",
+ CellTags->"ScalarProduct",
+ CellID->161163745],
+ Cell[12026, 428, 275, 9, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->1579106051],
+ Cell[12304, 439, 236, 8, 52, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1362251681],
+ Cell[12577, 452, 321, 10, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->373851414],
+ Cell[12901, 464, 2012, 83, 52, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1239195328],
+ Cell[14950, 552, 305, 10, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->54231534],
+ Cell[15258, 564, 2012, 83, 52, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1518630571],
+ Cell[17285, 650, 142, 4, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->1715327028]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 20782, 753},
+ {"ScalarProduct", 20922, 757}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[594, 21, 3204, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3801, 99, 299, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4125, 114, 1041, 22, 171, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5191, 140, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->167707578],
+Cell[5932, 166, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5988, 170, 126, 3, 70, "Input",
+ CellID->791476525],
+Cell[6117, 175, 462, 15, 37, "Output",
+ CellID->1156556837]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6640, 197, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->975766033],
+Cell[CellGroupData[{
+Cell[7052, 216, 194, 6, 26, "ExampleSection",
+ CellID->17949486],
+Cell[CellGroupData[{
+Cell[7271, 226, 169, 5, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->888961720],
+Cell[7443, 233, 624, 26, 37, "Output",
+ CellTags->"ScalarProduct",
+ CellID->409894593]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8104, 264, 213, 7, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->2091143136],
+Cell[8320, 273, 1045, 41, 37, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1122861444]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9402, 319, 169, 5, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->780031215],
+Cell[9574, 326, 405, 16, 39, "Output",
+ CellTags->"ScalarProduct",
+ CellID->294886574]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10016, 347, 145, 4, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->10314838],
+Cell[10164, 353, 406, 16, 39, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1042753930]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10607, 374, 205, 6, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->158991943],
+Cell[10815, 382, 354, 10, 51, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1975139879]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11206, 397, 281, 8, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->1173751525],
+Cell[11490, 407, 499, 16, 51, "Output",
+ CellTags->"ScalarProduct",
+ CellID->161163745]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12026, 428, 275, 9, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->1579106051],
+Cell[12304, 439, 236, 8, 52, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1362251681]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12577, 452, 321, 10, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->373851414],
+Cell[12901, 464, 2012, 83, 52, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1239195328]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14950, 552, 305, 10, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->54231534],
+Cell[15258, 564, 2012, 83, 52, "Output",
+ CellTags->"ScalarProduct",
+ CellID->1518630571]
+}, Open ]],
+Cell[17285, 650, 142, 4, 27, "Input",
+ CellTags->"ScalarProduct",
+ CellID->1715327028]
+}, Open ]],
+Cell[17442, 657, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17510, 662, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[17783, 676, 486, 20, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[18284, 699, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianToLorentz.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianToLorentz.nb
new file mode 100644
index 000000000..d74f82b88
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CartesianToLorentz.nb
@@ -0,0 +1,520 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14163, 510]
+NotebookOptionsPosition[ 10490, 396]
+NotebookOutlinePosition[ 12649, 453]
+CellTagsIndexPosition[ 12564, 448]
+WindowTitle->CartesianToLorentz
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LorentzToCartesian\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/LorentzToCartesian"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CartesianToLorentz\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CartesianToLorentz"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CartesianToLorentz.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$34360],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CartesianToLorentz", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["CartesianToLorentz", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CartesianToLorentz", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] rewrites Cartesian tensors in form of Lorentz tensors \
+(when possible). Using options one can specify which types of tensors should \
+be converted."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->30906054],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CartesianToLorentz", "]"}]], "Input",
+ CellLabel->"In[372]:=",
+ CellID->60038220],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"CSP", "\[Rule]", "True"}], ",",
+ RowBox[{"CGS", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{482, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[372]=",
+ CellID->762732505]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->205524065],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1511625837],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGS", "[", "p", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1645372086],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{38, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1831630166]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "CartesianToLorentz"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1489199171],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{96, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->403299943]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2122603265],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{45, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->632170649]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "CartesianToLorentz"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1322835112],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"]}], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{102, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->837370092]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["LorentzToCartesian",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LorentzToCartesian",
+ ButtonNote->"LorentzToCartesian"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"CartesianToLorentz",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 6.916104}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "CartesianToLorentz[exp] rewrites Cartesian tensors in form of Lorentz \
+tensors (when possible). Using options one can specify which types of tensors \
+should be converted.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CartesianToLorentz", "titlemodifier" -> "", "windowtitle" ->
+ "CartesianToLorentz", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CartesianToLorentz"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6022, 186, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->205524065]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12421, 441}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 3062, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3655, 97, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3975, 112, 495, 13, 101, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4495, 129, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->30906054],
+Cell[5235, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5291, 159, 121, 3, 70, "Input",
+ CellID->60038220],
+Cell[5415, 164, 546, 15, 56, "Output",
+ CellID->762732505]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6022, 186, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->205524065],
+Cell[CellGroupData[{
+Cell[6434, 205, 196, 6, 26, "ExampleSection",
+ CellID->1511625837],
+Cell[CellGroupData[{
+Cell[6655, 215, 100, 3, 27, "Input",
+ CellID->1645372086],
+Cell[6758, 220, 530, 21, 37, "Output",
+ CellID->1831630166]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7325, 246, 111, 3, 27, "Input",
+ CellID->1489199171],
+Cell[7439, 251, 685, 28, 39, "Output",
+ CellID->403299943]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8161, 284, 123, 4, 27, "Input",
+ CellID->2122603265],
+Cell[8287, 290, 596, 25, 37, "Output",
+ CellID->632170649]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8920, 320, 111, 3, 27, "Input",
+ CellID->1322835112],
+Cell[9034, 325, 809, 35, 39, "Output",
+ CellID->837370092]
+}, Open ]]
+}, Open ]],
+Cell[9870, 364, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9938, 369, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10211, 383, 237, 8, 56, "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+Cell[10463, 394, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Cases2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Cases2.nb
index 9663c7a9c..82d539124 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Cases2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Cases2.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11973, 409]
-NotebookOptionsPosition[ 7757, 275]
-NotebookOutlinePosition[ 10780, 361]
-CellTagsIndexPosition[ 10672, 355]
+NotebookDataLength[ 11755, 402]
+NotebookOptionsPosition[ 7914, 282]
+NotebookOutlinePosition[ 10744, 362]
+CellTagsIndexPosition[ 10635, 356]
WindowTitle->Cases2
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24552],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$34796],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/Cases2",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Cases2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Cases2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +122,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->419675880],
+ CellID->292765766],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -119,13 +132,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->831323002],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"Cases2",
- CellID->645978510],
+ CellID->1337546765],
Cell[CellGroupData[{
@@ -150,12 +157,11 @@ Cell[BoxData[
RowBox[{"f", "(", "b", ")"}], ",",
RowBox[{"f", "(",
RowBox[{"c", ",", "d"}], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{143, 15},
+ ImageSize->{156, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Cases2",
- CellLabel->"Out[1]=",
- CellID->1245535704]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -181,12 +187,11 @@ Cell[BoxData[
RowBox[{"sin", "(", "x", ")"}], ",",
RowBox[{"sin", "(",
RowBox[{"y", "-", "z"}], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{169, 15},
+ ImageSize->{179, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Cases2",
- CellLabel->"Out[2]=",
- CellID->1551461505]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -218,12 +223,11 @@ Cell[BoxData[
RowBox[{"sin", "(", "x", ")"}], ",",
RowBox[{"sin", "(",
RowBox[{"y", "-", "z"}], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{242, 15},
+ ImageSize->{261, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Cases2",
- CellLabel->"Out[3]=",
- CellID->1202203267]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -233,9 +237,9 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
- RowBox[{"DiracSlash", "[", "p", "]"}], ".",
- RowBox[{"DiracSlash", "[", "q", "]"}]}], "+",
- RowBox[{"ScalarProduct", "[",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "q", "]"}]}], "+",
+ RowBox[{"SP", "[",
RowBox[{"p", ",", "p"}], "]"}]}], ",", "Dot"}], "]"}]], "Input",
CellTags->"Cases2",
CellLabel->"In[4]:=",
@@ -246,27 +250,30 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{105, 18},
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{113, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Cases2",
- CellLabel->"Out[4]=",
- CellID->896832184]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -285,10 +292,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 44.122016}",
+ "built" -> "{2020, 1, 5, 18, 53, 8.115539}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -297,11 +304,12 @@ TaggingRules->{
"Cases2[expr, f] returns a list of all objects in expr with head f. \
Cases2[expr,f] is equivalent to Cases2[{expr},f[___],Infinity]//Union. \
Cases2[expr, f, g, ...] or Cases2[expr, {f,g, ...}] is equivalent to \
-Cases[{expr},f[___] | g[___] ...] .", "synonyms" -> {}, "title" -> "Cases2",
- "titlemodifier" -> "", "windowtitle" -> "Cases2", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Cases2"}, "SearchTextTranslated" -> ""},
+Cases[{expr},f[___] | g[___] ...] .", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Cases2", "titlemodifier" -> "", "windowtitle" -> "Cases2",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Cases2"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -310,7 +318,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -319,98 +327,83 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3503, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[3765, 109, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->419675880]},
+ CellID->292765766]},
"Cases2"->{
- Cell[4113, 125, 83, 2, 35, "Subsubsection",
- CellTags->"Cases2",
- CellID->645978510],
- Cell[4221, 131, 324, 11, 31, "Input",
+ Cell[4398, 138, 324, 11, 33, "Input",
CellTags->"Cases2",
CellID->1924250367],
- Cell[4548, 144, 382, 13, 36, "Output",
- CellTags->"Cases2",
- CellID->1245535704],
- Cell[4967, 162, 331, 11, 27, "Input",
+ Cell[4725, 151, 361, 12, 37, "Output",
+ CellTags->"Cases2"],
+ Cell[5123, 168, 331, 11, 27, "Input",
CellTags->"Cases2",
CellID->1264635109],
- Cell[5301, 175, 386, 13, 36, "Output",
- CellTags->"Cases2",
- CellID->1551461505],
- Cell[5724, 193, 446, 15, 27, "Input",
+ Cell[5457, 181, 365, 12, 37, "Output",
+ CellTags->"Cases2"],
+ Cell[5859, 198, 446, 15, 27, "Input",
CellTags->"Cases2",
CellID->1159301950],
- Cell[6173, 210, 462, 15, 36, "Output",
- CellTags->"Cases2",
- CellID->1202203267],
- Cell[6672, 230, 345, 11, 27, "Input",
+ Cell[6308, 215, 441, 14, 37, "Output",
+ CellTags->"Cases2"],
+ Cell[6786, 234, 318, 11, 27, "Input",
CellTags->"Cases2",
CellID->775837316],
- Cell[7020, 243, 671, 25, 39, "Output",
- CellTags->"Cases2",
- CellID->896832184]}
+ Cell[7107, 247, 741, 28, 37, "Output",
+ CellTags->"Cases2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9726, 320},
- {"Cases2", 9858, 324}
+ {"PrimaryExamplesSection", 9871, 328},
+ {"Cases2", 10004, 332}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2264, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 609, 16, 115, "Usage",
+Cell[2845, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[3131, 89, 609, 16, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3503, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[3765, 109, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->419675880],
-Cell[3893, 115, 195, 6, 25, "ExampleSection",
- CellID->831323002],
+ CellID->292765766],
Cell[CellGroupData[{
-Cell[4113, 125, 83, 2, 35, "Subsubsection",
- CellTags->"Cases2",
- CellID->645978510],
+Cell[4177, 128, 196, 6, 26, "ExampleSection",
+ CellID->1337546765],
Cell[CellGroupData[{
-Cell[4221, 131, 324, 11, 31, "Input",
+Cell[4398, 138, 324, 11, 33, "Input",
CellTags->"Cases2",
CellID->1924250367],
-Cell[4548, 144, 382, 13, 36, "Output",
- CellTags->"Cases2",
- CellID->1245535704]
+Cell[4725, 151, 361, 12, 37, "Output",
+ CellTags->"Cases2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4967, 162, 331, 11, 27, "Input",
+Cell[5123, 168, 331, 11, 27, "Input",
CellTags->"Cases2",
CellID->1264635109],
-Cell[5301, 175, 386, 13, 36, "Output",
- CellTags->"Cases2",
- CellID->1551461505]
+Cell[5457, 181, 365, 12, 37, "Output",
+ CellTags->"Cases2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5724, 193, 446, 15, 27, "Input",
+Cell[5859, 198, 446, 15, 27, "Input",
CellTags->"Cases2",
CellID->1159301950],
-Cell[6173, 210, 462, 15, 36, "Output",
- CellTags->"Cases2",
- CellID->1202203267]
+Cell[6308, 215, 441, 14, 37, "Output",
+ CellTags->"Cases2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6672, 230, 345, 11, 27, "Input",
+Cell[6786, 234, 318, 11, 27, "Input",
CellTags->"Cases2",
CellID->775837316],
-Cell[7020, 243, 671, 25, 39, "Output",
- CellTags->"Cases2",
- CellID->896832184]
+Cell[7107, 247, 741, 28, 37, "Output",
+ CellTags->"Cases2"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[7730, 273, 23, 0, 42, "FooterCell"]
+Cell[7887, 280, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChangeDimension.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChangeDimension.nb
index 29473514e..a5a88d430 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChangeDimension.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChangeDimension.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 24759, 908]
-NotebookOptionsPosition[ 15778, 618]
-NotebookOutlinePosition[ 21041, 772]
-CellTagsIndexPosition[ 20922, 766]
+NotebookDataLength[ 21807, 787]
+NotebookOptionsPosition[ 15162, 581]
+NotebookOutlinePosition[ 19104, 691]
+CellTagsIndexPosition[ 18985, 685]
WindowTitle->ChangeDimension
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ChangeDimension\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ChangeDimension"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LorentzIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LorentzIndex"], "\<\"Momentum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Momentum"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Eps\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Eps"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ChangeDimension\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ChangeDimension"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ChangeDimension.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$25244],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ChangeDimension", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$38810],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ChangeDimension", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ ChangeDimension.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ChangeDimension", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ChangeDimension", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1032813517],
+ CellID->568861151],
Cell[CellGroupData[{
@@ -119,15 +157,13 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1378115085],
+ CellID->1995069426],
Cell["\<\
Remember that LorentzIndex[mu, 4] is simplified to LorentzIndex[mu] and \
Momentum[p, 4] to Momentum[p]. Thus the fullowing objects are defined in four \
dimensions.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->1522324479],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -149,12 +185,11 @@ Cell[BoxData[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{47, 18},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[1]=",
- CellID->621481036]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -174,12 +209,11 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["p",
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ ImageSize->{47, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[2]=",
- CellID->1291415822]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -197,19 +231,16 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}]}], "}"}]], "Output",
- ImageSize->{293, 15},
+ ImageSize->{295, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[3]//StandardForm=",
- CellID->2101335861]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell["\<\
This changes all non-4-dimensional objects to 4-dimensional ones.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->906094166],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -227,17 +258,14 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "}"}]], "Output",
- ImageSize->{247, 15},
+ ImageSize->{249, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[4]//StandardForm=",
- CellID->2072157462]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
-Cell["Consider the following list of 4- and D-dimensional object.", "Text",
- CellTags->"ChangeDimension",
- CellID->169525226],
+Cell["Consider the following list of 4- and D-dimensional object.", "Notes"],
Cell[CellGroupData[{
@@ -282,23 +310,17 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm]}], ",",
RowBox[{
RowBox[{"f", "(", "D", ")"}], " ",
@@ -318,36 +340,29 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], " ",
FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{209, 20},
+ ImageSize->{225, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[5]=",
- CellID->1897534885]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[",
- RowBox[{"Contract", "[", "%", "]"}], "]"}]], "Input",
+ RowBox[{"DiracTrick", "/@",
+ RowBox[{"Contract", "/@", "%"}]}]], "Input",
CellTags->"ChangeDimension",
CellLabel->"In[6]:=",
CellID->2067421250],
@@ -358,24 +373,21 @@ Cell[BoxData[
RowBox[{"4", ",",
RowBox[{"D", " ",
RowBox[{"f", "(", "D", ")"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{83, 15},
+ ImageSize->{90, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[6]=",
- CellID->1845092262]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[",
- RowBox[{"Contract", "[",
+ RowBox[{"DiracTrick", "/@",
+ RowBox[{"Contract", "/@",
RowBox[{"ChangeDimension", "[",
- RowBox[{"%%", ",", "n"}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[7]:=",
- CellID->443072956],
+ RowBox[{"%%", ",", "n"}], "]"}]}]}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
FormBox[
@@ -383,60 +395,30 @@ Cell[BoxData[
RowBox[{"n", ",",
RowBox[{"n", " ",
RowBox[{"f", "(", "D", ")"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{82, 15},
+ ImageSize->{88, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChangeDimension",
- CellLabel->"Out[7]=",
- CellID->1862585362]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell["\<\
Any explicit occurence of D (like in f(D)) is not replaced by ChangeDimension.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->1415828575],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"LeviCivita", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[8]:=",
- CellID->1024340055],
-
-Cell["\<\
-The option Dimension of Eps must be changed too, since with the default \
-setting Dimension\[Rule]4 the arguments of Eps are automatically changed to 4 \
-dimensions.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->811356604],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[9]:=",
- CellID->1043083810],
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", " ", "=", " ",
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
- "]"}]}]], "Input",
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[10]:=",
+ CellLabel->"In[8]:=",
CellID->2013502188],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -454,27 +436,27 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{53, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[10]=",
- CellID->1195831407]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"ChangeDimension", "[",
- RowBox[{"a1", ",", "4"}], "]"}]}]], "Input",
+ RowBox[{"%", ",", "D"}], "]"}]}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[11]:=",
+ CellLabel->"In[9]:=",
CellID->1364188329],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -492,12 +474,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{52, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[11]=",
- CellID->454924559]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -505,9 +486,9 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Factor2", "[",
RowBox[{"Contract", "[",
- SuperscriptBox["a1", "2"], "]"}], "]"}]], "Input",
+ SuperscriptBox["%", "2"], "]"}], "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[12]:=",
+ CellLabel->"In[10]:=",
CellID->1260742676],
Cell[BoxData[
@@ -519,50 +500,34 @@ Cell[BoxData[
RowBox[{"2", "-", "D"}], ")"}], " ",
RowBox[{"(",
RowBox[{"3", "-", "D"}], ")"}], " ", "D"}], TraditionalForm]], "Output",
- ImageSize->{165, 15},
+ ImageSize->{181, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[12]=",
- CellID->712801039]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[",
- SuperscriptBox["a2", "2"], "]"}]], "Input",
+ SuperscriptBox[
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "2"], "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[13]:=",
+ CellLabel->"In[11]:=",
CellID->1971885587],
Cell[BoxData[
FormBox[
RowBox[{"-", "24"}], TraditionalForm]], "Output",
- ImageSize->{30, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChangeDimension",
- CellLabel->"Out[13]=",
- CellID->1523338400]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[14]:=",
- CellID->1454834336],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2"}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[15]:=",
- CellID->696058695]
+ CellLabel->"Out[11]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -609,9 +574,7 @@ Cell[TextData[{
ButtonNote->"Eps"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ChangeDimension",
- CellID->1962733391]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -619,7 +582,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"ChangeDimension",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -628,10 +591,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 47.147097}",
+ "built" -> "{2020, 1, 5, 18, 53, 19.013365}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -639,11 +602,12 @@ TaggingRules->{
"None", "summary" ->
"ChangeDimension[exp, dim] changes all LorentzIndex and Momenta in exp to \
dimension dim (and also Levi-Civita-tensors, Dirac slashes and Dirac \
-matrices).", "synonyms" -> {}, "title" -> "ChangeDimension", "titlemodifier" ->
- "", "windowtitle" -> "ChangeDimension", "type" -> "Symbol", "uri" ->
+matrices).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "ChangeDimension", "titlemodifier" -> "", "windowtitle" ->
+ "ChangeDimension", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ChangeDimension"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -651,8 +615,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -661,255 +626,169 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3464, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4739, 134, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1032813517]},
+ CellID->568861151]},
"ChangeDimension"->{
- Cell[4076, 123, 240, 6, 52, "Text",
- CellTags->"ChangeDimension",
- CellID->1522324479],
- Cell[4341, 133, 231, 7, 27, "Input",
+ Cell[5565, 169, 231, 7, 27, "Input",
CellTags->"ChangeDimension",
CellID->1127631822],
- Cell[4575, 142, 366, 14, 39, "Output",
- CellTags->"ChangeDimension",
- CellID->621481036],
- Cell[4978, 161, 170, 5, 27, "Input",
+ Cell[5799, 178, 346, 13, 37, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[6182, 196, 170, 5, 27, "Input",
CellTags->"ChangeDimension",
CellID->2044492451],
- Cell[5151, 168, 340, 13, 38, "Output",
- CellTags->"ChangeDimension",
- CellID->1291415822],
- Cell[5528, 186, 135, 4, 27, "Input",
+ Cell[6355, 203, 319, 12, 37, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[6711, 220, 135, 4, 27, "Input",
CellTags->"ChangeDimension",
CellID->1689591331],
- Cell[5666, 192, 379, 12, 49, "Output",
- CellTags->"ChangeDimension",
- CellID->2101335861],
- Cell[6060, 207, 139, 4, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->906094166],
- Cell[6224, 215, 219, 7, 27, "Input",
+ Cell[6849, 226, 358, 11, 51, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[7337, 246, 219, 7, 27, "Input",
CellTags->"ChangeDimension",
CellID->898970803],
- Cell[6446, 224, 329, 10, 49, "Output",
- CellTags->"ChangeDimension",
- CellID->2072157462],
- Cell[6790, 237, 125, 2, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->169525226],
- Cell[6940, 243, 500, 16, 27, "Input",
+ Cell[7559, 255, 308, 9, 51, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[7983, 271, 500, 16, 27, "Input",
CellTags->"ChangeDimension",
CellID->931498160],
- Cell[7443, 261, 2029, 81, 41, "Output",
- CellTags->"ChangeDimension",
- CellID->1897534885],
- Cell[9509, 347, 172, 5, 27, "Input",
+ Cell[8486, 289, 1707, 68, 40, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[10230, 362, 164, 5, 27, "Input",
CellTags->"ChangeDimension",
CellID->2067421250],
- Cell[9684, 354, 320, 11, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->1845092262],
- Cell[10041, 370, 240, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->443072956],
- Cell[10284, 379, 320, 11, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->1862585362],
- Cell[10619, 393, 153, 4, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->1415828575],
- Cell[10775, 399, 227, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->1024340055],
- Cell[11005, 408, 239, 6, 52, "Text",
- CellTags->"ChangeDimension",
- CellID->811356604],
- Cell[11247, 416, 220, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->1043083810],
- Cell[11492, 427, 240, 7, 27, "Input",
+ Cell[10397, 369, 299, 10, 37, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[11330, 409, 195, 6, 27, "Input",
CellTags->"ChangeDimension",
CellID->2013502188],
- Cell[11735, 436, 596, 25, 39, "Output",
- CellTags->"ChangeDimension",
- CellID->1195831407],
- Cell[12368, 466, 202, 6, 27, "Input",
+ Cell[11528, 417, 598, 25, 35, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[12163, 447, 184, 6, 27, "Input",
CellTags->"ChangeDimension",
CellID->1364188329],
- Cell[12573, 474, 595, 25, 39, "Output",
- CellTags->"ChangeDimension",
- CellID->454924559],
- Cell[13205, 504, 196, 6, 31, "Input",
+ Cell[12350, 455, 597, 25, 35, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[12984, 485, 195, 6, 33, "Input",
CellTags->"ChangeDimension",
CellID->1260742676],
- Cell[13404, 512, 408, 14, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->712801039],
- Cell[13849, 531, 161, 5, 31, "Input",
+ Cell[13182, 493, 388, 13, 37, "Output",
+ CellTags->"ChangeDimension"],
+ Cell[13607, 511, 259, 8, 33, "Input",
CellTags->"ChangeDimension",
CellID->1971885587],
- Cell[14013, 538, 237, 8, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->1523338400],
- Cell[14265, 549, 221, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->1454834336],
- Cell[14489, 558, 176, 6, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->696058695],
- Cell[15021, 586, 715, 27, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->1962733391]}
+ Cell[13869, 521, 216, 7, 35, "Output",
+ CellTags->"ChangeDimension"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17691, 662},
- {"ChangeDimension", 17833, 666}
+ {"PrimaryExamplesSection", 17121, 627},
+ {"ChangeDimension", 17263, 631}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3314, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 515, 14, 99, "Usage",
+Cell[3904, 103, 292, 11, 45, "ObjectNameGrid"],
+Cell[4199, 116, 515, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3464, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4739, 134, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1032813517],
+ CellID->568861151],
Cell[CellGroupData[{
-Cell[3877, 115, 196, 6, 25, "ExampleSection",
- CellID->1378115085],
-Cell[4076, 123, 240, 6, 52, "Text",
- CellTags->"ChangeDimension",
- CellID->1522324479],
+Cell[5151, 153, 196, 6, 26, "ExampleSection",
+ CellID->1995069426],
+Cell[5350, 161, 190, 4, 49, "Notes"],
Cell[CellGroupData[{
-Cell[4341, 133, 231, 7, 27, "Input",
+Cell[5565, 169, 231, 7, 27, "Input",
CellTags->"ChangeDimension",
CellID->1127631822],
-Cell[4575, 142, 366, 14, 39, "Output",
- CellTags->"ChangeDimension",
- CellID->621481036]
+Cell[5799, 178, 346, 13, 37, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4978, 161, 170, 5, 27, "Input",
+Cell[6182, 196, 170, 5, 27, "Input",
CellTags->"ChangeDimension",
CellID->2044492451],
-Cell[5151, 168, 340, 13, 38, "Output",
- CellTags->"ChangeDimension",
- CellID->1291415822]
+Cell[6355, 203, 319, 12, 37, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5528, 186, 135, 4, 27, "Input",
+Cell[6711, 220, 135, 4, 27, "Input",
CellTags->"ChangeDimension",
CellID->1689591331],
-Cell[5666, 192, 379, 12, 49, "Output",
- CellTags->"ChangeDimension",
- CellID->2101335861]
+Cell[6849, 226, 358, 11, 51, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
-Cell[6060, 207, 139, 4, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->906094166],
+Cell[7222, 240, 90, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6224, 215, 219, 7, 27, "Input",
+Cell[7337, 246, 219, 7, 27, "Input",
CellTags->"ChangeDimension",
CellID->898970803],
-Cell[6446, 224, 329, 10, 49, "Output",
- CellTags->"ChangeDimension",
- CellID->2072157462]
+Cell[7559, 255, 308, 9, 51, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
-Cell[6790, 237, 125, 2, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->169525226],
+Cell[7882, 267, 76, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6940, 243, 500, 16, 27, "Input",
+Cell[7983, 271, 500, 16, 27, "Input",
CellTags->"ChangeDimension",
CellID->931498160],
-Cell[7443, 261, 2029, 81, 41, "Output",
- CellTags->"ChangeDimension",
- CellID->1897534885]
+Cell[8486, 289, 1707, 68, 40, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9509, 347, 172, 5, 27, "Input",
+Cell[10230, 362, 164, 5, 27, "Input",
CellTags->"ChangeDimension",
CellID->2067421250],
-Cell[9684, 354, 320, 11, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->1845092262]
+Cell[10397, 369, 299, 10, 37, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10041, 370, 240, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->443072956],
-Cell[10284, 379, 320, 11, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->1862585362]
+Cell[10733, 384, 182, 5, 27, "Input"],
+Cell[10918, 391, 269, 9, 37, "Output"]
}, Open ]],
-Cell[10619, 393, 153, 4, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->1415828575],
-Cell[10775, 399, 227, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->1024340055],
-Cell[11005, 408, 239, 6, 52, "Text",
- CellTags->"ChangeDimension",
- CellID->811356604],
-Cell[11247, 416, 220, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->1043083810],
+Cell[11202, 403, 103, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[11492, 427, 240, 7, 27, "Input",
+Cell[11330, 409, 195, 6, 27, "Input",
CellTags->"ChangeDimension",
CellID->2013502188],
-Cell[11735, 436, 596, 25, 39, "Output",
- CellTags->"ChangeDimension",
- CellID->1195831407]
+Cell[11528, 417, 598, 25, 35, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12368, 466, 202, 6, 27, "Input",
+Cell[12163, 447, 184, 6, 27, "Input",
CellTags->"ChangeDimension",
CellID->1364188329],
-Cell[12573, 474, 595, 25, 39, "Output",
- CellTags->"ChangeDimension",
- CellID->454924559]
+Cell[12350, 455, 597, 25, 35, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13205, 504, 196, 6, 31, "Input",
+Cell[12984, 485, 195, 6, 33, "Input",
CellTags->"ChangeDimension",
CellID->1260742676],
-Cell[13404, 512, 408, 14, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->712801039]
+Cell[13182, 493, 388, 13, 37, "Output",
+ CellTags->"ChangeDimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13849, 531, 161, 5, 31, "Input",
+Cell[13607, 511, 259, 8, 33, "Input",
CellTags->"ChangeDimension",
CellID->1971885587],
-Cell[14013, 538, 237, 8, 36, "Output",
- CellTags->"ChangeDimension",
- CellID->1523338400]
-}, Open ]],
-Cell[14265, 549, 221, 7, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->1454834336],
-Cell[14489, 558, 176, 6, 27, "Input",
- CellTags->"ChangeDimension",
- CellID->696058695]
+Cell[13869, 521, 216, 7, 35, "Output",
+ CellTags->"ChangeDimension"]
+}, Open ]]
}, Open ]],
-Cell[14680, 567, 31, 0, 29, "SectionFooterSpacer"]
+Cell[14112, 532, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14748, 572, 270, 12, 31, "SeeAlsoSection",
+Cell[14180, 537, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[15021, 586, 715, 27, 32, "Text",
- CellTags->"ChangeDimension",
- CellID->1962733391]
+Cell[14453, 551, 667, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[15751, 616, 23, 0, 42, "FooterCell"]
+Cell[15135, 579, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChargeConjugationMatrix.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChargeConjugationMatrix.nb
deleted file mode 100644
index 1c5941968..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChargeConjugationMatrix.nb
+++ /dev/null
@@ -1,448 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12771, 438]
-NotebookOptionsPosition[ 7773, 287]
-NotebookOutlinePosition[ 11062, 377]
-CellTagsIndexPosition[ 10937, 371]
-WindowTitle->ChargeConjugationMatrix
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ChargeConjugationMatrix\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ChargeConjugationMatrix"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-ChargeConjugationMatrix.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$25933],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ChargeConjugationMatrix", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["ChargeConjugationMatrix", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["ChargeConjugationMatrix"], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the charge conjugation matrix ",
- StyleBox["C",
- FontSlant->"Italic"],
- "."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->538862782],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->413365542],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[1]:=",
- CellID->205239627],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{75, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[1]=",
- CellID->1893455024]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[2]:=",
- CellID->570632679],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-",
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ")"}], "T"]}], TraditionalForm]], "Output",
- ImageSize->{55, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[2]=",
- CellID->850295323]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracGamma", "[", "5", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[3]:=",
- CellID->970778569],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{74, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[3]=",
- CellID->1098980184]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[4]:=",
- CellID->2071243719],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- ImageSize->{44, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[4]=",
- CellID->1607597675]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", "^", "2"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[5]:=",
- CellID->953249607],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- ImageSize->{21, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[5]=",
- CellID->56606698]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["ChargeConjugationMatrixInv",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChargeConjugationMatrixInv",
- ButtonNote->"ChargeConjugationMatrixInv"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ChargeConjugationMatrix",
- CellID->269939317]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"ChargeConjugationMatrix",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 50.110699}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "ChargeConjugationMatrix denotes the charge conjugation matrix C.",
- "synonyms" -> {}, "title" -> "ChargeConjugationMatrix", "titlemodifier" ->
- "", "windowtitle" -> "ChargeConjugationMatrix", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ChargeConjugationMatrix"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3418, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->538862782]},
- "ChargeConjugationMatrix"->{
- Cell[4050, 125, 232, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->205239627],
- Cell[4285, 133, 437, 16, 38, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->1893455024],
- Cell[4759, 154, 138, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->570632679],
- Cell[4900, 160, 483, 18, 39, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->850295323],
- Cell[5420, 183, 227, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->970778569],
- Cell[5650, 191, 395, 14, 39, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->1098980184],
- Cell[6082, 210, 139, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->2071243719],
- Cell[6224, 216, 410, 15, 39, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->1607597675],
- Cell[6671, 236, 152, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->953249607],
- Cell[6826, 242, 241, 8, 36, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->56606698],
- Cell[7435, 273, 296, 9, 32, "Text",
- CellTags->"ChargeConjugationMatrix",
- CellID->269939317]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 9631, 330},
- {"ChargeConjugationMatrix", 9780, 334}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[595, 21, 2305, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2903, 75, 66, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2972, 78, 421, 14, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3418, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->538862782],
-Cell[CellGroupData[{
-Cell[3830, 115, 195, 6, 25, "ExampleSection",
- CellID->413365542],
-Cell[CellGroupData[{
-Cell[4050, 125, 232, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->205239627],
-Cell[4285, 133, 437, 16, 38, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->1893455024]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4759, 154, 138, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->570632679],
-Cell[4900, 160, 483, 18, 39, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->850295323]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5420, 183, 227, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->970778569],
-Cell[5650, 191, 395, 14, 39, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->1098980184]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6082, 210, 139, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->2071243719],
-Cell[6224, 216, 410, 15, 39, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->1607597675]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6671, 236, 152, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrix",
- CellID->953249607],
-Cell[6826, 242, 241, 8, 36, "Output",
- CellTags->"ChargeConjugationMatrix",
- CellID->56606698]
-}, Open ]]
-}, Open ]],
-Cell[7094, 254, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7162, 259, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[7435, 273, 296, 9, 32, "Text",
- CellTags->"ChargeConjugationMatrix",
- CellID->269939317]
-}, Open ]],
-Cell[7746, 285, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChargeConjugationMatrixInv.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChargeConjugationMatrixInv.nb
deleted file mode 100644
index bb4f74da7..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChargeConjugationMatrixInv.nb
+++ /dev/null
@@ -1,520 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14875, 510]
-NotebookOptionsPosition[ 8821, 329]
-NotebookOutlinePosition[ 12661, 433]
-CellTagsIndexPosition[ 12531, 427]
-WindowTitle->ChargeConjugationMatrixInv
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/ChargeConjugationMatrixInv\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ChargeConjugationMatrixInv"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-ChargeConjugationMatrixInv.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$25594],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ChargeConjugationMatrixInv", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["ChargeConjugationMatrixInv", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["ChargeConjugationMatrixInv"], "InlineFormula"],
- " \[LineSeparator]",
- "is the inverse of ChargeConjugationMatrix. It is substituted \
-immediately by -ChargeConjugationMatrix."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1238271312],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1837194000],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[1]:=",
- CellID->1140927721],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{75, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[1]=",
- CellID->1029197353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[2]:=",
- CellID->1785990666],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-",
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ")"}], "T"]}], TraditionalForm]], "Output",
- ImageSize->{55, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[2]=",
- CellID->168936533]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracGamma", "[", "5", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[3]:=",
- CellID->1805130692],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{74, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[3]=",
- CellID->923388841]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[4]:=",
- CellID->520085018],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- ImageSize->{44, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[4]=",
- CellID->1835032853]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[5]:=",
- CellID->742166059],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{52, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[5]=",
- CellID->1205242066]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "Calc"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[6]:=",
- CellID->812819391],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-",
- RowBox[{"C", ".", "C"}]}], TraditionalForm]], "Output",
- ImageSize->{40, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[6]=",
- CellID->1846536639]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrixInv", "^", "2"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[7]:=",
- CellID->1102040166],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- ImageSize->{21, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[7]=",
- CellID->209662305]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["ChargeConjugationMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChargeConjugationMatrix",
- ButtonNote->"ChargeConjugationMatrix"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->276945689]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"ChargeConjugationMatrixInv",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 48.669475}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "ChargeConjugationMatrixInv is the inverse of ChargeConjugationMatrix. It \
-is substituted immediately by -ChargeConjugationMatrix.", "synonyms" -> {},
- "title" -> "ChargeConjugationMatrixInv", "titlemodifier" -> "",
- "windowtitle" -> "ChargeConjugationMatrixInv", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ChargeConjugationMatrixInv"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3469, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1238271312]},
- "ChargeConjugationMatrixInv"->{
- Cell[4103, 125, 236, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1140927721],
- Cell[4342, 133, 440, 16, 38, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1029197353],
- Cell[4819, 154, 142, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1785990666],
- Cell[4964, 160, 486, 18, 39, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->168936533],
- Cell[5487, 183, 231, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1805130692],
- Cell[5721, 191, 397, 14, 39, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->923388841],
- Cell[6155, 210, 141, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->520085018],
- Cell[6299, 216, 413, 15, 39, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1835032853],
- Cell[6749, 236, 183, 5, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->742166059],
- Cell[6935, 243, 295, 10, 36, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1205242066],
- Cell[7267, 258, 137, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->812819391],
- Cell[7407, 264, 270, 9, 36, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1846536639],
- Cell[7714, 278, 159, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1102040166],
- Cell[7876, 284, 245, 8, 36, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->209662305],
- Cell[8489, 315, 290, 9, 70, "Text",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->276945689]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 10760, 374},
- {"ChargeConjugationMatrixInv", 10913, 378}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[598, 21, 2339, 54, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2940, 77, 69, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3012, 80, 432, 12, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3469, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1238271312],
-Cell[CellGroupData[{
-Cell[3882, 115, 196, 6, 25, "ExampleSection",
- CellID->1837194000],
-Cell[CellGroupData[{
-Cell[4103, 125, 236, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1140927721],
-Cell[4342, 133, 440, 16, 38, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1029197353]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4819, 154, 142, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1785990666],
-Cell[4964, 160, 486, 18, 39, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->168936533]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5487, 183, 231, 6, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1805130692],
-Cell[5721, 191, 397, 14, 39, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->923388841]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6155, 210, 141, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->520085018],
-Cell[6299, 216, 413, 15, 39, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1835032853]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6749, 236, 183, 5, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->742166059],
-Cell[6935, 243, 295, 10, 36, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1205242066]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7267, 258, 137, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->812819391],
-Cell[7407, 264, 270, 9, 36, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1846536639]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7714, 278, 159, 4, 27, "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->1102040166],
-Cell[7876, 284, 245, 8, 36, "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->209662305]
-}, Open ]]
-}, Open ]],
-Cell[8148, 296, 31, 0, 70, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[8216, 301, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[8489, 315, 290, 9, 70, "Text",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->276945689]
-}, Open ]],
-Cell[8794, 327, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CheckDB.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CheckDB.nb
index 744cb6a25..d5c708acd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CheckDB.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CheckDB.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15281, 498]
-NotebookOptionsPosition[ 9049, 309]
-NotebookOutlinePosition[ 13488, 427]
-CellTagsIndexPosition[ 13377, 421]
+NotebookDataLength[ 14611, 479]
+NotebookOptionsPosition[ 9739, 335]
+NotebookOutlinePosition[ 13011, 420]
+CellTagsIndexPosition[ 12900, 414]
WindowTitle->CheckDB
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$26279],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$39265],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/CheckDB", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,29 +74,35 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CheckDB", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CheckDB", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"CheckDB", "[",
RowBox[{"exp", ",", " ", "fil"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "saves [with Put] or retrieves [with Get] exp from a file fil. It checks \
-if the setting of the option Directory is a valid directory name and if fil \
-is a valid file name and does exist. If it does, Get[fil] is executed. If fil \
-does not exist, exp gets evaluated and saved to fil. Saving and evaluating \
-can be further controlled with the options ForceSave and NoSave. If the \
-option Check is set to False the return value is what is evaluated [see \
-above]. If Check is set to True the return value is True or False depending \
-on whether the evaluation of exp agrees with what is loaded from fil or fil \
-does not exist. Default value of Check : False.\nNOTICE : If fil ends with \
-\".Gen\" or \".Mod\", the setting of Directory is ignored and fil is saved \
-in the \"CouplingVectors\" subdirectory of \"Phi\". If fil ends with \".Fac\
-\", the setting of Directory is ignored and fil is saved in the \"Factors\" \
-subdirectory of \"Phi\". If fil is a file name with full path, the setting \
-of Directory is also ignored."
+ " \[LineSeparator]saves [with Put] or retrieves [with Get] exp from a \
+file fil. It checks if the setting of the option Directory is a valid \
+directory name and if fil is a valid file name and does exist. If it does, \
+Get[fil] is executed. If fil does not exist, exp gets evaluated and saved to \
+fil. Saving and evaluating can be further controlled with the options \
+ForceSave and NoSave. If the option Check is set to False the return value \
+is what is evaluated [see above]. If Check is set to True the return value is \
+True or False depending on whether the evaluation of exp agrees with what is \
+loaded from fil or fil does not exist. Default value of Check : False."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -106,44 +113,48 @@ of Directory is also ignored."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1700909009],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellID->379391042],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->747374375],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
-Cell["Examples", "Subsubsection",
- CellTags->"CheckDB",
- CellID->647730640],
+Cell["\<\
+If fil ends with \".Gen\" or \".Mod\", the setting of Directory is ignored \
+and fil is saved in the \"CouplingVectors\" subdirectory of \"Phi\". If fil \
+ends with \".Fac\", the setting of Directory is ignored and fil is saved in \
+the \"Factors\" subdirectory of \"Phi\". If fil is a file name with full \
+path, the setting of Directory is also ignored.\
+\>", "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "CheckDB", "]"}]], "Input",
- CellTags->"CheckDB",
- CellLabel->"In[1]:=",
- CellID->2004487562],
+ CellLabel->"In[305]:="],
Cell[BoxData[
FormBox[
@@ -158,39 +169,62 @@ Cell[BoxData[
RowBox[{"NoSave", "\[Rule]", "False"}], ",",
RowBox[{"Check", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{384, 35},
+ ImageSize->{355, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"CheckDB",
- CellLabel->"Out[1]=",
- CellID->1735070400]
+ CellLabel->"Out[305]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Attributes", "[", "CheckDB", "]"}]], "Input",
- CellTags->"CheckDB",
- CellLabel->"In[2]:=",
- CellID->62116505],
+ CellLabel->"In[306]:="],
Cell[BoxData[
FormBox[
RowBox[{"{", "HoldFirst", "}"}], TraditionalForm]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{70, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"CheckDB",
- CellLabel->"Out[2]=",
- CellID->393414258]
+ CellLabel->"Out[306]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->470154859],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1371204916],
+
Cell["\<\
The first time the Table function is evaluated and the result saved into the \
test.s file.\
-\>", "Text",
- CellTags->"CheckDB",
- CellID->1632453918],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -207,32 +241,28 @@ Cell[BoxData[
RowBox[{"i", ",", "2"}], "}"}]}], "]"}], ",", "\"\\""}],
"]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1433287094],
Cell["test test ", "Print",
CellTags->"CheckDB",
- CellLabel->"During evaluation of In[3]:=",
- CellID->670482458],
+ CellLabel->"During evaluation of In[307]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"1", ",", "2"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{40, 15},
+ ImageSize->{41, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CheckDB",
- CellLabel->"Out[3]=",
- CellID->1976770700]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
Executing the same a second time will just load the result from test.s and \
not evaluate the Table function.\
-\>", "Text",
- CellTags->"CheckDB",
- CellID->342347170],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -249,24 +279,21 @@ Cell[BoxData[
RowBox[{"i", ",", "2"}], "}"}]}], "]"}], ",", "\"\\""}],
"]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1024102984],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"1", ",", "2"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{40, 15},
+ ImageSize->{41, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CheckDB",
- CellLabel->"Out[4]=",
- CellID->129097795]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["This shows the actual saved value of test.s.", "Text",
- CellTags->"CheckDB",
- CellID->277506706],
+Cell["This shows the actual saved value of test.s.", "Notes"],
Cell[CellGroupData[{
@@ -279,17 +306,16 @@ Cell[BoxData[
RowBox[{"Options", "[", "CheckDB", "]"}]}], ",", "\"\\""}],
"]"}], ",", "\"\\""}], "]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1578936180],
Cell[BoxData[
FormBox["\<\"{1, 2}\"\>", TraditionalForm]], "Output",
- ImageSize->{40, 15},
+ ImageSize->{41, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CheckDB",
- CellLabel->"Out[5]=",
- CellID->796644611]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[BoxData[
@@ -300,7 +326,7 @@ Cell[BoxData[
RowBox[{"Options", "[", "CheckDB", "]"}]}], ",", "\"\\""}],
"]"}], "]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->1720430951]
}, Open ]]
}, Open ]],
@@ -309,8 +335,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"CheckDB",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -319,10 +345,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 51.595649}",
+ "built" -> "{2020, 1, 5, 18, 53, 20.271790}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -336,17 +362,12 @@ fil. Saving and evaluating can be further controlled with the options \
ForceSave and NoSave. If the option Check is set to False the return value is \
what is evaluated [see above]. If Check is set to True the return value is \
True or False depending on whether the evaluation of exp agrees with what is \
-loaded from fil or fil does not exist. Default value of Check : False. NOTICE \
-: If fil ends with \".Gen\" or \".Mod\", the setting of Directory is ignored \
-and fil is saved in the \"CouplingVectors\" subdirectory of \"Phi\". If fil \
-ends with \".Fac\", the setting of Directory is ignored and fil is saved in \
-the \"Factors\" subdirectory of \"Phi\". If fil is a file name with full \
-path, the setting of Directory is also ignored.", "synonyms" -> {}, "title" ->
- "CheckDB", "titlemodifier" -> "", "windowtitle" -> "CheckDB", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/CheckDB"}, "SearchTextTranslated" ->
- ""},
+loaded from fil or fil does not exist. Default value of Check : False.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CheckDB",
+ "titlemodifier" -> "", "windowtitle" -> "CheckDB", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/CheckDB"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -355,7 +376,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -364,142 +385,102 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4319, 108, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6456, 196, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1700909009]},
+ CellID->470154859]},
"CheckDB"->{
- Cell[4930, 135, 75, 2, 35, "Subsubsection",
- CellTags->"CheckDB",
- CellID->647730640],
- Cell[5030, 141, 132, 4, 27, "Input",
- CellTags->"CheckDB",
- CellID->2004487562],
- Cell[5165, 147, 582, 18, 56, "Output",
- CellTags->"CheckDB",
- CellID->1735070400],
- Cell[5784, 170, 133, 4, 27, "Input",
- CellTags->"CheckDB",
- CellID->62116505],
- Cell[5920, 176, 239, 8, 36, "Output",
- CellTags->"CheckDB",
- CellID->393414258],
- Cell[6174, 187, 158, 5, 31, "Text",
- CellTags->"CheckDB",
- CellID->1632453918],
- Cell[6357, 196, 403, 14, 45, "Input",
+ Cell[7208, 230, 403, 14, 45, "Input",
CellTags->"CheckDB",
CellID->1433287094],
- Cell[6763, 212, 113, 3, 23, "Print",
- CellTags->"CheckDB",
- CellID->670482458],
- Cell[6879, 217, 256, 9, 36, "Output",
- CellTags->"CheckDB",
- CellID->1976770700],
- Cell[7150, 229, 175, 5, 51, "Text",
- CellTags->"CheckDB",
- CellID->342347170],
- Cell[7350, 238, 403, 14, 45, "Input",
+ Cell[7614, 246, 95, 2, 23, "Print",
+ CellTags->"CheckDB"],
+ Cell[7712, 250, 235, 8, 35, "Output",
+ CellTags->"CheckDB"],
+ Cell[8121, 268, 403, 14, 45, "Input",
CellTags->"CheckDB",
CellID->1024102984],
- Cell[7756, 254, 255, 9, 36, "Output",
- CellTags->"CheckDB",
- CellID->129097795],
- Cell[8026, 266, 102, 2, 31, "Text",
- CellTags->"CheckDB",
- CellID->277506706],
- Cell[8153, 272, 319, 10, 27, "Input",
+ Cell[8527, 284, 235, 8, 35, "Output",
+ CellTags->"CheckDB"],
+ Cell[8863, 299, 319, 10, 27, "Input",
CellTags->"CheckDB",
CellID->1578936180],
- Cell[8475, 284, 221, 7, 36, "Output",
- CellTags->"CheckDB",
- CellID->796644611],
- Cell[8711, 294, 284, 9, 27, "Input",
+ Cell[9185, 311, 201, 6, 35, "Output",
+ CellTags->"CheckDB"],
+ Cell[9401, 320, 284, 9, 27, "Input",
CellTags->"CheckDB",
CellID->1720430951]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11822, 365},
- {"CheckDB", 11957, 369}
+ {"PrimaryExamplesSection", 12133, 386},
+ {"CheckDB", 12267, 390}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2268, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 1419, 26, 247, "Usage",
+Cell[2850, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3159, 91, 1033, 20, 170, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4319, 108, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1700909009],
-Cell[4710, 125, 195, 6, 25, "ExampleSection",
- CellID->379391042],
+Cell[4217, 115, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->747374375],
+Cell[4958, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4992, 143, 410, 7, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4930, 135, 75, 2, 35, "Subsubsection",
- CellTags->"CheckDB",
- CellID->647730640],
-Cell[CellGroupData[{
-Cell[5030, 141, 132, 4, 27, "Input",
- CellTags->"CheckDB",
- CellID->2004487562],
-Cell[5165, 147, 582, 18, 56, "Output",
- CellTags->"CheckDB",
- CellID->1735070400]
+Cell[5427, 154, 91, 2, 70, "Input"],
+Cell[5521, 158, 541, 16, 55, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5784, 170, 133, 4, 27, "Input",
- CellTags->"CheckDB",
- CellID->62116505],
-Cell[5920, 176, 239, 8, 36, "Output",
- CellTags->"CheckDB",
- CellID->393414258]
+Cell[6099, 179, 94, 2, 70, "Input"],
+Cell[6196, 183, 199, 6, 35, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[6174, 187, 158, 5, 31, "Text",
- CellTags->"CheckDB",
- CellID->1632453918],
Cell[CellGroupData[{
-Cell[6357, 196, 403, 14, 45, "Input",
+Cell[6456, 196, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->470154859],
+Cell[CellGroupData[{
+Cell[6868, 215, 196, 6, 26, "ExampleSection",
+ CellID->1371204916],
+Cell[7067, 223, 116, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[7208, 230, 403, 14, 45, "Input",
CellTags->"CheckDB",
CellID->1433287094],
-Cell[6763, 212, 113, 3, 23, "Print",
- CellTags->"CheckDB",
- CellID->670482458],
-Cell[6879, 217, 256, 9, 36, "Output",
- CellTags->"CheckDB",
- CellID->1976770700]
+Cell[7614, 246, 95, 2, 23, "Print",
+ CellTags->"CheckDB"],
+Cell[7712, 250, 235, 8, 35, "Output",
+ CellTags->"CheckDB"]
}, Open ]],
-Cell[7150, 229, 175, 5, 51, "Text",
- CellTags->"CheckDB",
- CellID->342347170],
+Cell[7962, 261, 134, 3, 48, "Notes"],
Cell[CellGroupData[{
-Cell[7350, 238, 403, 14, 45, "Input",
+Cell[8121, 268, 403, 14, 45, "Input",
CellTags->"CheckDB",
CellID->1024102984],
-Cell[7756, 254, 255, 9, 36, "Output",
- CellTags->"CheckDB",
- CellID->129097795]
+Cell[8527, 284, 235, 8, 35, "Output",
+ CellTags->"CheckDB"]
}, Open ]],
-Cell[8026, 266, 102, 2, 31, "Text",
- CellTags->"CheckDB",
- CellID->277506706],
+Cell[8777, 295, 61, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[8153, 272, 319, 10, 27, "Input",
+Cell[8863, 299, 319, 10, 27, "Input",
CellTags->"CheckDB",
CellID->1578936180],
-Cell[8475, 284, 221, 7, 36, "Output",
- CellTags->"CheckDB",
- CellID->796644611]
+Cell[9185, 311, 201, 6, 35, "Output",
+ CellTags->"CheckDB"]
}, Open ]],
-Cell[8711, 294, 284, 9, 27, "Input",
+Cell[9401, 320, 284, 9, 27, "Input",
CellTags->"CheckDB",
CellID->1720430951]
}, Open ]]
}, Open ]],
-Cell[9022, 307, 23, 0, 42, "FooterCell"]
+Cell[9712, 333, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChiralityProjector.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChiralityProjector.nb
index 0976fa732..a31d10220 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChiralityProjector.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChiralityProjector.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10709, 363]
-NotebookOptionsPosition[ 7039, 253]
-NotebookOutlinePosition[ 9703, 326]
-CellTagsIndexPosition[ 9583, 320]
+NotebookDataLength[ 14618, 515]
+NotebookOptionsPosition[ 10491, 391]
+NotebookOutlinePosition[ 13058, 460]
+CellTagsIndexPosition[ 12936, 454]
WindowTitle->ChiralityProjector
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ChiralityProjector\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ChiralityProjector"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GA\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GA"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ChiralityProjector\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ChiralityProjector"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ChiralityProjector.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$26618],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ChiralityProjector", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$39702],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ChiralityProjector", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ ChiralityProjector.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ChiralityProjector", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ChiralityProjector", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,6 +144,44 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->723076214],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The shortcut ChiralityProjector is deprecated, please use GA[6] and GA[7] \
+instead!\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -124,7 +197,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->489332914],
+ CellID->1872745401],
Cell[CellGroupData[{
@@ -134,7 +207,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->807211662],
+ CellID->1538912494],
Cell[CellGroupData[{
@@ -161,20 +234,22 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["7",
TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{62, 21},
+ ImageSize->{64, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChiralityProjector",
- CellLabel->"Out[1]=",
- CellID->1252517379]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{"%", ",",
- RowBox[{"DiracSubstitute67", "\[Rule]", "True"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"#", ",",
+ RowBox[{"DiracSubstitute67", "\[Rule]", "True"}]}], "]"}], "&"}], "/@",
+ "%"}]], "Input",
CellTags->"ChiralityProjector",
CellLabel->"In[2]:=",
CellID->2102778570],
@@ -197,12 +272,83 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]], "2"]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{130, 45},
+ ImageSize->{133, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ChiralityProjector",
- CellLabel->"Out[2]=",
- CellID->1744568026]
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["\<\
+ChiralityProjector is scheduled for removal in the future versions of \
+FeynCalc. The safe alternative is to use GA[6] and GA[7].\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"GA", "[", "6", "]"}], ",",
+ RowBox[{"GA", "[", "7", "]"}]}], "}"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{64, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"GA", "[", "6", "]"}], "]"}], "===",
+ RowBox[{"ChiralityProjector", "[",
+ RowBox[{"+", "1"}], "]"}]}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"GA", "[", "7", "]"}], "]"}], "===",
+ RowBox[{"ChiralityProjector", "[",
+ RowBox[{"-", "1"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -226,16 +372,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["DiracGamma",
+ StyleBox[ButtonBox["GA",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData->"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["FCI",
@@ -244,9 +384,7 @@ Cell[TextData[{
ButtonNote->"FCI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ChiralityProjector",
- CellID->326424545]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -254,7 +392,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"ChiralityProjector",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -263,10 +401,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 53.037247}",
+ "built" -> "{2020, 1, 5, 18, 53, 21.485586}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -274,11 +412,11 @@ TaggingRules->{
"None", "summary" ->
"ChiralityProjector[+1] denotes 1/2 (1 + \\[Gamma]^5). \
ChiralityProjector[-1] denotes 1/2 (1 + \\[Gamma]^5).", "synonyms" -> {},
- "title" -> "ChiralityProjector", "titlemodifier" -> "", "windowtitle" ->
- "ChiralityProjector", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "ChiralityProjector", "titlemodifier" -> "",
+ "windowtitle" -> "ChiralityProjector", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ChiralityProjector"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -286,8 +424,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -296,75 +435,88 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3819, 111, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5850, 184, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->489332914]},
+ CellID->1872745401]},
"ChiralityProjector"->{
- Cell[4451, 140, 280, 9, 27, "Input",
+ Cell[6484, 213, 280, 9, 27, "Input",
CellTags->"ChiralityProjector",
CellID->336937517],
- Cell[4734, 151, 461, 17, 42, "Output",
- CellTags->"ChiralityProjector",
- CellID->1252517379],
- Cell[5232, 173, 215, 6, 27, "Input",
+ Cell[6767, 224, 440, 16, 42, "Output",
+ CellTags->"ChiralityProjector"],
+ Cell[7244, 245, 265, 9, 27, "Input",
CellTags->"ChiralityProjector",
CellID->2102778570],
- Cell[5450, 181, 624, 23, 66, "Output",
- CellTags->"ChiralityProjector",
- CellID->1744568026],
- Cell[6442, 227, 555, 21, 31, "Text",
- CellTags->"ChiralityProjector",
- CellID->326424545]}
+ Cell[7512, 256, 603, 22, 60, "Output",
+ CellTags->"ChiralityProjector"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8922, 297},
- {"ChiralityProjector", 9067, 301}
+ {"PrimaryExamplesSection", 12417, 436},
+ {"ChiralityProjector", 12563, 440}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3106, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 852, 29, 88, "Usage",
+Cell[3699, 98, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4019, 113, 852, 29, 93, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3819, 111, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4896, 146, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->723076214],
+Cell[5637, 172, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5671, 174, 130, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5850, 184, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->489332914],
+ CellID->1872745401],
Cell[CellGroupData[{
-Cell[4231, 130, 195, 6, 25, "ExampleSection",
- CellID->807211662],
+Cell[6263, 203, 196, 6, 26, "ExampleSection",
+ CellID->1538912494],
Cell[CellGroupData[{
-Cell[4451, 140, 280, 9, 27, "Input",
+Cell[6484, 213, 280, 9, 27, "Input",
CellTags->"ChiralityProjector",
CellID->336937517],
-Cell[4734, 151, 461, 17, 42, "Output",
- CellTags->"ChiralityProjector",
- CellID->1252517379]
+Cell[6767, 224, 440, 16, 42, "Output",
+ CellTags->"ChiralityProjector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5232, 173, 215, 6, 27, "Input",
+Cell[7244, 245, 265, 9, 27, "Input",
CellTags->"ChiralityProjector",
CellID->2102778570],
-Cell[5450, 181, 624, 23, 66, "Output",
- CellTags->"ChiralityProjector",
- CellID->1744568026]
+Cell[7512, 256, 603, 22, 60, "Output",
+ CellTags->"ChiralityProjector"]
+}, Open ]],
+Cell[8130, 281, 154, 3, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[8309, 288, 155, 5, 27, "Input"],
+Cell[8467, 295, 487, 19, 42, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8991, 319, 198, 6, 27, "Input"],
+Cell[9192, 327, 169, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9398, 337, 198, 6, 27, "Input"],
+Cell[9599, 345, 169, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[6101, 208, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9795, 354, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6169, 213, 270, 12, 31, "SeeAlsoSection",
+Cell[9863, 359, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[6442, 227, 555, 21, 31, "Text",
- CellTags->"ChiralityProjector",
- CellID->326424545]
+Cell[10136, 373, 313, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[7012, 251, 23, 0, 42, "FooterCell"]
+Cell[10464, 389, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Chisholm.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Chisholm.nb
index 31c50f5c4..74e73ee61 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Chisholm.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Chisholm.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 71582, 1901]
-NotebookOptionsPosition[ 62982, 1612]
-NotebookOutlinePosition[ 68111, 1767]
-CellTagsIndexPosition[ 67961, 1760]
+NotebookDataLength[ 68281, 2347]
+NotebookOptionsPosition[ 61461, 2128]
+NotebookOutlinePosition[ 64560, 2216]
+CellTagsIndexPosition[ 64410, 2209]
WindowTitle->Chisholm
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Chisholm\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Chisholm"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Chisholm.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"EpsChisholm\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/EpsChisholm"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Chisholm\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Chisholm"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Chisholm.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$26959],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Chisholm", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$40147],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Chisholm", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +95,27 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Chisholm", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Chisholm", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"Chisholm", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "substitutes products of three Dirac matrices or slashes by the Chisholm \
-identity."
+ RowBox[{"Chisholm", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitutes products of three Dirac matrices or \
+slashes by the Chisholm identity."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +126,68 @@ identity."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1698842247],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Chisholm", "]"}]], "Input",
+ CellLabel->"In[55]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Mode", "\[Rule]", "1"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "False"}], ",",
+ RowBox[{"NonCommutative", "\[Rule]", "True"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}], ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{498, 72},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[55]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +203,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->166755722],
+ CellID->1890694887],
Cell[CellGroupData[{
@@ -118,190 +213,59 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1692715398],
+ CellID->1569818548],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Chisholm", "[",
- RowBox[{"GA", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
- "]"}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
CellTags->"Chisholm",
CellLabel->"In[1]:=",
- CellID->1963239115],
+ CellID->820852327],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["$MU$3638",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["$MU$3638",
- TraditionalForm],
- TraditionalForm]}]]}]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{505, 19},
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{74, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Chisholm",
- CellLabel->"Out[1]=",
- CellID->1878360355]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[2]:=",
- CellID->820852327],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{137, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[2]=",
- CellID->1183629031]
-}, Open ]],
+Cell["Notice that the output contains dummy indices.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", " ", "=",
- RowBox[{"Chisholm", "[", "t1", "]"}]}]], "Input",
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1637229100],
Cell[BoxData[
@@ -312,14 +276,17 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3671",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$28", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -334,7 +301,9 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3671",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$28", ")"}]}],
TraditionalForm],
TraditionalForm]}]]}], "+",
RowBox[{
@@ -344,23 +313,17 @@ Cell[BoxData[
FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -368,23 +331,17 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -392,62 +349,80 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{395, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[3]=",
- CellID->1999653730]
-}, Open ]],
-
-Cell["The $MU$ variables are unique indices.", "Text",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{411, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Chisholm",
- CellID->46337482],
+ CellLabel->"Out[2]="]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"t1", ".", "t1"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[4]:=",
- CellID->648397183],
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}],
+ "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
- FormBox["16", TraditionalForm]], "Output",
- ImageSize->{18, 15},
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{101, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[4]=",
- CellID->445477955]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", " ", "=",
- RowBox[{"Chisholm", "[", "t1", "]"}]}]], "Input",
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[5]:=",
- CellID->429173445],
+ CellLabel->"In[4]:=",
+ CellID->1963239115],
Cell[BoxData[
FormBox[
@@ -457,15 +432,28 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3702",
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -475,164 +463,1023 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3702",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]}]]}], "+",
RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{519, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Chisholm",
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]], " ",
- FormBox[
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{245, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Dummy Lorentz indices may also appear as ",
+ ButtonBox["FCGV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGV",
+ ButtonNote->"FCGV"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li361\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
- OverscriptBox["g", "_"],
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li361\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{457, 94},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[TextData[{
+ ButtonBox["Chisholm",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"],
+ " only works with Dirac matrices in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ " dimensions, ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional objects are ignored."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{71, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]"}], "]"}], "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]"}], "]"}],
+ "]"}]}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$44", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$44", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$45", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$45", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{446, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[9]:="],
+
+Cell[BoxData[
+ FormBox["16", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ "]"}]}]], "Input",
+ CellLabel->"In[10]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$46", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$46", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$47", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$47", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{395, 19},
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{542, 47},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[5]=",
- CellID->536726068]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"t2", ".", "t3"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[6]:=",
- CellID->10063016],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[11]:="],
Cell[BoxData[
- FormBox["16", TraditionalForm]], "Output",
- ImageSize->{18, 15},
+ FormBox[
+ RowBox[{"-", "128"}], TraditionalForm]], "Output",
+ ImageSize->{36, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[6]=",
- CellID->1250343813]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"DiracSlash", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[7]:=",
- CellID->1067563039],
+ RowBox[{"GS", "[",
+ RowBox[{"p", ",", "q", ",", "r"}], "]"}]], "Input",
+ CellLabel->"In[12]:="],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{133, 25},
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{149, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[7]=",
- CellID->102426516]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Chisholm", "[", "t4", "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[8]:=",
- CellID->1495489925],
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[13]:="],
Cell[BoxData[
FormBox[
@@ -643,32 +1490,37 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3741",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$48", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["$MU$3741",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$48", ")"}]}],
TraditionalForm],
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["a",
+ FormBox["p",
TraditionalForm], "_"],
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["b",
+ FormBox["q",
TraditionalForm], "_"],
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["c",
+ FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}]]}]}], "+",
RowBox[{
@@ -676,21 +1528,21 @@ Cell[BoxData[
RowBox[{
FormBox[
OverscriptBox[
- FormBox["a",
+ FormBox["p",
TraditionalForm], "_"],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["b",
+ FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ")"}], " ",
RowBox[{
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["c",
+ FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}]}], "-",
RowBox[{
@@ -698,21 +1550,21 @@ Cell[BoxData[
RowBox[{
FormBox[
OverscriptBox[
- FormBox["a",
+ FormBox["p",
TraditionalForm], "_"],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["c",
+ FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}], ")"}], " ",
RowBox[{
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["b",
+ FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]}], "+",
RowBox[{
@@ -720,41 +1572,38 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["a",
+ FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], " ",
RowBox[{"(",
RowBox[{
FormBox[
OverscriptBox[
- FormBox["b",
+ FormBox["q",
TraditionalForm], "_"],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["c",
+ FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{466, 30},
+ ImageSize->{520, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[8]=",
- CellID->1312947625]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", "=",
- RowBox[{"GA", "[",
- RowBox[{
- "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
- "\[Kappa]"}], "]"}]}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[9]:=",
+ CellLabel->"In[14]:=",
CellID->1800486413],
Cell[BoxData[
@@ -808,767 +1657,445 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{137, 18},
+ ImageSize->{148, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Chisholm",
- CellLabel->"Out[9]=",
- CellID->547285677]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", " ", "=",
- RowBox[{"Chisholm", "[", "a1", "]"}]}]], "Input",
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[10]:=",
+ CellLabel->"In[15]:=",
CellID->1694713808],
Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
-1:eJztnQtcE1fa/9u+/7Wrr66uW/uvulLKHRECJAQICoJcXFEqCijYF1EoWkRF
-pPUCSkH/gkLVqK/WooJaW7zhBe2KV8QqsqIiKqUgKDfDLUAIISQkwz8hgoGQ
-yWRmMrlwvp/P7gcLeZ5zfs/zTM6cOXPOF8vXLgj/6IMPPlj/V9H/LVi2wTU6
-etmmhf9H9A+3TTFfL/8v0Q+HRf/7RPQ34p97AAAAAAAAyMJ7tdve3Jpqb29P
-844r7lB3c4ZEyG0uL3jYzFd3O3pRf2O0IWQACerPFoDuwa86toBiMn7UOGPL
-GaH3WiEUJiDmtTmU9cVsVkHyXGpIRjkXhZHOF8mr89tQOO9rQ8uNuZQ1zzjv
-fooS//TuN01XZllHFon/zS1JoM1Or+ke+FEh69HuQPtpUw31yctOVPEGGebV
-/rYt0NXB3s7aeOx4m9DkrJou9K3ECm6N0dGQ4ZDMsGhIsfSZkiugBBxTF2MR
-AXQVYcMFd2r8H1y0n+98sYHilpG52X1mdDYD5dCG/Sx++9UrvxxOO51X24Xm
-QvZyI8XjUqNQnNuxVM/Lje9tcIpW23jlMCFhY/Yix/WF7IEfhFrvhJJmHyrt
-hLrK91HNwx4PGEBzirc4OsbmMgU9Pa23PawG/ZZgcGyM7oYMazIrgqhi+UAO
-xcXF/abkC9ijbLYocoeliADaDVwScp6uIvvcakH7cVE1zZgwboKeX7Y4jVEa
-6Sw/dDCnjNnwaI+recDFBoGS3RPWn3OjbHrJFY+Qsj2psSVStS2oO+nimPqK
-VbrDxedU3aDxEsTM8SFHFPbmOrsgyNLnd5bUb9vyFlsH3ukdXwoYmS6UuBKV
-XZMkwEmkZGOGacgQJLNCNKFYKuTA4/UN6uEEVDpbFLnDEBGAxtPdnHdkT0rK
-3uOP24bISpgkFNSecHbYVQ57nwmXw5yiSCvqmpUk4yU5zbD1AGekD1FBOBkv
-eNCOtNfv6Hgcbv2v60xRpXQ8ibD1vtEiPQRjFwTbBf/77FfOm4s4gz8oajzJ
-9UqT+M95FbsdaPsqpcaCXaWJdk5HqsWVArXmLib53cY+DYI6TMo2ZniGDEky
-K0QTikUxsALinrqoIwLQfFj5oRRjQ2O7sIdKful3FC63mZ+HeuJaUHfKxXFX
-WcPdMFPS1hed6Ixw/ji049JbUcbx3xx0sN2i7PC+uzrNzihAdPnqZmQtMiAl
-lQ2Y2OVX0h1M5lL8zzFkxsaC2gzKp5YpZV0Qr+p0sG1AVr30n/Aq95LNQvPa
-ICErP5FmG1PIxj6DjjpMODZGh0OGMZkVognFIgFeQNxTF3VEADoMv/rIPCML
-vwsoI85+tJwccJ/V012TPsvQ82Rtt+KPDNGGt+fW+S7ZsOfwnpiVu+61KNsS
-1v0AQ9MZTm5ePoHh80j+9wbVdttd7ylTtzwfolTb84PMyT5OFhZWNo5Bqfmt
-g4aCgqbr37qamliQbNxWnSjrxP3Zq1Lg1xgdDhnGZFaI2opF2MXuHhByBQJi
-zBYZd+iLCKDhdNdl+lEsLGxm7yyTHQC23PScaBzzLuzCpqsBBqT4oZJADhg/
-jp8RATMvJZAyZfxYMeP05vTNGfPKk+2nS27QlYNXvsvB+XgtbtcZiPWEvv3H
-CvlDcFWGCXdTOhsy2DBpQrF0N+UdWB204rv4xMS4qGDvef5fenmFZDGk1UIt
-IDp3MOBdRACCacubbzx9/08L/a81yw4xuCVxZhPdb/Q+4OMUbZpmFHKrRYnB
-AcaP42Wkq2LvTEOvXffqB0+mQsycObYRT2WmYRUCMa9720bKzt+iRvD2F3s9
-t1z5UxqqDBPupnQ2ZLBhUn+x8KsOu5n4nKrmv2vsr/ZTXAc3FrWA6NzBgHsR
-AYiFWxJLsom7uHXhgVdDPMaDmq66TLJMFf2KX33UzcBdZnU2PBg/jpMR1oOl
-RpYJpWp8u0Ixir47VBom3E3pbMhgw6T+YmnP9zOmZTIk3zgCxvmFBuTtf6pO
-RILdAYilvSBQb9TH0owxi5G6ExYyTk83WZiV7rfqEXuoz3cWR5voLy5gtdxe
-ZmIdr/QzOowfx8UI52mE/l8/HtM79zH27wZ+d1tRtUJF9AfoLx99+NEI2QBJ
-UHGYcDelcyFDFCa1FwvU8fyHuWaOvis2Jny/Icw/JPGiSt9HJcSdoisYQFVA
-XY3Vb15L86aWyX8/68EuWGLqePBCuP+F+iHvj4X152mTqWm3EsimaCYvMH4c
-DyNQ42WnyRQMI3HV8i5AFQV060m0zGKZAElQcZhwN6VzIUMUJrUXC7csyd0h
-sYhD0NIMQtwpuoIB1ASvfKetZeSF5IXJ8t535TxdafiJuZGeRwaiUubVnNl5
-pub9tIqSH8fRSD+tufMmTVlysU6jV47Dz1nhHqYBxkHIEKNgalEdxSINvzrd
-f8rIkROtZgVFJR+/WcZW7cIlgt0BNAmo6Yrr+BF/G/+5n9z3OQV1J6ljRk37
-HuEtNKco2mOd1OMvJT+Oo5F+IM5L+kLz8X8dOVq8YGeS81F8lpjgi5CZGx2y
-+fnQOzLgHyZpQMiQAxsm9RTLe7obru2IjKWfzT6TlhL7jR/1s9GTvFKLO1Q1
-RCfYHUDr6Hi81mCsOerHlhg/jqMR3QZHiUDIUKPWYukoDDGn/VzXv+JVyHoY
-a/65r9Kv7WumO4DWIX5qOWI0Ge1ycIwfx9GIboOjRCBkqFFvsXCerTUzi8pn
-9Q38haz7m2i+GTUqmvgj2B1A6+CWJtjpz9pfiXKbH4wfx9GIboOjRCBkqFFz
-sQjbnxwI954fGhOfspe+J2VnEv1ypQp3NCDYHQAAAAAAAAAAAAAAAAAAAAAA
-AAAAAAAAAAAAAICWIeQ2lxc8bAYr8QBqBeShugDKA5SAV/vbtkBXB3s7a+Ox
-421Ck7PQ7nkGMa/NoawvZrMKkudSQzLKuejX9EEtN+ZS1jzjvPsp6ln/+7n8
-qmMLKCbjR40ztpwReg/liZlQ05VZ1pINorklCbTZMrsrCVmPdgfaT5tqqE9e
-dqIK/8WoOPSCELUl4KKGQs1xy0ME4NAjHcp2IpUH6A6c4i2OjrG5TEFPT+tt
-D6uwx/K2ZFBM54sNFLeMzM3uM6OzGTAjlw/kUFxc3G/q5UaKxyXxgUDckliq
-5+VG6aoRNlxwp8bL2/wJkQtO0WobrxwmJGzMXuS4vnDQ9rVQ651Q0uxDpZ1Q
-V/k+qjkWTeSDoBewEKU2YjWwaY5jHioEl/jqTLYTqTxA+5CbV215i60D7/QO
-aASMTBdKnMIDpuWaEiX5jAnjJuj59R0CJ48KOfB4fQNAYf05N8qml1zxmCnb
-kxo7sFGcp6vIPrdasLgQ1J10cUx9xSrd4eJzqm7QMAxi5viQIwp7S4hdEGTp
-I3ejKQTIlQtBL+A+TpjaiNXApLnyeagQudIpE1/166/qbFeB8gBdQl5edZUm
-2jlJ9kmAWnMXk/xuK7wvlpuinKJIK+qalSTjJTnNGPfc7Hgcbv2v60xRUzqe
-RNh632iRbpSg9oSzw65ybBNJ7IJgu+B/n/3KebPs0WaijpBcrzSJffIqdjvQ
-9lVimP6VJxfCXqhdbRzVgNEcRR4qBE46xD1Su/6qznZVKA8YDvAq95LNQvPa
-ICErP5FmG1PIRp04grpTLo67yhruhpmStmI6oKinuzrNzijgQXtPNyNrkQEp
-qWzA9GtH4XKb+XnIT78cEn4l3cFkLsX/HEPmQGVBbQblU8uUsi6IV3U62DYg
-q14VZy5j7AVhauOoBozmOOahQnDpkc5kO5HKA3QKQdP1b11NTSxINm6rTpRh
-2bGG/Wg5OeA+q6e7Jn2WoefJWuR7vgm72N0DHLPuBxiaznBy8/IJDJ9H8r83
-sHL41UfmGVn4XVCm5GVc9LTd9Z4ydctQR5S15weZk32cLCysbByDUvNbVXNu
-AZpeSEGY2ujVUEZzHPNQIbjEV2eynUjlAdpFy03PicZ9xzgKm64GGJDiUR7q
-iIup7qa8A6uDVnwXn5gYFxXsPc//Sy+vkCyGdO3xypPtp2PYpRWBCxh45bsc
-nI/XYr/XwCiXZqiNVA1smisPxHpC3/5jxdBT87DSIe2RZuiPiwtcgVUeoEtw
-S+LMJrrf6H3WxinaNM0I/VmjOJjiVx12M/E5VS2ZYBa8/dV+iuvgg9ogZs4c
-24inMo8hcHQBA8S87m0bKfsQRHkwyqURaiNUA6PmKIA94w9OOsTx1Qj9cXGB
-LwpOVwToDlDTVZdJlqmveKK736NuBu4YDorGwVR7vp8xLZMhqUEB4/xCA/L2
-P/FdTE6AC2RglEs71CbYUT+wVzBccl479Ncw5QE6RWdxtIn+4gJWy+1lJtbx
-mB7rYTcFdTz/Ya6Zo++KjQnfbwjzD0m8iPtrSAS4EJVsQaDeqI+lGWMWM3hG
-A6NcWqE2wY6klP/LRx9+NEI1yuNlRFeyXQIi5QG6hLD+PG0yNe1WAtkU/XQV
-Xqa4ZUnuDolFHBU+kSPAhahkuxqr37yW5k0tkz/IJUa5tEJtgh31K19RQLee
-RMssVonyeBnRlWyXgEh5gE7BebrS8BNzIz2PDKXvunk1Z3aeqXm/thyDKQn8
-6nT/KSNHTrSaFRSVfPxmGRv/RUwEuECKknJpo9oEO+pHwcwJKum0UX+NUx6g
-SwjqTlLHjJr2PYq7bk5RtMc6qeeKGEyJ6W64tiMyln42+0xaSuw3ftTPRk/y
-Si3uwHPoQoAL5Cgpl/apTbAjKYTM3OiQzc/lbZ+BSjrt018DlQfoEh2P1xqM
-NU8oxWEeFJupjsIQc9rPdf2rI4Wsh7Hmn/s+aMfeMAJdKNMabMprvNoEO1Km
-TXjkvMbrr4nKA3QIztMI/RGjyRhWkONlivNsrZlZVD6rb1gkZN3fRPPNqMFx
-w2cCXCjRGIxyabzaBDtSokl45Lzm66+BygN0CW5pgp3+rP2VOGwkjtWUsP3J
-gXDv+aEx8Sl76XtSdibRL1fi/CIrAS4Qg1EuLVCbYEeIwSXntUB/zVMeAAAA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAYHgg5DaXFzxsBmv8ALCAPNFVQGQB
-SsCr/W1boKuDvZ218djxNqHJWWh3U4OY1+ZQ1hezWQXJc6khGeVc9KsFoZYb
-cylrnnHe/RT1bNAe1ULWo92B9tOmGuqTl52oQrmKEmq6Mstash03tySBNltq
-p1R+1bEFFJPxo8YZW84IvaeqUzhx6AWBmuOWJ2pVHgf7hGgOIxEK4DMNx8gC
-hhGc4i2OjrG5TEFPT+ttD6uwx+g3G+h8sYHilpG52X1mdDYDZuTygRyKi4v7
-Tb3cSPG41CgUF04s1fNy44DyhFrvhJJmHyrthLrK91HN5bZZkSNO0Wobrxwm
-JGzMXuS4vpA94MPChgvu1Pg/VHfGDdJewEKY5srliUYrj9U+MZrDSqScF/hM
-w/EKANBB5KZWW95i68A7vcMvASPThRJXoqik5JoSleSMCeMm6PllN8JvyFYh
-Bx6vb0AkrD/nRtn0kisefmV7UmMHNgpi5viQIwp7U5xdEGTp8zsLnSNB3UkX
-x9RXrNIdLj6n6gaN6zhPV5F9brUoUEMhcuVC3As4I4RprmSeaLTyyOyrW3NY
-iZTyAp9pyl8BAMMKeanVVZpo5yTZdQFqzV1M8rut8C5ebpZyiiKtqGtWkoyX
-5DRj3M2z43G49b+uM0VN6XgSYet9o2XgELgokuR6pUn833gVux1o+yrRTs+y
-C4Ltgv999ivnzTIHyQlqTzg77CrH/DY+nFyIe6F2zVHkCTxqVB6hfbVrDiOR
-csBmGu6RBQwTeJV7yWaheW2QkJWfSLONKWSjThxB3SkXx11lDXfDTElbMR0x
-1dNdnWZnFPCgvaebkbXIgJRUNmD6VVCbQfnUMqWsC+JVnQ62DciqR322OL+S
-7mAyl+J/jiFjoqNwuc38PNXtNI1LLwjTHMc8kaBG5THaJ0xzGImUazBspuEe
-WcBwQdB0/VtXUxMLko3bqhNlWPbCYT9aTg64z+rprkmfZeh5shb5oz1hF7t7
-gGPW/QBD0xlObl4+geHzSP73BtZ5e36QOdnHycLCysYxKDW/FfnYT8ZRT9td
-7ylTtwx1+Bm/+sg8Iwu/C+i/mOBB3wspCNMca55okvIY7ROnuXyJlPKiINPw
-uwIAdIyWm54TjfuOhhQ2XQ0wIMWjPCgSF1PdTXkHVget+C4+MTEuKth7nv+X
-Xl4hWQzpCuSVJ9tPl7t9Ka98l4Pz8VqFhY/AkWqBlQtpLzRDc9zdYQZiPaFv
-/7Fi6Kl5jKJpkeaIvCDLNABgENySOLOJ7jd6nwxyijZNM0J/CCcOpvhVh91M
-fE5VSyZcBW9/tZ/iOvgIMoiZM8c24qmcOV6Ied3bNlLhDDASRyoGTi6EvdAQ
-zXF3hx3Y0+swiqY1miPzgjDTAIBBQE1XXSZZpr7iie7Vj7oZuGNYJ46DqfZ8
-P2NaJkNSiQLG+YUG5O1/qmIxOWGO5IOL8tqkOZHuYL87MIqmNZprQJIDdJnO
-4mgT/cUFrJbby0ys4zE93MNuCup4/sNcM0ffFRsTvt8Q5h+SeFFFryGp2FF7
-QaDeqI+lGWMWM3heAxfltUhzQtz1K/+Xjz78aIRqlNcWzYmNLKKcB+gSwvrz
-tMnUtFsJZFP001V4meKWJbk7JBZxVP5ETsWOoK7G6jevpXlTy+QPcoaL8lqk
-OSHu3ilfUUC3nkTLLFaJ8tqiObGRRZTzAJ2C83Sl4SfmRnoeGUrfe/Nqzuw8
-U/N+JTwGUxL41en+U0aOnGg1Kygq+fjNMjbGBfLqdwQHKrm0V3Mi3cHOWSkt
-mpZqrhFJDtBhBHUnqWNGTfsexb03pyjaY53UczYMpsR0N1zbERlLP5t9Ji0l
-9hs/6mejJ3mlFnfgP3QhzBE8qOTSVs2JdSdk5kaHbH4ub/sMJUXTSs01JMkB
-OkzH47UGY80TSnGYCsVmqqMwxJz2c13/akEh62Gs+ee+D9qxN0xNjhS1Aw/l
-tURztbiT3w5symuD5poiNUB34TyN0B8xmozH2n2MpjjP1pqZReWz+kZGQtb9
-TTTfjBrcN3wmzJGCZuChvLZorhZ3cpuBUTRt0FxDpAboMNzSBDv9WfsrMe8P
-hN2UsP3JgXDv+aEx8Sl76XtSdibRL1eq5EVWwhzBgovyWqO5WtzJAaNo2qG5
-ZkgNAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABj2CLnN5QUPm8GiR8Ih
-UnkQZYBCQJIMBmq6Mstasj8ztySBNhvdHrsQ89ocyvpiNqsgeS41JKOci36d
-INRyYy5lzTPOu5+invW/6suvOraAYjJ+1Dhjyxmh9zAdiylkPdodaD9tqqE+
-edmJqsHrMHm1v20LdHWwt7M2HjveJjQ5S2Xby8nvrDJG8BEfJhN0UHkcfRGS
-/PjUaR/yooBjoIdEi642EnBPSHUprxI4RattvHKYkLAxe5Hj+kI2KiOdLzZQ
-3DIyN7vPjM5mwHwzfyCH4uLiflMvN1I8LjUKxdkVS/W83Cgto7Dhgjs1/o+h
-j/tB7AJqvRNKmn2otBPqKt9HNQ97PGBbC07xFkfH2FymoKen9baH1aDf4gts
-ZxEbwUl82EzQNeVx9EVM8iOtU6xRQBBoDGjV1UbJJNFs5TEhp1OCupMujqmv
-WKU7XHxO1cEOA+TKIur1jAnjJuj5ZTfCb8VWIQcer+8bWFh/zo2y6SVXPEbJ
-9qTGlgyQkvN0FdnnVgs2FxAzx4ccUdgbNnZBkKXP7yypz7flLbYOvNP7xS9g
-ZLpQ4kowB1O+brCdRWoEL/FhM0HHlFfel7qTH2mdYo0CgkAjQReuNkomiYYo
-rwrkdYpdEGwX/O+zXzlvVnSymFxZOEWRVtQ1K0nGS3KaMe7j2fE43Ppf15mi
-eHU8ibD1vtEiPRAQ1J5wdthVjvH1eFFrSa5XmsSGeRW7HWj7KqXGLl2liXZO
-kp0ooNbcxSS/29jvH+XqBttZpEbwEx8mE3RMeRS+1J78yOtUAbBRwCfQOnG1
-wT8hCVGeSPiVdAeTuRT/cwy05xkL6k65OO4qa7gbZkraiulkqZ7u6jQ7o4AH
-7T3djKxFBqSksgHTix2Fy23m52E8vFRQm0H51DKlrAviVZ0Otg3IqpfuN69y
-L9ksNK8NErLyE2m2MYVs1U09wncWITiKD5MJOqY8jr4IS37sdfquwbBRwCXQ
-MGjR1Qb3hFSv8iqh7a73lKlbMJz+xX60nBxwn9XTXZM+y9DzZC3y51/CLnb3
-gICw7gcYms5wcvPyCQyfR/K/N1BKfvWReUYWfhfqlcg7GRft+UHmZB8nCwsr
-G8eg1PzWQUMXQdP1b11NTSxINm6rTpSpdHMg+M4iBEfxYTJBx5TH0RdhyY+y
-TpWMAppAK4X2XG2wJommKY+KlpueE437joYUNl0NMCDFKxc87BZEdDflHVgd
-tOK7+MTEuKhg73n+X3p5hWQxpGPPK0+2n45h01lELnY5OB+vxS1AEOsJffuP
-FUPPhMLqhrSzRImPCTUoDwsuouFoioDkR+oFexTQ5zwitEhw5dwRmP94wS2J
-M5vofqP3KQynaNM0I6VP0cRuoYdfddjNxOdUtWSGT/D2V/sproPPfIOYOXNs
-I56inc5F5uK6t20kxhljaWBPr4PTDXFnCRIfC2pRHhYcRMPRFAHJj9gLDlFA
-nfPI0BrBlXRHZP7jBdR01WWSZeornui+6Kibgbvyq6qxWxDdsPkZ0zIZkhwQ
-MM4vNCBv/xPf1fsEuJAFto5w0E0rxFeL8rDgojxupojRh7AoqDjntUZwdbkj
-ks7iaBP9xQWsltvLTKzj0Txfwm4B6nj+w1wzR98VGxO+3xDmH5J4Eff3vghw
-IUV7QaDeqI9F/OWjDz8aIf5hjFnM4Ftr7LrhYkTVyqhJ+X5UpTxepojRR/Ve
-CMp5bRGcQHeIcl4VCOvP0yZT024lkE1R3rpjt8AtS3J3SCziqPARKAEupIC6
-GqvfvH5dUUC3nkTLLH79+vWbWiZ/kG/suuFiRNXKqEV5KVSlPF6miNFH9V4I
-ynltEZxAd4hyXiVwnq40/MTcSM8jA+ntH6/mzM4zNe8XGytvYRD86nT/KSNH
-TrSaFRSVfPxmGRvj0mz1uJAF9v4dpW5aJ75alFcABtG0Tn8ivfSoIOe1VHB1
-uSMUQd1J6phR075HfvvHKYr2WCf1YEd5CwPobri2IzKWfjb7TFpK7Dd+1M9G
-T/JKLe7A83uTABdDIWTmRodsfi5vtwJUummZ+GpSXgEYRNMy/Yn00gvuOa+V
-gqvLHcF0PF5rMNY8oRT9JBw2Cx2FIea0n+v6l6cJWQ9jzT/3fdCOuj3qcIEG
-7MpjNqJqZXRZeTxMEaOPBkVhGFxt1OiOYDhPI/RHjCZjWMqM0QLn2Vozs6h8
-Vt9XsZB1fxPNN6MGxw2NCXCBplWYlcduRNXK6LDyuJgiRh/NicJwuNqo0R3B
-cEsT7PRn7a9Ev1cKVgvC9icHwr3nh8bEp+yl70nZmUS/XInzm8MEuFAe7Mrj
-YETVyuiu8viYIkYfjYnCsLjaqNEdAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-AAAAgNIIuc3lBQ+bdWMt3HAFBFFdAOXVhQ4pD7XcmEtZ84zz7qeoZ2j2CYaY
-1+ZQ1hezWQXJc6khGeVcdIvUoKYrs6wlOxVzSxJos2X20OTV/rYt0NXB3s7a
-eOx4m9DkLKy7jglZj3YH2k+baqhPXnai6v2yQH7VsQUUk/Gjxhlbzgi9h/38
-U+W8KwFOyveakpsJCuOiFPBBVLXy+PSFENkl4JAkfahXeTFadbXRKeVVQefL
-jRSPS+KD47klsVTPy41oWt75YgPFLSNzs/vM6GwGzDeq7BH2Aw6y7+EUrbbx
-ymFCwsbsRY7rC9kDP80p3uLoGJvLFPT0tN72sAp7LG9fBES+esQnEd8JJc0+
-VNoJdZXvo5oPNChsuOBOjf8D9oR7TMB6RwpeyvfAZgJ8XJTygiCIqlUeaV9g
-IUb2HuRJog3K92jV1UbHlEeP3K4J68+5UTa95Iq/hrM9qbElMK2Xb6ThwowJ
-4ybo+WU3wu8DJnuE/YCD7MVb2bg4pr5ile5w8TlVN2gY0Ja32DrwTu+3soCR
-6UKJg2urYl+957/4kCMKewPJLgiy9PmdJfV5ztNVZJ9bLbD9QYBc0eC9IzSC
-m/LwmQAbF6W8IAmiapVH2hf5FgiTXYkk0Qbltepqo53KqwK5Xet4HG79r+tM
-Ub86nkTYet9ogRkIyDXCKYq0oq5ZSTJektOMbRNJdkGwXfC/z37lvFnmjK2u
-0kQ7J8lOBVBr7mKS322sN3eiZpNcrzSJrfAqdjvQ9lVKDWIEtSecHXaVY34z
-GU40+d6VMIKT8vCZABMXpUASRFUrj7wvapddqSSBRxOU16KrjZYqTyTd1Wl2
-RgEP2nu6GVmLDEhJZWieHwjqTrk47ipruBtmStqK6aCdHn4l3cFkLsX/HEPm
-ZF9e5V6yWWheGyRk5SfSbGMK2Ri/OgS1GZRPLVPKuiBe1elg24CsAQfNdxQu
-t5mfh+PRrEp5R2oEP+XhMwEmLkqBJIiqVh57XwiTHZckkaAJymvR1UbHlFcF
-rPsBhqYznNy8fALD55H876FqPfvRcnLAfVZPd036LEPPk7XIHz4Ku9jdA4Vs
-u+s9ZeqWIc/EEjRd/9bV1MSCZOO26kSZ0nvGyPhqzw8yJ/s4WVhY2TgGpea3
-DhzD8KuPzDOy8LuAPmfggfeOEByVV5AJMHFRxguSIKpaeZR9kYIw2dEniUYq
-r0VXGx1THh0tNz0nGvcdUChsuhpgQIrvF4tXnmw/HcGOlbBGkNLdlHdgddCK
-7+ITE+Oigr3n+X/p5RWSxcC+1Sk6X7zyXQ7Ox2sxBQtiPaFv/7Fi6FlbBcoj
-806U8kgzAZsXgsAummbIjjRJCFUeS85rzdVGI5UnHG5JnNlE9xu9T2E4RZum
-GUkd5Agxc+bYRjxVPIMNZwQh/KrDbiY+p6ols4aCt7/aT3GVe/gYRpD4gpjX
-vW0jsc3ew5+hBq88Qu8EKY84EzB5IQrsommE7AiThGDlMeS81lxtNFN5woGa
-rrpMskx9xRPdFx11M3BHtZ4dByPt+X7GtEyGJAcEjPMLDcjb/1TREfSE+YKt
-o+GlPJHxVQR20bRGdiIdSQA5T7AXNdJZHG2iv7iA1XJ7mYl1PMqHS9iNQB3P
-f5hr5ui7YmPC9xvC/EMSL2J9r0+dvtoLAvVGfSziLx99+NEI8Q9jzGIG31cP
-K+WJim+/8v2oRHltkZ1ARyDn1eMFYc6rAmH9edpkatqtBLKp8vd++BnhliW5
-OyQWcYh4aVL1vqCuxuo3r19XFNCtJ9Eyi1+/fv2mlskf5G9YKU9UfN8pL4VK
-lNcW2Ql0BHJePV4Q5rxK4DxdafiJuZGeR4YS9368mjM7z9S8X2+Myog0/Op0
-/ykjR060mhUUlXz8Zhkb47p4jfAFe/8+vJQnMr6KUV40LZWdSEcSQM4T7EWd
-COpOUseMmva9Uvd+nKJoj3VSD4tQGXlPd8O1HZGx9LPZZ9JSYr/xo342epJX
-anGHSr46CfQlZOZGh2x+Lm8zkeGjPJHxRYLyomml7EQ66gPkPKFe1EvH47UG
-Y80TSjFNxWEz0lEYYk77ua5/yZuQ9TDW/HPfB+1YmqQBvhQ1Zbgor0Gav2sQ
-ZuW1QXYiHSFuEMh53YHzNEJ/xGgytrX7GI1wnq01M4vKZ/V9JwtZ9zfRfDNq
-VLERMZG+FLRk2CivOZq/aw9m5bVCdiIdIW0PyHlcvagXbmmCnf6s/ZWY9krB
-akTY/uRAuPf80Jj4lL30PSk7k+iXK5V+M1wDfcEyjJTXGM0lYFdeO2Qn0hEy
-QM4DAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAY5rTlztSfiXWLSFyMANQI
-SIMeIAKgD5AJcAia79G/i03a88O3Zn8bM9Ur6VLGd6ajPvxv0u6Kd+vnoJab
-ARPHmHz386NWXmvhqQ2m/zCJybjTwO/p4TfcyYgx+Yfpd6cKKu5KGZm951Un
-6z8py5dt3X84ddXyhHO7naZa2dmLsbOcYhn3ouHRjzEb9x49tj/2q/AfK7sg
-dtH+FSEbd++NC/r60J8EbAA2NLxXu+3NramiVtK844rlvVWrLEJuc3nBw2ZN
-XxMO0kAtImzIPhyzNul/j6Tt27Zu6aofiyUHznFLd9qpfa9v1ZSDGlGmEkEm
-IID9n/8xdTxRKxB/Of7TMun4QyYzd+bkLwIsbGNf9pavsOHmuhiTf/Z9bw76
-DpX8s07GCK/53s/XGXzxgffOJr7pz9+9x99ZQo/45Y/fv6EsvNok3hmGz6yo
-64Q6Hq/13vq8s0fYeHGG6aKHaF7bhJjX5lDWF7NZBclzqSEZ5VwUq7A7XySv
-zscnSrza37YFujrY21kbjx1vE5qcNWD3TX7VsQUUk/Gjxhlbzgi9p/yZ7FDL
-jbmUNc84736Keta/1QPUdGWWteRUAm5JAm22zN7WQtaj3YH206Ya6pOXnah6
-v7peR9IAG8SLcOyirxHtdO8W30LGGZpR7zvLXW8yN22e+k8sI1WNKgcM6YoE
-eSktAV0l6k4mqBJ+7ckFehOdQramxFlMdrnVKun4jF8OulutKBA1v7v2YsKF
-s876sCo1yRgR5QX3zdWff9qzJTrh175DGLvKj6z9qZxZFGlJTU2PcdMf+4nZ
-l7sKWf3bi/Er6ZSpq1Ad1tT5YgPFLSNzs/vM6GwGyjE++1n89qtXfjmcdjqv
-tktusX0gh+Li4r4/4RRvcXSMzWUKenpab3tYhT2WHbQJGy64U+P/GPpoNkV0
-vtxI8bjUKBRXXCzV83Lj+8ZyilbbeOUwIWFj9iLH9YXsgR+EWu+EkmYfKu2E
-usr3Uc2lGqYjaYAN4kXo7HiZFuEZuHH3wd2bgtxX/PicDfGrz8RnPruObZZD
-o8oBdboiQX5K99pHWYm6kwn4IDe+grYXl/bHLnOb8PFoqw35rFZxx2+VX/GZ
-5n+D2Vl5fHvB69sz4VVqkzEikQXqLMvwpX19rUm8JQzvTUb4TtG9b1ue52eT
-/fbn17XV5iZQJtr23Qbyqn75et63Vxpghh5yuyBKgBkTxk3Q88tuVLjRpVwj
-neWHDuaUMRse7XE1D7jYIOc0ygo58Hh9Q562vMXWgXd6BzECRqYLJa5E9iuC
-83QV2edWi6K2Domw/pwbZdNLrnjclu1JjZU2L6g76eKY+opVusPF51TdICkh
-Zo4POaKwt37YBUGWPr+zpH6rPWmAHU2pBSHzxgrKjO13a9tq726bbvt1Tn1N
-1saDf3S2Ipoh145yQJ2uSIBPaSyVqFWZgJHu5rwje1JS9h5/3DZ0vsDFV9Lf
-cR/818RFD2vuiFvb0pobZOGZfiMl5Rlbuv1teV5fOF1oeOdC2JDl9MXseywZ
-I30TDlDjpemGc0UB7WacXuRx6LVoDNT+cJGps2TwIaw/S/tijvjj3fXXEr9N
-K1KwxbHcLnCKIq2oa1aSjJfkNCuqFgU69Ca7k/EC1DuedZUm2jlJNuqBWnMX
-k/xuy85KCWpPODvsKke3I0PH43Drf11niox2PImw9b7RIm2eXRBsF/zvs185
-b5YduItUIrleaRL/Oa9itwNtX6XskFQb0kAh2lMLD+YbOZ2r752pEGWd0Zzd
-gQ5LNiRuiw394u9fhCam/wG7Z6tWlAP6dEUCbErjUIlakgkYYeWHUowNje3C
-HrIU//F7ul4f20L/vUXwroOf+T2oujZDz1l0H8l+9I3RJNcdpdwB36q8VykU
-s7D7kq9QiPXga3Pqnor2wUZ+LzsXuvI8o7unu+YYzTrmeSf/zcG+G0ph46WF
-tM29ey/zK+n2lG1/drb+vmN1Rpl4TCDsauxS/sIhqDvl4rirrOFumClpK8pd
-nXs4fxzacemt+GHXm4MOtluGGKIgg1e5l2wWmtcGCVn5iTTbmEK2bNQ7Cpfb
-zM9DN5rork6zMwoQ1XI3I2uRASmpbMBWpCJJHUzmUvzPMWQGioLaDMqnlill
-XRCv6nSwbUBW/fs/0Yk06EdraqHzxQaSHb33esd/vZ9qvVEym45xZY5GlQPq
-dEUCXEpjqURdyQTVImx7uPfrefO/SUxabzp6pMnSczfTluqN+Xz5sYJW9svt
-/gcruB1/nN1k+g/TDb8UtooDA3FKjqwNXr/n6PHjR/fGLF2XXsqBBhkJ+a2J
-8+aXNb5LY+n0zcEbL4nUEo0PLO2SyyV501V1dnPEtoPH0lLWRdL/w+os20H6
-1IQsXnBAtbVfguIhKfvRcnLAfdHXeE36LEPPk7Wo5jv4b8+t812yYc/hPTEr
-d91rQZrLwi5298CUFDRd/9bV1MSCZOO26kTZkHun8auPzDOy8LtQj6JiWPcD
-DE1nOLl5+QSGzyP53xuUV213vadM3TLUcZXt+UHmZB8nCwsrG8eg1PxW6Yuz
-TqQBVtQggoB5d2fYquTD6Wkpa1ek5PVmHb8h5+AKg3GGa079ie68Oo0qB9Tp
-igS4lO7BUIm6kgmI6K7L9KNYWNjM3lkmO0Bouek50bjv9Fth09UAA1K8TLQ0
-eyUzoi6o3kh3U96B1UErvotPTIyLCvae5/+ll1dIFkMVc/MCZl5KIGXK+LFi
-xunN6Zu65pUn209Hs3c1r3yXg/PxWgUXAc1OA0Toei30aFM5oE5XaeTXApKU
-xoLGZ4IYiPWEvv3HCrR3hm15842n7/9pof+1ZtkvKG5JnNlE9xu9z4M4RZum
-GQ15RLCgk9OJOQq4GBkCZF1QsRF+1WE3E59T1ZIpVcHbX+1VtvS6q2LvTEOv
-XffqBz+RgJg5c2wjnio/OQwxr3vbRiqeVdboNECErtdCjxaVA+p0lQKmFpCl
-NBY0PRN6zcOfEawAbkksySbu4taFB14N8dQHarrqMskyVfQrfvVRNwN3VMuo
-1QsuXcBqpD3fz5iWyZDUl4BxfqEBefufmE5PkwfrwVIjS4wnsw1XdL4WeoZX
-OYBaUASm7w4h4/R0k4VZ6X6rHg25RLqzONpEf3EBq+X2MhPreLRPz9QKLl3A
-aATqeP7DXDNH3xUbE77fEOYfknixRjUZLT5V7a8fj+m9RR/7dwO/u60qcaNl
-tBcE6o36WJoxZjEykyzDoBZ6hlM5gFqQT39F/OWjDz8aIa8i4GEXLDF1PHgh
-3P9C/ZA3ncL687TJ1LRbCWRTNDe3mgAuXcBohFuW5O6QWKTCx1YSoMbLTpMp
-2jkiViFQV2P1m9fSvKll8gcHYxjUQs8wKgdQCzC8q4iKArr1JFpmsZyKgIVX
-vtPWMvJC8sJkeS8qc56uNPzE3EjPI0NrgsCrObPzTM37WQdUXcDFSD/86nT/
-KSNHTrSaFRSVfPxmGdbXEOTSmjtv0pQlF+s0fRMsDUQna6FnGJcDqAWFYJiz
-gpquuI4f8bfxn/v9Lm85u6DuJHXMqGnfa9EtOqco2mOd1HMwVF3Axcg7uhuu
-7YiMpZ/NPpOWEvuNH/Wz0ZO8UotV8soOxHlJX2g+/q8jR4vXlUxyPopxncrw
-QTdroWcYlwOoBYUImbnRIZufq2i7yo7Haw3Gmmv1AydcuoDBSEdhiDnt57r+
-5RJC1sNY88990b9vC1APOlALPaAcAAQhft40YjQZ6zJrdYJLF7AY4Txba2YW
-1bcnjbhY7m+i+WbUgHtp7UIHaqEHlAOAKLilCXb6s/ZXots/SSPApQuYjAjb
-nxwI954fGhOfspe+J2VnEv1y5ZCvqgI0GR2ohR5QDgAAAAAAAAAAAAAAAAAA
-AAAAAAAAAAAAAAAAAADqQyt2GwaoGpAGPUAEQC8gDRQgaL5H/y42ac8P35r9
-bcxUr6RLGd+Zjvrwv0l950f3QC03AyaOMfnu50etvNbCUxtM/2ESk3GnQXyi
-WMOdjBiTf5h+d6qg4q6Ukdl7XnWy/pOyfNnW/YdTVy1POLfbaaqVnfhQH3s7
-yymWsQW/71u3ae/R9EM7Vq8/+mcnxHu1297cmir6Nc07rlhFr0cqRkOagR9C
-bnN5wcNmREvuQRoQIsK2mw+PxqxN+t8jafu2rVu66sfilre/bQ2P3/cTfWv4
-1t8YfCHr0Y8xG/cePbY/9qvwHyvV9v6i+mOBM5pVC9qSBvCw//M/po4nansP
-RvynZdLxh0xm7szJXwRY2MZKTj0UNtxcF2PyT9hT3etkjPCa7/18ncEXH2/v
-bOKb/vzdXgWdJfSI4zeiSE6SA1t45SlOXuk17S+SV+dj+2aGmNfmUNYXs1kF
-yXOpIRnlXBQrzTuxN+NdY1puzKWsecZ591PUs0EnDIgyY3eg/bSphvrkZSeq
-lFtdDzVdmWUtObOAW5JAmy2zSxyv9rdtga4O9nbWxmPH24QmZw3Y3JRfdWwB
-xWT8qHHGljNC770/vllH0gAbBIhg7D7TgHa6d99yIeMMzcibvtBmSa4oDlDr
-nSCbRZevf0NZeLVJ/Gs+s6IO3fsSGlMLCnMVSyH0OlBQaBpbC0Skgerh155c
-oDfRKWRrSpzFZJdbrZK+z/jloLvVioL2np7u2osJF84668MK1SRjRBRN7pur
-P/+0Z0t0wq99pz12lR9Z+1N548NFBlZJvRv9d1cfoxrMf/D2Wfz2q1d+OZx2
-Oq+2C51OnS82UNwyMje7z4zOZqB8t5WNqBkfyKG4uLi/MS83Ujwuic8245bE
-Uj0vNw4wJkqPUNLsQ6WdUFf5vr7jipHDKVpt45XDhISN2Ysc1xcO2mecU7zF
-0TE2lym6JLfe9rAayriw4YI7NX7QToE6kgbYIECEX549/inCM3Dj7oO7NwW5
-r6CfWTrV6Ze34i9QQd0pJ/MFiyyoqekxbvpjPzH7clchC9XugppTC/C5irEQ
-ehQVmgbXAhFpgCdyQyxoe3Fpf+wytwkfj7bakM9qFff9VvkVn2n+N5idlce3
-F7y+PRNeqDYZI5IgQp1lGb60r6819Y4u32SE7xTf/vKqz6yd7bzg643bUn6I
-tdCbfa++/NDBnDJmw6M9ruYBFxvkn7AltwuiHJgxYdwEPb++0yjR6NCJqBkV
-cuDx+sZNwvpzbpRNL7nigVe2JzW2ZEBqQswcH3JEYW8eswuCLH3kbto3NIK6
-ky6Oqa9YpTtcfE7VDRrIteUttg680zuEEjAyXShxJbKbyXKeriL73GqRNaw1
-aYAdtdVC2Nlz4ZQZ2+/WttXe3TbddukPswxdrjN7/4B53eULB+r/ney3P7+u
-rTY3gTLRtn+SRJkuaFAtwOYq1kJQVGiaXAv4pQEudDfnHdmTkrL3+OO2oVMG
-7nIn6fK4D/5r4qKHNXfEfW9pzQ2y8Ey/kZLyjN0qJU5bntcXThca3rkQNmQ5
-fTH7HkvGSN+WaFDjpemGc0VZ0c04vcjj0OuBwyBBbQbNck3/naYoF5yMF8Bs
-pya3C5yiSCvqmpUk4yU5zYoKRoEOCJqhgI7H4db/us4U5UrHkwhb7xstA0dD
-RZEk1ytN4v/Gq9jtQNtXqeTQkF0QbBf877NfOW+WOW2zqzTRzkmyPRHUmruY
-5He7VWbMKKg94eywq1xeNmpDGihEc2vhC6cZBk7nek8WEXfTYKaPWd+A861o
-wPmlp7GzZPQsrD9L+2LOPfmXU62oBZhcxV4I8IWm0bWAXxrgAis/lGJsaGwX
-9lApR12vj22h/94ieNfHz/weVF2boecsutFkP/rGaJLrjlLugC9W3qsUilnY
-fcm3KMR68LU5dU9F+2Ajv5edC115ntHd011zjGYd87yT/+Zg310pr+b0/zv0
-jA2JJylvLbYLf1D/x6Edl96KHzS9Oehgu2WI4YEiRDd6Lo67yhruhpmStqLd
-W5uDuRkSuqvT7IwCROXWzchaZEBKKhvwpEt0naR8aplS1gXxqk4H2wZk1Ss7
-vuZX0h1M5lL8zzFkPsmr3Es2C81rg4Ss/ESabUwhW3a6oaNwuc38vMFT2TqR
-Bv1obi1YhSy3tKP3XiX5r/dTraOO9E905wbZBJw7tZC2uTeBRVG2p2xDcYSr
-RtUCTK5iLwT4QtPoWlB9GhCBsO3h3q/nzf8mMWm96eiRJkvP3Uxbqjfm8+XH
-ClrZL7f7H6zgdvxxdpPpP0w3/FLYKo4uxCk5sjZ4/Z6jx48f3RuzdF16KQca
-ZCTktybOm1/W+C6NpdM3B2+8JBJMNMiwtEsu753dbvxtw5ceYVv3HUqJizn4
-sE3If3tune+SDXsO74lZueteC4q5Cvaj5eSA+6JRbU36LEPPk7WoNhdF2Qxh
-F7t7QFay7gcYms5wcvPyCQyfR/K/NzA12/ODzMk+ThYWVjaOQan5rSimMtvu
-ek+ZumXIoyUFTde/dTU1sSDZuK06UTbkMzZ+9ZF5RhZ+FwaWqk6kAVaIEKG2
-4e7OsFXJh9PTUtauSMlr4b7NjgvbSv+JviUsLvstv6vq7OaIbQePpaWsi6T/
-B81Et0bVAkyuYi8E+ELT7FpQeRooQXddph/FwsJm9s4y2TFCy03PicZ959gK
-m64GGJDiZcKp2YuZEXVB9Ua6m/IOrA5a8V18YmJcVLD3PP8vvbxCshjS9ckr
-T7afLndba175LgdnyeoiBQiYeSmBlCnje89pHqc3B8HsNR5odhogAtQCIUYQ
-1AIM2AsBvtDwQLPTADfa8uYbT9//00L/a82yX7Dckjizie43eh8JcYo2TTMa
-8nRiQSenE/NgDxcjQ4CsCyo2wq867Gbic6paMi8rePur/RTXwVkBMXPm2EY8
-lZnd7fvtdW/bSNm5Xxm6KvbONPTada+e8PMQNDoNEAFqgQAjSGoBBuyFAF9o
-+KDRaYAX3JJYkk3cxa0LD7wa4sEP1HTVZZJlquhX/OqjbgbuWnhyPC5dwGqk
-Pd/PmJbJkJSYgHF+oQF5u2qmIlkPlhpZavvRdmoC1AIRRgiqBVAIqkbIOD3d
-ZGFWut+qR+yhft9ZHG2iv7iA1XJ7mYl1vHYd1PwOXLqA0QjU8fyHuWaOvis2
-Jny/Icw/JPFijWqSWnyg218/HtN7lz727wZ+d1tV4kbLaC8I1Bv1sTRjzGJk
-5llALRBihJhaAIWgctgFS0wdD14I979QP+R9p7D+PG0yNe1WAtkUzf2tJoBL
-FzAa4ZYluTskFnFU/d4a1HjZaTJFC0fEqgXqaqx+81qaN7VM/uBggFogxAgh
-tQAKQeXwynfaWkZeSF6Y/IecxXScpysNPzE30vPI0Jo48GrO7DxT837WAVUX
-cDHSD7863X/KyJETrWYFRSUfv1nGVtWVpzV33qQpSy7WgcOflQbUgkqN9ENM
-LYBCUDFQ0xXX8SP+Nv5zP7lvZgrqTlLHjJr2vRbdonOKoj3WST1MQ9UFXIy8
-o7vh2o7IWPrZ7DNpKbHf+FE/Gz3JK7W4QxUDL4jzkr7QfPxfR44WLy2Z5HxU
-latJdApQC6o18g6iagEUgvrpeLzWYKy5Vj9zwqULGIx0FIaY036u618xIWQ9
-jDX/3BfL688AdQBqAbMRUAvDB/EjpxGjySpdDK1icOkCFiOcZ2vNzKL6tqUR
-18v9TTTfjBpwO61dgFrAbgTUwvCBW5pgpz9rf6WKt9RSJbh0AZMRYfuTA+He
-80Nj4lP20vek7EyiX67U1N2RAXIBtYCDEVALAAAAAADoGv8f7CRIVA==
- "], {{0, 153}, {
- 532, 0}}, {0, 255},
+1:eJztnQlUFFe6x2fey5nzTubMyRgnL85kTOIKiMZofCooIIK4DPMUzYgoOspz
+RWJMRCSasIhKDBg0YkzYAg5qAEUUF1A0IypRdgGBCIjsYLN3N713vd4wbFVd
+3V1dfav6+50zczRt36r6/ve7VdXbb5zXxyu3/sdvfvObPf+l+L+Vm/Y5fvrp
+ps9W/VHxl3/s2rNj264tm5fu8t2ybcunc73+U/EfwxT/e1vx75V/xgAAAAAA
+oIyekiO3WqVMGZYMEl6XSG6SLY8A+8prhpgkRDn/eVF9n5EmMjo9wr7aApik
+Je2A76HD7kHfHg84VthWkxVmO2rUvNh6ieZxaevFJX96dbxPckFp5uEZo/68
+PCqHI8bkwqY74c4zticW9miSk/NrMq4XdEtHGra4V5mfsPFWXPSPNx6UNQpE
+TWnBX3yfnJYUefCHEq7iQWln7rXMWsNjFtdFL7GeMGGixXy/Qq6hg1EBu8pr
+ptASYldLqutUq/emT5/+nsVfp+wt7ZMLmx/Fuk2cE6PZDjt7hF21ZRkyAwoi
+qfvecUl6dWFQZgu/9W4VV84vO+A49Q0r/5I+1eOi2rg1nu/82f5mB4Zx8zZM
+mnn8mUj9TOHT0x/ndmuGkbZd2/vZ3U4Z7rDC2h82/9+ZZ0LVo9zcf77vdr9H
+secvLrvYHvpF+V9l7Vl792W8MOzChVsYvP1caTc61/HsKi+DQb5HnrY9v/uc
+r9xLaVPSus8f81Uj13xtMz/m5SrLwh5hV22Ni/hF9ldL5wWWC7C+sn32KzLa
+h85pWW9pUnTyzZuJgZsOPezRb8ZL6uNXed1T1JVXtMt+Q06P/rvbVxZsa7lo
+y9qURnWN+U/C9p3/ZOq4f9zsUOTELw3bdyHB9u0RkhVVx+zJ1yQrKA922V3I
+wx1W1pb298l2gSeOfrJ6wT/Ci1ofrps066RyoJ4HKyfZpb1QzQhu7g7nQ5UC
+/Q8FE9ZGey+3GTd63JKgf3foOkdkHVnbPRPqeQ1Ju7d8WyMc+JBc8Dwz7mz6
+9Xjfma+//u5kC4tpzkd++XVHpZysgx4O77372qjxVlNne1xpG7BpNpWXMvQv
+tS4wrEf6USx+a/2L1P9uyOpn4h7Re2UzeYO83BHj1tb4dGd7ukQ+E7Smex3M
+7R1Sflnn7Z1/j6xRlEdYeWjB2pxefTYgb7+xatn5Zikm/OXQXOeUVpn2p+Aj
+6y2K3jTpv63cT+T3yJTJBhdUJji8bRtVJ+rI3v91aV36fC3JShpiHYftxcBh
+ux+utnS8oZiJ8s5bKy0cLzS2ZoXt3Lb/eGy0n9VfF2V1qp4gbTyzcOHZJoOv
+GiQvsvxnWW3O0/FOvydnvc3O7Jz4k7faJIMekHff2+MWWS1SrlWxTq43hjaU
+TNDKEcr7SgPdE+oHP1P9MMvKSwF6l1oXmNYjmkcUi5+Hb75m7g5b/UzcI/qt
+bKZvEFpri4ewOsJ99bEqg05dgoojrgEP887ElwytvuLyMnWZXViVsjr84k+d
+95f26bMBXr63S+gvQkWp/rVgbuhTofZnENNTcvDH85/NmepdwOOXhx8s6e36
+yXO85SfXz/olN4g4VzXJ8gq2WM4Ir+6/G62KOlCknj2i6rB5izM68Ie9d+dD
+C0flEJj42Ym5s49WqcdQzAi7dxzOaC4rZC/SFtmdrBUbejDKIl9a7KLjWtJX
+unfKX6bN3HCnc2hknbdXzgsoV04IUdUx53/+POK1gLAyfE3UM5x9Z1V5DW8Q
+A0tNEqb1SIHqUlqx+K3Zndt/3MNWP9P2iCErm0kbhObajoyspyg1tajboCsc
+wZNgR88vzlaPcNbozXGfZJOoPDHyHod4nuovk24orsJsFl1vl4tqvnecsv5R
+rwE721d7PqtFovwQRf3TiAVuWZ38stCAYq5iCgVNHW3tmdUhk3PS56mTlTTE
+2U5erVkPZJw7n599rt59WesFl4XxjVLcYW9WnHOZ5at8fVNQHmC//t9dqrec
+a2KWT7I/UsLTzFFx3XeOS9M5hlymikWqUohro9yPPNFp7RPXRto7nT7nNXtd
+ZvuQa5/WlIU2qsVaWH3aI2jkNz0ldTGL194atlKyq7yaehjaIAaWmiSM6xHV
+raW0Odnd5+eXL9wNW/1M2iOYASubaRuEptoawj58Wlpa+v9Vb97O7Yn1I538
+BBWB096a4xqYcCXtbPxPrTjnRy3jS5vPO1o6LPTcHRwWsfyD5eGXiT/UQDia
+uDn1wL6vv/96XcDxrwJ/KONUZ4bYzj5wrZovakrZfLiEL+19nLJj3GsTdl2q
+4MnkvLLTm/+2euf+kNDQQ0fiHr+8bhE9i3TdOvCV7MHDlvPlguq4nRu/+C4x
++lDwpUaxsPF2fIjPRr/44gEd35296X+jnhNfMhAeC7/E12aKk8+J+IS4tCo+
+TklGfq6k8YyTbVgVr+nchmWHHwxeNiXNF3a4+cdfvZIYd6sR59JX0vCD0+Sl
+1zhD1y+GlddwtDeIoaUm2hCze0S1+K3efr//bWlxR/HZD9+d7H25ov8DUCbt
+ESV6r2ymbhCKaittS9/2Ua7Ot9Jizr3Y7S52bkfDo0Y6KfcjargWERadeGrb
+5Fd/96aLT8iZWtJnfkldlN3ccOIbFcGzcz7274x6e8mxcuVOyLmPjx+Irhmw
+CXl7xodOp0jetWkdTYXBnyeX9+SGH7g2dAhdhpW0XN4fUTjsHnsg5I6FGGlX
+bvQez7Wbd/nuPxxT1GPQrSlpmFFe7Ri/QUgCPYKHqXqEzMqGDzNqi6nei1nk
+eqdL9x3svus2cc7xtNPluGcleW/u3tkOUXViTFgZZPWmbVKLDouTuPakzft+
+ZURvrQjrU2Luc0Q9jz6fPtEjpxeTNCW6LjhSMaRpbPzIvT+jfTTqkHQW3ins
+0nN6SDrzbxcTP5mKYxFUhM63XHexydhX7kbA2OUlh5EbhBzQI3iYrEdIrGzG
+hpYG0ffMwsvfajkjIO2bguGvB2qQca4uGTtddW7m5nlZ28WM9GEHg5CJVZ0o
+aYiztz1R0/7Qb+n+R/pfalI7mmkx/Fj4Rd7j/vDWwpXuCtZsDq3gG2dHGYek
+OcVrscMQlvk86B5aXRQaBIMewQd6xCj82iA2lqNGT5+H2yA49JXts7b2To28
+i/99GUl97KwxHyjaRcbJ2PFhaBHXaDOQ+2ijw57kEI/hn+4z/WimRf9j6c52
+GTP+o2JoFj1BqkEw6BF8oEeMg373LKLqsBmWnsmnE/PvZ5XhfJZExi378TNv
+35NJl9Pu1OC9AUYJ/OKPrac4fVmi80akXXkXLhUN+Y6t3qOZFoqPRfg0dNob
+MyKqDP4EqnmCVoNg0CMqoEdoRL8zi6DyoN3UlRtX7Yot5eK0TXvGRquxo3//
+ym8VvPLHmXuM+Ls7/Mf+K8Ke6PHCZff99RYW67MH36jpPZppofpY5NySb70W
+2C7f6hcQFBKR3sLA91tMCFoNgkGPqIAeoRG938EnRNxy48uQi3Xqk7lc0pl3
+3P8h1dvoR9KSvNEtiarvg1I7mmlh07GwDDobBIMewYdNx8J+pK0XF0901vwG
+k+Kmvyrr8q0mI90yyjhX3SfO+gbvG6smHc20sOlYWAadDYJBj+DDpmMxB+S8
+0rAVVmPGvu+yZpv/0ajUgg4jfOhFs6mOzKXTViW3ULMBakczLWw6FrZBY4Ng
+0CP4sOlYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKNi8M+Q0josGSS8LhFK
+X7NmX4XNEPaFiE6bsK+25o6kJe2A76HD7kHfHg84VthWkxVmO2rUvNiXvzEo
+bb245E+vjvdJLijNPDxj1J+XR+VwxJhc2HQn3HnG9sTCfvOBnF+Tcb3g5e9P
+DBq2uKsl1XWq1XvTp09/z+KvU/aW8rofHdvqOs9q3PtrTz1ReRU6c69lEts1
+SCGui15iPWHCRIv5fsb9ZrgOsKvCZopJQuT3Po4O+Gjj3/7ng7Vxdcrfrmdn
+m7CrtmxCZkA1JHXfOy5Jry4Mymzht96t4sr5ZQccp75h5V+i/tUIUW3cGs93
+/jyColr49PTHuf2OHWnbtb2f3e2UjTzs07bnd5+rft1I2pS07vPHHbWJcQU9
+MsXg0fYT/qb+HQVZe9befRn4v4JICm5h8PZzpd1IXaOwq8IMhnFtwu2tfNAo
+UNqpv7FbdFHtHGZhm7CrtsZG1pG13TOhnteQtHvLtzUDvqQs5WQd9HB4793X
+Ro23mjrb40qbfschqY9f5XVPUVRe0S77DQNFa7rSVxZsa7loy9oUjUmd/yRs
+3/lPpo77x80ORbn5pWH7LiTYvj1CrKLqmD35mlgF5cEuuwt5BMOqUaS61r+I
+J5f2SVVtzi/aNW9zruaqiZu7w/lQpSHKDGFttPdym3Gjxy0J+neHboUVv8j+
+aum8wHKB8rd+7VdktA8zgPeWJkUn37yZGLjp0MOegY/KBc8z486mX4/3nfn6
+6+9OtrCY5nzklwGHwaYKU4aWokGbKELU/E3cmP5FeE5X/5Jp0jYhWNn07yA2
+1dbo9OSst9mZnRN/8lbboK/JygStHKG8rzTQPcEQp4W8/caqZeebpUoR+Fzn
+lFaDvEuy3qLoTZP+28r9RL7iKlcRa3BBZYLD27ZRdaKO7P1fl9alz9cSq6Qh
+1nHYXgweVoUiVQ/f/F9vv/mlX22Jejk7pY1nFi48a/gPIUleZPnPstqcp+tt
+fne2p0vkM0FrutfwnyWXdd7e+ffIGqW8vfLQgrU5vzqx5N339rhFKlUlkvpY
+J9cbwxoKY1+FDUZb0aBN+kMUv8iJ/dhl/Nil32l08KZuE7yVTYl+HYSxr7Z4
+CKsj3FcfqzLg1NVXunfKX6bN3HBnRHmSsDJ8TZRBv/jDy/d2Cf1FqKjTvxbM
+DX1q8A839ZQc/PH8Z3Omehfw+OXhB0t6u37yHG/5yfWzfskNIs5VTay8gi2W
+M17KSoVVUQeK1PNDVB02b3FGB9Gwyr8qUl2z+6VfWs4tOxeT3f5rirIXaYvs
+TpKUzxIia7u02EXnhURQccQ14GHemfiSYboLWVvqMruwKuWR84s/dd4/QGTY
+eXvlvIBy5VwRVR1z/ufPOB5GVlXY4AYhVTRok35Ez07Mt/+hQb2Sm7ZNCFc2
+/TpIDctqOzKynqLU1KJu/a9wxLWR9k6nz3nNXpfZPnwUSV3M4rW3cIV9JFBc
+gtksut4uF9V87zhl/SMciwYp+mrPZ7VIlJ+gqH8ascAtq5NfFhpQzFVMkqCp
+o609szpkck76PHWskoY428mrNXNKxrnz+VnNuV7WesFlYXyjlGBYxX+TNie7
++/ysfkVCLqjLvHi3TRGhjFdX1at6prjuO8el6RwD6iIXi1SlENdGuR95ouvC
+J3gS7Oj5xdmR5O+9Oe6TbBKV1zK8xyGepwaYwGWtKQttjio7Rlh92iNohPdD
+WVVhzUEb2CDai4ZBmwxA1npp9c77mheQTNomxCubXh3Ertoawj58WlpalP9C
+0njGyTasitd0bsOyww+GNaCk4QenyUuvcQgnOtH40ubzjpYOCz13B4dFLP9g
+efhlrZ9owB9N3Jx6YN/X33+9LuD4V4E/lHGqM0NsZx+4Vs0XNaVsPlzCl/Y+
+Ttkx7rUJuy5V8GRyXtnpzX9bvXN/SGjooSNxj19emYieRbpuHfgy9uBhy1Uf
+TmpOXr39vureVdx4br3FeAtrBVOm2n2uMWt3Z2/636jnWq8X8I+FX+JrM8XJ
+50R8QlxaFYEOaeSqYr15O7cn1o+0fUFF4LS35rgGJlxJOxv/U+ugfyJpvrDD
+zT/+6pXEuFuNI10VM6zC0rb0bR/l4tx5kUJ7g2gvGgZtoni0IcHdafX+735M
+Oftj/kt/uynbRMvKpl8HMa+2+iDm3Ivd7mLndjQ8aqQzbz+ihmsRYdGJp7ZN
+fvV3b7r4hJyppe5dH8Gzcz7274x6e8mxcuUeyLmPjx+Irhkwvrw940OnUyRv
+2bSOpsLgT33Le3LDD1wbOoQuw0paLu+PKCTUrpI7FmKkXbnRezzXbt7lu/9w
+TFEPqctYSV2U3dzwgZdZusOMCmNatUcINIgaaBM8TNUmBJDoIGbU1hC677pN
+nHM87XQ57mWbvDd372yHqDoxJqwMsnrTNqnF0MIPQFifEnOfI+p59Pn0iR45
+vZikKdF1wZGKIR1j4zfsdUo9R6MOSWfhncIuPeeGpDP/djHxk6k4FkFF6HzL
+dRebdLoqEdeetHnfr8z0HkJjV1iFVqGeiRtEDbQJHiZrEwLo6iBaGkRfePlb
+LWcEpH1TgPsCr4xzdcnY6aoTMDfPy9ouxpBPr4wwvFjVhpKGOHvbEzXtD/2W
+7n+k/2mU2tFMi+HHwi/yHveHtxaudFewZnNoBd84O8pEJM0pXosdlNhYjho9
+fZ7qj8t8HnQPLbDJG0SzEWgTHKBNjMKvDTKAkRoEh76yfdbW3qmRd/G/LyOp
+j5015gNFu8g4GTs+DC3iGmcGch9tdNiTHOIx/PN7ph/NtOh/LN3ZLmPGf1QM
+nUKAlnsWdBpEDbQJHtAmKCGqDpth6Zl8OjH/flYZzmdJZNyyHz/z9j2ZdDnt
+Tg3BG2AGwi/+2HqK05clOm9B2pV34VLRkC/Y6j2aaaH4WIRPQ6e9MSOiynh6
+XeZDfGZBqEHUQJtg0CYMQFB50G7qyo2rdsWWcnHapj1jo9XY0b9/5bcKXvnj
+zD3G+t0d/mP/FWFP9Hhpsvv+eguL9dmD79L0Hs20UH0scm7Jt14LbJdv9QsI
+ColIbwGL+DCIzywINYgaaBMM2oQFiFtufBlysU59MpdLOvOO+z8keLNTfyQt
+yRvdkqj6Mii1o5kWNh0L+6CtQdRAm+DBpmNhP9LWi4snOqe9UF+sybhVWZdv
+NRnjllHGueo+cdY3Bn3/2FijmRY2HQv7oK1B1ECb4MGmYzEH5LzSsBVWY8a+
+77Jmm//RqNSCDiN86EW5nY7MpdNWJbdQMzq1o5kWNh0LC6GrQTRbgzbBgU3H
+AgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJBHwusSMesbxuYN5AUAALKI66KX
+WE+YMNFivp9xvxQNUALkBQAAHjJUrja5hcHbz5V2w1dytYJGZJDXINAIBQBM
+iKQ+fpXXvW4M4xXtst+Q06P9GYTIekuTopNv3kwM3HToYY++DSasjfZebjNu
+9LglQf/u0HW5knVkbfdMqOc1JO3e8m3NgK9Ui19kf7V0XmC5QPkLuPYrMtoH
+7p5c8Dwz7mz69Xjfma+//u5kC4tpzkd++dUSIeVkHfRweO/d10aNt5o62+NK
+mwkXUcoiIyyILhgnL83DuDMKqcgoC4XS3SaorZbq6YrWuUTNygAwBXn7jVXL
+zjdLlRLuuc4prYY5j2Sdt3f+PbJGKQyvPLRgbY4hEllFs77I8p9ltTlPx1dX
+enLW2+zMzok/eatt2Jd6u7M9XSKfCVrTvQb/WLe8+94et0ilokNSH+vkemNo
+X8gErRyhvK800D3BGPYOnaA0MryC6IMR8iKYUWhFRlko1O42bm21VU8fiOYS
+tSsDQA/C6gj31ceq9Lre4OV7u4T+IsSkTf9aMDf0qWE/miRrS11mF1allHzy
+iz913k/OkEc44KXFLjq2aV/p3il/mTZzw52RVE+CiiOuAQ/zzsSXDJ76nbdX
+zgsoV1ZQVHXM+Z8/jzjxhZXha6Ko+W0jZCLDK4h+UJ4XwYyiOzJiKA2Fst3G
+ry2p6ukIwVyifGUA6EDWU5SaWtStz2WS4grLZtH1drmo5nvHKesf4RgsyNKb
+4z7JJlH5g6W8xyGep/Q3scvFItWeiGuj3I880Wn9FddG2judPuc1e11m+/Cj
+ETwJdvT84uxQJbqsNWWhzVHlxBdWn/YIGvk9aEldzOK1t3DVhDqBTGQ4BdER
+o+WFP6Noj4wQakOharfxa0uqerpCMJcoWxkAdNg3Ei0tLcrHpM3nHS0dFnru
+Dg6LWP7B8vDLtX1apjPRaIKKwGlvzXENTLiSdjb+p1Ztl1z4Q/FLfG2mOPmc
+iE+IS6siMAGN8FxJ4xkn27AqXtO5DcsOPxi2dPfm7dyeWD98zyTNF3a4+cdf
+vZIYd6sR54JT0vCD0+Sl1zjaVg1pW/q2j3INuQikLzLcgug0jtHyIppRVEZG
+BhpDIbXbI44waByi2pKpni7bUoI/l3RZGQxvH4ACxJx7sdtd7NyOhkcNv1QQ
+PDvnY//OqLeXHCtXPibnPj5+ILpmwBWlvD3jQ6dTteTuurWOJqmLspsbTuZy
+ROtQJJB25Ubv8Vy7eZfv/sMxRT1UrB0UocWfi1JkJDFVXuRnlFFBMxQlooZr
+EWHRiae2TX71d2+6+IScqdX/LXgjbkunHLW0D0AX3XfdJs45nna6fOhZXlif
+EnOfI+p59Pn0iR45vZikKdF1wZGKIQ1h40fuJU/to4lrT9q871emfTTtQ2lH
+UBE633LdxSYUhQ5aWwOZyMhhsrxIzyijgmYoys325u6d7RBVJ8aElUFWb9om
+tRjv8sqgbemWI5xZ0ICXv9VyRkDaNwXDX5WViVXpSxri7G1P1LQ/9Fu6/5H+
+b9NSOJrhQ/GLvMf94a2FK90VrNkcWsHXaz+oRdKc4rXYQYmN5ajR0+ep/rjM
+50H30CNjXGTszAsbGNkAhkWGZihKW9aSsdNVdwLcPC9ruxgjfgKOhm2Rbh+A
+FvrK9llbe6dG3n2B/6l37qONDnuSQzwM/1gpxaPpP1R3tsuY8R8VI7JADUHL
+RRdzI2NpXmRBLBRJfeysMR8o1ngZJ2PHh6FFXCMuwXRuC+5ZUEBUHTbD0jP5
+dGL+/awyvA+k8Is/tp7i9GUJwVurIyPtyrtwqWjIF6v1G43CoZQIn4ZOe2NG
+RJXxzLIGQNwazIjMnPIii8lDGYyMW/bjZ96+J5Mup92p0XsU9LYFZxYUEFQe
+tJu6cuOqXbGlXNwXPvmP/VeEPdHj1eru++stLNZnD74f1W80CodSIeeWfOu1
+wHb5Vr+AoJCI9BaU3m8hbg1mRGZOeZHF5KEMRNaesdFq7Ojfv/JbBa/8ceYe
+I/5aG53bgjMLY5C0JG90S2qi6JctKByN2h1jE2hGZuZ5IRWKuOXGlyEX69S3
+gHJJZ95x/4fGWovp3BbAGGScq+4TZ31D0beQKRyN2h1jE2hGZuZ5IRWKtPXi
+4onOaS/Ut7wyblXW5VtNRnqhkc5tAcxB3pG5dNqq5BZqPslB4WjU7hibQDMy
+M88LrVDkvNKwFVZjxr7vsmab/9Go1IIO48VC57YAAAAAAAAAAAAAAAAAAAAA
+AAAAwPwAjyo6QBboAFkAgI5Q6COm2HBKYFOl0NmKkkeVcU5b1cMU1ccQW7QR
+QNLTrRrJ1E1BfxYAA6FObmsEwymeTZVi1SwqHlWmOW1Vm6KyPvraoo0Aup5u
+EzeFCbIAmAh1HlXqDaeEploKVbOoeFSZ5rTFqK6PQbZoakHW023qpjBBFgAD
+oc6jSr3hlNhUS6FqFhGPKtOctkqorY8htmhqQdTTbfqmMEEWAKLQ5VGl2nCq
+xSxMkbNVCX0eVbqywGhx2upQH8OC0G1qkYS+LCiskumbwihZAMwCXY+qGnps
+qmh4VNHNgq760CrPJQRZT7cS5JsCMHeQ9ahqNk6LTRURjyqyWdBWHzrlucQg
+6+nGGNEUAICoR1UzHC02VWQ8qohmQZvTlp4NMdovjLGoKTCyWQBMBjGPqhp6
+DKfIeVQRy4K2+tAZBFkQywJjY1MAbAYxj6oaegynyHlUEcuCtvrQGQRZEMsC
+Y2NTAGwGKY+qGnoMpwh6VJHKgrb60BsEWZDKAmNnUwDsBSmPqhp6DKcIelSR
+yoK2+iAYBIZYFpgZNwXASJDyqKqhx3CKoEcVqSxoqw+CQWCIZYGZcVMAzAQt
+j6pmFFoMp+h5VNHKgrb6oBcEhloWmPk2BQAAAAAAAAAAAAAAAAAAAAAAAAAA
+BICVFR0gC3SALABARxhpK9Y8bHxPLqXaX60wz5BLeejsy4Iec7RW6bbOW8Kd
+PGArBkjASFuxCjo8uRQbYLXAPEOuUdy17MqCPnM0kXRbV/AnD9iKAVIw1lZM
+jydXCXUGWC0w0JBrDHct+7KgxxxNVDcdIZg8YCsGyMBcWzEtnlwlFBpgiWGg
+Idco7lr2ZUGPOZqgbrqCP3nAVgz0Q5eVlV5bMU2eXIykARZDzVZMkyGX6tCV
+UJAFGejLgh5zNFHddNkKRjx5dLYVk+kLgFmga8hVwy5PLlK2YgTrY4Jt4YBu
+X6ChKtZt8miD1G+AAwwCWUOuZuNs8+SiZCtGsT50bwsPZPsCFVWxbpJurcCZ
+hXWga2XFWOTJZbStGKMxCBq2xWhbMZtUxRjZvgCYDHpWVoyNnlwm2ooxet21
+aHlyEcuCrapiuGdhLehZWTE2enKZaCvG6HXXouXJRSwLtqqK4czCWlCzsmLs
+9OQyz1aM0euuRc2Ti1QW7FUVw5mFpaBmZcXM2JOLWhZ01geyIABUxQDDQM3K
+ipmxJxe1LOisD2RBAKiKAaaBnJUVM19PLnJZ0FkfyILo+aAqBgAAAAAAAAAA
+AAAAAAAAAAAAAABgBMDKig6QBTpAFugAWTAEyqyslPpSca2slCtrUbKyUmgr
+1iJ6Jg+d+mCWZkGfxZs2ZzFDzdH0rFFGmq5oZEEaSg251PlS8aysVCtrkbKy
+UpkFoehZR2jSB7M0C5ot3rQ4ixlqjlZi/DXKONMVkSzIQ6mVlTJfKqGVlUJl
+LVpWVgqzIC6gjtCjD2ZrFjRbvOlxFithpjmahjXKGNMVlSxIQ62VlSpfKrGV
+lUJlLVJWVgqzIC6grtCjD2ZpFnRbvGlxFithqDna+GuUUaYrIlkMgkYrK0W+
+VC1WVorcr5gJrKw0ZaGlgDpWyWB9sFlnQbPFmyZnMcZYczQNa5QRFN40ZkEG
+sLKiY2WFLCALsrAxETzQzQIlhTc9WZAFrKzoWFkhC8iCJCxNZGSQzQIthTct
+WegAWFnRsbJCFpAFueHYkgiYo9HZFrksdAesrOhYWSELyIIQtiaiBcSyMF+F
+t06AlRUdKytkAVkQwtZEtIBYFuar8NYJsLKiY2WFLCALAtibiBaQysKcFd46
+AFZWdKyskAVkQYDZJoJUFuas8NYBsLKiY2WFLCALAsw2EaSyMGeFty6AlRUd
+KytkAVkQjmKmiaCVhRkrvAEAAAAAAAAAAAAAAAAAAAAAAAAEARMoOkAW6ABZ
+oANkwRAYZshltQmUwiyU4Mt/dR6JFj2ulmQZmgVdhlzVw5Qlzs4s6FqjVFti
+ZxakYZghl9UmUEqtrATyX92hQ4+rLVkGZ0GDIVcJdYmzNws61iglbM2CPEwz
+5LLZBEqplVXLQekELXpcUskyMwt6LN4UJs7aLOiyeLM2C9IwzZDLZhMotVZW
+4oPSCVr0uKSSZWgW9Fi8qUuctVnQZvFmaxaDoMkESpMhl9kmUJqy0H5QWgYZ
+NBRNelwyyZLNAiVbMUaTxZvCxNmaBW0Wb1SzoAowgZLZFiutrLodFBp6XAph
+qq3YgBKhmLgKyMJ4GzINYAIltS1WWll1OShU9LhUwkhbsUElQi/xfiALo23I
+VIAJFB0TKKJZYCzS42IMtxXT1heQhfaB2JWFsQATKDomUMSywFiqx2WirZi2
+EkEWWmFrFhQDJlB0TKCIZYGxVI/LRFsxbSWCLLTC1iwoBkyg6JhAkcoCY60e
+l3m2YtpKBFlohb1ZUAqYQGnYFkmQygIzYz0uhlgWtJUIstCKmWdBFjCB0rAt
+kiCVBWbGelwMsSxoKxFkoRUzz4I0YAJFxwSKVhaY+epxMdSyoK1EkIX255t1
+FgAAAABgFP4fhYPQwQ==
+ "], {{0, 139}, {542, 0}}, {0, 255},
ColorFunction->RGBColor],
BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
Selectable->False],
- BaseStyle->"ImageGraphics",
+ DefaultBaseStyle->"ImageGraphics",
ImageSize->Automatic,
- ImageSizeRaw->{532, 153},
- PlotRange->{{0, 532}, {0, 153}}]], "Output",
- ImageSize->{536, 153},
+ ImageSizeRaw->{542, 139},
+ PlotRange->{{0, 542}, {0, 139}}]], "Output",
+ ImageSize->{546, 139},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"Chisholm", "RasterizedOutput"},
- CellLabel->"Out[10]=",
- CellID->2142983666]
+ CellLabel->"Out[15]=",
+ CellID->1904366312]
}, Open ]],
+Cell[TextData[{
+ "Check the equality of the expressions before and after applying ",
+ ButtonBox["Chisholm.",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"]
+}], "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a3", " ", "=",
- RowBox[{"Chisholm", "[", "a1", "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[11]:=",
- CellID->152524623],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[16]:="],
Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQlcE9fa/9u+/2urr159vbWfaq+UsgQQIUBCgKAguxWkLoCC96UoVK27
-SN1AEepfUKiI+td6cUGtLW64oK24IlYhV1RApRQEZStrgBBCyDb8CQFMCJlM
-ZiaTxfP9fO79kMY8z5zf8zwzZ86cOeeLJWvnLf3gvffe2/BR7//NW7zJLTJy
-8Zb5/6f3g/uWqG+W/FfvH0d6/ze+99+I/+4BAAAAAAAgDe/VXgcLG5qDgwPd
-N6a4U9OHMywibks5I7+Fr+nj6EPzB6MLIQNI0Hy2APQJftXxeVTS+FHjTK2m
-hz9og1CYgJg3ZlE3FLNZjEQ/Wlh6OReFka4Xiavz2lE4HziG1lt+1DVFnP6/
-1on/6v+m+ZqHzapC8WduSRx95okagexPRazHe4Mdpk4xNqQsPlXFG2KYV/vr
-98Fujg72NqZjx9uGJ2bWdKM/SqzgdjB6GjIckhkWLSmWAVMKBZSAY+piLCKA
-/iFqvORJi/2Di/b3XS82Ud3TM7Z6zojMqkfZnWEXxe68fu3nI2lnc2u70ZzC
-Xm6mel1pEomzOprmfbXprQ1O4Wpbn2wmJGrKWuC0oYAt+0Oo7V44eebh0i6o
-u3w/zSLiiUynmVO8zckpOocp7Olpu+tlPeRbgsHxYPQ3ZFiTWRlEFct7Cigu
-Lh40pVjAHlWzRZk7LEUE0FXg0o/zbCXF/04r2p/31tH0CeMmGARkiRMYpZGu
-8sOHssuYjY9T3CyCLjcKVWyeqOGCO3XLS664V5TlTYsukapqYd1pV6fkV6zS
-Xa7+Z+qG9JEgZrY/ZUVBX5azGSFW/r+zpL5tz11oE3yvr08prM9wpcaUqO1s
-JAFOIhUP5h0NGYJkVoo2FEuFAni8gY48nIAqZ4sydxgiAtBiBC25R1OSkvad
-fNI+TD7CpJ+w9pSL455y2LtKuOzlFK6ypq1ZTjZdlN0CWwlwRgboLQVn03mP
-OpC2up/OJ0ttvrzJ7K2Rzqcr7HxvtUp3u9iMUPvQ387/y2VrIWfoD3sPnux2
-rVn8z3kVex3p+yul+n/dpfH2zkerxTUCteUsJAfcxT7ogTpMqh7MuxkyJMms
-FG0oFuXACoh76qKOCECbYeWFU02NTe0j8lW80HcWLLGdk4t6gFpYd8bVaU9Z
-4/0IM/L2F13ojHD+OLzryl+9ucZ/c8jRbpuqXXpBdZq9SVDviUtQn7nAiJxQ
-JjOAy69MdST5UQMv1Mv1h4W16dRPrJLKuiFe1dlQu6DMBul/wqvcRzEPz22H
-RKy8eLpdVAEb+0g56jDheDB6HDKMyawUbSgWCfAC4p66qCMC0Ev41Udnm1gG
-XEIZa/bjJZSgh6weQc0JD2Pv07UC5T8Z5hj+urB+7qJNKUdSopbvedCq6pGw
-HgYZm013dvfxD146mxz4YEhVt9/3nTxl2/NhirQjL8SC4u9saWlt6xSSnNc2
-pPsnbL75nZsZyZJs677yVFkX7k9XVQK/g9HjkGFMZqVorFhE3WyBTMiVCIgx
-W+TcoS8igNYiqMsIoFpa2s7cXSbf6Wu97T3RNKo/4KLm60FG5Njhwq8AjD/H
-z4iQmZsUTJ08fqyYcQazBsaGeeWJDtMkt+OqwSvf4+hysha3MwzEepq688cK
-xd1udYYJd1N6GzLYMGlDsQiacw+uDlm2MTY+PmZdqO/swK98fMIy66XVQi0g
-Oncw4F1EAMJoz51jOu3Av+cH3miR71ZwS2LMJ3re6nuExyncMtUk7E6rCh0C
-jD/Hy0h3xb4Zxj57HjQMHTSFmNmz7FY8kxtuVQrEvOlrt0p+nBY1wr9+djBw
-z1E8gKHOMOFuSm9DBhsmzRcLv+qIO8n/TDW//2B/cZjsNvRgUQuIzh0MuBcR
-gCi4JdFk25jL2+cffDXMgzqo+brrJKvk3q/41cfcjTzlZlvDg/HnOBlhPfra
-xCquVINvSyhH2VVDrWHC3ZTehgw2TJovlo68AFN6Rr3kWiOsvzjfiLLzT/WJ
-SLA7AFF0MIINRn0ozRjzKKn7XlH92Wmk+ZknAlY+Zg/3+67iSJLhQgar9e5i
-kk2syk/hMP4cFyOcZysMP/pwTN9Ix9j/MQq434bqKNTEYID+9sH7H4yQD5AE
-NYcJd1N6FzJEYdJ4sUCdz3/wM3eau2xz3I5NEYFh8ZfV+mYpIe6UncEA+AN1
-N1W/eS3Nm1om/+0YB5uxyMzp0KWlgZcahr0bFjVcpH9GS7sTRzFDM1SB8ed4
-GIGarjp/RsXQ+1Yv/QGqYKTaTKJnFMsFSIKaw4S7Kb0LGaIwabxYuGUJno7x
-hRyCJl8Q4k7ZGQxAOLzy3XZWqy4lzk9U9M4q59ly448tTAy80hEVMa/m3O5z
-NW8HUVT8OY5GBmnLmT1p8qLLdVo9Exx+hAr3MMkYByFDjJKBRE0UizT86hOB
-k0eOnGjtEbIu8eTtMrZ6JyUR7A6gHUDN19zGj/j7+M8DFL6TKaw7TRszauoO
-hDfMnMJIr/VSD7hU/DmORgaBOC9T51uM/2jkaPFknEkux/CZPoIvImZOZNjW
-58Ovp4B/mKQBIUMObJg0UyxvETTe2LUqOvV81rm0pOhvA2ifjp7kk1zcqa5u
-OcHuADpE55O1RmMtUD+YxPhzHI3oNzhKBEKGGo0WS2dBmAX9p7rBeawiVn60
-xedzVX71XjvdAXQI8XPJEaMpaKd3Y/w5jkb0GxwlAiFDjWaLhVO01tx8XR5r
-oLMvYj3cQp+bXqOmYT6C3QF0CG5pnL2hx4FKlMvzYPw5jkb0GxwlAiFDjYaL
-RdTx9OBS3znhUbFJ+1JTknYnpF6tVOOqBAS7AwAAAAAAAAAAAAAAAAAAAAAA
-AAAAAAAAAAAAANAiRNyWckZ+C5hfB9AoIA81BVAegAhe7a/fB7s5OtjbmI4d
-bxuemIl2lTKIeWMWdUMxm8VI9KOFpZdz0c/Ug1pv+VHXFHH6/1pXNPiOLb/q
-+DwqafyocaZW08MfoNy/Emq+5mEjWcaZWxJHnym3KpKI9XhvsMPUKcaGlMWn
-qvCfYopDKwhRWwIuaijVHLc8RAAOLdKjbCdSeYA+wCne5uQUncMU9vS03fWy
-jniiaEEF5XS92ER1T8/Y6jkjMqseprfyngKKi4sHTb3cTPW6It6qh1sSTfO+
-2iRdL6LGS560WEWLNiFywSlcbeuTzYRETVkLnDYUDFlqFmq7F06eebi0C+ou
-30+zwKKJYhC0Ahai1EasBjbNccxDpeASX73JdiKVB+gSCjOqPXehTfC9vk6M
-sD7DlRqjdKNnhaZ603v6hHETDAIGNmZTRIUCeLyBTp+o4YI7dctLrriflOVN
-i5Y9KM6zlRT/O61YXAjrTrs6Jb9ile5y9T9TN6TrBTGz/SkrCvqKh80IsfJX
-uEAUAhTKhaAVcD8nTG3EamDSXPU8VIpC6VSJr+b1V3e2q0F5gH6gKKO6S+Pt
-nSWrHEBtOQvJAXeV3gUrTE5O4Spr2prlZNNF2S0Y18fsfLLU5subzN5D6Xy6
-ws73Vqv0QQlrT7k47inHNmzEZoTah/52/l8uW+W3G+ttCNntWrPYJ69iryN9
-fyWGYV5FciFshcbVxlENGM1R5KFS4KRD3CKN66/ubFeH8gD9hle5j2IentsO
-iVh58XS7qAI26pQR1p1xddpT1ng/woy8HdPWQT2C6jR7k6BHHT2C+swFRuSE
-Mplh1s6CJbZzcpHvRTks/MpUR5IfNfBCvdzGxsLadOonVkll3RCv6myoXVBm
-gzr2PsbYCsLUxlENGM1xzEOl4NIivcl2IpUH6AnC5pvfuZmRLMm27itPlWFZ
-aYb9eAkl6CGrR1BzwsPY+3Qt8lXaRN1sgYxj1sMgY7Ppzu4+/sFLZ5MDH8jW
-DL/66GwTy4BLqhS7nIue9vu+k6dsG27bsI68EAuKv7OlpbWtU0hyXpt69hVA
-0wopCFMbvRqqaI5jHioFl/jqTbYTqTxAV2i97T3RdGBTRVHz9SAjcizKLRZx
-MSVozj24OmTZxtj4+Jh1ob6zA7/y8QnLrJeuOl55osM0DCuqInABA698j6PL
-yVrs9xcY5dIOtZGqgU1z1YFYT1N3/lgx/BA8rHRIW6Qd+uPiAldglQfoB9yS
-GPOJnrf6nqZxCrdMNUG/8ycOpvhVR9xJ/meqJQPJwr9+cZjsNnTzNIiZPctu
-xTO5xw04uoABYt70tVsl/7BDdTDKpRVqI1QDo+YogN13D046xPHVCv1xcYEv
-SnY8BOgDUPN110lWya94vfe6x9yNPDFs2IyDqY68AFN6Rr2k+oT1F+cbUXb+
-ie/kcAJcIAOjXLqhNsGOBoE9d+GS87qhv5YpD9ATuoojSYYLGazWu4tJNrGY
-HtxhNwV1Pv/Bz9xp7rLNcTs2RQSGxV/G/YUiAlz0Fisj2GDUh9KMMY8aOn6B
-US6dUJtgR1LK/+2D9z8YoR7l8TKiL9kuAZHyAP1A1HCR/hkt7U4cxQz94BRe
-prhlCZ6O8YUcNT5zI8BFb7F2N1W/eS3Nm1omf4hLjHLphNoEOxpUvoKRajOJ
-nlGsFuXxMqIv2S4BkfIAPYHzbLnxxxYmBl7pKt9j82rO7T5X83auOAZTEvjV
-JwInjxw50dojZF3iydtlbPwnKBHgAikqyqWLahPsaBAl4ySopNNF/bVOeYB+
-IKw7TRszauoOFPfYnMJIr/VSTw4xmBIjaLyxa1V06vmsc2lJ0d8G0D4dPckn
-ubgTz+4KAS6Qo6Jcuqc2wY6kEDFzIsO2Ple0+AUq6XRPfy1UHqAfdD5ZazTW
-Iq4Uh/FObKY6C8Is6D/VDc55FLHyoy0+n/uoA/uBEehClaPBprzWq02wI1WO
-CY+c13r9tVF5gF7AebbCcMRoCoYZ4XiZ4hStNTdfl8ca6AqJWA+30Oem1+C4
-LDMBLlQ4GIxyab3aBDtS4ZDwyHnt118LlQfoB9zSOHtDjwOVOCz3jdWUqOPp
-waW+c8KjYpP2paYk7U5IvVqJ88uoBLhADEa5dEBtgh0hBpec1wH9tU95AAAA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAN1HxG0pZ+S3gJl7AFhAnugrILIA
-RPBqf/0+2M3Rwd7GdOx42/DETLTrn0HMG7OoG4rZLEaiHy0svZyLfg4g1HrL
-j7qmiNP/17qiIStJi1iP9wY7TJ1ibEhZfKoK5dxIqPmah41k0WxuSRx9ptSq
-pvyq4/OopPGjxplaTQ9/oK49MXFoBYGa45YnGlUeB/uEaA4jEQrgMw3HyALe
-CTjF25yconOYwp6etrte1hFP0C8V0PViE9U9PWOr54zIrHqY3sp7CiguLh40
-9XIz1etKk0hcMtE076tNMoUJtd0LJ888XNoFdZfvp1koPGZljjiFq219spmQ
-qClrgdOGArbMj0WNlzxpsX+ob/cZpK2AhTDNVcsTrVYeq31iNIeVSDUv8JmG
-4xkAoFcoTKr23IU2wff6ulzC+gxXakyJsmJSaKq3GKdPGDfBICCrCX4JtQoF
-8HgDnSBRwwV36paXXHGXK8ubFi17UBAz25+yoqAvudmMECv/31noHAnrTrs6
-Jb9ile5y9T9TN6Qvx3m2kuJ/p1WJGkpRKBfiVsAZIUxzFfNEq5VHZl/TmsNK
-pJIX+ExT/QwAeEdQlFTdpfH2zpI1E6C2nIXkgLtK79kV5iencJU1bc1ysumi
-7BaMK292Pllq8+VNZu+hdD5dYed7q1W221u4iux2rVn833gVex3p+yvRDsOy
-GaH2ob+d/5fLVrnN3YS1p1wc95RjfqMeTi7ErdC45ijyBB4NKo/QvsY1h5FI
-NWAzDffIAvQeXuU+inl4bjskYuXF0+2iCtioU0ZYd8bVaU9Z4/0IM/J2TJs/
-9Qiq0+xNgh519AjqMxcYkRPKZIZZhbXp1E+sksq6IV7V2VC7oMwG1Ht88ytT
-HUl+1MAL9XImOguW2M7JVd960Li0gjDNccwTCRpUHqN9wjSHkUi1A4bNNNwj
-C9B/hM03v3MzI1mSbd1XnirDsoYN+/ESStBDVo+g5oSHsffpWuQP70TdbIGM
-Y9bDIGOz6c7uPv7BS2eTAx/IVnhHXogFxd/Z0tLa1ikkOa8NeX9PzlFP+33f
-yVO2DbchGb/66GwTy4BL6C9J8KBvhRSEaY41T7RJeYz2idNcsUQqeVGSafid
-AQB6Q+tt74mmAxs1ipqvBxmRY1Fu24iLKUFz7sHVIcs2xsbHx6wL9Z0d+JWP
-T1hmvXTt8coTHaYpXGqUV77H0eVkrdKSR+BIvcDKhbQV2qE57u4wA7Gepu78
-sWL4IXiMoumQ5oi8IMs0AGAQbkmM+UTPW33P/jiFW6aaoN8SEwdT/Koj7iT/
-M9WSgVXhX784THYbui0YxMyeZbfimYKxXIh509duldKRXiSO1AycXAhboSWa
-4+4OO7A7ymEUTWc0R+YFYaYBAINAzdddJ1klv+L13pkfczfyxDDvGwdTHXkB
-pvSMekkNCusvzjei7PxTHZPDCXOkGFyU1yXNiXQHe9XAKJrOaK4FSQ7QT7qK
-I0mGCxms1ruLSTaxmB7fYTcFdT7/wc/cae6yzXE7NkUEhsVfVtMLRWp21MEI
-Nhj1oTRjzKOGjmLgorwOaU6Iu0Hl//bB+x+MUI/yuqI5sZFFlPMA/UDUcJH+
-GS3tThzFDP3gFF6muGUJno7xhRy1P3NTsyOou6n6zWtp3tQy+UOc4aK8DmlO
-iLt+5SsYqTaT6BnFalFeVzQnNrKIch6gJ3CeLTf+2MLEwCtd5TttXs253edq
-3s5sx2BKAr/6RODkkSMnWnuErEs8ebuMjXHCu+YdwYFKLt3VnEh3sCNUKoum
-o5prRZID9BJh3WnamFFTd6C40+YURnqtl3qShsGUGEHjjV2rolPPZ51LS4r+
-NoD26ehJPsnFnfh3VwhzBA8quXRVc2LdiZg5kWFbnyta/EJF0XRScy1JcoBe
-0vlkrdFYi7hSHIY8sZnqLAizoP9UNzgHUMTKj7b4fO6jDuwHpiFHyo4DD+V1
-RHONuFN8HNiU1wXNtUVqgD7CebbCcMRoCh5z8TGa4hStNTdfl8ca6A2JWA+3
-0Oem1+C+LDNhjpQcBh7K64rmGnGn8DAwiqYLmmuJ1AC9hFsaZ2/ocaAS87o+
-2E2JOp4eXOo7JzwqNmlfakrS7oTUq5VqeRmVMEew4KK8zmiuEXcKwCiabmiu
-HVIDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPQaEbelnJHfAqYyEg6R
-yoMoA5QCkuQtUPM1DxvJKsrckjj6THTr4ULMG7OoG4rZLEaiHy0svZyLfvYf
-1HrLj7qmiNP/17qiwdd1+VXH51FJ40eNM7WaHv4A0yaVItbjvcEOU6cYG1IW
-n6oaOruSV/vr98Fujg72NqZjx9uGJ2aqbUE4xY1VxQg+4sNkgh4qj6MvQpIf
-nzodQFEUcAz0sOjQ2UYC7gmpKeVxhlO42tYnmwmJmrIWOG0oYKMy0vViE9U9
-PWOr54zIrHqYq/F7CiguLh409XIz1etKk0icV9E076tN0gKKGi950mL/GH4j
-HsQuoLZ74eSZh0u7oO7y/TSLiCcyi1Jwirc5OUXnMIU9PW13vayHfIsvsI1F
-bAQn8WEzQd+Ux9EXMcmPtE6xRgFBoDGgU2cbFZNEu5VHiYLmCOtOuzolv2KV
-7nL1P1MHe+lXKEhve6dPGDfBICCrCX7xtAoF8HgDV11RwwV36paXXHG/JMub
-Fl0iIyLn2UqK/51WbC4gZrY/ZUVBX8DYjBAr/99ZUr9vz11oE3yv72IvrM9w
-pcaUYA6jYt1gG4vUCF7iw2aCnimvui9NJz/SOsUaBQSBRoI+nG1UTBItUR5f
-FDWHzQi1D/3t/L9ctirb7UuhIJzCVda0NcvJpouyWzCuudn5ZKnNlzeZvZHq
-fLrCzvdWq/TFX1h7ysVxTznGV9x7j5bsdq1ZbJhXsdeRvr9Sqr/SXRpv7yxZ
-RwJqy1lIDriL/W5RoW6wjUVqBD/xYTJBz5RH4UvjyY+8TpUAGwV8Aq0XZxv8
-E5IQ5YmBX5nqSPKjBl6oR7uvsLDujKvTnrLG+xFm5O2Y9nzqEVSn2ZsEPero
-EdRnLjAiJ5TJDCN2FiyxnZOLcStRYW069ROrpLJuiFd1NtQuKLNBut28yn0U
-8/DcdkjEyoun20UVsNU3xAjfWITgKD5MJuiZ8jj6Iiz5sddp/wHDRgGXQMOg
-Q2cb3BNSs8rjTPt938lTtmHYkYv9eAkl6CGrR1BzwsPY+3Qt8idcom62QCYU
-rIdBxmbTnd19/IOXziYHPpAVkV99dLaJZcClBhUyTs5FR16IBcXf2dLS2tYp
-JDmvbUh3Rdh88zs3M5Il2dZ95akytS7qA99YhOAoPkwm6JnyOPoiLPlR1qmK
-UUATaJXQnbMN1iTRNuVVpPW290TTgY0aRc3Xg4zIsaqFDbuFXgTNuQdXhyzb
-GBsfH7Mu1Hd24Fc+PmGZ9dJR55UnOkzDsEAsIhd7HF1O1uIWGoj1NHXnjxXD
-j3jC6oa0sUSJjwkNKA8LLqLhaIqA5EfqBXsU0Oc8InRIcNXcEZj/2OGWxJhP
-9LzV95yFU7hlqonKe1pit9DDrzriTvI/Uy0ZyRP+9YvDZLeh+7BBzOxZdiue
-oR22Rebipq/dKowjw9LA7igHpxvixhIkPhY0ojwsOIiGoykCkh+xFxyigDrn
-kaEzgqvojsj8xw7UfN11klXyK17vXdAxdyNP1WdJY7fQe3sWYErPqJdEX1h/
-cb4RZeef+M7GJ8CFPLAVhINuOiG+RpSHBRflcTNFjD6ERUHNOa8zgmvKHTF0
-FUeSDBcyWK13F5NsYtE8QcJuAep8/oOfudPcZZvjdmyKCAyLv4z7G1wEuJCi
-gxFsMOrDXv72wfsfjBD/McY8auiNNHbdcDGibmU0pPwg6lIeL1PE6KN+LwTl
-vK4ITqA7RDmPL6KGi/TPaGl34ihmKG/UsVvgliV4OsYXctT4kJMAF1JA3U3V
-b16/rmCk2kyiZxS/fv36TS2TP8Q3dt1wMaJuZTSivBTqUh4vU8Too34vBOW8
-rghOoDtEOY8znGfLjT+2MDHwSkd6s8erObf7XM3bycOqWxgCv/pE4OSRIyda
-e4SsSzx5u4yNcaq1ZlzIA3u3jlI3nRNfI8orAYNoOqc/kV561JDzOiq4ptwR
-hLDuNG3MqKk7kN/scQojvdZLPbpR3YIMgsYbu1ZFp57POpeWFP1tAO3T0ZN8
-kos78bxWEuBiOETMnMiwrc8VrTWASjcdE19DyisBg2g6pj+RXvrAPed1UnBN
-uSOMzidrjcZaxJWiH2zDZqGzIMyC/lPd4KQzESs/2uLzuY86UB+PJlygAbvy
-mI2oWxl9Vh4PU8Too0VReAfONhp0RxicZysMR4ymYJiajNECp2itufm6PNbA
-5VfEeriFPje9BsdlhwlwgeaoMCuP3Yi6ldFj5XExRYw+2hOFd+Fso0F3hMEt
-jbM39DhQiX6NE6wWRB1PDy71nRMeFZu0LzUlaXdC6tVKnN/+JcCF6mBXHgcj
-6lZGf5XHxxQx+mhNFN6Js40G3QEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-AADIIOK2lDPyW3R9htu7DQiipgDKawq9UB5qveVHXVPE6f9rXRGa1Xwh5o1Z
-1A3FbBYj0Y8Wll7ORTf1DGq+5mEjWU+YWxJHnym33iWv9tfvg90cHextTMeO
-tw1PzMS6TpiI9XhvsMPUKcaGlMWnqt5O9uNXHZ9HJY0fNc7Uanr4A+y7karm
-XQVwUr7PlMJMUBoXlYAPorqVx6cthMguAYckGUCzyovRqbONXimPL10vN1O9
-roi3bueWRNO8rzahOeauF5uo7ukZWz1nRGbVw1xF5TeRl9lKvodTuNrWJ5sJ
-iZqyFjhtKGDL/ppTvM3JKTqHKezpabvrZR3xRNGqBoh89Yh3BL4XTp55uLQL
-6i7fT7OQNShqvORJi/0Ddo95TMB6RwpeyvfAZgJ8XFTygiCI6lUeaVtgIUb2
-HuRJogvK9+jU2UbPlEeDwkaJGi64U7e85IovvVnetOgSmONWbKTx0vQJ4yYY
-BGQ1wa/cJb+JvMxW8uIlaFydkl+xSne5+p+pG3Lpb89daBN8r+9KLKzPcKXG
-wB2rcl99O7P4U1YU9IWQzQix8v+dJfV7zrOVFP87rbDtQYBC0eC9IzSCm/Lw
-mQAbF5W8IAmiepVH2hbFFgiTXYUk0QXldepso5vK44vCRnU+WWrz5U1mb4s6
-n66w873VCnPxV2iEU7jKmrZmOdl0UXYLtgUf2YxQ+9Dfzv/LZavcvlfdpfH2
-zpJ1BqC2nIXkgLtYb+V6D5vsdq1ZbIVXsdeRvr9SquMirD3l4rinHPPbxXCi
-KfaughGclIfPBJi4qASSIKpbeeRt0bjsKiUJPNqgvA6dbXRUeWIQVKfZmwQ9
-6ugR1GcuMCInlKF5TiCsO+PqtKes8X6EGXk7pi1weviVqY4kP2rghXq5HXZ5
-lfso5uG57ZCIlRdPt4sqYGO8aAhr06mfWCWVdUO8qrOhdkGZMlu9dxYssZ2T
-i+NGqSp5R2oEP+XhMwEmLiqBJIjqVh57WwiTHZckkaANyuvQ2UbPlMcX1sMg
-Y7Ppzu4+/sFLZ5MDH6A6bvbjJZSgh6weQc0JD2Pv07XIHy+KutkCWQnb7/tO
-nrJt2H2qhM03v3MzI1mSbd1XnipTea0XOV8deSEWFH9nS0trW6eQ5Lw22X4L
-v/robBPLgEvoswUeeO8IwVF5JZkAExdVvCAJorqVR9kWKQiTHX2SaKXyOnS2
-0TPlVaX1tvdE04HtAkXN14OMyLGDMvHKEx2mIVhdEtYIUgTNuQdXhyzbGBsf
-H7Mu1Hd24Fc+PmGZ9diXJUXni1e+x9HlZC2mMEGsp6k7f6wYfnRWifLIvBOl
-PNJMwOaFILCLph2yI00SQpXHkvM6c7bRSuUJhFsSYz7R81bfcxZO4ZapJlLb
-KkLM7Fl2K54pH6mGM4IQftURd5L/mWrJ6KDwr18cJrsp3BAMI0h8Qcybvnar
-sI3Sw+9rBq88Qu8EKY84EzB5IQrsommF7AiThGDlMeS8zpxttFN5AoGar7tO
-skp+xeu9CzrmbuSJan46DkY68gJM6Rn1kugL6y/ON6Ls/FNNm8AT5gu2gt4t
-5YmMrzKwi6YzshPpSALIeYK9aISu4kiS4UIGq/XuYpJNLMrHR9iNQJ3Pf/Az
-d5q7bHPcjk0RgWHxl7G+oadJXx2MYINRH/bytw/e/2CE+I8x5lFD76LfKeWJ
-iu+g8oOoRXldkZ1ARyDnNeMFYc7ji6jhIv0zWtqdOIqZ6nd6+BnhliV4OsYX
-coh48VH9vqDupuo3r19XMFJtJtEzil+/fv2mlskf4u+dUp6o+PYrL4ValNcV
-2Ql0BHJeM14Q5jzOcJ4tN/7YwsTAK12FOz1ezbnd52rezh9GZUQafvWJwMkj
-R0609ghZl3jydhkb4zx3rfAFe7f+bilPZHyVo7poOio7kY4kgJwn2ItmENad
-po0ZNXWHSnd6nMJIr/VSj4NQGXmLoPHGrlXRqeezzqUlRX8bQPt09CSf5OJO
-tVwuCfQlYuZEhm19rmgpkHdHeSLjiwTVRdNJ2Yl0NADIeUK9aIrOJ2uNxlrE
-lWIacsNmpLMgzIL+U93gRDYRKz/a4vO5jzqwHJIW+FJ2KO+K8lqkef8BYVZe
-F2Qn0hHiAwI5rw9wnq0wHDGagm0uPkYjnKK15ubr8lgD12ER6+EW+tz0GnUs
-F0ykLyVH8s4orz2a9x8PZuV1QnYiHSE9HpDzuHrRFNzSOHtDjwOVmNY4wWpE
-1PH04FLfOeFRsUn7UlOSdiekXq1U+e1uLfQFyzukvNZoLgG78rohO5GOkAFy
-HgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgB7TnjPDcAbW5RxxMQLQICAN
-eoAIgD5AGihE2PIgdWN0QsoP35n/fcwUn4Qr6RvNRr3/3+S9Ff2z4qDW20ET
-x5A2/vS4jddWcGaT2T9IUen3Gvk9PfzGe+lRpH+YbTzDqLgvZWRmyqsu1n+S
-lizefuBI8sol39/OPxa1NuH/HU3b//36r1ceZjyW/vhjYR1j//ot+46dOLxr
-9YZjf2puZhvv1V4HCxuag4MD3TemWNGbsaoi4raUM/JbtH2ON0gDQkTYmVuV
-L9NMYUfR2f/7vzZmMyXbvIlkP2oM9dSCBlGlDEEaKIP9n/81czpVKxRfE/9p
-lXAyn8nMmfHZF0GWdtEv+172FzXeXh9F+ufA5XLIpVPysU7OCK/lwU836/ni
-LeddTD1nGNHP9q02LKo/Rzdylflo7BFs5SzZHYVXnuTsg2rl5R6IeWMWdUMx
-m8VI9KOFpZdzUZx0ul4krs7DJ0q82l+/D3ZzdLC3MR073jY8MVNmpUx+1fF5
-VNL4UeNMraaHP1B9b3So9ZYfdU0Rp/+vdUWDCzVAzdc8bCS7BnBL4ugz5cQU
-sR7vDXaYOsXYkLL4VNXb2fJ6kgbYIEAE0sxhmtl2T8bOkI8qo1W1gCFXkaAo
-nyWgK0M9SQN1wq89Pc9gonPY9qQYy89c77RJWj3950Oe1ssYHT09gtrLcZfO
-uxjCStQsZ6Q3Kbhvrv/075RtkXE/Fz359wrv4M17D+3dEuK57PB/Hkt/3Hdm
-vpF1Qt+a9YLq4zSjOY9YKJrR9WIT1T09Y6vnjMisepT9enZR7M7r134+knY2
-t7ZbYaW9p4Di4uKBf8Ip3ubkFJ3D7E2Ktrte1hFP5PtqosZLnrTYP4bfLk0Z
-XS83U72uNInE5RZN877a9PZgOYWrbX2ymZCoKWuB04YCtuwPobZ74eSZh0u7
-oO7y/TQLqQPTkzTABgEiHD8fIN/MYe2gP11oVS2gzlUkKM7nPvsoy1BP0gAf
-FAZX2P7iyoHoxe4TPhxtvSmP1SY+2jvl1/ynBt5idlWe3Ml4fXcGvETtckYk
-uQF1laXPpUecv7CUOn3n/dr22vvfT7OLuHBR+uM314vOrp3pMu+bzd8n/RBt
-aTATZq9hhU3ojf70CeMmGARkNSldlFKhka7yw4eyy5iNj1PcLIIuNyrYG7JC
-ATzeQE+nPXehTfC9vr6LsD7DlRpTIn9x4DxbSfG/06rsWIdF1HDBnbrlJVfc
-XcvypkVLmxfWnXZ1Sn7FKt3l6n+mbkjnDWJm+1NWFPQVD5sRYuX/u/SZWXfS
-ADsaq4VvrhVmyDUT1elCN2oBda4iAT6fsZSh7qQBRgQtuUdTkpL2nXzSPnyy
-wAVXcpDj3vuviQvya/rujFrbckIsvU/cSkoqYrdJHX97rs8Xzpca+12IGjOd
-v5j5gCVnZGCBL6jpyrQvnKcbOV9o6BuLaLjgbOTiIv3RZM7gamDC2nS61Zoi
-xbsyKmwCp3CVNW3NcrLpouwWZaWiRAfJUZnOQ71GWXdpvL2zZIEdqC1nITng
-rvwYlLD2lIvjnnJ06yl0Pllq8+VNZq/Rzqcr7HxvtUqbZzNC7UN/O/8vl63y
-u1v2qkR2u9Ys/ue8ir2O9P2V8j1RXUgDpWhvLRj7DZ7Z3jYT1elCJ2oBfa4i
-ATafcShDXUgDjLDywqmmxqb2Efkq3dp3vz6+LfX3VmF/6z4NeFR1Y7qBS++N
-I/vxtyaT3HaVcmWOn/cqiWoe8VBy5YRYj76xoKVUdAw18nvZhfDlF+sFPYKa
-43TrsCVW9ql9EeW/PkCzjgiX/khe+cOOw0VsSDzweWeh/VI0IxPCujOuTnvK
-Gu9HmJG3o1x7uYfzx+FdV/4SP9F6c8jRbtswPRNk8Cr3UczDc9shESsvnm4X
-VcCWv8PvLFhiOwflky5BdZq9SVBvIQvqMxcYkRPKZJYN5VemOpL8qIEX6uX6
-h735Sf3EKqmsG+JVnQ21C8psePtP9CINBtHeWiAvS5ZvJq6nC62qBdS5igS4
-fMZShnqRBupF1J6/75vZc76NT9hgNnok6esLt9O+Nhjz+ZLjjDb2y52Bhyq4
-nX+c32L2D7NNPxe0iaMCcUqOrg3dkHLs5Mlj+6K+Xn+ilAMNMRL2azPnzc9r
-5n4dnZq6NXTzldrG+7sjViYeOZGWtHZZUm5zk/THe2XXNn3lFbF9/+GkmKhD
-+Qo6h/CwHy+hBD1k9QbkhIex9+laVA9S+X9dWD930aaUIylRy/c8aEWayKJu
-tkA2H4XNN79zMyNZkm3dV54qG3YyEL/66GwTy4BLDSjKhfUwyNhsurO7j3/w
-0tnkwKEjOe33fSdP2Tbc5pEdeSEWFH9nS0trW6eQ5Lw2aaX1Ig2wQoAImS+y
-ZJsp6nhx7fC3RuOMVxy+9qJj6EcUjdCqWkCdq0iAy+ceDGWoF2mACEFdRgDV
-0tJ25u4y+X5B623viaYDu9CKmq8HGZFj5UKl3ZOTETVB/UYEzbkHV4cs2xgb
-Hx+zLtR3duBXPj5hmfXqmO4jZOYmBVMnjx8rZpzBrIFRal55osM0NCtM88r3
-OLpI5m3AoN1pgAhQC4QYQVALqHNVGsWFgCSfsaDdaSAGYj1N3fljBdpbwfbc
-OabTDvx7fuCNFvmLKrckxnyi562+hz6cwi1TTYbdqlfYxenCHAJcjAwDsiao
-2Qi/6og7yf9MtWT0VPjXLw6T3dSUD90V+2YY++x50DD0yQPEzJ5lt+KZ6uPA
-EPOmr90q5QPIWp0GiAC1QIARJLWAOlelgCkEZPmMBa1Ogz7b8Hv1KoFbEk22
-jbm8ff7BV8M82oGar7tOskru/YpffczdyFMTc+ExgksTsBrpyAswpWfUS4pL
-WH9xvhFl55+YdjRTBOvR1yZWGHdLe1cBtUCEEYJqARQCLJiuGqL6s9NI8zNP
-BKx8POys567iSJLhQgar9e5ikk0s2kdkGgWXJmA0AnU+/8HP3Gnuss1xOzZF
-BIbFX65RTzqLdzr76MMxfffkY//HKOB+m1rc6BgdjGCDUR9KM8Y8Sm5UBdQC
-IUaIqQVQCAoYrIW/ffD+ByMU1QI8bMYiM6dDl5YGXmoY9i5T1HCR/hkt7U4c
-xQzN3aw2gEsTMBrhliV4OsYXctS92AXUdNX5M6oO9oLVC9TdVP3mtTRvapn8
-ocEAtUCIEUJqARSCIvproYKRajOJnlGsoBZg4ZXvtrNadSlxfqKil405z5Yb
-f2xhYuCVrjMR4NWc232u5u0YA6om4GJkEH71icDJI0dOtPYIWZd48nYZW13n
-nLac2ZMmL7pcp+2LV2khoBbUamQQYmoBFAI8GEaooOZrbuNH/H385wG/K5qe
-Lqw7TRszauoOHboh5xRGeq2XetiFqgm4GOlH0Hhj16ro1PNZ59KSor8NoH06
-epJPcnGnOjpbEOdl6nyL8R+NHC2eNjLJ5RjGaSjvDqAW1GukH6JqARQCPCJm
-TmTY1udqWl2y88lao7EWOv1UCZcmYDDSWRBmQf+pbnA2hIiVH23x+Vz0r80C
-NAOoBcxGQC28C4gfKo0YTcE6c1qT4NIELEY4RWvNzdcNLCcjrpSHW+hz02vA
-zbNuAWoBuxFQC+8C3NI4e0OPA5Xo1j3SCnBpAiYjoo6nB5f6zgmPik3al5qS
-tDsh9Wql5jYDAaAE1AIORkAtAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-0FO0f1lgAAGANOgBIgD6AGmgEGHLg9SN0QkpP3xn/vcxU3wSrqRvNBv1/n+T
-91b0z8mDWm8HTRxD2vjT4zZeW8GZTWb/IEWl32sUb/TVeC89ivQPs41nGBX3
-pYzMTHnVxfpP0pLF2w8cSV65ZGduVf7+9Vv2HTtxeNfqDcf+7IIgduGBZWGb
-9+6LCfnmcO9n2Y+aUoL3aq+DhQ3NwcGB7htTrKb3LYlExG0pZ+S3IJpFD9JA
-QyKIpL/9vU0g+1FT62SBWgBpAAP7P/9r5nSqtm+nwn9aJZzMZzJzZnz2RZCl
-XfTLvsIVNd5eH0X6J+zW6nVyRngtD366Wc8X7zHvQpoZbOUs2T6FV57k7HOi
-pv3JWt/tz7t6RE2Xp5styG+Q/YjmDVOIeWMWdUMxm8VI9KOFpZdzUUwe73qR
-uDoPj04B1HrLj9q3FXDfX+uGboEtYj3eG+wwdYqxIWXxqSrVJsxDzdc8bCTb
-CnBL4ugz5ZZ249X++n2wm6ODvY3p2PG24YmZMmuR8quOz6OSxo8aZ2o1PfzB
-252U9SQNsKEREbqlvu1tdZvsR52uBaW5iqUQ+hwoKTQdqgX800Cd8GtPzzOY
-6By2PSnG8jPXO22SVk//+ZCn9TJG78EKai/HXTrvYggrUbOckd44ct9c/+nf
-Kdsi446fDzCyTuhbfF9QfZxmNGdwT2h+ZSp1ysrBtXGGfFSFrhebqO7pGVs9
-Z0Rm1aN8RZVdFLvz+rWfj6Sdza3tVlhp7ymguLh48GBebqZ6XRFvOcYtiaZ5
-X22SMQa13Qsnzzxc2gV1l++nWUQ8Ua0nxylcbeuTzYRETVkLnDYUDFkNnFO8
-zckpOofZm49td72shzMuarzkSYsdsrafnqQBNjQkwttvfxFvVDrko+poTy3A
-5yrGQuhRVmg6Vgt4pwE+KAyusP3FlQPRi90nfDjaelMeq03c6jvl1/ynBt5i
-dlWe3Ml4fXcGvETtckYkzYS6ytLn0r+5VpixdqbLvG82f5/0Q7Slwcz+7YN5
-VT9/M/u7a439HZAhH1VqQm/0p08YN8EgYGB7SDQ6dJUfPpRdxmx8nOJmEXS5
-UcH+WxUK4PEG+kqihgvu1C0vueLOVpY3LbpEJikhZrY/ZUVBXwazGSFW/gqX
-2RseYd1pV6fkV6zSXa7+Z+qGiNWeu9Am+F5ft0lYn+FKjSmRX/iV82wlxf9O
-q7xhnUkD7GhdLfR/e6NZONxHlZqgRbUAm6tYC0FZoeliLaieBhgRtOQeTUlK
-2nfySfvwyQJ3opM0dtx7/zVxQX7NPXGrW9tyQiy9T9xKSipit0nJ0p7r84Xz
-pcZ+F6LGTOcvZj5gyRkZuKWCmq5MM/YbzAdhbTrdqu+WUtBwI/67tMKBBZaH
-fFSAwiZwCldZ09YsJ5suym5RVipKdOhLRmfTeeiXYut8stTmy5vM3izpfLrC
-zvdWq2wPqHAV2e1as/i/8Sr2OtL3V6rYHWQzQu1Dfzv/L5etct3x7tJ4e2fJ
-ykJQW85CcsDdNrleirD2lIvjnnJFwwG6kAZK0bFaGO7bIR9VaII21QJMrmIv
-BPhC071aGO5bpWmAEVZeONXU2NQ+Il8lF92vj29L/b1V2N+6TwMeVd2YbuDS
-e1vJfvytySS3XaVcmYsp71US1TzioeTKCbEefWNBS6noGGrk97IL4csv1gt6
-BDXH6eRlyTsOF7Eh8ejjnYX2Sx+xRG2/71qdXia+9ou6m7oFsh9VP2UI6864
-Ou0pa7wfYUbejnYFbM4fh3dd+Uv8ROvNIUe7bcP0TJAhqE6zNwnqLTRBfeYC
-I3JCmcyior1JQv3EKqmsG+JVnQ21C8psULUfwa9MdST5UQMv1Mv9kle5j2Ie
-ntsOiVh58XS7qAK2/K1tZ8ES2zm5Q4es9SINBtGhWmD+JfWtTVRhpcxHFXdn
-E6NVtQCTq9gLAb7QdKsWcE8D9SJqz9/3zew538YnbDAbPZL09YXbaV8bjPl8
-yXFGG/vlzsBDFdzOP85vMfuH2aafC9rEcYU4JUfXhm5IOXby5LF9UV+vP1HK
-gYYYCfu1mfPm5zVzv45OTd0aujnzRdamr7witu8/nBQTdSi/XdRdtov8CYni
-0AvNzmHRg2cyH1E8+mE/XkIJesjq1fiEh7H36VpUoxv8vy6sn7toU8qRlKjl
-ex60Is1hUTdbIJOPrIdBxmbTnd19/IOXziYHPpBNyo68EAuKv7OlpbWtU0hy
-HprZEe33fSdP2TZsJgmbb37nZkayJNu6rzw1/HAov/robBPLgEuyRaoXaYAV
-TYjQ0y317ZV6wZCPqjdCq2oBJlexFwJ8oelWLeCeBogQ1GUEUC0tbWfuLpPv
-F7Te9p5oOnDBEjVfDzIix8oFUrsnJyNqgvqNCJpzD64OWbYxNj4+Zl2o7+zA
-r3x8wjJlosorT3SYpnD9aV75HkcXyeQJJQiZuUnB1Mnj+7ZMHmcwC8EoNR5o
-dxogAtQCIUYQ1AIM2AsBvtDwQLvTAAfac+eYTjvw7/mBN1rkL6rckhjziZ63
-+h76cAq3TDUZdqNgYRenC/NTF1yMDAOyJqjZCL/qiDvJ/0y1ZPxV+NcvDpPd
-huYDxMyeZbfimYIJQBDzpq/dKgTTg7or9s0w9tnzoIHwLQu0Og0QAWqBACNI
-agEG7IUAX2j4oNVpgB1uSTTZNuby9vkHXw3zaAdqvu46ySq59yt+9TF3I08d
-3L4dlyZgNdKRF2BKz6iXFJew/uJ8I8rOP9WyJRzr0dcmVjq93ZzmALVAhBGC
-agEUgvoQ1Z+dRpqfeSJg5WP2cN93FUeSDBcyWK13F5NsYnVow+S34NIEjEag
-zuc/+Jk7zV22OW7HpojAsPjLNepJZ/E+ax99OKbvnnzs/xgF3G9Tixsdo4MR
-bDDqQ2nGmMs/KAS1QIgRYmoBFIIaYTMWmTkdurQ08FLDsHeZooaL9M9oaXfi
-KGZo7ma1AVyagNEItyzB0zG+kKPud26gpqvOn1F1sBesXqDupuo3r6V5U8vk
-Dw0GqAVCjBBSC6AQ1AivfLed1apLifMT/1AwRY7zbLnxxxYmBl7pOhMBXs25
-3edq3o4xoGoCLkYG4VefCJw8cuREa4+QdYknb5dhfa1AIW05sydNXnS5DuzD
-rDKgFtRqZBBiagEUgtqAmq+5jR/x9/GfByh8G0RYd5o2ZtTUHTp0Q84pjPRa
-L/W4DFUTcDHSj6Dxxq5V0anns86lJUV/G0D7dPQkn+TiTnV0tiDOy9T5FuM/
-GjlaPG1kkssxdc4U0StALajXSD9E1QIoBE3S+WSt0VgLnX6qhEsTMBjpLAiz
-oP9UNzgbQsTKj7b4fC76V8gBmgHUAmYjoBbeBcQPlUaMpqh1crOawaUJWIxw
-itaam68bWE5GXCkPt9DnpteAm2fdAtQCdiOgFt4FuKVx9oYeBypVX4tYa8Cl
-CZiMiDqeHlzqOyc8KjZpX2pK0u6E1KuVGlyMEoAOUAs4GAG1AAAAAACAPvD/
-Ad5Qx3Y=
- "], {{0, 153}, {530, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{530, 153},
- PlotRange->{{0, 530}, {0, 153}}]], "Output",
- ImageSize->{534, 153},
+ FormBox[
+ RowBox[{"-", "2048"}], TraditionalForm]], "Output",
+ ImageSize->{44, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"Chisholm", "RasterizedOutput"},
- CellLabel->"Out[11]=",
- CellID->1893484835]
+ CellLabel->"Out[16]="]
}, Open ]],
-Cell["Check that both a1.a1 and a2.a3 give the same.", "Text",
- CellTags->"Chisholm",
- CellID->1438490834],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"a1", ".", "a1"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[12]:=",
- CellID->1805014734],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]"}], "]"}], "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]"}], "]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[17]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "2048"}], TraditionalForm]], "Output",
- ImageSize->{43, 15},
+ ImageSize->{44, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[12]=",
- CellID->100937461]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"a2", ".", "a3"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[13]:=",
- CellID->375938433],
+ RowBox[{"DiracReduce", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]"}], "]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[18]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "2048"}], TraditionalForm]], "Output",
- ImageSize->{43, 15},
+ ImageSize->{44, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Chisholm",
- CellLabel->"Out[13]=",
- CellID->1603907719]
+ CellLabel->"Out[18]="]
}, Open ]],
+Cell[TextData[{
+ "Older FeynCalc versions had a function called Chisholm2 that acted on \
+expressions like ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SuperscriptBox["\[Gamma]", "\[Nu]"],
+ SuperscriptBox["\[Gamma]", "5"]}]], "InlineFormula"],
+ ". This functionality is now part of ",
+ ButtonBox["Chisholm",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"],
+ " and can be activated by setting the option Mode to 2."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "5"}], "]"}]], "Input",
+ CellLabel->"In[19]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
- "t1", ",", "t2", ",", "t3", ",", "t4", ",", "a1", ",", "a2", ",", "a3"}],
- "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[14]:=",
- CellID->453091936]
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{73, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[19]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Mode", "\[Rule]", "2"}]}], "]"}]], "Input",
+ CellLabel->"In[20]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$353", ")"}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$354", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$353", ")"}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$354", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{364, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[20]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -1590,22 +2117,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["EpsChisholm",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/EpsChisholm",
- ButtonNote->"EpsChisholm"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["ChisholmSpinor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChisholmSpinor",
- ButtonNote->"ChisholmSpinor"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Chisholm",
- CellID->1402112447]
+Cell[TextData[StyleBox[ButtonBox["EpsChisholm",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsChisholm",
+ ButtonNote->"EpsChisholm"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1613,7 +2129,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Chisholm",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1622,21 +2138,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 54.490487}",
+ "built" -> "{2020, 1, 5, 18, 53, 22.899026}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "Chisholm[x] substitutes products of three Dirac matrices or slashes by \
-the Chisholm identity.", "synonyms" -> {}, "title" -> "Chisholm",
- "titlemodifier" -> "", "windowtitle" -> "Chisholm", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Chisholm"}, "SearchTextTranslated" -> ""},
+ "Chisholm[exp] substitutes products of three Dirac matrices or slashes by \
+the Chisholm identity.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Chisholm", "titlemodifier" -> "", "windowtitle" -> "Chisholm", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Chisholm"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1645,7 +2161,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1654,255 +2170,185 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3332, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6225, 190, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->166755722]},
+ CellID->1890694887]},
"Chisholm"->{
- Cell[3965, 124, 225, 7, 27, "Input",
- CellTags->"Chisholm",
- CellID->1963239115],
- Cell[4193, 133, 3402, 138, 40, "Output",
- CellTags->"Chisholm",
- CellID->1878360355],
- Cell[7632, 276, 201, 6, 27, "Input",
+ Cell[6859, 219, 167, 5, 27, "Input",
CellTags->"Chisholm",
CellID->820852327],
- Cell[7836, 284, 299, 10, 36, "Output",
- CellTags->"Chisholm",
- CellID->1183629031],
- Cell[8172, 299, 158, 5, 27, "Input",
+ Cell[7029, 226, 748, 31, 37, "Output",
+ CellTags->"Chisholm"],
+ Cell[7880, 264, 128, 4, 27, "Input",
CellTags->"Chisholm",
CellID->1637229100],
- Cell[8333, 306, 2640, 110, 40, "Output",
- CellTags->"Chisholm",
- CellID->1999653730],
- Cell[10988, 419, 96, 2, 32, "Text",
- CellTags->"Chisholm",
- CellID->46337482],
- Cell[11109, 425, 148, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->648397183],
- Cell[11260, 432, 210, 7, 36, "Output",
- CellTags->"Chisholm",
- CellID->445477955],
- Cell[11507, 444, 157, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->429173445],
- Cell[11667, 451, 2639, 110, 40, "Output",
- CellTags->"Chisholm",
- CellID->536726068],
- Cell[14343, 566, 147, 5, 27, "Input",
+ Cell[8011, 270, 2384, 96, 40, "Output",
+ CellTags->"Chisholm"],
+ Cell[11532, 420, 128, 4, 27, "Input",
CellTags->"Chisholm",
- CellID->10063016],
- Cell[14493, 573, 211, 7, 36, "Output",
- CellTags->"Chisholm",
- CellID->1250343813],
- Cell[14741, 585, 188, 6, 27, "Input",
- CellTags->"Chisholm",
- CellID->1067563039],
- Cell[14932, 593, 843, 32, 46, "Output",
- CellTags->"Chisholm",
- CellID->102426516],
- Cell[15812, 630, 129, 4, 27, "Input",
- CellTags->"Chisholm",
- CellID->1495489925],
- Cell[15944, 636, 2721, 108, 51, "Output",
- CellTags->"Chisholm",
- CellID->1312947625],
- Cell[18702, 749, 251, 8, 27, "Input",
+ CellID->1963239115],
+ Cell[11663, 426, 3091, 123, 40, "Output",
+ CellTags->"Chisholm"],
+ Cell[41321, 1599, 225, 7, 27, "Input",
CellTags->"Chisholm",
CellID->1800486413],
- Cell[18956, 759, 1331, 56, 39, "Output",
- CellTags->"Chisholm",
- CellID->547285677],
- Cell[20324, 820, 159, 5, 27, "Input",
+ Cell[41549, 1608, 1312, 55, 37, "Output",
+ CellTags->"Chisholm"],
+ Cell[42898, 1668, 129, 4, 27, "Input",
CellTags->"Chisholm",
CellID->1694713808],
- Cell[20486, 827, 20425, 343, 169, "Output",
- CellTags->{"Chisholm", "RasterizedOutput"},
- CellID->2142983666],
- Cell[40948, 1175, 158, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->152524623],
- Cell[41109, 1182, 19884, 334, 170, "Output",
+ Cell[43030, 1674, 12522, 213, 153, "Output",
CellTags->{"Chisholm", "RasterizedOutput"},
- CellID->1893484835],
- Cell[61008, 1519, 106, 2, 32, "Text",
- CellTags->"Chisholm",
- CellID->1438490834],
- Cell[61139, 1525, 150, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->1805014734],
- Cell[61292, 1532, 231, 8, 36, "Output",
- CellTags->"Chisholm",
- CellID->100937461],
- Cell[61560, 1545, 149, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->375938433],
- Cell[61712, 1552, 232, 8, 36, "Output",
- CellTags->"Chisholm",
- CellID->1603907719],
- Cell[61959, 1563, 211, 7, 27, "Input",
- CellTags->"Chisholm",
- CellID->453091936],
- Cell[62526, 1592, 414, 15, 32, "Text",
- CellTags->"Chisholm",
- CellID->1402112447]},
+ CellID->1904366312]},
"RasterizedOutput"->{
- Cell[20486, 827, 20425, 343, 169, "Output",
+ Cell[43030, 1674, 12522, 213, 153, "Output",
CellTags->{"Chisholm", "RasterizedOutput"},
- CellID->2142983666],
- Cell[41109, 1182, 19884, 334, 170, "Output",
- CellTags->{"Chisholm", "RasterizedOutput"},
- CellID->1893484835]}
+ CellID->1904366312]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 64806, 1655},
- {"Chisholm", 64940, 1659},
- {"RasterizedOutput", 67702, 1750}
+ {"PrimaryExamplesSection", 63271, 2171},
+ {"Chisholm", 63407, 2175},
+ {"RasterizedOutput", 64268, 2202}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3007, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 426, 13, 82, "Usage",
- CellID->982511436],
+Cell[3590, 97, 285, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3332, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->166755722],
+Cell[3900, 112, 419, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3744, 114, 196, 6, 25, "ExampleSection",
- CellID->1692715398],
+Cell[4344, 128, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1698842247],
+Cell[5086, 154, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[3965, 124, 225, 7, 27, "Input",
- CellTags->"Chisholm",
- CellID->1963239115],
-Cell[4193, 133, 3402, 138, 40, "Output",
- CellTags->"Chisholm",
- CellID->1878360355]
+Cell[5142, 158, 91, 2, 70, "Input"],
+Cell[5236, 162, 928, 21, 93, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[7632, 276, 201, 6, 27, "Input",
+Cell[6225, 190, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1890694887],
+Cell[CellGroupData[{
+Cell[6638, 209, 196, 6, 26, "ExampleSection",
+ CellID->1569818548],
+Cell[CellGroupData[{
+Cell[6859, 219, 167, 5, 27, "Input",
CellTags->"Chisholm",
CellID->820852327],
-Cell[7836, 284, 299, 10, 36, "Output",
- CellTags->"Chisholm",
- CellID->1183629031]
+Cell[7029, 226, 748, 31, 37, "Output",
+ CellTags->"Chisholm"]
}, Open ]],
+Cell[7792, 260, 63, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[8172, 299, 158, 5, 27, "Input",
+Cell[7880, 264, 128, 4, 27, "Input",
CellTags->"Chisholm",
CellID->1637229100],
-Cell[8333, 306, 2640, 110, 40, "Output",
- CellTags->"Chisholm",
- CellID->1999653730]
+Cell[8011, 270, 2384, 96, 40, "Output",
+ CellTags->"Chisholm"]
}, Open ]],
-Cell[10988, 419, 96, 2, 32, "Text",
- CellTags->"Chisholm",
- CellID->46337482],
Cell[CellGroupData[{
-Cell[11109, 425, 148, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->648397183],
-Cell[11260, 432, 210, 7, 36, "Output",
- CellTags->"Chisholm",
- CellID->445477955]
+Cell[10432, 371, 145, 4, 27, "Input"],
+Cell[10580, 377, 915, 38, 39, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11507, 444, 157, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->429173445],
-Cell[11667, 451, 2639, 110, 40, "Output",
+Cell[11532, 420, 128, 4, 27, "Input",
CellTags->"Chisholm",
- CellID->536726068]
+ CellID->1963239115],
+Cell[11663, 426, 3091, 123, 40, "Output",
+ CellTags->"Chisholm"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14343, 566, 147, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->10063016],
-Cell[14493, 573, 211, 7, 36, "Output",
- CellTags->"Chisholm",
- CellID->1250343813]
+Cell[14791, 554, 302, 9, 27, "Input"],
+Cell[15096, 565, 1186, 49, 39, "Output"]
}, Open ]],
+Cell[16297, 617, 184, 7, 32, "Notes"],
Cell[CellGroupData[{
-Cell[14741, 585, 188, 6, 27, "Input",
- CellTags->"Chisholm",
- CellID->1067563039],
-Cell[14932, 593, 843, 32, 46, "Output",
- CellTags->"Chisholm",
- CellID->102426516]
+Cell[16506, 628, 84, 2, 27, "Input"],
+Cell[16593, 632, 6696, 260, 115, "Output"]
}, Open ]],
+Cell[23304, 895, 316, 10, 32, "Notes"],
Cell[CellGroupData[{
-Cell[15812, 630, 129, 4, 27, "Input",
- CellTags->"Chisholm",
- CellID->1495489925],
-Cell[15944, 636, 2721, 108, 51, "Output",
- CellTags->"Chisholm",
- CellID->1312947625]
+Cell[23645, 909, 161, 4, 27, "Input"],
+Cell[23809, 915, 530, 21, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[24376, 941, 310, 9, 27, "Input"],
+Cell[24689, 952, 5018, 188, 68, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29744, 1145, 89, 2, 27, "Input"],
+Cell[29836, 1149, 167, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[30040, 1159, 343, 10, 27, "Input"],
+Cell[30386, 1171, 6509, 242, 68, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[36932, 1418, 90, 2, 27, "Input"],
+Cell[37025, 1422, 187, 6, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[37249, 1433, 112, 3, 27, "Input"],
+Cell[37364, 1438, 930, 36, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[38331, 1479, 85, 2, 27, "Input"],
+Cell[38419, 1483, 2865, 111, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18702, 749, 251, 8, 27, "Input",
+Cell[41321, 1599, 225, 7, 27, "Input",
CellTags->"Chisholm",
CellID->1800486413],
-Cell[18956, 759, 1331, 56, 39, "Output",
- CellTags->"Chisholm",
- CellID->547285677]
+Cell[41549, 1608, 1312, 55, 37, "Output",
+ CellTags->"Chisholm"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20324, 820, 159, 5, 27, "Input",
+Cell[42898, 1668, 129, 4, 27, "Input",
CellTags->"Chisholm",
CellID->1694713808],
-Cell[20486, 827, 20425, 343, 169, "Output",
+Cell[43030, 1674, 12522, 213, 153, "Output",
CellTags->{"Chisholm", "RasterizedOutput"},
- CellID->2142983666]
+ CellID->1904366312]
}, Open ]],
+Cell[55567, 1890, 214, 6, 32, "Notes"],
Cell[CellGroupData[{
-Cell[40948, 1175, 158, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->152524623],
-Cell[41109, 1182, 19884, 334, 170, "Output",
- CellTags->{"Chisholm", "RasterizedOutput"},
- CellID->1893484835]
+Cell[55806, 1900, 389, 11, 27, "Input"],
+Cell[56198, 1913, 188, 6, 35, "Output"]
}, Open ]],
-Cell[61008, 1519, 106, 2, 32, "Text",
- CellTags->"Chisholm",
- CellID->1438490834],
Cell[CellGroupData[{
-Cell[61139, 1525, 150, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->1805014734],
-Cell[61292, 1532, 231, 8, 36, "Output",
- CellTags->"Chisholm",
- CellID->100937461]
+Cell[56423, 1924, 469, 13, 45, "Input"],
+Cell[56895, 1939, 188, 6, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[61560, 1545, 149, 5, 27, "Input",
- CellTags->"Chisholm",
- CellID->375938433],
-Cell[61712, 1552, 232, 8, 36, "Output",
- CellTags->"Chisholm",
- CellID->1603907719]
+Cell[57120, 1950, 427, 12, 27, "Input"],
+Cell[57550, 1964, 188, 6, 35, "Output"]
}, Open ]],
-Cell[61959, 1563, 211, 7, 27, "Input",
- CellTags->"Chisholm",
- CellID->453091936]
+Cell[57753, 1973, 503, 14, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[58281, 1991, 120, 3, 27, "Input"],
+Cell[58404, 1996, 681, 28, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[59122, 2029, 141, 4, 27, "Input"],
+Cell[59266, 2035, 1604, 61, 56, "Output"]
+}, Open ]]
}, Open ]],
-Cell[62185, 1573, 31, 0, 29, "SectionFooterSpacer"]
+Cell[60897, 2100, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[62253, 1578, 270, 12, 31, "SeeAlsoSection",
+Cell[60965, 2105, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[62526, 1592, 414, 15, 32, "Text",
- CellTags->"Chisholm",
- CellID->1402112447]
+Cell[61238, 2119, 181, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[62955, 1610, 23, 0, 42, "FooterCell"]
+Cell[61434, 2126, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChisholmSpinor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChisholmSpinor.nb
deleted file mode 100644
index 98899348a..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ChisholmSpinor.nb
+++ /dev/null
@@ -1,634 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17436, 624]
-NotebookOptionsPosition[ 13682, 512]
-NotebookOutlinePosition[ 16441, 587]
-CellTagsIndexPosition[ 16323, 581]
-WindowTitle->ChisholmSpinor
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ChisholmSpinor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ChisholmSpinor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-ChisholmSpinor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$27307],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ChisholmSpinor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["ChisholmSpinor", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"ChisholmSpinor", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "uses the Chisholm identity on a DiraGamma between spinors. As an \
-optional second argument 1 or 2 may be given, indicating that ChisholmSpinor \
-should only act on the first resp. second part of a product of spinor \
-chains."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1356682026],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->607057828],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Spinor", "[",
- RowBox[{"p1", ",", "m1"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
- RowBox[{"Spinor", "[",
- RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
- CellTags->"ChisholmSpinor",
- CellLabel->"In[1]:=",
- CellID->30249209],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{211, 21},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChisholmSpinor",
- CellLabel->"Out[1]=",
- CellID->2055976112]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "ChisholmSpinor"}]], "Input",
- CellTags->"ChisholmSpinor",
- CellLabel->"In[2]:=",
- CellID->970486194],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["alpha42",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["alpha42",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], "-",
- FractionBox[
- RowBox[{"m1", " ", "m2", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], "+",
- FractionBox[
- RowBox[{"m2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], "+",
- FractionBox[
- RowBox[{"m1", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{511, 182},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ChisholmSpinor",
- CellLabel->"Out[2]=",
- CellID->1051632452]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["EpsChisholm",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/EpsChisholm",
- ButtonNote->"EpsChisholm"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Chisholm",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Chisholm",
- ButtonNote->"Chisholm"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ChisholmSpinor",
- CellID->2143743981]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"ChisholmSpinor",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 56.253381}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "ChisholmSpinor[x] uses the Chisholm identity on a DiraGamma between \
-spinors. As an optional second argument 1 or 2 may be given, indicating that \
-ChisholmSpinor should only act on the first resp. second part of a product of \
-spinor chains.", "synonyms" -> {}, "title" -> "ChisholmSpinor",
- "titlemodifier" -> "", "windowtitle" -> "ChisholmSpinor", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/ChisholmSpinor"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3517, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1356682026]},
- "ChisholmSpinor"->{
- Cell[4150, 126, 329, 10, 27, "Input",
- CellTags->"ChisholmSpinor",
- CellID->30249209],
- Cell[4482, 138, 1195, 48, 42, "Output",
- CellTags->"ChisholmSpinor",
- CellID->2055976112],
- Cell[5714, 191, 135, 4, 27, "Input",
- CellTags->"ChisholmSpinor",
- CellID->970486194],
- Cell[5852, 197, 7018, 272, 203, "Output",
- CellTags->"ChisholmSpinor",
- CellID->1051632452],
- Cell[13238, 492, 402, 15, 32, "Text",
- CellTags->"ChisholmSpinor",
- CellID->2143743981]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 15681, 558},
- {"ChisholmSpinor", 15822, 562}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 574, 15, 112, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3517, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1356682026],
-Cell[CellGroupData[{
-Cell[3930, 116, 195, 6, 25, "ExampleSection",
- CellID->607057828],
-Cell[CellGroupData[{
-Cell[4150, 126, 329, 10, 27, "Input",
- CellTags->"ChisholmSpinor",
- CellID->30249209],
-Cell[4482, 138, 1195, 48, 42, "Output",
- CellTags->"ChisholmSpinor",
- CellID->2055976112]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5714, 191, 135, 4, 27, "Input",
- CellTags->"ChisholmSpinor",
- CellID->970486194],
-Cell[5852, 197, 7018, 272, 203, "Output",
- CellTags->"ChisholmSpinor",
- CellID->1051632452]
-}, Open ]]
-}, Open ]],
-Cell[12897, 473, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[12965, 478, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[13238, 492, 402, 15, 32, "Text",
- CellTags->"ChisholmSpinor",
- CellID->2143743981]
-}, Open ]],
-Cell[13655, 510, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ClearScalarProducts.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ClearScalarProducts.nb
deleted file mode 100644
index 1d1b1a806..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ClearScalarProducts.nb
+++ /dev/null
@@ -1,428 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.2' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12039, 418]
-NotebookOptionsPosition[ 7363, 274]
-NotebookOutlinePosition[ 10498, 362]
-CellTagsIndexPosition[ 10377, 356]
-WindowTitle->ClearScalarProducts
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ClearScalarProducts\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ClearScalarProducts"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-ClearScalarProducts.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$24610],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ClearScalarProducts", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["ClearScalarProducts", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["ClearScalarProducts"], "InlineFormula"],
- " \[LineSeparator]",
- "removes all user-performed specific settings for ScalarProduct's."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->652690576],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->212917473],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"ScalarProduct", "[",
- RowBox[{"p", ",", "p"}], "]"}], "=",
- RowBox[{"m", "^", "2"}]}]], "Input",
- CellTags->"ClearScalarProducts",
- CellLabel->"In[1]:=",
- CellID->1785698530],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox["m", "2"], TraditionalForm]], "Output",
- ImageSize->{26, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ClearScalarProducts",
- CellLabel->"Out[1]=",
- CellID->1805188526]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",",
- RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Input",
- CellTags->"ClearScalarProducts",
- CellLabel->"In[2]:=",
- CellID->1559478391],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox["m", "2"], TraditionalForm]], "Output",
- ImageSize->{26, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ClearScalarProducts",
- CellLabel->"Out[2]=",
- CellID->1792259305]
-}, Open ]],
-
-Cell[BoxData["ClearScalarProducts"], "Input",
- CellTags->"ClearScalarProducts",
- CellLabel->"In[3]:=",
- CellID->368473440],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",",
- RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Input",
- CellTags->"ClearScalarProducts",
- CellLabel->"In[4]:=",
- CellID->1776453168],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ClearScalarProducts",
- CellLabel->"Out[4]=",
- CellID->949899192]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ScalarProduct", "[",
- RowBox[{"p", ",", "p"}], "]"}]], "Input",
- CellTags->"ClearScalarProducts",
- CellLabel->"In[5]:=",
- CellID->1861458856],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ClearScalarProducts",
- CellLabel->"Out[5]=",
- CellID->940105441]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["ScalarProduct",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
- ButtonNote->"ScalarProduct"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Pair",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Pair",
- ButtonNote->"Pair"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["SP",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SP",
- ButtonNote->"SP"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["SPD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SPD",
- ButtonNote->"SPD"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ClearScalarProducts",
- CellID->958310312]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"ClearScalarProducts",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2015, 11, 6, 22, 56, 48.591899}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "ClearScalarProducts removes all user-performed specific settings for \
-ScalarProduct's.", "synonyms" -> {}, "title" -> "ClearScalarProducts",
- "titlemodifier" -> "", "windowtitle" -> "ClearScalarProducts", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/ClearScalarProducts"},
- "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.2 for Linux x86 (64-bit) (July 6, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.2 for Linux x86 (64-bit) (July 6, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3360, 93, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->652690576]},
- "ClearScalarProducts"->{
- Cell[3992, 122, 214, 7, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1785698530],
- Cell[4209, 131, 245, 8, 39, "Output",
- CellTags->"ClearScalarProducts",
- CellID->1805188526],
- Cell[4491, 144, 230, 7, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1559478391],
- Cell[4724, 153, 245, 8, 39, "Output",
- CellTags->"ClearScalarProducts",
- CellID->1792259305],
- Cell[4984, 164, 122, 3, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->368473440],
- Cell[5131, 171, 230, 7, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1776453168],
- Cell[5364, 180, 341, 13, 41, "Output",
- CellTags->"ClearScalarProducts",
- CellID->949899192],
- Cell[5742, 198, 167, 5, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1861458856],
- Cell[5912, 205, 341, 13, 41, "Output",
- CellTags->"ClearScalarProducts",
- CellID->940105441],
- Cell[6621, 241, 700, 28, 31, "Text",
- CellTags->"ClearScalarProducts",
- CellID->958310312]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 9216, 318},
- {"ClearScalarProducts", 9361, 322}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[591, 21, 2289, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2883, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2948, 78, 387, 11, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3360, 93, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->652690576],
-Cell[CellGroupData[{
-Cell[3772, 112, 195, 6, 25, "ExampleSection",
- CellID->212917473],
-Cell[CellGroupData[{
-Cell[3992, 122, 214, 7, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1785698530],
-Cell[4209, 131, 245, 8, 39, "Output",
- CellTags->"ClearScalarProducts",
- CellID->1805188526]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4491, 144, 230, 7, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1559478391],
-Cell[4724, 153, 245, 8, 39, "Output",
- CellTags->"ClearScalarProducts",
- CellID->1792259305]
-}, Open ]],
-Cell[4984, 164, 122, 3, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->368473440],
-Cell[CellGroupData[{
-Cell[5131, 171, 230, 7, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1776453168],
-Cell[5364, 180, 341, 13, 41, "Output",
- CellTags->"ClearScalarProducts",
- CellID->949899192]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5742, 198, 167, 5, 27, "Input",
- CellTags->"ClearScalarProducts",
- CellID->1861458856],
-Cell[5912, 205, 341, 13, 41, "Output",
- CellTags->"ClearScalarProducts",
- CellID->940105441]
-}, Open ]]
-}, Open ]],
-Cell[6280, 222, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6348, 227, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[6621, 241, 700, 28, 31, "Text",
- CellTags->"ClearScalarProducts",
- CellID->958310312]
-}, Open ]],
-Cell[7336, 272, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect2.nb
index 915a3dd55..063feabec 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 27185, 976]
-NotebookOptionsPosition[ 19668, 729]
-NotebookOutlinePosition[ 24012, 852]
-CellTagsIndexPosition[ 23900, 846]
+NotebookDataLength[ 28886, 1018]
+NotebookOptionsPosition[ 21653, 788]
+NotebookOutlinePosition[ 25759, 901]
+CellTagsIndexPosition[ 25647, 895]
WindowTitle->Collect2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Collect2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Collect2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Collect2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Collect2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Collect2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Collect2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$27642],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Collect2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$41494],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Collect2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Collect2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Collect2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -100,39 +134,40 @@ be set to False."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->114835834],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->128945674],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->56142623],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Collect2", "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[1]:=",
+ CellLabel->"In[375]:=",
CellID->538422816],
Cell[BoxData[
@@ -141,23 +176,60 @@ Cell[BoxData[
RowBox[{
RowBox[{"Denominator", "\[Rule]", "False"}], ",",
RowBox[{"Dot", "\[Rule]", "False"}], ",",
+ RowBox[{"FCFactorOut", "\[Rule]", "1"}], ",",
RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}], ",",
RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FactoringDenominator", "\[Rule]", "False"}], ",",
+ RowBox[{"InitialFunction", "\[Rule]", "Identity"}], ",",
+ RowBox[{"IntermediateSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "False"}], ",",
- RowBox[{"Head", "\[Rule]", "Identity"}]}], "}"}],
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
+ RowBox[{"Numerator", "\[Rule]", "False"}], ",",
+ RowBox[{"TimeConstrained", "\[Rule]", "\[Infinity]"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{542, 35},
+ ImageSize->{505, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[1]=",
- CellID->1317311527]
+ CellLabel->"Out[375]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->831624772],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->762042712],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"Collect2", "[",
RowBox[{
@@ -172,7 +244,7 @@ Cell[BoxData[
FractionBox["x", "2"], "-",
FractionBox["y", "w"]}]}], ",", "a"}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1914400776],
Cell[BoxData[
@@ -190,12 +262,11 @@ Cell[BoxData[
RowBox[{"w", " ", "x"}], "-",
RowBox[{"2", " ", "y"}]}],
RowBox[{"2", " ", "w"}]]}], TraditionalForm]], "Output",
- ImageSize->{241, 41},
+ ImageSize->{263, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[2]=",
- CellID->27818195]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -205,7 +276,7 @@ Cell[BoxData[
RowBox[{"t1", ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->269033150],
Cell[BoxData[
@@ -221,12 +292,11 @@ Cell[BoxData[
RowBox[{"r", "+", "1"}], ")"}]}], "-",
FractionBox["y", "w"], "+",
FractionBox["x", "2"]}], TraditionalForm]], "Output",
- ImageSize->{221, 39},
+ ImageSize->{238, 31},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[3]=",
- CellID->151726169]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -236,7 +306,7 @@ Cell[BoxData[
RowBox[{"t1", ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "Factor"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->772013483],
Cell[BoxData[
@@ -254,12 +324,11 @@ Cell[BoxData[
RowBox[{"w", " ", "x"}], "-",
RowBox[{"2", " ", "y"}]}],
RowBox[{"2", " ", "w"}]]}], TraditionalForm]], "Output",
- ImageSize->{241, 41},
+ ImageSize->{263, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[4]=",
- CellID->836248448]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -268,7 +337,7 @@ Cell[BoxData[
RowBox[{"Collect2", "[",
RowBox[{"t1", ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "Simplify"}]}], "]"}]], "Input",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->321654602],
Cell[BoxData[
@@ -283,11 +352,10 @@ Cell[BoxData[
RowBox[{"r", "+", "1"}], ")"}]}], "-",
FractionBox["y", "w"], "+",
FractionBox["x", "2"]}], TraditionalForm]], "Output",
- ImageSize->{222, 39},
+ ImageSize->{240, 31},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->1221933307]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -310,7 +378,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->708606765],
Cell[BoxData[
@@ -330,12 +398,11 @@ Cell[BoxData[
SuperscriptBox["b", "2"], " ",
RowBox[{"(",
RowBox[{"c", "+", "1"}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{317, 18},
+ ImageSize->{344, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[6]=",
- CellID->2073132438]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -348,9 +415,9 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"a", "-", "b", "-", "c", "-", "d"}], ")"}], "5"], "]"}], ",",
"a", ",",
- RowBox[{"IsolateNames", "\[Rule]", "l"}]}], "]"}]], "Input",
+ RowBox[{"IsolateNames", "\[Rule]", "KK"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->741587872],
Cell[BoxData[
@@ -360,39 +427,38 @@ Cell[BoxData[
RowBox[{"5", " ",
SuperscriptBox["a", "4"], " ",
TagBox[
- RowBox[{"l", "(", "1398", ")"}],
+ RowBox[{"KK", "(", "114", ")"}],
HoldForm]}], "+",
RowBox[{"10", " ",
SuperscriptBox["a", "3"], " ",
TagBox[
- RowBox[{"l", "(", "1400", ")"}],
+ RowBox[{"KK", "(", "115", ")"}],
HoldForm]}], "-",
RowBox[{"10", " ",
SuperscriptBox["a", "2"], " ",
TagBox[
- RowBox[{"l", "(", "1402", ")"}],
+ RowBox[{"KK", "(", "117", ")"}],
HoldForm]}], "+",
RowBox[{"5", " ", "a", " ",
TagBox[
- RowBox[{"l", "(", "1401", ")"}],
+ RowBox[{"KK", "(", "116", ")"}],
HoldForm]}], "-",
TagBox[
- RowBox[{"l", "(", "1399", ")"}],
+ RowBox[{"KK", "(", "118", ")"}],
HoldForm]}], TraditionalForm]], "Output",
- ImageSize->{460, 18},
+ ImageSize->{513, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[7]=",
- CellID->195196847]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ReleaseHold", "[", "%", "]"}]], "Input",
+ RowBox[{"FRH", "[", "%", "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->683646211],
Cell[BoxData[
@@ -406,30 +472,26 @@ Cell[BoxData[
RowBox[{"10", " ",
SuperscriptBox["a", "3"], " ",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "2"]}], "-",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "2"]}], "-",
RowBox[{"10", " ",
SuperscriptBox["a", "2"], " ",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "3"]}], "+",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "3"]}], "+",
RowBox[{"5", " ", "a", " ",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "4"]}], "-",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "4"]}], "-",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "5"]}], TraditionalForm]], "Output",
- ImageSize->{515, 18},
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "5"]}],
+ TraditionalForm]], "Output",
+ ImageSize->{368, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[8]=",
- CellID->1584671269]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -443,7 +505,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "-", "c", "-", "d"}], ")"}], "5"], "]"}], ",",
"a", ",",
RowBox[{"Head", "\[Rule]", "h"}]}], "]"}]], "Input",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->1338628687],
Cell[BoxData[
@@ -477,18 +539,17 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"b", "+", "c", "+", "d"}], ")"}], "5"]}],
TraditionalForm]], "Output",
- ImageSize->{386, 45},
+ ImageSize->{416, 47},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[9]=",
- CellID->638446957]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[BoxData[
RowBox[{"Clear", "[",
RowBox[{"t1", ",", "l"}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[10]:=",
+ CellLabel->"In[9]:=",
CellID->1111657644],
Cell[CellGroupData[{
@@ -502,7 +563,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "-", "c"}], ")"}], "3"], "]"}], ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "fun"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[11]:=",
+ CellLabel->"In[10]:=",
CellID->1492093352],
Cell[BoxData[
@@ -535,12 +596,11 @@ Cell[BoxData[
RowBox[{"3", " ", "b", " ",
SuperscriptBox["c", "2"]}], "-",
SuperscriptBox["c", "3"]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{397, 43},
+ ImageSize->{422, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[11]=",
- CellID->444068994]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -549,7 +609,7 @@ Cell[BoxData[
RowBox[{"%", " ", "/.", " ",
RowBox[{"fun", "\[Rule]", "FactorTerms"}]}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[12]:=",
+ CellLabel->"In[11]:=",
CellID->1964581263],
Cell[BoxData[
@@ -572,12 +632,11 @@ Cell[BoxData[
RowBox[{"3", " ", "b", " ",
SuperscriptBox["c", "2"]}], "-",
SuperscriptBox["c", "3"]}], TraditionalForm]], "Output",
- ImageSize->{427, 21},
+ ImageSize->{469, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect2",
- CellLabel->"Out[12]=",
- CellID->1797163188]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[TextData[{
@@ -613,7 +672,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "200000"}], "}"}]}], "]"}], "*",
"c"}]}]}], ";"}]], "Input",
- CellLabel->"In[13]:=",
+ CellLabel->"In[12]:=",
CellID->18062506],
Cell[CellGroupData[{
@@ -627,31 +686,30 @@ Cell[BoxData[
RowBox[{"Factoring", "\[Rule]", "False"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
RowBox[{"Expanding", "\[Rule]", "False"}]}], "]"}], "]"}]], "Input",
- CellLabel->"In[14]:=",
+ CellLabel->"In[13]:=",
CellID->908574489],
Cell[BoxData[
FormBox[
RowBox[{"{",
- RowBox[{"2.427166`", ",",
+ RowBox[{"2.648394`", ",",
RowBox[{
RowBox[{"a", " ",
TagBox[
- RowBox[{"KK", "(", "1416", ")"}],
+ RowBox[{"KK", "(", "123", ")"}],
HoldForm]}], "+",
RowBox[{"b", " ",
TagBox[
- RowBox[{"KK", "(", "1417", ")"}],
+ RowBox[{"KK", "(", "124", ")"}],
HoldForm]}], "+",
RowBox[{"c", " ",
TagBox[
- RowBox[{"KK", "(", "1415", ")"}],
+ RowBox[{"KK", "(", "122", ")"}],
HoldForm]}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{319, 15},
+ ImageSize->{312, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[14]=",
- CellID->428829446]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -666,32 +724,35 @@ Cell[BoxData[
RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
RowBox[{"IsolateFast", "\[Rule]", "True"}], ",",
RowBox[{"Expanding", "\[Rule]", "False"}]}], "]"}], "]"}]], "Input",
- CellLabel->"In[15]:=",
+ CellLabel->"In[14]:=",
CellID->1760353952],
Cell[BoxData[
FormBox[
RowBox[{"{",
- RowBox[{"1.824256`", ",",
+ RowBox[{"1.940384`", ",",
RowBox[{
RowBox[{"a", " ",
TagBox[
- RowBox[{"KK", "(", "1416", ")"}],
+ RowBox[{"KK", "(", "123", ")"}],
HoldForm]}], "+",
RowBox[{"b", " ",
TagBox[
- RowBox[{"KK", "(", "1417", ")"}],
+ RowBox[{"KK", "(", "124", ")"}],
HoldForm]}], "+",
RowBox[{"c", " ",
TagBox[
- RowBox[{"KK", "(", "1415", ")"}],
+ RowBox[{"KK", "(", "122", ")"}],
HoldForm]}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{317, 15},
+ ImageSize->{310, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[15]=",
- CellID->1586544186]
-}, Open ]]
+ CellLabel->"Out[14]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "exp", "]"}]], "Input",
+ CellLabel->"In[15]:="]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -720,9 +781,7 @@ Cell[TextData[{
ButtonNote->"Isolate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Collect2",
- CellID->389701827]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -739,10 +798,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 57.759314}",
+ "built" -> "{2020, 1, 5, 18, 53, 26.725008}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -755,11 +814,12 @@ x2, .... The coefficients are put over a common denominator. If expr is \
expanded before collecting depends on the option Factoring, which may be set \
to Factor, Factor2, or any other function, which is applied to the \
coefficients. If expr is already expanded with respect to x (x1,x2, ...), the \
-option Expanding can be set to False.", "synonyms" -> {}, "title" ->
- "Collect2", "titlemodifier" -> "", "windowtitle" -> "Collect2", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Collect2"}, "SearchTextTranslated" -> ""},
+option Expanding can be set to False.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Collect2", "titlemodifier" -> "", "windowtitle" -> "Collect2",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Collect2"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -767,8 +827,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -776,208 +837,189 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3833, 102, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->114835834]},
"Collect2"->{
- Cell[4464, 131, 133, 4, 27, "Input",
+ Cell[5641, 166, 135, 4, 70, "Input",
CellTags->"Collect2",
CellID->538422816],
- Cell[4600, 137, 664, 18, 56, "Output",
- CellTags->"Collect2",
- CellID->1317311527],
- Cell[5301, 160, 459, 15, 49, "Input",
+ Cell[5779, 172, 1026, 24, 93, "Output",
+ CellTags->"Collect2"],
+ Cell[7498, 232, 459, 15, 50, "Input",
CellTags->"Collect2",
CellID->1914400776],
- Cell[5763, 177, 556, 20, 62, "Output",
- CellTags->"Collect2",
- CellID->27818195],
- Cell[6356, 202, 203, 6, 27, "Input",
+ Cell[7960, 249, 537, 19, 55, "Output",
+ CellTags->"Collect2"],
+ Cell[8534, 273, 203, 6, 27, "Input",
CellTags->"Collect2",
CellID->269033150],
- Cell[6562, 210, 505, 18, 60, "Output",
- CellTags->"Collect2",
- CellID->151726169],
- Cell[7104, 233, 204, 6, 27, "Input",
+ Cell[8740, 281, 485, 17, 52, "Output",
+ CellTags->"Collect2"],
+ Cell[9262, 303, 204, 6, 27, "Input",
CellTags->"Collect2",
CellID->772013483],
- Cell[7311, 241, 557, 20, 62, "Output",
- CellTags->"Collect2",
- CellID->836248448],
- Cell[8593, 294, 543, 19, 31, "Input",
+ Cell[9469, 311, 537, 19, 55, "Output",
+ CellTags->"Collect2"],
+ Cell[10710, 362, 543, 19, 33, "Input",
CellTags->"Collect2",
CellID->708606765],
- Cell[9139, 315, 644, 22, 39, "Output",
- CellTags->"Collect2",
- CellID->2073132438],
- Cell[9820, 342, 338, 11, 31, "Input",
+ Cell[11256, 383, 623, 21, 39, "Output",
+ CellTags->"Collect2"],
+ Cell[11916, 409, 339, 11, 33, "Input",
CellTags->"Collect2",
CellID->741587872],
- Cell[10161, 355, 821, 31, 39, "Output",
- CellTags->"Collect2",
- CellID->195196847],
- Cell[11019, 391, 130, 4, 27, "Input",
+ Cell[12258, 422, 801, 30, 40, "Output",
+ CellTags->"Collect2"],
+ Cell[13096, 457, 122, 4, 27, "Input",
CellTags->"Collect2",
CellID->683646211],
- Cell[11152, 397, 936, 34, 39, "Output",
- CellTags->"Collect2",
- CellID->1584671269],
- Cell[13512, 486, 150, 5, 27, "Input",
+ Cell[13221, 463, 911, 30, 62, "Output",
+ CellTags->"Collect2"],
+ Cell[15536, 547, 149, 5, 27, "Input",
CellTags->"Collect2",
CellID->1111657644],
- Cell[13687, 495, 325, 10, 31, "Input",
+ Cell[15710, 556, 325, 10, 33, "Input",
CellTags->"Collect2",
CellID->1492093352],
- Cell[14015, 507, 1042, 35, 64, "Output",
- CellTags->"Collect2",
- CellID->444068994],
- Cell[15094, 547, 169, 5, 27, "Input",
+ Cell[16038, 568, 1022, 34, 63, "Output",
+ CellTags->"Collect2"],
+ Cell[17097, 607, 169, 5, 27, "Input",
CellTags->"Collect2",
CellID->1964581263],
- Cell[15266, 554, 779, 25, 42, "Output",
- CellTags->"Collect2",
- CellID->1797163188],
- Cell[19402, 715, 224, 9, 31, "Text",
- CellTags->"Collect2",
- CellID->389701827]}
+ Cell[17269, 614, 758, 24, 42, "Output",
+ CellTags->"Collect2"]},
+ "PrimaryExamplesSection"->{
+ Cell[6866, 203, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->831624772]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 21963, 778},
- {"Collect2", 22098, 782}
+ {"Collect2", 23980, 839},
+ {"PrimaryExamplesSection", 25504, 888}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 2999, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 927, 20, 162, "Usage",
- CellID->982511436],
+Cell[3582, 97, 285, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3833, 102, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->114835834],
+Cell[3892, 112, 927, 20, 170, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4245, 121, 194, 6, 25, "ExampleSection",
- CellID->56142623],
+Cell[4844, 136, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->128945674],
+Cell[5585, 162, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4464, 131, 133, 4, 27, "Input",
+Cell[5641, 166, 135, 4, 70, "Input",
CellTags->"Collect2",
CellID->538422816],
-Cell[4600, 137, 664, 18, 56, "Output",
- CellTags->"Collect2",
- CellID->1317311527]
+Cell[5779, 172, 1026, 24, 93, "Output",
+ CellTags->"Collect2"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5301, 160, 459, 15, 49, "Input",
+Cell[6866, 203, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->831624772],
+Cell[CellGroupData[{
+Cell[7278, 222, 195, 6, 26, "ExampleSection",
+ CellID->762042712],
+Cell[CellGroupData[{
+Cell[7498, 232, 459, 15, 50, "Input",
CellTags->"Collect2",
CellID->1914400776],
-Cell[5763, 177, 556, 20, 62, "Output",
- CellTags->"Collect2",
- CellID->27818195]
+Cell[7960, 249, 537, 19, 55, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6356, 202, 203, 6, 27, "Input",
+Cell[8534, 273, 203, 6, 27, "Input",
CellTags->"Collect2",
CellID->269033150],
-Cell[6562, 210, 505, 18, 60, "Output",
- CellTags->"Collect2",
- CellID->151726169]
+Cell[8740, 281, 485, 17, 52, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7104, 233, 204, 6, 27, "Input",
+Cell[9262, 303, 204, 6, 27, "Input",
CellTags->"Collect2",
CellID->772013483],
-Cell[7311, 241, 557, 20, 62, "Output",
- CellTags->"Collect2",
- CellID->836248448]
+Cell[9469, 311, 537, 19, 55, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7905, 266, 183, 5, 27, "Input",
+Cell[10043, 335, 183, 5, 27, "Input",
CellID->321654602],
-Cell[8091, 273, 465, 16, 60, "Output",
- CellID->1221933307]
+Cell[10229, 342, 444, 15, 52, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8593, 294, 543, 19, 31, "Input",
+Cell[10710, 362, 543, 19, 33, "Input",
CellTags->"Collect2",
CellID->708606765],
-Cell[9139, 315, 644, 22, 39, "Output",
- CellTags->"Collect2",
- CellID->2073132438]
+Cell[11256, 383, 623, 21, 39, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9820, 342, 338, 11, 31, "Input",
+Cell[11916, 409, 339, 11, 33, "Input",
CellTags->"Collect2",
CellID->741587872],
-Cell[10161, 355, 821, 31, 39, "Output",
- CellTags->"Collect2",
- CellID->195196847]
+Cell[12258, 422, 801, 30, 40, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11019, 391, 130, 4, 27, "Input",
+Cell[13096, 457, 122, 4, 27, "Input",
CellTags->"Collect2",
CellID->683646211],
-Cell[11152, 397, 936, 34, 39, "Output",
- CellTags->"Collect2",
- CellID->1584671269]
+Cell[13221, 463, 911, 30, 62, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12125, 436, 308, 10, 31, "Input",
+Cell[14169, 498, 308, 10, 33, "Input",
CellID->1338628687],
-Cell[12436, 448, 1061, 35, 66, "Output",
- CellID->638446957]
+Cell[14480, 510, 1041, 34, 68, "Output"]
}, Open ]],
-Cell[13512, 486, 150, 5, 27, "Input",
+Cell[15536, 547, 149, 5, 27, "Input",
CellTags->"Collect2",
CellID->1111657644],
Cell[CellGroupData[{
-Cell[13687, 495, 325, 10, 31, "Input",
+Cell[15710, 556, 325, 10, 33, "Input",
CellTags->"Collect2",
CellID->1492093352],
-Cell[14015, 507, 1042, 35, 64, "Output",
- CellTags->"Collect2",
- CellID->444068994]
+Cell[16038, 568, 1022, 34, 63, "Output",
+ CellTags->"Collect2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15094, 547, 169, 5, 27, "Input",
+Cell[17097, 607, 169, 5, 27, "Input",
CellTags->"Collect2",
CellID->1964581263],
-Cell[15266, 554, 779, 25, 42, "Output",
- CellTags->"Collect2",
- CellID->1797163188]
+Cell[17269, 614, 758, 24, 42, "Output",
+ CellTags->"Collect2"]
}, Open ]],
-Cell[16060, 582, 205, 6, 45, "Notes",
+Cell[18042, 641, 205, 6, 49, "Notes",
CellID->1064433782],
-Cell[16268, 590, 732, 26, 45, "Input",
+Cell[18250, 649, 732, 26, 45, "Input",
CellID->18062506],
Cell[CellGroupData[{
-Cell[17025, 620, 392, 10, 45, "Input",
+Cell[19007, 679, 392, 10, 45, "Input",
CellID->908574489],
-Cell[17420, 632, 563, 21, 36, "Output",
- CellID->428829446]
+Cell[19402, 691, 540, 20, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18020, 658, 447, 11, 45, "Input",
+Cell[19979, 716, 447, 11, 45, "Input",
CellID->1760353952],
-Cell[18470, 671, 564, 21, 36, "Output",
- CellID->1586544186]
-}, Open ]]
+Cell[20429, 729, 540, 20, 37, "Output"]
}, Open ]],
-Cell[19061, 696, 31, 0, 29, "SectionFooterSpacer"]
+Cell[20984, 752, 87, 2, 27, "Input"]
+}, Open ]],
+Cell[21086, 757, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19129, 701, 270, 12, 31, "SeeAlsoSection",
+Cell[21154, 762, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[19402, 715, 224, 9, 31, "Text",
- CellTags->"Collect2",
- CellID->389701827]
+Cell[21427, 776, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[19641, 727, 23, 0, 42, "FooterCell"]
+Cell[21626, 786, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect3.nb
index 956a72bae..901b6fc31 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collect3.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16611, 536]
-NotebookOptionsPosition[ 12516, 410]
-NotebookOutlinePosition[ 15445, 491]
-CellTagsIndexPosition[ 15333, 485]
+NotebookDataLength[ 18370, 594]
+NotebookOptionsPosition[ 14335, 472]
+NotebookOutlinePosition[ 17093, 547]
+CellTagsIndexPosition[ 16981, 541]
WindowTitle->Collect3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Collect3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Collect3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Collect3.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Collect2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Collect2"], "\<\"Isolate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Isolate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Collect3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Collect3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Collect3.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$27990],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Collect3", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$41943],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Collect3", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Collect3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Collect3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -115,6 +150,60 @@ function to the list of monomials mulitplied by their coefficients."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1905357201],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Collect3", "]"}]], "Input",
+ CellTags->"Collect3",
+ CellLabel->"In[391]:=",
+ CellID->1015372413],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]", "Plus"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{203, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Collect3",
+ CellLabel->"Out[391]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -130,7 +219,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1488675233],
+ CellID->455399486],
Cell[CellGroupData[{
@@ -140,30 +229,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1709724021],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Collect3", "]"}]], "Input",
- CellTags->"Collect3",
- CellLabel->"In[1]:=",
- CellID->1015372413],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"Head", "\[Rule]", "Plus"}]}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{225, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Collect3",
- CellLabel->"Out[1]=",
- CellID->581070159]
-}, Open ]],
+ CellID->874052351],
Cell[CellGroupData[{
@@ -185,7 +251,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
CellTags->"Collect3",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->956954453],
Cell[BoxData[
@@ -203,12 +269,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["b", "2"], " ", "c"}], "+",
SuperscriptBox["b", "2"]}], TraditionalForm]], "Output",
- ImageSize->{337, 18},
+ ImageSize->{374, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect3",
- CellLabel->"Out[2]=",
- CellID->1763015133]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -222,7 +287,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "-", "c", "-", "d"}], ")"}], "5"], "]"}], ",",
RowBox[{"{", "a", "}"}]}], "]"}]], "Input",
CellTags->"Collect3",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->860117715],
Cell[BoxData[
@@ -360,12 +425,11 @@ Cell[BoxData[
RowBox[{"5", " ", "c", " ",
SuperscriptBox["d", "4"]}], "-",
SuperscriptBox["d", "5"]}], TraditionalForm]], "Output",
- ImageSize->{529, 173},
+ ImageSize->{651, 134},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Collect3",
- CellLabel->"Out[3]=",
- CellID->1558649070]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -401,17 +465,15 @@ Cell[TextData[{
ButtonNote->"Isolate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Collect3",
- CellID->877664095]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Collect3",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -420,10 +482,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 16, 59.424140}",
+ "built" -> "{2020, 1, 5, 18, 53, 28.025504}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -433,11 +495,11 @@ TaggingRules->{
monomials x n1y n2 ... An option Factor -> True/False can be given, which \
factors the coefficients. The option Head (default Plus) determines the \
applied function to the list of monomials mulitplied by their coefficients.",
- "synonyms" -> {}, "title" -> "Collect3", "titlemodifier" -> "",
- "windowtitle" -> "Collect3", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Collect3"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Collect3",
+ "titlemodifier" -> "", "windowtitle" -> "Collect3", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Collect3"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -446,7 +508,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -454,90 +516,86 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4076, 117, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1488675233]},
"Collect3"->{
- Cell[4710, 146, 134, 4, 27, "Input",
+ Cell[5971, 182, 136, 4, 70, "Input",
CellTags->"Collect3",
CellID->1015372413],
- Cell[4847, 152, 339, 12, 36, "Output",
- CellTags->"Collect3",
- CellID->581070159],
- Cell[5223, 169, 543, 19, 31, "Input",
+ Cell[6110, 188, 321, 11, 37, "Output",
+ CellTags->"Collect3"],
+ Cell[7124, 235, 543, 19, 33, "Input",
CellTags->"Collect3",
CellID->956954453],
- Cell[5769, 190, 628, 20, 39, "Output",
- CellTags->"Collect3",
- CellID->1763015133],
- Cell[6434, 215, 307, 10, 31, "Input",
+ Cell[7670, 256, 607, 19, 37, "Output",
+ CellTags->"Collect3"],
+ Cell[8314, 280, 307, 10, 33, "Input",
CellTags->"Collect3",
CellID->860117715],
- Cell[6744, 227, 4979, 140, 194, "Output",
- CellTags->"Collect3",
- CellID->1558649070],
- Cell[12091, 390, 383, 15, 70, "Text",
- CellTags->"Collect3",
- CellID->877664095]}
+ Cell[8624, 292, 4958, 139, 155, "Output",
+ CellTags->"Collect3"]},
+ "PrimaryExamplesSection"->{
+ Cell[6492, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->455399486]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14549, 456},
- {"Collect3", 14685, 460}
+ {"Collect3", 16340, 518},
+ {"PrimaryExamplesSection", 16838, 534}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3085, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 1170, 35, 114, "Usage",
- CellID->982511436],
+Cell[3668, 98, 285, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4076, 117, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1488675233],
+Cell[3978, 113, 1170, 35, 120, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4489, 136, 196, 6, 25, "ExampleSection",
- CellID->1709724021],
+Cell[5173, 152, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1905357201],
+Cell[5915, 178, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4710, 146, 134, 4, 27, "Input",
+Cell[5971, 182, 136, 4, 70, "Input",
CellTags->"Collect3",
CellID->1015372413],
-Cell[4847, 152, 339, 12, 36, "Output",
- CellTags->"Collect3",
- CellID->581070159]
+Cell[6110, 188, 321, 11, 37, "Output",
+ CellTags->"Collect3"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5223, 169, 543, 19, 31, "Input",
+Cell[6492, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->455399486],
+Cell[CellGroupData[{
+Cell[6904, 225, 195, 6, 26, "ExampleSection",
+ CellID->874052351],
+Cell[CellGroupData[{
+Cell[7124, 235, 543, 19, 33, "Input",
CellTags->"Collect3",
CellID->956954453],
-Cell[5769, 190, 628, 20, 39, "Output",
- CellTags->"Collect3",
- CellID->1763015133]
+Cell[7670, 256, 607, 19, 37, "Output",
+ CellTags->"Collect3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6434, 215, 307, 10, 31, "Input",
+Cell[8314, 280, 307, 10, 33, "Input",
CellTags->"Collect3",
CellID->860117715],
-Cell[6744, 227, 4979, 140, 194, "Output",
- CellTags->"Collect3",
- CellID->1558649070]
+Cell[8624, 292, 4958, 139, 155, "Output",
+ CellTags->"Collect3"]
}, Open ]]
}, Open ]],
-Cell[11750, 371, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13609, 435, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11818, 376, 270, 12, 31, "SeeAlsoSection",
+Cell[13677, 440, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12091, 390, 383, 15, 70, "Text",
- CellTags->"Collect3",
- CellID->877664095]
+Cell[13950, 454, 343, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[12489, 408, 23, 0, 70, "FooterCell"]
+Cell[14308, 470, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collecting.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collecting.nb
index 67a89ec0b..3943a9f05 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collecting.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Collecting.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6552, 202]
-NotebookOptionsPosition[ 4255, 135]
-NotebookOutlinePosition[ 6289, 191]
-CellTagsIndexPosition[ 6217, 186]
+NotebookDataLength[ 7488, 225]
+NotebookOptionsPosition[ 5395, 168]
+NotebookOutlinePosition[ 7279, 217]
+CellTagsIndexPosition[ 7236, 214]
WindowTitle->Collecting
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Collecting\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Collecting"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Collecting.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$28328],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Collecting", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ScalarProductCancel\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProductCancel"], "\<\"Series2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Series2"], "\<\"TID\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/TID"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Collecting\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Collecting"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Collecting.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$42381],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Collecting", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Collecting", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Collecting", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -126,9 +161,7 @@ Cell[TextData[{
ButtonNote->"TID"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Collecting",
- CellID->782318945]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -145,10 +178,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 1.040744}",
+ "built" -> "{2020, 1, 5, 18, 53, 29.305607}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -156,11 +189,11 @@ TaggingRules->{
"None", "summary" ->
"Collecting is an option of ScalarProductCancel, Series2, TID and related \
functions. Setting it to True will trigger some kind of collecting of the \
-result.", "synonyms" -> {}, "title" -> "Collecting", "titlemodifier" -> "",
- "windowtitle" -> "Collecting", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Collecting"}},
+result.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Collecting",
+ "titlemodifier" -> "", "windowtitle" -> "Collecting", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Collecting"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -169,41 +202,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Collecting"->{
- Cell[3651, 109, 562, 21, 70, "Text",
- CellTags->"Collecting",
- CellID->782318945]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Collecting", 6104, 179}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3200, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 460, 13, 70, "Usage",
+Cell[3785, 100, 287, 11, 70, "ObjectNameGrid"],
+Cell[4075, 113, 460, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3378, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4560, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3651, 109, 562, 21, 70, "Text",
- CellTags->"Collecting",
- CellID->782318945]
+Cell[4833, 144, 520, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4228, 133, 23, 0, 70, "FooterCell"]
+Cell[5368, 166, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Combine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Combine.nb
index 171a4688f..c6cccd1cb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Combine.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Combine.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12575, 443]
-NotebookOptionsPosition[ 7849, 291]
-NotebookOutlinePosition[ 11071, 384]
-CellTagsIndexPosition[ 10962, 378]
+NotebookDataLength[ 13853, 483]
+NotebookOptionsPosition[ 9479, 347]
+NotebookOutlinePosition[ 12341, 427]
+CellTagsIndexPosition[ 12230, 421]
WindowTitle->Combine
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Combine\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Combine"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Combine.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Factor2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Factor2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Combine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Combine"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Combine.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$29022],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Combine", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$43271],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Combine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Combine", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Combine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -95,6 +129,58 @@ with sums in the denominator."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->53518265],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Combine", "]"}]], "Input",
+ CellTags->"Combine",
+ CellLabel->"In[394]:=",
+ CellID->194899276],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Expanding", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{127, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Combine",
+ CellLabel->"Out[394]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -110,7 +196,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1555962841],
+ CellID->1626179003],
Cell[CellGroupData[{
@@ -120,28 +206,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1898342962],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Combine", "]"}]], "Input",
- CellTags->"Combine",
- CellLabel->"In[1]:=",
- CellID->194899276],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Expanding", "\[Rule]", "False"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{138, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Combine",
- CellLabel->"Out[1]=",
- CellID->1836728683]
-}, Open ]],
+ CellID->1194284115],
Cell[CellGroupData[{
@@ -155,7 +220,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "-", "d"}], ")"}]}], "e"], "+", "g"}], "]"}]], "Input",
CellTags->"Combine",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->809742744],
Cell[BoxData[
@@ -168,19 +233,16 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "-", "d"}], ")"}]}], "+",
RowBox[{"e", " ", "g"}]}], "e"], TraditionalForm]], "Output",
- ImageSize->{139, 43},
+ ImageSize->{152, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Combine",
- CellLabel->"Out[2]=",
- CellID->1151883280]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
Here the result from Together where the numerator is automatically expanded.\
-\>", "Text",
- CellTags->"Combine",
- CellID->18145815],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -194,7 +256,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "-", "d"}], ")"}]}], "e"], "+", "g"}], "]"}]], "Input",
CellTags->"Combine",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->990215666],
Cell[BoxData[
@@ -206,20 +268,17 @@ Cell[BoxData[
RowBox[{"b", " ", "c"}], "+",
RowBox[{"b", " ", "d"}], "+",
RowBox[{"e", " ", "g"}]}], "e"], TraditionalForm]], "Output",
- ImageSize->{175, 43},
+ ImageSize->{197, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Combine",
- CellLabel->"Out[3]=",
- CellID->1980431254]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell["\<\
If the option Expanding is set to True, the result of Combine is the same as \
Together, but uses a slightly different algorithm.\
-\>", "Text",
- CellTags->"Combine",
- CellID->484864717],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -235,7 +294,7 @@ Cell[BoxData[
RowBox[{"c", "-", "d"}], ")"}]}], "e"], "+", "g"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"Combine",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->758144630],
Cell[BoxData[
@@ -247,12 +306,11 @@ Cell[BoxData[
RowBox[{"b", " ", "c"}], "+",
RowBox[{"b", " ", "d"}], "+",
RowBox[{"e", " ", "g"}]}], "e"], TraditionalForm]], "Output",
- ImageSize->{175, 43},
+ ImageSize->{197, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Combine",
- CellLabel->"Out[4]=",
- CellID->1932335260]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -282,9 +340,7 @@ Cell[TextData[{
ButtonNote->"Factor2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Combine",
- CellID->2027442052]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -292,7 +348,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Combine",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -301,10 +357,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 3.435623}",
+ "built" -> "{2020, 1, 5, 18, 53, 31.336054}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -313,12 +369,12 @@ TaggingRules->{
"Combine[expr] puts terms in a sum over a common denominator,and cancels \
factors in the result. Combine is similar to Together, but accepts the option \
Expanding and works usually better than Together for polynomials involving \
-rationals with sums in the denominator.", "synonyms" -> {}, "title" ->
- "Combine", "titlemodifier" -> "", "windowtitle" -> "Combine", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Combine"}, "SearchTextTranslated" ->
- ""},
+rationals with sums in the denominator.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Combine", "titlemodifier" -> "", "windowtitle" -> "Combine",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Combine"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -327,7 +383,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -335,116 +391,100 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3501, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1555962841]},
"Combine"->{
- Cell[4135, 126, 131, 4, 27, "Input",
+ Cell[5308, 161, 133, 4, 70, "Input",
CellTags->"Combine",
CellID->194899276],
- Cell[4269, 132, 278, 10, 36, "Output",
- CellTags->"Combine",
- CellID->1836728683],
- Cell[4584, 147, 301, 11, 52, "Input",
+ Cell[5444, 167, 259, 9, 37, "Output",
+ CellTags->"Combine"],
+ Cell[6398, 212, 301, 11, 53, "Input",
CellTags->"Combine",
CellID->809742744],
- Cell[4888, 160, 411, 15, 64, "Output",
- CellTags->"Combine",
- CellID->1151883280],
- Cell[5314, 178, 141, 4, 32, "Text",
- CellTags->"Combine",
- CellID->18145815],
- Cell[5480, 186, 302, 11, 52, "Input",
+ Cell[6702, 225, 390, 14, 56, "Output",
+ CellTags->"Combine"],
+ Cell[7233, 248, 302, 11, 53, "Input",
CellTags->"Combine",
CellID->990215666],
- Cell[5785, 199, 410, 14, 64, "Output",
- CellTags->"Combine",
- CellID->1980431254],
- Cell[6210, 216, 195, 5, 52, "Text",
- CellTags->"Combine",
- CellID->484864717],
- Cell[6430, 225, 372, 13, 52, "Input",
+ Cell[7538, 261, 389, 13, 56, "Output",
+ CellTags->"Combine"],
+ Cell[8121, 284, 372, 13, 53, "Input",
CellTags->"Combine",
CellID->758144630],
- Cell[6805, 240, 410, 14, 64, "Output",
- CellTags->"Combine",
- CellID->1932335260],
- Cell[7583, 277, 224, 9, 31, "Text",
- CellTags->"Combine",
- CellID->2027442052]}
+ Cell[8496, 299, 389, 13, 56, "Output",
+ CellTags->"Combine"]},
+ "PrimaryExamplesSection"->{
+ Cell[5764, 183, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1626179003]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9846, 337},
- {"Combine", 9980, 341}
+ {"Combine", 11446, 393},
+ {"PrimaryExamplesSection", 12086, 414}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2995, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 601, 15, 112, "Usage",
- CellID->982511436],
+Cell[3577, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3501, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1555962841],
+Cell[3886, 112, 601, 15, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3914, 116, 196, 6, 25, "ExampleSection",
- CellID->1898342962],
+Cell[4512, 131, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->53518265],
+Cell[5252, 157, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4135, 126, 131, 4, 27, "Input",
+Cell[5308, 161, 133, 4, 70, "Input",
CellTags->"Combine",
CellID->194899276],
-Cell[4269, 132, 278, 10, 36, "Output",
- CellTags->"Combine",
- CellID->1836728683]
+Cell[5444, 167, 259, 9, 37, "Output",
+ CellTags->"Combine"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4584, 147, 301, 11, 52, "Input",
+Cell[5764, 183, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1626179003],
+Cell[CellGroupData[{
+Cell[6177, 202, 196, 6, 26, "ExampleSection",
+ CellID->1194284115],
+Cell[CellGroupData[{
+Cell[6398, 212, 301, 11, 53, "Input",
CellTags->"Combine",
CellID->809742744],
-Cell[4888, 160, 411, 15, 64, "Output",
- CellTags->"Combine",
- CellID->1151883280]
+Cell[6702, 225, 390, 14, 56, "Output",
+ CellTags->"Combine"]
}, Open ]],
-Cell[5314, 178, 141, 4, 32, "Text",
- CellTags->"Combine",
- CellID->18145815],
+Cell[7107, 242, 101, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5480, 186, 302, 11, 52, "Input",
+Cell[7233, 248, 302, 11, 53, "Input",
CellTags->"Combine",
CellID->990215666],
-Cell[5785, 199, 410, 14, 64, "Output",
- CellTags->"Combine",
- CellID->1980431254]
+Cell[7538, 261, 389, 13, 56, "Output",
+ CellTags->"Combine"]
}, Open ]],
-Cell[6210, 216, 195, 5, 52, "Text",
- CellTags->"Combine",
- CellID->484864717],
+Cell[7942, 277, 154, 3, 49, "Notes"],
Cell[CellGroupData[{
-Cell[6430, 225, 372, 13, 52, "Input",
+Cell[8121, 284, 372, 13, 53, "Input",
CellTags->"Combine",
CellID->758144630],
-Cell[6805, 240, 410, 14, 64, "Output",
- CellTags->"Combine",
- CellID->1932335260]
+Cell[8496, 299, 389, 13, 56, "Output",
+ CellTags->"Combine"]
}, Open ]]
}, Open ]],
-Cell[7242, 258, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8912, 316, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7310, 263, 270, 12, 31, "SeeAlsoSection",
+Cell[8980, 321, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7583, 277, 224, 9, 31, "Text",
- CellTags->"Combine",
- CellID->2027442052]
+Cell[9253, 335, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[7822, 289, 23, 0, 42, "FooterCell"]
+Cell[9452, 345, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CombineGraphs.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CombineGraphs.nb
index 72f00f52e..8d6cb2a3c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CombineGraphs.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CombineGraphs.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6040, 186]
-NotebookOptionsPosition[ 3835, 121]
-NotebookOutlinePosition[ 5774, 175]
-CellTagsIndexPosition[ 5699, 170]
+NotebookDataLength[ 6771, 206]
+NotebookOptionsPosition[ 4784, 151]
+NotebookOutlinePosition[ 6564, 198]
+CellTagsIndexPosition[ 6521, 195]
WindowTitle->CombineGraphs
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CombineGraphs\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CombineGraphs"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoopSum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CombineGraphs\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CombineGraphs"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
CombineGraphs.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$28674],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CombineGraphs", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$42825],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CombineGraphs", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ CombineGraphs.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CombineGraphs", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CombineGraphs", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CombineGraphs",
- CellID->1987423164]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,20 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 2.253553}",
+ "built" -> "{2020, 1, 5, 18, 53, 30.319164}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "CombineGraphs is an option for OneLoopSum.",
- "synonyms" -> {}, "title" -> "CombineGraphs", "titlemodifier" -> "",
- "windowtitle" -> "CombineGraphs", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/CombineGraphs"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CombineGraphs",
+ "titlemodifier" -> "", "windowtitle" -> "CombineGraphs", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CombineGraphs"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -153,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "CombineGraphs"->{
- Cell[3554, 107, 239, 9, 70, "Text",
- CellTags->"CombineGraphs",
- CellID->1987423164]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"CombineGraphs", 5583, 163}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3026, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 344, 11, 70, "Usage",
+Cell[3614, 97, 290, 11, 70, "ObjectNameGrid"],
+Cell[3907, 110, 344, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3281, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4276, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3554, 107, 239, 9, 70, "Text",
- CellTags->"CombineGraphs",
- CellID->1987423164]
+Cell[4549, 139, 193, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3808, 119, 23, 0, 70, "FooterCell"]
+Cell[4757, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Commutator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Commutator.nb
index 0d1f32547..7bfce04b6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Commutator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Commutator.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15795, 559]
-NotebookOptionsPosition[ 10087, 372]
-NotebookOutlinePosition[ 13721, 480]
-CellTagsIndexPosition[ 13607, 474]
+NotebookDataLength[ 16617, 572]
+NotebookOptionsPosition[ 11348, 404]
+NotebookOutlinePosition[ 14741, 503]
+CellTagsIndexPosition[ 14627, 497]
WindowTitle->Commutator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Commutator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Commutator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Commutator.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$29704],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Commutator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"AntiCommutator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/AntiCommutator"], "\<\"CommutatorExplicit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CommutatorExplicit"], \
+"\<\"DeclareNonCommutative\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeclareNonCommutative"], "\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DotSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Commutator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Commutator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Commutator.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$44153],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Commutator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +101,31 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Commutator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Commutator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"Commutator", "[",
- RowBox[{"x", ",", " ", "y"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "= c defines the commutator between the (non-commuting) objects x and y. "
+ RowBox[{
+ RowBox[{"Commutator", "[",
+ RowBox[{"x", ",", " ", "y"}], "]"}], "=", "c"}]], "InlineFormula"],
+ " \[LineSeparator]defines the commutator between the (non-commuting) \
+objects ",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["y"], "InlineFormula"],
+ ". "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -108,7 +151,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->53733069],
+ CellID->620734353],
Cell[CellGroupData[{
@@ -118,7 +161,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->381514575],
+ CellID->837014992],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
@@ -143,12 +186,11 @@ Cell[BoxData[
TraditionalForm], "\[NoBreak]", ",",
FormBox["b",
TraditionalForm], "\[NoBreak]", "]"}], TraditionalForm]], "Output",
- ImageSize->{41, 15},
+ ImageSize->{46, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Commutator",
- CellLabel->"Out[2]=",
- CellID->803506141]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -164,12 +206,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"a", ".", "b"}], "-",
RowBox[{"b", ".", "a"}]}], TraditionalForm]], "Output",
- ImageSize->{63, 15},
+ ImageSize->{74, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Commutator",
- CellLabel->"Out[3]=",
- CellID->114625701]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -188,22 +229,19 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"c", "+", "d"}], ")"}]}], "-",
- RowBox[{
- RowBox[{"(",
- RowBox[{"c", "+", "d"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{207, 15},
+ RowBox[{"a", ".", "c"}], "-",
+ RowBox[{"c", ".", "a"}], "+",
+ RowBox[{"a", ".", "d"}], "-",
+ RowBox[{"d", ".", "a"}], "+",
+ RowBox[{"b", ".", "c"}], "-",
+ RowBox[{"c", ".", "b"}], "+",
+ RowBox[{"b", ".", "d"}], "-",
+ RowBox[{"d", ".", "b"}]}], TraditionalForm]], "Output",
+ ImageSize->{332, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Commutator",
- CellLabel->"Out[4]=",
- CellID->1005990059]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[BoxData[
@@ -213,9 +251,7 @@ Cell[BoxData[
CellLabel->"In[5]:=",
CellID->1895253329],
-Cell["Verify the Jacobi identity.", "Text",
- CellTags->"Commutator",
- CellID->1857726821],
+Cell["Verify the Jacobi identity.", "Notes"],
Cell[BoxData[
RowBox[{
@@ -279,12 +315,11 @@ Cell[BoxData[
FormBox["y",
TraditionalForm], "\[NoBreak]", "]"}],
TraditionalForm], "\[NoBreak]", "]"}]}], TraditionalForm]], "Output",
- ImageSize->{229, 15},
+ ImageSize->{255, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Commutator",
- CellLabel->"Out[7]=",
- CellID->1488542158]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -297,12 +332,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Commutator",
- CellLabel->"Out[8]=",
- CellID->502281549]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[BoxData[
@@ -363,17 +397,15 @@ Cell[TextData[{
ButtonNote->"DotSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Commutator",
- CellID->1856568879]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Commutator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -382,21 +414,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 6.354588}",
+ "built" -> "{2020, 1, 5, 18, 53, 33.651179}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Commutator[x, y] = c defines the commutator between the (non-commuting) \
-objects x and y. ", "synonyms" -> {}, "title" -> "Commutator",
- "titlemodifier" -> "", "windowtitle" -> "Commutator", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Commutator"}, "SearchTextTranslated" -> ""},
+objects x and y. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Commutator", "titlemodifier" -> "", "windowtitle" -> "Commutator",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Commutator"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -404,8 +437,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -414,153 +448,132 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3368, 95, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[4818, 138, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->53733069]},
+ CellID->620734353]},
"Commutator"->{
- Cell[3977, 122, 186, 5, 27, "Input",
+ Cell[5428, 165, 186, 5, 27, "Input",
CellTags->"Commutator",
CellID->2000059968],
- Cell[4188, 131, 154, 5, 27, "Input",
+ Cell[5639, 174, 154, 5, 27, "Input",
CellTags->"Commutator",
CellID->922767227],
- Cell[4345, 138, 354, 12, 36, "Output",
- CellTags->"Commutator",
- CellID->803506141],
- Cell[4736, 155, 140, 4, 27, "Input",
+ Cell[5796, 181, 334, 11, 35, "Output",
+ CellTags->"Commutator"],
+ Cell[6167, 197, 140, 4, 27, "Input",
CellTags->"Commutator",
CellID->1899692439],
- Cell[4879, 161, 282, 10, 36, "Output",
- CellTags->"Commutator",
- CellID->114625701],
- Cell[5198, 176, 266, 9, 27, "Input",
+ Cell[6310, 203, 262, 9, 35, "Output",
+ CellTags->"Commutator"],
+ Cell[6609, 217, 266, 9, 27, "Input",
CellTags->"Commutator",
CellID->1084501087],
- Cell[5467, 187, 488, 18, 36, "Output",
- CellTags->"Commutator",
- CellID->1005990059],
- Cell[5970, 208, 188, 5, 27, "Input",
+ Cell[6878, 228, 467, 15, 35, "Output",
+ CellTags->"Commutator"],
+ Cell[7360, 246, 188, 5, 27, "Input",
CellTags->"Commutator",
CellID->1895253329],
- Cell[6161, 215, 89, 2, 32, "Text",
- CellTags->"Commutator",
- CellID->1857726821],
- Cell[6253, 219, 247, 7, 27, "Input",
+ Cell[7598, 255, 247, 7, 27, "Input",
CellTags->"Commutator",
CellID->1446605314],
- Cell[6525, 230, 481, 16, 27, "Input",
+ Cell[7870, 266, 481, 16, 27, "Input",
CellTags->"Commutator",
CellID->698764152],
- Cell[7009, 248, 1164, 38, 36, "Output",
- CellTags->"Commutator",
- CellID->1488542158],
- Cell[8210, 291, 133, 4, 27, "Input",
+ Cell[8354, 284, 1143, 37, 37, "Output",
+ CellTags->"Commutator"],
+ Cell[9534, 326, 133, 4, 27, "Input",
CellTags->"Commutator",
CellID->1391154075],
- Cell[8346, 297, 211, 7, 36, "Output",
- CellTags->"Commutator",
- CellID->502281549],
- Cell[8572, 307, 132, 4, 70, "Input",
+ Cell[9670, 332, 191, 6, 35, "Output",
+ CellTags->"Commutator"],
+ Cell[9876, 341, 132, 4, 27, "Input",
CellTags->"Commutator",
CellID->1837954422],
- Cell[8707, 313, 179, 5, 70, "Input",
- CellTags->"Commutator",
- CellID->2037252072],
- Cell[9242, 340, 803, 27, 70, "Text",
+ Cell[10011, 347, 179, 5, 27, "Input",
CellTags->"Commutator",
- CellID->1856568879]}
+ CellID->2037252072]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11914, 415},
- {"Commutator", 12049, 419}
+ {"PrimaryExamplesSection", 13222, 449},
+ {"Commutator", 13359, 453}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3350, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 450, 13, 83, "Usage",
+Cell[3935, 103, 287, 11, 45, "ObjectNameGrid"],
+Cell[4225, 116, 568, 18, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3368, 95, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4818, 138, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->53733069],
+ CellID->620734353],
Cell[CellGroupData[{
-Cell[3779, 114, 195, 6, 25, "ExampleSection",
- CellID->381514575],
-Cell[3977, 122, 186, 5, 27, "Input",
+Cell[5230, 157, 195, 6, 26, "ExampleSection",
+ CellID->837014992],
+Cell[5428, 165, 186, 5, 27, "Input",
CellTags->"Commutator",
CellID->2000059968],
Cell[CellGroupData[{
-Cell[4188, 131, 154, 5, 27, "Input",
+Cell[5639, 174, 154, 5, 27, "Input",
CellTags->"Commutator",
CellID->922767227],
-Cell[4345, 138, 354, 12, 36, "Output",
- CellTags->"Commutator",
- CellID->803506141]
+Cell[5796, 181, 334, 11, 35, "Output",
+ CellTags->"Commutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4736, 155, 140, 4, 27, "Input",
+Cell[6167, 197, 140, 4, 27, "Input",
CellTags->"Commutator",
CellID->1899692439],
-Cell[4879, 161, 282, 10, 36, "Output",
- CellTags->"Commutator",
- CellID->114625701]
+Cell[6310, 203, 262, 9, 35, "Output",
+ CellTags->"Commutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5198, 176, 266, 9, 27, "Input",
+Cell[6609, 217, 266, 9, 27, "Input",
CellTags->"Commutator",
CellID->1084501087],
-Cell[5467, 187, 488, 18, 36, "Output",
- CellTags->"Commutator",
- CellID->1005990059]
+Cell[6878, 228, 467, 15, 35, "Output",
+ CellTags->"Commutator"]
}, Open ]],
-Cell[5970, 208, 188, 5, 27, "Input",
+Cell[7360, 246, 188, 5, 27, "Input",
CellTags->"Commutator",
CellID->1895253329],
-Cell[6161, 215, 89, 2, 32, "Text",
- CellTags->"Commutator",
- CellID->1857726821],
-Cell[6253, 219, 247, 7, 27, "Input",
+Cell[7551, 253, 44, 0, 32, "Notes"],
+Cell[7598, 255, 247, 7, 27, "Input",
CellTags->"Commutator",
CellID->1446605314],
Cell[CellGroupData[{
-Cell[6525, 230, 481, 16, 27, "Input",
+Cell[7870, 266, 481, 16, 27, "Input",
CellTags->"Commutator",
CellID->698764152],
-Cell[7009, 248, 1164, 38, 36, "Output",
- CellTags->"Commutator",
- CellID->1488542158]
+Cell[8354, 284, 1143, 37, 37, "Output",
+ CellTags->"Commutator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8210, 291, 133, 4, 27, "Input",
+Cell[9534, 326, 133, 4, 27, "Input",
CellTags->"Commutator",
CellID->1391154075],
-Cell[8346, 297, 211, 7, 36, "Output",
- CellTags->"Commutator",
- CellID->502281549]
+Cell[9670, 332, 191, 6, 35, "Output",
+ CellTags->"Commutator"]
}, Open ]],
-Cell[8572, 307, 132, 4, 70, "Input",
+Cell[9876, 341, 132, 4, 27, "Input",
CellTags->"Commutator",
CellID->1837954422],
-Cell[8707, 313, 179, 5, 70, "Input",
+Cell[10011, 347, 179, 5, 27, "Input",
CellTags->"Commutator",
CellID->2037252072]
}, Open ]],
-Cell[8901, 321, 31, 0, 70, "SectionFooterSpacer"]
+Cell[10205, 355, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8969, 326, 270, 12, 70, "SeeAlsoSection",
+Cell[10273, 360, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9242, 340, 803, 27, 70, "Text",
- CellTags->"Commutator",
- CellID->1856568879]
+Cell[10546, 374, 760, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[10060, 370, 23, 0, 70, "FooterCell"]
+Cell[11321, 402, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CommutatorExplicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CommutatorExplicit.nb
index 105af26e0..0483ffd26 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CommutatorExplicit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CommutatorExplicit.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13735, 479]
-NotebookOptionsPosition[ 8452, 315]
-NotebookOutlinePosition[ 11892, 412]
-CellTagsIndexPosition[ 11770, 406]
+NotebookDataLength[ 14328, 490]
+NotebookOptionsPosition[ 9375, 341]
+NotebookOutlinePosition[ 12651, 431]
+CellTagsIndexPosition[ 12529, 425]
WindowTitle->CommutatorExplicit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CommutatorExplicit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CommutatorExplicit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DotSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CommutatorExplicit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CommutatorExplicit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
CommutatorExplicit.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$29359],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CommutatorExplicit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$43708],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CommutatorExplicit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ CommutatorExplicit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CommutatorExplicit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CommutatorExplicit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->214790583],
+ CellID->888736535],
Cell[CellGroupData[{
@@ -118,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->319865647],
+ CellID->1117516388],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
@@ -143,12 +176,11 @@ Cell[BoxData[
TraditionalForm], "\[NoBreak]", ",",
FormBox["b",
TraditionalForm], "\[NoBreak]", "]"}], TraditionalForm]], "Output",
- ImageSize->{41, 15},
+ ImageSize->{46, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CommutatorExplicit",
- CellLabel->"Out[2]=",
- CellID->1736741048]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -164,12 +196,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"a", ".", "b"}], "-",
RowBox[{"b", ".", "a"}]}], TraditionalForm]], "Output",
- ImageSize->{63, 15},
+ ImageSize->{74, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CommutatorExplicit",
- CellLabel->"Out[3]=",
- CellID->1538616356]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -200,12 +231,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\"}\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{105, 15},
+ ImageSize->{115, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CommutatorExplicit",
- CellLabel->"Out[4]=",
- CellID->945514452]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -229,12 +259,11 @@ Cell[BoxData[
RowBox[{"b", "-", "d"}], ")"}], ".",
RowBox[{"(",
RowBox[{"a", "-", "c"}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{207, 15},
+ ImageSize->{230, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CommutatorExplicit",
- CellLabel->"Out[5]=",
- CellID->272209917]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -258,12 +287,11 @@ Cell[BoxData[
RowBox[{"c", ".", "b"}], "+",
RowBox[{"c", ".", "d"}], "+",
RowBox[{"d", ".", "c"}]}], TraditionalForm]], "Output",
- ImageSize->{285, 15},
+ ImageSize->{332, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CommutatorExplicit",
- CellLabel->"Out[6]=",
- CellID->1425635977]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[BoxData[
@@ -306,17 +334,15 @@ Cell[TextData[{
ButtonNote->"DotSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CommutatorExplicit",
- CellID->763111899]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"CommutatorExplicit",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -325,22 +351,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 4.876060}",
+ "built" -> "{2020, 1, 5, 18, 53, 32.437053}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"CommutatorExplicit[exp] substitutes any Commutator and AntiCommutator in \
-exp by their definitions.", "synonyms" -> {}, "title" -> "CommutatorExplicit",
- "titlemodifier" -> "", "windowtitle" -> "CommutatorExplicit", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/CommutatorExplicit"},
- "SearchTextTranslated" -> ""},
+exp by their definitions.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CommutatorExplicit", "titlemodifier" -> "", "windowtitle" ->
+ "CommutatorExplicit", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CommutatorExplicit"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -348,8 +374,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -358,129 +385,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3398, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4473, 128, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->214790583]},
+ CellID->888736535]},
"CommutatorExplicit"->{
- Cell[4008, 122, 193, 5, 27, "Input",
+ Cell[5084, 155, 193, 5, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->596826267],
- Cell[4226, 131, 163, 5, 27, "Input",
+ Cell[5302, 164, 163, 5, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1546400369],
- Cell[4392, 138, 363, 12, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->1736741048],
- Cell[4792, 155, 148, 4, 27, "Input",
+ Cell[5468, 171, 342, 11, 35, "Output",
+ CellTags->"CommutatorExplicit"],
+ Cell[5847, 187, 148, 4, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1022077689],
- Cell[4943, 161, 291, 10, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->1538616356],
- Cell[5271, 176, 215, 7, 27, "Input",
+ Cell[5998, 193, 270, 9, 35, "Output",
+ CellTags->"CommutatorExplicit"],
+ Cell[6305, 207, 215, 7, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1564234454],
- Cell[5489, 185, 557, 22, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->945514452],
- Cell[6083, 212, 147, 4, 27, "Input",
+ Cell[6523, 216, 537, 21, 35, "Output",
+ CellTags->"CommutatorExplicit"],
+ Cell[7097, 242, 147, 4, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->631256546],
- Cell[6233, 218, 495, 18, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->272209917],
- Cell[6765, 241, 186, 6, 27, "Input",
+ Cell[7247, 248, 475, 17, 37, "Output",
+ CellTags->"CommutatorExplicit"],
+ Cell[7759, 270, 186, 6, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1843011592],
- Cell[6954, 249, 496, 16, 36, "Output",
+ Cell[7948, 278, 475, 15, 35, "Output",
+ CellTags->"CommutatorExplicit"],
+ Cell[8438, 296, 196, 5, 27, "Input",
CellTags->"CommutatorExplicit",
- CellID->1425635977],
- Cell[7465, 268, 196, 5, 27, "Input",
- CellTags->"CommutatorExplicit",
- CellID->1614014702],
- Cell[8017, 295, 393, 15, 70, "Text",
- CellTags->"CommutatorExplicit",
- CellID->763111899]}
+ CellID->1614014702]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10323, 359},
- {"CommutatorExplicit", 10467, 363}
+ {"PrimaryExamplesSection", 11292, 386},
+ {"CommutatorExplicit", 11437, 390}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3126, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 431, 13, 82, "Usage",
+Cell[3719, 98, 295, 11, 45, "ObjectNameGrid"],
+Cell[4017, 111, 431, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3398, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4473, 128, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->214790583],
+ CellID->888736535],
Cell[CellGroupData[{
-Cell[3810, 114, 195, 6, 25, "ExampleSection",
- CellID->319865647],
-Cell[4008, 122, 193, 5, 27, "Input",
+Cell[4885, 147, 196, 6, 26, "ExampleSection",
+ CellID->1117516388],
+Cell[5084, 155, 193, 5, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->596826267],
Cell[CellGroupData[{
-Cell[4226, 131, 163, 5, 27, "Input",
+Cell[5302, 164, 163, 5, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1546400369],
-Cell[4392, 138, 363, 12, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->1736741048]
+Cell[5468, 171, 342, 11, 35, "Output",
+ CellTags->"CommutatorExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4792, 155, 148, 4, 27, "Input",
+Cell[5847, 187, 148, 4, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1022077689],
-Cell[4943, 161, 291, 10, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->1538616356]
+Cell[5998, 193, 270, 9, 35, "Output",
+ CellTags->"CommutatorExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5271, 176, 215, 7, 27, "Input",
+Cell[6305, 207, 215, 7, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1564234454],
-Cell[5489, 185, 557, 22, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->945514452]
+Cell[6523, 216, 537, 21, 35, "Output",
+ CellTags->"CommutatorExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6083, 212, 147, 4, 27, "Input",
+Cell[7097, 242, 147, 4, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->631256546],
-Cell[6233, 218, 495, 18, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->272209917]
+Cell[7247, 248, 475, 17, 37, "Output",
+ CellTags->"CommutatorExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6765, 241, 186, 6, 27, "Input",
+Cell[7759, 270, 186, 6, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1843011592],
-Cell[6954, 249, 496, 16, 36, "Output",
- CellTags->"CommutatorExplicit",
- CellID->1425635977]
+Cell[7948, 278, 475, 15, 35, "Output",
+ CellTags->"CommutatorExplicit"]
}, Open ]],
-Cell[7465, 268, 196, 5, 27, "Input",
+Cell[8438, 296, 196, 5, 27, "Input",
CellTags->"CommutatorExplicit",
CellID->1614014702]
}, Open ]],
-Cell[7676, 276, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8649, 304, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7744, 281, 270, 12, 31, "SeeAlsoSection",
+Cell[8717, 309, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8017, 295, 393, 15, 70, "Text",
- CellTags->"CommutatorExplicit",
- CellID->763111899]
+Cell[8990, 323, 343, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[8425, 313, 23, 0, 70, "FooterCell"]
+Cell[9348, 339, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Complement1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Complement1.nb
new file mode 100644
index 000000000..65973fca8
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Complement1.nb
@@ -0,0 +1,278 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8435, 268]
+NotebookOptionsPosition[ 5585, 186]
+NotebookOutlinePosition[ 7822, 244]
+CellTagsIndexPosition[ 7738, 239]
+WindowTitle->Complement1
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Complement1\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Complement1"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Complement1.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$44597],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Complement1", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["Complement1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"Complement1", "[",
+ RowBox[{"l1", ",", "l2"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]where l1 and l2 are lists returns a list of elements \
+from l1 not in l2. Multiple occurences of an element in l1 are kept and \
+multiple occurences of an element in l2 are dropped multiply if present in l1."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->395011177],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1826473269],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Complement", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f", ",", "e"}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->96347288],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"e", ",", "f"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{46, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->621941775]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Complement1", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f", ",", "e"}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1748046804],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"e", ",", "f", ",", "e"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{65, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1849514241]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"Complement1",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 53, 34.890501}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "Complement1[l1, l2] where l1 and l2 are lists returns a list of elements \
+from l1 not in l2. Multiple occurences of an element in l1 are kept and \
+multiple occurences of an element in l2 are dropped multiply if present in \
+l1.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Complement1",
+ "titlemodifier" -> "", "windowtitle" -> "Complement1", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Complement1"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3761, 107, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->395011177]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7595, 232}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2285, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2871, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[3162, 89, 574, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3761, 107, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->395011177],
+Cell[CellGroupData[{
+Cell[4173, 126, 196, 6, 26, "ExampleSection",
+ CellID->1826473269],
+Cell[CellGroupData[{
+Cell[4394, 136, 301, 9, 27, "Input",
+ CellID->96347288],
+Cell[4698, 147, 233, 8, 35, "Output",
+ CellID->621941775]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4968, 160, 304, 9, 27, "Input",
+ CellID->1748046804],
+Cell[5275, 171, 244, 8, 35, "Output",
+ CellID->1849514241]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5558, 184, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CompleteSquare.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CompleteSquare.nb
index 160f1a6f8..4d8953024 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CompleteSquare.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CompleteSquare.nb
@@ -3,18 +3,18 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13582, 481]
-NotebookOptionsPosition[ 9513, 355]
-NotebookOutlinePosition[ 12383, 435]
-CellTagsIndexPosition[ 12265, 429]
-WindowTitle->Completes
+NotebookDataLength[ 13259, 465]
+NotebookOptionsPosition[ 9432, 351]
+NotebookOutlinePosition[ 12245, 427]
+CellTagsIndexPosition[ 12127, 421]
+WindowTitle->CompleteSquare
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
@@ -31,12 +31,12 @@ Cell[BoxData[GridBox[{
TextCell[
Row[{"URL",
Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Completes\"\>":>
+ StripOnInput->False], {"\<\"FeynCalc/ref/CompleteSquare\"\>":>
None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
Module[{DocumentationSearch`Private`nb$},
DocumentationSearch`Private`nb$ = NotebookPut[
Notebook[{
- Cell["FeynCalc/ref/Completes"]}, Visible -> False]];
+ Cell["FeynCalc/ref/CompleteSquare"]}, Visible -> False]];
SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
NotebookClose[DocumentationSearch`Private`nb$]; Null],
@@ -48,10 +48,10 @@ Cell[BoxData[GridBox[{
BoxData[
MakeBoxes[
Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Completes.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+CompleteSquare.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
NotebookClose[DocumentationSearch`Private`nb$];
Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$30048],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$45025],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Completes", ".html"]], None}]}]},
+ "FeynCalc/ref/CompleteSquare", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,13 +74,23 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Completes", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CompleteSquare", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData["Completes"], "InlineFormula"],
- " \[LineSeparator]",
+ Cell[BoxData["CompleteSquare"], "InlineFormula"],
+ " \[LineSeparator]completes ",
"the square of a second order polynomial in the momentum x. \
CompleteSquare[a ",
Cell[BoxData[
@@ -137,7 +148,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->997096702],
+ CellID->1405876143],
Cell[CellGroupData[{
@@ -147,20 +158,18 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->668530743],
+ CellID->242596955],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
- RowBox[{"5",
- RowBox[{"SP", "[",
- RowBox[{
- RowBox[{
- RowBox[{"2", "p"}], "+",
- RowBox[{"3", "r"}]}], ",",
- RowBox[{"p", "+", "r"}]}], "]"}]}], "//", "FCI"}]}]], "Input",
+ RowBox[{"5",
+ RowBox[{"SP", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", "p"}], "+",
+ RowBox[{"3", "r"}]}], ",",
+ RowBox[{"p", "+", "r"}]}], "]"}]}]], "Input",
CellLabel->"In[1]:=",
CellID->42990982],
@@ -168,50 +177,54 @@ Cell[BoxData[
FormBox[
RowBox[{"5", " ",
RowBox[{"(",
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- RowBox[{"2", " ",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}], "+",
- RowBox[{"3", " ",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{166, 18},
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}], "+",
+ RowBox[{"3", " ",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{179, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1644370118]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"CompleteSquare", "[",
- RowBox[{"t1", ",", "p"}], "]"}]}]], "Input",
+ RowBox[{"CompleteSquare", "[",
+ RowBox[{"%", ",", "p"}], "]"}]], "Input",
CellTags->"CompleteSquare",
CellLabel->"In[2]:=",
CellID->1825124248],
@@ -220,40 +233,25 @@ Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"10", " ",
- RowBox[{"(",
+ SuperscriptBox[
RowBox[{
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- FractionBox[
- RowBox[{"5", " ",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}], "4"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- FractionBox[
- RowBox[{"5", " ",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}], "4"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ FractionBox[
+ RowBox[{"5", " ",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}], "4"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], "-",
+ TraditionalForm]}], "2"]}], "-",
FractionBox[
RowBox[{"5", " ",
SuperscriptBox[
@@ -262,12 +260,11 @@ Cell[BoxData[
FormBox["r",
TraditionalForm], "_"],
TraditionalForm], "2"]}], "8"]}], TraditionalForm]], "Output",
- ImageSize->{229, 48},
+ ImageSize->{154, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CompleteSquare",
- CellLabel->"Out[2]=",
- CellID->332224925]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -275,7 +272,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
- RowBox[{"t1", "-", "t2"}], "//", "ScalarProductExpand"}], "//",
+ RowBox[{"%", "-", "%%"}], "//", "ScalarProductExpand"}], "//",
"Expand"}]], "Input",
CellTags->"CompleteSquare",
CellLabel->"In[3]:=",
@@ -283,19 +280,26 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CompleteSquare",
- CellLabel->"Out[3]=",
- CellID->2142949469]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CompleteSquare", "[",
- RowBox[{"t1", ",", "p", ",", "q"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"5",
+ RowBox[{"SP", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", "p"}], "+",
+ RowBox[{"3", "r"}]}], ",",
+ RowBox[{"p", "+", "r"}]}], "]"}]}], ",", "p", ",", "q"}],
+ "]"}]], "Input",
CellTags->"CompleteSquare",
CellLabel->"In[4]:=",
CellID->1850431752],
@@ -334,20 +338,12 @@ Cell[BoxData[
FormBox["r",
TraditionalForm], "_"]}], "4"]}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{194, 45},
+ ImageSize->{208, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CompleteSquare",
- CellLabel->"Out[4]=",
- CellID->468779431]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2"}], "]"}]], "Input",
- CellTags->"CompleteSquare",
- CellLabel->"In[5]:=",
- CellID->1021144564]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -355,33 +351,34 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"Completes",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"CompleteSquare",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
GridBox[{{
RowBox[{
ButtonBox[
- "Wolfram Language", ButtonData -> "paclet:guide/WolframRoot",
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "ExampleCounter" -> 1, "ExamplePageLinks" -> {}, "NeedPlatMsgIn" ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 7.852746}",
+ "built" -> "{2020, 1, 5, 18, 53, 36.091089}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "Completes the square of a second order polynomial in the momentum x. \
-CompleteSquare[a p^2+b p+c, p] -> -b^2/(4 a)+c+a (b/(2 a)+x)^2. \
+ "CompleteSquare completes the square of a second order polynomial in the \
+momentum x. CompleteSquare[a p^2+b p+c, p] -> -b^2/(4 a)+c+a (b/(2 a)+x)^2. \
CompleteSquare[a p^2+b p+c, p, q] -> {-b^2/(4 a)+c+a q^2, q->b/(2 a)+p}.",
- "synonyms" -> {}, "title" -> "Completes", "titlemodifier" -> "",
- "windowtitle" -> "Completes", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Completes"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "CompleteSquare",
+ "titlemodifier" -> "", "windowtitle" -> "CompleteSquare", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CompleteSquare"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -389,8 +386,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -399,90 +397,76 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4141, 124, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4449, 135, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->997096702]},
+ CellID->1405876143]},
"CompleteSquare"->{
- Cell[6108, 210, 189, 6, 27, "Input",
+ Cell[6500, 224, 163, 5, 27, "Input",
CellTags->"CompleteSquare",
CellID->1825124248],
- Cell[6300, 218, 1334, 51, 69, "Output",
- CellTags->"CompleteSquare",
- CellID->332224925],
- Cell[7671, 274, 199, 7, 27, "Input",
+ Cell[6666, 231, 910, 35, 61, "Output",
+ CellTags->"CompleteSquare"],
+ Cell[7613, 271, 198, 7, 27, "Input",
CellTags->"CompleteSquare",
CellID->1768514898],
- Cell[7873, 283, 216, 7, 36, "Output",
- CellTags->"CompleteSquare",
- CellID->2142949469],
- Cell[8126, 295, 174, 5, 27, "Input",
+ Cell[7814, 280, 195, 6, 35, "Output",
+ CellTags->"CompleteSquare"],
+ Cell[8046, 291, 352, 13, 27, "Input",
CellTags->"CompleteSquare",
CellID->1850431752],
- Cell[8303, 302, 985, 39, 66, "Output",
- CellTags->"CompleteSquare",
- CellID->468779431],
- Cell[9303, 344, 156, 5, 27, "Input",
- CellTags->"CompleteSquare",
- CellID->1021144564]}
+ Cell[8401, 306, 965, 38, 59, "Output",
+ CellTags->"CompleteSquare"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11438, 400},
- {"CompleteSquare", 11579, 404}
+ {"PrimaryExamplesSection", 11460, 398},
+ {"CompleteSquare", 11602, 402}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 2297, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 1229, 42, 103, "Usage",
+Cell[2886, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[3180, 89, 1244, 42, 108, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4141, 124, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4449, 135, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->997096702],
+ CellID->1405876143],
Cell[CellGroupData[{
-Cell[4553, 143, 195, 6, 25, "ExampleSection",
- CellID->668530743],
+Cell[4862, 154, 195, 6, 26, "ExampleSection",
+ CellID->242596955],
Cell[CellGroupData[{
-Cell[4773, 153, 294, 11, 27, "Input",
+Cell[5082, 164, 231, 9, 27, "Input",
CellID->42990982],
-Cell[5070, 166, 1001, 39, 39, "Output",
- CellID->1644370118]
+Cell[5316, 175, 1147, 44, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6108, 210, 189, 6, 27, "Input",
+Cell[6500, 224, 163, 5, 27, "Input",
CellTags->"CompleteSquare",
CellID->1825124248],
-Cell[6300, 218, 1334, 51, 69, "Output",
- CellTags->"CompleteSquare",
- CellID->332224925]
+Cell[6666, 231, 910, 35, 61, "Output",
+ CellTags->"CompleteSquare"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7671, 274, 199, 7, 27, "Input",
+Cell[7613, 271, 198, 7, 27, "Input",
CellTags->"CompleteSquare",
CellID->1768514898],
-Cell[7873, 283, 216, 7, 36, "Output",
- CellTags->"CompleteSquare",
- CellID->2142949469]
+Cell[7814, 280, 195, 6, 35, "Output",
+ CellTags->"CompleteSquare"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8126, 295, 174, 5, 27, "Input",
+Cell[8046, 291, 352, 13, 27, "Input",
CellTags->"CompleteSquare",
CellID->1850431752],
-Cell[8303, 302, 985, 39, 66, "Output",
- CellTags->"CompleteSquare",
- CellID->468779431]
-}, Open ]],
-Cell[9303, 344, 156, 5, 27, "Input",
- CellTags->"CompleteSquare",
- CellID->1021144564]
+Cell[8401, 306, 965, 38, 59, "Output",
+ CellTags->"CompleteSquare"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[9486, 353, 23, 0, 42, "FooterCell"]
+Cell[9405, 349, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ComplexConjugate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ComplexConjugate.nb
index 0232512ad..fc0993d12 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ComplexConjugate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ComplexConjugate.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21743, 799]
-NotebookOptionsPosition[ 14404, 568]
-NotebookOutlinePosition[ 18939, 695]
-CellTagsIndexPosition[ 18819, 689]
+NotebookDataLength[ 43066, 1592]
+NotebookOptionsPosition[ 36707, 1392]
+NotebookOutlinePosition[ 39392, 1465]
+CellTagsIndexPosition[ 39270, 1459]
WindowTitle->ComplexConjugate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ComplexConjugate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ComplexConjugate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCRenameDummyIndices\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCRenameDummyIndices"], "\<\"FermionSpinSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FermionSpinSum"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ComplexConjugate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ComplexConjugate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ComplexConjugate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$30387],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ComplexConjugate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$45490],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ComplexConjugate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +99,28 @@ ComplexConjugate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ComplexConjugate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ComplexConjugate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"ComplexConjugate", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "complex conjugates expr. It operates on fermion lines, i.e., products \
-of Spinor[..] .DiracMatrix[..] . Spinor[..], and changes all occuring \
-LorentzIndex[mu] into LorentzIndex[ComplexIndex[mu]]. For taking the spin sum \
-(i.e. constructing the traces) use FermionSpinSum. WARNING: In expr should be \
-NO explicit I's in denominators!"
+ RowBox[{"ComplexConjugate", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]returns the complex conjugate of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ", where the input expression must be a proper matrix element. "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -96,6 +131,72 @@ NO explicit I's in denominators!"
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->426363996],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+All Dirac matrices are assumed to be inside closed Dirac spinor chains. If \
+this is not the case, the result will be inconsistent. \
+\>", "Notes"],
+
+Cell[TextData[{
+ "Denominators may not contain explicit ",
+ Cell[BoxData["I"], "InlineFormula"],
+ "'s!"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ComplexConjugate", "]"}]], "Input",
+ CellLabel->"In[184]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Conjugate", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCRenameDummyIndices", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{388, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[184]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,154 +208,553 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->156837089],
+ CellID->1876031002],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->237583769],
+ CellID->1613801871],
+
+Cell[TextData[{
+ ButtonBox["ComplexConjugate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ComplexConjugate",
+ ButtonNote->"ComplexConjugate"],
+ " is meant to be applied to amplitudes, i.e. given a matrix element",
+ ButtonBox[" ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ComplexConjugate",
+ ButtonNote->"ComplexConjugate"],
+ Cell[BoxData["\[ScriptCapitalM]"], "InlineFormula"],
+ ", it will return ",
+ Cell[BoxData[
+ SuperscriptBox["\[ScriptCapitalM]", "*"]], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[1]:=",
- CellID->1414819233],
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"k1", "-", "p2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], "-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"k2", "-", "p2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}],
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2]]],
+ Editable->False]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}],
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k2 - $CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k2 - $CellContext`p2]]],
+ Editable->False]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{467, 97},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[1]=",
- CellID->1140505195]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[2]:=",
- CellID->138437204],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+Although one can also apply the function to standalone Dirac matrices, it \
+should be understood that the result is not equivalent to the complex \
+conjugation of such matrices.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}]], "Output",
- ImageSize->{312, 15},
+ RowBox[{"GA", "[", "\[Mu]", "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[2]//StandardForm=",
- CellID->32067236]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "5"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[3]:=",
- CellID->1239389489],
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[3]=",
- CellID->1874159857]
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[", "5", "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[4]:=",
- CellID->697323905],
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{34, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{"GS", "[",
+ RowBox[{"k1", "-", "p2"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}]}]], "Input",\
+
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "e"]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{298, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{77, 18},
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "e"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{282, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[4]=",
- CellID->1416373229]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -264,8 +764,8 @@ Cell[BoxData[
RowBox[{"SUNT", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}], "]"}]], "Input",
CellTags->"ComplexConjugate",
- CellLabel->"In[5]:=",
- CellID->1573088048],
+ CellLabel->"In[7]:=",
+ CellID->1865346448],
Cell[BoxData[
FormBox[
@@ -294,12 +794,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{104, 19},
+ ImageSize->{116, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ComplexConjugate",
- CellLabel->"Out[5]=",
- CellID->964261874]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -307,8 +806,8 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
CellTags->"ComplexConjugate",
- CellLabel->"In[6]:=",
- CellID->1138817196],
+ CellLabel->"In[8]:=",
+ CellID->1483149425],
Cell[BoxData[
FormBox[
@@ -337,188 +836,515 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{104, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[6]=",
- CellID->1059122773]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[7]:=",
- CellID->243405382],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{42, 19},
+ ImageSize->{116, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ComplexConjugate",
- CellLabel->"Out[7]=",
- CellID->13446686]
+ CellLabel->"Out[8]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FCE", "[",
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[8]:=",
- CellID->110906282],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
-Cell[BoxData[
- RowBox[{"MT", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Output",
- ImageSize->{70, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[8]//StandardForm=",
- CellID->588930123]
-}, Open ]],
+Cell[TextData[{
+ "Since FeynCalc 9.3 ",
+ ButtonBox["ComplexConjugate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ComplexConjugate",
+ ButtonNote->"ComplexConjugate"],
+ " will automatically rename dummy indices."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"SpinorUBar", "[",
- RowBox[{"k1", ",", "m"}], "]"}], ".",
- RowBox[{"GA", "[", "\[Lambda]", "]"}], ".",
- RowBox[{"SpinorU", "[",
- RowBox[{"p1", ",", "m"}], "]"}]}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[9]:=",
- CellID->1286596517],
+ RowBox[{"PolarizationVector", "[",
+ RowBox[{"p1", ",", "\[Mu]"}], "]"}],
+ RowBox[{"PolarizationVector", "[",
+ RowBox[{"p2", ",", "\[Nu]"}], "]"}],
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- OverscriptBox["u", "_"], "(",
- FormBox["k1",
- TraditionalForm], ",",
- FormBox["m",
- TraditionalForm], ")"}], ".",
FormBox[
SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
FormBox[
- FormBox["\[Lambda]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"u\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox["p1",
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{174, 19},
+ TraditionalForm]], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{136, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[9]=",
- CellID->936868064]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[10]:=",
- CellID->822445915],
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$30", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$30", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{312, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}],
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{110, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\"(\"\>",
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ TraditionalForm],
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["k1",
+ FormBox["p1",
TraditionalForm], "_"],
TraditionalForm],
- FormBox["\<\",\"\>",
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{270, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[TextData[{
+ "This behavior can be disabled by setting the option ",
+ ButtonBox["FCRenameDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}],
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}], ",",
+ RowBox[{"FCRenameDummyIndices", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["m",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{197, 25},
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{110, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ComplexConjugate",
- CellLabel->"Out[10]=",
- CellID->1665250585]
+ CellLabel->"Out[5]="]
+}, Open ]]
}, Open ]],
-Cell["\<\
-Notice that SpinorUBar and SpinorU are only input functions. Internally they \
-are converted to Spinor objects.\
-\>", "Text",
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "If particular variables must be replaced with their conjugate values, use \
+the option ",
+ Cell[BoxData["Conjugate"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{"c2", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{155, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellTags->"ComplexConjugate",
+ CellLabel->"In[2]:=",
+ CellID->1414819233],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], "+",
+ RowBox[{"c2", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{155, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ComplexConjugate",
- CellID->833839056]
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"Conjugate", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"c1", ",", "c2"}], "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], " ",
+ TemplateBox[{"c1"},
+ "Conjugate"]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], " ",
+ TemplateBox[{"c2"},
+ "Conjugate"]}]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{168, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Conjugate", "[", "c2", "]"}], " ",
+ RowBox[{"DiracGamma", "[", "6", "]"}]}], "+",
+ RowBox[{
+ RowBox[{"Conjugate", "[", "c1", "]"}], " ",
+ RowBox[{"DiracGamma", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]}]], "Output",
+ ImageSize->{485, 50},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -541,10 +1367,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["ComplexIndex",
+ StyleBox[ButtonBox["FCRenameDummyIndices",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ComplexIndex",
- ButtonNote->"ComplexIndex"],
+ ButtonData->"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["FermionSpinSum",
@@ -553,15 +1379,13 @@ Cell[TextData[{
ButtonNote->"FermionSpinSum"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["LorentzIndex",
+ StyleBox[ButtonBox["DiracGamma",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
- ButtonNote->"LorentzIndex"],
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ComplexConjugate",
- CellID->206503053]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -578,25 +1402,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 9.360951}",
+ "built" -> "{2020, 1, 5, 18, 53, 37.373424}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ComplexConjugate[expr] complex conjugates expr. It operates on fermion \
-lines, i.e., products of Spinor[..] .DiracMatrix[..] . Spinor[..], and \
-changes all occuring LorentzIndex[mu] into LorentzIndex[ComplexIndex[mu]]. \
-For taking the spin sum (i.e. constructing the traces) use FermionSpinSum. \
-WARNING: In expr should be NO explicit I's in denominators!",
- "synonyms" -> {}, "title" -> "ComplexConjugate", "titlemodifier" -> "",
+ "ComplexConjugate[exp] returns the complex conjugate of exp, where the \
+input expression must be a proper matrix element. ", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "ComplexConjugate", "titlemodifier" -> "",
"windowtitle" -> "ComplexConjugate", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ComplexConjugate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -605,7 +1426,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -614,193 +1435,165 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3645, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6434, 199, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->156837089]},
+ CellID->1876031002]},
"ComplexConjugate"->{
- Cell[4277, 127, 215, 6, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1414819233],
- Cell[4495, 135, 521, 22, 38, "Output",
- CellTags->"ComplexConjugate",
- CellID->1140505195],
- Cell[5053, 162, 139, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->138437204],
- Cell[5195, 168, 344, 10, 49, "Output",
- CellTags->"ComplexConjugate",
- CellID->32067236],
- Cell[5576, 183, 171, 5, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1239389489],
- Cell[5750, 190, 732, 30, 39, "Output",
- CellTags->"ComplexConjugate",
- CellID->1874159857],
- Cell[6519, 225, 143, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->697323905],
- Cell[6665, 231, 649, 25, 39, "Output",
+ Cell[21640, 761, 201, 6, 27, "Input",
CellTags->"ComplexConjugate",
- CellID->1416373229],
- Cell[7351, 261, 201, 6, 27, "Input",
+ CellID->1865346448],
+ Cell[21844, 769, 749, 31, 40, "Output",
+ CellTags->"ComplexConjugate"],
+ Cell[22630, 805, 144, 4, 27, "Input",
CellTags->"ComplexConjugate",
- CellID->1573088048],
- Cell[7555, 269, 769, 32, 40, "Output",
+ CellID->1483149425],
+ Cell[22777, 811, 749, 31, 40, "Output",
+ CellTags->"ComplexConjugate"],
+ Cell[32639, 1225, 144, 4, 27, "Input",
CellTags->"ComplexConjugate",
- CellID->964261874],
- Cell[8361, 306, 144, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1138817196],
- Cell[8508, 312, 770, 32, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->1059122773],
- Cell[9315, 349, 208, 6, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->243405382],
- Cell[9526, 357, 486, 21, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->13446686],
- Cell[10049, 383, 288, 8, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->110906282],
- Cell[10340, 393, 262, 8, 49, "Output",
- CellTags->"ComplexConjugate",
- CellID->588930123],
- Cell[10639, 406, 292, 9, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1286596517],
- Cell[10934, 417, 892, 36, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->936868064],
- Cell[11863, 458, 144, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->822445915],
- Cell[12010, 464, 1200, 48, 46, "Output",
- CellTags->"ComplexConjugate",
- CellID->1665250585],
- Cell[13225, 515, 186, 5, 52, "Text",
- CellTags->"ComplexConjugate",
- CellID->833839056],
- Cell[13767, 542, 595, 21, 32, "Text",
- CellTags->"ComplexConjugate",
- CellID->206503053]}
+ CellID->1414819233],
+ Cell[32786, 1231, 814, 31, 42, "Output",
+ CellTags->"ComplexConjugate"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16528, 615},
- {"ComplexConjugate", 16670, 619}
+ {"PrimaryExamplesSection", 38581, 1436},
+ {"ComplexConjugate", 38725, 1440}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3262, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 690, 16, 130, "Usage",
+Cell[3853, 101, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4171, 116, 492, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3645, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4688, 133, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->426363996],
+Cell[5429, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5463, 161, 157, 3, 70, "Notes"],
+Cell[5623, 166, 116, 4, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[5764, 174, 100, 2, 70, "Input"],
+Cell[5867, 178, 506, 14, 56, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6434, 199, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->156837089],
+ CellID->1876031002],
Cell[CellGroupData[{
-Cell[4057, 117, 195, 6, 25, "ExampleSection",
- CellID->237583769],
+Cell[6847, 218, 196, 6, 26, "ExampleSection",
+ CellID->1613801871],
+Cell[7046, 226, 525, 15, 49, "Notes"],
Cell[CellGroupData[{
-Cell[4277, 127, 215, 6, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1414819233],
-Cell[4495, 135, 521, 22, 38, "Output",
- CellTags->"ComplexConjugate",
- CellID->1140505195]
+Cell[7596, 245, 2050, 56, 189, "Input"],
+Cell[9649, 303, 6776, 242, 118, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5053, 162, 139, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->138437204],
-Cell[5195, 168, 344, 10, 49, "Output",
- CellTags->"ComplexConjugate",
- CellID->32067236]
+Cell[16462, 550, 105, 2, 9, "ExampleDelimiter"],
+Cell[16570, 554, 202, 4, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[16797, 562, 82, 2, 27, "Input"],
+Cell[16882, 566, 295, 11, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5576, 183, 171, 5, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1239389489],
-Cell[5750, 190, 732, 30, 39, "Output",
- CellTags->"ComplexConjugate",
- CellID->1874159857]
+Cell[17214, 582, 92, 2, 27, "Input"],
+Cell[17309, 586, 295, 11, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6519, 225, 143, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->697323905],
-Cell[6665, 231, 649, 25, 39, "Output",
- CellTags->"ComplexConjugate",
- CellID->1416373229]
+Cell[17641, 602, 78, 2, 27, "Input"],
+Cell[17722, 606, 255, 9, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7351, 261, 201, 6, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1573088048],
-Cell[7555, 269, 769, 32, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->964261874]
+Cell[18014, 620, 92, 2, 27, "Input"],
+Cell[18109, 624, 277, 10, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8361, 306, 144, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->1138817196],
-Cell[8508, 312, 770, 32, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->1059122773]
+Cell[18423, 639, 604, 18, 63, "Input"],
+Cell[19030, 659, 1321, 48, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9315, 349, 208, 6, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->243405382],
-Cell[9526, 357, 486, 21, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->13446686]
+Cell[20388, 712, 92, 2, 27, "Input"],
+Cell[20483, 716, 1120, 40, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10049, 383, 288, 8, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->110906282],
-Cell[10340, 393, 262, 8, 49, "Output",
+Cell[21640, 761, 201, 6, 27, "Input",
CellTags->"ComplexConjugate",
- CellID->588930123]
+ CellID->1865346448],
+Cell[21844, 769, 749, 31, 40, "Output",
+ CellTags->"ComplexConjugate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10639, 406, 292, 9, 27, "Input",
+Cell[22630, 805, 144, 4, 27, "Input",
CellTags->"ComplexConjugate",
- CellID->1286596517],
-Cell[10934, 417, 892, 36, 40, "Output",
- CellTags->"ComplexConjugate",
- CellID->936868064]
+ CellID->1483149425],
+Cell[22777, 811, 749, 31, 40, "Output",
+ CellTags->"ComplexConjugate"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[11863, 458, 144, 4, 27, "Input",
- CellTags->"ComplexConjugate",
- CellID->822445915],
-Cell[12010, 464, 1200, 48, 46, "Output",
- CellTags->"ComplexConjugate",
- CellID->1665250585]
+Cell[23575, 848, 105, 2, 9, "ExampleDelimiter"],
+Cell[23683, 852, 238, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[23946, 863, 281, 8, 27, "Input"],
+Cell[24230, 873, 907, 37, 37, "Output"]
}, Open ]],
-Cell[13225, 515, 186, 5, 52, "Text",
+Cell[CellGroupData[{
+Cell[25174, 915, 92, 2, 27, "Input"],
+Cell[25269, 919, 1234, 45, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[26540, 969, 245, 8, 27, "Input"],
+Cell[26788, 979, 1104, 46, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[27929, 1030, 92, 2, 27, "Input"],
+Cell[28024, 1034, 1281, 48, 43, "Output"]
+}, Open ]],
+Cell[29320, 1085, 294, 9, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[29639, 1098, 377, 11, 45, "Input"],
+Cell[30019, 1111, 965, 40, 43, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[31033, 1157, 105, 2, 9, "ExampleDelimiter"],
+Cell[31141, 1161, 171, 5, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[31337, 1170, 311, 10, 27, "Input"],
+Cell[31651, 1182, 951, 38, 42, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[32639, 1225, 144, 4, 27, "Input",
CellTags->"ComplexConjugate",
- CellID->833839056]
+ CellID->1414819233],
+Cell[32786, 1231, 814, 31, 42, "Output",
+ CellTags->"ComplexConjugate"]
}, Open ]],
-Cell[13426, 523, 31, 0, 29, "SectionFooterSpacer"]
+Cell[CellGroupData[{
+Cell[33637, 1267, 485, 15, 45, "Input"],
+Cell[34125, 1284, 867, 34, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13494, 528, 270, 12, 31, "SeeAlsoSection",
+Cell[35029, 1323, 84, 2, 27, "Input"],
+Cell[35116, 1327, 604, 17, 86, "Output"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[35759, 1349, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[35827, 1354, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13767, 542, 595, 21, 32, "Text",
- CellTags->"ComplexConjugate",
- CellID->206503053]
+Cell[36100, 1368, 565, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[14377, 566, 23, 0, 42, "FooterCell"]
+Cell[36680, 1390, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract.nb
index b7d281504..f94dcc512 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 38023, 1520]
-NotebookOptionsPosition[ 26910, 1137]
-NotebookOutlinePosition[ 33211, 1330]
-CellTagsIndexPosition[ 33097, 1324]
+NotebookDataLength[ 55258, 2256]
+NotebookOptionsPosition[ 43309, 1857]
+NotebookOutlinePosition[ 48855, 2019]
+CellTagsIndexPosition[ 48741, 2013]
WindowTitle->Contract
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Contract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Contract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Contract.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"CartesianPair\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CartesianPair"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"MomentumCombine\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MomentumCombine"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Contract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Contract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Contract.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$31077],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Contract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$45954],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Contract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Contract", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Contract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,40 +135,39 @@ products of sums of metric tensors and 4-vectors. "
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1888116803],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1149440211],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1249084733],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Contract", "]"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[1]:=",
- CellID->269618302],
+ CellLabel->"In[438]:="],
Cell[BoxData[
FormBox[
@@ -139,30 +177,61 @@ Cell[BoxData[
RowBox[{"Contract3", "\[Rule]", "True"}], ",",
RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"MomentumCombine", "\[Rule]", "True"}], ",",
RowBox[{"Rename", "\[Rule]", "False"}], ",",
RowBox[{"Schouten", "\[Rule]", "0"}]}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{427, 54},
+ ImageSize->{497, 53},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract",
- CellLabel->"Out[1]=",
- CellID->833332161]
+ CellLabel->"Out[438]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1601292756],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1005230717],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
- RowBox[{"MetricTensor", "[",
+ RowBox[{"MT", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->2011968461],
Cell[BoxData[
@@ -176,9 +245,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
@@ -187,24 +254,19 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{58, 19},
+ ImageSize->{64, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[2]=",
- CellID->2005708503]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -212,7 +274,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->26500400],
Cell[BoxData[
@@ -224,39 +286,38 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{23, 19},
+ ImageSize->{26, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[3]=",
- CellID->246386443]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}],
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}]}]], "Input",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->2005973076],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
FormBox[
SuperscriptBox[
FormBox[
@@ -265,18 +326,15 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{46, 19},
+ ImageSize->{52, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[4]=",
- CellID->163860977]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -284,7 +342,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1342373134],
Cell[BoxData[
@@ -296,21 +354,20 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{33, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[5]=",
- CellID->1083734914]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"MetricTensor", "[",
+ RowBox[{"MT", "[",
RowBox[{"\[Mu]", ",", "\[Mu]"}], "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->2121383633],
Cell[BoxData[
@@ -319,112 +376,75 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{36, 17},
+ ImageSize->{39, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[6]=",
- CellID->165921051]
+ CellLabel->"Out[5]="]
}, Open ]],
-Cell["The default dimension for MetricTensor is 4.", "Text",
- CellTags->"Contract",
- CellID->1017368063],
+Cell["The default dimension for a metric tensor is 4.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1110085557],
Cell[BoxData[
FormBox["4", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[7]=",
- CellID->1413622880]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell["\<\
-A short way to enter D-dimensional metric tensors is given by MTD. The \".\" \
-as multiplication operator is not necessary but just convenient for \
-typesetting.\
-\>", "Text",
- CellTags->"Contract",
- CellID->607767486],
+A short way to enter D-dimensional metric tensors is given by MTD.\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ", ".", " ",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
RowBox[{"MTD", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->1404498417],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ".",
+ SuperscriptBox[
FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{66, 17},
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{43, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[8]=",
- CellID->1257189010]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -432,88 +452,28 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->587791315],
Cell[BoxData[
FormBox["D", TraditionalForm]], "Output",
- ImageSize->{16, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract",
- CellLabel->"Out[9]=",
- CellID->1587031926]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ", ".", " ",
- RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[10]:=",
- CellID->1551578654],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ".",
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{66, 17},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[10]=",
- CellID->698535686]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"q", ",", "\[Mu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[11]:=",
+ CellLabel->"In[9]:=",
CellID->1721182838],
Cell[BoxData[
@@ -527,9 +487,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
@@ -541,18 +499,15 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{46, 19},
+ ImageSize->{55, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[11]=",
- CellID->320652273]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -560,7 +515,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", " ", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[12]:=",
+ CellLabel->"In[10]:=",
CellID->460754742],
Cell[BoxData[
@@ -578,26 +533,25 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{43, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[12]=",
- CellID->1322929815]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{
RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{
RowBox[{"a", "-", "b"}], ",", "\[Mu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[13]:=",
+ CellLabel->"In[11]:=",
CellID->1283410538],
Cell[BoxData[
@@ -618,9 +572,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
@@ -639,18 +591,15 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{121, 25},
+ ImageSize->{137, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[13]=",
- CellID->1638933986]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -658,7 +607,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[14]:=",
+ CellLabel->"In[12]:=",
CellID->803101401],
Cell[BoxData[
@@ -716,68 +665,69 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{171, 21},
+ ImageSize->{204, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[14]=",
- CellID->2042392818]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}], "]"}],
- " ",
- RowBox[{"FourVector", "[",
- RowBox[{"p", ",", "\[Sigma]"}], "]"}]}]], "Input",
+ RowBox[{"FVD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{
+ RowBox[{"a", "-", "b"}], ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[15]:=",
- CellID->1720608034],
+ CellLabel->"In[13]:=",
+ CellID->1863771818],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
+ RowBox[{"(",
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ RowBox[{
+ FormBox["a",
+ TraditionalForm], "-",
+ FormBox["b",
+ TraditionalForm]}],
TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{80, 20},
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{125, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[15]=",
- CellID->1740152652]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -785,46 +735,164 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[16]:=",
- CellID->634794036],
+ CellLabel->"In[14]:=",
+ CellID->2021554764],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ RowBox[{
RowBox[{
FormBox[
- FormBox["\[Alpha]",
+ FormBox["a",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Mu]",
+ FormBox["p",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}], "-",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["a",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p",
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{188, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Contract",
+ CellLabel->"Out[14]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Sigma]"}], "]"}]}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[15]:=",
+ CellID->1720608034],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{81, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Contract",
+ CellLabel->"Out[15]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[16]:=",
+ CellID->634794036],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 21},
+ ImageSize->{57, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Contract",
- CellLabel->"Out[16]=",
- CellID->1349165270]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[",
+ RowBox[{"LC", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
" ",
- RowBox[{"LeviCivita", "[",
+ RowBox[{"LC", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}], "]"}],
" "}]], "Input",
CellTags->"Contract",
@@ -834,260 +902,908 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["\[Epsilon]",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{107, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Contract",
+ CellLabel->"Out[17]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[18]:=",
+ CellID->530322977],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "6"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{62, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Contract",
+ CellLabel->"Out[18]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
+ " ",
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}],
+ "]"}]}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[19]:=",
+ CellID->730363468],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{105, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Contract",
+ CellLabel->"Out[19]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Contract", "[", "%", "]"}], "//", "Factor2"}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[20]:=",
+ CellID->1284270864],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox["\[Alpha]",
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Sigma]",
TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{199, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Contract",
+ CellLabel->"Out[20]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Contractions of Cartesian tensors are also possible. They can live in ",
+ Cell[BoxData["3"], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "4"}]], "InlineFormula"],
+ " dimensions."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]}]], "Input",
+ CellLabel->"In[21]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{61, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[21]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[22]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{29, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[22]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}],
+ RowBox[{"CGA", "[", "i", "]"}]}]], "Input",
+ CellLabel->"In[23]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["\[Alpha]",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{50, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[23]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[24]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{38, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[24]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[25]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[25]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[26]:="],
+
+Cell[BoxData[
+ FormBox["3", TraditionalForm]], "Output",
+ ImageSize->{12, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[26]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[27]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{42, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[27]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[28]:="],
+
+Cell[BoxData[
+ FormBox["3", TraditionalForm]], "Output",
+ ImageSize->{12, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[28]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "j"}], "]"}], " ",
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"a", "-", "b"}], ",", "j"}], "]"}]}]], "Input",
+ CellLabel->"In[29]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["a",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["b",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{141, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[29]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[30]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["a",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["b",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{141, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[30]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "k"}], "]"}]}]], "Input",
+ CellLabel->"In[31]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{108, 19},
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{76, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract",
- CellLabel->"Out[17]=",
- CellID->595150790]
+ CellLabel->"Out[31]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[18]:=",
- CellID->530322977],
+ CellLabel->"In[32]:="],
Cell[BoxData[
FormBox[
- RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
- SuperscriptBox["D", "3"], " ",
- RowBox[{"(",
- RowBox[{"-",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{"6", " ",
- SuperscriptBox["D", "2"], " ",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{"11", " ", "D", " ",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{"6", " ",
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{301, 25},
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{48, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract",
- CellLabel->"Out[18]=",
- CellID->130923848]
+ CellLabel->"Out[32]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";",
- RowBox[{
- RowBox[{"LCD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
- " ",
- RowBox[{"LCD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}],
- "]"}]}]}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[19]:=",
- CellID->730363468],
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "l"}], "]"}], " "}]], "Input",
+ CellLabel->"In[33]:="],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Alpha]",
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Beta]",
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]}]],
TraditionalForm], " ",
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Alpha]",
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{108, 19},
+ ImageSize->{88, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract",
- CellLabel->"Out[19]=",
- CellID->1753720306]
+ CellLabel->"Out[33]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[34]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{48, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[34]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"Contract", "[", "%", "]"}], "//", "Factor2"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[20]:=",
- CellID->1284270864],
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "l"}], "]"}], " "}]], "Input",
+ CellLabel->"In[35]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
- RowBox[{"1", "-", "D"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"2", "-", "D"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"3", "-", "D"}], ")"}], " ",
FormBox[
- SuperscriptBox["g",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{186, 19},
+ ImageSize->{86, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract",
- CellLabel->"Out[20]=",
- CellID->1474380358]
+ CellLabel->"Out[35]="]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[21]:=",
- CellID->476845114]
+ RowBox[{"Contract", "[", "%", "]"}], "//", "Factor2"}]], "Input",
+ CellLabel->"In[36]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{144, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[36]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -1116,6 +1832,12 @@ Cell[TextData[{
ButtonNote->"Pair"],
FontFamily->"Verdana"],
", ",
+ StyleBox[ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
@@ -1128,9 +1850,7 @@ Cell[TextData[{
ButtonNote->"MomentumCombine"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Contract",
- CellID->1189900625]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1138,7 +1858,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Contract",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1147,10 +1867,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 12.404937}",
+ "built" -> "{2020, 1, 5, 18, 53, 38.721837}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1161,11 +1881,11 @@ four-vectors and (depending on the optionEpsContract) of Levi-Civita tensors \
in expr. For the contraction of Dirac matrices with each other use \
DiracSimplify. Contract[exp1, exp2] contracts (exp1*exp2), where exp1 and \
exp2 may be larger products of sums of metric tensors and 4-vectors. ",
- "synonyms" -> {}, "title" -> "Contract", "titlemodifier" -> "",
- "windowtitle" -> "Contract", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Contract"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Contract",
+ "titlemodifier" -> "", "windowtitle" -> "Contract", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Contract"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1173,8 +1893,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1183,345 +1904,360 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3601, 98, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6661, 197, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1888116803]},
+ CellID->1601292756]},
"Contract"->{
- Cell[4235, 127, 133, 4, 27, "Input",
- CellTags->"Contract",
- CellID->269618302],
- Cell[4371, 133, 718, 19, 75, "Output",
- CellTags->"Contract",
- CellID->833332161],
- Cell[5126, 157, 252, 8, 27, "Input",
+ Cell[7295, 226, 234, 8, 27, "Input",
CellTags->"Contract",
CellID->2011968461],
- Cell[5381, 167, 891, 39, 40, "Output",
- CellTags->"Contract",
- CellID->2005708503],
- Cell[6309, 211, 126, 4, 27, "Input",
+ Cell[7532, 236, 740, 32, 37, "Output",
+ CellTags->"Contract"],
+ Cell[8309, 273, 126, 4, 27, "Input",
CellTags->"Contract",
CellID->26500400],
- Cell[6438, 217, 442, 19, 40, "Output",
- CellTags->"Contract",
- CellID->246386443],
- Cell[6917, 241, 218, 7, 27, "Input",
+ Cell[8438, 279, 384, 16, 37, "Output",
+ CellTags->"Contract"],
+ Cell[8859, 300, 201, 7, 27, "Input",
CellTags->"Contract",
CellID->2005973076],
- Cell[7138, 250, 658, 28, 40, "Output",
- CellTags->"Contract",
- CellID->163860977],
- Cell[7833, 283, 128, 4, 27, "Input",
+ Cell[9063, 309, 636, 27, 37, "Output",
+ CellTags->"Contract"],
+ Cell[9736, 341, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->1342373134],
- Cell[7964, 289, 372, 14, 38, "Output",
- CellTags->"Contract",
- CellID->1083734914],
- Cell[8373, 308, 163, 5, 27, "Input",
+ Cell[9867, 347, 351, 13, 37, "Output",
+ CellTags->"Contract"],
+ Cell[10255, 365, 153, 5, 27, "Input",
CellTags->"Contract",
CellID->2121383633],
- Cell[8539, 315, 512, 22, 38, "Output",
- CellTags->"Contract",
- CellID->165921051],
- Cell[9066, 340, 104, 2, 31, "Text",
- CellTags->"Contract",
- CellID->1017368063],
- Cell[9195, 346, 128, 4, 27, "Input",
+ Cell[10411, 372, 412, 17, 37, "Output",
+ CellTags->"Contract"],
+ Cell[10927, 396, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->1110085557],
- Cell[9326, 352, 210, 7, 36, "Output",
- CellTags->"Contract",
- CellID->1413622880],
- Cell[9551, 362, 228, 6, 52, "Text",
- CellTags->"Contract",
- CellID->607767486],
- Cell[9804, 372, 250, 8, 27, "Input",
+ Cell[11058, 402, 189, 6, 35, "Output",
+ CellTags->"Contract"],
+ Cell[11378, 417, 241, 8, 27, "Input",
CellTags->"Contract",
CellID->1404498417],
- Cell[10057, 382, 1015, 44, 38, "Output",
- CellTags->"Contract",
- CellID->1257189010],
- Cell[11109, 431, 127, 4, 27, "Input",
+ Cell[11622, 427, 466, 19, 39, "Output",
+ CellTags->"Contract"],
+ Cell[12125, 451, 127, 4, 27, "Input",
CellTags->"Contract",
CellID->587791315],
- Cell[11239, 437, 210, 7, 36, "Output",
- CellTags->"Contract",
- CellID->1587031926],
- Cell[11486, 449, 251, 8, 27, "Input",
- CellTags->"Contract",
- CellID->1551578654],
- Cell[11740, 459, 1015, 44, 38, "Output",
- CellTags->"Contract",
- CellID->698535686],
- Cell[12792, 508, 247, 8, 27, "Input",
+ Cell[12255, 457, 189, 6, 35, "Output",
+ CellTags->"Contract"],
+ Cell[12481, 468, 230, 8, 27, "Input",
CellTags->"Contract",
CellID->1721182838],
- Cell[13042, 518, 815, 36, 40, "Output",
- CellTags->"Contract",
- CellID->320652273],
- Cell[13894, 559, 133, 4, 27, "Input",
+ Cell[12714, 478, 710, 31, 37, "Output",
+ CellTags->"Contract"],
+ Cell[13461, 514, 133, 4, 27, "Input",
CellTags->"Contract",
CellID->460754742],
- Cell[14030, 565, 481, 20, 38, "Output",
- CellTags->"Contract",
- CellID->1322929815],
- Cell[14548, 590, 297, 10, 27, "Input",
+ Cell[13597, 520, 460, 19, 37, "Output",
+ CellTags->"Contract"],
+ Cell[14094, 544, 281, 10, 27, "Input",
CellTags->"Contract",
CellID->1283410538],
- Cell[14848, 602, 1189, 50, 46, "Output",
- CellTags->"Contract",
- CellID->1638933986],
- Cell[16074, 657, 128, 4, 27, "Input",
+ Cell[14378, 556, 1084, 45, 42, "Output",
+ CellTags->"Contract"],
+ Cell[15499, 606, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->803101401],
- Cell[16205, 663, 1387, 60, 42, "Output",
+ Cell[15630, 612, 1366, 59, 39, "Output",
+ CellTags->"Contract"],
+ Cell[17033, 676, 283, 10, 27, "Input",
CellTags->"Contract",
- CellID->2042392818],
- Cell[17629, 728, 291, 9, 27, "Input",
+ CellID->1863771818],
+ Cell[17319, 688, 956, 41, 37, "Output",
+ CellTags->"Contract"],
+ Cell[18312, 734, 129, 4, 27, "Input",
CellTags->"Contract",
- CellID->1720608034],
- Cell[17923, 739, 926, 40, 41, "Output",
+ CellID->2021554764],
+ Cell[18444, 740, 1142, 51, 37, "Output",
+ CellTags->"Contract"],
+ Cell[19623, 796, 275, 9, 27, "Input",
CellTags->"Contract",
- CellID->1740152652],
- Cell[18886, 784, 128, 4, 27, "Input",
+ CellID->1720608034],
+ Cell[19901, 807, 941, 40, 37, "Output",
+ CellTags->"Contract"],
+ Cell[20879, 852, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->634794036],
- Cell[19017, 790, 612, 26, 42, "Output",
- CellTags->"Contract",
- CellID->1349165270],
- Cell[19666, 821, 333, 10, 27, "Input",
+ Cell[21010, 858, 615, 26, 38, "Output",
+ CellTags->"Contract"],
+ Cell[21662, 889, 317, 10, 27, "Input",
CellTags->"Contract",
CellID->1343624460],
- Cell[20002, 833, 1029, 44, 40, "Output",
- CellTags->"Contract",
- CellID->595150790],
- Cell[21068, 882, 128, 4, 27, "Input",
+ Cell[21982, 901, 1165, 49, 37, "Output",
+ CellTags->"Contract"],
+ Cell[23184, 955, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->530322977],
- Cell[21199, 888, 1949, 80, 46, "Output",
- CellTags->"Contract",
- CellID->130923848],
- Cell[23185, 973, 445, 14, 27, "Input",
+ Cell[23315, 961, 471, 19, 39, "Output",
+ CellTags->"Contract"],
+ Cell[23823, 985, 314, 10, 27, "Input",
CellTags->"Contract",
CellID->730363468],
- Cell[23633, 989, 1134, 48, 40, "Output",
- CellTags->"Contract",
- CellID->1753720306],
- Cell[24804, 1042, 159, 5, 27, "Input",
+ Cell[24140, 997, 1163, 49, 37, "Output",
+ CellTags->"Contract"],
+ Cell[25340, 1051, 159, 5, 27, "Input",
CellTags->"Contract",
CellID->1284270864],
- Cell[24966, 1049, 748, 30, 40, "Output",
- CellTags->"Contract",
- CellID->1474380358],
- Cell[25729, 1082, 213, 7, 27, "Input",
- CellTags->"Contract",
- CellID->476845114],
- Cell[26298, 1111, 570, 21, 32, "Text",
- CellTags->"Contract",
- CellID->1189900625]}
+ Cell[25502, 1058, 595, 23, 39, "Output",
+ CellTags->"Contract"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 29008, 1184},
- {"Contract", 29143, 1188}
+ {"PrimaryExamplesSection", 45448, 1905},
+ {"Contract", 45584, 1909}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3301, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 695, 16, 130, "Usage",
- CellID->982511436],
+Cell[3884, 102, 285, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3601, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1888116803],
+Cell[4194, 117, 695, 16, 135, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4014, 117, 196, 6, 25, "ExampleSection",
- CellID->1249084733],
+Cell[4914, 137, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1149440211],
+Cell[5656, 163, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4235, 127, 133, 4, 27, "Input",
- CellTags->"Contract",
- CellID->269618302],
-Cell[4371, 133, 718, 19, 75, "Output",
- CellTags->"Contract",
- CellID->833332161]
+Cell[5712, 167, 92, 2, 70, "Input"],
+Cell[5807, 171, 793, 19, 74, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5126, 157, 252, 8, 27, "Input",
+Cell[6661, 197, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1601292756],
+Cell[CellGroupData[{
+Cell[7074, 216, 196, 6, 26, "ExampleSection",
+ CellID->1005230717],
+Cell[CellGroupData[{
+Cell[7295, 226, 234, 8, 27, "Input",
CellTags->"Contract",
CellID->2011968461],
-Cell[5381, 167, 891, 39, 40, "Output",
- CellTags->"Contract",
- CellID->2005708503]
+Cell[7532, 236, 740, 32, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6309, 211, 126, 4, 27, "Input",
+Cell[8309, 273, 126, 4, 27, "Input",
CellTags->"Contract",
CellID->26500400],
-Cell[6438, 217, 442, 19, 40, "Output",
- CellTags->"Contract",
- CellID->246386443]
+Cell[8438, 279, 384, 16, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6917, 241, 218, 7, 27, "Input",
+Cell[8859, 300, 201, 7, 27, "Input",
CellTags->"Contract",
CellID->2005973076],
-Cell[7138, 250, 658, 28, 40, "Output",
- CellTags->"Contract",
- CellID->163860977]
+Cell[9063, 309, 636, 27, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7833, 283, 128, 4, 27, "Input",
+Cell[9736, 341, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->1342373134],
-Cell[7964, 289, 372, 14, 38, "Output",
- CellTags->"Contract",
- CellID->1083734914]
+Cell[9867, 347, 351, 13, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8373, 308, 163, 5, 27, "Input",
+Cell[10255, 365, 153, 5, 27, "Input",
CellTags->"Contract",
CellID->2121383633],
-Cell[8539, 315, 512, 22, 38, "Output",
- CellTags->"Contract",
- CellID->165921051]
+Cell[10411, 372, 412, 17, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
-Cell[9066, 340, 104, 2, 31, "Text",
- CellTags->"Contract",
- CellID->1017368063],
+Cell[10838, 392, 64, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[9195, 346, 128, 4, 27, "Input",
+Cell[10927, 396, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->1110085557],
-Cell[9326, 352, 210, 7, 36, "Output",
- CellTags->"Contract",
- CellID->1413622880]
+Cell[11058, 402, 189, 6, 35, "Output",
+ CellTags->"Contract"]
}, Open ]],
-Cell[9551, 362, 228, 6, 52, "Text",
- CellTags->"Contract",
- CellID->607767486],
+Cell[11262, 411, 91, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[9804, 372, 250, 8, 27, "Input",
+Cell[11378, 417, 241, 8, 27, "Input",
CellTags->"Contract",
CellID->1404498417],
-Cell[10057, 382, 1015, 44, 38, "Output",
- CellTags->"Contract",
- CellID->1257189010]
+Cell[11622, 427, 466, 19, 39, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11109, 431, 127, 4, 27, "Input",
+Cell[12125, 451, 127, 4, 27, "Input",
CellTags->"Contract",
CellID->587791315],
-Cell[11239, 437, 210, 7, 36, "Output",
- CellTags->"Contract",
- CellID->1587031926]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[11486, 449, 251, 8, 27, "Input",
- CellTags->"Contract",
- CellID->1551578654],
-Cell[11740, 459, 1015, 44, 38, "Output",
- CellTags->"Contract",
- CellID->698535686]
+Cell[12255, 457, 189, 6, 35, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12792, 508, 247, 8, 27, "Input",
+Cell[12481, 468, 230, 8, 27, "Input",
CellTags->"Contract",
CellID->1721182838],
-Cell[13042, 518, 815, 36, 40, "Output",
- CellTags->"Contract",
- CellID->320652273]
+Cell[12714, 478, 710, 31, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13894, 559, 133, 4, 27, "Input",
+Cell[13461, 514, 133, 4, 27, "Input",
CellTags->"Contract",
CellID->460754742],
-Cell[14030, 565, 481, 20, 38, "Output",
- CellTags->"Contract",
- CellID->1322929815]
+Cell[13597, 520, 460, 19, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14548, 590, 297, 10, 27, "Input",
+Cell[14094, 544, 281, 10, 27, "Input",
CellTags->"Contract",
CellID->1283410538],
-Cell[14848, 602, 1189, 50, 46, "Output",
- CellTags->"Contract",
- CellID->1638933986]
+Cell[14378, 556, 1084, 45, 42, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16074, 657, 128, 4, 27, "Input",
+Cell[15499, 606, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->803101401],
-Cell[16205, 663, 1387, 60, 42, "Output",
+Cell[15630, 612, 1366, 59, 39, "Output",
+ CellTags->"Contract"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17033, 676, 283, 10, 27, "Input",
CellTags->"Contract",
- CellID->2042392818]
+ CellID->1863771818],
+Cell[17319, 688, 956, 41, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17629, 728, 291, 9, 27, "Input",
+Cell[18312, 734, 129, 4, 27, "Input",
CellTags->"Contract",
- CellID->1720608034],
-Cell[17923, 739, 926, 40, 41, "Output",
+ CellID->2021554764],
+Cell[18444, 740, 1142, 51, 37, "Output",
+ CellTags->"Contract"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[19623, 796, 275, 9, 27, "Input",
CellTags->"Contract",
- CellID->1740152652]
+ CellID->1720608034],
+Cell[19901, 807, 941, 40, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18886, 784, 128, 4, 27, "Input",
+Cell[20879, 852, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->634794036],
-Cell[19017, 790, 612, 26, 42, "Output",
- CellTags->"Contract",
- CellID->1349165270]
+Cell[21010, 858, 615, 26, 38, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19666, 821, 333, 10, 27, "Input",
+Cell[21662, 889, 317, 10, 27, "Input",
CellTags->"Contract",
CellID->1343624460],
-Cell[20002, 833, 1029, 44, 40, "Output",
- CellTags->"Contract",
- CellID->595150790]
+Cell[21982, 901, 1165, 49, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21068, 882, 128, 4, 27, "Input",
+Cell[23184, 955, 128, 4, 27, "Input",
CellTags->"Contract",
CellID->530322977],
-Cell[21199, 888, 1949, 80, 46, "Output",
- CellTags->"Contract",
- CellID->130923848]
+Cell[23315, 961, 471, 19, 39, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23185, 973, 445, 14, 27, "Input",
+Cell[23823, 985, 314, 10, 27, "Input",
CellTags->"Contract",
CellID->730363468],
-Cell[23633, 989, 1134, 48, 40, "Output",
- CellTags->"Contract",
- CellID->1753720306]
+Cell[24140, 997, 1163, 49, 37, "Output",
+ CellTags->"Contract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24804, 1042, 159, 5, 27, "Input",
+Cell[25340, 1051, 159, 5, 27, "Input",
CellTags->"Contract",
CellID->1284270864],
-Cell[24966, 1049, 748, 30, 40, "Output",
- CellTags->"Contract",
- CellID->1474380358]
+Cell[25502, 1058, 595, 23, 39, "Output",
+ CellTags->"Contract"]
}, Open ]],
-Cell[25729, 1082, 213, 7, 27, "Input",
- CellTags->"Contract",
- CellID->476845114]
+Cell[26112, 1084, 295, 10, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[26432, 1098, 174, 6, 27, "Input"],
+Cell[26609, 1106, 1014, 43, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[27660, 1154, 85, 2, 27, "Input"],
+Cell[27748, 1158, 495, 21, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[28280, 1184, 151, 5, 27, "Input"],
+Cell[28434, 1191, 949, 40, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29420, 1236, 85, 2, 27, "Input"],
+Cell[29508, 1240, 510, 20, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[30055, 1265, 102, 3, 27, "Input"],
+Cell[30160, 1270, 529, 22, 38, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[30726, 1297, 85, 2, 27, "Input"],
+Cell[30814, 1301, 167, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[31018, 1311, 126, 4, 27, "Input"],
+Cell[31147, 1317, 621, 25, 38, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[31805, 1347, 85, 2, 27, "Input"],
+Cell[31893, 1351, 167, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[32097, 1361, 229, 8, 27, "Input"],
+Cell[32329, 1371, 1539, 62, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[33905, 1438, 85, 2, 27, "Input"],
+Cell[33993, 1442, 1204, 50, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[35234, 1497, 190, 6, 27, "Input"],
+Cell[35427, 1505, 1179, 50, 41, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[36643, 1560, 85, 2, 27, "Input"],
+Cell[36731, 1564, 711, 30, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[37479, 1599, 206, 6, 27, "Input"],
+Cell[37688, 1607, 1380, 58, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[39105, 1670, 85, 2, 27, "Input"],
+Cell[39193, 1674, 569, 23, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[39799, 1702, 208, 6, 27, "Input"],
+Cell[40010, 1710, 1378, 58, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[41425, 1773, 115, 3, 27, "Input"],
+Cell[41543, 1778, 653, 26, 41, "Output"]
+}, Open ]]
}, Open ]],
-Cell[25957, 1092, 31, 0, 29, "SectionFooterSpacer"]
+Cell[42223, 1808, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[26025, 1097, 270, 12, 31, "SeeAlsoSection",
+Cell[42291, 1813, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[26298, 1111, 570, 21, 32, "Text",
- CellTags->"Contract",
- CellID->1189900625]
+Cell[42564, 1827, 703, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[26883, 1135, 23, 0, 42, "FooterCell"]
+Cell[43282, 1855, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract1.nb
deleted file mode 100644
index 4901a4e1d..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Contract1.nb
+++ /dev/null
@@ -1,479 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13224, 469]
-NotebookOptionsPosition[ 8619, 327]
-NotebookOutlinePosition[ 11864, 416]
-CellTagsIndexPosition[ 11751, 410]
-WindowTitle->Contract1
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Contract1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Contract1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Contract1.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$30733],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Contract1", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Contract1", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"Contract1", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "For covariant calculations it is not necessary to distinguish between \
-co- and contravariant indices (except for the Levi-Civita tensor).\nTherefore \
-normally no distinction is made between upper and lower indices.\nHowere, if \
-needed, one can use Upper and Lower and then a distuction is made:\n\
-Contract1[exp] contracts Upper and Lower indices. Neither Upper and Upper nor \
-Lower and Lower indices are contracted."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->205411532],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->927881224],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"FV", "[",
- RowBox[{"p", ",",
- RowBox[{"Lower", "[", "\[Mu]", "]"}]}], "]"}],
- RowBox[{"FV", "[",
- RowBox[{"q", ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}]}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[1]:=",
- CellID->1540146054],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract1",
- CellLabel->"Out[1]=",
- CellID->1390492923]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"FV", "[",
- RowBox[{"p", ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}],
- RowBox[{"FV", "[",
- RowBox[{"q", ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}]}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[2]:=",
- CellID->1717156274],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{46, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract1",
- CellLabel->"Out[2]=",
- CellID->1102943132]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MT", "[",
- RowBox[{
- RowBox[{"Lower", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[3]:=",
- CellID->2955950],
-
-Cell[BoxData[
- FormBox["4", TraditionalForm]], "Output",
- ImageSize->{13, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract1",
- CellLabel->"Out[3]=",
- CellID->118522025]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MT", "[",
- RowBox[{
- RowBox[{"Upper", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[4]:=",
- CellID->492376431],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{36, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Contract1",
- CellLabel->"Out[4]=",
- CellID->49419999]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["LorentzIndex",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
- ButtonNote->"LorentzIndex"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Lower",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Lower",
- ButtonNote->"Lower"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Upper",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Upper",
- ButtonNote->"Upper"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Contract1",
- CellID->758167385]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"Contract1",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 10.877622}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Contract1[expr] For covariant calculations it is not necessary to \
-distinguish between co- and contravariant indices (except for the Levi-Civita \
-tensor). Therefore normally no distinction is made between upper and lower \
-indices. Howere, if needed, one can use Upper and Lower and then a distuction \
-is made: Contract1[exp] contracts Upper and Lower indices. Neither Upper and \
-Upper nor Lower and Lower indices are contracted.", "synonyms" -> {}, "title" ->
- "Contract1", "titlemodifier" -> "", "windowtitle" -> "Contract1", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Contract1"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3679, 99, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->205411532]},
- "Contract1"->{
- Cell[4311, 128, 368, 13, 27, "Input",
- CellTags->"Contract1",
- CellID->1540146054],
- Cell[4682, 143, 481, 20, 38, "Output",
- CellTags->"Contract1",
- CellID->1390492923],
- Cell[5200, 168, 368, 13, 27, "Input",
- CellTags->"Contract1",
- CellID->1717156274],
- Cell[5571, 183, 724, 32, 40, "Output",
- CellTags->"Contract1",
- CellID->1102943132],
- Cell[6332, 220, 285, 10, 27, "Input",
- CellTags->"Contract1",
- CellID->2955950],
- Cell[6620, 232, 210, 7, 36, "Output",
- CellTags->"Contract1",
- CellID->118522025],
- Cell[6867, 244, 287, 10, 27, "Input",
- CellTags->"Contract1",
- CellID->492376431],
- Cell[7157, 256, 512, 22, 38, "Output",
- CellTags->"Contract1",
- CellID->49419999],
- Cell[8037, 301, 540, 21, 28, "Text",
- CellTags->"Contract1",
- CellID->758167385]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 10788, 375},
- {"Contract1", 10923, 379}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[581, 21, 2248, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2832, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 767, 17, 187, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3679, 99, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->205411532],
-Cell[CellGroupData[{
-Cell[4091, 118, 195, 6, 25, "ExampleSection",
- CellID->927881224],
-Cell[CellGroupData[{
-Cell[4311, 128, 368, 13, 27, "Input",
- CellTags->"Contract1",
- CellID->1540146054],
-Cell[4682, 143, 481, 20, 38, "Output",
- CellTags->"Contract1",
- CellID->1390492923]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5200, 168, 368, 13, 27, "Input",
- CellTags->"Contract1",
- CellID->1717156274],
-Cell[5571, 183, 724, 32, 40, "Output",
- CellTags->"Contract1",
- CellID->1102943132]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6332, 220, 285, 10, 27, "Input",
- CellTags->"Contract1",
- CellID->2955950],
-Cell[6620, 232, 210, 7, 36, "Output",
- CellTags->"Contract1",
- CellID->118522025]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6867, 244, 287, 10, 27, "Input",
- CellTags->"Contract1",
- CellID->492376431],
-Cell[7157, 256, 512, 22, 38, "Output",
- CellTags->"Contract1",
- CellID->49419999]
-}, Open ]]
-}, Open ]],
-Cell[7696, 282, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7764, 287, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[8037, 301, 540, 21, 28, "Text",
- CellTags->"Contract1",
- CellID->758167385]
-}, Open ]],
-Cell[8592, 325, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Convolute.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Convolute.nb
index a8a7b3b0b..320baba95 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Convolute.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Convolute.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 37269, 1433]
-NotebookOptionsPosition[ 23909, 970]
-NotebookOutlinePosition[ 31258, 1196]
-CellTagsIndexPosition[ 31143, 1190]
+NotebookDataLength[ 38708, 1444]
+NotebookOptionsPosition[ 26735, 1045]
+NotebookOutlinePosition[ 33235, 1236]
+CellTagsIndexPosition[ 33120, 1230]
WindowTitle->Convolute
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Convolute\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Convolute"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Convolute.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PlusDistribution\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PlusDistribution"], "\<\"ConvoluteTable\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ConvoluteTable"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Convolute\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Convolute"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Convolute.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$31433],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Convolute", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$46427],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Convolute", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Convolute", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Convolute", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -140,39 +176,40 @@ algebra."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1927499339],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->700798810],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->148945858],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Convolute", "]"}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[1]:=",
+ CellLabel->"In[490]:=",
CellID->846637972],
Cell[BoxData[
@@ -187,44 +224,79 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{440, 15},
+ ImageSize->{398, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[1]=",
- CellID->487844073]
+ CellLabel->"Out[490]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1344503995],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->427565618],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",", "1"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",", "1"}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1183792130],
Cell[BoxData[
FormBox[
RowBox[{"-",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{107, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[2]=",
- CellID->2333332]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"x", ",", "x"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"x", ",", "x"}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->566730399],
Cell[BoxData[
@@ -232,157 +304,167 @@ Cell[BoxData[
RowBox[{
RowBox[{"-",
SuperscriptBox["x", "2"]}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{127, 18},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{80, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[3]=",
- CellID->866957207]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",", "x"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",", "x"}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1354290721],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{119, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{72, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[4]=",
- CellID->1705056571]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->694658515],
Cell[BoxData[
FormBox[
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
+ RowBox[{"log", "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{102, 42},
+ ImageSize->{51, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[5]=",
- CellID->212763543]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"PlusDistribution", "[",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"PlusDistribution", "[",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->1694510014],
Cell[BoxData[
FormBox[
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
+ RowBox[{"log", "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{102, 42},
+ ImageSize->{51, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[6]=",
- CellID->527227095]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->640655392],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"x", " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{114, 42},
+ ImageSize->{65, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[7]=",
- CellID->1663091308]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->440037844],
Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
+ RowBox[{"log", "(", "x", ")"}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", "-", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{112, 47},
+ ImageSize->{73, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[8]=",
- CellID->1364104380]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->151808165],
Cell[BoxData[
@@ -391,27 +473,28 @@ Cell[BoxData[
RowBox[{"-",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}]}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{175, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{127, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[9]=",
- CellID->461576513]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[10]:=",
+ CellLabel->"In[9]:=",
CellID->1563371513],
Cell[BoxData[
@@ -420,28 +503,29 @@ Cell[BoxData[
RowBox[{"-", "x"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{187, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{141, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[10]=",
- CellID->535701029]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[11]:=",
+ CellLabel->"In[10]:=",
CellID->1082077962],
Cell[BoxData[
@@ -450,29 +534,31 @@ Cell[BoxData[
RowBox[{
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{170, 42},
+ ImageSize->{120, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[11]=",
- CellID->1354192503]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[12]:=",
+ CellLabel->"In[11]:=",
CellID->1247483115],
Cell[BoxData[
@@ -481,28 +567,30 @@ Cell[BoxData[
RowBox[{"x", " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{182, 42},
+ ImageSize->{134, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[12]=",
- CellID->1318550208]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox[
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}],
+ RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}], "/.",
RowBox[{
- FractionBox[
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[13]:=",
+ CellLabel->"In[12]:=",
CellID->2055743895],
Cell[BoxData[
@@ -511,53 +599,57 @@ Cell[BoxData[
RowBox[{"x", " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{182, 42},
+ ImageSize->{134, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[13]=",
- CellID->539579261]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[14]:=",
+ CellLabel->"In[13]:=",
CellID->1292595425],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{165, 15},
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{79, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[14]=",
- CellID->278611380]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}], "/.",
RowBox[{
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[15]:=",
+ CellLabel->"In[14]:=",
CellID->342391696],
Cell[BoxData[
@@ -566,29 +658,30 @@ Cell[BoxData[
RowBox[{"-", "x"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{187, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{141, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[15]=",
- CellID->1414596566]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ FractionBox[
+ RowBox[{"Log", "[", "x", "]"}],
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- FractionBox[
- RowBox[{"Log", "[", "x", "]"}],
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[16]:=",
+ CellLabel->"In[15]:=",
CellID->1164478774],
Cell[BoxData[
@@ -596,55 +689,57 @@ Cell[BoxData[
RowBox[{"-",
FractionBox[
RowBox[{
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ SuperscriptBox["log", "2"], "(", "x", ")"}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", "-", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{158, 47},
+ ImageSize->{73, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[16]=",
- CellID->1346944538]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"Log", "[", "x", "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Log", "[", "x", "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[17]:=",
+ CellLabel->"In[16]:=",
CellID->260971955],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{"log", "(", "x", ")"}]}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{153, 15},
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{65, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[17]=",
- CellID->552984683]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"x", ",", " ",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"x", ",", " ",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[18]:=",
+ CellLabel->"In[17]:=",
CellID->935305016],
Cell[BoxData[
@@ -652,197 +747,209 @@ Cell[BoxData[
RowBox[{
RowBox[{"-",
SuperscriptBox["x", "2"]}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{173, 18},
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{87, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[18]=",
- CellID->1685360392]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"Log", "[", "x", "]"}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"Log", "[", "x", "]"}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[19]:=",
+ CellLabel->"In[18]:=",
CellID->63581574],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ SuperscriptBox["log", "2"], "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{148, 42},
+ ImageSize->{58, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[19]=",
- CellID->1099451359]
+ CellLabel->"Out[18]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- FractionBox[
- RowBox[{"Log", "[", "x", "]"}],
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ FractionBox[
+ RowBox[{"Log", "[", "x", "]"}],
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[20]:=",
+ CellLabel->"In[19]:=",
CellID->1271585721],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ SuperscriptBox["log", "2"], "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{148, 42},
+ ImageSize->{58, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[20]=",
- CellID->2099236631]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[21]:=",
+ CellLabel->"In[20]:=",
CellID->1377475961],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"x", " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{160, 42},
+ ImageSize->{72, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[21]=",
- CellID->1161095845]
+ CellLabel->"Out[20]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox[
+ RowBox[{"Log", "[", "x", "]"}],
+ RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}], "/.",
RowBox[{
- FractionBox[
- RowBox[{"Log", "[", "x", "]"}],
- RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[22]:=",
+ CellLabel->"In[21]:=",
CellID->2045548358],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"x", " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{160, 42},
+ ImageSize->{72, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[22]=",
- CellID->1817134078]
+ CellLabel->"Out[21]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[23]:=",
+ CellLabel->"In[22]:=",
CellID->1793379008],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{165, 15},
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{79, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[23]=",
- CellID->1394422583]
+ CellLabel->"Out[22]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Log", "[", "x", "]"}], ",", "x"}], "]"}], "/.",
RowBox[{
- RowBox[{"Log", "[", "x", "]"}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[24]:=",
+ CellLabel->"In[23]:=",
CellID->1760428538],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{165, 15},
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{79, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[24]=",
- CellID->395731069]
+ CellLabel->"Out[23]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ FractionBox[
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}],
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- FractionBox[
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[25]:=",
+ CellLabel->"In[24]:=",
CellID->379553048],
Cell[BoxData[
@@ -852,32 +959,34 @@ Cell[BoxData[
RowBox[{
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", "-", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{180, 47},
+ ImageSize->{131, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[25]=",
- CellID->1955426678]
+ CellLabel->"Out[24]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{
- FractionBox[
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox[
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}],
+ RowBox[{"1", "-", "x"}]], ",",
RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}], "]"}]], "Input",
+ RowBox[{"1", "-", "x"}], "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[26]:=",
+ CellLabel->"In[25]:=",
CellID->1743318528],
Cell[BoxData[
@@ -887,45 +996,13 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{176, 45},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Convolute",
- CellLabel->"Out[26]=",
- CellID->2109333521]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ConvoluteTable", "[",
- RowBox[{
- FractionBox[
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]], ",", "1"}], "]"}]], "Input",
- CellTags->"Convolute",
- CellLabel->"In[27]:=",
- CellID->1987067231],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"False", "[",
- RowBox[{
- FractionBox[
- RowBox[{"log", "(",
- RowBox[{"1", "-", "x"}], ")"}],
- RowBox[{"1", "-", "x"}]], ",", "1"}], "]"}], TraditionalForm]], "Output",\
-
- ImageSize->{135, 42},
+ ImageSize->{127, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Convolute",
- CellLabel->"Out[27]=",
- CellID->1326268935]
+ CellLabel->"Out[25]="]
}, Open ]]
}, Open ]],
@@ -961,9 +1038,7 @@ Cell[TextData[{
ButtonNote->"ConvoluteTable"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Convolute",
- CellID->573828711]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -980,10 +1055,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 14.110151}",
+ "built" -> "{2020, 1, 5, 18, 53, 40.194292}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -994,11 +1069,11 @@ TaggingRules->{
Convolute[f, g] is equivalent to Convolute[f, g, x]. Convolute[exp, {x1, x2}] \
assumes that exp is polynomial in x1 and x2. Convolute uses table-look-up and \
does not do any integral calculations, only linear algebra.",
- "synonyms" -> {}, "title" -> "Convolute", "titlemodifier" -> "",
- "windowtitle" -> "Convolute", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Convolute"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Convolute",
+ "titlemodifier" -> "", "windowtitle" -> "Convolute", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Convolute"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1007,7 +1082,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1015,426 +1090,362 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4773, 142, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1927499339]},
"Convolute"->{
- Cell[5406, 171, 135, 4, 27, "Input",
+ Cell[6705, 208, 137, 4, 70, "Input",
CellTags->"Convolute",
CellID->846637972],
- Cell[5544, 177, 506, 17, 36, "Output",
- CellTags->"Convolute",
- CellID->487844073],
- Cell[6087, 199, 153, 5, 27, "Input",
+ Cell[6845, 214, 488, 16, 37, "Output",
+ CellTags->"Convolute"],
+ Cell[8027, 266, 287, 9, 29, "Input",
CellTags->"Convolute",
CellID->1183792130],
- Cell[6243, 206, 302, 11, 36, "Output",
- CellTags->"Convolute",
- CellID->2333332],
- Cell[6582, 222, 152, 5, 27, "Input",
+ Cell[8317, 277, 239, 8, 37, "Output",
+ CellTags->"Convolute"],
+ Cell[8593, 290, 286, 9, 29, "Input",
CellTags->"Convolute",
CellID->566730399],
- Cell[6737, 229, 354, 13, 39, "Output",
- CellTags->"Convolute",
- CellID->866957207],
- Cell[7128, 247, 153, 5, 27, "Input",
+ Cell[8882, 301, 289, 10, 39, "Output",
+ CellTags->"Convolute"],
+ Cell[9208, 316, 287, 9, 29, "Input",
CellTags->"Convolute",
CellID->1354290721],
- Cell[7284, 254, 329, 12, 36, "Output",
- CellTags->"Convolute",
- CellID->1705056571],
- Cell[7650, 271, 199, 7, 51, "Input",
+ Cell[9498, 327, 263, 9, 37, "Output",
+ CellTags->"Convolute"],
+ Cell[9798, 341, 335, 11, 52, "Input",
CellTags->"Convolute",
CellID->694658515],
- Cell[7852, 280, 328, 11, 63, "Output",
- CellTags->"Convolute",
- CellID->212763543],
- Cell[8217, 296, 246, 8, 51, "Input",
+ Cell[10136, 354, 266, 9, 55, "Output",
+ CellTags->"Convolute"],
+ Cell[10439, 368, 383, 12, 52, "Input",
CellTags->"Convolute",
CellID->1694510014],
- Cell[8466, 306, 328, 11, 63, "Output",
- CellTags->"Convolute",
- CellID->527227095],
- Cell[8831, 322, 199, 7, 51, "Input",
+ Cell[10825, 382, 266, 9, 55, "Output",
+ CellTags->"Convolute"],
+ Cell[11128, 396, 335, 11, 52, "Input",
CellTags->"Convolute",
CellID->640655392],
- Cell[9033, 331, 355, 12, 63, "Output",
- CellTags->"Convolute",
- CellID->1663091308],
- Cell[9425, 348, 246, 9, 51, "Input",
+ Cell[11466, 409, 291, 10, 55, "Output",
+ CellTags->"Convolute"],
+ Cell[11794, 424, 384, 13, 52, "Input",
CellTags->"Convolute",
CellID->440037844],
- Cell[9674, 359, 405, 14, 68, "Output",
- CellTags->"Convolute",
- CellID->1364104380],
- Cell[10116, 378, 208, 7, 27, "Input",
+ Cell[12181, 439, 341, 12, 60, "Output",
+ CellTags->"Convolute"],
+ Cell[12559, 456, 344, 11, 29, "Input",
CellTags->"Convolute",
CellID->151808165],
- Cell[10327, 387, 386, 14, 36, "Output",
- CellTags->"Convolute",
- CellID->461576513],
- Cell[10750, 406, 236, 8, 27, "Input",
+ Cell[12906, 469, 322, 11, 37, "Output",
+ CellTags->"Convolute"],
+ Cell[13265, 485, 372, 12, 29, "Input",
CellTags->"Convolute",
CellID->1563371513],
- Cell[10989, 416, 395, 14, 36, "Output",
- CellTags->"Convolute",
- CellID->535701029],
- Cell[11421, 435, 257, 9, 51, "Input",
+ Cell[13640, 499, 330, 11, 37, "Output",
+ CellTags->"Convolute"],
+ Cell[14007, 515, 395, 13, 52, "Input",
CellTags->"Convolute",
CellID->1082077962],
- Cell[11681, 446, 414, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->1354192503],
- Cell[12132, 465, 283, 10, 51, "Input",
+ Cell[14405, 530, 351, 12, 56, "Output",
+ CellTags->"Convolute"],
+ Cell[14793, 547, 422, 14, 52, "Input",
CellTags->"Convolute",
CellID->1247483115],
- Cell[12418, 477, 424, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->1318550208],
- Cell[12879, 496, 259, 9, 52, "Input",
+ Cell[15218, 563, 361, 12, 56, "Output",
+ CellTags->"Convolute"],
+ Cell[15616, 580, 397, 13, 53, "Input",
CellTags->"Convolute",
CellID->2055743895],
- Cell[13141, 507, 423, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->539579261],
- Cell[13601, 526, 210, 7, 27, "Input",
+ Cell[16016, 595, 361, 12, 56, "Output",
+ CellTags->"Convolute"],
+ Cell[16414, 612, 346, 11, 29, "Input",
CellTags->"Convolute",
CellID->1292595425],
- Cell[13814, 535, 370, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->278611380],
- Cell[14221, 553, 209, 7, 27, "Input",
+ Cell[16763, 625, 292, 11, 39, "Output",
+ CellTags->"Convolute"],
+ Cell[17092, 641, 345, 11, 29, "Input",
CellTags->"Convolute",
CellID->342391696],
- Cell[14433, 562, 396, 14, 36, "Output",
- CellTags->"Convolute",
- CellID->1414596566],
- Cell[14866, 581, 280, 10, 52, "Input",
+ Cell[17440, 654, 331, 11, 37, "Output",
+ CellTags->"Convolute"],
+ Cell[17808, 670, 419, 14, 53, "Input",
CellTags->"Convolute",
CellID->1164478774],
- Cell[15149, 593, 466, 16, 68, "Output",
- CellTags->"Convolute",
- CellID->1346944538],
- Cell[15652, 614, 184, 6, 27, "Input",
+ Cell[18230, 686, 369, 13, 64, "Output",
+ CellTags->"Convolute"],
+ Cell[18636, 704, 319, 10, 29, "Input",
CellTags->"Convolute",
CellID->260971955],
- Cell[15839, 622, 361, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->552984683],
- Cell[16237, 640, 214, 7, 27, "Input",
+ Cell[18958, 716, 268, 10, 39, "Output",
+ CellTags->"Convolute"],
+ Cell[19263, 731, 350, 11, 29, "Input",
CellTags->"Convolute",
CellID->935305016],
- Cell[16454, 649, 397, 14, 39, "Output",
- CellTags->"Convolute",
- CellID->1685360392],
- Cell[16888, 668, 230, 8, 51, "Input",
+ Cell[19616, 744, 318, 12, 39, "Output",
+ CellTags->"Convolute"],
+ Cell[19971, 761, 367, 12, 52, "Input",
CellTags->"Convolute",
CellID->63581574],
- Cell[17121, 678, 388, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->1099451359],
- Cell[17546, 696, 233, 8, 52, "Input",
+ Cell[20341, 775, 293, 10, 59, "Output",
+ CellTags->"Convolute"],
+ Cell[20671, 790, 370, 12, 53, "Input",
CellTags->"Convolute",
CellID->1271585721],
- Cell[17782, 706, 388, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->2099236631],
- Cell[18207, 724, 257, 9, 51, "Input",
+ Cell[21044, 804, 293, 10, 59, "Output",
+ CellTags->"Convolute"],
+ Cell[21374, 819, 395, 13, 52, "Input",
CellTags->"Convolute",
CellID->1377475961],
- Cell[18467, 735, 398, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->1161095845],
- Cell[18902, 753, 233, 8, 52, "Input",
+ Cell[21772, 834, 319, 11, 59, "Output",
+ CellTags->"Convolute"],
+ Cell[22128, 850, 370, 12, 53, "Input",
CellTags->"Convolute",
CellID->2045548358],
- Cell[19138, 763, 398, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->1817134078],
- Cell[19573, 781, 210, 7, 27, "Input",
+ Cell[22501, 864, 319, 11, 59, "Output",
+ CellTags->"Convolute"],
+ Cell[22857, 880, 346, 11, 29, "Input",
CellTags->"Convolute",
CellID->1793379008],
- Cell[19786, 790, 371, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->1394422583],
- Cell[20194, 808, 185, 6, 27, "Input",
+ Cell[23206, 893, 292, 11, 39, "Output",
+ CellTags->"Convolute"],
+ Cell[23535, 909, 320, 10, 29, "Input",
CellTags->"Convolute",
CellID->1760428538],
- Cell[20382, 816, 370, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->395731069],
- Cell[20789, 834, 305, 11, 52, "Input",
+ Cell[23858, 921, 292, 11, 39, "Output",
+ CellTags->"Convolute"],
+ Cell[24187, 937, 445, 15, 53, "Input",
CellTags->"Convolute",
CellID->379553048],
- Cell[21097, 847, 493, 17, 68, "Output",
- CellTags->"Convolute",
- CellID->1955426678],
- Cell[21627, 869, 315, 11, 52, "Input",
+ Cell[24635, 954, 429, 15, 61, "Output",
+ CellTags->"Convolute"],
+ Cell[25101, 974, 455, 15, 53, "Input",
CellTags->"Convolute",
CellID->1743318528],
- Cell[21945, 882, 441, 15, 66, "Output",
- CellTags->"Convolute",
- CellID->2109333521],
- Cell[22423, 902, 264, 9, 52, "Input",
- CellTags->"Convolute",
- CellID->1987067231],
- Cell[22690, 913, 380, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->1326268935],
- Cell[23438, 950, 429, 15, 31, "Text",
- CellTags->"Convolute",
- CellID->573828711]}
+ Cell[25559, 991, 378, 13, 59, "Output",
+ CellTags->"Convolute"]},
+ "PrimaryExamplesSection"->{
+ Cell[7394, 237, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1344503995]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 26016, 1017},
- {"Convolute", 26153, 1021}
+ {"Convolute", 28815, 1092},
+ {"PrimaryExamplesSection", 32976, 1223}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 3127, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 1861, 60, 121, "Usage",
- CellID->982511436],
+Cell[3711, 99, 286, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4773, 142, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1927499339],
+Cell[4022, 114, 1861, 60, 126, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[5186, 161, 195, 6, 25, "ExampleSection",
- CellID->148945858],
+Cell[5908, 178, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->700798810],
+Cell[6649, 204, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[5406, 171, 135, 4, 27, "Input",
+Cell[6705, 208, 137, 4, 70, "Input",
CellTags->"Convolute",
CellID->846637972],
-Cell[5544, 177, 506, 17, 36, "Output",
- CellTags->"Convolute",
- CellID->487844073]
+Cell[6845, 214, 488, 16, 37, "Output",
+ CellTags->"Convolute"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[6087, 199, 153, 5, 27, "Input",
+Cell[7394, 237, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1344503995],
+Cell[CellGroupData[{
+Cell[7807, 256, 195, 6, 26, "ExampleSection",
+ CellID->427565618],
+Cell[CellGroupData[{
+Cell[8027, 266, 287, 9, 29, "Input",
CellTags->"Convolute",
CellID->1183792130],
-Cell[6243, 206, 302, 11, 36, "Output",
- CellTags->"Convolute",
- CellID->2333332]
+Cell[8317, 277, 239, 8, 37, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6582, 222, 152, 5, 27, "Input",
+Cell[8593, 290, 286, 9, 29, "Input",
CellTags->"Convolute",
CellID->566730399],
-Cell[6737, 229, 354, 13, 39, "Output",
- CellTags->"Convolute",
- CellID->866957207]
+Cell[8882, 301, 289, 10, 39, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7128, 247, 153, 5, 27, "Input",
+Cell[9208, 316, 287, 9, 29, "Input",
CellTags->"Convolute",
CellID->1354290721],
-Cell[7284, 254, 329, 12, 36, "Output",
- CellTags->"Convolute",
- CellID->1705056571]
+Cell[9498, 327, 263, 9, 37, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7650, 271, 199, 7, 51, "Input",
+Cell[9798, 341, 335, 11, 52, "Input",
CellTags->"Convolute",
CellID->694658515],
-Cell[7852, 280, 328, 11, 63, "Output",
- CellTags->"Convolute",
- CellID->212763543]
+Cell[10136, 354, 266, 9, 55, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8217, 296, 246, 8, 51, "Input",
+Cell[10439, 368, 383, 12, 52, "Input",
CellTags->"Convolute",
CellID->1694510014],
-Cell[8466, 306, 328, 11, 63, "Output",
- CellTags->"Convolute",
- CellID->527227095]
+Cell[10825, 382, 266, 9, 55, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8831, 322, 199, 7, 51, "Input",
+Cell[11128, 396, 335, 11, 52, "Input",
CellTags->"Convolute",
CellID->640655392],
-Cell[9033, 331, 355, 12, 63, "Output",
- CellTags->"Convolute",
- CellID->1663091308]
+Cell[11466, 409, 291, 10, 55, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9425, 348, 246, 9, 51, "Input",
+Cell[11794, 424, 384, 13, 52, "Input",
CellTags->"Convolute",
CellID->440037844],
-Cell[9674, 359, 405, 14, 68, "Output",
- CellTags->"Convolute",
- CellID->1364104380]
+Cell[12181, 439, 341, 12, 60, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10116, 378, 208, 7, 27, "Input",
+Cell[12559, 456, 344, 11, 29, "Input",
CellTags->"Convolute",
CellID->151808165],
-Cell[10327, 387, 386, 14, 36, "Output",
- CellTags->"Convolute",
- CellID->461576513]
+Cell[12906, 469, 322, 11, 37, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10750, 406, 236, 8, 27, "Input",
+Cell[13265, 485, 372, 12, 29, "Input",
CellTags->"Convolute",
CellID->1563371513],
-Cell[10989, 416, 395, 14, 36, "Output",
- CellTags->"Convolute",
- CellID->535701029]
+Cell[13640, 499, 330, 11, 37, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11421, 435, 257, 9, 51, "Input",
+Cell[14007, 515, 395, 13, 52, "Input",
CellTags->"Convolute",
CellID->1082077962],
-Cell[11681, 446, 414, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->1354192503]
+Cell[14405, 530, 351, 12, 56, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12132, 465, 283, 10, 51, "Input",
+Cell[14793, 547, 422, 14, 52, "Input",
CellTags->"Convolute",
CellID->1247483115],
-Cell[12418, 477, 424, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->1318550208]
+Cell[15218, 563, 361, 12, 56, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12879, 496, 259, 9, 52, "Input",
+Cell[15616, 580, 397, 13, 53, "Input",
CellTags->"Convolute",
CellID->2055743895],
-Cell[13141, 507, 423, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->539579261]
+Cell[16016, 595, 361, 12, 56, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13601, 526, 210, 7, 27, "Input",
+Cell[16414, 612, 346, 11, 29, "Input",
CellTags->"Convolute",
CellID->1292595425],
-Cell[13814, 535, 370, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->278611380]
+Cell[16763, 625, 292, 11, 39, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14221, 553, 209, 7, 27, "Input",
+Cell[17092, 641, 345, 11, 29, "Input",
CellTags->"Convolute",
CellID->342391696],
-Cell[14433, 562, 396, 14, 36, "Output",
- CellTags->"Convolute",
- CellID->1414596566]
+Cell[17440, 654, 331, 11, 37, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14866, 581, 280, 10, 52, "Input",
+Cell[17808, 670, 419, 14, 53, "Input",
CellTags->"Convolute",
CellID->1164478774],
-Cell[15149, 593, 466, 16, 68, "Output",
- CellTags->"Convolute",
- CellID->1346944538]
+Cell[18230, 686, 369, 13, 64, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15652, 614, 184, 6, 27, "Input",
+Cell[18636, 704, 319, 10, 29, "Input",
CellTags->"Convolute",
CellID->260971955],
-Cell[15839, 622, 361, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->552984683]
+Cell[18958, 716, 268, 10, 39, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16237, 640, 214, 7, 27, "Input",
+Cell[19263, 731, 350, 11, 29, "Input",
CellTags->"Convolute",
CellID->935305016],
-Cell[16454, 649, 397, 14, 39, "Output",
- CellTags->"Convolute",
- CellID->1685360392]
+Cell[19616, 744, 318, 12, 39, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16888, 668, 230, 8, 51, "Input",
+Cell[19971, 761, 367, 12, 52, "Input",
CellTags->"Convolute",
CellID->63581574],
-Cell[17121, 678, 388, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->1099451359]
+Cell[20341, 775, 293, 10, 59, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17546, 696, 233, 8, 52, "Input",
+Cell[20671, 790, 370, 12, 53, "Input",
CellTags->"Convolute",
CellID->1271585721],
-Cell[17782, 706, 388, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->2099236631]
+Cell[21044, 804, 293, 10, 59, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18207, 724, 257, 9, 51, "Input",
+Cell[21374, 819, 395, 13, 52, "Input",
CellTags->"Convolute",
CellID->1377475961],
-Cell[18467, 735, 398, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->1161095845]
+Cell[21772, 834, 319, 11, 59, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18902, 753, 233, 8, 52, "Input",
+Cell[22128, 850, 370, 12, 53, "Input",
CellTags->"Convolute",
CellID->2045548358],
-Cell[19138, 763, 398, 13, 63, "Output",
- CellTags->"Convolute",
- CellID->1817134078]
+Cell[22501, 864, 319, 11, 59, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19573, 781, 210, 7, 27, "Input",
+Cell[22857, 880, 346, 11, 29, "Input",
CellTags->"Convolute",
CellID->1793379008],
-Cell[19786, 790, 371, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->1394422583]
+Cell[23206, 893, 292, 11, 39, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20194, 808, 185, 6, 27, "Input",
+Cell[23535, 909, 320, 10, 29, "Input",
CellTags->"Convolute",
CellID->1760428538],
-Cell[20382, 816, 370, 13, 36, "Output",
- CellTags->"Convolute",
- CellID->395731069]
+Cell[23858, 921, 292, 11, 39, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20789, 834, 305, 11, 52, "Input",
+Cell[24187, 937, 445, 15, 53, "Input",
CellTags->"Convolute",
CellID->379553048],
-Cell[21097, 847, 493, 17, 68, "Output",
- CellTags->"Convolute",
- CellID->1955426678]
+Cell[24635, 954, 429, 15, 61, "Output",
+ CellTags->"Convolute"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21627, 869, 315, 11, 52, "Input",
+Cell[25101, 974, 455, 15, 53, "Input",
CellTags->"Convolute",
CellID->1743318528],
-Cell[21945, 882, 441, 15, 66, "Output",
- CellTags->"Convolute",
- CellID->2109333521]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[22423, 902, 264, 9, 52, "Input",
- CellTags->"Convolute",
- CellID->1987067231],
-Cell[22690, 913, 380, 14, 63, "Output",
- CellTags->"Convolute",
- CellID->1326268935]
+Cell[25559, 991, 378, 13, 59, "Output",
+ CellTags->"Convolute"]
}, Open ]]
}, Open ]],
-Cell[23097, 931, 31, 0, 29, "SectionFooterSpacer"]
+Cell[25964, 1008, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23165, 936, 270, 12, 31, "SeeAlsoSection",
+Cell[26032, 1013, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[23438, 950, 429, 15, 31, "Text",
- CellTags->"Convolute",
- CellID->573828711]
+Cell[26305, 1027, 388, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[23882, 968, 23, 0, 42, "FooterCell"]
+Cell[26708, 1043, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ConvoluteTable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ConvoluteTable.nb
index 7f0ece2c9..9aa4df2e9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ConvoluteTable.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ConvoluteTable.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11387, 394]
-NotebookOptionsPosition[ 6996, 256]
-NotebookOutlinePosition[ 9982, 341]
-CellTagsIndexPosition[ 9866, 335]
+NotebookDataLength[ 13092, 448]
+NotebookOptionsPosition[ 8756, 315]
+NotebookOutlinePosition[ 11603, 394]
+CellTagsIndexPosition[ 11485, 388]
WindowTitle->ConvoluteTable
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ConvoluteTable\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ConvoluteTable"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PlusDistribution\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PlusDistribution"], "\<\"Convolute\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Convolute"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ConvoluteTable\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ConvoluteTable"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ConvoluteTable.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$31794],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ConvoluteTable", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$46887],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ConvoluteTable", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ ConvoluteTable.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ConvoluteTable", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ConvoluteTable", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -94,39 +130,40 @@ Convolute."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->589697723],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->457681475],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1106656784],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Convolute", "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[1]:=",
+ CellLabel->"In[521]:=",
CellID->1127190721],
Cell[BoxData[
@@ -141,35 +178,62 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{440, 15},
+ ImageSize->{398, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ConvoluteTable",
- CellLabel->"Out[1]=",
- CellID->1360987202]
+ CellLabel->"Out[521]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->451857424],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->142666285],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"ConvoluteTable", "[",
- RowBox[{"1", ",", "1"}], "]"}]], "Input",
+ RowBox[{"1", ",", "1", ",", "x"}], "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1383961976],
Cell[BoxData[
FormBox[
RowBox[{"-",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x45\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{119, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ConvoluteTable",
- CellLabel->"Out[2]=",
- CellID->1197018632]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -178,40 +242,37 @@ Cell[BoxData[
RowBox[{"ConvoluteTable", "[",
RowBox[{"x", ",", "x"}], "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->783988219],
Cell[BoxData[
FormBox[
RowBox[{"False", "[",
RowBox[{"x", ",", "x"}], "]"}], TraditionalForm]], "Output",
- ImageSize->{74, 15},
+ ImageSize->{76, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ConvoluteTable",
- CellLabel->"Out[3]=",
- CellID->289063823]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ConvoluteTable", "[",
- RowBox[{"1", ",", "x"}], "]"}]], "Input",
+ RowBox[{"1", ",", "x", ",", "x"}], "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1430786364],
Cell[BoxData[
FormBox[
- RowBox[{"False", "[",
- RowBox[{"1", ",", "x"}], "]"}], TraditionalForm]], "Output",
- ImageSize->{72, 15},
+ RowBox[{"1", "-", "x"}], TraditionalForm]], "Output",
+ ImageSize->{38, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ConvoluteTable",
- CellLabel->"Out[4]=",
- CellID->1781441936]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -247,9 +308,7 @@ Cell[TextData[{
ButtonNote->"Convolute"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ConvoluteTable",
- CellID->538606169]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -266,22 +325,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 15.776979}",
+ "built" -> "{2020, 1, 5, 18, 53, 41.543434}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"ConvoluteTable[f, g, x] yields the convolution of f and g. \
-ConvoluteTable is called by Convolute.", "synonyms" -> {}, "title" ->
- "ConvoluteTable", "titlemodifier" -> "", "windowtitle" ->
+ConvoluteTable is called by Convolute.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ConvoluteTable", "titlemodifier" -> "", "windowtitle" ->
"ConvoluteTable", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ConvoluteTable"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -289,8 +348,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -298,104 +358,98 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3415, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->589697723]},
"ConvoluteTable"->{
- Cell[4048, 125, 141, 4, 27, "Input",
+ Cell[5337, 162, 143, 4, 70, "Input",
CellTags->"ConvoluteTable",
CellID->1127190721],
- Cell[4192, 131, 512, 17, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->1360987202],
- Cell[4741, 153, 163, 5, 27, "Input",
+ Cell[5483, 168, 493, 16, 37, "Output",
+ CellTags->"ConvoluteTable"],
+ Cell[6669, 220, 173, 5, 27, "Input",
CellTags->"ConvoluteTable",
CellID->1383961976],
- Cell[4907, 160, 312, 11, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->1197018632],
- Cell[5256, 176, 162, 5, 27, "Input",
+ Cell[6845, 227, 244, 8, 37, "Output",
+ CellTags->"ConvoluteTable"],
+ Cell[7126, 240, 162, 5, 27, "Input",
CellTags->"ConvoluteTable",
CellID->783988219],
- Cell[5421, 183, 271, 9, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->289063823],
- Cell[5729, 197, 163, 5, 27, "Input",
+ Cell[7291, 247, 251, 8, 35, "Output",
+ CellTags->"ConvoluteTable"],
+ Cell[7579, 260, 173, 5, 27, "Input",
CellTags->"ConvoluteTable",
CellID->1430786364],
- Cell[5895, 204, 272, 9, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->1781441936],
- Cell[6535, 236, 419, 15, 31, "Text",
- CellTags->"ConvoluteTable",
- CellID->538606169]}
+ Cell[7755, 267, 218, 7, 35, "Output",
+ CellTags->"ConvoluteTable"]},
+ "PrimaryExamplesSection"->{
+ Cell[6037, 191, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->451857424]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8853, 300},
- {"ConvoluteTable", 8993, 304}
+ {"ConvoluteTable", 10648, 360},
+ {"PrimaryExamplesSection", 11342, 381}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3138, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 472, 14, 82, "Usage",
- CellID->982511436],
+Cell[3727, 99, 291, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3415, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->589697723],
+Cell[4043, 114, 472, 14, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3827, 115, 196, 6, 25, "ExampleSection",
- CellID->1106656784],
+Cell[4540, 132, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->457681475],
+Cell[5281, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4048, 125, 141, 4, 27, "Input",
+Cell[5337, 162, 143, 4, 70, "Input",
CellTags->"ConvoluteTable",
CellID->1127190721],
-Cell[4192, 131, 512, 17, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->1360987202]
+Cell[5483, 168, 493, 16, 37, "Output",
+ CellTags->"ConvoluteTable"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4741, 153, 163, 5, 27, "Input",
+Cell[6037, 191, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->451857424],
+Cell[CellGroupData[{
+Cell[6449, 210, 195, 6, 26, "ExampleSection",
+ CellID->142666285],
+Cell[CellGroupData[{
+Cell[6669, 220, 173, 5, 27, "Input",
CellTags->"ConvoluteTable",
CellID->1383961976],
-Cell[4907, 160, 312, 11, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->1197018632]
+Cell[6845, 227, 244, 8, 37, "Output",
+ CellTags->"ConvoluteTable"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5256, 176, 162, 5, 27, "Input",
+Cell[7126, 240, 162, 5, 27, "Input",
CellTags->"ConvoluteTable",
CellID->783988219],
-Cell[5421, 183, 271, 9, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->289063823]
+Cell[7291, 247, 251, 8, 35, "Output",
+ CellTags->"ConvoluteTable"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5729, 197, 163, 5, 27, "Input",
+Cell[7579, 260, 173, 5, 27, "Input",
CellTags->"ConvoluteTable",
CellID->1430786364],
-Cell[5895, 204, 272, 9, 36, "Output",
- CellTags->"ConvoluteTable",
- CellID->1781441936]
+Cell[7755, 267, 218, 7, 35, "Output",
+ CellTags->"ConvoluteTable"]
}, Open ]]
}, Open ]],
-Cell[6194, 217, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8000, 278, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6262, 222, 270, 12, 31, "SeeAlsoSection",
+Cell[8068, 283, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6535, 236, 419, 15, 31, "Text",
- CellTags->"ConvoluteTable",
- CellID->538606169]
+Cell[8341, 297, 373, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[6969, 254, 23, 0, 42, "FooterCell"]
+Cell[8729, 313, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterT.nb
index f66ab62e9..b71a3dbe9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterT.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13591, 458]
-NotebookOptionsPosition[ 10463, 363]
-NotebookOutlinePosition[ 12829, 429]
-CellTagsIndexPosition[ 12717, 423]
+NotebookDataLength[ 13849, 459]
+NotebookOptionsPosition[ 10917, 372]
+NotebookOutlinePosition[ 13159, 434]
+CellTagsIndexPosition[ 13047, 428]
WindowTitle->CounterT
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CounterT\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CounterT"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/CounterT.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CounterTerm\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CounterTerm"], "\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"QuarkPropagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuarkPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CounterT\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CounterT"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/CounterT.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$32472],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CounterT", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$47766],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CounterT", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CounterT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CounterT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->771362176],
+ CellID->236252029],
Cell[CellGroupData[{
@@ -117,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1163533640],
+ CellID->2042467455],
Cell[CellGroupData[{
@@ -155,32 +191,24 @@ Cell[BoxData[
RowBox[{
FractionBox[
RowBox[{"10", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"], "-",
RowBox[{
FractionBox["10", "3"], " ",
SuperscriptBox[
@@ -188,22 +216,16 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], "+",
FractionBox[
@@ -230,89 +252,78 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
FractionBox[
RowBox[{"4", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"]}], ")"}]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], ")"}]}], "-",
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]}]], " ",
- FormBox[
+ FormBox[
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{406, 166},
+ TraditionalForm]}]]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{424, 176},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CounterT",
- CellLabel->"Out[1]=",
- CellID->1579672535]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -354,9 +365,7 @@ Cell[TextData[{
ButtonNote->"QuarkPropagator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CounterT",
- CellID->1128461713]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -373,21 +382,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 18.762961}",
+ "built" -> "{2020, 1, 5, 18, 53, 43.977584}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"CounterT is a factor used by GluonPropagator and QuarkPropagator when \
-CounterTerms is set to All.", "synonyms" -> {}, "title" -> "CounterT",
- "titlemodifier" -> "", "windowtitle" -> "CounterT", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/CounterT"}, "SearchTextTranslated" -> ""},
+CounterTerms is set to All.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CounterT", "titlemodifier" -> "", "windowtitle" -> "CounterT", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/CounterT"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -396,7 +405,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -405,61 +414,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3307, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4520, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->771362176]},
+ CellID->236252029]},
"CounterT"->{
- Cell[3940, 123, 302, 7, 27, "Input",
+ Cell[5153, 159, 302, 7, 27, "Input",
CellTags->"CounterT",
CellID->505594925],
- Cell[4245, 132, 5211, 182, 187, "Output",
- CellTags->"CounterT",
- CellID->1579672535],
- Cell[9824, 337, 597, 21, 32, "Text",
- CellTags->"CounterT",
- CellID->1128461713]}
+ Cell[5458, 168, 4493, 157, 197, "Output",
+ CellTags->"CounterT"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12291, 406},
- {"CounterT", 12425, 410}
+ {"PrimaryExamplesSection", 12731, 415},
+ {"CounterT", 12866, 419}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3223, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 401, 12, 82, "Usage",
+Cell[3806, 101, 285, 11, 45, "ObjectNameGrid"],
+Cell[4094, 114, 401, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3307, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4520, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->771362176],
+ CellID->236252029],
Cell[CellGroupData[{
-Cell[3719, 113, 196, 6, 25, "ExampleSection",
- CellID->1163533640],
+Cell[4932, 149, 196, 6, 26, "ExampleSection",
+ CellID->2042467455],
Cell[CellGroupData[{
-Cell[3940, 123, 302, 7, 27, "Input",
+Cell[5153, 159, 302, 7, 27, "Input",
CellTags->"CounterT",
CellID->505594925],
-Cell[4245, 132, 5211, 182, 187, "Output",
- CellTags->"CounterT",
- CellID->1579672535]
+Cell[5458, 168, 4493, 157, 197, "Output",
+ CellTags->"CounterT"]
}, Open ]]
}, Open ]],
-Cell[9483, 318, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9978, 329, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9551, 323, 270, 12, 31, "SeeAlsoSection",
+Cell[10046, 334, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9824, 337, 597, 21, 32, "Text",
- CellTags->"CounterT",
- CellID->1128461713]
+Cell[10319, 348, 556, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[10436, 361, 23, 0, 42, "FooterCell"]
+Cell[10890, 370, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterTerm.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterTerm.nb
index 3040b7fd4..4d063948b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterTerm.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CounterTerm.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10340, 337]
-NotebookOptionsPosition[ 7113, 241]
-NotebookOutlinePosition[ 9571, 308]
-CellTagsIndexPosition[ 9458, 302]
+NotebookDataLength[ 13309, 437]
+NotebookOptionsPosition[ 9882, 335]
+NotebookOutlinePosition[ 12276, 400]
+CellTagsIndexPosition[ 12161, 394]
WindowTitle->CounterTerm
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CounterTerm\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CounterTerm"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CounterT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CounterT"], "\<\"QuarkGluonVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QuarkGluonVertex"], "\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"QuarkPropagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuarkPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CounterTerm\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CounterTerm"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
CounterTerm.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$32134],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CounterTerm", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$47327],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CounterTerm", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,20 @@ CounterTerm.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CounterTerm", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CounterTerm", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +132,64 @@ Feynman rule functions QuarkGluonVertex, GluonPropagator, QuarkPropagator."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1552110904],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CounterTerm", "]"}]], "Input",
+ CellLabel->"In[527]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm], "+", "4"}]}], ",",
+ RowBox[{"Gauge", "\[Rule]", "1"}], ",",
+ RowBox[{"QuarkMass", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"M\"\>", ")"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{509, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[527]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +205,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1082407525],
+ CellID->1280424743],
Cell[CellGroupData[{
@@ -118,7 +215,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->460002954],
+ CellID->271611959],
Cell[CellGroupData[{
@@ -179,12 +276,11 @@ Cell[BoxData[
SuperscriptBox["\[Pi]", "2"], " ",
TagBox["\[CurlyEpsilon]",
TraditionalForm]}]], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{483, 91},
+ ImageSize->{502, 148},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CounterTerm",
- CellLabel->"Out[1]=",
- CellID->1407493113]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -232,17 +328,15 @@ Cell[TextData[{
ButtonNote->"QuarkPropagator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CounterTerm",
- CellID->257706146]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"CounterTerm",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -251,10 +345,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 17.175146}",
+ "built" -> "{2020, 1, 5, 18, 53, 42.808951}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -262,11 +356,12 @@ TaggingRules->{
"None", "summary" ->
"CounterTerm[name] is a database of counter terms. CounterTerm is also an \
option for the Feynman rule functions QuarkGluonVertex, GluonPropagator, \
-QuarkPropagator.", "synonyms" -> {}, "title" -> "CounterTerm",
- "titlemodifier" -> "", "windowtitle" -> "CounterTerm", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/CounterTerm"}, "SearchTextTranslated" -> ""},
+QuarkPropagator.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CounterTerm", "titlemodifier" -> "", "windowtitle" -> "CounterTerm",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/CounterTerm"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -274,8 +369,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -284,61 +380,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3420, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6252, 192, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1082407525]},
+ CellID->1280424743]},
"CounterTerm"->{
- Cell[4053, 124, 135, 4, 27, "Input",
+ Cell[6885, 221, 135, 4, 27, "Input",
CellTags->"CounterTerm",
CellID->1995023941],
- Cell[4191, 130, 1739, 56, 112, "Output",
- CellTags->"CounterTerm",
- CellID->1407493113],
- Cell[6298, 209, 773, 27, 32, "Text",
- CellTags->"CounterTerm",
- CellID->257706146]}
+ Cell[7023, 227, 1719, 55, 115, "Output",
+ CellTags->"CounterTerm"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9020, 285},
- {"CounterTerm", 9158, 289}
+ {"PrimaryExamplesSection", 11835, 381},
+ {"CounterTerm", 11974, 385}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3332, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 495, 13, 97, "Usage",
+Cell[3918, 102, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4231, 117, 495, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3420, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4751, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1552110904],
+Cell[5493, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5549, 164, 95, 2, 70, "Input"],
+Cell[5647, 168, 544, 17, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6252, 192, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1082407525],
+ CellID->1280424743],
Cell[CellGroupData[{
-Cell[3833, 114, 195, 6, 25, "ExampleSection",
- CellID->460002954],
+Cell[6665, 211, 195, 6, 26, "ExampleSection",
+ CellID->271611959],
Cell[CellGroupData[{
-Cell[4053, 124, 135, 4, 27, "Input",
+Cell[6885, 221, 135, 4, 27, "Input",
CellTags->"CounterTerm",
CellID->1995023941],
-Cell[4191, 130, 1739, 56, 112, "Output",
- CellTags->"CounterTerm",
- CellID->1407493113]
+Cell[7023, 227, 1719, 55, 115, "Output",
+ CellTags->"CounterTerm"]
}, Open ]]
}, Open ]],
-Cell[5957, 190, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8769, 286, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6025, 195, 270, 12, 31, "SeeAlsoSection",
+Cell[8837, 291, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6298, 209, 773, 27, 32, "Text",
- CellTags->"CounterTerm",
- CellID->257706146]
+Cell[9110, 305, 730, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[7086, 239, 23, 0, 42, "FooterCell"]
+Cell[9855, 333, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CouplingConstant.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CouplingConstant.nb
index a81ded32b..62e48f34e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CouplingConstant.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CouplingConstant.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7558, 214]
-NotebookOptionsPosition[ 4773, 140]
-NotebookOutlinePosition[ 7287, 203]
-CellTagsIndexPosition[ 7209, 198]
+NotebookDataLength[ 8773, 265]
+NotebookOptionsPosition[ 6460, 200]
+NotebookOutlinePosition[ 8319, 249]
+CellTagsIndexPosition[ 8276, 246]
WindowTitle->CouplingConstant
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CouplingConstant\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CouplingConstant"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CovariantD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CovariantD"], "\<\"FieldStrength\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FieldStrength"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/CouplingConstant\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CouplingConstant"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
CouplingConstant.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$32809],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CouplingConstant", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$48204],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CouplingConstant", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,21 +96,24 @@ CouplingConstant.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CouplingConstant", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CouplingConstant", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["CouplingConstant"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for several Feynman rule functions and for CovariantD and \
-FieldStrength.\nIn the convention of the subpackage PHI, CouplingConstant is \
-also the head of coupling constants. CouplingConstant takes three extra \
-optional arguments, with head RenormalizationState, RenormalizationScheme and \
-ExpansionState respectively. E.g. CouplingConstant[QED[1]] is the unit \
-charge, CouplingConstant[ChPT2[4],1] is the first of the coupling constants \
-of the lagrangian ChPT2[4]. CouplingConstant[a_,b_,c___][i_] := \
-CouplingConstant[a,b,RenormalizationState[i],c]."
+ " \[LineSeparator]is an option for several Feynman rule functions and \
+for CovariantD and FieldStrength."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -98,6 +124,48 @@ CouplingConstant[a,b,RenormalizationState[i],c]."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+In the convention of the subpackage PHI, CouplingConstant is also the head of \
+coupling constants. CouplingConstant takes three extra optional arguments, \
+with head RenormalizationState, RenormalizationScheme and ExpansionState \
+respectively. E.g. CouplingConstant[QED[1]] is the unit charge, \
+CouplingConstant[ChPT2[4],1] is the first of the coupling constants of the \
+lagrangian ChPT2[4]. CouplingConstant[a_,b_,c___][i_] := \
+CouplingConstant[a,b,RenormalizationState[i],c].\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -124,16 +192,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/FieldStrength",
ButtonNote->"FieldStrength"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["\"PHI - A Mathematica package for ChPT calculations\"",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/phi",
- ButtonNote->"phi"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CouplingConstant",
- CellID->1805142582]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -150,29 +210,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 20.280403}",
+ "built" -> "{2020, 1, 5, 18, 53, 45.220402}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"CouplingConstant is an option for several Feynman rule functions and for \
-CovariantD and FieldStrength. In the convention of the subpackage PHI, \
-CouplingConstant is also the head of coupling constants. CouplingConstant \
-takes three extra optional arguments, with head RenormalizationState, \
-RenormalizationScheme and ExpansionState respectively. E.g. \
-CouplingConstant[QED[1]] is the unit charge, CouplingConstant[ChPT2[4],1] is \
-the first of the coupling constants of the lagrangian ChPT2[4]. \
-CouplingConstant[a_,b_,c___][i_] := \
-CouplingConstant[a,b,RenormalizationState[i],c].", "synonyms" -> {}, "title" ->
+CovariantD and FieldStrength.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"CouplingConstant", "titlemodifier" -> "", "windowtitle" ->
"CouplingConstant", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/CouplingConstant"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -181,41 +234,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "CouplingConstant"->{
- Cell[4121, 114, 610, 21, 70, "Text",
- CellTags->"CouplingConstant",
- CellID->1805142582]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"CouplingConstant", 7089, 191}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 70, "AnchorBarGrid",
+Cell[588, 21, 3134, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 893, 18, 70, "Usage",
+Cell[3725, 98, 293, 11, 70, "ObjectNameGrid"],
+Cell[4021, 111, 397, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3848, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[4443, 126, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5176, 152, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5210, 154, 531, 9, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5778, 168, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4121, 114, 610, 21, 70, "Text",
- CellTags->"CouplingConstant",
- CellID->1805142582]
+Cell[6051, 182, 367, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4746, 138, 23, 0, 70, "FooterCell"]
+Cell[6433, 198, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantD.nb
index 3ce4b7da9..1212a9291 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantD.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 44038, 1552]
-NotebookOptionsPosition[ 33192, 1206]
-NotebookOutlinePosition[ 39872, 1391]
-CellTagsIndexPosition[ 39756, 1385]
+NotebookDataLength[ 46324, 1621]
+NotebookOptionsPosition[ 36914, 1328]
+NotebookOutlinePosition[ 42415, 1476]
+CellTagsIndexPosition[ 42299, 1470]
WindowTitle->CovariantD
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$33159],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$48725],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/CovariantD", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,75 +74,180 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CovariantD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CovariantD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"CovariantD", "[", "mu", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a generic covariant derivative with Lorentz index mu. With the \
-option-setting Explicit \[Rule] True, an explicit expression for a fermionic \
-field is returned, depending on the setting on the other options.\n\
-CovariantD[x, mu] is a generic covariant derivative with respect to x^mu.\n\
-CovariantD[mu, a, b] is a covariant derivative for a bosonic field; acting on \
-QuantumField[f,{},{a,b}], where f is some field name and a and b are two \
-SU(N) indices. Again, with the option-setting Explicit \[Rule] True, an \
-explicit expression is returned, depending on the setting on the other \
-options.\nCovariantD[OPEDelta, a, b] is a short form for \
-CovariantD[mu,a,b]*FourVector[OPEDelta, mu]. CovariantD[{OPEDelta, a, b}, \
-{n}] yields the product of n operators, where n is an integer. \
-CovariantD[OPEDelta, a, b, {m, n}] gives the expanded form of \
-CovariantD[OPEDelta, a, b]^m up to order g^n for the gluon, where n is an \
-integer and g the coupling constant indicated by the setting of the option \
-CouplingConstant. CovariantD[OPEDelta, {m, n}] gives the expanded form of \
-CovariantD[OPEDelta]^m up to order g^n of the fermionic field.\n\n Possible \
-settings of PartialD are: LeftPartialD, LeftRigthPartialD, RightPartialD. The \
-default setting of QuantumField is GaugeField."
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a generic covariant derivative with Lorentz index \
+\[Mu]."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"x", ",", "\[Mu]"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a generic covariant derivative with respect to ",
+ Cell[BoxData[
+ SuperscriptBox["x", "\[Mu]"]], "InlineFormula"],
+ "."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"\[Mu]", ",", "a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a covariant derivative for a bosonic field that \
+acts on ",
+ Cell[BoxData[
+ RowBox[{"QuantumField", "[",
+ RowBox[{"f", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "InlineFormula"],
+ ", where ",
+ Cell[BoxData["f"], "InlineFormula"],
+ " is some field name and ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " are two ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " indices in the adjoint representation."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", "a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a short form for ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"CovariantD", "[",
+ RowBox[{"\[Mu]", ",", "a", ",", "b"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"OPEDelta", ",", " ", "\[Mu]"}], "]"}]}]], "InlineFormula"],
+ "."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"OPEDelta", ",", "a", ",", "b"}], "}"}], ",",
+ RowBox[{"{", "n", "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the product of ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " operators, where ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " is an integer."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "n"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]gives the expanded form of ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", " ", "a", ",", " ", "b"}], "]"}], "^",
+ "m"}]], "InlineFormula"],
+ " up to order ",
+ Cell[BoxData[
+ RowBox[{"g", "^", "n"}]], "InlineFormula"],
+ " for the gluon, where ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " is an integer and ",
+ Cell[BoxData["g"], "InlineFormula"],
+ " the coupling constant indicated by the setting of the option ",
+ ButtonBox["CouplingConstant.",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"]
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "n"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]gives the expanded form of ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"CovariantD", "[", "OPEDelta", "]"}], "^", "m"}]],
+ "InlineFormula"],
+ " up to order ",
+ Cell[BoxData[
+ RowBox[{"g", "^", "n"}]], "InlineFormula"],
+ " of the fermionic field."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {},
+ "Rows" -> {None, None, None, None, None, None, {None}},
+ "RowsIndexed" -> {}}}],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1373495983],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->29485513],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1713288696],
+ "To obtain the explicit expression for a particular covariant derivatine, \
+the option ",
+ Cell[BoxData["Explicit"], "InlineFormula"],
+ " must be set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "CovariantD", "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[1]:=",
+ CellLabel->"In[211]:=",
CellID->1136125130],
Cell[BoxData[
@@ -155,20 +261,50 @@ Cell[BoxData[
RowBox[{"FCPartialD", "\[Rule]", "RightPartialD"}], ",",
RowBox[{"QuantumField", "\[Rule]", "A"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{435, 35},
+ ImageSize->{409, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[1]=",
- CellID->580865857]
+ CellLabel->"Out[211]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->691651515],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->769036159],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"CovariantD", "[", "\[Mu]", "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->691762283],
Cell[BoxData[
@@ -176,12 +312,11 @@ Cell[BoxData[
SubscriptBox["D",
FormBox["\[Mu]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 18},
+ ImageSize->{25, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[2]=",
- CellID->1727860547]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -190,7 +325,7 @@ Cell[BoxData[
RowBox[{"CovariantD", "[",
RowBox[{"\[Mu]", ",", "a", ",", "b"}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->631235757],
Cell[BoxData[
@@ -203,12 +338,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{35, 23},
+ ImageSize->{41, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[3]=",
- CellID->78914476]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -218,7 +352,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1730385129],
Cell[BoxData[
@@ -235,7 +369,7 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["T",
FormBox[
- FormBox["c48",
+ FormBox["c24",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -246,30 +380,52 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c48",
+ FormBox["c24",
TraditionalForm],
TraditionalForm]]}]}]}], TraditionalForm]], "Output",
- ImageSize->{127, 28},
+ ImageSize->{135, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[4]=",
- CellID->606796247]
+ CellLabel->"Out[3]="]
}, Open ]],
-Cell["\<\
-The first argument of CovariantD is intepreted as type LorentzIndex, except \
-for OPEDelta, which is type Momentum.\
-\>", "Text",
- CellTags->"CovariantD",
- CellID->1590488263],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The first argument of ",
+ ButtonBox["CovariantD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CovariantD",
+ ButtonNote->"CovariantD"],
+ " is intepreted as type ",
+ ButtonBox["LorentzIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
+ ButtonNote->"LorentzIndex"],
+ ", except for ",
+ ButtonBox["OPEDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/OPEDelta",
+ ButtonNote->"OPEDelta"],
+ ", which is type ",
+ ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Momentum",
+ ButtonNote->"Momentum"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CovariantD", "[", "OPEDelta", "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->1980257576],
Cell[BoxData[
@@ -277,12 +433,11 @@ Cell[BoxData[
SubscriptBox["D",
FormBox["\[CapitalDelta]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{25, 15},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[5]=",
- CellID->855697737]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -291,7 +446,7 @@ Cell[BoxData[
RowBox[{"CovariantD", "[",
RowBox[{"OPEDelta", ",", "a", ",", "b"}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[6]:=",
+ CellLabel->"In[2]:=",
CellID->840690314],
Cell[BoxData[
@@ -304,12 +459,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{35, 21},
+ ImageSize->{41, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[6]=",
- CellID->1737264679]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -319,7 +473,7 @@ Cell[BoxData[
RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[7]:=",
+ CellLabel->"In[3]:=",
CellID->82457380],
Cell[BoxData[
@@ -348,7 +502,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c49",
+ FormBox["c25",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
@@ -357,14 +511,13 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm],
- FormBox["c49",
+ FormBox["c25",
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{171, 26},
+ ImageSize->{182, 23},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[7]=",
- CellID->1504792083]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -374,7 +527,7 @@ Cell[BoxData[
RowBox[{"OPEDelta", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[8]:=",
+ CellLabel->"In[4]:=",
CellID->570341066],
Cell[BoxData[
@@ -391,7 +544,7 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["T",
FormBox[
- FormBox["c50",
+ FormBox["c26",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -402,15 +555,14 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c50",
+ FormBox["c26",
TraditionalForm],
TraditionalForm]]}]}]}], TraditionalForm]], "Output",
- ImageSize->{128, 26},
+ ImageSize->{135, 23},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[8]=",
- CellID->1269153146]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -420,7 +572,7 @@ Cell[BoxData[
RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
RowBox[{"{", "2", "}"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[9]:=",
+ CellLabel->"In[5]:=",
CellID->1557639505],
Cell[BoxData[
@@ -433,7 +585,7 @@ Cell[BoxData[
RowBox[{
FormBox["a",
TraditionalForm],
- FormBox["c51",
+ FormBox["c27",
TraditionalForm]}]], " ",
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -451,16 +603,16 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e52",
+ FormBox["e28",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
FormBox["a",
TraditionalForm],
- FormBox["c51",
+ FormBox["c27",
TraditionalForm],
- FormBox["e52",
+ FormBox["e28",
TraditionalForm]}]]}]}], ")"}], ".",
RowBox[{"(",
RowBox[{
@@ -469,7 +621,7 @@ Cell[BoxData[
RowBox[{
FormBox["b",
TraditionalForm],
- FormBox["c51",
+ FormBox["c27",
TraditionalForm]}]], " ",
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -487,32 +639,38 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e53",
+ FormBox["e29",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
- FormBox["c51",
+ FormBox["c27",
TraditionalForm],
FormBox["b",
TraditionalForm],
- FormBox["e53",
+ FormBox["e29",
TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{406, 34},
+ ImageSize->{421, 27},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[9]=",
- CellID->835776136]
+ CellLabel->"Out[5]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"This gives",
Cell[BoxData[
FormBox[
RowBox[{" ",
RowBox[{
- RowBox[{"m", " ", "times", " ",
+ RowBox[{"m", " ", "*", " ",
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"], "\[CapitalDelta]"]}],
",", " "}]}], TraditionalForm]]],
@@ -527,9 +685,7 @@ Cell[TextData[{
FormBox[
RowBox[{
SuperscriptBox["\[CapitalDelta]", "\[Mu]"], "."}], TraditionalForm]]]
-}], "Text",
- CellTags->"CovariantD",
- CellID->35437719],
+}], "Notes"],
Cell[CellGroupData[{
@@ -539,7 +695,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"OPEm", ",", "0"}], "}"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[10]:=",
+ CellLabel->"In[1]:=",
CellID->1826343413],
Cell[BoxData[
@@ -563,26 +719,32 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]], ")"}], "m"]}], TraditionalForm]], "Output",
- ImageSize->{83, 24},
+ ImageSize->{83, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[10]=",
- CellID->985234851]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"The expansion up to first order in the coupling constant ",
Cell[BoxData[
FormBox[
- RowBox[{
- SubscriptBox["g", "s"], " ",
- RowBox[{
- RowBox[{"(", "thesumistheFeynCalcOPESum", ")"}], "."}]}],
- TraditionalForm]]]
-}], "Text",
- CellTags->"CovariantD",
- CellID->745433336],
+ SubscriptBox["g", "s"], TraditionalForm]]],
+ " (the sum is the ",
+ ButtonBox["FeynCalcOPESum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynCalcOPESum",
+ ButtonNote->"FeynCalcOPESum"],
+ ")"
+}], "Notes"],
Cell[CellGroupData[{
@@ -592,7 +754,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"OPEm", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[11]:=",
+ CellLabel->"In[1]:=",
CellID->1721350899],
Cell[BoxData[
@@ -619,97 +781,7 @@ Cell[BoxData[
TraditionalForm]], ")"}], "m"]}], "-",
RowBox[{
SubscriptBox["g", "s"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}],
- RowBox[{
- RowBox[{"-", "1"}], "+", "m"}]],
- RowBox[{
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c63", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c63", "1"],
- TraditionalForm],
- TraditionalForm]}]]}]}],
- HoldForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{378, 47},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"CovariantD",
- CellLabel->"Out[11]=",
- CellID->1135690031]
-}, Open ]],
-
-Cell[TextData[{
- "The expansion up to second order in the ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["g", "s"], "."}], TraditionalForm]]]
-}], "Text",
- CellTags->"CovariantD",
- CellID->972705137],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"CovariantD", "[",
- RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
- RowBox[{"{",
- RowBox[{"OPEm", ",", "2"}], "}"}]}], "]"}]], "Input",
- CellTags->"CovariantD",
- CellLabel->"In[12]:=",
- CellID->1002319987],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{
- SubscriptBox["g", "s"], " ",
+ RowBox[{"(",
FormBox[
TagBox[
RowBox[{
@@ -736,7 +808,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- SubscriptBox["c71", "1"],
+ SubscriptBox["c47", "1"],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
@@ -761,116 +833,206 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- SubscriptBox["c71", "1"],
+ SubscriptBox["c47", "1"],
TraditionalForm],
TraditionalForm]}]]}]}],
HoldForm],
- TraditionalForm]}]}], "-",
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{404, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"CovariantD",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The expansion up to second order in the ",
+ Cell[BoxData[
+ FormBox[
RowBox[{
- SubsuperscriptBox["g", "s", "2"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"j", "=", "0"}],
+ SubscriptBox["g", "s"], "."}], TraditionalForm]]]
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
+ RowBox[{"{",
+ RowBox[{"OPEm", ",", "2"}], "}"}]}], "]"}]], "Input",
+ CellTags->"CovariantD",
+ CellLabel->"In[2]:=",
+ CellID->1002319987],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ RowBox[{"(",
+ FormBox[
+ TagBox[
RowBox[{
- RowBox[{"-", "2"}], "+", "m"}]],
- RowBox[{"(",
- FormBox[
- TagBox[
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}],
RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}], "j"],
- RowBox[{
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ RowBox[{"-", "1"}], "+", "m"}]],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c75", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "i"}], "+", "j"}]], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c55", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c55", "1"],
+ TraditionalForm],
+ TraditionalForm]}]]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}]}], "-",
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{"(",
+ FormBox[
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"j", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "m"}]],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}], "j"],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c59", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "i"}], "+", "j"}]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SubscriptBox["c75", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}],
+ SubscriptBox["c59", "2"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}], " ",
+ SuperscriptBox["f",
RowBox[{
- RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
FormBox[
- SubscriptBox["c75", "1"],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SubscriptBox["e74", "1"],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ SubscriptBox["c59", "1"],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SubscriptBox["c75", "2"],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ SubscriptBox["e58", "1"],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- SubscriptBox["e74", "1"],
- TraditionalForm],
- TraditionalForm]}]]}]}],
- HoldForm],
- TraditionalForm], ")"}]}],
- HoldForm],
- TraditionalForm]}], "+",
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c59", "2"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["e58", "1"],
+ TraditionalForm],
+ TraditionalForm]}]]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}], "+",
RowBox[{
SuperscriptBox["\[Delta]",
RowBox[{
@@ -890,12 +1052,11 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]], ")"}], "m"]}]}], TraditionalForm]], "Output",
- ImageSize->{545, 139},
+ ImageSize->{569, 135},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[12]=",
- CellID->483146070]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -905,7 +1066,7 @@ Cell[BoxData[
RowBox[{"CovariantD", "[",
RowBox[{"OPEDelta", ",", "a", ",", "b"}], "]"}], "OPEm"]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[13]:=",
+ CellLabel->"In[3]:=",
CellID->608320512],
Cell[BoxData[
@@ -920,12 +1081,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm]}]], ")"}], "m"], TraditionalForm]], "Output",
- ImageSize->{60, 25},
+ ImageSize->{66, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[13]=",
- CellID->260858844]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -936,7 +1096,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"OPEm", ",", "2"}], "}"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[14]:=",
+ CellLabel->"In[4]:=",
CellID->512528140],
Cell[BoxData[
@@ -945,136 +1105,141 @@ Cell[BoxData[
RowBox[{"-",
RowBox[{"\[ImaginaryI]", " ",
SubscriptBox["g", "s"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}],
- RowBox[{
- RowBox[{"-", "1"}], "+", "m"}]],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
RowBox[{
- SuperscriptBox["T",
- FormBox[
- FormBox[
- SubscriptBox["c84", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "m"}]],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c84", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox[
+ SubscriptBox["c68", "1"],
TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}]}],
- HoldForm],
- TraditionalForm]}]}], "-",
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}], " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox[
+ SubscriptBox["c68", "1"],
+ TraditionalForm],
+ TraditionalForm]]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}]}], "-",
RowBox[{
SubsuperscriptBox["g", "s", "2"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"j", "=", "0"}],
- RowBox[{
- RowBox[{"-", "2"}], "+", "m"}]],
- RowBox[{"(",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}], "j"],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"j", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "m"}]],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
RowBox[{
- SuperscriptBox["T",
- FormBox[
- FormBox[
- SubscriptBox["c88", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["T",
- FormBox[
- FormBox[
- SubscriptBox["c88", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}], "j"],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["T",
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox[
+ SubscriptBox["c72", "1"],
TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c88", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox[
+ SubscriptBox["c72", "2"],
TraditionalForm],
- TraditionalForm]], ")"}],
+ TraditionalForm]]}], " ",
RowBox[{
- RowBox[{"-", "i"}], "+", "j"}]], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c88", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}]}],
- HoldForm],
- TraditionalForm], ")"}]}],
- HoldForm],
- TraditionalForm]}], "+",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c72", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "i"}], "+", "j"}]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c72", "2"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}], "+",
SuperscriptBox[
RowBox[{"(",
SubscriptBox[
@@ -1083,12 +1248,11 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]], ")"}], "m"]}], TraditionalForm]], "Output",
- ImageSize->{527, 107},
+ ImageSize->{563, 106},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[14]=",
- CellID->2021495246]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1100,28 +1264,27 @@ Cell[BoxData[
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[15]:=",
+ CellLabel->"In[5]:=",
CellID->790160491],
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"-", "\[ImaginaryI]"}], " ", "Gstrong", " ",
+ RowBox[{"RightPartialD", "[",
+ RowBox[{"Momentum", "[", "OPEDelta", "]"}], "]"}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
RowBox[{"SUNT", "[",
- RowBox[{"SUNIndex", "[", "c91", "]"}], "]"}], ".",
+ RowBox[{"SUNIndex", "[", "c75", "]"}], "]"}], ".",
RowBox[{"QuantumField", "[",
RowBox[{"GaugeField", ",",
RowBox[{"Momentum", "[", "OPEDelta", "]"}], ",",
- RowBox[{"SUNIndex", "[", "c91", "]"}]}], "]"}]}]}], "+",
- RowBox[{"RightPartialD", "[",
- RowBox[{"Momentum", "[", "OPEDelta", "]"}], "]"}]}]], "Output",
- ImageSize->{517, 50},
+ RowBox[{"SUNIndex", "[", "c75", "]"}]}], "]"}]}], " ",
+ RowBox[{"SMP", "[", "\<\"g_s\"\>", "]"}]}]}]], "Output",
+ ImageSize->{384, 50},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[15]//StandardForm=",
- CellID->1789369971]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -1133,7 +1296,7 @@ Cell[BoxData[
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[16]:=",
+ CellLabel->"In[6]:=",
CellID->160329117],
Cell[BoxData[
@@ -1143,63 +1306,22 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], " ",
RowBox[{"SUNDelta", "[",
RowBox[{"a", ",", "b"}], "]"}]}], "-",
- RowBox[{"Gstrong", " ",
+ RowBox[{
RowBox[{"QuantumField", "[",
RowBox[{"GaugeField", ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"SUNIndex", "[", "c92", "]"}]}], "]"}], " ",
+ RowBox[{"SUNIndex", "[", "c76", "]"}]}], "]"}], " ",
+ RowBox[{"SMP", "[", "\<\"g_s\"\>", "]"}], " ",
RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c92"}], "]"}]}]}]], "Output",
- ImageSize->{527, 50},
+ RowBox[{"a", ",", "b", ",", "c76"}], "]"}]}]}]], "Output",
+ ImageSize->{469, 50},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantD",
- CellLabel->"Out[16]//StandardForm=",
- CellID->772324772]
+ CellLabel->"Out[6]//StandardForm="]
+}, Open ]]
+}, Open ]]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["LeftPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeftPartialD",
- ButtonNote->"LeftPartialD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["LeftRightPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeftRightPartialD",
- ButtonNote->"LeftRightPartialD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["RightPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/RightPartialD",
- ButtonNote->"RightPartialD"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"CovariantD",
- CellID->2075533712]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1216,38 +1338,32 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 21.534925}",
+ "built" -> "{2020, 1, 5, 18, 53, 46.547141}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "CovariantD[mu] is a generic covariant derivative with Lorentz index mu. \
-With the option-setting Explicit -> True, an explicit expression for a \
-fermionic field is returned, depending on the setting on the other options. \
-CovariantD[x, mu] is a generic covariant derivative with respect to x^mu. \
-CovariantD[mu, a, b] is a covariant derivative for a bosonic field; acting on \
-QuantumField[f,{},{a,b}], where f is some field name and a and b are two \
-SU(N) indices. Again, with the option-setting Explicit -> True, an explicit \
-expression is returned, depending on the setting on the other options. \
-CovariantD[OPEDelta, a, b] is a short form for \
-CovariantD[mu,a,b]*FourVector[OPEDelta, mu]. CovariantD[{OPEDelta, a, b}, \
-{n}] yields the product of n operators, where n is an integer. \
-CovariantD[OPEDelta, a, b, {m, n}] gives the expanded form of \
-CovariantD[OPEDelta, a, b]^m up to order g^n for the gluon, where n is an \
-integer and g the coupling constant indicated by the setting of the option \
-CouplingConstant. CovariantD[OPEDelta, {m, n}] gives the expanded form of \
-CovariantD[OPEDelta]^m up to order g^n of the fermionic field. Possible \
-settings of PartialD are: LeftPartialD, LeftRigthPartialD, RightPartialD. The \
-default setting of QuantumField is GaugeField.", "synonyms" -> {}, "title" ->
- "CovariantD", "titlemodifier" -> "", "windowtitle" -> "CovariantD",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/CovariantD"},
- "SearchTextTranslated" -> ""},
+ "CovariantD[\\[Mu]] is a generic covariant derivative with Lorentz index \
+\\[Mu]. CovariantD[x, \\[Mu]] is a generic covariant derivative with respect \
+to x^\\[Mu]. CovariantD[\\[Mu], a, b] is a covariant derivative for a bosonic \
+field that acts on QuantumField[f, {}, {a, b}], where f is some field name \
+and a and b are two SU (N) indices in the adjoint representation. \
+CovariantD[OPEDelta, a, b] is a short form for CovariantD[\\[Mu], a, b] \
+FV[OPEDelta, \\[Mu]]. CovariantD[{OPEDelta, a, b}, {n}] yields the product of \
+n operators, where n is an integer. CovariantD[OPEDelta, a, b, {m, n}] gives \
+the expanded form of CovariantD[OPEDelta, a, b]^m up to order g^n for the \
+gluon, where n is an integer and g the coupling constant indicated by the \
+setting of the option CouplingConstant. CovariantD[OPEDelta, {m, n}] gives \
+the expanded form of CovariantD[OPEDelta]^m up to order g^n of the fermionic \
+field.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "CovariantD",
+ "titlemodifier" -> "", "windowtitle" -> "CovariantD", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/CovariantD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1256,7 +1372,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1264,296 +1380,249 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4561, 111, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1373495983]},
"CovariantD"->{
- Cell[5195, 140, 138, 4, 27, "Input",
+ Cell[8076, 246, 140, 4, 70, "Input",
CellTags->"CovariantD",
CellID->1136125130],
- Cell[5336, 146, 547, 16, 56, "Output",
- CellTags->"CovariantD",
- CellID->580865857],
- Cell[5920, 167, 135, 4, 27, "Input",
+ Cell[8219, 252, 529, 15, 56, "Output",
+ CellTags->"CovariantD"],
+ Cell[9441, 303, 135, 4, 27, "Input",
CellTags->"CovariantD",
CellID->691762283],
- Cell[6058, 173, 272, 10, 39, "Output",
- CellTags->"CovariantD",
- CellID->1727860547],
- Cell[6367, 188, 168, 5, 27, "Input",
+ Cell[9579, 309, 251, 9, 39, "Output",
+ CellTags->"CovariantD"],
+ Cell[9867, 323, 168, 5, 27, "Input",
CellTags->"CovariantD",
CellID->631235757],
- Cell[6538, 195, 371, 15, 44, "Output",
- CellTags->"CovariantD",
- CellID->78914476],
- Cell[6946, 215, 199, 6, 27, "Input",
+ Cell[10038, 330, 352, 14, 43, "Output",
+ CellTags->"CovariantD"],
+ Cell[10427, 349, 199, 6, 27, "Input",
CellTags->"CovariantD",
CellID->1730385129],
- Cell[7148, 223, 834, 33, 49, "Output",
- CellTags->"CovariantD",
- CellID->606796247],
- Cell[7997, 259, 185, 5, 52, "Text",
- CellTags->"CovariantD",
- CellID->1590488263],
- Cell[8207, 268, 139, 4, 27, "Input",
+ Cell[10629, 357, 814, 32, 46, "Output",
+ CellTags->"CovariantD"],
+ Cell[12226, 424, 139, 4, 27, "Input",
CellTags->"CovariantD",
CellID->1980257576],
- Cell[8349, 274, 281, 10, 36, "Output",
- CellTags->"CovariantD",
- CellID->855697737],
- Cell[8667, 289, 171, 5, 27, "Input",
+ Cell[12368, 430, 261, 9, 37, "Output",
+ CellTags->"CovariantD"],
+ Cell[12666, 444, 171, 5, 27, "Input",
CellTags->"CovariantD",
CellID->840690314],
- Cell[8841, 296, 383, 15, 42, "Output",
- CellTags->"CovariantD",
- CellID->1737264679],
- Cell[9261, 316, 220, 6, 27, "Input",
+ Cell[12840, 451, 362, 14, 41, "Output",
+ CellTags->"CovariantD"],
+ Cell[13239, 470, 220, 6, 27, "Input",
CellTags->"CovariantD",
CellID->82457380],
- Cell[9484, 324, 1034, 42, 47, "Output",
- CellTags->"CovariantD",
- CellID->1504792083],
- Cell[10555, 371, 201, 6, 27, "Input",
+ Cell[13462, 478, 1013, 41, 44, "Output",
+ CellTags->"CovariantD"],
+ Cell[14512, 524, 201, 6, 27, "Input",
CellTags->"CovariantD",
CellID->570341066],
- Cell[10759, 379, 855, 33, 47, "Output",
- CellTags->"CovariantD",
- CellID->1269153146],
- Cell[11651, 417, 206, 6, 27, "Input",
+ Cell[14716, 532, 834, 32, 44, "Output",
+ CellTags->"CovariantD"],
+ Cell[15587, 569, 206, 6, 27, "Input",
CellTags->"CovariantD",
CellID->1557639505],
- Cell[11860, 425, 2073, 80, 55, "Output",
- CellTags->"CovariantD",
- CellID->835776136],
- Cell[13948, 508, 621, 23, 43, "Text",
- CellTags->"CovariantD",
- CellID->35437719],
- Cell[14594, 535, 235, 7, 27, "Input",
+ Cell[15796, 577, 2053, 79, 48, "Output",
+ CellTags->"CovariantD"],
+ Cell[18605, 691, 234, 7, 27, "Input",
CellTags->"CovariantD",
CellID->1826343413],
- Cell[14832, 544, 663, 26, 45, "Output",
- CellTags->"CovariantD",
- CellID->985234851],
- Cell[15510, 573, 305, 11, 33, "Text",
- CellTags->"CovariantD",
- CellID->745433336],
- Cell[15840, 588, 235, 7, 27, "Input",
+ Cell[18842, 700, 642, 25, 43, "Output",
+ CellTags->"CovariantD"],
+ Cell[19991, 750, 234, 7, 27, "Input",
CellTags->"CovariantD",
CellID->1721350899],
- Cell[16078, 597, 2359, 85, 68, "Output",
- CellTags->"CovariantD",
- CellID->1135690031],
- Cell[18452, 685, 209, 8, 33, "Text",
- CellTags->"CovariantD",
- CellID->972705137],
- Cell[18686, 697, 235, 7, 27, "Input",
+ Cell[20228, 759, 2418, 85, 68, "Output",
+ CellTags->"CovariantD"],
+ Cell[22851, 857, 234, 7, 27, "Input",
CellTags->"CovariantD",
CellID->1002319987],
- Cell[18924, 706, 5811, 191, 160, "Output",
- CellTags->"CovariantD",
- CellID->483146070],
- Cell[24772, 902, 200, 6, 27, "Input",
+ Cell[23088, 866, 6000, 192, 156, "Output",
+ CellTags->"CovariantD"],
+ Cell[29125, 1063, 199, 6, 27, "Input",
CellTags->"CovariantD",
CellID->608320512],
- Cell[24975, 910, 447, 17, 46, "Output",
- CellTags->"CovariantD",
- CellID->260858844],
- Cell[25459, 932, 214, 7, 27, "Input",
+ Cell[29327, 1071, 426, 16, 43, "Output",
+ CellTags->"CovariantD"],
+ Cell[29790, 1092, 213, 7, 27, "Input",
CellTags->"CovariantD",
CellID->512528140],
- Cell[25676, 941, 4609, 149, 128, "Output",
- CellTags->"CovariantD",
- CellID->2021495246],
- Cell[30322, 1095, 242, 8, 27, "Input",
+ Cell[30006, 1101, 4929, 153, 127, "Output",
+ CellTags->"CovariantD"],
+ Cell[34972, 1259, 241, 8, 27, "Input",
CellTags->"CovariantD",
CellID->790160491],
- Cell[30567, 1105, 645, 18, 84, "Output",
- CellTags->"CovariantD",
- CellID->1789369971],
- Cell[31249, 1128, 259, 8, 27, "Input",
+ Cell[35216, 1269, 639, 17, 86, "Output",
+ CellTags->"CovariantD"],
+ Cell[35892, 1291, 258, 8, 27, "Input",
CellTags->"CovariantD",
CellID->160329117],
- Cell[31511, 1138, 669, 19, 84, "Output",
- CellTags->"CovariantD",
- CellID->772324772],
- Cell[32548, 1180, 602, 21, 32, "Text",
- CellTags->"CovariantD",
- CellID->2075533712]}
+ Cell[36153, 1301, 683, 19, 86, "Output",
+ CellTags->"CovariantD"]},
+ "PrimaryExamplesSection"->{
+ Cell[8809, 274, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->691651515]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 36222, 1266},
- {"CovariantD", 36360, 1270}
+ {"CovariantD", 39550, 1382},
+ {"PrimaryExamplesSection", 42156, 1463}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 2280, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 1643, 29, 347, "Usage",
- CellID->982511436],
+Cell[2865, 76, 287, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4561, 111, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1373495983],
+Cell[3177, 91, 3844, 112, 497, "Usage"],
Cell[CellGroupData[{
-Cell[4974, 130, 196, 6, 25, "ExampleSection",
- CellID->1713288696],
+Cell[7046, 207, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->29485513],
+Cell[7786, 233, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[7820, 235, 231, 7, 70, "Notes"],
Cell[CellGroupData[{
-Cell[5195, 140, 138, 4, 27, "Input",
+Cell[8076, 246, 140, 4, 70, "Input",
CellTags->"CovariantD",
CellID->1136125130],
-Cell[5336, 146, 547, 16, 56, "Output",
- CellTags->"CovariantD",
- CellID->580865857]
+Cell[8219, 252, 529, 15, 56, "Output",
+ CellTags->"CovariantD"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5920, 167, 135, 4, 27, "Input",
+Cell[8809, 274, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->691651515],
+Cell[CellGroupData[{
+Cell[9221, 293, 195, 6, 26, "ExampleSection",
+ CellID->769036159],
+Cell[CellGroupData[{
+Cell[9441, 303, 135, 4, 27, "Input",
CellTags->"CovariantD",
CellID->691762283],
-Cell[6058, 173, 272, 10, 39, "Output",
- CellTags->"CovariantD",
- CellID->1727860547]
+Cell[9579, 309, 251, 9, 39, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6367, 188, 168, 5, 27, "Input",
+Cell[9867, 323, 168, 5, 27, "Input",
CellTags->"CovariantD",
CellID->631235757],
-Cell[6538, 195, 371, 15, 44, "Output",
- CellTags->"CovariantD",
- CellID->78914476]
+Cell[10038, 330, 352, 14, 43, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6946, 215, 199, 6, 27, "Input",
+Cell[10427, 349, 199, 6, 27, "Input",
CellTags->"CovariantD",
CellID->1730385129],
-Cell[7148, 223, 834, 33, 49, "Output",
- CellTags->"CovariantD",
- CellID->606796247]
+Cell[10629, 357, 814, 32, 46, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
-Cell[7997, 259, 185, 5, 52, "Text",
- CellTags->"CovariantD",
- CellID->1590488263],
Cell[CellGroupData[{
-Cell[8207, 268, 139, 4, 27, "Input",
+Cell[11480, 394, 105, 2, 9, "ExampleDelimiter"],
+Cell[11588, 398, 613, 22, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[12226, 424, 139, 4, 27, "Input",
CellTags->"CovariantD",
CellID->1980257576],
-Cell[8349, 274, 281, 10, 36, "Output",
- CellTags->"CovariantD",
- CellID->855697737]
+Cell[12368, 430, 261, 9, 37, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8667, 289, 171, 5, 27, "Input",
+Cell[12666, 444, 171, 5, 27, "Input",
CellTags->"CovariantD",
CellID->840690314],
-Cell[8841, 296, 383, 15, 42, "Output",
- CellTags->"CovariantD",
- CellID->1737264679]
+Cell[12840, 451, 362, 14, 41, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9261, 316, 220, 6, 27, "Input",
+Cell[13239, 470, 220, 6, 27, "Input",
CellTags->"CovariantD",
CellID->82457380],
-Cell[9484, 324, 1034, 42, 47, "Output",
- CellTags->"CovariantD",
- CellID->1504792083]
+Cell[13462, 478, 1013, 41, 44, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10555, 371, 201, 6, 27, "Input",
+Cell[14512, 524, 201, 6, 27, "Input",
CellTags->"CovariantD",
CellID->570341066],
-Cell[10759, 379, 855, 33, 47, "Output",
- CellTags->"CovariantD",
- CellID->1269153146]
+Cell[14716, 532, 834, 32, 44, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11651, 417, 206, 6, 27, "Input",
+Cell[15587, 569, 206, 6, 27, "Input",
CellTags->"CovariantD",
CellID->1557639505],
-Cell[11860, 425, 2073, 80, 55, "Output",
- CellTags->"CovariantD",
- CellID->835776136]
+Cell[15796, 577, 2053, 79, 48, "Output",
+ CellTags->"CovariantD"]
+}, Open ]]
}, Open ]],
-Cell[13948, 508, 621, 23, 43, "Text",
- CellTags->"CovariantD",
- CellID->35437719],
Cell[CellGroupData[{
-Cell[14594, 535, 235, 7, 27, "Input",
+Cell[17898, 662, 105, 2, 9, "ExampleDelimiter"],
+Cell[18006, 666, 574, 21, 42, "Notes"],
+Cell[CellGroupData[{
+Cell[18605, 691, 234, 7, 27, "Input",
CellTags->"CovariantD",
CellID->1826343413],
-Cell[14832, 544, 663, 26, 45, "Output",
- CellTags->"CovariantD",
- CellID->985234851]
+Cell[18842, 700, 642, 25, 43, "Output",
+ CellTags->"CovariantD"]
+}, Open ]]
}, Open ]],
-Cell[15510, 573, 305, 11, 33, "Text",
- CellTags->"CovariantD",
- CellID->745433336],
Cell[CellGroupData[{
-Cell[15840, 588, 235, 7, 27, "Input",
+Cell[19533, 731, 105, 2, 9, "ExampleDelimiter"],
+Cell[19641, 735, 325, 11, 33, "Notes"],
+Cell[CellGroupData[{
+Cell[19991, 750, 234, 7, 27, "Input",
CellTags->"CovariantD",
CellID->1721350899],
-Cell[16078, 597, 2359, 85, 68, "Output",
- CellTags->"CovariantD",
- CellID->1135690031]
+Cell[20228, 759, 2418, 85, 68, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
-Cell[18452, 685, 209, 8, 33, "Text",
- CellTags->"CovariantD",
- CellID->972705137],
+Cell[22661, 847, 165, 6, 33, "Notes"],
Cell[CellGroupData[{
-Cell[18686, 697, 235, 7, 27, "Input",
+Cell[22851, 857, 234, 7, 27, "Input",
CellTags->"CovariantD",
CellID->1002319987],
-Cell[18924, 706, 5811, 191, 160, "Output",
- CellTags->"CovariantD",
- CellID->483146070]
+Cell[23088, 866, 6000, 192, 156, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24772, 902, 200, 6, 27, "Input",
+Cell[29125, 1063, 199, 6, 27, "Input",
CellTags->"CovariantD",
CellID->608320512],
-Cell[24975, 910, 447, 17, 46, "Output",
- CellTags->"CovariantD",
- CellID->260858844]
+Cell[29327, 1071, 426, 16, 43, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25459, 932, 214, 7, 27, "Input",
+Cell[29790, 1092, 213, 7, 27, "Input",
CellTags->"CovariantD",
CellID->512528140],
-Cell[25676, 941, 4609, 149, 128, "Output",
- CellTags->"CovariantD",
- CellID->2021495246]
+Cell[30006, 1101, 4929, 153, 127, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[30322, 1095, 242, 8, 27, "Input",
+Cell[34972, 1259, 241, 8, 27, "Input",
CellTags->"CovariantD",
CellID->790160491],
-Cell[30567, 1105, 645, 18, 84, "Output",
- CellTags->"CovariantD",
- CellID->1789369971]
+Cell[35216, 1269, 639, 17, 86, "Output",
+ CellTags->"CovariantD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[31249, 1128, 259, 8, 27, "Input",
+Cell[35892, 1291, 258, 8, 27, "Input",
CellTags->"CovariantD",
CellID->160329117],
-Cell[31511, 1138, 669, 19, 84, "Output",
- CellTags->"CovariantD",
- CellID->772324772]
+Cell[36153, 1301, 683, 19, 86, "Output",
+ CellTags->"CovariantD"]
+}, Open ]]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[32207, 1161, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[32275, 1166, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[32548, 1180, 602, 21, 32, "Text",
- CellTags->"CovariantD",
- CellID->2075533712]
-}, Open ]],
-Cell[33165, 1204, 23, 0, 42, "FooterCell"]
+Cell[36887, 1326, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantFieldDerivative.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantFieldDerivative.nb
index bc8b5e210..380df6f74 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantFieldDerivative.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CovariantFieldDerivative.nb
@@ -3,70 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10072, 321]
-NotebookOptionsPosition[ 6534, 222]
-NotebookOutlinePosition[ 9262, 292]
-CellTagsIndexPosition[ 9136, 286]
+NotebookDataLength[ 11380, 357]
+NotebookOptionsPosition[ 8022, 265]
+NotebookOutlinePosition[ 10662, 332]
+CellTagsIndexPosition[ 10534, 326]
WindowTitle->CovariantFieldDerivative
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CovariantFieldDerivative\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CovariantFieldDerivative"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CovariantD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CovariantD"], "\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"FieldDerivative\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FieldDerivative"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/CovariantFieldDerivative\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/CovariantFieldDerivative"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
CovariantFieldDerivative.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$33511],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CovariantFieldDerivative", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$49175],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/CovariantFieldDerivative", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -74,8 +100,18 @@ CovariantFieldDerivative.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["CovariantFieldDerivative", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["CovariantFieldDerivative", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -84,13 +120,23 @@ Cell[BoxData[GridBox[{
RowBox[{
RowBox[{"f", "[", "x", "]"}], ",", "x", ",",
RowBox[{"{",
- RowBox[{"li1", ",", "li2", ",", "..."}], "}"}], ",", "opts"}],
- "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a covariant derivative of f[x] with respect to space-time variables \
-x and with Lorentz indices li1, li2,... CovariantFieldDerivative has only \
-typesetting definitions by default. The user is must supply his/her own \
-definition of the actual function."
+ RowBox[{"li1", ",", "li2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]is a covariant derivative of ",
+ Cell[BoxData[
+ RowBox[{"f", "[", "x", "]"}]], "InlineFormula"],
+ " with respect to space-time variables ",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and with Lorentz indices ",
+ Cell[BoxData[
+ RowBox[{"li1", ",", " ", "li2", ",", "..."}]], "InlineFormula"],
+ ". ",
+ ButtonBox["CovariantFieldDerivative",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CovariantFieldDerivative",
+ ButtonNote->"CovariantFieldDerivative"],
+ " has only typesetting definitions by default. The user is must supply \
+his/her own definition of the actual function."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -116,7 +162,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->697328582],
+ CellID->83003778],
Cell[CellGroupData[{
@@ -126,7 +172,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2038013190],
+ CellID->170346871],
Cell[CellGroupData[{
@@ -166,12 +212,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm,
Editable->True], ")"}], TraditionalForm]], "Output",
- ImageSize->{83, 18},
+ ImageSize->{88, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"CovariantFieldDerivative",
- CellLabel->"Out[1]=",
- CellID->1282830456]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -213,9 +258,7 @@ Cell[TextData[{
ButtonNote->"FieldDerivative"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"CovariantFieldDerivative",
- CellID->1307362516]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -223,7 +266,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"CovariantFieldDerivative",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -232,25 +275,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 23.097478}",
+ "built" -> "{2020, 1, 5, 18, 53, 47.807509}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "CovariantFieldDerivative[f[x], x, {li1, li2, ...}, opts] is a covariant \
+ "CovariantFieldDerivative[f[x], x, {li1, li2, ...}] is a covariant \
derivative of f[x] with respect to space-time variables x and with Lorentz \
-indices li1, li2,... CovariantFieldDerivative has only typesetting \
+indices li1, li2, .... CovariantFieldDerivative has only typesetting \
definitions by default. The user is must supply his/her own definition of the \
-actual function.", "synonyms" -> {}, "title" -> "CovariantFieldDerivative",
- "titlemodifier" -> "", "windowtitle" -> "CovariantFieldDerivative",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/CovariantFieldDerivative"},
- "SearchTextTranslated" -> ""},
+actual function.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "CovariantFieldDerivative", "titlemodifier" -> "", "windowtitle" ->
+ "CovariantFieldDerivative", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/CovariantFieldDerivative"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -258,8 +301,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -268,61 +312,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3800, 103, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5368, 149, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->697328582]},
+ CellID->83003778]},
"CovariantFieldDerivative"->{
- Cell[4433, 132, 348, 10, 27, "Input",
+ Cell[5999, 178, 348, 10, 27, "Input",
CellTags->"CovariantFieldDerivative",
CellID->2083449432],
- Cell[4784, 144, 733, 29, 39, "Output",
- CellTags->"CovariantFieldDerivative",
- CellID->1282830456],
- Cell[5885, 196, 607, 21, 32, "Text",
- CellTags->"CovariantFieldDerivative",
- CellID->1307362516]}
+ Cell[6350, 190, 712, 28, 40, "Output",
+ CellTags->"CovariantFieldDerivative"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8646, 269},
- {"CovariantFieldDerivative", 8797, 273}
+ {"PrimaryExamplesSection", 10172, 313},
+ {"CovariantFieldDerivative", 10322, 317}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[596, 21, 2322, 53, 51, "AnchorBarGrid",
+Cell[596, 21, 3300, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2921, 76, 67, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2991, 79, 784, 20, 113, "Usage",
+Cell[3899, 102, 301, 11, 45, "ObjectNameGrid"],
+Cell[4203, 115, 1140, 30, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3800, 103, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5368, 149, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->697328582],
+ CellID->83003778],
Cell[CellGroupData[{
-Cell[4212, 122, 196, 6, 25, "ExampleSection",
- CellID->2038013190],
+Cell[5779, 168, 195, 6, 26, "ExampleSection",
+ CellID->170346871],
Cell[CellGroupData[{
-Cell[4433, 132, 348, 10, 27, "Input",
+Cell[5999, 178, 348, 10, 27, "Input",
CellTags->"CovariantFieldDerivative",
CellID->2083449432],
-Cell[4784, 144, 733, 29, 39, "Output",
- CellTags->"CovariantFieldDerivative",
- CellID->1282830456]
+Cell[6350, 190, 712, 28, 40, "Output",
+ CellTags->"CovariantFieldDerivative"]
}, Open ]]
}, Open ]],
-Cell[5544, 177, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7089, 222, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5612, 182, 270, 12, 31, "SeeAlsoSection",
+Cell[7157, 227, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5885, 196, 607, 21, 32, "Text",
- CellTags->"CovariantFieldDerivative",
- CellID->1307362516]
+Cell[7430, 241, 550, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[6507, 220, 23, 0, 42, "FooterCell"]
+Cell[7995, 263, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CrossProduct.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/CrossProduct.nb
deleted file mode 100644
index 355b30c02..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/CrossProduct.nb
+++ /dev/null
@@ -1,318 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9253, 308]
-NotebookOptionsPosition[ 6087, 212]
-NotebookOutlinePosition[ 8483, 279]
-CellTagsIndexPosition[ 8369, 273]
-WindowTitle->CrossProduct
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/CrossProduct\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/CrossProduct"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-CrossProduct.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$33847],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/CrossProduct", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["CrossProduct", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"CrossProduct", "[",
- RowBox[{"a", ",", " ", "b"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the three-dimensional cross-product of the three-vectors a and \
-b."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->51371431],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->147208928],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"CrossProduct", "[",
- RowBox[{
- RowBox[{"ThreeVector", "[", "a", "]"}], ",",
- RowBox[{"CrossProduct", "[",
- RowBox[{
- RowBox[{"ThreeVector", "[", "b", "]"}], ",",
- RowBox[{"ThreeVector", "[", "c", "]"}]}], "]"}]}], "]"}]], "Input",
- CellTags->"CrossProduct",
- CellLabel->"In[1]:=",
- CellID->1337031083],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- OverscriptBox["b", "\[RightVector]"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox["a", "\[RightVector]"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox["c", "\[RightVector]"],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{
- OverscriptBox["c", "\[RightVector]"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox["a", "\[RightVector]"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox["b", "\[RightVector]"],
- TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{142, 27},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"CrossProduct",
- CellLabel->"Out[1]=",
- CellID->2076700373]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["DotProduct",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DotProduct",
- ButtonNote->"DotProduct"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["ThreeVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ThreeVector",
- ButtonNote->"ThreeVector"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"CrossProduct",
- CellID->1152724432]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"CrossProduct",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 24.586314}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "CrossProduct[a, b] denotes the three-dimensional cross-product of the \
-three-vectors a and b.", "synonyms" -> {}, "title" -> "CrossProduct",
- "titlemodifier" -> "", "windowtitle" -> "CrossProduct", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/CrossProduct"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3386, 96, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->51371431]},
- "CrossProduct"->{
- Cell[4017, 125, 345, 10, 45, "Input",
- CellTags->"CrossProduct",
- CellID->1337031083],
- Cell[4365, 137, 906, 32, 48, "Output",
- CellTags->"CrossProduct",
- CellID->2076700373],
- Cell[5639, 192, 406, 15, 31, "Text",
- CellTags->"CrossProduct",
- CellID->1152724432]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7929, 256},
- {"CrossProduct", 8066, 260}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[584, 21, 2261, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2848, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 455, 14, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3386, 96, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->51371431],
-Cell[CellGroupData[{
-Cell[3797, 115, 195, 6, 25, "ExampleSection",
- CellID->147208928],
-Cell[CellGroupData[{
-Cell[4017, 125, 345, 10, 45, "Input",
- CellTags->"CrossProduct",
- CellID->1337031083],
-Cell[4365, 137, 906, 32, 48, "Output",
- CellTags->"CrossProduct",
- CellID->2076700373]
-}, Open ]]
-}, Open ]],
-Cell[5298, 173, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5366, 178, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[5639, 192, 406, 15, 31, "Text",
- CellTags->"CrossProduct",
- CellID->1152724432]
-}, Open ]],
-Cell[6060, 210, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0.nb
index e47248d67..00cf1e73f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12480, 422]
-NotebookOptionsPosition[ 8418, 295]
-NotebookOutlinePosition[ 11362, 377]
-CellTagsIndexPosition[ 11256, 371]
+NotebookDataLength[ 13328, 440]
+NotebookOptionsPosition[ 9542, 325]
+NotebookOutlinePosition[ 12319, 401]
+CellTagsIndexPosition[ 12213, 395]
WindowTitle->D0
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/D0\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/D0"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/D0.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$34536],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/D0",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"C0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/C0"], "\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeOrder\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVeOrder"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/D0\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/D0"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/D0.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$55849],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/D0",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["D0", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["D0", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -122,7 +157,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1996953412],
+ CellID->1842826744],
Cell[CellGroupData[{
@@ -132,7 +167,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->448766426],
+ CellID->1203869837],
Cell[CellGroupData[{
@@ -162,12 +197,11 @@ Cell[BoxData[
SuperscriptBox["m4", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{358, 21},
+ ImageSize->{357, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"D0",
- CellLabel->"Out[1]=",
- CellID->2083359639]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -203,12 +237,11 @@ Cell[BoxData[
SuperscriptBox["m3", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{358, 21},
+ ImageSize->{357, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"D0",
- CellLabel->"Out[2]=",
- CellID->1336389725]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -233,12 +266,11 @@ Cell[BoxData[
SuperscriptBox["m4", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{358, 21},
+ ImageSize->{357, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"D0",
- CellLabel->"Out[3]=",
- CellID->871188946]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -286,9 +318,7 @@ Cell[TextData[{
ButtonNote->"PaVeOrder"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"D0",
- CellID->1437823057]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -296,7 +326,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"D0",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -305,10 +335,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 27.348210}",
+ "built" -> "{2020, 1, 5, 18, 54, 5.753406}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -319,11 +349,11 @@ Passarino-Veltman D0 function. The convention for the arguments is that if \
the denominator of the integrand has the form ([q^2-m1^2] [(q+p1)^2-m2^2] \
[(q+p2)^2-m3^2] [(q+p3)^2-m4^2] ), the first six arguments of D0 are the \
scalar products p10 = p1^2, p12 = (p1-p2)^2, p23 = (p2-p3)^2, p30 = p3^2, p20 \
-= p2^2, p13 = (p1-p3)^2.", "synonyms" -> {}, "title" -> "D0", "titlemodifier" ->
- "", "windowtitle" -> "D0", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/D0"}, "SearchTextTranslated" -> ""},
+= p2^2, p13 = (p1-p3)^2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "D0", "titlemodifier" -> "", "windowtitle" -> "D0", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/D0"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -332,7 +362,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -341,89 +371,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3958, 109, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5178, 144, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1996953412]},
+ CellID->1842826744]},
"D0"->{
- Cell[4591, 138, 334, 10, 27, "Input",
+ Cell[5812, 173, 334, 10, 27, "Input",
CellTags->"D0",
CellID->1703594627],
- Cell[4928, 150, 574, 19, 42, "Output",
- CellTags->"D0",
- CellID->2083359639],
- Cell[5539, 174, 502, 15, 45, "Input",
+ Cell[6149, 185, 553, 18, 42, "Output",
+ CellTags->"D0"],
+ Cell[6739, 208, 502, 15, 45, "Input",
CellTags->"D0",
CellID->493215523],
- Cell[6044, 191, 574, 19, 42, "Output",
- CellTags->"D0",
- CellID->1336389725],
- Cell[6655, 215, 123, 4, 27, "Input",
+ Cell[7244, 225, 553, 18, 42, "Output",
+ CellTags->"D0"],
+ Cell[7834, 248, 123, 4, 27, "Input",
CellTags->"D0",
CellID->1818800785],
- Cell[6781, 221, 573, 19, 42, "Output",
- CellTags->"D0",
- CellID->871188946],
- Cell[7722, 263, 654, 27, 31, "Text",
- CellTags->"D0",
- CellID->1437823057]}
+ Cell[7960, 254, 553, 18, 42, "Output",
+ CellTags->"D0"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10522, 342},
- {"D0", 10652, 346}
+ {"PrimaryExamplesSection", 11629, 372},
+ {"D0", 11759, 376}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3219, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 1075, 27, 132, "Usage",
+Cell[3796, 100, 279, 11, 45, "ObjectNameGrid"],
+Cell[4078, 113, 1075, 27, 137, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3958, 109, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5178, 144, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1996953412],
+ CellID->1842826744],
Cell[CellGroupData[{
-Cell[4371, 128, 195, 6, 25, "ExampleSection",
- CellID->448766426],
+Cell[5591, 163, 196, 6, 26, "ExampleSection",
+ CellID->1203869837],
Cell[CellGroupData[{
-Cell[4591, 138, 334, 10, 27, "Input",
+Cell[5812, 173, 334, 10, 27, "Input",
CellTags->"D0",
CellID->1703594627],
-Cell[4928, 150, 574, 19, 42, "Output",
- CellTags->"D0",
- CellID->2083359639]
+Cell[6149, 185, 553, 18, 42, "Output",
+ CellTags->"D0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5539, 174, 502, 15, 45, "Input",
+Cell[6739, 208, 502, 15, 45, "Input",
CellTags->"D0",
CellID->493215523],
-Cell[6044, 191, 574, 19, 42, "Output",
- CellTags->"D0",
- CellID->1336389725]
+Cell[7244, 225, 553, 18, 42, "Output",
+ CellTags->"D0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6655, 215, 123, 4, 27, "Input",
+Cell[7834, 248, 123, 4, 27, "Input",
CellTags->"D0",
CellID->1818800785],
-Cell[6781, 221, 573, 19, 42, "Output",
- CellTags->"D0",
- CellID->871188946]
+Cell[7960, 254, 553, 18, 42, "Output",
+ CellTags->"D0"]
}, Open ]]
}, Open ]],
-Cell[7381, 244, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8540, 276, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7449, 249, 270, 12, 31, "SeeAlsoSection",
+Cell[8608, 281, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7722, 263, 654, 27, 31, "Text",
- CellTags->"D0",
- CellID->1437823057]
+Cell[8881, 295, 619, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[8391, 293, 23, 0, 42, "FooterCell"]
+Cell[9515, 323, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0Convention.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0Convention.nb
index e67d5aa92..3fb18d088 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0Convention.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/D0Convention.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6600, 199]
-NotebookOptionsPosition[ 4186, 131]
-NotebookOutlinePosition[ 6334, 188]
-CellTagsIndexPosition[ 6260, 183]
+NotebookDataLength[ 7401, 220]
+NotebookOptionsPosition[ 5204, 162]
+NotebookOutlinePosition[ 7193, 212]
+CellTagsIndexPosition[ 7150, 209]
WindowTitle->D0Convention
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/D0Convention\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/D0Convention"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"D0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/D0"], "\<\"Write2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Write2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/D0Convention\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/D0Convention"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
D0Convention.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$34182],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/D0Convention", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$55397],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/D0Convention", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ D0Convention.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["D0Convention", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["D0Convention", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +143,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["D0",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/D0",
@@ -122,9 +155,7 @@ Cell[TextData[{
ButtonNote->"Write2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"D0Convention",
- CellID->1599988993]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -141,10 +172,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 25.958800}",
+ "built" -> "{2020, 1, 5, 18, 54, 4.819720}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -153,11 +184,11 @@ TaggingRules->{
"D0Convention is an option for Write2. If set to 1, the convention for \
the arguments of D0 is changed when writing a Fortran file with Write2: The \
fifth and sixth argument of D0 are interchanged and the square root is taken \
-of the last four arguments.", "synonyms" -> {}, "title" -> "D0Convention",
- "titlemodifier" -> "", "windowtitle" -> "D0Convention", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/D0Convention"}},
+of the last four arguments.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "D0Convention", "titlemodifier" -> "", "windowtitle" -> "D0Convention",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/D0Convention"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -166,41 +197,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "D0Convention"->{
- Cell[3762, 110, 382, 16, 70, "Text",
- CellTags->"D0Convention",
- CellID->1599988993]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"D0Convention", 6144, 176}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3105, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 558, 14, 70, "Usage",
+Cell[3692, 99, 289, 11, 70, "ObjectNameGrid"],
+Cell[3984, 112, 558, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3489, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4567, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3762, 110, 382, 16, 70, "Text",
- CellTags->"D0Convention",
- CellID->1599988993]
+Cell[4840, 144, 322, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4159, 129, 23, 0, 70, "FooterCell"]
+Cell[5177, 160, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB0.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB0.nb
index 1e1069caf..d0ad0bd44 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB0.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB0.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8452, 286]
-NotebookOptionsPosition[ 5389, 191]
-NotebookOutlinePosition[ 7710, 257]
-CellTagsIndexPosition[ 7605, 251]
+NotebookDataLength[ 9233, 308]
+NotebookOptionsPosition[ 6299, 220]
+NotebookOutlinePosition[ 8559, 283]
+CellTagsIndexPosition[ 8454, 277]
WindowTitle->DB0
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DB0\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DB0"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DB0.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$35258],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/DB0",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DB0\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DB0"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DB0.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$56770],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/DB0",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DB0", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DB0", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->386051506],
+ CellID->345618728],
Cell[CellGroupData[{
@@ -121,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->396336563],
+ CellID->2095234350],
Cell[CellGroupData[{
@@ -147,12 +179,11 @@ Cell[BoxData[
SubscriptBox["p", "2"], ",",
SubsuperscriptBox["m", "1", "2"], ",",
SubsuperscriptBox["m", "2", "2"]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{121, 21},
+ ImageSize->{125, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DB0",
- CellLabel->"Out[1]=",
- CellID->758313713]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -182,17 +213,15 @@ Cell[TextData[{
ButtonNote->"B0"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DB0",
- CellID->1206126123]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DB0",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -201,21 +230,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 30.996139}",
+ "built" -> "{2020, 1, 5, 18, 54, 8.350308}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DB0[p2, m1^2, m2^2] is the derivative of the two-point function B0[p2, \
-m1^2, m2^2] with respect to p2.", "synonyms" -> {}, "title" -> "DB0",
- "titlemodifier" -> "", "windowtitle" -> "DB0", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DB0"}, "SearchTextTranslated" -> ""},
+m1^2, m2^2] with respect to p2.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "DB0", "titlemodifier" -> "", "windowtitle" -> "DB0", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DB0"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -223,8 +252,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -233,61 +263,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3420, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4385, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->386051506]},
+ CellID->345618728]},
"DB0"->{
- Cell[4052, 127, 358, 13, 31, "Input",
+ Cell[5018, 159, 358, 13, 33, "Input",
CellTags->"DB0",
CellID->1086692886],
- Cell[4413, 142, 361, 12, 42, "Output",
- CellTags->"DB0",
- CellID->758313713],
- Cell[5142, 177, 205, 9, 31, "Text",
- CellTags->"DB0",
- CellID->1206126123]}
+ Cell[5379, 174, 341, 11, 42, "Output",
+ CellTags->"DB0"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7202, 234},
- {"DB0", 7331, 238}
+ {"PrimaryExamplesSection", 8154, 264},
+ {"DB0", 8284, 268}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2968, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 531, 16, 83, "Usage",
+Cell[3546, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[3829, 110, 531, 16, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3420, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4385, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->386051506],
+ CellID->345618728],
Cell[CellGroupData[{
-Cell[3832, 117, 195, 6, 25, "ExampleSection",
- CellID->396336563],
+Cell[4797, 149, 196, 6, 26, "ExampleSection",
+ CellID->2095234350],
Cell[CellGroupData[{
-Cell[4052, 127, 358, 13, 31, "Input",
+Cell[5018, 159, 358, 13, 33, "Input",
CellTags->"DB0",
CellID->1086692886],
-Cell[4413, 142, 361, 12, 42, "Output",
- CellTags->"DB0",
- CellID->758313713]
+Cell[5379, 174, 341, 11, 42, "Output",
+ CellTags->"DB0"]
}, Open ]]
}, Open ]],
-Cell[4801, 158, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5747, 189, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4869, 163, 270, 12, 31, "SeeAlsoSection",
+Cell[5815, 194, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5142, 177, 205, 9, 31, "Text",
- CellTags->"DB0",
- CellID->1206126123]
+Cell[6088, 208, 169, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5362, 189, 23, 0, 42, "FooterCell"]
+Cell[6272, 218, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB1.nb
index fdb005098..62527923f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DB1.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9915, 336]
-NotebookOptionsPosition[ 6877, 241]
-NotebookOutlinePosition[ 9172, 307]
-CellTagsIndexPosition[ 9067, 301]
+NotebookDataLength[ 11128, 377]
+NotebookOptionsPosition[ 8211, 289]
+NotebookOutlinePosition[ 10451, 352]
+CellTagsIndexPosition[ 10344, 346]
WindowTitle->DB1
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DB1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DB1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DB1.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$35597],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/DB1",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B1"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DB1\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DB1"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DB1.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$57209],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/DB1",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DB1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DB1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->889049432],
+ CellID->1836881807],
Cell[CellGroupData[{
@@ -120,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->610159661],
+ CellID->2028493164],
Cell[CellGroupData[{
@@ -142,46 +174,49 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubsuperscriptBox["m", "2", "2"], "-",
- SubsuperscriptBox["m", "1", "2"]}], ")"}], " ",
- RowBox[{"(",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox["m", "1", "2"], "-",
+ SubsuperscriptBox["m", "2", "2"], "+",
+ SubscriptBox["p", "2"]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubsuperscriptBox["m", "1", "2"], ",",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["p", "2", "2"]}]], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SubscriptBox["p", "2"], ",",
- SubsuperscriptBox["m", "1", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SubsuperscriptBox["m", "1", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
- SubsuperscriptBox["p", "2", "2"]}]]}], "+",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubsuperscriptBox["m", "1", "2"], ",",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SubscriptBox["p", "2"]}]], "-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
- SubsuperscriptBox["m", "2", "2"], "-",
- SubsuperscriptBox["m", "1", "2"]}], ")"}], " ",
+ SubsuperscriptBox["m", "1", "2"], "-",
+ SubsuperscriptBox["m", "2", "2"], "+",
+ SubscriptBox["p", "2"]}], ")"}], " ",
RowBox[{"DB0", "(",
RowBox[{
SubscriptBox["p", "2"], ",",
@@ -189,20 +224,35 @@ Cell[BoxData[
SubsuperscriptBox["m", "2", "2"]}], ")"}]}],
RowBox[{"2", " ",
SubscriptBox["p", "2"]}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"DB0", "(",
- RowBox[{
- SubscriptBox["p", "2"], ",",
- SubsuperscriptBox["m", "1", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}]}]}],
- TraditionalForm]], "Output",
- ImageSize->{361, 112},
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SubsuperscriptBox["m", "1", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["p", "2", "2"]}]], "+",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SubsuperscriptBox["m", "2", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["p", "2", "2"]}]]}], TraditionalForm]], "Output",
+ ImageSize->{400, 99},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DB1",
- CellLabel->"Out[1]=",
- CellID->369404311]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -232,9 +282,7 @@ Cell[TextData[{
ButtonNote->"B1"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DB1",
- CellID->489076083]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -242,7 +290,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DB1",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -251,21 +299,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 32.635530}",
+ "built" -> "{2020, 1, 5, 18, 54, 9.441606}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DB1[p2, m1^2, m2^2] is the derivative of B1[p2,m1^2,m2^2] with respect \
-to p2.", "synonyms" -> {}, "title" -> "DB1", "titlemodifier" -> "",
- "windowtitle" -> "DB1", "type" -> "Symbol", "uri" -> "FeynCalc/ref/DB1"},
- "SearchTextTranslated" -> ""},
+to p2.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "DB1",
+ "titlemodifier" -> "", "windowtitle" -> "DB1", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DB1"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -273,8 +321,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -283,61 +332,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3383, 97, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4348, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->889049432]},
+ CellID->1836881807]},
"DB1"->{
- Cell[4015, 126, 358, 13, 31, "Input",
+ Cell[4982, 158, 358, 13, 33, "Input",
CellTags->"DB1",
CellID->1972383299],
- Cell[4376, 141, 1887, 63, 133, "Output",
- CellTags->"DB1",
- CellID->369404311],
- Cell[6631, 227, 204, 9, 31, "Text",
- CellTags->"DB1",
- CellID->489076083]}
+ Cell[5343, 173, 2289, 81, 120, "Output",
+ CellTags->"DB1"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8663, 284},
- {"DB1", 8792, 288}
+ {"PrimaryExamplesSection", 10041, 333},
+ {"DB1", 10172, 337}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2968, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 494, 15, 83, "Usage",
+Cell[3546, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[3829, 110, 494, 15, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3383, 97, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4348, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->889049432],
+ CellID->1836881807],
Cell[CellGroupData[{
-Cell[3795, 116, 195, 6, 25, "ExampleSection",
- CellID->610159661],
+Cell[4761, 148, 196, 6, 26, "ExampleSection",
+ CellID->2028493164],
Cell[CellGroupData[{
-Cell[4015, 126, 358, 13, 31, "Input",
+Cell[4982, 158, 358, 13, 33, "Input",
CellTags->"DB1",
CellID->1972383299],
-Cell[4376, 141, 1887, 63, 133, "Output",
- CellTags->"DB1",
- CellID->369404311]
+Cell[5343, 173, 2289, 81, 120, "Output",
+ CellTags->"DB1"]
}, Open ]]
}, Open ]],
-Cell[6290, 208, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7659, 258, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6358, 213, 270, 12, 31, "SeeAlsoSection",
+Cell[7727, 263, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6631, 227, 204, 9, 31, "Text",
- CellTags->"DB1",
- CellID->489076083]
+Cell[8000, 277, 169, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6850, 239, 23, 0, 42, "FooterCell"]
+Cell[8184, 287, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DCHN.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DCHN.nb
new file mode 100644
index 000000000..cec5bcd90
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DCHN.nb
@@ -0,0 +1,878 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 22639, 868]
+NotebookOptionsPosition[ 18062, 720]
+NotebookOutlinePosition[ 20131, 776]
+CellTagsIndexPosition[ 20046, 771]
+WindowTitle->DCHN
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DCHN\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DCHN"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DCHN.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$57658],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/DCHN",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DCHN", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a chain of Dirac matrices x and is transformed into \
+DiracChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->63311303],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->756545959],
+
+Cell["A standalone Dirac matrix with open Dirac indices", "Notes",
+ CellID->562724937],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ",", "i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->883461262],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{56, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell["A chain of Dirac matrices with open Dirac indices", "Notes",
+ CellID->1618780636],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}],
+ "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2010253364],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{79, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData[
+ OverscriptBox["u", "-"]], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->1250331575],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1134519360],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{86, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData[
+ OverscriptBox["v", "-"]], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->63600432],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->443709048],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{86, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->1458298795],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{"i", ",",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->791949561],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{84, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->2030312156],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{"i", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->227593440],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{84, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData[
+ OverscriptBox["u", "-"]], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1268031370],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1380755633],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{135, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData[
+ OverscriptBox["v", "-"]], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->867998080],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1948837227],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{135, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1888289142]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1238042528],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1936823151],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{132, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->658668713]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1861495104],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1335889439],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{132, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->2035121680]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"DCHN",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 10.564881}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DCHN[x, i, j] is a chain of Dirac matrices x and is transformed into \
+DiracChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DCHN", "titlemodifier" ->
+ "", "windowtitle" -> "DCHN", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DCHN"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4979, 138, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->63311303]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 19904, 764}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 3599, 85, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4178, 108, 281, 11, 45, "ObjectNameGrid"],
+Cell[4462, 121, 492, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4979, 138, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->63311303],
+Cell[CellGroupData[{
+Cell[5390, 157, 195, 6, 26, "ExampleSection",
+ CellID->756545959],
+Cell[5588, 165, 86, 1, 32, "Notes",
+ CellID->562724937],
+Cell[CellGroupData[{
+Cell[5699, 170, 168, 5, 27, "Input",
+ CellID->883461262],
+Cell[5870, 177, 578, 25, 43, "Output"]
+}, Open ]],
+Cell[6463, 205, 87, 1, 32, "Notes",
+ CellID->1618780636],
+Cell[CellGroupData[{
+Cell[6575, 210, 233, 8, 27, "Input",
+ CellID->2010253364],
+Cell[6811, 220, 781, 33, 43, "Output"]
+}, Open ]],
+Cell[7607, 256, 160, 6, 32, "Notes",
+ CellID->1250331575],
+Cell[CellGroupData[{
+Cell[7792, 266, 187, 6, 27, "Input",
+ CellID->1134519360],
+Cell[7982, 274, 466, 19, 38, "Output"]
+}, Open ]],
+Cell[8463, 296, 158, 6, 32, "Notes",
+ CellID->63600432],
+Cell[CellGroupData[{
+Cell[8646, 306, 186, 6, 27, "Input",
+ CellID->443709048],
+Cell[8835, 314, 466, 19, 38, "Output"]
+}, Open ]],
+Cell[9316, 336, 137, 5, 32, "Notes",
+ CellID->1458298795],
+Cell[CellGroupData[{
+Cell[9478, 345, 183, 6, 27, "Input",
+ CellID->791949561],
+Cell[9664, 353, 439, 18, 38, "Output"]
+}, Open ]],
+Cell[10118, 374, 137, 5, 32, "Notes",
+ CellID->2030312156],
+Cell[CellGroupData[{
+Cell[10280, 383, 183, 6, 27, "Input",
+ CellID->227593440],
+Cell[10466, 391, 439, 18, 38, "Output"]
+}, Open ]],
+Cell[10920, 412, 169, 6, 32, "Notes",
+ CellID->1268031370],
+Cell[CellGroupData[{
+Cell[11114, 422, 293, 9, 27, "Input",
+ CellID->1380755633],
+Cell[11410, 433, 879, 36, 43, "Output"]
+}, Open ]],
+Cell[12304, 472, 168, 6, 32, "Notes",
+ CellID->867998080],
+Cell[CellGroupData[{
+Cell[12497, 482, 293, 9, 27, "Input",
+ CellID->1948837227],
+Cell[12793, 493, 900, 37, 43, "Output",
+ CellID->1888289142]
+}, Open ]],
+Cell[13708, 533, 146, 5, 32, "Notes",
+ CellID->1238042528],
+Cell[CellGroupData[{
+Cell[13879, 542, 290, 9, 27, "Input",
+ CellID->1936823151],
+Cell[14172, 553, 872, 36, 41, "Output",
+ CellID->658668713]
+}, Open ]],
+Cell[15059, 592, 146, 5, 32, "Notes",
+ CellID->1861495104],
+Cell[CellGroupData[{
+Cell[15230, 601, 291, 9, 27, "Input",
+ CellID->1335889439],
+Cell[15524, 612, 874, 36, 41, "Output",
+ CellID->2035121680]
+}, Open ]]
+}, Open ]],
+Cell[16425, 652, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16493, 657, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[16766, 671, 1254, 44, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[18035, 718, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DIDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DIDelta.nb
new file mode 100644
index 000000000..f81edf88f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DIDelta.nb
@@ -0,0 +1,1044 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 27630, 1034]
+NotebookOptionsPosition[ 23109, 886]
+NotebookOutlinePosition[ 25258, 943]
+CellTagsIndexPosition[ 25173, 938]
+WindowTitle->DIDelta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DIDelta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DIDelta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DIDelta.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$60321],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DIDelta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DIDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta in the Dirac space. \
+DIDelta[i,j] is transformed into DiracDelta[DiracIndex[i],DiracIndex[j]] by \
+FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1977425858],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1096158476],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1903212195],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{31, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1647206544]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->221486333],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["i",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{30, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1722328628]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1175096586],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->565415250]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->280996541],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}], "2"], TraditionalForm]], "Output",
+ ImageSize->{31, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->552874525]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->717719024],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1577326774]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"j", ",", "k"}], "]"}]}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->66063638],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["j",
+ TraditionalForm],
+ FormBox["k",
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{64, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->916684113]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->804321979],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->1567272290]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i0"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ",", "i1", ",", "i2"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "+", "m"}], ",", "i3", ",", "i4"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ",", "i5", ",", "i6"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i2", ",", "i3"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i4", ",", "i5"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{"i7", ",",
+ RowBox[{"SpinorV", "[", "q", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->758241863],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i2",
+ TraditionalForm],
+ FormBox["i3",
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i4",
+ TraditionalForm],
+ FormBox["i5",
+ TraditionalForm]}]], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["q",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i2",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{434, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1481144973]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i0"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ",", "i1", ",", "i2"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "+", "m"}], ",", "i3", ",", "i4"}],
+ "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ",", "i5", ",", "i6"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i2", ",", "i3"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i4", ",", "i5"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{"i7", ",",
+ RowBox[{"SpinorV", "[", "q", "]"}]}], "]"}]}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1093996001],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i2", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}]}], "]"}], " ",
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i4", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i7", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "q", "]"}]}], ",", "0", ",", "1"}], "]"}]}],
+ "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i0", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i1", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i2", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i6", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i4", "]"}]}], "]"}]}]], "Output",
+ ImageSize->{579, 135},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]//StandardForm=",
+ CellID->1943025584]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1092912350],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{345, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->523514846]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i0", ",", "i1"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->654220270],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{312, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]=",
+ CellID->1345169628]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i7", ",", "i6"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[12]:=",
+ CellID->427410435],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{292, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]=",
+ CellID->1753713613]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"DIDelta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 17.396594}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DIDelta[i, j] is the Kronecker-delta in the Dirac space. DIDelta[i,j] is \
+transformed into DiracDelta[DiracIndex[i],DiracIndex[j]] by \
+FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "DIDelta",
+ "titlemodifier" -> "", "windowtitle" -> "DIDelta", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DIDelta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5006, 139, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1977425858]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 25029, 931}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 3611, 85, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4193, 108, 284, 11, 45, "ObjectNameGrid"],
+Cell[4480, 121, 501, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5006, 139, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1977425858],
+Cell[CellGroupData[{
+Cell[5419, 158, 196, 6, 26, "ExampleSection",
+ CellID->1096158476],
+Cell[CellGroupData[{
+Cell[5640, 168, 127, 4, 27, "Input",
+ CellID->1903212195],
+Cell[5770, 174, 307, 12, 39, "Output",
+ CellID->1647206544]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6114, 191, 126, 4, 27, "Input",
+ CellID->221486333],
+Cell[6243, 197, 307, 12, 37, "Output",
+ CellID->1722328628]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6587, 214, 111, 3, 27, "Input",
+ CellID->1175096586],
+Cell[6701, 219, 186, 6, 35, "Output",
+ CellID->565415250]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6924, 230, 150, 5, 27, "Input",
+ CellID->280996541],
+Cell[7077, 237, 316, 12, 42, "Output",
+ CellID->552874525]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7430, 254, 110, 3, 27, "Input",
+ CellID->717719024],
+Cell[7543, 259, 187, 6, 35, "Output",
+ CellID->1577326774]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7767, 270, 202, 7, 27, "Input",
+ CellID->66063638],
+Cell[7972, 279, 461, 19, 40, "Output",
+ CellID->916684113]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8470, 303, 110, 3, 27, "Input",
+ CellID->804321979],
+Cell[8583, 308, 383, 16, 38, "Output",
+ CellID->1567272290]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9003, 329, 773, 24, 45, "Input",
+ CellID->758241863],
+Cell[9779, 355, 2790, 119, 38, "Output",
+ CellID->1481144973]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12606, 479, 887, 28, 62, "Input",
+ CellID->1093996001],
+Cell[13496, 509, 1715, 47, 171, "Output",
+ CellID->1943025584]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15248, 561, 112, 3, 27, "Input",
+ CellID->1092912350],
+Cell[15363, 566, 2177, 87, 41, "Output",
+ CellID->523514846]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17577, 658, 196, 6, 27, "Input",
+ CellID->654220270],
+Cell[17776, 666, 1952, 76, 41, "Output",
+ CellID->1345169628]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[19765, 747, 196, 6, 27, "Input",
+ CellID->427410435],
+Cell[19964, 755, 1481, 59, 37, "Output",
+ CellID->1753713613]
+}, Open ]]
+}, Open ]],
+Cell[21472, 818, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[21540, 823, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[21813, 837, 1254, 44, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[23082, 884, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DOT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DOT.nb
index 3ccdaecb8..342184eea 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DOT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DOT.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6713, 199]
-NotebookOptionsPosition[ 4247, 129]
-NotebookOutlinePosition[ 6455, 188]
-CellTagsIndexPosition[ 6390, 183]
+NotebookDataLength[ 8336, 260]
+NotebookOptionsPosition[ 6048, 195]
+NotebookOutlinePosition[ 7883, 244]
+CellTagsIndexPosition[ 7840, 241]
WindowTitle->DOT
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DOT\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DOT"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DOT.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$46648],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/DOT",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DotSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DOT\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DOT"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DOT.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$74473],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/DOT",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,21 +95,29 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DOT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DOT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DOT", "[",
RowBox[{"a", ",", " ", "b", ",", " ", "..."}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the FeynCalc function for non-commutative multiplication. By default \
-it is set to the Mathematica Dot function. This can in principle be disabled \
-by setting DOT=. (or by commenting out \[OpenCurlyDoubleQuote]DOT = Dot;\
-\[CloseCurlyDoubleQuote] in the file \"FeynCalc.m\"), but then \
-non-commutative products should to be entered like DOT[ DiracMatrix[mu], m + \
-DiracSlash[p], DiracMatrix[mu] ] etc."
+ " \[LineSeparator]is the FeynCalc function for non-commutative \
+multiplication. By default it is set to the ",
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " Dot function. "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -98,6 +128,45 @@ DiracSlash[p], DiracMatrix[mu] ] etc."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This can in principle be disabled by setting DOT=. (or by commenting out \
+\[OpenCurlyDoubleQuote]DOT = Dot;\[CloseCurlyDoubleQuote] in the file \
+\"FCConfig.m\"), but then non-commutative products should to be entered like \
+DOT[ GA[mu], m + GS[p], GA[mu] ] etc.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -113,16 +182,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["DotSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DOT",
- CellID->1131348229]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,25 +205,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 19.498470}",
+ "built" -> "{2020, 1, 5, 18, 54, 56.881521}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DOT[a, b, ...] is the FeynCalc function for non-commutative \
-multiplication. By default it is set to the Mathematica Dot function. This \
-can in principle be disabled by setting DOT=. (or by commenting out \"DOT = \
-Dot;\" in the file \"FeynCalc.m\"), but then non-commutative products should \
-to be entered like DOT[DiracMatrix[mu], m + DiracSlash[p], DiracMatrix[mu] ] \
-etc.", "synonyms" -> {}, "title" -> "DOT", "titlemodifier" -> "",
- "windowtitle" -> "DOT", "type" -> "Symbol", "uri" ->
+multiplication. By default it is set to the Mathematica Dot function. ",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DOT", "titlemodifier" ->
+ "", "windowtitle" -> "DOT", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/DOT"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -166,41 +229,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DOT"->{
- Cell[3958, 114, 247, 10, 70, "Text",
- CellTags->"DOT",
- CellID->1131348229]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DOT", 6283, 176}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2987, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 796, 18, 70, "Usage",
+Cell[3565, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3848, 110, 551, 16, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3685, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[4424, 130, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5157, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5191, 158, 309, 6, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5537, 169, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3958, 114, 247, 10, 70, "Text",
- CellTags->"DOT",
- CellID->1131348229]
+Cell[5810, 183, 196, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4220, 127, 23, 0, 70, "FooterCell"]
+Cell[6021, 193, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DataType.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DataType.nb
index 387b5f7ef..8fd0d2b6b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DataType.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DataType.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 25472, 942]
-NotebookOptionsPosition[ 16187, 632]
-NotebookOutlinePosition[ 21760, 799]
-CellTagsIndexPosition[ 21648, 793]
+NotebookDataLength[ 25911, 961]
+NotebookOptionsPosition[ 17435, 683]
+NotebookOutlinePosition[ 22260, 826]
+CellTagsIndexPosition[ 22148, 820]
WindowTitle->DataType
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DataType\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DataType"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DataType.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DeclareNonCommutative\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DeclareNonCommutative"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DataType\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DataType"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DataType.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$34891],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DataType", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$56303],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DataType", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,60 +96,32 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DataType", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DataType", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DataType", "[",
- RowBox[{"exp", ",", " ", "type"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "= True defines the object exp to have data-type type. DataType[exp1, \
-exp2, ..., type] defines the objects exp1, exp2, ...to have data-type type. \
-The default setting is DataType[__, _] := False. To assign a certain \
-data-type, do, e.g., DataType[x, PositiveInteger] = True.\n\nCurrently used \
-DataTypes: ",
- ButtonBox["NonCommutative",
- BaseStyle->"AddOnsLink",
- ButtonData:>"NonCommutative",
- ButtonNote->"NonCommutative"],
- ", ",
- ButtonBox["PositiveInteger",
- BaseStyle->"AddOnsLink",
- ButtonData:>"PositiveInteger",
- ButtonNote->"PositiveInteger"],
- ", ",
- ButtonBox["NegativeInteger",
- BaseStyle->"AddOnsLink",
- ButtonData:>"NegativeInteger",
- ButtonNote->"NegativeInteger"],
- ", ",
- ButtonBox["PositiveNumber",
- BaseStyle->"AddOnsLink",
- ButtonData:>"PositiveNumber",
- ButtonNote->"PositiveNumber"],
- ", ",
- ButtonBox["FreeIndex",
- BaseStyle->"AddOnsLink",
- ButtonData:>"FreeIndex",
- ButtonNote->"FreeIndex"],
- ", ",
- ButtonBox["GrassmannParity\n\n",
- BaseStyle->"AddOnsLink",
- ButtonData:>"GrassmannParity",
- ButtonNote->"GrassmannParity"],
- "PHI adds the DataTypes: ",
- ButtonBox["UMatrix",
- BaseStyle->"AddOnsLink",
- ButtonData:>"UMatrix",
- ButtonNote->"UMatrix"],
- ", ",
- ButtonBox["UScalar",
- BaseStyle->"AddOnsLink",
- ButtonData:>"UScalar",
- ButtonNote->"UScalar"],
- "."
+ RowBox[{
+ RowBox[{"DataType", "[",
+ RowBox[{"exp", ",", " ", "type"}], "]"}], "=", "True"}]],
+ "InlineFormula"],
+ " \[LineSeparator]defines the object exp to have data-type type. \
+DataType[exp1, exp2, ..., type] defines the objects exp1, exp2, ...to have \
+data-type type. The default setting is DataType[__, _] := False. To assign a \
+certain data-type, do, e.g., DataType[x, PositiveInteger] = True."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -137,6 +132,86 @@ DataTypes: ",
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1205239117],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "Currently used DataTypes: ",
+ ButtonBox["NonCommutative",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"NonCommutative",
+ ButtonNote->"NonCommutative"],
+ ", ",
+ ButtonBox["PositiveInteger",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"PositiveInteger",
+ ButtonNote->"PositiveInteger"],
+ ", ",
+ ButtonBox["NegativeInteger",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"NegativeInteger",
+ ButtonNote->"NegativeInteger"],
+ ", ",
+ ButtonBox["PositiveNumber",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"PositiveNumber",
+ ButtonNote->"PositiveNumber"],
+ ", ",
+ ButtonBox["FreeIndex",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"FreeIndex",
+ ButtonNote->"FreeIndex"],
+ ", ",
+ ButtonBox["GrassmannParity",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"GrassmannParity",
+ ButtonNote->"GrassmannParity"]
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "If loaded, PHI adds the DataTypes: ",
+ ButtonBox["UMatrix",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"UMatrix",
+ ButtonNote->"UMatrix"],
+ ", ",
+ ButtonBox["UScalar",
+ BaseStyle->"AddOnsLink",
+ ButtonData:>"UScalar",
+ ButtonNote->"UScalar"],
+ "."
+}], "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -152,7 +227,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1824112295],
+ CellID->1658663371],
Cell[CellGroupData[{
@@ -162,11 +237,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->576268529],
+ CellID->28126502],
-Cell["NonCommutative is just a data-type.", "Text",
- CellTags->"DataType",
- CellID->1046565146],
+Cell["NonCommutative is just a data-type.", "Notes"],
Cell[BoxData[
RowBox[{
@@ -199,18 +272,17 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"2", " ", "a"}], ")"}], ".", "f"}]}], TraditionalForm]], "Output",\
- ImageSize->{105, 15},
+ ImageSize->{115, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[2]=",
- CellID->353088944]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell["\<\
Since \"f \"and \"g\" have DataType NonCommutative the function DotSimplify \
extracts only \"a\" out of the noncommutative product.\
-\>", "Text",
+\>", "Notes",
CellTags->"DataType",
CellID->2142748174],
@@ -228,12 +300,11 @@ Cell[BoxData[
RowBox[{"f", ".", "g"}], "-",
RowBox[{"2", " ", "a", " ",
RowBox[{"g", ".", "f"}]}]}], TraditionalForm]], "Output",
- ImageSize->{92, 15},
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[3]=",
- CellID->1728093744]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[BoxData[
@@ -312,12 +383,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "z"]}], TraditionalForm]], "Output",
- ImageSize->{152, 15},
+ ImageSize->{159, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[7]=",
- CellID->538518934]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -338,12 +408,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "z"], "-", "1"}], TraditionalForm]], "Output",\
- ImageSize->{117, 15},
+ ImageSize->{123, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[8]=",
- CellID->1174286962]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -359,12 +428,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "z"], TraditionalForm]], "Output",
- ImageSize->{42, 15},
+ ImageSize->{44, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[9]=",
- CellID->1170774235]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[BoxData[
@@ -380,7 +448,7 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"DataType", "[",
- RowBox[{"m", ",", "ganzeZahl"}], "]"}], "=", "True"}], ";"}]], "Input",
+ RowBox[{"m", ",", "integer"}], "]"}], "=", "True"}], ";"}]], "Input",
CellTags->"DataType",
CellLabel->"In[11]:=",
CellID->585585082],
@@ -397,7 +465,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "^", "p_"}], "/;",
RowBox[{"DataType", "[",
- RowBox[{"p", ",", "ganzeZahl"}], "]"}]}], "\[RuleDelayed]", "1"}],
+ RowBox[{"p", ",", "integer"}], "]"}]}], "\[RuleDelayed]", "1"}],
"}"}]}]}], ";"}]], "Input",
CellTags->"DataType",
CellLabel->"In[12]:=",
@@ -430,12 +498,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "n"], " ", "x"}]}],
TraditionalForm]], "Output",
- ImageSize->{112, 15},
+ ImageSize->{118, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[13]=",
- CellID->41432149]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -454,12 +521,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "n"], " ", "x"}], "+", "1"}],
TraditionalForm]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{82, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[14]=",
- CellID->1117139634]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[BoxData[
@@ -494,9 +560,7 @@ Cell[BoxData[
Cell["\<\
Certain FeynCalc objects have DataType PositiveInteger set to True.\
-\>", "Text",
- CellTags->"DataType",
- CellID->1789811013],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -509,17 +573,14 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[18]=",
- CellID->1327437721]
+ CellLabel->"Out[18]="]
}, Open ]],
-Cell["PowerSimplify uses the DataType information.", "Text",
- CellTags->"DataType",
- CellID->2130197226],
+Cell["PowerSimplify uses the DataType information.", "Notes"],
Cell[CellGroupData[{
@@ -536,12 +597,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[19]=",
- CellID->410693850]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[CellGroupData[{
@@ -582,12 +642,11 @@ Cell[BoxData[
"Floor"]}], "+",
RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", "m"}]}]]}],
TraditionalForm]], "Output",
- ImageSize->{233, 36},
+ ImageSize->{229, 27},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DataType",
- CellLabel->"Out[20]=",
- CellID->359212449]
+ CellLabel->"Out[20]="]
}, Open ]]
}, Open ]],
@@ -616,16 +675,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DeclareNonCommutative",
ButtonNote->"DeclareNonCommutative"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["\"PHI - A Mathematica package for ChPT calculations\"",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/phi",
- ButtonNote->"phi"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DataType",
- CellID->1742681066]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -633,7 +684,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"DataType",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -642,10 +693,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 29.100598}",
+ "built" -> "{2020, 1, 5, 18, 54, 6.998476}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -654,14 +705,12 @@ TaggingRules->{
"DataType[exp, type] = True defines the object exp to have data-type \
type. DataType[exp1, exp2, ..., type] defines the objects exp1, exp2, ...to \
have data-type type. The default setting is DataType[__, _] := False. To \
-assign a certain data-type, do, e.g., DataType[x, PositiveInteger] = True. \
-Currently used DataTypes: NonCommutative, PositiveInteger, NegativeInteger, \
-PositiveNumber, FreeIndex, GrassmannParity PHI adds the DataTypes: UMatrix, \
-UScalar.", "synonyms" -> {}, "title" -> "DataType", "titlemodifier" -> "",
- "windowtitle" -> "DataType", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DataType"}, "SearchTextTranslated" -> ""},
+assign a certain data-type, do, e.g., DataType[x, PositiveInteger] = True.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DataType",
+ "titlemodifier" -> "", "windowtitle" -> "DataType", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DataType"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -670,7 +719,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -679,271 +728,241 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4757, 139, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6576, 214, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1824112295]},
+ CellID->1658663371]},
"DataType"->{
- Cell[5368, 166, 95, 2, 32, "Text",
- CellTags->"DataType",
- CellID->1046565146],
- Cell[5466, 170, 240, 8, 27, "Input",
+ Cell[7241, 243, 240, 8, 27, "Input",
CellTags->"DataType",
CellID->1643430273],
- Cell[5731, 182, 242, 9, 27, "Input",
+ Cell[7506, 255, 242, 9, 27, "Input",
CellTags->"DataType",
CellID->370505351],
- Cell[5976, 193, 344, 13, 36, "Output",
- CellTags->"DataType",
- CellID->353088944],
- Cell[6335, 209, 200, 5, 52, "Text",
+ Cell[7751, 266, 324, 12, 37, "Output",
+ CellTags->"DataType"],
+ Cell[8090, 281, 201, 5, 49, "Notes",
CellTags->"DataType",
CellID->2142748174],
- Cell[6560, 218, 131, 4, 27, "Input",
+ Cell[8316, 290, 131, 4, 27, "Input",
CellTags->"DataType",
CellID->1089346644],
- Cell[6694, 224, 316, 11, 36, "Output",
- CellTags->"DataType",
- CellID->1728093744],
- Cell[7025, 238, 290, 10, 27, "Input",
+ Cell[8450, 296, 296, 10, 37, "Output",
+ CellTags->"DataType"],
+ Cell[8761, 309, 290, 10, 27, "Input",
CellTags->"DataType",
CellID->2121249133],
- Cell[7318, 250, 431, 15, 29, "Input",
+ Cell[9054, 321, 431, 15, 29, "Input",
CellTags->"DataType",
CellID->1782213069],
- Cell[7752, 267, 414, 15, 29, "Input",
+ Cell[9488, 338, 414, 15, 29, "Input",
CellTags->"DataType",
CellID->1543768294],
- Cell[8191, 286, 359, 14, 27, "Input",
+ Cell[9927, 357, 359, 14, 27, "Input",
CellTags->"DataType",
CellID->1135363295],
- Cell[8553, 302, 456, 17, 36, "Output",
- CellTags->"DataType",
- CellID->538518934],
- Cell[9046, 324, 125, 4, 27, "Input",
+ Cell[10289, 373, 436, 16, 37, "Output",
+ CellTags->"DataType"],
+ Cell[10762, 394, 125, 4, 27, "Input",
CellTags->"DataType",
CellID->703322505],
- Cell[9174, 330, 388, 15, 36, "Output",
- CellTags->"DataType",
- CellID->1174286962],
- Cell[9599, 350, 126, 4, 27, "Input",
+ Cell[10890, 400, 367, 14, 37, "Output",
+ CellTags->"DataType"],
+ Cell[11294, 419, 126, 4, 27, "Input",
CellTags->"DataType",
CellID->1711798640],
- Cell[9728, 356, 278, 10, 36, "Output",
- CellTags->"DataType",
- CellID->1170774235],
- Cell[10021, 369, 211, 7, 27, "Input",
+ Cell[11423, 425, 257, 9, 37, "Output",
+ CellTags->"DataType"],
+ Cell[11695, 437, 211, 7, 27, "Input",
CellTags->"DataType",
CellID->1299043006],
- Cell[10235, 378, 206, 7, 27, "Input",
+ Cell[11909, 446, 204, 7, 27, "Input",
CellTags->"DataType",
CellID->585585082],
- Cell[10444, 387, 448, 16, 29, "Input",
+ Cell[12116, 455, 446, 16, 29, "Input",
CellTags->"DataType",
CellID->846476868],
- Cell[10917, 407, 310, 12, 27, "Input",
+ Cell[12587, 475, 310, 12, 27, "Input",
CellTags->"DataType",
CellID->1533391272],
- Cell[11230, 421, 405, 16, 36, "Output",
- CellTags->"DataType",
- CellID->41432149],
- Cell[11672, 442, 125, 4, 27, "Input",
+ Cell[12900, 489, 386, 15, 37, "Output",
+ CellTags->"DataType"],
+ Cell[13323, 509, 125, 4, 27, "Input",
CellTags->"DataType",
CellID->1293981643],
- Cell[11800, 448, 335, 13, 36, "Output",
- CellTags->"DataType",
- CellID->1117139634],
- Cell[12150, 464, 170, 6, 27, "Input",
+ Cell[13451, 515, 314, 12, 37, "Output",
+ CellTags->"DataType"],
+ Cell[13780, 530, 170, 6, 27, "Input",
CellTags->"DataType",
CellID->943541195],
- Cell[12323, 472, 242, 8, 27, "Input",
+ Cell[13953, 538, 242, 8, 27, "Input",
CellTags->"DataType",
CellID->1739727758],
- Cell[12568, 482, 292, 10, 27, "Input",
+ Cell[14198, 548, 292, 10, 27, "Input",
CellTags->"DataType",
CellID->1265503982],
- Cell[12863, 494, 135, 4, 32, "Text",
- CellTags->"DataType",
- CellID->1789811013],
- Cell[13023, 502, 168, 5, 27, "Input",
+ Cell[14610, 566, 168, 5, 27, "Input",
CellTags->"DataType",
CellID->693329232],
- Cell[13194, 509, 214, 7, 36, "Output",
- CellTags->"DataType",
- CellID->1327437721],
- Cell[13423, 519, 104, 2, 32, "Text",
- CellTags->"DataType",
- CellID->2130197226],
- Cell[13552, 525, 253, 9, 27, "Input",
+ Cell[14781, 573, 193, 6, 35, "Output",
+ CellTags->"DataType"],
+ Cell[15075, 586, 253, 9, 27, "Input",
CellTags->"DataType",
CellID->1014422116],
- Cell[13808, 536, 210, 7, 36, "Output",
- CellTags->"DataType",
- CellID->410693850],
- Cell[14055, 548, 246, 8, 27, "Input",
+ Cell[15331, 597, 190, 6, 35, "Output",
+ CellTags->"DataType"],
+ Cell[15558, 608, 246, 8, 27, "Input",
CellTags->"DataType",
CellID->1682583494],
- Cell[14304, 558, 1012, 31, 57, "Output",
- CellTags->"DataType",
- CellID->359212449],
- Cell[15684, 612, 461, 15, 32, "Text",
- CellTags->"DataType",
- CellID->1742681066]}
+ Cell[15807, 618, 992, 30, 48, "Output",
+ CellTags->"DataType"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 18380, 680},
- {"DataType", 18516, 684}
+ {"PrimaryExamplesSection", 19451, 729},
+ {"DataType", 19587, 733}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3035, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 1851, 57, 229, "Usage",
+Cell[3618, 98, 285, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3928, 113, 681, 17, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4757, 139, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4634, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1205239117],
+Cell[5376, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5410, 162, 834, 32, 70, "Notes",
+ CellID->1067943069],
+Cell[6247, 196, 280, 12, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6576, 214, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1824112295],
+ CellID->1658663371],
Cell[CellGroupData[{
-Cell[5170, 158, 195, 6, 25, "ExampleSection",
- CellID->576268529],
-Cell[5368, 166, 95, 2, 32, "Text",
- CellTags->"DataType",
- CellID->1046565146],
-Cell[5466, 170, 240, 8, 27, "Input",
+Cell[6989, 233, 194, 6, 26, "ExampleSection",
+ CellID->28126502],
+Cell[7186, 241, 52, 0, 32, "Notes"],
+Cell[7241, 243, 240, 8, 27, "Input",
CellTags->"DataType",
CellID->1643430273],
Cell[CellGroupData[{
-Cell[5731, 182, 242, 9, 27, "Input",
+Cell[7506, 255, 242, 9, 27, "Input",
CellTags->"DataType",
CellID->370505351],
-Cell[5976, 193, 344, 13, 36, "Output",
- CellTags->"DataType",
- CellID->353088944]
+Cell[7751, 266, 324, 12, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
-Cell[6335, 209, 200, 5, 52, "Text",
+Cell[8090, 281, 201, 5, 49, "Notes",
CellTags->"DataType",
CellID->2142748174],
Cell[CellGroupData[{
-Cell[6560, 218, 131, 4, 27, "Input",
+Cell[8316, 290, 131, 4, 27, "Input",
CellTags->"DataType",
CellID->1089346644],
-Cell[6694, 224, 316, 11, 36, "Output",
- CellTags->"DataType",
- CellID->1728093744]
+Cell[8450, 296, 296, 10, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
-Cell[7025, 238, 290, 10, 27, "Input",
+Cell[8761, 309, 290, 10, 27, "Input",
CellTags->"DataType",
CellID->2121249133],
-Cell[7318, 250, 431, 15, 29, "Input",
+Cell[9054, 321, 431, 15, 29, "Input",
CellTags->"DataType",
CellID->1782213069],
-Cell[7752, 267, 414, 15, 29, "Input",
+Cell[9488, 338, 414, 15, 29, "Input",
CellTags->"DataType",
CellID->1543768294],
Cell[CellGroupData[{
-Cell[8191, 286, 359, 14, 27, "Input",
+Cell[9927, 357, 359, 14, 27, "Input",
CellTags->"DataType",
CellID->1135363295],
-Cell[8553, 302, 456, 17, 36, "Output",
- CellTags->"DataType",
- CellID->538518934]
+Cell[10289, 373, 436, 16, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9046, 324, 125, 4, 27, "Input",
+Cell[10762, 394, 125, 4, 27, "Input",
CellTags->"DataType",
CellID->703322505],
-Cell[9174, 330, 388, 15, 36, "Output",
- CellTags->"DataType",
- CellID->1174286962]
+Cell[10890, 400, 367, 14, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9599, 350, 126, 4, 27, "Input",
+Cell[11294, 419, 126, 4, 27, "Input",
CellTags->"DataType",
CellID->1711798640],
-Cell[9728, 356, 278, 10, 36, "Output",
- CellTags->"DataType",
- CellID->1170774235]
+Cell[11423, 425, 257, 9, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
-Cell[10021, 369, 211, 7, 27, "Input",
+Cell[11695, 437, 211, 7, 27, "Input",
CellTags->"DataType",
CellID->1299043006],
-Cell[10235, 378, 206, 7, 27, "Input",
+Cell[11909, 446, 204, 7, 27, "Input",
CellTags->"DataType",
CellID->585585082],
-Cell[10444, 387, 448, 16, 29, "Input",
+Cell[12116, 455, 446, 16, 29, "Input",
CellTags->"DataType",
CellID->846476868],
Cell[CellGroupData[{
-Cell[10917, 407, 310, 12, 27, "Input",
+Cell[12587, 475, 310, 12, 27, "Input",
CellTags->"DataType",
CellID->1533391272],
-Cell[11230, 421, 405, 16, 36, "Output",
- CellTags->"DataType",
- CellID->41432149]
+Cell[12900, 489, 386, 15, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11672, 442, 125, 4, 27, "Input",
+Cell[13323, 509, 125, 4, 27, "Input",
CellTags->"DataType",
CellID->1293981643],
-Cell[11800, 448, 335, 13, 36, "Output",
- CellTags->"DataType",
- CellID->1117139634]
+Cell[13451, 515, 314, 12, 37, "Output",
+ CellTags->"DataType"]
}, Open ]],
-Cell[12150, 464, 170, 6, 27, "Input",
+Cell[13780, 530, 170, 6, 27, "Input",
CellTags->"DataType",
CellID->943541195],
-Cell[12323, 472, 242, 8, 27, "Input",
+Cell[13953, 538, 242, 8, 27, "Input",
CellTags->"DataType",
CellID->1739727758],
-Cell[12568, 482, 292, 10, 27, "Input",
+Cell[14198, 548, 292, 10, 27, "Input",
CellTags->"DataType",
CellID->1265503982],
-Cell[12863, 494, 135, 4, 32, "Text",
- CellTags->"DataType",
- CellID->1789811013],
+Cell[14493, 560, 92, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[13023, 502, 168, 5, 27, "Input",
+Cell[14610, 566, 168, 5, 27, "Input",
CellTags->"DataType",
CellID->693329232],
-Cell[13194, 509, 214, 7, 36, "Output",
- CellTags->"DataType",
- CellID->1327437721]
+Cell[14781, 573, 193, 6, 35, "Output",
+ CellTags->"DataType"]
}, Open ]],
-Cell[13423, 519, 104, 2, 32, "Text",
- CellTags->"DataType",
- CellID->2130197226],
+Cell[14989, 582, 61, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[13552, 525, 253, 9, 27, "Input",
+Cell[15075, 586, 253, 9, 27, "Input",
CellTags->"DataType",
CellID->1014422116],
-Cell[13808, 536, 210, 7, 36, "Output",
- CellTags->"DataType",
- CellID->410693850]
+Cell[15331, 597, 190, 6, 35, "Output",
+ CellTags->"DataType"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14055, 548, 246, 8, 27, "Input",
+Cell[15558, 608, 246, 8, 27, "Input",
CellTags->"DataType",
CellID->1682583494],
-Cell[14304, 558, 1012, 31, 57, "Output",
- CellTags->"DataType",
- CellID->359212449]
+Cell[15807, 618, 992, 30, 48, "Output",
+ CellTags->"DataType"]
}, Open ]]
}, Open ]],
-Cell[15343, 593, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16826, 652, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15411, 598, 270, 12, 31, "SeeAlsoSection",
+Cell[16894, 657, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[15684, 612, 461, 15, 32, "Text",
- CellTags->"DataType",
- CellID->1742681066]
+Cell[17167, 671, 226, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[16160, 630, 23, 0, 42, "FooterCell"]
+Cell[17408, 681, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareFCTensor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareFCTensor.nb
new file mode 100644
index 000000000..76f29290c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareFCTensor.nb
@@ -0,0 +1,362 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10638, 352]
+NotebookOptionsPosition[ 7690, 265]
+NotebookOutlinePosition[ 9783, 321]
+CellTagsIndexPosition[ 9699, 316]
+WindowTitle->DeclareFCTensor
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"Uncontract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Uncontract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DeclareFCTensor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DeclareFCTensor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DeclareFCTensor.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$58107],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DeclareFCTensor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DeclareFCTensor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DeclareFCTensor", "[",
+ RowBox[{"a", ",", " ", "b", ",", " ", "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]declares a,b, ... to be tensor heads, i.e., \
+DataType[a,b, ..., FCTensor] is set to True."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1806480907],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->605235900],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1149397665],
+
+Cell[BoxData[
+ RowBox[{"DeclareFCTensor", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->384608883],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"myTens", "[",
+ RowBox[{"z", ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"a", "+", "b"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"c", "+", "d"}], "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->816959797],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{496, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->919476301]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"UnDeclareFCTensor", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2018380174]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["ExpandScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExpandScalarProduct",
+ ButtonNote->"ExpandScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Uncontract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Uncontract",
+ ButtonNote->"Uncontract"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1253676121]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"DeclareFCTensor",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 11.761434}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DeclareFCTensor[a, b, ...] declares a,b, ... to be tensor heads, i.e., \
+DataType[a,b, ..., FCTensor] is set to True.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DeclareFCTensor", "titlemodifier" -> "",
+ "windowtitle" -> "DeclareFCTensor", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DeclareFCTensor"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4542, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1806480907]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9555, 309}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[587, 21, 3150, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3740, 99, 292, 11, 45, "ObjectNameGrid"],
+Cell[4035, 112, 482, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4542, 129, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1806480907],
+Cell[CellGroupData[{
+Cell[4955, 148, 195, 6, 26, "ExampleSection",
+ CellID->605235900],
+Cell[5153, 156, 110, 3, 27, "Input",
+ CellID->1149397665],
+Cell[5266, 161, 116, 3, 27, "Input",
+ CellID->384608883],
+Cell[CellGroupData[{
+Cell[5407, 168, 308, 9, 27, "Input",
+ CellID->816959797],
+Cell[5718, 179, 1034, 39, 42, "Output",
+ CellID->919476301]
+}, Open ]],
+Cell[6767, 221, 119, 3, 27, "Input",
+ CellID->2018380174]
+}, Open ]],
+Cell[6901, 227, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6969, 232, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[7242, 246, 406, 14, 56, "SeeAlso",
+ CellID->1253676121]
+}, Open ]],
+Cell[7663, 263, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareNonCommutative.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareNonCommutative.nb
index ba62c83e2..df5e20cde 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareNonCommutative.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeclareNonCommutative.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12142, 403]
-NotebookOptionsPosition[ 7200, 255]
-NotebookOutlinePosition[ 10522, 346]
-CellTagsIndexPosition[ 10399, 340]
+NotebookDataLength[ 12680, 415]
+NotebookOptionsPosition[ 8145, 282]
+NotebookOutlinePosition[ 11245, 366]
+CellTagsIndexPosition[ 11120, 360]
WindowTitle->DeclareNonCommutative
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DeclareNonCommutative\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DeclareNonCommutative"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"], "\<\"UnDeclareNonCommutative\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/UnDeclareNonCommutative"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DeclareNonCommutative\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DeclareNonCommutative"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DeclareNonCommutative.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$35933],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DeclareNonCommutative", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$58547],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DeclareNonCommutative", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ DeclareNonCommutative.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DeclareNonCommutative", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DeclareNonCommutative", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1011620026],
+ CellID->1552241114],
Cell[CellGroupData[{
@@ -119,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->394231233],
+ CellID->1050786873],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[", "x", "]"}]], "Input",
@@ -130,9 +164,7 @@ Cell[BoxData[
Cell["\<\
As a side effect of DeclareNonCommutative x is declared to be of data type \
NonCommutative.\
-\>", "Text",
- CellTags->"DeclareNonCommutative",
- CellID->836055796],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -145,12 +177,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeclareNonCommutative",
- CellLabel->"Out[2]=",
- CellID->2100185008]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[BoxData[
@@ -175,12 +206,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"False", ",", "True", ",", "True", ",", "True"}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{161, 15},
+ ImageSize->{154, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeclareNonCommutative",
- CellLabel->"Out[4]=",
- CellID->1479757554]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[BoxData[
@@ -205,12 +235,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"False", ",", "False", ",", "False", ",", "False"}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{173, 15},
+ ImageSize->{163, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeclareNonCommutative",
- CellLabel->"Out[6]=",
- CellID->1909095440]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -246,9 +275,7 @@ Cell[TextData[{
ButtonNote->"UnDeclareNonCommutative"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DeclareNonCommutative",
- CellID->716831943]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -256,7 +283,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DeclareNonCommutative",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -265,10 +292,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 34.108334}",
+ "built" -> "{2020, 1, 5, 18, 54, 12.789851}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -276,11 +303,12 @@ TaggingRules->{
"None", "summary" ->
"DeclareNonCommutative[a, b, ...] declares a,b, ... to be \
non-commutative, i.e., DataType[a,b, ..., NonCommutative] is set to True.",
- "synonyms" -> {}, "title" -> "DeclareNonCommutative", "titlemodifier" ->
- "", "windowtitle" -> "DeclareNonCommutative", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DeclareNonCommutative"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DeclareNonCommutative",
+ "titlemodifier" -> "", "windowtitle" -> "DeclareNonCommutative", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DeclareNonCommutative"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -288,8 +316,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -298,113 +327,96 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3490, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4605, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1011620026]},
+ CellID->1552241114]},
"DeclareNonCommutative"->{
- Cell[4101, 123, 154, 4, 27, "Input",
+ Cell[5217, 157, 154, 4, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->1748012038],
- Cell[4258, 129, 172, 5, 51, "Text",
- CellTags->"DeclareNonCommutative",
- CellID->836055796],
- Cell[4455, 138, 176, 5, 27, "Input",
+ Cell[5516, 170, 176, 5, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->903276535],
- Cell[4634, 145, 226, 7, 36, "Output",
- CellTags->"DeclareNonCommutative",
- CellID->2100185008],
- Cell[4875, 155, 176, 5, 27, "Input",
+ Cell[5695, 177, 205, 6, 35, "Output",
+ CellTags->"DeclareNonCommutative"],
+ Cell[5915, 186, 176, 5, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->429692038],
- Cell[5076, 164, 209, 6, 27, "Input",
+ Cell[6116, 195, 209, 6, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->498899039],
- Cell[5288, 172, 307, 10, 36, "Output",
- CellTags->"DeclareNonCommutative",
- CellID->1479757554],
- Cell[5610, 185, 188, 5, 27, "Input",
+ Cell[6328, 203, 286, 9, 35, "Output",
+ CellTags->"DeclareNonCommutative"],
+ Cell[6629, 215, 188, 5, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->660830730],
- Cell[5823, 194, 210, 6, 27, "Input",
+ Cell[6842, 224, 210, 6, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->1927435284],
- Cell[6036, 202, 310, 10, 36, "Output",
- CellTags->"DeclareNonCommutative",
- CellID->1909095440],
- Cell[6714, 235, 444, 15, 32, "Text",
- CellTags->"DeclareNonCommutative",
- CellID->716831943]}
+ Cell[7055, 232, 289, 9, 35, "Output",
+ CellTags->"DeclareNonCommutative"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9118, 299},
- {"DeclareNonCommutative", 9266, 303}
+ {"PrimaryExamplesSection", 10108, 328},
+ {"DeclareNonCommutative", 10257, 332}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2297, 52, 51, "AnchorBarGrid",
+Cell[593, 21, 3178, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2893, 75, 64, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2960, 78, 505, 14, 83, "Usage",
+Cell[3774, 99, 298, 11, 45, "ObjectNameGrid"],
+Cell[4075, 112, 505, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3490, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4605, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1011620026],
+ CellID->1552241114],
Cell[CellGroupData[{
-Cell[3903, 115, 195, 6, 25, "ExampleSection",
- CellID->394231233],
-Cell[4101, 123, 154, 4, 27, "Input",
+Cell[5018, 149, 196, 6, 26, "ExampleSection",
+ CellID->1050786873],
+Cell[5217, 157, 154, 4, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->1748012038],
-Cell[4258, 129, 172, 5, 51, "Text",
- CellTags->"DeclareNonCommutative",
- CellID->836055796],
+Cell[5374, 163, 117, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4455, 138, 176, 5, 27, "Input",
+Cell[5516, 170, 176, 5, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->903276535],
-Cell[4634, 145, 226, 7, 36, "Output",
- CellTags->"DeclareNonCommutative",
- CellID->2100185008]
+Cell[5695, 177, 205, 6, 35, "Output",
+ CellTags->"DeclareNonCommutative"]
}, Open ]],
-Cell[4875, 155, 176, 5, 27, "Input",
+Cell[5915, 186, 176, 5, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->429692038],
Cell[CellGroupData[{
-Cell[5076, 164, 209, 6, 27, "Input",
+Cell[6116, 195, 209, 6, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->498899039],
-Cell[5288, 172, 307, 10, 36, "Output",
- CellTags->"DeclareNonCommutative",
- CellID->1479757554]
+Cell[6328, 203, 286, 9, 35, "Output",
+ CellTags->"DeclareNonCommutative"]
}, Open ]],
-Cell[5610, 185, 188, 5, 27, "Input",
+Cell[6629, 215, 188, 5, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->660830730],
Cell[CellGroupData[{
-Cell[5823, 194, 210, 6, 27, "Input",
+Cell[6842, 224, 210, 6, 27, "Input",
CellTags->"DeclareNonCommutative",
CellID->1927435284],
-Cell[6036, 202, 310, 10, 36, "Output",
- CellTags->"DeclareNonCommutative",
- CellID->1909095440]
+Cell[7055, 232, 289, 9, 35, "Output",
+ CellTags->"DeclareNonCommutative"]
}, Open ]]
}, Open ]],
-Cell[6373, 216, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7371, 245, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6441, 221, 270, 12, 31, "SeeAlsoSection",
+Cell[7439, 250, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6714, 235, 444, 15, 32, "Text",
- CellTags->"DeclareNonCommutative",
- CellID->716831943]
+Cell[7712, 264, 391, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7173, 253, 23, 0, 42, "FooterCell"]
+Cell[8118, 280, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunction.nb
index 38590ce1f..79414cc02 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunction.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunction.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13248, 463]
-NotebookOptionsPosition[ 8422, 310]
-NotebookOutlinePosition[ 11648, 402]
-CellTagsIndexPosition[ 11531, 396]
+NotebookDataLength[ 15272, 529]
+NotebookOptionsPosition[ 10583, 382]
+NotebookOutlinePosition[ 13542, 466]
+CellTagsIndexPosition[ 13425, 460]
WindowTitle->DeltaFunction
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DeltaFunction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DeltaFunction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Convolute\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Convolute"], "\<\"DeltaFunctionPrime\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeltaFunctionPrime"], "\<\"Integrate2\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"], "\<\"SimplifyDeltaFunction\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SimplifyDeltaFunction"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DeltaFunction\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DeltaFunction"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DeltaFunction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$36619],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DeltaFunction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$59431],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DeltaFunction", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,22 +101,30 @@ DeltaFunction.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DeltaFunction", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DeltaFunction", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DeltaFunction", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the Dirac delta-function ",
+ " \[LineSeparator]is the Dirac delta-function ",
Cell[BoxData[
FormBox[
RowBox[{"\[Delta]", "(", "x", ")"}], TraditionalForm]]],
- ".\nNOTICE: After version 4 of ",
- StyleBox["Mathematica",
- FontSlant->"Italic"],
- " there is a built-in function, DiracDelta, with comparable properties."
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -99,6 +135,47 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->149117060],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " also provides a built-in function ",
+ Cell[BoxData["DiracDelta"], "InlineFormula"],
+ " with comparable properties."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -114,7 +191,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->164674075],
+ CellID->1801745377],
Cell[CellGroupData[{
@@ -124,7 +201,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->986793998],
+ CellID->1300323557],
Cell[CellGroupData[{
@@ -141,12 +218,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{57, 15},
+ ImageSize->{59, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunction",
- CellLabel->"Out[1]=",
- CellID->1935055166]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -167,12 +243,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunction",
- CellLabel->"Out[2]=",
- CellID->904672527]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -192,12 +267,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "0", ")"}], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{36, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunction",
- CellLabel->"Out[3]=",
- CellID->694516034]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -218,21 +292,24 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunction",
- CellLabel->"Out[4]=",
- CellID->877420351]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"DeltaFunction", "[",
+ RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}], "/.",
RowBox[{
- RowBox[{"DeltaFunction", "[",
- RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"DeltaFunction",
CellLabel->"In[5]:=",
CellID->2128349],
@@ -245,15 +322,12 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{175, 15},
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{130, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunction",
- CellLabel->"Out[5]=",
- CellID->984049833]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -301,9 +375,7 @@ Cell[TextData[{
ButtonNote->"SimplifyDeltaFunction"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DeltaFunction",
- CellID->1180269291]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -311,7 +383,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DeltaFunction",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -320,23 +392,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 36.811935}",
+ "built" -> "{2020, 1, 5, 18, 54, 15.080470}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DeltaFunction[x] is the Dirac delta-function \\[Delta](x). NOTICE: After \
-version 4 of Mathematica there is a built-in function, DiracDelta, with \
-comparable properties.", "synonyms" -> {}, "title" -> "DeltaFunction",
+ "DeltaFunction[x] is the Dirac delta-function \\[Delta](x).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DeltaFunction",
"titlemodifier" -> "", "windowtitle" -> "DeltaFunction", "type" ->
"Symbol", "uri" -> "FeynCalc/ref/DeltaFunction"}, "SearchTextTranslated" ->
""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -344,8 +415,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -354,117 +426,111 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3586, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5800, 178, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->164674075]},
+ CellID->1801745377]},
"DeltaFunction"->{
- Cell[4218, 130, 161, 5, 27, "Input",
+ Cell[6434, 207, 161, 5, 27, "Input",
CellTags->"DeltaFunction",
CellID->1276544329],
- Cell[4382, 137, 309, 11, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->1935055166],
- Cell[4728, 153, 338, 11, 27, "Input",
+ Cell[6598, 214, 288, 10, 37, "Output",
+ CellTags->"DeltaFunction"],
+ Cell[6923, 229, 338, 11, 27, "Input",
CellTags->"DeltaFunction",
CellID->656921459],
- Cell[5069, 166, 242, 8, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->904672527],
- Cell[5348, 179, 312, 10, 27, "Input",
+ Cell[7264, 242, 222, 7, 37, "Output",
+ CellTags->"DeltaFunction"],
+ Cell[7523, 254, 312, 10, 27, "Input",
CellTags->"DeltaFunction",
CellID->146135859],
- Cell[5663, 191, 242, 8, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->694516034],
- Cell[5942, 204, 337, 11, 27, "Input",
+ Cell[7838, 266, 222, 7, 37, "Output",
+ CellTags->"DeltaFunction"],
+ Cell[8097, 278, 337, 11, 27, "Input",
CellTags->"DeltaFunction",
CellID->77885451],
- Cell[6282, 217, 242, 8, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->877420351],
- Cell[6561, 230, 220, 7, 27, "Input",
+ Cell[8437, 291, 222, 7, 37, "Output",
+ CellTags->"DeltaFunction"],
+ Cell[8696, 303, 356, 11, 29, "Input",
CellTags->"DeltaFunction",
CellID->2128349],
- Cell[6784, 239, 440, 16, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->984049833],
- Cell[7592, 278, 788, 27, 32, "Text",
- CellTags->"DeltaFunction",
- CellID->1180269291]}
+ Cell[9055, 316, 376, 13, 37, "Output",
+ CellTags->"DeltaFunction"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10345, 355},
- {"DeltaFunction", 10485, 359}
+ {"PrimaryExamplesSection", 12441, 427},
+ {"DeltaFunction", 12582, 431}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3356, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 649, 19, 108, "Usage",
+Cell[3944, 103, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4259, 118, 475, 15, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3586, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4759, 137, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->149117060],
+Cell[5500, 163, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5534, 165, 217, 7, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5800, 178, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->164674075],
+ CellID->1801745377],
Cell[CellGroupData[{
-Cell[3998, 120, 195, 6, 25, "ExampleSection",
- CellID->986793998],
+Cell[6213, 197, 196, 6, 26, "ExampleSection",
+ CellID->1300323557],
Cell[CellGroupData[{
-Cell[4218, 130, 161, 5, 27, "Input",
+Cell[6434, 207, 161, 5, 27, "Input",
CellTags->"DeltaFunction",
CellID->1276544329],
-Cell[4382, 137, 309, 11, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->1935055166]
+Cell[6598, 214, 288, 10, 37, "Output",
+ CellTags->"DeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4728, 153, 338, 11, 27, "Input",
+Cell[6923, 229, 338, 11, 27, "Input",
CellTags->"DeltaFunction",
CellID->656921459],
-Cell[5069, 166, 242, 8, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->904672527]
+Cell[7264, 242, 222, 7, 37, "Output",
+ CellTags->"DeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5348, 179, 312, 10, 27, "Input",
+Cell[7523, 254, 312, 10, 27, "Input",
CellTags->"DeltaFunction",
CellID->146135859],
-Cell[5663, 191, 242, 8, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->694516034]
+Cell[7838, 266, 222, 7, 37, "Output",
+ CellTags->"DeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5942, 204, 337, 11, 27, "Input",
+Cell[8097, 278, 337, 11, 27, "Input",
CellTags->"DeltaFunction",
CellID->77885451],
-Cell[6282, 217, 242, 8, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->877420351]
+Cell[8437, 291, 222, 7, 37, "Output",
+ CellTags->"DeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6561, 230, 220, 7, 27, "Input",
+Cell[8696, 303, 356, 11, 29, "Input",
CellTags->"DeltaFunction",
CellID->2128349],
-Cell[6784, 239, 440, 16, 36, "Output",
- CellTags->"DeltaFunction",
- CellID->984049833]
+Cell[9055, 316, 376, 13, 37, "Output",
+ CellTags->"DeltaFunction"]
}, Open ]]
}, Open ]],
-Cell[7251, 259, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9458, 333, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7319, 264, 270, 12, 31, "SeeAlsoSection",
+Cell[9526, 338, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7592, 278, 788, 27, 32, "Text",
- CellTags->"DeltaFunction",
- CellID->1180269291]
+Cell[9799, 352, 742, 25, 70, "SeeAlso"]
}, Open ]],
-Cell[8395, 308, 23, 0, 70, "FooterCell"]
+Cell[10556, 380, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb
index 526758094..bc948b0c0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb
@@ -3,70 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6528, 196]
-NotebookOptionsPosition[ 4168, 129]
-NotebookOutlinePosition[ 6249, 185]
-CellTagsIndexPosition[ 6163, 180]
+NotebookDataLength[ 7212, 216]
+NotebookOptionsPosition[ 5118, 159]
+NotebookOutlinePosition[ 7005, 208]
+CellTagsIndexPosition[ 6962, 205]
WindowTitle->DeltaFunctionDoublePrime
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DeltaFunctionDoublePrime\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DeltaFunctionDoublePrime"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DeltaFunctionPrime\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DeltaFunctionPrime"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/DeltaFunctionDoublePrime\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DeltaFunctionDoublePrime"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DeltaFunctionDoublePrime.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$36272],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DeltaFunctionDoublePrime", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$58986],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DeltaFunctionDoublePrime", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -74,8 +97,18 @@ DeltaFunctionDoublePrime.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DeltaFunctionDoublePrime", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DeltaFunctionDoublePrime", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,16 +146,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["DeltaFunctionPrime",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DeltaFunctionPrime",
ButtonNote->"DeltaFunctionPrime"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DeltaFunctionDoublePrime",
- CellID->1988601213]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,22 +169,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 35.613849}",
+ "built" -> "{2020, 1, 5, 18, 54, 14.084455}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DeltaFunctionDoublePrime[1 - x] is the second derivative of the Dirac \
-delta-function \\[Delta](x).", "synonyms" -> {}, "title" ->
+delta-function \\[Delta](x).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"DeltaFunctionDoublePrime", "titlemodifier" -> "", "windowtitle" ->
"DeltaFunctionDoublePrime", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/DeltaFunctionDoublePrime"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +193,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DeltaFunctionDoublePrime"->{
- Cell[3837, 114, 289, 10, 70, "Text",
- CellTags->"DeltaFunctionDoublePrime",
- CellID->1988601213]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DeltaFunctionDoublePrime", 6035, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[596, 21, 2322, 53, 70, "AnchorBarGrid",
+Cell[596, 21, 3110, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2921, 76, 67, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2991, 79, 548, 17, 70, "Usage",
+Cell[3709, 99, 301, 11, 70, "ObjectNameGrid"],
+Cell[4013, 112, 548, 17, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3564, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[4586, 133, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3837, 114, 289, 10, 70, "Text",
- CellTags->"DeltaFunctionDoublePrime",
- CellID->1988601213]
+Cell[4859, 147, 217, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4141, 127, 23, 0, 70, "FooterCell"]
+Cell[5091, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionPrime.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionPrime.nb
index 32d3bed8f..a3b0b91f7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionPrime.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DeltaFunctionPrime.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11432, 386]
-NotebookOptionsPosition[ 7366, 262]
-NotebookOutlinePosition[ 10205, 341]
-CellTagsIndexPosition[ 10085, 335]
+NotebookDataLength[ 12489, 409]
+NotebookOptionsPosition[ 8672, 296]
+NotebookOutlinePosition[ 11390, 370]
+CellTagsIndexPosition[ 11268, 364]
WindowTitle->DeltaFunctionPrime
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DeltaFunctionPrime\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DeltaFunctionPrime"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Convolute\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Convolute"], "\<\"DeltaFunction\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeltaFunction"], \
+"\<\"DeltaFunctionDoublePrime\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeltaFunctionDoublePrime"], "\<\"Integrate2\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"], "\<\"SimplifyDeltaFunction\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SimplifyDeltaFunction"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DeltaFunctionPrime\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DeltaFunctionPrime"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DeltaFunctionPrime.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$36963],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DeltaFunctionPrime", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$59876],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DeltaFunctionPrime", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,18 @@ DeltaFunctionPrime.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DeltaFunctionPrime", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DeltaFunctionPrime", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +152,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->935710170],
+ CellID->393797030],
Cell[CellGroupData[{
@@ -122,7 +162,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1092291862],
+ CellID->1248269988],
Cell[CellGroupData[{
@@ -140,12 +180,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{63, 15},
+ ImageSize->{66, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunctionPrime",
- CellLabel->"Out[1]=",
- CellID->1329619670]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +207,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["f", "\[Prime]",
MultilineFunction->None], "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{39, 15},
+ ImageSize->{41, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunctionPrime",
- CellLabel->"Out[2]=",
- CellID->1211576646]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -193,12 +231,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["2", TraditionalForm]], "Output",
- ImageSize->{12, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DeltaFunctionPrime",
- CellLabel->"Out[3]=",
- CellID->1114808117]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -222,7 +259,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Convolute",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Convolute",
@@ -253,9 +289,7 @@ Cell[TextData[{
ButtonNote->"SimplifyDeltaFunction"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DeltaFunctionPrime",
- CellID->1121609320]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -272,22 +306,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 38.463461}",
+ "built" -> "{2020, 1, 5, 18, 54, 16.262890}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DeltaFunctionPrime[1 - x] is the derivative of the Dirac delta-function \
-\\[Delta](x).", "synonyms" -> {}, "title" -> "DeltaFunctionPrime",
- "titlemodifier" -> "", "windowtitle" -> "DeltaFunctionPrime", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/DeltaFunctionPrime"},
- "SearchTextTranslated" -> ""},
+\\[Delta](x).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DeltaFunctionPrime", "titlemodifier" -> "", "windowtitle" ->
+ "DeltaFunctionPrime", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DeltaFunctionPrime"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -295,8 +329,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -305,89 +340,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3502, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4937, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->935710170]},
+ CellID->393797030]},
"DeltaFunctionPrime"->{
- Cell[4135, 128, 170, 5, 27, "Input",
+ Cell[5570, 168, 170, 5, 27, "Input",
CellTags->"DeltaFunctionPrime",
CellID->677883424],
- Cell[4308, 135, 346, 12, 36, "Output",
- CellTags->"DeltaFunctionPrime",
- CellID->1329619670],
- Cell[4691, 152, 348, 11, 27, "Input",
+ Cell[5743, 175, 325, 11, 37, "Output",
+ CellTags->"DeltaFunctionPrime"],
+ Cell[6105, 191, 348, 11, 27, "Input",
CellTags->"DeltaFunctionPrime",
CellID->666771914],
- Cell[5042, 165, 309, 10, 36, "Output",
- CellTags->"DeltaFunctionPrime",
- CellID->1211576646],
- Cell[5388, 180, 345, 11, 31, "Input",
+ Cell[6456, 204, 288, 9, 37, "Output",
+ CellTags->"DeltaFunctionPrime"],
+ Cell[6781, 218, 345, 11, 33, "Input",
CellTags->"DeltaFunctionPrime",
CellID->1722060708],
- Cell[5736, 193, 220, 7, 36, "Output",
- CellTags->"DeltaFunctionPrime",
- CellID->1114808117],
- Cell[6324, 223, 1000, 34, 52, "Text",
- CellTags->"DeltaFunctionPrime",
- CellID->1121609320]}
+ Cell[7129, 231, 199, 6, 35, "Output",
+ CellTags->"DeltaFunctionPrime"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9225, 306},
- {"DeltaFunctionPrime", 9369, 310}
+ {"PrimaryExamplesSection", 10576, 341},
+ {"DeltaFunctionPrime", 10721, 345}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3486, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 535, 17, 84, "Usage",
+Cell[4079, 105, 295, 11, 45, "ObjectNameGrid"],
+Cell[4377, 118, 535, 17, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3502, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4937, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->935710170],
+ CellID->393797030],
Cell[CellGroupData[{
-Cell[3914, 118, 196, 6, 25, "ExampleSection",
- CellID->1092291862],
+Cell[5349, 158, 196, 6, 26, "ExampleSection",
+ CellID->1248269988],
Cell[CellGroupData[{
-Cell[4135, 128, 170, 5, 27, "Input",
+Cell[5570, 168, 170, 5, 27, "Input",
CellTags->"DeltaFunctionPrime",
CellID->677883424],
-Cell[4308, 135, 346, 12, 36, "Output",
- CellTags->"DeltaFunctionPrime",
- CellID->1329619670]
+Cell[5743, 175, 325, 11, 37, "Output",
+ CellTags->"DeltaFunctionPrime"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4691, 152, 348, 11, 27, "Input",
+Cell[6105, 191, 348, 11, 27, "Input",
CellTags->"DeltaFunctionPrime",
CellID->666771914],
-Cell[5042, 165, 309, 10, 36, "Output",
- CellTags->"DeltaFunctionPrime",
- CellID->1211576646]
+Cell[6456, 204, 288, 9, 37, "Output",
+ CellTags->"DeltaFunctionPrime"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5388, 180, 345, 11, 31, "Input",
+Cell[6781, 218, 345, 11, 33, "Input",
CellTags->"DeltaFunctionPrime",
CellID->1722060708],
-Cell[5736, 193, 220, 7, 36, "Output",
- CellTags->"DeltaFunctionPrime",
- CellID->1114808117]
+Cell[7129, 231, 199, 6, 35, "Output",
+ CellTags->"DeltaFunctionPrime"]
}, Open ]]
}, Open ]],
-Cell[5983, 204, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7355, 241, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6051, 209, 270, 12, 31, "SeeAlsoSection",
+Cell[7423, 246, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6324, 223, 1000, 34, 52, "Text",
- CellTags->"DeltaFunctionPrime",
- CellID->1121609320]
+Cell[7696, 260, 934, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[7339, 260, 23, 0, 42, "FooterCell"]
+Cell[8645, 294, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DenominatorOrder.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DenominatorOrder.nb
deleted file mode 100644
index 7ea3bd66b..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DenominatorOrder.nb
+++ /dev/null
@@ -1,205 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6453, 196]
-NotebookOptionsPosition[ 4138, 129]
-NotebookOutlinePosition[ 6183, 185]
-CellTagsIndexPosition[ 6105, 180]
-WindowTitle->DenominatorOrder
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DenominatorOrder\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DenominatorOrder"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-DenominatorOrder.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$37303],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DenominatorOrder", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["DenominatorOrder", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["DenominatorOrder"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for OneLoop, if set to True the PropagatorDenominator will \
-be ordered in a standard way."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["OneLoop",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/OneLoop",
- ButtonNote->"OneLoop"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["PropagatorDenominator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/PropagatorDenominator",
- ButtonNote->"PropagatorDenominator"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DenominatorOrder",
- CellID->1578744187]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"DenominatorOrder",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 40.081987}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "DenominatorOrder is an option for OneLoop, if set to True the \
-PropagatorDenominator will be ordered in a standard way.", "synonyms" -> {},
- "title" -> "DenominatorOrder", "titlemodifier" -> "", "windowtitle" ->
- "DenominatorOrder", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DenominatorOrder"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "DenominatorOrder"->{
- Cell[3650, 108, 446, 16, 70, "Text",
- CellTags->"DenominatorOrder",
- CellID->1578744187]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"DenominatorOrder", 5985, 173}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[588, 21, 2277, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2868, 75, 59, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 422, 12, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3377, 94, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3650, 108, 446, 16, 70, "Text",
- CellTags->"DenominatorOrder",
- CellID->1578744187]
-}, Open ]],
-Cell[4111, 127, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Dimension.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Dimension.nb
index 203808db8..03a8c9d6d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Dimension.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Dimension.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14661, 518]
-NotebookOptionsPosition[ 9366, 346]
-NotebookOutlinePosition[ 12917, 450]
-CellTagsIndexPosition[ 12804, 444]
+NotebookDataLength[ 9335, 309]
+NotebookOptionsPosition[ 6049, 210]
+NotebookOutlinePosition[ 8555, 279]
+CellTagsIndexPosition[ 8444, 273]
WindowTitle->Dimension
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$37999],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$60770],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Dimension", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Dimension", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Dimension", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +119,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1659906149],
+ CellID->1146652023],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,18 +129,12 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->764784368],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"Dimension",
- CellID->269185513],
+ CellID->649710797],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "MetricTensor", "]"}]], "Input",
+ RowBox[{"Options", "[", "ScalarProduct", "]"}]], "Input",
CellTags->"Dimension",
CellLabel->"In[1]:=",
CellID->48360105],
@@ -137,26 +144,23 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{281, 15},
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"4", ",", "D"}], "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{414, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Dimension",
- CellLabel->"Out[1]=",
- CellID->1017306369]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"m", ",", "n", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}]}]], "Input",
+ RowBox[{"ScalarProduct", "[",
+ RowBox[{"m", ",", "n", ",",
+ RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}]], "Input",
CellTags->"Dimension",
CellLabel->"In[2]:=",
CellID->1811829745],
@@ -164,181 +168,41 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], " ",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["m",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["n",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{61, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Dimension",
- CellLabel->"Out[2]=",
- CellID->1365396948]
-}, Open ]],
-
-Cell["\<\
-The dimension of the indices is not shown by default but can be inspected \
-easily.\
-\>", "Text",
- CellTags->"Dimension",
- CellID->1652643284],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"m", ",", "n", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}]}], "//",
- "StandardForm"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[3]:=",
- CellID->799099233],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "d"}], "]"}], ",", "d"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"m", ",", "d"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"n", ",", "d"}], "]"}]}], "]"}]}]], "Output",
- ImageSize->{370, 33},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Dimension",
- CellLabel->"Out[3]//StandardForm=",
- CellID->379657902]
-}, Open ]],
-
-Cell["\<\
-Setting the global variable $LorentzIndices to True will display the \
-dimension (if different from 4) as a subscript.\
-\>", "Text",
- CellTags->"Dimension",
- CellID->1658312621],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "True"}], ";"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[4]:=",
- CellID->136991377],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}]}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[5]:=",
- CellID->1877198136],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm]], " ",
+ FormBox["m",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]}]],
+ FormBox["n",
+ TraditionalForm],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{84, 19},
+ ImageSize->{41, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Dimension",
- CellLabel->"Out[5]=",
- CellID->1953179545]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[6]:=",
- CellID->40947459],
+ CellLabel->"In[3]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",", "n"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "n"}], "]"}]}], "]"}]}]], "Output",
- ImageSize->{372, 33},
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"m", ",", "d"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"n", ",", "d"}], "]"}]}], "]"}]], "Output",
+ ImageSize->{297, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Dimension",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1903897849]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "False"}], ";"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[7]:=",
- CellID->889371773]
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -356,10 +220,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 42.638995}",
+ "built" -> "{2020, 1, 5, 18, 54, 18.671578}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -367,12 +231,12 @@ TaggingRules->{
"None", "summary" ->
"Dimension is an option of several functions and denotes the number of \
space-time dimensions. Possible settings are: 4, n, d, D, ... ,the variable \
-does not matter, but it should have Head Symbol.", "synonyms" -> {}, "title" ->
- "Dimension", "titlemodifier" -> "", "windowtitle" -> "Dimension", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Dimension"}, "SearchTextTranslated" ->
- ""},
+does not matter, but it should have Head Symbol.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Dimension", "titlemodifier" -> "",
+ "windowtitle" -> "Dimension", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Dimension"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -381,7 +245,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -390,136 +254,63 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3412, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3674, 106, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1659906149]},
+ CellID->1146652023]},
"Dimension"->{
- Cell[4023, 122, 77, 2, 35, "Subsubsection",
- CellTags->"Dimension",
- CellID->269185513],
- Cell[4125, 128, 137, 4, 27, "Input",
+ Cell[4307, 135, 138, 4, 27, "Input",
CellTags->"Dimension",
CellID->48360105],
- Cell[4265, 134, 350, 12, 36, "Output",
- CellTags->"Dimension",
- CellID->1017306369],
- Cell[4652, 151, 332, 10, 27, "Input",
+ Cell[4448, 141, 432, 13, 37, "Output",
+ CellTags->"Dimension"],
+ Cell[4917, 159, 205, 6, 27, "Input",
CellTags->"Dimension",
CellID->1811829745],
- Cell[4987, 163, 680, 29, 38, "Output",
- CellTags->"Dimension",
- CellID->1365396948],
- Cell[5682, 195, 152, 5, 32, "Text",
- CellTags->"Dimension",
- CellID->1652643284],
- Cell[5859, 204, 375, 12, 45, "Input",
- CellTags->"Dimension",
- CellID->799099233],
- Cell[6237, 218, 543, 17, 67, "Output",
- CellTags->"Dimension",
- CellID->379657902],
- Cell[6795, 238, 187, 5, 52, "Text",
- CellTags->"Dimension",
- CellID->1658312621],
- Cell[6985, 245, 151, 5, 27, "Input",
- CellTags->"Dimension",
- CellID->136991377],
- Cell[7161, 254, 345, 10, 27, "Input",
- CellTags->"Dimension",
- CellID->1877198136],
- Cell[7509, 266, 912, 38, 40, "Output",
- CellTags->"Dimension",
- CellID->1953179545],
- Cell[8458, 309, 127, 4, 27, "Input",
- CellTags->"Dimension",
- CellID->40947459],
- Cell[8588, 315, 557, 17, 67, "Output",
- CellTags->"Dimension",
- CellID->1903897849],
- Cell[9160, 335, 152, 5, 27, "Input",
- CellTags->"Dimension",
- CellID->889371773]}
+ Cell[5125, 167, 406, 17, 35, "Output",
+ CellTags->"Dimension"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11300, 391},
- {"Dimension", 11436, 395}
+ {"PrimaryExamplesSection", 7971, 255},
+ {"Dimension", 8108, 259}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 2276, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 500, 13, 97, "Usage",
+Cell[2860, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[3149, 89, 500, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3412, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3674, 106, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1659906149],
-Cell[3803, 112, 195, 6, 25, "ExampleSection",
- CellID->764784368],
+ CellID->1146652023],
Cell[CellGroupData[{
-Cell[4023, 122, 77, 2, 35, "Subsubsection",
- CellTags->"Dimension",
- CellID->269185513],
+Cell[4087, 125, 195, 6, 26, "ExampleSection",
+ CellID->649710797],
Cell[CellGroupData[{
-Cell[4125, 128, 137, 4, 27, "Input",
+Cell[4307, 135, 138, 4, 27, "Input",
CellTags->"Dimension",
CellID->48360105],
-Cell[4265, 134, 350, 12, 36, "Output",
- CellTags->"Dimension",
- CellID->1017306369]
+Cell[4448, 141, 432, 13, 37, "Output",
+ CellTags->"Dimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4652, 151, 332, 10, 27, "Input",
+Cell[4917, 159, 205, 6, 27, "Input",
CellTags->"Dimension",
CellID->1811829745],
-Cell[4987, 163, 680, 29, 38, "Output",
- CellTags->"Dimension",
- CellID->1365396948]
-}, Open ]],
-Cell[5682, 195, 152, 5, 32, "Text",
- CellTags->"Dimension",
- CellID->1652643284],
-Cell[CellGroupData[{
-Cell[5859, 204, 375, 12, 45, "Input",
- CellTags->"Dimension",
- CellID->799099233],
-Cell[6237, 218, 543, 17, 67, "Output",
- CellTags->"Dimension",
- CellID->379657902]
-}, Open ]],
-Cell[6795, 238, 187, 5, 52, "Text",
- CellTags->"Dimension",
- CellID->1658312621],
-Cell[6985, 245, 151, 5, 27, "Input",
- CellTags->"Dimension",
- CellID->136991377],
-Cell[CellGroupData[{
-Cell[7161, 254, 345, 10, 27, "Input",
- CellTags->"Dimension",
- CellID->1877198136],
-Cell[7509, 266, 912, 38, 40, "Output",
- CellTags->"Dimension",
- CellID->1953179545]
+Cell[5125, 167, 406, 17, 35, "Output",
+ CellTags->"Dimension"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8458, 309, 127, 4, 27, "Input",
- CellTags->"Dimension",
- CellID->40947459],
-Cell[8588, 315, 557, 17, 67, "Output",
- CellTags->"Dimension",
- CellID->1903897849]
-}, Open ]],
-Cell[9160, 335, 152, 5, 27, "Input",
- CellTags->"Dimension",
- CellID->889371773]
+Cell[5568, 189, 84, 2, 27, "Input"],
+Cell[5655, 193, 328, 10, 51, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[9339, 344, 23, 0, 42, "FooterCell"]
+Cell[6022, 208, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DimensionalReduction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DimensionalReduction.nb
deleted file mode 100644
index e34d6fb70..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DimensionalReduction.nb
+++ /dev/null
@@ -1,203 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6367, 194]
-NotebookOptionsPosition[ 4078, 128]
-NotebookOutlinePosition[ 6093, 183]
-CellTagsIndexPosition[ 6011, 178]
-WindowTitle->DimensionalReduction
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DimensionalReduction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DimensionalReduction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-DimensionalReduction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$37649],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DimensionalReduction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["DimensionalReduction", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["DimensionalReduction"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for TID and OneLoopSimplify."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["TID",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/TID",
- ButtonNote->"TID"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["OneLoopSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/OneLoopSimplify",
- ButtonNote->"OneLoopSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DimensionalReduction",
- CellID->1470280518]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"DimensionalReduction",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 41.348344}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "DimensionalReduction is an option for TID and OneLoopSimplify.",
- "synonyms" -> {}, "title" -> "DimensionalReduction", "titlemodifier" ->
- "", "windowtitle" -> "DimensionalReduction", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DimensionalReduction"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "DimensionalReduction"->{
- Cell[3616, 107, 420, 16, 70, "Text",
- CellTags->"DimensionalReduction",
- CellID->1470280518]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"DimensionalReduction", 5887, 171}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[592, 21, 2293, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2888, 75, 63, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2954, 78, 364, 11, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3343, 93, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3616, 107, 420, 16, 70, "Text",
- CellTags->"DimensionalReduction",
- CellID->1470280518]
-}, Open ]],
-Cell[4051, 126, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracBasis.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracBasis.nb
index 4f106d617..b463ce3d5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracBasis.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracBasis.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6460, 194]
-NotebookOptionsPosition[ 4068, 126]
-NotebookOutlinePosition[ 6196, 183]
-CellTagsIndexPosition[ 6124, 178]
+NotebookDataLength[ 8333, 260]
+NotebookOptionsPosition[ 6028, 195]
+NotebookOutlinePosition[ 7880, 244]
+CellTagsIndexPosition[ 7837, 241]
WindowTitle->DiracBasis
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracBasis\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracBasis"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracBasis.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$38337],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracBasis", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracReduce\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracReduce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracBasis\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracBasis"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracBasis.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$61202],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracBasis", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,18 +95,30 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracBasis", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracBasis", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracBasis", "[", "any", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a head which is wrapped around Dirac structures (and the 1) as a \
-result of the function DiracReduce. Eventually you want to substitute \
-DiracBasis by Identity (or set: DiracBasis[1] = S; \
-DiracBasis[DiracMatrix[mu]] = P; etc.)."
+ " \[LineSeparator]is a head which is wrapped around Dirac structures \
+(and the 1) as a result of the function ",
+ ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -95,6 +129,47 @@ DiracBasis[DiracMatrix[mu]] = P; etc.)."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -109,17 +184,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["DiracReduce",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracReduce",
- ButtonNote->"DiracReduce"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracBasis",
- CellID->1805198737]
+Cell[TextData[StyleBox[ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -136,23 +205,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 44.164654}",
+ "built" -> "{2020, 1, 5, 18, 54, 19.777715}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DiracBasis[any] is a head which is wrapped around Dirac structures (and \
-the 1) as a result of the function DiracReduce. Eventually you want to \
-substitute DiracBasis by Identity (or set: DiracBasis[1] = S; \
-DiracBasis[DiracMatrix[mu]] = P; etc.).", "synonyms" -> {}, "title" ->
- "DiracBasis", "titlemodifier" -> "", "windowtitle" -> "DiracBasis",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracBasis"}},
+the 1) as a result of the function DiracReduce.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DiracBasis", "titlemodifier" -> "",
+ "windowtitle" -> "DiracBasis", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracBasis"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +229,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DiracBasis"->{
- Cell[3772, 111, 254, 10, 70, "Text",
- CellTags->"DiracBasis",
- CellID->1805198737]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DiracBasis", 6010, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3016, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 581, 15, 70, "Usage",
+Cell[3601, 97, 287, 11, 70, "ObjectNameGrid"],
+Cell[3891, 110, 583, 17, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3499, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[4499, 131, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5232, 157, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5266, 159, 229, 8, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5532, 172, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3772, 111, 254, 10, 70, "Text",
- CellTags->"DiracBasis",
- CellID->1805198737]
+Cell[5805, 186, 181, 4, 70, "SeeAlso"]
}, Open ]],
-Cell[4041, 124, 23, 0, 70, "FooterCell"]
+Cell[6001, 193, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracCanonical.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracCanonical.nb
index 26f8b1aee..544811fcd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracCanonical.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracCanonical.nb
@@ -10,62 +10,84 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6233, 190]
-NotebookOptionsPosition[ 3940, 123]
-NotebookOutlinePosition[ 5967, 179]
-CellTagsIndexPosition[ 5891, 174]
+NotebookDataLength[ 8697, 270]
+NotebookOptionsPosition[ 6371, 205]
+NotebookOutlinePosition[ 8244, 254]
+CellTagsIndexPosition[ 8201, 251]
WindowTitle->DiracCanonical
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracCanonical\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracCanonical"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracCanonical\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracCanonical"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracCanonical.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$38681],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracCanonical", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63054],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracCanonical", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +95,40 @@ DiracCanonical.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracCanonical", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracCanonical", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["DiracCanonical"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracSimplify. If set to True DiracSimplify uses the \
-function DiracOrder internally."
+ " \[LineSeparator]is an option for ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ ". If set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ", ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " uses the function ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " internally."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +139,47 @@ function DiracOrder internally."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -106,17 +194,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracCanonical",
- CellID->12780681]
+Cell[TextData[StyleBox[ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,19 +215,19 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 45.570380}",
+ "built" -> "{2019, 3, 29, 17, 46, 37.944601}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracCanonical is an option for DiracSimplify. If set to True \
+ "DiracCanonical is an option for DiracSimplify. If set to True, \
DiracSimplify uses the function DiracOrder internally.", "synonyms" -> {},
- "title" -> "DiracCanonical", "titlemodifier" -> "", "windowtitle" ->
- "DiracCanonical", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "DiracCanonical", "titlemodifier" -> "",
+ "windowtitle" -> "DiracCanonical", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/DiracCanonical"}},
CellContext->"Global`",
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
@@ -164,34 +246,32 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DiracCanonical"->{
- Cell[3636, 108, 262, 10, 70, "Text",
- CellTags->"DiracCanonical",
- CellID->12780681]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DiracCanonical", 5775, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3036, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 420, 12, 70, "Usage",
+Cell[3625, 97, 291, 11, 70, "ObjectNameGrid"],
+Cell[3919, 110, 886, 27, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3363, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4830, 141, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5563, 167, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5597, 169, 235, 8, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5869, 182, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3636, 108, 262, 10, 70, "Text",
- CellTags->"DiracCanonical",
- CellID->12780681]
+Cell[6142, 196, 187, 4, 70, "SeeAlso"]
}, Open ]],
-Cell[3913, 121, 23, 0, 70, "FooterCell"]
+Cell[6344, 203, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChain.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChain.nb
new file mode 100644
index 000000000..92b1edd7f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChain.nb
@@ -0,0 +1,973 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 25998, 963]
+NotebookOptionsPosition[ 21784, 829]
+NotebookOutlinePosition[ 23900, 886]
+CellTagsIndexPosition[ 23815, 881]
+WindowTitle->DiracChain
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracChain\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracChain"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracChain.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63461],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracChain", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracChain", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a chain of Dirac matrices x, where the Dirac \
+indices i and j are explicit."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1984654353],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->406039260],
+
+Cell["A standalone Dirac matrix", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1948609293],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{57, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell["A chain of Dirac matrices with open indices", "Notes",
+ CellID->976984379],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Nu]", ",", "D"}], "]"}], ",", "D"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->699845331],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{79, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["\<\
+A DiracChain with only two arguments denotes a spinor component\
+\>", "Notes",
+ CellID->1440903900],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1523270401],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{96, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "p"}], "]"}], ",", "m"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2053038750],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{107, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",\
+
+ CellLabel->"In[5]:=",
+ CellID->10435576],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{96, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "p"}], "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->213074326],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{107, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell["The chain may also be partially open or closed", "Notes",
+ CellID->853429857],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->943655043],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{229, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1504197659],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{228, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1", ",", "1"}], "]"}], ",",
+
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->765104786],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{306, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1", ",", "1"}], "]"}], ",",
+
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->322314800],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{174, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"DiracChain",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 25.331641}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracChain[x, i, j] denotes a chain of Dirac matrices x, where the Dirac \
+indices i and j are explicit.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DiracChain", "titlemodifier" -> "", "windowtitle" -> "DiracChain",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracChain"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4982, 138, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1984654353]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 23671, 874}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 3624, 85, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4209, 108, 287, 11, 45, "ObjectNameGrid"],
+Cell[4499, 121, 458, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4982, 138, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1984654353],
+Cell[CellGroupData[{
+Cell[5395, 157, 195, 6, 26, "ExampleSection",
+ CellID->406039260],
+Cell[5593, 165, 63, 1, 32, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[5681, 170, 299, 8, 27, "Input",
+ CellID->1948609293],
+Cell[5983, 180, 562, 24, 40, "Output"]
+}, Open ]],
+Cell[6560, 207, 80, 1, 32, "Notes",
+ CellID->976984379],
+Cell[CellGroupData[{
+Cell[6665, 212, 519, 15, 45, "Input",
+ CellID->699845331],
+Cell[7187, 229, 691, 29, 43, "Output"]
+}, Open ]],
+Cell[7893, 261, 109, 3, 32, "Notes",
+ CellID->1440903900],
+Cell[CellGroupData[{
+Cell[8027, 268, 265, 8, 27, "Input",
+ CellID->1523270401],
+Cell[8295, 278, 713, 29, 38, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9045, 312, 287, 9, 27, "Input",
+ CellID->2053038750],
+Cell[9335, 323, 740, 30, 38, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10112, 358, 265, 9, 27, "Input",
+ CellID->10435576],
+Cell[10380, 369, 713, 29, 38, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11130, 403, 286, 9, 27, "Input",
+ CellID->213074326],
+Cell[11419, 414, 740, 30, 38, "Output"]
+}, Open ]],
+Cell[12174, 447, 83, 1, 32, "Notes",
+ CellID->853429857],
+Cell[CellGroupData[{
+Cell[12282, 452, 620, 17, 62, "Input",
+ CellID->943655043],
+Cell[12905, 471, 1361, 53, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14303, 529, 624, 18, 62, "Input",
+ CellID->1504197659],
+Cell[14930, 549, 1361, 53, 41, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16328, 607, 700, 21, 62, "Input",
+ CellID->765104786],
+Cell[17031, 630, 1653, 66, 42, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18721, 701, 365, 12, 27, "Input",
+ CellID->322314800],
+Cell[19089, 715, 1031, 42, 42, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[20147, 761, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20215, 766, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[20488, 780, 1254, 44, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[21757, 827, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainCombine.nb
new file mode 100644
index 000000000..37096b011
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainCombine.nb
@@ -0,0 +1,812 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 23369, 802]
+NotebookOptionsPosition[ 20024, 700]
+NotebookOutlinePosition[ 22142, 757]
+CellTagsIndexPosition[ 22057, 752]
+WindowTitle->DiracChainCombine
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracChainCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracChainCombine"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracChainCombine.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$61654],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracChainCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracChainCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracChainCombine", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ " is (nearly) the inverse operation to DiracChainExpand."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1203147178],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainCombine", "]"}]], "Input",
+ CellLabel->"In[22]:=",
+ CellID->670437197],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{501, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[22]=",
+ CellID->1598248678]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->177975153],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1741091343],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",", "Dir3", ",", "Dir4"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"k", ",", "me"}], "}"}], "]"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"2", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"1", "/",
+ RowBox[{"(",
+ RowBox[{"2", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"k", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"k", "-", "q"}], ",", "me"}], "}"}]}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "2"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",", "Dir3", ",", "Dir4"}], "]"}],
+ " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{"1", ",", "Dir3", ",", "Dir4"}], "]"}], " ", "me", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",", "Dir3", ",", "Dir4"}], "]"}],
+ " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"me", "^", "2"}]}], "+",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}]}], ")"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1233377850],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "-",
+ SuperscriptBox["me", "2"]}], ")"}], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], "+",
+ RowBox[{"2", " ", "me", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox["1",
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], "-",
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}]}],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k - $CellContext`q, D]],
+ "-", $CellContext`me^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{563, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1716418003]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainCombine", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1961255087],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["me", "2"]}], ")"}], " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ", "me", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{443, 48},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1277579139]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"DiracChainCombine",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 20.701229}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracChainCombine[exp] is (nearly) the inverse operation to \
+DiracChainExpand.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DiracChainCombine", "titlemodifier" -> "", "windowtitle" ->
+ "DiracChainCombine", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracChainCombine"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6471, 195, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->177975153]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 21914, 745}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 3744, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4336, 110, 294, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4655, 125, 409, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5089, 141, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1203147178],
+Cell[5831, 167, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5887, 171, 120, 3, 70, "Input",
+ CellID->670437197],
+Cell[6010, 176, 400, 12, 37, "Output",
+ CellID->1598248678]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6471, 195, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->177975153],
+Cell[CellGroupData[{
+Cell[6883, 214, 196, 6, 26, "ExampleSection",
+ CellID->1741091343],
+Cell[CellGroupData[{
+Cell[7104, 224, 1596, 53, 79, "Input",
+ CellID->1233377850],
+Cell[8703, 279, 5264, 191, 68, "Output",
+ CellID->1716418003]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14004, 475, 114, 3, 27, "Input",
+ CellID->1961255087],
+Cell[14121, 480, 4083, 142, 69, "Output",
+ CellID->1277579139]
+}, Open ]]
+}, Open ]],
+Cell[18231, 626, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18299, 631, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[18572, 645, 1410, 50, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[19997, 698, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainExpand.nb
new file mode 100644
index 000000000..962f172f2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainExpand.nb
@@ -0,0 +1,534 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15346, 524]
+NotebookOptionsPosition[ 11912, 421]
+NotebookOutlinePosition[ 14126, 479]
+CellTagsIndexPosition[ 14041, 474]
+WindowTitle->DiracChainExpand
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracChainExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracChainExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracChainExpand.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$62103],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracChainExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracChainExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracChainExpand", "[", "exp", "]"}]], "InlineFormula"],
+ "\[LineSeparator]expands all Dirac chains with explicit indices using \
+linearity, e.g. DCHN[GA[p1]+GA[p2]+m,i,j] becomes \
+DCHN[GA[p1],i,j]+DCHN[GA[p2],i,j]+m*DCHN[1,i,j]"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1546387909],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainExpand", "]"}]], "Input",
+ CellLabel->"In[23]:=",
+ CellID->1618853500],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracChainFactor", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{457, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[23]=",
+ CellID->291092421]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1251765738],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->714473754],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GA", "[", "mu", "]"}]}], ",", "i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->254261735],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{145, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2116847820]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2006590315],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"m", " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{207, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1568837503]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"DiracChainExpand",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 21.957957}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracChainExpand[exp] expands all Dirac chains with explicit indices \
+using linearity, e.g. DCHN[GA[p1]+GA[p2]+m,i,j] becomes \
+DCHN[GA[p1],i,j]+DCHN[GA[p2],i,j]+m*DCHN[1,i,j]", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DiracChainExpand", "titlemodifier" -> "",
+ "windowtitle" -> "DiracChainExpand", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracChainExpand"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6715, 199, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1251765738]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13897, 467}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 3742, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4333, 110, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4651, 125, 497, 13, 101, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5173, 142, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1546387909],
+Cell[5915, 168, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5971, 172, 120, 3, 70, "Input",
+ CellID->1618853500],
+Cell[6094, 177, 560, 15, 56, "Output",
+ CellID->291092421]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6715, 199, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1251765738],
+Cell[CellGroupData[{
+Cell[7128, 218, 195, 6, 26, "ExampleSection",
+ CellID->714473754],
+Cell[CellGroupData[{
+Cell[7348, 228, 273, 9, 27, "Input",
+ CellID->254261735],
+Cell[7624, 239, 969, 39, 40, "Output",
+ CellID->2116847820]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8630, 283, 113, 3, 27, "Input",
+ CellID->2006590315],
+Cell[8746, 288, 1343, 55, 40, "Output",
+ CellID->1568837503]
+}, Open ]]
+}, Open ]],
+Cell[10116, 347, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10184, 352, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10457, 366, 1413, 50, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[11885, 419, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainFactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainFactor.nb
new file mode 100644
index 000000000..05397c40e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainFactor.nb
@@ -0,0 +1,552 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15848, 542]
+NotebookOptionsPosition[ 12379, 438]
+NotebookOutlinePosition[ 14629, 497]
+CellTagsIndexPosition[ 14544, 492]
+WindowTitle->DiracChainFactor
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainExpand"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracChainFactor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracChainFactor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracChainFactor.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$62552],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracChainFactor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracChainFactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracChainFactor", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]factors out all expressions inside a DiracChain to \
+which the chain doesn't apply. For example, all objects that are not Dirac \
+matrices can be safely factrored out from every Dirac chain."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->433796507],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainJoin", "]"}]], "Input",
+ CellLabel->"In[12]:=",
+ CellID->1799551006],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Drop", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{502, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]=",
+ CellID->2082475804]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->947108835],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1918343591],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Nu]"}], "]"}],
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}]}], ",", "i", ",", "j"}], "]"}],
+ " "}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1596067813],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{132, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->989974940]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainFactor", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->745783464],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{132, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->35851775]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"DiracChainFactor",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 23.084441}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracChainFactor[exp] factors out all expressions inside a DiracChain to \
+which the chain doesn't apply. For example, all objects that are not Dirac \
+matrices can be safely factrored out from every Dirac chain.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracChainFactor",
+ "titlemodifier" -> "", "windowtitle" -> "DiracChainFactor", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DiracChainFactor"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6787, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->947108835]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 14401, 485}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 3742, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4333, 110, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4651, 125, 534, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5210, 142, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->433796507],
+Cell[5951, 168, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[6007, 172, 118, 3, 70, "Input",
+ CellID->1799551006],
+Cell[6128, 177, 598, 16, 56, "Output",
+ CellID->2082475804]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6787, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->947108835],
+Cell[CellGroupData[{
+Cell[7199, 219, 196, 6, 26, "ExampleSection",
+ CellID->1918343591],
+Cell[CellGroupData[{
+Cell[7420, 229, 386, 13, 27, "Input",
+ CellID->1596067813],
+Cell[7809, 244, 1405, 57, 43, "Output",
+ CellID->989974940]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9251, 306, 112, 3, 27, "Input",
+ CellID->745783464],
+Cell[9366, 311, 1190, 49, 43, "Output",
+ CellID->35851775]
+}, Open ]]
+}, Open ]],
+Cell[10583, 364, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10651, 369, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10924, 383, 1413, 50, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[12352, 436, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainJoin.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainJoin.nb
new file mode 100644
index 000000000..b55c142d5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracChainJoin.nb
@@ -0,0 +1,575 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16534, 565]
+NotebookOptionsPosition[ 13198, 465]
+NotebookOutlinePosition[ 15337, 522]
+CellTagsIndexPosition[ 15252, 517]
+WindowTitle->DiracChainJoin
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainFactor"], "\<\"FCFADiracChainJoin\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCFADiracChainJoin"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracChainJoin\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracChainJoin"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracChainJoin.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63004],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracChainJoin", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracChainJoin", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]joins chains of Dirac matrices with explicit Dirac \
+indices wrapped with a head DiracChain."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1639035625],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+Notice that DiracChainJoin is not suitable for creating closed Dirac chains \
+out of the FeynArts output with explicit Dirac indices, e.g. when the model \
+contains 4-fermion operators. Use FCFADiracChainJoin for that.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainJoin", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1965709680],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Drop", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{502, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->458288558],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1946470093],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ",", "i"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{"j", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->857331981],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{262, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1834507663],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{245, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCFADiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCFADiracChainJoin",
+ ButtonNote->"FCFADiracChainJoin"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"DiracChainJoin",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 24.183750}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracChainJoin[exp] joins chains of Dirac matrices with explicit Dirac \
+indices wrapped with a head DiracChain.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "DiracChainJoin", "titlemodifier" -> "", "windowtitle" ->
+ "DiracChainJoin", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracChainJoin"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7017, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->458288558]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15109, 510}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3852, 89, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4441, 112, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4757, 127, 434, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5216, 143, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1639035625],
+Cell[5958, 169, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5992, 171, 243, 4, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[6260, 179, 117, 3, 70, "Input",
+ CellID->1965709680],
+Cell[6380, 184, 576, 15, 56, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7017, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->458288558],
+Cell[CellGroupData[{
+Cell[7429, 225, 196, 6, 26, "ExampleSection",
+ CellID->1946470093],
+Cell[CellGroupData[{
+Cell[7650, 235, 507, 16, 45, "Input",
+ CellID->857331981],
+Cell[8160, 253, 1604, 67, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9801, 325, 111, 3, 27, "Input",
+ CellID->1834507663],
+Cell[9915, 330, 1265, 51, 42, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[11207, 385, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11275, 390, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11548, 404, 1608, 56, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[13171, 463, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracEquation.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracEquation.nb
index d289481ec..2e468a43c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracEquation.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracEquation.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10218, 351]
-NotebookOptionsPosition[ 6630, 241]
-NotebookOutlinePosition[ 9236, 314]
-CellTagsIndexPosition[ 9121, 308]
+NotebookDataLength[ 16628, 614]
+NotebookOptionsPosition[ 12709, 494]
+NotebookOutlinePosition[ 14853, 551]
+CellTagsIndexPosition[ 14768, 546]
WindowTitle->DiracEquation
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracEquation\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracEquation"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracEquation\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracEquation"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracEquation.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$39025],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracEquation", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63911],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracEquation", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +95,33 @@ DiracEquation.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracEquation", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracEquation", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracEquation", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "applies the Dirac equation without expanding exp. If that is needed, \
-use DiracSimplify."
+ " \[LineSeparator]applies the Dirac equation without expanding ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ". If expansions are necessary, use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +132,55 @@ use DiracSimplify."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1635868252],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracEquation", "]"}]], "Input",
+ CellLabel->"In[129]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{161, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[129]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +196,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1880471451],
+ CellID->1865663870],
Cell[CellGroupData[{
@@ -118,24 +206,50 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1537458895],
+ CellID->469350563],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"Spinor", "[",
- RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "p", "]"}], "]"}]}]], "Input",
- CellTags->"DiracEquation",
- CellLabel->"In[1]:=",
- CellID->1948002457],
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{114, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"m", " ",
RowBox[{"(",
RowBox[{
FormBox["\<\"\[CurlyPhi]\"\>",
@@ -152,34 +266,180 @@ Cell[BoxData[
FormBox["m",
TraditionalForm],
FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{105, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{114, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "m"}], " ",
RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{129, 18},
+ ImageSize->{127, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracEquation",
- CellLabel->"Out[1]=",
- CellID->1390956545]
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "0"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{92, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
- CellTags->"DiracEquation",
- CellLabel->"In[2]:=",
- CellID->831374241],
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[TextData[{
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ " also works in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBarD", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
FormBox[
- RowBox[{"m", " ",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{113, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "m"}], " ",
RowBox[{"(",
RowBox[{
FormBox["\<\"\[CurlyPhi]\"\>",
@@ -187,9 +447,9 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
+ RowBox[{"-",
FormBox["p",
- TraditionalForm], "_"],
+ TraditionalForm]}],
TraditionalForm],
FormBox["\<\",\"\>",
TraditionalForm],
@@ -197,12 +457,10 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{100, 18},
+ ImageSize->{125, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracEquation",
- CellLabel->"Out[2]=",
- CellID->1802781574]
+ CellLabel->"Out[8]="]
}, Open ]]
}, Open ]],
@@ -225,16 +483,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracEquation",
- CellID->1088896111]
+Cell[TextData[StyleBox[ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -242,7 +495,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DiracEquation",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -251,22 +504,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 46.874858}",
+ "built" -> "{2020, 1, 5, 18, 54, 26.533436}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DiracEquation[exp] applies the Dirac equation without expanding exp. If \
-that is needed, use DiracSimplify.", "synonyms" -> {}, "title" ->
- "DiracEquation", "titlemodifier" -> "", "windowtitle" -> "DiracEquation",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracEquation"},
- "SearchTextTranslated" -> ""},
+expansions are necessary, use DiracSimplify.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DiracEquation", "titlemodifier" -> "",
+ "windowtitle" -> "DiracEquation", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracEquation"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -274,8 +527,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -284,75 +538,84 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3376, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5795, 183, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1880471451]},
- "DiracEquation"->{
- Cell[4010, 124, 298, 9, 27, "Input",
- CellTags->"DiracEquation",
- CellID->1948002457],
- Cell[4311, 135, 842, 33, 39, "Output",
- CellTags->"DiracEquation",
- CellID->1390956545],
- Cell[5190, 173, 137, 4, 27, "Input",
- CellTags->"DiracEquation",
- CellID->831374241],
- Cell[5330, 179, 642, 25, 39, "Output",
- CellTags->"DiracEquation",
- CellID->1802781574],
- Cell[6340, 227, 248, 9, 32, "Text",
- CellTags->"DiracEquation",
- CellID->1088896111]}
+ CellID->1865663870]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8490, 285},
- {"DiracEquation", 8630, 289}
+ {"PrimaryExamplesSection", 14624, 539}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3032, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 439, 13, 82, "Usage",
+Cell[3620, 97, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3935, 112, 632, 18, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3376, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4592, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1635868252],
+Cell[5334, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5390, 164, 97, 2, 70, "Input"],
+Cell[5490, 168, 244, 8, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5795, 183, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1880471451],
+ CellID->1865663870],
+Cell[CellGroupData[{
+Cell[6208, 202, 195, 6, 26, "ExampleSection",
+ CellID->469350563],
+Cell[CellGroupData[{
+Cell[6428, 212, 159, 5, 27, "Input"],
+Cell[6590, 219, 544, 21, 37, "Output"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[3789, 114, 196, 6, 25, "ExampleSection",
- CellID->1537458895],
+Cell[7171, 245, 89, 2, 27, "Input"],
+Cell[7263, 249, 593, 23, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7893, 277, 159, 5, 27, "Input"],
+Cell[8055, 284, 544, 21, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8636, 310, 89, 2, 27, "Input"],
+Cell[8728, 314, 637, 25, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9402, 344, 162, 5, 27, "Input"],
+Cell[9567, 351, 522, 20, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10126, 376, 89, 2, 27, "Input"],
+Cell[10218, 380, 166, 5, 35, "Output"]
+}, Open ]],
+Cell[10399, 388, 233, 8, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4010, 124, 298, 9, 27, "Input",
- CellTags->"DiracEquation",
- CellID->1948002457],
-Cell[4311, 135, 842, 33, 39, "Output",
- CellTags->"DiracEquation",
- CellID->1390956545]
+Cell[10657, 400, 164, 5, 27, "Input"],
+Cell[10824, 407, 552, 22, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5190, 173, 137, 4, 27, "Input",
- CellTags->"DiracEquation",
- CellID->831374241],
-Cell[5330, 179, 642, 25, 39, "Output",
- CellTags->"DiracEquation",
- CellID->1802781574]
+Cell[11413, 434, 89, 2, 27, "Input"],
+Cell[11505, 438, 607, 24, 37, "Output"]
}, Open ]]
}, Open ]],
-Cell[5999, 208, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12139, 466, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6067, 213, 270, 12, 31, "SeeAlsoSection",
+Cell[12207, 471, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6340, 227, 248, 9, 32, "Text",
- CellTags->"DiracEquation",
- CellID->1088896111]
+Cell[12480, 485, 187, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[6603, 239, 23, 0, 42, "FooterCell"]
+Cell[12682, 492, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGamma.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGamma.nb
index 67d28101d..7fa5aacc7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGamma.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGamma.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 23803, 891]
-NotebookOptionsPosition[ 16594, 654]
-NotebookOutlinePosition[ 21039, 784]
-CellTagsIndexPosition[ 20925, 778]
+NotebookDataLength[ 28754, 1096]
+NotebookOptionsPosition[ 21581, 864]
+NotebookOutlinePosition[ 25331, 972]
+CellTagsIndexPosition[ 25217, 966]
WindowTitle->DiracGamma
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracGamma\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracGamma"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracGamma.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$40066],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracGamma", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGammaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGammaExpand"], "\<\"GA\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GA"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"GS\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GS"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracGamma\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracGamma"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracGamma.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$65328],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracGamma", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,38 +103,28 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracGamma", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracGamma", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"x", ",", " ", "dim"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of all Dirac matrices and slashes (in the internal \
-representation). Use DiracMatrix (or GA, GAD) and DiracSlash (or GS, GSD) for \
-manual (short) input. DiracGamma[x, 4] simplifies to DiracGamma[x]. \
-DiracGamma[5] is ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- ". DiracGamma[6] is ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"1", "+",
- SuperscriptBox["\[Gamma]", "5"]}], ")"}], "/", "2."}],
- TraditionalForm]]],
- " DiracGamma[7] is ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox["\[Gamma]", "5"]}], ")"}], "/", "2."}],
- TraditionalForm]]]
+ " \[LineSeparator]is the head of all Dirac matrices and slashes (in the \
+internal representation). Use GA, GAD, GS or GSD for manual (short) input."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -115,6 +135,70 @@ DiracGamma[5] is ",
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1451433407],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["DiracGamma[x, 4] simplifies to DiracGamma[x].", "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "DiracGamma[5] is ",
+ Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]]
+}], "Notes"],
+
+Cell[TextData[{
+ "DiracGamma[6] is ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "+",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}], "/", "2."}],
+ TraditionalForm]]],
+ " "
+}], "Notes"],
+
+Cell[TextData[{
+ "DiracGamma[7] is ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}], "/", "2."}], TraditionalForm]]]
+}], "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -130,7 +214,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->149641272],
+ CellID->1728287912],
Cell[CellGroupData[{
@@ -140,7 +224,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->568553789],
+ CellID->1617500554],
Cell[CellGroupData[{
@@ -156,12 +240,11 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{22, 18},
+ ImageSize->{23, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[1]=",
- CellID->842552946]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -181,12 +264,11 @@ Cell[BoxData[
FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 17},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[2]=",
- CellID->1687472527]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[TextData[{
@@ -201,9 +283,7 @@ Cell[TextData[{
FormBox[
RowBox[{"\[Gamma]", "\[CenterDot]", "q"}], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"DiracGamma",
- CellID->299092642],
+}], "Notes"],
Cell[CellGroupData[{
@@ -224,12 +304,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{32, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[3]=",
- CellID->1138458552]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -270,12 +349,11 @@ Cell[BoxData[
TraditionalForm], "_"]}],
TraditionalForm],
TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{129, 18},
+ ImageSize->{143, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[4]=",
- CellID->1631372749]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -297,22 +375,20 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{30, 17},
+ ImageSize->{35, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[5]=",
- CellID->567019698]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", "=",
- RowBox[{
- RowBox[{"GS", "[",
- RowBox[{"p", "-", "q"}], "]"}], ".",
- RowBox[{"GS", "[", "p", "]"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
CellTags->"DiracGamma",
CellLabel->"In[6]:=",
CellID->294479801],
@@ -346,19 +422,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{130, 18},
+ ImageSize->{143, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[6]=",
- CellID->445474776]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", "=",
- RowBox[{"DiracGammaExpand", "[", "a1", "]"}]}]], "Input",
+ RowBox[{"DiracGammaExpand", "[", "%", "]"}]], "Input",
CellTags->"DiracGamma",
CellLabel->"In[7]:=",
CellID->324312499],
@@ -390,24 +464,22 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{135, 18},
+ ImageSize->{151, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[7]=",
- CellID->754251999]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a3", "=",
- RowBox[{
- RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
- RowBox[{"GSD", "[",
- RowBox[{"p", "-", "q"}], "]"}], ".",
- RowBox[{"GSD", "[", "q", "]"}], ".",
- RowBox[{"GAD", "[", "\[Mu]", "]"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ".",
+ RowBox[{"GSD", "[", "q", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}]], "Input",
CellTags->"DiracGamma",
CellLabel->"In[8]:=",
CellID->667969280],
@@ -450,19 +522,17 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{165, 19},
+ ImageSize->{185, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[8]=",
- CellID->712838090]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a4", "=",
- RowBox[{"DiracTrick", "[", "a3", "]"}]}]], "Input",
+ RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
CellTags->"DiracGamma",
CellLabel->"In[9]:=",
CellID->1907296195],
@@ -476,11 +546,13 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -511,19 +583,17 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{282, 17},
+ ImageSize->{311, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[9]=",
- CellID->1654426864]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a5", "=",
- RowBox[{"DiracSimplify", "[", "a4", "]"}]}]], "Input",
+ RowBox[{"DiracSimplify", "[", "%%", "]"}]], "Input",
CellTags->"DiracGamma",
CellLabel->"In[10]:=",
CellID->41068363],
@@ -578,21 +648,163 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{323, 20},
+ ImageSize->{361, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGamma",
- CellLabel->"Out[10]=",
- CellID->1950498776]
+ CellLabel->"Out[10]="]
}, Open ]],
+Cell["\<\
+DiracGamma may also carry Cartesian indices or appear contracted with \
+Cartesian momenta.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5"}], "]"}]], "Input",\
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Input",
+ CellLabel->"In[11]:="],
- CellTags->"DiracGamma",
- CellLabel->"In[11]:=",
- CellID->2054807508]
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "D"}], "]"}]], "Input",
+ CellLabel->"In[12]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Input",
+ CellLabel->"In[13]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{38, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[13]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "D"}], "]"}]], "Input",
+ CellLabel->"In[14]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{36, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[14]="]
+}, Open ]],
+
+Cell["\<\
+Temporal indices are represented using ExplicitLorentzIndex[0]\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], "]"}]], "Input",
+ CellLabel->"In[15]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[15]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -621,10 +833,10 @@ Cell[TextData[{
ButtonNote->"DiracGammaExpand"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracMatrix",
+ StyleBox[ButtonBox["GA",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData->"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracSimplify",
@@ -633,10 +845,10 @@ Cell[TextData[{
ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSlash",
+ StyleBox[ButtonBox["GS",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
+ ButtonData->"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracTrick",
@@ -645,9 +857,7 @@ Cell[TextData[{
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracGamma",
- CellID->1692507192]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -664,25 +874,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 51.472111}",
+ "built" -> "{2020, 1, 5, 18, 54, 30.446317}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DiracGamma[x, dim] is the head of all Dirac matrices and slashes (in the \
-internal representation). Use DiracMatrix (or GA, GAD) and DiracSlash (or GS, \
-GSD) for manual (short) input. DiracGamma[x, 4] simplifies to DiracGamma[x]. \
-DiracGamma[5] is \\[Gamma]^5. DiracGamma[6] is (1 + \\[Gamma]^5)/2. \
-DiracGamma[7] is (1 - \\[Gamma]^5)/2.", "synonyms" -> {}, "title" ->
- "DiracGamma", "titlemodifier" -> "", "windowtitle" -> "DiracGamma",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracGamma"},
- "SearchTextTranslated" -> ""},
+internal representation). Use GA, GAD, GS or GSD for manual (short) input.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracGamma",
+ "titlemodifier" -> "", "windowtitle" -> "DiracGamma", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DiracGamma"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -691,7 +898,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -700,199 +907,197 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4065, 117, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6293, 201, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->149641272]},
+ CellID->1728287912]},
"DiracGamma"->{
- Cell[4697, 146, 132, 4, 27, "Input",
+ Cell[6927, 230, 132, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->1046278698],
- Cell[4832, 152, 300, 11, 39, "Output",
- CellTags->"DiracGamma",
- CellID->842552946],
- Cell[5169, 168, 178, 5, 27, "Input",
+ Cell[7062, 236, 280, 10, 40, "Output",
+ CellTags->"DiracGamma"],
+ Cell[7379, 251, 178, 5, 27, "Input",
CellTags->"DiracGamma",
CellID->1161111346],
- Cell[5350, 175, 344, 13, 38, "Output",
- CellTags->"DiracGamma",
- CellID->1687472527],
- Cell[5709, 191, 352, 14, 35, "Text",
- CellTags->"DiracGamma",
- CellID->299092642],
- Cell[6086, 209, 186, 6, 27, "Input",
+ Cell[7560, 258, 323, 12, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[8231, 289, 186, 6, 27, "Input",
CellTags->"DiracGamma",
CellID->1887452273],
- Cell[6275, 217, 374, 14, 38, "Output",
- CellTags->"DiracGamma",
- CellID->1138458552],
- Cell[6686, 236, 299, 9, 27, "Input",
+ Cell[8420, 297, 353, 13, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[8810, 315, 299, 9, 27, "Input",
CellTags->"DiracGamma",
CellID->1345474698],
- Cell[6988, 247, 795, 30, 39, "Output",
- CellTags->"DiracGamma",
- CellID->1631372749],
- Cell[7820, 282, 235, 8, 27, "Input",
+ Cell[9112, 326, 774, 29, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[9923, 360, 235, 8, 27, "Input",
CellTags->"DiracGamma",
CellID->38879465],
- Cell[8058, 292, 322, 12, 38, "Output",
- CellTags->"DiracGamma",
- CellID->567019698],
- Cell[8417, 309, 226, 8, 27, "Input",
+ Cell[10161, 370, 302, 11, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[10500, 386, 199, 7, 27, "Input",
CellTags->"DiracGamma",
CellID->294479801],
- Cell[8646, 319, 886, 34, 39, "Output",
- CellTags->"DiracGamma",
- CellID->445474776],
- Cell[9569, 358, 162, 5, 27, "Input",
+ Cell[10702, 395, 866, 33, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[11605, 433, 137, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->324312499],
- Cell[9734, 365, 850, 32, 39, "Output",
- CellTags->"DiracGamma",
- CellID->754251999],
- Cell[10621, 402, 318, 10, 27, "Input",
+ Cell[11745, 439, 830, 31, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[12612, 475, 289, 9, 27, "Input",
CellTags->"DiracGamma",
CellID->667969280],
- Cell[10942, 414, 1056, 43, 40, "Output",
- CellTags->"DiracGamma",
- CellID->712838090],
- Cell[12035, 462, 157, 5, 27, "Input",
+ Cell[12904, 486, 1036, 42, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[13977, 533, 132, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->1907296195],
- Cell[12195, 469, 1264, 49, 38, "Output",
- CellTags->"DiracGamma",
- CellID->1654426864],
- Cell[13496, 523, 159, 5, 27, "Input",
+ Cell[14112, 539, 1290, 50, 37, "Output",
+ CellTags->"DiracGamma"],
+ Cell[15439, 594, 135, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->41068363],
- Cell[13658, 530, 1409, 55, 41, "Output",
- CellTags->"DiracGamma",
- CellID->1950498776],
- Cell[15082, 588, 188, 6, 27, "Input",
- CellTags->"DiracGamma",
- CellID->2054807508],
- Cell[15626, 616, 926, 33, 32, "Text",
- CellTags->"DiracGamma",
- CellID->1692507192]}
+ Cell[15577, 600, 1388, 54, 39, "Output",
+ CellTags->"DiracGamma"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 18675, 701},
- {"DiracGamma", 18812, 705}
+ {"PrimaryExamplesSection", 23458, 908},
+ {"DiracGamma", 23596, 912}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3392, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 1147, 35, 120, "Usage",
+Cell[3977, 105, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4289, 120, 501, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4065, 117, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4815, 137, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1451433407],
+Cell[5557, 163, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5591, 165, 83, 1, 70, "Notes",
+ CellID->1067943069],
+Cell[5677, 168, 131, 5, 70, "Notes"],
+Cell[5811, 175, 220, 10, 70, "Notes"],
+Cell[6034, 187, 210, 8, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6293, 201, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->149641272],
+ CellID->1728287912],
Cell[CellGroupData[{
-Cell[4477, 136, 195, 6, 25, "ExampleSection",
- CellID->568553789],
+Cell[6706, 220, 196, 6, 26, "ExampleSection",
+ CellID->1617500554],
Cell[CellGroupData[{
-Cell[4697, 146, 132, 4, 27, "Input",
+Cell[6927, 230, 132, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->1046278698],
-Cell[4832, 152, 300, 11, 39, "Output",
- CellTags->"DiracGamma",
- CellID->842552946]
+Cell[7062, 236, 280, 10, 40, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5169, 168, 178, 5, 27, "Input",
+Cell[7379, 251, 178, 5, 27, "Input",
CellTags->"DiracGamma",
CellID->1161111346],
-Cell[5350, 175, 344, 13, 38, "Output",
- CellTags->"DiracGamma",
- CellID->1687472527]
+Cell[7560, 258, 323, 12, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
-Cell[5709, 191, 352, 14, 35, "Text",
- CellTags->"DiracGamma",
- CellID->299092642],
+Cell[7898, 273, 308, 12, 35, "Notes"],
Cell[CellGroupData[{
-Cell[6086, 209, 186, 6, 27, "Input",
+Cell[8231, 289, 186, 6, 27, "Input",
CellTags->"DiracGamma",
CellID->1887452273],
-Cell[6275, 217, 374, 14, 38, "Output",
- CellTags->"DiracGamma",
- CellID->1138458552]
+Cell[8420, 297, 353, 13, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6686, 236, 299, 9, 27, "Input",
+Cell[8810, 315, 299, 9, 27, "Input",
CellTags->"DiracGamma",
CellID->1345474698],
-Cell[6988, 247, 795, 30, 39, "Output",
- CellTags->"DiracGamma",
- CellID->1631372749]
+Cell[9112, 326, 774, 29, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7820, 282, 235, 8, 27, "Input",
+Cell[9923, 360, 235, 8, 27, "Input",
CellTags->"DiracGamma",
CellID->38879465],
-Cell[8058, 292, 322, 12, 38, "Output",
- CellTags->"DiracGamma",
- CellID->567019698]
+Cell[10161, 370, 302, 11, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8417, 309, 226, 8, 27, "Input",
+Cell[10500, 386, 199, 7, 27, "Input",
CellTags->"DiracGamma",
CellID->294479801],
-Cell[8646, 319, 886, 34, 39, "Output",
- CellTags->"DiracGamma",
- CellID->445474776]
+Cell[10702, 395, 866, 33, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9569, 358, 162, 5, 27, "Input",
+Cell[11605, 433, 137, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->324312499],
-Cell[9734, 365, 850, 32, 39, "Output",
- CellTags->"DiracGamma",
- CellID->754251999]
+Cell[11745, 439, 830, 31, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10621, 402, 318, 10, 27, "Input",
+Cell[12612, 475, 289, 9, 27, "Input",
CellTags->"DiracGamma",
CellID->667969280],
-Cell[10942, 414, 1056, 43, 40, "Output",
- CellTags->"DiracGamma",
- CellID->712838090]
+Cell[12904, 486, 1036, 42, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12035, 462, 157, 5, 27, "Input",
+Cell[13977, 533, 132, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->1907296195],
-Cell[12195, 469, 1264, 49, 38, "Output",
- CellTags->"DiracGamma",
- CellID->1654426864]
+Cell[14112, 539, 1290, 50, 37, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13496, 523, 159, 5, 27, "Input",
+Cell[15439, 594, 135, 4, 27, "Input",
CellTags->"DiracGamma",
CellID->41068363],
-Cell[13658, 530, 1409, 55, 41, "Output",
- CellTags->"DiracGamma",
- CellID->1950498776]
+Cell[15577, 600, 1388, 54, 39, "Output",
+ CellTags->"DiracGamma"]
}, Open ]],
-Cell[15082, 588, 188, 6, 27, "Input",
- CellTags->"DiracGamma",
- CellID->2054807508]
+Cell[16980, 657, 115, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[17120, 664, 128, 3, 27, "Input"],
+Cell[17251, 669, 470, 19, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17758, 693, 203, 6, 27, "Input"],
+Cell[17964, 701, 441, 18, 40, "Output"]
}, Open ]],
-Cell[15285, 597, 31, 0, 29, "SectionFooterSpacer"]
+Cell[CellGroupData[{
+Cell[18442, 724, 131, 3, 27, "Input"],
+Cell[18576, 729, 510, 20, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15353, 602, 270, 12, 31, "SeeAlsoSection",
+Cell[19123, 754, 206, 6, 27, "Input"],
+Cell[19332, 762, 451, 18, 37, "Output"]
+}, Open ]],
+Cell[19798, 783, 87, 2, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[19910, 789, 134, 3, 27, "Input"],
+Cell[20047, 794, 292, 11, 39, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[20366, 809, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20434, 814, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[15626, 616, 926, 33, 32, "Text",
- CellTags->"DiracGamma",
- CellID->1692507192]
+Cell[20707, 828, 832, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[16567, 652, 23, 0, 42, "FooterCell"]
+Cell[21554, 862, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaCombine.nb
index 10c711905..10c9bdedf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaCombine.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaCombine.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13881, 486]
-NotebookOptionsPosition[ 9031, 334]
-NotebookOutlinePosition[ 12235, 425]
-CellTagsIndexPosition[ 12114, 419]
+NotebookDataLength[ 17813, 634]
+NotebookOptionsPosition[ 12640, 474]
+NotebookOutlinePosition[ 15683, 558]
+CellTagsIndexPosition[ 15562, 552]
WindowTitle->DiracGammaCombine
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracGammaCombine\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracGammaCombine"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracGammaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGammaExpand"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracGammaCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracGammaCombine"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracGammaCombine.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$39364],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracGammaCombine", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$64366],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracGammaCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +100,31 @@ DiracGammaCombine.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracGammaCombine", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracGammaCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracGammaCombine", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is (nearly) the inverse operation to DiracGammaExpand."
+ " \[LineSeparator]is (nearly) the inverse operation to ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +135,57 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->244930563],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracGammaCombine", "]"}]], "Input",
+ CellLabel->"In[130]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[130]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -103,31 +197,63 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2122612038],
+ CellID->1524661129],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1020378981],
+ CellID->1074586463],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracGammaCombine", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], " ", "+", " ",
+ RowBox[{"GS", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
- RowBox[{"GS", "[", "p", "]"}], " ", "+", " ",
- RowBox[{"GS", "[", "q", "]"}]}], "]"}]], "Input",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{88, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaCombine", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[1]:=",
+ CellLabel->"In[2]:=",
CellID->69726605],
Cell[BoxData[
@@ -145,12 +271,11 @@ Cell[BoxData[
TraditionalForm], "_"]}],
TraditionalForm],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{71, 18},
+ ImageSize->{80, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGammaCombine",
- CellLabel->"Out[1]=",
- CellID->1673904001]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -158,57 +283,88 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[2]:=",
+ CellLabel->"In[3]:=",
CellID->919953934],
Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"Momentum", "[",
RowBox[{"p", "+", "q"}], "]"}], "]"}]], "Output",
- ImageSize->{219, 15},
+ ImageSize->{218, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGammaCombine",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1515539427]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracGammaCombine", "[",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"GSD", "[", "p", "]"}]}], " ", "-", " ",
+ RowBox[{"3", " ",
+ RowBox[{"GSD", "[", "q", "]"}]}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
RowBox[{"2", " ",
- RowBox[{"GS", "[", "p", "]"}]}], " ", "-", " ",
- RowBox[{"2", " ",
- RowBox[{"GS", "[", "q", "]"}]}]}], "]"}]], "Input",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], "-",
+ RowBox[{"3", " ",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{105, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaCombine", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->2255714],
Cell[BoxData[
FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
FormBox[
FormBox[
RowBox[{
RowBox[{"2", " ",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}], "-",
- RowBox[{"2", " ",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}]}],
+ FormBox["p",
+ TraditionalForm]}], "-",
+ RowBox[{"3", " ",
+ FormBox["q",
+ TraditionalForm]}]}],
TraditionalForm],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{93, 18},
+ ImageSize->{98, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGammaCombine",
- CellLabel->"Out[3]=",
- CellID->801597804]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -216,21 +372,23 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1011380579],
Cell[BoxData[
RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{
- RowBox[{"2", " ", "p"}], "-",
- RowBox[{"2", " ", "q"}]}], "]"}], "]"}]], "Output",
- ImageSize->{243, 15},
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "p"}], "-",
+ RowBox[{"3", " ", "q"}]}], ",", "D"}], "]"}], ",", "D"}],
+ "]"}]], "Output",
+ ImageSize->{288, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGammaCombine",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1276677678]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -238,34 +396,30 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracGammaExpand", "[", "%%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->365053477],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"2", " ",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm]}]}], "-",
- RowBox[{"2", " ",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ RowBox[{"3", " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
+ FormBox["q",
+ TraditionalForm],
TraditionalForm]}]}]}], TraditionalForm]], "Output",
- ImageSize->{98, 17},
+ ImageSize->{105, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracGammaCombine",
- CellLabel->"Out[5]=",
- CellID->1799332421]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -301,33 +455,19 @@ Cell[TextData[{
ButtonNote->"DiracGammaExpand"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracGammaCombine",
- CellID->269406671]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -335,7 +475,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DiracGammaCombine",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -344,22 +484,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 48.343773}",
+ "built" -> "{2020, 1, 5, 18, 54, 27.740324}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DiracGammaCombine[exp] is (nearly) the inverse operation to \
-DiracGammaExpand.", "synonyms" -> {}, "title" -> "DiracGammaCombine",
- "titlemodifier" -> "", "windowtitle" -> "DiracGammaCombine", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/DiracGammaCombine"},
- "SearchTextTranslated" -> ""},
+DiracGammaExpand.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DiracGammaCombine", "titlemodifier" -> "", "windowtitle" ->
+ "DiracGammaCombine", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracGammaCombine"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -367,8 +507,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -377,117 +518,124 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3369, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6112, 188, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2122612038]},
+ CellID->1524661129]},
"DiracGammaCombine"->{
- Cell[4003, 123, 237, 7, 27, "Input",
+ Cell[7535, 252, 144, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->69726605],
- Cell[4243, 132, 528, 20, 39, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1673904001],
- Cell[4808, 157, 140, 4, 27, "Input",
+ Cell[7682, 258, 507, 19, 37, "Output",
+ CellTags->"DiracGammaCombine"],
+ Cell[8226, 282, 140, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->919953934],
- Cell[4951, 163, 301, 9, 49, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1515539427],
- Cell[5289, 177, 286, 9, 27, "Input",
+ Cell[8369, 288, 280, 8, 51, "Output",
+ CellTags->"DiracGammaCombine"],
+ Cell[9608, 342, 143, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->2255714],
- Cell[5578, 188, 587, 22, 39, "Output",
- CellTags->"DiracGammaCombine",
- CellID->801597804],
- Cell[6202, 215, 141, 4, 27, "Input",
+ Cell[9754, 348, 483, 18, 37, "Output",
+ CellTags->"DiracGammaCombine"],
+ Cell[10274, 371, 141, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->1011380579],
- Cell[6346, 221, 351, 11, 49, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1276677678],
- Cell[6734, 237, 145, 4, 27, "Input",
+ Cell[10418, 377, 388, 13, 51, "Output",
+ CellTags->"DiracGammaCombine"],
+ Cell[10843, 395, 145, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->365053477],
- Cell[6882, 243, 642, 24, 38, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1799332421],
- Cell[7892, 290, 1097, 39, 32, "Text",
- CellTags->"DiracGammaCombine",
- CellID->269406671]}
+ Cell[10991, 401, 512, 19, 37, "Output",
+ CellTags->"DiracGammaCombine"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10878, 378},
- {"DiracGammaCombine", 11022, 382}
+ {"PrimaryExamplesSection", 14532, 519},
+ {"DiracGammaCombine", 14677, 523}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2281, 52, 51, "AnchorBarGrid",
+Cell[589, 21, 3346, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2873, 75, 60, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2936, 78, 408, 12, 83, "Usage",
+Cell[3938, 102, 294, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4257, 117, 549, 16, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3369, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4831, 137, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->244930563],
+Cell[5572, 163, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5628, 167, 101, 2, 70, "Input"],
+Cell[5732, 171, 319, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6112, 188, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2122612038],
+ CellID->1524661129],
Cell[CellGroupData[{
-Cell[3782, 113, 196, 6, 25, "ExampleSection",
- CellID->1020378981],
+Cell[6525, 207, 196, 6, 26, "ExampleSection",
+ CellID->1074586463],
Cell[CellGroupData[{
-Cell[4003, 123, 237, 7, 27, "Input",
+Cell[6746, 217, 140, 4, 27, "Input"],
+Cell[6889, 223, 609, 24, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7535, 252, 144, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->69726605],
-Cell[4243, 132, 528, 20, 39, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1673904001]
+Cell[7682, 258, 507, 19, 37, "Output",
+ CellTags->"DiracGammaCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4808, 157, 140, 4, 27, "Input",
+Cell[8226, 282, 140, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->919953934],
-Cell[4951, 163, 301, 9, 49, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1515539427]
+Cell[8369, 288, 280, 8, 51, "Output",
+ CellTags->"DiracGammaCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5289, 177, 286, 9, 27, "Input",
+Cell[8686, 301, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8816, 307, 190, 6, 27, "Input"],
+Cell[9009, 315, 562, 22, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9608, 342, 143, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->2255714],
-Cell[5578, 188, 587, 22, 39, "Output",
- CellTags->"DiracGammaCombine",
- CellID->801597804]
+Cell[9754, 348, 483, 18, 37, "Output",
+ CellTags->"DiracGammaCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6202, 215, 141, 4, 27, "Input",
+Cell[10274, 371, 141, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->1011380579],
-Cell[6346, 221, 351, 11, 49, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1276677678]
+Cell[10418, 377, 388, 13, 51, "Output",
+ CellTags->"DiracGammaCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6734, 237, 145, 4, 27, "Input",
+Cell[10843, 395, 145, 4, 27, "Input",
CellTags->"DiracGammaCombine",
CellID->365053477],
-Cell[6882, 243, 642, 24, 38, "Output",
- CellTags->"DiracGammaCombine",
- CellID->1799332421]
+Cell[10991, 401, 512, 19, 37, "Output",
+ CellTags->"DiracGammaCombine"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[7551, 271, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11542, 425, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7619, 276, 270, 12, 31, "SeeAlsoSection",
+Cell[11610, 430, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7892, 290, 1097, 39, 32, "Text",
- CellTags->"DiracGammaCombine",
- CellID->269406671]
+Cell[11883, 444, 715, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[9004, 332, 23, 0, 70, "FooterCell"]
+Cell[12613, 472, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaExpand.nb
index bbb8370e1..bc15f2932 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaExpand.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaExpand.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17546, 613]
-NotebookOptionsPosition[ 11340, 417]
-NotebookOutlinePosition[ 15252, 529]
-CellTagsIndexPosition[ 15132, 523]
+NotebookDataLength[ 30413, 1136]
+NotebookOptionsPosition[ 25325, 977]
+NotebookOutlinePosition[ 27457, 1034]
+CellTagsIndexPosition[ 27371, 1029]
WindowTitle->DiracGammaExpand
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracGammaExpand\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracGammaExpand"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracGammaCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGammaCombine"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracGammaExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracGammaExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracGammaExpand.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$39719],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracGammaExpand", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$64858],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracGammaExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +100,29 @@ DiracGammaExpand.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracGammaExpand", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracGammaExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracGammaExpand", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands all DiracGamma[Momentum[a+b+..]] in exp into \
-(DiracGamma[Momentum[a]] + DiracGamma[Momentum[b]] + ...)."
+ " \[LineSeparator]expands Dirac matrices contracted to linear \
+combinations of ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-vectors."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +133,79 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1797171678],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "All ",
+ Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[",
+ RowBox[{
+ RowBox[{"a", "+", "b", "+"}], ".."}], "]"}], "]"}]], "InlineFormula"],
+ " will be expanded to ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "a", "]"}], "]"}], "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "b", "]"}], "]"}], "+"}], "..."}], ")"}]],
+ "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracGammaExpand", "]"}]], "Input",
+ CellLabel->"In[141]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracSigmaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{327, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[141]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -104,35 +217,221 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->958361767],
+ CellID->427964355],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1987909346],
+ CellID->1223703523],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{143, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[TextData[{
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " rewrites ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox[
+ RowBox[{"(",
+ RowBox[{"p", "-", "q"}], ")"}], "\[Mu]"]}]], "InlineFormula"],
+ " as ",
+ Cell[BoxData[
RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}], " ", ".", " ",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{"p", "-", "q"}], "]"}], "]"}]}]}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[1]:=",
- CellID->808958256],
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox["p", "\[Mu]"]}], "-",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox["q", "\[Mu]"]}]}]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{151, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "q", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}], "-",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "q", "]"}], "]"}]}], ")"}]}]], "Output",
+ ImageSize->{423, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The inverse operation is ",
+ ButtonBox["DiracGammaCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "-",
+ RowBox[{"GS", "[", "q", "]"}]}], ")"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{151, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaCombine", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -159,27 +458,17 @@ Cell[BoxData[
TraditionalForm], "_"]}],
TraditionalForm],
TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{129, 18},
+ ImageSize->{143, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[1]=",
- CellID->922918740]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["\<\
-Momentum is the head of p-q, i.e., it is treated as one four-momentum.\
-\>", "Text",
- CellTags->"DiracGammaExpand",
- CellID->2029354787],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[2]:=",
- CellID->1573863723],
+ RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
RowBox[{
@@ -188,128 +477,351 @@ Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"Momentum", "[",
RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Output",
- ImageSize->{418, 15},
+ ImageSize->{416, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[2]//StandardForm=",
- CellID->50723928]
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]]
}, Open ]],
-Cell["With DiracGammaExpand the Momentum[p-q] gets expanded.", "Text",
- CellTags->"DiracGammaExpand",
- CellID->2014620015],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+It is possible to perform the expansions only on Dirac matrices contracted \
+with particular momenta.\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracGammaExpand", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[3]:=",
- CellID->260673945],
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p1", "+", "p2"}], "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}]}], "+", "\[IndentingNewLine]",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"q1", "+", "q2"}], "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}]}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
+ RowBox[{"c1", " ",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], "+",
+ RowBox[{"c2", " ",
RowBox[{
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "+",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{393, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaExpand", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "q1", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], "-",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{134, 18},
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{400, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[3]=",
- CellID->511724887]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
-Cell["The inverse operation is DiracGammaCombine.", "Text",
- CellTags->"DiracGammaExpand",
- CellID->1184042108],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "If the input expression contains ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ ", ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " will expand Feynman slashes inside ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ " and call ",
+ ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExpand",
+ ButtonNote->"DiracSigma"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"DiracGammaCombine", "[",
- RowBox[{"DiracGammaExpand", "[", "t", "]"}], "]"}], "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[4]:=",
- CellID->1327296799],
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Output",
- ImageSize->{418, 15},
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ RowBox[{"p", "+", "q"}],
+ TraditionalForm],
+ FormBox["r",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{55, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[4]//StandardForm=",
- CellID->264621103]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"DiracGammaExpand", "[", "t", "]"}], "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[5]:=",
- CellID->447085558],
+ RowBox[{"DiracGammaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}], ".",
- RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{85, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The call to ",
+ ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExpand",
+ ButtonNote->"DiracSigma"],
+ " can be inhibited by disabling the corresponding option."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaExpand", "[",
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}], ",",
+ RowBox[{"DiracSigmaExpand", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"DiracSigma", "(",
RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "p", "]"}], "]"}], "-",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}]}], ")"}]}]], "Output",
- ImageSize->{425, 33},
+ RowBox[{
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], ",",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{197, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[5]//StandardForm=",
- CellID->85762253]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
-Cell["In order to do non-commutative expansion use DiracSimplify.", "Text",
- CellTags->"DiracGammaExpand",
- CellID->56861818],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " f",
+ ButtonBox["or",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " noncommutative expansions with the corresponding simplifications."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[6]:=",
- CellID->103977295],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ")"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
@@ -337,19 +849,81 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{124, 21},
+ ImageSize->{139, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[6]=",
- CellID->703741666]
+ CellLabel->"Out[1]="]
}, Open ]],
+Cell[TextData[{
+ "If simplifications are not required, you may also combine ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " with ",
+ ButtonBox["DotSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DotSimplify",
+ ButtonNote->"DotSimplify"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DotSimplify", "[",
+ RowBox[{"DiracGammaExpand", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ")"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
Cell[BoxData[
- RowBox[{"Clear", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[7]:=",
- CellID->2056643915]
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{214, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -384,33 +958,19 @@ Cell[TextData[{
ButtonNote->"DiracGammaCombine"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracGammaExpand",
- CellID->1587243701]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -427,22 +987,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 49.850166}",
+ "built" -> "{2020, 1, 5, 18, 54, 29.051918}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracGammaExpand[exp] expands all DiracGamma[Momentum[a+b+..]] in exp \
-into (DiracGamma[Momentum[a]] + DiracGamma[Momentum[b]] + ...).",
- "synonyms" -> {}, "title" -> "DiracGammaExpand", "titlemodifier" -> "",
- "windowtitle" -> "DiracGammaExpand", "type" -> "Symbol", "uri" ->
+ "DiracGammaExpand[exp] expands Dirac matrices contracted to linear \
+combinations of 4-vectors.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DiracGammaExpand", "titlemodifier" -> "", "windowtitle" ->
+ "DiracGammaExpand", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/DiracGammaExpand"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -450,8 +1010,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -460,161 +1021,123 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3421, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6641, 208, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->958361767]},
- "DiracGammaExpand"->{
- Cell[4054, 124, 332, 10, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->808958256],
- Cell[4389, 136, 800, 30, 39, "Output",
- CellTags->"DiracGammaExpand",
- CellID->922918740],
- Cell[5204, 169, 146, 4, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->2029354787],
- Cell[5375, 177, 140, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->1573863723],
- Cell[5518, 183, 396, 12, 49, "Output",
- CellTags->"DiracGammaExpand",
- CellID->50723928],
- Cell[5929, 198, 122, 2, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->2014620015],
- Cell[6076, 204, 143, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->260673945],
- Cell[6222, 210, 856, 32, 39, "Output",
- CellTags->"DiracGammaExpand",
- CellID->511724887],
- Cell[7093, 245, 111, 2, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->1184042108],
- Cell[7229, 251, 228, 6, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->1327296799],
- Cell[7460, 259, 397, 12, 49, "Output",
- CellTags->"DiracGammaExpand",
- CellID->264621103],
- Cell[7894, 276, 182, 5, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->447085558],
- Cell[8079, 283, 499, 15, 67, "Output",
- CellTags->"DiracGammaExpand",
- CellID->85762253],
- Cell[8593, 301, 125, 2, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->56861818],
- Cell[8743, 307, 140, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->103977295],
- Cell[8886, 313, 808, 31, 42, "Output",
- CellTags->"DiracGammaExpand",
- CellID->703741666],
- Cell[9709, 347, 133, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->2056643915],
- Cell[10198, 373, 1100, 39, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->1587243701]}
+ CellID->427964355]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13241, 461},
- {"DiracGammaExpand", 13383, 465}
+ {"PrimaryExamplesSection", 27228, 1022}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3344, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 466, 13, 99, "Usage",
+Cell[3935, 102, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4253, 117, 466, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3421, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4744, 135, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1797171678],
+Cell[5486, 161, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5520, 163, 504, 18, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[6049, 185, 100, 2, 70, "Input"],
+Cell[6152, 189, 428, 12, 56, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6641, 208, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->958361767],
-Cell[CellGroupData[{
-Cell[3833, 114, 196, 6, 25, "ExampleSection",
- CellID->1987909346],
-Cell[CellGroupData[{
-Cell[4054, 124, 332, 10, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->808958256],
-Cell[4389, 136, 800, 30, 39, "Output",
- CellTags->"DiracGammaExpand",
- CellID->922918740]
-}, Open ]],
-Cell[5204, 169, 146, 4, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->2029354787],
-Cell[CellGroupData[{
-Cell[5375, 177, 140, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->1573863723],
-Cell[5518, 183, 396, 12, 49, "Output",
- CellTags->"DiracGammaExpand",
- CellID->50723928]
-}, Open ]],
-Cell[5929, 198, 122, 2, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->2014620015],
-Cell[CellGroupData[{
-Cell[6076, 204, 143, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->260673945],
-Cell[6222, 210, 856, 32, 39, "Output",
- CellTags->"DiracGammaExpand",
- CellID->511724887]
-}, Open ]],
-Cell[7093, 245, 111, 2, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->1184042108],
-Cell[CellGroupData[{
-Cell[7229, 251, 228, 6, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->1327296799],
-Cell[7460, 259, 397, 12, 49, "Output",
- CellTags->"DiracGammaExpand",
- CellID->264621103]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7894, 276, 182, 5, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->447085558],
-Cell[8079, 283, 499, 15, 67, "Output",
- CellTags->"DiracGammaExpand",
- CellID->85762253]
-}, Open ]],
-Cell[8593, 301, 125, 2, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->56861818],
-Cell[CellGroupData[{
-Cell[8743, 307, 140, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->103977295],
-Cell[8886, 313, 808, 31, 42, "Output",
- CellTags->"DiracGammaExpand",
- CellID->703741666]
-}, Open ]],
-Cell[9709, 347, 133, 4, 27, "Input",
- CellTags->"DiracGammaExpand",
- CellID->2056643915]
-}, Open ]],
-Cell[9857, 354, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[9925, 359, 270, 12, 31, "SeeAlsoSection",
+ CellID->427964355],
+Cell[CellGroupData[{
+Cell[7053, 227, 196, 6, 26, "ExampleSection",
+ CellID->1223703523],
+Cell[CellGroupData[{
+Cell[7274, 237, 154, 5, 27, "Input"],
+Cell[7431, 244, 841, 32, 37, "Output"]
+}, Open ]],
+Cell[8287, 279, 597, 22, 35, "Notes"],
+Cell[CellGroupData[{
+Cell[8909, 305, 92, 2, 27, "Input"],
+Cell[9004, 309, 805, 30, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9846, 344, 88, 2, 27, "Input"],
+Cell[9937, 348, 449, 13, 69, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10423, 366, 105, 2, 9, "ExampleDelimiter"],
+Cell[10531, 370, 207, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[10763, 381, 210, 7, 27, "Input"],
+Cell[10976, 390, 938, 36, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11951, 431, 93, 2, 27, "Input"],
+Cell[12047, 435, 749, 28, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12833, 468, 88, 2, 27, "Input"],
+Cell[12924, 472, 346, 10, 51, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13319, 488, 105, 2, 9, "ExampleDelimiter"],
+Cell[13427, 492, 126, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[13578, 499, 585, 18, 45, "Input"],
+Cell[14166, 519, 1730, 66, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15933, 590, 178, 5, 27, "Input"],
+Cell[16114, 597, 1459, 54, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17622, 657, 105, 2, 9, "ExampleDelimiter"],
+Cell[17730, 661, 657, 22, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[18412, 687, 196, 6, 27, "Input"],
+Cell[18611, 695, 314, 12, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18962, 712, 92, 2, 27, "Input"],
+Cell[19057, 716, 605, 26, 35, "Output"]
+}, Open ]],
+Cell[19677, 745, 240, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[19942, 756, 320, 9, 45, "Input"],
+Cell[20265, 767, 626, 23, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20940, 796, 105, 2, 9, "ExampleDelimiter"],
+Cell[21048, 800, 373, 12, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[21446, 816, 223, 7, 27, "Input"],
+Cell[21672, 825, 757, 29, 39, "Output"]
+}, Open ]],
+Cell[22444, 857, 374, 12, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[22843, 873, 269, 8, 27, "Input"],
+Cell[23115, 883, 1070, 40, 37, "Output"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[24224, 928, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[24292, 933, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10198, 373, 1100, 39, 32, "Text",
- CellTags->"DiracGammaExpand",
- CellID->1587243701]
+Cell[24565, 947, 718, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[11313, 415, 23, 0, 42, "FooterCell"]
+Cell[25298, 975, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaT.nb
deleted file mode 100644
index bd3b0b8e3..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracGammaT.nb
+++ /dev/null
@@ -1,375 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10519, 365]
-NotebookOptionsPosition[ 6533, 241]
-NotebookOutlinePosition[ 9345, 320]
-CellTagsIndexPosition[ 9232, 314]
-WindowTitle->DiracGammaT
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracGammaT\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracGammaT"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-DiracGammaT.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$40413],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracGammaT", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["DiracGammaT", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"DiracGammaT", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the transpose of DiracGamma[x]. Transpose[DiracGammaT[x]] gives \
-DiracGamma[x]. Note that x must have Head LorentzIndex or Momentum."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->679184715],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1701023869],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracGammaT", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Input",
- CellTags->"DiracGammaT",
- CellLabel->"In[1]:=",
- CellID->1057699724],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- ImageSize->{45, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaT",
- CellLabel->"Out[1]=",
- CellID->848934058]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Transpose", "[", "%", "]"}]], "Input",
- CellTags->"DiracGammaT",
- CellLabel->"In[2]:=",
- CellID->1231382405],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{23, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaT",
- CellLabel->"Out[2]=",
- CellID->490097123]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"GS", "[", "p", "]"}], "//", "FCI"}], "//", "Transpose"}]], "Input",\
-
- CellTags->"DiracGammaT",
- CellLabel->"In[3]:=",
- CellID->865153604],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- ImageSize->{56, 21},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracGammaT",
- CellLabel->"Out[3]=",
- CellID->1938967993]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["DiracGamma",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracGammaT",
- CellID->1110341394]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"DiracGammaT",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 53.125200}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "DiracGammaT[x] denotes the transpose of DiracGamma[x]. \
-Transpose[DiracGammaT[x]] gives DiracGamma[x]. Note that x must have Head \
-LorentzIndex or Momentum.", "synonyms" -> {}, "title" -> "DiracGammaT",
- "titlemodifier" -> "", "windowtitle" -> "DiracGammaT", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/DiracGammaT"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3412, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->679184715]},
- "DiracGammaT"->{
- Cell[4045, 124, 177, 5, 27, "Input",
- CellTags->"DiracGammaT",
- CellID->1057699724],
- Cell[4225, 131, 443, 17, 39, "Output",
- CellTags->"DiracGammaT",
- CellID->848934058],
- Cell[4705, 153, 132, 4, 27, "Input",
- CellTags->"DiracGammaT",
- CellID->1231382405],
- Cell[4840, 159, 341, 13, 38, "Output",
- CellTags->"DiracGammaT",
- CellID->490097123],
- Cell[5218, 177, 185, 7, 27, "Input",
- CellTags->"DiracGammaT",
- CellID->865153604],
- Cell[5406, 186, 480, 18, 42, "Output",
- CellTags->"DiracGammaT",
- CellID->1938967993],
- Cell[6254, 227, 237, 9, 31, "Text",
- CellTags->"DiracGammaT",
- CellID->1110341394]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 8432, 285},
- {"DiracGammaT", 8569, 289}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 487, 13, 98, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3412, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->679184715],
-Cell[CellGroupData[{
-Cell[3824, 114, 196, 6, 25, "ExampleSection",
- CellID->1701023869],
-Cell[CellGroupData[{
-Cell[4045, 124, 177, 5, 27, "Input",
- CellTags->"DiracGammaT",
- CellID->1057699724],
-Cell[4225, 131, 443, 17, 39, "Output",
- CellTags->"DiracGammaT",
- CellID->848934058]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4705, 153, 132, 4, 27, "Input",
- CellTags->"DiracGammaT",
- CellID->1231382405],
-Cell[4840, 159, 341, 13, 38, "Output",
- CellTags->"DiracGammaT",
- CellID->490097123]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5218, 177, 185, 7, 27, "Input",
- CellTags->"DiracGammaT",
- CellID->865153604],
-Cell[5406, 186, 480, 18, 42, "Output",
- CellTags->"DiracGammaT",
- CellID->1938967993]
-}, Open ]]
-}, Open ]],
-Cell[5913, 208, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5981, 213, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[6254, 227, 237, 9, 31, "Text",
- CellTags->"DiracGammaT",
- CellID->1110341394]
-}, Open ]],
-Cell[6506, 239, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracIndex.nb
new file mode 100644
index 000000000..60fb0a68f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracIndex.nb
@@ -0,0 +1,567 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16151, 557]
+NotebookOptionsPosition[ 11702, 413]
+NotebookOutlinePosition[ 14322, 488]
+CellTagsIndexPosition[ 14210, 482]
+WindowTitle->DiracIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"ExplicitDiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitDiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracIndex.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$66244],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["DiracIndex"], "InlineFormula"],
+ " \[LineSeparator]",
+ "is the head of Dirac indices."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->566175382],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The internal representation of a four-dimensional spinorial index ",
+ Cell[BoxData["i"], "InlineFormula"],
+ " is ",
+ Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "If the first argument is an integer, ",
+ Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "InlineFormula"],
+ " turns into ",
+ Cell[BoxData[
+ RowBox[{"ExplicitDiracIndex", "[", "i", "]"}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->1624463599],
+
+Cell[TextData[{
+ "Dirac indices are the indices that denote the components of Dirac matrices \
+or spinors. They should not be confused with the Lorentz indices attached to \
+the Dirac matrices. For example \nin case of ",
+ Cell[BoxData[
+ SuperscriptBox[
+ SubscriptBox["\[Gamma]", "ij"], "\[Mu]"]], "InlineFormula"],
+ ", ",
+ Cell[BoxData["\[Mu]"], "InlineFormula"],
+ " is a Lorentz index, while ",
+ Cell[BoxData["i"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["j"], "InlineFormula"],
+ " are Dirac (spinorial) indices."
+}], "Notes",
+ CellID->1835295214]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1698871770],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->60457271],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[1]:=",
+ CellID->973923672],
+
+Cell[BoxData[
+ FormBox["i", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNIndex",
+ CellLabel->"Out[1]=",
+ CellID->2017526493]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[2]:=",
+ CellID->293124345],
+
+Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "Output",
+ ImageSize->{110, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNIndex",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1562880488]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "2", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1927371187],
+
+Cell[BoxData[
+ FormBox["2", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1717337875]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1807480238],
+
+Cell[BoxData[
+ RowBox[{"ExplicitDiracIndex", "[", "2", "]"}]], "Output",
+ ImageSize->{174, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->125060963]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[5]:=",
+ CellID->874008605],
+
+Cell[BoxData[
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Output",
+ ImageSize->{368, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNIndex",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->270559869]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ExplicitDiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExplicitDiracIndex",
+ ButtonNote->"ExplicitDiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"DiracIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 33.010596}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "DiracIndex is the head of Dirac indices.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracIndex",
+ "titlemodifier" -> "", "windowtitle" -> "DiracIndex", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DiracIndex"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7010, 212, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1698871770]},
+ "SUNIndex"->{
+ Cell[7642, 241, 129, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->973923672],
+ Cell[7774, 247, 210, 7, 35, "Output",
+ CellTags->"SUNIndex",
+ CellID->2017526493],
+ Cell[8021, 259, 127, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->293124345],
+ Cell[8151, 265, 233, 7, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->1562880488],
+ Cell[9117, 309, 216, 8, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->874008605],
+ Cell[9336, 319, 336, 10, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->270559869]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13522, 456},
+ {"SUNIndex", 13658, 460}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 3844, 89, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4429, 112, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4741, 127, 342, 11, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5108, 142, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->566175382],
+Cell[5849, 168, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5883, 170, 247, 8, 70, "Notes",
+ CellID->1067943069],
+Cell[6133, 180, 271, 9, 70, "Notes",
+ CellID->1624463599],
+Cell[6407, 191, 554, 15, 70, "Notes",
+ CellID->1835295214]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7010, 212, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1698871770],
+Cell[CellGroupData[{
+Cell[7423, 231, 194, 6, 26, "ExampleSection",
+ CellID->60457271],
+Cell[CellGroupData[{
+Cell[7642, 241, 129, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->973923672],
+Cell[7774, 247, 210, 7, 35, "Output",
+ CellTags->"SUNIndex",
+ CellID->2017526493]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8021, 259, 127, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->293124345],
+Cell[8151, 265, 233, 7, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->1562880488]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8421, 277, 107, 3, 27, "Input",
+ CellID->1927371187],
+Cell[8531, 282, 187, 6, 35, "Output",
+ CellID->1717337875]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8755, 293, 105, 3, 27, "Input",
+ CellID->1807480238],
+Cell[8863, 298, 217, 6, 51, "Output",
+ CellID->125060963]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9117, 309, 216, 8, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->874008605],
+Cell[9336, 319, 336, 10, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->270559869]
+}, Open ]]
+}, Open ]],
+Cell[9699, 333, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9767, 338, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10040, 352, 1620, 56, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[11675, 411, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracIndexDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracIndexDelta.nb
new file mode 100644
index 000000000..858e58f61
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracIndexDelta.nb
@@ -0,0 +1,994 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 26397, 984]
+NotebookOptionsPosition[ 22168, 848]
+NotebookOutlinePosition[ 24331, 905]
+CellTagsIndexPosition[ 24246, 900]
+WindowTitle->DiracIndexDelta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracIndexDelta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracIndexDelta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracIndexDelta.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$65787],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracIndexDelta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracIndexDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta in the Dirac space with two \
+explicit Dirac indices i and j."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->552219747],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1558230122],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->334232589],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{31, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->20772612]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1160563166],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}], "2"], TraditionalForm]], "Output",
+ ImageSize->{31, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->843930386]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1638726287],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1241539029]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "D"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1419299763],
+
+Cell[BoxData[
+ FormBox["D", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1731780001]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}],
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "j", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "k", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->483228122],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{64, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1915476533]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1782586861],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->600762965]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i2", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}]}], "]"}], " ",
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i4", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i7", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "q", "]"}]}], ",", "0", ",", "1"}], "]"}]}],
+ "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i0", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i1", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i2", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i6", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i4", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->343925321],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i5",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{465, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->1928929144]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1092912350],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{345, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1955736589]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i0", ",", "i1"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->654220270],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{312, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->359616923]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i7", ",", "i6"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->427410435],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{292, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->1386750926]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->979184841]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"DiracIndexDelta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 31.845786}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracIndexDelta[DiracIndex[i], DiracIndex[j]] is the Kronecker-delta in \
+the Dirac space with two explicit Dirac indices i and j.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DiracIndexDelta", "titlemodifier" -> "",
+ "windowtitle" -> "DiracIndexDelta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracIndexDelta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5189, 142, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->552219747]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 24103, 893}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[587, 21, 3740, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4330, 110, 292, 11, 45, "ObjectNameGrid"],
+Cell[4625, 123, 539, 15, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5189, 142, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->552219747],
+Cell[CellGroupData[{
+Cell[5601, 161, 196, 6, 26, "ExampleSection",
+ CellID->1558230122],
+Cell[CellGroupData[{
+Cell[5822, 171, 210, 6, 27, "Input",
+ CellID->334232589],
+Cell[6035, 179, 381, 16, 39, "Output",
+ CellID->20772612]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6453, 200, 237, 7, 27, "Input",
+ CellID->1160563166],
+Cell[6693, 209, 392, 16, 42, "Output",
+ CellID->843930386]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7122, 230, 111, 3, 27, "Input",
+ CellID->1638726287],
+Cell[7236, 235, 187, 6, 35, "Output",
+ CellID->1241539029]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7460, 246, 174, 5, 27, "Input",
+ CellID->1419299763],
+Cell[7637, 253, 187, 6, 35, "Output",
+ CellID->1731780001]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7861, 264, 375, 11, 45, "Input",
+ CellID->483228122],
+Cell[8239, 277, 622, 27, 40, "Output",
+ CellID->1915476533]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8898, 309, 111, 3, 27, "Input",
+ CellID->1782586861],
+Cell[9012, 314, 382, 16, 38, "Output",
+ CellID->600762965]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9431, 335, 1610, 44, 147, "Input",
+ CellID->343925321],
+Cell[11044, 381, 3068, 131, 38, "Output",
+ CellID->1928929144]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14149, 517, 111, 3, 27, "Input",
+ CellID->1092912350],
+Cell[14263, 522, 2177, 87, 41, "Output",
+ CellID->1955736589]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16477, 614, 195, 6, 27, "Input",
+ CellID->654220270],
+Cell[16675, 622, 1950, 76, 41, "Output",
+ CellID->359616923]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18662, 703, 196, 6, 27, "Input",
+ CellID->427410435],
+Cell[18861, 711, 1481, 59, 37, "Output",
+ CellID->1386750926]
+}, Open ]]
+}, Open ]],
+Cell[20369, 774, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20437, 779, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[20710, 793, 1416, 50, 71, "SeeAlso",
+ CellID->979184841]
+}, Open ]],
+Cell[22141, 846, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracMatrix.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracMatrix.nb
index b3de27225..3a8b3df55 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracMatrix.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracMatrix.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21272, 790]
-NotebookOptionsPosition[ 13864, 546]
-NotebookOutlinePosition[ 18374, 678]
-CellTagsIndexPosition[ 18259, 672]
+NotebookDataLength[ 17278, 620]
+NotebookOptionsPosition[ 12140, 460]
+NotebookOutlinePosition[ 15176, 544]
+CellTagsIndexPosition[ 15061, 538]
WindowTitle->DiracMatrix
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracMatrix\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracMatrix"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GA\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GA"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracMatrix\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracMatrix"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracMatrix.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$40756],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracMatrix", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$66695],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracMatrix", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ DiracMatrix.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracMatrix", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracMatrix", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -135,6 +170,65 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1769322560],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The shortcut DiracMatrix is deprecated, please use GA instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracMatrix", "]"}]], "Input",
+ CellTags->"DiracMatrix",
+ CellLabel->"In[322]:=",
+ CellID->1215792887],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{257, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"DiracMatrix",
+ CellLabel->"Out[322]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -150,7 +244,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1519176272],
+ CellID->1876846923],
Cell[CellGroupData[{
@@ -160,37 +254,14 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2124672527],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracMatrix", "]"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[1]:=",
- CellID->1215792887],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{281, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[1]=",
- CellID->462215683]
-}, Open ]],
+ CellID->1801548614],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}]], "Input",
CellTags->"DiracMatrix",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->888527237],
Cell[BoxData[
@@ -201,23 +272,19 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{23, 17},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracMatrix",
- CellLabel->"Out[2]=",
- CellID->1128455616]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[TextData[{
- "This is how to enter the non-commutative product of two ",
- Cell[BoxData[
- FormBox["Null", TraditionalForm]]],
- ". The ",
+ "This is how to enter the non-commutative product of two. The ",
StyleBox["Mathematica",
FontSlant->"Italic"],
" Dot \".\" is used as non-commutative multiplication operator."
-}], "Text",
+}], "Notes",
CellTags->"DiracMatrix",
CellID->477550014],
@@ -228,7 +295,7 @@ Cell[BoxData[
RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
RowBox[{"DiracMatrix", "[", "\[Nu]", "]"}]}]], "Input",
CellTags->"DiracMatrix",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->216003987],
Cell[BoxData[
@@ -246,12 +313,11 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracMatrix",
- CellLabel->"Out[3]=",
- CellID->527384282]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -261,7 +327,7 @@ Cell[BoxData[
RowBox[{"DiracMatrix", "[", "\[Alpha]", "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"DiracMatrix",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1775640770],
Cell[BoxData[
@@ -271,18 +337,19 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracMatrix",
- CellLabel->"Out[4]//StandardForm=",
- CellID->209169397]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
+Cell["\<\
+DiracMatrix is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use GA.\
+\>", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], "//", "FCE"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[5]:=",
- CellID->1489042033],
+ RowBox[{"GA", "[", "\[Mu]", "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
@@ -292,39 +359,17 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{23, 17},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[5]=",
- CellID->1529249901]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[6]:=",
- CellID->80209945],
-
-Cell[BoxData[
- RowBox[{"GA", "[", "\[Mu]", "]"}]], "Output",
- ImageSize->{46, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1573455068]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"GAD", "[", "\[Mu]", "]"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[7]:=",
- CellID->512840116],
+ CellLabel->"In[5]:="],
Cell[BoxData[
FormBox[
@@ -333,133 +378,46 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{22, 17},
+ ImageSize->{24, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[7]=",
- CellID->999762340]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[8]:=",
- CellID->1503246496],
+ RowBox[{"FCI", "[",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], "]"}], "===",
+ RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}]}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}]], "Output",
- ImageSize->{271, 15},
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[8]//StandardForm=",
- CellID->1842955890]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[9]:=",
- CellID->1134451921],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{68, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[9]=",
- CellID->625741566]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"a", " ", ".", " ", "b"}], "]"}], "//", "FCI"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[10]:=",
- CellID->241194804],
+ RowBox[{"FCI", "[",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], "]"}], "===",
+ RowBox[{"DiracMatrix", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{46, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[10]=",
- CellID->1051855483]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[11]:=",
- CellID->256970123],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"LorentzIndex", "[", "a", "]"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"LorentzIndex", "[", "b", "]"}], "]"}]}]], "Output",
- ImageSize->{455, 15},
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracMatrix",
- CellLabel->"Out[11]//StandardForm=",
- CellID->94050778]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -483,71 +441,27 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["DiracGammaExpand",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracGamma",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracTrick",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracTrick",
- ButtonNote->"DiracTrick"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["GA",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GA",
ButtonNote->"GA"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["GAD",
+ StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GAD",
- ButtonNote->"GAD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["GS",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GS",
- ButtonNote->"GS"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["GSD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GSD",
- ButtonNote->"GSD"],
+ ButtonData->"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracMatrix",
- CellID->703033103]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DiracMatrix",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -556,10 +470,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 54.629111}",
+ "built" -> "{2020, 1, 5, 18, 54, 34.320473}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -569,11 +483,12 @@ TaggingRules->{
DiracMatrix[\\[Mu], \\[Nu], ...] is a product of \\[Gamma] matrices with \
Lorentz indices \\[Mu], \\[Nu], ... DiracMatrix[5] is \\[Gamma]^5. \
DiracMatrix[6] is 1/2 + \\[Gamma]^5/2. DiracMatrix[7] is 1/2 - \
-\\[Gamma]^5/2.", "synonyms" -> {}, "title" -> "DiracMatrix", "titlemodifier" ->
- "", "windowtitle" -> "DiracMatrix", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracMatrix"}, "SearchTextTranslated" -> ""},
+\\[Gamma]^5/2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DiracMatrix", "titlemodifier" -> "", "windowtitle" -> "DiracMatrix",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracMatrix"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -582,7 +497,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -590,208 +505,123 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4542, 137, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1519176272]},
"DiracMatrix"->{
- Cell[5176, 166, 140, 4, 27, "Input",
+ Cell[6528, 207, 142, 4, 70, "Input",
CellTags->"DiracMatrix",
CellID->1215792887],
- Cell[5319, 172, 351, 12, 36, "Output",
- CellTags->"DiracMatrix",
- CellID->462215683],
- Cell[5707, 189, 137, 4, 27, "Input",
+ Cell[6673, 213, 333, 11, 37, "Output",
+ CellTags->"DiracMatrix"],
+ Cell[7701, 260, 137, 4, 27, "Input",
CellTags->"DiracMatrix",
CellID->888527237],
- Cell[5847, 195, 342, 13, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->1128455616],
- Cell[6204, 211, 313, 10, 52, "Text",
+ Cell[7841, 266, 321, 12, 37, "Output",
+ CellTags->"DiracMatrix"],
+ Cell[8177, 281, 255, 7, 49, "Notes",
CellTags->"DiracMatrix",
CellID->477550014],
- Cell[6542, 225, 202, 6, 27, "Input",
+ Cell[8457, 292, 202, 6, 27, "Input",
CellTags->"DiracMatrix",
CellID->216003987],
- Cell[6747, 233, 505, 20, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->527384282],
- Cell[7289, 258, 179, 6, 27, "Input",
+ Cell[8662, 300, 485, 19, 37, "Output",
+ CellTags->"DiracMatrix"],
+ Cell[9184, 324, 179, 6, 27, "Input",
CellTags->"DiracMatrix",
CellID->1775640770],
- Cell[7471, 266, 281, 8, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->209169397],
- Cell[7789, 279, 164, 5, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->1489042033],
- Cell[7956, 286, 342, 13, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->1529249901],
- Cell[8335, 304, 129, 4, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->80209945],
- Cell[8467, 310, 231, 7, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->1573455068],
- Cell[8735, 322, 129, 4, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->512840116],
- Cell[8867, 328, 317, 12, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->999762340],
- Cell[9221, 345, 157, 5, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->1503246496],
- Cell[9381, 352, 328, 10, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->1842955890],
- Cell[9746, 367, 171, 5, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->1134451921],
- Cell[9920, 374, 771, 32, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->625741566],
- Cell[10728, 411, 185, 6, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->241194804],
- Cell[10916, 419, 499, 20, 40, "Output",
- CellTags->"DiracMatrix",
- CellID->1051855483],
- Cell[11452, 444, 131, 4, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->256970123],
- Cell[11586, 450, 375, 11, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->94050778],
- Cell[12329, 484, 1493, 57, 32, "Text",
- CellTags->"DiracMatrix",
- CellID->703033103]}
+ Cell[9366, 332, 261, 7, 51, "Output",
+ CellTags->"DiracMatrix"]},
+ "PrimaryExamplesSection"->{
+ Cell[7067, 231, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1876846923]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15902, 592},
- {"DiracMatrix", 16041, 596}
+ {"DiracMatrix", 14156, 507},
+ {"PrimaryExamplesSection", 14917, 531}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3078, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 1617, 55, 105, "Usage",
- CellID->982511436],
+Cell[3664, 98, 288, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4542, 137, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1519176272],
+Cell[3977, 113, 1617, 55, 111, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4955, 156, 196, 6, 25, "ExampleSection",
- CellID->2124672527],
+Cell[5619, 172, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1769322560],
+Cell[6361, 198, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6395, 200, 108, 3, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[5176, 166, 140, 4, 27, "Input",
+Cell[6528, 207, 142, 4, 70, "Input",
CellTags->"DiracMatrix",
CellID->1215792887],
-Cell[5319, 172, 351, 12, 36, "Output",
- CellTags->"DiracMatrix",
- CellID->462215683]
+Cell[6673, 213, 333, 11, 37, "Output",
+ CellTags->"DiracMatrix"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5707, 189, 137, 4, 27, "Input",
+Cell[7067, 231, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1876846923],
+Cell[CellGroupData[{
+Cell[7480, 250, 196, 6, 26, "ExampleSection",
+ CellID->1801548614],
+Cell[CellGroupData[{
+Cell[7701, 260, 137, 4, 27, "Input",
CellTags->"DiracMatrix",
CellID->888527237],
-Cell[5847, 195, 342, 13, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->1128455616]
+Cell[7841, 266, 321, 12, 37, "Output",
+ CellTags->"DiracMatrix"]
}, Open ]],
-Cell[6204, 211, 313, 10, 52, "Text",
+Cell[8177, 281, 255, 7, 49, "Notes",
CellTags->"DiracMatrix",
CellID->477550014],
Cell[CellGroupData[{
-Cell[6542, 225, 202, 6, 27, "Input",
+Cell[8457, 292, 202, 6, 27, "Input",
CellTags->"DiracMatrix",
CellID->216003987],
-Cell[6747, 233, 505, 20, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->527384282]
+Cell[8662, 300, 485, 19, 37, "Output",
+ CellTags->"DiracMatrix"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7289, 258, 179, 6, 27, "Input",
+Cell[9184, 324, 179, 6, 27, "Input",
CellTags->"DiracMatrix",
CellID->1775640770],
-Cell[7471, 266, 281, 8, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->209169397]
+Cell[9366, 332, 261, 7, 51, "Output",
+ CellTags->"DiracMatrix"]
}, Open ]],
+Cell[9642, 342, 134, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[7789, 279, 164, 5, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->1489042033],
-Cell[7956, 286, 342, 13, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->1529249901]
+Cell[9801, 349, 82, 2, 27, "Input"],
+Cell[9886, 353, 295, 11, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8335, 304, 129, 4, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->80209945],
-Cell[8467, 310, 231, 7, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->1573455068]
+Cell[10218, 369, 83, 2, 27, "Input"],
+Cell[10304, 373, 271, 10, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8735, 322, 129, 4, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->512840116],
-Cell[8867, 328, 317, 12, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->999762340]
+Cell[10612, 388, 180, 5, 27, "Input"],
+Cell[10795, 395, 169, 5, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9221, 345, 157, 5, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->1503246496],
-Cell[9381, 352, 328, 10, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->1842955890]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[9746, 367, 171, 5, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->1134451921],
-Cell[9920, 374, 771, 32, 38, "Output",
- CellTags->"DiracMatrix",
- CellID->625741566]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10728, 411, 185, 6, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->241194804],
-Cell[10916, 419, 499, 20, 40, "Output",
- CellTags->"DiracMatrix",
- CellID->1051855483]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[11452, 444, 131, 4, 27, "Input",
- CellTags->"DiracMatrix",
- CellID->256970123],
-Cell[11586, 450, 375, 11, 49, "Output",
- CellTags->"DiracMatrix",
- CellID->94050778]
+Cell[11001, 405, 244, 7, 27, "Input"],
+Cell[11248, 414, 169, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[11988, 465, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11444, 423, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12056, 470, 270, 12, 31, "SeeAlsoSection",
+Cell[11512, 428, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[12329, 484, 1493, 57, 32, "Text",
- CellTags->"DiracMatrix",
- CellID->703033103]
+Cell[11785, 442, 313, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[13837, 544, 23, 0, 42, "FooterCell"]
+Cell[12113, 458, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracOrder.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracOrder.nb
index cffc54846..038fcd33d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracOrder.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracOrder.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 25316, 984]
-NotebookOptionsPosition[ 17560, 724]
-NotebookOutlinePosition[ 22180, 863]
-CellTagsIndexPosition[ 22066, 857]
+NotebookDataLength[ 29906, 1138]
+NotebookOptionsPosition[ 22747, 907]
+NotebookOutlinePosition[ 26397, 1011]
+CellTagsIndexPosition[ 26283, 1005]
WindowTitle->DiracOrder
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracOrder\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracOrder"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracOrder.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$41110],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracOrder", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracOrder\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracOrder"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracOrder.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$67182],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracOrder", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,24 +97,118 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracOrder", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracOrder", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "orders the Dirac matrices in expr alphabetically. \
-DiracOrder[expr,orderlist] orders the Dirac matrices in expr according to \
-orderlist."
+ RowBox[{"DiracOrder", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]orders the Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " lexicographically."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracOrder", "[",
+ RowBox[{"exp", ",", " ", "orderlist"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] orders the Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " according to ",
+ Cell[BoxData["orderlist"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2090318364],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1168226821],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "DiracOrder is also an option of ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " and some other functions dealing with Dirac algebra. If set to True, the \
+function ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " will be applied to the intermediate result to reorder the Dirac matrices \
+lexicographically."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracOrder", "]"}]], "Input",
+ CellLabel->"In[159]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{433, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[159]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
Cell[CellGroupData[{
@@ -105,26 +223,26 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1030512411],
+ CellID->981129014],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1708575828],
+ CellID->368538720],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"GA", "[",
RowBox[{"\[Beta]", ",", "\[Alpha]"}], "]"}]}]], "Input",
CellTags->"DiracOrder",
@@ -150,18 +268,17 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{48, 19},
+ ImageSize->{51, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[1]=",
- CellID->1026687398]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
CellLabel->"In[2]:=",
CellID->1074180519],
@@ -170,23 +287,17 @@ Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -200,26 +311,37 @@ Cell[BoxData[
FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{108, 19},
+ ImageSize->{114, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[2]=",
- CellID->1702463614]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["This is a string of Dirac matrices in D dimensions. ", "Text",
- CellTags->"DiracOrder",
- CellID->1050749108],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " also works with Dirac matrices in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Rho]", ",", "\[Nu]", ",", "\[Mu]", ",", "\[Nu]"}],
+ "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1789420924],
Cell[BoxData[
@@ -228,7 +350,7 @@ Cell[BoxData[
FormBox[
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
@@ -245,73 +367,87 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{65, 17},
+ ImageSize->{94, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[3]=",
- CellID->147339604]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1481569664],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{108, 19},
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{218, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[4]=",
- CellID->1627969090]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"GA", "[",
- RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "By default ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " is moved to the right."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->2005079104],
Cell[BoxData[
@@ -339,31 +475,19 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ ImageSize->{73, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[5]=",
- CellID->2004576322]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell[TextData[{
- "By default ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]",
- RowBox[{"5", " "}]], TraditionalForm]]],
- "is moved to the right."
-}], "Text",
- CellTags->"DiracOrder",
- CellID->2082752140],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t3", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[6]:=",
+ CellLabel->"In[2]:=",
CellID->1342940029],
Cell[BoxData[
@@ -385,22 +509,20 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ ImageSize->{73, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[6]=",
- CellID->1359695729]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"GA", "[",
- RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[7]:=",
+ CellLabel->"In[3]:=",
CellID->71636230],
Cell[BoxData[
@@ -426,20 +548,19 @@ Cell[BoxData[
FormBox["7",
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ ImageSize->{73, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[7]=",
- CellID->729653201]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t4", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[8]:=",
+ CellLabel->"In[4]:=",
CellID->332885129],
Cell[BoxData[
@@ -455,22 +576,32 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["7",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 18},
+ ImageSize->{49, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[8]=",
- CellID->534859922]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t5", "=",
- RowBox[{"GA", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]"}], "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ Cell[BoxData["orderlist"], "InlineFormula"],
+ " comes into play when we need an ordering that is not lexicographic"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]"}], "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[9]:=",
+ CellLabel->"In[1]:=",
CellID->1751727580],
Cell[BoxData[
@@ -500,38 +631,57 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{72, 19},
+ ImageSize->{75, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracOrder",
- CellLabel->"Out[9]=",
- CellID->70359997]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell[TextData[{
- "This orders the ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Alpha]"],
- SuperscriptBox["\[Gamma]", "\[Beta]"],
- SuperscriptBox["\[Gamma]", "\[Delta]"]}], TraditionalForm]]],
- " in reverse order."
-}], "Text",
- CellTags->"DiracOrder",
- CellID->238119482],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{75, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracOrder", "[",
- RowBox[{"t5", ",",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"\[Delta]", ",", "\[Beta]", ",", "\[Alpha]"}], "}"}]}],
"]"}]], "Input",
- CellTags->"DiracOrder",
- CellLabel->"In[10]:=",
- CellID->203704442],
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
@@ -563,23 +713,17 @@ Cell[BoxData[
FormBox["\[Delta]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"2", " ",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -587,23 +731,17 @@ Cell[BoxData[
FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"2", " ",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -611,76 +749,123 @@ Cell[BoxData[
FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{331, 19},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{341, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracOrder",
- CellLabel->"Out[10]=",
- CellID->586951928]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
- CellTags->"DiracOrder",
- CellLabel->"In[11]:=",
- CellID->1795976011],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Reordering of Dirac matrices in long chains is expensive, so that ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " does not do it by default."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[NoBreak]", "\[Nu]"}], "]"}], "+",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{72, 19},
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{106, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracOrder",
- CellLabel->"Out[11]=",
- CellID->291364117]
+ CellLabel->"Out[1]="]
}, Open ]],
+Cell[TextData[{
+ "However, if you know that it can lead to simpler expressions, you can \
+activate the reordering via the option ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3", ",", "t4", ",", "t5"}], "]"}],
- ";"}]], "Input",
- CellTags->"DiracOrder",
- CellLabel->"In[12]:=",
- CellID->1260437833]
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[NoBreak]", "\[Nu]"}], "]"}], "+",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{47, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -715,9 +900,7 @@ Cell[TextData[{
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracOrder",
- CellID->2147102830]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -734,22 +917,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 56.150864}",
+ "built" -> "{2020, 1, 5, 18, 54, 35.739581}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracOrder[expr] orders the Dirac matrices in expr alphabetically. \
-DiracOrder[expr,orderlist] orders the Dirac matrices in expr according to \
-orderlist.", "synonyms" -> {}, "title" -> "DiracOrder", "titlemodifier" -> "",
- "windowtitle" -> "DiracOrder", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracOrder"}, "SearchTextTranslated" -> ""},
+ "DiracOrder[exp] orders the Dirac matrices in exp lexicographically. \
+DiracOrder[exp, orderlist] orders the Dirac matrices in exp according to \
+orderlist.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracOrder",
+ "titlemodifier" -> "", "windowtitle" -> "DiracOrder", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DiracOrder"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -757,8 +940,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -767,225 +951,195 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3404, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6954, 214, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1030512411]},
+ CellID->981129014]},
"DiracOrder"->{
- Cell[4038, 125, 195, 6, 27, "Input",
+ Cell[7586, 243, 179, 6, 27, "Input",
CellTags->"DiracOrder",
CellID->1559113060],
- Cell[4236, 133, 590, 24, 40, "Output",
- CellTags->"DiracOrder",
- CellID->1026687398],
- Cell[4863, 162, 133, 4, 27, "Input",
+ Cell[7768, 251, 569, 23, 39, "Output",
+ CellTags->"DiracOrder"],
+ Cell[8374, 279, 132, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->1074180519],
- Cell[4999, 168, 960, 39, 40, "Output",
- CellTags->"DiracOrder",
- CellID->1702463614],
- Cell[5974, 210, 114, 2, 32, "Text",
- CellTags->"DiracOrder",
- CellID->1050749108],
- Cell[6113, 216, 195, 6, 27, "Input",
+ Cell[8509, 285, 800, 32, 39, "Output",
+ CellTags->"DiracOrder"],
+ Cell[9725, 338, 188, 6, 27, "Input",
CellTags->"DiracOrder",
CellID->1789420924],
- Cell[6311, 224, 691, 29, 38, "Output",
- CellTags->"DiracOrder",
- CellID->147339604],
- Cell[7039, 258, 133, 4, 27, "Input",
+ Cell[9916, 346, 831, 35, 37, "Output",
+ CellTags->"DiracOrder"],
+ Cell[10784, 386, 132, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->1481569664],
- Cell[7175, 264, 960, 39, 40, "Output",
- CellTags->"DiracOrder",
- CellID->1627969090],
- Cell[8172, 308, 190, 6, 27, "Input",
+ Cell[10919, 392, 861, 34, 37, "Output",
+ CellTags->"DiracOrder"],
+ Cell[12102, 445, 165, 5, 27, "Input",
CellTags->"DiracOrder",
CellID->2005079104],
- Cell[8365, 316, 726, 30, 39, "Output",
- CellTags->"DiracOrder",
- CellID->2004576322],
- Cell[9106, 349, 217, 9, 33, "Text",
- CellTags->"DiracOrder",
- CellID->2082752140],
- Cell[9348, 362, 133, 4, 27, "Input",
+ Cell[12270, 452, 705, 29, 40, "Output",
+ CellTags->"DiracOrder"],
+ Cell[13012, 486, 132, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->1342940029],
- Cell[9484, 368, 608, 24, 39, "Output",
- CellTags->"DiracOrder",
- CellID->1359695729],
- Cell[10129, 397, 184, 6, 27, "Input",
+ Cell[13147, 492, 587, 23, 40, "Output",
+ CellTags->"DiracOrder"],
+ Cell[13771, 520, 159, 5, 27, "Input",
CellTags->"DiracOrder",
CellID->71636230],
- Cell[10316, 405, 681, 28, 39, "Output",
- CellTags->"DiracOrder",
- CellID->729653201],
- Cell[11034, 438, 132, 4, 27, "Input",
+ Cell[13933, 527, 661, 27, 39, "Output",
+ CellTags->"DiracOrder"],
+ Cell[14631, 559, 131, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->332885129],
- Cell[11169, 444, 462, 18, 39, "Output",
- CellTags->"DiracOrder",
- CellID->534859922],
- Cell[11668, 467, 202, 6, 27, "Input",
+ Cell[14765, 565, 442, 17, 39, "Output",
+ CellTags->"DiracOrder"],
+ Cell[15534, 599, 177, 5, 27, "Input",
CellTags->"DiracOrder",
CellID->1751727580],
- Cell[11873, 475, 776, 32, 40, "Output",
- CellTags->"DiracOrder",
- CellID->70359997],
- Cell[12664, 510, 308, 11, 35, "Text",
- CellTags->"DiracOrder",
- CellID->238119482],
- Cell[12997, 525, 238, 8, 27, "Input",
- CellTags->"DiracOrder",
- CellID->203704442],
- Cell[13238, 535, 2460, 100, 40, "Output",
- CellTags->"DiracOrder",
- CellID->586951928],
- Cell[15735, 640, 133, 4, 27, "Input",
- CellTags->"DiracOrder",
- CellID->1795976011],
- Cell[15871, 646, 658, 26, 40, "Output",
- CellTags->"DiracOrder",
- CellID->291364117],
- Cell[16544, 675, 208, 7, 27, "Input",
- CellTags->"DiracOrder",
- CellID->1260437833],
- Cell[17108, 704, 410, 15, 32, "Text",
- CellTags->"DiracOrder",
- CellID->2147102830]}
+ Cell[15714, 606, 757, 31, 39, "Output",
+ CellTags->"DiracOrder"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 19452, 768},
- {"DiracOrder", 19589, 772}
+ {"PrimaryExamplesSection", 24682, 952},
+ {"DiracOrder", 24819, 956}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3118, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 486, 14, 98, "Usage",
- CellID->982511436],
+Cell[3703, 99, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4015, 114, 788, 23, 148, "Usage",
+ CellID->2090318364],
Cell[CellGroupData[{
-Cell[3404, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4828, 141, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1168226821],
+Cell[5570, 167, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5604, 169, 508, 14, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[6137, 187, 94, 2, 70, "Input"],
+Cell[6234, 191, 659, 16, 74, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6954, 214, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1030512411],
+ CellID->981129014],
Cell[CellGroupData[{
-Cell[3817, 115, 196, 6, 25, "ExampleSection",
- CellID->1708575828],
+Cell[7366, 233, 195, 6, 26, "ExampleSection",
+ CellID->368538720],
Cell[CellGroupData[{
-Cell[4038, 125, 195, 6, 27, "Input",
+Cell[7586, 243, 179, 6, 27, "Input",
CellTags->"DiracOrder",
CellID->1559113060],
-Cell[4236, 133, 590, 24, 40, "Output",
- CellTags->"DiracOrder",
- CellID->1026687398]
+Cell[7768, 251, 569, 23, 39, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4863, 162, 133, 4, 27, "Input",
+Cell[8374, 279, 132, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->1074180519],
-Cell[4999, 168, 960, 39, 40, "Output",
- CellTags->"DiracOrder",
- CellID->1702463614]
+Cell[8509, 285, 800, 32, 39, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
-Cell[5974, 210, 114, 2, 32, "Text",
- CellTags->"DiracOrder",
- CellID->1050749108],
Cell[CellGroupData[{
-Cell[6113, 216, 195, 6, 27, "Input",
+Cell[9346, 322, 105, 2, 9, "ExampleDelimiter"],
+Cell[9454, 326, 246, 8, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[9725, 338, 188, 6, 27, "Input",
CellTags->"DiracOrder",
CellID->1789420924],
-Cell[6311, 224, 691, 29, 38, "Output",
- CellTags->"DiracOrder",
- CellID->147339604]
+Cell[9916, 346, 831, 35, 37, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7039, 258, 133, 4, 27, "Input",
+Cell[10784, 386, 132, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->1481569664],
-Cell[7175, 264, 960, 39, 40, "Output",
- CellTags->"DiracOrder",
- CellID->1627969090]
+Cell[10919, 392, 861, 34, 37, "Output",
+ CellTags->"DiracOrder"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[8172, 308, 190, 6, 27, "Input",
+Cell[11829, 432, 105, 2, 9, "ExampleDelimiter"],
+Cell[11937, 436, 140, 5, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[12102, 445, 165, 5, 27, "Input",
CellTags->"DiracOrder",
CellID->2005079104],
-Cell[8365, 316, 726, 30, 39, "Output",
- CellTags->"DiracOrder",
- CellID->2004576322]
+Cell[12270, 452, 705, 29, 40, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
-Cell[9106, 349, 217, 9, 33, "Text",
- CellTags->"DiracOrder",
- CellID->2082752140],
Cell[CellGroupData[{
-Cell[9348, 362, 133, 4, 27, "Input",
+Cell[13012, 486, 132, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->1342940029],
-Cell[9484, 368, 608, 24, 39, "Output",
- CellTags->"DiracOrder",
- CellID->1359695729]
+Cell[13147, 492, 587, 23, 40, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10129, 397, 184, 6, 27, "Input",
+Cell[13771, 520, 159, 5, 27, "Input",
CellTags->"DiracOrder",
CellID->71636230],
-Cell[10316, 405, 681, 28, 39, "Output",
- CellTags->"DiracOrder",
- CellID->729653201]
+Cell[13933, 527, 661, 27, 39, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11034, 438, 132, 4, 27, "Input",
+Cell[14631, 559, 131, 4, 27, "Input",
CellTags->"DiracOrder",
CellID->332885129],
-Cell[11169, 444, 462, 18, 39, "Output",
- CellTags->"DiracOrder",
- CellID->534859922]
+Cell[14765, 565, 442, 17, 39, "Output",
+ CellTags->"DiracOrder"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[11668, 467, 202, 6, 27, "Input",
+Cell[15256, 588, 105, 2, 9, "ExampleDelimiter"],
+Cell[15364, 592, 145, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[15534, 599, 177, 5, 27, "Input",
CellTags->"DiracOrder",
CellID->1751727580],
-Cell[11873, 475, 776, 32, 40, "Output",
- CellTags->"DiracOrder",
- CellID->70359997]
+Cell[15714, 606, 757, 31, 39, "Output",
+ CellTags->"DiracOrder"]
}, Open ]],
-Cell[12664, 510, 308, 11, 35, "Text",
- CellTags->"DiracOrder",
- CellID->238119482],
Cell[CellGroupData[{
-Cell[12997, 525, 238, 8, 27, "Input",
- CellTags->"DiracOrder",
- CellID->203704442],
-Cell[13238, 535, 2460, 100, 40, "Output",
- CellTags->"DiracOrder",
- CellID->586951928]
+Cell[16508, 642, 86, 2, 27, "Input"],
+Cell[16597, 646, 612, 24, 39, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15735, 640, 133, 4, 27, "Input",
- CellTags->"DiracOrder",
- CellID->1795976011],
-Cell[15871, 646, 658, 26, 40, "Output",
- CellTags->"DiracOrder",
- CellID->291364117]
+Cell[17246, 675, 276, 8, 27, "Input"],
+Cell[17525, 685, 1997, 80, 39, "Output"]
+}, Open ]]
}, Open ]],
-Cell[16544, 675, 208, 7, 27, "Input",
- CellTags->"DiracOrder",
- CellID->1260437833]
+Cell[CellGroupData[{
+Cell[19571, 771, 105, 2, 9, "ExampleDelimiter"],
+Cell[19679, 775, 262, 7, 48, "Notes"],
+Cell[CellGroupData[{
+Cell[19966, 786, 254, 7, 27, "Input"],
+Cell[20223, 795, 698, 28, 37, "Output"]
+}, Open ]],
+Cell[20936, 826, 272, 8, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[21233, 838, 324, 9, 27, "Input"],
+Cell[21560, 849, 398, 16, 37, "Output"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[16767, 685, 31, 0, 29, "SectionFooterSpacer"]
+Cell[21997, 870, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16835, 690, 270, 12, 31, "SeeAlsoSection",
+Cell[22065, 875, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[17108, 704, 410, 15, 32, "Text",
- CellTags->"DiracOrder",
- CellID->2147102830]
+Cell[22338, 889, 367, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[17533, 722, 23, 0, 42, "FooterCell"]
+Cell[22720, 905, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracReduce.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracReduce.nb
index 553b04f0c..ff7c2a9a0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracReduce.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracReduce.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 24827, 824]
-NotebookOptionsPosition[ 17631, 599]
-NotebookOutlinePosition[ 22302, 728]
-CellTagsIndexPosition[ 22152, 721]
+NotebookDataLength[ 40926, 1351]
+NotebookOptionsPosition[ 33999, 1135]
+NotebookOutlinePosition[ 37562, 1234]
+CellTagsIndexPosition[ 37409, 1227]
WindowTitle->DiracReduce
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracReduce\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracReduce"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Chisholm\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Chisholm"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"EpsChisholm\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/EpsChisholm"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracReduce\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracReduce"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracReduce.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$41455],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracReduce", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$67674],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracReduce", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,23 +98,35 @@ DiracReduce.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracReduce", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracReduce", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracReduce", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "reduces all four-dimensional Dirac matrices in exp to the standard \
-basis (S,P,V,A,T) using the Chisholm identity (see Chisholm). In the result \
-the basic Dirac structures are wrapped with a head DiracBasis. I.e., S \
-corresponds to DiracBasis[1], P : DiracBasis[DiracMatrix[5]], V: \
-DiracBasis[DiracMatrix[mu]], A: DiracBasis[DiracMatrix[mu, 5]], T: \
-DiracBasis[DiracSigma[DiracMatrix[mu, nu]]]. By default DiracBasis is \
-substituted to Identity. Notice that the result of DiracReduce is given in \
-the FeynCalcExternal-way, i.e.,evtl. you may have to use FeynCalcInternal on \
-the result."
+ " \[LineSeparator]reduces all ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " to the standard basis ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{"S", ",", "P", ",", "V", ",", "A", ",", "T"}], ")"}]],
+ "InlineFormula"],
+ " using the Chisholm identity. "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -100,66 +137,164 @@ the result."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1602023328],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "In the result the basic Dirac structures are wrapped with a head ",
+ ButtonBox["DiracBasis",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracBasis",
+ ButtonNote->"DiracBasis"],
+ ", that is"
+}], "Notes",
+ CellID->1067943069],
+
Cell[TextData[{
+ Cell[BoxData["S"], "InlineFormula"],
+ ": ",
Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1661189562],
+ RowBox[{"DiracBasis", "[", "1", "]"}]], "InlineFormula"]
+}], "SeeAlso"],
-Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData["P"], "InlineFormula"],
+ ": ",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"GA", "[", "5", "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1584869611],
+ Cell[BoxData["V"], "InlineFormula"],
+ ":",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ Cell[BoxData["A"], "InlineFormula"],
+ ":",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", " ", "5"}], "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ Cell[BoxData["T"], "InlineFormula"],
+ ":",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ "By default ",
+ ButtonBox["DiracBasis",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracBasis",
+ ButtonNote->"DiracBasis"],
+ " is substituted to ",
+ Cell[BoxData["Identity"], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "DiracReduce", "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[1]:=",
- CellID->646521382],
+ CellLabel->"In[189]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
+ RowBox[{"DiracSimplify", "\[Rule]", "False"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
RowBox[{"Factoring", "\[Rule]", "False"}], ",",
RowBox[{"FinalSubstitutions", "\[Rule]",
RowBox[{"{",
- RowBox[{"DiracBasis", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
+ RowBox[{"DiracBasis", "\[Rule]", "Identity"}], "}"}]}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{429, 15},
+ ImageSize->{494, 54},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracReduce",
- CellLabel->"Out[1]=",
- CellID->1909713385]
+ CellLabel->"Out[189]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(5)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1928237849],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(5)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->139398663],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->176343206],
Cell[BoxData[
@@ -181,387 +316,778 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracReduce",
- CellLabel->"Out[2]=",
- CellID->1169679224]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracReduce", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1863378816],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], "-",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Sigma]",
RowBox[{
- FormBox["\[Mu]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Nu]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{90, 17},
+ ImageSize->{93, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracReduce",
- CellLabel->"Out[3]=",
- CellID->1304770013]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[4]:=",
- CellID->1405125223],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ " only works with Dirac matrices in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ " dimensions, ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional objects are ignored."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{137, 15},
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{47, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracReduce",
- CellLabel->"Out[4]=",
- CellID->971985531]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracReduce", "[", "t2", "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[5]:=",
- CellID->1093135858],
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox[
- RowBox[{"$AL", "\[InvisibleApplication]",
- RowBox[{"(", "$102", ")"}]}],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm]}], " ",
+ SuperscriptBox["\[Gamma]",
FormBox[
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"$AL", "\[InvisibleApplication]",
- RowBox[{"(", "$102", ")"}]}],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}], "-",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{47, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]], "Input",
+ CellTags->"DiracReduce",
+ CellLabel->"In[1]:=",
+ CellID->1405125223],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "+",
- RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"v", "(",
FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{399, 20},
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{220, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracReduce",
- CellLabel->"Out[5]=",
- CellID->1278508135]
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
+ CellTags->"DiracReduce",
+ CellLabel->"In[2]:=",
+ CellID->1093135858],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQdUFNceh01ezit5eYk+44t5VhQVBDWoiQKiYMGGomKiInqUh13R2FCx
+g2JEBVuMgEQN9obBAgaxG0ApUlWagBTpbGH77JvdRd3dqezOLC77/85Jjt7Z
+e3fvzG/vzOxc72fmuXzK/I9btWq16u/o/6bM9XFauXLuerfW6F++9161aIH3
+PK+x3qvnLZi3crDnX9DCyeh/xz5q1UrxZzkAAABgIOrTdv5RLjWWZgF9aHnH
+WsKrFSHN8s7Ah4qkLNJ3tf+OaVt/Dt68N/lNXmygXZs29seKJI3bpeWXxnz5
+abel55PSY3bYtPnaNeRxpViOCEvi9oy0WRiRXN8YZYSfF30jqU6K12wqR1qX
+sHe+i72l2TfuhzP5jRkUF5+c4bjzuVDxLjWJ12MKGiCcrNKyjrW4MHSMVffu
+5r2GrE3m6tsY8EEgY2gEkBQedRoTlZu8NaaMX34vh4vwM3ydrNtZrktrUG4X
+FYRP9+jy9dBb1XI598nsHv2D80WqmsKXR5Yn1jU2I31zfc36ezUygmYr8yPC
+k+plaGuhQ7uPj6uVK74aL87s2WE/aLsy6miHqmLX+ERXwLUde7SsY81N3rbw
+dHodBMbIkRQdd/N8gIaLl+I9dPbjevVt4or7u8fab8kSyBsyfIZOiq7SHvVk
+nPRzoedv3YrYMtc/vl5ta0PGNjuLUfPcL7xWnbP5mYE+Z360Nvv+VjUaXH56
+oM/FE3adcaIuyg1b9bQx6oKsbc4rknlyomYRaYNU+Z78FG97r0SuXFabEH4q
+q+TuRPu3UUebT1w00v+5gKG9BWBpScdaWBC62NXWrK3ZmK13q2FsM1qQqptu
+486USuXCF/6DR14ol2ltr7vv4XwoX1Ae5bk9kaM1qslqbi+ZcCgPDanwub+j
++2OOxkZOSujcHv+xnLb/KXqSRaO+Len5iWGd7UIKRdX3N+xLL4waQhF1SfEx
+J8wn0mxWBT9997yQPKG49GbYtdci9COrR136+uTw4adKIKIs0tKOtaQidt1A
+S68ncBPa/Ahzg6b9sDeniecq3tPFzgEvhHJpyW+OgwNeCrW3C7J3umyOf3Ly
+eJr2oCaXvbk8ziEwR5FRfurKkRvSG7ReUJ+2/eyZ9YOsFyfx+Fl7tqdxau94
+dLP48capteeLRZXXGqPOS5pnYbMn9+2NSU6Ib4pqfBTlBtqPjq7GfGS1ZtG/
+IdyM02H3q9BxOWff1AkTXV1dxzt83dZyjFfYK2WTsorIUQ4HC8T43ReVxP12
+OYvX9HtvnSs2H7L6lIunH1VKyEp0xgiOdVOQvbky2hl7klfDlJJDE1YChjZx
++XJKHcmRwAG9RrMddaMKEeUddeo9K4GDqS3I3ObkselUrvaQhcJ5PK2HbYTi
+3Mh75udx+G1YFTQUnIktkygeYxW9DHKcHFvDzwjYnMpFB8mt1m2tPGKrZUhl
+lL0q6pLicLueP8TVKI+zrDJu4ylVRuWy8ovOw4+/lpI0iwgKYy7de4PmWMYr
+zOGoXlr/cKqD37szuLjwF6exUZV4KZKUX10xOzQPM5RTonPF5qYhM9hjfaz6
+3RW2pMltGsWxpgkiFim/AuKCkGk7MwkvEUwvOTRhI2CE+GhSVlbWuEFaesbJ
+YthwjxXbAoNcB7juuYp5lMR5smRhRBHe+U+QvaVPh0EuW078Hnnq+J1yjZeI
+Sy/7+uw7um/m5uDdW37NqMyN8bP7zvd6Ll9UcsFrRxpfynl2YZHZF929r2Tz
+ZAgv44jX+B+WbPALCPDfGf7s3WWhKP+Qy3z1X/s0m82qKz49q1e3XlYova0d
+NmY0Dr2aUa+7P3diyCucDsiqbnoMXpLAwW6hgEZFH2Le7/zmAKmJ8xi06JHa
+z6DYEiykHTGGY023L/y01ba9Ryzdf/xEeGQOn2iXsJkcSj7YaKnQLWDSN1EL
+liVq7xdx5YNjC50dJv+0JwTvskpamxi6ysPdy3v1hh1hKfXvr8iQquipIw7r
+dtEuKQxxGLxH/RINg96TjpD6xD2+17WbaEqzkrKrG4KSMffPcuWIPsxixp/a
+uxLhvYx7WiOVI/zMoEm9u/Ya4OKfwkVoVNRsvDb++JqpTiPX7du+ZLzVv9v2
+8bxUxsStnuojNuRH73J3HDo/9OSRLXPtOli4X3gYFR64aqp1hwFrUnkUlWv+
+GG/hElONkJRoIsg/vXRolzadx+zNUmQL4T4L9g3N076Q+aCP9Tvo9YUCVpND
+/e5sRkuuZ7rkugRMrvxRdJSL8vG2JnX3JpsPCo48koXdZ4LsgCEWMy+VYAcv
+xahmuxbzkxgtxAUHbb9Zm6FT3aYgqUmOS67V8fsiqXl6O5WgMjdhunn/A/ma
+e0VWfXeTfzJHcbd0YsLEg5l8WX3C5oAMPmVFbZDqmDH/NV8RWylF77WuTWjX
+etDZMswNPsJ/lVKky0yrhgwfi44uZwrRc0r1LaevunhFlUvQaBz/tpPjzSqE
+vFlB9qa+VivTGshK1BAWXQh7WCmqT9jYz3zGY45cUhLh4rgzm5Uny6wd60YY
+6gu7yaGEVrT0gSxdFbU4swc1aWLAlBAMa7yn8y1sNkceSKrBvBM/ZbHZvzoM
+nzINZbpXQDZf+wUmSu1dp07f/qb51Eycf3i8VzxHMWgfdduYothVgtzw8FwB
+VUUMdQ+mmfXelKWsyEteYNZx8r06jRcgwtKEY+ipKKyo6adaUc7uvp1dbilO
+f7zkRT16LFJMjEDPiRO72gQ9L6RoVpS3z8bcPYFLVqKOTKz8zkiKw4fa7c+r
+il87dkMC6RXRBwwzfWEpOZLSC56jh2kxbumjOq0PSBkttJ94U5fpQpKu4Owc
+zOxBbH36AXvfZVuLNm372Wt1GR1frawWXz50D2cuYt195/bdlqXCaKYF5/GU
+bgN+1vwhpjZu3LeKK1BJ4a9ua1N4yjujoJ0pHMqK2nATPbv3WqE6Pwmyt/bp
+6fVQO53Ko207RIdhTfzqcP9OI69WyBQHfq1Ft9mKr5Mi7d36+L8QUjUrfL69
+r+VS9TxgS3C7lDBn2KrzfjOw83yMD/36wmpyqD87dbQEBdSDDyGk6RJozx7E
+QZeA4V6tiXIDbSw8zh+JePowNkP7YabwZUCfdjZBOS324YuOiPL2DrDSGu65
+Tzx7WC46Ff9n2DjXiD/jow4td5t/vkRCXVELfqp3z25zlUddUnLW3WFZdBXO
+KZp8/BGVJ9yMe8nD3l5Iin8d1NHhbJlUmRfrrlPu1iKKb+pcc8t1mQ2UoyUn
+fkYv+9OlUpISae2Ti1dStGba81OXW/UesSutqSf/Zoapvqi1w2ZyKKETLczU
+ZSw6p6vxU6hmD+J+QhoBw4A7rAmeb3ewnjLHzftYOhf7QRFu2s+ejnau89du
+3uoXFFXGwKyeFoHw5Y7B9r8UauwOadXt7a69v/zbxx//7YvOA902XcoXYJOP
+V1EDQZZv7/bfzVy5I/hA4LYNB+5U4A8xpOMPejYa+Pk/eq7TmmQgrnh6zrvn
+5x3dz2XXFD0Km9nxsy5eV3KrXtza69yutc2+RzUSimFN+GLH4BEaW7EldQ9n
+9eo1677mRQD/2bpJgZms/5bKNEz1Rb0d9pJDCc1oqSAefHRPl1xt9iAudAKG
+geiRAdB0ZLX3fSb/hH3qwUtZOeEw2Q+7RBUbEeXs6tt1yp1aqksBqptQaenv
+Pmdx59bo3CzCSfSd4pes9oAOW4KLpOz8nMnnWsa/1dC/L2wlhxK60ZJTDT46
+pwt39qDaZl0DBjCIsCgqOERrzp0ga+vIpUkUT7LxKjYiLjjUv/PoG5h/P4uB
+fFiTVNy5cLuUbP5Mk5sVFt04tP+W+uU6tgQXWeW1aeYD9X6G90HAUF/YSA4l
+tKNFMfjonC7xa9zZg2/ROWAA0yCiqmq1dbWQ+scL+jlfozFTXauiqkxQ/CD8
+f2aftXc9+qBUSNqGuDr11NSuPRdfza5n8hqIpFmZ4I3WCmLYElyQ6pixfdzO
+Mzo9qrlgsC+MJoe6UhOiRT74sIbOAQMAAAAAAAAAAAAAAAAAAAAAAAAAAAD0
+hCljCwAAQPOhl7EFYBBC/Q0AAE1CH2MLwCCk+hsAAJqAHsaWRkxJXcGe9IRS
+f/MeU9rhNGFVRgMYHfoYWxSYnrqCJScFif5GA9Pb4TQxqCsEaC5omR30MbbI
+QXpCWIILWV/I9DdqgCuEGJ2PC2BkiIqvBwWGRhxe0PPTv37lvNTvZIHmckv6
+GFvkID0hKdGEUhRCQ3+jAFwhpPV1cYUARgbCSVzz3bCQQrFc+Hyr5Vd25zBe
+B32MLQpAekJcoga1KISu/gZcIYy7QgDjAg3emE79lFcA3CeeVg66qEEoAOkJ
+cYk6jElPwBXCvCuEvMvAB4ak6NjA9gPQ76asMnrR1IAUFlarBOkJcQlul/SV
+noArhHFXCGBcyLgZZ9cvXn3w3NXIuDx2NBsgPSEsYVB6Aq4QNl0hgDEhq4qe
+Y9mp7T8/+Qjlk9b9VyUT3CDpBUhPiEoYlJ6AK4RNVwhgPIjLbu7yu1SoihUi
+qXkSvC6eFcsLSE9wS3BhRHoCrhBwhZgo0vJLo81HRlaorvNl3JzYq3+UsDYN
+E6QnBpaegCsEXCGmCMJLD5xk2b7TN87TF6z7KeRyUjXLV+EgPaFsk1npCbhC
+tABXCAAAAAAAAAAAAAAAAAAAAAAAAEAOuAwAADB+yFwGKmCNfQMA2ggAYAwq
+lwGssW8wQBsBAMxA5TKgtca+Ka2uz96y+dTaCBWmtLdpAi4DQB1KlwH1Gvum
+t7o+S8vmU2gjVJje3qYJuAxMAmZcBpRr7IPOgKAEF9K+kGojVIDLgBjdDor0
+TdSCZYnwy4oxobfLgHKNfdAZEJZoQqkzoAO4DEjr6+IykL4+OcqlietdAs0I
+Ay4D6jX2QWdAXKIGtc6AFuAyYNxlAMOacWEAl4EcdAZkJeowozMAlwHzLgNb
+izZt+9mDy8BIMIDLQA46A7IS3C7ppTMAlwHjLgO4WjMuDOAykIPOgKSEKZ0B
+uAzYdBnAsGZMGMZlIAedAXEJUzoDcBmw6TKAYc14MJjLQA46A4ISXPTXGYDL
+AFwGJophXQZy0BkYVmcALgNwGZgiBncZyEFnYFidAbgMtACXAQAAAAAAAAAA
+AAAAAAAAAAAAAAB8+IBRAgB0hnL9fLAYGApqowQAADQhWz8fLAYGg9IoAQAA
+bUjWzweLgRYsLphPZZTQwJT2OU3AZQCoQ7J+PlgMsLC0YD6lUeI9prfPaQIu
+A5OA3srzxOvng8UAD1YsBpRGiXeAy4AYnQ8NYGRQuQxIAIsBQWXmLQaURol3
+gMuAtL4uLgPAyKB2GZAAFgODWQwojRLvAZcB4y4DwLhg22UAFgPiEnWYsRio
+AJcBUy4DwEhh22UAFgPiEtwu6WUxUAEuA8ZdBoBxwbbLACwGhCVMWQwwrYHL
+gHGXAWBMGMBlABYDohKmLAbY1sBlwLTLADAeDOMyAIsBbgku+lsMVIDLAFwG
+JooBXQZgMTCkxeDte4LLAFwGpodhXQZgMaBsk0GLQWOD4DLQBFwGAAAAAAAA
+AMAi/wc6p+KR
+ "], {{0, 81}, {413, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{413, 81},
+ PlotRange->{{0, 413}, {0, 81}}]], "Output",
+ ImageSize->{417, 81},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->{"DiracReduce", "RasterizedOutput"},
+ CellLabel->"Out[2]=",
+ CellID->1093575305]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
- "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[6]:=",
+ CellLabel->"In[1]:=",
CellID->1144474685],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{156, 15},
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{100, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracReduce",
- CellLabel->"Out[6]=",
- CellID->2001677937]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"DiracReduce", "[", "t3", "]"}]}]], "Input",
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[7]:=",
+ CellLabel->"In[2]:=",
CellID->654035869],
Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
-1:eJztnQtUFNcZx4lNjeZoTTg2J6AYw5sA8lpYHlYKPjBBaZBHAFOLYklqMFpC
-aghYlFhFsSKJR2tJosYm1UaRKLY+EkOwCXIERXyEgFBBEAQXWGCBhd2luy6P
-ZYGZnZ2Zb+7s3t85eJazzO7//u/37czemfH/4poNK+InmZiYvDNF+c+K1ZsC
-EhNXJ4c9qfwlMDnp92t+pnzgoPypeMLERPV4AIPBYDCGjfTuHqGDq5dQKPQN
-Ti3v4lrOuMh7HlUVX3nUx7UO3eCXWgCwIRzCL/P5pZZJum9lrC9q1397RevF
-ZYK3b0gGH21UPRp8piV/oWtCmer3njtbfZceut8/elO5+OqeaKHTS1ZzPVZ/
-VivVemFp/b8/iA7wFnq62swwdYvLyL3fq79KBgBVS8NVGEhlgBmihnh2YKBZ
-8FTeicQNtHoHUC3cFDBN5420bWfzvziYc7ywvldBffvu2+8JFn/VLFcNPMVr
-yenmkdeQlK13CzovUsibz7zm805J5+gNFW3fxrksPVDRreit+tDLYW3pqGNx
-SflmH5+UApFsYKDt0uJ5Ws/Cw6RakwkoLy8f+hO9XQWDWAakIQNkswMGnYIf
-gbYbqPUOk2rJzGFmCliCaE67qw7sP18peng1K8AhMu+hjOJLy5tOBAqSb/eo
-dkVnlnil3OkZeU7WcNTfZ/ddccV2/5DPG7R2TArR+RCPdSWPjegsjnEO+a9Y
-49n2wijX6G/bVBMmazzmL0jVfF0OYFRt9QRIpUP7Z71dhYNQBqghZLMDB42C
-14CuG6j1DqNqycxhZgr0pv9R4cdZmZl7j5S2y3URPzKnQyjd8rNZ8UMHxTfu
-Ko13ffmCSGlj17V17sEXWzX3dZ3FqzxX/efL1xe8XybR3lBSluASkN+i+nNp
-9R5v3w9rNBaFeivSPf0+rlPZqGgriHIJv9Smx6H6aIgtIgFYrd6uUoSOJwQy
-gA0hnh2qsOQJkyIJ3UCud2DVAk3BBIiL4gQ2Vjaea69Q/ISX/Hhg+1cPlHL6
-7u33dt9MddfZX5fjaR2p/PTub8x9zdJlR+WolZ2+mmxv22WCiBONYw6zZfWH
-Bc85Z1b2KqS1x1e5R+Y2af6JtGavh31cYbtCLi5K93VPKumkXUr6WwSvVm9X
-qULHEwIZwIYQzw5VWPKEQZHEbqDWO8BqYaaAcfoenPhj6MpNWQezkt7cdbmV
-qjDx95FWdr/yCwwKiY5f7hJxWeuEX/t3wRYvbb7ZPXbDjqIYB48QP0fHeW4+
-MbuL2rR2s7KWC+8G2Nk6urgFvvVZZTf9SqKGrKe1tuRcfo1EAaFW3tvZP2ob
-vV1lE21PiGTAGkIyOyxCwRP9RVItD8R6h121Y8xhZQp0pL/hWLjA0dFt6c7K
-scezrV8vMbNJGtQlbzkbaemSRrWHZaLCzGiBhekMFc/MeeVMs3oM0qoM4Xz1
-twpqSKt2eS84Ug+3PyK0SImsrfTTxFChtflzM2eaTn1yyqzFa1JzSsVDw2RO
-bX9L4b71MW/8KS09PXXjquDlEb8JCorNbdS0UG9XR6MQX8ve9rfqib/h0PKE
-MWgbwmgtseWJriLhykN3aPYOc2p1MIcAKnVC2jvj0l74qs38j/4eFnHu0dj9
-Sc+dVHuzRRdbVY8lZclO1rHftFJrpd7qvb+2Ctp1uUl7NUUhOv+K+7rr1Fcp
-FaILwe4JtJc3KUBokby14G0nM2HSyTvtsscnde2eD7jUxobavtqDgbYhn9ep
-nZQ9+KfQIqBA6whBb1e1kD34QjgnUPvVNaDjCVPQN4TZWmLJEx1FQpaH7tDr
-HcbU6mIOAZTqhLR3xkM5eBe31Lw/h+27O84FcYqWs/7mzruVT/XVfRJouYjy
-BafiH35n7by1gturd2lCaFFPxRYnM/9Ph3zpvvWujfnL2t+fmKGjKNzG91ij
-ej8oazwZZumx7SeWnCWrJSQ8gTREBzj2BDE31CBRJwPc905HcfScp5/SZLp9
-ksbKgrzx+HzbsNxD4W9dHfdi0u7yRNu5UcXi1kurbV3TblFdVpRcXzd3ylPT
-Hy9JzHjWMvw75g+KaEBmjhpCi3p/2uZo5p83uNQyIG8+HWju+JdKVmZY0XXz
-r8vsfULfeG/rlk1rI2LT81i4wn7Yk59PemLSZLQ9ATFkgC91AuWGGn54MgzX
-vaPoba679z9N7tWL+ka+IXQWr7Tz2X8qPuJU07jrDfKmk76zvHK+2ephR3lJ
-Qvnuzaf9Zgk4umuLHDJz1BBa1FkcNXtWxJXBK/b6G44GmDtuqWDnmsueyh2L
-vNPLJKyePBn0pLo429Xc91g50p6AGDLAlzqBckMNPzwZBqHeGQ9p1U5354RT
-GWEZP04wfsn1N61mOljPWXxYn0/TtoLl5hYr8xp4fM83sUXS6izXZ2b/9kSt
-VNHXVJixZLZd/AURS+fc++oORVhMnWo2b2HMxowjX1d2snhun3hdAhFPIA0h
-hXNPkHJDDeeeDINO74yHoiU/wHTyL0xfCJ/w5hBZw1Gv6U87baG8JKF+A8nt
-7DAH0ylTp6mulTBf8AngmVpmILNI0Xlj3+se5tOnPfvLF4VRH5ytZ+u28/6H
-57YnpGR/eeZfOZkpfwj3en6aedDu8i6WdvByUUFi7Ps3x791Ew1PYA0hg2tP
-0HJDDdeeDINQ7+hLV+kGyxkOPD/TZgB0lcQ6+P6jYfjCGbn4SorDC6GU72E0
-GLAhmmA3CDAAc1Qn2iZP84C84hAzHpIbG+ztNxaJh/bhcvH3yb6hh+/zeMWH
-HtgQTbAbBBiAOT0VWz3nLvyoBqH/5M1IkXdc2xcf/GpcUlrm3uyszJ07sk/X
-gN/vhBLYEE2wGwRgczAYDAaDwWAwGAwGg8FgMBgMBoPBYDAYjBFhvOGtE4Og
-JwhKMiSM1l5jHThIJC50zi9NoHKTkYuuNtqMXaPtAqMtddRgJhKXXqAqj6Jm
-dc1N1iF+Fzq6GjgRGJ2MXdoD52sX0Bs4j0udfzAUiUsrUJVPUbO65iaTx++C
-R1cDJwKjk7FLd+C87QJ6A+dxqXMCe7GqDEadgub8sukJY7nJ4NHV5BhTxu4o
-DLQLyDHaUmcB9mJVGYw6hcz5HWDTE6Zyk+Gjq0kx2oxdQ+0CUoy21LmGWqwq
-g2mzLOb80oVi1Kx+ucljDOE+uho4ERidjF2wYGjUugAmIhzBUgeAxVhVBtNm
-YeE6alan+F1mo6vJomaBE4HhMnYZUMLPLkBjxjkodTRhL1aVwbRZYLiNmtUt
-fpfh6GriKAHgRGDIjF36SnjaBSjMOCeljiTcx6qilzZrjPG7xF0JLAmdkgBT
-Aj9kFGYcnYnmGARiVQHTZvkRNctR/C5RTDOsJOCMXaJiABs4F13A/YwD1xW6
-IBCrCpg2y4+oWU7id4mjZmElgWbsEhcD2MDhuwCFGQeuK2RBIVYVtbRZzj3h
-xBCS1UJYSeiUBJgS+CGjMOPoTDSnIBCrilzaLNeecGQIUdQssCR0SgJMCRdD
-5n7G0Zloo8cAAlWZBUFDgCWh4wCYEnSGDKkHtVEbMwYQqMosCBoCLAkdB8CU
-oDNkSD2ojdqowYGqWiBoCLAkdBwAU4LOkCH1oDZqDAaDwRga/wfEvWkq
- "], {{0, 41}, {
- 472, 0}}, {0, 255},
+1:eJztnQtQVGUUx+kx1dQ0UzmNzjhWJipKppaTroqoECJDo0CFFhUyKkqGDRCi
+lY8wyFCx0hxZMVLUwCRMS0t7+IgULBBQNECSRFAQl11g33vbhQZyl3v3Pr57
+9ls4vxkd8bp7z/1937nPdf+Do5aGLrzTw8Mj/j7rb6Hzlk2Li5u3POwh6w8v
+xcYvjo5dMH9mbMKC6AVxE6Lusv7lMOuv6js8PGx/ZhAEQZC+i7H1lt7i6iIQ
+BEH6PIYrykDvIUM8h09O/FPj6mIQBEH6PJo/1yzaU6YykXgvM55sywBadQSd
+OOJeTtyrWmh0NcqYWYrB/QYHrv71poh9s7E2KyzqpIphWotjp7xe0PL/ZYYb
+Jz6eOWnVBS3TXr5syuwjTfYjYVaX5Shzf/wxe9W8tadb/r/Uov37hx27D36f
+lfDMI488MWz48FH+KZe0wssjBmypkqzCwFkGtJNO2McIDglzXgTcTmhrItBq
+YQdCHow3jiWNGzG/SPBNDEvT4bCgvddMjO7S2gn++xrMdstVJyICNl/WNhyM
++qBQbbfp5uaf3nxhc7Xeemy4uHbqKwXq7ndVnYwP2Vylt41kpl/wYRfteboB
+LlWKVUDYynCJE44xAkbcnBcDpxPqmgi8WriBYENXlR7+8oZK8QcX8/VvZgT0
+MNmd0Ho2JiD1ko4x1e2aOiH1L539cm1FSvDK00U7s0oddh/m63lBPmmVVjFM
+W0mc/4qy9q5FzT+FTlp5wbYx+soN/m/8TsSZBEXQpUqwKhgJWtjKcIkTjjES
+gwxayBfJ6YS2JoKvFm4g2DC3FOflFauE7lWtRymDvuNFhpqM8JTzQnVbj3uK
+579vsuirt00b+doZtcP6tefXTIt4f3dVD1utLggfqsiuM1nH61xyxBbbgfI/
+zA37pivW2ZzpqrbOXU3oQaRoReClSrEqGAlaWMpwjRP2MRIFeS3ki+R0Ql0T
+wVcLNhBiWNYT9fX1HQvbShMUI/2WfJL15Y78yjaWUy+W1zKM6dreaV6+0yPe
+XpOWPuvZWesP1LTbvYW66M1F2bWGHt5UW7Fq1MDxwau+/DZ/d9YvDbf9E+O1
+rxeHJGUd+jZ7x9GrDudF4JArtcexIGn1dkzXD0a/VSjb1TxbGa5wwjVGwIib
+87dBwgllTUS0Wl5+SAwEI7qJDI0nMxcF+ISsW5/heFzQXt6zZMrjDz8WuOGC
+bZlFc27Tu8pqYSfFpluFyviIV+bHJqz4cHtxS/dRztJ05EW/LTWiWsB4JcNn
+wnqgoxSnIsZ2979k17r0bV9kbYx++kHbf/2xce+QuNJ2GUrV//Ndepoye0v0
+sPvv6R+wJHlnze3DIcWqHaarO58P/vkW22JpWkgi2QnJMZJNi7AiAecJL6Rp
+IV+tMz8cCBoIJ03Ejup4iOf4TflbL9jv0nW1+7afatS3nHlvtOfcAjVjrMsO
+nppSIWivrK1Inez16v46R6E204pEcXdlDDWfKcYklstzR6cHWBVZN6O1JCUo
+JPOy7RBtaT4aOHTGoQaD0Wg0mSzkS7WoC995zjfjioHRXVw9ov/EnHr760Ep
+Vu1xOqMkaCEHASeEp5M8WoQUCTtPeCJBC+lqnfvhQNhs6bGJjNf2Rc3wtSNo
+yW+q7lnQenah19iV+Z/+0ewwM8yGjmqN/+yYMvGT6qbTiTNXnBH2lKitOGbw
+gwOnh4ZbmTM/taJNyIvlhoecTjgUGa/u9B3+0nFV50/qgtChk78W/OSTL+bG
+Q4GDRnccpzVFUd4+22uNMqylW4vC6+F+oyfRrQXGCeNWswXMCeNWWroA8MO7
+iVhoL1/m7R2Tt/n4DfaPHWvORPrG5ybPFf55KtWJgAFPvlVC1d5YMFyKWn57
+4fHRG6s7L2j0lR+PV8h4a8VYmzluwLPWSWRuPLL4xdRijbwfWnJytkyHFmAn
+zqFAC3VOGCq0dAHpR9xNDH1V2liviNyt2WdPHSt3fEDdSVvJUu+Rfh+Vsj3U
+Y0f3V+qoR8emV7r+mYF4OBVpCiOe9Hqn44rGfPPY0qDlp0Q9Z+aHWVP+1fKY
+hM9yDuT/XC18MITCPaMo0QLsxCk0aKHNCUOHli4g/YjbLWsvfuDzVGhkWGxm
+mYZVRdu5pNlp50Xd2bFoSj+Pmjpx1sLElauT0w/Wu/IZt0i4FWmrlJF+c5K/
+yNmj3KQ82Sjf1SJjbjoSOWJQvwfuvsPK3Q89Ey/3d5BwzygqtIA7cYrrtdDn
+hKFBSxewfkQ/8nOGsT43MiSnjsjXXiBiMdQf/ih5/5XOyw6LsbloU9JpGQbb
+rUAnjqATbnqJH3PjoXDPcZ9edsPT3F6EqWH/DE///BudJxpmTeWxA0fr3PnO
+EAHQiSPohJve4sdy84eZo8Jy6+W9rkCcYGktS5s9YsCgMQFzopPWZeT9cRMH
+BJ04gk64QT8IgiAIgiAIgiAIgiAIgiAIwgNMcukR1IIG0AAaAAQuiwc8ZkgK
+oLFNVIZnYcQPtgZ2gYuAzeIBjRmSAmRsE53hWX0w4scObA3sAinIluTCkE5X
+AY0ZklMLwdgm6EQqnvTBiB87enFr8AS7QApyJbnYIJuuAhkzJKsWgrFN0OFZ
+/MCIn97cGvzALnAR5LJ4pMW4uFfADcMztomXE6LhWXwCbuADiSAjfvhAwgC9
+rQE1BzhqFr4uN4qQ44PMSS5kY27goCfgxpkTsolUfL/tCj6QCCrih1Q97tsa
+NM4B2C6gATmTXMjG3IBCRcCNcyeE0454tSR8IBFgxA+hety4NaibA+BdQAG0
+JLlAxyG5Q8CNC+KQeATcQAYSga2R98QAqgd+ddTOAfj55nqoSXKhK+aGDi3w
+TvicKcFXRdfcAK+HrqQw8JJoG30A6ElyoSrmhhIt8E74tCR8VVTNDfh6qEoK
+gy+JttEHgJYkF8pibqjQ4gonzlsSvirK5gZ0PZQlhUGXRNvo9yF6SYwLUeh0
+Al8VbR6A66Ft84FLonDz+wq9JcaFJHQ6ga+KNg/A9dC2+cAlUbj5fQeMcXGE
+TifwVdHmAbge2jYfuCQKNx9BEATpffwL7QuglQ==
+ "], {{0, 38}, {477, 0}}, {0, 255},
ColorFunction->RGBColor],
BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
Selectable->False],
- BaseStyle->"ImageGraphics",
+ DefaultBaseStyle->"ImageGraphics",
ImageSize->Automatic,
- ImageSizeRaw->{472, 41},
- PlotRange->{{0, 472}, {0, 41}}]], "Output",
- ImageSize->{476, 41},
+ ImageSizeRaw->{477, 38},
+ PlotRange->{{0, 477}, {0, 38}}]], "Output",
+ ImageSize->{481, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"DiracReduce", "RasterizedOutput"},
- CellLabel->"Out[7]=",
- CellID->1748314930]
+ CellLabel->"Out[2]=",
+ CellID->239042759]
}, Open ]],
+Cell["Do some checks of the results", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t5", " ", "=",
- RowBox[{"Calc", "[",
- RowBox[{"DiracSimplify", "[",
- RowBox[{"DiracSigmaExplicit", "[",
- RowBox[{"t4", ".", "t4"}], "]"}], "]"}], "]"}]}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[8]:=",
- CellID->1302843775],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "128"}], TraditionalForm]], "Output",
- ImageSize->{35, 15},
+ ImageSize->{36, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracReduce",
- CellLabel->"Out[8]=",
- CellID->2142207150]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"t4", ".", "t4"}], "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[9]:=",
- CellID->1419075428],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"DiracReduce", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}], ".",
+ RowBox[{"DiracReduce", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "128"}], TraditionalForm]], "Output",
- ImageSize->{35, 15},
+ ImageSize->{36, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracReduce",
- CellLabel->"Out[9]=",
- CellID->474875609]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3", ",", "t4"}], "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[10]:=",
- CellID->156497246]
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "We may also keep the head ",
+ ButtonBox["DiracBasis ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracBasis",
+ ButtonNote->"DiracBasis"],
+ "in the final result"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracReduce", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"DiracBasis", "(", "1", ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ RowBox[{"DiracBasis", "(", "1", ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{"DiracBasis", "(", "1", ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{510, 81},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -584,15 +1110,25 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
+ StyleBox[ButtonBox["Chisholm",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["EpsChisholm",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsChisholm",
+ ButtonNote->"EpsChisholm"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracReduce",
- CellID->2097841964]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -600,7 +1136,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"DiracReduce",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -609,28 +1145,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 57.683754}",
+ "built" -> "{2020, 1, 5, 18, 54, 37.131261}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracReduce[exp] reduces all four-dimensional Dirac matrices in exp to \
-the standard basis (S,P,V,A,T) using the Chisholm identity (see Chisholm). In \
-the result the basic Dirac structures are wrapped with a head DiracBasis. \
-I.e., S corresponds to DiracBasis[1], P : DiracBasis[DiracMatrix[5]], V: \
-DiracBasis[DiracMatrix[mu]], A: DiracBasis[DiracMatrix[mu, 5]], T: \
-DiracBasis[DiracSigma[DiracMatrix[mu, nu]]]. By default DiracBasis is \
-substituted to Identity. Notice that the result of DiracReduce is given in \
-the FeynCalcExternal-way, i.e.,evtl. you may have to use FeynCalcInternal on \
-the result.", "synonyms" -> {}, "title" -> "DiracReduce", "titlemodifier" ->
- "", "windowtitle" -> "DiracReduce", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracReduce"}, "SearchTextTranslated" -> ""},
+ "DiracReduce[exp] reduces all 4-dimensional Dirac matrices in exp to the \
+standard basis (S, P, V, A, T) using the Chisholm identity. ",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracReduce",
+ "titlemodifier" -> "", "windowtitle" -> "DiracReduce", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DiracReduce"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -638,8 +1168,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -648,184 +1179,180 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3868, 102, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[8043, 262, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1661189562]},
+ CellID->1928237849]},
"DiracReduce"->{
- Cell[4502, 131, 139, 4, 27, "Input",
- CellTags->"DiracReduce",
- CellID->646521382],
- Cell[4644, 137, 430, 14, 36, "Output",
- CellTags->"DiracReduce",
- CellID->1909713385],
- Cell[5111, 156, 190, 6, 27, "Input",
+ Cell[8676, 291, 174, 6, 27, "Input",
CellTags->"DiracReduce",
CellID->176343206],
- Cell[5304, 164, 586, 24, 38, "Output",
- CellTags->"DiracReduce",
- CellID->1169679224],
- Cell[5927, 193, 135, 4, 27, "Input",
+ Cell[8853, 299, 565, 23, 37, "Output",
+ CellTags->"DiracReduce"],
+ Cell[9455, 327, 134, 4, 27, "Input",
CellTags->"DiracReduce",
CellID->1863378816],
- Cell[6065, 199, 832, 34, 38, "Output",
- CellTags->"DiracReduce",
- CellID->1304770013],
- Cell[6934, 238, 205, 6, 27, "Input",
+ Cell[9592, 333, 711, 29, 37, "Output",
+ CellTags->"DiracReduce"],
+ Cell[12113, 447, 420, 14, 27, "Input",
CellTags->"DiracReduce",
CellID->1405125223],
- Cell[7142, 246, 301, 10, 36, "Output",
- CellTags->"DiracReduce",
- CellID->971985531],
- Cell[7480, 261, 135, 4, 27, "Input",
+ Cell[12536, 463, 1119, 46, 38, "Output",
+ CellTags->"DiracReduce"],
+ Cell[13692, 514, 134, 4, 27, "Input",
CellTags->"DiracReduce",
CellID->1093135858],
- Cell[7618, 267, 3230, 132, 41, "Output",
- CellTags->"DiracReduce",
- CellID->1278508135],
- Cell[10885, 404, 226, 7, 27, "Input",
+ Cell[13829, 520, 6168, 109, 102, "Output",
+ CellTags->{"DiracReduce", "RasterizedOutput"},
+ CellID->1093575305],
+ Cell[20176, 641, 191, 6, 27, "Input",
CellTags->"DiracReduce",
CellID->1144474685],
- Cell[11114, 413, 319, 10, 36, "Output",
- CellTags->"DiracReduce",
- CellID->2001677937],
- Cell[11470, 428, 158, 5, 27, "Input",
+ Cell[20370, 649, 940, 39, 37, "Output",
+ CellTags->"DiracReduce"],
+ Cell[21347, 693, 133, 4, 27, "Input",
CellTags->"DiracReduce",
CellID->654035869],
- Cell[11631, 435, 4197, 77, 62, "Output",
+ Cell[21483, 699, 3633, 67, 59, "Output",
CellTags->{"DiracReduce", "RasterizedOutput"},
- CellID->1748314930],
- Cell[15865, 517, 272, 8, 27, "Input",
- CellTags->"DiracReduce",
- CellID->1302843775],
- Cell[16140, 527, 233, 8, 36, "Output",
- CellTags->"DiracReduce",
- CellID->2142207150],
- Cell[16410, 540, 152, 5, 27, "Input",
- CellTags->"DiracReduce",
- CellID->1419075428],
- Cell[16565, 547, 232, 8, 36, "Output",
- CellTags->"DiracReduce",
- CellID->474875609],
- Cell[16812, 558, 175, 5, 27, "Input",
- CellTags->"DiracReduce",
- CellID->156497246],
- Cell[17343, 585, 246, 9, 32, "Text",
- CellTags->"DiracReduce",
- CellID->2097841964]},
+ CellID->239042759]},
"RasterizedOutput"->{
- Cell[11631, 435, 4197, 77, 62, "Output",
+ Cell[13829, 520, 6168, 109, 102, "Output",
CellTags->{"DiracReduce", "RasterizedOutput"},
- CellID->1748314930]}
+ CellID->1093575305],
+ Cell[21483, 699, 3633, 67, 59, "Output",
+ CellTags->{"DiracReduce", "RasterizedOutput"},
+ CellID->239042759]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 19984, 649},
- {"DiracReduce", 20123, 653},
- {"RasterizedOutput", 22011, 714}
+ {"PrimaryExamplesSection", 35920, 1180},
+ {"DiracReduce", 36059, 1184},
+ {"RasterizedOutput", 37150, 1217}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3210, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 943, 20, 161, "Usage",
- CellID->982511436],
+Cell[3796, 100, 288, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3868, 102, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1661189562],
+Cell[4109, 115, 682, 20, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4281, 121, 196, 6, 25, "ExampleSection",
- CellID->1584869611],
+Cell[4816, 139, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1602023328],
+Cell[5558, 165, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5592, 167, 255, 8, 70, "Notes",
+ CellID->1067943069],
+Cell[5850, 177, 149, 5, 70, "SeeAlso"],
+Cell[6002, 184, 179, 6, 70, "SeeAlso"],
+Cell[6184, 192, 182, 6, 70, "SeeAlso"],
+Cell[6369, 200, 212, 7, 70, "SeeAlso"],
+Cell[6584, 209, 251, 8, 70, "SeeAlso"],
+Cell[6838, 219, 241, 9, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4502, 131, 139, 4, 27, "Input",
- CellTags->"DiracReduce",
- CellID->646521382],
-Cell[4644, 137, 430, 14, 36, "Output",
- CellTags->"DiracReduce",
- CellID->1909713385]
+Cell[7104, 232, 95, 2, 70, "Input"],
+Cell[7202, 236, 780, 19, 75, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5111, 156, 190, 6, 27, "Input",
+Cell[8043, 262, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1928237849],
+Cell[CellGroupData[{
+Cell[8456, 281, 195, 6, 26, "ExampleSection",
+ CellID->139398663],
+Cell[CellGroupData[{
+Cell[8676, 291, 174, 6, 27, "Input",
CellTags->"DiracReduce",
CellID->176343206],
-Cell[5304, 164, 586, 24, 38, "Output",
- CellTags->"DiracReduce",
- CellID->1169679224]
+Cell[8853, 299, 565, 23, 37, "Output",
+ CellTags->"DiracReduce"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5927, 193, 135, 4, 27, "Input",
+Cell[9455, 327, 134, 4, 27, "Input",
CellTags->"DiracReduce",
CellID->1863378816],
-Cell[6065, 199, 832, 34, 38, "Output",
- CellTags->"DiracReduce",
- CellID->1304770013]
+Cell[9592, 333, 711, 29, 37, "Output",
+ CellTags->"DiracReduce"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10340, 367, 105, 2, 9, "ExampleDelimiter"],
+Cell[10448, 371, 325, 10, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[10798, 385, 110, 3, 27, "Input"],
+Cell[10911, 390, 487, 20, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6934, 238, 205, 6, 27, "Input",
+Cell[11435, 415, 87, 2, 27, "Input"],
+Cell[11525, 419, 409, 16, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11983, 441, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[12113, 447, 420, 14, 27, "Input",
CellTags->"DiracReduce",
CellID->1405125223],
-Cell[7142, 246, 301, 10, 36, "Output",
- CellTags->"DiracReduce",
- CellID->971985531]
+Cell[12536, 463, 1119, 46, 38, "Output",
+ CellTags->"DiracReduce"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7480, 261, 135, 4, 27, "Input",
+Cell[13692, 514, 134, 4, 27, "Input",
CellTags->"DiracReduce",
CellID->1093135858],
-Cell[7618, 267, 3230, 132, 41, "Output",
- CellTags->"DiracReduce",
- CellID->1278508135]
+Cell[13829, 520, 6168, 109, 102, "Output",
+ CellTags->{"DiracReduce", "RasterizedOutput"},
+ CellID->1093575305]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[10885, 404, 226, 7, 27, "Input",
+Cell[20046, 635, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[20176, 641, 191, 6, 27, "Input",
CellTags->"DiracReduce",
CellID->1144474685],
-Cell[11114, 413, 319, 10, 36, "Output",
- CellTags->"DiracReduce",
- CellID->2001677937]
+Cell[20370, 649, 940, 39, 37, "Output",
+ CellTags->"DiracReduce"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11470, 428, 158, 5, 27, "Input",
+Cell[21347, 693, 133, 4, 27, "Input",
CellTags->"DiracReduce",
CellID->654035869],
-Cell[11631, 435, 4197, 77, 62, "Output",
+Cell[21483, 699, 3633, 67, 59, "Output",
CellTags->{"DiracReduce", "RasterizedOutput"},
- CellID->1748314930]
+ CellID->239042759]
}, Open ]],
+Cell[25131, 769, 46, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[15865, 517, 272, 8, 27, "Input",
- CellTags->"DiracReduce",
- CellID->1302843775],
-Cell[16140, 527, 233, 8, 36, "Output",
- CellTags->"DiracReduce",
- CellID->2142207150]
+Cell[25202, 773, 309, 9, 27, "Input"],
+Cell[25514, 784, 186, 6, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16410, 540, 152, 5, 27, "Input",
- CellTags->"DiracReduce",
- CellID->1419075428],
-Cell[16565, 547, 232, 8, 36, "Output",
- CellTags->"DiracReduce",
- CellID->474875609]
+Cell[25737, 795, 394, 11, 45, "Input"],
+Cell[26134, 808, 186, 6, 35, "Output"]
+}, Open ]]
}, Open ]],
-Cell[16812, 558, 175, 5, 27, "Input",
- CellTags->"DiracReduce",
- CellID->156497246]
+Cell[CellGroupData[{
+Cell[26369, 820, 105, 2, 9, "ExampleDelimiter"],
+Cell[26477, 824, 206, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[26708, 835, 276, 8, 27, "Input"],
+Cell[26987, 845, 6061, 242, 102, "Output"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[17002, 566, 31, 0, 29, "SectionFooterSpacer"]
+Cell[33087, 1092, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17070, 571, 270, 12, 31, "SeeAlsoSection",
+Cell[33155, 1097, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[17343, 585, 246, 9, 32, "Text",
- CellTags->"DiracReduce",
- CellID->2097841964]
+Cell[33428, 1111, 529, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[17604, 597, 23, 0, 42, "FooterCell"]
+Cell[33972, 1133, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigma.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigma.nb
index 9b52b85cd..a5d341bd9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigma.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigma.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14334, 511]
-NotebookOptionsPosition[ 9428, 353]
-NotebookOutlinePosition[ 12683, 447]
-CellTagsIndexPosition[ 12569, 441]
+NotebookDataLength[ 15027, 528]
+NotebookOptionsPosition[ 10468, 386]
+NotebookOutlinePosition[ 13466, 470]
+CellTagsIndexPosition[ 13352, 464]
WindowTitle->DiracSigma
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSigma\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSigma"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracSigma.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$42131],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSigma", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSigmaExplicit\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSigmaExplicit"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSigma\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSigma"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracSigma.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$69044],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSigma", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +95,26 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSigma", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSigma", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracSigma", "[",
RowBox[{"a", ",", " ", "b"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "stands for i/2*(a . b - b . a) in 4 dimensions. a and b must have Head \
-DiracGamma, DiracMatrix or DiracSlash. Only antisymmetry is implemented."
+ " \[LineSeparator]stands for i/2*(a . b - b . a) in 4 dimensions. a and \
+b must have Head DiracGamma, GA or GS. Only antisymmetry is implemented."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->261630240],
+ CellID->1819183924],
Cell[CellGroupData[{
@@ -119,16 +150,15 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->142212645],
+ CellID->26103714],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"DiracSigma", "[",
- RowBox[{
- RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
- RowBox[{"GA", "[", "\[Beta]", "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Beta]", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigma",
CellLabel->"In[1]:=",
CellID->1797257280],
@@ -141,18 +171,17 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Beta]",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{36, 19},
+ ImageSize->{36, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigma",
- CellLabel->"Out[1]=",
- CellID->669982831]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSigmaExplicit", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
CellTags->"DiracSigma",
CellLabel->"In[2]:=",
CellID->350892177],
@@ -189,22 +218,20 @@ Cell[BoxData[
FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{146, 41},
+ ImageSize->{152, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigma",
- CellLabel->"Out[2]=",
- CellID->249746681]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"DiracSigma", "[",
- RowBox[{
- RowBox[{"GA", "[", "\[Beta]", "]"}], ",",
- RowBox[{"GA", "[", "\[Alpha]", "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Beta]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Alpha]", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigma",
CellLabel->"In[3]:=",
CellID->334267816],
@@ -218,22 +245,20 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Beta]",
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{46, 19},
+ ImageSize->{47, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigma",
- CellLabel->"Out[3]=",
- CellID->838537027]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"DiracSigma", "[",
- RowBox[{
- RowBox[{"GS", "[", "p", "]"}], ",",
- RowBox[{"GS", "[", "q", "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ",",
+ RowBox[{"GS", "[", "q", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigma",
CellLabel->"In[4]:=",
CellID->938175920],
@@ -246,18 +271,17 @@ Cell[BoxData[
TraditionalForm],
FormBox["q",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{34, 15},
+ ImageSize->{39, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigma",
- CellLabel->"Out[4]=",
- CellID->1981550461]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSigmaExplicit", "[", "t3", "]"}]], "Input",
+ RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
CellTags->"DiracSigma",
CellLabel->"In[5]:=",
CellID->493035408],
@@ -302,20 +326,31 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{233, 41},
+ ImageSize->{252, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigma",
- CellLabel->"Out[5]=",
- CellID->360348225]
+ CellLabel->"Out[5]="]
}, Open ]],
+Cell["The antisymmetry propery is built-in", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3"}], "]"}]], "Input",
- CellTags->"DiracSigma",
- CellLabel->"In[6]:=",
- CellID->1941239189]
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Alpha]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -344,9 +379,7 @@ Cell[TextData[{
ButtonNote->"DiracSigmaExplicit"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracSigma",
- CellID->94805766]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -363,22 +396,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 0.699904}",
+ "built" -> "{2020, 1, 5, 18, 54, 40.854766}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"DiracSigma[a, b] stands for i/2*(a . b - b . a) in 4 dimensions. a and b \
-must have Head DiracGamma, DiracMatrix or DiracSlash. Only antisymmetry is \
-implemented.", "synonyms" -> {}, "title" -> "DiracSigma", "titlemodifier" ->
- "", "windowtitle" -> "DiracSigma", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracSigma"}, "SearchTextTranslated" -> ""},
+must have Head DiracGamma, GA or GS. Only antisymmetry is implemented.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracSigma",
+ "titlemodifier" -> "", "windowtitle" -> "DiracSigma", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DiracSigma"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -386,8 +419,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -396,123 +430,106 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3441, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4427, 127, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->261630240]},
+ CellID->1819183924]},
"DiracSigma"->{
- Cell[4073, 125, 255, 8, 27, "Input",
+ Cell[5059, 156, 228, 7, 27, "Input",
CellTags->"DiracSigma",
CellID->1797257280],
- Cell[4331, 135, 346, 13, 40, "Output",
- CellTags->"DiracSigma",
- CellID->669982831],
- Cell[4714, 153, 140, 4, 27, "Input",
+ Cell[5290, 165, 326, 12, 37, "Output",
+ CellTags->"DiracSigma"],
+ Cell[5653, 182, 139, 4, 27, "Input",
CellTags->"DiracSigma",
CellID->350892177],
- Cell[4857, 159, 1002, 37, 62, "Output",
- CellTags->"DiracSigma",
- CellID->249746681],
- Cell[5896, 201, 254, 8, 27, "Input",
+ Cell[5795, 188, 982, 36, 56, "Output",
+ CellTags->"DiracSigma"],
+ Cell[6814, 229, 227, 7, 27, "Input",
CellTags->"DiracSigma",
CellID->334267816],
- Cell[6153, 211, 370, 14, 40, "Output",
- CellTags->"DiracSigma",
- CellID->838537027],
- Cell[6560, 230, 241, 8, 27, "Input",
+ Cell[7044, 238, 350, 13, 37, "Output",
+ CellTags->"DiracSigma"],
+ Cell[7431, 256, 214, 7, 27, "Input",
CellTags->"DiracSigma",
CellID->938175920],
- Cell[6804, 240, 334, 13, 36, "Output",
- CellTags->"DiracSigma",
- CellID->1981550461],
- Cell[7175, 258, 140, 4, 27, "Input",
+ Cell[7648, 265, 313, 12, 35, "Output",
+ CellTags->"DiracSigma"],
+ Cell[7998, 282, 139, 4, 27, "Input",
CellTags->"DiracSigma",
CellID->493035408],
- Cell[7318, 264, 1276, 45, 62, "Output",
- CellTags->"DiracSigma",
- CellID->360348225],
- Cell[8609, 312, 163, 5, 27, "Input",
- CellTags->"DiracSigma",
- CellID->1941239189],
- Cell[9128, 339, 258, 9, 70, "Text",
- CellTags->"DiracSigma",
- CellID->94805766]}
+ Cell[8140, 288, 1256, 44, 56, "Output",
+ CellTags->"DiracSigma"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11328, 397},
- {"DiracSigma", 11464, 401}
+ {"PrimaryExamplesSection", 12398, 431},
+ {"DiracSigma", 12536, 435}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3030, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 523, 14, 98, "Usage",
+Cell[3615, 97, 287, 11, 45, "ObjectNameGrid"],
+Cell[3905, 110, 497, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3441, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4427, 127, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->261630240],
+ CellID->1819183924],
Cell[CellGroupData[{
-Cell[3853, 115, 195, 6, 25, "ExampleSection",
- CellID->142212645],
+Cell[4840, 146, 194, 6, 26, "ExampleSection",
+ CellID->26103714],
Cell[CellGroupData[{
-Cell[4073, 125, 255, 8, 27, "Input",
+Cell[5059, 156, 228, 7, 27, "Input",
CellTags->"DiracSigma",
CellID->1797257280],
-Cell[4331, 135, 346, 13, 40, "Output",
- CellTags->"DiracSigma",
- CellID->669982831]
+Cell[5290, 165, 326, 12, 37, "Output",
+ CellTags->"DiracSigma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4714, 153, 140, 4, 27, "Input",
+Cell[5653, 182, 139, 4, 27, "Input",
CellTags->"DiracSigma",
CellID->350892177],
-Cell[4857, 159, 1002, 37, 62, "Output",
- CellTags->"DiracSigma",
- CellID->249746681]
+Cell[5795, 188, 982, 36, 56, "Output",
+ CellTags->"DiracSigma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5896, 201, 254, 8, 27, "Input",
+Cell[6814, 229, 227, 7, 27, "Input",
CellTags->"DiracSigma",
CellID->334267816],
-Cell[6153, 211, 370, 14, 40, "Output",
- CellTags->"DiracSigma",
- CellID->838537027]
+Cell[7044, 238, 350, 13, 37, "Output",
+ CellTags->"DiracSigma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6560, 230, 241, 8, 27, "Input",
+Cell[7431, 256, 214, 7, 27, "Input",
CellTags->"DiracSigma",
CellID->938175920],
-Cell[6804, 240, 334, 13, 36, "Output",
- CellTags->"DiracSigma",
- CellID->1981550461]
+Cell[7648, 265, 313, 12, 35, "Output",
+ CellTags->"DiracSigma"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7175, 258, 140, 4, 27, "Input",
+Cell[7998, 282, 139, 4, 27, "Input",
CellTags->"DiracSigma",
CellID->493035408],
-Cell[7318, 264, 1276, 45, 62, "Output",
- CellTags->"DiracSigma",
- CellID->360348225]
+Cell[8140, 288, 1256, 44, 56, "Output",
+ CellTags->"DiracSigma"]
}, Open ]],
-Cell[8609, 312, 163, 5, 27, "Input",
- CellTags->"DiracSigma",
- CellID->1941239189]
+Cell[9411, 335, 53, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[9489, 339, 183, 5, 27, "Input"],
+Cell[9675, 346, 166, 5, 35, "Output"]
+}, Open ]]
}, Open ]],
-Cell[8787, 320, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9868, 355, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8855, 325, 270, 12, 70, "SeeAlsoSection",
+Cell[9936, 360, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9128, 339, 258, 9, 70, "Text",
- CellTags->"DiracSigma",
- CellID->94805766]
+Cell[10209, 374, 217, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[9401, 351, 23, 0, 70, "FooterCell"]
+Cell[10441, 384, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExpand.nb
new file mode 100644
index 000000000..ef5f7a3e5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExpand.nb
@@ -0,0 +1,813 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 21318, 803]
+NotebookOptionsPosition[ 16682, 651]
+NotebookOutlinePosition[ 18791, 708]
+CellTagsIndexPosition[ 18706, 703]
+WindowTitle->DiracSigmaExpand
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracSigma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSigmaExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSigmaExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracSigmaExpand.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$68146],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSigmaExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracSigmaExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]applies linearity to the arguments of ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2085868756],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSigmaExpand", "]"}]], "Input",
+ CellLabel->"In[20]:=",
+ CellID->374282664],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaExpand", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{338, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[20]=",
+ CellID->1173846990]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(3)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->930746011],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(3)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->645082019],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], "+",
+ RowBox[{"GSD", "[", "q", "]"}]}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->525630839],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ",",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{197, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->401856684]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "DiracSigmaExpand"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2122869292],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{85, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1368035139]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1621111317],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}], "+",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]}]], "Output",
+ ImageSize->{446, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->2128932345]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->904766219],
+
+Cell[TextData[{
+ "Notice that ",
+ ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExpand",
+ ButtonNote->"DiracSigmaExpand"],
+ " does not expand Dirac matrices contracted to linear combinations of ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-vectors by default."
+}], "Notes",
+ CellID->1591912985],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1872384147],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ RowBox[{"p", "+", "q"}],
+ TraditionalForm],
+ FormBox["r",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{55, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2031816583]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1982135918],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{55, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1642061710]
+}, Open ]],
+
+Cell[TextData[{
+ "If such expansions are required, use the option ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ "."
+}], "Notes",
+ CellID->1529300486],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[",
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->863128085],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{85, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->640891865]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->2124164560],
+
+Cell[TextData[{
+ "The option ",
+ ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Momentum",
+ ButtonNote->"Momentum"],
+ " allows us to perform more fine-grained expansions of ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ "."
+}], "Notes",
+ CellID->1389942884],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ",",
+ RowBox[{
+ RowBox[{"GSD", "[", "r", "]"}], "+",
+ RowBox[{"GSD", "[", "t", "]"}]}]}], "]"}], "+",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GSD", "[", "l", "]"}], "+",
+ RowBox[{"GSD", "[", "n", "]"}]}], ",",
+ RowBox[{"GSD", "[", "p", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->2037164471],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["n",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ",",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], "+",
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ",",
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["t",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{402, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->992813878]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "r", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1102856647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["n",
+ TraditionalForm],
+ TraditionalForm]}]}], ",",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["t",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{292, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1534302668]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1822030255]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"DiracSigmaExpand",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 38.376189}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracSigmaExpand[exp] applies linearity to the arguments of DiracSigma.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracSigmaExpand",
+ "titlemodifier" -> "", "windowtitle" -> "DiracSigmaExpand", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DiracSigmaExpand"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6023, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->930746011]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 18563, 696}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 3128, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3719, 98, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4037, 113, 531, 16, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4593, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2085868756],
+Cell[5335, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5391, 163, 119, 3, 70, "Input",
+ CellID->374282664],
+Cell[5513, 168, 449, 13, 56, "Output",
+ CellID->1173846990]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6023, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->930746011],
+Cell[CellGroupData[{
+Cell[6435, 207, 195, 6, 26, "ExampleSection",
+ CellID->645082019],
+Cell[CellGroupData[{
+Cell[6655, 217, 248, 8, 27, "Input",
+ CellID->525630839],
+Cell[6906, 227, 773, 30, 37, "Output",
+ CellID->401856684]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7716, 262, 109, 3, 27, "Input",
+ CellID->2122869292],
+Cell[7828, 267, 626, 27, 35, "Output",
+ CellID->1368035139]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8491, 299, 131, 4, 27, "Input",
+ CellID->1621111317],
+Cell[8625, 305, 446, 14, 51, "Output",
+ CellID->2128932345]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9108, 324, 125, 3, 9, "ExampleDelimiter",
+ CellID->904766219],
+Cell[9236, 329, 343, 10, 49, "Notes",
+ CellID->1591912985],
+Cell[CellGroupData[{
+Cell[9604, 343, 217, 7, 27, "Input",
+ CellID->1872384147],
+Cell[9824, 352, 335, 13, 35, "Output",
+ CellID->2031816583]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10196, 370, 113, 3, 27, "Input",
+ CellID->1982135918],
+Cell[10312, 375, 496, 21, 35, "Output",
+ CellID->1642061710]
+}, Open ]],
+Cell[10823, 399, 248, 8, 32, "Notes",
+ CellID->1529300486],
+Cell[CellGroupData[{
+Cell[11096, 411, 339, 10, 45, "Input",
+ CellID->863128085],
+Cell[11438, 423, 625, 27, 35, "Output",
+ CellID->640891865]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12112, 456, 126, 3, 9, "ExampleDelimiter",
+ CellID->2124164560],
+Cell[12241, 461, 369, 13, 32, "Notes",
+ CellID->1389942884],
+Cell[CellGroupData[{
+Cell[12635, 478, 461, 15, 45, "Input",
+ CellID->2037164471],
+Cell[13099, 495, 1430, 55, 37, "Output",
+ CellID->992813878]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14566, 555, 198, 6, 27, "Input",
+ CellID->1102856647],
+Cell[14767, 563, 1114, 45, 39, "Output",
+ CellID->1534302668]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[15920, 613, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15988, 618, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[16261, 632, 379, 14, 56, "SeeAlso",
+ CellID->1822030255]
+}, Open ]],
+Cell[16655, 649, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExplicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExplicit.nb
index db604ce50..fdad22a36 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExplicit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSigmaExplicit.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10192, 341]
-NotebookOptionsPosition[ 6504, 231]
-NotebookOutlinePosition[ 9187, 304]
-CellTagsIndexPosition[ 9067, 298]
+NotebookDataLength[ 16131, 566]
+NotebookOptionsPosition[ 11937, 439]
+NotebookOutlinePosition[ 14525, 509]
+CellTagsIndexPosition[ 14403, 503]
WindowTitle->DiracSigmaExplicit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSigmaExplicit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSigmaExplicit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracSigma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSigma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSigmaExplicit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSigmaExplicit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracSigmaExplicit.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$41797],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSigmaExplicit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$68604],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSigmaExplicit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ DiracSigmaExplicit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSigmaExplicit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSigmaExplicit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +128,62 @@ also an option of DiracSimplify."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1574253360],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+DiracSigmaExplict is also an option of various FeynCalc functions that handle \
+the Dirac algebra\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSigmaExplicit", "]"}]], "Input",
+ CellLabel->"In[60]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[60]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -104,21 +195,21 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->252789668],
+ CellID->648926233],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->545037257],
+ CellID->1114432583],
Cell[CellGroupData[{
@@ -139,12 +230,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Beta]",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{36, 19},
+ ImageSize->{36, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigmaExplicit",
- CellLabel->"Out[1]=",
- CellID->1064329329]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -187,12 +277,125 @@ Cell[BoxData[
FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{146, 41},
+ ImageSize->{152, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSigmaExplicit",
- CellLabel->"Out[2]=",
- CellID->1384105478]
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], "]"}], ".",
+ RowBox[{"GSD", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ FormBox["\[Nu]",
+ TraditionalForm]}]], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{130, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{336, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -216,15 +419,20 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["DiracSigma",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSigma",
ButtonNote->"DiracSigma"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracSigmaExplicit",
- CellID->1461748259]
+}], "SeeAlso",
+ CellID->1822030255]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -232,7 +440,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DiracSigmaExplicit",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -241,10 +449,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 17, 59.230113}",
+ "built" -> "{2020, 1, 5, 18, 54, 39.563366}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -252,11 +460,12 @@ TaggingRules->{
"None", "summary" ->
"DiracSigmaExplicit[exp] inserts in exp for all DiracSigma its \
definition. DiracSigmaExplict is also an option of DiracSimplify.",
- "synonyms" -> {}, "title" -> "DiracSigmaExplicit", "titlemodifier" -> "",
- "windowtitle" -> "DiracSigmaExplicit", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracSigmaExplicit"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracSigmaExplicit",
+ "titlemodifier" -> "", "windowtitle" -> "DiracSigmaExplicit", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DiracSigmaExplicit"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -264,8 +473,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -274,75 +484,90 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3427, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5940, 186, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->252789668]},
+ CellID->648926233]},
"DiracSigmaExplicit"->{
- Cell[4059, 124, 235, 7, 27, "Input",
+ Cell[6573, 215, 235, 7, 27, "Input",
CellTags->"DiracSigmaExplicit",
CellID->535100858],
- Cell[4297, 133, 355, 13, 40, "Output",
- CellTags->"DiracSigmaExplicit",
- CellID->1064329329],
- Cell[4689, 151, 147, 4, 27, "Input",
+ Cell[6811, 224, 334, 12, 37, "Output",
+ CellTags->"DiracSigmaExplicit"],
+ Cell[7182, 241, 147, 4, 27, "Input",
CellTags->"DiracSigmaExplicit",
CellID->280405798],
- Cell[4839, 157, 1011, 37, 62, "Output",
- CellTags->"DiracSigmaExplicit",
- CellID->1384105478],
- Cell[6218, 217, 244, 9, 32, "Text",
- CellTags->"DiracSigmaExplicit",
- CellID->1461748259]}
+ Cell[7332, 247, 990, 36, 56, "Output",
+ CellTags->"DiracSigmaExplicit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8407, 275},
- {"DiracSigmaExplicit", 8551, 279}
+ {"PrimaryExamplesSection", 13886, 485},
+ {"DiracSigmaExplicit", 14031, 489}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3136, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 460, 13, 82, "Usage",
+Cell[3729, 98, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4049, 113, 460, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3427, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4534, 130, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1574253360],
+Cell[5276, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5310, 158, 122, 3, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[5457, 165, 101, 2, 70, "Input"],
+Cell[5561, 169, 318, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5940, 186, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->252789668],
+ CellID->648926233],
Cell[CellGroupData[{
-Cell[3839, 114, 195, 6, 25, "ExampleSection",
- CellID->545037257],
+Cell[6352, 205, 196, 6, 26, "ExampleSection",
+ CellID->1114432583],
Cell[CellGroupData[{
-Cell[4059, 124, 235, 7, 27, "Input",
+Cell[6573, 215, 235, 7, 27, "Input",
CellTags->"DiracSigmaExplicit",
CellID->535100858],
-Cell[4297, 133, 355, 13, 40, "Output",
- CellTags->"DiracSigmaExplicit",
- CellID->1064329329]
+Cell[6811, 224, 334, 12, 37, "Output",
+ CellTags->"DiracSigmaExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4689, 151, 147, 4, 27, "Input",
+Cell[7182, 241, 147, 4, 27, "Input",
CellTags->"DiracSigmaExplicit",
CellID->280405798],
-Cell[4839, 157, 1011, 37, 62, "Output",
- CellTags->"DiracSigmaExplicit",
- CellID->1384105478]
+Cell[7332, 247, 990, 36, 56, "Output",
+ CellTags->"DiracSigmaExplicit"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8359, 288, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8489, 294, 275, 8, 27, "Input"],
+Cell[8767, 304, 708, 28, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9512, 337, 94, 2, 27, "Input"],
+Cell[9609, 341, 1527, 55, 56, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5877, 198, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11175, 401, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5945, 203, 270, 12, 31, "SeeAlsoSection",
+Cell[11243, 406, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6218, 217, 244, 9, 32, "Text",
- CellTags->"DiracSigmaExplicit",
- CellID->1461748259]
+Cell[11516, 420, 379, 14, 56, "SeeAlso",
+ CellID->1822030255]
}, Open ]],
-Cell[6477, 229, 23, 0, 42, "FooterCell"]
+Cell[11910, 437, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimpCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimpCombine.nb
index 8c9b36541..927b82f79 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimpCombine.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimpCombine.nb
@@ -10,62 +10,84 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6333, 190]
-NotebookOptionsPosition[ 3990, 123]
-NotebookOutlinePosition[ 6063, 179]
-CellTagsIndexPosition[ 5985, 174]
+NotebookDataLength[ 8749, 270]
+NotebookOptionsPosition[ 6406, 205]
+NotebookOutlinePosition[ 8296, 254]
+CellTagsIndexPosition[ 8253, 251]
WindowTitle->DiracSimpCombine
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSimpCombine\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSimpCombine"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSimpCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSimpCombine"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracSimpCombine.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$42469],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSimpCombine", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$69314],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSimpCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +95,40 @@ DiracSimpCombine.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSimpCombine", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSimpCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["DiracSimpCombine"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracSimplify. If set to True, sums of DiracGamma's \
-will be merged as much as possible in DiracGamma[ .. + .. + ]'s."
+ " \[LineSeparator]is an option for ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ ". If set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ", ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " uses the function ",
+ ButtonBox["DiracGammaCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ " internally."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +139,47 @@ will be merged as much as possible in DiracGamma[ .. + .. + ]'s."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -106,17 +194,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracSimpCombine",
- CellID->1079786131]
+Cell[TextData[StyleBox[ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,20 +215,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 2.140037}",
+ "built" -> "{2019, 3, 29, 17, 46, 52.923132}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracSimpCombine is an option for DiracSimplify. If set to True, sums of \
-DiracGamma's will be merged as much as possible in DiracGamma[ .. + .. + \
-]'s.", "synonyms" -> {}, "title" -> "DiracSimpCombine", "titlemodifier" -> "",
- "windowtitle" -> "DiracSimpCombine", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracSimpCombine"}},
+ "DiracSimpCombine is an option for DiracSimplify. If set to True, \
+DiracSimplify uses the function DiracGammaCombine internally.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracSimpCombine",
+ "titlemodifier" -> "", "windowtitle" -> "DiracSimpCombine", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DiracSimpCombine"}},
CellContext->"Global`",
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->Notebook[{
@@ -164,34 +246,32 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DiracSimpCombine"->{
- Cell[3682, 108, 266, 10, 70, "Text",
- CellTags->"DiracSimpCombine",
- CellID->1079786131]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DiracSimpCombine", 5865, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 70, "AnchorBarGrid",
+Cell[588, 21, 3044, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 454, 12, 70, "Usage",
+Cell[3635, 97, 293, 11, 70, "ObjectNameGrid"],
+Cell[3931, 110, 909, 27, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3409, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4865, 141, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5598, 167, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5632, 169, 235, 8, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5904, 182, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3682, 108, 266, 10, 70, "Text",
- CellTags->"DiracSimpCombine",
- CellID->1079786131]
+Cell[6177, 196, 187, 4, 70, "SeeAlso"]
}, Open ]],
-Cell[3963, 121, 23, 0, 70, "FooterCell"]
+Cell[6379, 203, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify.nb
index f2f6e2520..7cba1b08a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify.nb
@@ -3,69 +3,118 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 48297, 1682]
-NotebookOptionsPosition[ 36204, 1284]
-NotebookOutlinePosition[ 43105, 1488]
-CellTagsIndexPosition[ 42950, 1481]
+NotebookDataLength[ 172610, 6280]
+NotebookOptionsPosition[ 157236, 5783]
+NotebookOutlinePosition[ 160902, 5887]
+CellTagsIndexPosition[ 160744, 5880]
WindowTitle->DiracSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracEquation\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracEquation"], "\<\"DiracSigmaExplicit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSigmaExplicit"], "\<\"DiracSubstitute5\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute5"], "\<\"DiracSubstitute67\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute67"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracGammaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGammaCombine"], "\<\"DiracOrder\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracOrder"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"DiracTraceEvaluate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTraceEvaluate"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrick"], "\<\"FCDiracIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCDiracIsolate"], "\<\"SirlinSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SirlinSimplify"], "\<\"SpinorChainTrick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorChainTrick"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToDiracGamma67"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$43159],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$69628],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +122,28 @@ DiracSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "simplifies products of Dirac matrices in expr and expands \
-non-commutative products. Double Lorentz indices and four vectors are \
-contracted. The Dirac equation is applied. All DiracMatrix[5], DiracMatrix[6] \
-and DiracMatrix[7] are moved to the right. The order of the other Dirac \
-matrices is not changed."
+ RowBox[{"DiracSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]simplifies products of Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " and expands non-commutative products."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -96,32 +154,87 @@ matrices is not changed."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->892315753],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->41535398],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->356761721],
+ "The simplifications are done by applying ",
+ ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ ", ",
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ ", ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ ", ",
+ ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ " and ",
+ ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "All ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ " are moved to the right ."
+}], "Notes"],
+
+Cell[TextData[{
+ "The order of the other Dirac matrices is not changed, unless the option ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " is set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
@@ -135,36 +248,79 @@ Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- RowBox[{"DiracCanonical", "\[Rule]", "False"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracEquation", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "False"}], ",",
RowBox[{"DiracSigmaExplicit", "\[Rule]", "True"}], ",",
- RowBox[{"DiracSimpCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracSubstitute5", "\[Rule]", "False"}], ",",
RowBox[{"DiracSubstitute67", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrace", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
+ RowBox[{"Expand2", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}], ",",
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"SirlinRelations", "\[Rule]", "True"}], ",",
+ RowBox[{"FCCheckSyntax", "\[Rule]", "False"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
- RowBox[{"InsideDiracTrace", "\[Rule]", "False"}]}], "}"}],
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "False"}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"ToDiracGamma67", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{523, 54},
+ ImageSize->{534, 129},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSimplify",
- CellLabel->"Out[1]=",
- CellID->1444421220]
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell["This is a string of Dirac matrices in four dimensions. ", "Text",
- CellTags->"DiracSimplify",
- CellID->1154366536],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(13)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1468871954],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(13)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->454068069],
+
+Cell["\<\
+Simplify a 4-dimensional Dirac matrix chain with a dummy Lorentz index\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]], "Input",
CellTags->"DiracSimplify",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->201005194],
Cell[BoxData[
@@ -194,20 +350,19 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{68, 17},
+ ImageSize->{75, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSimplify",
- CellLabel->"Out[2]=",
- CellID->642203150]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
CellTags->"DiracSimplify",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->28604534],
Cell[BoxData[
@@ -220,339 +375,210 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{43, 17},
+ ImageSize->{46, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSimplify",
- CellLabel->"Out[3]=",
- CellID->1608459635]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["This is a string of Dirac matrices in D dimensions. ", "Text",
- CellTags->"DiracSimplify",
- CellID->321850317],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[4]:=",
- CellID->149362799],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{65, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[4]=",
- CellID->786634532]
-}, Open ]],
+Cell[TextData[{
+ "Another common concerns Dirac matrices contracted to the same ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-vector"
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t1", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[5]:=",
- CellID->1129253480],
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-", "2"}], " ",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{"(",
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{43, 17},
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[5]=",
- CellID->120098280]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"GA", "[",
- RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[6]:=",
- CellID->570896083],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[6]=",
- CellID->333412029]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[TextData[{
- "By default ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "is moved to the right."
-}], "Text",
- CellTags->"DiracSimplify",
- CellID->766299813],
+ "Unlike ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ ", ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " does noncommutative expansion."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t3", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[7]:=",
- CellID->264425668],
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"c", "+", "d"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{"(",
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{283, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[7]=",
- CellID->1845106993]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"GA", "[",
- RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[8]:=",
- CellID->1307415504],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["6",
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["7",
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[8]=",
- CellID->1842675018]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t4", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[9]:=",
- CellID->1923692276],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["7",
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[9]=",
- CellID->312699584]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t5", "=",
- RowBox[{
- RowBox[{"GS", "[",
- RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
- RowBox[{"GS", "[", "p", "]"}], ".",
- RowBox[{"GS", "[", "p", "]"}], ".",
- RowBox[{"GS", "[",
- RowBox[{"c", "+", "d"}], "]"}]}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[10]:=",
- CellID->1879344534],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
+ RowBox[{"2", " ",
+ RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["c",
TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["d",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{254, 26},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[10]=",
- CellID->1520402677]
-}, Open ]],
-
-Cell["\<\
-Contrary to DiracTrick DiracSimplify does non-commutative expansion.\
-\>", "Text",
- CellTags->"DiracSimplify",
- CellID->1032130436],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t5", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[11]:=",
- CellID->697887732],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -577,6 +603,38 @@ Cell[BoxData[
FormBox["c",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -601,6 +659,38 @@ Cell[BoxData[
FormBox["d",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -625,6 +715,38 @@ Cell[BoxData[
FormBox["c",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -649,49 +771,56 @@ Cell[BoxData[
FormBox["d",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{477, 26},
+ ImageSize->{502, 66},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[11]=",
- CellID->865972170]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t5", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[12]:=",
- CellID->1805591394],
+ RowBox[{"DiracTrick", "[",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"c", "+", "d"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], " ",
RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
FormBox[
RowBox[{
@@ -702,539 +831,4839 @@ Cell[BoxData[
FormBox["d",
TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm], ")"}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{184, 26},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[12]=",
- CellID->1568743885]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t6", " ", "=", " ",
- RowBox[{
- RowBox[{"SpinorVBar", "[", "p", "]"}], " ", ".", " ",
- RowBox[{"GS", "[", "p", "]"}], " ", ".", " ",
- RowBox[{"SpinorUBar", "[", "q", "]"}]}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[13]:=",
- CellID->106324036],
-
-Cell[BoxData[
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{471, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Some of those expansions can be inhibited via the option ",
+ ButtonBox["Expanding",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Expanding",
+ ButtonNote->"Expanding"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"c", "+", "d"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}], ",",
+ RowBox[{"Expanding", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{502, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The matrix chain may also live in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[1]:=",
+ CellID->149362799],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{72, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[2]:=",
+ CellID->1129253480],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"D", " ",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{86, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{145, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{314, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAD", "@@",
+ RowBox[{"Join", "[",
+ RowBox[{
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"Table", "[",
+ RowBox[{
+ SubscriptBox["\[Nu]", "i"], ",",
+ RowBox[{"{",
+ RowBox[{"i", ",", "6"}], "}"}]}], "]"}], ",",
+ RowBox[{"{", "\[Mu]", "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{228, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQuQVNWdh3U32eyqVUowRishER1FYJVsZI2Eh6AGIaISQ1BTUgGCIQJC
+KUQJifggwSBqJFm2LAZIIMjiA8XFBI1U1qXQ5ZEEEQQUeY/D2xlmmFfPdPfO
+3O6e6Z6Z7nNO33PunHP7+6q0dGrm12fu/f3Pvd0zPV/XsVNu/9E/nHHGGVP/
+ufFft495aNADD4z56XfPa/yf702eeu/4yfeMGzp52j3j73ng2rH/2PjB+Y3/
+9Gr8/Kb/jgMAABQokWPrnhza95EdNfHq7Q8NGP7GiZjNsSQHlmwI+kYyhIhY
+vdYKlK+7e/B/7K05snrs45sqvORY1f4tB6t9Pkjr2Gj5xqd/NKxv965f+/78
+D6r8hLdOjlVsLZ553+ib//3q7y8+UKdzzQkih5beNXD2rlr9yR71p8vqfByO
+9pJrS95aXLxizTvbS2rs2y3oW9bkBPQN7CdWV7q++P4hvYevL2/+UPXuP0y+
+/vIvnNOpa7+JSz7KZ6Jrds4eNnPD5qW/f9+btNrSjYu+U/SNhQfr/S02MzZe
+s2/Z4r+disbr9hUPuPTmv5TpS45W7HqnpKZxhvf+pv+3Vh6J6ktuIlb14X89
+9cu+33jc3+bQNjlyoHhIz0svLerW78G/V+pMrt33u3E/XLrX13LTidUcXDvv
+xvM/e06PUQ898vD0yWOGXz9kzOzV+/Pdd+hbtuQm6Bu4QKz2WEnp5vuLLhq8
+LnUxqt7xzJT5G47WRU7+df6tF57b68nd6ndqNR88Nujuh5//uDr1gbo9z/Tp
+539zyIyNNVQ3eOWt2jK577hNvsah9YI9IiWrH37q3TI/e0Pb5GjZxsXP7/jk
+7Vv7+t0cWidX/v2xHy/fVt7gJ7S95OjRVbdc3v+ReXPuHznwe09tqdRxpxo9
+tur6zucP+VPyRZmGY6vHffWcr/zgzRN5HWz6lj2ZvoE71H74ix5far4YRY78
+z9rDyctP1XuTLvnSLetPKUdWbJ7442UHIy0f0LM5tIlNULXtyXsW7PE1aO0k
+R469u2jK4Eu6DH1uv5/XTVolR0rXLHy9pC5evs735tB6zbX7iifc1qdr565D
+Hn37pK8dolVyxYaRVwxa03jZiH361u3dBr2c+8694ejq8fdtqsj9CLGTfx52
+QeeBaVG1Hz3R86zOg9d+qmHB9I2+gZNkXozSqdw8pnuf5w60mcZ4zd7lkwZ8
+tdNXhjy9o+luJla59dmfFe+pyf4YcpuDcqz3SduXL1x3QjAM+SR76947r9+A
+3x3KsW615Nrdz4y45dbbbrvt5v4Xde4+ZNzCHBtPfmuuP7Z2eu/u4zbnum9X
+TK74vxHdBv35ZLzpZaR5114zJ/dT5YaSpd8aJnoNq3zdyIs69Vla0nLaIvt+
+2+vsTomH8btg+paCvoFTZLsYxcrWTbhh6vryNs+Saw++tHD98bpTG3/eq+iu
+dyvi9Z8sGzZw9s5ctZXZHPKIjdUceHPl/x5tvFpGTx/YXZFth8gjOUn0yKsj
+J64/lfWFgryTT60f0X9WrjtVH2s++upNg1/KfjupnNxQunxw72lbqxp3lR0z
+B4x6uyzn6yYym0PFhh98+byr029zYifWfPv8c656ek87Gw99859c2H0DG6gv
+fWnsTde14tuT3km/wrR/MYqWvfvE/Yt2tfvrC9GI17z6Q4sHfHPenhMbHhw6
+Y2NFzsZI3amqxkZKlo/qdkm3no30+Nf+P99enfUzlZMPLbnjhpEznlvx0vMr
+/lqW6y5Y/VAkEG4O6smxSJ33FZF9C+6Y/UGOXUR9zTUfL544+uHnlhX/4rFX
+S9o+UfbSmpvW54pOnXv1ba9pKU5vmXDxuVc+9XHLhaehdMWN53/+usXtPyeg
+b3knpyjovoEztHMxilXvXj5n0VZRyys3jr5u6ouz7mrzq56tiJx87/kRF18+
+4bWdp2ReW5aNVSfMyVXvT+vT44ZJ836/ZPGq3VK/d2xmzeI71ertDxade8Wj
+LVtjw/E/jb34ggFP78y+vXvQN4uS3ekbuEPth7MyL0Z1h/771ws2lXu3M9Hy
+7avWlGZ50bbqvSk9e9zwq/fzf8tFQ9nml1/d0uoXcvzHkhxYctuHEm0ONTtn
+XnFu0bRtiStPtHL7HyZe233Y7PU5nxF40DeS2z4UF6OwEDm+dc2cAZ8/+7Kp
+L27YUxX17lLv7fYvZ56R5Myzrpr7cbYfIFZtnT587geC29mclK8f1a3bqHWZ
+z639x5IcWHIbcm4OdUc2vPLE0As++7kvj/jJY48/PvPBST8cfd+Tr2yTegZD
+30huCxcjiMfrD784+jsvfOL/bQaBxJIcWLIh6BvJAO0QPf76HUW9f7O3/R8v
+2hZLcmDJhqBvJAO0R+zkm0Ov/O6Lh32+rTCgWJIDSzYEfSMZAAAAAAAAAAAA
+AAAAAAAAAMBmXJQRhz7Zco+zJUeJ5GCWARAYCJRFyXoEykpmbXO+bC0Ep/NO
+QGfy6Iy+QQZQoP7wy3f+290b8zFUIVDOmaxNoKxk1jbny25BX2fM6byboDN5
+dUbjIANIU1+6cly/L3S5M7+NBYFy9mSNAmUls7Y5X3YKnZ0xqfOmM3l2JomO
+QQaQJFLy8s+e/ePcrxflt7EgUM6RrCZQVlpzzo3FnC87gf7OaFoencm1ZtXO
+yA8y7m/wT+TgCzMW7Dq17z+vzrKxIFD2kawmUI7XHfrjr+cWL5s//vKz/umL
+gyfNWrrPt1m7BTlftgxGOmNC501nWn+yYme8rxEOcpw/nQ3+qdu/bMai3TXx
+yP4sGwsCZV/JKgLlWMWmn1xz3YIDkXjtrke7f/GbLxzOfUustLFI+rJlMNEZ
+0zpvOpMgn4uRaJATi+ZiBL6o3bNkxhLv56RZNxYEyj7XLCFQTkYff31Il16e
+irty89ie/YVbhsLGIuXLljHUG+qMMZ13CjqTQKUzMoOM+xv0UPvR3IG9ruzl
+0aPLWZ8777KrBk1573T7n9zxmmNzyVYIlOsPLup94dWNG0X0+Bv3jnhC9INr
+RbO2LuhMEjqTAc+MQBf1Bxdec1nOH0ZbLiN2MTmTaOX2FT+dMO23L7y26i97
+Ov6tQGLoTAckZ2JPZ7gYgS4kNha7ZcQuJqcTPfHG6O5dOp/9mTMb+cx5X5/q
+650rgUBnOiA5HZs6w8UIgsJFGbFDyZHDa341a+WBxM80YvWfbn52+gbnB9uh
+4+9icig7AyDARRmxQ8kNR1beVHTjqmOJX4SKVu5e+9pbn2h4M1CH4tDxdzE5
+lJ0BEOGijNil5NjpbXOHd7+wy9cG3zl++pwFr/ztpPtyZpeOv4vJYewMAAAA
+AAAAAAAAAAAAAAAAAIDTWCJNJjmYZWjBkqNEcjDLAAiM4BTSpoXmHuFUSCfQ
+Yd/WQng6Y0pobk1nPHwOBYACLiikjQrNw62QbkKTfbuFgu+MMaG5LZ3RNRQA
+0riikPYwIjQPvUJam307BZ0xJTS3pjPahgJAElcU0k2YEZqHXiGt0b6dDCz4
+zpgTmlvSGbWhQDsO/nFGId2CbqF5itAqpFXs2zLQGZNCczs6k0JmKOL81W7w
+j4sKaXNC89ArpMXCUwnoTDr6heaWdUY4FIlFczECX7ilkDYoNA+7QjpFzp0z
+jNpxg51JYkBobklnZIYC7TjoAYV0EhTS0tAZm5JNdkZtKHhmBLpAId0ByZnY
+o5CWhM50QHIm9nSGixHoAoV0BySnY5NCWhI60wHJ6djUGS5GEBQO6ZhdTA6l
+Qtqh4+9icig7AyDAIR2zi8mhVEg7dPxdTA5lZwBEuKRjdjE5jAppl46/i8lh
+7AwAAAAAAAAAAAAAAAAAAAAAgNNYIk0mOZhlaMHQ8iw5+I4mW94ZABlQSIuT
+PbQLzRUV0npM1lpQ+l78xDbh2mk15RwXDaa5cQNQAIW0KYW0IaG5qkJam8m6
+BW2dEXwv+cZ6OHZa48ac4+LBNDduANKgkDalkDYnNFdSSGs0WafQ2Zn8PDsS
+se6dVnPOceFgmhs3AElQSJtTSJsTmisppNVM1hIKad2d0XMxCsFpNekcT5B1
+MM2NG4AUKKRNKqSTSLqbjSmk1UzWwr/ArL8zct+Li6fVIud4XHYwWz2GcNwA
+NIBCOh39CumWNYvdzQYV0ioma+HFyERnZL4XF0+rVc5xycFsjWjcADSAQjoT
+AwppaaG5Ye24hMlaTiFtojOS34uLp9Ue57j8YCY/X2bc5FT1ACJQSBtPVnA3
+26Mdz/XMyEhnFL8Xp06rYrICioUBcAMU0h2QnIlzCukgOuPiaS28wgBoBIV0
+BySn46BCOojOuHhaC68wAAHikI7ZxeRQKqQNHX+HTqu55FAWBkCMQzpmF5ND
+qZA2dPwdOq3mkkNZGAAJXNIxu5gcRoW0oePv0mk1lxzGwgAAAAAAAAAAAAAA
+AAAAAAAAuA4KaQuTLVdI0xkLky3vDIAMASmkTTvHPUKrkE6gQ8CthZB0xpTQ
+3KbOePicCwAFrFdIG3WOh14h3YQmAXcLhd0ZY0Jzizqjay4ApHFCIe1hxDle
+CAppbQLuFAXeGVNCc5s6o20uACRxQiHtLdSIc7wQFNJqAu6waMe9hTrmqben
+MxrnAkAKNxTSaemaneMpwqyQVhFwx0OjHU9Ld8dTb01nUsjMBYAGnFNIm3OO
+F4JCWuw89dYdMu24S556+zojnAsADTikkDboHC8AhXSKnJtn6LTjTnrq7emM
+zFygHQc9oJBuAoV0a9COO5FsuDPqcwGgAxTSQSdnYpVCGu24pcmZWNUZAF2g
+kA46OR3LFNJoxy1NTseyzgAEBQppc8lhVUjTGXPJYe0MgAAU0uaSw6qQpjPm
+ksPaGQARKKQNJodUIU1nDCaHtDMAAAAAAAAAAAAAAAAAAAAAAE6DQtrCZMsV
+0nTGwmTLOwMgAwppQbKHZqF5PgppPTJrLQTUGdFR8rPgZpxR1YsmyHJVPRQK
+KKSNKKRNCc3VFdLaZNYtWN8Z4VHKOznuoKpeOEFBqOoBBKCQNqKQNic0V1VI
+a5RZp3CgM8KjlHeyi6r6JNknyLyqHkAACmlDCmlzQvMUsgppNZl1mLTjTWQ9
+SvknO6qqzzlB5uYCQAoU0sYU0klkxc0GFdJqMutQacfljlKhqOq9rxFOUBOK
+qnoAv6CQbka/QrplzWJxs1mFtIrMOkzaccmjVCCq+tSaBRPUCjlVPYA/UEin
+YUAhLS00N68dl5BZh087Ln2UCkJVLz1BmUiq6tGOgx9QSJtNVhA3ox13qjOo
+6gFMgUI66ORMrFJIox23NDkTqzoDoAsU0kEnp2OZQhrtuKXJ6VjWGYCgQCFt
+LjmsCmk6Yy45rJ0BEIBC2lxyWBXSdMZcclg7AyAChbTB5JAqpOmMweSQdgYA
+AAAAAAAAAAAAAAAAAAAAwGlQSFuYbLlCms5YmGx5ZwBkCIlC2pR23CaFtIdP
+TbYW6Iwg2UOz0DyfzlikqodCobAV0sa04xYppHVpslugM06p6tU7Y0BVDyCg
+wBXSprTjNimktWmyU9AZx1T1SaQ7Y0BVDyCgwBXS5rTj9iik1TTZaMdFya6q
+6lU6o11VDyCg0BXSBrXj1iikU0gK0NGOh1ZV732NXGc0q+oBBKCQbka/dtw+
+hbSMAB3teFhV9alkuc5oVdUDCEAhnYYB7bg9CmkZTTbacRs6Y05Vr6wd16aq
+BxCBQtqaZMMKaTVNNtpxJ4TmVmnHeWYEukAhHXRyJlYppNGOW5qciYudARCC
+Qjro5HQsU0ijHbc0OR03OwPgGxTS5pLDqpCmM+aSw9oZAAEopM0lh1UhTWfM
+JYe1MwAiUEgbTA6pQprOGEwOaWcAAAAAAAAAAAAAAAAAAAAAAJwGhbSFyZYr
+pOmMhcl0Jqxn1lyyhZ1xXiEt0jHnn9yEGe14guzaa7TjLncmiWbteAK1zlik
+HaczWZMTZD+zfpM92m2jkc4UsEJaqGPOO9mcdryJnNprtONxVztjSjvehFpn
+DGjH6YyZzuQ+s36Sc7fRQGcKXCHtkV3HnHeySe24QHuNdjzuZmdMasfVOmNA
+O05nDHVGcGZ9JAvaqL0zBa6QbiKnjjnvZHPacaH22pzMOrkAOmOmM+a046qd
+0a4dpzOGOiM8s3knC9uoeccrdIV02rqFOmZbtOMq2ut0ZGXWIuhM87p1dyaJ
+fu24cmc0a8fpTPO6NXdG9cyqq+ql9w3FHa/1wlBINyPSMVuoHRebRlshpR0X
+QGda0N6ZlmRT2nHZzmjVjtOZFox1RubM5quql9s31DqTCQrpuIqO2R7teArp
+i5GadjwNtOPtJpvrjDHteAr5Gxht2nE6Eze7zySQOLOqnZFvYxLpHa81KKSt
+SbZKO54LOmM2OYzacTpjTbJiZ/TtG2qLRCEdbHImVimkJaEzQSdnYlVnUNVb
+mpyJVZ3JBgrpoJPTsUwhLQmdCTo5Hcs6g6re0uR0LOtMvqCQNpccVoU0nTGX
+TGdsiHUrOSSdQSFtLjmsCmk6Yy6ZztgQ61ZyWDqDQtpgckgV0nTGYDKdsSDW
+seSQdgYAAECB/wdb3wVc
+ "], {{0, 149}, {559, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{559, 149},
+ PlotRange->{{0, 559}, {0, 149}}]], "Output",
+ ImageSize->{563, 149},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[6]=",
+ CellID->1265238922]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "2"}], " ",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GSD", "[", "v", "]"}]}], "-",
+ RowBox[{"FVD", "[",
+ RowBox[{"v", ",", "\[Mu]"}], "]"}]}], ")"}]}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"v", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "2"]}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["v",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["v",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["v",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{195, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " and the chirality projectors are always moved to the right"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[1]:=",
+ CellID->570896083],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{73, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{73, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "6", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{116, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{160, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The properties of the chirality projectors are taken into account without \
+substituting explicit expressions for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GA", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c3", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c4", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{"c2", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c3", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{"c4", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{333, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Moreover, ",
+ Cell[BoxData[
+ RowBox[{" ",
+ RowBox[{
+ FractionBox["1", "2"],
+ RowBox[{"(",
+ RowBox[{"1", "\[PlusMinus]",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}]}]}]], "InlineFormula"],
+ " is automatically replaced by ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]",
+ RowBox[{"6", "/", "7"}]]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}], ")"}],
+ ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "a"}], "b"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"], "+",
+ FractionBox["1", "2"]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{277, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "b"]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "b"]}], TraditionalForm]], "Output",
+ ImageSize->{179, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Suitable combinations of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " will not be rewritten in terms of chirality projectors, if the option ",
+ ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ " is set to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}], ",",
+ RowBox[{"ToDiracGamma67", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]]}], TraditionalForm]], "Output",
+ ImageSize->{287, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[TextData[{
+ "However, it the final result must contain only ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " but not ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ ", it is better to invoke the option ",
+ ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ ". This way ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " can perform more intermediate simplifications before presenting the final \
+result."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}], ",",
+ RowBox[{"DiracSubstitute67", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]]}], TraditionalForm]], "Output",
+ ImageSize->{287, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[TextData[{
+ "It is also possible to eliminate ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " by rewriting it in terms of the chirality projectors"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}], ",",
+ RowBox[{"DiracSubstitute5", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{158, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+The Dirac equation is routinely used to simplify closed spinor chains.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}], " ", ".", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ SubscriptBox["p", "1"], "]"}], "+",
+ SubscriptBox["m", "1"]}], ")"}], " ", ".", " ",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "1"]}], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{237, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ SubscriptBox["m", "1"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{241, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBar", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"SpinorU", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox["q",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{132, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Use the option ",
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ " to deactivate this type of simplifications."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorVBar", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"SpinorU", "[", "q", "]"}]}], ",",
+ RowBox[{"DiracEquation", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{185, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Suitable products of ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional spinor chains are simplified using Sirlin's identities"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "3"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "4"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{488, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["liS98",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["liS98",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{312, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The applications of Sirlin's identities can be disabled by setting the \
+option ",
+ ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li991\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li992\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li991\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li992\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{418, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Even when the usage of Sirlin's identities is disabled, ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will still try to perform some simplficiations on the spinor chains, e.g. \
+by canonicalizing the dummy indices."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}]}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "3"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "4"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "3"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "4"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{518, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}]}], "]"}], "//",
+ "Factor"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"c1", "+", "c2"}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1061\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1062\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1061\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1062\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{479, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Setting ",
+ ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ " disables this behavior."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}],
+ ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}],
+ ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}]}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnXlUE4e+x23vH/fd9zy3tdttn9oqRTa3tmqBYhCKxQWQqhQL1R7xoj5F
+seq96rVVrojigmulz7K5FBC1buAtFdfSgAStQGVTBGTfSQiErDN5ScB3hcyS
+zEyYSfL7nFMPHTPfzCTf30yYJB/HLlu3YMWLw4YN2/gfmj8WhGz23LAh5B8L
+X9b8z2fhG1etDF8eOif8b8tXLt/gsuwP2oWa/2a9MGyY9mc1AAAAABiLrP56
+UnxaZk5xvRRle1sAYMhBLK32suoToX89XSVjezsAYAhR1p5cuOxXkVrdUxDu
+/mVuF804RPzwbPy5rKzkiJCovC6KxwhFa/a+OW4RpVJ1b/Fm909/bqeYg7Rc
+9rPjRRzZuz7Q47OYgm5LO2SZHagSnoIhAG3PXDj3TKNKLXsU5TLzfDNCKw3p
+vBnmd6xSrjlFlkd5BOeKKSeJshd7H6uSNmcsi8wXU22COC/QwTNTc0hAO68v
+sPf8kebeAZRB5Y38+PWzp37KF2HfQN5w64eLpT3GP9OUV2QbpKvgx9ScNiXR
+Eor03F/tHf1IplY1/ODhEv2Y3utUpOXiXN7+Cs1MqyWFG2ZufdhLOUpattt3
+e9690yd/pzzSmqG+G2DvmdWh+UlRdcTlw726LcPGmkplwjrhgMpa6xvvrbd9
+yzsba6iVzVe++jK+0vjyUV6RG/SWHF78jxsdKqIlFNCcn10/+akdlVd+7+m0
+RCCmdyoT5y4a55rcoNmknqKdi2Of4M8QKdKSHZ6Lt6U8oX5Y0KBqTPWe+rci
+iSaudLv7kjtCnNGzvlKZqE5EaKrmNBJrqJH2zMUuYQLjX9UZsOJmfJqamoy+
+R6ZBO28tdl6V89yvqfpL9CHZHVXjGU+HGR8v/mrH/kP+U/xjrlT30kiTlkVM
+HOnsG3Eq/XLKydvNCqLdIXucxffC/ie5ljDCoE16khS2dNvx5PioHZfqcdKs
+slTU6mRYtKTszK493yXGRS/1CowWiPpPFHhDrengDIegu4MfRbTn8a37nSpN
+WsmhT53G2E/xjRp0UQRnxYHhwryTfw/wnLnlYGSYz/hXXp247EITk69H0N6q
+n/cEe7iviD/9vxEhH410CD7Pz0javzFgwsgpfy/sIV+/87qPg++1DpRgyUCk
+Valr3N8Z8fbsA6XaEx7aXXT46/hK6XOR7T8HeMVWk4+OQWnKmjieS4whp2fS
+KANhJMd8S0WrUcbXycCNEvHXuq/O1R4bpBWHAvx3l/c/H3hD3S343PaDo1UD
+S4h03NkW9UDz0CrrTvnN+7ZEgnQJtkcXS0hX1Nucjmuz/9v2qxttKjXSdtXv
+9Zed05oYvbLSW7zZYZTvmRpN7TuyPP/yTmhGs1Ktqj85bbRHZltXUfz2tUt9
+pk0JTqrBngtp2bZJ4zf83ku05DlktecT+G3yLsE3k22DcsVqZUOyr8fuskEz
+7brJsF98ydMU1d+6vrepmDyNPMowGMrhQKlQydOCWsLXSDgQNaodJY41sk6G
+0p3/hQPvYov+4OANtfCO5+hpPzQMeN2vqIr1Cc0Ta0v1/cJvCrQPu+Y1V9IT
+KdmKeoh+XTTWaVupbsWeByvHjpr/y+AtQMWko4ePvGLfpLd9s7RHwp4Hq8aN
+W/WgR3d4nDfm/cNPOspz6qXavTnK++QC9lVaeeXB922DBd1ES54HUehilHVJ
+7h8dqWzP2zRnq4D6VScG05iKYiaH5VKhskZB4nxb54Ra48/gBI06VF5DEmts
+nQyki+8z2imy/NllBlT57F0svKEW5y6wmfLd0wHHRuGtudO05wdlzYmFmwq0
+O9WVf2h3gZh0xcF05y971/6rvuOUtOyfE+1C+aJBDUHE5KOHi+Jp7AejZ15p
+RbQH2E0ONl9qS6N90m0mRj3qfwwU9RnbYnKF2MGy8shJjmsKJURLMHdMsHTG
+xnM7g2i8N2SaNKai6OWwXSrdMLlOpzDUJI0iiaVaJxKUDSleb7zhvY/fokB6
+q67FnX12rVP2aCfmUMsrD0wZv3bgvXbfWzbOcVVK3t2Euf7Jd/Myjq1buOJc
+g5J8xUFICsPtbELyu3XblRbMW/tzO94xmGj05M2CzFuPe/T/Tll3wnkUL61J
+pXvwJoxZoLsW2y0IsXXcUqLbb0VrbuI6b5vRc44/xXwRIM4LsndLbVQRLFEJ
+7/14qUA0cMMlhevGO3nt+V1ibOMZTGMqygQ57JeKePooN4pkqA2oEzUUjelb
+vMe9Mvw1e6/wtKd9pytFW1HmXvdX/mvcxnN5lZKB+yJ7vMvF7XjNgIOjqv1m
+pL/Ta3988cU/vvT21IXbLlRhfMYXa8UBSEu/dnrzwy827Dp8dP+OrUdvt+I9
+FsSjJ3scPfXPf7LbUiIdtNL9s+F2fx4VfLasszYn4YtRw98JvfSk/VHWAe/X
+X37/YE7n/9+bvOrIdPcTdRj3Lnu0y8VrwHOkv0TEX2JvvyR74MlAUrTl0/0l
+FH5TYjCNqShT5LBeKsLpo94o4qE2pE5DBCLM3jx/r/7VmJ6CDX6xRNcs8Fbs
+R16xZ9KYBbfx3sjUuznu6GkviqZvTjPgzRic7Wy+FBjG139fARXnf71g54Pn
+rr/qL8FE2XRu6fyzJL/5GQyDaUxF0c9hu1RkL78pNooolnKdTISsNuNw3KB3
+QaWl/5y55jeSi/hYK/ajqD72wduzfjL4M8Z4o6epWOvt8zcbjf7UhaLu1CKv
+wK3H086npN0X6hVUVvvTsSNZTQqiJdgb2nZ1ke1Usku0hsJgGlNRDOWwWiri
+oabYKKJYynUyJai8vUP+3EGmK3flZO+rbeQjOWjFvmXSul+T/jp2+Jv+3//a
+KCPMIBk9k4FIW4QDN1t/CSZox7U5ExeeY+itUQbTmIpicpPYKlVHYUrAGLvV
+V8q6mGwUQSzlOgEAAAAAAAAAAAAAAAAAAAAAAAAmBrSigLVjWWZR0IoC1glj
+ZlFV243IoBmTxrw0wsZxwodB6S0UP1YBWlEAoAVjZlFE2twmQ3sfRiw6Rfv7
+AaAVtTqsSQLZh7mYRdWy8pjP4+h/TBy0oqZm6OWiRFifBLIPszCLKmsSZgVf
+76TdcdCKDgEsyEWxsUoJZB9mYBbVfoXfy27Ov9rIDg2gFTXfRqlaMlauzaf+
+LzboB5qtBFJtBWZRA+FUDjTKWLmoqv70J763hExsfx8ckEDSgdgDqb2Fou50
+kMfucuxXdBw3ixoGx3IsuFGtQsGBFb5ujmPfC44twbY+UZGLMj7UrJtF+++S
+aPTwITKLatuBSh6didnl5hyJk2wZZlFu5bDeKEREOnr4EDWqrCI56bcuRC2v
+jnd/1wd7Co1olLLx/LJZM7S4Oox4dbKb7se5a3L0lYrGwr4Eknz0cCHxQCJC
+QVJKacOdeW54yZZlFuVGDtuNklaTjx4uhI2SqnpVujuTFIS7heZjHvipNIrx
+MzX7EkjS0aPogVQ0ZiZcrZerRdn4Q222ZlEO57DdKJR89Gi4anXBD/ctj8O5
+RE9FLsr4ULMtgSQfPYoeyKbygwF+8/z9/X14b73qODs0AcNaar5mUS7nsK4V
+7d8L3NGj5apFu4tTE7LxvNeU5KLMDzW7EkhZBfno0TSLdvEDeDuxDhcWZhbl
+Tg7bWlE12ehRbhQqrbl24ZcWzXpIT02FeHA8p+SiHDCL4o4eDQ8kYbKFmUU5
+lsNqo0hGj7qrtj51ib2N/XgNThN43ww++HBPLsqWBPIZBENtEizMLMq1HDWL
+WlHi0TMZIBcFAAAAAAAAAAAAAAAAAAAAAADgPGAZBQBLAiyjgNUhfZoRn5p+
+4XBIyImqRn58VjPdT3cg4odn489lZSVHhETlEXo1CADLKABQpOfBdr/tv0s0
+5b842/Pw3p0322h+QhvpvBnmd6xSrv0yUZRHcC51FQ5YRi0FtLfih/CP7V4f
+PmLs9LBTj3EkWiCEZEgIKcoOnLpC+6FnRc33H01efon+abrl4lzefp3LU1K4
+YeZWw0wrmIBl1HQMqV+0t/Tguti8Frmi437svDdfmrwP40kAIST+EiNBmn/0
+mLq1RKpGO65/9vGRiu4OOc0zmTh30TjXZO0XqXqKdi6OfUL5yy5gGTUxQ+YX
+VTTfvtHU3wNJ4RqbkX78wf+IBAghjRRCqok8nMqmi6sDoi7fzbm4w8t5fWJm
+sQHaYKLHR1oWMXGks2/EqfTLKSexv9FkaJTBllGyTQLLKDaU60SWKyk7s2vP
+d4lx0Uu9AqMFoucb1X0vxNFV73vpIIRkVjFqFKRpypo4nkuMIadnsIwyAq1G
+UfKLkm6RiL/WfXWu9sAgrTgU4L+7/N9PBirMXu21Ud8bZsFCyLauovjta5f6
+TJsSnFSDPReMK0aNgTxNUf2t63ubDPhGIVhG9W4keVpQS6hhx4FYWkscS8Uv
+SkZ3/hcOvIstGFODCHOj1yeWY2wN60JIVEw6evgQCSGfdJTn1Eu1e3OU98kF
+7Ku0lqEYZTDKIiyjqKxRkDjf1pnYLIQNQaMOldeQxBpbJ0Po4vuMdvq3/QtV
+KnVPB9pbkbo3sQj7uWFbCImIyUcPFxLFaN9t6jO2xeQKsYMtSzHKYJR5W0Z1
+w+Q6ncJQkzSKJJZqnYhQNqR4vfGG9z5+iwLprboWd1Z7oVNel34oLr/vt2tE
+VHw5c6DbhW0hZD9Eo0dDCKlozU1c520zes5xTCGa+SpGGYyyQMso2VBTbhTJ
+UFPxi5KjaEzf4j3uleGv2XuFpz2VqVVtP62y/9MLw/p54T8n7R981YUDQkji
+0aMlhNQirzoy3f1EHca9m69ilMEoi7SMEk4f9UYRDzUlv6hp4IAQUndz3NGj
+qRhVI82XAsP4+u8rWJhilMEo87eMkr38ptgoolhO+UXVnFCM4o4edSFk3alF
+XoFbj6edT0m7L9QrqIUpRhmMsgTLKPFQU5bW4sdyzy+qZlEISTx6JsPCFKMM
+RlmCZbSjMCVgjN3qK2VdTDaKIBb8ogAAAAAAAAAAAAAAAAAAAAAAACwB1lAA
+sCTAGgpYIwyKQ1VtNyKDZkwa89IIG8cJHwalt1D81ARYQwGAOkyKQxFpc5sM
+7X0YsegU7Y//gzXU6rAmx2Mf5iIOVcvKYz6Po/8pcLCGmpohdYeSYn2Oxz7M
+QhyqrEmYFXy9k3bHwRo6BAyZO5QMq3Q89kHN9Ei4O0aLQ8keHGXdCS+7Of9q
+Izs2kOUYag0lyQFrKCGmcocaifk6HtVWIA41xxxoFNPuUKPhgOORDsSaR+0t
+FHWngzx2l2O/ouO4ONQscyy4Ua1CwYEVvm6OY98Lji3BljqZwh1qNKyLQ/vv
+kmj08CESh2rbgUoenYnZ5eYciZNsGeJQbuWw3ihERDp6+BA1qqwiOem3LkQt
+r453f9fnlhBzfRO4Q42Gfccj+ejhQqJ5RISCpJTShjvz3PCSLUscyo0cthsl
+rSYfPVwIGyVV9ap0dyYpCHcLzcccU1O4Q42Gfccj6ehR1DwqGjMTrtbL1aJs
+/KE2W3Eoh3PYbhRKPno0VLS64If7lsfhXKI3jTvUWFh2PJKPHkXNY1P5wQC/
+ef7+/j68t151nB2agCElNV9xKJdzWLeG9u8F7ujRUtGi3cWpCdl4WmuuuENZ
+dTzKKshHj6Y4tIsfwNuJdbiwMHEod3LYtoaqyUaPcqNQac21C7+0aNZDemoq
+xIPjOeUO5YA4FHf0aGgeCZMtTBzKsRxWG0UyetRVtPWpS+xt7MdrcJrA+2bw
+wYd77lC2HI/PIBhqk2Bh4lCu5ahZtIYSj57JAHcoAAAAAFgL/wfhvjvi
+ "], {{0, 85}, {
+ 327, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{327, 85},
+ PlotRange->{{0, 327}, {0, 85}}]], "Output",
+ ImageSize->{331, 85},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[6]=",
+ CellID->772821713]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will not reorder Dirac matrices lexicographically, but can be forced to do \
+so via the option ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{49, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[2]:=",
+ CellID->990886795],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{110, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Setting ",
+ Cell[BoxData[
+ RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]], "InlineFormula"],
+ " makes the function assume that it is acting inside a Dirac trace. For \
+instance, chains with an odd number of Dirac matrices will be set to zero."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{74, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["Yet, it will not explicitly calculate the trace", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{100, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{100, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Since FeynCalc 9.3, ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will automatically evaluate Dirac traces in the input expression "
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{123, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{282, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " "}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{280, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SubsuperscriptBox["m", "e", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{482, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[TextData[{
+ "This will not happen in the option ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
+ " is set to False. However, ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will still perform some simplifications inside the trace, without \
+evaluating it explicitly."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " ", ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SubsuperscriptBox["m", "e", "2"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{
+ SubscriptBox["m", "e"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ SubscriptBox["m", "e"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ SubscriptBox["m", "e"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{502, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Set ",
+ Cell[BoxData[
+ RowBox[{"DiracTrace", "\[Rule]", "False"}]], "InlineFormula"],
+ " if you want ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " not to touch the Dirac traces."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " ", ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrace", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{280, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "When doing calculations at one loop and above, you may encounter \
+expressions that contain ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "- and ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional objects."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GA", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{119, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Although ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " can handle such terms effortlessly, it will not do so unless you certify \
+that you fully understand what you are doing: being sloppy with the \
+dimensions easily leads to inconsistencies and wrong results!"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"DiracTrace", "::", "mixmsg"}], "MessageName"], ":",
+ " ", "\<\"Expressions that mix D-, 4- and D-4-dimensional quantities are \
+forbidden in Dirac matrix chains unless you are using the t'Hooft-Veltman \
+scheme. For every other scheme, please recheck your input expressions and \
+ensure that all matrices, spinors and tensors are purely D-dimensional. You \
+might want to use FCGetDimensions[exp] to find the offending terms and fix \
+them by hand or ChangeDimension[exp,D] to convert the whole expression to \
+D-dimensions. If you explicitly intend to use the t'Hooft-Veltman scheme, \
+please activate it via FCSetDiracGammaScheme[\\\"BMHV\\\"]. \
+\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
+ButtonFrame->None, ButtonData:>\\\"paclet:FeynCalc/ref/DiracTrace\\\", \
+ButtonNote -> \\\"FeynCalc`DiracTrace::mixmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[2]:="],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "By default, FeynCalc uses the naive dimensional regularization (NDR) \
+scheme, where all Dirac matrices are taken to be ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional. Therefore, in NDR you may not have mixtures of Dirac matrices \
+living in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " and 4 dimensions. However, such expressions are possible in the \
+t'Hooft-Veltman-Breitenlohner-Maison (BMHV) scheme."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[3]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GA", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"D", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"D", " ", "m"}]}], TraditionalForm]], "Output",
+ ImageSize->{154, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[5]:="],
+
+Cell[TextData[{
+ "The BMHV scheme is a special prescription for handling ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization. Do not activate this scheme mindlessly just \
+to get rid of errors from ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "! If you are doing a calculation in NDR or a calculation that does not \
+involve ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ", better make sure that your input expressions are correctly written to be ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional objects."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces that contain an odd number of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " or chirality projectors cannot be calculated unambigously in NDR. To \
+avoid inconsistencies, ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ " will refuse to evaluate such traces in NDR."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Alpha]",
+ ",", "\[Beta]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{193, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{193, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["\<\
+Such traces can be consistently calculated in the BMHV scheme. Our scheme \
+choice as of course also possible, but those are not implemented in FeynCalc.\
+\
+\>", "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[3]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Alpha]",
+ ",", "\[Beta]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQtQVNcZgE2baTPpdMYmk4kzGWeajiYaa42PiaJRRJGoo1HRRJuQVhgV
+Hwk2an2QihppqGKqaXxMVKwaNDUKRY3RarQTNWp8BCvEF+CDKBCfCMguLLun
+u64PhHvvOXvP455z9v9mklFZYc93/nO5C4zfswkTY8f8pEmTJpMf8/8vNn5a
+1KRJ8TOGNvX/5rWkyeMSk0aP6pc0ZXTi6EldEn7q/8NX/f9VPdKkSeDXCAAA
+AACcxlt+NGP+4nUbVv5laGJWqcfppwPggS0TBqgGVMVXvndcv7+fdaOaoqV9
+YjMvU06v18fmaYUJtnQx3jLAnNBUw/ADwnBd2Lpi/ZasRfHx/zxXsn/FzrLG
+s1lxcHRM6rb0sSMGjlySV2VnOD3Fq4cm7CtHqCo3qccfDtyq/7baK3vn9+s2
+66QLVedP6zF4x7WGH8Bbkbdhxec7d2bOik89dKv+W32uC/9ZtW7rl6undHji
+iV8/9/zzbaM/OOOy8fxEQiDcShcZVlsGwuu/FWsDB/Z04HdTM+GAFFR9lzIw
+5cRt5P0xu2/Uonlzd1+ta/SY6hPTYt7Lr/Y/+NjEbvH7bVxpfNe2D+3/WUkd
+cp9J7RK9sczb4O3le+NiFp9zlW1NeP9wRYPT4b2xe8LAxUU1CLlPp/Z840DF
+g/davm/ykMWFNYHTk9F7wPaQT6UTkAjH6cKD2zIQXh8rG1iwpwO7m5oJB8jx
+lG4a0T7u2wrTB7gLFw5//cMCO5/Ny/e+3mnMsSr/3cvFT7q2G/1vg3tI5C5Y
+0HfCkcrAr86mdYlcX9L4YoSj6uj4mLQzblR3+dOeXdL8L18b4Dr1wYCUQ0fW
+rj7R6Gj5j2T/7ukF/vFGt49Pik7Oq77/phu7Y7ulnAwsu6bgw+g/HjQ3FBpO
+C8fqwoLdMhBeHwsbWPCnA7ebDggHpMBTkjXq5aeaj7CYfO+t3Ozs3PLQ7+6Q
+t2xTz07J37uQ7/qu13p9VFB5vabRe/H8sKpX9IZS/5/XFH4U2SO9wMal5kxq
+RJ8vr/lqij6JeuGtbysafQzX93Oi4mauK6xu/HcrDgxvGZF52X9iqv43N25J
+4B7m/pPf2CtiXuBMuAuX/X72d5UhPy9DHBeO14UDv2UgvD4WNnDgVWN3U7hw
+QApqL216b9G29A4trCafAk9p9vhhqTkHv8me07vzuxnb8xuNnvfKlsFR06fP
+nDnj3VFvTlpXZH7vNO1hSktL776hruSzqFaRveL+NCd94aCOgxZsPl/d4Pao
+4siEsZnFtQbv1HVqVttnOg+YtWZLzrrV/y176CGekk3jhkxf/cWWzFW7LoX+
+GccQ54UT6LqLmXCCLRMkvO7HrYnvHLYUKYFwCxv3sK8au5uiJxyQgtriDcnL
+T986v7Sj2eTXXt2XMTam+5B5C5Zb3XXU/LBtYfqKzCWJzz3+s6dj3p679jzp
+y1vfzT1v9Vt5keDHLOpuHl4xOe6NUUlTkv+6MvfWgxPku7ZjWO8l562Ojime
+i8u7d1lQ71aGLxIIJ9dlJpx8ywxgK7zu0to+A/bcNH+ADMIJsK8au5uCJxyQ
+gpoLmckZBS5Ue8F88hEq/3pIi86LcpadNL3r8VUc/vNLkcsv1iL36dmtn+56
+5xUkIZ6S9YMi5xN8GcZ1Ku3lVm9mXW48xIHpjpiaZ+P1rv9gn/844sWp+bb+
+bujIIJxYl6lw4i0zgrFwzLVdCuF4KFRjd1PshANC8JRsTHglsgH93/6m/O4r
+NnfRmuQ15wJjYzn5VUfHtGqfkvOPYzfMvgvkvfpF3+bt7twZVB5JaNN9ZTGH
+n3W+nTv+2V8+0yt2uJ8Ro9JO3Wb/IeyDUx0EhDPjgfCIVr96sl03tYVLrToI
+2YQDcuA+m96zXdt2d3ih+eM/b9ryd1ETj1c1fFh1/rQ2bcZnL/76iukPr3iK
+Mzo16+ifd+/VHeOGpeVW8tjv8r0xzX7zznEJx54UEM4Bq/t2ZYSroRpQEU/x
+ypdaGt/V1BSmt28V9/myzKP7vzL6JlEAb2X+v2aMn/Lxhs05e4puc/pE7j6b
+1vap9gttfiVAMkA4K7Bfbw8it3A1VAMqYjH5rtPvd/9t7MihSRl5lSZzf23H
+yNbNn/zFo4/4ebRph8mcfpDKV3liaULProPGTE2ZPXfh1lJb3zmVBBDOCvpr
+uwzClVANhBm1pdv/NjfrYvCOw+e5cWTR9EPYkwbYB4QLBoQD4UhdWdYrLaJz
+rgTvd7yVBV9t3nUZXlnyA4QLBoQD4YmvKi99cOtmzV+MGZE4fd7y7GPX4V8D
+5AoIFwwIBwAAAAAAAAAAAAAAAAAAAAAAAJQGapLiAef1ARuCAeFhAdQkxQPO
+6wM2BCNRqzecd5Og3WkRcySBqiZp2bJUMiWJE85kUfycB6CbB/Ew6JlaQ9lj
+1S6WStXqtYZJa1g74UaQtDvNY45EUNckzVqWSqYkccLZLIqb8wCU8yAe+p6p
+NZQ9Vv1iqTStXmuYtIblEe50StIi5kgCfU3SrGWpZbuTyaL4OUfU82AAT+GI
+hQ1rKHusmtVpEV2r1xomrWFp6rTOpyTNY44kMKhJmrQstWx3MlkUP+cB6ObB
+4NnyFI6Y2LCEtseqV50WUbZ6LWHTGpakTitBStIq5vgQhkFJBjVJ05allu3O
+0BYl3HkI84CkEM7ExgOMhNP1WHXLAdO1euthU7XYOi3BhBsjQ0qSLObIsSbJ
+EF3anUGccR5S3FMC4QxtmOaAadAuB0zV6r2HfdWC67SE/4R1Q6RISRLFHHnW
+JFmiR7sziEPOQ4t7Oi+cnQ3zHDAN2uWAqVq9d6FQLbpOa+varkpKEslfk9Sr
+3RlEaucgXDB65YClVh2EbMJNUCYliRSqSWrR7gyihnMQLhHKCFdJtc2vydxD
+7pQkUqgmqUW7M4gazkG4nMgtXCXV/K7tMqQkkTo1ST3anUGUcA7C5URy4Qqp
+pry2UwApScGAcMGAcMGAcCmAlKRgQLhgQLhgQLgkQEpSMCBcMCBcMCAcAAAA
+AAAAAAAAAAAAAAAAAIAwBOKGggHhYQVst3jAeQCJ4oYoLPqGcglHYeH8AcIX
+K912C8aJ6Qp35/fA1iSp+piUfUP9eqk44QwWxdN5ANV6qVSLtYZANc35UnTC
+aYqleCid63hJMQFbk6TpY7LoG2rVS0UY4QwWxdN5AOV6qTSLtYZENcX5UnXC
+KYqleFg4l+WS4nTckKaPyaRvqFMvFeGE0y+Kq3OkYC+VZrHWkKimOV+KTjhN
+sRQLE+eiLynGOB83pOhjsukbatRLRTjh9Ivi6jyAar1UqsVaQqKa5nwpOuE0
+xVIsbJyLvaQYI0HckKqXyqJvyK6XSoDjwul7qVydh9ZLJYC7cKrF1sOearrz
+pWIRmLJY+hC8nAu9pBgjQ9yQrpeKR2QvFYsMwolxxjnb3KSAQC2LAbOtmtX5
+IkWCQC2rYilH584jRdyQrpeKR2gvFYMUwklxyDnT3KSIQC2DAbOvmtH5Isf5
+QC2jYilP546jStwQyd831KsmGURq53oJl1p1EO0CtbI7J5twE5SJGyK1+oam
+qCQc6eBcGeEqqdYlUKuScxrkjhsitfqGJEgvHGnmXG7hKqnWJVCrknMaJI8b
+IqX6hiTILxzp5Vxy4Qqp1iZQq5Bzh4C4oWBAuGBAuGBAuBRA3FAwIFwwIFww
+IFwSIG4oGBAuGBAuGBAOAAAAAAAAAAAAAAAAAAAAAADgCNA3FAN4Fg84Fw84
+b4RD6UzoG4ohNM9h1VHlBjgXDzgPYh03FJPvtN03DKBQvpPrWli0O7kPg2B4
+xzH5Ow+g0IQH4VqA5e2cMqErEZZxQ0H5Trt9wwCq5Tt5rYVJu5P3MDgBxzgm
+f+cBVJtwvgVYIc7tJ3RDwtG4oZh8p+2+IVIw38lpLUw88x4GYxwSLslsc62L
+GsNZONcCrBjnthO6oeBs3FBMvtN23zCAcvlOPmth45nzMBjilHBZZptnXdQQ
+7sJ5FmAFObeb0A0Bx+OGIvKdFH1DBfOdLNbCyzPTYUCS5DsZxTEdcq7ghLMr
+wDrmnCyhS4MMcUNinOkbKpfvtMDxjiTzdq0M+U4WOOlcuQln9IRVmvOQkSJu
+SIpDfUPl8p0WON6RZN+ulSDfyQBHnSs34WyesFpzHiIKxQ2R5H1DjfKdUnu+
+j175TgWcazThQRRwbh+V4oZIh76hGsIV86xFvlMx56YoIxzp4xyH9HFDpFnf
+UGLhinnWIt+pmHMS5BaOtHRuiPxxQ6RX31Bm4Wp51iPfqZZzEiQXjnR0zhqI
+GwoGhAsGhAsGhEsBxA0FA8IFA8IFA8IlAeKGggHhggHhggHhAAAAQHjyf6mE
++As=
+ "], {{0, 78}, {500, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{500, 78},
+ PlotRange->{{0, 500}, {0, 78}}]], "Output",
+ ImageSize->{504, 78},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[4]=",
+ CellID->34872333]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[5]:="],
+
+Cell[TextData[{
+ "Keep in mind that the BMHV scheme violates axial Ward identities and \
+requires special model-dependent counter-terms to restore those. Therefore, \
+just setting ",
+ ButtonBox["FCSetDiracGammaScheme[\"BMHV\"]",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ " does not automatically resolve all your troubles with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions. The proper treatment of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization is an intricate issue that cannot be boiled \
+down to a simple and universal recipe. FeynCalc merely carries out the \
+algebraic operations that you request, but it is still your task to ensure \
+that what you do makes sense."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+Since FeynCalc 9.3 it is also possible to simplify Dirac matrices with \
+Cartesian or temporal indices. However, the support of nonrelativistic \
+calculations is a very new feature, so that things may not work as smooth as \
+they do for manifestly Lorentz covariant expressions.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGA", "[", "i", "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- OverscriptBox["v", "_"], "(",
- FormBox["p",
- TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{47, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-", "3"}], TraditionalForm]], "Output",
+ ImageSize->{23, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGS", "[", "p", "]"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}], ".",
+ RowBox[{"CGS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
RowBox[{"(",
FormBox[
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm], ")"}], ".",
- RowBox[{
- OverscriptBox["u", "_"], "(",
- FormBox["q",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{117, 18},
+ ImageSize->{193, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[13]=",
- CellID->759706260]
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{362, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGS", "[", "p", "]"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}], ".",
+ RowBox[{"CGS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}],
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{226, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t6", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[14]:=",
- CellID->1935005981],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{140, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[14]=",
- CellID->1632860123]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GAD", "@@",
- RowBox[{"Join", "[",
- RowBox[{
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"Table", "[",
- RowBox[{
- SubscriptBox["\[Nu]", "i"], ",",
- RowBox[{"{",
- RowBox[{"i", ",", "6"}], "}"}]}], "]"}], ",",
- RowBox[{"{", "\[Mu]", "}"}]}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[15]:=",
- CellID->1949590828],
+ RowBox[{
+ RowBox[{"TGA", "[", "]"}], ".",
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"TGA", "[", "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
+ FormBox["0",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
+ SuperscriptBox[
+ OverscriptBox[
FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "6"],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
FormBox[
- SuperscriptBox["\[Gamma]",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Mu]",
+ FormBox["0",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{213, 17},
+ ImageSize->{71, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[15]=",
- CellID->376958677]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[16]:=",
- CellID->789913816],
+ CellLabel->"In[8]:="],
Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQt0VNW9xiFe6NXW296lVcCKgJVXtaaAiaaCFVGs+LiI1oIWA1xAEQqE
-IBAeEUxpEQSnWIJyK3SpiIIKChXtg4jcC7GCIWGJgkEe8khCgLwgTDIzNzOZ
-DCeTmT37nL33zH+f8/3Wsgua8M0++/87Z05mknydR058cExSq1atpvx7w/88
-OGLa7RkZI2YM+beGv/SfkTl65EUNf3i64b8eDZ/j/7MPAAAAsDHeso13JI8v
-qGn447kv5qbdvfJIHTLpxSpaqkR0OWpdMhXF0hcJOIWaggk/G/hhuddT+v4j
-t0z5rAqZJGMVLVUiuhy1LpmKYumLBBxC/dFXb7tl0dcVX86/7f7XjwZugTyV
-u9/83W+Su9299Yy0TJ+3qmDp2PTpi1+YNWx07ldnpWR6Kj5dOHLEnKUvLXpq
-ZM620x4ZmQHOfbngpqtvz5N4+Oe/XpzaIzklNTU1bdCswmoZmZ6Kfy3PnP7C
-n19ZOvOxMcsP1FpbrDQgEkQCwARV+cNvGv7B2sf6ZQW+DA9yessvOv3C6ikT
-KbN658RBc4rO+jyl6/t2e2RHpYzM+pOfvPbRcbfPW/Z+P1mZDdQeXDMjq+eP
-pB7+2T1/mLDdal6kTG/l9if7DNlU5r9MusuLj571CoRLASJBJGBr6k5+/KfM
-R27t2vWXhpvJhhvMlycMHjblmdmThg6d9/Gpeu449wHXzV3v7fPwuuPGf3Mm
-T+SKETmz6UN9ej5lPEFFMr3nDm567eUlszPmvrHPwjkTKdN9+K3sNbs/knz4
-VbuzczZtXP3Sije3fltr5eQOz6wpGH9DyqKVmf07ff/y7g8891mF6Vt1I56K
-gr/M/uWVbb/b9dcZc3Lm52TPyJyy4N0vqsyEQiSIBGyP9+Rf+15jULpm94Rr
-2w1441iDTeeLl6T0mr33HHfWmY8HXd1zdlHzly7ErhiRMxs4f2j16Pumbiyx
-8t5mtEzv2X2rBqeN3lzG/3QbPbPu6DvTl+09e1r24Z/dn7vsw33lJf9acnuP
-X60vEV/qma13tbvqoaXbj575Nm9un/a9Fheft7raRmp2T+xyWcqrR4NLqyv7
-aNrPH1hxyG15hcH/EyI5TCRgb8LO6PozO9et3Vvlvwvylr53a+eBYa+un/r7
-Xe2vywzq5inb9KsuN2a3PPei50fCdGbdic3zpq4oYN1Km84M4C3dcOu1926r
-EM70nPxg+M2PTpv37MxRnf+z86h5K/dWR72xtLZUz4l1P7/uwf+L8pKOiczK
-HY906/deqTeQuTat8z2fRDl8P96KXa6c5cWs2xH3wdyfXdZtjuGWpe7Qy2m9
-54Tdw0AkiMQWCdic6Gd05fYxPVOf/7r5rcu5L2Z1bz/gb6f8f64pmHH9j9P/
-cYr5hTXHFcNcpuf0tvkTVu3zS+upLa2N8ommMuuOrRv1xNvH63x1R15JS86M
-drqaPnaf/MOv2Zs7f8Mxt/8Kv+zmXrO/iHLumsj0lG4Ykpa1x3/M7gOu1D7P
-fsV4e7j+2OrUjv1Zx+M9+cGdV1w1tNmlrHxzvy7h9zAQCSIxRQJ2J4rS9WUf
-PX3XsBf3hN9jecs23dbhhkUNT0juw3/u32UA89v5PZV7NuY+2eUH147L3bin
-MupZYCqzdt/8G6/o2ju1gZReqY9GeyfXVKav9uDq3w5+fKbLlTV8+obj0T7T
-XGYD7pIPl41tOPzfvv5VTfRX003Fuo+tmzz40WlLXlqS+cRzn0R9J87clh5a
-mzXu2WWvrFg4ebzrU+ZL9LGvGNU7R19zed+3Swwp7m+W9r7usU+bf/stRIJI
-eOqxMZX5Qzte8h0jl3ZvfjMW6anHfz/4+NPvHI70Wu3ZwoyunX6dX3HqnyO6
-JmfvMf89qciMR6zszJBIbZJaJ7WNJFIj579edMNl1z+336BO/dHX+nYe8G5J
-2JVIh6PWKVNRbKJEAprjrS09fPAbIwe/LXcbb5xaPPV4Kj5dMv7Zv5VGubvx
-nHg77aqUFf+Y27sbx8sEfDg5U1Gs7MygSMX5ruQOaWsKI4jU+LAl6/td3nHU
-Zxd+TMRzZtvkn/xkwo7K8M/V4ah1ylQUmyCRgP0J/LjEltNNf3UfWTWkX/bn
-lXV+3Kf3bzkR/oJtzedPXHt5jx93vHOV9V+dcf7IWwveOnLhzthJmXotNYxY
-r5NU7njsRz+8468ng5eS+lM7Fg/56T0LCqoiXFuoHrUumXotNQy84OZo6sry
-Vj6XeU+777YbNHXhyryyOv83xk7q0rZViIuuHNziW1/qj76acukl1z8j8rV3
-TUHGnZMNP0nhpExFsYqWGoanPC8jPaso4s++1x5694+Tb7uszcWdHpw4Z+4z
-2bOnjRsxalruluNRvseW6lHrkqkoNvEiARCR6p0Tu3y/x9wvZf6aDCdnKopV
-tFSJ6HLUumQqiqUvEnAGNZ+P69T2e73/57DEr76dnKkoVtFSJaLLUeuSqSiW
-vkjAIZz7cu5Nne5YekDmTyo7OVNRrKKlSkSXo9YlU1EsfZEAAAAAAAAAAAAA
-AAAAAAAAAHqhUe27jZeqaBni2HjPE5VpIRZ6OCTTQixZN2KjUe27jZeqaBni
-2HjPE5VpIRZ6OCTTQixZN2KChnoVDfWRYit3v/m73yR3u3trhMOPdGjeqoKl
-Y9OnL35h1rDRuV8l6Bc0qlgY9JChh+hJKoV46aHiimRjNwKInU3xAA31Khrq
-I+9A4BfuRTz8CJ9fvXPioDlFZ32e0vV9LU1BCioWBj0k6CF8kkohTnqouCLZ
-2A2fhLPJFLX7F1v4lX5oqFfRUB9xVxl9YZE/v+lDfXo+ZdTKGhL1EFwY9JCi
-h+BJGgZtPRRckezshoSzyQTuI28Ov799O/OPhYZ6WQ31ntqquiaHI+4qo6oy
-2hTOH1o9+r6pG0tE3zyUrofIwqCHLD1ETlIjtPUIIvWKZGM35JxNvNSXfjAl
-a8M7/aI8FhrqpTfU15VtfXHCsLFPZ8+bN2vS8EH3PfzAwIHp70RttgzA0ZLc
-/DFObJ43dUVBlfAL+bL14FgY9FCuRwD2SRr4jIpdrpzlxVEqtP3Q1sN4KLKu
-SAbs5oaZs0kc7+lts8e/e/xk1OWhoV5yQ7370Ev9u97/+mF34G/1x95I5XlH
-z9S1xd81O2HVPv8heWpLawWefuTqwbkw6KFUD86TtPHh2d069PVQcUWysRvW
-/4lpqncvGLWi4au76I+FhnrJDfWV2x+6Lm3N8cYP1h9/e0iX3jmRTWvCU7ln
-Y+6TDYc/LnfjnsrYTyS1++bfeEXX3qkNpPRKfVTgfWTJenAuDHoo1YPzJA08
-PvupRwc9FFyR7OyGj/dsEqR2/7LHFxT6381jPM3pUPuuMFZ6pre66Pl7u98y
-eOz0uc9M+++H0+etP5KAQpTK/KEdL/mOkUu7h98TQo8EZBLTo01S66S2DtBD
-i0wabvj4rh5MTucNvvKiVkb+I219afhTow617wpjpWee2/f7ATfPK1B3Q8GF
-t7b08MFvjBz8ttzdbE3QIxGZpPQozncld0hbU2h/PbTIpOGGj+vqwQ3rxT3C
-te86NtS7D698+OqLL27/0zuGTfrDX/6+T/w7AdQDPVQvNQQpPWK91xNERz10
-yTRCyg0ZuEu3rH5+ZKcfdB7zpw9L3C0/Trj2Xb+G+rqSzfPHz3Stff+tFQtn
-PvlQSrvvdRi4qFDlN5KIAj2UZ16AmB6e8ryM9Kwi1s/r66qHLpkXIOZGPNCo
-9p38Uqs/S++R9trR0DuTnoodM3tcMzja92fqAPk9VxsLPdiQ33NdMm3oRiw0
-qn2nv9Sa3RO7d5+0vaLpVsVT8b8z0gavOhLhdlET6O+50ljowYb+nuuSaT83
-YqJR7bsGS/VU7npxzKD/GpWZvfAF15KFC37veu+A+K8ySSAa7LnKWOjBRoM9
-1yXTdm4AAAAAAAAAAAAAAAAAAAAAB6JLazmRJnRFsWQL1nUZJZE5KoqFHuLY
-eKlk9YiBLq3lRJrQFcWSLVjXZZRE5qgoFnrQjCWyVLJ6sNG5XT2AWAU54YJ1
-0e54KUAPFXORoIcMS8UxeyAWMxuhN8r4XT2YJ52KEyoeaNyu7pNQQU63YF24
-O14K0EPFXET1kGSpOGYPxHomyVHG7+rBPOlUnFCmcFy7uowKcroF68Ld8WFA
-DwsomouoHpIsNSJTD7GSMo1GGderR9OHWp50Kk4oM8t1XLu6nApyqgXrErrj
-jUAPa0ici0Q9RCyNiFw9BPsx6Y8yWqbSq4cv+kmn4oTixXnt6mYqyPUrWDfA
-7o73463Y5cpZXhyl4tcP9JCkh/ERmHNRqwe3pX7irwfHgWg0SipXD46TriXs
-E0ocZ7arB+HwXMeCdc7u+MaHZxeyQA9penDORbUenJb6gg8fVz34DkSbURK5
-evCddCE4TyhhHNqu7oevglzHgnXO7vjA47OvLdBDph5cc1GvB5eljcRXD84D
-0WaUNK4enCed4R9wnVCCoF09AbE0CtZD7eptklontY3crg49EhALPWKiyyhV
-ZBLTI0RLPZigXT0RsTQK1oPt6sX5ruQOaWsKI7WrQ49ExEKPmOgyShWZpPQw
-0EIPbtCurjo2BKmC9Vgv5geBHqpjQ0CPlmg0SkfpIQza1eMRG4RYwbqnPC8j
-PauI9dPY0CMesUGgRyQ0GqWj9FAO+dZyhZmyY21YsK7LKKFHQnDqKFVk2lAP
-JvRby9VlSo+1X8G6LqOEHgnBsaNUkWk/Pdho0FquLFN+rO0K1nUZJfRICM4d
-pYpM2+kBAAAAAAAAAAAAAAAAAAAAnIYuleW6ZFqIpVytrsu2Exmloliyhugy
-SiJzVBRLVo8Y6FJZrkumhVjK1eq6bDuRUSqKJWuILqMkMkdFsWT1YBOvdnXR
-rnCHVasHECujl4LOegQQ20PChojKLwXooWIuEvSQYaly4tSuLtwV7qxqdZ+E
-MnopaKyHT8Ie0jVEWH4pQA8VcxHVQ5Kl/NBuVxftCndYtbqEMvowHKeHjD2k
-a4iw/GFADzlLlTEXUT0kWcq9XNLt6kFEusKdVK0up4zeiPP0kLOHVA2RIL8R
-6CFrqZbnIlEPEUtNQ7td3QC7KxzV6oFFmiij9+Ot2OXKWV7MqtB2nB5m9lA/
-Qwyw5ecDekjSw/gIzLmo1YPbUj+xrx4s6Lerc3aFo1q9GZx3j7EKWZyph5Kl
-kjGEU34eoIfEpXLNRbUenJb6gg/PVecUGR3a1fm6wlGtbjg8rjL6wBLY8jhU
-Dz98e6ijIZzycwA9ZOrBNRf1enBZ2ojAU4+t2tW1yKRRre4ztKu3SWqd1DZy
-uzr0SEAsDUNCeoSAHiRiienBuHowsVe7uhaZNKrVfaF29eJ8V3KHtDWFkdrV
-oUciYmkYEtTDAPQgEUtKD9bVgxsd29V1yTRCrVqd80tm6KE6NgQ1Q3iAHqpj
-Q5DSQ+i9Hj+6tqvrknkBetXqnvK8jPSsItZPTkOPeMQGoWdILKBHPGKDENOD
-4+ohBvnKcl0y7VmtTn7bFWbKjrWhIbqMEnrQg35luS6ZtqxWp7/t6jKlx9rP
-EF1GCT0IokFluS6ZdqxW12DblWXKj7WdIbqMEnoAAAAAAAAAAAAAAAAAAAAA
-EAd0aULXJdNCLOVqdV22ncgoFcWSNUSXURKZo6JYsnrEQJcmdF0yLcRSrlbX
-ZduJjFJRLFlDdBklkTkqiiWrB5t4tauzusWtZorWoCvqNDdbLq+oOF4KOusR
-QGwPCRsiKr8UoIeKuUjQQ4alyolTuzqzW9xipnANuqJOc7Pl8oqK46WgsR4+
-CXtI1xBh+aUAPVTMRVQPSZbyQ7xdPfShlt3iFjOFa9AVdZqbLZdXVBwfhuP0
-kLGHdA0Rlj8M6CFnqTLmIqqHJEu5l6tDu3q0bnFrmeL19BI7zXmq1aOVyysq
-jjfiPD3k7CFVQyTIbwR6yFqq5blI1EPEUtPo0K7O0S2uogbdRCZ3p7mVavUA
-7HL5puMxURzPh/P0MLOH+hligC1/ILFilytneTGjQht6SNLD+AjMuajVg9vS
-QGJMPZjrId+uztktLr8G3VQmZ6e5+Wp1znL5cATvHptwph5KlkrGEE75Gx+e
-XcgCPSQulWsuqvXgtNQXfHiBvh4N2tU5u8Xl16CbXSdPp7n5anXOcvnmh8dV
-HM+BQ/Xww7eHOhrCKX/g8dnXFughUw+uuajXg8vSRgSeetCuHu9MGtXqPkO7
-eoiW7erQIwGxNAwJ6dEmqXVSW+hBJlYfPZigXT3umTSq1X2hdnUDLdrVoUci
-YmkYEtSjON+V3CFtTSH0oBKrjR7coF1dXaYRUtXq/EAP1bEhSBnC+YoK9FAd
-G0JHPaKDdnW1mRcgVq3OB/SIR2wQYoZ4yvMy0rOKWD9YDz3iERtEPz3E0KUJ
-nXymPavVyW+7wkzZsTY0RJdRQg966NKETj/TltXq9LddXab0WPsZossooQdB
-dGlC1yDTjtXqGmy7skz5sbYzRJdRQg8AAAAAAAAAAAAAAAAAAAAA4oAuTei6
-ZFqLJduursu265JpLRZ6OCTTWjJZPWKgSxO6LpnWYsm2q+uy7bpkWouFHg7J
-tJZMVg82Orers/rKLWbK6DS3UASvqORdHOghfShy9JAhqjjQw9QcBZJZ4pHV
-IwYat6sz+8qtZErqNLdQBK+o5F0c6CF9KBL0kCSqONDD1BytJzPFS7gezmtX
-Z/WVW8mU1GluoQheUcm7EeghIVPGUCToIUlUI9BDRmaMOVpPZooXBz2Yy3Vc
-u3qQaH3lFjJFOs2Z1eqxi+AllrxHBHqI6+ETGIpcPUREjQj0kKFH7DkyYBoS
-QzzVerBwXru6AXZfuYlM7k5zc9XqZorgI/xrZsk7H9BDhh4G2ENRrge3qH68
-FbtcOcuLWRXa0EOCHmbmaM4Q44PwXA1M6SGGM9vVOfvKTWRydpqbr1YPYuZu
-kKvknQ/oIUcPzqHEQQ9OUX3BFbALWaCHLD2CxDx884aYuxqY0kMIp7ar8/WV
-m1snT6e5hWp1H28R/IVP5yl55wJ6SNODayhx0YNL1EZiPPVAD2l6+OGZo3lD
-zF4NTOghANrV451Jo1rdZ2hXD9GyXR16xDuTnh5tklontYUeZDLJGCIG2tXj
-nkmjWt0Xalc30KJdHXrEPZOaHsX5ruQOaWsKoQeVTDKGSAPt6uoyjZCqVucH
-eqjLNEJNj1jv9QSBHuoyw6BmiBhoV1ebeQFi1ep8QA+1mRegp4enPC8jPauI
-9asXoIfazGbQM0QtujShk8+0Z7U6+W3XJRN6IDNGni0NiY4uTej0M21ZrU5/
-23XJhB7IjBFoR0MY6NKErkGmHavVNdh2XTKhBzLZ2NEQAAAAQIz/B7EaGcs=
-
- "], {{0, 118}, {553, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{553, 118},
- PlotRange->{{0, 553}, {0, 118}}]], "Output",
- ImageSize->{557, 118},
+ FormBox[
+ RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{34, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"DiracSimplify", "RasterizedOutput"},
- CellLabel->"Out[16]=",
- CellID->1108569414]
+ CellLabel->"Out[8]="]
}, Open ]],
-Cell["\<\
- With the option DiracCanonical an alphabetic ordering is done.\
-\>", "Text",
- CellTags->"DiracSimplify",
- CellID->1099320763],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}], ",",
- RowBox[{"DiracCanonical", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[17]:=",
- CellID->990886795],
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[9]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm]],
+ TraditionalForm], ".",
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{102, 17},
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{123, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[17]=",
- CellID->611510418]
+ CellLabel->"Out[9]="]
}, Open ]],
-Cell["\<\
-Setting InsideDiracTrace\[Rule]True assumes that a trace is still to be taken \
-later on.\
-\>", "Text",
- CellTags->"DiracSimplify",
- CellID->120600204],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
- ",",
- RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[18]:=",
- CellID->634548915],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[10]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{238, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[18]=",
- CellID->665614645]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ",",
- RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[19]:=",
- CellID->1157409425],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{261, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify",
- CellLabel->"Out[19]=",
- CellID->1005658115]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3", ",", "t4", ",", "t5", ",", "t6"}],
- "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[20]:=",
- CellID->1926028871]
+ CellLabel->"Out[10]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -1257,16 +5686,64 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Calc",
+ StyleBox[ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracSigmaExplicit",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Calc",
- ButtonNote->"Calc"],
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExplicit",
+ ButtonNote->"DiracSigmaExplicit"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracGammaExpand",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracTrick",
@@ -1274,10 +5751,32 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCDiracIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCDiracIsolate",
+ ButtonNote->"FCDiracIsolate"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracSimplify",
- CellID->1981859865]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1285,7 +5784,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"DiracSimplify",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1294,25 +5793,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 4.907348}",
+ "built" -> "{2020, 1, 5, 18, 54, 42.365209}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracSimplify[expr] simplifies products of Dirac matrices in expr and \
-expands non-commutative products. Double Lorentz indices and four vectors are \
-contracted. The Dirac equation is applied. All DiracMatrix[5], DiracMatrix[6] \
-and DiracMatrix[7] are moved to the right. The order of the other Dirac \
-matrices is not changed.", "synonyms" -> {}, "title" -> "DiracSimplify",
- "titlemodifier" -> "", "windowtitle" -> "DiracSimplify", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/DiracSimplify"}, "SearchTextTranslated" ->
- ""},
+ "DiracSimplify[exp] simplifies products of Dirac matrices in exp and \
+expands non-commutative products.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "DiracSimplify", "titlemodifier" -> "", "windowtitle" ->
+ "DiracSimplify", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracSimplify"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1321,7 +5817,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1329,361 +5825,463 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3598, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->892315753]},
"DiracSimplify"->{
- Cell[4230, 127, 144, 4, 27, "Input",
+ Cell[8064, 240, 144, 4, 70, "Input",
CellTags->"DiracSimplify",
CellID->2098245619],
- Cell[4377, 133, 769, 19, 75, "Output",
- CellTags->"DiracSimplify",
- CellID->1444421220],
- Cell[5161, 155, 120, 2, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1154366536],
- Cell[5306, 161, 196, 6, 27, "Input",
+ Cell[8211, 246, 1535, 32, 150, "Output",
+ CellTags->"DiracSimplify"],
+ Cell[10540, 318, 171, 5, 27, "Input",
CellTags->"DiracSimplify",
CellID->201005194],
- Cell[5505, 169, 772, 32, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->642203150],
- Cell[6314, 206, 137, 4, 27, "Input",
+ Cell[10714, 325, 752, 31, 37, "Output",
+ CellTags->"DiracSimplify"],
+ Cell[11503, 361, 136, 4, 27, "Input",
CellTags->"DiracSimplify",
CellID->28604534],
- Cell[6454, 212, 392, 15, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->1608459635],
- Cell[6861, 230, 116, 2, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->321850317],
- Cell[7002, 236, 197, 6, 27, "Input",
+ Cell[11642, 367, 371, 14, 37, "Output",
+ CellTags->"DiracSimplify"],
+ Cell[28224, 1027, 172, 5, 27, "Input",
CellTags->"DiracSimplify",
CellID->149362799],
- Cell[7202, 244, 694, 29, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->786634532],
- Cell[7933, 278, 139, 4, 27, "Input",
+ Cell[28399, 1034, 674, 28, 37, "Output",
+ CellTags->"DiracSimplify"],
+ Cell[29110, 1067, 138, 4, 27, "Input",
CellTags->"DiracSimplify",
CellID->1129253480],
- Cell[8075, 284, 391, 15, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->120098280],
- Cell[8503, 304, 192, 6, 27, "Input",
+ Cell[29251, 1073, 495, 19, 37, "Output",
+ CellTags->"DiracSimplify"],
+ Cell[44388, 1546, 167, 5, 27, "Input",
CellTags->"DiracSimplify",
CellID->570896083],
- Cell[8698, 312, 728, 30, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->333412029],
- Cell[9441, 345, 199, 8, 33, "Text",
- CellTags->"DiracSimplify",
- CellID->766299813],
- Cell[9665, 357, 138, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->264425668],
- Cell[9806, 363, 611, 24, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->1845106993],
- Cell[10454, 392, 189, 6, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1307415504],
- Cell[10646, 400, 685, 28, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->1842675018],
- Cell[11368, 433, 139, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1923692276],
- Cell[11510, 439, 465, 18, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->312699584],
- Cell[12012, 462, 346, 11, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1879344534],
- Cell[12361, 475, 1562, 60, 47, "Output",
- CellTags->"DiracSimplify",
- CellID->1520402677],
- Cell[13938, 538, 141, 4, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1032130436],
- Cell[14104, 546, 139, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->697887732],
- Cell[14246, 552, 2715, 104, 47, "Output",
- CellTags->"DiracSimplify",
- CellID->865972170],
- Cell[16998, 661, 137, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1805591394],
- Cell[17138, 667, 1137, 43, 47, "Output",
- CellTags->"DiracSimplify",
- CellID->1568743885],
- Cell[18312, 715, 291, 8, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->106324036],
- Cell[18606, 725, 672, 26, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->759706260],
- Cell[19315, 756, 140, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1935005981],
- Cell[19458, 762, 216, 7, 36, "Output",
- CellTags->"DiracSimplify",
- CellID->1632860123],
- Cell[19711, 774, 393, 13, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1949590828],
- Cell[20107, 789, 1653, 70, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->376958677],
- Cell[21797, 864, 138, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->789913816],
- Cell[21938, 870, 7986, 139, 131, "Output",
- CellTags->{"DiracSimplify", "RasterizedOutput"},
- CellID->1108569414],
- Cell[29939, 1012, 136, 4, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1099320763],
- Cell[30100, 1020, 270, 8, 27, "Input",
+ Cell[44558, 1553, 708, 29, 40, "Output",
+ CellTags->"DiracSimplify"],
+ Cell[99526, 3592, 265, 8, 27, "Input",
CellTags->"DiracSimplify",
CellID->990886795],
- Cell[30373, 1030, 953, 39, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->611510418],
- Cell[31341, 1072, 161, 5, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->120600204],
- Cell[31527, 1081, 308, 9, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->634548915],
- Cell[31838, 1092, 2637, 113, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->665614645],
- Cell[34512, 1210, 288, 8, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1157409425],
- Cell[34803, 1220, 216, 7, 36, "Output",
- CellTags->"DiracSimplify",
- CellID->1005658115],
- Cell[35034, 1230, 203, 6, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1926028871],
- Cell[35593, 1258, 569, 21, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1981859865]},
+ Cell[99794, 3602, 793, 32, 37, "Output",
+ CellTags->"DiracSimplify"]},
+ "PrimaryExamplesSection"->{
+ Cell[9807, 285, 389, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1468871954]},
"RasterizedOutput"->{
- Cell[21938, 870, 7986, 139, 131, "Output",
- CellTags->{"DiracSimplify", "RasterizedOutput"},
- CellID->1108569414]}
+ Cell[34777, 1312, 7139, 125, 157, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1265238922],
+ Cell[91924, 3424, 6382, 113, 106, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->772821713],
+ Cell[129296, 4758, 4921, 89, 99, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->34872333]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 38285, 1331},
- {"DiracSimplify", 38424, 1335},
- {"RasterizedOutput", 42805, 1474}
+ {"DiracSimplify", 159070, 5827},
+ {"PrimaryExamplesSection", 160271, 5863},
+ {"RasterizedOutput", 160415, 5867}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 4499, 101, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 661, 16, 115, "Usage",
- CellID->982511436],
+Cell[5087, 124, 290, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3598, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->892315753],
+Cell[5402, 139, 473, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4010, 117, 195, 6, 25, "ExampleSection",
- CellID->356761721],
+Cell[5900, 156, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->41535398],
+Cell[6640, 182, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6674, 184, 779, 28, 70, "Notes",
+ CellID->1067943069],
+Cell[7456, 214, 290, 11, 70, "Notes"],
+Cell[7749, 227, 290, 9, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4230, 127, 144, 4, 27, "Input",
+Cell[8064, 240, 144, 4, 70, "Input",
CellTags->"DiracSimplify",
CellID->2098245619],
-Cell[4377, 133, 769, 19, 75, "Output",
- CellTags->"DiracSimplify",
- CellID->1444421220]
+Cell[8211, 246, 1535, 32, 150, "Output",
+ CellTags->"DiracSimplify"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[5161, 155, 120, 2, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1154366536],
Cell[CellGroupData[{
-Cell[5306, 161, 196, 6, 27, "Input",
+Cell[9807, 285, 389, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1468871954],
+Cell[CellGroupData[{
+Cell[10221, 304, 196, 6, 26, "ExampleSection",
+ CellID->454068069],
+Cell[10420, 312, 95, 2, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[10540, 318, 171, 5, 27, "Input",
CellTags->"DiracSimplify",
CellID->201005194],
-Cell[5505, 169, 772, 32, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->642203150]
+Cell[10714, 325, 752, 31, 37, "Output",
+ CellTags->"DiracSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6314, 206, 137, 4, 27, "Input",
+Cell[11503, 361, 136, 4, 27, "Input",
CellTags->"DiracSimplify",
CellID->28604534],
-Cell[6454, 212, 392, 15, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->1608459635]
+Cell[11642, 367, 371, 14, 37, "Output",
+ CellTags->"DiracSimplify"]
}, Open ]],
-Cell[6861, 230, 116, 2, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->321850317],
Cell[CellGroupData[{
-Cell[7002, 236, 197, 6, 27, "Input",
+Cell[12050, 386, 105, 2, 9, "ExampleDelimiter"],
+Cell[12158, 390, 144, 4, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[12327, 398, 130, 4, 27, "Input"],
+Cell[12460, 404, 676, 26, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13173, 435, 89, 2, 27, "Input"],
+Cell[13265, 439, 287, 11, 39, "Output"]
+}, Open ]],
+Cell[13567, 453, 337, 12, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[13929, 469, 266, 8, 27, "Input"],
+Cell[14198, 479, 1512, 58, 42, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15747, 542, 89, 2, 27, "Input"],
+Cell[15839, 546, 6006, 230, 87, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[21882, 781, 309, 9, 27, "Input"],
+Cell[22194, 792, 2403, 90, 42, "Output"]
+}, Open ]],
+Cell[24612, 885, 215, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[24852, 896, 384, 11, 27, "Input"],
+Cell[25239, 909, 2683, 100, 42, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[27971, 1015, 105, 2, 9, "ExampleDelimiter"],
+Cell[28079, 1019, 120, 4, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[28224, 1027, 172, 5, 27, "Input",
CellTags->"DiracSimplify",
CellID->149362799],
-Cell[7202, 244, 694, 29, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->786634532]
+Cell[28399, 1034, 674, 28, 37, "Output",
+ CellTags->"DiracSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7933, 278, 139, 4, 27, "Input",
+Cell[29110, 1067, 138, 4, 27, "Input",
CellTags->"DiracSimplify",
CellID->1129253480],
-Cell[8075, 284, 391, 15, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->120098280]
+Cell[29251, 1073, 495, 19, 37, "Output",
+ CellTags->"DiracSimplify"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29783, 1097, 209, 6, 27, "Input"],
+Cell[29995, 1105, 885, 36, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[30917, 1146, 89, 2, 27, "Input"],
+Cell[31009, 1150, 1652, 67, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[32698, 1222, 343, 11, 29, "Input"],
+Cell[33044, 1235, 1604, 68, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[34685, 1308, 89, 2, 27, "Input"],
+Cell[34777, 1312, 7139, 125, 157, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1265238922]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[41953, 1442, 446, 15, 27, "Input"],
+Cell[42402, 1459, 1349, 55, 56, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[43788, 1519, 89, 2, 27, "Input"],
+Cell[43880, 1523, 166, 5, 35, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[8503, 304, 192, 6, 27, "Input",
+Cell[44095, 1534, 105, 2, 9, "ExampleDelimiter"],
+Cell[44203, 1538, 160, 4, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[44388, 1546, 167, 5, 27, "Input",
CellTags->"DiracSimplify",
CellID->570896083],
-Cell[8698, 312, 728, 30, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->333412029]
+Cell[44558, 1553, 708, 29, 40, "Output",
+ CellTags->"DiracSimplify"]
}, Open ]],
-Cell[9441, 345, 199, 8, 33, "Text",
- CellTags->"DiracSimplify",
- CellID->766299813],
Cell[CellGroupData[{
-Cell[9665, 357, 138, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->264425668],
-Cell[9806, 363, 611, 24, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->1845106993]
+Cell[45303, 1587, 89, 2, 27, "Input"],
+Cell[45395, 1591, 562, 22, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10454, 392, 189, 6, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1307415504],
-Cell[10646, 400, 685, 28, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->1842675018]
+Cell[45994, 1618, 154, 5, 27, "Input"],
+Cell[46151, 1625, 729, 28, 39, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11368, 433, 139, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1923692276],
-Cell[11510, 439, 465, 18, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->312699584]
+Cell[46917, 1658, 89, 2, 27, "Input"],
+Cell[47009, 1662, 848, 32, 39, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[12012, 462, 346, 11, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1879344534],
-Cell[12361, 475, 1562, 60, 47, "Output",
- CellTags->"DiracSimplify",
- CellID->1520402677]
+Cell[47906, 1700, 105, 2, 9, "ExampleDelimiter"],
+Cell[48014, 1704, 300, 9, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[48339, 1717, 572, 19, 27, "Input"],
+Cell[48914, 1738, 1608, 64, 42, "Output"]
}, Open ]],
-Cell[13938, 538, 141, 4, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1032130436],
+Cell[50537, 1805, 372, 14, 42, "Notes"],
Cell[CellGroupData[{
-Cell[14104, 546, 139, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->697887732],
-Cell[14246, 552, 2715, 104, 47, "Output",
- CellTags->"DiracSimplify",
- CellID->865972170]
+Cell[50934, 1823, 556, 21, 27, "Input"],
+Cell[51493, 1846, 1216, 45, 67, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16998, 661, 137, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1805591394],
-Cell[17138, 667, 1137, 43, 47, "Output",
- CellTags->"DiracSimplify",
- CellID->1568743885]
+Cell[52746, 1896, 89, 2, 27, "Input"],
+Cell[52838, 1900, 951, 35, 59, "Output"]
}, Open ]],
+Cell[53804, 1938, 401, 12, 49, "Notes"],
Cell[CellGroupData[{
-Cell[18312, 715, 291, 8, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->106324036],
-Cell[18606, 725, 672, 26, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->759706260]
+Cell[54230, 1954, 706, 24, 45, "Input"],
+Cell[54939, 1980, 1462, 55, 60, "Output"]
}, Open ]],
+Cell[56416, 2038, 731, 22, 66, "Notes"],
Cell[CellGroupData[{
-Cell[19315, 756, 140, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1935005981],
-Cell[19458, 762, 216, 7, 36, "Output",
- CellTags->"DiracSimplify",
- CellID->1632860123]
+Cell[57172, 2064, 708, 24, 45, "Input"],
+Cell[57883, 2090, 1462, 55, 60, "Output"]
}, Open ]],
+Cell[59360, 2148, 192, 5, 32, "Notes"],
Cell[CellGroupData[{
-Cell[19711, 774, 393, 13, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1949590828],
-Cell[20107, 789, 1653, 70, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->376958677]
+Cell[59577, 2157, 233, 6, 27, "Input"],
+Cell[59813, 2165, 1016, 40, 39, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[21797, 864, 138, 4, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->789913816],
-Cell[21938, 870, 7986, 139, 131, "Output",
- CellTags->{"DiracSimplify", "RasterizedOutput"},
- CellID->1108569414]
+Cell[60878, 2211, 105, 2, 9, "ExampleDelimiter"],
+Cell[60986, 2215, 95, 2, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[61106, 2221, 444, 15, 27, "Input"],
+Cell[61553, 2238, 975, 38, 38, "Output"]
}, Open ]],
-Cell[29939, 1012, 136, 4, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1099320763],
Cell[CellGroupData[{
-Cell[30100, 1020, 270, 8, 27, "Input",
+Cell[62565, 2281, 89, 2, 27, "Input"],
+Cell[62657, 2285, 1414, 55, 38, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[64108, 2345, 202, 5, 27, "Input"],
+Cell[64313, 2352, 598, 23, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[64948, 2380, 89, 2, 27, "Input"],
+Cell[65040, 2384, 166, 5, 35, "Output"]
+}, Open ]],
+Cell[65221, 2392, 228, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[65474, 2403, 318, 8, 27, "Input"],
+Cell[65795, 2413, 1043, 41, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[66887, 2460, 105, 2, 9, "ExampleDelimiter"],
+Cell[66995, 2464, 163, 4, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[67183, 2472, 755, 24, 45, "Input"],
+Cell[67941, 2498, 2416, 98, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[70394, 2601, 89, 2, 27, "Input"],
+Cell[70486, 2605, 3282, 131, 64, "Output"]
+}, Open ]],
+Cell[73783, 2739, 304, 10, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[74112, 2753, 910, 27, 62, "Input"],
+Cell[75025, 2782, 3808, 148, 64, "Output"]
+}, Open ]],
+Cell[78848, 2933, 338, 8, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[79211, 2945, 1566, 50, 79, "Input"],
+Cell[80780, 2997, 4902, 192, 62, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[85719, 3194, 193, 6, 27, "Input"],
+Cell[85915, 3202, 3873, 150, 64, "Output"]
+}, Open ]],
+Cell[89803, 3355, 261, 9, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[90089, 3368, 1832, 54, 96, "Input"],
+Cell[91924, 3424, 6382, 113, 106, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->772821713]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[98355, 3543, 105, 2, 9, "ExampleDelimiter"],
+Cell[98463, 3547, 389, 12, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[98877, 3563, 150, 4, 27, "Input"],
+Cell[99030, 3569, 459, 18, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[99526, 3592, 265, 8, 27, "Input",
CellTags->"DiracSimplify",
CellID->990886795],
-Cell[30373, 1030, 953, 39, 38, "Output",
- CellTags->"DiracSimplify",
- CellID->611510418]
+Cell[99794, 3602, 793, 32, 37, "Output",
+ CellTags->"DiracSimplify"]
+}, Open ]]
}, Open ]],
-Cell[31341, 1072, 161, 5, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->120600204],
Cell[CellGroupData[{
-Cell[31527, 1081, 308, 9, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->634548915],
-Cell[31838, 1092, 2637, 113, 39, "Output",
- CellTags->"DiracSimplify",
- CellID->665614645]
+Cell[100636, 3640, 105, 2, 9, "ExampleDelimiter"],
+Cell[100744, 3644, 277, 6, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[101046, 3654, 124, 3, 27, "Input"],
+Cell[101173, 3659, 725, 30, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[34512, 1210, 288, 8, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1157409425],
-Cell[34803, 1220, 216, 7, 36, "Output",
- CellTags->"DiracSimplify",
- CellID->1005658115]
+Cell[101935, 3694, 160, 4, 27, "Input"],
+Cell[102098, 3700, 166, 5, 35, "Output"]
}, Open ]],
-Cell[35034, 1230, 203, 6, 27, "Input",
- CellTags->"DiracSimplify",
- CellID->1926028871]
+Cell[102279, 3708, 64, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[102368, 3712, 144, 4, 27, "Input"],
+Cell[102515, 3718, 914, 38, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[103466, 3761, 160, 4, 27, "Input"],
+Cell[103629, 3767, 754, 30, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[104432, 3803, 105, 2, 9, "ExampleDelimiter"],
+Cell[104540, 3807, 255, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[104820, 3818, 182, 5, 27, "Input"],
+Cell[105005, 3825, 1043, 41, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[106085, 3871, 89, 2, 27, "Input"],
+Cell[106177, 3875, 1784, 75, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[107998, 3955, 529, 16, 46, "Input"],
+Cell[108530, 3973, 1273, 48, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[109840, 4026, 89, 2, 27, "Input"],
+Cell[109932, 4030, 2619, 114, 40, "Output"]
+}, Open ]],
+Cell[112566, 4147, 477, 13, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[113068, 4164, 644, 18, 63, "Input"],
+Cell[113715, 4184, 3823, 141, 66, "Output"]
+}, Open ]],
+Cell[117553, 4328, 302, 10, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[117880, 4342, 697, 19, 63, "Input"],
+Cell[118580, 4363, 1088, 40, 40, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[119717, 4409, 105, 2, 9, "ExampleDelimiter"],
+Cell[119825, 4413, 237, 7, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[120087, 4424, 228, 7, 27, "Input"],
+Cell[120318, 4433, 734, 30, 37, "Output"]
+}, Open ]],
+Cell[121067, 4466, 385, 9, 66, "Notes"],
+Cell[CellGroupData[{
+Cell[121477, 4479, 89, 2, 27, "Input"],
+Cell[121569, 4483, 1005, 17, 193, "Message"],
+Cell[122577, 4502, 173, 5, 35, "Output"]
+}, Open ]],
+Cell[122765, 4510, 444, 9, 83, "Notes"],
+Cell[123212, 4521, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[123365, 4529, 273, 8, 27, "Input"],
+Cell[123641, 4539, 572, 22, 37, "Output"]
+}, Open ]],
+Cell[124228, 4564, 127, 4, 27, "Input"],
+Cell[124358, 4570, 696, 17, 83, "Notes"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[125091, 4592, 105, 2, 9, "ExampleDelimiter"],
+Cell[125199, 4596, 412, 11, 65, "Notes"],
+Cell[CellGroupData[{
+Cell[125636, 4611, 279, 8, 27, "Input"],
+Cell[125918, 4621, 1435, 57, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[127390, 4683, 89, 2, 27, "Input"],
+Cell[127482, 4687, 1135, 43, 43, "Output"]
+}, Open ]],
+Cell[128632, 4733, 180, 4, 49, "Notes"],
+Cell[128815, 4739, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[128968, 4747, 325, 9, 27, "Input"],
+Cell[129296, 4758, 4921, 89, 99, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->34872333]
+}, Open ]],
+Cell[134232, 4850, 127, 4, 27, "Input"],
+Cell[134362, 4856, 908, 20, 117, "Notes"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[135307, 4881, 105, 2, 9, "ExampleDelimiter"],
+Cell[135415, 4885, 303, 5, 66, "Notes"],
+Cell[CellGroupData[{
+Cell[135743, 4894, 132, 4, 27, "Input"],
+Cell[135878, 4900, 919, 38, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[136834, 4943, 89, 2, 27, "Input"],
+Cell[136926, 4947, 184, 6, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[137147, 4958, 236, 7, 27, "Input"],
+Cell[137386, 4967, 2092, 83, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[139515, 5055, 89, 2, 27, "Input"],
+Cell[139607, 5059, 3873, 154, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[143517, 5218, 312, 10, 27, "Input"],
+Cell[143832, 5230, 2623, 103, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[146492, 5338, 89, 2, 27, "Input"],
+Cell[146584, 5342, 1240, 48, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[147861, 5395, 162, 5, 27, "Input"],
+Cell[148026, 5402, 906, 38, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[148969, 5445, 89, 2, 27, "Input"],
+Cell[149061, 5449, 501, 20, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[149599, 5474, 161, 4, 27, "Input"],
+Cell[149763, 5480, 1731, 69, 46, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[151531, 5554, 90, 2, 27, "Input"],
+Cell[151624, 5558, 2523, 105, 39, "Output"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[35252, 1239, 31, 0, 29, "SectionFooterSpacer"]
+Cell[154186, 5668, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[35320, 1244, 270, 12, 31, "SeeAlsoSection",
+Cell[154254, 5673, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[35593, 1258, 569, 21, 32, "Text",
- CellTags->"DiracSimplify",
- CellID->1981859865]
+Cell[154527, 5687, 2667, 91, 86, "SeeAlso"]
}, Open ]],
-Cell[36177, 1282, 23, 0, 42, "FooterCell"]
+Cell[157209, 5781, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify2.nb
deleted file mode 100644
index 6a0f1c3bd..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSimplify2.nb
+++ /dev/null
@@ -1,401 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11139, 391]
-NotebookOptionsPosition[ 7556, 281]
-NotebookOutlinePosition[ 10153, 354]
-CellTagsIndexPosition[ 10037, 348]
-WindowTitle->DiracSimplify2
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSimplify2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSimplify2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-DiracSimplify2.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$42813],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSimplify2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["DiracSimplify2", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"DiracSimplify2", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "simplifies the Dirac structure but leaves any ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " untouched."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->599384043],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->2143910384],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}], ".", "GA5", ".",
- RowBox[{"GAD", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Alpha]"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify2",
- CellLabel->"In[1]:=",
- CellID->439314570],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{156, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify2",
- CellLabel->"Out[1]=",
- CellID->1049863911]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify2", "[", "%", "]"}]], "Input",
- CellTags->"DiracSimplify2",
- CellLabel->"In[2]:=",
- CellID->535525902],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{156, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSimplify2",
- CellLabel->"Out[2]=",
- CellID->1933714897]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracSimplify2",
- CellID->482305006]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"DiracSimplify2",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 3.367526}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "DiracSimplify2[exp] simplifies the Dirac structure but leaves any \
-\\[Gamma]^5 untouched.", "synonyms" -> {}, "title" -> "DiracSimplify2",
- "titlemodifier" -> "", "windowtitle" -> "DiracSimplify2", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/DiracSimplify2"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3454, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->599384043]},
- "DiracSimplify2"->{
- Cell[4087, 127, 293, 8, 27, "Input",
- CellTags->"DiracSimplify2",
- CellID->439314570],
- Cell[4383, 137, 1285, 54, 40, "Output",
- CellTags->"DiracSimplify2",
- CellID->1049863911],
- Cell[5705, 196, 139, 4, 27, "Input",
- CellTags->"DiracSimplify2",
- CellID->535525902],
- Cell[5847, 202, 1051, 42, 40, "Output",
- CellTags->"DiracSimplify2",
- CellID->1933714897],
- Cell[7266, 267, 248, 9, 32, "Text",
- CellTags->"DiracSimplify2",
- CellID->482305006]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 9401, 325},
- {"DiracSimplify2", 9541, 329}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 511, 16, 86, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3454, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->599384043],
-Cell[CellGroupData[{
-Cell[3866, 117, 196, 6, 25, "ExampleSection",
- CellID->2143910384],
-Cell[CellGroupData[{
-Cell[4087, 127, 293, 8, 27, "Input",
- CellTags->"DiracSimplify2",
- CellID->439314570],
-Cell[4383, 137, 1285, 54, 40, "Output",
- CellTags->"DiracSimplify2",
- CellID->1049863911]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5705, 196, 139, 4, 27, "Input",
- CellTags->"DiracSimplify2",
- CellID->535525902],
-Cell[5847, 202, 1051, 42, 40, "Output",
- CellTags->"DiracSimplify2",
- CellID->1933714897]
-}, Open ]]
-}, Open ]],
-Cell[6925, 248, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6993, 253, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[7266, 267, 248, 9, 32, "Text",
- CellTags->"DiracSimplify2",
- CellID->482305006]
-}, Open ]],
-Cell[7529, 279, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSlash.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSlash.nb
index f6c6d8d85..f73207dac 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSlash.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSlash.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16267, 595]
-NotebookOptionsPosition[ 10564, 408]
-NotebookOutlinePosition[ 14203, 515]
-CellTagsIndexPosition[ 14089, 509]
+NotebookDataLength[ 16344, 595]
+NotebookOptionsPosition[ 11665, 449]
+NotebookOutlinePosition[ 14349, 523]
+CellTagsIndexPosition[ 14235, 517]
WindowTitle->DiracSlash
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSlash\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSlash"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracSlash.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$43519],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSlash", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GS\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GS"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSlash\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSlash"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracSlash.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$70175],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSlash", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,29 +96,39 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSlash", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSlash", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracSlash", "[", "p", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the contraction ",
+ " \[LineSeparator]is the contraction ",
Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["p", "\[Mu]"],
SubscriptBox["\[Gamma]",
RowBox[{"\[Mu]", " "}]]}], TraditionalForm]]],
- "(FourVector[p, ",
+ "(FV[p, ",
Cell[BoxData[
FormBox["\[Mu]", TraditionalForm]]],
- "] DiracMatrix[",
+ "] GA[",
Cell[BoxData[
FormBox["\[Mu]", TraditionalForm]]],
- "]). Products of those can be entered in the form DiracSlash[p1, p2, \
-...]."
+ "]). Products of those can be entered in the form GS[p1, p2, ...]."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -106,6 +139,63 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->735255828],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The shortcut DiracSlash is deprecated, please use GS instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSlash", "]"}]], "Input",
+ CellLabel->"In[83]:=",
+ CellID->1215792887],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{257, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[83]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -121,7 +211,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1909999948],
+ CellID->1325041461],
Cell[CellGroupData[{
@@ -131,30 +221,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1410735823],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracSlash", "]"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[1]:=",
- CellID->1930775738],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{281, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSlash",
- CellLabel->"Out[1]=",
- CellID->286229782]
-}, Open ]],
+ CellID->1593102456],
Cell[TextData[{
"This is q-slash, i.e., ",
@@ -164,16 +231,14 @@ Cell[TextData[{
SuperscriptBox["\[Gamma]", "\[Mu]"],
RowBox[{
SubscriptBox["q", "\[Mu]"], "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"DiracSlash",
- CellID->754243775],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracSlash", "[", "q", "]"}]], "Input",
CellTags->"DiracSlash",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1250007007],
Cell[BoxData[
@@ -185,12 +250,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{32, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSlash",
- CellLabel->"Out[2]=",
- CellID->302151266]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -200,7 +264,7 @@ Cell[BoxData[
RowBox[{"DiracSlash", "[", "p", "]"}], ".",
RowBox[{"DiracSlash", "[", "q", "]"}]}]], "Input",
CellTags->"DiracSlash",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->751525159],
Cell[BoxData[
@@ -222,12 +286,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{91, 18},
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSlash",
- CellLabel->"Out[3]=",
- CellID->1980224843]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -236,7 +299,7 @@ Cell[BoxData[
RowBox[{"DiracSlash", "[",
RowBox[{"p", ",", "q"}], "]"}]], "Input",
CellTags->"DiracSlash",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1690251158],
Cell[BoxData[
@@ -258,21 +321,23 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{91, 18},
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracSlash",
- CellLabel->"Out[4]=",
- CellID->1504514628]
+ CellLabel->"Out[3]="]
}, Open ]],
+Cell["\<\
+DiracSlash is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use GS.\
+\>", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"GS", "[", "p", "]"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[5]:=",
- CellID->2044929662],
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
@@ -283,57 +348,65 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{33, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSlash",
- CellLabel->"Out[5]=",
- CellID->1319428342]
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GSD", "[", "p", "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{35, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracSlash", "[", "q", "]"}], "//", "StandardForm"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[6]:=",
- CellID->1554186442],
+ RowBox[{"FCI", "[",
+ RowBox[{"GS", "[", "p", "]"}], "]"}], "===",
+ RowBox[{"DiracSlash", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}]], "Output",
- ImageSize->{195, 15},
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSlash",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1796628764]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"GSD", "[", "p", "]"}], "]"}], "===",
RowBox[{"DiracSlash", "[",
- RowBox[{"q", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[7]:=",
- CellID->841649305],
+ RowBox[{"p", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"q", ",", "n"}], "]"}], ",", "n"}], "]"}]], "Output",
- ImageSize->{245, 15},
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracSlash",
- CellLabel->"Out[7]//StandardForm=",
- CellID->59747004]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -357,59 +430,27 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["DiracGammaExpand",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracGamma",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracTrick",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracTrick",
- ButtonNote->"DiracTrick"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["GS",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GS",
ButtonNote->"GS"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["GSD",
+ StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GSD",
- ButtonNote->"GSD"],
+ ButtonData->"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracSlash",
- CellID->1970754340]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"DiracSlash",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -418,23 +459,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 6.666771}",
+ "built" -> "{2020, 1, 5, 18, 54, 44.281647}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracSlash[p] is the contraction p^\\[Mu] \\[Gamma] \\[Mu] \
-(FourVector[p, \\[Mu]] DiracMatrix[\\[Mu]]). Products of those can be entered \
-in the form DiracSlash[p1, p2, ...].", "synonyms" -> {}, "title" ->
- "DiracSlash", "titlemodifier" -> "", "windowtitle" -> "DiracSlash",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracSlash"},
- "SearchTextTranslated" -> ""},
+ "DiracSlash[p] is the contraction p^\\[Mu] \\[Gamma] \\[Mu] (FV[p, \
+\\[Mu]] GA[\\[Mu]]). Products of those can be entered in the form GS[p1, p2, \
+...].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracSlash",
+ "titlemodifier" -> "", "windowtitle" -> "DiracSlash", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DiracSlash"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -442,8 +482,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -452,151 +493,110 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3716, 108, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6149, 198, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1909999948]},
+ CellID->1325041461]},
"DiracSlash"->{
- Cell[4350, 137, 138, 4, 27, "Input",
- CellTags->"DiracSlash",
- CellID->1930775738],
- Cell[4491, 143, 350, 12, 36, "Output",
- CellTags->"DiracSlash",
- CellID->286229782],
- Cell[4856, 158, 254, 10, 35, "Text",
- CellTags->"DiracSlash",
- CellID->754243775],
- Cell[5135, 172, 132, 4, 27, "Input",
+ Cell[6996, 237, 132, 4, 27, "Input",
CellTags->"DiracSlash",
CellID->1250007007],
- Cell[5270, 178, 373, 14, 38, "Output",
- CellTags->"DiracSlash",
- CellID->302151266],
- Cell[5680, 197, 191, 6, 27, "Input",
+ Cell[7131, 243, 353, 13, 37, "Output",
+ CellTags->"DiracSlash"],
+ Cell[7521, 261, 191, 6, 27, "Input",
CellTags->"DiracSlash",
CellID->751525159],
- Cell[5874, 205, 635, 24, 39, "Output",
- CellTags->"DiracSlash",
- CellID->1980224843],
- Cell[6546, 234, 155, 5, 27, "Input",
+ Cell[7715, 269, 615, 23, 37, "Output",
+ CellTags->"DiracSlash"],
+ Cell[8367, 297, 155, 5, 27, "Input",
CellTags->"DiracSlash",
CellID->1690251158],
- Cell[6704, 241, 635, 24, 39, "Output",
- CellTags->"DiracSlash",
- CellID->1504514628],
- Cell[7376, 270, 124, 4, 27, "Input",
- CellTags->"DiracSlash",
- CellID->2044929662],
- Cell[7503, 276, 374, 14, 38, "Output",
- CellTags->"DiracSlash",
- CellID->1319428342],
- Cell[7914, 295, 167, 5, 27, "Input",
- CellTags->"DiracSlash",
- CellID->1554186442],
- Cell[8084, 302, 270, 8, 49, "Output",
- CellTags->"DiracSlash",
- CellID->1796628764],
- Cell[8391, 315, 232, 8, 27, "Input",
- CellTags->"DiracSlash",
- CellID->841649305],
- Cell[8626, 325, 317, 10, 49, "Output",
- CellTags->"DiracSlash",
- CellID->59747004],
- Cell[9311, 358, 1211, 45, 32, "Text",
- CellTags->"DiracSlash",
- CellID->1970754340]}
+ Cell[8525, 304, 615, 23, 37, "Output",
+ CellTags->"DiracSlash"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12480, 453},
- {"DiracSlash", 12618, 457}
+ {"PrimaryExamplesSection", 13597, 494},
+ {"DiracSlash", 13735, 498}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3074, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 798, 26, 102, "Usage",
- CellID->982511436],
+Cell[3659, 98, 287, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3716, 108, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1909999948],
+Cell[3971, 113, 762, 24, 88, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4129, 127, 196, 6, 25, "ExampleSection",
- CellID->1410735823],
+Cell[4758, 141, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->735255828],
+Cell[5499, 167, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5533, 169, 107, 3, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4350, 137, 138, 4, 27, "Input",
- CellTags->"DiracSlash",
- CellID->1930775738],
-Cell[4491, 143, 350, 12, 36, "Output",
- CellTags->"DiracSlash",
- CellID->286229782]
+Cell[5665, 176, 114, 3, 70, "Input",
+ CellID->1215792887],
+Cell[5782, 181, 306, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4856, 158, 254, 10, 35, "Text",
- CellTags->"DiracSlash",
- CellID->754243775],
Cell[CellGroupData[{
-Cell[5135, 172, 132, 4, 27, "Input",
+Cell[6149, 198, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1325041461],
+Cell[CellGroupData[{
+Cell[6562, 217, 196, 6, 26, "ExampleSection",
+ CellID->1593102456],
+Cell[6761, 225, 210, 8, 35, "Notes"],
+Cell[CellGroupData[{
+Cell[6996, 237, 132, 4, 27, "Input",
CellTags->"DiracSlash",
CellID->1250007007],
-Cell[5270, 178, 373, 14, 38, "Output",
- CellTags->"DiracSlash",
- CellID->302151266]
+Cell[7131, 243, 353, 13, 37, "Output",
+ CellTags->"DiracSlash"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5680, 197, 191, 6, 27, "Input",
+Cell[7521, 261, 191, 6, 27, "Input",
CellTags->"DiracSlash",
CellID->751525159],
-Cell[5874, 205, 635, 24, 39, "Output",
- CellTags->"DiracSlash",
- CellID->1980224843]
+Cell[7715, 269, 615, 23, 37, "Output",
+ CellTags->"DiracSlash"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6546, 234, 155, 5, 27, "Input",
+Cell[8367, 297, 155, 5, 27, "Input",
CellTags->"DiracSlash",
CellID->1690251158],
-Cell[6704, 241, 635, 24, 39, "Output",
- CellTags->"DiracSlash",
- CellID->1504514628]
+Cell[8525, 304, 615, 23, 37, "Output",
+ CellTags->"DiracSlash"]
}, Open ]],
+Cell[9155, 330, 133, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[7376, 270, 124, 4, 27, "Input",
- CellTags->"DiracSlash",
- CellID->2044929662],
-Cell[7503, 276, 374, 14, 38, "Output",
- CellTags->"DiracSlash",
- CellID->1319428342]
+Cell[9313, 337, 78, 2, 27, "Input"],
+Cell[9394, 341, 328, 12, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7914, 295, 167, 5, 27, "Input",
- CellTags->"DiracSlash",
- CellID->1554186442],
-Cell[8084, 302, 270, 8, 49, "Output",
- CellTags->"DiracSlash",
- CellID->1796628764]
+Cell[9759, 358, 79, 2, 27, "Input"],
+Cell[9841, 362, 277, 10, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8391, 315, 232, 8, 27, "Input",
- CellTags->"DiracSlash",
- CellID->841649305],
-Cell[8626, 325, 317, 10, 49, "Output",
- CellTags->"DiracSlash",
- CellID->59747004]
+Cell[10155, 377, 171, 5, 27, "Input"],
+Cell[10329, 384, 169, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10535, 394, 235, 7, 27, "Input"],
+Cell[10773, 403, 169, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[8970, 339, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10969, 412, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9038, 344, 270, 12, 31, "SeeAlsoSection",
+Cell[11037, 417, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9311, 358, 1211, 45, 32, "Text",
- CellTags->"DiracSlash",
- CellID->1970754340]
+Cell[11310, 431, 313, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[10537, 406, 23, 0, 42, "FooterCell"]
+Cell[11638, 447, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSpinor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSpinor.nb
index 08434e135..975bf3b49 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSpinor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSpinor.nb
@@ -10,62 +10,84 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6407, 193]
-NotebookOptionsPosition[ 4020, 125]
-NotebookOutlinePosition[ 6142, 182]
-CellTagsIndexPosition[ 6069, 177]
+NotebookDataLength[ 7130, 212]
+NotebookOptionsPosition[ 4948, 154]
+NotebookOutlinePosition[ 6923, 204]
+CellTagsIndexPosition[ 6880, 201]
WindowTitle->DiracSpinor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSpinor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSpinor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSpinor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSpinor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracSpinor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$43864],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSpinor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$70957],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSpinor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ DiracSpinor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSpinor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSpinor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,16 +141,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Spinor",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Spinor",
ButtonNote->"Spinor"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracSpinor",
- CellID->1151148018]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -135,10 +164,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 8.170706}",
+ "built" -> "{2019, 3, 29, 17, 46, 56.910429}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -147,9 +176,9 @@ TaggingRules->{
"DiracSpinor is simply a quantity defined as noncommutative (with \
DeclareNonCommutative[DiracSpinor]). The convention intended is that \
DiracSpinor[p, m, ind] is a Dirac spinor for a fermion with momentum p and \
-mass m and indices ind.", "synonyms" -> {}, "title" -> "DiracSpinor",
- "titlemodifier" -> "", "windowtitle" -> "DiracSpinor", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/DiracSpinor"}},
+mass m and indices ind.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DiracSpinor", "titlemodifier" -> "", "windowtitle" -> "DiracSpinor",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracSpinor"}},
CellContext->"Global`",
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->Notebook[{
@@ -167,34 +196,24 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DiracSpinor"->{
- Cell[3738, 110, 240, 10, 70, "Text",
- CellTags->"DiracSpinor",
- CellID->1151148018]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DiracSpinor", 5954, 170}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3010, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 540, 14, 70, "Usage",
+Cell[3596, 97, 288, 11, 70, "ObjectNameGrid"],
+Cell[3887, 110, 540, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3465, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4452, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3738, 110, 240, 10, 70, "Text",
- CellTags->"DiracSpinor",
- CellID->1151148018]
+Cell[4725, 142, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3993, 123, 23, 0, 70, "FooterCell"]
+Cell[4921, 152, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute5.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute5.nb
new file mode 100644
index 000000000..ef0b26db6
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute5.nb
@@ -0,0 +1,588 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15992, 578]
+NotebookOptionsPosition[ 12220, 459]
+NotebookOutlinePosition[ 14310, 515]
+CellTagsIndexPosition[ 14225, 510]
+WindowTitle->DiracSubstitute5
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSubstitute67\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute67"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToDiracGamma67"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSubstitute5\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSubstitute5"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracSubstitute5.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$70627],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSubstitute5", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DiracSubstitute5", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DiracSubstitute5", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]rewrites ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in terms of the chirality projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1301431210],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ " ",
+ ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ " is also an option of various FeynCalc functions that handle Dirac \
+algebra."
+}], "Notes",
+ CellID->1827982253],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSubstitute5", "]"}]], "Input",
+ CellLabel->"In[126]:=",
+ CellID->1278888852],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[126]=",
+ CellID->1990816724]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->876429583],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1653559727],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[", "5", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->268105944],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1850589136]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute5", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->807644320],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{58, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1941686393]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->887828418],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ SubscriptBox["p", "1"], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ SubscriptBox["p", "2"], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->523334398],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{164, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1747475379]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute5", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->201004118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{259, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1592911965]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"DiracSubstitute5",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 54, 45.683908}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DiracSubstitute5[exp] rewrites \\[Gamma]^5 in terms of the chirality \
+projectors \\[Gamma]^6 and \\[Gamma]^7.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "DiracSubstitute5", "titlemodifier" -> "", "windowtitle" ->
+ "DiracSubstitute5", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracSubstitute5"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6449, 204, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->876429583]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 14082, 503}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 3256, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3847, 101, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4165, 116, 656, 20, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4846, 140, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1301431210],
+Cell[5588, 166, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5622, 168, 277, 9, 70, "Notes",
+ CellID->1827982253],
+Cell[CellGroupData[{
+Cell[5924, 181, 121, 3, 70, "Input",
+ CellID->1278888852],
+Cell[6048, 186, 340, 11, 37, "Output",
+ CellID->1990816724]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6449, 204, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->876429583],
+Cell[CellGroupData[{
+Cell[6861, 223, 196, 6, 26, "ExampleSection",
+ CellID->1653559727],
+Cell[CellGroupData[{
+Cell[7082, 233, 98, 3, 27, "Input",
+ CellID->268105944],
+Cell[7183, 238, 276, 10, 40, "Output",
+ CellID->1850589136]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7496, 253, 112, 3, 27, "Input",
+ CellID->807644320],
+Cell[7611, 258, 396, 15, 39, "Output",
+ CellID->1941686393]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8044, 278, 125, 3, 9, "ExampleDelimiter",
+ CellID->887828418],
+Cell[CellGroupData[{
+Cell[8194, 285, 334, 10, 27, "Input",
+ CellID->523334398],
+Cell[8531, 297, 927, 38, 41, "Output",
+ CellID->1747475379]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9495, 340, 112, 3, 27, "Input",
+ CellID->201004118],
+Cell[9610, 345, 1612, 65, 42, "Output",
+ CellID->1592911965]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11261, 415, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11329, 420, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11602, 434, 576, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[12193, 457, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute67.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute67.nb
index f658d87ae..7aab21c2c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute67.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracSubstitute67.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6528, 196]
-NotebookOptionsPosition[ 4170, 129]
-NotebookOutlinePosition[ 6258, 185]
-CellTagsIndexPosition[ 6179, 180]
+NotebookDataLength[ 18398, 680]
+NotebookOptionsPosition[ 14184, 549]
+NotebookOutlinePosition[ 16339, 606]
+CellTagsIndexPosition[ 16254, 601]
WindowTitle->DiracSubstitute67
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracSubstitute67\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracSubstitute67"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSubstitute5\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute5"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToDiracGamma67"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracSubstitute67\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracSubstitute67"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracSubstitute67.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$44209],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracSubstitute67", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$71094],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracSubstitute67", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +99,33 @@ DiracSubstitute67.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracSubstitute67", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracSubstitute67", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData["DiracSubstitute67"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracSimplify. If set to True the chirality-projectors \
-DiracGamma[6] and DiracGamma[7] are substituted by their definitions."
+ Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] inserts the explicit definitions of the chirality \
+projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +136,378 @@ DiracGamma[6] and DiracGamma[7] are substituted by their definitions."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->923270122],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ " ",
+ ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ " is also an option of various FeynCalc functions that handle Dirac \
+algebra."
+}], "Notes",
+ CellID->1827982253],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSubstitute67", "]"}]], "Input",
+ CellLabel->"In[40]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[40]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->605792859],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1307624694],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[", "6", "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"], "+",
+ FractionBox["1", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{56, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[", "7", "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{56, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ SubscriptBox["p", "1"], "]"}], ".",
+ RowBox[{"GA", "[", "6", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ SubscriptBox["p", "2"], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{114, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"], "+",
+ FractionBox["1", "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{198, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ SubscriptBox["p", "1"], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ SubscriptBox["p", "2"], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{114, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{209, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,30 +523,34 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
+ StyleBox[ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["DiracGamma",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracGamma",
ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSimplify",
+ StyleBox[ButtonBox["ToDiracGamma67",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracSubstitute67",
- CellID->966852186]
+}], "SeeAlso",
+ CellID->655647701]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"DiracSubstitute67",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -139,22 +559,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 9.322070}",
+ "built" -> "{2020, 1, 5, 18, 54, 46.985331}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracSubstitute67 is an option for DiracSimplify. If set to True the \
-chirality-projectors DiracGamma[6] and DiracGamma[7] are substituted by their \
-definitions.", "synonyms" -> {}, "title" -> "DiracSubstitute67",
- "titlemodifier" -> "", "windowtitle" -> "DiracSubstitute67", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/DiracSubstitute67"}},
+ "DiracSubstitute67[exp] inserts the explicit definitions of the chirality \
+projectors \\[Gamma]^6 and \\[Gamma]^7.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "DiracSubstitute67", "titlemodifier" -> "", "windowtitle" ->
+ "DiracSubstitute67", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracSubstitute67"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,8 +582,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -171,35 +592,99 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "DiracSubstitute67"->{
- Cell[3697, 108, 431, 16, 70, "Text",
- CellTags->"DiracSubstitute67",
- CellID->966852186]}
+ "PrimaryExamplesSection"->{
+ Cell[6343, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->605792859]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"DiracSubstitute67", 6059, 173}
+ {"PrimaryExamplesSection", 16111, 594}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2281, 52, 70, "AnchorBarGrid",
+Cell[589, 21, 3258, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2873, 75, 60, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2936, 78, 463, 12, 70, "Usage",
+Cell[3850, 101, 294, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4169, 116, 587, 18, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3424, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4781, 138, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->923270122],
+Cell[5522, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5556, 166, 280, 9, 70, "Notes",
+ CellID->1827982253],
+Cell[CellGroupData[{
+Cell[5861, 179, 100, 2, 70, "Input"],
+Cell[5964, 183, 318, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6343, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->605792859],
+Cell[CellGroupData[{
+Cell[6755, 219, 196, 6, 26, "ExampleSection",
+ CellID->1307624694],
+Cell[CellGroupData[{
+Cell[6976, 229, 86, 2, 27, "Input"],
+Cell[7065, 233, 255, 9, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7357, 247, 93, 2, 27, "Input"],
+Cell[7453, 251, 330, 12, 60, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7820, 268, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[7950, 274, 86, 2, 27, "Input"],
+Cell[8039, 278, 255, 9, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8331, 292, 93, 2, 27, "Input"],
+Cell[8427, 296, 330, 12, 60, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8806, 314, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8936, 320, 228, 7, 27, "Input"],
+Cell[9167, 329, 536, 21, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9740, 355, 93, 2, 27, "Input"],
+Cell[9836, 359, 1022, 40, 67, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10907, 405, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[11037, 411, 228, 7, 27, "Input"],
+Cell[11268, 420, 536, 21, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11841, 446, 93, 2, 27, "Input"],
+Cell[11937, 450, 1252, 50, 67, "Output"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[13228, 505, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13296, 510, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[3697, 108, 431, 16, 70, "Text",
- CellTags->"DiracSubstitute67",
- CellID->966852186]
+Cell[13569, 524, 573, 20, 56, "SeeAlso",
+ CellID->655647701]
}, Open ]],
-Cell[4143, 127, 23, 0, 70, "FooterCell"]
+Cell[14157, 547, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrace.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrace.nb
index 8d09f7101..573949ebc 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrace.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrace.nb
@@ -3,69 +3,103 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 31230, 976]
-NotebookOptionsPosition[ 24520, 760]
-NotebookOutlinePosition[ 28814, 883]
-CellTagsIndexPosition[ 28665, 876]
+NotebookDataLength[ 139306, 4013]
+NotebookOptionsPosition[ 127743, 3645]
+NotebookOutlinePosition[ 131607, 3752]
+CellTagsIndexPosition[ 131452, 3745]
WindowTitle->DiracTrace
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracTrace\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracTrace"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracTrace.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$44901],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracTrace", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracEquation\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracEquation"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracGammaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGammaCombine"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrick"], "\<\"FCGetDiracGammaScheme\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSetDiracGammaScheme"], \
+"\<\"FCSetDiracGammaScheme\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetDiracGammaScheme"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracTrace\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracTrace"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracTrace.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$72086],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracTrace", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,27 +107,40 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracTrace", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracTrace", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DiracTrace", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of Dirac traces. Whether the trace is evaluated depends on \
-the option DiracTraceEvaluate. Direct trace evaluation should be performed \
-with TR (or Tr). The argument expr may be a product of Dirac matrices or \
-slashes separated by the Mathematica Dot (.).\n\nFor comments regarding ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "schemes see the notes for ",
- ButtonBox["TR",
- BaseStyle->"AddOnsLink",
- ButtonData:>"TR",
- ButtonNote->"TR"],
- "."
+ RowBox[{"DiracTrace", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the head of Dirac traces. By default the trace is \
+not evaluated. The evaluation occurs only when the option ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
+ " is set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ". It is recommended to use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ ", which will automatically evaluate all Dirac traces in the input \
+expression."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -104,74 +151,107 @@ slashes separated by the Mathematica Dot (.).\n\nFor comments regarding ",
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->722802191],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2091496943],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1343845601],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "DiracTrace", "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[1]:=",
- CellID->1024967943],
+ CellLabel->"In[72]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- RowBox[{"Contract", "\[Rule]", "400000"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}], ",",
RowBox[{"EpsContract", "\[Rule]", "False"}], ",",
+ RowBox[{"Expand", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"Factoring", "\[Rule]", "Automatic"}], ",",
RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
RowBox[{"Mandelstam", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"PairCollect", "\[Rule]", "False"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}], ",",
+ RowBox[{"Sort", "\[Rule]", "True"}], ",",
RowBox[{"Schouten", "\[Rule]", "0"}], ",",
RowBox[{"TraceOfOne", "\[Rule]", "4"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"West", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{462, 73},
+ ImageSize->{493, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrace",
- CellLabel->"Out[1]=",
- CellID->606139332]
+ CellLabel->"Out[72]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(10)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1586921873],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(10)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1676163414],
+
+Cell["There is no automatic evaluation of Dirac traces", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"DiracTrace", "[",
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
CellTags->"DiracTrace",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->60676203],
Cell[BoxData[
@@ -196,12 +276,11 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{70, 20},
+ ImageSize->{72, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracTrace",
- CellLabel->"Out[2]=",
- CellID->47904170]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -212,7 +291,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
"]"}]], "Input",
CellTags->"DiracTrace",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1088537337],
Cell[BoxData[
@@ -253,21 +332,40 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{118, 21},
+ ImageSize->{123, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracTrace",
- CellLabel->"Out[3]=",
- CellID->206648847]
+ CellLabel->"Out[2]="]
}, Open ]],
+Cell[TextData[{
+ "You can either set the option ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
+ " to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ " or use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", " ", "/.", " ",
- RowBox[{"DiracTrace", "\[Rule]", "Tr"}]}]], "Input",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"DiracTrace",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->710007181],
Cell[BoxData[
@@ -276,325 +374,167 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{263, 21},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{270, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DiracTrace",
- CellLabel->"Out[4]=",
- CellID->697793381]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrace", "[",
- RowBox[{
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "5"}],
- "]"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[5]:=",
- CellID->196468068],
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{87, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrace",
- CellLabel->"Out[5]=",
- CellID->72676319]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{
- "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Delta]",
- ",", "\[Tau]", ",", "5"}], "]"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[6]:=",
- CellID->261281630],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQtYVNXagMvzl5enjsajVvRjhoBchGGY4a4oeMFERklQoX5EMSxFo8RK
-0WOij6KYOeY51a/mJS1LQ1P/SixFVC6FFzCNIFAQAsERBhiZ6+ZnGKVhD7Nn
-zezLrNHvfZ5znklmz/7W+33sxVqz9l4vzXvrlaQ+jz322NJ+nf/3ytz3Qt95
-Z+7yGf/V+R9hy1Nfn/ePzheizv/Zdb5H+7oDAAAAAKyC7Pdt/9pzU27Zsb9l
-iLxGefF4PuNTi9sYDuxhAkQhAqIQAVGIgCjmIZpyXuXPzmkiLDpYmrcsan2J
-jOmgGEXTfqe8sOCO0poxgChEQBQi6KJwiNaK2ERFGQPT3BGS7Cj3yJMSCzoN
-Qla6K2m0p5s7P1pc3Gr4AcTdU1OFS4pl91+lFJuVOKLxxHjv5CvaY9qvrwma
-vPuWqucbNNJft8T6j3IfMVwwd1+VgnS4oub7tbGhAf6+3s4D7fiJGVm39AdT
-yqrPXxG62A0Y5Ow5JvGcZT2mGU2hEGWymQgfb8LzwyFKB3VbEM5g1JXJRNiW
-KOpokc9juS5jmcJHFN1IWJCjg5ncsUhnpyFyCvmmTkP698eMUFJS8uBI6YVk
-/ph1BVIN0ZybPO7tghay9nvX3hdO/K5Bo1WX5jfpWIN5eZFdWcwP7+zONA3H
-ZwUuLWolBd50JpE3+ZPSe4S8fJuf2/yLPYaespJVgYFpORJ1R0fT6YlepJ92
-obl9ZILf6t/bzYrJENqiqJuJArXnh0aUybagQOGKOhG2JQohWiQs1kWZKXxE
-0YqEHTmM5Y5Fms/NdORl/mnwR1uFERSK+2/t7G6m8eLPS7WvVdU7g33X/kHq
-EDX1h8OEy6+1a7ve45P80q6bmRt17RdjAzf/KS1dP1Z0oJbUWROSkyLBwqIu
-oa2FcZ4iXSQPWpU72zv2TNdfD+q6g2OFK3s5t+zyIoHo57vmxWQIbVGUzUSB
-2vPDI8pUW1CgckWZCNsShRItChbros4UPqLoRMKSHKZyRxvVndydH2Vmbt17
-sZk0ppBdSXZ6Kf4XC/7A7exeBaP31nR2iNpvRma5TTjaQPrstotJ3i9na6e+
-2i4t9Ik4ddfcIWBrYbxv/A+HXgtZccVgbqszcF7oiUbtRyoqtgQEbavUm/qT
-l6b7Bu+sVulim82LPm04/FTX7AsJ2FRu/hyHuZgURdVMFKg9P0SiqNuCBKUr
-ikTYliiUaJGwVBd1pvARRSsSduQwljtTyMu3+A8Ly2k2+gZpfqLQeYSz7/wC
-0t9myhsfez/rt79Wbf5JOw/1c3/jfDOhkeanB456/fRd0q+4qnqHr9PMvJYO
-VV3WLEfehjKz5+aUleIAl6nCmMN1BvGpa/YIh3pmlskJRdXX8T4zs+r136Ko
-3CpwTczVxRbkk1rUy8xvW9E8/vRc484Yw6QoimaiQO35YRJF3RYUqF1RJMK2
-RKFEi4LFuqgzhY8oOpGwJIep3JlAeevreNHzz42j6DWM0pwT8fyL84oQJs40
-8lZVz/DVjdlLQxwd3b0F4Uv2l98zaJv0wswRI8cEh4WLYpMieTHnLAnvbISD
-+6qr9wx/0pIf5yYQBXt4ePED4zbnN5GvL43Zy0JHunjw+GGL9pUZxtaJsnpn
-pJNH9BGzrzwmMF8URTNRoPb8MIky0RYETNQkRSJsShRKtChYrIs6U/iIohMJ
-S3KYyh0l6oYflq74LitkuPFeQ1V7MFro4cGfvLGMNEOm+PNDzyH8T26Sx/mq
-xtzti+MWvLs6PX1lSnxEZMy08PCErDqz5twV5Rn+o3UjLVNNkORmxgod7AZq
-GTRsynHyxERvH74pIEQ39LQqTIhCxJglas9ciSKkl8TrPq0wOgPLTEWhtsUy
-V1jAYUV1w7guLqqOK1E2KYcaoun8quQjdXdyxlH0Gs25051Hf/y/M2J+vEPq
-uNqK5joMCT1F+jJIWfVZmIvoQLWuL1H/9ZW/Q6jZAxlCcnKKz8LLpifq5RVb
-x40I33Su3owpakKSHeGTbNm3AAzCiCg0jFqi9syZKPVfX1JMkjJUUYhtsdAV
-DnBYUd0wr4uDquNKlE3KMUFb8cbEHRWKjmaqXqP9ehqPv/Lov2ZsN1gp1Xx2
-whD72YUtPf+1JT/aOejg/bW46rpvZzgK1pHXHjCGNG+Ok+eaUszWI6PBnSjs
-LVH3GlBRiHAqSodt6uJIlG3KoURe/p85G7tueaTqNTR1X492mZG1O3rRrwYr
-pSQnQwY7zCV/rUG0Xf1wqmtg1IL313zw3vyYhPSj7N1kIru8cHi/vk93Df8G
-PuMYfbaJrTOZR0th7LABffV52jWVPEnJmShcLXXoiXqiz+N9nrS2qA58XeFV
-Ud3gpwsjUfjJ0QdJFJmmnKhn/9Hj7pZ/BhmsVdQuAXt1ZOB/jiTFHKk3+FnT
-mdDB9nGFpN6kvWzDhID0KzKW79rUQjQcC35BaMHt0GxDyBuqb97Q52aNREky
-wpUobC11dIuqKBR72wcdLLGuqA6MXWFVUX9HhZ8ufERhKEcfJFEUUIw1FOUb
-fTyTj2TMyOjlBsjWwtn2QyeRD1RW745x6N//ea/xcSkZe38qazV/rQoyTTmR
-9g6vHq3F7TkrSHAmCn9LJr7XgIpCg0tROmxUFzeibFQOAsqGM19+OG/4oJeS
-/n3ytkHziMYToXZP/tPuxejebqNtL/3AdTCpM1Xd/nF9cpr40PFvdmSmvRnt
-99xT9uGbS9pY6tQJ2TXxDDe7fv2f0q5QsA/ZhfUClx5wKAp/SxpJzjsJK672
-uoQbKgoRbkXpsEldXImySTmsQ9z5ftxQx8X6T7trK0pwC9K77U8jLUhzezEq
-r6W34x9lQBQiIAoREIUIiLIu7b//y/XZ0Udu/z2+kxW/5eqaki990G9rpBeW
-B0XtufXwDdJoAqIQAVGIgChEQJSVaT43w8Fpsf7qYU3Lpe1JEdMTU1dnbhV/
-lLlxg/hYJTs3KNo4IAoREIUIiEIERFkXTf23If8thPk6AAAAAAnVrV3+w1+2
-aFMmAAAA4NFDWfVZgOucAvgmCQAAAEBBVbNnHG+J1R/qBAAAANgGmsYf5kRm
-/GGlHaMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGAL2W8ZIq9R
-Xjyez/jU4l6fzg08AFyZBeiiAOSgA64wg5DmLYtaX0L7vkRN+53ywoI7D/Wj
-MhlxZUOiaIbKVGk9lHAgx4YqjRq4RpkJcffUVOES7aYdXa9S/t6+g2g8Md47
-ues29Pbra4ImW7K5IiEr3ZU02tPNnR8tLm7t7fFZGumvW2L9R7mPGC6Yu69K
-Qfqpoub7tbGhAf6+3s4D7fiJGVk9NhxWVn3+itDFbsAgZ88xieea2H06l3FR
-KA1BOQGFK5O5sCFR1KGin4aOLmPJwkQU7TBYkaODofQht4RetChnMHGNolfP
-nFYUMzxmhJKSkgdvuXftfeHE77Q7mLdfT/ObdKzh73bJrizmh5+UEJqG47MC
-lxa19noKKgjphWT+mHUFUg3RnJs87u2CFrI0oulMIm/yJ6X3CHn5Nj+3+Rd7
-jA5lJasCA9NyJOqOjqbTE71IP+1Cc/vIBL/VveyXax70RJlsCAImXFHnwoZE
-IYSKAi1dlMnCRBSdMNiTw1T69DAlik60CJi+RtGuZ4YqijMqjKBQPOiTNfWH
-w4TLr7VrO/Xjk/zSruu1TV37xdjAzX9KS9ePFR2otWCgIcmexovXbWarqt4Z
-7Lv2Dzn5HSdFgoVFXaJbC+M8RT12vm3One0de6are1bXHRwrXHndULzs8iKB
-6Oe7ZsdGgp4oUw1BwJQrylzYkCiUUBGgpYs6WZiIohEGi3IYSp8+pkTRiBYB
-09co+vXMUEVhRNvFJO+Xs7WPXm+7tNAn4tRd/Y60tTDeN/6HQ6+FrLDocYmd
-XbNg9N4a7d6PRFPOLLcJRxtI28zLriTzQk80as+pqNgSELStUm9KUF6a7hu8
-s2szkc7DZ/OiTxuO79Q1+0ICNpVbMC41F0pR1A1BwaQrilzYkCiUUFGgo4s6
-WZiIohMGe3KYSp9ZWBwtCqavUbTrmbuK4gpV9Q5fp5l5LR2quqxZjrwNZT06
-WmWlOMBlqjDmcJ3a2AdQobzxsZ/7G+ebCY00Pz1w1Oun75ISoq7ZIxzqmVkm
-JxRVX8f7zMyq1z+PonKrwDUxV3d4kE9qUS9zjm1F8/jTc5stic48qEVRNwQF
-k64ocmFDolBCRYGOLupkYSKKThjsyWEqfWZhcbRIH27KFf165qyi2EIjb1X1
-aJb0wswRI8cEh4WLYpMieTHnSG1rPhvh4L7q6j0LT6duzF4a4ujo7i0IX7K/
-3HDXx5b8ODeBKNjDw4sfGLc5v4ncqTRmLwsd6eLB44ct2lfW66aRyuqdkU4e
-0UfMrhYTmCnKRENQMOWKKhe2IwolVCRo6KJOFiaiaIXBmhzG0keBgSjLo0XB
-lCv69cxWRbGDqjF3++K4Be+uTk9fmRIfERkzLTw8IatOf2ZQUZ7hP3onzR1l
-1ZLczFihg91ALYOGTTlOHuMZQ1G+KSBENzpkFUJ6Sbzu0wqjM7C0RaE3xGJX
-WMBVRXXDhi4mqo71ikIBVznmgCCKAg5+75itZ+OYqiiOUFZ9FuYiOlCtm+dT
-//WVv0NoDqmjJCQnp/gsvExrmbK8Yuu4EeGbztWbvUiZkGRH+CRzsMGU+q8v
-/YeFkRv/APqikBtiuSsc4KqiumFFFyNVx3ZFIYCvHHRQRFHAwe8do/VMBXVF
-cUZLfrRz0ME6XZeqrvt2hqNgHXl5AANI8+Y4ea4pZXXJNl2oM8KRqA7bcEUB
-d6J0YKzL+hWFsRx04BrVDSa9BtF29cOproFRC95f88F782MS0o+ycTeO7PLC
-4f36Pt018Bv4jGP02Sbmz2E5LYWxwwb07eSJPo/3eVL74mnXVPL8KDeiOrB2
-1S2qG2uK0oGlLlwqCks5+mBUUXi7Qqoozmgv2zAhIP2KjNVFDkTDseAXhJbc
-NM4JhLyh+uaNGxWFYm/7oIMlN27cuFkjUZKMcCKqA29X90XpYUVR90PCUhcm
-FYWnHH3wqSjMXSFVFGcoq3fHOPTv/7zX+LiUjL0/lbWy8rVrU06kvcOrR2ux
-nqg3MQvNiagOG3FFAWeidOCsy+oVhbMcdOAa1Q0WM1Sq2z+uT04THzr+zY7M
-tDej/Z57yj58c0kb410YIbsmnuFm16//U9q1CfYhu9hfbWA+GknOOwkrrvb6
-rAGuRHXYiCujcChKB866rF5ROMtBBa5RelBVFFe0FSW4Be2v7V6SppEWpLm9
-GJXXYs2gcAREIQKiEAFRiIAo3JAVv+XqmpIvfdBva6QXlgdF7bmF9SDNGoAo
-REAUIiAKERCFHZqWS9uTIqYnpq7O3Cr+KHPjBvGxSlbu5LR1QBQiIAoREIUI
-iAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA48h+yxB5jfLi8XzGpxZb
-9RZIDAE5lgHeKAA5ZsGdLqL5lw0fHEPdRMSm0bTfKS8suGPpPTiENG9Z1PoS
-rp7cb1twI4dmBtkAioo9OJBjlYpi6aRc1pKyUhwYkPmnje4kTjSeGO+t29ak
-/fqaoMkGD4ZU1Hy/NjY0wN/X23mgHT8xI8uyJxkTstJdSaM93dz50eLiXnbW
-Je6emipcUiy7/yqlmJQ7jfTXLbH+o9xHDBfM3Vf1t2xl1eevCF3sBgxy9hyT
-eI7Fje8pRNGOgS05OhjKoHlwEpLl3tjMpnmwVtisyNFhlYqiPinOunpNsfyP
-tT78dFx3/HjMCCUlJV0/l11ZzA8/KSE0DcdnBS4tau15tKxkVWBgWo5E3dHR
-dHqi1/yLlo3bCOmFZP6YdQVSDdGcmzzu7YIWclruXXtfOPE77aaM7dfT/CYd
-a+jxBqLpTCJv8iel9wh5+TY/t55haG4fmeC3+ne6OyfSEkUnBlblMJVBPUyJ
-4iokWt5Yy6YedEVZrag4uSbogSAK4aSY6jKW4s6j3Hi4dhsVRlAodJ2euvaL
-sYGb/5SWrh8rOlBL6iWbc2d7x57p6rnVdQfHCldetywnkuxpvPjzUu1rVfXO
-YN+15O26NPWHw4TLr7Vre+7jk/zSep6HkJwUCRYWdeluLYzzFOk+6j6yy4sE
-op/vWhKYPrRE0YiBXTkMZVAfU6I4ComeN7ayqQ9dUVYrKi6uCfqYFoVyUjx1
-GU9xU8604d5bKmxzkqq1MN43/odDr4WsMNh+V16a7hus22edaMqZzYs+bdmA
-vbN3FozWbQnf+Tmz3CYcJe/03nYxyfvlbEnnp7ddWugTcepuj/PIriTzQk80
-av9NUbElIGhbpd6UprpmX0jApnL25VOIohMDq3KYyqB5cBISTW8sZdM8WCts
-9uRYpaJQToqnLooUq259LrQP+uovNfkQW0BZKQ5wmSqMOVxnEL6icqvANTG3
-mdBI89ODfFKLepnvQzrFjY/93N84r/ucwFGvn75Lyomqeoev08y8lg5VXdYs
-R96Gsh49vbpmj3CoZ2aZnFBUfR3vMzOrXj/StqJ5/Om5HOxlQiGKTgysymEq
-g2bBTUg0vbGUTbNgr7DZk2OVikI5KZ66qFLcdmmBo0PMBSn5GAzRyFtVPZU3
-n41wcF/V6z616sbsZaEjXTx4/LBF+8osfxpl5+csDXF0dPcWhC/ZX274OdIL
-M0eMHBMcFi6KTYrkxZzrmfuW/Dg3gSjYw8OLHxi3Ob+pZ0aV1TsjnTyij9Qz
-3GebI4pWDGzKYSyDFBiI4igket7YyiYFZoqyYlFxcU2gwPBXD+GkeOqiSrH6
-r6/8h47ayMWg1ixUjbnbF8cteHd1evrKlPiIyJhp4eEJWWwtE1ZLcjNjhQ52
-XXu6Dxo25Th5mGcMRXmG/+idxvbXUpRvCgjRDR9Zg31RNixHHwRRzIbEkjfa
-ENJL4nWfVhid0+dEFK5yzIHDaxT3uqhT3PrLaw7P9/wuy/ooqz4LcxEdqNZN
-pGl7NodQ9rallVdsHTcifNO5erOXUROSk1N8Fl42sk6akGRH+CQbThgyCPui
-bFiOPiiiGA2JLW/0MbFvOBei8JWDDofXKCvoMpFi+R9r3Yf47uPubz4UWvKj
-nYMO1un6U3XdtzMcBevIawMYQ5o3x8lzDaYLyUzAuihblqMPpxXVgbU36l6D
-C1EYy0GHu4rCUJfq1i7BEHdWf4PMh2i7+uFU18CoBe+v+eC9+TEJ6UfZuxtH
-dnnh8H59n+4a+w18xjH6bBNbZzKPlsLYYQP66vO0ayp5ApJtUbjK0QcLUSSw
-9NYt6ok+j/d50nqisJSjD14VhaMu7dBqsEvXel58aC/bMCEg/YqMg0UORMOx
-4BeEBndFWh9C3lB984Y+N2skSpIRlkVhK0cfHESRQ8LS231RFYVib/uggyXW
-EoWnHH2wqigsdalu7RYOdsNr/NOhrN4d49C///Ne4+NSMvb+VNaK+N2PJTTl
-RNo7vHq0FqdHHCHDtiiblqMPlxXVgbc3E99rsC8KZznocFZROOqSl2d4DOZ/
-WoVRTKrbP65PThMfOv7Njsy0N6P9nnvKPnxzSRtbf0/LrolnuNn16/+UdnmC
-fcguLNZnIMG+KBuWow+3FdWBtzeNJOedhBVXe32aBieicJaDCocVhaOutqK5
-DkPHn6L9EALmaCtKcAvaX9v99bxGWpDm9mJUXos1g8IREIUIiEIERCHyiIvS
-1H8bNMRpWa93xVgJWfFbrq4p+dIH/bZGemF5UNSeWxiNhvAARCECohABUYg8
-4qLulaSMeDbs/xq5+ZYQDU3Lpe1JEdMTU1dnbhV/lLlxg/hYJSt3cto6IAoR
-EIUIiELkkRalqfsm8DlPm91jAwAAAOCU1l/+5yVn7u7QBQAAAGwZeekaT6c5
-BY/IdzgAAAAALVRVn/m7JuTh9QwqAAAAAE+0Ozl5v3WZ9jaIAAAAwCMAITkV
-P3V9KVaPEgEAAABsnf8HVTKwuA==
- "], {{0, 78}, {530, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{530, 78},
- PlotRange->{{0, 530}, {0, 78}}]], "Output",
- ImageSize->{534, 78},
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{282, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"DiracTrace", "RasterizedOutput"},
- CellLabel->"Out[6]=",
- CellID->1629884830]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -603,9 +543,7 @@ Cell[BoxData[
RowBox[{"DiracTrace", "[",
RowBox[{"GS", "[",
RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[7]:=",
- CellID->825892025],
+ CellLabel->"In[5]:="],
Cell[BoxData[
FormBox[
@@ -653,75 +591,2988 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ")"}]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{204, 18},
+ ImageSize->{220, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrace",
- CellLabel->"Out[7]=",
- CellID->274287736]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
- RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[8]:=",
- CellID->1341931123],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
FormBox[
- RowBox[{"4", " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{369, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The old methods of evaluating traces by replacing ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ " with ",
+ ButtonBox["Tr",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Tr",
+ ButtonNote->"Tr"],
+ " or ",
+ ButtonBox["TR",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TR",
+ ButtonNote->"TR"],
+ " are deprecated and should not be used anymore. In particular, they are \
+slower are less efficient than using ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ ". "
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces involving ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " or chirality projectors in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensions are also possible"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "5"}],
+ "]"}], "]"}]], "Input",
+ CellTags->"DiracTrace",
+ CellLabel->"In[1]:=",
+ CellID->196468068],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{147, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"DiracTrace",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{86, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Delta]",
+ ",", "\[Tau]", ",", "5"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{195, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnHlMFFcAh7E1bWPTVGuMJoZEjSKoiGijoCCgiNXQKGALUtoqQRBUbABF
+MQUElOpiMBU1BdYCQhQVgiBKvRqPegAWKygol6AcCkXYBfbe6S5bq13m2jne
+zozv+4MgM5mZ9/1mHjM78pscuNU7+D0LC4vIj3RfvNdHu0VErN/pM1r3j6/C
+I0NDwjcErQiP2hCyIcIh8H3dD630q46wsNB/j0AgEMi7gPxZYVZOXnp88K7b
+vVpzH4ywgaqFAcyRDH2VO/fffKUhXE8DFdKFrGo6wJiGw7QTEDnyHrWk+mSo
+i+u2i93qYctUrVk+gTd6EaS/Knzxd7f6TNqw8uX1/SsWxT2SIYM10YtXl3Ub
+p6uRVOdnnLp4MTdufdKdvreXamVPfzuWV3I+K2ruZ59Nspo+3dZ972PZm0Pu
+upyw1mX2pE/HTLGZNX9t8YvhR85JMFTTHg5eTOylwG3wnNAVjpHju6oaDVm9
+eOuuwlZp8xGnBfvrFUZLtd0XfFaeaFcj8sdJDu6nO02eonuvB3ikNck6SwIT
+yiVGmjU9VzZ9mdao26e8LsnV/5bkzW57b0R6pTUo9GeHeKnnBeOANLLOLrl2
+sDrON7tVZeohmQ1M1bSHQxQTOylwGzwn9ITjXjL8UK3qOONnH3BXgrmCvCHV
+9+sD9ZRnNm1Xqdfi5CdyBJHc8nfd81hutLy/MswjWfdTddtxV4eh9UxEVrvX
+M/ZORU7WA2PLiOZF4Upn0VAwA/cj3GOqB/9b1HPFe1HsI/2oFPUH3L+/jSpA
+Xpfil96kNPmQ0DG7ajrDIYqJxRQowLrqIQhPXYrCCXLklmp0VO0FQU7jLP1w
+ItD0VRUWVvVSftZTNh9ycj3epkYGHiSsTno4aLRYN9k7LjvfrVU0/uI249u7
+EtP3I3u42y3gx7wG4y0j+lx8pznm6vaN9P+VGHC44c3Ur+k8vcRxnz4BecPR
+tfF/StG2rGrJXO5/qYeZqd38qukMhzAm9lIwHQCq9RA6oSqcIEcuqcYYwPMz
+uw6WiuZOxYsAn2hsOjo6hlZRNGes89t7skCcVtwkM5asbj/hZu2yJOCH3aLU
+VfNWpZxtHkTPAWPjOiQVmzbmtqL9WpDVxtlOXOAZl11clJf1e+f/VlG1nwn1
+2pF1rjj32KXnGLdJqme/LrVaUdrFwAdoHFBNYjiYkoljYi8FUwGjmowTysLx
+c+SOanSUrfkx6XV9zUfmYUWg7Loh3ujh7LUvJR1tenyN4llpqigj93CI1agP
+xntsTsxpJn2Hqe0uW7P0cDPxzaL6VXlGZIB/UHhUzJ7Mqj5Sl7qqJd3ZIaXB
++EMdM8AF1STAlEw6JhQApwBMNR0nr6FyVuPAiRNe8TQ3Rqx7xlQ+xY4AQXqv
+eU1dcLDo6CPMuV8rKd823yW9Ral7oIy3Gb8wv8MEPfpwHLdX48RrQFab7GT9
+TUGbSSnqbigd52yvIdw463BCNTHYksnGhAbYFMCppuPkXyid1TiAUK1qPx24
+3MWIlZv/eP0/beSN2THZTfobItwI+iuDre1ji36+h/mcqOk694Wl3dAsKa0I
+nOmcycYrlIGqsMmfTFzi7avDLyi5doD5XVCBSLIBvqjmqGQDwlJtgKPCyanG
+QP5E5GpnazfEDMtRH46eNttt6/1+49UGa6JnzgwrTLv2EvMdvKpV/PmEeTrx
+mq6y0DXJVVI2XmL1XveYMGXLfY6YNw3eqOazZAO8UW2A/8JxUbVmzp+GPrcr
+GkT21gGnjuZW3rxcg/G6RiOtObkzLOpQ/tmiq40DLL0alz9Jth1nn1rP6kdO
+7MNt1QKRbIDbqg0ISvhwcCKQ1SU4z/Je5xMurpZiBNBdts7GcuzHI0foGDl6
+biRLb7G00gdHAl0XrgreHhufmFrSwdRTKVg4rloYkg1wXLUBIQlnFGXHhZ8S
+C1oMM65W1VNxcMedV2Y+JoECVQMDqjYz6s6C5VPdi14aZn2NtP7y2UttAr2t
+MzNQNTCgarOj7a8WrbaZYDnHwy9kx770wnt/8+dPangGVA0MqBoCgUAgEAgE
+AoFAIBAIBAJhBtgLChJoGyTQthmBVboggbZBAm3jQaOikwTUq3QFWHiLq5qJ
+vlN6xcVYQfNRtQF222Wp2sY5DfirGhVqFZ3E0KjSFWbhLbZqBvpOaRYXYwbN
+V9XstsvSs41xGgBUDaQalFpFJxG0qnSFWHirB0s17b5TusXFBEHzUDWb7bJ0
+beNccQyrRgdQNSilik5C6FTpCrLwVg+Gavp9p3SLi/GD5qNqNttl6drGueIY
+VY0OqGpQihWdeDsa2jidKl0mC2/VL0pCtpTjKjS7atP6Tpm2TRg077qFmWyX
+Zd42zhXHpGp0uNDCSq6ik0ovKBN9pGRRP89Z5nkV5+9fuaCaNKzYBtbFCkw1
+QyPi+rltMpxoYSVV0UmpF5SBPlLyEEwsnFBNFnZsg6q9BaeamRFx/9w2ER5V
+g3K0FxR5uxrU0XrMWLtFsIWVNYRYeItw1jZ1+FQNyoNeULw7Fj6pRnhhGxOe
+qUb4bZsIzleD8qAXlPAzFgOcV43wwjYZ+KAaEYxtVLhfDcr9XlD6EwtHVCN8
+sE0GXqhGhGKbaWA1KDCgamBA1WYGVoMCA6oGBlRtdmA1KDCgamBA1RAIBAKY
+fwAYUfbd
+ "], {{0, 38}, {371, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{371, 38},
+ PlotRange->{{0, 371}, {0, 38}}]], "Output",
+ ImageSize->{375, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[4]=",
+ CellID->1546036623]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Delta]",
+ ",", "\[Tau]", ",", "6"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{195, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQuMVdUVhrE1TWvbKBojiTFRYxHqAx+NMgLyFKvBKmALUtoKURBUbAHB
+RwoIKEWwmAragmMRob4KQVChihqRIgUsKgjooBSQl4MwzMC8557eOxfldc/e
++5yz9rpr7/t/iUaZCevu/z/rzJnhku+c/vf0GPCdJk2aDPt++l89+o3sOHRo
+v/t7npL+n18OGTZo4JDbb7tuyPDbB94+tHX/76Z/cUT6n2bpz8/8dwAAAAA4
+R/W2eTNnzZk+ZsCD75el8v1iChx0IQd0AYA5+1ff/+iyfQ3az2vAMlkHXcgB
+XQBgTH352hcGte9w7xt76o/7WN3WmT37v1cWBAfWDLn6t8v3J5lT+9XSR69r
+M3p9VVC5buTVNy3ec3j96kuXjL2l/cVnn9z03JYXXnHLgt3Hv5JoNJSvfXHG
+S2+8MXt0v/Er9h+556mq//3rmTkLX585/LJTTz27+fnnX9TlkU+rEo4jQ0AX
+liIKa4S8ejJEdJEh/GKOiqZZuV0A4VSVFN/z4LytFZufbHvloyU1x3w0tWdR
+z+uf31EfVH86vnWXl3fpn83UlC3t23XqF1W7FvYfu7L88EI0VO0qrU5Vrh3d
+69mtdQlHNP5+e9+684apn6dPU71xfIc+y8u//Uiq7L1h3aduqsncCYo7d1t0
+3M7mExFd2IkotBHq6qmQ0UWG8Is5KrpmpXYBrJCqLHluSKfmp/+o6Tlt73z2
+s8oEe54qfa371RM+qw6C8uV9Ojz8afUxHz+wenDXCelfrd/+XIfWjZ+XjKoN
+j3QbtWLVrJkfH7stmS2Z3Hv6F7VJR6Rp2D3v+naTGpf/4IdDuzywtvLbD+19
+q0ebUeszT2A1JY91+d378Zcyi4ddUEeUQdFIBprqPewi0EYXBaNm6dYQiKZy
+/Z/vmbZid03t16un/aLZya2Of1oyp3bzE207PLe9Pjj48dibxn9y7CWaftoq
+uub1Pamaz//W8ae/+U950seuoOqThzr2/eOcTTl2oW7L09f2eXMvxcNv+fJe
+PymanT5VcOCjcX2nbTqcT8OulzsVTcwEVr3pqVvG/Lci4SQPu6COqJHwRjLQ
+VO9hFxnU0UXBqFnCNQSSqd31zpKdhy6mgx/ede6ZNywL++nsyHB27tzZ+Ck1
+m2fc2vuRF+YWT13wRdWxF0/9juc7tmjfqe/vH5o05cbLb5z8yubwZzyDWWnK
+V915x+ytOR926rb9vXPz614rVe6k0ZSqDaMvOvPKbqOfXTB/zsx3dh01rW7H
+Pwd1v2/mqwtmP/PmlyaPkfW7Fw68e2XIM7mXXUSLKHEjgWH1OrzsQhtdpEEm
+zZp2odwL4BYVq/q1LPrrFtU3oTXbXpsyacbsaQObn/S9M7reNW7WZuM/ME3t
+WXxz52mbzb/FTTArAropdVumt2s9OcFz21HUfznrmm5v79N/YkF2YTaLthED
+/OkiWnSMpRvvBZBOat/SwZ2HLVO8tT1VvvLeK9pPTy9U9cYxLc+46sWdER75
+MutSNML4x7GJZpm/KO2U2s1PFF0yYl38nyIfjeG+FGIXprOIG9G/In+6iBId
+Z+n4OiKeuh0v97+2/TFcf9e/j12Lhn3LJ/yheKPqTxMbSl/9+VmtGp9mKlb1
+v6Dd0xbfhcEzi+1Eh1soatH0tFZtwlo49LIKsQu2WaYbcegFFWgXPIOi7QUQ
+Tqqy5B8Tiz86/k1PR1G3tfhnzS5PX1ANpYsH3TxhTYXFsnlmcZ4oi/65q1C7
+4J+lp4C7YC4C34+4T822BVOmryxr/La1oWzd/EU7cv/8tKFi3Qv3Dx7+xIuv
+zH/784N2ryueWZwnyqLbl8Ltgn+WjoLugrkIfB1xnPrS1wed/4MTmhzihJMu
+npT7j+Ea9iy+teVZp/3wxBPSnHjKZcNo3sKZE55ZnCf6BuW+FHAX/LM0FHYX
+7EXg60hhULtz0Z/Gzd2SfXdfqm7vqsfvW2GrdZ5ZnCeixb8u+GdR4WU+LhYB
+HKB+19xrz+sy/6vsOzYaKkqWvPLm9sR/6zafszhPRIt/XfDPosLLfFwsAjhB
+6sDaSTe1bHbWJV17D7xv4vR5H3xt7x0pPLM4T0SLf13wz6LCy3xcLAIAAAAA
+AAAAAAAAAAAAAAAAt4GEWg7oQg7oAgBzTCXUhMBnHUIeusiCRo4DewGAMSES
+ampTs9pnTSwEZxRekxIqBLchTFc1Qti+Z13w7kUGqnyURdi4wEDBECqhpjY1
+K33WNoTgPMJrSsKF4FaE6apGiNv3qAvWvWgcSJlPWBFWLjAgGkYJNaGpWemz
+tiEEZxFeM3VhIx+9YZyufZ+6yMC1FwGpnD0IL8LKBQYkwyihJjQ1K33WVoTg
+HMJrpi6s5KM1jBO271EXGbj2IgOdnD1DSBFWLjAgGUYJNaEwXeOztiAEpxBe
+B1Lk7Bby0RvG6don6kKJl3tBK2cPwouIdoEBv7AroY6Abkpkn3XiiQoiCa+F
+yNkjw9kIm3zcFDFdJG5BrJwdeINlCbX569BOieizJpioIJorXIacPSKcjTB2
+YfqKhHRB0IJcOTvwBDESak7VNdtEyNnlzHJUzs68F9xydpMugHAkSaj59dyc
+EyFnlzNLj6QumJORVQRwAFkSan49N+dEyNnlzNIhqwvmZCQVAeQjTELNr+fm
+nQg5u5RZGoR1wZyMoCKAT/gqTHfRQ+2lEJx5FhVe7oWLRQAH8FWY7qKH2ksh
+OPMsKrzcCxeLAE7gqzDdRQ+1l0Jw5llUeLkXLhYBAAAAAAAAAAAAAAAAAAAA
+gPPAQy0HdCEHdAGAOflxgkNFnQv42eWAvQDAmFAneAZSd7YEIbhsD7UYP3sW
+BjM4te6cDhl7QV69k10A4YQ7wTPQurMFCMFFe6gF+dkb4TCDU+vOqZCyF1aq
+d6wLYAU+DzWtG1qCEJzaQ+2zn53HDJ6Bpnc/98JG9fa7AOJh9FDTuqEFCMGp
+PdRe+9lZzOAZaHr3cy+sVG+9CyAeRg81rRtahBCc1kPttZ+dyQweGPaeecm7
+Fw68e2XIA7mve2GheutdALew66GmdUMLEYJbQ4wT3GyWi2ZwQ8dx4e6F2UQS
+jLsA0rHsoaZ1QwsRgttCihPcdJaTZnDDe1eB7oXpRBrwdcQTxHioOQexzXLU
+Cc4/i2Hc4S6KWjQ9rVUbd7pgLoJhYrQugHAkeag5BzHPMkJYF8yzOMfpn4GF
+dcF/rQrqAkhHloeacxDzLAPEdcE8i3Oc7t4lrgv+a1VMF0A4wjzUnIOYZ+mR
+1wXzLN5xynuXvC74r1UpXQBvYFM2QwiuxeOInGvEy73I10TgOWzKZgjBtXgc
+kXONeLkX+ZoIvIdN2QwhuBaPI3KuES/3Il8TAQAAAAAAAAAAAAAAAAAAACho
+4KGWA7qQA7qQA7qQTx481JBQh4Au5JAfP3uARnKAvRBPiIeaWtasklArjepx
+CNdnO+lnp85H1QW5pNuzLuy8bBHbIdfPLmAvLF2u7nWRk1APNbWsWWcDDzOq
+xyFcn+2onz2gzUfVBXXv3nVh5WWL2A6pfnYRe2Gn93x2weehppQ162zgKmd0
+RBT6bEf97AFpPtouCHv3rwsbwnQh25GBpnoP98JG7yxdhMDooSaUNWtt4Apn
+dFTC9dmO+tkzEOaj7YKwd++6sCJMl7EdGWiq93AvrPTO0UUIjB5qQmG6Xs6u
+cEZHnKXSZ0f2s0txghPmo++CrncPu7AgTJeyHYG5n12Jl3thoXeOLkwQ4wSX
+JGePps/WIcQJHgF0IacLs1nuNmKAmC44WzCbyN5FbqQ4wWXJ2aPosw2Q4QQ3
+Bl3I6cJ0lsON6F+RkC44WzCdyN1FbsR4qL00jzvqBEcXcrrwctbhLo5Afhec
+LbBNjNZFTiR5qD02jweuOcHRhZwu/J6lR1IX/MnI6iI3sjzUHpvHA9ec4OhC
+Thd+z9Ihqwv+ZCR1kRNhHmqPzeONuOQERxdyuvB7lgZhXfAnI6iLhPDImj02
+jxOCLuTga0ouNuLfXuRroi14ZM0em8cJQRdy8DUlFxvxby/yNdEePLJmj83j
+hKALOfiakouN+LcX+ZoIAAAAAAAAAAAAAAAAAAAA8gPcx3JAF66ApthA1E6Q
+Hw819Me5gIfaFUybQryJ4VgK1JSUUA91hnC5dgzYJNQak7Jc97EID3UGut6d
+7UKNamv08SrQdh3bd+9Z1ImPk+h2FLsFP1G6jxVy7ThwSah1JmV4qDVFEPbu
+ahdq1FujjVeHquv4vnvPok58nCS3o/gtyIHPfazRB0eFS0JtZFKGhzq8CMLe
+JXZRvWlKr189VhL7EVHTlDZeLYquk/ruPYs6yXES3I6StiABRvexWh8cFS4J
+tZFJGR5qRRF0vYvsomH/mnnz1pTF/nm7piltvFoUXSf03XsWdZLjJLkdJWxB
+AozuY40+ONIgTgm1iUnZ1H0swwkesPrZKXun7EJJhC7UJG1Kf52Hzvrm9w/v
+Oqnv3q+ozY6T+3dOcjtK2oI07LqPo+mDJUmoCXHPCZ64CNre80F4F7Wl7xXf
+0bVd94mTp6u+s0twKOPrvH7fyhnD+va5bcjwBx5+es1+ozu7EKP3EeQzagNC
+Q05yO5LXQiIsu4+j6INlSagpccwJTlAEbe95QN1F2bvdz7vy8flPrQ/9wXWi
+Q5le51UbJrRt8eu52yPdyGQYvY8gr1HrCQ85ye1IXAuJEOM+5hzENstRJziz
+h5q7CwIn+IHVA1pcOmr+Xz4I/aE6y6EOrhl8zo/P7NSjV5ret03YcJB+RBz8
+ilpoyFkI7OrJkeQ+5hzEPCtwzQnOHI44CbW2i8p1Iy+4YPC8qe9+FfqXDVgO
+Vba0a7Nz7/5Q1J0tGg5E7X7IdpHlPuYcxDwrcM0JzhyOMAm1vouaTZMubdH3
+padmr162ZF3IG6lYDlX92YSLTr90SokjfxB7HE5E7XrIVhHmPuYcxDyrEZec
+4MzhyJJQG3VRtXFsuwt73NpzSPHaipBbG9OhUhUfP9m/w1U3Dhgxasy4KQt3
+krz/hAlnonY5ZCGwOYIhodbipYfa0S7UeHkomSBqB2BzBENCrcVLD7WjXajx
+8lAyQdROwOYIhoRai5ceake7UOPloWSCqAEAAAAAAAAAAAAAAAAAAACID8zL
+PCBnTpA2J0jbPagtxvlRwxcekIlzgrQ5QdpOoLIYJ1Ukx9WR+ydHTnBkA+LL
+xD1Ufiujprh+kqnbw4p2Meosdrc1btqKy8DdqOWishgnUyTH1pH7IEfOQbwj
+60kgE/dT+R0eNcH1k1DdHlq0q1Hb3dZkaYdcBs5GHQ02OXIjWtl0TEVyfB05
+oxyZNep4R9aRSCbuo/I7Q1jUia+fpOp2TdEORm1zW5Omrdg4oqgFwydHzqC1
+GMdVJMfXkfPJkXmjjnVkLUlk4l4qvzOERJ38+kmqblcX7WLUNrc1adqKjaOJ
+WjCccmQTi3FsRXJcHTmfHJk36phHVg3S56zpV6LpXk2yqKNdP9Rpa4t2zq5O
+ua30aSs2jiZqV7AuR6aQqsfxUCvIkxw5nx5qsyPHyZmiX1MITPcilN9ZrKTN
+fm1bj5roRNKvbaexL0cmkKrH8lAryI8cOa8eaqMjx8qZoF9zSEz3eVd+Z7GT
+Nve1bT9qmhPJv7YdRrocOYtQRbJfHupAbM4BseleQtSB2LS9u6qzCE3bBxyQ
+I2dxX5HsRtQO5ExguhcRdeBE2hqciTrwIW2hOCFHzuK6ItmVqB3IObnpXkbU
+gRNpK3Eo6sD9tGXijBw5i8uKZJeilp9zctO9kKgDF9IOx7GoA7fT9hvIkdlA
+1GwgajYQNYAcmQ9EzQaiZgNRgwByZEYQNRuImg1EDQAAAPjN/wERmFXA
+ "], {{0, 118}, {
+ 536, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{536, 118},
+ PlotRange->{{0, 536}, {0, 118}}]], "Output",
+ ImageSize->{540, 118},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[6]=",
+ CellID->1367676074]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional traces that do not involve ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " are unambiguous."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " "}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{280, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SubsuperscriptBox["m", "e", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{482, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces that contain ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions are scheme-dependent. The default scheme used in FeynCalc is \
+the naive dimension regularization (NDR), where ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " is assumed to anticommute with all other Dirac matrices. However, chiral \
+traces are ambiguous NDR, unless the trace contains an even number of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ". This is why FeynCalc will leave such traces unevaluated."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{213, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnX1sldUdx9lmNuP+GGoWTZYmbhEUN8TBgnS8tJUKg7DJi8ZCuk0asUMd
+LIDKS2YRGEzKoongskJdwRJhvIQXEQbqEt0QwU1nUcEChQKl2A6hLdzb3t77
+7L6sA8q9zznPfc75nZfn+0k0Spvnd+/nnOfkKVz9fLdk+vjHvtqjR4+Z18f/
+Nn7yMwUzZkyeM6Fn/F8emjZzaum0KY+OmjZrSumUGYNKvhb/xZ/F/+oR//7E
+PzsAAAAAAeGTm6vWrK2Y/9i8987HVL+YQAHzqoB5AFJc+GDO0r9/GaUZFsXd
+dhlS8yngPwmveegCltPZUrNual7+U7ubO6/65aY3F0zMu/u2b934vT4/GDhx
+29nOTBdgEamvmlDy7nnHaftw2rBf7L1w9VdjoeN/fWXt9jeqZvW/6abbet9x
+R9/CxYdDWYzp+OKdpaMGl30aci4dfGbY2F3N3W/daEvN+pV/2b27umzyon0X
+NLixM5gX6CSJm38hq2yReYe1XXkhccLYJ+JuYWApodrK6fM217fWvTzk3qW1
+7Ze/EA01NoVjl2rKHl5dH/E1Ita8c8Lo1xo6nfDhRYMKNzRe9dAVO//uzHHL
+j7QnbrvK4WN2XnObeOL8O8Ujlh8LNW4vWbC/pduVoufeeuKny4/GJ4UPLcqf
+tLfFzyABZDQv2Imrf2GrbIf5BK7b1ROynbD2ibhbGGhL5MzGoh8Wv5/dPRVr
+2jFu2JLPw47TsndS/u8Oh7t9PXxoWVHFsQ5/r7Dtg8dHLIlfuvP0q/mDksOu
+4Nxb4wc/+2nikaW99g+Fv3zP39kQ+mzxmGf3HVhT9XH3+82Jnt08emh58m6/
++NGMwrk1l3xNciSaF+vE3X8CEatsh/kETF3cyHbCtU+E3MJAUyINmx4d8u2c
+oizvhY66l4bkv3q607n48YKxiz7pvgkjJ1aNnLTnnL/Hz/hjVO79bzTH2o/+
+qeCun7/fctXzVLRxw325zyfug/CRP06c/69WX6Oc0CfPFRT/du2RNHdTy96H
+e+VWx9+q0/bvhcUrjnR/7POKPPOCnbj6TyBkla0wn4Cpix/JTrj2iZDFBXrS
+cWrjvBd3lPe/Pdt7wWmvW/lI0eJ1myqXbzsWumaTRE7+eXjvUTua/PwBZWfD
+awV35t1X/Jvnyl94YMADy7bWXbpyTqRh49Rxs6te31b9yp5TPp61UrQceOJX
+1fXpHnZCn5X1/c69Y8pWb9uytupvjX6fh6SaF+qE4d8Rs8qCzHee3V766/2u
+RiXvebYufmTvRp59wru4HOaBXnTUr59bcehC3csDmPdC+8kdL5SvrF5R2vuG
+r98y4smFa+qy/sNEj9ePNe96cPiKOoE/f2b1XiInKoYOWub70fN/aGSeNUWk
+f/nmO0+tuX/M219m/gbZ5j3rItiNJFuIaR7oRfvx6rmVtSGn4zjrXoi17H9q
+YF7FiQ4nfGh+n1t+vP6M2A8cul0/cT/lPu3/d3x5ZrkQ/5k/956nD4p5GfqY
+Z08R55/EPOMUkm7eoy4CJzRbCOe/ZkQaNpSMzOvG6Cf/0fXfqoSPrp67+lji
+Zz7mvRBtev0nOf2STxutB0q+P3SV4M8CyL4+2SyW8xQambdmymXzuXfeeHO/
+wTBPNYLPPNCM8Ofl+f369ktyV84N3+jZ6+6C6R+1pf3eSH3lj24dEN840aZd
+Ux9c8mGr4KWVfX1Vs9Kjk3n7prg9hQbSPNmGx/O/oUTqVw3s5fos1Hpw3ZzH
+Z720fuuWt49eFL9/ZF9f1Swmys3bN4XzFAqOebINj/PfUBj3QrR51yN9cm7+
+5nVfiXNdz/4z/X6ckPj6qmZxoNi8fVNEnf/WOCHc8Dj/baTjzM7fL9x0IvXZ
+sFjk3IEXZ+8Tucayr69qln9oXq1NU0RhjROztAPt6GzcNPL2wi1fpD4xEG2t
+fXPrntO+P2NPd31Vs/xD82ptmiIKa5yYpR1oSKytpnxsn1tz7hlRVDr7+YrN
+//yP2A8PyL6+qln+oXm1Nk0RhTVOzNIOAAAAAAAAAAAAAAAAAAAAdAEhVFXA
+vCpgXhUwrxuI/6qCOv4L+V0gu6wK7HnNUBz/TeA/hOraWhXb0hWHW4JWVDBX
+bfnXOPN02eUUUne+jvFf1Xuepjauo/m0qI7/JkeJicNmaq0KbumKwj1BKyqY
+q7T8a5x5wuxyErk7X7/4r/o9T1MbJzRvePzXEReHzdRaFdzS/T8yzQsL5iot
+/xpnnji7LHvnJxAb/zV/z5PVxkmyy6bHfxOIisNmaK0Kbul2Ide8KCdKy7/G
+mafOLkve+QmExn8t2PN0tXGC7LIF8V+BWd5MrVXPLV31CVpRThSXf40zT5td
+lr7zHUHrm8KOPU9VGxdpPj0aJWh9xGdNDKHKNi/KifLyr1eUm/eMXTvfhSDu
+edYsleiToPUVnzUwhCrdvCgnysu/nlFt3iPW7fyMBHDPs2cpRKMQKln8V48Q
+qkbmaUYQTDHRPNkUqYNMDF7bURvnM58BnUKoZH1SLUKoOpmnGUE2xTHKPNkU
+ykHp0cx8sGrjLJSHUMn6pLqFUJWbpxlBNsUxyjzZFMpBTHQwH9jaeFqCEv/V
+L4SqPkFrTeW2C2PMk02hHMSBevMBro17x5r4r3EhVGvisDCvcArlIP9Ys+fp
+Z0nBmvivcSFUa+KwMK9wCuUg/1iz5+lnScKa+K9xIVRr4rAwr3AK5SD/WLPn
+6WcBAAAAAAAAAAAAAAAAAAAIBkVOVcC8KmBeFTCvG+j/qgLmVcFrHtJEg/Ky
+Zijt/7rWY72ROR5qWIVWnBPp8d8U1phPwo728kATh7XIPF15meDMQf/3MqwK
+aqZ6rDcyx0ONq9A6opyQxH8tM8+O9nIjPQ5rkXni8rLkMwf93ytgVVDdGprc
+uMRDjavQOoKc0MR/LTPPlsaN7DisTeaJy8uyz5wE6P8mYVZQXRqa/GSOhxpX
+oU0gxAlN/Ncy80xp/MiOw1pknrq8LPnMSYD+bxJ2gtalocmNWzxUbPEzhWzz
+IpzQxH+Fmlfd/+WRxo/kOKxVe562vCz9zHH4l5hjz6dHoxaq6gStt3iob2Be
+knnl/V/P0tStb3D3PGuKWTuf8/95fs0L06aFqj5B6yUe6h+Yl2Zedf/XozSV
+6xvUPc+eYtjOz+r816jIaU1r1bgWqoXm0f8lvL5j4J63Zgrfns+ATkVOy1qr
+DGBepnn0fymvz0vwzFNOyfL3f7pQXuS0rLXKD8wLB/1fyutnQUDMU06Re/7b
+0f/VMsQJ88JB/5fu+lkRCPOUU3yf/67Y0f81McQJ86qwwwzMB2GKXOzo/5oY
+4oR5VdhhBuaDMEU2dvR/TQxxwrwq7DAD80GYAgAAAAAAAAAAAAAAAAAAIAsU
+OVUB86qAeVXAvG6gQqsKVGhVQV2hxQp2gdNGM5RWaIWHSk0qciqt0MJ8BvMu
+UV1PECRoGStokHmq0yaBiPU10HxaFFdoRXc/dShycqK4QgvzGcxnjup6Q36C
+lrWChpknOG0SiFhfjcwbXqEV2/0kLXIaXqGF+bTmGW+EH/kJWq4VNMc8TfNa
+yPoqMJ8e0yu0grufhEVO0yu0MJ/evPsb4Ud+gpZrBQ0yT9O8FrG+9ObTY0GF
+Vmj3U1CRkwMLKrQ6mlff/2W8EW4oErQ8K2jOnqdpXotZX2Lz6dGoyEnT4mTN
+IiuiBq5Cy5pC1kKVbd7bG1GdoKXEjtNG1PqqR58iJ02Lkz2LqogatAotewpV
+C1W6eS9vRH2ClhBLThtR66scjYqcNC1OgllooaqaYmL/1wLtjoF7nuy0oTzW
+PKNTkZOyUqq+iKqTefumGNT/tUk7A53MkwnRwjwHyouclJVSrYqoys3bN8Wg
+/q9N2vlRbp5MiG7mMxGICi39LA7QQhWOMf1fu7TzE5TTRj/zWWFTpdSsIqdN
+lVKYpx9BNkUg1pw2xplPj02VUrOKnDZVSmGefgTZFIFYc9oYZz4TNlVKzSpy
+2lQphXn6EWRTBGLNaWOceQAAANbwX0GySQk=
+ "], {{0, 78}, {512, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{512, 78},
+ PlotRange->{{0, 512}, {0, 78}}]], "Output",
+ ImageSize->{516, 78},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->1815562078]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{213, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQlUFFe6x817OXPeS945ifrmxHmOL9EYDSYuEU+UqICCuMSM6xzFoxnl
+TGJcRkdxwTgjLgxEMdE8cZKAGFRIXCJx1+CS9wyDKCYuoKIIBFQWQcVm6W56
+e90QR9TuquqqW7du3f7/zklOFrxf9f9+dbldXV2/jhFzx77/L61atYr8N+ff
+xk5bPGj+/GlLxj3v/Jffz4mcMX3Oe38cPmfBe9Pfm98v4l+d/3Gx869Wzp93
+/bMDAAAAkIjdYtf6EAAAANDEbi7LTJo3rM/ozBqtDwUAAAA97KbbN8ty5nX+
+TdhJrP8AAOBjmK7GdGuP9R8AAHwOrP8AAOCbYP0HAADfBOs/AAD4Jlj/gTdY
+6u6ZcbcwAHxguroK6z+jmG6kp2xNS1z+/tJTNRqvuY0lScNee/nlzl0HLPqp
+VttD8QhDcQGgAxqrLhxeHdjm2Vcid2YX1tsUjWUqzdidZ5B53tlwvrrh/tkl
+azLvKZsWMtT+tOKDr3JrrA//i92Qtzuj1KTdIT0J1bjQsQA8wF57ft38HTcb
+vfgjltKUcRE/ON931J2bE/hu1n15hRtvn1wzvH/0ZaOjIW9x4Ogj1fJPS5sh
+d0fSzoyM1OhpMdn35Y1jN/783ea0/YdSFvRu0+alLl27dg+NvWqUeUBWQ+72
+GUHBCzOqreI/7HaAqmMrw4N6vPRc605+r78Zvq9S5jgOU3HSzFEBHdt2HLb8
+f+88GKTx5s75687XMrMOeoiLWAgiHUts6kVbmkSjAkCOxpIv3425WO/NH7FX
+Hx434usyq+sDiH6huyrkb9tqTk4OSygyVuyPWHlG7vsP50l19/isdxIKzc7F
+Lj8meFKWQcYY9pofIsckXDe7lorkkJGHFfwychgLkucuTS+tLf77gL5rCsxy
+hrAZK6pM9obc6AlbSi3yj+SfWG4fi+rj98ecf17/qb8Y8+6XJd780lcNj3GR
+C0GwY0lOvXBLk2hUAAhizI/73YpL3u116s7ODIu7anJYb20L7hd3TcGFBOOV
+2JHLsnO2plyUv/o7bJXpIwbGNy0c9efnh36Y2yBjkLvHx/ZfdtmVg7ng49A/
+nJJ/atqrDo4JbErFkDUp+G9X5cdjyl87MbGI0Bptq/x2aFiLlc94acU7cfly
+3980YW8o2DZncJdf/0frjgNmbbnWIGsKxeIiEoJgx5KbehcCLU2kUQHwCntt
+waECT2/1TQWrA0efuOfVgM49VMCQQ9V2c+EXg7pNOW1QcNXWuQgNmvzXtOuK
+TgRD1oRXAlJvWZ2n+YVVkzdel7PhtlXsGhyw2nVqmq5/Fr5cyeekjcUbBgRv
+cx5O/cWVo2MuyX9plpJNQycdvavwIoG90WxrPqzECbEtf9HfOzEqUOa7k2Ya
+Ln8yd2N2pbnxztmNv2v3XE95g4nERSQEwY4lOPUuBFqaRKMC4A2NN3dN7RGc
+Xul+kbbd3hPyxtwLXl39sZZ9PejVoMGT/7wift0o/1Fr9xbL2/i5MOTM+iC1
+VNnmznglunv7viOjt+zbk5byfYXMwSxl38wYE5VyYF/q5qM3lX00ai5Omjox
+dvvu5IR9RUYFC5flxpchXYYfrBL7/brYHeXl5U3/s/7igoBuIbM/TdmyeU9B
+fcujqb8w540h+6uEDtBauX/6n8542A83Vnx/rPyXJaz+/OxO7d/JlPVBkHBc
+UkMQQqRjCU69Q6ilvWlUweQBkIa9/trWGR2f7/he3Oc7r1Tmfbtq0qCQFRsj
+h3X8bdiOcqtrs7KkR+/H3w8bi76aHfhi6/8e9vFl1ybGXnth/dKkwgc7R3v1
+kfEhG4ulLbPCQ0lEeBBLSeLAfmul7KWIHAzBoTQexHQttnevZVeEftR6c+uQ
+kVLeHdbmTPML+Fzw4wTzjYPr4pNSN07v8syvXgibvWprsaJrT16M71XHKqwl
+gPRGdXiRPPBFQp+gqKjI7U9ay7f3bR/wy/7/Tkbwr9uH7y2vu5V7pemGQEP2
+hJd7b3jk1DCV7tqUWWW+f/ovPTuHZxkcllupI4Njr7Q8mQIWSbtyKTKUNEQG
+aSzeENBrUZ748RA5GHqvS/1BnMn5vzLljNDlDomrkP3eyZkhkZkCN+7bDWcW
+vhmU6PwFYcpf7vfCWzvKyd7qKTS+Nx2rtJYAkhu1Caz/vomlbFfE0KDHGDH7
+H7K/FPPI+l9zMuy3PdcXPdyC3M98+0X/L0oeubnC1tj0s5YbmwPf+rSwOnvR
+8A9Py/x0lshQpI6Hy9elYBBLyed9Oo1xdw/KwyYMeLV12579hZvQdi8rbl5y
+vtBFQFvVgWEdejbtfWtzIl4buInIPU30xqdWy7vkARBDeP03nBrXyf+zn92+
+Na49PTUocueqcCV3ZpIcitTxcPm6ZAzSWJzg3zn8tLL9v72h4KvVyRdEilpK
+k/u083eulLaqIzPGx50j/cUDtcenXwv7f0AEW2V6wH/5J99otJltzev/usKH
+63/DxXmv9/mk0O01yfrzc1/rFvLRxXqvGtx6L+ebb8/VPPpFHW+HIjIIwXFI
+DcXOIA7XzY5r/HsIX5AQW4XMN/atSzxT07S3sNXk7Tlc5v7qtq02b/uSmQs2
+7Ni750Shd7lLQu3x6dfC+g/IYCr6NOzFTm8v/Px40fmdczs/+59D1h+/VvfL
+JUtrWVqg/9LLbq8X11+IGh3v9e2LNZlTunadcvLRN6zeDkVkEILjkBqKnUGc
+NOQueCNI+OK14CpkrTo0o+u/P9XqF556pke8+w83bdVHpvp1aPvs0085efr5
+3pGEn0Kk9vha1ML6D2jQkBc1cEq2u2vA5TunjtlxS/YX7kkPRep4uHxdsga5
+nzn+rSipn0fKp7H88Eerdpc032Jmt9zNWR+VTXJdU3t8rWoBQIG6H+eNiH/i
+K7y2qgMTOvf5HxLfPSUyFKnj4fJ1yRvEXPDJ2/N/rFNSWALWit1DO4fuud38
+LsNWW3Bs79FbBJ88p/b4WtUCgA4Nl2LHxuc/2sb2O98N7z5uZzmBOxuIDEXq
+eLh8XfIGMRd+NvEjBV9Oloi9Ljd+tF+7Dr3CJk6PWp2Y/uMdsnfmqD2+VrUA
+EILIo1easVZ9t2j+UUVfsAQ6w3bn//7yYUYViatgAADKkHn0ygNsNTmbU84r
+vhsS6AR7bW7alrM1+I0PgB4h9egVAAAA+kXCo1cAAABwh/ijVwAAAPCHhEev
+AAAA4A1pj14BAADAF1IfvQIAAIAjJD96BQAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAusZ0Iz1la1ri8veXnsLTg6iC5LUCyQPQzP2zS9Zk3qP6DHgb
+zjkXVJNH5i2g3fMIHzCK1ZC7fUZQ8MKM6sckUHbjz99tTtt/KGVB7zZtXurS
+tWv30NirRrllLKUp4yJ+qHE46s7NCXw36xFLgbXq2MrwoB4vPde6k9/rb4bv
+q5Sjo2q8fXLN8P7Rl42OhrzFgaOPVD9+ytkMuTuSdmZkpEZPi8m+z8AJ6SF5
+Imk0IZR5M8ozEYydbAuRw2PPuyDUJ9o2PKvJA6YwFiTPXZpeWlv89wF9H1WH
+2Wt+iByT4HqYhKU0OWTk4SeWU++wVx8eN+LrMqvDdDWmX+iuipZbL5uxospk
+b8iNnrClVJFItebk5LCEImPF/oiVZx5/Gp7t7vFZ7yQUOl+PKT8meFKWQUkh
+AnhMnlgagpk3lyKTiafYCbcQKTz3vAtSfaJpwzOaPCAGEe2vvergmMC4ayaH
+w5A1KfhvV1u63+8eH9t/2WXXjsFc8HHoH04pXC/rzs4Mi3MWsN7aFtyvqeRj
+mPLXTkwsUiavMV6JHbksO2drysUnnoVqq0wfMTC+6WyvPz8/9MNc2cJz1ZN3
+QSIN0cxJZeIpdsItRCV5Yn2iacOTTh4wBhntb2PxhgHB225ZHfUXV46OudSy
+1W0VuwYHrHaNarr+Wfjyn2qVHa9zExQw5FC13Vz4xaBuU04bntiKWko2DZ10
+9K6yfYrx0opBk/+adt3NOWvImvBKQKrzpTrqLqyavFH+Q/JUT94FkTREMyeV
+iYfYCbcQneRJZaJpw5NOHjAGKe2vuThp6sTY7buTE/YVGR9tRUvZNzPGRKUc
+2Je6+ejNJ3cv3mEt+3rQq0GDJ/95Rfy6Uf6j1u4tfnzzZrnxZUiX4QerFH0k
+Z8iZ9UFqqbstlfFKdPf2fUdGb9m3Jy3l+wr5uy4KyTvIpCGaObFMPMVOtIXo
+JE8qE40bnmzygGUkaH/NNw6ui09K3Ti9yzO/eiFs9qqtxWp8EuS5ir36yPiQ
+jcVEzMSyXoulJHFgv7Wkn4zNQPIKMvcuEzotJBW1kieVieYND3wEce2v3XBm
+4ZtBic6TxZS/3O+Ft3aUq3Hbm1AV19kQsEj+FXdpVQRwvucP6LUoj8ABtDwW
+zZNXlLk3mdBpIcmoljypTDRveOAbSND+2qoODOvQs2lPU5sT8drATQpvKuG2
+iqVsV8TQoMcYMfsf7pcZBpKnkzmFQrpLnk4JClW8Sx4whTTtr6U0uU87f2fj
+2KqOzBgfd65WlanlqYo4bCRPLQ1WYnewkjydEtSqAB0iVftrq83bvmTmgg07
+9u45UVivVv/wVEUMVpKnlgYbsTvYSZ5OCWpVgN6QrP21VR+Z6teh7bNPP+Xk
+6ed7R6pyLxhPVURgJnlqaTARu4Oh5OmUoFYFcEtj+eGPVu0uab4BzG65m7M+
+KvseqlBA7aOlloa+YndQOWA0PNAB1ordQzuH7rndfMeArbbg2N6jt4jfDMxT
+FVKofbTU0tBX7A4qB4yGB7rAXpcbP9qvXYdeYROnR61OTP/xjhq3KPBUhRRq
+Hy21NPQVu4PKAaPhAQAAAAAAAAAAAAAAAAAAANPAhaoVSF4rkDwAzcD/qxWw
+0GoFzMsANMGA/7cZVV205KS65NDaQktwivlIno55WVRULR3PTQL/L5AAE/7f
+JtR10ZKT6pJCewst4SnWf/L0zMtComrpeG4S+H95hzf/r9ouWhdEpLocWWjJ
+TjEfydMxLwtlJRmBJoH/l3O48/+q7KJ1QcS4ypGFlvAU85E8HfOyQFbS8dwk
+8P9yDnf+X9VdtA7pxlVr5f7pfzrjYcvEk4WWrCWWi+TpmJeFspKMUJN4PbOC
+yQOWYcBCK1ZFXy5a682tQ0aekPCoRV+y0IrVIoLmyXuB1vJfskpryckDttDe
+QiteRWcuWonngg9ZaMVrkUHr5CWjvfyXsNIa678uYcOFSq2KqoUeulADXm3d
+tmd/WGhp1dJd8tycU94lD5iCGRcqtSp0ConvhZhJnqYfFslTG59mlWaw/9cb
+DLlQqVWhU0jsXGAoeZp+WCRPbXyaVZrB+q8rWHKhUqtCq5DgucBS8jT9sEie
+2vg0qzwA6z+PcCYq1ZERlRsLLf1aCuHDvKyjwAGjcCYq1ZERlRsLLf1aCuHD
+vKyjwAGzcCYq1ZERlRsLLf1aCuHDvKyjwAEAAAAAAAAAAAAAAAAAAABzwIWq
+FUheK5C8ViB51oALVSukJo/QSAPntVZgtWEMDy5UcpZSIRcqQTms/lyoQv5f
+cV2yFOhoeTlKnp7zmoIFWEfmZTqrDfGG1FPybhG00JKxlAq5UMkZV3XnQhX2
+/4rqkiWjupaXo+QpO69VtgDryLzsQv3VhvT8apk8DRcqEUupqAuViHGVoguV
+ioVWNDTJqK3l5Sl5ys5rtS3ALvRjXqaw2pCdXyrJe4CKC5WIpVTUhUrEuErP
+hUoledHQpKO2lpej5Gk7r1W2ALvQkXlZ/dWG8PzSSN4DdFyoJCyl4i5UEsZV
+oi5UQagkLx6adAhoeYWgZ6HlznmtugXYQWaK+VltiM4voeQVm5fhQiXsQpWM
+Wsl7HZp286uRhZaBnherwmnnM5A8G8JrUskrfPI2XKjEXahSj0it5L0MTcv5
+1cZCq33Pi1fhs/O1T54V4TWx5BWt/3ChkuOhC7UFLFto6VRhzkLrM8lTqKK7
+nudDeO0gYl6GC1Ur2EieThW2LLS+lDzNKuKwkTxnwmuH/P0/XKhawUrydKqw
+ZKH1reRpVhGDleQ5E147ZK7/cKGqUEUSzCRPpwpDFlofS55mFRGYSZ474bVD
+XfMyXKhawUcySN4XqpCCp27UV/LugQtVK/hIBsn7QhVS8NSN+kreE3ChagUf
+ySB5X6hCCp66UV/JAwAAAAAAAAAAAAAAAAAAPA6MnFqB5LUCyWsFkmcNWGi1
+graFFjP4AFhotQKrDWNoaqH1aSOnUPICUl2voKCgFZlBHSVPy0LrgsT88pN8
+ExRWGxc+mrxbNLbQ8mTk9BLh5D1Ldb1DfQWt2AzqLHkKFloXJOaXs+QprDYu
+OEmeEwutDo2cNJIXeSHSUV9BK2kG9ZM8Hec1kfnlLHk6zmu9Je8BTiy0OjRy
+Ukle+IVIR30FraQZ1FHydJzXJOaXt+TpOK91lrwHuLHQsmjkFIRK8iIvRDI0
+FLRSZpCIC5UbCy2p+SWZvCDcrDa6S14KPmOhFavCjQvVuxeitYKWIHry/yqI
+ndT8aoG+Vxs9J+8eX7HQilfhxoXqzQvRXkFLEt34fxXFTmp+NUDnq42Ok3cP
+A0ZObqrozoVKpwSFKrrz/1Kz0NJLXj89T6cKTdGwTNgwcvJXRRxmkucsdr34
+f6kFwkrDO1hJnloVhpJ3DytGTv6qiMFQ8pzFrhf/L7VA2Gh4BzvJU6vCTPJu
+YcbIyV8VEVhKnrvY9eH/pRYIEw3vYCh5alVYSV4hPFlK9WXkpHC0iN0t3Fho
+kbxWVXSXvHt4spTqy8hJ4WgRu1u4sdAiea2q6C55T/BkKdWXkZPC0SJ2t3Bj
+oUXyWlXRXfIAAAAAAAAAXfP/iMuSpg==
+ "], {{0, 119}, {512, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{512, 119},
+ PlotRange->{{0, 512}, {0, 119}}]], "Output",
+ ImageSize->{516, 119},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[4]=",
+ CellID->492128281]
+}, Open ]],
+
+Cell[TextData[{
+ "Over the years people invented many different schemes to deal with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization. Currently, only the \
+t'Hooft-Veltman-Breitenlohner-Maison (BMHV) prescription is fully supported \
+in FeynCalc."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[5]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnXt0VVWe53Wm1/Q01a7ysagGs1jVIlRFUNMpi4cYKHw0lj0FCPQALYwP
+Fg1ClWgEDR0XD0U6Io+wUEgPMQ6UWN2iodLSlpZNywpmbAtwwhuKBLEoJJEo
+BAJ5597JzYVIcs/ZZ59z9v7tx/l+/uhVDdTd53z2755zc++tfG6a9uT4Gf/l
+qquumvvf2//P+Mdy7n766cf+YcK17f/P/5wzd9bMOX8//YE58/5+5t8/PXTa
+f23/w51XX3XVn7T/+8R/jgMAAACg8Y9bNvzyzfWLZzz3n7Ux1QcTcbAXSoB2
+ANo5t/sfXi472+b579rwLJEO9kIJ0A6k03x6x8sP3LXoUEO8/kDOiAc/+Lr7
+MLWd3/9W4eYPP9y06LEXPz135d/GGr747etvbv3Nhnk/uv76v/zBD394233/
++PuGzr9urdn2wt/95Pa//O51fW+5dfDfvftVa8BDbD2//19m/WTkMx9+nfoI
+LSc2TJj2cW08fqF8zoiHPzkXcAmZMAwLUxRim/xhzl5AOwB+qd0xddSrnzdU
+b532ws7z3W4FbWf+4+ejXz3W1P5T6pEXRz70yfnOv4nVfjx33KuVTYlhLLr3
+Z+93v4m0NVTXNMbq9y+atPFEC89hNBzb8PSsJaXfdJ32hoqiJ5/bcqLu+Lqs
+IS9XNHX778S+fn/C3/zzqdZ44+9fHHrf29XeL5y8iLWEeGXlfAquhgUpiofZ
+Jj8LUe9FWKAdWEtL1TuTM6f+7rzrP2iszJ80cWWFv5cfDYf/8WcLP931yw37
+ut8J4m1fbfmb4cs75u/inqfvy91f3/lXZ/5j/F0LDyVWaqpYed8j/+l4UI1H
+Vkxe/3mz9zHEzu9e8j8mP5//8wcee+vLb5+gsZr3xo3IO9oYj5//5KGRS3/f
+2O2/dmH37FF57X/a+uUbI4d2/LvAxJpOlRVm//THD5bVdv3z+sr38nMX5b/+
+6+0Hz7NeQLqcQgKG4dCKEoTdJq6FCPei3djx4qULV64vWpf31GPzi09y6HF6
+EGgHdtJyqnh6Vs8+kxn3grZz5Vu2lNf6e23QcPD5u6cueLOyPvWvzn8yqf+d
+m75svwRe2Ltk6trKb1+UtFW/fc+dyxLPg8bKgr9b/P/qHI/4D6/d/9C/n/F+
+TdT6zSe/2l7VnDiBve+UfN55JM3HX8ka+Ub7+hf3vfDgiwe7H2H7S6E7//o3
+X8eajv3vuwf8r9+dD/GaKNZ4+uSpXdn9eo/accW9oKX63eyRdz/34Wnv149u
+p5CAYTi0ogQht4lvIbq9aL+uvXnvHc90XFpjZ7aNznhkF8dxpwLtwEqaT77z
+3Or3lv+oH+tewCCnK1VVVZf/5vyunz++6YTTS6SGw4tuSxvys0Ub3y15c8P2
+6i7/pOXUO7PGzd/wb+9uev3fT7q8Gmn54/+59wcPvFcTfECbjhc+Ovkf/6W4
+6NV3P2/o/sxtPfXPd6f/5J6pTz2/PH/sHWNX/OvxetaTu/WrrTOf2MmQ1/68
+GpB2xb2gsWJVVp9haz/v/mO5b9wNC1AUfps4EbkXbFpOFA5KG/ZKRfvxtpzc
+MHLwgkOB3miHdmAhzSfeyl1/5NzxdXe43Quaaz4uenzU8HHLVqx3eiHUenZn
+4dypD02fMy936Wvl57ieAy1/WD986IrK0JdCb5r++F7+8sJNa2f+oMd/+4tR
+v1jyy+McT/7Y1x/87b1rj3O/f9B68pd//bOPzrr/g273gnNlU27s0Wfyoufn
+PXJ/xsD7ntlazfrpINAp+MD98QVvE8leeNB2Znt2xg3fH7uoYGl2zsZDF92v
+b9AuUDvQn6YvNuUWVTTEm79wvxfE47Wl4/oNWV1ScCj17xsO52WlTyn+0tfQ
+tP90eudfPXvA4cYiltj5nc8M/sn6PzTHG48svuUvhr1VxXWnSjwP7nx2P//h
++bwXtL/sS7/+9tUdPxW0VheP7n3juN9+43JRCngK3LAeX+g2Ue2FN/UHXhqe
+fm2PniNyP/jK7R4M7cK1A61pPLYxd+PniR80mfeCC7tnpGcuLFnzWeq7oBfL
+Z990Tdo94ye1M3l63uGLsg/ZD201//bTPhkdL7Dqdk0bOPw1vi93cNNy6u1p
+9/8kwZ3p192QcVfHf/ybX/zf1P/NTrd7wcH5/b+XtbWm45/FTpfc1fPm7H3O
+TzvZpyD78ckW+nYvrsBhL5pObHh4zJrDdTWleQ/0ui5zwV7HiYV2Tni1A81p
+PLp8ZMZtGR0M6NPjT6/tf/vdT+650P2f1R/IGThw9pZXS0+nftmldseoXn2f
+2KPVLaCTlhNFP+51R/v4t9V8MOtv88rrZA2oz58L2qrfzuqdsfrSpwW1O+5P
+u2XxEee3fmWfApkisoXYtM9yxqBVie9qxmO1pdNu7j+r3Gl2oR1ElpYTrw3u
+7/xzQVPl8sz0qZsLNu0u23ag+7cJGo/m3dYzM79Cyy+ctdUd+Jd/mD3vlbf+
+teSjY4x3hkPDcS9YcuXnBa3VxWP6Dk1+dNx0bNXgQQtSvsVxCdmnQKaIbCE2
+TcfyBw+YmZzzpsoVQ4Yud3xbHtpBZGHcCxqOvDD81vGPTphTtL8u9b3GWN2+
+ddNGDhs749mFi5fkb63S58Omtq8/ePSWPjd850+ubudPrv3RXJ7v3wWDfS9o
+rtn7/rIR13+n/9zNnx67mFTY+vVHL06ZMGfp2rV5T89/46jLVzRknwKZIsK9
+8CB24WDh7Ikzn19TWPDy/JzXD15wMA/tANhDc9X7Ly0p/kPy55VYy5ldq+d/
+ynjhriOyT4FMkVl7Ae0A2ENrdfH9/e4rOZ18Ed5WV7HtX//9Sy3fx3JF9imQ
+KTJrL6AdAJuIXdi//MFbevX5q1GTZ85ftn7LZ99I+p6GPGSfApkis/YC2gEA
+AAAAAAAAAAAAAAAAAAAAAUExVgnQrgRoB8ANFGOVAO1KgHYgEmYKWWjO1b0b
+G8FoMrQrAX1kYAuUoV6hOdc4oxtraDQ5LNAuFdlZalfQRwZSURHqFZdzTcDo
+xiYwKJosOdQL7W7wa5edpWaAPjKQiopQr8CcawL3bmzHqZgTTZYc6oV2t0Pg
+1y47S80CfWQgHfJQr8CcK7sbGzcrmiw51Btd7WzQR74C0kQ40A2tQ71eqwjr
+xuoQTdYn1Ou1ilnaPdBHu119ZM/kB9ANfUO93qsI6sZqE03WItTrvYph2r3R
+Qbt1fWTcC4xD21Av2Sq6RJP1CPWSraJLqFcP7Rb2kb0S4UA3tA31kq2iSTRZ
+k1Av2SqahHo10W5fHxk/FxiHtqFeslU0iSZrEuolW0WTUK8m2u3rI+NeYBb6
+hnrJVtEmmqxFqJdsFX1CvTpot7GPjHtBNKAJrRKsYlYxFtqVgD4yAM7QhFYJ
+VjGrGAvtSkAfGQA3aEKrBKuYVYyFdiWgjwwAAAAAAAAAAAAAAAAAAABAREHv
+VQnQrgqYVwXMaw56r0qAdlXAvCosNI/eqxJQN1YFzKuCaT6B+1WCH48djKZ5
+ftB7lQpNVNqVqNaNGcC8KtzMJ3C/SvDjtYO2m2+pemdy5tTfBa8QoffqF6mZ
+3QBOGNhUN76EtIGHeQ9kXmo8dPHBtYMmmuei5VTx9KyefSaH2SD0Xn0hN7Mb
+wAkLe+rGlw9Z2sDDPBu5lxq2Lj64dtBA81w0n3znudXvLf9RvzAbhN5rd1A3
+5oaubtyB1IGPrnmOwLHkS42HLk54dlAv86JoPvFW7voj546vu8Nzg9B7Rd1Y
+zhIMBNeNtRp4r1XMMu/5S6plm/enS/XmMhA+81w0fbEpt6iiId78hdcGofeK
+urGsJVj/NcF1Y30G3nsVw8x7DLx08350qd9c1n9NfNHbm8ZjG3M3fp74Mchz
+g9B75QR1YyVL8NWNNRp4slX0GHi9zNuxubxFbx4ajy4fmXFbRgcD+vT402v7
+3373k3suOK+L3qtPUDcmXsIbnQaebBUtBl4z89ZsrgxaTrw2uD/zZo3eq09Q
+NyZewhfKB55sFU0GvhMdzFuzuTLw2CD0Xv2DujHpEj5RPPBkq+gz8JdRb96a
+zVUAeq9KQN1YFTCvCmucGGeeC/RelYC6sSpgXhXWODHOPCfovSoBdWNVwLwq
+rHFinHkAAAAAAAAAAAAAAAAAAABwCVRHZQPDsoFhMqBaALpWO3mro0agpWSr
+DGuJheVcXQ8VwxwM72pn4Iqx7OqoZ1lVG1iSw5R5SbquQgK1cgnR2NXBsEHl
+XFwu7MWz2hm8YkxRHWWVVfXBS3LQMi9J11VEoJaAYI1d4Yad0bac6xedLhfO
+WHC58MQzQtpYmT9p4soKn7kHr2pn2Iqx5OooK+IcAEWSQ5V5JRsWEqhNLlRf
+8cace37Q88+vuynr5xuPunegAkkO1tgVa9gFynKuXMn6XC5coL1cqIEjQtp2
+rnzLlvJafy8qPKudISvGsqujjLKqf5RJDlPmlW1YRKC2g/pDq55c++lXTc3f
+7F47ptd3M1JfH18mkORAjV2xht0gLOdKlqzN5cINysuFGgRESHO6UlVVlfhT
+z2pn2Iqx5OooK+LcBZrSa0DJocq8kg2LCdS201y9fVvVpUvDxT2/6Js2uizY
+++LOkgM2djUwLLJZLFlyZC4X2uIdIW2u+bjo8VHDxy1bsd7pltd6dmfh3KkP
+TZ8zL3fpa+XnvhXtWe0UXDFmILltKqD0Kk0yEQSBWl7qdj12y53/9AcHJUEl
+M9B8hoU3iy8jXnJ0LheawhchrS0d12/I6pKCQ6l/33A4Lyt9SvGXqVvoWe0U
+WjFmIL9tKqT0KkcyCQSBWv5jObtj9r1zy1y++R1IMgPNZ1hCpDv5uOIlR+hy
+oSWcEdILu2ekZy4sWfNZ6lttF8tn33RN2j3jJ7UzeXreYcdor1rkVUeFll4N
+liy16+ov6tp29pO87KIjbu+DmCpZj2Zx59HYKTkJxeUifJ5YOJwR0voDOQMH
+zt7yaunp1K/k1u4Y1avvE3s03NNOCKqjAkqvJkvWpesaq6/41bKive5f4jBW
+shbN4iT2Sk6iyzCrgxGea6pcnpk+dXPBpt1l2w50/2y/8WjebT0z8ys07jQQ
+VEfD1/2MlqxH17Xpj+/mr9+Z/OpKW+2BkvdPdX9n2VzJ2jSLbZacRI9hVgnj
+MtVw5IXht45/dMKcov11qe+cxer2rZs2ctjYGc8uXLwkf2uV8g8xu0FSHQ1/
+LzBYshZd19aa38z64Z9dfdUlru5x+/LUDxlNlaxLs9hqyUm0GGYgAzurozoB
+w7KBYTKg2lpsrY7qAwzLBobJgGqLQXVUNjAsGxgmA6oBAAAAAAAAAAAAAAAA
+AACiDuqlsoFhMkxXbfrxA160DJjaVi/VT7JthuM6Sk5iumozjl/X3dccpHgJ
+CCw5gds5yjfsscWaIUWyYAkuqoVtpWyCpoSlz7BHiNmsSVaENileZ6xI8QaW
+nMD1HKUb9tpizZAiWagEV9WCtlI2gVPC4mbYOdgd99h9wybZFcUBU5oUrwuW
+pHgDS457nqNMw1xb7GctEyWLk+BVPQ67lV0RX+4OnhIWNcMuwe4OmLsvepIV
+oTpgSpLidcOSFG9QyQnY5yjTMNcW+8BIyQIleAxz6K3s8mASyt3BU8KCZtgt
+2J2AufuiJ1kRqgOmtqR4ta7EBmz1xiUb5tniLtgo2bcEd9gp3vBb2YmkcnfQ
+lLD0GfbcfbGTrAMKAqZEyE/x6lyJZSAsIEvSh4265CSqU7zyyt3BIJhh4dcx
+7klWg4qAKQkkKV6NK7EMBAVkqfqwkZZ86UBUp3gllruDQTDD4q9jWt8L7A2Y
+EqV4I1yJRYqXDNUpXmvL3bJnOIm/SVaC1QFTmnpplCuxSPGSoTjFa2+5m1is
+rj8XWB4wpamXRrkSixQvGfqkeC0rdxOL1fJeYHvAlKpeGt1KLFK8ZOiU4rWq
+3E0uVst7gd2gXiobGCYDqiUBsfaDeqlsYJgMqJYExEYB1EtlA8NkQLUkIBYA
+AAAAAAAAAAAAAAAAAIAOBEwJgGQCIJkASLYYMwKmSYzNmEIyAcZINtZw3BTJ
+JhtWh+iAqei0KCtjanolNklgkzStWM9J0IUgk6yF4SRmlLvRO7YV8QHTgGnR
+QBlTGyqxIUyKO/0wpWBNCDTJ+hg2o9ytQe/YlUj0ji9jSMA0QFo0cMY0gZhK
+rLwUb/BkM0lRuoMQpWA/KJOstNndgZdhE8rd6nvHLKLQO76EKQHTAGnRwBnT
+BGIqsRJTvIGTzTRF6QRhSsE+UCdZabM7gadhE8rdynvHLKLQO05iUMBUYB+W
+J2LLG0tVl+INnGymKUqHKwX7QJ1kxc1uDsNmlLsj1DvWFmsDpklIMqYKU7wM
+BJtkQNiK5YBUMhEhDJtS7g6Gib1jTbE1YJqEKmOqLsXLQKhJBrStWO/DIZVM
+QijDppS7g2Fk71hLrA2YJkGKlwA6yawUb+fRWCiZoMYb8Umm7h3zTDIx9gZM
+kyDFS4DiCO+VWCqZ0nA0J1mjGdYAywKmSZDiJUCbCK+1kikNR3OStZlhLbAq
+YJoEKV4CdInw2iuZ1nAUJ1mXGQaSQMaUAEiWDQzLBoYtBxlTAiBZNjAsGxi2
+HmRMCYBk2cCwbGAYAAAAAAAAAAAAAAAAAACADgRMCYBk2cCwEqDdJswImCYx
+NmPKK9nYE1QO9RhjpzqAdotA75gAVu84eAlXyOmHyQFrRMCitC+kj6J5ewHt
+1qBN79gV63vHwUu4vk/fLSodNAccjFhLiIdxPoWgRWkfS8QFj6IeexEOaKfG
+sICp4LQoUe/4MuRR6bAlXO7TZ0SlQ+WA+Yk1nSorzP7pjx8sq+365/WV7+Xn
+Lsp//dfbD55nva5zOYXgRWnuJToQN4rq96J9oePFSxeuXF+0Lu+px+YXn/T/
+BIJ2cgwLmApOixL1ji8/GH1UOmQJl/v0WVHpMDlgfmKNp0+e2pXdr/eoHVfc
+C1qq380eefdzH572flnndgqBi9L8SyQQN4rq96L9wvrmvXc803F9jp3ZNjrj
+kV2+HxHaqTEuYGpi7ziJiqh02BKuiFZsqBxwFzwltz+xB6RdcS9orFiV1WfY
+2s/D9Q8DF6X9IG4UmQjbCzYtJwoHpQ17JfGbqVtObhg5eMEh/2+BQ7vT8Xpf
+Z4RgXcA0iR69YyVRabElXBbukgXiKbnbveBc2ZQbe/SZvOj5eY/cnzHwvme2
+VrN+Ogh0Cv4E0hR1SfbCg7Yz27Mzbvj+2EUFS7NzNh5iFAGg3Q/cNepQ2BYw
+TaJJ71hNVFpwCdd9HYZkkfi8F7S/dky//vbVHT8VtFYXj+5947jffuNyUQp4
+Cn4E0owi1V54U3/gpeHp1/boOSL3g6/c7sHQ7hOKe4F1AdMkevSOEZUOBX+K
+t9u94OD8/t/L2lrT8c9ip0vu6nlz9j7n5z1B7pamqKtLe7rpxIaHx6w5XFdT
+mvdAr+syF+x1nFho58RfjToMNgZMk2jRO0ZUWhA+fy5oq347q3fG6kufFtTu
+uD/tlsVHnN+UJTgFGkuadHvbZzlj0KrEFz7jsdrSaTf3n1XuNLvQ7hfJPxfY
+GTBNok3v+BKISoeB416w5MrPC1qri8f0HZr86Ljp2KrBgxakfB3lEgSnQGNJ
+k25v07H8wQNmJue8qXLFkKEOKcw4tPtH5r3A0oBpEl16x9+CqHQY2JKba/a+
+v2zE9d/pP3fzp8cuJhW2fv3Ri1MmzFm6dm3e0/PfcPsfzxCcAo0lfbq9sQsH
+C2dPnPn8msKCl+fnvH7wgoN5aPcPzWfH1oGMKQEWSCY4BRpLZu0FtAMikDEl
+wALJBKdAY8msvYB2QAYypgRYIJngFGgsmbUX0A4AAAAAAAAAAAAAAAAAAGA5
+iJMqAdpVAfNage3QB9I4Kcqkl0ETVhUwrxWofmuDS5xUXDU4eLqXH/PipGjC
+qgLmtUJO9VugBIZqY9LqPLjGScVVg4One10O2ag4KUGK1xU0YVOBea2QVf0O
+KMGnas3S6p4pXhZe1V0h1eCQ6d5uR6xBnJS/CUuQ4mVhZRNW5sDDPAujqt8B
+JARQnUBsWj04HCleFh5xUiHV4JDp3q5oECf10YQlSPGysLEJK3fgYd4ds6rf
+ASQEUJ1AaFo9OOFTvOy0sYhmaNh0Lz9ownbFwias5IGPqnkOjKt+i5XgHnkX
+s5Vh8U7xdiK76RmiTCoqgUoHmrCKmrCyBz6y5j2xvPqdRA/VQeBL8SaQ3fQM
+VSYVlUClBU1YCQhpTyeAebHYXf2+tJoeqoPAmeJNILvpSVMmJVgITVglqwht
+T1McMM0SBKvwDbzl1e8k8lTzXlUCw5niTR6M5KYnWTMUTVj6JchWiQtpT1Md
+sGXmWdhe/U6iherQMPKLSWQ3PcmaoWjC0i9BtkpcRG80CcxLwsrqdxLdVAfD
+46khu+lJ1gxFE5Z+CbJVOhBzL4B5aVhY/U6in2oJyG56kjVDzYqTogmrCpgH
+fomEatlNT7JmqFlxUjRhVQHzwC8RUS276UnWDDUrToomrCpgHvgFqgEAAAAA
+AAAAAAAAAAAAADxAgVQJ0K4KmFcCtOsPgrBKgHZVUJuPQ34CDLz2qA7CRrRV
+Cu2qcDUvNhysOPytnXkMvEhiLSHudAQpXrd+KLtkGsVWKbSrwt284HCw4vC3
+MvO6Jr9tGfhY06mywuyf/vjBstquf15f+V5+7qL813+9/eB51g2IIMXL6Iey
+S6bGtUr5C8guQHsIpBWQBYeDVYe/E5APvM7Jb1MHvtshNZ4+eWpXdr/eo3Zc
+cS9oqX43e+Tdz3142vv+Q5DiZfVDmSVT01qlPgrIbkB7YOQVkAWHg1WHvxOQ
+D7zOyW9DB96J9vMckHbFvaCxYlVWn2FrPw/XfNMhCKtdq5Sd4rWlgGyY9g6k
+FpCFClEf/o5j4DUf+MB0uxecK5tyY48+kxc9P++R+zMG3vfM1mrWTwfWBGG9
+1hKCx69TjmAB2WstISgvIPvGlvA3Bt7vWmrpei9ov5WmX3/76o6fClqri0f3
+vnHcb79x2SNrgrDea4nB+1frR6qA7L2WGFQXkH1iUfgbA+9zLcV0uxccnN//
+e1lbazou/7HTJXf1vDl7n7MGa4KwstfiS/FGroAsey0TC8hkq0hdCAOvZK3w
+TeSu94K26rezemesvvRpQe2O+9NuWXzE+T0wa4KwZGuxXyZFrYBMtpZBBWSy
+VWgWwsCrXcsvjb9fcuXnBa3VxWP6Dk1+dNx0bNXgQQtSPp2/hDVBWLK12E+N
+qBWQydYyqIBMtgrNQhh4tWv5orlm7/vLRlz/nf5zN3967GLyfavWrz96ccqE
+OUvXrs17ev4bR+udD9eaICzhWh4XpUgVkAnXMqaATLYK1UIYeJVrEWFNEJZ+
+rTBAuyosyxObYh4DrzvWBGHp1woDtKvCsjyxKeYx8PpjTRCWfq0wQLsqLMsT
+m2IeAw8AAAAAAAAAAAAAAAAAAGAqqI5qBbZDLPCpCpg3DlRHtYJ3O6CRD9Lx
+xqZcASrSpoHqqFawtiOURiEGGIaTCBoYcbj4FDcP6mc7iSnmKSvSEZ35YKA6
+qhXs7QilUZgBF8PJRQQNjChcffq2QZmQdsMK84Kf70z/EZt5abHXOKqjLovX
+V7wx554f9Pzz627K+vlGt1/7lFiuMn/SxJUV/C94PLZDgEYRBhiGhQ1MJzLH
+m98GZUKagR3mxT7fPSvS5s18QOTFXhOgOupA/aFVT6799Kum5m92rx3T67sZ
+qS/fL9N2rnzLlvJa/vdLPbYjvEYhBhiGRQ3MZeSON7cNyoQ0CyvMC36+e1ak
+TZv5gEiNvUa3OsqMvTZXb99WdWm/L+75Rd+00WXnnP+lBzldqaqq8tgOARqF
+dFfdDQsr9iaRPN5CbGgy2yaZp61I6zTzHP3ugMiOvUa2Osr5q5ITeaPHbrnz
+n/7gcGbNNR8XPT5q+LhlK9Y7vZZoPbuzcO7Uh6bPmZe79LXyc1xjKl4jA4KB
+8UKjlrH2s22tea9VRPqXb577wuIT6bHX6FZHObcsdnbH7Hvnlrl8c7q2dFy/
+IatLCg6l7kzD4bys9CnFX/qaYNEaWUvJHxhP9GkZGzDblpr3XkWcfxLzcu4F
+esVebauOsmOvl47j7Cd52UVH3D45vrB7RnrmwpI1n6W+UXmxfPZN16TdM35S
+O5On5x12bMUqROpu8qVdNRpvO2Y7bqB5a1bxd2Hxi2axV8uqo96371h9xa+W
+Fe1N/abSZeoP5AwcOHvLq6WnU7/QXLtjVK++T+zR7RbQifquq07jbdlse6CT
+eftWkfUe0WV0iL1aVh312rKmP76bv35n8vtBbbUHSt4/1f3twqbK5ZnpUzcX
+bNpdtu1A9682NB7Nu61nZn6FrjEMrbquysfbstnmR7l5+1ZRfC9AddQ/zC1r
+rfnNrB/+2dVXXeLqHrc7hL8bjrww/Nbxj06YU7S/LvV9x1jdvnXTRg4bO+PZ
+hYuX5G+tovk4mBPNuq6Kx9u62eZH/YXFslXk3wuYoDoKfGGWYdlHi9l2w6aK
+tFnmA4LqKPCFWYZlHy1m2w2bKtJmmQ8MqqPAF2YZln20mG03bKpIm2UeAAAA
+AAAAAAAAAAAAAABAOsiSqgLmtQLbIRDINBEEYVWBIKxWoDQtEFTUDQRBWFUg
+CKsVwUvTCdzOUb5hsdMiCNUV9YhqD4O4IKwrCMI6IjoI6wqCsDyEKE0ncD1H
+6YYFT4tPnDPEQivqepaO1WrvCnd1l/kgooKwLGwLwko3L9aJRUFYTUvTcc9z
+lGlY8LS0L3S8eOnCleuL1uU99dj84pOMo3bJEIusqGtbOhauPTj81V0WooKw
+LGwLwko3L9iJPUFYTUvTCdjnKNOw4Glpv7C+ee8dz3Rcn2Nnto3OeGSX6yO6
+ZYgFVtS1LR2L1h4CUdVdBGGdDpmid4wgrF+0LU17nqNUw2KfQfGWE4WD0oa9
+kviN6i0nN4wcvOCQ/7fAdaiox3XTLi92fAXu1d1OEISVkiXVwLzXKmYFYbnR
+qzQt7BxppoVN25nt2Rk3fH/sooKl2TkbDzF+mb81FXUS7QS/sJpd3e34FwjC
+SsmSqjfvvYphQVjeY9GrNC3oHGmmhYf6Ay8NT7+2R88RuR985fbBqzUVdSrt
+0u8FHtXdjn+CICwfQnvH0o/WplX4Urydh2JnaVr2PvJKbjqx4eExaw7X1ZTm
+PdDruswFex0tWVNRp9MuI3bciWd1N3kwCML6REDvuAObUq3qU7xJ7C1Na2K4
+3V/GoFWJL3zGY7Wl027uP6vcyZc1FXUy7TJ/LvCu7iZBENYv4XvHSWxKteqR
+4rW5NK2H4XjTsfzBA2Ym05ZNlSuGDHVIuMYtqqiTaZd2L+Cq7iZAENY/4XvH
+dEdr0yoeWF2a1sJwB7ELBwtnT5z5/JrCgpfn57x+8ILD9dGaijqhdqWx4ziC
+sOqwKdVqlnkTMcuwNRV1s7SHAkFYVdiUajXLvImYZdiairpZ2kOCIKwqbEq1
+mmXeRMwybE1F3SztAAAAAAAAAAAAAAAAAAAARKBMqgqYVwXMqwLmdQZlUlWg
+NK0KzLwqYF5jUCZVheLSdILw+2uT+SSYeYnAvLagTKoK1aXpjqXElIi1NU9Q
+43UFM58KzEulpeqdyZlTfxfMG8qkAbCkNB0XVyKmbsLyzTxBjZcFZj7lQWBe
+Ji2niqdn9ewzOeC9AGVS/1hSmk4gqkRM24TlnHmCGi8LzHwKMC+R5pPvPLf6
+veU/6hf0XoAyqW+sKU0LLBFTNmEx81di0cxH1byQDnLzibdy1x85d3zdHZ7P
+C5RJpaBB7ziEdlH7KxDP3+uLmbd15iNrXsDvsm76YlNuUUVDvPkLr+cFyqRy
+UN87DqVd1P6KxON5gZm3duajaz70vaDx2MbcjZ8nfgTxfF6gTMqJ0OouxQGT
+lab1aMJi5jHzREsQrCKsg9x4dPnIjNsyOhjQp8efXtv/9ruf3HPBeVGUSYWj
+R++YTIgWTVjMPGaeagmyVeJCe2ctJ14b3J/5GgllUsHo0jsmE6JbExYzT44u
+M0+zBNkqccp7AcqkgtGmd0wmRL8mLGaeFm1mnmYJslU6oOogo0yqCmtK0zCv
+ZAmyVQQC8/qCMqkqrClNw7ySJchWEQjM6wzKpKqwpjQN80qWIFtFIDAPAAAA
+AAAAAAAAAAAAAABgLciSCgQyVQHzqoB5a+DNkiInygEar6qAeVVQm49DviRY
+WdIwFV1hMVBGclRcL1gQqhuvEdUeh3l1uJoXmwNWXPTW0bxY2FnSEBVdsTFQ
+l+SouF6wTwjquoGK0pZrdwXmVeFuXnAOWHHRWxPz3AXSxsr8SRNXVvDfeb1S
+vCEqumJjoG7J0QRCesHtSxwvXrpw5fqidXlPPTa/+CTj8QjquoGL0sZpv4T5
+LW/TzEvvGgvOAasueicQO/MB4C+Qtp0r37KlvJb/jTuPLGmIiq7gGKhLcjSB
+kKRp+4S9ee8dz3TMT+zMttEZj+xyPWKCum7gorRp2i8/mPktb9PMS+8aCxai
+uuidQOjMB0FUgTSe05WqqiqPLGmoiq7YDKtbcjTOnzRlx0ZbThQOShv2SkX7
+kbac3DBy8IJD/t/X1KHxqp12DuzoGptlnqBrLFSI+qJ3XOjMh8e9QNpc83HR
+46OGj1u2Yr3THa317M7CuVMfmj5nXu7S18rPcZ2M4IquJ5KTox6/MLbtzPbs
+jBu+P3ZRwdLsnI2HGL/G3JrGq9daNESxa+y1Fi0atLy9VjGx6C0VdoG0tnRc
+vyGrSwoOpT6fGg7nZaVPKf7S1xwLreh6ryY9Oer9y8PrD7w0PP3aHj1H5H7w
+ldvHQ9Y0Xr3XIiGCXWPvtUhR3/L2XsXIordEPAqkF3bPSM9cWLLms9S3sy6W
+z77pmrR7xk9qZ/L0vMMXZR+qf+QlR3ljo00nNjw8Zs3huprSvAd6XZe5YK+j
+JWsar7LX4qvrRrFrLHstE7vGZKtIXcif+cB4FkjrD+QMHDh7y6ulp1O/9lq7
+Y1Svvk/s0fAW0AlBcpT9c0G7v4xBqxJfSIvHakun3dx/VrmTL2sar/RrORDJ
+rjH9Wq5o0zUmW4VyITl4F0ibKpdnpk/dXLBpd9m2A90/Y288mndbz8z8Co0j
+DQTJUfa9oOlY/uABM5OvS5sqVwwZ6pz2s6bxSr8Wm+h0jenXckGjrjHZKpQL
+SYCrQNpw5IXht45/dMKcov11qe9+xer2rZs2ctjYGc8uXLwkf2uVwi/IOkKS
+HPX4vCB24WDh7Ikzn19TWPDy/JzXD15wmBJrGq/0a3kRla4x/VrO6NQ1JluF
+ciEQBFOSo9Y0XunXCgnMq8Ky6LBB5qOIKclRaxqv9GuFBOZVYVl02CDz0cSU
+5Kg1jVf6tUIC86qwLDpskHkAAAAAAAAAAAAAAAAAAAAKUCZVBcxrBbZDNjCs
+OWjCqgLmtQKNb9mQDjy2yTdowqoC5rUiaOOb5twJGuLScTHMEOgT1jZhLzoh
+qPG6giZsKjCvFeEa36LO3bWqTNUQ73zUlhAPE+BS4yLQz+PH2dtk7l5ww9eE
+JajxskATNuVBYD44njNP3vgWcu6MqjJZQzweazpVVpj90x8/WFbb9c/rK9/L
+z12U//qvtx88z3pFHexSwxLI9fgdeG2TYXvhD84mLEGNlwWasCnAfGA4Zp68
+8S3i3FlVZbKGeKzx9MlTu7L79R6144p7QUv1u9kj737uw9PeL6gDXmoYAvke
+P4HnNpm1F75AEzYV2RFkgiZsdM1zEH7mJTS+ZZ87XUM8QfsldUDaFfeCxopV
+WX2Grf08XLeWaZglkBvvbdJuL9i9dX7QhFUTQf4WWU3YyJr3xHvmVTS+xeDu
+VnBD3Itu94JzZVNu7NFn8qLn5z1yf8bA+57ZWs366UD2hNBMO9VecF9qmKAJ
+qzCCnDwQWU3Y6Jr3gG/myRvfImC5FdoQ56DrvaD9dXD69bev7vipoLW6eHTv
+G8f99huXmZc9ITTTTrgXIu4FaMKqiyBfOg4tmrC2mRfQQTay8U2wj/zh3W73
+goPz+38va2tNxz+LnS65q+fN2fucr4Wyz8KayLK/Sw0bNGHVRZATaNOEtcw8
+C86ZN7PxrVVvt+u9oK367azeGasvfVpQu+P+tFsWH3F+L1z2WVgWWY6Leo/o
+MmjCCsdrgzRqwlpmnhPGzBva+NbHbTxxL1hy5ecFrdXFY/oOTX503HRs1eBB
+C1K+BXQJ2WdhWWQ5TnwvQBPWP8wN0qkJa515Thgzb2TjWye3zTV731824vrv
+9J+7+dNjF5MKW7/+6MUpE+YsXbs27+n5b7j9L2pkn4VlkeUOxN4LmKAJqwqY
+B5zY4Vb2WVgWWaYGTVhVwDzgxA63ss/CssgyPWjCqgLmASd2uJV9FpZFlgEA
+AAAAAAAAAAAAAAAAADQFBVJVwLwSoF0VMK85KJCqAuaVAO2qgHm9QYFUFS7m
+xTkJmOj1i2HmMfCqgHmdQYFUFa7mxdWBAyZ6XY7XNPOyk7uuYOAdgXmZNBwv
+Xrpw5fqidXlPPTa/+KT/X62CAmkI+DLTLnjVdYXUgcMkersdrh7m+QdednKX
+BQbeAZiXSeuXb957xzMdRxI7s210xiO7fP8KJRRIA8OZmXbDw7yQOnCYRG9X
+9DDvY+BlJ3dZYOCdgHmZtJwoHJQ27JXEr99tOblh5OAFh/y/L4UCaTAkZ6aF
+OAmV6OWGsP2Kgf8W2wYe5sPRdmZ7dsYN3x+7qGBpds7GQ4zfs40CqVBkZ6Z9
+YJd5j9/fi4HHwEfMvA/qD7w0PP3aHj1H5H7wldsHIiiQikV6Zpob68x7/y53
+DHwCDHw0zPPTdGLDw2PWHK6rKc17oNd1mQv2Opb7UCDlRGhyl+KYLTTPbr9i
+4IWCgVe1Cn94mpP6AzkZg1YlvtoUj9WWTru5/6xyp+cGCqQi0SkzbZ959s8F
+GHgFYOCVhqc5aTqWP3jAzORtuqlyxZChzqVFFEgloTwzbZ959r0AA68WDLy+
+xC4cLJw9cebzawoLXp6f8/rBCw7HjQKpNBRnpm007/F5AQZeKRh4k0GBVBUw
+rwRoVwXMaw0KpKqAeSVAuypgXnNQIFUFzCsB2lUB8wAAAAAAAAAAAAAAAAAA
+AJaACKkqYF4rsB2ygWHN4Y2Qoh8qGpjXCmyHbNA71huXCGkHrH4oP4yeaaQj
+pDCvFUG3g5nrFWzATbXA3ZSI0t4x9sIDZoTUM5jr8HgukVCXnqnlEVIWos27
+AfNchNsOt1xvMAP+VYtrZF8+8JYQeyW7NB0orW7uXnAhu3fs3Q/t9nDukVBW
+z9TQCKnU3rFP8wyiaL6xMn/SxJUV/C/5wm6Hm+QABoKpTiCkkR1rOlVWmP3T
+Hz9YVtv1z+sr38vPXZT/+q+3HzzPeqEruzQdOK1u3l7wI7937NkP7XZAjEgo
+o2dqZoRUbv7Vp3kWUTTfdq58y5byWn5rYbfDRXIAA8FUJxDSyI41nj55ald2
+v96jdlxxL2ipfjd75N3PfXja+3Wu7NJ04LS6eXvhA+n5V+9+KD+Mnql2EVJ2
+dbcDyflXmHclvPl4TleqqqpCb4ebZKEBXJbqOP9uekpuv6QOSLviXtBYsSqr
+z7C1n4frOirvHeu4F8KQnH/13Q9Vlzolre7Kz7/CvBve5ptrPi56fNTwcctW
+rHd6kdl6dmfh3KkPTZ8zL3fpa+XnuJ6rIkO6nshX7Sm5273gXNmUG3v0mbzo
++XmP3J8x8L5ntlazfjqwo3fstZaO1WOJ+Vef/VCVqVPa6q70/CvMu8BnvrZ0
+XL8hq0sKDqX+fcPhvKz0KcVf+rpeiAvpei9FodrnvaD9FXD69bev7vipoLW6
+eHTvG8f99huXl5129I6919KveqxH/pVmFW2quxrlX2lWMc38hd0z0jMXlqz5
+LPXd2ovls2+6Ju2e8ZPamTw977Dj80UhUlXzRqVT7gUH5/f/XtbWmo5/Fjtd
+clfPm7P3OV8FLRhFmrVs7R3TrKJLdVen/CvNKoaZb39WDBw4e8urpadTv+xS
+u2NUr75P7NHtFtAJjWqfPxe0Vb+d1Ttj9aVPC2p33J92y+Ijzm+32zSKZlWP
+Ncm/0qyiT3W3E+X5V5pVzDLfVLk8M33q5oJNu8u2Hej+fZ/Go3m39czMr9A1
+T0KjmuNesOTKzwtaq4vH9B2a/Oi46diqwYMWpHwL6BI2jaJh1WMd8q80q2hV
+3b2M4vwrzSqmmW848sLwW8c/OmFO0f661PeqY3X71k0bOWzsjGcXLl6Sv7WK
+7PvfPFCpZkturtn7/rIR13+n/9zNnx67mFTY+vVHL06ZMGfp2rV5T89/46jL
+d9psGkULq8d2REJNjJDCPPCF6aptGkXT98IBOyKhJkZIYR74wnTVNo2i6Xvh
+iB2RUBMjpDAPfGG6aptG0fS9AAAAAAAAAAAAAAAAAAAACAUipKqAeSVAuypg
+XnMQIVUFqfkk8I+BVwfM6w0ipKpwDeyKdRK41esPY8xj4FUB8zqDCKkq3M0L
+zgQHbfU6H7U55mVXd13BwDsC8zKR3TtGhJSFtN6x4Exw0Favw0GrNs8/8LKr
+uyww8A7AvEzk944RIXVHXu9YcCY4aKs3FdXmfQy87OouCwy8EzAvE+m9Y0RI
+XZHaOxbqJHir1w8k5jHw3aEqIEsPfMN8SCT3jn0QsQip7N6xb2j8KzePgVdU
+QNZo4CNm3gcSe8fcRC1CKr137BMa/zqYj2PgVRSQ9Rn4qJnnR4/eccQipJHr
+HROswpt/xcArKCBrNPARM+8DTXrH0YqQRq93TLkKGwy8ggKyTgMfLfN+0KR3
+HNkIaUR6x5SrsMHAS1rFlMB3ZM17o0PvOMIR0kj0jilX8QQDr6KA3InigY+w
+eREgQqoKO3rHlKsIAQOvCpjXGkRIVWFH75hyFSFg4FUB85qDCKkq7OgdU64i
+BAy8KmAeAAAAAAAAAAAAAAAAAADAEhAhVQXMawW2QyCQaSK8EVL0Q0UD81qB
+7RAI0sYG4lrdjXv1Q3lh9kwjHCGFea0Iuh0MyQLP3U2v8H0Ug9K0cXS1h4EZ
+IfVM5To8nkse1K1naneElIVo827APBfhtsNFsrhzd9Uruo7tE9lR6UAVdfu1
+pyK7d+yZyu3+cO55ULeeqcERUpn5V7/mGVhkPlZf8cace37Q88+vuynr5xuP
+dg+0XbFcZf6kiSsr+F+khd0OVq5XxLkz9AquY+sUlQ5cUU9gmvZQyO8de6Zy
+ux0QIw/q0jM1N0IqN//q0zwLe8zXH1r15NpPv2pq/mb32jG9vpuR+vL9Mm3n
+yrdsKa/ltxZ2Oxi5XiHn7q5XcB1bp6h04Ip6AsO0h0R6/tU7lcuPW89Uxwgp
+B5Lzr1E1z8y/Nldv31Z16dl4cc8v+qaNLgv2KUpOV6qqqkJvByPXK2LqWHp9
+7yO7sWtFVDquoXa5SM6/+u6Hqm77WtM7jqx57l/hW7frsVvu/Kc/OBhqrvm4
+6PFRw8ctW7He6ZVn69mdhXOnPjR9zrzcpa+Vn+O6UogP6TpCNdgekqMWldbg
+eiIGiflXn/1Q9W1fa3rH0TXPeS+Ind0x+965ZS5fW68tHddvyOqSgkOpO9Nw
+OC8rfUrxl74uIqJDus6L0A22t+ToRKV1uJ4IQY/8qzWroHesahV/+de2s5/k
+ZRcdcXvX7MLuGemZC0vWfJb6XvHF8tk3XZN2z/hJ7UyennfY8fmiBIJN5JWs
+x1XFgqlOwtvyDocm+Vf7VmGhU/7VvlW8X7LG6it+taxor/s3UNqfFQMHzt7y
+aunp1O+U1+4Y1avvE3v0uQV0QjnYbMmaXFVsmmoCNMm/2rcKJ8rzr/at4nUv
+aPrju/nrdya/H9RWe6Dk/VPdJ76pcnlm+tTNBZt2l2070P3bJY1H827rmZlf
+of6jvu5QDjZbsiZXFZummgId8q/2rcINesfCYV6mWmt+M+uHf3b1VZe4usft
+DpephiMvDL91/KMT5hTtr0t9AztWt2/dtJHDxs54duHiJflbq2R/HMwJ7WB7
+3HB1uKrYNdV6YFMP16wIqU1OzDJvHMbptSNtbJz2UNjUwzUrQmqTE7PMG4dx
+eu1IGxunPSQ29XDNipDa5MQs88ZhnF470sbGaQcAAAAAAAAAAAAAAAAAAKAD
+cVJVwLwqYF4VMK8ziJOqAuZVAfOqgHmNQZxUFS7mxTkJGOr1izXmMfPSgXlt
+QZxUFa7mxTkJGOr1icbmZQd5XcHMOwLzUpEZ3kWc1Anu8C7zQTwau0IawWFC
+vdwoyMLyzbzsIC8LzLzTg8C8TOSGdxEndYA/vMvCw7wQJ2FCvfyQZ2E5Z152
+kJcFZt4JmJeI5PBuVOOkJOFdtnkRTkKFermhzsJi5i9j28zDfHBkh3d9YFec
+VEB4txOYFwpmHjMfVfPuSA/vcmNdnFRIeLfjX8C8UDDzmPmomndHo/CuhXFS
+AeFdimO20LwhsWkLzWPmaVfxZ56BTuFd++KkAsK7HcC8SDDzmPlomudGeXjX
+vjhp+PBuEpiXBGZeOJh5+lWS0N0LECf1T/jwLsUx22ieE8y8cDDz1KtcRuC9
+gAnipKqAeVXAvCpgXl8QJ1UFzKsC5lUB8zqDOKkqYF4VMK8KmAcAAAAAAAAA
+AAAAAAAAALABFEhVAfNage0QCGSaCG+BFPFQ0cC8VmA7BIKusYG4FEg7YMVD
++WHETCNdIIV5rQi6HcxWr2ADbqoF7qYYlHaNo6s9DMwCqWcw1+HxXKrHLjFT
+2wukDESbdwPmuQi3HW6tXsEGXFWL202fyC5KB6qo26/dGZm9Y+94aLeHc68e
+s2KmhhVISXrHPs0ziKL5xsr8SRNXVvC/Dgy7HW6SxRpgqE4gpJHdfi7Hi5cu
+XLm+aF3eU4/NLz7JeDzZRenAFXUTtYdGbu/YMx7aFVb1mBEzNaxAStJ+9Wme
+RRTNt50r37KlvJbfWtjtcJEs2IC76gRCdrP92vrmvXc803G5i53ZNjrjkV2u
+By27KB24om6g9tBIbr96x0P5YcRMtSuQMiFpv8K8A6LMx3O6UlVVFXo73CQL
+NcBSHRezm4k3VQoHpQ17paL9YFtObhg5eMEh/++yK+8a66hdSNfYDdntV9/x
+UHWdU+Lq7mVktV9h3gt38801Hxc9Pmr4uGUr1ju98mw9u7Nw7tSHps+Zl7v0
+tfJzXNdNkRVdT5SrbjuzPTvjhu+PXVSwNDtn4yHGb++3o2vstZYo7RJ/N7X0
+9qvPeKjKziltdbfziGS1X2He64iY5mtLx/Ubsrqk4FDqc6LhcF5W+pTiL31d
+RMRVdL2X0kN1/YGXhqdf26PniNwPvnL7SNSOrrH3WsK0S7sXaNR+pVlFm+pu
+5wGpb7/SrGKa+Qu7Z6RnLixZ81nqW7gXy2ffdE3aPeMntTN5et7hi2JPIzRS
+VfNKbjqx4eExaw7X1ZTmPdDruswFex0tWTB1NGsJ6xq7oVP7lWYVXaq7SfRo
+v9KsYpj5+gM5AwfO3vJq6enUr3rX7hjVq+8Te3S7BXSig+p2fxmDViW+PxmP
+1ZZOu7n/rHInXzZNHc1aBP0y5e1XmlV0qu7q0n6lWcUs802VyzPTp24u2LS7
+bNuB7t/3aTyad1vPzPwKXdskOqhuOpY/eMDM5PWkqXLFkKHOOUubpo5mLfX3
+AjsKoRpVd7Vpv9KsYpr5hiMvDL91/KMT5hTtr0t9AztWt2/dtJHDxs54duHi
+Jflbq9R/KfwKNFEdu3CwcPbEmc+vKSx4eX7O6wcvOFwcbZo6qrWousZu2FEI
+NbFACvPAFwaptmnqDNIeCjsKoSYWSGEe+MIg1TZNnUHaQ2JHIdTEAinMA18Y
+pNqmqTNIOwAAAAAAAAAAAAAAAAAAABEok6oC5lUB86qAeZ1BmVQVpOaTwH8H
+mHlVwLzGoEyqCtfArlgngVu9/rDAPGZeOjCvLSiTqsLdvGAnQVu9/tDSvOwa
+ryuYeUdgXioye8cokzohvXcsOBMctNXrC9ImLN/My67xssDMOz0IzMtEbu8Y
+ZVIHpPeOBTsJ2ur1B2ETlnPmZdd4WWDmnYB5iUjuHaNM6gBB71iok+CtXj/Q
+NWEx812hiCCTNL5hPgSye8c+iGiZVFbv2Dc0/jUwj5lX3ZvWYOYjat4d6b1j
+bqJaJpXWO/YJjX8dzGPmVfem1c98VM27o1HvOKJl0sj0jglW4TOPmVcXQb50
+KOpnPqLmGejUO45imTRKvWPKVVjmMfNqe9N6zHwUzXOjvHccvTJptHrHlKtw
+vjuHmSdHl5mPnnkfKO4dR65MGrHeMeUqou4FmHnBaDPzkTMvEJRJVWFH75hy
+FVFg5lUB8/qCMqkq7OgdU64iCsy8KmBeZ1AmVYUdvWPKVUSBmVcFzAMAAAAA
+AAAAAAAAAAAAANgACqSqgHmtwHaIBT6Ng7dAinioaGBeK7AdYqHOeWNfwuJa
+3Y17xUN5YcZMI1wghXmtCLodnq1eNzN+8NgsHSWzfApxEidpeRtoPhjMAqln
+Ktfh8Vyqx24xU8sLpAxEm3cD5rkItx2sVq+rGR94bZZhUWkhThLIb3nrbL47
+MnvHnqnc7g/nXj12i5kaWCClaL/6Nc8giuYbK/MnTVxZwf8zTtjtYLR6Pczw
+wbVZ5kSlhThJIL/lrcB8QOT2jj1TuV1hVY9dYqYGFkhJ2q8+zbOIovm2c+Vb
+tpTX8lsLux2MVi/bDB9cm2VQVFqEkwTyW9705gMiuf3qncrlxy1mqmOBVHXv
+GOYdEWU+ntOVqqqq0Nvh3ur1MMMJz2aZE5UW44Sm5S3SvDxkt199x0NVt32t
+6R3DvBfu5ptrPi56fNTwcctWrHd6Ndh6dmfh3KkPTZ8zL3fpa+XnuJ69YSq6
+/syQ7KPyqLQoJzQtbwOQ3n71GQ9V3/a1pncM817HwjRfWzqu35DVJQWHUp8T
+DYfzstKnFH/p6/IRpqLrxwzNPqqPSotyQtPy1h+N2q/WrILesapVhJq/sHtG
+eubCkjWfpb5/e7F89k3XpN0zflI7k6fnHb4o7hTCI3sfjYtK0yxBsIqwtLEj
+OrVf7VsFvWNVqwgwX38gZ+DA2VteLT2d+j3v2h2jevV9Yo9Wt4BOyOq6pkSl
+aZYgW4UA5e1X+1ZB71jVKuHNN1Uuz0yfurlg0+6ybQe6f6+k8WjebT0z8yu0
+rJKQ1XVNiUrTLEG2CgGK26/2rYLesapVRJhvOPLC8FvHPzphTtH+utQ3fWN1
++9ZNGzls7IxnFy5ekr+1SvE3wq+AsK5rRlSaZgmyVdRjUw/XrAKpTU7MMm8i
+xhkmOGDMtkhs6uGaVSC1yYlZ5k3EOMMEB4zZFotNPVyzCqQ2OTHLvIkYZ5jg
+gDHbAAAAAAAAAAAAAAAAAAAAakCWVBUwrwqYVwXM6wyypKogNQ/tVwDzqkBU
+WmOQJVWFi3lBQuI80WSkeK/8Y5iXjuLGd4KImvcEWVL5BAjChheSwDOabHuK
+1xmYV4XqxncCC81TVHeRJWUhMwgbXkgCL+2mpXgpZh7mnbCk8R03zzwHJNVd
+ZEndkRuEDS0kgad2w1K8JDMP8w5Y0vhOYJh5Dkiqu8iSuiI5CCtACId2w1K8
+JDMfVfNMrGl8G2feL7Kqu8iSuiE7COuDENpNTPFeRtbM+8Au89yY3fg22bw3
+0qq7yJK6ID0Iy00o7QameDsPR9bMc2OdeU4Mb3wbbN4bPaq7UcqSahSEpdFO
+sJBxpWkLzfOkeDUwT7YK2RaLQZvqboSypDoFYcmEaJHiTaLHzNtn3hs9zJOt
+opF5bzSq7kYzS6o8CEsmRJsUry4zb595L3QxT7aKNuY90am6G9UsqeIgLJkQ
+XVK82sy8jeaZaGOebBVdzAsEWVJVyD5gMiEwT/z49AuJwppLgXHmvUGWVBWy
+D5hMCMwTPz79QqKw5lJgnHkekCVVhewDJhMC88SPT7+QKKy5FBhnHgAAgPX8
+fzGuxsg=
+ "], {{0, 458}, {516, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{516, 458},
+ PlotRange->{{0, 516}, {0, 458}}]], "Output",
+ ImageSize->{520, 458},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[6]=",
+ CellID->1606718833]
+}, Open ]],
+
+Cell[TextData[{
+ "Keep in mind that the BMHV scheme violates axial Ward identities and \
+requires special model-dependent counter-terms to restore those. Therefore, \
+just setting ",
+ ButtonBox["FCSetDiracGammaScheme[\"BMHV\"]",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ " does not automatically resolve all your troubles with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions. The proper treatment of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization is an intricate issue that cannot be boiled \
+down to a simple and universal recipe. FeynCalc merely carries out the \
+algebraic operations that you request, but it is still your task to ensure \
+that what you do makes sense."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces that are free of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " but contain both ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "- and ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional Dirac matrices may appear in calculations that use the BMHV \
+prescription, but they do not make sense in NDR. Therefore, their evaluation \
+will be succesful only if the correct scheme is used."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "-",
+ RowBox[{"GSD", "[", "q", "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}], "]"}], " "}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "e"], "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{292, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"DiracTrace", "::", "mixmsg"}], "MessageName"], ":",
+ " ", "\<\"Expressions that mix D-, 4- and D-4-dimensional quantities are \
+forbidden in Dirac matrix chains unless you are using the t'Hooft-Veltman \
+scheme. For every other scheme, please recheck your input expressions and \
+ensure that all matrices, spinors and tensors are purely D-dimensional. You \
+might want to use FCGetDimensions[exp] to find the offending terms and fix \
+them by hand or ChangeDimension[exp,D] to convert the whole expression to \
+D-dimensions. If you explicitly intend to use the t'Hooft-Veltman scheme, \
+please activate it via FCSetDiracGammaScheme[\\\"BMHV\\\"]. \
+\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
+ButtonFrame->None, ButtonData:>\\\"paclet:FeynCalc/ref/DiracTrace\\\", \
+ButtonNote -> \\\"FeynCalc`DiracTrace::mixmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[3]:="],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[4]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "-",
+ RowBox[{"GSD", "[", "q", "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}], "]"}], " ", "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SubsuperscriptBox["m", "e", "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{504, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "4"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{"8", " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{"4", " ",
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
+ SuperscriptBox[
+ RowBox[{"SMP", "[", "\<\"m_e\"\>", "]"}], "2"]}], "+",
+ RowBox[{"4", " ",
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}]}]], "Output",
+ ImageSize->{508, 34},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//StandardForm="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[7]:="],
+
+Cell[TextData[{
+ "Notice that in this case the result contains ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "- and ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional tensors."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces involving ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in the BMHV scheme are evaluated using West's formula. It is possible to \
+turn it off by setting the option ",
+ ButtonBox["West",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/West",
+ ButtonNote->"West"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ ", but then the evaluation will require much more time."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"AbsoluteTiming", "[",
+ RowBox[{
+ RowBox[{"r1", "=",
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], "]"}], "]"}]}], ";"}], "]"}]], "Input",\
+
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"0.211407`", ",", "Null"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{105, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"AbsoluteTiming", "[",
+ RowBox[{
+ RowBox[{"r2", "=",
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], ",",
+ RowBox[{"West", "\[Rule]", "False"}]}], "]"}], "]"}]}], ";"}],
+ "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"2.041849`", ",", "Null"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{98, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"r1", "===", "r2"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[",
+ RowBox[{"r1", ",", "r2"}], "]"}]], "Input",
+ CellLabel->"In[6]:="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "If you know that traces with one ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " ",
+ " do not contribute to your final result, use the new NDR-Drop scheme to put \
+them to zero"
+}], "ExampleText",
+ CellID->2003592022],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}],
+ ";"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQ1sVeUZgMtmls0tUTRGEkOiZgPZphhdlI6/AhUGQeVHIxC2STNkBVY2
+igozswgMxs/GEqnbinUFyoQxCD/yM0BNkCEDNn+KCBboACnFVigt9Pbn3nt2
+z60GWu4533fueb/3+76375No+Mt5733Oe05O25s8d+VMG/XMVzIyMvK/nvjf
+qAnPD5g+fcKs0TcnfvNkXn7upLyJPxuaN2PipInTe+V8NfGHjyX+y0j8e/fX
+DsMwDMOEp/HMhpKVq4tmP/PCu7Vx3S+mQ8HmdcHmGaaVS4dmLdp7MYYzLMZX
+21VQzbfC/pPImmddDHGidWVrcvtnPbuzJtrmj6t3zxnb/747b+p8d4/vPzR2
+8/mo1wFEtJwuGZ3zTq3jXH4vr99P9l1q+7fxyP/++drqLdtKZjxwyy13duve
+/d7s+cciaYxp/mzPoqG9C45EnIbDz/cbsaOm/aUbqytbu/zvO3eWFkyYt/+S
+ARe2h3lAJ0n8/IOcZULmHdG6yoLiRLAncJcwQ5RIefG0Fzacrq94pc/Di8qb
+rv5FLFJV3RhvKCt4asXpllAj4jXbRw97vTLqNB6b1yt7XVWbh6547Tv5I5cd
+b3Ivu+JBw7dfd5kEonbP+MHLTkaqtuTMOVDX7kixC29OeXTZicSkxqPzssbt
+qwszCABP88BOfP2DnWUa5l181zUQqp2I9gTuEmaMI95QvipvYLfbvtX5rj5T
+VnzSkNY9Il69dWS/BZ80Ok7dvnFZvz3W2O7vG48uGVN0sjncK718aPLgBYlD
+R8+uyuqVHHYNF94c1fvFI+4jS1P577N/+m64e0Pk4/nDX9x/cGXJh+2vNyd2
+fsOwvouTV/uV96dn/7qsId0hys3DOvH37wJxlmmYdxHqkka1E6k9AbmEGdNo
+OPKHaYX7zzc1f36o8LEuN/W8/jlGhuaKl/tkrTobda58OGfEvI/aL2HLqVeH
+jNt1IdzjZ+IxKvORbTXxphN/GfDdH/+7rs3zVKxq3cDMhe5rbzz+p7Gz/1sf
+apQT+eilAeN/s/p4iqupbt9T38ksTbxV5/IHc8cXHk9HVxLl5oGd+Pp3ATnL
+JMy7CHXJo9iJ1J6AnFzGNJqr3t597oulufL+1LvveHRvWt+nbKpY/vSY+WvW
+Fy/bfDJy3ZK0nPnroG5Dt1aH+QFltPL1Aff0Hzj+ly8tXvr4g48v2VTR5rGt
+pfIfuSNnlryxufS1XZ+GeNZqpe7glJ+Xnk71sBP5uODeOx4eXrBi88bVJW9X
++T4PRc9vmfSLAx5P3QjmQZ0I/DswZxnIvC8oOy/WJY9qJzJ7AnJyGZOpPzih
+R+afT/ktUdOZrUsXLy8tnNTtxq/dPnjq3JUVaf8wMeDx4zU7nhhUWAH49Wda
+76XlVFHfXkskH7Oin658ZPhbF8X/0ADzoimQ/tWbl0aV+cC6EJzgrBBjJ/GL
+eyYPyt/r8yHmeN2BZx/qX5S4WBqPzu5x+w/XnoN9GPA7vns9ZT6X/nd8g8zy
+IfE1f+b9zx2WfBmS93/95sVT4PyjmJd9LarMB9SF4ARnhRhLiV3ct+BXxUf9
+vkaNVb/xo649k08b9Qdzvtf3VeDPAqg+Ptqslsp1OUP6u2Te0/nWnr2Tvxw2
+9V+pbzMGmCcz5ar5a2DzCCOCmWeMIt5Q/reFxR9c9+GCtrScLv5BlwcTixOr
+3pH7xIL36oFPrerj488SP/+bYZ7eFDEdzLwp2hnjaDqzeWnRgdrkl4Ox2sMb
+t1em/n5irP7wmlmTZ7y8dtPGt05cgd8f1cfHnyW6/5tint4UER3OvBnaGdOI
+Vm/L7f6NThlf0OnG+xan/nFSrGbH0z263vrNGzoluOHmB/LDfpwQ+fg6Zvne
+/40xT2+KgI5n3gjtjL00n9v+u7nrT7V+NizecuHgH2ful/hcizHH1zUrPDiv
+ltIUKMg4sUs7YxzRqvVDvp298bPWTwzE6st3b9p1NvRn7PGOr2tWeHBeLaUp
+UJBxYpd2xkDil8sWj+jRpev9g8dMmrmwaMN/Pof98IDq4+uaFR6cV0tpChRk
+nNilnWEYhmEYhmEYhmEYhmEYhmEYhrEGLqXqgs3rgs3rgs2bBteBdYFdB2b5
+X8JdZl3wzhuG5jqwS/hSqm+MFTa2C4dfoxaqqKs3DWydebwucytKN9/EOrDu
+ncfJkZtoPiW668DJUTD1WK8YK3BsFwr/Ri1UUVdrGtg684hd5iRqN9+8OrD+
+ncfJkSOYJ1IHduDqsV4xVuDYLop5sKKu1jSwdeaRu8yqN98Fpg5MZ+fRcuRq
+u8xE6sAuUPVYjxgrcGwXxzyUE61pYOvMY3eZFW++C0wdmM7O4+XIlXaZydSB
+AeuxXjFW2AAxinkoJ5rTwNaZx+0yK998R/786i5io+08Vo4cxrwMBjRqQ9Rp
+bS6lqjIP5UR7GlgZBuy8aIpdm6+9iG3izotmgSBtPjX6G7Wh6rQWl1KVmYdy
+oj0NrAr9Oy+eYtnm6y5im7fz4lkwhLr/G1BKRasDm1VKNcA8zgiEKTaaR5ui
+dJCNRWwaOfJg5lNiRikVLWBqUCnVDPM4I9CmSGGMebQpOIMsKmITy5Gn+/xv
+SikVLWBqTCnVFPM4I9CmSGCQebQpOIMsKmITy5Gndf83ppSKFjA1pZRqjHmc
+EWhTxJhkHm0K1iBritjkcuQhf/7rC5k6sHWlVDL1WDavcQrmoPCQ2Xn8WUog
+Uwe2rpRKph7L5jVOwRwUHjI7jz9LEWTqwNaVUsnUY9m8ximYg8JDZufxZzEM
+wzAMwzAMwzAMwzAMwzAMwwDDRU5dsHldsHldsHnT4P6vLti8LmTNszRouLxs
+GFr7v7712GB4x0Mtq9DCOVEe/22FjPkk4mivDDhxWELm8crLCPcc7v9eRVRB
+9arHBsM7HmpdhdaBcoIS/yVmXhztlUZ5HJaQeeTysuJ7Dvd/r0FUQfVraErj
+Ew+1rkLrADnBif8SMy+WJo3qOCwl88jlZdX3HBfu/yYRVlB9GpryeMdDravQ
+uoA4wYn/EjMvlCaP6jgsIfPY5WXF9xwX7v8mESdofRqa0vjFQwMXP/W3UEGc
+4MR/Qc37gmJeLE0egDisH6R2Hre8rPye4wCVtWUwoIWqO0EbLB4qQnsLNQC0
+zEujynxgafrOb8fdedEU0pvfHv0tVP0J2iDxUAl0t1ClIWde9hWpMh9Qms7z
+21F3XjyF8ua3x4AiJ5nWqnUtVILmuf+LeHzHwp0nMyXYzqfEjCInsdaqY08L
+lZ55MWaYx5nCO98RpqSLKUVOYq1Vx54WKj3zIkwxjzOFd94LSlPSwpgiJ7HW
+ahI7WqgUzftijHmcKbzzXlCaohYa/V8bQ5xsXhc0zLD5jjBFLTT6vzaGONm8
+LmiYYfMdYYpqaPR/bQxxsnld0DDD5jvCFIZhGIZhGIZhGIZhGIZhGIZhGFVw
+kVMXbF4XbF4XbN40uEKrC67Q6gK7Qstn8Ev4bmMYWiu04KFSm4qcWiu0bN7D
+vE9UNxAICVrBGbTIPNbdxgXi/FpoPiWaK7TQ3U+dRc6AaK7QsnkP895R3WCo
+T9CKzqBl5hHuNi4Q59cA80QqtLDdT5QiJ5EKLZtPaV7wRuRRn6CVOoP2mMdp
+XoOcX0TzHhCp0AJ3PzGKnEQqtGw+tXn/NyKP+gSt1Bm0yDxO8xri/CKa94BM
+hRa0+wlU5NTdQsWp0Jpo3hcU84I3Ig1GglbmDNqz8zjNa5jzC2k+NAYUOXFa
+nKJZUEVO7S1U4yq0oinoLVRV5oO9Ed0JWkC073wAQmiHOr/moL/IidPiFM8C
+K3LqbqEaVqEVT8FuoSozH+SN6E/QQqJ756UJpR3q/BqDAUVOnBYnwixuoeqa
+YmP/l4B2x8KdR7vbYN7W0sSMIidmJRNnFrdQdU0RY4x5Ytpt2Xk0IaYsvCem
+FDkxK5k4s7iFqmuKCIPME9Nuy86jCTFj4b0wpsiJWcnEmsUtVD1TBJhknpx2
+O3YeTYgRCx8eSpVSu4qclCqlbB5/BNoUQMjcbawznxpKlVK7ipyUKqVsHn8E
+2hRAyNxtrDPvBaVKqV1FTkqVUjaPPwJtCiBk7jbWmWcYhmHI8H9G53kx
+ "], {{0, 78}, {
+ 512, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{512, 78},
+ PlotRange->{{0, 512}, {0, 78}}]], "Output",
+ ImageSize->{516, 78},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->1753947186]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[3]:="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Sorting of the matrices inside ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional traces helps to avoid some spurious terms."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "5", ",", "\[Rho]", ",", "\[Sigma]", ",",
+ "\[Tau]", ",", "\[Kappa]"}], "]"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}], "-",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]", ",", "5"}], "]"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]}], "//",
+ "Expand"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[TextData[{
+ "When the sorting is turned off via ",
+ Cell[BoxData[
+ RowBox[{"Sort", "\[Rule]", "True"}]], "InlineFormula"],
+ ", one may obtain some spurious terms that vanish by Schouten's identity."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "5", ",", "\[Rho]", ",", "\[Sigma]", ",",
+ "\[Tau]", ",", "\[Kappa]"}], "]"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"Sort", "\[Rule]", "False"}]}], "]"}], "-",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]", ",", "5"}], "]"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"Sort", "\[Rule]", "False"}]}], "]"}]}], "//",
+ "Expand"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQlMFFcAQLE1bWPTVGuMpoZErQeoeGCjoKIiiJXQKGAr6mp1A6KoaAAv
+moo3tYvBVJQUwQJFLSoExRu0EStV0WKFCgqIoBwKKiwru+w13WV0qcvO/N25
++H/8L9Gou5mZ//5nZwaHvIHSNX7L3rOzswv/yPCb39IN7mFhSzf59zT85ZvQ
+8BXBoUGBs0IjgoKDwlyk7xv+8QvDr6pudnbGPxPwotN39RFgrABPk8Bg4QLw
+DkvWPc9dLkmpVjxOXxt0oEJl9qqmOtlferWJIBSFoVMW5zfbtGn1s7yfZk2K
+uqckWos3TJlzvtHcsk5elH7w2MWLaVFLd1xv/v+reuWjC4cOZ59NjnD+7LMB
+Q4cNc/LcdV9pelnbkLtt/tRRAz7tNchx5Pj5p55qbTqwLoJSNVAUCPA0YdVv
+AIzXOuiEM172IlPNeji8SOZoAQhJc/4i15V5+cn7cp5qOr2obzzn7320Vkuo
+7u9w8Txer7N16015Eq+4h8r6bOm2m3Izi7oXl1Z+HVfRRhCq0h3TFuTLO3bb
+dDXcN668zThLSR4+58z965T1DSp9a1HUvJTqzgcNLXSq6UQBAU4TVv0G0Hit
+AySc0bIXmWrWw+FFMkcLwISm7kTAWMkNOeUbVOWx877dU8biFNBatG74507O
+iy+/sHSoilshXtH3VYS25rdpLtEPzK+xwShLdvlsvl6Qmny30+eO7mmmt5us
+zOCKeHUnzDOyqNX00otLfpM23zOOqq1sj+d3f1kUoCqNCUh4qLb5kCzT1app
+RIEBTRNWbcKq8QIBCWe27I2ISHX79lkMhx/J3CyA12hqMwIn97EPoDGsay7M
+zCxssvni1oS6Mm6KR/wR6fiFFxo7b8Vw+nKdcbZR31bxi/vwRTfktu9H+e9W
+d8kPh8tbO78kz583xDWtxnD3o/hnu2S/8bz2Gl398emuu42CVeXx87f83WJp
+y5qqxJkLciyuC9vpetU0ooAApwmrNm3amvECAQpntOyNiEh1+xGwGA4/krlZ
+ACTqJye+33tG5jyYzjA9G6ipq6szvkPzJNVjoqxMUXNksffOa+Yzpa096u4w
+dbpk7VZZ7Oxxs2NOVrZalm1540bkBSuXp1VbOosqS6Kc+k/wiUo5lXU4+Y/6
+t96iqT2xwndj8ulTaYdynlBcumse/+oxdNaZBuarywQEqmlEUeyiQzJwmrDq
+DqwZr+Ud2SCc4bInrFetfZodvPomrcIuV23VcASXbMMCeH0gFKrV1emRCaXN
+lQfGURlWN1xNWu7l5rs7JoHu0qvt8ZlY2cG0/cFDe3zQ12vV9tRKq29q9I3n
+53rsrwTfpWhf3jwYLlkQGBoRuTOxsNmqr2RNVYKbS4zZNUSXAINqK6CUDJwm
+rJoRzIXTwNVcaJ+kzvC5/JL6DYiohlry60O0qLrtUVpkUpmSUD+iNkwQTVd8
+B0/YmxV/j/IkqZffXDd+akKVmlCVbnHsOzG9zoYLIaMk1/VFwDtvZUn0ZIeF
+GTU22VRX7nMds76YyW09t0ChGgy1ZOA0YdVMYCGcBs7mAvARjYhqyCWTWFKt
+qkiJTHlovAanNay4tcxh7Oasn29TfqtH13D6K/vR7aeTlgLpCLdEPv6j+FVh
+yMBP+k/3m2cgIDC65BX3u2CCpva4dOZUM7xXXWt6SxYqqiGVTCIu1SSQCu9Q
+7erQq/foSWirhlQyCZ1q1QPZtNFOo9sZbt/jw55DRrmvuaMw30Rr8YYRI0Iy
+4648o3zcUFOd9GW/cQavuobzK+ZGF7bw8fR3U55Xv0Gr70Cl11qQUY2yZBJk
+VJPALpzuKhoZ1bBLJqG/YdFUJ44fYvkk2FYuG+sgORafduvP3GKKRy10LcW/
+bwqJ2Jd+MutyxSuefjpH9SDaqc/Y2DLbH8iDCrhVi0QyCdyqSWAXDvxeNAnc
+qmGXTML4I1pZus1tpN8S/9CkohYKv43nlzja9/64ezcD3Xs6h7N6wIQafcvd
+A9JpE2cvW795y/bY7DqunukUFshVi0MyCeSqSSAXzv4jGgbVkEsmsVK17ajr
+zv24PaOKPEHpNS8K9m68zsNuMFi1gGDVgoFV84u2PmPmYM+sZ+TpUddSlnsy
+pwbu+wlUwaoFA6sWDKyab/SKItkcx372Y7wCgjfuTsi8/RyhH/pHC6xaMLBq
+wcCqMRgMBoPBYDAYDAaDwWAwGAwGg8FQ8A7nad4J8PwKDBYuAGKXzCa6BIRZ
+K0qELScWoR8gbNpnIlRNwmc4iblwmmUgPtXsRsSLZASzWayiS1bApBUl0pYT
+w9CPFTBvn4lVNc/hJFaxOYplID7VLEfEh2QEs1kEq+gSGEatKHG2nNjUlOhh
+0T4Tq2p+w0nsYnN0iTRxqW7fBdMR8SMZuWwWwSq6BIZRK0qcLSeCRU2JHhbt
+M9Gq5jWcxDI2R7MMxKW6/SCYjogfychlswiW0SW63Rl3wbAVJcaWkxHGNSXK
+HYElA+aXS9WwtJwILsNJXAsnaBNpCK5qLkJgAkq2OZtFhWDVG46iS0zKWZAA
+Q2CIP8ls8kO2Ak/LiaNwEuzCaUBHNZqShavecBNdYlTOggMoAkP8SWaTH7IZ
+aFpO3IST4BdOCTqq0ZSMSvXGBIz5G9G1nGCUTCKulpMJGIXjVQ0FyFRvTKCR
+v7EASqoRkCyKlpMJBIRbBiXVyEp+A9zVGxNo5G/ogV41ApJF0XIygYBwINCr
+Rl4y5NUbE0jkb+iBXzX8ksXRcjIBv3Ag8KsWgWSm4OqNYGDVgoFVCwZWzS+4
+eiMYWLVgYNWCgVXzDa7eCAZWLRhYtWBg1RgMBoOBk/8Am7cdXw==
+ "], {{0, 35}, {481,
+ 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{481, 35},
+ PlotRange->{{0, 481}, {0, 35}}]], "Output",
+ ImageSize->{485, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->1422874292]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+The trace of the unit matrix in the Dirac space is fixed to 4, which is the \
+standard choice in dimensional regularization.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[", "1", "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox["1",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "If, for some reason, this value must be modified, one can do so using the \
+option ",
+ ButtonBox["TraceOfOne",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TraceOfOne",
+ ButtonNote->"TraceOfOne"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"1", ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "D"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox["D", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "D"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"D", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{53, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+Since FeynCalc 9.3 it is also possible to compute traces of Dirac matrices \
+with Cartesian or temporal indices. However, the support of nonrelativistic \
+calculations is a very new feature, so that things may not work as smooth as \
+they do for manifestly Lorentz covariant expressions.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{47, 17},
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{123, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrace",
- CellLabel->"Out[8]=",
- CellID->2127529862]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[9]:=",
- CellID->29438835],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
- RowBox[{"4", " ",
- RowBox[{"MT", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Output",
- ImageSize->{82, 15},
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{261, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrace",
- CellLabel->"Out[9]//StandardForm=",
- CellID->1663310583]
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], ".",
+ RowBox[{"GA", "[", "6", "]"}], ".",
+ RowBox[{"CGA", "[",
+ RowBox[{"m", ",", "n"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["m",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["n",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{203, 25},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQ1QFPX/xzWnQ/SakD1E4Uh5DBk9Ek08pSwIFVOxVMCppqSgfIRCIx1n
+NE1NHJWaULRM+6ESUzIMluAjZICOGgmhPP1FCAGROw644+QeWP4gFwm3u7d3
+t0+3fV4zNdQd997v5/X97O7tLrvu0XFvxj41bNiwhJG9/3pzZeKrn3yyctNS
+h97/WL4+YdWH62M+CFu/IebDmE9mRo/o+5+9/4h739/3cw8AAAAAAJwD1aOk
+3tdN8n2AVYAOTKAsAI/Qya5ln6tRMzVXu1WVudk3FXrag3QPczctk/r4ROYr
+iMaGqkr3rgz193xx//9paF8mEjCsox8GpPBYhzXVs9GyAAA+nSVxXk5Bh2q1
+zMTpG04Eijw/KlYxkNVeECl2XXqZsFl70dYefAF5fsudRwwskkkY1tEPM1L4
+qsPK6tliWQCACFTTKtfgTGitvDwv+7fS3zNPZv3RSs1eLKptva/E+qjerPwz
+F8pvnD2VkVevaiu/kHHy1wpVt+VJypsx7m7Lc8uyj6UeOnTk1FWcAegb0qQi
+z/jSTsuTqMSEDmpLNBBKIIWqCcA/HQPvwaseGRgri1mTh4bGB/4TaO5nJC6b
+6TU5oVSN9Wrdd2+JBU/Zu80Mne44yiMe803moJflbY0IcBkXfPrB0Kmsazod
+6zNqxGjP4IglXqPtEElwZGSgo8P0Y/U6S9PUpfE+EyJyr6cu8Q9LTLtSLsfe
+1+xuznx17IQPbigtzaEOYh00lKgPAimUTgC+6eiHoHrkYKgsZk0eyhsf4BWJ
+RjQ1Nf3zIqq59+PLThPex5mq6rJPvZGAg7Ud5dt8RQGpdYTHYwiD/qHzzzXu
+iDStwXjPR3N3vwTx21Wlbs6cI3JdcaWt/erb4rGhuTL8fUTixEd3tvgi3uHz
+w3flywhWuqgsJ8xZvKKgnWhs1GGNDspLZABfCoUTgH86DOBXj0QElWUhDjJr
+8pjlHeAPqLo6bX2wj5NwjHvQmh+q8E8jahrOfJNy+OCX6xeFrM5teXLuE0/V
+rsov/BBJco3y7gEJMnlPtcmTg/hBBtRlid7INKw5qvv72+kin823O+XnXnce
+/8blVmXxqomiWSdwW9VUoqZ6z2ShwMFOOGV3VRf+B6CK/KUu48Mvtlp9Tpx2
+HZSXyAC+FAonAP90GMCvHpkIisuCH2TW5DHbO8AP1Hf2x6Vca9Zo5TdTFo97
+1j8JT7229nj0ibrenSD0UXODalDTKC73TdVL2FNVW/OVP+K3s0pZlzpNRObk
+IH6Qga7KHX6OU/ZhXLmib0wPcvKIK1Ep8pe5OM8/K1P9tcELmXa4jviwDn6i
+9l7KVEfvdWkxHqOfiylox+3F9qJ33Jzn/tJi9TkJ2nVQXiID+FIonAD802EA
+v3pkIiguC36QWZPHbO8AP9A+yLvYZJjJnbfWerguwt2f6qpODlu4LU8+eIWi
+b7mwLcpXKECCtxYrjWazXnZp87yxAnuPqITY15wFIz3XnpebPFWHHTSApiZZ
+gkzaXjF0h0zfcn5LuHiknXjpxrgIX+HTDjOiN7wndRQIJQn5rcRthJ2oqU+P
+D3UW2E+Mint3yjMj7FyXJFVgHBLuVhTuiJokFIx5aVOBwvRaTN985sN11zuw
+X6RbB9UlGgBXCnUTgB4dhNCsYwC86pGJoKEseGMxY/JY5L3HRHcANofyxspJ
+Uryv39qHRRlHD8QGuk7dWNhGwSVCuBAE6VqKMnMqbn8d4DI75R51B2cZG9pj
+9Pf/F7rwssL0G7mhw2Qc5VIYHhpZ6NFBvnpcaED6Id0dgA2AKq6sDkkoaMPY
+m0I7ipMi3ky+pUIflW/3G/9K1kOaphpxkK4xfYHYYeKshZ9lNVC1RWFsaAOQ
+7Bou6CATR60U5nWQhCYdJKvHkQZkANimcB9d40/R8+YMYcHawqHN0a0o2v3x
+0QrMc5BdlTsDfGP7L1tpL1zsPuP4fasuO8WFsSAWEv8VIfUdg/jPxhPRDyd0
+MB/Hhg7ivuiHZR08bkAD5nUHwH1QdfWpPUdLOrAF6hvTA12lPz++cL53NyLI
+P66Enj8kYyyIxUQye2Ic0cF8HBs6TMO6Dh43oPEiwPcUPqCpzz5w5Hr/kdPu
+trKsnMbBV5+gspy5bgEptdoetLN0d8jy4/U0XWfOWBCLiaa7hjM6mI9jQ4cp
+OKCDxw1oBGxTbB99y9lVz9sPH2Zg+CjJXqMLGlFVyb6IkNh936cmfX7sVgd9
+R1gZC2IxkbhrOKWD+TgWdBDCER08bsChwDYFAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAA4A7deivv6YBa+wGcx+oSMQn/dTAP9AgBNtUd/fBO
+h052LftcDf4TiyimW1WZm31TYXTzbFRVundlqL/ni/sJn0RBgO5h7qZlUh+f
+yHyFDSsi0GF9iQbAs0AhvNdBH9AjePCmO/qxdR04dJbEeTkFHapl6FYO+oYT
+gSLPj4pVxi9paw++gFj1AKD2gkix69LLtuyHWIf1JeqHwAKF8F4HTUCP4MGn
+7ujHpnXggmpa5RqcIWnl5XnZv5X+nnky649WajbbqLb1vhLro/QNaVKRZ3yp
+5be+U96McXdbnluWfSz10KEjp67iLHHvoPLPXCi/cfZURl69qq38QsbJXytU
+rN9MxACRDutLNJCCZ4FC47zXQduSc6JHqG58SmC/O6g1buM6MNDcz0hcNtNr
+ckIpxtPlejR1370lFjxl7zYzdLrjKI94zDeZg16WtzUiwGVc8OkHxhq6mzNf
+HTvhg/6bdVuEujTeZ0JE7vXUJf5hiWlXyuVYezO6ptOxPqNGjPYMjljiNdoO
+kQRHRgY6Okw/Vs/MncGJINZBRYn6ILBAqXGe66BpybnQI5Q3PiWw3h00GLdZ
+HYlGNDU1PX4F1dz78WWnCe/jeFCXfeqNBBys7Sjf5isKwHtOHpmgf+j8c407
+Ik1rMN7UorKcMGfxCtznu5qOeHRniy/iHT4/fFe+jECy5u5+CeK3q0rdnDlH
+5LriSlv71bfFY0NzZUx9+7RYh/UlMoBvgULjvNdh2ZLbRI+YOw0ohMvdQblx
+zulA1dVp64N9nIRj3IPW/FCFfxpR03Dmm5TDB79cvyhkdW7Lk6Ui9tBV+YUf
+IkmuUd49IEEm76k2eeYLP8iAuizRG5mGVRRUkb/UZXz4xVYTqxL8CE31nslC
+gYOdcMruKoJng+v+/na6yGfz7U75udedx79xuVVZvGqiaNYJjClkHrTrsL5E
+BvAtUGic9zosXHJb6BGzp4Fp+NAdlBtnTwcO6jv741KuNWu08pspi8c965+E
+l6WtPR59oq53M4g+am5QDbKkuNzn4RK2B23NV/6I384qZV3qNBGZM1/4QQa6
+Knf4OU7Zh3VZRnvRO27Oc39pMXFoEj9Cey9lqqP3urQYj9HPxRS0480sfWN6
+kJNHXIlKkb/MxXn+WZnqrw1eyLTDddYeaqFdh/UlMoBvgULjvNdh4ZLbQo+Y
+PQ1Mw4fuoNw4ezrwkh7kXWwyDLzz1loP10W43/q6qpPDFm7Lkw+uoL7lwrYo
+X6EACd5arDQaj152afO8sQJ7j6iE2NecBSM9156Xm9x1xA4aQFOTLEEmba8Y
+uknuVhTuiJokFIx5aVOBwsScwI7Q1KfHhzoL7CdGxb075ZkRdq5LkiowDjrq
+W85vCRePtBMv3RgX4St82mFG9Ib3pI4CoSQhv9W6U6s067C+RAPgWaDQOO91
+WLHknO8RS6ZB3+81n/lw3fUO7Bd50B1UG6dZh9Uob6ycJMU7zKZ9WJRx9EBs
+oOvUjYVtdF5NQxCkaynKzKm4/XWAy+yUe1YcDWRsLFbBqg4GLJDJ4hDc6A6T
+cTbeI6QfyPWf6Q6TiRwGVVxZHZJQ0Ibx3QntKE6KeDP5lgp9VL7db/wrWQ9p
+GhVxkK4xfYHYYeKshZ9lNVhsi7GxWAmLOhiwQDKLO3ChO8jE2XqPkNym/Ee6
+g0wid+lWFO3++GgF5kmvrsqdAb6x/ddJtBcudp9x/D49V2gyEMTYWIaia/wp
+et6cISxYW4jVFuzqYLJEoMNc+Nkj/+qQ+o5B/GdzVwfzxWFVB5nuwARVV5/a
+c7SkA/s39I3pga7Snx9fZ927GxHkH1di/Z8DsRTE2FisgV0dTJYIdJgL33vE
+9PeU/053sJVIAZr67ANHrvcfpOtuK8vKaRx8sQIqy5nrFpBSq+1BO0t3hyw/
+Xk/Thc0MBDE2FsthWweTJQId5sL3HjG1TWFbB/PFsYEeGYK+5eyq5+2HDzMw
+fJRkr9H1b6iqZF9ESOy+71OTPj92q4O+g3kMBDE2Fsvggg4mSwQ6zIXnPUK4
+TeGCDuaLw/EeAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4Deo
+nrqHMXVT+FkcgsoSMQlPdVACC05BB0XAKssInexa9rka/KfkUEy3qjI3+6bC
+6IbNuoe5m5ZJfXwi8xXWLgqqKt27MtTf88X9WI+h4DgEOigs0QB4OiiErzoG
+sKaGdDglhvc6KAdWWWbSWRLn5RR0qJahGwfoG04Eijw/KlYZv9ReECl2XXqZ
+it7S1h58AaH1+TV0QayDwhL1Q6CDQviqox8ra0i5U5PwWwflwCrLbFBNq1yD
+UxStvDwv+7fS3zNPZv3RSs2+LKptva/E+ijlzRh3t+W5ZdnHUg8dOnLqqhV5
++oY0qcgzvhT7nm29g8o/c6H8xtlTGXn1qrbyCxknf61QceXWCUQ6KCzRQBye
+DgrV81XHwHvwakgGkk5Bx2NMrKzoWXJOrLKoXg/TheZ+RuKymV6TE0oxHjHW
+o6n77i2x4Cl7t5mh0x1HecRjvskc9LK8rREBLuOCTz8wNq0ujfeZEJF7PXWJ
+f1hi2pVyueX7It3Nma+OnfBB/12mh6BrOh3rM2rEaM/giCVeo+0QSXBkZKCj
+w/Rj9czcq50IYh2UlqgPAh2Uquerjj4IpzQZSDkFHT2mdNC05FxYZVG+HqaA
+RCOampoev4Jq7v34stOE9zGH0luzsk+9kYCDtR3l23xFAXjPZiMT9A+df65x
+R6RpDcab2kd3tvgi3uHzw3fly8jMAoIsVJYT5ixegfN4Us3d/RLEb1eVujlz
+jsh1xZW29qtvi8eG5sqYOvZgsQ4KS2QAXweF6vmqwwB+DUlEkHUKOkzqsGzJ
+rekRxlZZ5tq3HFRdnbY+2MdJOMY9aM0PVfjnrTQNZ75JOXzwy/WLQlbntjxZ
+G+KhdFV+4YdIkmuUdw9IkMl7qk2ePMIPMqAuS/RGpmEVRVO9Z7JQ4GAnnLK7
+auizoM0dlCJ/qcv48IutmAXR/f3tdJHP5tud8nOvO49/43KrsnjVRNGsE0Tr
+BFLQroPCEhnA10Gher7qMIBfQzIRJJ2Cjh5TOixccltYZZlt32LUd/bHpVxr
+1mjlN1MWj3vWPwkvS1t7PPpEXe+GFH3U3KAaPJTLfUO5hD0Ubc1X/ojfzipl
+Xeo0EZmTR/hBBroqd/g5TtmHcWWD9l7KVEfvdWkxHqOfiyloN71TRJDVXvSO
+m/PcX1owj0XoG9ODnDziSlSK/GUuzvPPylR/bfBCph2us/a7Pf06KCxRPwQ6
+KFTPUx0G8GtIJoKkU9DRY0qHhUtuC6sss+1bjPZB3sUmw0g7b631cF2Euz/V
+VZ0ctnBbnnxwyfQtF7ZF+QoFSPDWYqVRRfSyS5vnjRXYe0QlxL7mLBjpufa8
+3OS+CnbQAJqaZAkyaXvF0I26pj49PtRZYD8xKu7dKc+MsHNdklRh8pAhdla3
+onBH1CShYMxLmwoURob0Lee3hItH2omXboyL8BU+7TAjesN7UkeBUJKQ32ry
+cLi++cyH6653YL9Isw4KS/TvZ+LooFA9nToIoVnHAHg1JBNB0qmN6GCzO6xY
+cs6vsiyxTwXKGysnSfG+fmsfFmUcPRAb6Dp1Y2EbnZdvEATpWooycypufx3g
+MjvlHhVHAxkb1BOYfjqqAdDBKejRQb6GzBcHuoMk0CM4oIorq0MSCrAeY492
+FCdFvJl8S4U+Kt/uN/6VrIc0DYY4SNeYvkDsMHHWws+yGqzXw9ighkCya0AH
+pxqGJh0ka8h8caA7SAI9gku3omj3x0crME96dVXuDPCN7b9Oor1wsfuM4/fp
+uSSQsSCGs/rQNf4UPW9OH1LfMYj/7Mc/LlhbiNUWoINBHU/AVR1MFwe6gzT8
+7BHzugMTVF19as/Rkg7s39A3pge6Sn9+fGF1725EkH9cCfZf1FgLY0EMZw1J
+NrknBjoY1GEa1nUwXxzoDpJAj2Cjqc8+cOR6/7G57rayrJzGwVcnoLKcuW4B
+KbXaHrSzdHfI8uP1NF3YzFgQw1mDMdU1oINRHabggA7miwPdQRLoEQz0LWdX
+PW8/fJiB4aMke40ueENVJfsiQmL3fZ+a9PmxWx30HcNjLIjhrEEQdg3oYFoH
+IRzRwXxxoDtIAj0CAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADA
+PKieuWdlU0+3TS89XbDmlH866B+RbTcgszBaK/5NZmrQya5ln6vBvAeP7mHu
+pmVSH5/IfAVltetWVeZm31TQf8NmVFW6d2Wov+eL+wmfbsE1CHQMYE0N6XBK
+Bv7poHBEeELZksVZOLKystHJzBSdJXFeTkGHarHvF9BeECl2XXqZOkv6hhOB
+Is+PilVUfSAB2tqDLyC0PsWGeoh19GNlDSl3ShL+6aBqRARC2ZLFTbizsrLF
+ycwcqKZVrsHRoLwZ4+62PLcs+1jqoUNHTl1ttf7rBaptva/E+hitvDz/zIXy
+G2dPZeTVq9rKL2Sc/LVCZcWNDPQNaVKRZ3wp9g3beuPysn8r/T3zZNYfFAyL
+Moh0DLwHr4ZkIOkUdDyGSAfxiMxKwRNKYQOaJdQWdTC5srJePS90YKC5n5G4
+bKbX5IRS7IeUqUvjfSZE5F5PXeIflph2pVxu3c3P9LK8rREBLuOCTz8YWjtd
+0+lYn1EjRnsGRyzxGm2HSIIjIwMdHaYfq7f4rtDdzZmvjp3wQf8tpoegqfvu
+LbHgKXu3maHTHUd5xOOMn2FM6eiDoIbkIOUUdPSY1kE0IvIQCqWsAc0Saps6
+mFtZWa/e5nUkGtHU1PT4FVRz78eXnSa8j1ObR3e2+CLe4fPDd+XLyKxL8IP+
+ofPPNe6INK3BeFOrubtfgvjtqlI3Z84Rua640tZ+9W3x2NBcGeEuO0EiKssJ
+cxavwHlIqbrsU28k4GBtR/k2X1EA3mPnaMFiHQbwa0gigqxT0GFSB/GISHz+
+P+ALpbABzRJqizqYXFlZr56jOlB1ddr6YB8n4Rj3oDU/VOGf1dU0nPkm5fDB
+L9cvClmd2/JkhYhro6neM1kocLATTtldRfzAbZNBBtRlid7INKyi6P7+drrI
+Z/PtTvm5153Hv3G5VVm8aqJo1gmiNSfx0BT5S13Gh19sxSxLV+UXfogkuUZ5
+94AEmbynmoITbbTrMIBfQzIRJJ2Cjh5TOohHRObzDeALpbABzRJqizqYXFlZ
+r55tHTio7+yPS7nWrNHKb6YsHvesfxJelrb2ePSJut5NN/qouUE1uNEv99Xm
+EnZttPdSpjp6r0uL8Rj9XExBu+kTX/hBBroqd/g5TtmHcamEvjE9yMkjrkSl
+yF/m4jz/rEz11wYvZNrhOuI9DoLE9qJ33Jzn/tKCeYBIW/OVP+K3s0pZlzpN
+RM2JNtp1GMCvIZkIkk5BR49JHYQjIvP5BvCFUtiAZgm1RR1MrqysV8+2DrwF
+fpB3sckw3s5baz1cF+Hu3nZVJ4ct3JYnH1w4fcuFbVG+QgESvLVYaeRAU58e
+H+ossJ8YFffulGdG2LkuSaoweRgPO+jfz6xJliCTtlcM3Y3Qt5zfEi4eaSde
+ujEuwlf4tMOM6A3vSR0FQklCfiuxN+zEbkXhjqhJQsGYlzYVKIw+QC+7tHne
+WIG9R1RC7GvOgpGea8/jLfHg32s+8+G66x3YL9KsYwC8GpKJIOnURnQQQrMO
+4hGR+fwB8IRS2IBmCbXF7mByZWW9ekZ0WI3yxspJUryjIdqHRRlHD8QGuk7d
+WNhG5+NgCIJ0LUWZORW3vw5wmZ1yj7qjgYwN7TGmn45qgB4d5GvIbFnYzzUB
+q93BZFOwWn+Wu8NcGPDC0XYgBaq4sjokoQDrMfZoR3FSxJvJt1Too/LtfuNf
+yXpI09iIg3SN6QvEDhNnLfwsq4GqLQpjQxuAZNfQpINkDZkvC7u5JmGxO5hs
+Ctbrz253mAUDXljXYRXdiqLdHx+twDzp1VW5M8A3tv86ifbCxe4zjt+3+FJQ
+QhgLYiFR1/hT9Lw5fUh9xyD+sx//uGBtIVZbsK6DeRFM5/6r4wk4qYNJF2x5
+t63uYCyINR0UgKqrT+05WtKBffxd35ge6Cr9+fHl1b27EUH+cSXW/3UWq0Es
+JpLZE2NdBxtlYTOXGHZ1MFkTDtTfBrqDsSAO6LAUTX32gSPX+w/VdbeVZeU0
+Dr5GAZXlzHULSKnV9qCdpbtDlh+vp+nCZsaCWEw03TUc0MFGWdjMJYJtHUzW
+hAP1t4HuYCyIAzosQt9ydtXz9sOHGRg+SrLX6LI3VFWyLyIkdt/3qUmfH7vV
+Qd8hPcaCWEwk7hqO6GChLKzm4sEFHUzWhP3620J3MBbEvg4AAAAAAAAAAAAA
+AAAA+E/x//NMn5Y=
+ "], {{0, 85}, {540, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{540, 85},
+ PlotRange->{{0, 540}, {0, 85}}]], "Output",
+ ImageSize->{544, 85},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[4]=",
+ CellID->104317204]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -745,15 +3596,49 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["TR",
+ StyleBox[ButtonBox["Contract",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/TR",
- ButtonNote->"TR"],
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCGetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCSetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracTrace",
- CellID->2123270018]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -770,25 +3655,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 11.947613}",
+ "built" -> "{2020, 1, 5, 18, 54, 49.451695}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracTrace[expr] is the head of Dirac traces. Whether the trace is \
-evaluated depends on the option DiracTraceEvaluate. Direct trace evaluation \
-should be performed with TR (or Tr). The argument expr may be a product of \
-Dirac matrices or slashes separated by the Mathematica Dot (.). For comments \
-regarding \\[Gamma]^5schemes see the notes for TR.", "synonyms" -> {},
- "title" -> "DiracTrace", "titlemodifier" -> "", "windowtitle" ->
- "DiracTrace", "type" -> "Symbol", "uri" -> "FeynCalc/ref/DiracTrace"},
- "SearchTextTranslated" -> ""},
+ "DiracTrace[exp] is the head of Dirac traces. By default the trace is not \
+evaluated. The evaluation occurs only when the option DiracTraceEvaluate is \
+set to True. It is recommended to use DiracSimplify, which will automatically \
+evaluate all Dirac traces in the input expression.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DiracTrace", "titlemodifier" -> "",
+ "windowtitle" -> "DiracTrace", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracTrace"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -796,8 +3680,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -806,178 +3691,330 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3803, 106, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7445, 217, 389, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->722802191]},
+ CellID->1586921873]},
"DiracTrace"->{
- Cell[4436, 135, 138, 4, 27, "Input",
- CellTags->"DiracTrace",
- CellID->1024967943],
- Cell[4577, 141, 852, 22, 94, "Output",
- CellTags->"DiracTrace",
- CellID->606139332],
- Cell[5466, 168, 191, 6, 27, "Input",
+ Cell[8149, 248, 191, 6, 27, "Input",
CellTags->"DiracTrace",
CellID->60676203],
- Cell[5660, 176, 680, 27, 41, "Output",
- CellTags->"DiracTrace",
- CellID->47904170],
- Cell[6377, 208, 228, 7, 27, "Input",
+ Cell[8343, 256, 661, 26, 40, "Output",
+ CellTags->"DiracTrace"],
+ Cell[9041, 287, 228, 7, 27, "Input",
CellTags->"DiracTrace",
CellID->1088537337],
- Cell[6608, 217, 1088, 43, 42, "Output",
- CellTags->"DiracTrace",
- CellID->206648847],
- Cell[7733, 265, 167, 5, 27, "Input",
+ Cell[9272, 296, 1068, 42, 40, "Output",
+ CellTags->"DiracTrace"],
+ Cell[10790, 359, 303, 9, 27, "Input",
CellTags->"DiracTrace",
CellID->710007181],
- Cell[7903, 272, 2892, 115, 42, "Output",
- CellTags->"DiracTrace",
- CellID->697793381],
- Cell[10832, 392, 314, 9, 27, "Input",
+ Cell[11096, 370, 1966, 78, 40, "Output",
+ CellTags->"DiracTrace"],
+ Cell[20146, 743, 238, 7, 27, "Input",
CellTags->"DiracTrace",
CellID->196468068],
- Cell[11149, 403, 670, 27, 39, "Output",
- CellTags->"DiracTrace",
- CellID->72676319],
- Cell[11856, 435, 352, 10, 27, "Input",
- CellTags->"DiracTrace",
- CellID->261281630],
- Cell[12211, 447, 8616, 149, 97, "Output",
- CellTags->{"DiracTrace", "RasterizedOutput"},
- CellID->1629884830],
- Cell[20864, 601, 204, 6, 27, "Input",
- CellTags->"DiracTrace",
- CellID->825892025],
- Cell[21071, 609, 1372, 51, 39, "Output",
- CellTags->"DiracTrace",
- CellID->274287736],
- Cell[22480, 665, 313, 9, 27, "Input",
- CellTags->"DiracTrace",
- CellID->1341931123],
- Cell[22796, 676, 653, 27, 38, "Output",
- CellTags->"DiracTrace",
- CellID->2127529862],
- Cell[23486, 708, 128, 4, 27, "Input",
- CellTags->"DiracTrace",
- CellID->29438835],
- Cell[23617, 714, 281, 9, 49, "Output",
- CellTags->"DiracTrace",
- CellID->1663310583],
- Cell[24266, 746, 212, 9, 31, "Text",
- CellTags->"DiracTrace",
- CellID->2123270018]},
+ Cell[20387, 752, 1221, 48, 43, "Output",
+ CellTags->"DiracTrace"]},
"RasterizedOutput"->{
- Cell[12211, 447, 8616, 149, 97, "Output",
- CellTags->{"DiracTrace", "RasterizedOutput"},
- CellID->1629884830]}
+ Cell[24389, 920, 3219, 61, 59, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1546036623],
+ Cell[29609, 1066, 6448, 114, 133, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1367676074],
+ Cell[43895, 1501, 4589, 83, 98, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1815562078],
+ Cell[50593, 1672, 7455, 130, 139, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->492128281],
+ Cell[58940, 1834, 22682, 380, 472, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1606718833],
+ Cell[95747, 2737, 4675, 85, 98, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1753947186],
+ Cell[102714, 2905, 3390, 64, 56, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1422874292],
+ Cell[116723, 3412, 9326, 161, 101, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->104317204]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 26613, 807},
- {"DiracTrace", 26750, 811},
- {"RasterizedOutput", 28524, 869}
+ {"PrimaryExamplesSection", 129811, 3692},
+ {"DiracTrace", 129949, 3696},
+ {"RasterizedOutput", 130612, 3717}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3655, 86, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 885, 24, 165, "Usage",
- CellID->982511436],
+Cell[4240, 109, 287, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3803, 106, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->722802191],
+Cell[4552, 124, 951, 25, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4215, 125, 196, 6, 25, "ExampleSection",
- CellID->1343845601],
+Cell[5528, 153, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2091496943],
+Cell[6270, 179, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4436, 135, 138, 4, 27, "Input",
- CellTags->"DiracTrace",
- CellID->1024967943],
-Cell[4577, 141, 852, 22, 94, "Output",
- CellTags->"DiracTrace",
- CellID->606139332]
+Cell[6326, 183, 93, 2, 70, "Input"],
+Cell[6422, 187, 962, 23, 93, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5466, 168, 191, 6, 27, "Input",
+Cell[7445, 217, 389, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1586921873],
+Cell[CellGroupData[{
+Cell[7859, 236, 197, 6, 26, "ExampleSection",
+ CellID->1676163414],
+Cell[8059, 244, 65, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[8149, 248, 191, 6, 27, "Input",
CellTags->"DiracTrace",
CellID->60676203],
-Cell[5660, 176, 680, 27, 41, "Output",
- CellTags->"DiracTrace",
- CellID->47904170]
+Cell[8343, 256, 661, 26, 40, "Output",
+ CellTags->"DiracTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6377, 208, 228, 7, 27, "Input",
+Cell[9041, 287, 228, 7, 27, "Input",
CellTags->"DiracTrace",
CellID->1088537337],
-Cell[6608, 217, 1088, 43, 42, "Output",
- CellTags->"DiracTrace",
- CellID->206648847]
+Cell[9272, 296, 1068, 42, 40, "Output",
+ CellTags->"DiracTrace"]
}, Open ]],
+Cell[10355, 341, 410, 14, 32, "Notes"],
Cell[CellGroupData[{
-Cell[7733, 265, 167, 5, 27, "Input",
+Cell[10790, 359, 303, 9, 27, "Input",
CellTags->"DiracTrace",
CellID->710007181],
-Cell[7903, 272, 2892, 115, 42, "Output",
- CellTags->"DiracTrace",
- CellID->697793381]
+Cell[11096, 370, 1966, 78, 40, "Output",
+ CellTags->"DiracTrace"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13099, 453, 225, 6, 27, "Input"],
+Cell[13327, 461, 1784, 75, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15148, 541, 159, 4, 27, "Input"],
+Cell[15310, 547, 1327, 49, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16674, 601, 89, 2, 27, "Input"],
+Cell[16766, 605, 2306, 93, 37, "Output"]
}, Open ]],
+Cell[19087, 701, 678, 23, 66, "Notes"],
+Cell[CellGroupData[{
+Cell[19790, 728, 105, 2, 9, "ExampleDelimiter"],
+Cell[19898, 732, 223, 7, 32, "Notes"],
Cell[CellGroupData[{
-Cell[10832, 392, 314, 9, 27, "Input",
+Cell[20146, 743, 238, 7, 27, "Input",
CellTags->"DiracTrace",
CellID->196468068],
-Cell[11149, 403, 670, 27, 39, "Output",
- CellTags->"DiracTrace",
- CellID->72676319]
+Cell[20387, 752, 1221, 48, 43, "Output",
+ CellTags->"DiracTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11856, 435, 352, 10, 27, "Input",
- CellTags->"DiracTrace",
- CellID->261281630],
-Cell[12211, 447, 8616, 149, 97, "Output",
- CellTags->{"DiracTrace", "RasterizedOutput"},
- CellID->1629884830]
+Cell[21645, 805, 89, 2, 27, "Input"],
+Cell[21737, 809, 651, 26, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20864, 601, 204, 6, 27, "Input",
- CellTags->"DiracTrace",
- CellID->825892025],
-Cell[21071, 609, 1372, 51, 39, "Output",
- CellTags->"DiracTrace",
- CellID->274287736]
+Cell[22425, 840, 230, 6, 27, "Input"],
+Cell[22658, 848, 1602, 63, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[22480, 665, 313, 9, 27, "Input",
- CellTags->"DiracTrace",
- CellID->1341931123],
-Cell[22796, 676, 653, 27, 38, "Output",
- CellTags->"DiracTrace",
- CellID->2127529862]
+Cell[24297, 916, 89, 2, 27, "Input"],
+Cell[24389, 920, 3219, 61, 59, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1546036623]
}, Open ]],
Cell[CellGroupData[{
-Cell[23486, 708, 128, 4, 27, "Input",
- CellTags->"DiracTrace",
- CellID->29438835],
-Cell[23617, 714, 281, 9, 49, "Output",
- CellTags->"DiracTrace",
- CellID->1663310583]
+Cell[27645, 986, 230, 6, 27, "Input"],
+Cell[27878, 994, 1602, 63, 42, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29517, 1062, 89, 2, 27, "Input"],
+Cell[29609, 1066, 6448, 114, 133, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1367676074]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[36106, 1186, 105, 2, 9, "ExampleDelimiter"],
+Cell[36214, 1190, 201, 6, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[36440, 1200, 529, 16, 46, "Input"],
+Cell[36972, 1218, 1273, 48, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[38282, 1271, 89, 2, 27, "Input"],
+Cell[38374, 1275, 2619, 114, 40, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[41042, 1395, 105, 2, 9, "ExampleDelimiter"],
+Cell[41150, 1399, 648, 15, 83, "Notes"],
+Cell[CellGroupData[{
+Cell[41823, 1418, 353, 9, 27, "Input"],
+Cell[42179, 1429, 1587, 63, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[43803, 1497, 89, 2, 27, "Input"],
+Cell[43895, 1501, 4589, 83, 98, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1815562078]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[48521, 1589, 353, 9, 27, "Input"],
+Cell[48877, 1600, 1587, 63, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[50501, 1668, 89, 2, 27, "Input"],
+Cell[50593, 1672, 7455, 130, 139, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->492128281]
+}, Open ]],
+Cell[58063, 1805, 318, 7, 66, "Notes"],
+Cell[58384, 1814, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[58537, 1822, 400, 10, 27, "Input"],
+Cell[58940, 1834, 22682, 380, 472, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1606718833]
+}, Open ]],
+Cell[81637, 2217, 908, 20, 117, "Notes"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[82582, 2242, 105, 2, 9, "ExampleDelimiter"],
+Cell[82690, 2246, 448, 11, 66, "Notes"],
+Cell[83141, 2259, 127, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[83293, 2267, 542, 16, 46, "Input"],
+Cell[83838, 2285, 1439, 54, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[85314, 2344, 89, 2, 27, "Input"],
+Cell[85406, 2348, 1005, 17, 193, "Message"],
+Cell[86414, 2367, 173, 5, 35, "Output"]
+}, Open ]],
+Cell[86602, 2375, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[86755, 2383, 569, 16, 46, "Input"],
+Cell[87327, 2401, 2931, 125, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[90295, 2531, 110, 3, 27, "Input"],
+Cell[90408, 2536, 1153, 36, 70, "Output"]
+}, Open ]],
+Cell[91576, 2575, 127, 4, 27, "Input"],
+Cell[91706, 2581, 190, 6, 32, "Notes"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[91933, 2592, 105, 2, 9, "ExampleDelimiter"],
+Cell[92041, 2596, 448, 13, 49, "Notes"],
+Cell[92492, 2611, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[92645, 2619, 512, 14, 45, "Input"],
+Cell[93160, 2635, 225, 7, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[93422, 2647, 588, 16, 45, "Input"],
+Cell[94013, 2665, 224, 7, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[94274, 2677, 76, 2, 27, "Input"],
+Cell[94353, 2681, 169, 5, 35, "Output"]
+}, Open ]],
+Cell[94537, 2689, 127, 4, 27, "Input"],
+Cell[94667, 2695, 109, 3, 27, "Input"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[94813, 2703, 105, 2, 9, "ExampleDelimiter"],
+Cell[94921, 2707, 262, 8, 53, "ExampleText",
+ CellID->2003592022],
+Cell[95186, 2717, 133, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[95344, 2725, 400, 10, 27, "Input"],
+Cell[95747, 2737, 4675, 85, 98, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1753947186]
+}, Open ]],
+Cell[100437, 2825, 127, 4, 27, "Input"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[100601, 2834, 105, 2, 9, "ExampleDelimiter"],
+Cell[100709, 2838, 161, 4, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[100895, 2846, 646, 18, 62, "Input"],
+Cell[101544, 2866, 166, 5, 35, "Output"]
+}, Open ]],
+Cell[101725, 2874, 217, 5, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[101967, 2883, 744, 20, 62, "Input"],
+Cell[102714, 2905, 3390, 64, 56, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1422874292]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[106153, 2975, 105, 2, 9, "ExampleDelimiter"],
+Cell[106261, 2979, 149, 3, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[106435, 2986, 86, 2, 27, "Input"],
+Cell[106524, 2990, 229, 8, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[106790, 3003, 89, 2, 27, "Input"],
+Cell[106882, 3007, 166, 5, 35, "Output"]
+}, Open ]],
+Cell[107063, 3015, 244, 8, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[107332, 3027, 208, 5, 27, "Input"],
+Cell[107543, 3034, 166, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[107746, 3044, 256, 7, 27, "Input"],
+Cell[108005, 3053, 398, 16, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[108452, 3075, 105, 2, 9, "ExampleDelimiter"],
+Cell[108560, 3079, 312, 5, 66, "Notes"],
+Cell[CellGroupData[{
+Cell[108897, 3088, 161, 4, 27, "Input"],
+Cell[109061, 3094, 1731, 69, 46, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[110829, 3168, 89, 2, 27, "Input"],
+Cell[110921, 3172, 2522, 105, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[113480, 3282, 281, 8, 27, "Input"],
+Cell[113764, 3292, 2830, 111, 46, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[116631, 3408, 89, 2, 27, "Input"],
+Cell[116723, 3412, 9326, 161, 101, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->104317204]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[23925, 727, 31, 0, 29, "SectionFooterSpacer"]
+Cell[126088, 3578, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23993, 732, 270, 12, 31, "SeeAlsoSection",
+Cell[126156, 3583, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[24266, 746, 212, 9, 31, "Text",
- CellTags->"DiracTrace",
- CellID->2123270018]
+Cell[126429, 3597, 1272, 43, 71, "SeeAlso"]
}, Open ]],
-Cell[24493, 758, 23, 0, 42, "FooterCell"]
+Cell[127716, 3643, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTraceEvaluate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTraceEvaluate.nb
index ab2ed17ab..9aa7ba3fa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTraceEvaluate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTraceEvaluate.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6405, 196]
-NotebookOptionsPosition[ 4089, 129]
-NotebookOutlinePosition[ 6133, 185]
-CellTagsIndexPosition[ 6053, 180]
+NotebookDataLength[ 9033, 280]
+NotebookOptionsPosition[ 6676, 215]
+NotebookOutlinePosition[ 8578, 264]
+CellTagsIndexPosition[ 8535, 261]
WindowTitle->DiracTraceEvaluate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracTraceEvaluate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracTraceEvaluate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracTraceEvaluate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracTraceEvaluate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DiracTraceEvaluate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$44555],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracTraceEvaluate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$71543],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracTraceEvaluate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +97,35 @@ DiracTraceEvaluate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracTraceEvaluate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracTraceEvaluate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["DiracTraceEvaluate"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracTrace and Tr. If set to False, DiracTrace remains \
-unevaluated."
+ " \[LineSeparator]is an option for ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ ", ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " and some other functions. If set to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ ", Dirac traces remain unevaluated."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +136,52 @@ unevaluated."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ " and ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,22 +197,18 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["DiracTrace",
+ StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracTrace",
- ButtonNote->"DiracTrace"],
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["TR",
+ StyleBox[ButtonBox["DiracTrace",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/TR",
- ButtonNote->"TR"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DiracTraceEvaluate",
- CellID->1627432666]
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ FontFamily->"Verdana"]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,22 +225,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 10.590050}",
+ "built" -> "{2020, 1, 5, 18, 54, 48.253267}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracTraceEvaluate is an option for DiracTrace and Tr. If set to False, \
-DiracTrace remains unevaluated.", "synonyms" -> {}, "title" ->
- "DiracTraceEvaluate", "titlemodifier" -> "", "windowtitle" ->
- "DiracTraceEvaluate", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DiracTraceEvaluate"}},
+ "DiracTraceEvaluate is an option for DiracTrace, DiracSimplify and some \
+other functions. If set to False, Dirac traces remain unevaluated.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DiracTraceEvaluate",
+ "titlemodifier" -> "", "windowtitle" -> "DiracTraceEvaluate", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/DiracTraceEvaluate"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +249,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DiracTraceEvaluate"->{
- Cell[3647, 108, 400, 16, 70, "Text",
- CellTags->"DiracTraceEvaluate",
- CellID->1627432666]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DiracTraceEvaluate", 5931, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 70, "AnchorBarGrid",
+Cell[590, 21, 3150, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 407, 12, 70, "Usage",
+Cell[3743, 99, 295, 11, 70, "ObjectNameGrid"],
+Cell[4041, 112, 762, 22, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3374, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4828, 138, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5561, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5595, 166, 368, 13, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[6000, 184, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3647, 108, 400, 16, 70, "Text",
- CellTags->"DiracTraceEvaluate",
- CellID->1627432666]
+Cell[6273, 198, 361, 12, 70, "SeeAlso"]
}, Open ]],
-Cell[4062, 127, 23, 0, 70, "FooterCell"]
+Cell[6649, 213, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrick.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrick.nb
index e1a3bdea2..9e667faaf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrick.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DiracTrick.nb
@@ -3,69 +3,102 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 41960, 1355]
-NotebookOptionsPosition[ 32968, 1054]
-NotebookOutlinePosition[ 38270, 1213]
-CellTagsIndexPosition[ 38118, 1206]
+NotebookDataLength[ 23155, 844]
+NotebookOptionsPosition[ 18871, 711]
+NotebookOutlinePosition[ 20942, 767]
+CellTagsIndexPosition[ 20857, 762]
WindowTitle->DiracTrick
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DiracTrick\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DiracTrick"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DiracTrick.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$45249],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DiracTrick", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracEquation\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracEquation"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracGammaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGammaCombine"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrick"], "\<\"SirlinSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SirlinSimplify"], "\<\"SpinorChainTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorChainTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DiracTrick\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DiracTrick"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DiracTrick.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$72602],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DiracTrick", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +106,27 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DiracTrick", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DiracTrick", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracTrick", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "contracts gamma matrices with each other and performs several \
-simplifications, but no expansion, use Calc or DiracSimplify for \
-non-commutative expansion."
+ " \[LineSeparator]contracts Dirac matrices with each other and performs \
+several simplifications but no expansions."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -94,6 +137,94 @@ non-commutative expansion."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1180716899],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "There are not many cases when a user will need to call this function \
+directly. Use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " to achieve maximal simplification of Dirac matrix chains."
+}], "Notes"],
+
+Cell[TextData[{
+ "Regarding the treatment of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional expressions or the evaluation of expressions with tensors \
+living in different dimensions, see the explanations on the help pages for ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " and ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracTrick", "]"}]], "Input",
+ CellLabel->"In[19]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "False"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "False"}], ",",
+ RowBox[{"ToDiracGamma67", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{455, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[19]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -105,56 +236,44 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1110718304],
+ CellID->2071800525],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->648884452],
+ CellID->1218749787],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracTrick", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[1]:=",
- CellID->1322032984],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Expanding", "\[Rule]", "False"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{138, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[1]=",
- CellID->781797726]
-}, Open ]],
-
-Cell["This is a string of Dirac matrices in four dimensions. ", "Text",
- CellTags->"DiracTrick",
- CellID->13267635],
+Cell[TextData[{
+ "When applied to chains of Dirac matrices that do not require noncommutative \
+expansions, contractions with other tensors, simplifications of spinor chains \
+or evaluations of Dirac traces, ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ " will produce results similar to those of ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[2]:=",
- CellID->207148738],
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
@@ -183,21 +302,17 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{68, 17},
+ ImageSize->{75, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[2]=",
- CellID->2097052651]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t1", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[3]:=",
- CellID->2118167618],
+ RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -209,95 +324,75 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{43, 17},
+ ImageSize->{46, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[3]=",
- CellID->1662180879]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["This is a string of Dirac matrices in D dimensions. ", "Text",
- CellTags->"DiracTrick",
- CellID->978307705],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[4]:=",
- CellID->1487919140],
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{65, 17},
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[4]=",
- CellID->258742289]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t2", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[5]:=",
- CellID->315088051],
+ RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"2", "-", "D"}], ")"}], " ",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{71, 17},
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[5]=",
- CellID->2070854929]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"GA", "[",
- RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[6]:=",
- CellID->1279797135],
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
Cell[BoxData[
FormBox[
@@ -324,31 +419,17 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ ImageSize->{73, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[6]=",
- CellID->1240378771]
+ CellLabel->"Out[5]="]
}, Open ]],
-Cell[TextData[{
- "By default ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "is moved to the right."
-}], "Text",
- CellTags->"DiracTrick",
- CellID->1416181159],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t3", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[7]:=",
- CellID->1789422594],
+ RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
FormBox[
@@ -369,641 +450,195 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ ImageSize->{73, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[7]=",
- CellID->238505660]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"GA", "[",
- RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[8]:=",
- CellID->350857109],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["6",
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["7",
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[8]=",
- CellID->549489564]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t4", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[9]:=",
- CellID->1190020038],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["7",
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[9]=",
- CellID->1831405200]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t5", "=",
- RowBox[{
- RowBox[{"GS", "[",
- RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
- RowBox[{"GS", "[", "p", "]"}], ".",
- RowBox[{"GS", "[", "p", "]"}], ".",
- RowBox[{"GS", "[",
- RowBox[{"c", "+", "d"}], "]"}]}]}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[10]:=",
- CellID->182403082],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}], ")"}],
+ ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
FormBox[
RowBox[{
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "a"}], "b"]}], ")"}], ".",
RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ RowBox[{
+ FractionBox[
FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["d",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{254, 26},
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"], "+",
+ FractionBox["1", "2"]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{277, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[10]=",
- CellID->461822174]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t5", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[11]:=",
- CellID->954210510],
+ RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
+ CellLabel->"In[8]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["d",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{184, 26},
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "b"]}], TraditionalForm]], "Output",
+ ImageSize->{131, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[11]=",
- CellID->146580751]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[", "t5", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[12]:=",
- CellID->1092849662],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], "+",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["d",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], "+",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], "+",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["d",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{477, 26},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[12]=",
- CellID->1347024237]
-}, Open ]],
+Cell[TextData[{
+ "Dirac traces are not evaluated by ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"]
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GAD", "@@",
- RowBox[{"Join", "[",
- RowBox[{
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"Table", "[",
- RowBox[{
- SubscriptBox["\[Nu]", "i"], ",",
- RowBox[{"{",
- RowBox[{"i", ",", "6"}], "}"}]}], "]"}], ",",
- RowBox[{"{", "\[Mu]", "}"}]}], "]"}]}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[13]:=",
- CellID->774999439],
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- RowBox[{
+ RowBox[{"tr", "(",
FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
+ RowBox[{
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{213, 17},
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{70, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DiracTrick",
- CellLabel->"Out[13]=",
- CellID->1703893469]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
- CellTags->"DiracTrick",
- CellLabel->"In[14]:=",
- CellID->1243868217],
+ CellLabel->"In[2]:="],
Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQtYE1fexlv3q/u1235tH91WtFpA5VatVJFgWmG92+Jl8dqqpSjrteAF
-sSKICFIUoWIWF7Ssyq6XoqAVhfXa1qot4qUCuoooiiAgIJcEAiFhki8JginM
-JDOTOWRO8v89T/uACe+c+b/nzH3Oa7NgxbRF3V544YXV/6v+37T5a0cFBMxf
-N/1/1L+MXhe4cMEf1D+Eqv9zUn9H87MKAAAAAAAWKKsyxjj75UjVPzbdDhdO
-3FuiAE3+ySJqKgAAgMmQ5vh/MOF0tZKoPDF7xOpr9aDJS1lETQUAADAVLaX7
-PEbE3hfnR3lMOVCqPaImJLmHvv7c2X7ihTrONFXK+pz4xT5B27avn7Mw8W4j
-J5qE+ErMgvkb4nfFfrkg8lItwYWmlqb86OF9R53ncPWb728TODq7CgQCoef6
-vAYuNAnx1Z2BQdt374kPmbdo5wMZu8YCAIAtiif/id6RI1GathVK8fXtm4+X
-y5n/ZX2293Dvk6nz3IO1F3aeUfvTX6z/wnbzS6bZcH2F54abjSqi8thI+9mX
-JVxotjy9uP+Mep2VVSfcudJUIytKWRfs9A6nq994a4t/Fls9Mk2lJGupy/TM
-Ks0uV15dWNpo4g4IAEAXoyg/NMvV71fx78Y+Ic75V+jHb3f/k92nARsioyLD
-1gWujv7+dj3jg3PNAp7+/I/A2R/Z2X2scyaiPjv51t9rzuqNoSs/+yzi55oW
-9dao5scFzpP//Zjx/QD5A5Gb3SSXmWnlLTr/WnfemL0PuWbbRy5OX+pu7I3R
-VDYVZe7/Ni40IPy7AhbbXzJNefHhsJTcMxyvfn1uWGRmxsFdSYcuPJax2VF0
-1JTm+A12jd0bONr69Z4OU7deE7PpXAAAYIske9kgt78/6HzKIc1dYdvDdV/p
-s82PourM2g+nJj1icW6iRvn0PyPf1dkYSnP9+/ca+12ZWry5MM51aOidJvW/
-ygo2f+CwOIvxWVjdz559nUJv/v5imHF7H3JNNc2PDi6cvCajgs09cypNZWNB
-spdw4amqTns6FpqK0qNBCXcaa7le/cZ7iQmnC6orrsaNcpx1rML4ptZdGN+r
-z4z4rNK6x+fDXayGbitsZttaAACwQ/n01GRbwe7izttSeVHiBz3sN2j3Cq0o
-Hn0rHKb7D0zosC9oqbuelnqnXrObUVYe/8hmQutpkfrw+APrqWeqSXY/NefG
-Ww0MfLbpIqoyZ9kOCeu8HadeIhmMNRVPTkWsScrRdwrIWFOLsjL9o/6TLomN
-1iSenvR2m7s2YlOIr82bNr4Re+80UO7L2TWVeJL24cBpv1JcJGSgKbk82979
-eKVSq5kqtPnkIsXqAwBghtRdnPGuE9keRfn05Li3+nz2u41M9Sl32wks7+NT
-7wskWYucBN/cbz3ubby1xt569q8km6Gm2+sdrMaerdH8LM1ZN2iAzw81ei/V
-0Nj7MNMkai9F+ScXaGpFyCplFF9kpKkoS/NdcqRcoVKU7BE6B1Jt+hmvu4r7
-1ZfeSYxKL5NrDksS3IaG3qY4CGGgSVSmTxcG39Kss/qoQ+Cy6S48dgAAFkPz
-va2Deo3MfNr58Ljh+sJ3e448UqGz5ZA/jB82cN4Vdo/KUmwMW6rOfDV+zo5b
-bQfoyqoTH1m9T3YNRlmV6dF7cKx6LyUv3j3adqze90UIya2MxKW2b/Rflphx
-S0K5RWWkKSuIGvKW3TCBGtehgrlUTwgw0lTJig4u9/oiRCQK9g5KL6f6JjNN
-NfKK0wmL1au//MBdKfVlTEay8rK0VV5z18btigtcsvViDdWFN2YlfZQavGxT
-wp6kmFV+oitw3wcALIjGvFUDrCaSXPFovh87uMegrfd09gItpftH2oz9vuL3
-2whJ9mf9XvmjLq85kB3Dk+19NCcTX3x1tFh3VyO+NKnPwNVkJwGNeQF21p9m
-i2t+nG/nHHaL+RPPJFiyJiJZrjXpdjAAALBCdneTUy/3k53OfYiKY+49+/le
-e/5WB1F3adV77/lf7vhEgFJWWVz0UJeix9XyzsfbnfY+hPhKnN+ms5UdDo1r
-zo6yei+qgOQaDPHkiLCPa9IP4cPsaVx4ooclayKS5VqTbgcDAAArlNVnP37n
-vYj8jht7yeV57/x5zH/a9kotNZe3TX//k+icetajXvv2zU+1bb/KS5Knu4fd
-kCg0yGvv/fSktQnN96IH9/U8V0O2HOmNJf17Og7oNy6Z/SQtzSWHow+XPD/Z
-siRNvJoKAIB501J+yKOfsP2xag2yR9//fZVHj5detp62YkP4xrDQtcvm+65N
-/Kmc7fOwiqrze7cGftLrT70818TsPV+l0DxwvdK2+wvt/OFtr9bHG4jywx7W
-o1I7v2OjbWvpPtfXXhm00ZirOdKcgHGrdF7VsSRNRLKImgoAgJlDPD05feDI
-ZOaveKKgpezgaIeZp56SX69puL7C9nXH8E4nasZgyZqIZBE1FQAAs6Pp7pYP
-h4f/l91rPNy25PYmgXsM2T0fDdIby6y7vzrsnyTvJrHGkjURySJqKgAAZohS
-+t+/L910VWzyed6uRCzdcZtyApum/PDh1mPiH3D5QrwlayKSRdRUAAAAAAAA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAA3qKsyhjj7Kd9g7HpdrhwosFZNU2kiUiW
-J01F1AxuG2kqTUSyPGkqWG8GmixkTeI7V8ifnEv7qePMbWyQ5vh/MOF0tZKo
-PDF7xOpr7KbV7gJNRLI8aSqiZnT9QnlST1NpspAF681Ak4WsSXznBKIqY/aw
-+T/XcfDeUEvpPo8RsffF+VEeUw6Utu7OCPGVmAXzN8Tviv1yQeSlWsbzV5Jp
-amnKjx7edxTbGFAy2eb72wSOzq4CgUDouT6vwYACLU1CfHVnYND23XviQ+Yt
-2vmA1UQCZLKS3ENff+5sP5Estols1ZT1OfGLfYK2bV8/Z2HiXQST6aBYKFjP
-hfXGDkA2jURiPYotiRn7rsW4kYKeptthHwz+Ko+bDVJ9tvdw75Op89yD22cQ
-a3l6cf+ZcrkmAsjdfjZVvA4zTZUmYSdlXbDTO+xDqElkG29t8c8yxqiOmkpJ
-1lKX6ZlVmoEiry4sbWS3hyevgHYCWNLVJ/l+w/UVnhtuNqqIymMjWbnAppFG
-LxSs58B6owcgm0aisB7FlsSMfVdxMFI4QXZvm6DfaLI2KOsuft5/ENvc7U7I
-H4jc7Ca5zEzTnXBU2VSUuf/buNCA8O8KWJhBpikvPhyWknvGYAwoM9n63LDI
-zIyDu5IOXXgsY9NrOmpKc/wGu8buDRxt/XpPh6lbr7EMYiOtqp4UVPLvt33k
-4vSlbg/lChQLBes5sd7IAciykW0fcWc9gi2JOfvOwUjhAHnJIe8pVr3I2qCs
-+XFaX7sAjs581NT97NnXKbRzipiysSDZS7jwVBVVuCYTTUXp0aCEO421hkOo
-mTW18V5iwumC6oqrcaMcZx2rML6pdRfG9+ozIz6rtO7x+XAXq6Fk4a9UELJ6
-RdtwIK2qngxuKheaHx1cOHlNRgWSe5IoFgrWc2W9MQPQIF1i/TM43ZKYse/c
-jBRjaak8uTo4/ag7aRskl+f17TOdJCRVHzXnxlsNbMupJKoyZ9kOCTOcWqms
-TP+o/6RLFItioEk8PentNndtxKYQX5s3bXwj9t5poDxoYddU4knahwOn/Upx
-as9AU3J5tr378UqlVjNVaPMJVaUVVRd2+M9Z/FVYRMT6ld6ek2dOnTDB5yhl
-ZLcWPV2RfBlPTkWsScqpN3AwphT/JorcWUh+Msy4njQWCtYjt16L/gFoEBNb
-rwNnWxIdzM13JiNFg95Rzxpl7aVQv+/Ln5I3W1bwtVPPobseMTs2abq93sFq
-7Nkazc/SnHWDBugLw1SUpfkuOaIuqqJkj9CZMluZkeYzaHjBSFZ6JzEqvUyu
-PlksSnAbGnqbwgoGmkRl+nRhsDYxR31qLHDZdJf0HqT80a7RdlMOFMu1v7WU
-fSegc6OQ0SZIk4bun1ygWSVCVinTU9qWsoMUV2lVTG2it1CwHqn1NAegQUxu
-PYotiRn7zuxP9I56tjTkRvsmqc/9KNog/mXq2299TPYQhT6UVZkevQfH3m9W
-yYt3j7Ydq//pclnRweVeX4SIRMHeQemUu3ZmmmrkFacTFtu+0X/5gbtS6r06
-I1l5Wdoqr7lr43bFBS7ZerGG6iyckabsUWrwsk0Je5JiVvmJrlBcBJZkzRgo
-TClv/bCl/Mh022GR5J22DUJyKyNxqXr1lyVm3JIYvrQsK4ga8pbdMIEa16GC
-ufru2Orth8zWnd5CwXqk1tMcgAYxvfUItiTm7LuK7kjRNoH7vY/sXsIX0Xma
-O34Ue5+as+49es/J7vR4uCT7s36v/FGX1xx0DjYa8wLsrD/NFtf8ON/OOYyb
-MEwUmohkOddUNtz8ZpLDCK/FQeEb1/5tpk/EsRITZLy1m/5Stxe7de9keitY
-1BOdrLlbTz7eW8Ginrho8sN3Fc1Rz4ba815v/+EFXf5PeKxSd69Zd2HCn9+e
-8kunK5NKWWVx0UNdih5Xy9v3nsSTI8I+rkk/hA+zp3GVhB4oNBHJcq7ZVLB5
-rFtEjoHDE9Q8M70wW+TcW5iS19H0VrCoJzpZ87aeary3gkU9cdHkh+8qmqPe
-SCjOfRpvBg7o4bq/lOmjHtIbS/r3dBzQb1wy+ykdmksORx8uef5ACBeaiGQR
-NbUdefHemX1fftnq/TFzVm7517kCQw8GIMXAOTiP6wnWo4Wv9cRFUxe++Y7k
-vo8GeeVPB79ZYP2GzaJ/nK6Q/+4jZfXpCW/3/eIq05kZWkr3ub72yqCNxpyC
-SnMCxq3SeRGAC01Esoia+gxFxakovxBR6onDSTEhS2e49nq194TYPP2PqCCE
-qD4f4BN8k+q1bx7XE6xHC1/riYvmc/jnu4FRj4aW0gPCt9+LKmB4zbHh+grb
-1x3D87m8VIlCE5Esp5oN13wchTqnn4T4cojju15UD3+aGt7XE60sWM/jeuKi
-iZnv6FDvftz7uDB85lp6Y5l191eH/bOYw7cWUWgikuVWU5q7wsFhZZa47cCH
-EP+yTuiVXCLX+1emgv/1RCoL1vO5nrho4uU7Sojq0zMHCBKLmKx5U374cOsx
-8Q/ov8VrGk1EshxrEpLfdizy/KtvYFjMdlFcTPRm0fEHKOZD4QQM6olSFqzn
-dT1x0cTKd7TI7m5xG7qB6kUrAAAAAECCsi47au2/H3F86AkAAAAAAAAAAAAA
-AAAAAAAAAAAAAAAAAAAAAAAAeKKsyhjj7KeduqLpdrhwosFp9M1Ikz+yiJrB
-bSPNSZM/smB918vypKkmsZ5fSHP8P5hwulpJVJ6YPWL1NaYzy2GtyR9ZRM3o
-+oXioskfWbC+62V50lSTWM8rWkr3eYyIvS/Oj/KYcqC0deerrM+JX+wTtG37
-+jkLE+8yn7+PTJMQX4lZMH9D/K7YLxdEXqplPHUsmaaWpvzo4XTyB2nLEuKr
-OwODtu/eEx8yb9HOB6xmkCKTleQe+vpzZ/uJZKGBZGvXfH+bwNHZVSAQCD3X
-5yGYZxCsR1FzDqznogdy20iWmq3wz6auG/V6BxSKwYIZ9dnew71Pps5zD26f
-Orbh+grPDTcbVUTlsZH2s/UFbtLXbHl6cf+Zcrn6dPOEO1eaKk2uYsq6YKd3
-GMba6pFVSrKWukzPrNLYLq8uLGU50QZ5a2t/oorTJfl+460t/lncT62uf6GW
-bL2Km5obaz1HPZDbRrLX5KVNXTfq9Q4oFIMFL+QPRG52k1xmppV3ShNSf+Ti
-9KVuVzJGU9lUlLn/27jQgPDvCli4S6YpLz4clpJ7xpgh01FWmuM32DV2b+Bo
-69d7Okzdeo0igZdNa/WFuZN8vz43LDIz4+CupEMXHsuQTDYF1qOoubHWc9QD
-uW0kW02e2tSlo77to84DCsVgwYy6nz37OoV2Dm1tfnRw4eQ1GRVsboVRaSob
-C5K9hAtPVTHNzSPTVJQeDUq401hr1JDpKFt3YXyvPjPis0rrHp8Pd7Eauq2Q
-/kxHhKxe0dZdSCugZ3R3/n7jvcSE0wXVFVfjRjnOOlbBomIGAeu5qjmH1hvT
-A+nDtJGsNHlnE5Um0lGvoh5QKAYL/6g5N95qYFssOFGVOct2SJjekHDFk1MR
-a5Jy9EX7MdbUoqxM/6j/pEudQsMZaxJPT3q7zV0bsSnE1+ZNG9+IvXeoU6AY
-yEouz7Z3P16pkSKepAptPrlI0VRF1YUd/nMWfxUWEbF+pbfn5JlTJ0zwOVqu
-d4PNanQTT9I+HDiNdcgIWM+iqfprjtZ62j3QIIzXnUYjMbKJL6OexoDqjP7B
-ov2G+DdR5M5CDGahbrq93sFq7Nkazc/SnHWDBuhNQSdqL0X5Jxdo1ouQVcoo
-vshIU1GW5rvkiNolRckeoXMgVcdi1s5WaAwZBrJEZfp0YbA2KlF9Xixw2XSX
-9Aak/NGu0XZTDhS3BmC0lH0noHNflcneR3onMSq9TK0vL0pwGxrKeq5zsJ6+
-LK2ao7aeZg+kAeOScl1PRLI0hwYvRj29AdUOzcHSunhEoduco6zK9Og9OPZ+
-s0pevHu07Vi9j5bLCqKGvGU3TKDGdahgLtWdL0aaKlnRweVeX4SIRMHeQemU
-xwrMNNXIK04nLLZ9o//yA3el1NdIma3+o9TgZZsS9iTFrPITXaG4AizJmjFQ
-mFLe+mFL+ZHptsMi9W8lCMmtjMSl6qYuS8y4JTF8HCQvS1vlNXdt3K64wCVb
-L9awPgUH6+nL0qo5eutp9UAaMFp3mo3ExiZ+jHqaA0rnD2gNFu3ysdn7qBrz
-AuysP80W1/w43845jJsUdFw0UcgqG25+M8lhhNfioPCNa/820yfiWAmCB2MN
-Icn+rN8rf9TlNYdOx0u42ATWM8GsrEcka+7Wv9TtxW7dKaznFcSTI8I+rkk/
-hA+zp3GqbF6aKGSbCjaPdYvI0XM01xUoZZXFRQ91KXpcLe/QJlxsAuuZYFbW
-I5I1b+sLs0XOvYUpeeTW8wvpjSX9ezoO6Dcumf18Ds0lh6MPlzx/GoSvmuhk
-25EX753Z9+WXrd4fM2flln+dK2B2S7Fr4atNYD1yLMwmi7IeoytvmvdqXV97
-ZdBGY84/pTkB41bpPLLOV010ss9QVJyK8gsRpZ44nBQTsnSGa69Xe0+IzaN+
-ose08NUmsB45FmaTRVlPVJ8P8Am+iWASFO5puL7C9nXH8Hwur1Piosm1bMM1
-H0fh/tL2u52E+HKI47terB+KRgwuNoH1nGOpNqHQxMx6PiG9scy6+6vD/lnM
-4TSquGhyLivNXeHgsDJL3HbUQ4h/WSf0Si6RcyHOObjYBNZzjsXahEITL+t5
-RVN++HDrMfEPuHxtGhdN7mUJyW87Fnn+1TcwLGa7KC4merPo+APeToqBi01g
-PedYrk0oNLGyHgAAAAAAAAAAAAAAAAAAAAAAAAC6DFxi03HRZCFrqnh3XErK
-E5sQyZrEfVxs4olHiGRNNfB5BC6x6bhospA1Vbw7LiXliU2IZE3iPi428cQj
-RLKmGvj8oasS3o3NK7eweHctTfnRw+nM3s8SnK3XYlx9eOy+sR2bTSMt3Hou
-as6B9Vz0QJzoooR3o/PKLSveXaWZaz1lXbDTO0aEQrJopwoT61Uc1Ie/7hvd
-sdk0UmXB1qu4qbmx1nPUAzGiqxLejc0rt7B4d3nx4bCU3DNGRRKzaycW1nNR
-H/66b3THZtlIi7VexU3NjbWeox6IE12S8P4MY/LKLSneXVF6NCjhTmOtcS4Y
-BFvruakPX93noGMbBKznquYcWm9MD+QxJk5410F/XjnEu2sb+fSkt9vctRGb
-Qnxt3rTxjdh7x4iJdM3Qeib1wc99HfR3bA1K8W+iyJ2F5NnSYD3nGxO01tPu
-gXhh8oR3mnnlEO/+O4w8FtViltYjaSpv3KfZsVsXryfkBazneGOC2nqaPRA3
-TJ/wTi+vHOLddVav4nTCYrULyw/cNSZM0Syt10CvPji6T7Nja5evb+8D1nO8
-MUFvPa0eiB1YxKbjosmPeHeVTsJ7OyQJ71iUFJEmCll+uN9u/UvdXuzWHazv
-ElmeWa9v1PMKLGLTcdHkR7y7qj3hXQeShHcsSopIE4UsP9x/Zn1htsi5tzAl
-D6zvClleWa9/1PMLvsam46KpC6/i3Q3D15Iissmi3Nd75Y2/NoH1lgVfY9Nx
-0XwOz+LdDcPXkiKyyaLcJ6rPB/gE36R6NZ+vNoH1lgXvY9Nx0cQv3p33JUWo
-ybUsZu7jYhNYb9bwPzYdF03s4t35X1J0mpzL4uU+LjaB9eYNBrHpuGjiFu+O
-QUmRaXIvi5X7uNgE1gMAAAAAAAAAAAAAAAAAAAAAAAAAvuCSxo6LJgtZU8W7
-41JSntiESNYk7uNiE088QiRrqoHPI3BJY8dFk4WsqeLdcSkpT2xCJGsS93Gx
-iSceIZI11cDnD12V8K4v35ytprFR7Ihy1ZkG3CMKr2fTTmys12JcfXjsvrEd
-m00jLdx6LmrOgfVc9ECc6KKEd7355iw1jY5iR5SrzjTgHlF4PZt2qjCxXsVB
-ffjrvtEdm00jVRZsvYqbmhtrPUc9ECO6LOG9/aPO+eYsNY2OYkeUq8404B5R
-eD27duJhPRf14a/7Rndsdo20XOtV3NTcWOs56oE40ZUJ71T55uw0WUexU2ka
-k6tOJ96dKuAeUXi9QbC1npv68NV9Djq2QcB6rmrOofXG9EAew4uEdxr55iii
-2Blo0s5VZxPvrkV/wH3b+jAIr9eKin8TRe4sJA9gNkPrmdQHP/d10N+xDQLW
-c74xQWs97R6IFyZPeKeZb859FDsjTZq56szj3WkG3HeE5rGo3pAXs7QeSVN5
-4z7Njm0QsJ7jjQlq62n2QNwwecI7zXxz7qPYmbaTTq4683h3mgH3v189WuH1
-2ibo2/uYpfUa6NUHR/dpdmyDgPUcb0zQW0+rB2IHLmnsWGjyI95dpZPw/lK3
-F7t1p0h4x6KkiDRRyPLD/Xbr2wHrkctiZD2vwCWNHQtNfsS7q9oT3guzRc69
-hSl55AnvWJQUkSYKWX64/8x6HcB65LIYWc8v+JrGjoumLnyLd9d75Y2/JUVk
-k6W5rw++2gTWWxZ8TWPHRfM5/It3J6rPB/gE36R6P5uvJUVkk6W5rw++2gTW
-Wxa4pLHzXhO/eHfelxShJteymLmPi01gvVmDSxo7/zWxi3fnf0nRaXIui5f7
-uNgE1ps3uKSxY6CJW7w7BiVFpsm9LFbu42ITWA8AAAAAAAAAAAAAAAAAAAAA
-AAAAAAAAAADQR1mVMcbZT/uCVtPtcOFEgxP8gSYCWUQt6fqFWrImO1mw3gw0
-2SmbxHp+Ic3x/2DC6WolUXli9ojV1+pB0xSyiFrS9Qu1ZE12smC9GWiyU6b/
-fUJy8/v0u+Y3rUJL6T6PEbH3xflRHlMOlGp3voQk99DXnzvbT7zAMjqQRFOl
-rM+JX+wTtG37+jkLE+8yn/mCTJMQX4lZMH9D/K7YLxdEXqplPOkS2bqLr+4M
-DNq+e098yLxFOx+wekmarKlamvKjh5MHgpD9SfP9bQJHZ1eBQCD0XJ9HNY2O
-EYD1nBecG+u56ISM22nR1muh9sgIZX2dioH1soItI9xFXL8QZXrqs72He59M
-necerBu7XvuTMcG1JJoN11d4brjZqCIqj420n02V9MFMs+Xpxf1nyuXqU9gT
-7pxoKiVZS12mZ1ZperS8urCU5btk5CWVFaWsC3Z6h7yqJH/SeGuLfxa6VG3K
-dlqm9SpuCs6B9Rx1QjbttFjrVQY8Yq+st1MxsF7xONnDcd6PNWZ2+iN/IHKz
-m+QyM61cN1HJuIR3cs22j1ycvtS13RhNZVNR5v5v40IDwr8rYDFKO2pKc/wG
-u8buDRxt/XpPh6lbr7FMdyJrqrz4cFhK7hmqqpL8SX1uWGRmxsFdSYcuPJYh
-6XRgPecF58B6jjoh83ZasPWGPGKvrLdTMbG+pfyQh7XHvlIzuzdU97NnX6fQ
-DulExvVDck01zY8OLpy8JqOCTQmpNJWNBclewoWnqlhkQHbQrLswvlefGfFZ
-pXWPz4e7WA3dVkj/VJeQ1SvaelenpipKjwYl3Gmspa5q57VrvJeYcLqguuJq
-3CjHWccqWCdc6gGs56Tg3FpvTCekD1jPyCM96HXfQKdiYr367MfVaviuR/jt
-fmrOjbca2JZ/R1RlzrIdEqY3DY9GP2SsqXhyKmJNUo6+UAzGmlqUlekf9Z90
-SWy0puTybHv345WavkQ8SRXafHKRQlNRdWGH/5zFX4VFRKxf6e05eebUCRN8
-jlIF5xJPT3q7zV0bsSnE1+ZNG9+IvXeY3D8knqR9OHCavql0leLfRJE7C0mj
-6MF6xpr6C47cetqd0CBgPS1NJh4xc193IQZHscqQ9U13whzeEh4sQ3EcipSm
-2+sdrMaerdH8LM1ZN2iAoaw/Gv2QmSZReynKP7lAs4UkZJUyii8y0lSUpfku
-OaJ2XlGyR+hMmS3LQJOoTJ8uDNamgahPigUum8hD2+WPdo22m3KguHV225ay
-7wQ0b1YyObaU3kmMSi9TL0JelOA2NPQ2+b7lWQv0pMuB9TQ1aRW8C6yn2Qlp
-ANYzWHcVjdVn7j6DUawyaH3dz5Pe7j0Dv0gHZVWmR+/BsfebVfLi3aNtx+p9
-tJyQ3MpIXGr7Rv9liRm3JJSWMdKUFUQNectumECN61DBXKp7hYw0VbKig8u9
-vggRiYK9g9Ipjz+YtfNRavCyTQl7kmJW+YmuUFxyl2TNGChMKW/9sKX8yHTb
-YZGGNxHyitMJi9VVXX7gLp1oXnlZ2iqvuWvjdsUFLtl6sUbfAY/evQ9YT1OT
-VsG7xHpanZAGYD1dTRU9j5i7z2AUa9FrfdPtELsenOdQdAGNeQF21p9mi2t+
-nG/nHMZN1p/Faiobbn4zyWGE1+Kg8I1r/zbTJ+JYCYKnYmkgyf6s3yt/VPNS
-txe7ddf88JpDp6NBLEqKiyb/rG8HrEeuaWL3mwu/Gdzjvc0FpulxRkA8OSLs
-45r0Q/gwexqnoKCpl6aCzWPdInLoHMaiRSmrLC56+LAwW+TcW5iS9/Dhw6LH
-1fIOzcKipLho8s16HcB65Jomdl+WH+7Ywzn+IX55dtIbS/r3dBzQb1wy+/kc
-mksORx8uef4YhiVp6iIv3juz78svW70/Zs7KLf86V6DvjmpXoPfKG39Lioum
-Lnyz3gB8LSkumh0wsfuSX2dY/Xn8DzVdulBOaCnd5/raK4M2GnMKKs0JGLdK
-56F9S9J8jqLiVJRfiCj1xOGkmJClM1x7vdp7QmyeKWfBIKrPB/gE36R6O5+v
-JcVF8zn8s94AfC0pLpq/w9TuywqinHq8j+YBfMQ0XF9h+7pjeD6X1wwtUrPh
-mo+jcH9p+/1DQnw5xPFdLx4/icL7kuKiCdZbsqap3Scqjox8a+BXnO1MuxDp
-jWXW3V/l9nkJy9SU5q5wcFiZJW475CHEv6wTeiWX8PZiLP9LiosmWG/JmiZ2
-X1nzw9S+Duv+i+HOR9WUHz7cekw8p9PUWagmIfltxyLPv/oGhsVsF8XFRG8W
-HX+AZC4ujsCgpLhogvWWrGlS95U1Z6f1d9uB4RMHAAAAALa0lKd+PMT3fC2P
-D3UAAAAAc4OouRi+Lq0UTnwAAAAAvvH/1gUW/Q==
- "], {{0, 125}, {554, 0}}, {0,
- 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{554, 125},
- PlotRange->{{0, 554}, {0, 125}}]], "Output",
- ImageSize->{558, 125},
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{70, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"DiracTrick", "RasterizedOutput"},
- CellLabel->"Out[14]=",
- CellID->1589226394]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -1027,35 +662,57 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Calc",
+ StyleBox[ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Calc",
- ButtonNote->"Calc"],
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracGammaExpand",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
+ ButtonData->"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSimplify",
+ StyleBox[ButtonBox["DiracTrick",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
+ ButtonData->"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DiracTrick",
- CellID->505712200]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"DiracTrick",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1064,22 +721,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 13.550429}",
+ "built" -> "{2020, 1, 5, 18, 54, 51.298592}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DiracTrick[exp] contracts gamma matrices with each other and performs \
-several simplifications, but no expansion, use Calc or DiracSimplify for \
-non-commutative expansion.", "synonyms" -> {}, "title" -> "DiracTrick",
- "titlemodifier" -> "", "windowtitle" -> "DiracTrick", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/DiracTrick"}, "SearchTextTranslated" -> ""},
+ "DiracTrick[exp] contracts Dirac matrices with each other and performs \
+several simplifications but no expansions.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DiracTrick", "titlemodifier" -> "",
+ "windowtitle" -> "DiracTrick", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DiracTrick"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1088,7 +745,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1097,266 +754,98 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3422, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[7572, 227, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1110718304]},
- "DiracTrick"->{
- Cell[4055, 125, 138, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1322032984],
- Cell[4196, 131, 280, 10, 36, "Output",
- CellTags->"DiracTrick",
- CellID->781797726],
- Cell[4491, 144, 115, 2, 32, "Text",
- CellTags->"DiracTrick",
- CellID->13267635],
- Cell[4631, 150, 193, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->207148738],
- Cell[4827, 158, 770, 32, 38, "Output",
- CellTags->"DiracTrick",
- CellID->2097052651],
- Cell[5634, 195, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->2118167618],
- Cell[5770, 201, 389, 15, 38, "Output",
- CellTags->"DiracTrick",
- CellID->1662180879],
- Cell[6174, 219, 113, 2, 32, "Text",
- CellTags->"DiracTrick",
- CellID->978307705],
- Cell[6312, 225, 195, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1487919140],
- Cell[6510, 233, 691, 29, 38, "Output",
- CellTags->"DiracTrick",
- CellID->258742289],
- Cell[7238, 267, 132, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->315088051],
- Cell[7373, 273, 394, 15, 38, "Output",
- CellTags->"DiracTrick",
- CellID->2070854929],
- Cell[7804, 293, 190, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1279797135],
- Cell[7997, 301, 726, 30, 39, "Output",
- CellTags->"DiracTrick",
- CellID->1240378771],
- Cell[8738, 334, 197, 8, 33, "Text",
- CellTags->"DiracTrick",
- CellID->1416181159],
- Cell[8960, 346, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1789422594],
- Cell[9096, 352, 607, 24, 39, "Output",
- CellTags->"DiracTrick",
- CellID->238505660],
- Cell[9740, 381, 185, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->350857109],
- Cell[9928, 389, 681, 28, 39, "Output",
- CellTags->"DiracTrick",
- CellID->549489564],
- Cell[10646, 422, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1190020038],
- Cell[10782, 428, 463, 18, 39, "Output",
- CellTags->"DiracTrick",
- CellID->1831405200],
- Cell[11282, 451, 342, 11, 27, "Input",
- CellTags->"DiracTrick",
- CellID->182403082],
- Cell[11627, 464, 1558, 60, 47, "Output",
- CellTags->"DiracTrick",
- CellID->461822174],
- Cell[13222, 529, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->954210510],
- Cell[13358, 535, 1133, 43, 47, "Output",
- CellTags->"DiracTrick",
- CellID->146580751],
- Cell[14528, 583, 128, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1092849662],
- Cell[14659, 589, 2713, 104, 47, "Output",
- CellTags->"DiracTrick",
- CellID->1347024237],
- Cell[17409, 698, 389, 13, 27, "Input",
- CellTags->"DiracTrick",
- CellID->774999439],
- Cell[17801, 713, 1651, 70, 38, "Output",
- CellTags->"DiracTrick",
- CellID->1703893469],
- Cell[19489, 788, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1243868217],
- Cell[19625, 794, 12359, 211, 137, "Output",
- CellTags->{"DiracTrick", "RasterizedOutput"},
- CellID->1589226394],
- Cell[32352, 1028, 574, 21, 32, "Text",
- CellTags->"DiracTrick",
- CellID->505712200]},
- "RasterizedOutput"->{
- Cell[19625, 794, 12359, 211, 137, "Output",
- CellTags->{"DiracTrick", "RasterizedOutput"},
- CellID->1589226394]}
+ CellID->2071800525]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 34878, 1098},
- {"DiracTrick", 35015, 1102},
- {"RasterizedOutput", 37975, 1199}
+ {"PrimaryExamplesSection", 20713, 755}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3629, 85, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 504, 14, 97, "Usage",
- CellID->982511436],
+Cell[4214, 108, 287, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3422, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1110718304],
+Cell[4526, 123, 436, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3835, 115, 195, 6, 25, "ExampleSection",
- CellID->648884452],
+Cell[4987, 139, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1180716899],
+Cell[5729, 165, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5763, 167, 312, 8, 70, "Notes"],
+Cell[6078, 177, 599, 18, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4055, 125, 138, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1322032984],
-Cell[4196, 131, 280, 10, 36, "Output",
- CellTags->"DiracTrick",
- CellID->781797726]
+Cell[6702, 199, 93, 2, 70, "Input"],
+Cell[6798, 203, 713, 17, 74, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4491, 144, 115, 2, 32, "Text",
- CellTags->"DiracTrick",
- CellID->13267635],
Cell[CellGroupData[{
-Cell[4631, 150, 193, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->207148738],
-Cell[4827, 158, 770, 32, 38, "Output",
- CellTags->"DiracTrick",
- CellID->2097052651]
-}, Open ]],
+Cell[7572, 227, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2071800525],
Cell[CellGroupData[{
-Cell[5634, 195, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->2118167618],
-Cell[5770, 201, 389, 15, 38, "Output",
- CellTags->"DiracTrick",
- CellID->1662180879]
-}, Open ]],
-Cell[6174, 219, 113, 2, 32, "Text",
- CellTags->"DiracTrick",
- CellID->978307705],
+Cell[7985, 246, 196, 6, 26, "ExampleSection",
+ CellID->1218749787],
+Cell[8184, 254, 531, 14, 66, "Notes"],
Cell[CellGroupData[{
-Cell[6312, 225, 195, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1487919140],
-Cell[6510, 233, 691, 29, 38, "Output",
- CellTags->"DiracTrick",
- CellID->258742289]
+Cell[8740, 272, 123, 3, 27, "Input"],
+Cell[8866, 277, 724, 30, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7238, 267, 132, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->315088051],
-Cell[7373, 273, 394, 15, 38, "Output",
- CellTags->"DiracTrick",
- CellID->2070854929]
+Cell[9627, 312, 86, 2, 27, "Input"],
+Cell[9716, 316, 343, 13, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7804, 293, 190, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1279797135],
-Cell[7997, 301, 726, 30, 39, "Output",
- CellTags->"DiracTrick",
- CellID->1240378771]
+Cell[10096, 334, 130, 4, 27, "Input"],
+Cell[10229, 340, 676, 26, 37, "Output"]
}, Open ]],
-Cell[8738, 334, 197, 8, 33, "Text",
- CellTags->"DiracTrick",
- CellID->1416181159],
Cell[CellGroupData[{
-Cell[8960, 346, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1789422594],
-Cell[9096, 352, 607, 24, 39, "Output",
- CellTags->"DiracTrick",
- CellID->238505660]
+Cell[10942, 371, 86, 2, 27, "Input"],
+Cell[11031, 375, 287, 11, 39, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9740, 381, 185, 6, 27, "Input",
- CellTags->"DiracTrick",
- CellID->350857109],
-Cell[9928, 389, 681, 28, 39, "Output",
- CellTags->"DiracTrick",
- CellID->549489564]
+Cell[11355, 391, 119, 3, 27, "Input"],
+Cell[11477, 396, 680, 28, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10646, 422, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1190020038],
-Cell[10782, 428, 463, 18, 39, "Output",
- CellTags->"DiracTrick",
- CellID->1831405200]
+Cell[12194, 429, 86, 2, 70, "Input"],
+Cell[12283, 433, 562, 22, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11282, 451, 342, 11, 27, "Input",
- CellTags->"DiracTrick",
- CellID->182403082],
-Cell[11627, 464, 1558, 60, 47, "Output",
- CellTags->"DiracTrick",
- CellID->461822174]
+Cell[12882, 460, 556, 21, 70, "Input"],
+Cell[13441, 483, 1216, 45, 67, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13222, 529, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->954210510],
-Cell[13358, 535, 1133, 43, 47, "Output",
- CellTags->"DiracTrick",
- CellID->146580751]
+Cell[14694, 533, 86, 2, 70, "Input"],
+Cell[14783, 537, 720, 26, 59, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14528, 583, 128, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1092849662],
-Cell[14659, 589, 2713, 104, 47, "Output",
- CellTags->"DiracTrick",
- CellID->1347024237]
-}, Open ]],
+Cell[15540, 568, 105, 2, 70, "ExampleDelimiter"],
+Cell[15648, 572, 189, 6, 70, "Notes"],
Cell[CellGroupData[{
-Cell[17409, 698, 389, 13, 27, "Input",
- CellTags->"DiracTrick",
- CellID->774999439],
-Cell[17801, 713, 1651, 70, 38, "Output",
- CellTags->"DiracTrick",
- CellID->1703893469]
+Cell[15862, 582, 148, 4, 70, "Input"],
+Cell[16013, 588, 580, 23, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19489, 788, 133, 4, 27, "Input",
- CellTags->"DiracTrick",
- CellID->1243868217],
-Cell[19625, 794, 12359, 211, 137, "Output",
- CellTags->{"DiracTrick", "RasterizedOutput"},
- CellID->1589226394]
+Cell[16630, 616, 86, 2, 70, "Input"],
+Cell[16719, 620, 494, 19, 40, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[32011, 1009, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17252, 644, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[32079, 1014, 270, 12, 31, "SeeAlsoSection",
+Cell[17320, 649, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[32352, 1028, 574, 21, 32, "Text",
- CellTags->"DiracTrick",
- CellID->505712200]
+Cell[17593, 663, 1236, 43, 70, "SeeAlso"]
}, Open ]],
-Cell[32941, 1052, 23, 0, 42, "FooterCell"]
+Cell[18844, 709, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Divideout.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Divideout.nb
index d36dc2ef0..0bf099435 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Divideout.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Divideout.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6256, 195]
-NotebookOptionsPosition[ 4030, 129]
-NotebookOutlinePosition[ 5993, 184]
-CellTagsIndexPosition[ 5922, 179]
+NotebookDataLength[ 7076, 215]
+NotebookOptionsPosition[ 5054, 159]
+NotebookOutlinePosition[ 6868, 207]
+CellTagsIndexPosition[ 6825, 204]
WindowTitle->Divideout
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Divideout\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Divideout"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Divideout.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPEInt\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPEInt"], "\<\"OPEIntegrate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPEIntegrate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Divideout\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Divideout"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Divideout.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$45598],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Divideout", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$73058],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Divideout", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Divideout", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Divideout", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +140,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["OPEInt",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/OPEInt",
@@ -120,9 +152,7 @@ Cell[TextData[{
ButtonNote->"OPEIntegrate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Divideout",
- CellID->1432704096]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,21 +169,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 15.150112}",
+ "built" -> "{2020, 1, 5, 18, 54, 52.468372}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Divideout is an option for OPEInt and OPEIntegrate. The setting is \
-divided out at the end.", "synonyms" -> {}, "title" -> "Divideout",
- "titlemodifier" -> "", "windowtitle" -> "Divideout", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Divideout"}},
+divided out at the end.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Divideout", "titlemodifier" -> "", "windowtitle" -> "Divideout", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Divideout"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,41 +192,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Divideout"->{
- Cell[3579, 108, 409, 16, 70, "Text",
- CellTags->"Divideout",
- CellID->1432704096]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Divideout", 5809, 172}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3095, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 394, 12, 70, "Usage",
+Cell[3679, 98, 286, 11, 70, "ObjectNameGrid"],
+Cell[3968, 111, 394, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3306, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4387, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3579, 108, 409, 16, 70, "Text",
- CellTags->"Divideout",
- CellID->1432704096]
+Cell[4660, 141, 352, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4003, 127, 23, 0, 70, "FooterCell"]
+Cell[5027, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DoPolarizationSums.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DoPolarizationSums.nb
index 53f2a45ef..ef8406e5a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DoPolarizationSums.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DoPolarizationSums.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 30424, 1090]
-NotebookOptionsPosition[ 20811, 789]
-NotebookOutlinePosition[ 26454, 950]
-CellTagsIndexPosition[ 26332, 944]
+NotebookDataLength[ 78051, 2634]
+NotebookOptionsPosition[ 72645, 2478]
+NotebookOutlinePosition[ 75273, 2541]
+CellTagsIndexPosition[ 75187, 2536]
WindowTitle->DoPolarizationSums
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DoPolarizationSums\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DoPolarizationSums"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Polariazation\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Polariazation"], "\<\"Uncontract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Uncontract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DoPolarizationSums\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DoPolarizationSums"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DoPolarizationSums.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$45951],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DoPolarizationSums", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$73556],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DoPolarizationSums", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,24 +97,122 @@ DoPolarizationSums.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DoPolarizationSums", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DoPolarizationSums", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DoPolarizationSums", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "sums over vector polarizations for expressions with a factor of the \
-form\nPair[LorentzIndex[rho1_], Momentum[Polarization[p_, -I]]]*\n\
-Pair[LorentzIndex[rho2_], Momentum[Polarization[p_, I]]]."
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"exp", ",", "k", ",", "n"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]sums over physical (transverse) polarizations of an \
+external massless vector boson with momentum ",
+ Cell[BoxData["k"], "InlineFormula"],
+ ", where ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " is an auxiliary 4-vector from the gauge-dependent polarization sum \
+formula."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"exp", ",", "k", ",", "0"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]replaces the polarization sum of an external massless \
+vector boson with momentum ",
+ Cell[BoxData["k"], "InlineFormula"],
+ " by ",
+ Cell[BoxData[
+ RowBox[{"-",
+ SuperscriptBox["g", "\[Mu]\[Nu]"]}]], "InlineFormula"],
+ ". This corresponds to the summation over all four polarizations, \
+including the unphysical ones."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"exp", ",", "k"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]sums over the three polarizations of an external \
+massive vector boson with momentum ",
+ Cell[BoxData["k"], "InlineFormula"],
+ " and mass ",
+ Cell[BoxData[
+ SuperscriptBox["k", "2"]], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {},
+ "Rows" -> {None, None, {None}}, "RowsIndexed" -> {}}},
+ CellID->2010081510],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->852417175],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DoPolarizationSums", "]"}]], "Input",
+ CellLabel->"In[39]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"ExtraFactor", "\[Rule]", "1"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"GaugeTrickN", "\[Rule]", "2"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
+ RowBox[{"VirtualBoson", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{518, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[39]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
Cell[CellGroupData[{
@@ -105,36 +227,33 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->884511397],
+ CellID->2097904239],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1533718159],
+ CellID->1260285186],
Cell["\<\
-In the following (and indeed everywhere else within FeynCalc), notice that \
-Lorentz indices written as super or subscripts are not to be taken as such. \
-Instead, by convention, when two indices are contracted one is always lower \
-and the other upper.\
-\>", "Text",
- CellTags->"DoPolarizationSums",
- CellID->1284060336],
+The standard formula for massless vector bosons is valid for all types of the \
+corresponding particles, including gluons.\
+\>", "Notes"],
-Cell["\<\
-FeynCalc uses the following normalization of Polarization vectors:\
-\>", "Text",
- CellTags->"DoPolarizationSums",
- CellID->714795038],
+Cell[BoxData[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SP", "[", "p", "]"}], "=", "0"}], ";"}]}], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
@@ -145,607 +264,2179 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"Polarization", "[",
- RowBox[{"p4", ",",
+ RowBox[{"p", ",",
RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], "]"}]}], "]"}], " ",
RowBox[{"Pair", "[",
RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"Polarization", "[",
- RowBox[{"p4", ",", "\[ImaginaryI]"}], "]"}], "]"}]}], "]"}]}]], "Input",\
-
- CellTags->"DoPolarizationSums",
- CellLabel->"In[1]:=",
- CellID->492835519],
+ RowBox[{"p", ",", "\[ImaginaryI]"}], "]"}], "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- RowBox[{
- SuperscriptBox[
- SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p4",
- TraditionalForm], ")"}],
- TraditionalForm], " ",
- FormBox[
- RowBox[{
+ RowBox[{
+ SuperscriptBox[
SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p4",
- TraditionalForm], ")"}],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{110, 17},
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[1]=",
- CellID->1142913811]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "Contract"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[2]:=",
- CellID->771272059],
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"%", ",", "p", ",", "n"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- ImageSize->{21, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[2]=",
- CellID->1791104588]
-}, Open ]],
-
-Cell[TextData[{
- "DoPolarizationSums is chosen in such a way as to be consistent with this \
-normalization and with ",
- Cell[BoxData[
- FormBox[
- UnderscriptBox["\[Sum]", "Polarizations"], TraditionalForm]]],
- Cell[BoxData[
- FormBox[
- RowBox[{
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ FractionBox[
RowBox[{
- SubscriptBox["\[CurlyEpsilon]",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]], "(",
+ TraditionalForm]]}],
+ RowBox[{
FormBox[
- SubscriptBox[
- TagBox[
- StyleBox["\"\\"",
- FontSlant->"Italic"],
- StyleForm[#, FontSlant -> "Italic"]& ], "4"],
- TraditionalForm], ")"}], " ",
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], "+",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
RowBox[{
- SubscriptBox[
- RowBox[{"(",
- SuperscriptBox["\[CurlyEpsilon]", "\[Nu]"], ")"}],
- FormBox["",
- TraditionalForm]], "(",
FormBox[
- SubscriptBox[
- TagBox[
- StyleBox["\"\\"",
- FontSlant->"Italic"],
- StyleForm[#, FontSlant -> "Italic"]& ], "4"],
- TraditionalForm], ")"}]}], TraditionalForm]]],
- "=",
- Cell[BoxData[
- FormBox["Null", TraditionalForm]]],
- ":"
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->504712587],
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{277, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
-Cell[TextData[{
- "We can choose e.g. the following polarization vectors, labeled with a \
-subscript, {",
- Cell[BoxData[
- FormBox[
- SubscriptBox["e", "1"], TraditionalForm]]],
- ",",
- Cell[BoxData[
- FormBox[
- SubscriptBox["e", "2"], TraditionalForm]]],
- ",",
- Cell[BoxData[
- FormBox[
- SubscriptBox["e", "3"], TraditionalForm]]],
- ",",
- Cell[BoxData[
- FormBox[
- SubscriptBox["e", "4"], TraditionalForm]]],
- "} = {(\[ImaginaryI],0,0,0), (0,\[ImaginaryI],0,0), (0,0,\[ImaginaryI],0), \
-(0,0,0,\[ImaginaryI])}."
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->1216514784],
+Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"ee", ",", "tt"}], "]"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[3]:=",
- CellID->243887081],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
-Cell[BoxData[
+Cell["\<\
+In QED the gauge invariance ensures the cancellation of unphysical \
+polarizations so that for photons one can also employ the simpler replacement \
+with the metric tensor.\
+\>", "Notes"],
+
+Cell[BoxData[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
- RowBox[{"ev", "[", "i_", "]"}], ":=",
- RowBox[{"ReplacePart", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "I", ",",
- "i"}], "]"}]}], ";"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[4]:=",
- CellID->1289026175],
+ RowBox[{"SP", "[", "p", "]"}], "=", "0"}], ";"}]}], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"{",
- RowBox[{
- RowBox[{"ev", "[", "1", "]"}], ",",
- RowBox[{"ev", "[", "2", "]"}], ",",
- RowBox[{"ev", "[", "3", "]"}], ",",
- RowBox[{"ev", "[", "4", "]"}]}], "}"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[5]:=",
- CellID->654636595],
+ RowBox[{
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], "]"}]}], "]"}], " ",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p", ",", "\[ImaginaryI]"}], "]"}], "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{"(", "\[NoBreak]", GridBox[{
- {"\[ImaginaryI]", "0", "0", "0"},
- {"0", "\[ImaginaryI]", "0", "0"},
- {"0", "0", "\[ImaginaryI]", "0"},
- {"0", "0", "0", "\[ImaginaryI]"}
- },
- GridBoxAlignment->{
- "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
- "RowsIndexed" -> {}},
- GridBoxSpacings->{"Columns" -> {
- Offset[0.27999999999999997`], {
- Offset[0.7]},
- Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
- Offset[0.2], {
- Offset[0.4]},
- Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
- TraditionalForm]], "Output",
- ImageSize->{80, 69},
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{101, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[5]=",
- CellID->635199725]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell[TextData[{
- StyleBox["ee[i][\[Mu]]", "Input"],
- " is ",
- Cell[BoxData[
- FormBox[
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"%", ",", "p", ",", "0"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
SuperscriptBox[
- SubscriptBox["e", "i"], "\[Mu]"], TraditionalForm]]],
- ":"
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->883749055],
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{48, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+Massive vector bosons (e.g. W or Z) have 3 degrees of freedom and require no \
+auxiliary vector.\
+\>", "Notes"],
+
+Cell[BoxData[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
+ RowBox[{"SP", "[", "p", "]"}], "=",
+ RowBox[{"m", "^", "2"}]}], ";"}]}], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Pair", "[",
RowBox[{
- RowBox[{"ee", "[", "i_", "]"}], "[", "mu_", "]"}], ":=",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], "]"}]}], "]"}], " ",
+ RowBox[{"Pair", "[",
RowBox[{
- RowBox[{"ev", "[", "i", "]"}], "[",
- RowBox[{"[", "mu", "]"}], "]"}]}], ";"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[6]:=",
- CellID->1065974135],
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p", ",", "\[ImaginaryI]"}], "]"}], "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"tt", "[",
- RowBox[{"i_", ",", "j_", ",", "mu_", ",", "nu_"}], "]"}], ":=",
+ FormBox[
RowBox[{
RowBox[{
- RowBox[{"ee", "[", "i", "]"}], "[", "mu", "]"}],
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], " ",
RowBox[{
- RowBox[{"ee", "[", "j", "]"}], "[", "nu", "]"}]}]}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[7]:=",
- CellID->1862975452],
-
-Cell[TextData[{
- StyleBox["tt[i,j,\[Mu],\[Nu]]", "Input"],
- " is ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox[
- SubscriptBox["e", "i"], "\[Mu]"], TraditionalForm]]],
- Cell[BoxData[
- FormBox[
- SuperscriptBox[
- SubscriptBox["e", "j"], "\[Nu]"], TraditionalForm]]],
- ":"
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->1445508132],
-
-Cell[TextData[{
- Cell[BoxData[
- FormBox[
- UnderscriptBox["\[Sum]",
- RowBox[{"i", ",", "j"}]], TraditionalForm]]],
- Cell[BoxData[
- FormBox[
- RowBox[{" ",
- FormBox["Null",
- TraditionalForm]}], TraditionalForm]]],
- "=",
- Cell[BoxData[
- FormBox["Null", TraditionalForm]]],
- ":"
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->1899952175],
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{101, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Table", "[",
- RowBox[{
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "1"}], "4"],
- RowBox[{"tt", "[",
- RowBox[{"i", ",", "i", ",", "mu", ",", "nu"}], "]"}]}], ",",
- RowBox[{"{",
- RowBox[{"mu", ",", "1", ",", "4"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"nu", ",", "1", ",", "4"}], "}"}]}], "]"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[8]:=",
- CellID->522265467],
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"%", ",", "p"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- RowBox[{"(", "\[NoBreak]", GridBox[{
- {
- RowBox[{"-", "1"}], "0", "0", "0"},
- {"0",
- RowBox[{"-", "1"}], "0", "0"},
- {"0", "0",
- RowBox[{"-", "1"}], "0"},
- {"0", "0", "0",
- RowBox[{"-", "1"}]}
- },
- GridBoxAlignment->{
- "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
- "RowsIndexed" -> {}},
- GridBoxSpacings->{"Columns" -> {
- Offset[0.27999999999999997`], {
- Offset[0.7]},
- Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
- Offset[0.2], {
- Offset[0.4]},
- Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
- TraditionalForm]], "Output",
- ImageSize->{116, 69},
+ RowBox[{
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ SuperscriptBox["m", "2"]], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{106, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[8]=",
- CellID->438599116]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
+ "A more realistic example of summing over the polarizations of the photons \
+in ",
Cell[BoxData[
- FormBox[
- UnderscriptBox["\[Sum]",
- RowBox[{"\[Mu]", ",", "\[Nu]"}]], TraditionalForm]]],
- Cell[BoxData[
- FormBox[
- RowBox[{" ",
- FormBox["Null",
- TraditionalForm]}], TraditionalForm]]],
- "=",
- Cell[BoxData[
- FormBox["Null", TraditionalForm]]],
- ":"
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->631136558],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["e", "+"],
+ SuperscriptBox["e", "-"]}], "\[Rule]", " ", "\[Gamma]\[Gamma]"}]],
+ "InlineFormula"]
+}], "Notes"],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"ClearAll", "[",
+ RowBox[{"s", ",", "t", ",", "u"}], "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SP", "[", "k1", "]"}], "=", "0"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SP", "[", "k2", "]"}], "=", "0"}], ";"}]}], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Table", "[",
- RowBox[{
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"mu", "=", "1"}], "4"],
- RowBox[{"tt", "[",
- RowBox[{"i", ",", "j", ",", "mu", ",", "mu"}], "]"}]}], ",",
- RowBox[{"{",
- RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"j", ",", "1", ",", "4"}], "}"}]}], "]"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[9]:=",
- CellID->1912639269],
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "0", ",", "1"}], "]"}],
+ ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "I", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}],
+ ".",
+ RowBox[{"GS", "[",
+ RowBox[{"k2", "-", "p2"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",", "I", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}],
+ ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",", "0", ",", "1"}],
+ "]"}]}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], ")"}], "/",
+ "t"}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "0", ",", "1"}], "]"}],
+ ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",", "I", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"k1", "-", "p2"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "I", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",", "0", ",", "1"}],
+ "]"}]}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], ")"}], "/",
+ "u"}]}], ")"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",", "0", ",", "1"}],
+ "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}],
+ ".",
+ RowBox[{"GS", "[",
+ RowBox[{"k1", "-", "p2"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}],
+ ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "0", ",", "1"}],
+ "]"}]}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], ")"}], "/",
+ "u"}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",", "0", ",", "1"}],
+ "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"k2", "-", "p2"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "0", ",", "1"}], "]"}]}],
+ "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], ")"}], "/",
+ "t"}]}], ")"}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{"(", "\[NoBreak]", GridBox[{
- {
- RowBox[{"-", "1"}], "0", "0", "0"},
- {"0",
- RowBox[{"-", "1"}], "0", "0"},
- {"0", "0",
- RowBox[{"-", "1"}], "0"},
- {"0", "0", "0",
- RowBox[{"-", "1"}]}
- },
- GridBoxAlignment->{
- "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
- "RowsIndexed" -> {}},
- GridBoxSpacings->{"Columns" -> {
- Offset[0.27999999999999997`], {
- Offset[0.7]},
- Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
- Offset[0.2], {
- Offset[0.4]},
- Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "t"]}], "-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "u"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "t"]}], "-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "u"]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{116, 69},
+ ImageSize->{467, 211},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[9]=",
- CellID->584196470]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ptest", "=",
+ RowBox[{
+ RowBox[{"%", "//",
+ RowBox[{
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"#", ",", "k1", ",", "0"}], "]"}], "&"}]}], "//",
RowBox[{
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"ComplexIndex", "[", "\[Mu]", "]"}], "]"}]}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"Polarization", "[",
- RowBox[{"p4", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], "]"}]}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"ComplexIndex", "[", "\[Mu]", "]"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"Polarization", "[",
- RowBox[{"p4", ",", "\[ImaginaryI]"}], "]"}], "]"}]}],
- "]"}]}]}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[10]:=",
- CellID->1927925269],
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"#", ",", "k2", ",", "0"}], "]"}], "&"}]}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"t", " ", "u"}]],
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "4"], " ",
RowBox[{
- FormBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Mu]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox[
- RowBox[{"ComplexIndex", "(", "\[Mu]", ")"}],
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- RowBox[{
- SuperscriptBox[
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
- FormBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Mu]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p4",
- TraditionalForm], ")"}],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], "+",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"t", " ", "u"}]],
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"],
- FormBox[
+ SuperscriptBox["\<\"e\"\>", "4"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox[
- RowBox[{"ComplexIndex", "(", "\[Mu]", ")"}],
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p4",
- TraditionalForm], ")"}],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{305, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[10]=",
- CellID->289002701]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ptest", "//", "DoPolarizationSums"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[11]:=",
- CellID->683494559],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"DoPolarizationSums", "(",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ FractionBox["1",
+ SuperscriptBox["u", "2"]],
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "4"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox[
- FormBox["\[Mu]",
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
FormBox[
FormBox[
- RowBox[{"ComplexIndex", "(", "\[Mu]", ")"}],
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], "+",
+ RowBox[{
+ FractionBox["1",
+ SuperscriptBox["t", "2"]],
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "4"], " ",
RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
- SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox[
- FormBox["\[Mu]",
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p4",
- TraditionalForm], ")"}],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"],
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$98", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
FormBox[
FormBox[
- RowBox[{"ComplexIndex", "(", "\[Mu]", ")"}],
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$96", ")"}]}],
TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p4",
- TraditionalForm], ")"}],
- TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{444, 26},
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{434, 266},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[11]=",
- CellID->1187724286]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "Contract"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[12]:=",
- CellID->1480522060],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
-Cell[BoxData[
- FormBox[
- RowBox[{"DoPolarizationSums", "(",
- RowBox[{"-", "1"}], ")"}], TraditionalForm]], "Output",
- ImageSize->{160, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[12]=",
- CellID->1321184712]
-}, Open ]],
+Cell[TextData[{
+ "This is a small piece of the matrix element squared for ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"g", " ", "g"}], " ", "\[Rule]", " ",
+ RowBox[{"Q", " ", Cell[TextData[Cell[BoxData[
+ FormBox[
+ OverscriptBox["Q", "-"], TraditionalForm]], "InlineFormula"]],
+ "InlineFormula"]}]}]], "InlineFormula"],
+ ". The proper summation over the polarizations of the gluons requires a \
+choice of two auxiliary vectors (unless we subtract the unphysical \
+contributions using ghosts). It is customary to take the 4-momentum of \
+another gluon as the auxiliary vector in the summation formula."
+}], "Notes"],
+
+Cell[TextData[{
+ "The option ",
+ Cell[BoxData["ExtraFactor"], "InlineFormula"],
+ " is used to average over the polarizations of the initial gluons."
+}], "Notes"],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"ClearAll", "[",
+ RowBox[{"s", ",", "t", ",", "u"}], "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SP", "[", "p1", "]"}], "=", "0"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SP", "[", "p2", "]"}], "=", "0"}], ";"}]}], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ptest", "//", "Contract"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[13]:=",
- CellID->1260436699],
+ RowBox[{
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["s", "2"], " ", "SUNN", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ SuperscriptBox["SUNN", "2"]}], ")"}], " ",
+ SuperscriptBox["u", "2"]}]], "2", " ",
+ SuperscriptBox[
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "4"], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p2", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["s", "2"], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}],
+ "+",
+ RowBox[{"2", " ", "s", " ",
+ SuperscriptBox["SUNN", "2"], " ", "t", " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}],
+ "+",
+ RowBox[{"s", " ",
+ SuperscriptBox["SUNN", "2"], " ", "u", " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}],
+ "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["s", "2"], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}],
+ "+",
+ RowBox[{"2", " ", "s", " ",
+ SuperscriptBox["SUNN", "2"], " ", "t", " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}],
+ "+",
+ RowBox[{"s", " ",
+ SuperscriptBox["SUNN", "2"], " ", "u", " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}],
+ "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["SUNN", "2"], " ",
+ SuperscriptBox["u", "2"], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p1", ",", "\[ImaginaryI]", ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}]}], "]"}]}]}],
+ ")"}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- ImageSize->{21, 15},
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"N", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ SuperscriptBox["N", "2"]}], ")"}], " ",
+ SuperscriptBox["s", "2"], " ",
+ SuperscriptBox["u", "2"]}]],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["g", "s", "4"], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["N", "2"], " ", "s", " ", "t", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["N", "2"], " ", "s", " ", "t", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["N", "2"], " ", "s", " ", "u", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["N", "2"], " ", "s", " ", "u", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["s", "2"], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["s", "2"], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["N", "2"], " ",
+ SuperscriptBox["u", "2"], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{515, 142},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[13]=",
- CellID->1626281081]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "DoPolarizationSums"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[14]:=",
- CellID->1965173944],
+ RowBox[{
+ RowBox[{
+ RowBox[{"%", "//",
+ RowBox[{
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"#", ",", "p1", ",", "p2", ",",
+ RowBox[{"ExtraFactor", " ", "->", " ",
+ RowBox[{"1", "/", "2"}]}]}], "]"}], "&"}]}], "//",
+ RowBox[{
+ RowBox[{"DoPolarizationSums", "[",
+ RowBox[{"#", ",", "p2", ",", "p1", ",",
+ RowBox[{"ExtraFactor", " ", "->", " ",
+ RowBox[{"1", "/", "2"}]}]}], "]"}], "&"}]}], "//",
+ "Simplify"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- RowBox[{"DoPolarizationSums", "(",
- RowBox[{"-", "1"}], ")"}], TraditionalForm]], "Output",
- ImageSize->{160, 15},
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox["g", "s", "4"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"s", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["N", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ", "t"}], "+", "u"}], ")"}]}], "+",
+ RowBox[{"2", " ", "s"}]}], ")"}]}], "+",
+ RowBox[{"s", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["N", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ", "t"}], "+", "u"}], ")"}]}], "+",
+ RowBox[{"2", " ", "s"}]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["N", "2"], " ", "s", " ", "t", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox["N", "2"], " ", "s", " ", "u", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["s", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["N", "2"], " ",
+ SuperscriptBox["u", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox["N", "2"], " ",
+ SuperscriptBox["u", "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"N", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["N", "2"], "-", "1"}], ")"}], " ",
+ SuperscriptBox["s", "2"], " ",
+ SuperscriptBox["u", "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], ")"}]}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{545, 141},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DoPolarizationSums",
- CellLabel->"Out[14]=",
- CellID->170747363]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"ee", ",", "tt", ",", "ev", ",", "ptest"}], "]"}]], "Input",
- CellTags->"DoPolarizationSums",
- CellLabel->"In[15]:=",
- CellID->1673171946]
+ CellLabel->"Out[3]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -768,10 +2459,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Polarization",
+ StyleBox[ButtonBox["Polariazation",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Polarization",
- ButtonNote->"Polarization"],
+ ButtonData->"paclet:FeynCalc/ref/Polariazation",
+ ButtonNote->"Polariazation"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["Uncontract",
@@ -780,9 +2471,7 @@ Cell[TextData[{
ButtonNote->"Uncontract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DoPolarizationSums",
- CellID->1363268460]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -799,23 +2488,28 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 16.406783}",
+ "built" -> "{2020, 1, 5, 18, 54, 53.810851}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DoPolarizationSums[exp] sums over vector polarizations for expressions \
-with a factor of the form Pair[LorentzIndex[rho1_], Momentum[Polarization[p_, \
--I]]]* Pair[LorentzIndex[rho2_], Momentum[Polarization[p_, I]]].",
- "synonyms" -> {}, "title" -> "DoPolarizationSums", "titlemodifier" -> "",
- "windowtitle" -> "DoPolarizationSums", "type" -> "Symbol", "uri" ->
+ "DoPolarizationSums[exp, k, n] sums over physical (transverse) \
+polarizations of an external massless vector boson with momentum k, where n \
+is an auxiliary 4-vector from the gauge-dependent polarization sum formula. \
+DoPolarizationSums[exp, k, 0] replaces the polarization sum of an external \
+massless vector boson with momentum k by -g^\\[Mu]\\[Nu]. This corresponds to \
+the summation over all four polarizations, including the unphysical ones. \
+DoPolarizationSums[exp, k] sums over the three polarizations of an external \
+massive vector boson with momentum k and mass k^2.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "DoPolarizationSums", "titlemodifier" -> "",
+ "windowtitle" -> "DoPolarizationSums", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/DoPolarizationSums"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -823,8 +2517,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -833,265 +2528,114 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3517, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7255, 218, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->884511397]},
- "DoPolarizationSums"->{
- Cell[4128, 123, 331, 7, 72, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1284060336],
- Cell[4462, 132, 143, 4, 32, "Text",
- CellTags->"DoPolarizationSums",
- CellID->714795038],
- Cell[4630, 140, 588, 18, 45, "Input",
- CellTags->"DoPolarizationSums",
- CellID->492835519],
- Cell[5221, 160, 875, 35, 38, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1142913811],
- Cell[6133, 200, 133, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->771272059],
- Cell[6269, 206, 238, 8, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1791104588],
- Cell[6522, 217, 1104, 41, 56, "Text",
- CellTags->"DoPolarizationSums",
- CellID->504712587],
- Cell[7629, 260, 583, 22, 54, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1216514784],
- Cell[8215, 284, 159, 5, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->243887081],
- Cell[8377, 291, 329, 11, 29, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1289026175],
- Cell[8731, 306, 288, 9, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->654636595],
- Cell[9022, 317, 839, 24, 90, "Output",
- CellTags->"DoPolarizationSums",
- CellID->635199725],
- Cell[9876, 344, 233, 10, 33, "Text",
- CellTags->"DoPolarizationSums",
- CellID->883749055],
- Cell[10112, 356, 294, 10, 29, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1065974135],
- Cell[10409, 368, 346, 11, 29, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1862975452],
- Cell[10758, 381, 344, 14, 35, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1445508132],
- Cell[11105, 397, 358, 16, 36, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1899952175],
- Cell[11488, 417, 451, 14, 56, "Input",
- CellTags->"DoPolarizationSums",
- CellID->522265467],
- Cell[11942, 433, 880, 28, 90, "Output",
- CellTags->"DoPolarizationSums",
- CellID->438599116],
- Cell[12837, 464, 365, 16, 36, "Text",
- CellTags->"DoPolarizationSums",
- CellID->631136558],
- Cell[13227, 484, 451, 14, 55, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1912639269],
- Cell[13681, 500, 880, 28, 90, "Output",
- CellTags->"DoPolarizationSums",
- CellID->584196470],
- Cell[14598, 533, 878, 25, 62, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1927925269],
- Cell[15479, 560, 1344, 54, 41, "Output",
- CellTags->"DoPolarizationSums",
- CellID->289002701],
- Cell[16860, 619, 148, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->683494559],
- Cell[17011, 625, 1437, 55, 47, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1187724286],
- Cell[18485, 685, 135, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1480522060],
- Cell[18623, 691, 286, 9, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1321184712],
- Cell[18946, 705, 139, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1260436699],
- Cell[19088, 711, 239, 8, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1626281081],
- Cell[19364, 724, 145, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1965173944],
- Cell[19512, 730, 285, 9, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->170747363],
- Cell[19812, 742, 186, 5, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1673171946],
- Cell[20354, 769, 415, 15, 31, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1363268460]}
+ CellID->2097904239]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 22802, 834},
- {"DoPolarizationSums", 22946, 838}
+ {"PrimaryExamplesSection", 75043, 2529}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3150, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 550, 14, 132, "Usage",
- CellID->982511436],
+Cell[3743, 99, 295, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3517, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->884511397],
+Cell[4063, 114, 1627, 44, 245, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[3929, 115, 196, 6, 25, "ExampleSection",
- CellID->1533718159],
-Cell[4128, 123, 331, 7, 72, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1284060336],
-Cell[4462, 132, 143, 4, 32, "Text",
- CellTags->"DoPolarizationSums",
- CellID->714795038],
+Cell[5715, 162, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->852417175],
+Cell[6456, 188, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4630, 140, 588, 18, 45, "Input",
- CellTags->"DoPolarizationSums",
- CellID->492835519],
-Cell[5221, 160, 875, 35, 38, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1142913811]
+Cell[6512, 192, 101, 2, 70, "Input"],
+Cell[6616, 196, 578, 15, 56, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[6133, 200, 133, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->771272059],
-Cell[6269, 206, 238, 8, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1791104588]
+Cell[7255, 218, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2097904239],
+Cell[CellGroupData[{
+Cell[7668, 237, 196, 6, 26, "ExampleSection",
+ CellID->1260285186],
+Cell[7867, 245, 147, 3, 49, "Notes"],
+Cell[8017, 250, 192, 5, 45, "Input"],
+Cell[CellGroupData[{
+Cell[8234, 259, 531, 15, 45, "Input"],
+Cell[8768, 276, 644, 25, 37, "Output"]
}, Open ]],
-Cell[6522, 217, 1104, 41, 56, "Text",
- CellTags->"DoPolarizationSums",
- CellID->504712587],
-Cell[7629, 260, 583, 22, 54, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1216514784],
-Cell[8215, 284, 159, 5, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->243887081],
-Cell[8377, 291, 329, 11, 29, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1289026175],
Cell[CellGroupData[{
-Cell[8731, 306, 288, 9, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->654636595],
-Cell[9022, 317, 839, 24, 90, "Output",
- CellTags->"DoPolarizationSums",
- CellID->635199725]
+Cell[9449, 306, 127, 3, 27, "Input"],
+Cell[9579, 311, 3267, 137, 64, "Output"]
}, Open ]],
-Cell[9876, 344, 233, 10, 33, "Text",
- CellTags->"DoPolarizationSums",
- CellID->883749055],
-Cell[10112, 356, 294, 10, 29, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1065974135],
-Cell[10409, 368, 346, 11, 29, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1862975452],
-Cell[10758, 381, 344, 14, 35, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1445508132],
-Cell[11105, 397, 358, 16, 36, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1899952175],
Cell[CellGroupData[{
-Cell[11488, 417, 451, 14, 56, "Input",
- CellTags->"DoPolarizationSums",
- CellID->522265467],
-Cell[11942, 433, 880, 28, 90, "Output",
- CellTags->"DoPolarizationSums",
- CellID->438599116]
+Cell[12883, 453, 105, 2, 9, "ExampleDelimiter"],
+Cell[12991, 457, 197, 4, 49, "Notes"],
+Cell[13191, 463, 192, 5, 45, "Input"],
+Cell[CellGroupData[{
+Cell[13408, 472, 531, 15, 45, "Input"],
+Cell[13942, 489, 644, 25, 37, "Output"]
}, Open ]],
-Cell[12837, 464, 365, 16, 36, "Text",
- CellTags->"DoPolarizationSums",
- CellID->631136558],
Cell[CellGroupData[{
-Cell[13227, 484, 451, 14, 55, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1912639269],
-Cell[13681, 500, 880, 28, 90, "Output",
- CellTags->"DoPolarizationSums",
- CellID->584196470]
+Cell[14623, 519, 127, 3, 27, "Input"],
+Cell[14753, 524, 418, 17, 37, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[14598, 533, 878, 25, 62, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1927925269],
-Cell[15479, 560, 1344, 54, 41, "Output",
- CellTags->"DoPolarizationSums",
- CellID->289002701]
+Cell[15220, 547, 105, 2, 9, "ExampleDelimiter"],
+Cell[15328, 551, 121, 3, 32, "Notes"],
+Cell[15452, 556, 216, 6, 45, "Input"],
+Cell[CellGroupData[{
+Cell[15693, 566, 531, 15, 45, "Input"],
+Cell[16227, 583, 644, 25, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16860, 619, 148, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->683494559],
-Cell[17011, 625, 1437, 55, 47, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1187724286]
+Cell[16908, 613, 117, 3, 27, "Input"],
+Cell[17028, 618, 947, 40, 60, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[18485, 685, 135, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1480522060],
-Cell[18623, 691, 286, 9, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1321184712]
+Cell[18024, 664, 105, 2, 9, "ExampleDelimiter"],
+Cell[18132, 668, 272, 9, 32, "Notes"],
+Cell[18407, 679, 424, 12, 79, "Input"],
+Cell[CellGroupData[{
+Cell[18856, 695, 4226, 122, 283, "Input"],
+Cell[23085, 819, 9058, 293, 232, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18946, 705, 139, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1260436699],
-Cell[19088, 711, 239, 8, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->1626281081]
+Cell[32180, 1117, 300, 9, 27, "Input"],
+Cell[32483, 1128, 14021, 490, 287, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[19364, 724, 145, 4, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1965173944],
-Cell[19512, 730, 285, 9, 36, "Output",
- CellTags->"DoPolarizationSums",
- CellID->170747363]
+Cell[46553, 1624, 105, 2, 9, "ExampleDelimiter"],
+Cell[46661, 1628, 626, 13, 89, "Notes"],
+Cell[47290, 1643, 161, 4, 32, "Notes"],
+Cell[47454, 1649, 424, 12, 79, "Input"],
+Cell[CellGroupData[{
+Cell[47903, 1665, 4616, 123, 345, "Input"],
+Cell[52522, 1790, 9176, 312, 163, "Output"]
}, Open ]],
-Cell[19812, 742, 186, 5, 27, "Input",
- CellTags->"DoPolarizationSums",
- CellID->1673171946]
+Cell[CellGroupData[{
+Cell[61735, 2107, 517, 15, 45, "Input"],
+Cell[62255, 2124, 9601, 312, 162, "Output"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[20013, 750, 31, 0, 29, "SectionFooterSpacer"]
+Cell[71895, 2441, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20081, 755, 270, 12, 31, "SeeAlsoSection",
+Cell[71963, 2446, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[20354, 769, 415, 15, 31, "Text",
- CellTags->"DoPolarizationSums",
- CellID->1363268460]
+Cell[72236, 2460, 367, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[20784, 787, 23, 0, 42, "FooterCell"]
+Cell[72618, 2476, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotExpand.nb
index a9d6d35f6..e93d5144e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotExpand.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotExpand.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12856, 442]
-NotebookOptionsPosition[ 8675, 308]
-NotebookOutlinePosition[ 11529, 391]
-CellTagsIndexPosition[ 11416, 385]
+NotebookDataLength[ 14832, 507]
+NotebookOptionsPosition[ 10662, 375]
+NotebookOutlinePosition[ 13346, 452]
+CellTagsIndexPosition[ 13233, 446]
WindowTitle->DotExpand
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DotExpand\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DotExpand"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DotExpand.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DOT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DOT"], "\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DotSimplify"], "\<\"DeclareNonCommutative\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeclareNonCommutative"], \
+"\<\"UnDeclareNonCommutative\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/UnDeclareNonCommutative"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DotExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DotExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DotExpand.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$46302],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DotExpand", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$74024],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DotExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +101,26 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DotExpand", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DotExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DotExpand", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands DOT products in expr."
+ RowBox[{"DotExpand", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]expands dot products in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -103,35 +142,56 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2006956772],
+ CellID->173805481],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1248977172],
+ CellID->404488661],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DotExpand", "[",
- RowBox[{"DOT", "[",
+ RowBox[{"DOT", "[",
+ RowBox[{
RowBox[{
+ RowBox[{"a", " ", "x"}], "+",
+ RowBox[{"b", " ", "y"}], "+",
+ RowBox[{"c", " ", "z"}]}], ",",
+ RowBox[{"d", "+", "e", "+", "f"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
RowBox[{
RowBox[{"a", " ", "x"}], "+",
RowBox[{"b", " ", "y"}], "+",
- RowBox[{"c", " ", "z"}]}], ",",
- RowBox[{"d", "+", "e", "+", "f"}]}], "]"}], "]"}]], "Input",
+ RowBox[{"c", " ", "z"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"d", "+", "e", "+", "f"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{204, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DotExpand", "[", "%", "]"}]], "Input",
CellTags->"DotExpand",
- CellLabel->"In[1]:=",
+ CellLabel->"In[2]:=",
CellID->407288908],
Cell[BoxData[
@@ -146,14 +206,19 @@ Cell[BoxData[
RowBox[{"c", " ", "d", " ", "z"}], "+",
RowBox[{"c", " ", "e", " ", "z"}], "+",
RowBox[{"c", " ", "f", " ", "z"}]}], TraditionalForm]], "Output",
- ImageSize->{421, 15},
+ ImageSize->{480, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotExpand",
- CellLabel->"Out[1]=",
- CellID->887725401]
+ CellLabel->"Out[2]="]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[BoxData[
RowBox[{
RowBox[{"DeclareNonCommutative", "/@",
@@ -161,7 +226,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f"}], "}"}]}],
";"}]], "Input",
CellTags->"DotExpand",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1021626920],
Cell[CellGroupData[{
@@ -176,7 +241,7 @@ Cell[BoxData[
RowBox[{"c", " ", "z"}]}], ",",
RowBox[{"d", "+", "e", "+", "f"}]}], "]"}], "]"}]], "Input",
CellTags->"DotExpand",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->587871772],
Cell[BoxData[
@@ -200,12 +265,11 @@ Cell[BoxData[
RowBox[{"c", ".", "e"}]}], "+",
RowBox[{"z", " ",
RowBox[{"c", ".", "f"}]}]}], TraditionalForm]], "Output",
- ImageSize->{430, 15},
+ ImageSize->{498, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotExpand",
- CellLabel->"Out[3]=",
- CellID->70533327]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[BoxData[
@@ -215,8 +279,15 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f"}], "}"}]}],
";"}]], "Input",
CellTags->"DotExpand",
- CellLabel->"In[4]:=",
- CellID->1926968700],
+ CellLabel->"In[3]:=",
+ CellID->1926968700]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
Cell[CellGroupData[{
@@ -230,7 +301,7 @@ Cell[BoxData[
RowBox[{"c", " ", "z"}]}], ",",
RowBox[{"d", "+", "e", "+", "f"}]}], "]"}], "]"}]], "Input",
CellTags->"DotExpand",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->1551070412],
Cell[BoxData[
@@ -245,12 +316,12 @@ Cell[BoxData[
RowBox[{"c", " ", "d", " ", "z"}], "+",
RowBox[{"c", " ", "e", " ", "z"}], "+",
RowBox[{"c", " ", "f", " ", "z"}]}], TraditionalForm]], "Output",
- ImageSize->{421, 15},
+ ImageSize->{480, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotExpand",
- CellLabel->"Out[5]=",
- CellID->283503340]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -274,7 +345,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["DOT",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DOT",
@@ -292,16 +362,13 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DeclareNonCommutative",
ButtonNote->"DeclareNonCommutative"],
FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["UnDeclareNonCommutative",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/UnDeclareNonCommutative",
ButtonNote->"UnDeclareNonCommutative"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DotExpand",
- CellID->631413415]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -318,20 +385,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 17.990763}",
+ "built" -> "{2020, 1, 5, 18, 54, 55.545277}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "DotExpand[expr] expands DOT products in expr.",
- "synonyms" -> {}, "title" -> "DotExpand", "titlemodifier" -> "",
- "windowtitle" -> "DotExpand", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DotExpand"}, "SearchTextTranslated" -> ""},
+ "None", "summary" -> "DotExpand[exp] expands dot products in exp.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DotExpand",
+ "titlemodifier" -> "", "windowtitle" -> "DotExpand", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DotExpand"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -340,7 +407,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -349,101 +416,99 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3288, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4646, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2006956772]},
+ CellID->173805481]},
"DotExpand"->{
- Cell[3922, 123, 331, 11, 27, "Input",
+ Cell[5949, 190, 129, 4, 27, "Input",
CellTags->"DotExpand",
CellID->407288908],
- Cell[4256, 136, 610, 17, 36, "Output",
- CellTags->"DotExpand",
- CellID->887725401],
- Cell[4881, 156, 248, 8, 27, "Input",
+ Cell[6081, 196, 590, 16, 37, "Output",
+ CellTags->"DotExpand"],
+ Cell[6816, 221, 248, 8, 27, "Input",
CellTags->"DotExpand",
CellID->1021626920],
- Cell[5154, 168, 331, 11, 27, "Input",
+ Cell[7089, 233, 331, 11, 27, "Input",
CellTags->"DotExpand",
CellID->587871772],
- Cell[5488, 181, 744, 26, 36, "Output",
- CellTags->"DotExpand",
- CellID->70533327],
- Cell[6247, 210, 250, 8, 27, "Input",
+ Cell[7423, 246, 725, 25, 37, "Output",
+ CellTags->"DotExpand"],
+ Cell[8163, 274, 250, 8, 27, "Input",
CellTags->"DotExpand",
CellID->1926968700],
- Cell[6522, 222, 332, 11, 27, "Input",
+ Cell[8580, 293, 332, 11, 27, "Input",
CellTags->"DotExpand",
CellID->1551070412],
- Cell[6857, 235, 610, 17, 36, "Output",
- CellTags->"DotExpand",
- CellID->283503340],
- Cell[7835, 275, 798, 28, 32, "Text",
- CellTags->"DotExpand",
- CellID->631413415]}
+ Cell[8915, 306, 590, 16, 37, "Output",
+ CellTags->"DotExpand"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10453, 350},
- {"DotExpand", 10589, 354}
+ {"PrimaryExamplesSection", 12424, 417},
+ {"DotExpand", 12560, 421}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 3333, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 376, 12, 82, "Usage",
+Cell[3917, 103, 286, 11, 45, "ObjectNameGrid"],
+Cell[4206, 116, 415, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3288, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4646, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2006956772],
+ CellID->173805481],
Cell[CellGroupData[{
-Cell[3701, 113, 196, 6, 25, "ExampleSection",
- CellID->1248977172],
+Cell[5058, 152, 195, 6, 26, "ExampleSection",
+ CellID->404488661],
Cell[CellGroupData[{
-Cell[3922, 123, 331, 11, 27, "Input",
+Cell[5278, 162, 245, 8, 27, "Input"],
+Cell[5526, 172, 386, 13, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5949, 190, 129, 4, 27, "Input",
CellTags->"DotExpand",
CellID->407288908],
-Cell[4256, 136, 610, 17, 36, "Output",
- CellTags->"DotExpand",
- CellID->887725401]
+Cell[6081, 196, 590, 16, 37, "Output",
+ CellTags->"DotExpand"]
}, Open ]],
-Cell[4881, 156, 248, 8, 27, "Input",
+Cell[CellGroupData[{
+Cell[6708, 217, 105, 2, 9, "ExampleDelimiter"],
+Cell[6816, 221, 248, 8, 27, "Input",
CellTags->"DotExpand",
CellID->1021626920],
Cell[CellGroupData[{
-Cell[5154, 168, 331, 11, 27, "Input",
+Cell[7089, 233, 331, 11, 27, "Input",
CellTags->"DotExpand",
CellID->587871772],
-Cell[5488, 181, 744, 26, 36, "Output",
- CellTags->"DotExpand",
- CellID->70533327]
+Cell[7423, 246, 725, 25, 37, "Output",
+ CellTags->"DotExpand"]
}, Open ]],
-Cell[6247, 210, 250, 8, 27, "Input",
+Cell[8163, 274, 250, 8, 27, "Input",
CellTags->"DotExpand",
- CellID->1926968700],
+ CellID->1926968700]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8450, 287, 105, 2, 9, "ExampleDelimiter"],
Cell[CellGroupData[{
-Cell[6522, 222, 332, 11, 27, "Input",
+Cell[8580, 293, 332, 11, 27, "Input",
CellTags->"DotExpand",
CellID->1551070412],
-Cell[6857, 235, 610, 17, 36, "Output",
- CellTags->"DotExpand",
- CellID->283503340]
+Cell[8915, 306, 590, 16, 37, "Output",
+ CellTags->"DotExpand"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[7494, 256, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9544, 327, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7562, 261, 270, 12, 31, "SeeAlsoSection",
+Cell[9612, 332, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7835, 275, 798, 28, 32, "Text",
- CellTags->"DotExpand",
- CellID->631413415]
+Cell[9885, 346, 735, 24, 56, "SeeAlso"]
}, Open ]],
-Cell[8648, 306, 23, 0, 42, "FooterCell"]
+Cell[10635, 373, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotPower.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotPower.nb
index cf9becf07..13813cbaf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotPower.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotPower.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6187, 190]
-NotebookOptionsPosition[ 3917, 123]
-NotebookOutlinePosition[ 5925, 179]
-CellTagsIndexPosition[ 5855, 174]
+NotebookDataLength[ 6927, 209]
+NotebookOptionsPosition[ 4858, 152]
+NotebookOutlinePosition[ 6720, 201]
+CellTagsIndexPosition[ 6677, 198]
WindowTitle->DotPower
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DotPower\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DotPower"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DotPower.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DotSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DotPower\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DotPower"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/DotPower.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$46992],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DotPower", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$74916],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DotPower", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DotPower", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DotPower", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,16 +139,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["DotSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DotPower",
- CellID->1936501485]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 20.646913}",
+ "built" -> "{2020, 1, 5, 18, 54, 57.838107}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -144,11 +173,11 @@ TaggingRules->{
"None", "summary" ->
"DotPower is an option for DotSimplify. It determines whether \
non-commutative powers are represented by succesive multiplication or by \
-Power.", "synonyms" -> {}, "title" -> "DotPower", "titlemodifier" -> "",
- "windowtitle" -> "DotPower", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DotPower"}},
+Power.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "DotPower",
+ "titlemodifier" -> "", "windowtitle" -> "DotPower", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DotPower"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DotPower"->{
- Cell[3623, 108, 252, 10, 70, "Text",
- CellTags->"DotPower",
- CellID->1936501485]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DotPower", 5743, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 70, "AnchorBarGrid",
+Cell[580, 21, 3007, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 444, 12, 70, "Usage",
+Cell[3590, 97, 285, 11, 70, "ObjectNameGrid"],
+Cell[3878, 110, 444, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3350, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4347, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3623, 108, 252, 10, 70, "Text",
- CellTags->"DotPower",
- CellID->1936501485]
+Cell[4620, 140, 196, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3890, 121, 23, 0, 70, "FooterCell"]
+Cell[4831, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotProduct.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotProduct.nb
deleted file mode 100644
index aae769d10..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotProduct.nb
+++ /dev/null
@@ -1,303 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8861, 293]
-NotebookOptionsPosition[ 5652, 197]
-NotebookOutlinePosition[ 8099, 264]
-CellTagsIndexPosition[ 7987, 258]
-WindowTitle->DotProduct
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DotProduct\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DotProduct"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DotProduct.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$47337],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DotProduct", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["DotProduct", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"DotProduct", "[",
- RowBox[{"x", ",", " ", "y"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the three-dimensional dot-product. If x and y have Head List, \
-DotProduct[x, a] (where a is a vector) performs Sum[ x[[k]] a[[k]], {k, 0, \
-3}]."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->27455522],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1640330838],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DotProduct", "[",
- RowBox[{
- RowBox[{"ThreeVector", "[", "a", "]"}], ",",
- RowBox[{"3",
- RowBox[{"ThreeVector", "[", "b", "]"}]}]}], "]"}]], "Input",
- CellTags->"DotProduct",
- CellLabel->"In[1]:=",
- CellID->1589628961],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox["a", "\[RightVector]"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox["b", "\[RightVector]"],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{61, 27},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DotProduct",
- CellLabel->"Out[1]=",
- CellID->114728018]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["CrossProduct",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/CrossProduct",
- ButtonNote->"CrossProduct"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["ThreeVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ThreeVector",
- ButtonNote->"ThreeVector"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"DotProduct",
- CellID->712758366]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"DotProduct",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 21.883896}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "DotProduct[x, y] denotes the three-dimensional dot-product. If x and y \
-have Head List, DotProduct[x, a] (where a is a vector) performs Sum[x[[k]] \
-a[[k]], {k, 0, 3}].", "synonyms" -> {}, "title" -> "DotProduct",
- "titlemodifier" -> "", "windowtitle" -> "DotProduct", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/DotProduct"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3449, 97, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->27455522]},
- "DotProduct"->{
- Cell[4081, 126, 253, 8, 27, "Input",
- CellTags->"DotProduct",
- CellID->1589628961],
- Cell[4337, 136, 496, 18, 48, "Output",
- CellTags->"DotProduct",
- CellID->114728018],
- Cell[5201, 177, 409, 15, 31, "Text",
- CellTags->"DotProduct",
- CellID->712758366]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7558, 241},
- {"DotProduct", 7693, 245}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 531, 15, 99, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3449, 97, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->27455522],
-Cell[CellGroupData[{
-Cell[3860, 116, 196, 6, 25, "ExampleSection",
- CellID->1640330838],
-Cell[CellGroupData[{
-Cell[4081, 126, 253, 8, 27, "Input",
- CellTags->"DotProduct",
- CellID->1589628961],
-Cell[4337, 136, 496, 18, 48, "Output",
- CellTags->"DotProduct",
- CellID->114728018]
-}, Open ]]
-}, Open ]],
-Cell[4860, 158, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4928, 163, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[5201, 177, 409, 15, 31, "Text",
- CellTags->"DotProduct",
- CellID->712758366]
-}, Open ]],
-Cell[5625, 195, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplify.nb
index 41ad560ee..5b6440c85 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplify.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 23813, 884]
-NotebookOptionsPosition[ 14923, 588]
-NotebookOutlinePosition[ 20155, 744]
-CellTagsIndexPosition[ 20040, 738]
+NotebookDataLength[ 26459, 974]
+NotebookOptionsPosition[ 18195, 704]
+NotebookOutlinePosition[ 22677, 836]
+CellTagsIndexPosition[ 22562, 830]
WindowTitle->DotSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DotSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DotSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"AntiCommutator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/AntiCommutator"], "\<\"Commutator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Commutator"], "\<\"Calc\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Calc"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DotSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DotSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DotSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$47673],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DotSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$75380],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DotSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,18 +99,28 @@ DotSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DotSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DotSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"DotSimplify", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands and reorders noncommutative terms in expr. Simplifying \
-relations may be specified by the option DotSimplifyRelations or by \
-Commutator and AntiCommutator definitions. Whether expr is expanded \
-noncommutatively depends on the option Expanding."
+ RowBox[{"DotSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]expands and reorders noncommutative terms in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ". "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -95,74 +131,138 @@ noncommutatively depends on the option Expanding."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->676697344],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->378040460],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->449681833],
+ "Simplifying relations may be specified by the option ",
+ ButtonBox["DotSimplifyRelations",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DotSimplifyRelations",
+ ButtonNote->"DotSimplifyRelations"],
+ " or by ",
+ ButtonBox["Commutator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Commutator",
+ ButtonNote->"Commutator"],
+ " and ",
+ ButtonBox["AntiCommutator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/AntiCommutator",
+ ButtonNote->"AntiCommutator"],
+ " definitions. "
+}], "Notes"],
+
+Cell[TextData[{
+ "Whether ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " is expanded noncommutatively depends on the option ",
+ ButtonBox["Expanding",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Expanding",
+ ButtonNote->"Expanding"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "DotSimplify", "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[1]:=",
+ CellLabel->"In[136]:=",
CellID->1331874134],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"DotSimplifyRelations", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"DotPower", "\[Rule]", "False"}], ",",
- RowBox[{"CommonTrace", "\[Rule]", "False"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "100"}], ",",
+ RowBox[{"PreservePropagatorStructures", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{458, 35},
+ ImageSize->{516, 54},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[1]=",
- CellID->1021382404]
+ CellLabel->"Out[136]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(3)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->946627194],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(3)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->439360994],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
- RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- RowBox[{"GS", "[", "p", "]"}]}], "-",
- RowBox[{"GS", "[", "q", "]"}]}], ")"}], ".",
- RowBox[{"GA", "[", "\[Nu]", "]"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"GS", "[", "p", "]"}]}], "-",
+ RowBox[{"GS", "[", "q", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1782604794],
Cell[BoxData[
@@ -205,20 +305,19 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{145, 20},
+ ImageSize->{162, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[2]=",
- CellID->97040369]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DotSimplify", "[", "t1", "]"}]], "Input",
+ RowBox[{"DotSimplify", "[", "%", "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1204340698],
Cell[BoxData[
@@ -267,31 +366,35 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{203, 20},
+ ImageSize->{224, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[3]=",
- CellID->715244913]
+ CellLabel->"Out[2]="]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->194491386],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"a", ".",
- RowBox[{"(",
- RowBox[{"b", "-",
- RowBox[{"z", " ", "c"}]}], ")"}], ".", "a"}]}]], "Input",
+ RowBox[{"a", ".",
+ RowBox[{"(",
+ RowBox[{"b", "-",
+ RowBox[{"z", " ", "c"}]}], ")"}], ".", "a"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->2117662767],
Cell[BoxData[
@@ -301,20 +404,19 @@ Cell[BoxData[
RowBox[{"b", "-",
RowBox[{"c", " ", "z"}]}], ")"}], ".", "a"}], TraditionalForm]], "Output",\
- ImageSize->{86, 15},
+ ImageSize->{97, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[5]=",
- CellID->1736919809]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DotSimplify", "[", "t2", "]"}]], "Input",
+ RowBox[{"DotSimplify", "[", "%", "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[6]:=",
+ CellLabel->"In[3]:=",
CellID->1117578635],
Cell[BoxData[
@@ -323,12 +425,11 @@ Cell[BoxData[
RowBox[{"a", ".", "b", ".", "a"}], "-",
RowBox[{"z", " ",
RowBox[{"a", ".", "c", ".", "a"}]}]}], TraditionalForm]], "Output",
- ImageSize->{100, 15},
+ ImageSize->{115, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[6]=",
- CellID->1099682282]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -338,25 +439,28 @@ Cell[BoxData[
RowBox[{"Commutator", "[",
RowBox[{"a", ",", "c"}], "]"}], "=", "1"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[7]:=",
+ CellLabel->"In[4]:=",
CellID->1442809361],
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[7]=",
- CellID->2070115949]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DotSimplify", "[", "t2", "]"}]], "Input",
+ RowBox[{"DotSimplify", "[",
+ RowBox[{"a", ".",
+ RowBox[{"(",
+ RowBox[{"b", "-",
+ RowBox[{"z", " ", "c"}]}], ")"}], ".", "a"}], "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[8]:=",
+ CellLabel->"In[5]:=",
CellID->1013643835],
Cell[BoxData[
@@ -368,28 +472,31 @@ Cell[BoxData[
RowBox[{
RowBox[{"c", ".", "a", ".", "a"}], "+", "a"}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{136, 15},
+ ImageSize->{153, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[8]=",
- CellID->1231130458]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"Commutator", "[",
- RowBox[{"a", ",", "c"}], "]"}], "=", "."}]], "Input",
+ RowBox[{"a", ",", "c"}], "]"}], "=."}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[9]:=",
+ CellLabel->"In[6]:=",
CellID->1466952413],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DotSimplify", "[", "t2", "]"}]], "Input",
+ RowBox[{"DotSimplify", "[",
+ RowBox[{"a", ".",
+ RowBox[{"(",
+ RowBox[{"b", "-",
+ RowBox[{"z", " ", "c"}]}], ")"}], ".", "a"}], "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[10]:=",
+ CellLabel->"In[7]:=",
CellID->1037294655],
Cell[BoxData[
@@ -398,12 +505,11 @@ Cell[BoxData[
RowBox[{"a", ".", "b", ".", "a"}], "-",
RowBox[{"z", " ",
RowBox[{"a", ".", "c", ".", "a"}]}]}], TraditionalForm]], "Output",
- ImageSize->{100, 15},
+ ImageSize->{115, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[10]=",
- CellID->918347217]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -413,25 +519,28 @@ Cell[BoxData[
RowBox[{"AntiCommutator", "[",
RowBox[{"b", ",", "a"}], "]"}], "=", "c"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[11]:=",
+ CellLabel->"In[8]:=",
CellID->579521038],
Cell[BoxData[
FormBox["c", TraditionalForm]], "Output",
- ImageSize->{12, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[11]=",
- CellID->675731172]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DotSimplify", "[", "t2", "]"}]], "Input",
+ RowBox[{"DotSimplify", "[",
+ RowBox[{"a", ".",
+ RowBox[{"(",
+ RowBox[{"b", "-",
+ RowBox[{"z", " ", "c"}]}], ")"}], ".", "a"}], "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[12]:=",
+ CellLabel->"In[9]:=",
CellID->164431463],
Cell[BoxData[
@@ -442,34 +551,37 @@ Cell[BoxData[
RowBox[{"z", " ",
RowBox[{"a", ".", "c", ".", "a"}]}], "+",
RowBox[{"a", ".", "c"}]}], TraditionalForm]], "Output",
- ImageSize->{146, 15},
+ ImageSize->{167, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[12]=",
- CellID->412911369]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"AntiCommutator", "[",
- RowBox[{"b", ",", "a"}], "]"}], "=", "."}]], "Input",
+ RowBox[{"b", ",", "a"}], "]"}], "=."}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[13]:=",
+ CellLabel->"In[10]:=",
CellID->216404314],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DotSimplify", "[",
- RowBox[{"t2", ",",
+ RowBox[{
+ RowBox[{"a", ".",
+ RowBox[{"(",
+ RowBox[{"b", "-",
+ RowBox[{"z", " ", "c"}]}], ")"}], ".", "a"}], ",",
RowBox[{"DotSimplifyRelations", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"a", ".", "c"}], "\[Rule]",
RowBox[{"1", "/", "z"}]}], "}"}]}]}], "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[14]:=",
+ CellLabel->"In[11]:=",
CellID->2011362420],
Cell[BoxData[
@@ -477,18 +589,29 @@ Cell[BoxData[
RowBox[{
RowBox[{"a", ".", "b", ".", "a"}], "-", "a"}], TraditionalForm]], "Output",\
- ImageSize->{63, 15},
+ ImageSize->{72, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[14]=",
- CellID->1420474961]
+ CellLabel->"Out[11]="]
}, Open ]],
+Cell[BoxData[
+ RowBox[{"UnDeclareNonCommutative", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}]], "Input",
+ CellLabel->"In[12]:="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[", "x", "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[15]:=",
+ CellLabel->"In[1]:=",
CellID->1063178346],
Cell[CellGroupData[{
@@ -496,19 +619,15 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DotSimplify", "[",
RowBox[{"x", ".", "x", ".", "x"}], "]"}]], "Input",
- CellTags->"DotSimplify",
- CellLabel->"In[16]:=",
- CellID->1173966576],
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox["x", "3"], TraditionalForm]], "Output",
- ImageSize->{21, 18},
+ RowBox[{"x", ".", "x", ".", "x"}], TraditionalForm]], "Output",
+ ImageSize->{47, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"DotSimplify",
- CellLabel->"Out[16]=",
- CellID->629656626]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -517,28 +636,27 @@ Cell[BoxData[
RowBox[{"DotSimplify", "[",
RowBox[{
RowBox[{"x", ".", "x", ".", "x"}], ",",
- RowBox[{"DotPower", "\[Rule]", "False"}]}], "]"}]], "Input",
+ RowBox[{"DotPower", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[17]:=",
- CellID->49078014],
+ CellLabel->"In[3]:=",
+ CellID->1173966576],
Cell[BoxData[
FormBox[
SuperscriptBox["x", "3"], TraditionalForm]], "Output",
- ImageSize->{21, 18},
+ ImageSize->{23, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"DotSimplify",
- CellLabel->"Out[17]=",
- CellID->316863354]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[BoxData[
- RowBox[{"UnDeclareNonCommutative", "[",
- RowBox[{"a", ",", "b", ",", "c", ",", "x"}], "]"}]], "Input",
+ RowBox[{"UnDeclareNonCommutative", "[", "x", "]"}]], "Input",
CellTags->"DotSimplify",
- CellLabel->"In[18]:=",
+ CellLabel->"In[4]:=",
CellID->1813929769]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -579,9 +697,7 @@ Cell[TextData[{
ButtonNote->"Calc"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DotSimplify",
- CellID->574897097]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -589,7 +705,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"DotSimplify",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -598,24 +714,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 23.314440}",
+ "built" -> "{2020, 1, 5, 18, 54, 58.852219}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "DotSimplify[expr] expands and reorders noncommutative terms in expr. \
-Simplifying relations may be specified by the option DotSimplifyRelations or \
-by Commutator and AntiCommutator definitions. Whether expr is expanded \
-noncommutatively depends on the option Expanding.", "synonyms" -> {}, "title" ->
- "DotSimplify", "titlemodifier" -> "", "windowtitle" -> "DotSimplify",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/DotSimplify"},
- "SearchTextTranslated" -> ""},
+ "DotSimplify[exp] expands and reorders noncommutative terms in exp. ",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DotSimplify",
+ "titlemodifier" -> "", "windowtitle" -> "DotSimplify", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DotSimplify"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -624,7 +737,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -632,260 +745,237 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3528, 97, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->676697344]},
"DotSimplify"->{
- Cell[4160, 126, 140, 4, 27, "Input",
+ Cell[6176, 193, 142, 4, 70, "Input",
CellTags->"DotSimplify",
CellID->1331874134],
- Cell[4303, 132, 543, 16, 56, "Output",
- CellTags->"DotSimplify",
- CellID->1021382404],
- Cell[4883, 153, 361, 12, 27, "Input",
+ Cell[6321, 199, 762, 19, 75, "Output",
+ CellTags->"DotSimplify"],
+ Cell[7776, 254, 330, 11, 27, "Input",
CellTags->"DotSimplify",
CellID->1782604794],
- Cell[5247, 167, 1135, 45, 41, "Output",
- CellTags->"DotSimplify",
- CellID->97040369],
- Cell[6419, 217, 135, 4, 27, "Input",
+ Cell[8109, 267, 1116, 44, 37, "Output",
+ CellTags->"DotSimplify"],
+ Cell[9262, 316, 134, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1204340698],
- Cell[6557, 223, 1329, 51, 41, "Output",
- CellTags->"DotSimplify",
- CellID->715244913],
- Cell[7901, 277, 176, 5, 27, "Input",
+ Cell[9399, 322, 1309, 50, 37, "Output",
+ CellTags->"DotSimplify"],
+ Cell[10853, 381, 176, 5, 27, "Input",
CellTags->"DotSimplify",
CellID->194491386],
- Cell[8102, 286, 228, 8, 27, "Input",
+ Cell[11054, 390, 201, 7, 27, "Input",
CellTags->"DotSimplify",
CellID->2117662767],
- Cell[8333, 296, 323, 12, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1736919809],
- Cell[8693, 313, 135, 4, 27, "Input",
+ Cell[11258, 399, 302, 11, 37, "Output",
+ CellTags->"DotSimplify"],
+ Cell[11597, 415, 134, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1117578635],
- Cell[8831, 319, 330, 11, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1099682282],
- Cell[9198, 335, 180, 6, 27, "Input",
+ Cell[11734, 421, 309, 10, 35, "Output",
+ CellTags->"DotSimplify"],
+ Cell[12080, 436, 180, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->1442809361],
- Cell[9381, 343, 213, 7, 36, "Output",
- CellTags->"DotSimplify",
- CellID->2070115949],
- Cell[9631, 355, 135, 4, 27, "Input",
+ Cell[12263, 444, 192, 6, 35, "Output",
+ CellTags->"DotSimplify"],
+ Cell[12492, 455, 242, 8, 27, "Input",
CellTags->"DotSimplify",
CellID->1013643835],
- Cell[9769, 361, 386, 14, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1231130458],
- Cell[10170, 378, 180, 6, 27, "Input",
+ Cell[12737, 465, 365, 13, 37, "Output",
+ CellTags->"DotSimplify"],
+ Cell[13117, 481, 176, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->1466952413],
- Cell[10375, 388, 136, 4, 27, "Input",
+ Cell[13318, 491, 242, 8, 27, "Input",
CellTags->"DotSimplify",
CellID->1037294655],
- Cell[10514, 394, 330, 11, 36, "Output",
- CellTags->"DotSimplify",
- CellID->918347217],
- Cell[10881, 410, 184, 6, 27, "Input",
+ Cell[13563, 501, 309, 10, 35, "Output",
+ CellTags->"DotSimplify"],
+ Cell[13909, 516, 183, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->579521038],
- Cell[11068, 418, 213, 7, 36, "Output",
- CellTags->"DotSimplify",
- CellID->675731172],
- Cell[11318, 430, 135, 4, 27, "Input",
+ Cell[14095, 524, 192, 6, 35, "Output",
+ CellTags->"DotSimplify"],
+ Cell[14324, 535, 241, 8, 27, "Input",
CellTags->"DotSimplify",
CellID->164431463],
- Cell[11456, 436, 384, 13, 36, "Output",
- CellTags->"DotSimplify",
- CellID->412911369],
- Cell[11855, 452, 184, 6, 27, "Input",
+ Cell[14568, 545, 363, 12, 35, "Output",
+ CellTags->"DotSimplify"],
+ Cell[14946, 560, 180, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->216404314],
- Cell[12064, 462, 319, 10, 27, "Input",
+ Cell[15151, 570, 430, 14, 27, "Input",
CellTags->"DotSimplify",
CellID->2011362420],
- Cell[12386, 474, 273, 10, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1420474961],
- Cell[12674, 487, 145, 4, 27, "Input",
+ Cell[15584, 586, 252, 9, 35, "Output",
+ CellTags->"DotSimplify"],
+ Cell[16129, 610, 144, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1063178346],
- Cell[12844, 495, 168, 5, 27, "Input",
+ Cell[16657, 634, 231, 7, 27, "Input",
CellTags->"DotSimplify",
CellID->1173966576],
- Cell[13015, 502, 237, 8, 39, "Output",
- CellTags->"DotSimplify",
- CellID->629656626],
- Cell[13289, 515, 231, 7, 27, "Input",
- CellTags->"DotSimplify",
- CellID->49078014],
- Cell[13523, 524, 237, 8, 39, "Output",
+ Cell[16891, 643, 216, 7, 37, "Output",
+ CellTags->"DotSimplify"],
+ Cell[17122, 653, 146, 4, 27, "Input",
CellTags->"DotSimplify",
- CellID->316863354],
- Cell[13775, 535, 190, 5, 27, "Input",
- CellTags->"DotSimplify",
- CellID->1813929769],
- Cell[14321, 562, 560, 21, 31, "Text",
- CellTags->"DotSimplify",
- CellID->574897097]}
+ CellID->1813929769]},
+ "PrimaryExamplesSection"->{
+ Cell[7144, 225, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->946627194]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16939, 634},
- {"DotSimplify", 17076, 638}
+ {"DotSimplify", 19983, 747},
+ {"PrimaryExamplesSection", 22419, 823}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3210, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 603, 15, 112, "Usage",
- CellID->982511436],
+Cell[3796, 101, 288, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3528, 97, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->676697344],
+Cell[4109, 116, 439, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3940, 116, 195, 6, 25, "ExampleSection",
- CellID->449681833],
+Cell[4573, 133, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->378040460],
+Cell[5314, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5348, 161, 537, 17, 70, "Notes"],
+Cell[5888, 180, 263, 9, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4160, 126, 140, 4, 27, "Input",
+Cell[6176, 193, 142, 4, 70, "Input",
CellTags->"DotSimplify",
CellID->1331874134],
-Cell[4303, 132, 543, 16, 56, "Output",
- CellTags->"DotSimplify",
- CellID->1021382404]
+Cell[6321, 199, 762, 19, 75, "Output",
+ CellTags->"DotSimplify"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4883, 153, 361, 12, 27, "Input",
+Cell[7144, 225, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->946627194],
+Cell[CellGroupData[{
+Cell[7556, 244, 195, 6, 26, "ExampleSection",
+ CellID->439360994],
+Cell[CellGroupData[{
+Cell[7776, 254, 330, 11, 27, "Input",
CellTags->"DotSimplify",
CellID->1782604794],
-Cell[5247, 167, 1135, 45, 41, "Output",
- CellTags->"DotSimplify",
- CellID->97040369]
+Cell[8109, 267, 1116, 44, 37, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6419, 217, 135, 4, 27, "Input",
+Cell[9262, 316, 134, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1204340698],
-Cell[6557, 223, 1329, 51, 41, "Output",
- CellTags->"DotSimplify",
- CellID->715244913]
+Cell[9399, 322, 1309, 50, 37, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
-Cell[7901, 277, 176, 5, 27, "Input",
+Cell[CellGroupData[{
+Cell[10745, 377, 105, 2, 9, "ExampleDelimiter"],
+Cell[10853, 381, 176, 5, 27, "Input",
CellTags->"DotSimplify",
CellID->194491386],
Cell[CellGroupData[{
-Cell[8102, 286, 228, 8, 27, "Input",
+Cell[11054, 390, 201, 7, 27, "Input",
CellTags->"DotSimplify",
CellID->2117662767],
-Cell[8333, 296, 323, 12, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1736919809]
+Cell[11258, 399, 302, 11, 37, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8693, 313, 135, 4, 27, "Input",
+Cell[11597, 415, 134, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1117578635],
-Cell[8831, 319, 330, 11, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1099682282]
+Cell[11734, 421, 309, 10, 35, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9198, 335, 180, 6, 27, "Input",
+Cell[12080, 436, 180, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->1442809361],
-Cell[9381, 343, 213, 7, 36, "Output",
- CellTags->"DotSimplify",
- CellID->2070115949]
+Cell[12263, 444, 192, 6, 35, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9631, 355, 135, 4, 27, "Input",
+Cell[12492, 455, 242, 8, 27, "Input",
CellTags->"DotSimplify",
CellID->1013643835],
-Cell[9769, 361, 386, 14, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1231130458]
+Cell[12737, 465, 365, 13, 37, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
-Cell[10170, 378, 180, 6, 27, "Input",
+Cell[13117, 481, 176, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->1466952413],
Cell[CellGroupData[{
-Cell[10375, 388, 136, 4, 27, "Input",
+Cell[13318, 491, 242, 8, 27, "Input",
CellTags->"DotSimplify",
CellID->1037294655],
-Cell[10514, 394, 330, 11, 36, "Output",
- CellTags->"DotSimplify",
- CellID->918347217]
+Cell[13563, 501, 309, 10, 35, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10881, 410, 184, 6, 27, "Input",
+Cell[13909, 516, 183, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->579521038],
-Cell[11068, 418, 213, 7, 36, "Output",
- CellTags->"DotSimplify",
- CellID->675731172]
+Cell[14095, 524, 192, 6, 35, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11318, 430, 135, 4, 27, "Input",
+Cell[14324, 535, 241, 8, 27, "Input",
CellTags->"DotSimplify",
CellID->164431463],
-Cell[11456, 436, 384, 13, 36, "Output",
- CellTags->"DotSimplify",
- CellID->412911369]
+Cell[14568, 545, 363, 12, 35, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
-Cell[11855, 452, 184, 6, 27, "Input",
+Cell[14946, 560, 180, 6, 27, "Input",
CellTags->"DotSimplify",
CellID->216404314],
Cell[CellGroupData[{
-Cell[12064, 462, 319, 10, 27, "Input",
+Cell[15151, 570, 430, 14, 27, "Input",
CellTags->"DotSimplify",
CellID->2011362420],
-Cell[12386, 474, 273, 10, 36, "Output",
- CellTags->"DotSimplify",
- CellID->1420474961]
+Cell[15584, 586, 252, 9, 35, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
-Cell[12674, 487, 145, 4, 27, "Input",
+Cell[15851, 598, 133, 3, 27, "Input"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16021, 606, 105, 2, 9, "ExampleDelimiter"],
+Cell[16129, 610, 144, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1063178346],
Cell[CellGroupData[{
-Cell[12844, 495, 168, 5, 27, "Input",
- CellTags->"DotSimplify",
- CellID->1173966576],
-Cell[13015, 502, 237, 8, 39, "Output",
- CellTags->"DotSimplify",
- CellID->629656626]
+Cell[16298, 618, 120, 3, 27, "Input"],
+Cell[16421, 623, 199, 6, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13289, 515, 231, 7, 27, "Input",
- CellTags->"DotSimplify",
- CellID->49078014],
-Cell[13523, 524, 237, 8, 39, "Output",
+Cell[16657, 634, 231, 7, 27, "Input",
CellTags->"DotSimplify",
- CellID->316863354]
+ CellID->1173966576],
+Cell[16891, 643, 216, 7, 37, "Output",
+ CellTags->"DotSimplify"]
}, Open ]],
-Cell[13775, 535, 190, 5, 27, "Input",
+Cell[17122, 653, 146, 4, 27, "Input",
CellTags->"DotSimplify",
CellID->1813929769]
+}, Open ]]
}, Open ]],
-Cell[13980, 543, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17295, 661, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14048, 548, 270, 12, 31, "SeeAlsoSection",
+Cell[17363, 666, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[14321, 562, 560, 21, 31, "Text",
- CellTags->"DotSimplify",
- CellID->574897097]
+Cell[17636, 680, 517, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[14896, 586, 23, 0, 42, "FooterCell"]
+Cell[18168, 702, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplifyRelations.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplifyRelations.nb
index 7b0139e87..404fb3af4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplifyRelations.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DotSimplifyRelations.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6431, 191]
-NotebookOptionsPosition[ 4042, 124]
-NotebookOutlinePosition[ 6157, 180]
-CellTagsIndexPosition[ 6075, 175]
+NotebookDataLength[ 7115, 211]
+NotebookOptionsPosition[ 4971, 153]
+NotebookOutlinePosition[ 6908, 203]
+CellTagsIndexPosition[ 6865, 200]
WindowTitle->DotSimplifyRelations
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DotSimplifyRelations\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DotSimplifyRelations"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DotSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DotSimplifyRelations\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DotSimplifyRelations"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
DotSimplifyRelations.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$48025],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DotSimplifyRelations", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$75837],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DotSimplifyRelations", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ DotSimplifyRelations.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DotSimplifyRelations", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DotSimplifyRelations", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,16 +140,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["DotSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DotSimplifyRelations",
- CellID->1069685300]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -134,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 24.935409}",
+ "built" -> "{2020, 1, 5, 18, 55, 0.360744}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -145,11 +174,12 @@ TaggingRules->{
"None", "summary" ->
"DotSimplifyRelations is an option for DotSimplify. Its setting may be a \
list of substitution rules of the form DotSimplifyRelations -> {a . b -> c, \
-b^2 -> 0, ...}.", "synonyms" -> {}, "title" -> "DotSimplifyRelations",
- "titlemodifier" -> "", "windowtitle" -> "DotSimplifyRelations", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/DotSimplifyRelations"}},
+b^2 -> 0, ...}.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DotSimplifyRelations", "titlemodifier" -> "", "windowtitle" ->
+ "DotSimplifyRelations", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DotSimplifyRelations"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -158,41 +188,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DotSimplifyRelations"->{
- Cell[3736, 109, 264, 10, 70, "Text",
- CellTags->"DotSimplifyRelations",
- CellID->1069685300]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DotSimplifyRelations", 5951, 168}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[592, 21, 2293, 52, 70, "AnchorBarGrid",
+Cell[592, 21, 3056, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2888, 75, 63, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2954, 78, 484, 13, 70, "Usage",
+Cell[3651, 97, 297, 11, 70, "ObjectNameGrid"],
+Cell[3951, 110, 484, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3463, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4460, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3736, 109, 264, 10, 70, "Text",
- CellTags->"DotSimplifyRelations",
- CellID->1069685300]
+Cell[4733, 141, 196, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4015, 122, 23, 0, 70, "FooterCell"]
+Cell[4944, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndex.nb
index 13f1376a0..d1e9dda99 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndex.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6217, 190]
-NotebookOptionsPosition[ 3928, 123]
-NotebookOutlinePosition[ 5953, 179]
-CellTagsIndexPosition[ 5881, 174]
+NotebookDataLength[ 6945, 209]
+NotebookOptionsPosition[ 4866, 152]
+NotebookOutlinePosition[ 6738, 201]
+CellTagsIndexPosition[ 6695, 198]
WindowTitle->DummyIndex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/DummyIndex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/DummyIndex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/DummyIndex.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$48369],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/DummyIndex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CovariantD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CovariantD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DummyIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DummyIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DummyIndex.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$76723],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DummyIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["DummyIndex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["DummyIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,16 +139,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["CovariantD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/CovariantD",
ButtonNote->"CovariantD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"DummyIndex",
- CellID->1154365207]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 26.215968}",
+ "built" -> "{2020, 1, 5, 18, 55, 2.515508}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -144,11 +173,11 @@ TaggingRules->{
"None", "summary" ->
"DummyIndex is an option of CovariantD specifying an index to use as \
dummy summation index. If set to Automatic, unique indices are generated",
- "synonyms" -> {}, "title" -> "DummyIndex", "titlemodifier" -> "",
- "windowtitle" -> "DummyIndex", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/DummyIndex"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "DummyIndex",
+ "titlemodifier" -> "", "windowtitle" -> "DummyIndex", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/DummyIndex"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "DummyIndex"->{
- Cell[3635, 108, 251, 10, 70, "Text",
- CellTags->"DummyIndex",
- CellID->1154365207]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"DummyIndex", 5767, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3014, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 444, 12, 70, "Usage",
+Cell[3599, 97, 287, 11, 70, "ObjectNameGrid"],
+Cell[3889, 110, 444, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3362, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4358, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3635, 108, 251, 10, 70, "Text",
- CellTags->"DummyIndex",
- CellID->1154365207]
+Cell[4631, 140, 193, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3901, 121, 23, 0, 70, "FooterCell"]
+Cell[4839, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndexFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndexFreeQ.nb
new file mode 100644
index 000000000..129000ce8
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/DummyIndexFreeQ.nb
@@ -0,0 +1,560 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15197, 550]
+NotebookOptionsPosition[ 11089, 423]
+NotebookOutlinePosition[ 13453, 483]
+CellTagsIndexPosition[ 13368, 478]
+WindowTitle->DummyIndexFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCRenameDummyIndices\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCRenameDummyIndices"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"FreeIndexFreeQ\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FreeIndexFreeQ"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/DummyIndexFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/DummyIndexFreeQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+DummyIndexFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$76281],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/DummyIndexFreeQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["DummyIndexFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"DummyIndexFreeQ", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{",
+ RowBox[{"head1", ",", "head2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]returns True if the expression contains dummy indices \
+with heads head1, head2, ... and False otherwise. As always in FeynCalc, \
+Einstein summation convention is implicitly assumed. The function is \
+optimized for large expressions, i.e. it is not so good as a criterion in \
+e.g. Select"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1113296288],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->124185007],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->953326827],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{53, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1392220727]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DummyIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "LorentzIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1482247787],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->600599141]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->950756213],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{55, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->600641716]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DummyIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "LorentzIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1892034700],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->494121601]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1754662751],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{56, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1021516466]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DummyIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "SUNIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1812674747],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1193808511]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "a"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->785933249],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{55, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->424951304]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DummyIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "SUNIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->293653821],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->424642719]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCRenameDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FreeIndexFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FreeIndexFreeQ",
+ ButtonNote->"FreeIndexFreeQ"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1732330916]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"DummyIndexFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 1.266969}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "DummyIndexFreeQ[exp, {head1, head2, ...}] returns True if the expression \
+contains dummy indices with heads head1, head2, ... and False otherwise. As \
+always in FeynCalc, Einstein summation convention is implicitly assumed. The \
+function is optimized for large expressions, i.e. it is not so good as a \
+criterion in e.g. Select", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "DummyIndexFreeQ", "titlemodifier" -> "", "windowtitle" ->
+ "DummyIndexFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/DummyIndexFreeQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4910, 137, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1113296288]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13224, 471}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[587, 21, 3254, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3844, 101, 292, 11, 45, "ObjectNameGrid"],
+Cell[4139, 114, 746, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4910, 137, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1113296288],
+Cell[CellGroupData[{
+Cell[5323, 156, 195, 6, 26, "ExampleSection",
+ CellID->124185007],
+Cell[CellGroupData[{
+Cell[5543, 166, 240, 8, 27, "Input",
+ CellID->953326827],
+Cell[5786, 176, 620, 27, 37, "Output",
+ CellID->1392220727]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6443, 208, 170, 5, 27, "Input",
+ CellID->1482247787],
+Cell[6616, 215, 189, 6, 35, "Output",
+ CellID->600599141]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6842, 226, 240, 8, 27, "Input",
+ CellID->950756213],
+Cell[7085, 236, 619, 27, 37, "Output",
+ CellID->600641716]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7741, 268, 170, 5, 27, "Input",
+ CellID->1892034700],
+Cell[7914, 275, 190, 6, 35, "Output",
+ CellID->494121601]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8141, 286, 155, 5, 27, "Input",
+ CellID->1754662751],
+Cell[8299, 293, 408, 17, 38, "Output",
+ CellID->1021516466]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8744, 315, 166, 5, 27, "Input",
+ CellID->1812674747],
+Cell[8913, 322, 190, 6, 35, "Output",
+ CellID->1193808511]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9140, 333, 154, 5, 27, "Input",
+ CellID->785933249],
+Cell[9297, 340, 407, 17, 35, "Output",
+ CellID->424951304]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9741, 362, 165, 5, 27, "Input",
+ CellID->293653821],
+Cell[9909, 369, 190, 6, 35, "Output",
+ CellID->424642719]
+}, Open ]]
+}, Open ]],
+Cell[10126, 379, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10194, 384, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10467, 398, 580, 20, 56, "SeeAlso",
+ CellID->1732330916]
+}, Open ]],
+Cell[11062, 421, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Eps.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Eps.nb
index 2e02426be..0d876627c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Eps.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Eps.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 26770, 1029]
-NotebookOptionsPosition[ 18468, 732]
-NotebookOutlinePosition[ 23341, 887]
-CellTagsIndexPosition[ 23234, 881]
+NotebookDataLength[ 24642, 919]
+NotebookOptionsPosition[ 18322, 705]
+NotebookOutlinePosition[ 22164, 820]
+CellTagsIndexPosition[ 22057, 814]
WindowTitle->Eps
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Eps\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Eps"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Eps.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$50754],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Eps",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"EpsContract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/EpsContract"], "\<\"EpsEvaluate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/EpsEvaluate"], "\<\"LC\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/LC"], "\<\"LCD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/LCD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Eps\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Eps"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Eps.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$81109],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Eps",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Eps", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Eps", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -115,7 +152,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->186096740],
+ CellID->682619210],
Cell[CellGroupData[{
@@ -125,27 +162,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->852043421],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Eps", "]"}]], "Input",
- CellTags->"Eps",
- CellLabel->"In[1]:=",
- CellID->1709394854],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Dimension", "\[Rule]", "4"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{116, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Eps",
- CellLabel->"Out[1]=",
- CellID->587042521]
-}, Open ]],
+ CellID->224916044],
Cell[CellGroupData[{
@@ -157,12 +174,13 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Sigma]", "]"}]}], "]"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->882253219],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -180,12 +198,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{53, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[2]=",
- CellID->1273521224]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,12 +215,13 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Sigma]", "]"}]}], "]"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1187356604],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
OverscriptBox[
@@ -222,12 +240,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{55, 21},
+ ImageSize->{56, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[3]=",
- CellID->1062644924]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -238,90 +255,77 @@ Cell[BoxData[
RowBox[{"b", ",", "a", ",", "c", ",", "d"}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->2026742577],
-Cell[BoxData[
- RowBox[{"-",
- RowBox[{"Eps", "[",
- RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}]}]], "Output",
- ImageSize->{131, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Eps",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1877955055]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"Eps", "[",
- RowBox[{"0", ",", "1", ",", "2", ",", "3"}], "]"}]], "Input",
- CellTags->"Eps",
- CellLabel->"In[5]:=",
- CellID->1867659172],
-
-Cell[BoxData[
- FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ RowBox[{"b", ",", "a", ",", "c", ",", "d"}], "]"}]], "Output",
+ ImageSize->{124, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[5]=",
- CellID->76823232]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Eps", "[",
- RowBox[{"1", ",", "0", ",", "2", ",", "3"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], ",",
+ RowBox[{"ExplicitLorentzIndex", "[", "1", "]"}], ",",
+ RowBox[{"ExplicitLorentzIndex", "[", "2", "]"}], ",",
+ RowBox[{"ExplicitLorentzIndex", "[", "3", "]"}]}], "]"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[6]:=",
- CellID->272160740],
+ CellLabel->"In[4]:=",
+ CellID->1867659172],
Cell[BoxData[
FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- ImageSize->{21, 15},
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["3",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{47, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[6]=",
- CellID->94949868]
+ CellLabel->"Out[4]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";"}]], "Input",
- CellTags->"Eps",
- CellLabel->"In[7]:=",
- CellID->1590807400],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", " ", "=",
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Sigma]", ",", "D"}], "]"}]}], "]"}]}]], "Input",
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Sigma]", "]"}]}], "]"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[8]:=",
+ CellLabel->"In[5]:=",
CellID->49792760],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -339,64 +343,53 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{53, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[8]=",
- CellID->766535201]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[",
- RowBox[{"a1", " ", "a1"}], "]"}]], "Input",
+ RowBox[{"%", " ", "%"}], "]"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[9]:=",
+ CellLabel->"In[6]:=",
CellID->1112439860],
Cell[BoxData[
FormBox[
RowBox[{"-", "24"}], TraditionalForm]], "Output",
- ImageSize->{30, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[9]=",
- CellID->2017064115]
+ CellLabel->"Out[6]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"Eps",
- CellLabel->"In[10]:=",
- CellID->578443879],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", " ", "=",
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Sigma]", ",", "D"}], "]"}]}], "]"}]}]], "Input",
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Sigma]", ",", "D"}], "]"}]}], "]"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[11]:=",
+ CellLabel->"In[7]:=",
CellID->864825422],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -414,12 +407,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{52, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[11]=",
- CellID->721475866]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -427,9 +419,9 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Contract", "[",
- RowBox[{"a2", " ", "a2"}], "]"}], "//", "Factor2"}]], "Input",
+ RowBox[{"%", " ", "%"}], "]"}], "//", "Factor2"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[12]:=",
+ CellLabel->"In[8]:=",
CellID->225723746],
Cell[BoxData[
@@ -441,31 +433,29 @@ Cell[BoxData[
RowBox[{"2", "-", "D"}], ")"}], " ",
RowBox[{"(",
RowBox[{"3", "-", "D"}], ")"}], " ", "D"}], TraditionalForm]], "Output",
- ImageSize->{165, 15},
+ ImageSize->{181, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[12]=",
- CellID->943115930]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"g5", "=",
+ RowBox[{
RowBox[{
+ RowBox[{"-",
+ FractionBox["\[ImaginaryI]", "24"]}],
RowBox[{
- RowBox[{"-",
- FractionBox["\[ImaginaryI]", "24"]}],
- RowBox[{
- RowBox[{"LCD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Alpha]"}], "]"}],
- ".",
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Alpha]"}],
- "]"}]}]}], "//", "FCI"}]}]], "Input",
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Alpha]"}], "]"}],
+ ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Alpha]"}],
+ "]"}]}]}], "//", "FCI"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[13]:=",
+ CellLabel->"In[9]:=",
CellID->1182317355],
Cell[BoxData[
@@ -474,7 +464,8 @@ Cell[BoxData[
RowBox[{"-",
FractionBox["1", "24"]}], " ", "\[ImaginaryI]", " ",
RowBox[{
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -512,45 +503,43 @@ Cell[BoxData[
FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{186, 41},
+ ImageSize->{193, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[13]=",
- CellID->338258002]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"g5p", "=",
+ RowBox[{
RowBox[{
+ RowBox[{"-",
+ FractionBox["\[ImaginaryI]", "24"]}], " ",
RowBox[{
- RowBox[{"-",
- FractionBox["\[ImaginaryI]", "24"]}], " ",
- RowBox[{
- RowBox[{"LCD", "[",
- RowBox[{
- SuperscriptBox["\[Mu]", "\[Prime]",
- MultilineFunction->None], ",",
- SuperscriptBox["\[Nu]", "\[Prime]",
- MultilineFunction->None], ",",
- SuperscriptBox["\[Rho]", "\[Prime]",
- MultilineFunction->None], ",",
- SuperscriptBox["\[Alpha]", "\[Prime]",
- MultilineFunction->None]}], "]"}], ".",
- RowBox[{"GAD", "[",
- RowBox[{
- SuperscriptBox["\[Mu]", "\[Prime]",
- MultilineFunction->None], ",",
- SuperscriptBox["\[Nu]", "\[Prime]",
- MultilineFunction->None], ",",
- SuperscriptBox["\[Rho]", "\[Prime]",
- MultilineFunction->None], ",",
- SuperscriptBox["\[Alpha]", "\[Prime]",
- MultilineFunction->None]}], "]"}]}]}], "//", "FCI"}]}]], "Input",
+ RowBox[{"LCD", "[",
+ RowBox[{
+ SuperscriptBox["\[Mu]", "\[Prime]",
+ MultilineFunction->None], ",",
+ SuperscriptBox["\[Nu]", "\[Prime]",
+ MultilineFunction->None], ",",
+ SuperscriptBox["\[Rho]", "\[Prime]",
+ MultilineFunction->None], ",",
+ SuperscriptBox["\[Alpha]", "\[Prime]",
+ MultilineFunction->None]}], "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{
+ SuperscriptBox["\[Mu]", "\[Prime]",
+ MultilineFunction->None], ",",
+ SuperscriptBox["\[Nu]", "\[Prime]",
+ MultilineFunction->None], ",",
+ SuperscriptBox["\[Rho]", "\[Prime]",
+ MultilineFunction->None], ",",
+ SuperscriptBox["\[Alpha]", "\[Prime]",
+ MultilineFunction->None]}], "]"}]}]}], "//", "FCI"}]], "Input",
CellTags->"Eps",
- CellLabel->"In[14]:=",
+ CellLabel->"In[10]:=",
CellID->1736669356],
Cell[BoxData[
@@ -559,7 +548,8 @@ Cell[BoxData[
RowBox[{"-",
FractionBox["1", "24"]}], " ", "\[ImaginaryI]", " ",
RowBox[{
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox[
@@ -613,24 +603,20 @@ Cell[BoxData[
MultilineFunction->None],
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{234, 41},
+ ImageSize->{249, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[14]=",
- CellID->1568766861]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"g52", "=",
- RowBox[{"Factor2", "[",
- RowBox[{"Calc", "[",
- RowBox[{"g5", ".", "g5p"}], "]"}], "]"}]}]], "Input",
- CellTags->"Eps",
- CellLabel->"In[15]:=",
- CellID->1776301198],
+ RowBox[{
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ".", "%%"}], "]"}], "//", "Factor2"}]], "Input",
+ CellLabel->"In[11]:="],
Cell[BoxData[
FormBox[
@@ -643,40 +629,29 @@ Cell[BoxData[
RowBox[{"2", "-", "D"}], ")"}], " ",
RowBox[{"(",
RowBox[{"3", "-", "D"}], ")"}], " ", "D"}], TraditionalForm]], "Output",
- ImageSize->{199, 41},
+ ImageSize->{215, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Eps",
- CellLabel->"Out[15]=",
- CellID->1865773591]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"g52", "/.",
+ RowBox[{"%", "/.",
RowBox[{"D", "\[Rule]", "4"}]}]], "Input",
CellTags->"Eps",
- CellLabel->"In[16]:=",
+ CellLabel->"In[12]:=",
CellID->505384444],
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Eps",
- CellLabel->"Out[16]=",
- CellID->82320275]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2", ",", "g5", ",", "g5p", ",", "g52"}],
- "]"}]], "Input",
- CellTags->"Eps",
- CellLabel->"In[17]:=",
- CellID->1000155621]
+ CellLabel->"Out[12]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -699,6 +674,12 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
+ StyleBox[ButtonBox["EpsContract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsContract",
+ ButtonNote->"EpsContract"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["EpsEvaluate",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/EpsEvaluate",
@@ -716,16 +697,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/LCD",
ButtonNote->"LCD"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["LeviCivita",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeviCivita",
- ButtonNote->"LeviCivita"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Eps",
- CellID->328152737]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -742,10 +715,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 35.937121}",
+ "built" -> "{2020, 1, 5, 18, 55, 13.801835}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -754,11 +727,11 @@ TaggingRules->{
"Eps[a, b, c, d] is the head of the totally antisymmetric \\[Epsilon] \
(Levi-Civita) tensor. The a,b, ... may have head LorentzIndex, Momentum or \
Integer. In case of integers the Levi-Civita tensor is evaluated immediately. \
-", "synonyms" -> {}, "title" -> "Eps", "titlemodifier" -> "", "windowtitle" ->
- "Eps", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Eps"},
- "SearchTextTranslated" -> ""},
+", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Eps", "titlemodifier" ->
+ "", "windowtitle" -> "Eps", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Eps"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -766,8 +739,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -776,261 +750,177 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3595, 102, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4837, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->186096740]},
+ CellID->682619210]},
"Eps"->{
- Cell[4227, 131, 124, 4, 27, "Input",
- CellTags->"Eps",
- CellID->1709394854],
- Cell[4354, 137, 266, 9, 36, "Output",
- CellTags->"Eps",
- CellID->587042521],
- Cell[4657, 151, 340, 9, 45, "Input",
+ Cell[5469, 168, 340, 9, 45, "Input",
CellTags->"Eps",
CellID->882253219],
- Cell[5000, 162, 583, 25, 39, "Output",
- CellTags->"Eps",
- CellID->1273521224],
- Cell[5620, 192, 333, 9, 27, "Input",
+ Cell[5812, 179, 586, 25, 35, "Output",
+ CellTags->"Eps"],
+ Cell[6435, 209, 333, 9, 27, "Input",
CellTags->"Eps",
CellID->1187356604],
- Cell[5956, 203, 607, 26, 42, "Output",
- CellTags->"Eps",
- CellID->1062644924],
- Cell[6600, 234, 200, 7, 27, "Input",
+ Cell[6771, 220, 610, 26, 38, "Output",
+ CellTags->"Eps"],
+ Cell[7418, 251, 200, 7, 27, "Input",
CellTags->"Eps",
CellID->2026742577],
- Cell[6803, 243, 283, 9, 49, "Output",
- CellTags->"Eps",
- CellID->1877955055],
- Cell[7123, 257, 161, 5, 27, "Input",
+ Cell[7621, 260, 243, 7, 51, "Output",
+ CellTags->"Eps"],
+ Cell[7901, 272, 353, 9, 45, "Input",
CellTags->"Eps",
CellID->1867659172],
- Cell[7287, 264, 203, 7, 36, "Output",
- CellTags->"Eps",
- CellID->76823232],
- Cell[7527, 276, 160, 5, 27, "Input",
- CellTags->"Eps",
- CellID->272160740],
- Cell[7690, 283, 221, 8, 36, "Output",
- CellTags->"Eps",
- CellID->94949868],
- Cell[7926, 294, 208, 7, 27, "Input",
- CellTags->"Eps",
- CellID->1590807400],
- Cell[8159, 305, 477, 14, 45, "Input",
+ Cell[8257, 283, 566, 25, 38, "Output",
+ CellTags->"Eps"],
+ Cell[8860, 313, 339, 9, 45, "Input",
CellTags->"Eps",
CellID->49792760],
- Cell[8639, 321, 582, 25, 39, "Output",
- CellTags->"Eps",
- CellID->766535201],
- Cell[9258, 351, 148, 5, 27, "Input",
+ Cell[9202, 324, 586, 25, 35, "Output",
+ CellTags->"Eps"],
+ Cell[9825, 354, 146, 5, 27, "Input",
CellTags->"Eps",
CellID->1112439860],
- Cell[9409, 358, 224, 8, 36, "Output",
- CellTags->"Eps",
- CellID->2017064115],
- Cell[9648, 369, 208, 7, 27, "Input",
- CellTags->"Eps",
- CellID->578443879],
- Cell[9881, 380, 479, 14, 45, "Input",
+ Cell[9974, 361, 203, 7, 35, "Output",
+ CellTags->"Eps"],
+ Cell[10214, 373, 440, 13, 45, "Input",
CellTags->"Eps",
CellID->864825422],
- Cell[10363, 396, 583, 25, 39, "Output",
- CellTags->"Eps",
- CellID->721475866],
- Cell[10983, 426, 179, 6, 27, "Input",
+ Cell[10657, 388, 585, 25, 35, "Output",
+ CellTags->"Eps"],
+ Cell[11279, 418, 176, 6, 27, "Input",
CellTags->"Eps",
CellID->225723746],
- Cell[11165, 434, 396, 14, 36, "Output",
- CellTags->"Eps",
- CellID->943115930],
- Cell[11598, 453, 453, 15, 52, "Input",
+ Cell[11458, 426, 375, 13, 37, "Output",
+ CellTags->"Eps"],
+ Cell[11870, 444, 418, 14, 53, "Input",
CellTags->"Eps",
CellID->1182317355],
- Cell[12054, 470, 1226, 49, 62, "Output",
- CellTags->"Eps",
- CellID->338258002],
- Cell[13317, 524, 998, 29, 52, "Input",
+ Cell[12291, 460, 1230, 49, 56, "Output",
+ CellTags->"Eps"],
+ Cell[13558, 514, 949, 28, 53, "Input",
CellTags->"Eps",
CellID->1736669356],
- Cell[14318, 555, 1787, 65, 62, "Output",
- CellTags->"Eps",
- CellID->1568766861],
- Cell[16142, 625, 208, 7, 27, "Input",
- CellTags->"Eps",
- CellID->1776301198],
- Cell[16353, 634, 450, 16, 62, "Output",
- CellTags->"Eps",
- CellID->1865773591],
- Cell[16840, 655, 143, 5, 27, "Input",
+ Cell[14510, 544, 1791, 65, 56, "Output",
+ CellTags->"Eps"],
+ Cell[16934, 639, 141, 5, 27, "Input",
CellTags->"Eps",
CellID->505384444],
- Cell[16986, 662, 204, 7, 36, "Output",
- CellTags->"Eps",
- CellID->82320275],
- Cell[17205, 672, 184, 6, 27, "Input",
- CellTags->"Eps",
- CellID->1000155621],
- Cell[17745, 700, 681, 27, 32, "Text",
- CellTags->"Eps",
- CellID->328152737]}
+ Cell[17078, 646, 185, 6, 35, "Output",
+ CellTags->"Eps"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 20403, 777},
- {"Eps", 20533, 781}
+ {"PrimaryExamplesSection", 20302, 751},
+ {"Eps", 20432, 755}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3245, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 706, 20, 113, "Usage",
+Cell[3823, 102, 280, 11, 45, "ObjectNameGrid"],
+Cell[4106, 115, 706, 20, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3595, 102, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4837, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->186096740],
+ CellID->682619210],
Cell[CellGroupData[{
-Cell[4007, 121, 195, 6, 25, "ExampleSection",
- CellID->852043421],
+Cell[5249, 158, 195, 6, 26, "ExampleSection",
+ CellID->224916044],
Cell[CellGroupData[{
-Cell[4227, 131, 124, 4, 27, "Input",
- CellTags->"Eps",
- CellID->1709394854],
-Cell[4354, 137, 266, 9, 36, "Output",
- CellTags->"Eps",
- CellID->587042521]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4657, 151, 340, 9, 45, "Input",
+Cell[5469, 168, 340, 9, 45, "Input",
CellTags->"Eps",
CellID->882253219],
-Cell[5000, 162, 583, 25, 39, "Output",
- CellTags->"Eps",
- CellID->1273521224]
+Cell[5812, 179, 586, 25, 35, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5620, 192, 333, 9, 27, "Input",
+Cell[6435, 209, 333, 9, 27, "Input",
CellTags->"Eps",
CellID->1187356604],
-Cell[5956, 203, 607, 26, 42, "Output",
- CellTags->"Eps",
- CellID->1062644924]
+Cell[6771, 220, 610, 26, 38, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6600, 234, 200, 7, 27, "Input",
+Cell[7418, 251, 200, 7, 27, "Input",
CellTags->"Eps",
CellID->2026742577],
-Cell[6803, 243, 283, 9, 49, "Output",
- CellTags->"Eps",
- CellID->1877955055]
+Cell[7621, 260, 243, 7, 51, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7123, 257, 161, 5, 27, "Input",
+Cell[7901, 272, 353, 9, 45, "Input",
CellTags->"Eps",
CellID->1867659172],
-Cell[7287, 264, 203, 7, 36, "Output",
- CellTags->"Eps",
- CellID->76823232]
+Cell[8257, 283, 566, 25, 38, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7527, 276, 160, 5, 27, "Input",
- CellTags->"Eps",
- CellID->272160740],
-Cell[7690, 283, 221, 8, 36, "Output",
- CellTags->"Eps",
- CellID->94949868]
-}, Open ]],
-Cell[7926, 294, 208, 7, 27, "Input",
- CellTags->"Eps",
- CellID->1590807400],
-Cell[CellGroupData[{
-Cell[8159, 305, 477, 14, 45, "Input",
+Cell[8860, 313, 339, 9, 45, "Input",
CellTags->"Eps",
CellID->49792760],
-Cell[8639, 321, 582, 25, 39, "Output",
- CellTags->"Eps",
- CellID->766535201]
+Cell[9202, 324, 586, 25, 35, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9258, 351, 148, 5, 27, "Input",
+Cell[9825, 354, 146, 5, 27, "Input",
CellTags->"Eps",
CellID->1112439860],
-Cell[9409, 358, 224, 8, 36, "Output",
- CellTags->"Eps",
- CellID->2017064115]
+Cell[9974, 361, 203, 7, 35, "Output",
+ CellTags->"Eps"]
}, Open ]],
-Cell[9648, 369, 208, 7, 27, "Input",
- CellTags->"Eps",
- CellID->578443879],
Cell[CellGroupData[{
-Cell[9881, 380, 479, 14, 45, "Input",
+Cell[10214, 373, 440, 13, 45, "Input",
CellTags->"Eps",
CellID->864825422],
-Cell[10363, 396, 583, 25, 39, "Output",
- CellTags->"Eps",
- CellID->721475866]
+Cell[10657, 388, 585, 25, 35, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10983, 426, 179, 6, 27, "Input",
+Cell[11279, 418, 176, 6, 27, "Input",
CellTags->"Eps",
CellID->225723746],
-Cell[11165, 434, 396, 14, 36, "Output",
- CellTags->"Eps",
- CellID->943115930]
+Cell[11458, 426, 375, 13, 37, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11598, 453, 453, 15, 52, "Input",
+Cell[11870, 444, 418, 14, 53, "Input",
CellTags->"Eps",
CellID->1182317355],
-Cell[12054, 470, 1226, 49, 62, "Output",
- CellTags->"Eps",
- CellID->338258002]
+Cell[12291, 460, 1230, 49, 56, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13317, 524, 998, 29, 52, "Input",
+Cell[13558, 514, 949, 28, 53, "Input",
CellTags->"Eps",
CellID->1736669356],
-Cell[14318, 555, 1787, 65, 62, "Output",
- CellTags->"Eps",
- CellID->1568766861]
+Cell[14510, 544, 1791, 65, 56, "Output",
+ CellTags->"Eps"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16142, 625, 208, 7, 27, "Input",
- CellTags->"Eps",
- CellID->1776301198],
-Cell[16353, 634, 450, 16, 62, "Output",
- CellTags->"Eps",
- CellID->1865773591]
+Cell[16338, 614, 145, 4, 27, "Input"],
+Cell[16486, 620, 411, 14, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16840, 655, 143, 5, 27, "Input",
+Cell[16934, 639, 141, 5, 27, "Input",
CellTags->"Eps",
CellID->505384444],
-Cell[16986, 662, 204, 7, 36, "Output",
- CellTags->"Eps",
- CellID->82320275]
+Cell[17078, 646, 185, 6, 35, "Output",
+ CellTags->"Eps"]
+}, Open ]]
}, Open ]],
-Cell[17205, 672, 184, 6, 27, "Input",
- CellTags->"Eps",
- CellID->1000155621]
-}, Open ]],
-Cell[17404, 681, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17290, 656, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17472, 686, 270, 12, 31, "SeeAlsoSection",
+Cell[17358, 661, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[17745, 700, 681, 27, 32, "Text",
- CellTags->"Eps",
- CellID->328152737]
+Cell[17631, 675, 649, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[18441, 730, 23, 0, 42, "FooterCell"]
+Cell[18295, 703, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsChisholm.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsChisholm.nb
index 77114fa09..6a9ee283f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsChisholm.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsChisholm.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12819, 461]
-NotebookOptionsPosition[ 9250, 351]
-NotebookOutlinePosition[ 11846, 424]
-CellTagsIndexPosition[ 11731, 418]
+NotebookDataLength[ 14153, 497]
+NotebookOptionsPosition[ 10944, 401]
+NotebookOutlinePosition[ 13060, 458]
+CellTagsIndexPosition[ 12975, 453]
WindowTitle->EpsChisholm
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/EpsChisholm\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/EpsChisholm"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Chisholm\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Chisholm"], "\<\"Eps\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsChisholm\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsChisholm"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
EpsChisholm.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$48713],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/EpsChisholm", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$77167],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsChisholm", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +98,27 @@ EpsChisholm.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["EpsChisholm", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["EpsChisholm", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"EpsChisholm", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "substitutes for a gamma matrix contracted with a Levi-Civita tensor \
-(Eps) the Chisholm identity."
+ RowBox[{"EpsChisholm", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]applies the Chisholm identiy to a Dirac matrix \
+contracted with a Levi-Civita tensor"
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +129,60 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2032463450],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "EpsChisholm", "]"}]], "Input",
+ CellLabel->"In[54]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{416, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[54]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +198,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1704552531],
+ CellID->267243850],
Cell[CellGroupData[{
@@ -118,201 +208,151 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->847503033],
+ CellID->1000614591],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Chisholm", "[",
- RowBox[{"GA", "[",
+ RowBox[{
+ RowBox[{"LC", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
- "]"}]], "Input",
- CellTags->"EpsChisholm",
- CellLabel->"In[1]:=",
- CellID->1696563627],
+ RowBox[{"GA", "[",
+ RowBox[{"\[Sigma]", ",", "5"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["$MU$6147",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["$MU$6147",
- TraditionalForm],
- TraditionalForm]}]]}]}], "+",
RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]], ".",
+ FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]]}], " ",
+ TraditionalForm]],
+ TraditionalForm], ".",
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{505, 19},
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{101, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"EpsChisholm",
- CellLabel->"Out[1]=",
- CellID->378756372]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"EpsChisholm", "[", "%", "]"}]], "Input",
- CellTags->"EpsChisholm",
- CellLabel->"In[2]:=",
- CellID->1192722750],
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{93, 18},
+ RowBox[{"-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}]}]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{341, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"EpsChisholm",
- CellLabel->"Out[2]=",
- CellID->1298618997]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -341,18 +381,28 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/Chisholm",
ButtonNote->"Chisholm"],
FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"EpsChisholm",
- CellID->2052423258]
+ ", ",
+ StyleBox[ButtonBox["Eps",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"]
+}], "SeeAlso",
+ CellID->655647701]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"EpsChisholm",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -361,22 +411,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 27.526990}",
+ "built" -> "{2020, 1, 5, 18, 55, 3.578066}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "EpsChisholm[expr] substitutes for a gamma matrix contracted with a \
-Levi-Civita tensor (Eps) the Chisholm identity.", "synonyms" -> {}, "title" ->
- "EpsChisholm", "titlemodifier" -> "", "windowtitle" -> "EpsChisholm",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/EpsChisholm"},
+ "EpsChisholm[exp] applies the Chisholm identiy to a Dirac matrix \
+contracted with a Levi-Civita tensor", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "EpsChisholm", "titlemodifier" -> "", "windowtitle" ->
+ "EpsChisholm", "type" -> "Symbol", "uri" -> "FeynCalc/ref/EpsChisholm"},
"SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -384,8 +434,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -394,75 +445,60 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3372, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5969, 185, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1704552531]},
- "EpsChisholm"->{
- Cell[4005, 124, 227, 7, 27, "Input",
- CellTags->"EpsChisholm",
- CellID->1696563627],
- Cell[4235, 133, 3400, 138, 40, "Output",
- CellTags->"EpsChisholm",
- CellID->378756372],
- Cell[7672, 276, 134, 4, 27, "Input",
- CellTags->"EpsChisholm",
- CellID->1192722750],
- Cell[7809, 282, 800, 32, 39, "Output",
- CellTags->"EpsChisholm",
- CellID->1298618997],
- Cell[8977, 337, 231, 9, 31, "Text",
- CellTags->"EpsChisholm",
- CellID->2052423258]}
+ CellID->267243850]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11110, 395},
- {"EpsChisholm", 11248, 399}
+ {"PrimaryExamplesSection", 12832, 446}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3188, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 447, 13, 83, "Usage",
+Cell[3774, 100, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4087, 115, 424, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3372, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4536, 131, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2032463450],
+Cell[5278, 157, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5334, 161, 94, 2, 70, "Input"],
+Cell[5431, 165, 477, 13, 56, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5969, 185, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1704552531],
+ CellID->267243850],
Cell[CellGroupData[{
-Cell[3785, 114, 195, 6, 25, "ExampleSection",
- CellID->847503033],
+Cell[6381, 204, 196, 6, 26, "ExampleSection",
+ CellID->1000614591],
Cell[CellGroupData[{
-Cell[4005, 124, 227, 7, 27, "Input",
- CellTags->"EpsChisholm",
- CellID->1696563627],
-Cell[4235, 133, 3400, 138, 40, "Output",
- CellTags->"EpsChisholm",
- CellID->378756372]
+Cell[6602, 214, 220, 6, 27, "Input"],
+Cell[6825, 222, 1011, 42, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7672, 276, 134, 4, 27, "Input",
- CellTags->"EpsChisholm",
- CellID->1192722750],
-Cell[7809, 282, 800, 32, 39, "Output",
- CellTags->"EpsChisholm",
- CellID->1298618997]
+Cell[7873, 269, 87, 2, 27, "Input"],
+Cell[7963, 273, 2061, 81, 37, "Output"]
}, Open ]]
}, Open ]],
-Cell[8636, 318, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10051, 358, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8704, 323, 270, 12, 31, "SeeAlsoSection",
+Cell[10119, 363, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8977, 337, 231, 9, 31, "Text",
- CellTags->"EpsChisholm",
- CellID->2052423258]
+Cell[10392, 377, 510, 19, 56, "SeeAlso",
+ CellID->655647701]
}, Open ]],
-Cell[9223, 349, 23, 0, 42, "FooterCell"]
+Cell[10917, 399, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContract.nb
index b28a0cd30..9b8d4e05e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContract.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContract.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11346, 395]
-NotebookOptionsPosition[ 7336, 271]
-NotebookOutlinePosition[ 10169, 350]
-CellTagsIndexPosition[ 10056, 344]
+NotebookDataLength[ 12513, 435]
+NotebookOptionsPosition[ 8901, 326]
+NotebookOutlinePosition[ 11416, 395]
+CellTagsIndexPosition[ 11301, 389]
WindowTitle->EpsContract
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/EpsContract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/EpsContract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Eps\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Contract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsContract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsContract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
EpsContract.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$49048],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/EpsContract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$78043],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsContract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +97,26 @@ EpsContract.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["EpsContract", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["EpsContract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData["EpsContract"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option of Contract specifying whether Levi-Civita tensors \
-Eps[...] will be contracted, i.e., products of two Eps are replaced via the \
-determinant formula."
+ Cell[BoxData[
+ RowBox[{"EpsContract", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]handles contractions of two Levi-Civita tensors. It is \
+also an option of Contract and other functions that specifies whether such \
+contractions should be done or not."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -108,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1783233241],
+ CellID->1606407450],
Cell[CellGroupData[{
@@ -118,29 +152,20 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1533026957],
+ CellID->698680576],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", " ", "=",
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Sigma]", ",", "D"}], "]"}]}], "]"}]}]], "Input",
- CellTags->"EpsContract",
- CellLabel->"In[1]:=",
- CellID->1863867389],
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -158,12 +183,63 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{52, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"EpsContract", "[",
+ RowBox[{"%", " ", "%"}], "]"}], "//", "Factor2"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ", "D"}], TraditionalForm]], "Output",
+ ImageSize->{181, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Contract", "[",
+ RowBox[{"%", " ", "%"}], "]"}], "//", "Factor2"}]], "Input",
+ CellTags->"EpsContract",
+ CellLabel->"In[3]:=",
+ CellID->1929247061],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], "2"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], "2"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], "2"], " ",
+ SuperscriptBox["D", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{213, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"EpsContract",
- CellLabel->"Out[1]=",
- CellID->1306724827]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -171,17 +247,21 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[",
RowBox[{
- RowBox[{"a1", " ", "a1"}], ",",
+ RowBox[{
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "^", "2"}], ",",
RowBox[{"EpsContract", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"EpsContract",
- CellLabel->"In[2]:=",
- CellID->1929247061],
+ CellLabel->"In[4]:=",
+ CellID->903937612],
Cell[BoxData[
FormBox[
SuperscriptBox[
RowBox[{"(",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -199,34 +279,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], ")"}], "2"], TraditionalForm]], "Output",
- ImageSize->{75, 21},
+ ImageSize->{72, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"EpsContract",
- CellLabel->"Out[2]=",
- CellID->1644037415]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Contract", "[",
- RowBox[{
- RowBox[{"a1", " ", "a1"}], ",",
- RowBox[{"EpsContract", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"EpsContract",
- CellLabel->"In[3]:=",
- CellID->903937612],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-", "24"}], TraditionalForm]], "Output",
- ImageSize->{30, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"EpsContract",
- CellLabel->"Out[3]=",
- CellID->848962305]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -262,17 +319,15 @@ Cell[TextData[{
ButtonNote->"Contract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"EpsContract",
- CellID->1380465394]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"EpsContract",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -281,22 +336,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 28.981206}",
+ "built" -> "{2020, 1, 5, 18, 55, 6.061578}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "EpsContract is an option of Contract specifying whether Levi-Civita \
-tensors Eps[...] will be contracted, i.e., products of two Eps are replaced \
-via the determinant formula.", "synonyms" -> {}, "title" -> "EpsContract",
- "titlemodifier" -> "", "windowtitle" -> "EpsContract", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/EpsContract"}, "SearchTextTranslated" -> ""},
+ "EpsContract[exp] handles contractions of two Levi-Civita tensors. It is \
+also an option of Contract and other functions that specifies whether such \
+contractions should be done or not.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "EpsContract", "titlemodifier" -> "", "windowtitle" ->
+ "EpsContract", "type" -> "Symbol", "uri" -> "FeynCalc/ref/EpsContract"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -305,7 +361,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -314,89 +370,73 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3404, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4517, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1783233241]},
+ CellID->1606407450]},
"EpsContract"->{
- Cell[4038, 124, 487, 14, 45, "Input",
- CellTags->"EpsContract",
- CellID->1863867389],
- Cell[4528, 140, 591, 25, 39, "Output",
- CellTags->"EpsContract",
- CellID->1306724827],
- Cell[5156, 170, 224, 7, 27, "Input",
+ Cell[6440, 216, 185, 6, 27, "Input",
CellTags->"EpsContract",
CellID->1929247061],
- Cell[5383, 179, 675, 27, 42, "Output",
- CellTags->"EpsContract",
- CellID->1644037415],
- Cell[6095, 211, 222, 7, 27, "Input",
+ Cell[6628, 224, 489, 17, 39, "Output",
+ CellTags->"EpsContract"],
+ Cell[7154, 246, 324, 10, 27, "Input",
CellTags->"EpsContract",
CellID->903937612],
- Cell[6320, 220, 231, 8, 36, "Output",
- CellTags->"EpsContract",
- CellID->848962305],
- Cell[6919, 251, 375, 15, 32, "Text",
- CellTags->"EpsContract",
- CellID->1380465394]}
+ Cell[7481, 258, 679, 27, 42, "Output",
+ CellTags->"EpsContract"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9253, 315},
- {"EpsContract", 9391, 319}
+ {"PrimaryExamplesSection", 10816, 371},
+ {"EpsContract", 10955, 375}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3107, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 479, 13, 98, "Usage",
+Cell[3693, 99, 288, 11, 45, "ObjectNameGrid"],
+Cell[3984, 112, 508, 13, 101, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3404, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4517, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1783233241],
+ CellID->1606407450],
Cell[CellGroupData[{
-Cell[3817, 114, 196, 6, 25, "ExampleSection",
- CellID->1533026957],
+Cell[4930, 148, 195, 6, 26, "ExampleSection",
+ CellID->698680576],
Cell[CellGroupData[{
-Cell[4038, 124, 487, 14, 45, "Input",
- CellTags->"EpsContract",
- CellID->1863867389],
-Cell[4528, 140, 591, 25, 39, "Output",
- CellTags->"EpsContract",
- CellID->1306724827]
+Cell[5150, 158, 145, 4, 27, "Input"],
+Cell[5298, 164, 567, 24, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5902, 193, 141, 4, 27, "Input"],
+Cell[6046, 199, 357, 12, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5156, 170, 224, 7, 27, "Input",
+Cell[6440, 216, 185, 6, 27, "Input",
CellTags->"EpsContract",
CellID->1929247061],
-Cell[5383, 179, 675, 27, 42, "Output",
- CellTags->"EpsContract",
- CellID->1644037415]
+Cell[6628, 224, 489, 17, 39, "Output",
+ CellTags->"EpsContract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6095, 211, 222, 7, 27, "Input",
+Cell[7154, 246, 324, 10, 27, "Input",
CellTags->"EpsContract",
CellID->903937612],
-Cell[6320, 220, 231, 8, 36, "Output",
- CellTags->"EpsContract",
- CellID->848962305]
+Cell[7481, 258, 679, 27, 42, "Output",
+ CellTags->"EpsContract"]
}, Open ]]
}, Open ]],
-Cell[6578, 232, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8187, 289, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6646, 237, 270, 12, 31, "SeeAlsoSection",
+Cell[8255, 294, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6919, 251, 375, 15, 32, "Text",
- CellTags->"EpsContract",
- CellID->1380465394]
+Cell[8528, 308, 331, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7309, 269, 23, 0, 42, "FooterCell"]
+Cell[8874, 324, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContractFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContractFreeQ.nb
new file mode 100644
index 000000000..d347b400b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsContractFreeQ.nb
@@ -0,0 +1,435 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12119, 425]
+NotebookOptionsPosition[ 8780, 324]
+NotebookOutlinePosition[ 10986, 382]
+CellTagsIndexPosition[ 10901, 377]
+WindowTitle->EpsContractFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"EpsContract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/EpsContract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsContractFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsContractFreeQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+EpsContractFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$77605],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsContractFreeQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["EpsContractFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"EpsContractFreeQ", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]returns True if the expression contains epsilon \
+tensors that can be contracted with each other. The function is optimized for \
+large expressions, i.e. it is not so good as a criterion in e.g. Select"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1538539530],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1190513972],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{"LC", "[",
+ RowBox[{"p1", ",", "p2", ",", "p3", ",", "p4"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->194594739],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{68, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->216300725]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"EpsContractFreeQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1135797473],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->900745743]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"p1", ",", "p2", ",", "p3", ",", "mu"}], "]"}], " ",
+ RowBox[{"LC", "[",
+ RowBox[{"q1", ",", "q2", ",", "q3", ",", "q4"}], "]"}]}], "]"}]], "Input",\
+
+ CellLabel->"In[3]:=",
+ CellID->401856309],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["q3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["q4",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{138, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->172471305]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"EpsContractFreeQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1103072881],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1920409101]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["EpsContract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsContract",
+ ButtonNote->"EpsContract"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->14792505]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"EpsContractFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 4.741999}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "EpsContractFreeQ[exp] returns True if the expression contains epsilon \
+tensors that can be contracted with each other. The function is optimized for \
+large expressions, i.e. it is not so good as a criterion in e.g. Select",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "EpsContractFreeQ",
+ "titlemodifier" -> "", "windowtitle" -> "EpsContractFreeQ", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/EpsContractFreeQ"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4583, 128, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1538539530]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10757, 370}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 3126, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3717, 98, 293, 11, 45, "ObjectNameGrid"],
+Cell[4013, 111, 545, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4583, 128, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1538539530],
+Cell[CellGroupData[{
+Cell[4996, 147, 196, 6, 26, "ExampleSection",
+ CellID->1190513972],
+Cell[CellGroupData[{
+Cell[5217, 157, 176, 5, 27, "Input",
+ CellID->194594739],
+Cell[5396, 164, 572, 25, 38, "Output",
+ CellID->216300725]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6005, 194, 113, 3, 27, "Input",
+ CellID->1135797473],
+Cell[6121, 199, 189, 6, 35, "Output",
+ CellID->900745743]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6347, 210, 282, 9, 27, "Input",
+ CellID->401856309],
+Cell[6632, 221, 1020, 45, 38, "Output",
+ CellID->172471305]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7689, 271, 113, 3, 27, "Input",
+ CellID->1103072881],
+Cell[7805, 276, 191, 6, 35, "Output",
+ CellID->1920409101]
+}, Open ]]
+}, Open ]],
+Cell[8023, 286, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8091, 291, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8364, 305, 374, 14, 56, "SeeAlso",
+ CellID->14792505]
+}, Open ]],
+Cell[8753, 322, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsDiscard.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsDiscard.nb
index 6f8e32463..5bc40011a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsDiscard.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsDiscard.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6160, 188]
-NotebookOptionsPosition[ 3900, 122]
-NotebookOutlinePosition[ 5897, 177]
-CellTagsIndexPosition[ 5825, 172]
+NotebookDataLength[ 6916, 209]
+NotebookOptionsPosition[ 4859, 152]
+NotebookOutlinePosition[ 6709, 201]
+CellTagsIndexPosition[ 6666, 198]
WindowTitle->EpsDiscard
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/EpsDiscard\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/EpsDiscard"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/EpsDiscard.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$49384],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/EpsDiscard", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc2FORM\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalc2FORM"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsDiscard\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsDiscard"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+EpsDiscard.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$78480],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsDiscard", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["EpsDiscard", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["EpsDiscard", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"FeynCalc2FORM"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"EpsDiscard",
- CellID->1847314913]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 30.379541}",
+ "built" -> "{2020, 1, 5, 18, 55, 7.271440}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -143,10 +173,11 @@ TaggingRules->{
"None", "summary" ->
"EpsDiscard is an option for FeynCalc2FORM. If set to True all \
Levi-Civita tensors are replaced by 0 after contraction.", "synonyms" -> {},
- "title" -> "EpsDiscard", "titlemodifier" -> "", "windowtitle" ->
- "EpsDiscard", "type" -> "Symbol", "uri" -> "FeynCalc/ref/EpsDiscard"}},
+ "tabletags" -> {}, "title" -> "EpsDiscard", "titlemodifier" -> "",
+ "windowtitle" -> "EpsDiscard", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/EpsDiscard"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "EpsDiscard"->{
- Cell[3613, 108, 245, 9, 70, "Text",
- CellTags->"EpsDiscard",
- CellID->1847314913]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"EpsDiscard", 5712, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3020, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 422, 12, 70, "Usage",
+Cell[3605, 97, 287, 11, 70, "ObjectNameGrid"],
+Cell[3895, 110, 422, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3340, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4342, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3613, 108, 245, 9, 70, "Text",
- CellTags->"EpsDiscard",
- CellID->1847314913]
+Cell[4615, 140, 202, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3873, 120, 23, 0, 70, "FooterCell"]
+Cell[4832, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsEvaluate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsEvaluate.nb
index baec0689d..7664625e9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsEvaluate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsEvaluate.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12571, 443]
-NotebookOptionsPosition[ 8611, 319]
-NotebookOutlinePosition[ 11395, 398]
-CellTagsIndexPosition[ 11280, 392]
+NotebookDataLength[ 14844, 522]
+NotebookOptionsPosition[ 10834, 398]
+NotebookOutlinePosition[ 13445, 471]
+CellTagsIndexPosition[ 13330, 465]
WindowTitle->EpsEvaluate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/EpsEvaluate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/EpsEvaluate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"Eps\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Eps"], "\<\"LC\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/LC"], "\<\"Trick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Trick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsEvaluate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsEvaluate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
EpsEvaluate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$49731],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/EpsEvaluate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$78925],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsEvaluate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +98,27 @@ EpsEvaluate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["EpsEvaluate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["EpsEvaluate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"EpsEvaluate", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "applies total antisymmetry and linearity (w.r.t. Momentum's) to all \
-Levi-Civita tensors (Eps') in expr."
+ " \[LineSeparator]applies total antisymmetry and linearity (w.r.t. \
+momenta) to all Levi-Civita tensors (Eps') in expr."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +129,57 @@ Levi-Civita tensors (Eps') in expr."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1134527267],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "EpsEvaluate", "]"}]], "Input",
+ CellLabel->"In[705]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{275, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[705]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +195,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1157327986],
+ CellID->1045845675],
Cell[CellGroupData[{
@@ -118,26 +205,29 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2006863315],
+ CellID->227360342],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Trick", "[",
- RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
- " ",
- RowBox[{"FourVector", "[",
- RowBox[{
- RowBox[{"p", "+", "q"}], ",", "\[Sigma]"}], "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"p", "+", "q"}], ",", "\[Sigma]"}], "]"}]}], "]"}], "//",
+ "MomentumCombine"}]], "Input",
CellTags->"EpsEvaluate",
CellLabel->"In[1]:=",
CellID->684764895],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -162,12 +252,11 @@ Cell[BoxData[
TraditionalForm], "_"]}],
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{70, 21},
+ ImageSize->{77, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"EpsEvaluate",
- CellLabel->"Out[1]=",
- CellID->440945173]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -181,7 +270,8 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -200,7 +290,8 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}]], "+",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -219,12 +310,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{117, 21},
+ ImageSize->{125, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"EpsEvaluate",
- CellLabel->"Out[2]=",
- CellID->352429971]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -239,30 +329,21 @@ Cell[BoxData[
RowBox[{
RowBox[{"Eps", "[",
RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[", "p", "]"}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], "+",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
+ RowBox[{"Momentum", "[", "p", "]"}]}], "]"}], "+",
RowBox[{"Eps", "[",
RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[", "q", "]"}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Output",
- ImageSize->{408, 67},
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
+ RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]}]], "Output",
+ ImageSize->{559, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"EpsEvaluate",
- CellLabel->"Out[3]//StandardForm=",
- CellID->746268781]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -298,10 +379,10 @@ Cell[TextData[{
ButtonNote->"Eps"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["LeviCivita",
+ StyleBox[ButtonBox["LC",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeviCivita",
- ButtonNote->"LeviCivita"],
+ ButtonData->"paclet:FeynCalc/ref/LC",
+ ButtonNote->"LC"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["Trick",
@@ -310,9 +391,7 @@ Cell[TextData[{
ButtonNote->"Trick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"EpsEvaluate",
- CellID->1755604338]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -329,22 +408,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 31.633847}",
+ "built" -> "{2020, 1, 5, 18, 55, 8.290141}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"EpsEvaluate[expr] applies total antisymmetry and linearity (w.r.t. \
-Momentum's) to all Levi-Civita tensors (Eps') in expr.", "synonyms" -> {},
- "title" -> "EpsEvaluate", "titlemodifier" -> "", "windowtitle" ->
- "EpsEvaluate", "type" -> "Symbol", "uri" -> "FeynCalc/ref/EpsEvaluate"},
- "SearchTextTranslated" -> ""},
+momenta) to all Levi-Civita tensors (Eps') in expr.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "EpsEvaluate", "titlemodifier" -> "",
+ "windowtitle" -> "EpsEvaluate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/EpsEvaluate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -353,7 +432,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -362,89 +441,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3379, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5876, 182, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1157327986]},
+ CellID->1045845675]},
"EpsEvaluate"->{
- Cell[4013, 124, 353, 11, 27, "Input",
+ Cell[6509, 211, 388, 13, 27, "Input",
CellTags->"EpsEvaluate",
CellID->684764895],
- Cell[4369, 137, 754, 32, 42, "Output",
- CellTags->"EpsEvaluate",
- CellID->440945173],
- Cell[5160, 174, 132, 4, 27, "Input",
+ Cell[6900, 226, 758, 32, 38, "Output",
+ CellTags->"EpsEvaluate"],
+ Cell[7695, 263, 132, 4, 27, "Input",
CellTags->"EpsEvaluate",
CellID->84932068],
- Cell[5295, 180, 1072, 46, 42, "Output",
- CellTags->"EpsEvaluate",
- CellID->352429971],
- Cell[6404, 231, 135, 4, 27, "Input",
+ Cell[7830, 269, 1102, 47, 38, "Output",
+ CellTags->"EpsEvaluate"],
+ Cell[8969, 321, 135, 4, 27, "Input",
CellTags->"EpsEvaluate",
CellID->1124825353],
- Cell[6542, 237, 969, 27, 101, "Output",
- CellTags->"EpsEvaluate",
- CellID->746268781],
- Cell[7879, 287, 690, 27, 32, "Text",
- CellTags->"EpsEvaluate",
- CellID->1755604338]}
+ Cell[9107, 327, 695, 18, 69, "Output",
+ CellTags->"EpsEvaluate"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10478, 363},
- {"EpsEvaluate", 10616, 367}
+ {"PrimaryExamplesSection", 12685, 442},
+ {"EpsEvaluate", 12824, 446}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3244, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 454, 13, 83, "Usage",
+Cell[3830, 100, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4143, 115, 442, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3379, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4610, 131, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1134527267],
+Cell[5352, 157, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5408, 161, 95, 2, 70, "Input"],
+Cell[5506, 165, 309, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5876, 182, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1157327986],
+ CellID->1045845675],
Cell[CellGroupData[{
-Cell[3792, 114, 196, 6, 25, "ExampleSection",
- CellID->2006863315],
+Cell[6289, 201, 195, 6, 26, "ExampleSection",
+ CellID->227360342],
Cell[CellGroupData[{
-Cell[4013, 124, 353, 11, 27, "Input",
+Cell[6509, 211, 388, 13, 27, "Input",
CellTags->"EpsEvaluate",
CellID->684764895],
-Cell[4369, 137, 754, 32, 42, "Output",
- CellTags->"EpsEvaluate",
- CellID->440945173]
+Cell[6900, 226, 758, 32, 38, "Output",
+ CellTags->"EpsEvaluate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5160, 174, 132, 4, 27, "Input",
+Cell[7695, 263, 132, 4, 27, "Input",
CellTags->"EpsEvaluate",
CellID->84932068],
-Cell[5295, 180, 1072, 46, 42, "Output",
- CellTags->"EpsEvaluate",
- CellID->352429971]
+Cell[7830, 269, 1102, 47, 38, "Output",
+ CellTags->"EpsEvaluate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6404, 231, 135, 4, 27, "Input",
+Cell[8969, 321, 135, 4, 27, "Input",
CellTags->"EpsEvaluate",
CellID->1124825353],
-Cell[6542, 237, 969, 27, 101, "Output",
- CellTags->"EpsEvaluate",
- CellID->746268781]
+Cell[9107, 327, 695, 18, 69, "Output",
+ CellTags->"EpsEvaluate"]
}, Open ]]
}, Open ]],
-Cell[7538, 268, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9829, 349, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7606, 273, 270, 12, 31, "SeeAlsoSection",
+Cell[9897, 354, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7879, 287, 690, 27, 32, "Text",
- CellTags->"EpsEvaluate",
- CellID->1755604338]
+Cell[10170, 368, 622, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[8584, 317, 23, 0, 42, "FooterCell"]
+Cell[10807, 396, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsUncontract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsUncontract.nb
deleted file mode 100644
index 0d5c88c7b..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsUncontract.nb
+++ /dev/null
@@ -1,202 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6234, 193]
-NotebookOptionsPosition[ 4000, 127]
-NotebookOutlinePosition[ 5967, 182]
-CellTagsIndexPosition[ 5892, 177]
-WindowTitle->EpsUncontract
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/EpsUncontract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/EpsUncontract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-EpsUncontract.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$51107],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/EpsUncontract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["EpsUncontract", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["EpsUncontract"], "InlineFormula"],
- " \[LineSeparator]",
- "does Uncontract on scalar products involving Eps."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["Eps",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Eps",
- ButtonNote->"Eps"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Uncontract",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Uncontract",
- ButtonNote->"Uncontract"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"EpsUncontract",
- CellID->2022012771]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"EpsUncontract",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 37.529531}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "EpsUncontract does Uncontract on scalar products involving Eps.",
- "synonyms" -> {}, "title" -> "EpsUncontract", "titlemodifier" -> "",
- "windowtitle" -> "EpsUncontract", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/EpsUncontract"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "EpsUncontract"->{
- Cell[3575, 107, 383, 15, 70, "Text",
- CellTags->"EpsUncontract",
- CellID->2022012771]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"EpsUncontract", 5775, 170}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[585, 21, 2265, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2853, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 365, 11, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3302, 93, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3575, 107, 383, 15, 70, "Text",
- CellTags->"EpsUncontract",
- CellID->2022012771]
-}, Open ]],
-Cell[3973, 125, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Epsilon.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Epsilon.nb
index cb468d91d..18785084a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Epsilon.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Epsilon.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9760, 338]
-NotebookOptionsPosition[ 6121, 223]
-NotebookOutlinePosition[ 8732, 298]
-CellTagsIndexPosition[ 8623, 292]
+NotebookDataLength[ 10322, 351]
+NotebookOptionsPosition[ 6990, 249]
+NotebookOutlinePosition[ 9430, 318]
+CellTagsIndexPosition[ 9321, 312]
WindowTitle->Epsilon
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Epsilon\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Epsilon"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Epsilon.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Series2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Series2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Epsilon\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Epsilon"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Epsilon.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$50071],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Epsilon", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$79797],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Epsilon", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Epsilon", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Epsilon", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->38144067],
+ CellID->1025208523],
Cell[CellGroupData[{
@@ -123,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1234589163],
+ CellID->1872756934],
Cell[CellGroupData[{
@@ -136,19 +168,16 @@ Cell[BoxData[
FormBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Epsilon",
- CellLabel->"Out[1]=",
- CellID->750039629]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
Epsilon has no functional properties, but some upvalues are changed:\
-\>", "Text",
- CellTags->"Epsilon",
- CellID->568077555],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -179,12 +208,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True", ",", "True"}],
"}"}], TraditionalForm]], "Output",
- ImageSize->{194, 15},
+ ImageSize->{187, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Epsilon",
- CellLabel->"Out[2]=",
- CellID->1912563910]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -214,9 +242,7 @@ Cell[TextData[{
ButtonNote->"Series2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Epsilon",
- CellID->2095009444]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -224,7 +250,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Epsilon",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -233,21 +259,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 33.188466}",
+ "built" -> "{2020, 1, 5, 18, 55, 10.780254}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Epsilon is (n-4), where n is the space-time dimension. Epsilon stands \
-for a small positive number.", "synonyms" -> {}, "title" -> "Epsilon",
- "titlemodifier" -> "", "windowtitle" -> "Epsilon", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Epsilon"}, "SearchTextTranslated" -> ""},
+for a small positive number.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Epsilon", "titlemodifier" -> "", "windowtitle" -> "Epsilon", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Epsilon"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -255,8 +282,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -265,81 +293,66 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3412, 100, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[4401, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->38144067]},
+ CellID->1025208523]},
"Epsilon"->{
- Cell[4044, 129, 98, 3, 27, "Input",
+ Cell[5035, 161, 98, 3, 27, "Input",
CellTags->"Epsilon",
CellID->777209644],
- Cell[4145, 134, 253, 9, 36, "Output",
- CellTags->"Epsilon",
- CellID->750039629],
- Cell[4413, 146, 134, 4, 32, "Text",
- CellTags->"Epsilon",
- CellID->568077555],
- Cell[4572, 154, 606, 20, 45, "Input",
+ Cell[5136, 166, 233, 8, 35, "Output",
+ CellTags->"Epsilon"],
+ Cell[5502, 183, 606, 20, 45, "Input",
CellTags->"Epsilon",
CellID->2127471490],
- Cell[5181, 176, 306, 10, 36, "Output",
- CellTags->"Epsilon",
- CellID->1912563910],
- Cell[5855, 209, 224, 9, 31, "Text",
- CellTags->"Epsilon",
- CellID->2095009444]}
+ Cell[6111, 205, 285, 9, 35, "Output",
+ CellTags->"Epsilon"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7946, 266},
- {"Epsilon", 8079, 270}
+ {"PrimaryExamplesSection", 8859, 294},
+ {"Epsilon", 8994, 298}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2995, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 512, 18, 83, "Usage",
+Cell[3577, 97, 284, 11, 45, "ObjectNameGrid"],
+Cell[3864, 110, 512, 18, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3412, 100, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4401, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->38144067],
+ CellID->1025208523],
Cell[CellGroupData[{
-Cell[3823, 119, 196, 6, 25, "ExampleSection",
- CellID->1234589163],
+Cell[4814, 151, 196, 6, 26, "ExampleSection",
+ CellID->1872756934],
Cell[CellGroupData[{
-Cell[4044, 129, 98, 3, 27, "Input",
+Cell[5035, 161, 98, 3, 27, "Input",
CellTags->"Epsilon",
CellID->777209644],
-Cell[4145, 134, 253, 9, 36, "Output",
- CellTags->"Epsilon",
- CellID->750039629]
+Cell[5136, 166, 233, 8, 35, "Output",
+ CellTags->"Epsilon"]
}, Open ]],
-Cell[4413, 146, 134, 4, 32, "Text",
- CellTags->"Epsilon",
- CellID->568077555],
+Cell[5384, 177, 93, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4572, 154, 606, 20, 45, "Input",
+Cell[5502, 183, 606, 20, 45, "Input",
CellTags->"Epsilon",
CellID->2127471490],
-Cell[5181, 176, 306, 10, 36, "Output",
- CellTags->"Epsilon",
- CellID->1912563910]
+Cell[6111, 205, 285, 9, 35, "Output",
+ CellTags->"Epsilon"]
}, Open ]]
}, Open ]],
-Cell[5514, 190, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6423, 218, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5582, 195, 270, 12, 31, "SeeAlsoSection",
+Cell[6491, 223, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5855, 209, 224, 9, 31, "Text",
- CellTags->"Epsilon",
- CellID->2095009444]
+Cell[6764, 237, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6094, 221, 23, 0, 42, "FooterCell"]
+Cell[6963, 247, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonIR.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonIR.nb
new file mode 100644
index 000000000..924ad1663
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonIR.nb
@@ -0,0 +1,295 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8675, 285]
+NotebookOptionsPosition[ 5850, 201]
+NotebookOutlinePosition[ 7928, 257]
+CellTagsIndexPosition[ 7844, 252]
+WindowTitle->EpsilonIR
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsilonIR\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsilonIR"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/EpsilonIR.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$79364],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsilonIR", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["EpsilonIR", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["EpsilonIR"], "InlineFormula"],
+ " \[LineSeparator] denotes ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}]], "InlineFormula"],
+ ", where ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " is the number of space-time dimensions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->533080242],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsilonIR"]],"paclet:FeynCalc/ref/EpsilonIR"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " stands for a small negative number that explicitly regulates only IR \
+divergences."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->266038101],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2042922420],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["EpsilonIR"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->303667908],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[CurlyEpsilon]", "IR"], TraditionalForm]], "Output",
+ ImageSize->{24, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->128112661]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"EpsilonIR",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 9.638402}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "EpsilonIR denotes (D - 4), where D is the number of space-time \
+dimensions.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "EpsilonIR",
+ "titlemodifier" -> "", "windowtitle" -> "EpsilonIR", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/EpsilonIR"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4847, 154, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->266038101]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7701, 245}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[581, 21, 2276, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2860, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3171, 91, 517, 16, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3713, 111, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->533080242],
+Cell[4454, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4488, 139, 310, 9, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4847, 154, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->266038101],
+Cell[CellGroupData[{
+Cell[5259, 173, 196, 6, 26, "ExampleSection",
+ CellID->2042922420],
+Cell[CellGroupData[{
+Cell[5480, 183, 78, 2, 27, "Input",
+ CellID->303667908],
+Cell[5561, 187, 223, 7, 37, "Output",
+ CellID->128112661]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5823, 199, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonOrder.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonOrder.nb
index 3e95c34ee..74b347ff8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonOrder.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonOrder.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6503, 200]
-NotebookOptionsPosition[ 4218, 134]
-NotebookOutlinePosition[ 6236, 189]
-CellTagsIndexPosition[ 6162, 184]
+NotebookDataLength[ 7339, 223]
+NotebookOptionsPosition[ 5266, 166]
+NotebookOutlinePosition[ 7131, 215]
+CellTagsIndexPosition[ 7088, 212]
WindowTitle->EpsilonOrder
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/EpsilonOrder\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/EpsilonOrder"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPEIntegrateDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPEIntegrateDelta"], "\<\"RHI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsilonOrder\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsilonOrder"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
EpsilonOrder.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$50406],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/EpsilonOrder", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$80232],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsilonOrder", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ EpsilonOrder.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["EpsilonOrder", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["EpsilonOrder", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,9 +159,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"EpsilonOrder",
- CellID->1299888530]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -144,10 +176,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 34.592892}",
+ "built" -> "{2020, 1, 5, 18, 55, 11.888897}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -155,10 +187,11 @@ TaggingRules->{
"None", "summary" ->
"EpsilonOrder is an option of OPEIntegrateDelta and RHI. The setting \
determines the order n (Epsilon^n) which should be kept.", "synonyms" -> {},
- "title" -> "EpsilonOrder", "titlemodifier" -> "", "windowtitle" ->
- "EpsilonOrder", "type" -> "Symbol", "uri" -> "FeynCalc/ref/EpsilonOrder"}},
+ "tabletags" -> {}, "title" -> "EpsilonOrder", "titlemodifier" -> "",
+ "windowtitle" -> "EpsilonOrder", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/EpsilonOrder"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -167,41 +200,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "EpsilonOrder"->{
- Cell[3773, 114, 403, 15, 70, "Text",
- CellTags->"EpsilonOrder",
- CellID->1299888530]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"EpsilonOrder", 6046, 177}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3120, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 569, 18, 70, "Usage",
+Cell[3707, 99, 289, 11, 70, "ObjectNameGrid"],
+Cell[3999, 112, 569, 18, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3500, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[4593, 134, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3773, 114, 403, 15, 70, "Text",
- CellTags->"EpsilonOrder",
- CellID->1299888530]
+Cell[4866, 148, 358, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4191, 132, 23, 0, 70, "FooterCell"]
+Cell[5239, 164, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonUV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonUV.nb
new file mode 100644
index 000000000..48dd879d3
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/EpsilonUV.nb
@@ -0,0 +1,295 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8675, 285]
+NotebookOptionsPosition[ 5851, 201]
+NotebookOutlinePosition[ 7927, 257]
+CellTagsIndexPosition[ 7843, 252]
+WindowTitle->EpsilonUV
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/EpsilonUV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/EpsilonUV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/EpsilonUV.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$80675],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/EpsilonUV", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["EpsilonUV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["EpsilonUV"], "InlineFormula"],
+ " \[LineSeparator] denotes ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}]], "InlineFormula"],
+ ", where ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " is the number of space-time dimensions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1649385959],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["EpsilonUV"]],"paclet:FeynCalc/ref/EpsilonUV"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"],
+ " stands for a small positive number that explicitly regulates only UV \
+divergences."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->300599167],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1977074138],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["EpsilonUV"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->303667908],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[CurlyEpsilon]", "UV"], TraditionalForm]], "Output",
+ ImageSize->{29, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->632677437]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"EpsilonUV",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 12.731808}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "EpsilonUV denotes (D - 4), where D is the number of space-time \
+dimensions.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "EpsilonUV",
+ "titlemodifier" -> "", "windowtitle" -> "EpsilonUV", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/EpsilonUV"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4848, 154, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->300599167]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7700, 245}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[581, 21, 2276, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2860, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3171, 91, 517, 16, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3713, 111, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1649385959],
+Cell[4455, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4489, 139, 310, 9, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4848, 154, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->300599167],
+Cell[CellGroupData[{
+Cell[5260, 173, 196, 6, 26, "ExampleSection",
+ CellID->1977074138],
+Cell[CellGroupData[{
+Cell[5481, 183, 78, 2, 27, "Input",
+ CellID->303667908],
+Cell[5562, 187, 223, 7, 37, "Output",
+ CellID->632677437]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5824, 199, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expand2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expand2.nb
index c1c8fa891..7a69b65a4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expand2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expand2.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8172, 264]
-NotebookOptionsPosition[ 5360, 179]
-NotebookOutlinePosition[ 7649, 243]
-CellTagsIndexPosition[ 7540, 237]
+NotebookDataLength[ 11054, 371]
+NotebookOptionsPosition[ 8028, 280]
+NotebookOutlinePosition[ 10341, 344]
+CellTagsIndexPosition[ 10231, 338]
WindowTitle->Expand2
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$51451],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$81555],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Expand2", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Expand2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Expand2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +120,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1389983819],
+ CellID->1048340278],
Cell[CellGroupData[{
@@ -119,7 +130,98 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->194941885],
+ CellID->1535036385],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Expand2", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"x1", "+", "x2", "+", "x3"}], ")"}],
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "x1"}], "+",
+ RowBox[{"3", "x2"}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"y1", "+", "y2", "+", "y3"}], ")"}],
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "y1"}], "+",
+ RowBox[{"3", "y2"}]}], ")"}]}]}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["x1", "2"]}], "+",
+ RowBox[{"5", " ", "x1", " ", "x2"}], "+",
+ RowBox[{"2", " ", "x1", " ", "x3"}], "+",
+ RowBox[{"3", " ",
+ SuperscriptBox["x2", "2"]}], "+",
+ RowBox[{"3", " ", "x2", " ", "x3"}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["y1", "2"]}], "+",
+ RowBox[{"5", " ", "y1", " ", "y2"}], "+",
+ RowBox[{"2", " ", "y1", " ", "y3"}], "+",
+ RowBox[{"3", " ",
+ SuperscriptBox["y2", "2"]}], "+",
+ RowBox[{"3", " ", "y2", " ", "y3"}]}], TraditionalForm]], "Output",
+ ImageSize->{556, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Expand2", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"x1", "+", "x2", "+", "x3"}], ")"}],
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "x1"}], "+",
+ RowBox[{"3", "x2"}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"y1", "+", "y2", "+", "y3"}], ")"}],
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "y1"}], "+",
+ RowBox[{"3", "y2"}]}], ")"}]}]}], ",",
+ RowBox[{"{",
+ RowBox[{"y1", ",", "y2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ", "x1"}], "+",
+ RowBox[{"3", " ", "x2"}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"x1", "+", "x2", "+", "x3"}], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["y1", "2"]}], "+",
+ RowBox[{"5", " ", "y1", " ", "y2"}], "+",
+ RowBox[{"2", " ", "y1", " ", "y3"}], "+",
+ RowBox[{"3", " ",
+ SuperscriptBox["y2", "2"]}], "+",
+ RowBox[{"3", " ", "y2", " ", "y3"}]}], TraditionalForm]], "Output",
+ ImageSize->{463, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
Cell[CellGroupData[{
@@ -144,7 +246,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x1", ",", "x2"}], "}"}]}], "]"}]], "Input",
CellTags->"Expand2",
- CellLabel->"In[1]:=",
+ CellLabel->"In[3]:=",
CellID->1988123480],
Cell[BoxData[
@@ -165,12 +267,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"y1", "+", "y2", "+", "y3"}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{440, 18},
+ ImageSize->{463, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Expand2",
- CellLabel->"Out[1]=",
- CellID->1449504113]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -179,8 +280,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Expand2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -189,22 +290,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 38.892912}",
+ "built" -> "{2020, 1, 5, 18, 55, 15.107623}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Expand2[exp, x] expands all sums containing x. Expand2[exp, {x1, x2, \
-...}] expands all sums containing x1, x2, ....", "synonyms" -> {}, "title" ->
- "Expand2", "titlemodifier" -> "", "windowtitle" -> "Expand2", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Expand2"}, "SearchTextTranslated" ->
- ""},
+...}] expands all sums containing x1, x2, ....", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Expand2", "titlemodifier" -> "",
+ "windowtitle" -> "Expand2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Expand2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -212,8 +313,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -222,50 +324,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3379, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3641, 107, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1389983819]},
+ CellID->1048340278]},
"Expand2"->{
- Cell[4012, 125, 598, 22, 27, "Input",
+ Cell[6701, 227, 598, 22, 27, "Input",
CellTags->"Expand2",
CellID->1988123480],
- Cell[4613, 149, 681, 23, 39, "Output",
- CellTags->"Expand2",
- CellID->1449504113]}
+ Cell[7302, 251, 660, 22, 39, "Output",
+ CellTags->"Expand2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7205, 223},
- {"Expand2", 7339, 227}
+ {"PrimaryExamplesSection", 9918, 325},
+ {"Expand2", 10053, 329}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2268, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 479, 14, 83, "Usage",
+Cell[2850, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[3137, 89, 479, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3379, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3641, 107, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1389983819],
+ CellID->1048340278],
Cell[CellGroupData[{
-Cell[3792, 115, 195, 6, 25, "ExampleSection",
- CellID->194941885],
+Cell[4054, 126, 196, 6, 26, "ExampleSection",
+ CellID->1535036385],
Cell[CellGroupData[{
-Cell[4012, 125, 598, 22, 27, "Input",
+Cell[4275, 136, 466, 17, 27, "Input"],
+Cell[4744, 155, 690, 20, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5471, 180, 555, 20, 27, "Input"],
+Cell[6029, 202, 635, 20, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6701, 227, 598, 22, 27, "Input",
CellTags->"Expand2",
CellID->1988123480],
-Cell[4613, 149, 681, 23, 39, "Output",
- CellTags->"Expand2",
- CellID->1449504113]
+Cell[7302, 251, 660, 22, 39, "Output",
+ CellTags->"Expand2"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5333, 177, 23, 0, 42, "FooterCell"]
+Cell[8001, 278, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandAll2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandAll2.nb
new file mode 100644
index 000000000..b17c360f1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandAll2.nb
@@ -0,0 +1,323 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9251, 313]
+NotebookOptionsPosition[ 6228, 221]
+NotebookOutlinePosition[ 8315, 277]
+CellTagsIndexPosition[ 8231, 272]
+WindowTitle->ExpandAll2
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExpandAll2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExpandAll2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/ExpandAll2.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$81986],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExpandAll2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ExpandAll2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ExpandAll2", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ " is similar to ExpandAll, but much faster on simple structures."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->175336636],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->161141816],
+
+Cell["Benchmark against the standard ExpandAll", "Notes",
+ CellID->29146736],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"exp", "=",
+ RowBox[{
+ RowBox[{"Sum", "[",
+ RowBox[{
+ RowBox[{"p", "[", "i", "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"i", ",", "1", ",", "100"}], "}"}]}], "]"}], " ",
+ RowBox[{"Sum", "[",
+ RowBox[{
+ RowBox[{"q", "[", "i", "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"i", ",", "1", ",", "1000"}], "}"}]}], "]"}]}]}],
+ ";"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->815060274],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"AbsoluteTiming", "[",
+ RowBox[{
+ RowBox[{"res1", "=",
+ RowBox[{"ExpandAll", "[", "exp", "]"}]}], ";"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1771988175],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"0.231287`", ",", "Null"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{105, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->562912175]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"AbsoluteTiming", "[",
+ RowBox[{
+ RowBox[{"res2", "=",
+ RowBox[{"ExpandAll2", "[", "exp", "]"}]}], ";"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->133925139],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"0.100603`", ",", "Null"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{105, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->904704881]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"res1", "===", "res2"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1580956926],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1145286211]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[",
+ RowBox[{"exp", ",", "res1", ",", "res2"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->132487496]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"ExpandAll2",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 16.274425}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ExpandAll2[exp] is similar to ExpandAll, but much faster on simple \
+structures.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "ExpandAll2",
+ "titlemodifier" -> "", "windowtitle" -> "ExpandAll2", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/ExpandAll2"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3590, 105, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->175336636]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8088, 265}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 2280, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2865, 76, 287, 11, 45, "ObjectNameGrid"],
+Cell[3155, 89, 410, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3590, 105, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->175336636],
+Cell[CellGroupData[{
+Cell[4002, 124, 195, 6, 26, "ExampleSection",
+ CellID->161141816],
+Cell[4200, 132, 76, 1, 32, "Notes",
+ CellID->29146736],
+Cell[4279, 135, 454, 16, 27, "Input",
+ CellID->815060274],
+Cell[CellGroupData[{
+Cell[4758, 155, 196, 6, 27, "Input",
+ CellID->1771988175],
+Cell[4957, 163, 245, 8, 35, "Output",
+ CellID->562912175]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5239, 176, 196, 6, 27, "Input",
+ CellID->133925139],
+Cell[5438, 184, 245, 8, 35, "Output",
+ CellID->904704881]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5720, 197, 101, 3, 27, "Input",
+ CellID->1580956926],
+Cell[5824, 202, 190, 6, 35, "Output",
+ CellID->1145286211]
+}, Open ]],
+Cell[6029, 211, 145, 4, 27, "Input",
+ CellID->132487496]
+}, Open ]]
+}, Open ]],
+Cell[6201, 219, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandPartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandPartialD.nb
index 1f9ebc7ed..bb036e27f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandPartialD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandPartialD.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 28565, 1047]
-NotebookOptionsPosition[ 20907, 797]
-NotebookOutlinePosition[ 25460, 930]
-CellTagsIndexPosition[ 25342, 924]
+NotebookDataLength[ 31846, 1152]
+NotebookOptionsPosition[ 24534, 919]
+NotebookOutlinePosition[ 28562, 1033]
+CellTagsIndexPosition[ 28444, 1027]
WindowTitle->ExpandPartialD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExpandPartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExpandPartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExplicitPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitPartialD"], "\<\"LeftPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftPartialD"], "\<\"LeftRightPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftRightPartialD"], "\<\"PartialDRelations\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PartialDRelations"], "\<\"RightPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RightPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExpandPartialD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExpandPartialD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExpandPartialD.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$52139],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExpandPartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$82904],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExpandPartialD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +103,30 @@ ExpandPartialD.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExpandPartialD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExpandPartialD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"ExpandPartialD", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands all products of QuantumField's and partial differentiation \
-operators in exp and applies the Leibniz rule."
+ " \[LineSeparator]expands noncommutative products of ",
+ Cell[BoxData["QuantumField"], "InlineFormula"],
+ "'s and partial differentiation operators in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " and applies the Leibniz rule."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +137,95 @@ operators in exp and applies the Leibniz rule."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1708841866],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ExpandPartialD", "]"}]], "Input",
+ CellLabel->"In[59]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"PartialDRelations", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(", "FeynCalc`ExpandPartialD`Private`a___", ")"}], ".",
+ RowBox[{"\[PartialD]", "/", "\[PartialD]",
+ SuperscriptBox[
+ FormBox["FeynCalc`ExpandPartialD`Private`x_",
+ TraditionalForm],
+ FormBox[
+ FormBox["FeynCalc`ExpandPartialD`Private`i_",
+ TraditionalForm],
+ TraditionalForm]]}], ".",
+ RowBox[{"(", "FeynCalc`ExpandPartialD`Private`b___", ")"}]}],
+ "\[RuleDelayed]",
+ RowBox[{"DOT", "(",
+ RowBox[{"FeynCalc`ExpandPartialD`Private`a", ",",
+ RowBox[{
+ SubscriptBox[
+ TagBox[
+ StyleBox["\<\"\[PartialD]\"\>",
+ FontSlant->"Italic"],
+ StyleForm[#, FontSlant -> "Italic"]& ],
+ TagBox[
+ FormBox[
+ FormBox["FeynCalc`ExpandPartialD`Private`i",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm,
+ Editable->True]], "(",
+ TagBox[
+ FormBox[
+ RowBox[{
+ "FeynCalc`ExpandPartialD`Private`dot", "(",
+ "FeynCalc`ExpandPartialD`Private`b", ")"}],
+ TraditionalForm],
+ TraditionalForm,
+ Editable->True], ")"}]}], ")"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{510, 132},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[59]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -104,21 +237,21 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1438769249],
+ CellID->579825297],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1009796437],
+ CellID->539182276],
Cell[CellGroupData[{
@@ -154,12 +287,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{68, 27},
+ ImageSize->{74, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[1]=",
- CellID->1621713620]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -179,81 +311,54 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "+",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}], ".",
SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{133, 19},
+ ImageSize->{202, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[2]=",
- CellID->230800562]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"ExpandPartialD",
- CellLabel->"In[3]:=",
- CellID->1003176166],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"A", ",",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}], ".",
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",", "A", ",",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}]}], "+",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",", "A", ",",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}], ".",
- RowBox[{"QuantumField", "[",
- RowBox[{"A", ",",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}]}]}]], "Output",
- ImageSize->{525, 67},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ExpandPartialD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1224930561]
-}, Open ]],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
Cell[CellGroupData[{
@@ -264,7 +369,7 @@ Cell[BoxData[
RowBox[{"A", ",",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}]}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->1133080623],
Cell[BoxData[
@@ -281,12 +386,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{47, 27},
+ ImageSize->{49, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[4]=",
- CellID->1551249324]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -294,7 +398,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->714332804],
Cell[BoxData[
@@ -304,18 +408,19 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
SubscriptBox[
OverscriptBox["\[PartialD]", "\[LeftArrow]"],
@@ -328,16 +433,22 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{126, 41},
+ ImageSize->{146, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[5]=",
- CellID->656546598]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{"QuantumField", "[",
@@ -351,7 +462,7 @@ Cell[BoxData[
RowBox[{"A", ",",
RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}]}], "]"}]}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[6]:=",
+ CellLabel->"In[1]:=",
CellID->1818055573],
Cell[BoxData[
@@ -373,12 +484,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Rho]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{71, 27},
+ ImageSize->{76, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[6]=",
- CellID->526046948]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -386,7 +496,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[7]:=",
+ CellLabel->"In[2]:=",
CellID->1536725497],
Cell[BoxData[
@@ -395,111 +505,120 @@ Cell[BoxData[
FractionBox["1", "4"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- SubscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox["\[Mu]",
- TraditionalForm]], ".",
- RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"2", " ",
RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}]}], "-",
- RowBox[{"2", " ",
- RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}]}]}], "+",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
+ TraditionalForm]], ")"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], ".",
+ TraditionalForm]], ")"}], ")"}]}]}]}], "+",
+ RowBox[{
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox["\[Mu]",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ".",
SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox["\[Rho]",
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{339, 41},
+ ImageSize->{421, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[7]=",
- CellID->1958358113]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"8", " ",
RowBox[{
RowBox[{"LeftRightPartialD", "[", "OPEDelta", "]"}], "^", "3"}]}]], "Input",\
CellTags->"ExpandPartialD",
- CellLabel->"In[8]:=",
+ CellLabel->"In[1]:=",
CellID->302634492],
Cell[BoxData[
@@ -511,12 +630,11 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm], "3"]}], TraditionalForm]], "Output",
- ImageSize->{36, 26},
+ ImageSize->{35, 23},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[8]=",
- CellID->1536350589]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -524,7 +642,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExplicitPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[9]:=",
+ CellLabel->"In[2]:=",
CellID->1446708912],
Cell[BoxData[
@@ -544,12 +662,11 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]]}], ")"}], "3"], TraditionalForm]], "Output",
- ImageSize->{79, 34},
+ ImageSize->{75, 27},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[9]=",
- CellID->1037199372]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -557,7 +674,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[10]:=",
+ CellLabel->"In[3]:=",
CellID->752224],
Cell[BoxData[
@@ -642,49 +759,58 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{373, 24},
+ ImageSize->{361, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[10]=",
- CellID->1175162542]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[",
+ RowBox[{"LC", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Tau]"}], "]"}], " ",
RowBox[{"RightPartialD", "[",
RowBox[{"\[Alpha]", ",", "\[Mu]", ",", "\[Beta]", ",", "\[Nu]"}],
"]"}]}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[11]:=",
+ CellLabel->"In[1]:=",
CellID->623620416],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
RowBox[{
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -710,12 +836,11 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{149, 27},
+ ImageSize->{146, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[11]=",
- CellID->1270626]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -723,17 +848,17 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExpandPartialD",
- CellLabel->"In[12]:=",
+ CellLabel->"In[2]:=",
CellID->726282079],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExpandPartialD",
- CellLabel->"Out[12]=",
- CellID->1503936453]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -757,7 +882,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ExplicitPartialD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ExplicitPartialD",
@@ -788,9 +912,7 @@ Cell[TextData[{
ButtonNote->"RightPartialD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ExpandPartialD",
- CellID->233477946]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -798,7 +920,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"ExpandPartialD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -807,22 +929,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 41.514281}",
+ "built" -> "{2020, 1, 5, 18, 55, 18.386695}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ExpandPartialD[exp] expands all products of QuantumField's and partial \
-differentiation operators in exp and applies the Leibniz rule.",
- "synonyms" -> {}, "title" -> "ExpandPartialD", "titlemodifier" -> "",
- "windowtitle" -> "ExpandPartialD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ExpandPartialD"}, "SearchTextTranslated" -> ""},
+ "ExpandPartialD[exp] expands noncommutative products of QuantumField's \
+and partial differentiation operators in exp and applies the Leibniz rule.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ExpandPartialD",
+ "titlemodifier" -> "", "windowtitle" -> "ExpandPartialD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ExpandPartialD"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -831,7 +954,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -840,215 +963,197 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3409, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[7610, 228, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1438769249]},
+ CellID->579825297]},
"ExpandPartialD"->{
- Cell[4043, 124, 392, 11, 45, "Input",
+ Cell[8242, 257, 392, 11, 45, "Input",
CellTags->"ExpandPartialD",
CellID->1663995859],
- Cell[4438, 137, 595, 24, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->1621713620],
- Cell[5070, 166, 138, 4, 27, "Input",
+ Cell[8637, 270, 574, 23, 45, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[9248, 298, 138, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->42906170],
- Cell[5211, 172, 1111, 46, 40, "Output",
- CellTags->"ExpandPartialD",
- CellID->230800562],
- Cell[6359, 223, 134, 4, 27, "Input",
- CellTags->"ExpandPartialD",
- CellID->1003176166],
- Cell[6496, 229, 909, 25, 101, "Output",
- CellTags->"ExpandPartialD",
- CellID->1224930561],
- Cell[7442, 259, 278, 8, 27, "Input",
+ Cell[9389, 304, 1191, 49, 40, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[10747, 364, 278, 8, 27, "Input",
CellTags->"ExpandPartialD",
CellID->1133080623],
- Cell[7723, 269, 490, 19, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->1551249324],
- Cell[8250, 293, 139, 4, 27, "Input",
+ Cell[11028, 374, 469, 18, 45, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[11534, 397, 139, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->714332804],
- Cell[8392, 299, 936, 36, 62, "Output",
- CellTags->"ExpandPartialD",
- CellID->656546598],
- Cell[9365, 340, 452, 14, 45, "Input",
+ Cell[11676, 403, 928, 36, 56, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[12783, 451, 452, 14, 45, "Input",
CellTags->"ExpandPartialD",
CellID->1818055573],
- Cell[9820, 356, 619, 24, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->526046948],
- Cell[10476, 385, 140, 4, 27, "Input",
+ Cell[13238, 467, 599, 23, 45, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[13874, 495, 140, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->1536725497],
- Cell[10619, 391, 2703, 99, 62, "Output",
- CellTags->"ExpandPartialD",
- CellID->1958358113],
- Cell[13359, 495, 198, 7, 27, "Input",
+ Cell[14017, 501, 2735, 101, 56, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[16931, 614, 198, 7, 27, "Input",
CellTags->"ExpandPartialD",
CellID->302634492],
- Cell[13560, 504, 411, 14, 47, "Output",
- CellTags->"ExpandPartialD",
- CellID->1536350589],
- Cell[14008, 523, 142, 4, 27, "Input",
+ Cell[17132, 623, 390, 13, 44, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[17559, 641, 142, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->1446708912],
- Cell[14153, 529, 628, 22, 55, "Output",
- CellTags->"ExpandPartialD",
- CellID->1037199372],
- Cell[14818, 556, 137, 4, 27, "Input",
+ Cell[17704, 647, 607, 21, 48, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[18348, 673, 136, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->752224],
- Cell[14958, 562, 2483, 87, 45, "Output",
- CellTags->"ExpandPartialD",
- CellID->1175162542],
- Cell[17478, 654, 333, 10, 27, "Input",
+ Cell[18487, 679, 2461, 86, 43, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[21127, 777, 324, 10, 27, "Input",
CellTags->"ExpandPartialD",
CellID->623620416],
- Cell[17814, 666, 1297, 51, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->1270626],
- Cell[19148, 722, 140, 4, 27, "Input",
+ Cell[21454, 789, 1356, 53, 45, "Output",
+ CellTags->"ExpandPartialD"],
+ Cell[22847, 847, 139, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->726282079],
- Cell[19291, 728, 217, 7, 36, "Output",
- CellTags->"ExpandPartialD",
- CellID->1503936453],
- Cell[19876, 758, 989, 34, 32, "Text",
- CellTags->"ExpandPartialD",
- CellID->233477946]}
+ Cell[22989, 853, 195, 6, 35, "Output",
+ CellTags->"ExpandPartialD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 22800, 841},
- {"ExpandPartialD", 22941, 845}
+ {"PrimaryExamplesSection", 26427, 964},
+ {"ExpandPartialD", 26568, 968}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3472, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 466, 13, 97, "Usage",
+Cell[4061, 105, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4377, 120, 566, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3409, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4968, 139, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1708841866],
+Cell[5710, 165, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5766, 169, 97, 2, 70, "Input"],
+Cell[5866, 173, 1683, 48, 70, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7610, 228, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1438769249],
+ CellID->579825297],
Cell[CellGroupData[{
-Cell[3822, 114, 196, 6, 25, "ExampleSection",
- CellID->1009796437],
+Cell[8022, 247, 195, 6, 26, "ExampleSection",
+ CellID->539182276],
Cell[CellGroupData[{
-Cell[4043, 124, 392, 11, 45, "Input",
+Cell[8242, 257, 392, 11, 45, "Input",
CellTags->"ExpandPartialD",
CellID->1663995859],
-Cell[4438, 137, 595, 24, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->1621713620]
+Cell[8637, 270, 574, 23, 45, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5070, 166, 138, 4, 27, "Input",
+Cell[9248, 298, 138, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->42906170],
-Cell[5211, 172, 1111, 46, 40, "Output",
- CellTags->"ExpandPartialD",
- CellID->230800562]
+Cell[9389, 304, 1191, 49, 40, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6359, 223, 134, 4, 27, "Input",
- CellTags->"ExpandPartialD",
- CellID->1003176166],
-Cell[6496, 229, 909, 25, 101, "Output",
- CellTags->"ExpandPartialD",
- CellID->1224930561]
-}, Open ]],
+Cell[10617, 358, 105, 2, 9, "ExampleDelimiter"],
Cell[CellGroupData[{
-Cell[7442, 259, 278, 8, 27, "Input",
+Cell[10747, 364, 278, 8, 27, "Input",
CellTags->"ExpandPartialD",
CellID->1133080623],
-Cell[7723, 269, 490, 19, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->1551249324]
+Cell[11028, 374, 469, 18, 45, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8250, 293, 139, 4, 27, "Input",
+Cell[11534, 397, 139, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->714332804],
-Cell[8392, 299, 936, 36, 62, "Output",
- CellTags->"ExpandPartialD",
- CellID->656546598]
+Cell[11676, 403, 928, 36, 56, "Output",
+ CellTags->"ExpandPartialD"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[9365, 340, 452, 14, 45, "Input",
+Cell[12653, 445, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[12783, 451, 452, 14, 45, "Input",
CellTags->"ExpandPartialD",
CellID->1818055573],
-Cell[9820, 356, 619, 24, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->526046948]
+Cell[13238, 467, 599, 23, 45, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10476, 385, 140, 4, 27, "Input",
+Cell[13874, 495, 140, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->1536725497],
-Cell[10619, 391, 2703, 99, 62, "Output",
- CellTags->"ExpandPartialD",
- CellID->1958358113]
+Cell[14017, 501, 2735, 101, 56, "Output",
+ CellTags->"ExpandPartialD"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[13359, 495, 198, 7, 27, "Input",
+Cell[16801, 608, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[16931, 614, 198, 7, 27, "Input",
CellTags->"ExpandPartialD",
CellID->302634492],
-Cell[13560, 504, 411, 14, 47, "Output",
- CellTags->"ExpandPartialD",
- CellID->1536350589]
+Cell[17132, 623, 390, 13, 44, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14008, 523, 142, 4, 27, "Input",
+Cell[17559, 641, 142, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->1446708912],
-Cell[14153, 529, 628, 22, 55, "Output",
- CellTags->"ExpandPartialD",
- CellID->1037199372]
+Cell[17704, 647, 607, 21, 48, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14818, 556, 137, 4, 27, "Input",
+Cell[18348, 673, 136, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->752224],
-Cell[14958, 562, 2483, 87, 45, "Output",
- CellTags->"ExpandPartialD",
- CellID->1175162542]
+Cell[18487, 679, 2461, 86, 43, "Output",
+ CellTags->"ExpandPartialD"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[17478, 654, 333, 10, 27, "Input",
+Cell[20997, 771, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[21127, 777, 324, 10, 27, "Input",
CellTags->"ExpandPartialD",
CellID->623620416],
-Cell[17814, 666, 1297, 51, 48, "Output",
- CellTags->"ExpandPartialD",
- CellID->1270626]
+Cell[21454, 789, 1356, 53, 45, "Output",
+ CellTags->"ExpandPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19148, 722, 140, 4, 27, "Input",
+Cell[22847, 847, 139, 4, 27, "Input",
CellTags->"ExpandPartialD",
CellID->726282079],
-Cell[19291, 728, 217, 7, 36, "Output",
- CellTags->"ExpandPartialD",
- CellID->1503936453]
+Cell[22989, 853, 195, 6, 35, "Output",
+ CellTags->"ExpandPartialD"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[19535, 739, 31, 0, 29, "SectionFooterSpacer"]
+Cell[23223, 864, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19603, 744, 270, 12, 31, "SeeAlsoSection",
+Cell[23291, 869, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[19876, 758, 989, 34, 32, "Text",
- CellTags->"ExpandPartialD",
- CellID->233477946]
+Cell[23564, 883, 928, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[20880, 795, 23, 0, 42, "FooterCell"]
+Cell[24507, 917, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandScalarProduct.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandScalarProduct.nb
index 35ea8537e..3a1ce035d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandScalarProduct.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExpandScalarProduct.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 27362, 948]
-NotebookOptionsPosition[ 16862, 671]
-NotebookOutlinePosition[ 24191, 852]
-CellTagsIndexPosition[ 24030, 845]
+NotebookDataLength[ 27576, 951]
+NotebookOptionsPosition[ 18210, 712]
+NotebookOutlinePosition[ 24573, 862]
+CellTagsIndexPosition[ 24412, 855]
WindowTitle->ExpandScalarProduct
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExpandScalarProduct\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExpandScalarProduct"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"MomentumExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/MomentumExpand"], "\<\"MomentumCombine\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MomentumCombine"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExpandScalarProduct\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExpandScalarProduct"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExpandScalarProduct.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$52491],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExpandScalarProduct", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$83354],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExpandScalarProduct", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +98,27 @@ ExpandScalarProduct.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExpandScalarProduct", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExpandScalarProduct", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"ExpandScalarProduct", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands scalar products of sums of momenta in expr. ExpandScalarProduct \
-does not use Expand on expr.\nScalarProductExpand=ExpandScalarProduct."
+ " \[LineSeparator]expands scalar products of sums of momenta in expr. \
+ExpandScalarProduct does not use Expand on expr."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +129,63 @@ does not use Expand on expr.\nScalarProductExpand=ExpandScalarProduct."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->507985412],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ExpandScalarProduct", "]"}]], "Input",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
+ CellLabel->"In[723]:=",
+ CellID->668026966],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"EpsEvaluate", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Full", "\[Rule]", "True"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{363, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
+ CellLabel->"Out[723]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +201,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1628615596],
+ CellID->1019186291],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,36 +211,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1724408364],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2116782470],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "ExpandScalarProduct", "]"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[1]:=",
- CellID->668026966],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
- RowBox[{"Momentum", "\[Rule]",
- RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{292, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[1]=",
- CellID->4871317]
-}, Open ]],
+ CellID->1652478564],
Cell[CellGroupData[{
@@ -156,7 +222,7 @@ Cell[BoxData[
RowBox[{"p1", "+", "p2", "+", "p3"}], ",",
RowBox[{"p4", "+", "p5", "+", "p6"}]}], "]"}]}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1575091533],
Cell[BoxData[
@@ -165,16 +231,18 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -183,25 +251,26 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p5",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p6",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{208, 18},
+ ImageSize->{211, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[2]=",
- CellID->831714443]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -209,7 +278,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "ScalarProductExpand"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1729317327],
Cell[BoxData[
@@ -332,12 +401,11 @@ Cell[BoxData[
FormBox["p6",
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{508, 18},
+ ImageSize->{519, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[3]=",
- CellID->1718079082]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -347,7 +415,7 @@ Cell[BoxData[
RowBox[{"p", ",",
RowBox[{"p", "-", "q"}]}], "]"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->790525557],
Cell[BoxData[
@@ -363,22 +431,23 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{79, 17},
+ ImageSize->{91, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[4]=",
- CellID->1472369643]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -386,7 +455,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExpandScalarProduct", "[", "%", "]"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->171112254],
Cell[BoxData[
@@ -411,12 +480,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{69, 20},
+ ImageSize->{81, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[5]=",
- CellID->638310365]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -426,38 +494,33 @@ Cell[BoxData[
RowBox[{
RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->1175495192],
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{62, 20},
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[6]=",
- CellID->323139512]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -465,58 +528,48 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExpandScalarProduct", "[", "%", "]"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->2071711528],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{58, 19},
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{68, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[7]=",
- CellID->1585657038]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{
- RowBox[{"p", "-", "q"}], ",",
- RowBox[{"q", "-", "r"}]}], "]"}], "//", "FCI"}]], "Input",
+ RowBox[{"SPD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "-", "r"}]}], "]"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->1361432400],
Cell[BoxData[
@@ -525,13 +578,13 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
+ FormBox[
+ RowBox[{
FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
+ TraditionalForm], "-",
FormBox["q",
- TraditionalForm], "_"]}],
+ TraditionalForm]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -540,31 +593,29 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
+ FormBox[
+ RowBox[{
FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
+ TraditionalForm], "-",
FormBox["r",
- TraditionalForm], "_"]}],
+ TraditionalForm]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{120, 17},
+ ImageSize->{128, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[8]=",
- CellID->1532584134]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "/.",
- RowBox[{"Pair", "\[Rule]", "ExpandScalarProduct"}]}]], "Input",
+ RowBox[{"ExpandScalarProduct", "[", "%", "]"}]], "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->1825158757],
Cell[BoxData[
@@ -572,59 +623,51 @@ Cell[BoxData[
RowBox[{
RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
+ FormBox["q",
+ TraditionalForm],
TraditionalForm]}], "-",
RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
+ FormBox["r",
+ TraditionalForm],
TraditionalForm]}], "+",
RowBox[{
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
+ FormBox["q",
+ TraditionalForm],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
+ FormBox["r",
+ TraditionalForm],
TraditionalForm]}], "-",
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
+ FormBox["q",
+ TraditionalForm],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{157, 20},
+ ImageSize->{171, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[9]=",
- CellID->334851798]
+ CellLabel->"Out[8]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -662,17 +705,15 @@ Cell[TextData[{
ButtonNote->"MomentumCombine"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2118240248]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"ExpandScalarProduct",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -681,23 +722,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 43.153627}",
+ "built" -> "{2020, 1, 5, 18, 55, 19.695426}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"ExpandScalarProduct[expr] expands scalar products of sums of momenta in \
-expr. ExpandScalarProduct does not use Expand on expr. \
-ScalarProductExpand=ExpandScalarProduct.", "synonyms" -> {}, "title" ->
- "ExpandScalarProduct", "titlemodifier" -> "", "windowtitle" ->
- "ExpandScalarProduct", "type" -> "Symbol", "uri" ->
+expr. ExpandScalarProduct does not use Expand on expr.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "ExpandScalarProduct", "titlemodifier" ->
+ "", "windowtitle" -> "ExpandScalarProduct", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ExpandScalarProduct"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -706,7 +746,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -714,242 +754,205 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3474, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1628615596]},
"ExpandScalarProduct"->{
- Cell[4086, 122, 113, 2, 35, "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2116782470],
- Cell[4224, 128, 180, 4, 27, "Input",
+ Cell[5431, 161, 182, 4, 70, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->668026966],
- Cell[4407, 134, 399, 12, 36, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->4871317],
- Cell[4843, 151, 276, 8, 27, "Input",
+ Cell[5616, 167, 529, 14, 56, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[6840, 217, 276, 8, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1575091533],
- Cell[5122, 161, 1050, 42, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->831714443],
- Cell[6209, 208, 171, 4, 27, "Input",
+ Cell[7119, 227, 1122, 45, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[8278, 277, 171, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1729317327],
- Cell[6383, 214, 2905, 125, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1718079082],
- Cell[9325, 344, 204, 6, 27, "Input",
+ Cell[8452, 283, 2884, 124, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[11373, 412, 204, 6, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->790525557],
- Cell[9532, 352, 704, 28, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1472369643],
- Cell[10273, 385, 174, 4, 27, "Input",
+ Cell[11580, 420, 726, 29, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[12343, 454, 174, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->171112254],
- Cell[10450, 391, 678, 27, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->638310365],
- Cell[11165, 423, 209, 6, 27, "Input",
+ Cell[12520, 460, 658, 26, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[13215, 491, 209, 6, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1175495192],
- Cell[11377, 431, 701, 28, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->323139512],
- Cell[12115, 464, 175, 4, 27, "Input",
+ Cell[13427, 499, 592, 23, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[14056, 527, 175, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->2071711528],
- Cell[12293, 470, 851, 36, 40, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1585657038],
- Cell[13181, 511, 258, 8, 27, "Input",
+ Cell[14234, 533, 658, 27, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[14929, 565, 230, 7, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1361432400],
- Cell[13442, 521, 893, 36, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1532584134],
- Cell[14372, 562, 203, 5, 27, "Input",
+ Cell[15162, 574, 842, 35, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[16041, 614, 175, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1825158757],
- Cell[14578, 569, 1265, 53, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->334851798],
- Cell[16211, 645, 609, 21, 32, "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2118240248]},
+ Cell[16219, 620, 1049, 45, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]},
"ScalarProductExpand"->{
- Cell[4086, 122, 113, 2, 35, "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2116782470],
- Cell[4224, 128, 180, 4, 27, "Input",
+ Cell[5431, 161, 182, 4, 70, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->668026966],
- Cell[4407, 134, 399, 12, 36, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->4871317],
- Cell[4843, 151, 276, 8, 27, "Input",
+ Cell[5616, 167, 529, 14, 56, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[6840, 217, 276, 8, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1575091533],
- Cell[5122, 161, 1050, 42, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->831714443],
- Cell[6209, 208, 171, 4, 27, "Input",
+ Cell[7119, 227, 1122, 45, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[8278, 277, 171, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1729317327],
- Cell[6383, 214, 2905, 125, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1718079082],
- Cell[9325, 344, 204, 6, 27, "Input",
+ Cell[8452, 283, 2884, 124, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[11373, 412, 204, 6, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->790525557],
- Cell[9532, 352, 704, 28, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1472369643],
- Cell[10273, 385, 174, 4, 27, "Input",
+ Cell[11580, 420, 726, 29, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[12343, 454, 174, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->171112254],
- Cell[10450, 391, 678, 27, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->638310365],
- Cell[11165, 423, 209, 6, 27, "Input",
+ Cell[12520, 460, 658, 26, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[13215, 491, 209, 6, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1175495192],
- Cell[11377, 431, 701, 28, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->323139512],
- Cell[12115, 464, 175, 4, 27, "Input",
+ Cell[13427, 499, 592, 23, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[14056, 527, 175, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->2071711528],
- Cell[12293, 470, 851, 36, 40, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1585657038],
- Cell[13181, 511, 258, 8, 27, "Input",
+ Cell[14234, 533, 658, 27, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[14929, 565, 230, 7, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1361432400],
- Cell[13442, 521, 893, 36, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1532584134],
- Cell[14372, 562, 203, 5, 27, "Input",
+ Cell[15162, 574, 842, 35, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}],
+ Cell[16041, 614, 175, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1825158757],
- Cell[14578, 569, 1265, 53, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->334851798],
- Cell[16211, 645, 609, 21, 32, "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2118240248]}
+ Cell[16219, 620, 1049, 45, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]},
+ "PrimaryExamplesSection"->{
+ Cell[6206, 188, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1019186291]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 18811, 716},
- {"ExpandScalarProduct", 18957, 720},
- {"ScalarProductExpand", 21495, 781}
+ {"ExpandScalarProduct", 20099, 756},
+ {"ScalarProductExpand", 22182, 802},
+ {"PrimaryExamplesSection", 24268, 848}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2289, 52, 51, "AnchorBarGrid",
+Cell[591, 21, 3244, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2883, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2948, 78, 501, 13, 121, "Usage",
- CellID->982511436],
+Cell[3838, 100, 296, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3474, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1628615596],
-Cell[3865, 112, 196, 6, 25, "ExampleSection",
- CellID->1724408364],
+Cell[4159, 115, 450, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4086, 122, 113, 2, 35, "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2116782470],
+Cell[4634, 131, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->507985412],
+Cell[5375, 157, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4224, 128, 180, 4, 27, "Input",
+Cell[5431, 161, 182, 4, 70, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->668026966],
-Cell[4407, 134, 399, 12, 36, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->4871317]
+Cell[5616, 167, 529, 14, 56, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4843, 151, 276, 8, 27, "Input",
+Cell[6206, 188, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1019186291],
+Cell[CellGroupData[{
+Cell[6619, 207, 196, 6, 26, "ExampleSection",
+ CellID->1652478564],
+Cell[CellGroupData[{
+Cell[6840, 217, 276, 8, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1575091533],
-Cell[5122, 161, 1050, 42, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->831714443]
+Cell[7119, 227, 1122, 45, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[6209, 208, 171, 4, 27, "Input",
+Cell[8278, 277, 171, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1729317327],
-Cell[6383, 214, 2905, 125, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1718079082]
+Cell[8452, 283, 2884, 124, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[9325, 344, 204, 6, 27, "Input",
+Cell[11373, 412, 204, 6, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->790525557],
-Cell[9532, 352, 704, 28, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1472369643]
+Cell[11580, 420, 726, 29, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[10273, 385, 174, 4, 27, "Input",
+Cell[12343, 454, 174, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->171112254],
-Cell[10450, 391, 678, 27, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->638310365]
+Cell[12520, 460, 658, 26, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[11165, 423, 209, 6, 27, "Input",
+Cell[13215, 491, 209, 6, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1175495192],
-Cell[11377, 431, 701, 28, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->323139512]
+Cell[13427, 499, 592, 23, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[12115, 464, 175, 4, 27, "Input",
+Cell[14056, 527, 175, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->2071711528],
-Cell[12293, 470, 851, 36, 40, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1585657038]
+Cell[14234, 533, 658, 27, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[13181, 511, 258, 8, 27, "Input",
+Cell[14929, 565, 230, 7, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1361432400],
-Cell[13442, 521, 893, 36, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1532584134]
+Cell[15162, 574, 842, 35, 37, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[14372, 562, 203, 5, 27, "Input",
+Cell[16041, 614, 175, 4, 27, "Input",
CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
CellID->1825158757],
-Cell[14578, 569, 1265, 53, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->334851798]
-}, Open ]],
-Cell[15858, 625, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16219, 620, 1049, 45, 39, "Output",
+ CellTags->{"ExpandScalarProduct", "ScalarProductExpand"}]
}, Open ]]
}, Open ]],
+Cell[17295, 669, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[15938, 631, 270, 12, 31, "SeeAlsoSection",
+Cell[17363, 674, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[16211, 645, 609, 21, 32, "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->2118240248]
+Cell[17636, 688, 532, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[16835, 669, 23, 0, 42, "FooterCell"]
+Cell[18183, 710, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expanding.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expanding.nb
index a795c920c..81bf57b76 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expanding.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Expanding.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7209, 218]
-NotebookOptionsPosition[ 4745, 149]
-NotebookOutlinePosition[ 6946, 207]
-CellTagsIndexPosition[ 6875, 202]
+NotebookDataLength[ 8337, 245]
+NotebookOptionsPosition[ 6076, 186]
+NotebookOutlinePosition[ 8128, 237]
+CellTagsIndexPosition[ 8085, 234]
WindowTitle->Expanding
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Expanding\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Expanding"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Expanding.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DotSimplify"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Expanding\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Expanding"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Expanding.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$51787],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Expanding", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$82422],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Expanding", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Expanding", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Expanding", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -140,9 +179,7 @@ Cell[TextData[{
ButtonNote->"SUNSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Expanding",
- CellID->1847648167]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -159,10 +196,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 40.326647}",
+ "built" -> "{2020, 1, 5, 18, 55, 17.527249}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -172,11 +209,11 @@ TaggingRules->{
SUNSimplify etc. As option for Contract it specifies whether expansion w.r.t. \
LorentzIndex is done BEFORE contraction. If set to False in DiracSimplify or \
SUNSimplify, only a limited set of simplifications (multiplicative linearity \
-etc.) is performed.", "synonyms" -> {}, "title" -> "Expanding",
- "titlemodifier" -> "", "windowtitle" -> "Expanding", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Expanding"}},
+etc.) is performed.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Expanding", "titlemodifier" -> "", "windowtitle" -> "Expanding", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Expanding"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -185,41 +222,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Expanding"->{
- Cell[3817, 111, 886, 33, 70, "Text",
- CellTags->"Expanding",
- CellID->1847648167]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Expanding", 6762, 195}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3387, 81, 70, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 632, 15, 70, "Usage",
+Cell[3971, 104, 286, 11, 70, "ObjectNameGrid"],
+Cell[4260, 117, 632, 15, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3544, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[4917, 136, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3817, 111, 886, 33, 70, "Text",
- CellTags->"Expanding",
- CellID->1847648167]
+Cell[5190, 150, 844, 31, 70, "SeeAlso"]
}, Open ]],
-Cell[4718, 147, 23, 0, 70, "FooterCell"]
+Cell[6049, 184, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Explicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Explicit.nb
index 93be39ecb..c14be836f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Explicit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Explicit.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 24582, 940]
-NotebookOptionsPosition[ 19371, 772]
-NotebookOutlinePosition[ 22818, 871]
-CellTagsIndexPosition[ 22706, 865]
+NotebookDataLength[ 23244, 874]
+NotebookOptionsPosition[ 18391, 723]
+NotebookOutlinePosition[ 21658, 814]
+CellTagsIndexPosition[ 21546, 808]
WindowTitle->Explicit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Explicit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Explicit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Explicit.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonVertex"], "\<\"Twist2GluonOperator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2GluonOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Explicit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Explicit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Explicit.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$53171],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Explicit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$84684],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Explicit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Explicit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Explicit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +146,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2137769523],
+ CellID->295221976],
Cell[CellGroupData[{
@@ -122,7 +156,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1555052173],
+ CellID->962752738],
Cell[CellGroupData[{
@@ -184,12 +218,11 @@ Cell[BoxData[
FormBox["r",
TraditionalForm],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{152, 21},
+ ImageSize->{170, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Explicit",
- CellLabel->"Out[1]=",
- CellID->1698625354]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -221,146 +254,104 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["p",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ TraditionalForm]], "-",
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["q",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["r",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{394, 22},
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{422, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Explicit",
- CellLabel->"Out[2]=",
- CellID->1578200832]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -410,12 +401,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{194, 41},
+ ImageSize->{201, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Explicit",
- CellLabel->"Out[3]=",
- CellID->524953586]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -466,22 +456,16 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox[
RowBox[{
FormBox["\<\"(\"\>",
@@ -507,32 +491,24 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -549,66 +525,49 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{557, 41},
+ ImageSize->{581, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Explicit",
- CellLabel->"Out[4]=",
- CellID->993425694]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -630,12 +589,11 @@ Cell[BoxData[
TraditionalForm]}],
FormBox["a",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{30, 19},
+ ImageSize->{31, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Explicit",
- CellLabel->"Out[5]=",
- CellID->342672291]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -653,17 +611,11 @@ Cell[BoxData[
SubscriptBox["g", "s"], " ",
SuperscriptBox["f",
RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
+ FormBox["a",
TraditionalForm],
- FormBox[
- FormBox["b24",
- TraditionalForm],
+ FormBox["b186",
TraditionalForm],
- FormBox[
- FormBox["c25",
- TraditionalForm],
+ FormBox["c187",
TraditionalForm]}]], " ",
RowBox[{
SubsuperscriptBox[
@@ -674,7 +626,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b24",
+ FormBox["b186",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -685,11 +637,12 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c25",
+ FormBox["c187",
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -704,9 +657,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -721,13 +675,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{254, 23},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{326, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Explicit",
- CellLabel->"Out[6]=",
- CellID->559853350]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -763,17 +716,15 @@ Cell[TextData[{
ButtonNote->"Twist2GluonOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Explicit",
- CellID->1892239370]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Explicit",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -782,10 +733,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 46.225373}",
+ "built" -> "{2020, 1, 5, 18, 55, 23.439124}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -795,11 +746,11 @@ TaggingRules->{
Twist2GluonOperator. If set to True the full form of the operator is \
inserted. Explicit[exp] inserts explicit expressions of GluonVertex, \
Twist2GluonOperator etc. in exp. SUNF's are replaced by SUNTrace objects.",
- "synonyms" -> {}, "title" -> "Explicit", "titlemodifier" -> "",
- "windowtitle" -> "Explicit", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Explicit"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Explicit",
+ "titlemodifier" -> "", "windowtitle" -> "Explicit", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Explicit"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -807,8 +758,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -817,131 +769,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3565, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4678, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2137769523]},
+ CellID->295221976]},
"Explicit"->{
- Cell[4199, 128, 248, 7, 27, "Input",
+ Cell[5310, 162, 248, 7, 27, "Input",
CellTags->"Explicit",
CellID->672712555],
- Cell[4450, 137, 1221, 54, 42, "Output",
- CellTags->"Explicit",
- CellID->1698625354],
- Cell[5708, 196, 128, 4, 27, "Input",
+ Cell[5561, 171, 1200, 53, 40, "Output",
+ CellTags->"Explicit"],
+ Cell[6798, 229, 128, 4, 27, "Input",
CellTags->"Explicit",
CellID->1603275034],
- Cell[5839, 202, 3986, 160, 43, "Output",
- CellTags->"Explicit",
- CellID->1578200832],
- Cell[9862, 367, 202, 6, 27, "Input",
+ Cell[6929, 235, 2887, 118, 43, "Output",
+ CellTags->"Explicit"],
+ Cell[9853, 358, 202, 6, 27, "Input",
CellTags->"Explicit",
CellID->221852196],
- Cell[10067, 375, 1040, 42, 62, "Output",
- CellTags->"Explicit",
- CellID->524953586],
- Cell[11144, 422, 127, 4, 27, "Input",
+ Cell[10058, 366, 1020, 41, 56, "Output",
+ CellTags->"Explicit"],
+ Cell[11115, 412, 127, 4, 27, "Input",
CellTags->"Explicit",
CellID->441966106],
- Cell[11274, 428, 4653, 182, 62, "Output",
- CellTags->"Explicit",
- CellID->993425694],
- Cell[15964, 615, 171, 5, 27, "Input",
+ Cell[11245, 418, 3853, 151, 56, "Output",
+ CellTags->"Explicit"],
+ Cell[15135, 574, 171, 5, 27, "Input",
CellTags->"Explicit",
CellID->3454152],
- Cell[16138, 622, 374, 15, 40, "Output",
- CellTags->"Explicit",
- CellID->342672291],
- Cell[16549, 642, 128, 4, 27, "Input",
+ Cell[15309, 581, 354, 14, 40, "Output",
+ CellTags->"Explicit"],
+ Cell[15700, 600, 128, 4, 27, "Input",
CellTags->"Explicit",
CellID->1217375686],
- Cell[16680, 648, 1852, 81, 44, "Output",
- CellTags->"Explicit",
- CellID->559853350],
- Cell[18900, 752, 429, 15, 32, "Text",
- CellTags->"Explicit",
- CellID->1892239370]}
+ Cell[15831, 606, 1762, 76, 43, "Output",
+ CellTags->"Explicit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 21386, 818},
- {"Explicit", 21521, 822}
+ {"PrimaryExamplesSection", 20449, 770},
+ {"Explicit", 20584, 774}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3123, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 659, 17, 113, "Usage",
+Cell[3706, 99, 285, 11, 45, "ObjectNameGrid"],
+Cell[3994, 112, 659, 17, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3565, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4678, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2137769523],
+ CellID->295221976],
Cell[CellGroupData[{
-Cell[3978, 118, 196, 6, 25, "ExampleSection",
- CellID->1555052173],
+Cell[5090, 152, 195, 6, 26, "ExampleSection",
+ CellID->962752738],
Cell[CellGroupData[{
-Cell[4199, 128, 248, 7, 27, "Input",
+Cell[5310, 162, 248, 7, 27, "Input",
CellTags->"Explicit",
CellID->672712555],
-Cell[4450, 137, 1221, 54, 42, "Output",
- CellTags->"Explicit",
- CellID->1698625354]
+Cell[5561, 171, 1200, 53, 40, "Output",
+ CellTags->"Explicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5708, 196, 128, 4, 27, "Input",
+Cell[6798, 229, 128, 4, 27, "Input",
CellTags->"Explicit",
CellID->1603275034],
-Cell[5839, 202, 3986, 160, 43, "Output",
- CellTags->"Explicit",
- CellID->1578200832]
+Cell[6929, 235, 2887, 118, 43, "Output",
+ CellTags->"Explicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9862, 367, 202, 6, 27, "Input",
+Cell[9853, 358, 202, 6, 27, "Input",
CellTags->"Explicit",
CellID->221852196],
-Cell[10067, 375, 1040, 42, 62, "Output",
- CellTags->"Explicit",
- CellID->524953586]
+Cell[10058, 366, 1020, 41, 56, "Output",
+ CellTags->"Explicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11144, 422, 127, 4, 27, "Input",
+Cell[11115, 412, 127, 4, 27, "Input",
CellTags->"Explicit",
CellID->441966106],
-Cell[11274, 428, 4653, 182, 62, "Output",
- CellTags->"Explicit",
- CellID->993425694]
+Cell[11245, 418, 3853, 151, 56, "Output",
+ CellTags->"Explicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15964, 615, 171, 5, 27, "Input",
+Cell[15135, 574, 171, 5, 27, "Input",
CellTags->"Explicit",
CellID->3454152],
-Cell[16138, 622, 374, 15, 40, "Output",
- CellTags->"Explicit",
- CellID->342672291]
+Cell[15309, 581, 354, 14, 40, "Output",
+ CellTags->"Explicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16549, 642, 128, 4, 27, "Input",
+Cell[15700, 600, 128, 4, 27, "Input",
CellTags->"Explicit",
CellID->1217375686],
-Cell[16680, 648, 1852, 81, 44, "Output",
- CellTags->"Explicit",
- CellID->559853350]
+Cell[15831, 606, 1762, 76, 43, "Output",
+ CellTags->"Explicit"]
}, Open ]]
}, Open ]],
-Cell[18559, 733, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17620, 686, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18627, 738, 270, 12, 31, "SeeAlsoSection",
+Cell[17688, 691, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[18900, 752, 429, 15, 32, "Text",
- CellTags->"Explicit",
- CellID->1892239370]
+Cell[17961, 705, 388, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[19344, 770, 23, 0, 42, "FooterCell"]
+Cell[18364, 721, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitDiracIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitDiracIndex.nb
new file mode 100644
index 000000000..a1932ccb0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitDiracIndex.nb
@@ -0,0 +1,409 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12203, 399]
+NotebookOptionsPosition[ 9248, 311]
+NotebookOutlinePosition[ 11370, 368]
+CellTagsIndexPosition[ 11285, 363]
+WindowTitle->ExplicitDiracIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracChainFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitDiracIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExplicitDiracIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+ExplicitDiracIndex.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$83805],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExplicitDiracIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ExplicitDiracIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ExplicitDiracIndex", "[", "ind", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is an explicit Dirac index, i.e., ",
+ Cell[BoxData["ind"], "InlineFormula"],
+ " is an integer"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->632170420],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->904166094],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ",", "1", ",", "2"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1567992074],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["2",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{53, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1008305614]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1377283560],
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"ExplicitDiracIndex", "[", "1", "]"}], ",",
+ RowBox[{"ExplicitDiracIndex", "[", "2", "]"}]}], "]"}]], "Output",
+ ImageSize->{374, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1835465320]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"ExplicitDiracIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 21.085269}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ExplicitDiracIndex[ind] is an explicit Dirac index, i.e., ind is an \
+integer", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "ExplicitDiracIndex", "titlemodifier" -> "", "windowtitle" ->
+ "ExplicitDiracIndex", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ExplicitDiracIndex"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5223, 142, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->632170420]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11142, 356}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 3860, 89, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4453, 112, 295, 11, 45, "ObjectNameGrid"],
+Cell[4751, 125, 447, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5223, 142, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->632170420],
+Cell[CellGroupData[{
+Cell[5635, 161, 195, 6, 26, "ExampleSection",
+ CellID->904166094],
+Cell[CellGroupData[{
+Cell[5855, 171, 168, 5, 27, "Input",
+ CellID->1567992074],
+Cell[6026, 178, 627, 27, 38, "Output",
+ CellID->1008305614]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6690, 210, 131, 4, 27, "Input",
+ CellID->1377283560],
+Cell[6824, 216, 418, 11, 69, "Output",
+ CellID->1835465320]
+}, Open ]]
+}, Open ]],
+Cell[7269, 231, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7337, 236, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[7610, 250, 1596, 56, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[9221, 309, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitLorentzIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitLorentzIndex.nb
index f72ed5b63..ca1032593 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitLorentzIndex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitLorentzIndex.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9812, 329]
-NotebookOptionsPosition[ 6144, 219]
-NotebookOutlinePosition[ 8798, 292]
-CellTagsIndexPosition[ 8676, 286]
+NotebookDataLength[ 10503, 345]
+NotebookOptionsPosition[ 7041, 244]
+NotebookOutlinePosition[ 9596, 313]
+CellTagsIndexPosition[ 9474, 307]
WindowTitle->ExplicitLorentzIndex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitLorentzIndex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExplicitLorentzIndex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LorentzIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LorentzIndex"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Pair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitLorentzIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExplicitLorentzIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExplicitLorentzIndex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$52835],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExplicitLorentzIndex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$84248],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExplicitLorentzIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ ExplicitLorentzIndex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExplicitLorentzIndex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExplicitLorentzIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1653149493],
+ CellID->1919722414],
Cell[CellGroupData[{
@@ -117,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1218204684],
+ CellID->1632785011],
Cell[CellGroupData[{
@@ -136,23 +170,18 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["1",
- TraditionalForm],
+ FormBox["1",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{35, 18},
+ ImageSize->{36, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitLorentzIndex",
- CellLabel->"Out[1]=",
- CellID->1531481784]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +197,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"ExplicitLorentzIndex", "[", "1", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]], "Output",
- ImageSize->{375, 15},
+ ImageSize->{377, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitLorentzIndex",
- CellLabel->"Out[2]//StandardForm=",
- CellID->551395089]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -197,7 +225,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["LorentzIndex",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
@@ -210,17 +237,15 @@ Cell[TextData[{
ButtonNote->"Pair"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ExplicitLorentzIndex",
- CellID->617137688]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"ExplicitLorentzIndex",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -229,22 +254,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 44.800598}",
+ "built" -> "{2020, 1, 5, 18, 55, 22.283664}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"ExplicitLorentzIndex[ind] is an explicit Lorentz index, i.e., ind is an \
-integer.", "synonyms" -> {}, "title" -> "ExplicitLorentzIndex",
- "titlemodifier" -> "", "windowtitle" -> "ExplicitLorentzIndex", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/ExplicitLorentzIndex"},
- "SearchTextTranslated" -> ""},
+integer.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "ExplicitLorentzIndex", "titlemodifier" -> "", "windowtitle" ->
+ "ExplicitLorentzIndex", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ExplicitLorentzIndex"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -252,8 +277,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -262,75 +288,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3390, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4475, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1653149493]},
+ CellID->1919722414]},
"ExplicitLorentzIndex"->{
- Cell[4024, 123, 242, 7, 27, "Input",
+ Cell[5109, 157, 242, 7, 27, "Input",
CellTags->"ExplicitLorentzIndex",
CellID->537373072],
- Cell[4269, 132, 521, 22, 39, "Output",
- CellTags->"ExplicitLorentzIndex",
- CellID->1531481784],
- Cell[4827, 159, 138, 4, 27, "Input",
+ Cell[5354, 166, 420, 17, 40, "Output",
+ CellTags->"ExplicitLorentzIndex"],
+ Cell[5811, 188, 138, 4, 27, "Input",
CellTags->"ExplicitLorentzIndex",
CellID->93969146],
- Cell[4968, 165, 353, 10, 49, "Output",
- CellTags->"ExplicitLorentzIndex",
- CellID->551395089],
- Cell[5689, 198, 413, 16, 31, "Text",
- CellTags->"ExplicitLorentzIndex",
- CellID->617137688]}
+ Cell[5952, 194, 333, 9, 51, "Output",
+ CellTags->"ExplicitLorentzIndex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8006, 263},
- {"ExplicitLorentzIndex", 8153, 267}
+ {"PrimaryExamplesSection", 8948, 289},
+ {"ExplicitLorentzIndex", 9096, 293}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[592, 21, 2293, 52, 51, "AnchorBarGrid",
+Cell[592, 21, 3144, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2888, 75, 63, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2954, 78, 411, 12, 82, "Usage",
+Cell[3739, 99, 297, 11, 45, "ObjectNameGrid"],
+Cell[4039, 112, 411, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3390, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4475, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1653149493],
+ CellID->1919722414],
Cell[CellGroupData[{
-Cell[3803, 113, 196, 6, 25, "ExampleSection",
- CellID->1218204684],
+Cell[4888, 147, 196, 6, 26, "ExampleSection",
+ CellID->1632785011],
Cell[CellGroupData[{
-Cell[4024, 123, 242, 7, 27, "Input",
+Cell[5109, 157, 242, 7, 27, "Input",
CellTags->"ExplicitLorentzIndex",
CellID->537373072],
-Cell[4269, 132, 521, 22, 39, "Output",
- CellTags->"ExplicitLorentzIndex",
- CellID->1531481784]
+Cell[5354, 166, 420, 17, 40, "Output",
+ CellTags->"ExplicitLorentzIndex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4827, 159, 138, 4, 27, "Input",
+Cell[5811, 188, 138, 4, 27, "Input",
CellTags->"ExplicitLorentzIndex",
CellID->93969146],
-Cell[4968, 165, 353, 10, 49, "Output",
- CellTags->"ExplicitLorentzIndex",
- CellID->551395089]
+Cell[5952, 194, 333, 9, 51, "Output",
+ CellTags->"ExplicitLorentzIndex"]
}, Open ]]
}, Open ]],
-Cell[5348, 179, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6312, 207, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5416, 184, 270, 12, 31, "SeeAlsoSection",
+Cell[6380, 212, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5689, 198, 413, 16, 31, "Text",
- CellTags->"ExplicitLorentzIndex",
- CellID->617137688]
+Cell[6653, 226, 346, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[6117, 217, 23, 0, 42, "FooterCell"]
+Cell[7014, 242, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitPartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitPartialD.nb
index a10c244cb..815c4f5b3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitPartialD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitPartialD.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13924, 484]
-NotebookOptionsPosition[ 9059, 332]
-NotebookOutlinePosition[ 12283, 423]
-CellTagsIndexPosition[ 12163, 417]
+NotebookDataLength[ 16817, 595]
+NotebookOptionsPosition[ 11969, 445]
+NotebookOutlinePosition[ 14843, 524]
+CellTagsIndexPosition[ 14723, 518]
WindowTitle->ExplicitPartialD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitPartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExplicitPartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"LeftRightPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftRightPartialD"], "\<\"LeftRightPartialD2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/LeftRightPartialD2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitPartialD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExplicitPartialD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExplicitPartialD.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$53512],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExplicitPartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$85151],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExplicitPartialD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +99,34 @@ ExplicitPartialD.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExplicitPartialD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExplicitPartialD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"ExplicitPartialD", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "inserts in exp the definition for LeftRightPartialD[z] (and \
-LeftRightPartialD2[z])."
+ " \[LineSeparator]inserts the definitions for ",
+ ButtonBox["LeftRightPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LeftRightPartialD",
+ ButtonNote->"LeftRightPartialD"],
+ " and ",
+ ButtonBox["LeftRightPartialD2",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LeftRightPartialD2",
+ ButtonNote->"LeftRightPartialD2"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -104,29 +148,49 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1015098155],
+ CellID->1091708813],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->690959109],
+ CellID->993902552],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ExplicitPartialD", "[", " ",
- RowBox[{"LeftRightPartialD", "[", "\[Mu]", "]"}], " ", "]"}]], "Input",
+ RowBox[{" ",
+ RowBox[{"LeftRightPartialD", "[", "\[Mu]", "]"}], " "}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[LeftRightArrow]"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{24, 24},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExplicitPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExplicitPartialD",
- CellLabel->"In[1]:=",
+ CellLabel->"In[2]:=",
CellID->2001527654],
Cell[BoxData[
@@ -147,22 +211,44 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{85, 41},
+ ImageSize->{83, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitPartialD",
- CellLabel->"Out[1]=",
- CellID->1715328697]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ExplicitPartialD", "[", " ",
- RowBox[{"LeftRightPartialD2", "[", "\[Mu]", "]"}], " ", "]"}]], "Input",
- CellTags->"ExplicitPartialD",
- CellLabel->"In[2]:=",
- CellID->1875131375],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"LeftRightPartialD2", "[", "\[Mu]", "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[LeftRightArrow]"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{24, 24},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExplicitPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -179,21 +265,46 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{55, 27},
+ ImageSize->{54, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ExplicitPartialD",
- CellLabel->"Out[2]=",
- CellID->1071634399]
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"LeftRightPartialD", "[", "OPEDelta", "]"}], " "}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[LeftRightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{24, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ExplicitPartialD", "[", " ",
- RowBox[{"LeftRightPartialD", "[", "OPEDelta", "]"}], " ", "]"}]], "Input",
+ RowBox[{"ExplicitPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExplicitPartialD",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1791671183],
Cell[BoxData[
@@ -214,23 +325,29 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{87, 41},
+ ImageSize->{83, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitPartialD",
- CellLabel->"Out[3]=",
- CellID->490499430]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"16", " ",
RowBox[{
RowBox[{"LeftRightPartialD", "[", "OPEDelta", "]"}], "^", "4"}]}]], "Input",\
CellTags->"ExplicitPartialD",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->2120633580],
Cell[BoxData[
@@ -242,12 +359,11 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm], "4"]}], TraditionalForm]], "Output",
- ImageSize->{43, 26},
+ ImageSize->{42, 23},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitPartialD",
- CellLabel->"Out[4]=",
- CellID->962398275]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -255,7 +371,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ExplicitPartialD", "[", "%", "]"}]], "Input",
CellTags->"ExplicitPartialD",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->1962668305],
Cell[BoxData[
@@ -275,12 +391,12 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]]}], ")"}], "4"], TraditionalForm]], "Output",
- ImageSize->{80, 34},
+ ImageSize->{75, 27},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitPartialD",
- CellLabel->"Out[5]=",
- CellID->2132998296]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -304,7 +420,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ExpandPartialD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ExpandPartialD",
@@ -323,9 +438,7 @@ Cell[TextData[{
ButtonNote->"LeftRightPartialD2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ExplicitPartialD",
- CellID->1172851554]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -333,7 +446,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"ExplicitPartialD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -342,22 +455,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 47.997611}",
+ "built" -> "{2020, 1, 5, 18, 55, 24.804064}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ExplicitPartialD[exp] inserts in exp the definition for \
-LeftRightPartialD[z] (and LeftRightPartialD2[z]).", "synonyms" -> {}, "title" ->
+ "ExplicitPartialD[exp] inserts the definitions for LeftRightPartialD and \
+LeftRightPartialD2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"ExplicitPartialD", "titlemodifier" -> "", "windowtitle" ->
"ExplicitPartialD", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ExplicitPartialD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -365,8 +478,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -375,117 +489,114 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3393, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4903, 139, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1015098155]},
+ CellID->1091708813]},
"ExplicitPartialD"->{
- Cell[4026, 124, 202, 5, 27, "Input",
+ Cell[6008, 189, 144, 4, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->2001527654],
- Cell[4231, 131, 631, 23, 62, "Output",
- CellTags->"ExplicitPartialD",
- CellID->1715328697],
- Cell[4899, 159, 203, 5, 27, "Input",
- CellTags->"ExplicitPartialD",
- CellID->1875131375],
- Cell[5105, 166, 536, 20, 48, "Output",
- CellTags->"ExplicitPartialD",
- CellID->1071634399],
- Cell[5678, 191, 205, 5, 27, "Input",
+ Cell[6155, 195, 610, 22, 56, "Output",
+ CellTags->"ExplicitPartialD"],
+ Cell[8620, 303, 144, 4, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->1791671183],
- Cell[5886, 198, 650, 23, 62, "Output",
- CellTags->"ExplicitPartialD",
- CellID->490499430],
- Cell[6573, 226, 202, 7, 27, "Input",
+ Cell[8767, 309, 630, 22, 56, "Output",
+ CellTags->"ExplicitPartialD"],
+ Cell[9576, 343, 202, 7, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->2120633580],
- Cell[6778, 235, 413, 14, 47, "Output",
- CellTags->"ExplicitPartialD",
- CellID->962398275],
- Cell[7228, 254, 144, 4, 27, "Input",
+ Cell[9781, 352, 393, 13, 44, "Output",
+ CellTags->"ExplicitPartialD"],
+ Cell[10211, 370, 144, 4, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->1962668305],
- Cell[7375, 260, 630, 22, 55, "Output",
- CellTags->"ExplicitPartialD",
- CellID->2132998296],
- Cell[8373, 305, 644, 22, 70, "Text",
- CellTags->"ExplicitPartialD",
- CellID->1172851554]}
+ Cell[10358, 376, 609, 21, 48, "Output",
+ CellTags->"ExplicitPartialD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10932, 376},
- {"ExplicitPartialD", 11075, 380}
+ {"PrimaryExamplesSection", 13869, 490},
+ {"ExplicitPartialD", 14013, 494}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3272, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 438, 13, 83, "Usage",
+Cell[3863, 101, 293, 11, 45, "ObjectNameGrid"],
+Cell[4159, 114, 719, 21, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3393, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4903, 139, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1015098155],
+ CellID->1091708813],
+Cell[CellGroupData[{
+Cell[5316, 158, 195, 6, 26, "ExampleSection",
+ CellID->993902552],
Cell[CellGroupData[{
-Cell[3806, 114, 195, 6, 25, "ExampleSection",
- CellID->690959109],
+Cell[5536, 168, 120, 3, 27, "Input"],
+Cell[5659, 173, 312, 11, 45, "Output"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4026, 124, 202, 5, 27, "Input",
+Cell[6008, 189, 144, 4, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->2001527654],
-Cell[4231, 131, 631, 23, 62, "Output",
- CellTags->"ExplicitPartialD",
- CellID->1715328697]
+Cell[6155, 195, 610, 22, 56, "Output",
+ CellTags->"ExplicitPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4899, 159, 203, 5, 27, "Input",
- CellTags->"ExplicitPartialD",
- CellID->1875131375],
-Cell[5105, 166, 536, 20, 48, "Output",
- CellTags->"ExplicitPartialD",
- CellID->1071634399]
+Cell[6802, 222, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[6932, 228, 98, 2, 27, "Input"],
+Cell[7033, 232, 312, 11, 45, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5678, 191, 205, 5, 27, "Input",
+Cell[7382, 248, 92, 2, 27, "Input"],
+Cell[7477, 252, 484, 18, 45, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8010, 276, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8140, 282, 118, 3, 27, "Input"],
+Cell[8261, 287, 322, 11, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8620, 303, 144, 4, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->1791671183],
-Cell[5886, 198, 650, 23, 62, "Output",
- CellTags->"ExplicitPartialD",
- CellID->490499430]
+Cell[8767, 309, 630, 22, 56, "Output",
+ CellTags->"ExplicitPartialD"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[6573, 226, 202, 7, 27, "Input",
+Cell[9446, 337, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9576, 343, 202, 7, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->2120633580],
-Cell[6778, 235, 413, 14, 47, "Output",
- CellTags->"ExplicitPartialD",
- CellID->962398275]
+Cell[9781, 352, 393, 13, 44, "Output",
+ CellTags->"ExplicitPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7228, 254, 144, 4, 27, "Input",
+Cell[10211, 370, 144, 4, 27, "Input",
CellTags->"ExplicitPartialD",
CellID->1962668305],
-Cell[7375, 260, 630, 22, 55, "Output",
- CellTags->"ExplicitPartialD",
- CellID->2132998296]
+Cell[10358, 376, 609, 21, 48, "Output",
+ CellTags->"ExplicitPartialD"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[8032, 286, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11006, 402, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8100, 291, 270, 12, 70, "SeeAlsoSection",
+Cell[11074, 407, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8373, 305, 644, 22, 70, "Text",
- CellTags->"ExplicitPartialD",
- CellID->1172851554]
+Cell[11347, 421, 580, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[9032, 330, 23, 0, 70, "FooterCell"]
+Cell[11942, 443, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNFIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNFIndex.nb
new file mode 100644
index 000000000..53ea1d4c3
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNFIndex.nb
@@ -0,0 +1,360 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10396, 350]
+NotebookOptionsPosition[ 7264, 256]
+NotebookOutlinePosition[ 9414, 313]
+CellTagsIndexPosition[ 9330, 308]
+WindowTitle->ExplicitSUNFIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNIndex\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNIndex"], "\<\"SUNFIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNFIndex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitSUNFIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExplicitSUNFIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+ExplicitSUNFIndex.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$85596],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExplicitSUNFIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ExplicitSUNFIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ExplicitSUNFIndex", "[", "ind", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a specific SU(N) index in the fundamental \
+representation, i.e. ind is an integer."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2097280005],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2137554488],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExplicitSUNFIndex", "[", "1", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->266217332],
+
+Cell[BoxData[
+ FormBox["1", TraditionalForm]], "Output",
+ ImageSize->{11, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1167023739]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNTF", "[",
+ RowBox[{"a", ",", "1", ",", "2"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->389081568],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["1",
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]}],
+ FormBox["a",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{29, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1718232289]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1621387441],
+
+Cell[BoxData[
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"SUNIndex", "[", "a", "]"}], "}"}], ",",
+ RowBox[{"ExplicitSUNFIndex", "[", "1", "]"}], ",",
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}]}], "]"}]], "Output",
+ ImageSize->{518, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->2133851564]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SUNIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNIndex",
+ ButtonNote->"SUNIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNFIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFIndex",
+ ButtonNote->"SUNFIndex"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->40109896]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"ExplicitSUNFIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 25.990597}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ExplicitSUNFIndex[ind] is a specific SU(N) index in the fundamental \
+representation, i.e. ind is an integer.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ExplicitSUNFIndex", "titlemodifier" -> "", "windowtitle" ->
+ "ExplicitSUNFIndex", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ExplicitSUNFIndex"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4471, 127, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2097280005]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9186, 301}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 3126, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3718, 98, 294, 11, 45, "ObjectNameGrid"],
+Cell[4015, 111, 431, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4471, 127, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2097280005],
+Cell[CellGroupData[{
+Cell[4884, 146, 196, 6, 26, "ExampleSection",
+ CellID->2137554488],
+Cell[CellGroupData[{
+Cell[5105, 156, 113, 3, 27, "Input",
+ CellID->266217332],
+Cell[5221, 161, 187, 6, 35, "Output",
+ CellID->1167023739]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5445, 172, 134, 4, 27, "Input",
+ CellID->389081568],
+Cell[5582, 178, 344, 14, 39, "Output",
+ CellID->1718232289]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5963, 197, 131, 4, 27, "Input",
+ CellID->1621387441],
+Cell[6097, 203, 389, 11, 51, "Output",
+ CellID->2133851564]
+}, Open ]]
+}, Open ]],
+Cell[6513, 218, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6581, 223, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[6854, 237, 368, 14, 56, "SeeAlso",
+ CellID->40109896]
+}, Open ]],
+Cell[7237, 254, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNIndex.nb
index 21be2a8c5..e482ac7c3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNIndex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExplicitSUNIndex.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8708, 290]
-NotebookOptionsPosition[ 5521, 195]
-NotebookOutlinePosition[ 7928, 261]
-CellTagsIndexPosition[ 7810, 255]
+NotebookDataLength[ 9716, 314]
+NotebookOptionsPosition[ 6652, 225]
+NotebookOutlinePosition[ 9017, 289]
+CellTagsIndexPosition[ 8899, 283]
WindowTitle->ExplicitSUNIndex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitSUNIndex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExplicitSUNIndex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"SUNDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNF"], "\<\"SUNIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNIndex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExplicitSUNIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExplicitSUNIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExplicitSUNIndex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$53854],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExplicitSUNIndex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$86035],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExplicitSUNIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,18 +100,25 @@ ExplicitSUNIndex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExplicitSUNIndex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExplicitSUNIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"ExplicitSUNIndex", "[", "ind", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a specific SU(",
- StyleBox["N",
- FontSlant->"Italic"],
- ") index, i.e., ind is an integer."
+ " \[LineSeparator] is a specific SU(N) index in the adjoint \
+representation, i.e. ind is an integer."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -110,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->843626271],
+ CellID->1221262894],
Cell[CellGroupData[{
@@ -120,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1752506694],
+ CellID->482876599],
Cell[CellGroupData[{
@@ -132,12 +166,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ExplicitSUNIndex",
- CellLabel->"Out[1]=",
- CellID->835416034]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -161,7 +194,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FCI",
@@ -186,9 +218,7 @@ Cell[TextData[{
ButtonNote->"SUNIndex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ExplicitSUNIndex",
- CellID->1491985045]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -196,7 +226,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"ExplicitSUNIndex",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -205,21 +235,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 49.571935}",
+ "built" -> "{2020, 1, 5, 18, 55, 27.182038}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ExplicitSUNIndex[ind] is a specific SU(N) index, i.e., ind is an \
-integer.", "synonyms" -> {}, "title" -> "ExplicitSUNIndex", "titlemodifier" ->
- "", "windowtitle" -> "ExplicitSUNIndex", "type" -> "Symbol", "uri" ->
+ "ExplicitSUNIndex[ind] is a specific SU(N) index in the adjoint \
+representation, i.e. ind is an integer.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ExplicitSUNIndex", "titlemodifier" -> "", "windowtitle" ->
+ "ExplicitSUNIndex", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ExplicitSUNIndex"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -227,8 +258,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -237,61 +269,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3414, 97, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4629, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->843626271]},
+ CellID->1221262894]},
"ExplicitSUNIndex"->{
- Cell[4047, 126, 143, 4, 27, "Input",
+ Cell[5262, 160, 143, 4, 27, "Input",
CellTags->"ExplicitSUNIndex",
CellID->902504379],
- Cell[4193, 132, 217, 7, 36, "Output",
- CellTags->"ExplicitSUNIndex",
- CellID->835416034],
- Cell[4778, 162, 701, 28, 31, "Text",
- CellTags->"ExplicitSUNIndex",
- CellID->1491985045]}
+ Cell[5408, 166, 197, 6, 35, "Output",
+ CellTags->"ExplicitSUNIndex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7357, 238},
- {"ExplicitSUNIndex", 7499, 242}
+ {"PrimaryExamplesSection", 8562, 270},
+ {"ExplicitSUNIndex", 8706, 274}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3290, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 459, 15, 83, "Usage",
+Cell[3881, 102, 293, 11, 45, "ObjectNameGrid"],
+Cell[4177, 115, 427, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3414, 97, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4629, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->843626271],
+ CellID->1221262894],
Cell[CellGroupData[{
-Cell[3826, 116, 196, 6, 25, "ExampleSection",
- CellID->1752506694],
+Cell[5042, 150, 195, 6, 26, "ExampleSection",
+ CellID->482876599],
Cell[CellGroupData[{
-Cell[4047, 126, 143, 4, 27, "Input",
+Cell[5262, 160, 143, 4, 27, "Input",
CellTags->"ExplicitSUNIndex",
CellID->902504379],
-Cell[4193, 132, 217, 7, 36, "Output",
- CellTags->"ExplicitSUNIndex",
- CellID->835416034]
+Cell[5408, 166, 197, 6, 35, "Output",
+ CellTags->"ExplicitSUNIndex"]
}, Open ]]
}, Open ]],
-Cell[4437, 143, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5632, 176, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4505, 148, 270, 12, 31, "SeeAlsoSection",
+Cell[5700, 181, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4778, 162, 701, 28, 31, "Text",
- CellTags->"ExplicitSUNIndex",
- CellID->1491985045]
+Cell[5973, 195, 637, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[5494, 193, 23, 0, 42, "FooterCell"]
+Cell[6625, 223, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraFactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraFactor.nb
index 84ae6a98c..29acc2f90 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraFactor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraFactor.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6253, 190]
-NotebookOptionsPosition[ 3955, 123]
-NotebookOutlinePosition[ 5988, 179]
-CellTagsIndexPosition[ 5915, 174]
+NotebookDataLength[ 6984, 209]
+NotebookOptionsPosition[ 4899, 152]
+NotebookOutlinePosition[ 6777, 201]
+CellTagsIndexPosition[ 6734, 198]
WindowTitle->ExtraFactor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExtraFactor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExtraFactor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FermionSpinSum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FermionSpinSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExtraFactor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExtraFactor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExtraFactor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$54190],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExtraFactor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$86471],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExtraFactor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ ExtraFactor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExtraFactor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExtraFactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,16 +139,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["FermionSpinSum",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FermionSpinSum",
ButtonNote->"FermionSpinSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ExtraFactor",
- CellID->1492736097]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 50.970120}",
+ "built" -> "{2020, 1, 5, 18, 55, 28.222579}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -144,11 +173,11 @@ TaggingRules->{
"None", "summary" ->
"ExtraFactor is an option for FermionSpinSum. The setting ExtraFactor -> \
fa multiplies the whole amplitude with the factor fa before squaring.",
- "synonyms" -> {}, "title" -> "ExtraFactor", "titlemodifier" -> "",
- "windowtitle" -> "ExtraFactor", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ExtraFactor"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ExtraFactor",
+ "titlemodifier" -> "", "windowtitle" -> "ExtraFactor", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/ExtraFactor"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "ExtraFactor"->{
- Cell[3649, 108, 264, 10, 70, "Text",
- CellTags->"ExtraFactor",
- CellID->1492736097]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"ExtraFactor", 5800, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3026, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 451, 12, 70, "Usage",
+Cell[3612, 97, 288, 11, 70, "ObjectNameGrid"],
+Cell[3903, 110, 451, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3376, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4379, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3649, 108, 264, 10, 70, "Text",
- CellTags->"ExtraFactor",
- CellID->1492736097]
+Cell[4652, 140, 205, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3928, 121, 23, 0, 70, "FooterCell"]
+Cell[4872, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraVariables.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraVariables.nb
index f914a32b4..726a58da7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraVariables.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ExtraVariables.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6444, 195]
-NotebookOptionsPosition[ 4113, 128]
-NotebookOutlinePosition[ 6177, 184]
-CellTagsIndexPosition[ 6101, 179]
+NotebookDataLength[ 7255, 216]
+NotebookOptionsPosition[ 5146, 159]
+NotebookOutlinePosition[ 7047, 208]
+CellTagsIndexPosition[ 7004, 205]
WindowTitle->ExtraVariables
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExtraVariables\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExtraVariables"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ExtraVariables\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ExtraVariables"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ExtraVariables.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$54535],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExtraVariables", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$86914],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ExtraVariables", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ ExtraVariables.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ExtraVariables", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ExtraVariables", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +152,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ExtraVariables",
- CellID->908293507]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,10 +169,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 52.292898}",
+ "built" -> "{2020, 1, 5, 18, 55, 29.244505}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -149,11 +180,11 @@ TaggingRules->{
"None", "summary" ->
"ExtraVariables is an option for OneLoopSum; it may be set to a list of \
variables which are also bracketed out in the result, just like B0, C0, D0 \
-and PaVe.", "synonyms" -> {}, "title" -> "ExtraVariables", "titlemodifier" ->
- "", "windowtitle" -> "ExtraVariables", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ExtraVariables"}},
+and PaVe.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "ExtraVariables",
+ "titlemodifier" -> "", "windowtitle" -> "ExtraVariables", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ExtraVariables"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,41 +193,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "ExtraVariables"->{
- Cell[3676, 108, 395, 15, 70, "Text",
- CellTags->"ExtraVariables",
- CellID->908293507]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"ExtraVariables", 5984, 172}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3114, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 460, 12, 70, "Usage",
+Cell[3703, 98, 291, 11, 70, "ObjectNameGrid"],
+Cell[3997, 111, 460, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3403, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4482, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3676, 108, 395, 15, 70, "Text",
- CellTags->"ExtraVariables",
- CellID->908293507]
+Cell[4755, 141, 349, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4086, 126, 23, 0, 70, "FooterCell"]
+Cell[5119, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAD.nb
index bd1b82eca..edeecdb4f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAD.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14902, 518]
-NotebookOptionsPosition[ 10225, 364]
-NotebookOutlinePosition[ 13406, 457]
-CellTagsIndexPosition[ 13299, 451]
+NotebookDataLength[ 18903, 657]
+NotebookOptionsPosition[ 14365, 514]
+NotebookOutlinePosition[ 17262, 595]
+CellTagsIndexPosition[ 17155, 589]
WindowTitle->FAD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FAD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FAD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FAD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$56607],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FAD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FAD"], "\<\"FCE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"FeynAmpDenominator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominator"], \
+"\<\"FeynAmpDenominatorSimplify\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"], \
+"\<\"PropagatorDenominator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PropagatorDenominator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FAD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$89576],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FAD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -94,6 +136,54 @@ Translation into FeynCalc internal form is performed by FeynCalcInternal."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1808684290],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FAD", "]"}]], "Input",
+ CellLabel->"In[751]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Dimension", "\[Rule]", "D"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{112, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[751]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -109,7 +199,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1002001349],
+ CellID->1958456365],
Cell[CellGroupData[{
@@ -119,7 +209,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2046427822],
+ CellID->1301223188],
Cell[CellGroupData[{
@@ -135,27 +225,43 @@ Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"p", "-", "q"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`p - $CellContext`q)^2, "]"],
- Editable->False], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{132, 48},
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{99, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FAD",
- CellLabel->"Out[1]=",
- CellID->574537865]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -174,55 +280,110 @@ Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False], ".",
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["p", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`p^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
+ RowBox[{
SuperscriptBox[
- RowBox[{"(",
- RowBox[{"p", "-", "q"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"-\"\>", "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
SequenceForm[
- "[", ($CellContext`p - $CellContext`q)^2, "-", $CellContext`m^2, "]"],
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D]],
+ "-", $CellContext`m^2],
Editable->False], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{164, 48},
+ ImageSize->{144, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FAD",
- CellLabel->"Out[2]=",
- CellID->1777754458]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
+ RowBox[{"FAD", "[",
RowBox[{
- RowBox[{
- RowBox[{"FAD", "[",
- RowBox[{"q", ",",
- RowBox[{"p", "-", "q"}]}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"FAD",
- CellLabel->"In[3]:=",
- CellID->434953197],
+ RowBox[{"{",
+ RowBox[{"p", ",", "0", ",", "2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "m", ",", "3"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
- RowBox[{"FAD", "[",
- RowBox[{"q", ",",
- RowBox[{"p", "-", "q"}]}], "]"}]], "Output",
- ImageSize->{102, 15},
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False], ")"}], "2"], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D]],
+ "-", $CellContext`m^2],
+ Editable->False], ")"}], "3"]}]], TraditionalForm]], "Output",
+ ImageSize->{172, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FAD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1226815761]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -257,8 +418,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FAD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->962460787]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -270,32 +430,24 @@ Cell[BoxData[
RowBox[{"FAD", "[", "p", "]"}], " ",
RowBox[{"FAD", "[",
RowBox[{"p", "-", "q"}], "]"}]}], " ", "//", " ",
- "FeynAmpDenominatorCombine"}], "//", "StandardForm"}]], "Input",
+ RowBox[{
+ RowBox[{"FeynAmpDenominatorCombine", "[",
+ RowBox[{"#", ",",
+ RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}], "&"}]}], "//",
+ "StandardForm"}]], "Input",
CellTags->"FAD",
CellLabel->"In[5]:=",
CellID->844291899],
Cell[BoxData[
- RowBox[{"FeynAmpDenominator", "[",
- RowBox[{
- RowBox[{"PropagatorDenominator", "[",
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "D"}], "]"}], ",", "0"}], "]"}], ",",
- RowBox[{"PropagatorDenominator", "[",
- RowBox[{
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "D"}], "]"}], "-",
- RowBox[{"Momentum", "[",
- RowBox[{"q", ",", "D"}], "]"}]}], ",", "0"}], "]"}]}], "]"}]], "Output",\
-
- ImageSize->{488, 33},
+ RowBox[{"FAD", "[",
+ RowBox[{"p", ",",
+ RowBox[{"p", "-", "q"}]}], "]"}]], "Output",
+ ImageSize->{103, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FAD",
- CellLabel->"Out[5]//StandardForm=",
- CellID->3238120]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -355,9 +507,7 @@ Cell[TextData[{
ButtonNote->"PropagatorDenominator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FAD",
- CellID->92528208]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -365,7 +515,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FAD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -374,10 +524,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 0.354281}",
+ "built" -> "{2020, 1, 5, 18, 55, 35.478507}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -387,11 +537,11 @@ TaggingRules->{
inverse propagator. FAD[q, q-p, ...] is 1/(q^2 (q-p)^2 ...). FAD[{q1,m}, \
{q1-p,m}, q2, ...] is 1/( (q1^2 - m^2) ( (q1-p)^2 - m^2 ) q2^2 ... ). \
Translation into FeynCalc internal form is performed by FeynCalcInternal.",
- "synonyms" -> {}, "title" -> "FAD", "titlemodifier" -> "", "windowtitle" ->
- "FAD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FAD"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FAD", "titlemodifier" ->
+ "", "windowtitle" -> "FAD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FAD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -399,8 +549,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -409,117 +560,105 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3484, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6157, 186, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1002001349]},
+ CellID->1958456365]},
"FAD"->{
- Cell[4118, 125, 165, 6, 27, "Input",
+ Cell[6791, 215, 165, 6, 27, "Input",
CellTags->"FAD",
CellID->1136569018],
- Cell[4286, 133, 806, 24, 69, "Output",
- CellTags->"FAD",
- CellID->574537865],
- Cell[5129, 162, 216, 8, 27, "Input",
+ Cell[6959, 223, 1096, 40, 61, "Output",
+ CellTags->"FAD"],
+ Cell[8092, 268, 216, 8, 27, "Input",
CellTags->"FAD",
CellID->1430394635],
- Cell[5348, 172, 926, 26, 69, "Output",
- CellTags->"FAD",
- CellID->1777754458],
- Cell[6311, 203, 263, 10, 27, "Input",
- CellTags->"FAD",
- CellID->434953197],
- Cell[6577, 215, 268, 9, 49, "Output",
- CellTags->"FAD",
- CellID->1226815761],
- Cell[6882, 229, 234, 9, 27, "Input",
+ Cell[8311, 278, 1303, 45, 64, "Output",
+ CellTags->"FAD"],
+ Cell[11348, 390, 234, 9, 27, "Input",
CellTags->"FAD",
CellID->2024009960],
- Cell[7119, 240, 633, 20, 67, "Output",
- CellTags->"FAD",
- CellID->962460787],
- Cell[7789, 265, 298, 10, 27, "Input",
+ Cell[11585, 401, 613, 19, 69, "Output",
+ CellTags->"FAD"],
+ Cell[12235, 425, 410, 14, 45, "Input",
CellTags->"FAD",
CellID->844291899],
- Cell[8090, 277, 631, 20, 67, "Output",
- CellTags->"FAD",
- CellID->3238120],
- Cell[9089, 320, 1094, 39, 32, "Text",
- CellTags->"FAD",
- CellID->92528208]}
+ Cell[12648, 441, 247, 8, 51, "Output",
+ CellTags->"FAD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12229, 410},
- {"FAD", 12359, 414}
+ {"PrimaryExamplesSection", 16415, 561},
+ {"FAD", 16546, 565}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3475, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 595, 14, 114, "Usage",
+Cell[4053, 105, 280, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4358, 120, 595, 14, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3484, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4978, 138, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1808684290],
+Cell[5720, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5776, 168, 87, 2, 70, "Input"],
+Cell[5866, 172, 230, 7, 35, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6157, 186, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1002001349],
+ CellID->1958456365],
Cell[CellGroupData[{
-Cell[3897, 115, 196, 6, 25, "ExampleSection",
- CellID->2046427822],
+Cell[6570, 205, 196, 6, 26, "ExampleSection",
+ CellID->1301223188],
Cell[CellGroupData[{
-Cell[4118, 125, 165, 6, 27, "Input",
+Cell[6791, 215, 165, 6, 27, "Input",
CellTags->"FAD",
CellID->1136569018],
-Cell[4286, 133, 806, 24, 69, "Output",
- CellTags->"FAD",
- CellID->574537865]
+Cell[6959, 223, 1096, 40, 61, "Output",
+ CellTags->"FAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5129, 162, 216, 8, 27, "Input",
+Cell[8092, 268, 216, 8, 27, "Input",
CellTags->"FAD",
CellID->1430394635],
-Cell[5348, 172, 926, 26, 69, "Output",
- CellTags->"FAD",
- CellID->1777754458]
+Cell[8311, 278, 1303, 45, 64, "Output",
+ CellTags->"FAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6311, 203, 263, 10, 27, "Input",
- CellTags->"FAD",
- CellID->434953197],
-Cell[6577, 215, 268, 9, 49, "Output",
- CellTags->"FAD",
- CellID->1226815761]
+Cell[9651, 328, 246, 8, 27, "Input"],
+Cell[9900, 338, 1411, 47, 64, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6882, 229, 234, 9, 27, "Input",
+Cell[11348, 390, 234, 9, 27, "Input",
CellTags->"FAD",
CellID->2024009960],
-Cell[7119, 240, 633, 20, 67, "Output",
- CellTags->"FAD",
- CellID->962460787]
+Cell[11585, 401, 613, 19, 69, "Output",
+ CellTags->"FAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7789, 265, 298, 10, 27, "Input",
+Cell[12235, 425, 410, 14, 45, "Input",
CellTags->"FAD",
CellID->844291899],
-Cell[8090, 277, 631, 20, 67, "Output",
- CellTags->"FAD",
- CellID->3238120]
+Cell[12648, 441, 247, 8, 51, "Output",
+ CellTags->"FAD"]
}, Open ]]
}, Open ]],
-Cell[8748, 301, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12922, 453, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8816, 306, 270, 12, 31, "SeeAlsoSection",
+Cell[12990, 458, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9089, 320, 1094, 39, 32, "Text",
- CellTags->"FAD",
- CellID->92528208]
+Cell[13263, 472, 1060, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[10198, 362, 23, 0, 42, "FooterCell"]
+Cell[14338, 512, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAPatch.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAPatch.nb
new file mode 100644
index 000000000..63478b6a9
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FAPatch.nb
@@ -0,0 +1,217 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 6864, 208]
+NotebookOptionsPosition[ 4749, 149]
+NotebookOutlinePosition[ 6553, 197]
+CellTagsIndexPosition[ 6510, 194]
+WindowTitle->FAPatch
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FAPatch\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FAPatch"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FAPatch.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$90019],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FAPatch", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FAPatch", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FAPatch", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is an auxiliary function that patches FeynArts to be \
+compatible with FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "If an unpatched copy of FeynArts is present in ",
+ ButtonBox["$FeynArtsDirectory",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/$FeynArtsDirectory",
+ ButtonNote->"$FeynArtsDirectory"],
+ ", evaluating ",
+ Cell[BoxData[
+ RowBox[{"FAPatch", "[", "]"}]], "InlineFormula"],
+ " will start the patching process."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FAPatch",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 36.709221}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FAPatch[] is an auxiliary function that patches FeynArts to be \
+compatible with FeynCalc.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FAPatch", "titlemodifier" -> "", "windowtitle" -> "FAPatch", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FAPatch"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 2268, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2850, 76, 284, 11, 70, "ObjectNameGrid"],
+Cell[3137, 89, 408, 12, 70, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3570, 105, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[4303, 131, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4337, 133, 370, 11, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[4722, 147, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC.nb
index 525ac5191..42743fbf0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10171, 360]
-NotebookOptionsPosition[ 6492, 239]
-NotebookOutlinePosition[ 9099, 317]
-CellTagsIndexPosition[ 8995, 311]
+NotebookDataLength[ 11235, 385]
+NotebookOptionsPosition[ 7721, 273]
+NotebookOutlinePosition[ 10249, 347]
+CellTagsIndexPosition[ 10145, 341]
WindowTitle->FC
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FC\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FC"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FC.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$61706],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FC",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcForm\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcForm"], "\<\"FI\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FI"], "\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FeynCalcInternal\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalcInternal"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FC.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$117099],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FC",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FC", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->173470362],
+ CellID->647062051],
Cell[CellGroupData[{
@@ -117,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1619831617],
+ CellID->2062751557],
Cell[BoxData["FI"], "Input",
CellTags->"FC",
@@ -141,8 +179,7 @@ Cell["{DiracGamma[5], DiracGamma[Momentum[p]]}", "Output",
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FC",
- CellLabel->"Out[2]=",
- CellID->914835770]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[BoxData["FC"], "Input",
@@ -177,12 +214,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{73, 21},
+ ImageSize->{79, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FC",
- CellLabel->"Out[4]=",
- CellID->832664174]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -230,9 +266,7 @@ Cell[TextData[{
ButtonNote->"FeynCalcInternal"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FC",
- CellID->121401811]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -240,7 +274,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FC",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -249,21 +283,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 23.169940}",
+ "built" -> "{2020, 1, 5, 18, 56, 52.104695}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FC changes the output format to FeynCalcForm. To change to InputForm use \
-FI.", "synonyms" -> {}, "title" -> "FC", "titlemodifier" -> "", "windowtitle" ->
- "FC", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FC"},
- "SearchTextTranslated" -> ""},
+FI.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FC", "titlemodifier" ->
+ "", "windowtitle" -> "FC", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FC"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -271,8 +305,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -281,87 +316,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3263, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4566, 132, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->173470362]},
+ CellID->647062051]},
"FC"->{
- Cell[3874, 121, 88, 3, 27, "Input",
+ Cell[5177, 159, 88, 3, 27, "Input",
CellTags->"FC",
CellID->907505833],
- Cell[3987, 128, 246, 8, 27, "Input",
+ Cell[5290, 166, 246, 8, 27, "Input",
CellTags->"FC",
CellID->2003442189],
- Cell[4236, 138, 206, 6, 36, "Output",
- CellTags->"FC",
- CellID->914835770],
- Cell[4457, 147, 88, 3, 27, "Input",
+ Cell[5539, 176, 186, 5, 36, "Output",
+ CellTags->"FC"],
+ Cell[5740, 184, 88, 3, 27, "Input",
CellTags->"FC",
CellID->119415853],
- Cell[4570, 154, 246, 8, 27, "Input",
+ Cell[5853, 191, 246, 8, 27, "Input",
CellTags->"FC",
CellID->1977687896],
- Cell[4819, 164, 523, 20, 42, "Output",
- CellTags->"FC",
- CellID->832664174],
- Cell[5710, 207, 740, 27, 32, "Text",
- CellTags->"FC",
- CellID->121401811]}
+ Cell[6102, 201, 503, 19, 43, "Output",
+ CellTags->"FC"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8273, 282},
- {"FC", 8401, 286}
+ {"PrimaryExamplesSection", 9547, 317},
+ {"FC", 9676, 321}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3302, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 380, 12, 82, "Usage",
+Cell[3879, 103, 279, 11, 45, "ObjectNameGrid"],
+Cell[4161, 116, 380, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3263, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4566, 132, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->173470362],
+ CellID->647062051],
Cell[CellGroupData[{
-Cell[3675, 113, 196, 6, 25, "ExampleSection",
- CellID->1619831617],
-Cell[3874, 121, 88, 3, 27, "Input",
+Cell[4978, 151, 196, 6, 26, "ExampleSection",
+ CellID->2062751557],
+Cell[5177, 159, 88, 3, 27, "Input",
CellTags->"FC",
CellID->907505833],
Cell[CellGroupData[{
-Cell[3987, 128, 246, 8, 27, "Input",
+Cell[5290, 166, 246, 8, 27, "Input",
CellTags->"FC",
CellID->2003442189],
-Cell[4236, 138, 206, 6, 36, "Output",
- CellTags->"FC",
- CellID->914835770]
+Cell[5539, 176, 186, 5, 36, "Output",
+ CellTags->"FC"]
}, Open ]],
-Cell[4457, 147, 88, 3, 27, "Input",
+Cell[5740, 184, 88, 3, 27, "Input",
CellTags->"FC",
CellID->119415853],
Cell[CellGroupData[{
-Cell[4570, 154, 246, 8, 27, "Input",
+Cell[5853, 191, 246, 8, 27, "Input",
CellTags->"FC",
CellID->1977687896],
-Cell[4819, 164, 523, 20, 42, "Output",
- CellTags->"FC",
- CellID->832664174]
+Cell[6102, 201, 503, 19, 43, "Output",
+ CellTags->"FC"]
}, Open ]]
}, Open ]],
-Cell[5369, 188, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6632, 224, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5437, 193, 270, 12, 31, "SeeAlsoSection",
+Cell[6700, 229, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5710, 207, 740, 27, 32, "Text",
- CellTags->"FC",
- CellID->121401811]
+Cell[6973, 243, 706, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[6465, 237, 23, 0, 42, "FooterCell"]
+Cell[7694, 271, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2RHI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2RHI.nb
index b889c4847..338faa976 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2RHI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2RHI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8555, 280]
-NotebookOptionsPosition[ 5304, 183]
-NotebookOutlinePosition[ 7804, 251]
-CellTagsIndexPosition[ 7696, 245]
+NotebookDataLength[ 9243, 297]
+NotebookOptionsPosition[ 6382, 213]
+NotebookOutlinePosition[ 8633, 274]
+CellTagsIndexPosition[ 8565, 269]
WindowTitle->FC2RHI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FC2RHI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FC2RHI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FC2RHI.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FC2RHI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FC2RHI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FC2RHI.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$56955],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FC2RHI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$90464],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FC2RHI", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FC2RHI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FC2RHI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,39 +131,40 @@ IncludePair governs the inclusion of scalar products p.k1, p.k2 and k1.k2 \
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->163322982],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2033600335],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1794007483],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FC2RHI", "]"}]], "Input",
CellTags->"FC2RHI",
- CellLabel->"In[1]:=",
+ CellLabel->"In[756]:=",
CellID->744239659],
Cell[BoxData[
@@ -139,16 +174,13 @@ Cell[BoxData[
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
RowBox[{"IncludePair", "\[Rule]", "True"}], ",",
RowBox[{"Do", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{327, 15},
+ ImageSize->{306, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FC2RHI",
- CellLabel->"Out[1]=",
- CellID->283717471]
+ CellLabel->"Out[756]="]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -174,9 +206,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FC2RHI",
- CellID->2109849659]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -184,7 +214,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"FC2RHI",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -193,10 +223,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 1.918910}",
+ "built" -> "{2020, 1, 5, 18, 55, 37.608336}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -205,11 +235,12 @@ TaggingRules->{
"FC2RHI[exp, k1, k2] transforms all 2-loop OPE-integrals in \
FeynAmpDenominator form to the RHI-integrals. FC2RHI[exp] is equivalent to \
FC2RHI[exp,q1,q2]. The option IncludePair governs the inclusion of scalar \
-products p.k1, p.k2 and k1.k2 (setting True).", "synonyms" -> {}, "title" ->
- "FC2RHI", "titlemodifier" -> "", "windowtitle" -> "FC2RHI", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FC2RHI"}, "SearchTextTranslated" -> ""},
+products p.k1, p.k2 and k1.k2 (setting True).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FC2RHI", "titlemodifier" -> "",
+ "windowtitle" -> "FC2RHI", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FC2RHI"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -217,8 +248,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -226,62 +258,47 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3535, 99, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->163322982]},
"FC2RHI"->{
- Cell[4168, 128, 129, 4, 27, "Input",
+ Cell[5335, 163, 131, 4, 70, "Input",
CellTags->"FC2RHI",
CellID->744239659],
- Cell[4300, 134, 383, 12, 36, "Output",
- CellTags->"FC2RHI",
- CellID->283717471],
- Cell[5051, 169, 211, 9, 31, "Text",
- CellTags->"FC2RHI",
- CellID->2109849659]}
+ Cell[5469, 169, 365, 11, 35, "Output",
+ CellTags->"FC2RHI"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7283, 228},
- {"FC2RHI", 7415, 232}
+ {"FC2RHI", 8391, 260}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2982, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 641, 17, 115, "Usage",
- CellID->982511436],
+Cell[3563, 97, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3535, 99, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->163322982],
+Cell[3871, 112, 641, 17, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3947, 118, 196, 6, 25, "ExampleSection",
- CellID->1794007483],
+Cell[4537, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2033600335],
+Cell[5279, 159, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4168, 128, 129, 4, 27, "Input",
+Cell[5335, 163, 131, 4, 70, "Input",
CellTags->"FC2RHI",
CellID->744239659],
-Cell[4300, 134, 383, 12, 36, "Output",
- CellTags->"FC2RHI",
- CellID->283717471]
+Cell[5469, 169, 365, 11, 35, "Output",
+ CellTags->"FC2RHI"]
}, Open ]]
-}, Open ]],
-Cell[4710, 150, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4778, 155, 270, 12, 31, "SeeAlsoSection",
+Cell[5895, 187, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5051, 169, 211, 9, 31, "Text",
- CellTags->"FC2RHI",
- CellID->2109849659]
+Cell[6168, 201, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5277, 181, 23, 0, 42, "FooterCell"]
+Cell[6355, 211, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2TLI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2TLI.nb
index 1273b7b33..d8a3b1baa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2TLI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FC2TLI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8459, 279]
-NotebookOptionsPosition[ 5254, 182]
-NotebookOutlinePosition[ 7709, 250]
-CellTagsIndexPosition[ 7601, 244]
+NotebookDataLength[ 9087, 294]
+NotebookOptionsPosition[ 6331, 212]
+NotebookOutlinePosition[ 8478, 271]
+CellTagsIndexPosition[ 8410, 266]
WindowTitle->FC2TLI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FC2TLI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FC2TLI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FC2TLI.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FC2TLI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FC2TLI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FC2TLI.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$57294],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FC2TLI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$90903],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FC2TLI", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FC2TLI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FC2TLI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,39 +130,40 @@ products p.k1, p.k2 and k1.k2 (setting True)."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1166028585],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->859312995],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1024990996],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FC2TLI", "]"}]], "Input",
CellTags->"FC2TLI",
- CellLabel->"In[1]:=",
+ CellLabel->"In[757]:=",
CellID->145553931],
Cell[BoxData[
@@ -138,16 +173,13 @@ Cell[BoxData[
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
RowBox[{"IncludePair", "\[Rule]", "True"}], ",",
RowBox[{"Do", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{327, 15},
+ ImageSize->{306, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FC2TLI",
- CellLabel->"Out[1]=",
- CellID->615300118]
+ CellLabel->"Out[757]="]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -173,9 +205,7 @@ Cell[TextData[{
ButtonNote->"TLI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FC2TLI",
- CellID->918556858]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -192,10 +222,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 3.343794}",
+ "built" -> "{2020, 1, 5, 18, 55, 38.808461}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -204,11 +234,11 @@ TaggingRules->{
"FC2TLI[exp, k1, k2] transforms all 2-loop OPE-integrals in \
FeynAmpDenominator form to the TLI-integrals. The option IncludePair governs \
the inclusion of scalar products p.k1, p.k2 and k1.k2 (setting True).",
- "synonyms" -> {}, "title" -> "FC2TLI", "titlemodifier" -> "",
- "windowtitle" -> "FC2TLI", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FC2TLI", "titlemodifier" ->
+ "", "windowtitle" -> "FC2TLI", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FC2TLI"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -217,7 +247,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -225,62 +255,47 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3485, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1166028585]},
"FC2TLI"->{
- Cell[4119, 127, 129, 4, 27, "Input",
+ Cell[5284, 162, 131, 4, 27, "Input",
CellTags->"FC2TLI",
CellID->145553931],
- Cell[4251, 133, 383, 12, 36, "Output",
- CellTags->"FC2TLI",
- CellID->615300118],
- Cell[5002, 168, 210, 9, 31, "Text",
- CellTags->"FC2TLI",
- CellID->918556858]}
+ Cell[5418, 168, 365, 11, 35, "Output",
+ CellTags->"FC2TLI"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7188, 227},
- {"FC2TLI", 7321, 231}
+ {"FC2TLI", 8236, 257}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2982, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 591, 16, 99, "Usage",
- CellID->982511436],
+Cell[3563, 97, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3485, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1166028585],
+Cell[3871, 112, 591, 16, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3898, 117, 196, 6, 25, "ExampleSection",
- CellID->1024990996],
+Cell[4487, 132, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->859312995],
+Cell[5228, 158, 31, 0, 14, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4119, 127, 129, 4, 27, "Input",
+Cell[5284, 162, 131, 4, 27, "Input",
CellTags->"FC2TLI",
CellID->145553931],
-Cell[4251, 133, 383, 12, 36, "Output",
- CellTags->"FC2TLI",
- CellID->615300118]
+Cell[5418, 168, 365, 11, 35, "Output",
+ CellTags->"FC2TLI"]
}, Open ]]
-}, Open ]],
-Cell[4661, 149, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4729, 154, 270, 12, 31, "SeeAlsoSection",
+Cell[5844, 186, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5002, 168, 210, 9, 31, "Text",
- CellTags->"FC2TLI",
- CellID->918556858]
+Cell[6117, 200, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5227, 180, 23, 0, 42, "FooterCell"]
+Cell[6304, 210, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAbbreviate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAbbreviate.nb
new file mode 100644
index 000000000..e89a77f6c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAbbreviate.nb
@@ -0,0 +1,785 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 21768, 775]
+NotebookOptionsPosition[ 17387, 636]
+NotebookOutlinePosition[ 19590, 694]
+CellTagsIndexPosition[ 19505, 689]
+WindowTitle->FCAbbreviate
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"SMP\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SMP"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCAbbreviate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCAbbreviate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCAbbreviate.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$91358],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCAbbreviate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCAbbreviate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCAbbreviate", "[",
+ RowBox[{"exp", ",", " ",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]introduces abbreivations for scalar products of \
+external momenta, ",
+ ButtonBox["SMP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMP",
+ ButtonNote->"SMP"],
+ "-objects and other variables that are present in the expression."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->688775925],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["Functions (LeafCount > 1) are not supported.", "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "The main purpose is to simplify the export of FeynCalc expressions to other \
+software \ntools that might not provide the richness of ",
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ "'s syntax"
+}], "Notes",
+ CellID->1817456068],
+
+Cell["\<\
+The result is returned as a list of replacement rules for scalar products, \
+SMPs and all other variables present.\
+\>", "Notes",
+ CellID->681548532]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(3)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->61453323],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(3)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1020454811],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"I", " ", "b"}]}], ")"}], "^", "2"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1146726217],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"\[ImaginaryI]", " ", "b"}]}], ")"}], "2"],
+ TraditionalForm]], "Output",
+ ImageSize->{72, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1424881392]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCAbbreviate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->629151375],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"a", "\[Rule]", "var1"}], ",",
+ RowBox[{"b", "\[Rule]", "var2"}]}], "}"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{190, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1275389888]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->621925979],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "k"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",", "m"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->971106491],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "e", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", FeynCalc`SMP["m_e"]^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q, D]],
+ "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{189, 42},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1006640552]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCAbbreviate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p", ",", "k"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]", "spd"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->835140558],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"k", ",", "k"}], ")"}], "\[Rule]", "sp1"}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"k", ",", "p"}], ")"}], "\[Rule]", "sp2"}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p", ",", "p"}], ")"}], "\[Rule]", "sp3"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["m", "e"], "\[Rule]", "sm1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"m", "\[Rule]", "var1"}], "}"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{526, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->842576902]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->249386390],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}],
+ " "}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p1"}], "]"}], "=", "0"}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p2", ",", "p2"}], "]"}], "=", "0"}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p3", ",", "p3"}], "]"}], "=", "0"}], ";"}], "\n",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}], "=",
+ RowBox[{"s", "/", "2"}]}], ";",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p3"}], "]"}], "=",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{"s", "+", "t"}], ")"}]}], "/", "2"}]}], ";",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p2", ",", "p3"}], "]"}], "=",
+ RowBox[{"t", "/", "2"}]}], ";"}]}], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1470202347],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p2", ",", "p3"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p1", "-", "p2"}], ",",
+ RowBox[{"q", "-", "p1", "-", "p2", "-", "p3"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->259423854],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["t",
+ RowBox[{"2", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["p1",
+ TraditionalForm]}], "-",
+ FormBox["p2",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p1 - $CellContext`p2 + $CellContext`q,
+ D],
+ FeynCalc`Momentum[-$CellContext`p1 - $CellContext`p2 + $CellContext`q,
+ D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["p1",
+ TraditionalForm]}], "-",
+ FormBox["p2",
+ TraditionalForm], "-",
+ FormBox["p3",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p1 - $CellContext`p2 - \
+$CellContext`p3 + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p1 - $CellContext`p2 - \
+$CellContext`p3 + $CellContext`q, D]]],
+ Editable->False]}]}]], TraditionalForm]], "Output",
+ ImageSize->{305, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->133229952]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCAbbreviate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]", "spd"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1709010853],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p1", ",", "p1"}], ")"}], "\[Rule]", "0"}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p1", ",", "p2"}], ")"}], "\[Rule]",
+ FractionBox["var1", "2"]}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p1", ",", "p3"}], ")"}], "\[Rule]",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "var1"}], "-", "var2"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p2", ",", "p2"}], ")"}], "\[Rule]", "0"}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p2", ",", "p3"}], ")"}], "\[Rule]",
+ FractionBox["var2", "2"]}], ",",
+ RowBox[{
+ RowBox[{"spd", "(",
+ RowBox[{"p3", ",", "p3"}], ")"}], "\[Rule]", "0"}]}], "}"}], ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"s", "\[Rule]", "var1"}], ",",
+ RowBox[{"t", "\[Rule]", "var2"}]}], "}"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{541, 75},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->392823810]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->982517436]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SMP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMP",
+ ButtonNote->"SMP"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->121601550]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCAbbreviate",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 40.033876}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCAbbreviate[exp, {q1, q2, ...}, {p1, p2, ...}] introduces abbreivations \
+for scalar products of external momenta, SMP-objects and other variables that \
+are present in the expression.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCAbbreviate", "titlemodifier" -> "", "windowtitle" -> "FCAbbreviate",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCAbbreviate"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6154, 191, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->61453323]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 19363, 682}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[584, 21, 3112, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3699, 99, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4013, 114, 795, 23, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4833, 141, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->688775925],
+Cell[5574, 167, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5608, 169, 82, 1, 70, "Notes",
+ CellID->1067943069],
+Cell[5693, 172, 250, 7, 70, "Notes",
+ CellID->1817456068],
+Cell[5946, 181, 159, 4, 70, "Notes",
+ CellID->681548532]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6154, 191, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->61453323],
+Cell[CellGroupData[{
+Cell[6565, 210, 196, 6, 26, "ExampleSection",
+ CellID->1020454811],
+Cell[CellGroupData[{
+Cell[6786, 220, 165, 6, 27, "Input",
+ CellID->1146726217],
+Cell[6954, 228, 301, 11, 39, "Output",
+ CellID->1424881392]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7292, 244, 179, 6, 27, "Input",
+ CellID->629151375],
+Cell[7474, 252, 411, 15, 35, "Output",
+ CellID->1275389888]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7922, 272, 125, 3, 9, "ExampleDelimiter",
+ CellID->621925979],
+Cell[CellGroupData[{
+Cell[8072, 279, 373, 13, 29, "Input",
+ CellID->971106491],
+Cell[8448, 294, 1769, 62, 63, "Output",
+ CellID->1006640552]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10254, 361, 259, 8, 27, "Input",
+ CellID->835140558],
+Cell[10516, 371, 750, 25, 37, "Output",
+ CellID->842576902]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11315, 402, 125, 3, 9, "ExampleDelimiter",
+ CellID->249386390],
+Cell[11443, 407, 975, 36, 130, "Input",
+ CellID->1470202347],
+Cell[CellGroupData[{
+Cell[12443, 447, 297, 9, 27, "Input",
+ CellID->259423854],
+Cell[12743, 458, 2149, 74, 59, "Output",
+ CellID->133229952]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14929, 537, 273, 8, 27, "Input",
+ CellID->1709010853],
+Cell[15205, 547, 1279, 41, 96, "Output",
+ CellID->392823810]
+}, Open ]],
+Cell[16499, 591, 112, 3, 27, "Input",
+ CellID->982517436]
+}, Open ]]
+}, Open ]],
+Cell[16638, 598, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16706, 603, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[16979, 617, 366, 14, 56, "SeeAlso",
+ CellID->121601550]
+}, Open ]],
+Cell[17360, 634, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAntiSymmetrize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAntiSymmetrize.nb
index 650449107..3babfa63c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAntiSymmetrize.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCAntiSymmetrize.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10247, 343]
-NotebookOptionsPosition[ 6584, 231]
-NotebookOutlinePosition[ 9261, 306]
-CellTagsIndexPosition[ 9111, 299]
+NotebookDataLength[ 10881, 359]
+NotebookOptionsPosition[ 7477, 258]
+NotebookOutlinePosition[ 10000, 327]
+CellTagsIndexPosition[ 9884, 321]
WindowTitle->FCAntiSymmetrize
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCAntiSymmetrize\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCAntiSymmetrize"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCSymmetrize\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCSymmetrize"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCAntiSymmetrize\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCAntiSymmetrize"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCAntiSymmetrize.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$57627],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCAntiSymmetrize", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$91801],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCAntiSymmetrize", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FCAntiSymmetrize.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCAntiSymmetrize", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCAntiSymmetrize", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1304146194],
+ CellID->250134143],
Cell[CellGroupData[{
@@ -121,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1177220505],
+ CellID->641278620],
Cell[CellGroupData[{
@@ -146,12 +178,11 @@ Cell[BoxData[
RowBox[{"a", ",", "b"}], ")"}], "-",
RowBox[{"f", "(",
RowBox[{"b", ",", "a"}], ")"}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{143, 41},
+ ImageSize->{156, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiSymmetrize",
- CellLabel->"Out[1]=",
- CellID->2011321581]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -186,12 +217,11 @@ Cell[BoxData[
RowBox[{"f", "(",
RowBox[{"z", ",", "y", ",", "x"}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{496, 41},
+ ImageSize->{556, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"AntiSymmetrize",
- CellLabel->"Out[2]=",
- CellID->668392956]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -215,16 +245,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["FCSymmetrize",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FCSymmetrize",
ButtonNote->"FCSymmetrize"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCAntiSymmetrize",
- CellID->145979915]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -241,22 +268,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 4.791493}",
+ "built" -> "{2020, 1, 5, 18, 55, 41.234175}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FCAntiSymmetrize[expr, {a1, a2, ...}] antisymmetrizes expr with respect \
-to the variables a1,a2, ... ", "synonyms" -> {}, "title" ->
+to the variables a1,a2, ... ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"FCAntiSymmetrize", "titlemodifier" -> "", "windowtitle" ->
"FCAntiSymmetrize", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FCAntiSymmetrize"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -264,8 +291,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -274,77 +302,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3494, 98, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4493, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1304146194]},
+ CellID->250134143]},
"AntiSymmetrize"->{
- Cell[4128, 127, 266, 9, 27, "Input",
+ Cell[5125, 159, 266, 9, 27, "Input",
CellTags->"AntiSymmetrize",
CellID->74722925],
- Cell[4397, 138, 427, 15, 62, "Output",
- CellTags->"AntiSymmetrize",
- CellID->2011321581],
- Cell[4861, 158, 287, 9, 27, "Input",
+ Cell[5394, 170, 406, 14, 56, "Output",
+ CellTags->"AntiSymmetrize"],
+ Cell[5837, 189, 287, 9, 27, "Input",
CellTags->"AntiSymmetrize",
CellID->685327648],
- Cell[5151, 169, 761, 24, 62, "Output",
- CellTags->"AntiSymmetrize",
- CellID->668392956]},
- "FCAntiSymmetrize"->{
- Cell[6280, 216, 262, 10, 32, "Text",
- CellTags->"FCAntiSymmetrize",
- CellID->145979915]}
+ Cell[6127, 200, 741, 23, 56, "Output",
+ CellTags->"AntiSymmetrize"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8451, 275},
- {"AntiSymmetrize", 8592, 279},
- {"FCAntiSymmetrize", 8992, 292}
+ {"PrimaryExamplesSection", 9388, 303},
+ {"AntiSymmetrize", 9529, 307}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3042, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 539, 16, 82, "Usage",
+Cell[3633, 97, 293, 11, 45, "ObjectNameGrid"],
+Cell[3929, 110, 539, 16, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3494, 98, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4493, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1304146194],
+ CellID->250134143],
Cell[CellGroupData[{
-Cell[3907, 117, 196, 6, 25, "ExampleSection",
- CellID->1177220505],
+Cell[4905, 149, 195, 6, 26, "ExampleSection",
+ CellID->641278620],
Cell[CellGroupData[{
-Cell[4128, 127, 266, 9, 27, "Input",
+Cell[5125, 159, 266, 9, 27, "Input",
CellTags->"AntiSymmetrize",
CellID->74722925],
-Cell[4397, 138, 427, 15, 62, "Output",
- CellTags->"AntiSymmetrize",
- CellID->2011321581]
+Cell[5394, 170, 406, 14, 56, "Output",
+ CellTags->"AntiSymmetrize"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4861, 158, 287, 9, 27, "Input",
+Cell[5837, 189, 287, 9, 27, "Input",
CellTags->"AntiSymmetrize",
CellID->685327648],
-Cell[5151, 169, 761, 24, 62, "Output",
- CellTags->"AntiSymmetrize",
- CellID->668392956]
+Cell[6127, 200, 741, 23, 56, "Output",
+ CellTags->"AntiSymmetrize"]
}, Open ]]
}, Open ]],
-Cell[5939, 197, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6895, 227, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6007, 202, 270, 12, 31, "SeeAlsoSection",
+Cell[6963, 232, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6280, 216, 262, 10, 32, "Text",
- CellTags->"FCAntiSymmetrize",
- CellID->145979915]
+Cell[7236, 246, 199, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6557, 229, 23, 0, 42, "FooterCell"]
+Cell[7450, 256, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCApart.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCApart.nb
index b5263b6a6..7dfda3eee 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCApart.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCApart.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 33158, 1182]
-NotebookOptionsPosition[ 29110, 1062]
-NotebookOutlinePosition[ 31517, 1122]
-CellTagsIndexPosition[ 31431, 1117]
+NotebookDataLength[ 52455, 1671]
+NotebookOptionsPosition[ 48367, 1552]
+NotebookOutlinePosition[ 50921, 1617]
+CellTagsIndexPosition[ 50799, 1611]
WindowTitle->FCApart
WindowFrame->Normal*)
@@ -79,12 +79,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$57963],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$92237],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCApart", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]
}], "AnchorBar"]}
}]], "AnchorBarGrid",
@@ -94,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCApart", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCApart", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[CellGroupData[{
@@ -147,7 +158,7 @@ Cell[TextData[Cell[BoxData[
Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
CellGroupingRules->{"SectionGrouping", 50},
- CellID->32159945],
+ CellID->1559637087],
Cell["", "SectionHeaderSpacer"],
@@ -156,7 +167,38 @@ There is actually no reason, why one would want to apply FCApart instead of \
ApartFF, except for cases, where FCApart is called from a different package \
that interacts with FeynCalc.\
\>", "Notes",
- CellID->1067943069]
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCApart", "]"}]], "Input",
+ CellLabel->"In[763]:=",
+ CellID->466656637],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Check", "\[Rule]", "True"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DropScaleless", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",", "4", ",", "D", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{497, 72},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[763]="]
+}, Open ]]
}, Closed]]
}, Open ]],
@@ -177,7 +219,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2106333885],
+ CellID->758119555],
Cell[CellGroupData[{
@@ -187,36 +229,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1507553781],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "FCApart", "]"}]], "Input",
- CellLabel->"In[1]:=",
- CellID->466656637],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Check", "\[Rule]", "True"}], ",",
- RowBox[{"Collecting", "\[Rule]", "True"}], ",",
- RowBox[{"DropScaleless", "\[Rule]", "True"}], ",",
- RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
- RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}], ",",
- RowBox[{"SetDimensions", "\[Rule]",
- RowBox[{"{",
- RowBox[{"4", ",", "D"}], "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{559, 54},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1783128184]
-}, Open ]],
+ CellID->1660464911],
Cell[CellGroupData[{
@@ -230,49 +243,60 @@ Cell[BoxData[{
RowBox[{"FCApart", "[",
RowBox[{"%", ",",
RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->591868896],
Cell[BoxData[
FormBox[
- RowBox[{
+ FractionBox[
FormBox[
SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm], " ",
- FormBox[
- FractionBox["1",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`m^2, "]"],
- Editable->False]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{88, 47},
+ TraditionalForm],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->1949657255],
+ CellLabel->"Out[1]="],
Cell[BoxData[
FormBox[
FractionBox[
SuperscriptBox["m", "2"],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{63, 51},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->1559844484]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -293,205 +317,189 @@ Cell[BoxData[{
RowBox[{"FCApart", "[",
RowBox[{"%", ",",
RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1827687893],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "r"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q - $CellContext`r)^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{298, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->1478701741],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["q",
TraditionalForm],
- TraditionalForm], "2"], " ",
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], "+",
- RowBox[{"2", " ",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- FormBox["r",
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["r",
+ TraditionalForm]}],
TraditionalForm],
- TraditionalForm], "2"]}]}],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox["p",
- TraditionalForm]}], "+",
- FormBox["q",
- TraditionalForm], "+",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"2", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox["p",
- TraditionalForm]}], "+",
- FormBox["q",
- TraditionalForm], "+",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q - $CellContext`r, D],
+ FeynCalc`Momentum[$CellContext`q - $CellContext`r, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{167, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="],
- ImageSize->{351, 110},
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJzt3XtQVNcdB3Bs/0jjOKPUccbGkBQEQYkQdaJYtAYfsfHVkaYtWsgU46MG
+RKNtrKgZa8ZJlVHRUWsQMiUo0QaN0UZj4qhBUcEXiW8QVJRXBHfZhX2yS2HL
+GI27e8+5j3PPvXw/M83QTPbe8zu/s/fe3cvlGzxrYfzcnwQEBCz5Wfs/4pOX
+xi1enLzsd73a/8/v05bMn5c2Z/braX+dM2/O4phZP23/l0nt/9veLSCg4+c2
+AADQFJexeP3cKbEDg1+eufVqi5vZa4ExTprFyTBAX6y3d350ocnVZr+949f9
+Jx8zsHotMMZJszgZBuiMu9XS6jkptlxKi51dYmb1WmCMk2ZxMgzQqZbL6+Zk
+VdiYvxYY46RZnAwD9MRtvpKfXdjQyvq1wJgszXJbyvPSxg7o0yMweFRKbpmF
+/jsurBmQndt698jeb+odbW2u5rvlJqrFJeW1wJhMzbJc27Bw69l6u6Px/NZp
+fXtGryu3qzEMgMc47ucnhYeER7Yb9NLoFVcsjF4LjFE0q7X+4LwFJSYf26k7
+frS288jVUpoa0m/qqSZlhgHwuFbD2X//7Y248X/fsDplcuTPew+etbfWSbmF
+c7tXzHxt0qqN774W+sLEg9+7FBoqSCG90Z3buf/xhCkktxLN55IHjtx+1+F9
+MFgzICt345HfPBe66OiD1jbXg/9O7dNrxO5aulXlfnj09ede/POe2+bGm1dr
+bfitHz5Jb7QH4XHMbSh8e9ySU0YfqwFrBuRlPPnH4EErr1k7fm6+OC/4+enf
+GOm2YDqT1D/yvetWJUYHspHWaGfNp7MmjukwMiKwd3Ss58dJqUXeD1Quw+kP
+3sm54ftbfqwZkJW5ZFb/8EXfeb6JsF5fNXjAbJ/nUB+aL/wlLGLxd/gug2/S
+G/1/wtdjbkt5/tqcb01+to41A7JqKU0bEJLs+Y1DZ/XumaMXfEl7w9tyeUlE
+2NzzzYoMD+QivdGdhI5j9nsHNmaVGD2fWF3GK/sP1zx9xxJrBmRlvbZ8UN/h
+f1q8JnNzxj/SNx//nu6bX1fzzS/XT+3bo3/qvitmfFXLMYmNfozf41jrg0Pz
+w5/tFtCpW/eojFs/OoxhzYDc7OX/jPpl/HEDvmbVOTQa9Mtxe8vQFyYeasDq
+1jk0GnTKbb138qO3gnv0/e2HJ2tw31u/0GgAAADoYvw+tgPahuZCF0H82A5o
+j/6aOx66pMrKSv8Lg2Spq10EeCdLcwG0i+6xHdAUNBe6GpyydQzNhS4CS13H
+0FzoIrDUdQzN9UWXgX16KornWngemyZgAmWiy8A+PRXFcy08j00TMIFy0WVg
+n56K4rkWnsemCZhAuekysE9PRfFcC89j0wRMYFubs7YgYUhisZRnFcgC++zV
+x/L2XWvm60O8q+lSQX7RAy9/zEp7RUmtRYSuvXhYUqG5WuKs2Tt7VJ+gBPFL
+kSywz1n3+aI3d3B5yrBczUxcdrTxiYFrtSjxtYiBxcMU2+ZqieN+wfLMLzKG
+hopeimSBfa6Gw4kxKZJO2wpyPzyWOGJ+UdOjk72GixJZixh6XjxKPE8tfZsM
+m6sljqo96Vk3mm5vGya0FF3mywUb12fvys9Zl/KHhDfSiuj+LmdrzSdjImac
+EWqhxL142S9h4qH74deTI6YcaeS/KOHYRFG1iMDb4hHYCGX2JeHvWVGVJrhN
+fpqrJfY7O9Nzyq1tjjsCS9H18MS7Y6f961bHZb2jctPLz48/QJk6ai5OCB26
+udJroKl8e/GCNPHQen1lVCRl+o06RQnHJoqphRpni0cYZfYlyXGMtjSCnCY+
+mqsltorc9NxKTwsElqL5fFpEeOoFTzRMa3Xer4JG766l/BhuOBEX9Epetb9X
+ke7lhydeH+PziVfSxEN7xYYhoTOLqe5bq1OUcGyimFoocbR4SKeObCXQPE9N
+31zBbXLRXE2xlWW8Gj042mNQUPdneoVFxS0s9RZj1Xw++cV+8UVNHT+76vfF
+BQ3PuUcbVWM6HR8ybNsdP6dUOfbyNOLEQ9uN1VEDU0tbaDauSlEEsYliaqHD
+2+IhQJt9KXztRF+a4Da5aK5mOauyh4f5PqU2HhkT2Gv0ro7zoa3sw9H9hmwi
+vMRv/7Rf8NklY8cpyl6xfljkAn+zL3ov/pAnHprOzgiPza8RvlJQuSiS2ETi
+WuTAxeIRRp19KXwcoy9NaJvcNVdbBJais27/W4MDe/afMHfVuhUjfvHSmpuE
+t7+Np5LCw5MKPac9W9mamNjtd303WvRe/CBPPLTdXBMzLruK4EpBxaIIYxPJ
+a5EDF4tHEH32pfBxjL40f9vksrk61XQ6MWTgUnH3dl2GwqXT15K8VspenkCc
+eOg2lSyPf/+imfomkApFCRFdi9LYLB7vFM6+RHM1xXxubmhYyiXR1/e2qoOZ
+WcfrBE6rUvfyCGnioa3q0JZNX9WKPNszLkpwNFJqURKbxeOdwtmXaK5muC13
+z/xnRWxgj4j3ThgkfDZ32xsa7T6Xk1x7oUo8dFnrDb6HRLQzRkUJk16LEtgs
+Hl8vUjT7Es0FAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0BLkaLOBeQZQDHK0
+2cA8AygHOdpsYJ4BlIccbTYwzwAKQY42G5hnAIUgR5sNzDOAUpCjzQbmmR2p
+cdWCIc6gBtoEcJAC7wJ1kWY6WysLNmWdavR2WSwc4gxqoEwAB0nwLlATcaZz
+9a6JQRHzL3rLBhQOcQY1kGbBgxzwLlCRHHHVBCHOoALaBHCQAu8CNckQ2E0S
+4gzsUSeAgwR4F6hKYmA3YYgzsEefAA4i4V3AEWaZzsCCwgngAFxilekMTCic
+AA7AHZaZzqA8ZRPAAQAAABTXWn9w3oISk9rDAAAQrfX+xxOm4A/eAXQaD1yq
+rKz00zW5jmNqV6kl/juCCZeLLPMMPHPWfDpr4pgOIyMCe0fHen6clFr0o1+B
+/+E/e8zT/xlIh6kGEA2fKwFA63AcAwCtw3EMQHbIv5NI0xOo6cH7wnNRPI+N
+Fk+1IP9OIk1PoKYH7wvPRfE8Nlpc1YL8O4k0PYGaHrwvPBfF89hocVkL8u8k
+0vQEanrwvvBcFM9joyWxFrelPC9t7IA+PQKDR6XkllkkfD4ly7+zVx/L23et
+Wduf6aVwNV0qyC964OUPbakXIOisLUgYklgs5TEnDXdfhY50yQlXcJ4t1zYs
+3Hq23u5oPL91Wt+e0evK7eI2RJZ/56z7fNGbO3RyBhHPcjUzcdnRJ9NQVAwQ
+dNbsnT2qT1CC+LeV5rvPtiNdd8IVmmdH3fGjtZ1HrpbS1JB+U081iRkeWf6d
+q+FwYkyKpJMQNSWep5a+TffDY4kj5hc1PTpNqhgg6LhfsDzzi4yhoaLfVvx2
+nxzDjnTpCVd+ns3nkgeO3H7Xzx++l5ogWfPJmIgZZ6TNK23cIeHvWVGVJrhN
+4ZRA98OvJ0dMOdKo+vW+o2pPetaNptvbhgm9rdh0X+JevOyXcMGw6oi+J1z1
+le82FL49bomfqBrSBEnfzMUJoUM3UyeE/HigdHGHJMcx2tKEtymcEmi9vjIq
+UvXgGvudnek55dY2xx2BtxWb7kvfixekC4ZJR3Q/4equfJfh9Afv5Nzw8y0/
+aYKkH4YTcUGv5FX7+ixP+LwtWdwh4fPUVKVRbFM4JdBesWFI6MxiVW8z2ypy
+03MrPWtY4G2lePep9kL3aDZpPiaDjnSBCVdx5bst5flrc741+bvSkyNB0nQ6
+PmTYtjvSrsdo4w6Fr53oSxPcJkFKoO3G6qiBqaVqJg3YyjJejR4c7TEoqPsz
+vcKi4haWessEY9N9OfbyNOIFo3xHusCEq7fy7fcObMwqMXquJl3GK/sP13i7
+Yyk6QbL9A3PBZ5eMHUd5e8X6YZELpBVAHXcofByjL01omyQpgaazM8Jj82s4
+CRpwVmUPD/N9ecCm+zKklD6NfMEw7YhOJ1ytld/64ND88Ge7BXTq1j0q45bX
+X7wQnSBpPJUUHp5U6DkF2srWxMT6vZMghD7uUPg4Rl+av20SpgTabq6JGZdd
+xUtao8Dbik33JaaUekW+YNh2RIcTrrGVLyVB0mUoXDp9rfhbqwrHHTILx3Sb
+SpbHv3/RrPrdSmpsui9bI4gXDLcd0diEC+FmnqUmSNqqDmZmHa8TdU2mcNwh
+q3BMW9WhLZu+qpX+mYk9Nt2XrRGkC4bfjmhswgVHw8M8y5Ug6bY3NNppj0XK
+xh2yDMd0WesN1OWrj0335WsExYLhsyNam3BhfM4zAAAAAPjzPxjLqso=
+ "], {{0, 93}, {
+ 408, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{408, 93},
+ PlotRange->{{0, 408}, {0, 93}}]], "Output",
+ ImageSize->{412, 93},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->787219708]
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->1064632003]
}, Open ]],
Cell[CellGroupData[{
@@ -515,28 +523,14 @@ Cell[BoxData[{
RowBox[{"FCApart", "[",
RowBox[{"%", ",",
RowBox[{"{",
- RowBox[{"q1", ",", "q2", ",", "q3"}], "}"}]}], "]"}]}], "Input",
- CellLabel->"In[4]:=",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]}], "Input",
+ CellLabel->"In[3]:=",
CellID->21286566],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
+ FractionBox[
+ RowBox[{
RowBox[{"(",
FormBox[
RowBox[{
@@ -547,487 +541,983 @@ Cell[BoxData[
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox["q2",
+ FormBox["q1",
TraditionalForm],
TraditionalForm]}],
- TraditionalForm], ")"}], "2"], " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q1", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q1^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q2", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q2^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q1)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q2", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q2)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "q2"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q1 - $CellContext`q2)^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{546, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->572836901],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
+ TraditionalForm], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
+ FormBox[
+ RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "3"],
- RowBox[{"8", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
SuperscriptBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["q2",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{376, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "3"],
+ RowBox[{"8", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"4", " ",
- RowBox[{
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"8", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["q1",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}]}],
- RowBox[{"4", " ",
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"4", " ",
+ TraditionalForm], "2"]}],
+ RowBox[{"8", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"4", " ",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"4", " ",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
FormBox["q1",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"4", " ",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
RowBox[{
- RowBox[{"(",
- RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
-
- ImageSize->{566, 423},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{573, 372},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->1739133243]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -1062,8 +1552,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FCApart",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1072,10 +1562,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 6.290932}",
+ "built" -> "{2020, 1, 5, 18, 55, 42.396465}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1087,11 +1577,11 @@ contain only linearly independent propagators. The algorithm is largely based \
on the work and code of F. Feng (arXiv:1204.2314). FCApart is meant to be \
applied to single loop integrals only. If you need to perform partial \
fractioning on an expression that contains multiple loop integrals, use \
-ApartFF", "synonyms" -> {}, "title" -> "FCApart", "titlemodifier" -> "",
- "windowtitle" -> "FCApart", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FCApart"}, "SearchTextTranslated" -> ""},
+ApartFF", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCApart",
+ "titlemodifier" -> "", "windowtitle" -> "FCApart", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCApart"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1100,7 +1590,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1109,81 +1599,80 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[5568, 164, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6861, 206, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2106333885]}
+ CellID->758119555]},
+ "RasterizedOutput"->{
+ Cell[12078, 413, 4858, 88, 114, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1064632003]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 31287, 1110}
+ {"PrimaryExamplesSection", 50531, 1600},
+ {"RasterizedOutput", 50674, 1604}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2966, 73, 51, "AnchorBarGrid",
+Cell[579, 21, 2995, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[3548, 96, 50, 1, 42, "ObjectName",
- CellID->1224892054],
+Cell[3577, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3623, 101, 866, 20, 130, "Usage",
+Cell[3886, 112, 866, 20, 136, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4514, 125, 737, 24, 31, "NotesSection",
+Cell[4777, 136, 739, 24, 31, "NotesSection",
CellGroupingRules->{"SectionGrouping", 50},
- CellID->32159945],
-Cell[5254, 151, 31, 0, 14, "SectionHeaderSpacer"],
-Cell[5288, 153, 231, 5, 45, "Notes",
- CellID->1067943069]
+ CellID->1559637087],
+Cell[5519, 162, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5553, 164, 231, 5, 70, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[5809, 173, 111, 3, 70, "Input",
+ CellID->466656637],
+Cell[5923, 178, 877, 21, 93, "Output"]
+}, Open ]]
}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5568, 164, 388, 15, 31, "PrimaryExamplesSection",
+Cell[6861, 206, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2106333885],
-Cell[CellGroupData[{
-Cell[5981, 183, 196, 6, 25, "ExampleSection",
- CellID->1507553781],
+ CellID->758119555],
Cell[CellGroupData[{
-Cell[6202, 193, 109, 3, 27, "Input",
- CellID->466656637],
-Cell[6314, 198, 785, 19, 75, "Output",
- CellID->1783128184]
-}, Open ]],
+Cell[7273, 225, 196, 6, 26, "ExampleSection",
+ CellID->1660464911],
Cell[CellGroupData[{
-Cell[7136, 222, 330, 11, 45, "Input",
+Cell[7494, 235, 330, 11, 45, "Input",
CellID->591868896],
-Cell[7469, 235, 735, 24, 68, "Output",
- CellID->1949657255],
-Cell[8207, 261, 347, 13, 72, "Output",
- CellID->1559844484]
+Cell[7827, 248, 738, 27, 64, "Output"],
+Cell[8568, 277, 625, 21, 64, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8591, 279, 502, 17, 45, "Input",
+Cell[9230, 303, 502, 17, 45, "Input",
CellID->1827687893],
-Cell[9096, 298, 1858, 63, 69, "Output",
- CellID->1478701741],
-Cell[10957, 363, 3159, 130, 131, "Output",
- CellID->787219708]
+Cell[9735, 322, 2340, 89, 60, "Output"],
+Cell[12078, 413, 4858, 88, 114, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1064632003]
}, Open ]],
Cell[CellGroupData[{
-Cell[14153, 498, 641, 21, 45, "Input",
+Cell[16973, 506, 630, 21, 45, "Input",
CellID->21286566],
-Cell[14797, 521, 2765, 83, 69, "Output",
- CellID->572836901],
-Cell[17565, 606, 10946, 423, 444, "Output",
- CellID->1739133243]
+Cell[17606, 529, 3645, 130, 67, "Output"],
+Cell[21254, 661, 26514, 858, 393, "Output"]
}, Open ]]
}, Open ]],
-Cell[28538, 1033, 31, 0, 29, "SectionFooterSpacer"]
+Cell[47795, 1523, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[28606, 1038, 270, 12, 31, "SeeAlsoSection",
+Cell[47863, 1528, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[28879, 1052, 189, 5, 55, "SeeAlso",
+Cell[48136, 1542, 189, 5, 56, "SeeAlso",
CellID->929782353]
}, Open ]],
-Cell[29083, 1060, 23, 0, 42, "FooterCell"]
+Cell[48340, 1550, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCCT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCCT.nb
new file mode 100644
index 000000000..6bd1facd5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCCT.nb
@@ -0,0 +1,218 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 6839, 209]
+NotebookOptionsPosition[ 4856, 153]
+NotebookOutlinePosition[ 6611, 200]
+CellTagsIndexPosition[ 6568, 197]
+WindowTitle->FCCCT
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCChargeConjugateTransposed\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCChargeConjugateTransposed"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCCCT\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCCCT"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCCCT.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$93116],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCCCT",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCCCT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["FCCCT"], "InlineFormula"],
+ " \[LineSeparator]is an alias for ",
+ "FCChargeConjugateTransposed"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCChargeConjugateTransposed",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCChargeConjugateTransposed",
+ ButtonNote->"FCChargeConjugateTransposed"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1087127942]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCCCT",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 45.016178}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "FCCCT is an alias for FCChargeConjugateTransposed",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCCCT", "titlemodifier" ->
+ "", "windowtitle" -> "FCCCT", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCCCT"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 3035, 75, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[3615, 98, 282, 11, 70, "ObjectNameGrid"],
+Cell[3900, 111, 351, 11, 70, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4276, 126, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[4549, 140, 265, 8, 70, "SeeAlso",
+ CellID->1087127942]
+}, Open ]],
+Cell[4829, 151, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCanonicalizeDummyIndices.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCanonicalizeDummyIndices.nb
index e71036097..5120161bb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCanonicalizeDummyIndices.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCanonicalizeDummyIndices.nb
@@ -3,71 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15462, 573]
-NotebookOptionsPosition[ 12117, 476]
-NotebookOutlinePosition[ 14518, 536]
-CellTagsIndexPosition[ 14433, 531]
+NotebookDataLength[ 18727, 667]
+NotebookOptionsPosition[ 14891, 555]
+NotebookOutlinePosition[ 17341, 617]
+CellTagsIndexPosition[ 17256, 612]
WindowTitle->FCCanonicalizeDummyIndices
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/FCCanonicalizeDummyIndices\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCCanonicalizeDummyIndices"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCRenameDummyIndices\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCRenameDummyIndices"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCCanonicalizeDummyIndices\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCCanonicalizeDummyIndices"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCCanonicalizeDummyIndices.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$58303],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCCanonicalizeDummyIndices", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$92673],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCCanonicalizeDummyIndices", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -75,8 +97,20 @@ FCCanonicalizeDummyIndices.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCCanonicalizeDummyIndices", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCCanonicalizeDummyIndices", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -99,6 +133,95 @@ names."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1390289975],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCCanonicalizeDummyIndices", "]"}]], "Input",
+ CellLabel->"In[758]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CartesianIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"CustomIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCTraceExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Function", "\[Rule]",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ "FeynCalc`FCCanonicalizeDummyIndices`Private`x", ",",
+ "FeynCalc`FCCanonicalizeDummyIndices`Private`seed"}], "}"}],
+ "\[Function]",
+ RowBox[{"FCGV", "(",
+ RowBox[{
+ RowBox[{
+ "ToString", "[", "FeynCalc`FCCanonicalizeDummyIndices`Private`seed",
+ "]"}], "<>",
+ RowBox[{"ToString", "[",
+ RowBox[{
+ "Identity", "@@", "FeynCalc`FCCanonicalizeDummyIndices`Private`x"}],
+ "]"}]}], ")"}]}], ")"}]}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "LorentzIndex", ",", "CartesianIndex", ",", "SUNIndex", ",",
+ "SUNFIndex"}], "}"}]}], ",",
+ RowBox[{"LorentzIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}], ",",
+ RowBox[{"NotMomentum", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"SUNFIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"SUNIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{498, 201},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[758]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -114,7 +237,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->372157526],
+ CellID->417147357],
Cell[CellGroupData[{
@@ -124,7 +247,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->898809491],
+ CellID->836870769],
Cell[CellGroupData[{
@@ -153,102 +276,77 @@ Cell[BoxData[
RowBox[{
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "+",
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "+",
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["si",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["si",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["si",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["si",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{188, 21},
+ ImageSize->{192, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1037526668]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -263,56 +361,43 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"li481\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ RowBox[{"FCGV", "(", "\<\"li1881\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"li481\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- FormBox[
SuperscriptBox[
FormBox[
- FormBox["r",
+ FormBox["p",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"li481\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"li1881\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{264, 26},
+ TraditionalForm]]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1881\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{287, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->305063659]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -330,71 +415,54 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$2975", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$2975", "\[InvisibleApplication]",
- RowBox[{"(", "2", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$195", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$2975", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$196", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$195", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$2975", "\[InvisibleApplication]",
- RowBox[{"(", "2", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{303, 22},
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$196", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{277, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->2035882105]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -411,73 +479,84 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{85, 19},
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{97, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->1590489350]
-}, Open ]]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCRenameDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCCanonicalizeDummyIndices",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -486,10 +565,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 7.902366}",
+ "built" -> "{2020, 1, 5, 18, 55, 43.751332}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -500,12 +579,13 @@ in the expression. The option Momentum provides a possibilitiy to limit the \
canonicalization only to particular Momenta. With the option \
LorentzIndexNames one can provide a list of names to be used for the \
canonicalized indices, to have say mu, nu, rho etc. instead of some random \
-names.", "synonyms" -> {}, "title" -> "FCCanonicalizeDummyIndices",
- "titlemodifier" -> "", "windowtitle" -> "FCCanonicalizeDummyIndices",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCCanonicalizeDummyIndices"},
- "SearchTextTranslated" -> ""},
+names.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCCanonicalizeDummyIndices", "titlemodifier" -> "", "windowtitle" ->
+ "FCCanonicalizeDummyIndices", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCCanonicalizeDummyIndices"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -513,8 +593,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -523,58 +604,71 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3737, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7567, 224, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->372157526]}
+ CellID->417147357]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14290, 524}
+ {"PrimaryExamplesSection", 17113, 605}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[598, 21, 2339, 54, 51, "AnchorBarGrid",
+Cell[598, 21, 3122, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2940, 77, 69, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3012, 80, 700, 17, 127, "Usage",
+Cell[3723, 99, 303, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4051, 114, 700, 17, 135, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3737, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4776, 135, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1390289975],
+Cell[5518, 161, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5574, 165, 110, 2, 70, "Input"],
+Cell[5687, 169, 1819, 48, 222, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7567, 224, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->372157526],
+ CellID->417147357],
Cell[CellGroupData[{
-Cell[4149, 120, 195, 6, 25, "ExampleSection",
- CellID->898809491],
+Cell[7979, 243, 195, 6, 26, "ExampleSection",
+ CellID->836870769],
Cell[CellGroupData[{
-Cell[4369, 130, 498, 18, 27, "Input",
+Cell[8199, 253, 498, 18, 27, "Input",
CellID->720389846],
-Cell[4870, 150, 2219, 100, 42, "Output",
- CellID->1037526668]
+Cell[8700, 273, 1640, 75, 39, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7126, 255, 156, 5, 27, "Input",
+Cell[10377, 353, 156, 5, 27, "Input",
CellID->1752687288],
-Cell[7285, 262, 1276, 52, 47, "Output",
- CellID->305063659]
+Cell[10536, 360, 978, 39, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8598, 319, 267, 8, 27, "Input",
+Cell[11551, 404, 267, 8, 27, "Input",
CellID->1834012343],
-Cell[8868, 329, 1615, 67, 43, "Output",
- CellID->2035882105]
+Cell[11821, 414, 1230, 50, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10520, 401, 250, 7, 27, "Input",
+Cell[13088, 469, 250, 7, 27, "Input",
CellID->151485661],
-Cell[10773, 410, 1278, 59, 40, "Output",
- CellID->1590489350]
-}, Open ]]
+Cell[13341, 478, 917, 42, 37, "Output"]
}, Open ]]
}, Open ]],
-Cell[12090, 474, 23, 0, 42, "FooterCell"]
+Cell[14285, 524, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14353, 529, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[14626, 543, 223, 7, 70, "SeeAlso"]
+}, Open ]],
+Cell[14864, 553, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCChargeConjugateTransposed.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCChargeConjugateTransposed.nb
new file mode 100644
index 000000000..ce9e685c8
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCChargeConjugateTransposed.nb
@@ -0,0 +1,654 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 17922, 644]
+NotebookOptionsPosition[ 13669, 511]
+NotebookOutlinePosition[ 15912, 569]
+CellTagsIndexPosition[ 15827, 564]
+WindowTitle->FCChargeConjugateTransposed
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SpinorChainTranspose\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorChainTranspose"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Spinor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCChargeConjugateTransposed\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCChargeConjugateTransposed"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCChargeConjugateTransposed.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$93562],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCChargeConjugateTransposed", ".html"]], None}]}]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCChargeConjugateTransposed", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCChargeConjugateTransposed", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]represents the application of the charge conjugation \
+operator to the transposed of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ", i.e. ",
+ Cell[BoxData[
+ RowBox[{"C", " ",
+ SuperscriptBox["exp", "T"], " ",
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}]], "InlineFormula"],
+ ". Here ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " is understood to be a single Dirac matrix or a chain thereof."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->875591338],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The option setting ",
+ Cell[BoxData["Explicit"], "InlineFormula"],
+ " determines whether the explicit result is returned or whether it is left \
+in the unevaluated form."
+}], "Notes",
+ CellID->184725283],
+
+Cell[TextData[{
+ "The unevaluated form will be also maintained if the function does not know \
+how to obtain ",
+ Cell[BoxData[
+ RowBox[{"C", " ",
+ SuperscriptBox["exp", "T"], " ",
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}]], "InlineFormula"],
+ " from the given ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->407289918],
+
+Cell[TextData[{
+ "The shortcut for ",
+ ButtonBox["FCChargeConjugateTransposed",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCChargeConjugateTransposed",
+ ButtonNote->"FCChargeConjugateTransposed"],
+ " is ",
+ ButtonBox["FCCCT",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCCT",
+ ButtonNote->"FCCCT"],
+ "."
+}], "Notes",
+ CellID->798826111],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCChargeConjugateTransposed", "]"}]], "Input",
+ CellLabel->"In[95]:=",
+ CellID->1284994965],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{428, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[95]=",
+ CellID->1548124228]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->712369333],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1799623507],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->219403019],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{74, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1595078624]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCChargeConjugateTransposed", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1159741749],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"C",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], "T"],
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}], TraditionalForm]], "Output",
+ ImageSize->{148, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1515265426]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCChargeConjugateTransposed", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1573360164],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{85, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2077641577]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[", "5", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1664135997],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->867971904]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCCCT", "[", "%", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->873144111],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"C",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}], "T"],
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}], TraditionalForm]], "Output",
+ ImageSize->{97, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->377584760]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "Explicit"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->227446180],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1395716452]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SpinorChainTranspose",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTranspose",
+ ButtonNote->"SpinorChainTranspose"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCChargeConjugateTransposed",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 45.978520}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCChargeConjugateTransposed[exp] represents the application of the \
+charge conjugation operator to the transposed of exp, i.e. C exp^T C -1. Here \
+exp is understood to be a single Dirac matrix or a chain thereof.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCChargeConjugateTransposed", "titlemodifier" -> "", "windowtitle" ->
+ "FCChargeConjugateTransposed", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCChargeConjugateTransposed"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7575, 240, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->712369333]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15684, 557}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[599, 21, 3322, 81, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3924, 104, 304, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4253, 119, 801, 23, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5079, 146, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->875591338],
+Cell[5820, 172, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5854, 174, 221, 6, 70, "Notes",
+ CellID->184725283],
+Cell[6078, 182, 353, 12, 70, "Notes",
+ CellID->407289918],
+Cell[6434, 196, 366, 13, 70, "Notes",
+ CellID->798826111],
+Cell[CellGroupData[{
+Cell[6825, 213, 131, 3, 70, "Input",
+ CellID->1284994965],
+Cell[6959, 218, 555, 15, 56, "Output",
+ CellID->1548124228]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7575, 240, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->712369333],
+Cell[CellGroupData[{
+Cell[7987, 259, 196, 6, 26, "ExampleSection",
+ CellID->1799623507],
+Cell[CellGroupData[{
+Cell[8208, 269, 144, 4, 27, "Input",
+ CellID->219403019],
+Cell[8355, 275, 746, 31, 37, "Output",
+ CellID->1595078624]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9138, 311, 124, 3, 27, "Input",
+ CellID->1159741749],
+Cell[9265, 316, 1003, 38, 43, "Output",
+ CellID->1515265426]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10305, 359, 265, 7, 27, "Input",
+ CellID->1573360164],
+Cell[10573, 368, 663, 26, 37, "Output",
+ CellID->2077641577]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11273, 399, 99, 3, 27, "Input",
+ CellID->1664135997],
+Cell[11375, 404, 275, 10, 40, "Output",
+ CellID->867971904]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11687, 419, 101, 3, 27, "Input",
+ CellID->873144111],
+Cell[11791, 424, 491, 19, 40, "Output",
+ CellID->377584760]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12319, 448, 100, 3, 27, "Input",
+ CellID->227446180],
+Cell[12422, 453, 276, 10, 40, "Output",
+ CellID->1395716452]
+}, Open ]]
+}, Open ]],
+Cell[12725, 467, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12793, 472, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[13066, 486, 561, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[13642, 509, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCheckSyntax.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCheckSyntax.nb
new file mode 100644
index 000000000..ed93a4f08
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCheckSyntax.nb
@@ -0,0 +1,427 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13236, 417]
+NotebookOptionsPosition[ 9589, 307]
+NotebookOutlinePosition[ 11821, 365]
+CellTagsIndexPosition[ 11736, 360]
+WindowTitle->FCCheckSyntax
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCCheckSyntax\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCCheckSyntax"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCCheckSyntax.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$94012],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCCheckSyntax", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCCheckSyntax", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCCheckSyntax", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]attempts to detect mistakes and inconsistencies in the \
+user input. The function returns the original expression but will abort the \
+evaluation if it thinks that the input is incorrect."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1967300151],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+Notice that false positives are possible and it is not guaranteed that the \
+input which passes FCCheckSyntax is indeed fully correct. \
+\>", "Notes",
+ CellID->1161987066],
+
+Cell["\<\
+FCCheckSyntax is also an option for several FeynCalc routines If set to True, \
+those functions will try to check the syntax of the input expressions to \
+detect possible inconsistencies. \
+\>", "Notes",
+ CellID->180262923],
+
+Cell["\<\
+However, on large expressions such checks may cost a lot of performance, \
+which is why this option is set to False by default.\
+\>", "Notes",
+ CellID->935868582],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCCheckSyntax", "]"}]], "Input",
+ CellLabel->"In[403]:=",
+ CellID->1667538060],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{286, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[403]=",
+ CellID->1616784893]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1706271885],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1749419864],
+
+Cell[TextData[{
+ "Typical mistake, using ",
+ Cell[BoxData["Times"], "InlineFormula"],
+ " instead of ",
+ Cell[BoxData["Dot"], "InlineFormula"],
+ " in noncommutative products"
+}], "Notes",
+ CellID->1330487301],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCCheckSyntax", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "mu", "]"}], "*",
+ RowBox[{"GA", "[", "nu", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1374293448],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"FCCheckSyntax", "::", "failmsg"}], "MessageName"], ":",
+ " ", "\<\"Error! FCCheckSyntax has found an inconsistency in your input \
+expression and must abort the evaluation. The problem reads: \[NoBreak]\\!\\(\
+\\*FormBox[\\\"\\\\\\\"Commutative products of DiracGamma in \\\\\\\"\\\", \
+TraditionalForm]\\)\[NoBreak] \
+\[NoBreak]\\!\\(\\*FormBox[RowBox[{SuperscriptBox[RowBox[{OverscriptBox[\\\"\
+\[Gamma]\\\", \\\"_\\\"]}], FormBox[FormBox[\\\"mu\\\", TraditionalForm], \
+TraditionalForm]], \\\" \\\", SuperscriptBox[RowBox[{OverscriptBox[\\\"\
+\[Gamma]\\\", \\\"_\\\"]}], FormBox[FormBox[\\\"nu\\\", TraditionalForm], \
+TraditionalForm]]}], TraditionalForm]\\)\[NoBreak] \\!\\(\\*ButtonBox[\\\"\
+\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
+ButtonData:>\\\"paclet:FeynCalc/ref/FCCheckSyntax\\\", ButtonNote -> \
+\\\"FeynCalc`FCCheckSyntax::failmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[1]:=",
+ CellID->353651716],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->735288398]
+}, Open ]],
+
+Cell["\<\
+Another common mistake, Einstein summation convention is violated\
+\>", "Notes",
+ CellID->463494526],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCCheckSyntax", "[",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"r", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->237256672],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"FCCheckSyntax", "::", "failmsg"}], "MessageName"], ":",
+ " ", "\<\"Error! FCCheckSyntax has found an inconsistency in your input \
+expression and must abort the evaluation. The problem reads: \[NoBreak]\\!\\(\
+\\*FormBox[\\\"\\\\\\\"More than two repeating indices in \\\\\\\"\\\", \
+TraditionalForm]\\)\[NoBreak] \
+\[NoBreak]\\!\\(\\*FormBox[\\\"\\\\\\\"Pair[LorentzIndex[\[Mu]], \
+Momentum[p]]*Pair[LorentzIndex[\[Mu]], Momentum[q]]*Pair[LorentzIndex[\[Mu]], \
+Momentum[r]]\\\\\\\"\\\", TraditionalForm]\\)\[NoBreak] \\!\\(\\*ButtonBox[\\\
+\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
+ButtonData:>\\\"paclet:FeynCalc/ref/FCCheckSyntax\\\", ButtonNote -> \
+\\\"FeynCalc`FCCheckSyntax::failmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[2]:=",
+ CellID->1418369889],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1453430414]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCCheckSyntax",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 47.262130}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCCheckSyntax[exp] attempts to detect mistakes and inconsistencies in \
+the user input. The function returns the original expression but will abort \
+the evaluation if it thinks that the input is incorrect.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCCheckSyntax", "titlemodifier" -> "",
+ "windowtitle" -> "FCCheckSyntax", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCCheckSyntax"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5658, 180, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1706271885]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11592, 353}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 2293, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2881, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3196, 91, 528, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3749, 108, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1967300151],
+Cell[4491, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4525, 136, 181, 4, 70, "Notes",
+ CellID->1161987066],
+Cell[4709, 142, 233, 5, 70, "Notes",
+ CellID->180262923],
+Cell[4945, 149, 172, 4, 70, "Notes",
+ CellID->935868582],
+Cell[CellGroupData[{
+Cell[5142, 157, 118, 3, 70, "Input",
+ CellID->1667538060],
+Cell[5263, 162, 334, 11, 37, "Output",
+ CellID->1616784893]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5658, 180, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1706271885],
+Cell[CellGroupData[{
+Cell[6071, 199, 196, 6, 26, "ExampleSection",
+ CellID->1749419864],
+Cell[6270, 207, 207, 7, 32, "Notes",
+ CellID->1330487301],
+Cell[CellGroupData[{
+Cell[6502, 218, 195, 6, 27, "Input",
+ CellID->1374293448],
+Cell[6700, 226, 1058, 19, 80, "Message",
+ CellID->353651716],
+Cell[7761, 247, 193, 6, 35, "Output",
+ CellID->735288398]
+}, Open ]],
+Cell[7969, 256, 110, 3, 32, "Notes",
+ CellID->463494526],
+Cell[CellGroupData[{
+Cell[8104, 263, 314, 10, 27, "Input",
+ CellID->237256672],
+Cell[8421, 275, 905, 17, 117, "Message",
+ CellID->1418369889],
+Cell[9329, 294, 194, 6, 35, "Output",
+ CellID->1453430414]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9562, 305, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCheckVersion.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCheckVersion.nb
new file mode 100644
index 000000000..b589cbc5a
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCheckVersion.nb
@@ -0,0 +1,280 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8648, 271]
+NotebookOptionsPosition[ 5736, 188]
+NotebookOutlinePosition[ 7990, 247]
+CellTagsIndexPosition[ 7906, 242]
+WindowTitle->FCCheckVersion
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCCheckVersion\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCCheckVersion"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCCheckVersion.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$94443],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCCheckVersion", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCCheckVersion", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCCheckVersion", "[",
+ RowBox[{"major", ",", "minor", ",", "build"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]checks if the current version of FeynCalc is larger or \
+equal than marjor.minor.build. For example, FCCheckVersion[9,3,0] will \
+generate a warning (when running with the frontend) or quit kernel (when \
+running without the frontend) if the loaded FeynCalc version is older than \
+9.3.0."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+Notice that this function is available only since FeynCalc 9.3.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1],
+
+Cell[BoxData[
+ RowBox[{"FCCheckVersion", "[",
+ RowBox[{"8", ",", "2", ",", "0"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1628714888],
+
+Cell[BoxData[
+ RowBox[{"FCCheckVersion", "[",
+ RowBox[{"15", ",", "2", ",", "0"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1749745164]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCCheckVersion",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 48.565102}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCCheckVersion[major, minor, build] checks if the current version of \
+FeynCalc is larger or equal than marjor.minor.build. For example, \
+FCCheckVersion[9,3,0] will generate a warning (when running with the \
+frontend) or quit kernel (when running without the frontend) if the loaded \
+FeynCalc version is older than 9.3.0.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCCheckVersion", "titlemodifier" -> "", "windowtitle" ->
+ "FCCheckVersion", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCCheckVersion"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4796, 145, 379, 15, 70, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7771, 235}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2297, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2886, 76, 291, 11, 70, "ObjectNameGrid"],
+Cell[3180, 89, 678, 16, 70, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3883, 109, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[4616, 135, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4650, 137, 109, 3, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4796, 145, 379, 15, 70, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1],
+Cell[CellGroupData[{
+Cell[5200, 164, 187, 6, 70, "ExampleSection",
+ CellID->1],
+Cell[5390, 172, 144, 4, 70, "Input",
+ CellID->1628714888],
+Cell[5537, 178, 145, 4, 70, "Input",
+ CellID->1749745164]
+}, Open ]]
+}, Open ]],
+Cell[5709, 186, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCClearScalarProducts.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCClearScalarProducts.nb
index 3b703c7a3..5034cc001 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCClearScalarProducts.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCClearScalarProducts.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12186, 420]
-NotebookOptionsPosition[ 7443, 276]
-NotebookOutlinePosition[ 10627, 364]
-CellTagsIndexPosition[ 10504, 358]
+NotebookDataLength[ 12983, 436]
+NotebookOptionsPosition[ 8522, 305]
+NotebookOutlinePosition[ 11568, 387]
+CellTagsIndexPosition[ 11443, 381]
WindowTitle->FCClearScalarProducts[]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCClearScalarProducts\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCClearScalarProducts"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Pair"], "\<\"SP\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SP"], "\<\"SPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCClearScalarProducts\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCClearScalarProducts"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCClearScalarProducts.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$58641],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCClearScalarProducts", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$94886],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCClearScalarProducts", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ FCClearScalarProducts.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCClearScalarProducts[]", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCClearScalarProducts[]", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->224266882],
+ CellID->1957370991],
Cell[CellGroupData[{
@@ -117,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->595250500],
+ CellID->780051132],
Cell[CellGroupData[{
@@ -133,12 +169,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
SuperscriptBox["m", "2"], TraditionalForm]], "Output",
- ImageSize->{26, 18},
+ ImageSize->{27, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCClearScalarProducts",
- CellLabel->"Out[1]=",
- CellID->29501459]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -155,12 +190,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
SuperscriptBox["m", "2"], TraditionalForm]], "Output",
- ImageSize->{26, 18},
+ ImageSize->{27, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCClearScalarProducts",
- CellLabel->"Out[2]=",
- CellID->988927941]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[BoxData[
@@ -188,18 +222,17 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCClearScalarProducts",
- CellLabel->"Out[4]=",
- CellID->975498131]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ScalarProduct", "[",
+ RowBox[{"SP", "[",
RowBox[{"p", ",", "p"}], "]"}]], "Input",
CellTags->"FCClearScalarProducts",
CellLabel->"In[5]:=",
@@ -213,12 +246,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCClearScalarProducts",
- CellLabel->"Out[5]=",
- CellID->1717895412]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -242,7 +274,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ScalarProduct",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
@@ -267,17 +298,15 @@ Cell[TextData[{
ButtonNote->"SPD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCClearScalarProducts",
- CellID->958310312]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCClearScalarProducts[]",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -286,22 +315,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 9.561304}",
+ "built" -> "{2020, 1, 5, 18, 55, 49.438879}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FCClearScalarProducts[] removes all user-performed specific settings for \
-ScalarProduct's.", "synonyms" -> {}, "title" -> "FCClearScalarProducts[]",
- "titlemodifier" -> "", "windowtitle" -> "FCClearScalarProducts[]", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FCClearScalarProducts"},
- "SearchTextTranslated" -> ""},
+ScalarProduct's.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCClearScalarProducts[]", "titlemodifier" -> "", "windowtitle" ->
+ "FCClearScalarProducts[]", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCClearScalarProducts"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -309,8 +338,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -319,109 +349,95 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3398, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4635, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->224266882]},
+ CellID->1957370991]},
"FCClearScalarProducts"->{
- Cell[4030, 123, 216, 7, 27, "Input",
+ Cell[5268, 159, 216, 7, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1785698530],
- Cell[4249, 132, 245, 8, 39, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->29501459],
- Cell[4531, 145, 232, 7, 27, "Input",
+ Cell[5487, 168, 226, 7, 37, "Output",
+ CellTags->"FCClearScalarProducts"],
+ Cell[5750, 180, 232, 7, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1559478391],
- Cell[4766, 154, 246, 8, 39, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->988927941],
- Cell[5027, 165, 148, 4, 27, "Input",
+ Cell[5985, 189, 226, 7, 37, "Output",
+ CellTags->"FCClearScalarProducts"],
+ Cell[6226, 199, 148, 4, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->368473440],
- Cell[5200, 173, 232, 7, 27, "Input",
+ Cell[6399, 207, 232, 7, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1776453168],
- Cell[5435, 182, 343, 13, 41, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->975498131],
- Cell[5815, 200, 169, 5, 27, "Input",
+ Cell[6634, 216, 323, 12, 39, "Output",
+ CellTags->"FCClearScalarProducts"],
+ Cell[6994, 233, 158, 5, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1861458856],
- Cell[5987, 207, 344, 13, 41, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->1717895412],
- Cell[6699, 243, 702, 28, 31, "Text",
- CellTags->"FCClearScalarProducts",
- CellID->958310312]}
+ Cell[7155, 240, 323, 12, 39, "Output",
+ CellTags->"FCClearScalarProducts"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9323, 320},
- {"FCClearScalarProducts", 9470, 324}
+ {"PrimaryExamplesSection", 10448, 350},
+ {"FCClearScalarProducts", 10597, 354}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[595, 21, 2297, 52, 51, "AnchorBarGrid",
+Cell[595, 21, 3300, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2895, 75, 66, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2964, 78, 409, 12, 82, "Usage",
+Cell[3898, 101, 300, 11, 45, "ObjectNameGrid"],
+Cell[4201, 114, 409, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3398, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4635, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->224266882],
+ CellID->1957370991],
Cell[CellGroupData[{
-Cell[3810, 113, 195, 6, 25, "ExampleSection",
- CellID->595250500],
+Cell[5048, 149, 195, 6, 26, "ExampleSection",
+ CellID->780051132],
Cell[CellGroupData[{
-Cell[4030, 123, 216, 7, 27, "Input",
+Cell[5268, 159, 216, 7, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1785698530],
-Cell[4249, 132, 245, 8, 39, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->29501459]
+Cell[5487, 168, 226, 7, 37, "Output",
+ CellTags->"FCClearScalarProducts"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4531, 145, 232, 7, 27, "Input",
+Cell[5750, 180, 232, 7, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1559478391],
-Cell[4766, 154, 246, 8, 39, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->988927941]
+Cell[5985, 189, 226, 7, 37, "Output",
+ CellTags->"FCClearScalarProducts"]
}, Open ]],
-Cell[5027, 165, 148, 4, 27, "Input",
+Cell[6226, 199, 148, 4, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->368473440],
Cell[CellGroupData[{
-Cell[5200, 173, 232, 7, 27, "Input",
+Cell[6399, 207, 232, 7, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1776453168],
-Cell[5435, 182, 343, 13, 41, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->975498131]
+Cell[6634, 216, 323, 12, 39, "Output",
+ CellTags->"FCClearScalarProducts"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5815, 200, 169, 5, 27, "Input",
+Cell[6994, 233, 158, 5, 27, "Input",
CellTags->"FCClearScalarProducts",
CellID->1861458856],
-Cell[5987, 207, 344, 13, 41, "Output",
- CellTags->"FCClearScalarProducts",
- CellID->1717895412]
+Cell[7155, 240, 323, 12, 39, "Output",
+ CellTags->"FCClearScalarProducts"]
}, Open ]]
}, Open ]],
-Cell[6358, 224, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7505, 256, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6426, 229, 270, 12, 31, "SeeAlsoSection",
+Cell[7573, 261, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6699, 243, 702, 28, 31, "Text",
- CellTags->"FCClearScalarProducts",
- CellID->958310312]
+Cell[7846, 275, 634, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[7416, 274, 23, 0, 42, "FooterCell"]
+Cell[8495, 303, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCColorIsolate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCColorIsolate.nb
new file mode 100644
index 000000000..7ed1b2531
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCColorIsolate.nb
@@ -0,0 +1,1795 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 52256, 1785]
+NotebookOptionsPosition[ 48503, 1669]
+NotebookOutlinePosition[ 50627, 1726]
+CellTagsIndexPosition[ 50541, 1721]
+WindowTitle->FCColorIsolate
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNT"], "\<\"SUNF\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNF"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCColorIsolate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCColorIsolate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCColorIsolate.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$95328],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCColorIsolate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCColorIsolate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCColorIsolate", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]wraps colored objects (",
+ Cell[BoxData["SUNT"], "InlineFormula"],
+ ", ",
+ Cell[BoxData["SUNF"], "InlineFormula"],
+ " etc.) into heads specified by the user."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->84812816],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCColorIsolate", "]"}]], "Input",
+ CellLabel->"In[47]:=",
+ CellID->1895011051],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"ClearHeads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"FCGV", "(", "\<\"ColorObject\"\>", ")"}], "}"}]}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"ExceptHeads", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"ColorObject\"\>", ")"}]}], ",",
+ RowBox[{"Isolate", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
+ RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
+ RowBox[{"SUNT", "\[Rule]", "True"}], ",",
+ RowBox[{"SUNF", "\[Rule]", "True"}], ",",
+ RowBox[{"SUND", "\[Rule]", "True"}], ",",
+ RowBox[{"SUNTrace", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{522, 72},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[47]=",
+ CellID->1828976869]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->65996284],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1896752799],
+
+Cell[TextData[{
+ ButtonBox["FCColorIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCColorIsolate",
+ ButtonNote->"FCColorIsolate"],
+ " provides an easy way to extract the Color structures present in the \
+expression (e.g. an amplitude)"
+}], "Notes",
+ CellID->108055865],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"amp", "=",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu2", "}"}], ",", "Col3", ",", "Col5"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{
+ RowBox[{"-", "k1"}], "+", "p2"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu4", "}"}], ",", "Col5", ",", "Col1"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"k1", "-", "p2"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "\[ImaginaryI]"}], "]"}], ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu4", "}"}], ",", "Col3", ",", "Col5"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"k2", "+", "p2"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu2", "}"}], ",", "Col5", ",", "Col1"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k2"}], "-", "p2"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "\[ImaginaryI]"}], "]"}], ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], ",", "\[Nu]"}], "]"}]}], "-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "Lor3", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu5", "}"}], ",", "Col3", ",", "Col1"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "+", "k2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "\[ImaginaryI]"}], "]"}], ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"Lor3", ",", "Lor4"}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "k1"}], "-", "k2"}], ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"Lor4", ",", "\[Mu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "+",
+ RowBox[{"2", " ", "k2"}]}], ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"Lor4", ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "-", "k2"}], ",", "Lor4"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]}], ")"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNF", "[",
+ RowBox[{"Glu2", ",", "Glu4", ",", "Glu5"}], "]"}]}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->678574635],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2]], "-",
+ FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col3",
+ TraditionalForm],
+ FormBox["Col5",
+ TraditionalForm]}],
+ FormBox["Glu2",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col5",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu4",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k2 - $CellContext`p2],
+ FeynCalc`Momentum[-$CellContext`k2 - $CellContext`p2]], "-",
+ FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col3",
+ TraditionalForm],
+ FormBox["Col5",
+ TraditionalForm]}],
+ FormBox["Glu4",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col5",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu2",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k1 + $CellContext`k2],
+ FeynCalc`Momentum[-$CellContext`k1 + $CellContext`k2]]],
+ Editable->False]],
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox["Glu2",
+ TraditionalForm],
+ FormBox["Glu4",
+ TraditionalForm],
+ FormBox["Glu5",
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col3",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu5",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{483, 237},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1299085040]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ampIso", "=",
+ RowBox[{"FCColorIsolate", "[",
+ RowBox[{"amp", ",",
+ RowBox[{"Head", "\[Rule]", "colorS"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->184667609],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1] -
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k1] -
+ FeynCalc`Momentum[$CellContext`p2]], "-", FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}], " ",
+ RowBox[{"colorS", "(",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`k2] -
+ FeynCalc`Momentum[$CellContext`p2], -
+ FeynCalc`Momentum[$CellContext`k2] -
+ FeynCalc`Momentum[$CellContext`p2]], "-", FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}], " ",
+ RowBox[{"colorS", "(",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`k1] +
+ FeynCalc`Momentum[$CellContext`k2], -
+ FeynCalc`Momentum[$CellContext`k1] +
+ FeynCalc`Momentum[$CellContext`k2]]],
+ Editable->False]],
+ RowBox[{"\[ImaginaryI]", " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], " ",
+ RowBox[{"colorS", "(",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu5",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu5",
+ TraditionalForm],
+ TraditionalForm]}]]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{472, 235},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1526981637]
+}, Open ]],
+
+Cell[TextData[{
+ "Now that all color structures are wrapped into the head ",
+ Cell[BoxData[
+ RowBox[{"colorcS", " "}]], "InlineFormula"],
+ " it is easy to extract them to a separate list"
+}], "Notes",
+ CellID->959852842],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Cases2", "[",
+ RowBox[{"ampIso", ",", "colorS"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->532893225],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"colorS", "(",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}], ",",
+ RowBox[{"colorS", "(",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}], ",",
+ RowBox[{"colorS", "(",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu5",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu5",
+ TraditionalForm],
+ TraditionalForm]}]]}], ")"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{553, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1394154100]
+}, Open ]],
+
+Cell[TextData[{
+ "This way we obtain a sorted list of all unique color structures in ",
+ Cell[BoxData["amp"], "InlineFormula"],
+ ". "
+}], "Notes",
+ CellID->111681314],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[",
+ RowBox[{"amp", ",", "ampIso", ",", "colorS"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1836486841]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SUNT",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNT",
+ ButtonNote->"SUNT"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNF",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNF",
+ ButtonNote->"SUNF"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCColorIsolate",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 50.742223}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCColorIsolate[exp] wraps colored objects (SUNT, SUNF etc.) into heads \
+specified by the user.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCColorIsolate", "titlemodifier" -> "", "windowtitle" ->
+ "FCColorIsolate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCColorIsolate"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6676, 203, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->65996284]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 50399, 1714}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3113, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3702, 99, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4018, 114, 515, 15, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4558, 133, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->84812816],
+Cell[5298, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5354, 163, 118, 3, 70, "Input",
+ CellID->1895011051],
+Cell[5475, 168, 1140, 28, 93, "Output",
+ CellID->1828976869]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6676, 203, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->65996284],
+Cell[CellGroupData[{
+Cell[7087, 222, 196, 6, 26, "ExampleSection",
+ CellID->1896752799],
+Cell[7286, 230, 288, 8, 49, "Notes",
+ CellID->108055865],
+Cell[CellGroupData[{
+Cell[7599, 242, 5854, 169, 384, "Input",
+ CellID->678574635],
+Cell[13456, 413, 15627, 542, 258, "Output",
+ CellID->1299085040]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29120, 960, 203, 6, 27, "Input",
+ CellID->184667609],
+Cell[29326, 968, 15271, 529, 256, "Output",
+ CellID->1526981637]
+}, Open ]],
+Cell[44612, 1500, 221, 6, 49, "Notes",
+ CellID->959852842],
+Cell[CellGroupData[{
+Cell[44858, 1510, 135, 4, 27, "Input",
+ CellID->532893225],
+Cell[44996, 1516, 2433, 98, 43, "Output",
+ CellID->1394154100]
+}, Open ]],
+Cell[47444, 1617, 166, 5, 32, "Notes",
+ CellID->111681314],
+Cell[47613, 1624, 150, 4, 27, "Input",
+ CellID->1836486841]
+}, Open ]],
+Cell[47778, 1631, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[47846, 1636, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[48119, 1650, 342, 14, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[48476, 1667, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCompareResults.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCompareResults.nb
new file mode 100644
index 000000000..8e9345782
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCCompareResults.nb
@@ -0,0 +1,458 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14289, 448]
+NotebookOptionsPosition[ 10789, 345]
+NotebookOutlinePosition[ 13172, 406]
+CellTagsIndexPosition[ 13087, 401]
+WindowTitle->FCCompareResults
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCCompareResults\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCCompareResults"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCCompareResults.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$95766],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCCompareResults", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCCompareResults", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCCompareResults", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"res1", ",", "res2", ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"res1Known", ",", "res2Known", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]compares the given list of expression {res1,res2,...} \
+to the list of expressions {res1Known,res2Known,...} that represenet the \
+correct results. This is handy for checking both intermediate and final \
+results of calculations, where you know what should come out at the end."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1592897939],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCCompareResults", "]"}]], "Input",
+ CellLabel->"In[795]:=",
+ CellID->1616328053],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Differences", "\[Rule]", "False"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Function", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Print", "[",
+ RowBox[{
+ StyleBox["#1", "Text",
+ StripOnInput->False,
+ FontWeight->Bold], ",", "\<\" \"\>", ",",
+ RowBox[{"If", "[",
+ RowBox[{
+ RowBox[{"TrueQ", "[", "#4", "]"}], ",",
+ RowBox[{"Style", "[",
+ RowBox[{"#2", ",", "\<\"Text\"\>", ",",
+ RowBox[{"Darker", "[", "Green", "]"}], ",", "Bold"}], "]"}],
+ ",",
+ RowBox[{"Style", "[",
+ RowBox[{"#3", ",", "\<\"Text\"\>", ",", "Red", ",", "Bold"}],
+ "]"}]}], "]"}]}], "]"}], "&"}], ",",
+ RowBox[{
+ RowBox[{"WriteString", "[",
+ RowBox[{"\<\"stdout\"\>", ",",
+
+ RowBox[{"\<\"\[RawEscape][1m\"\>", "<>", "#1",
+ "<>", "\<\"\[RawEscape][0m \"\>", "<>",
+ RowBox[{"If", "[",
+ RowBox[{
+ RowBox[{"TrueQ", "[", "#4", "]"}], ",",
+
+ RowBox[{"\<\"\[RawEscape][1m \[RawEscape][32m\"\>", "<>", "#2",
+ "<>", "\<\"\[RawEscape][0m \[RawEscape][0;39m\"\>"}], ",",
+
+ RowBox[{"\<\"\[RawEscape][1m \[RawEscape][31m\"\>", "<>", "#3",
+ "<>", "\<\"\[RawEscape][0m \[RawEscape][0;39m\"\>"}]}], "]"}],
+ "<>", "\<\"\\n\"\>"}]}], "]"}], "&"}]}], "}"}]}], ",",
+ RowBox[{"Interrupt", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Hold", "[",
+ RowBox[{"Abort", "[", "]"}], "]"}], ",", "Automatic"}], "}"}]}], ",",
+
+ RowBox[{"Text", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"\<\"Check of the results:\"\>",
+ ",", "\<\"The results agree.\"\>",
+ ",", "\<\"The results disagree.\"\>"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{513, 129},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[795]=",
+ CellID->267039424]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->47378511],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->367873129],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCCompareResults", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"4", ",", "4"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"2", "^", "2"}], ",",
+ RowBox[{"8", "/", "2"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->231612524],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{
+ StyleBox["\<\"Check of the results:\"\>", "Text",
+ StripOnInput->False,
+ FontWeight->Bold], "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]",
+ StyleBox["\<\"The results agree.\"\>", "Text",
+ StripOnInput->False,
+ FontWeight->Bold,
+ FontColor->RGBColor[0,
+ Rational[2, 3], 0],
+ $CellContext`LineColor -> RGBColor[0,
+ Rational[2, 3], 0],
+ $CellContext`FrontFaceColor -> RGBColor[0,
+ Rational[2, 3], 0],
+ $CellContext`BackFaceColor -> RGBColor[0,
+ Rational[2, 3], 0],
+ $CellContext`GraphicsColor -> RGBColor[0,
+ Rational[2, 3], 0]]}],
+ SequenceForm[
+ Style["Check of the results:", "Text", Bold], " ",
+ Style["The results agree.", "Text",
+ RGBColor[0,
+ Rational[2, 3], 0], Bold]],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[796]:=",
+ CellID->1402511861],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->655015259]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCCompareResults", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"3", ",", "5"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"2", "^", "2"}], ",",
+ RowBox[{"8", "/", "2"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->102291710],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{
+ StyleBox["\<\"Check of the results:\"\>", "Text",
+ StripOnInput->False,
+ FontWeight->Bold], "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]",
+ StyleBox["\<\"The results disagree.\"\>", "Text",
+ StripOnInput->False,
+ FontWeight->Bold,
+ FontColor->RGBColor[1, 0, 0],
+ $CellContext`LineColor -> RGBColor[1, 0, 0],
+ $CellContext`FrontFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`BackFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`GraphicsColor -> RGBColor[1, 0, 0]]}],
+ SequenceForm[
+ Style["Check of the results:", "Text", Bold], " ",
+ Style["The results disagree.", "Text",
+ RGBColor[1, 0, 0], Bold]],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[797]:=",
+ CellID->1472450406],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->196668672]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"FCCompareResults",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 52.009701}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCCompareResults[{res1, res2, ...}, {res1Known, res2Known, ...}] \
+compares the given list of expression {res1,res2,...} to the list of \
+expressions {res1Known,res2Known,...} that represenet the correct results. \
+This is handy for checking both intermediate and final results of \
+calculations, where you know what should come out at the end.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCCompareResults",
+ "titlemodifier" -> "", "windowtitle" -> "FCCompareResults", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCCompareResults"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7305, 216, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->47378511]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12945, 394}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2305, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2896, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3214, 91, 818, 20, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4057, 115, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1592897939],
+Cell[4799, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4855, 145, 121, 3, 70, "Input",
+ CellID->1616328053],
+Cell[4979, 150, 2265, 59, 150, "Output",
+ CellID->267039424]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7305, 216, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->47378511],
+Cell[CellGroupData[{
+Cell[7716, 235, 195, 6, 26, "ExampleSection",
+ CellID->367873129],
+Cell[CellGroupData[{
+Cell[7936, 245, 285, 10, 27, "Input",
+ CellID->231612524],
+Cell[8224, 257, 954, 27, 24, "Print",
+ CellID->1402511861],
+Cell[9181, 286, 189, 6, 35, "Output",
+ CellID->655015259]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9407, 297, 285, 10, 27, "Input",
+ CellID->102291710],
+Cell[9695, 309, 835, 21, 24, "Print",
+ CellID->1472450406],
+Cell[10533, 332, 190, 6, 35, "Output",
+ CellID->196668672]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[10762, 343, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDiracIsolate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDiracIsolate.nb
new file mode 100644
index 000000000..c2f659a18
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDiracIsolate.nb
@@ -0,0 +1,1885 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 55378, 1875]
+NotebookOptionsPosition[ 51685, 1760]
+NotebookOutlinePosition[ 53745, 1816]
+CellTagsIndexPosition[ 53659, 1811]
+WindowTitle->FCDiracIsolate
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Spinor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCDiracIsolate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCDiracIsolate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCDiracIsolate.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$96198],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCDiracIsolate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCDiracIsolate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCDiracIsolate", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]wraps chains of Dirac matrices into heads specified by \
+the user."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1254098581],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCDiracIsolate", "]"}]], "Input",
+ CellLabel->"In[88]:=",
+ CellID->1538410322],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CartesianIndex", "\[Rule]", "False"}], ",",
+ RowBox[{"ClearHeads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"FCGV", "(", "\<\"DiracChain\"\>", ")"}], "}"}]}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGamma", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrace", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"ExceptHeads", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"DiracChain", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"DiracChain\"\>", ")"}]}], ",",
+ RowBox[{"Isolate", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
+ RowBox[{"LorentzIndex", "\[Rule]", "False"}], ",",
+ RowBox[{"Polarization", "\[Rule]", "False"}], ",",
+ RowBox[{"Spinor", "\[Rule]", "True"}], ",",
+ RowBox[{"Split", "\[Rule]", "True"}], ",",
+ RowBox[{"TimeConstrained", "\[Rule]", "3"}], ",",
+ RowBox[{"ToDiracGamma67", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{573, 129},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[88]=",
+ CellID->1412443888]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2005834877],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1669096317],
+
+Cell[TextData[{
+ ButtonBox["FCDiracIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCDiracIsolate",
+ ButtonNote->"FCDiracIsolate"],
+ " provides an easy way to extract the Dirac structures present in the \
+expression (e.g. an amplitude)"
+}], "Notes",
+ CellID->108055865],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"amp", "=",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu2", "}"}], ",", "Col3", ",", "Col5"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{
+ RowBox[{"-", "k1"}], "+", "p2"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu4", "}"}], ",", "Col5", ",", "Col1"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"k1", "-", "p2"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "\[ImaginaryI]"}], "]"}], ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu4", "}"}], ",", "Col3", ",", "Col5"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"k2", "+", "p2"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu2", "}"}], ",", "Col5", ",", "Col1"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k2"}], "-", "p2"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "\[ImaginaryI]"}], "]"}], ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], ",", "\[Nu]"}], "]"}]}], "-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ RowBox[{"GA", "[", "Lor3", "]"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu5", "}"}], ",", "Col3", ",", "Col1"}], "]"}]}],
+ ")"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "+", "k2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",", "\[ImaginaryI]"}], "]"}], ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "]"}], ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"Lor3", ",", "Lor4"}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "k1"}], "-", "k2"}], ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"Lor4", ",", "\[Mu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "+",
+ RowBox[{"2", " ", "k2"}]}], ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"Lor4", ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "-", "k2"}], ",", "Lor4"}], "]"}], " ",
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]}], ")"}], " ",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], " ",
+ RowBox[{"SUNF", "[",
+ RowBox[{"Glu2", ",", "Glu4", ",", "Glu5"}], "]"}]}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->678574635],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2]], "-",
+ FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col3",
+ TraditionalForm],
+ FormBox["Col5",
+ TraditionalForm]}],
+ FormBox["Glu2",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col5",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu4",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k2 - $CellContext`p2],
+ FeynCalc`Momentum[-$CellContext`k2 - $CellContext`p2]], "-",
+ FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col3",
+ TraditionalForm],
+ FormBox["Col5",
+ TraditionalForm]}],
+ FormBox["Glu4",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col5",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu2",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k1 + $CellContext`k2],
+ FeynCalc`Momentum[-$CellContext`k1 + $CellContext`k2]]],
+ Editable->False]],
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox["Glu2",
+ TraditionalForm],
+ FormBox["Glu4",
+ TraditionalForm],
+ FormBox["Glu5",
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubscriptBox["g", "s"], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col3",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu5",
+ TraditionalForm]]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{483, 237},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->276868004]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ampIso", "=",
+ RowBox[{"FCDiracIsolate", "[",
+ RowBox[{"amp", ",",
+ RowBox[{"Head", "\[Rule]", "diracS"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->184667609],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`k2] -
+ FeynCalc`Momentum[$CellContext`p2], -
+ FeynCalc`Momentum[$CellContext`k2] -
+ FeynCalc`Momentum[$CellContext`p2]], "-", FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"diracS", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}]}]}]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "u", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1] -
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k1] -
+ FeynCalc`Momentum[$CellContext`p2]], "-", FeynCalc`SMP["m_u"]^2],
+ Editable->False]],
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col5",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"diracS", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}]}]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`k1] +
+ FeynCalc`Momentum[$CellContext`k2], -
+ FeynCalc`Momentum[$CellContext`k1] +
+ FeynCalc`Momentum[$CellContext`k2]]],
+ Editable->False]],
+ RowBox[{"\[ImaginaryI]", " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox[
+ FormBox["Col3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Col1",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["Glu5",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu5",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["Lor4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], " ",
+ RowBox[{"diracS", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}]}]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{480, 234},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->474582901]
+}, Open ]],
+
+Cell[TextData[{
+ "Now that all Dirac structures are wrapped into the head ",
+ Cell[BoxData[
+ RowBox[{"diracS", " "}]], "InlineFormula"],
+ " it is easy to extract them to a separate list"
+}], "Notes",
+ CellID->959852842],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Cases2", "[",
+ RowBox[{"ampIso", ",", "diracS"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->532893225],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"diracS", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["Lor3",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}], ",",
+ RowBox[{"diracS", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}], ",",
+ RowBox[{"diracS", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "u"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "u"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{442, 69},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1394310795]
+}, Open ]],
+
+Cell[TextData[{
+ "This way we obtain a sorted list of all unique Dirac structures in ",
+ Cell[BoxData["amp"], "InlineFormula"],
+ ". "
+}], "Notes",
+ CellID->111681314],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[",
+ RowBox[{"amp", ",", "ampIso", ",", "diracS"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1836486841]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCDiracIsolate",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 53.902398}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCDiracIsolate[exp] wraps chains of Dirac matrices into heads specified \
+by the user.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCDiracIsolate", "titlemodifier" -> "", "windowtitle" ->
+ "FCDiracIsolate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCDiracIsolate"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7205, 210, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2005834877]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 53515, 1804}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3112, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3701, 98, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4017, 113, 408, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4450, 129, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1254098581],
+Cell[5192, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5248, 159, 118, 3, 70, "Input",
+ CellID->1538410322],
+Cell[5369, 164, 1775, 39, 150, "Output",
+ CellID->1412443888]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7205, 210, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2005834877],
+Cell[CellGroupData[{
+Cell[7618, 229, 196, 6, 26, "ExampleSection",
+ CellID->1669096317],
+Cell[7817, 237, 288, 8, 49, "Notes",
+ CellID->108055865],
+Cell[CellGroupData[{
+Cell[8130, 249, 5854, 169, 384, "Input",
+ CellID->678574635],
+Cell[13987, 420, 15626, 542, 258, "Output",
+ CellID->276868004]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29650, 967, 203, 6, 27, "Input",
+ CellID->184667609],
+Cell[29856, 975, 15220, 526, 255, "Output",
+ CellID->474582901]
+}, Open ]],
+Cell[45091, 1504, 220, 6, 49, "Notes",
+ CellID->959852842],
+Cell[CellGroupData[{
+Cell[45336, 1514, 135, 4, 27, "Input",
+ CellID->532893225],
+Cell[45474, 1520, 5113, 185, 90, "Output",
+ CellID->1394310795]
+}, Open ]],
+Cell[50602, 1708, 166, 5, 32, "Notes",
+ CellID->111681314],
+Cell[50771, 1715, 150, 4, 27, "Input",
+ CellID->1836486841]
+}, Open ]],
+Cell[50936, 1722, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[51004, 1727, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[51277, 1741, 366, 14, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[51658, 1758, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDisableTraditionalFormOutput.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDisableTraditionalFormOutput.nb
new file mode 100644
index 000000000..ceea91d27
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDisableTraditionalFormOutput.nb
@@ -0,0 +1,358 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10644, 348]
+NotebookOptionsPosition[ 7407, 254]
+NotebookOutlinePosition[ 9716, 314]
+CellTagsIndexPosition[ 9632, 309]
+WindowTitle->FCDisableTraditionalFormOutput
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"$FCTraditionalFormOutput\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/$FCTraditionalFormOutput"], \
+"\<\"FCDisableTraditionalFormOutput\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCEnableTraditionalFormOutput"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCDisableTraditionalFormOutput\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCDisableTraditionalFormOutput"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCDisableTraditionalFormOutput.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$96638],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCDisableTraditionalFormOutput", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCDisableTraditionalFormOutput", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCDisableTraditionalFormOutput", "[", "]"}]], "InlineFormula"],
+
+ " \[LineSeparator]sets the output format of the current FrontEnd to \
+StandardForm. The setting is not persistent, such that it does not influence \
+any subequent Mathematica FrontEnd sessions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1140215268],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->717664224],
+
+Cell[BoxData[
+ RowBox[{"FCDisableTraditionalFormOutput", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1038938737],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->272206574],
+
+Cell[BoxData[
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Output",
+ ImageSize->{71, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1262109001]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"FCEnableTraditionalFormOutput", "[", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2126693435],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->502881580],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->411839276]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["$FCTraditionalFormOutput",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/$FCTraditionalFormOutput",
+ ButtonNote->"$FCTraditionalFormOutput"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCDisableTraditionalFormOutput",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCEnableTraditionalFormOutput",
+ ButtonNote->"FCEnableTraditionalFormOutput"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCDisableTraditionalFormOutput",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 55.157102}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCDisableTraditionalFormOutput[] sets the output format of the current \
+FrontEnd to StandardForm. The setting is not persistent, such that it does \
+not influence any subequent Mathematica FrontEnd sessions.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCDisableTraditionalFormOutput",
+ "titlemodifier" -> "", "windowtitle" -> "FCDisableTraditionalFormOutput",
+ "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCDisableTraditionalFormOutput"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4769, 134, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1140215268]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9488, 302}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[602, 21, 3297, 80, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3902, 103, 307, 11, 45, "ObjectNameGrid"],
+Cell[4212, 116, 532, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4769, 134, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1140215268],
+Cell[CellGroupData[{
+Cell[5182, 153, 195, 6, 26, "ExampleSection",
+ CellID->717664224],
+Cell[5380, 161, 122, 3, 27, "Input",
+ CellID->1038938737],
+Cell[CellGroupData[{
+Cell[5527, 168, 125, 4, 27, "Input",
+ CellID->272206574],
+Cell[5655, 174, 214, 7, 36, "Output",
+ CellID->1262109001]
+}, Open ]],
+Cell[5884, 184, 121, 3, 27, "Input",
+ CellID->2126693435],
+Cell[CellGroupData[{
+Cell[6030, 191, 125, 4, 27, "Input",
+ CellID->502881580],
+Cell[6158, 197, 381, 16, 37, "Output",
+ CellID->411839276]
+}, Open ]]
+}, Open ]],
+Cell[6566, 217, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6634, 222, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[6907, 236, 458, 13, 57, "SeeAlso"]
+}, Open ]],
+Cell[7380, 252, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDuplicateFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDuplicateFreeQ.nb
new file mode 100644
index 000000000..47dbf7f9e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCDuplicateFreeQ.nb
@@ -0,0 +1,335 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10033, 325]
+NotebookOptionsPosition[ 6658, 228]
+NotebookOutlinePosition[ 9119, 289]
+CellTagsIndexPosition[ 9035, 284]
+WindowTitle->FCDuplicateFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCDuplicateFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCDuplicateFreeQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCDuplicateFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97074],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCDuplicateFreeQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCDuplicateFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCDuplicateFreeQ", "[", "list", "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields True if list contains no duplicates and False \
+otherwise. FCDuplicateFreeQ[list,test] uses test to determine whether two \
+objects should be considered duplicates.FCDuplicateFreeQ returns the same \
+results as the standard DuplicateFreeQ. The only reason for introducing \
+FCDuplicateFreeQ is that DuplicateFreeQ is not available in Mathematica 8 and \
+9, which are still supported by FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->210388594],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1201668591],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCDuplicateFreeQ", "[",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1365347863],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1783991330]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCDuplicateFreeQ", "[",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "a"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->484757087],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2639087]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCDuplicateFreeQ", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "c"}], "}"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1576732881],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->52773390]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCDuplicateFreeQ", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "c"}], "}"}]}], "}"}], ",",
+ RowBox[{"Function", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"x", ",", "y"}], "}"}], ",",
+ RowBox[{
+ RowBox[{"First", "[", "x", "]"}], "===",
+ RowBox[{"First", "[", "y", "]"}]}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->800569343],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1930688687]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCDuplicateFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 56.322258}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCDuplicateFreeQ[list] yields True if list contains no duplicates and \
+False otherwise. FCDuplicateFreeQ[list,test] uses test to determine whether \
+two objects should be considered duplicates.FCDuplicateFreeQ returns the same \
+results as the standard DuplicateFreeQ. The only reason for introducing \
+FCDuplicateFreeQ is that DuplicateFreeQ is not available in Mathematica 8 and \
+9, which are still supported by FeynCalc.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCDuplicateFreeQ", "titlemodifier" -> "",
+ "windowtitle" -> "FCDuplicateFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCDuplicateFreeQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3964, 109, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->210388594]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8892, 277}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2305, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2896, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[3192, 89, 747, 16, 136, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3964, 109, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->210388594],
+Cell[CellGroupData[{
+Cell[4376, 128, 196, 6, 26, "ExampleSection",
+ CellID->1201668591],
+Cell[CellGroupData[{
+Cell[4597, 138, 170, 5, 27, "Input",
+ CellID->1365347863],
+Cell[4770, 145, 190, 6, 35, "Output",
+ CellID->1783991330]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4997, 156, 179, 5, 27, "Input",
+ CellID->484757087],
+Cell[5179, 163, 188, 6, 35, "Output",
+ CellID->2639087]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5404, 174, 262, 9, 27, "Input",
+ CellID->1576732881],
+Cell[5669, 185, 188, 6, 35, "Output",
+ CellID->52773390]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5894, 196, 504, 17, 45, "Input",
+ CellID->800569343],
+Cell[6401, 215, 191, 6, 35, "Output",
+ CellID->1930688687]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6631, 226, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCE.nb
index d459e1ee3..70012b4e5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCE.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCE.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18538, 690]
-NotebookOptionsPosition[ 13302, 511]
-NotebookOutlinePosition[ 16655, 613]
-CellTagsIndexPosition[ 16548, 607]
+NotebookDataLength[ 19816, 724]
+NotebookOptionsPosition[ 14718, 554]
+NotebookOutlinePosition[ 17836, 647]
+CellTagsIndexPosition[ 17729, 641]
WindowTitle->FCE
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCE\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCE"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FCE.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$58987],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCE",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FCI\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"FeynCalcInternal\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalcInternal"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97953],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +99,27 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCE", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"FCE", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "translates exp from the internal FeynCalc representation to a short \
-form.\nFCE is equivalent to FeynCalcExternal."
+ " \[LineSeparator]translates exp from the internal FeynCalc \
+representation to a short form."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,6 +130,41 @@ form.\nFCE is equivalent to FeynCalcExternal."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1842947211],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["FCE is equivalent to FeynCalcExternal.", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +180,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1144395108],
+ CellID->1150272475],
Cell[CellGroupData[{
@@ -118,7 +190,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->761969732],
+ CellID->1218642292],
Cell[CellGroupData[{
@@ -152,12 +224,11 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{73, 21},
+ ImageSize->{79, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[1]=",
- CellID->32096658]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -173,12 +244,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"GA", "[", "5", "]"}], ",",
RowBox[{"GS", "[", "p", "]"}]}], "}"}]], "Output",
- ImageSize->{117, 15},
+ ImageSize->{118, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1043906196]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,46 +313,35 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ",",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ",",
- FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[3]=",
- CellID->1056453085]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -305,12 +364,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[4]//StandardForm=",
- CellID->2003071088]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -356,43 +414,32 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ",",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], ",",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ TraditionalForm]}]], ",",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[5]=",
- CellID->1631220008]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -426,12 +473,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}], "}"}]], "Output",
- ImageSize->{521, 67},
+ ImageSize->{523, 67},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[6]//StandardForm=",
- CellID->394450163]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -455,12 +501,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCE",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1313014770]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -502,9 +547,7 @@ Cell[TextData[{
ButtonNote->"FeynCalcInternal"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCE",
- CellID->141332597]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -512,7 +555,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCE",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -521,21 +564,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 11.109887}",
+ "built" -> "{2020, 1, 5, 18, 55, 58.716299}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FCE[exp] translates exp from the internal FeynCalc representation to a \
-short form. FCE is equivalent to FeynCalcExternal.", "synonyms" -> {},
- "title" -> "FCE", "titlemodifier" -> "", "windowtitle" -> "FCE", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FCE"}, "SearchTextTranslated" -> ""},
+short form.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCE",
+ "titlemodifier" -> "", "windowtitle" -> "FCE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCE"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -543,8 +586,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -553,145 +597,135 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3344, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5406, 167, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1144395108]},
+ CellID->1150272475]},
"FCE"->{
- Cell[3977, 124, 281, 9, 27, "Input",
+ Cell[6040, 196, 281, 9, 27, "Input",
CellTags->"FCE",
CellID->2084841201],
- Cell[4261, 135, 606, 24, 42, "Output",
- CellTags->"FCE",
- CellID->32096658],
- Cell[4904, 164, 122, 4, 27, "Input",
+ Cell[6324, 207, 587, 23, 43, "Output",
+ CellTags->"FCE"],
+ Cell[6948, 235, 122, 4, 27, "Input",
CellTags->"FCE",
CellID->458931786],
- Cell[5029, 170, 297, 10, 49, "Output",
- CellTags->"FCE",
- CellID->1043906196],
- Cell[5363, 185, 456, 14, 27, "Input",
+ Cell[7073, 241, 276, 9, 51, "Output",
+ CellTags->"FCE"],
+ Cell[7386, 255, 456, 14, 27, "Input",
CellTags->"FCE",
CellID->2115567934],
- Cell[5822, 201, 1994, 83, 46, "Output",
- CellTags->"FCE",
- CellID->1056453085],
- Cell[7853, 289, 122, 4, 27, "Input",
+ Cell[7845, 271, 1734, 72, 42, "Output",
+ CellTags->"FCE"],
+ Cell[9616, 348, 122, 4, 27, "Input",
CellTags->"FCE",
CellID->811786447],
- Cell[7978, 295, 559, 17, 49, "Output",
- CellTags->"FCE",
- CellID->2003071088],
- Cell[8574, 317, 114, 4, 27, "Input",
+ Cell[9741, 354, 538, 16, 51, "Output",
+ CellTags->"FCE"],
+ Cell[10316, 375, 114, 4, 27, "Input",
CellTags->"FCE",
CellID->1616474928],
- Cell[8691, 323, 1716, 71, 46, "Output",
- CellTags->"FCE",
- CellID->1631220008],
- Cell[10444, 399, 121, 4, 27, "Input",
+ Cell[10433, 381, 1466, 60, 42, "Output",
+ CellTags->"FCE"],
+ Cell[11936, 446, 121, 4, 27, "Input",
CellTags->"FCE",
CellID->46978122],
- Cell[10568, 405, 999, 28, 101, "Output",
- CellTags->"FCE",
- CellID->394450163],
- Cell[11604, 438, 153, 5, 27, "Input",
+ Cell[12060, 452, 979, 27, 103, "Output",
+ CellTags->"FCE"],
+ Cell[13076, 484, 153, 5, 27, "Input",
CellTags->"FCE",
CellID->1508698339],
- Cell[11760, 445, 559, 17, 49, "Output",
- CellTags->"FCE",
- CellID->1313014770],
- Cell[12687, 485, 573, 21, 32, "Text",
- CellTags->"FCE",
- CellID->141332597]}
+ Cell[13232, 491, 538, 16, 51, "Output",
+ CellTags->"FCE"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15134, 554},
- {"FCE", 15264, 558}
+ {"PrimaryExamplesSection", 16554, 598},
+ {"FCE", 16685, 602}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3191, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 455, 13, 106, "Usage",
+Cell[3769, 101, 280, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4074, 116, 406, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3344, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4505, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1842947211],
+Cell[5247, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5281, 160, 76, 1, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5406, 167, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1144395108],
+ CellID->1150272475],
Cell[CellGroupData[{
-Cell[3757, 114, 195, 6, 25, "ExampleSection",
- CellID->761969732],
+Cell[5819, 186, 196, 6, 26, "ExampleSection",
+ CellID->1218642292],
Cell[CellGroupData[{
-Cell[3977, 124, 281, 9, 27, "Input",
+Cell[6040, 196, 281, 9, 27, "Input",
CellTags->"FCE",
CellID->2084841201],
-Cell[4261, 135, 606, 24, 42, "Output",
- CellTags->"FCE",
- CellID->32096658]
+Cell[6324, 207, 587, 23, 43, "Output",
+ CellTags->"FCE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4904, 164, 122, 4, 27, "Input",
+Cell[6948, 235, 122, 4, 27, "Input",
CellTags->"FCE",
CellID->458931786],
-Cell[5029, 170, 297, 10, 49, "Output",
- CellTags->"FCE",
- CellID->1043906196]
+Cell[7073, 241, 276, 9, 51, "Output",
+ CellTags->"FCE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5363, 185, 456, 14, 27, "Input",
+Cell[7386, 255, 456, 14, 27, "Input",
CellTags->"FCE",
CellID->2115567934],
-Cell[5822, 201, 1994, 83, 46, "Output",
- CellTags->"FCE",
- CellID->1056453085]
+Cell[7845, 271, 1734, 72, 42, "Output",
+ CellTags->"FCE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7853, 289, 122, 4, 27, "Input",
+Cell[9616, 348, 122, 4, 27, "Input",
CellTags->"FCE",
CellID->811786447],
-Cell[7978, 295, 559, 17, 49, "Output",
- CellTags->"FCE",
- CellID->2003071088]
+Cell[9741, 354, 538, 16, 51, "Output",
+ CellTags->"FCE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8574, 317, 114, 4, 27, "Input",
+Cell[10316, 375, 114, 4, 27, "Input",
CellTags->"FCE",
CellID->1616474928],
-Cell[8691, 323, 1716, 71, 46, "Output",
- CellTags->"FCE",
- CellID->1631220008]
+Cell[10433, 381, 1466, 60, 42, "Output",
+ CellTags->"FCE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10444, 399, 121, 4, 27, "Input",
+Cell[11936, 446, 121, 4, 27, "Input",
CellTags->"FCE",
CellID->46978122],
-Cell[10568, 405, 999, 28, 101, "Output",
- CellTags->"FCE",
- CellID->394450163]
+Cell[12060, 452, 979, 27, 103, "Output",
+ CellTags->"FCE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11604, 438, 153, 5, 27, "Input",
+Cell[13076, 484, 153, 5, 27, "Input",
CellTags->"FCE",
CellID->1508698339],
-Cell[11760, 445, 559, 17, 49, "Output",
- CellTags->"FCE",
- CellID->1313014770]
+Cell[13232, 491, 538, 16, 51, "Output",
+ CellTags->"FCE"]
}, Open ]]
}, Open ]],
-Cell[12346, 466, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13797, 511, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12414, 471, 270, 12, 31, "SeeAlsoSection",
+Cell[13865, 516, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12687, 485, 573, 21, 32, "Text",
- CellTags->"FCE",
- CellID->141332597]
+Cell[14138, 530, 538, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[13275, 509, 23, 0, 42, "FooterCell"]
+Cell[14691, 552, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCEnableTraditionalFormOutput.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCEnableTraditionalFormOutput.nb
new file mode 100644
index 000000000..188e703f0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCEnableTraditionalFormOutput.nb
@@ -0,0 +1,357 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10631, 347]
+NotebookOptionsPosition[ 7398, 253]
+NotebookOutlinePosition[ 9704, 313]
+CellTagsIndexPosition[ 9620, 308]
+WindowTitle->FCEnableTraditionalFormOutput
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"$FCTraditionalFormOutput\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/$FCTraditionalFormOutput"], \
+"\<\"FCDisableTraditionalFormOutput\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCDisableTraditionalFormOutput"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCEnableTraditionalFormOutput\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCEnableTraditionalFormOutput"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCEnableTraditionalFormOutput.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97506],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCEnableTraditionalFormOutput", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCEnableTraditionalFormOutput", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCEnableTraditionalFormOutput", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]sets the output format of the current FrontEnd to \
+TraditionalForm. The setting is not persistent, such that it does not \
+influence any subequent Mathematica FrontEnd sessions"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1738119036],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->460522737],
+
+Cell[BoxData[
+ RowBox[{"FCDisableTraditionalFormOutput", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1038938737],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->272206574],
+
+Cell[BoxData[
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Output",
+ ImageSize->{71, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->614182227]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"FCEnableTraditionalFormOutput", "[", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2126693435],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->502881580],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->642295632]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["$FCTraditionalFormOutput",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/$FCTraditionalFormOutput",
+ ButtonNote->"$FCTraditionalFormOutput"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCDisableTraditionalFormOutput",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCDisableTraditionalFormOutput",
+ ButtonNote->"FCDisableTraditionalFormOutput"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCEnableTraditionalFormOutput",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 57.518923}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCEnableTraditionalFormOutput[] sets the output format of the current \
+FrontEnd to TraditionalForm. The setting is not persistent, such that it does \
+not influence any subequent Mathematica FrontEnd sessions", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCEnableTraditionalFormOutput",
+ "titlemodifier" -> "", "windowtitle" -> "FCEnableTraditionalFormOutput",
+ "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCEnableTraditionalFormOutput"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4759, 133, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1738119036]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9476, 301}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[601, 21, 3294, 80, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3898, 103, 306, 11, 45, "ObjectNameGrid"],
+Cell[4207, 116, 527, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4759, 133, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1738119036],
+Cell[CellGroupData[{
+Cell[5172, 152, 195, 6, 26, "ExampleSection",
+ CellID->460522737],
+Cell[5370, 160, 122, 3, 27, "Input",
+ CellID->1038938737],
+Cell[CellGroupData[{
+Cell[5517, 167, 125, 4, 27, "Input",
+ CellID->272206574],
+Cell[5645, 173, 213, 7, 36, "Output",
+ CellID->614182227]
+}, Open ]],
+Cell[5873, 183, 121, 3, 27, "Input",
+ CellID->2126693435],
+Cell[CellGroupData[{
+Cell[6019, 190, 125, 4, 27, "Input",
+ CellID->502881580],
+Cell[6147, 196, 381, 16, 37, "Output",
+ CellID->642295632]
+}, Open ]]
+}, Open ]],
+Cell[6555, 216, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6623, 221, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[6896, 235, 460, 13, 57, "SeeAlso"]
+}, Open ]],
+Cell[7371, 251, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCF.nb
new file mode 100644
index 000000000..64e9f23b2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCF.nb
@@ -0,0 +1,164 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 5342, 155]
+NotebookOptionsPosition[ 3534, 105]
+NotebookOutlinePosition[ 5278, 152]
+CellTagsIndexPosition[ 5235, 149]
+WindowTitle->FCF
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCF\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCF"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCF.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$99718],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCF",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCF", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ "is a short form for FeynCalcForm[exp]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCF",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 3.392519}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "FCF[exp] is a short form for FeynCalcForm[exp].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCF", "titlemodifier" ->
+ "", "windowtitle" -> "FCF", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCF"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2265, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2843, 76, 280, 11, 70, "ObjectNameGrid"],
+Cell[3126, 89, 378, 12, 70, "Usage",
+ CellID->982511436],
+Cell[3507, 103, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFAConvert.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFAConvert.nb
new file mode 100644
index 000000000..a221f7977
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFAConvert.nb
@@ -0,0 +1,311 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9404, 301]
+NotebookOptionsPosition[ 6584, 217]
+NotebookOutlinePosition[ 8655, 273]
+CellTagsIndexPosition[ 8571, 268]
+WindowTitle->FCFAConvert
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCFAConvert\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCFAConvert"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCFAConvert.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$98396],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCFAConvert", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCFAConvert", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCFAConvert", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]converts a FeynArts amplitude to FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1355928475],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCFAConvert", "]"}]], "Input",
+ CellLabel->"In[73]:=",
+ CellID->1502581775],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"ChangeDimension", "\[Rule]", "False"}], ",",
+ RowBox[{"Contract", "\[Rule]", "False"}], ",",
+ RowBox[{"DropSumOver", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"IncomingMomenta", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"List", "\[Rule]", "True"}], ",",
+ RowBox[{"LoopMomenta", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"LorentzIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"OutgoingMomenta", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Prefactor", "\[Rule]", "1"}], ",",
+ RowBox[{"SMP", "\[Rule]", "False"}], ",",
+ RowBox[{"SUNFIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"SUNIndexNames", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"TransversePolarizationVectors", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"UndoChiralSplittings", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{557, 73},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[73]=",
+ CellID->339122017]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(0)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->67420831],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(0)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->461448620],
+
+Cell["\<\
+For examples on using FCFAConvert please examine the example calculations \
+shipped with FeynCalc.\
+\>", "Notes",
+ CellID->930737328]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCFAConvert",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 55, 59.987780}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCFAConvert[exp] converts a FeynArts amplitude to FeynCalc.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCFAConvert",
+ "titlemodifier" -> "", "windowtitle" -> "FCFAConvert", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCFAConvert"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5778, 180, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->67420831]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8429, 261}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2285, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2871, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3184, 91, 381, 11, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3590, 106, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1355928475],
+Cell[4332, 132, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4388, 136, 115, 3, 70, "Input",
+ CellID->1502581775],
+Cell[4506, 141, 1211, 32, 94, "Output",
+ CellID->339122017]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5778, 180, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->67420831],
+Cell[CellGroupData[{
+Cell[6189, 199, 195, 6, 26, "ExampleSection",
+ CellID->461448620],
+Cell[6387, 207, 143, 4, 49, "Notes",
+ CellID->930737328]
+}, Open ]]
+}, Open ]],
+Cell[6557, 215, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFADiracChainJoin.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFADiracChainJoin.nb
new file mode 100644
index 000000000..e2fe769c9
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFADiracChainJoin.nb
@@ -0,0 +1,977 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 28823, 967]
+NotebookOptionsPosition[ 24747, 849]
+NotebookOutlinePosition[ 27246, 910]
+CellTagsIndexPosition[ 27161, 905]
+WindowTitle->FCFADiracChainJoin
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracChain\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChain"], "\<\"DCHN\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DCHN"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndexDelta"], "\<\"DIDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DIDelta"], "\<\"DiracChainCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainCombine"], "\<\"DiracChainExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainExpand"], "\<\"DiracChainFactor\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainFactor"], "\<\"DiracChainJoin\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracChainJoin"], "\<\"FCCCT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCCCT"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCFADiracChainJoin\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCFADiracChainJoin"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCFADiracChainJoin.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$99268],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCFADiracChainJoin", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCFADiracChainJoin", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCFADiracChainJoin", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]processes the output of FeynArts (after FCFAConvert) \
+with explicit Dirac indices and joins matrices and spinors into closed \
+chains. This is necessary e.g. for models with 4-fermion operators, where \
+FeynArts cannot determine the correct relative signs. When two matrices have \
+a common index but the positions do not match, as in ",
+ Cell[BoxData[
+ RowBox[{
+ SubscriptBox["A", "ij"],
+ SubscriptBox["B", "ik"]}]], "InlineFormula"],
+ ", it is assumed that we can take the charge conjugate transposed of \
+either matrix to obtain, e.g. ",
+ Cell[BoxData[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ RowBox[{"C", " ",
+ SuperscriptBox["A", "T"],
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}], ")"}], "ji"],
+ SubscriptBox["B", "ik"]}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ RowBox[{"C", " ",
+ SuperscriptBox["B", "T"],
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}], ")"}], "ki"],
+ SubscriptBox["A", "ij"]}]], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->337961518],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCFADiracChainJoin", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->627296657],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"First", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{318, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->534360570]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->556431460],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1156856462],
+
+Cell["Create a closed chain for the 1-loop electron self-energy", \
+"ExampleText",
+ CellID->2049760779],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{"1", "/",
+ RowBox[{"(",
+ RowBox[{"16", " ",
+ RowBox[{"\[Pi]", "^", "4"}]}], ")"}]}], ")"}]}], " ", "I", " ",
+ RowBox[{"el", "^", "2"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}]}], ",", "me", ",", "1"}], "]"}], ",",
+ "Dir1"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",", "me", ",", "1"}], "]"}], ",",
+ "Dir2"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "Lor1", "]"}], ",", "Dir1", ",", "Dir3"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "Lor2", "]"}], ",", "Dir2", ",", "Dir4"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"me", "-",
+ RowBox[{"GSD", "[", "k", "]"}]}], ",", "Dir3", ",", "Dir4"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"k", ",", "me"}], "}"}], ",",
+ RowBox[{"k", "-", "q"}]}], "]"}], " ",
+ RowBox[{"MTD", "[",
+ RowBox[{"Lor1", ",", "Lor2"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->846878145],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["el", "2"], " ",
+ FormBox[
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["Lor1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor2",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["Lor1",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["Lor2",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"me", "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["me",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["Dir1",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["me",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["Dir2",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"16", " ",
+ SuperscriptBox["\[Pi]", "4"], " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k - $CellContext`q, D]]],
+ Editable->False]}]}], ")"}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{494, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->390335649]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"res", "=",
+ RowBox[{"FCFADiracChainJoin", "[", "%", "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->851451022],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["el", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["Lor1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["me",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["Lor2",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}], "+", "me"}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["Lor1",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["me",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{"16", " ",
+ SuperscriptBox["\[Pi]", "4"], " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{463, 48},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1005085356]
+}, Open ]],
+
+Cell["\<\
+Sometimes the ordering of the spinors is not the one wants to have. However, \
+we can always transpose the chains to reorder the spinors as we like, which \
+doesn't change the final result\
+\>", "ExampleText",
+ CellID->1333043386],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainTranspose", "[",
+ RowBox[{"res", ",",
+ RowBox[{"Select", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Spinor", "[", "__", "]"}], ",",
+ RowBox[{"Spinor", "[", "__", "]"}]}], "}"}], "}"}]}]}], "]"}]], "Input",\
+
+ CellLabel->"In[3]:=",
+ CellID->163807183],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["el", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["Lor1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Lor2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["me",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["Lor1",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"me", "-",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["Lor2",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["me",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{"16", " ",
+ SuperscriptBox["\[Pi]", "4"], " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{462, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->412221356]
+}, Open ]],
+
+Cell["\<\
+Using patterns in the Select option one can create very fine-grained criteria \
+for transposing the chains.\
+\>", "ExampleText",
+ CellID->1813732719]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCCCT",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCCT",
+ ButtonNote->"FCCCT"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCFADiracChainJoin",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 2.155941}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCFADiracChainJoin[exp] processes the output of FeynArts (after \
+FCFAConvert) with explicit Dirac indices and joins matrices and spinors into \
+closed chains. This is necessary e.g. for models with 4-fermion operators, \
+where FeynArts cannot determine the correct relative signs. When two matrices \
+have a common index but the positions do not match, as in Aij Bik, it is \
+assumed that we can take the charge conjugate transposed of either matrix to \
+obtain, e.g. (C A^T C -1) ji Bik or (C B^T C -1) ki Aij.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCFADiracChainJoin", "titlemodifier" -> "",
+ "windowtitle" -> "FCFADiracChainJoin", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCFADiracChainJoin"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7858, 231, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->556431460]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 27018, 898}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 3948, 91, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4541, 114, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4861, 129, 1484, 41, 162, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[6370, 174, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->337961518],
+Cell[7111, 200, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[7167, 204, 120, 3, 70, "Input",
+ CellID->627296657],
+Cell[7290, 209, 507, 15, 56, "Output",
+ CellID->534360570]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7858, 231, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->556431460],
+Cell[CellGroupData[{
+Cell[8270, 250, 196, 6, 26, "ExampleSection",
+ CellID->1156856462],
+Cell[8469, 258, 103, 2, 36, "ExampleText",
+ CellID->2049760779],
+Cell[CellGroupData[{
+Cell[8597, 264, 1310, 42, 79, "Input",
+ CellID->846878145],
+Cell[9910, 308, 5241, 182, 68, "Output",
+ CellID->390335649]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15188, 495, 139, 4, 27, "Input",
+ CellID->851451022],
+Cell[15330, 501, 3267, 114, 69, "Output",
+ CellID->1005085356]
+}, Open ]],
+Cell[18612, 618, 240, 5, 69, "ExampleText",
+ CellID->1333043386],
+Cell[CellGroupData[{
+Cell[18877, 627, 334, 11, 29, "Input",
+ CellID->163807183],
+Cell[19214, 640, 3215, 113, 68, "Output",
+ CellID->412221356]
+}, Open ]],
+Cell[22444, 756, 159, 4, 53, "ExampleText",
+ CellID->1813732719]
+}, Open ]],
+Cell[22618, 763, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[22686, 768, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[22959, 782, 1746, 62, 71, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[24720, 847, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFactorOut.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFactorOut.nb
new file mode 100644
index 000000000..979530f13
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCFactorOut.nb
@@ -0,0 +1,360 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10260, 350]
+NotebookOptionsPosition[ 7108, 255]
+NotebookOutlinePosition[ 9264, 312]
+CellTagsIndexPosition[ 9180, 307]
+WindowTitle->FCFactorOut
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCFactorOut\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCFactorOut"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCFactorOut.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$98823],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCFactorOut", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCFactorOut", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCFactorOut", "[",
+ RowBox[{"exp", ",", " ", "pref"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]factors out ",
+ Cell[BoxData["pref"], "InlineFormula"],
+ " out of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ". This is often need to bring ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " into a particular form that ",
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " refuses to give."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1773075832],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCFactorOut", "]"}]], "Input",
+ CellLabel->"In[49]:=",
+ CellID->618889336],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factoring", "\[Rule]", "Simplify"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{242, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[49]=",
+ CellID->1222881263]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->904291600],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1337039958],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCFactorOut", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"3", " ", "b"}]}], ")"}], ",",
+ RowBox[{"3", " ", "b"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->747205434],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"3", " ", "b", " ",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox["a",
+ RowBox[{"3", " ", "b"}]], "+", "1"}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{94, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->643352863]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCFactorOut", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"3", " ", "b"}]}], ")"}], ",",
+ RowBox[{"3", " ", "b"}], ",",
+ RowBox[{"Head", "\[Rule]", "hold"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1150995232],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"3", " ", "b", " ",
+ RowBox[{"hold", "(",
+ RowBox[{
+ FractionBox["a",
+ RowBox[{"3", " ", "b"}]], "+", "1"}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{121, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->354727358]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCFactorOut",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 1.029694}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCFactorOut[exp, pref] factors out pref out of exp. This is often need \
+to bring exp into a particular form that Mathematica refuses to give.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCFactorOut",
+ "titlemodifier" -> "", "windowtitle" -> "FCFactorOut", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCFactorOut"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5208, 169, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->904291600]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9037, 300}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2285, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2871, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3184, 91, 697, 21, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3906, 116, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1773075832],
+Cell[4648, 142, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4704, 146, 114, 3, 70, "Input",
+ CellID->618889336],
+Cell[4821, 151, 326, 11, 37, "Output",
+ CellID->1222881263]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5208, 169, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->904291600],
+Cell[CellGroupData[{
+Cell[5620, 188, 196, 6, 26, "ExampleSection",
+ CellID->1337039958],
+Cell[CellGroupData[{
+Cell[5841, 198, 229, 8, 27, "Input",
+ CellID->747205434],
+Cell[6073, 208, 322, 12, 54, "Output",
+ CellID->643352863]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6432, 225, 276, 9, 27, "Input",
+ CellID->1150995232],
+Cell[6711, 236, 331, 12, 54, "Output",
+ CellID->354727358]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7081, 253, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDimensions.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDimensions.nb
index 8d47166fc..d82ba8fca 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDimensions.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDimensions.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8736, 277]
-NotebookOptionsPosition[ 5600, 187]
-NotebookOutlinePosition[ 7956, 246]
-CellTagsIndexPosition[ 7872, 241]
+NotebookDataLength[ 10396, 354]
+NotebookOptionsPosition[ 7119, 255]
+NotebookOutlinePosition[ 9305, 313]
+CellTagsIndexPosition[ 9221, 308]
WindowTitle->FCGetDimensions
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FCGetDimensions.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$59327],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$100154],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCGetDimensions", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,18 +74,28 @@ FCGetDimensions.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCGetDimensions", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCGetDimensions", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"FCGetDimensions", "[", "expr", "]"}]], "InlineFormula"],
" \[LineSeparator]is an auxiliary function that determines the \
-dimensions \\in which 4-momenta and Dirac matrices of the given expression \
-are defined. The result is returned as a list, e.g. {4}, {D} or {4,D,D-4} \
-etc. This is useful if one want to be sure that all quantities inside a \
-particular expression are purely 4-dimensional or purely D-dimensional."
+dimensions in which 4-momenta and Dirac matrices of the given expression are \
+defined. "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -95,6 +106,63 @@ particular expression are purely 4-dimensional or purely D-dimensional."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2044233403],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The result is returned as a list, e.g. ",
+ Cell[BoxData[
+ RowBox[{"{", "4", "}"}]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{"{", "D", "}"}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"4", ",", "D", ",",
+ RowBox[{"D", "-", "4"}]}], "}"}]], "InlineFormula"],
+ " etc. "
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "This is useful if one wants to be sure that all quantities inside a \
+particular expression are purely ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional or purely ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional."
+}], "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -110,7 +178,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1252627147],
+ CellID->158367676],
Cell[CellGroupData[{
@@ -120,7 +188,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2109004658],
+ CellID->966743805],
Cell[CellGroupData[{
@@ -133,7 +201,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"{", "4", "}"}], TraditionalForm]], "Output",
- ImageSize->{26, 15},
+ ImageSize->{25, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[1]=",
@@ -151,7 +219,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"{", "D", "}"}], TraditionalForm]], "Output",
- ImageSize->{29, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[2]=",
@@ -174,7 +242,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"4", ",",
RowBox[{"D", "-", "4"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{70, 15},
+ ImageSize->{74, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[3]=",
@@ -187,8 +255,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCGetDimensions",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -197,25 +265,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 12.675205}",
+ "built" -> "{2020, 1, 5, 18, 56, 4.451963}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FCGetDimensions[expr] is an auxiliary function that determines the \
-dimensions \\in which 4-momenta and Dirac matrices of the given expression \
-are defined. The result is returned as a list, e.g. {4}, {D} or {4,D,D-4} \
-etc. This is useful if one want to be sure that all quantities inside a \
-particular expression are purely 4-dimensional or purely D-dimensional.",
- "synonyms" -> {}, "title" -> "FCGetDimensions", "titlemodifier" -> "",
- "windowtitle" -> "FCGetDimensions", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FCGetDimensions"}, "SearchTextTranslated" -> ""},
+dimensions in which 4-momenta and Dirac matrices of the given expression are \
+defined. ", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCGetDimensions",
+ "titlemodifier" -> "", "windowtitle" -> "FCGetDimensions", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCGetDimensions"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -223,8 +289,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -233,52 +300,62 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3638, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5159, 165, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1252627147]}
+ CellID->158367676]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7729, 234}
+ {"PrimaryExamplesSection", 9078, 301}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 2302, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 689, 15, 129, "Usage",
+Cell[2892, 76, 292, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3209, 91, 479, 13, 101, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3638, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3713, 108, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2044233403],
+Cell[4455, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4489, 136, 361, 14, 70, "Notes",
+ CellID->1067943069],
+Cell[4853, 152, 257, 7, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5159, 165, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1252627147],
+ CellID->158367676],
Cell[CellGroupData[{
-Cell[4051, 116, 196, 6, 25, "ExampleSection",
- CellID->2109004658],
+Cell[5571, 184, 195, 6, 26, "ExampleSection",
+ CellID->966743805],
Cell[CellGroupData[{
-Cell[4272, 126, 140, 4, 27, "Input",
+Cell[5791, 194, 140, 4, 27, "Input",
CellID->794908219],
-Cell[4415, 132, 210, 7, 36, "Output",
+Cell[5934, 200, 210, 7, 35, "Output",
CellID->2110485460]
}, Open ]],
Cell[CellGroupData[{
-Cell[4662, 144, 141, 4, 27, "Input",
+Cell[6181, 212, 141, 4, 27, "Input",
CellID->166685856],
-Cell[4806, 150, 210, 7, 36, "Output",
+Cell[6325, 218, 210, 7, 35, "Output",
CellID->1698743533]
}, Open ]],
Cell[CellGroupData[{
-Cell[5053, 162, 219, 7, 27, "Input",
+Cell[6572, 230, 219, 7, 27, "Input",
CellID->396565854],
-Cell[5275, 171, 259, 9, 36, "Output",
+Cell[6794, 239, 259, 9, 35, "Output",
CellID->1155109353]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5573, 185, 23, 0, 42, "FooterCell"]
+Cell[7092, 253, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDiracGammaScheme.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDiracGammaScheme.nb
new file mode 100644
index 000000000..582b84505
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetDiracGammaScheme.nb
@@ -0,0 +1,426 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11961, 416]
+NotebookOptionsPosition[ 8368, 304]
+NotebookOutlinePosition[ 10526, 361]
+CellTagsIndexPosition[ 10441, 356]
+WindowTitle->FCGetDiracGammaScheme
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCSetDiracGammaScheme\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCSetDiracGammaScheme"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCGetDiracGammaScheme\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCGetDiracGammaScheme"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCGetDiracGammaScheme.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$100586],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCGetDiracGammaScheme", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCGetDiracGammaScheme", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCGetDiracGammaScheme", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator] shows the currently used scheme for handling Dirac \
+matrices in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " dimensions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->676800887],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->243180492],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1255432024],
+
+Cell[BoxData[
+ FormBox["\<\"BMHV\"\>", TraditionalForm]], "Output",
+ ImageSize->{47, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->194332146]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGetDiracGammaScheme", "[", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2114804275],
+
+Cell[BoxData[
+ FormBox["\<\"BMHV\"\>", TraditionalForm]], "Output",
+ ImageSize->{47, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1670408026]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "FullForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->457303046],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ StyleBox["\"\\"",
+ ShowSpecialCharacters->False,
+ ShowStringCharacters->True,
+ NumberMarks->True],
+ FullForm], TraditionalForm]], "Output",
+ ImageSize->{59, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//FullForm=",
+ CellID->1572430226]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->823869442],
+
+Cell[BoxData[
+ FormBox["\<\"NDR\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1801779332]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGetDiracGammaScheme", "[", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1234674201],
+
+Cell[BoxData[
+ FormBox["\<\"NDR\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->549786237]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "FullForm"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1736915585],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ StyleBox["\"\\"",
+ ShowSpecialCharacters->False,
+ ShowStringCharacters->True,
+ NumberMarks->True],
+ FullForm], TraditionalForm]], "Output",
+ ImageSize->{47, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//FullForm=",
+ CellID->1209449234]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCSetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCGetDiracGammaScheme",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 5.629431}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCGetDiracGammaScheme[] shows the currently used scheme for handling \
+Dirac matrices in D dimensions.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCGetDiracGammaScheme", "titlemodifier" -> "", "windowtitle" ->
+ "FCGetDiracGammaScheme", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCGetDiracGammaScheme"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4572, 130, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->676800887]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10298, 349}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[593, 21, 3179, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3775, 99, 298, 11, 45, "ObjectNameGrid"],
+Cell[4076, 112, 471, 14, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4572, 130, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->676800887],
+Cell[CellGroupData[{
+Cell[4984, 149, 195, 6, 26, "ExampleSection",
+ CellID->243180492],
+Cell[CellGroupData[{
+Cell[5204, 159, 129, 3, 27, "Input",
+ CellID->1255432024],
+Cell[5336, 164, 197, 6, 35, "Output",
+ CellID->194332146]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5570, 175, 113, 3, 27, "Input",
+ CellID->2114804275],
+Cell[5686, 180, 198, 6, 35, "Output",
+ CellID->1670408026]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5921, 191, 100, 3, 27, "Input",
+ CellID->457303046],
+Cell[6024, 196, 335, 12, 50, "Output",
+ CellID->1572430226]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6396, 213, 127, 3, 27, "Input",
+ CellID->823869442],
+Cell[6526, 218, 197, 6, 35, "Output",
+ CellID->1801779332]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6760, 229, 113, 3, 27, "Input",
+ CellID->1234674201],
+Cell[6876, 234, 196, 6, 35, "Output",
+ CellID->549786237]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7109, 245, 101, 3, 27, "Input",
+ CellID->1736915585],
+Cell[7213, 250, 334, 12, 50, "Output",
+ CellID->1209449234]
+}, Open ]]
+}, Open ]],
+Cell[7574, 266, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7642, 271, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[7915, 285, 411, 14, 70, "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+Cell[8341, 302, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetMetricSignature.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetMetricSignature.nb
new file mode 100644
index 000000000..71798b938
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetMetricSignature.nb
@@ -0,0 +1,301 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9183, 291]
+NotebookOptionsPosition[ 6211, 207]
+NotebookOutlinePosition[ 8505, 266]
+CellTagsIndexPosition[ 8421, 261]
+WindowTitle->FCGetMetricSignature
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCSetMetricSignature\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCSetMetricSignature"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCGetMetricSignature\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCGetMetricSignature"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCGetMetricSignature.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$101025],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCGetMetricSignature", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCGetMetricSignature", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCGetMetricSignature", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator] returns the signature of the Minkowski metric used \
+when working with Cartesian objects, like CartesianPair, CartesianIndex, \
+CartesianMomentum etc. {1,-1} corresponds to (1,-1,-1,-1) and {-1,1} means \
+(-1, 1, 1, 1)."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1032740090],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->426070038],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGetMetricSignature", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1470394767],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{50, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1256978127]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCSetMetricSignature",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetMetricSignature",
+ ButtonNote->"FCSetMetricSignature"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->611711580]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCGetMetricSignature",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 6.818436}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCGetMetricSignature[] returns the signature of the Minkowski metric \
+used when working with Cartesian objects, like CartesianPair, CartesianIndex, \
+CartesianMomentum etc. {1,-1} corresponds to (1,-1,-1,-1) and {-1,1} means \
+(-1, 1, 1, 1).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCGetMetricSignature", "titlemodifier" -> "", "windowtitle" ->
+ "FCGetMetricSignature", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCGetMetricSignature"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4556, 128, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1032740090]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8277, 254}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 3075, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3670, 97, 297, 11, 45, "ObjectNameGrid"],
+Cell[3970, 110, 561, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4556, 128, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1032740090],
+Cell[CellGroupData[{
+Cell[4969, 147, 195, 6, 26, "ExampleSection",
+ CellID->426070038],
+Cell[CellGroupData[{
+Cell[5189, 157, 112, 3, 27, "Input",
+ CellID->1470394767],
+Cell[5304, 162, 254, 9, 35, "Output",
+ CellID->1256978127]
+}, Open ]]
+}, Open ]],
+Cell[5585, 175, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5653, 180, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[5926, 194, 243, 8, 56, "SeeAlso",
+ CellID->611711580]
+}, Open ]],
+Cell[6184, 205, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetNotebookDirectory.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetNotebookDirectory.nb
new file mode 100644
index 000000000..6267c60bc
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetNotebookDirectory.nb
@@ -0,0 +1,168 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 5788, 159]
+NotebookOptionsPosition[ 3762, 106]
+NotebookOutlinePosition[ 5724, 156]
+CellTagsIndexPosition[ 5681, 153]
+WindowTitle->FCGetNotebookDirectory
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCGetNotebookDirectory\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCGetNotebookDirectory"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCGetNotebookDirectory.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$101457],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCGetNotebookDirectory", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCGetNotebookDirectory", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCGetNotebookDirectory", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator] is a convenience function that returns the directory \
+in which the current notebook or .m file is located. It also works when the \
+FrontEnd is not available."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCGetNotebookDirectory",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 7.930446}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCGetNotebookDirectory[] is a convenience function that returns the \
+directory in which the current notebook or .m file is located. It also works \
+when the FrontEnd is not available.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCGetNotebookDirectory", "titlemodifier" -> "", "windowtitle" ->
+ "FCGetNotebookDirectory", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCGetNotebookDirectory"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[594, 21, 2330, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2927, 76, 299, 11, 70, "ObjectNameGrid"],
+Cell[3229, 89, 503, 13, 70, "Usage",
+ CellID->982511436],
+Cell[3735, 104, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetPauliSigmaScheme.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetPauliSigmaScheme.nb
new file mode 100644
index 000000000..f0ab88aa0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGetPauliSigmaScheme.nb
@@ -0,0 +1,360 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10627, 350]
+NotebookOptionsPosition[ 7505, 258]
+NotebookOutlinePosition[ 9662, 315]
+CellTagsIndexPosition[ 9578, 310]
+WindowTitle->FCGetPauliSigmaScheme
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"], "\<\"FCSetPauliSigmaScheme\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCSetPauliSigmaScheme"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCGetPauliSigmaScheme\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCGetPauliSigmaScheme"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCGetPauliSigmaScheme.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$101896],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCGetPauliSigmaScheme", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCGetPauliSigmaScheme", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCGetPauliSigmaScheme", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]shows currently used scheme for handling Pauli \
+matrices in ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ " dimensions"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1836078431],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "For more details, see the documentation of ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FCSetPauliSigmaScheme"]],
+ "paclet:FeynCalc/ref/FCSetPauliSigmaScheme"},
+ "RefLink",
+ BaseStyle->"InlineFunctionSans"]], "InlineFunctionSans"]
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1080118601],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->793943167],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGetPauliSigmaScheme", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1767975087],
+
+Cell[BoxData[
+ FormBox["\<\"None\"\>", TraditionalForm]], "Output",
+ ImageSize->{36, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->941509681]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCSetPauliSigmaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetPauliSigmaScheme",
+ ButtonNote->"FCSetPauliSigmaScheme"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCGetPauliSigmaScheme",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 8.808830}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCGetPauliSigmaScheme[] shows currently used scheme for handling Pauli \
+matrices in D - 1 dimensions", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCGetPauliSigmaScheme", "titlemodifier" -> "", "windowtitle" ->
+ "FCGetPauliSigmaScheme", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCGetPauliSigmaScheme"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5738, 176, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1080118601]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9434, 303}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[593, 21, 3179, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3775, 99, 298, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4098, 114, 492, 15, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4615, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1836078431],
+Cell[5357, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5391, 161, 298, 9, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5738, 176, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1080118601],
+Cell[CellGroupData[{
+Cell[6151, 195, 195, 6, 26, "ExampleSection",
+ CellID->793943167],
+Cell[CellGroupData[{
+Cell[6371, 205, 113, 3, 27, "Input",
+ CellID->1767975087],
+Cell[6487, 210, 197, 6, 35, "Output",
+ CellID->941509681]
+}, Open ]]
+}, Open ]],
+Cell[6711, 220, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6779, 225, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[7052, 239, 411, 14, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[7478, 256, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGramDeterminant.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGramDeterminant.nb
new file mode 100644
index 000000000..d72b6d89a
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGramDeterminant.nb
@@ -0,0 +1,720 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19917, 710]
+NotebookOptionsPosition[ 16540, 608]
+NotebookOutlinePosition[ 18698, 665]
+CellTagsIndexPosition[ 18613, 660]
+WindowTitle->FCGramDeterminant
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCGramMatrix\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCGramMatrix"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCGramDeterminant\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCGramDeterminant"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCGramDeterminant.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$102333],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCGramDeterminant", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCGramDeterminant", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCGramDeterminant", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]computes the determinant of the Gram matrix created \
+from the given list of momenta."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->942693365],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCGramDeterminant", "]"}]], "Input",
+ CellLabel->"In[822]:=",
+ CellID->946524240],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Pair", ",", "Momentum"}], "}"}]}], ",",
+ RowBox[{"Prefactor", "\[Rule]", "2"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{428, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[822]=",
+ CellID->664906942]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->938469830],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->315555836],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGramDeterminant", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1541349942],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{637, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->477443900]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGramDeterminant", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"CartesianPair", ",", "CartesianMomentum"}], "}"}]}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->385771881],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{445, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1559843658]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCGramMatrix",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGramMatrix",
+ ButtonNote->"FCGramMatrix"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1187943367]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCGramDeterminant",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 9.957812}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCGramDeterminant[{p1, p2, ...}] computes the determinant of the Gram \
+matrix created from the given list of momenta.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCGramDeterminant", "titlemodifier" -> "",
+ "windowtitle" -> "FCGramDeterminant", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCGramDeterminant"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6010, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->938469830]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 18470, 653}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 3047, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3639, 97, 294, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3958, 112, 499, 14, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4482, 130, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->942693365],
+Cell[5223, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5279, 160, 121, 3, 70, "Input",
+ CellID->946524240],
+Cell[5403, 165, 546, 16, 56, "Output",
+ CellID->664906942]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6010, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->938469830],
+Cell[CellGroupData[{
+Cell[6422, 207, 195, 6, 26, "ExampleSection",
+ CellID->315555836],
+Cell[CellGroupData[{
+Cell[6642, 217, 174, 5, 27, "Input",
+ CellID->1541349942],
+Cell[6819, 224, 3582, 138, 42, "Output",
+ CellID->477443900]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10438, 367, 383, 11, 45, "Input",
+ CellID->385771881],
+Cell[10824, 380, 5086, 192, 66, "Output",
+ CellID->1559843658]
+}, Open ]]
+}, Open ]],
+Cell[15937, 576, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16005, 581, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[16278, 595, 220, 8, 56, "SeeAlso",
+ CellID->1187943367]
+}, Open ]],
+Cell[16513, 606, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGramMatrix.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGramMatrix.nb
new file mode 100644
index 000000000..d08b4838c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCGramMatrix.nb
@@ -0,0 +1,1171 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 31797, 1161]
+NotebookOptionsPosition[ 28003, 1041]
+NotebookOutlinePosition[ 30105, 1098]
+CellTagsIndexPosition[ 30019, 1093]
+WindowTitle->FCGramMatrix
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCGramDeterminant\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCGramDeterminant"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCGramMatrix\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCGramMatrix"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCGramMatrix.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$102771],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCGramMatrix", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCGramMatrix", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCGramMatrix", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ "creates Gram matrix from the given list of momenta."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2082908633],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCGramMatrix", "]"}]], "Input",
+ CellLabel->"In[210]:=",
+ CellID->631629911],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Pair", ",", "Momentum"}], "}"}]}], ",",
+ RowBox[{"Prefactor", "\[Rule]", "2"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{528, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[210]=",
+ CellID->924279704]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1656134055],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->525944430],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGramMatrix", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->946770183],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]},
+ {
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{164, 37},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1292153893]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGramMatrix", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1905511054],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]},
+ {
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]},
+ {
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{238, 57},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->986944060]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGramMatrix", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"CartesianPair", ",", "CartesianMomentum"}], "}"}]}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1695900620],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]},
+ {
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]},
+ {
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}]}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{250, 57},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1382866416]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Det", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1020838088],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{445, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->85112171]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGramDeterminant", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"CartesianPair", ",", "CartesianMomentum"}], "}"}]}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1026798352],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p3",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{445, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1684626539]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCGramDeterminant",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGramDeterminant",
+ ButtonNote->"FCGramDeterminant"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1187943367]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCGramMatrix",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 11.161244}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCGramMatrix[{p1, p2, ...}] creates Gram matrix from the given list of \
+momenta.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCGramMatrix",
+ "titlemodifier" -> "", "windowtitle" -> "FCGramMatrix", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCGramMatrix"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5894, 187, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1656134055]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 29875, 1086}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[584, 21, 3037, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3624, 97, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3938, 112, 469, 14, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4432, 130, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2082908633],
+Cell[5174, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5230, 160, 116, 3, 70, "Input",
+ CellID->631629911],
+Cell[5349, 165, 484, 15, 37, "Output",
+ CellID->924279704]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5894, 187, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1656134055],
+Cell[CellGroupData[{
+Cell[6307, 206, 195, 6, 26, "ExampleSection",
+ CellID->525944430],
+Cell[CellGroupData[{
+Cell[6527, 216, 157, 5, 27, "Input",
+ CellID->946770183],
+Cell[6687, 223, 1658, 59, 58, "Output",
+ CellID->1292153893]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8382, 287, 169, 5, 27, "Input",
+ CellID->1905511054],
+Cell[8554, 294, 3192, 118, 78, "Output",
+ CellID->986944060]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11783, 417, 379, 11, 45, "Input",
+ CellID->1695900620],
+Cell[12165, 430, 4459, 163, 78, "Output",
+ CellID->1382866416]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16661, 598, 100, 3, 27, "Input",
+ CellID->1020838088],
+Cell[16764, 603, 5084, 192, 66, "Output",
+ CellID->85112171]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[21885, 800, 384, 11, 45, "Input",
+ CellID->1026798352],
+Cell[22272, 813, 5086, 192, 66, "Output",
+ CellID->1684626539]
+}, Open ]]
+}, Open ]],
+Cell[27385, 1009, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[27453, 1014, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[27726, 1028, 235, 8, 56, "SeeAlso",
+ CellID->1187943367]
+}, Open ]],
+Cell[27976, 1039, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCHN.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCHN.nb
new file mode 100644
index 000000000..ae41520a2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCHN.nb
@@ -0,0 +1,788 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19777, 778]
+NotebookOptionsPosition[ 15270, 630]
+NotebookOutlinePosition[ 17351, 686]
+CellTagsIndexPosition[ 17266, 681]
+WindowTitle->FCHN
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCHN\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCHN"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCHN.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104539],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCHN",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCHN", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a chain of Dirac matrices x and is transformed into \
+FermionicChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->361182983],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1795734793],
+
+Cell["A standalone Dirac matrix with open Dirac indices", "Notes",
+ CellID->562724937],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ",", "i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->883461262],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{56, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1366821851]
+}, Open ]],
+
+Cell["A chain of Dirac matrices with open Dirac indices", "Notes",
+ CellID->1618780636],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}],
+ "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2010253364],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{78, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->782904144]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData[
+ OverscriptBox["u", "-"]], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->1250331575],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1134519360],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{86, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1410852026]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData[
+ OverscriptBox["v", "-"]], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->63600432],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->443709048],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{86, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->87501366]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->1458298795],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{"i", ",",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->791949561],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{84, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->450133123]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->2030312156],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{"i", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->227593440],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{84, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1554163657]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData[
+ OverscriptBox["u", "-"]], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1268031370],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1380755633],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{132, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->404025824]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData[
+ OverscriptBox["v", "-"]], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->867998080],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1948837227],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{132, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1888289142]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1238042528],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1936823151],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{129, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->658668713]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1861495104],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1335889439],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{129, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->2035121680]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCHN",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2019, 3, 29, 17, 48, 14.034249}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCHN[x, i, j] is a chain of Dirac matrices x and is transformed into \
+FermionicChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCHN", "titlemodifier" ->
+ "", "windowtitle" -> "FCHN", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCHN"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3641, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->361182983]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 17123, 674}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2257, 53, 50, "AnchorBarGrid",
+ CellID->1],
+Cell[2836, 76, 281, 11, 44, "ObjectNameGrid"],
+Cell[3120, 89, 496, 13, 99, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3641, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->361182983],
+Cell[CellGroupData[{
+Cell[4053, 125, 196, 6, 25, "ExampleSection",
+ CellID->1795734793],
+Cell[4252, 133, 86, 1, 31, "Notes",
+ CellID->562724937],
+Cell[CellGroupData[{
+Cell[4363, 138, 168, 5, 27, "Input",
+ CellID->883461262],
+Cell[4534, 145, 599, 26, 40, "Output",
+ CellID->1366821851]
+}, Open ]],
+Cell[5148, 174, 87, 1, 31, "Notes",
+ CellID->1618780636],
+Cell[CellGroupData[{
+Cell[5260, 179, 233, 8, 27, "Input",
+ CellID->2010253364],
+Cell[5496, 189, 801, 34, 40, "Output",
+ CellID->782904144]
+}, Open ]],
+Cell[6312, 226, 160, 6, 31, "Notes",
+ CellID->1250331575],
+Cell[CellGroupData[{
+Cell[6497, 236, 187, 6, 27, "Input",
+ CellID->1134519360],
+Cell[6687, 244, 487, 20, 38, "Output",
+ CellID->1410852026]
+}, Open ]],
+Cell[7189, 267, 158, 6, 31, "Notes",
+ CellID->63600432],
+Cell[CellGroupData[{
+Cell[7372, 277, 186, 6, 27, "Input",
+ CellID->443709048],
+Cell[7561, 285, 485, 20, 38, "Output",
+ CellID->87501366]
+}, Open ]],
+Cell[8061, 308, 137, 5, 31, "Notes",
+ CellID->1458298795],
+Cell[CellGroupData[{
+Cell[8223, 317, 183, 6, 27, "Input",
+ CellID->791949561],
+Cell[8409, 325, 459, 19, 38, "Output",
+ CellID->450133123]
+}, Open ]],
+Cell[8883, 347, 137, 5, 31, "Notes",
+ CellID->2030312156],
+Cell[CellGroupData[{
+Cell[9045, 356, 183, 6, 27, "Input",
+ CellID->227593440],
+Cell[9231, 364, 460, 19, 38, "Output",
+ CellID->1554163657]
+}, Open ]],
+Cell[9706, 386, 169, 6, 31, "Notes",
+ CellID->1268031370],
+Cell[CellGroupData[{
+Cell[9900, 396, 293, 9, 27, "Input",
+ CellID->1380755633],
+Cell[10196, 407, 899, 37, 40, "Output",
+ CellID->404025824]
+}, Open ]],
+Cell[11110, 447, 168, 6, 31, "Notes",
+ CellID->867998080],
+Cell[CellGroupData[{
+Cell[11303, 457, 293, 9, 27, "Input",
+ CellID->1948837227],
+Cell[11599, 468, 900, 37, 40, "Output",
+ CellID->1888289142]
+}, Open ]],
+Cell[12514, 508, 146, 5, 31, "Notes",
+ CellID->1238042528],
+Cell[CellGroupData[{
+Cell[12685, 517, 290, 9, 27, "Input",
+ CellID->1936823151],
+Cell[12978, 528, 872, 36, 38, "Output",
+ CellID->658668713]
+}, Open ]],
+Cell[13865, 567, 146, 5, 31, "Notes",
+ CellID->1861495104],
+Cell[CellGroupData[{
+Cell[14036, 576, 291, 9, 27, "Input",
+ CellID->1335889439],
+Cell[14330, 587, 874, 36, 38, "Output",
+ CellID->2035121680]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[15243, 628, 23, 0, 40, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCHideEpsilon.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCHideEpsilon.nb
new file mode 100644
index 000000000..b3dd9ee73
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCHideEpsilon.nb
@@ -0,0 +1,468 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12921, 458]
+NotebookOptionsPosition[ 9208, 339]
+NotebookOutlinePosition[ 11320, 396]
+CellTagsIndexPosition[ 11235, 391]
+WindowTitle->FCHideEpsilon
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCHideEpsilon\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCHideEpsilon"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCHideEpsilon.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$103207],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCHideEpsilon", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCHideEpsilon", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCHideEpsilon", "[", "expr", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitutes ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "Epsilon"}], " ", "-", " ", "EulerGamma", " ", "+",
+ " ",
+ RowBox[{"Log", "[",
+ RowBox[{"4", "Pi"}], "]"}]}]], "InlineFormula"],
+ " with ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"]
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1137093577],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCHideEpsilon", "]"}]], "Input",
+ CellLabel->"In[17]:=",
+ CellID->875137331],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"D", "\[Rule]",
+ RowBox[{"4", "-",
+ RowBox[{"2", " ",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]}]}]}], ",",
+ RowBox[{"Subtract", "\[Rule]",
+ RowBox[{
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "-",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{484, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[17]=",
+ CellID->1011910224]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1246769443],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->986467167],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "Epsilon"}], "+",
+ RowBox[{"Log", "[",
+ RowBox[{"4", "Pi"}], "]"}], "-", "EulerGamma"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->689856247],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]], "-",
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "+",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{112, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1799260438]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHideEpsilon", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->797045486],
+
+Cell[BoxData[
+ FormBox["\<\"\[CapitalDelta]\"\>", TraditionalForm]], "Output",
+ ImageSize->{15, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1721094091]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "EpsilonUV"}], "+",
+ RowBox[{"Log", "[",
+ RowBox[{"4", "Pi"}], "]"}], "-", "EulerGamma"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->683090948],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ SubscriptBox["\[CurlyEpsilon]", "UV"]], "-",
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "+",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{128, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1053040782]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHideEpsilon", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1248592482],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[CapitalDelta]", "UV"], TraditionalForm]], "Output",
+ ImageSize->{31, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->614374293]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "EpsilonIR"}], "+",
+ RowBox[{"Log", "[",
+ RowBox[{"4", "Pi"}], "]"}], "-", "EulerGamma"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->2072723527],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ SubscriptBox["\[CurlyEpsilon]", "IR"]], "-",
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "+",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{123, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->775606093]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCHideEpsilon", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->577739633],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[CapitalDelta]", "IR"], TraditionalForm]], "Output",
+ ImageSize->{26, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1128425775]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"FCHideEpsilon",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 12.433420}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCHideEpsilon[expr] substitutes 1/Epsilon - EulerGamma + Log[4 Pi] with \
+SMP[\"Delta\"]", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCHideEpsilon", "titlemodifier" -> "", "windowtitle" -> "FCHideEpsilon",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCHideEpsilon"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5544, 179, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1246769443]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11091, 384}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3197, 91, 667, 20, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3889, 115, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1137093577],
+Cell[4631, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4687, 145, 116, 3, 70, "Input",
+ CellID->875137331],
+Cell[4806, 150, 677, 22, 37, "Output",
+ CellID->1011910224]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5544, 179, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1246769443],
+Cell[CellGroupData[{
+Cell[5957, 198, 195, 6, 26, "ExampleSection",
+ CellID->986467167],
+Cell[CellGroupData[{
+Cell[6177, 208, 190, 6, 27, "Input",
+ CellID->689856247],
+Cell[6370, 216, 408, 14, 56, "Output",
+ CellID->1799260438]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6815, 235, 109, 3, 27, "Input",
+ CellID->797045486],
+Cell[6927, 240, 209, 6, 35, "Output",
+ CellID->1721094091]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7173, 251, 192, 6, 27, "Input",
+ CellID->683090948],
+Cell[7368, 259, 398, 13, 59, "Output",
+ CellID->1053040782]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7803, 277, 110, 3, 27, "Input",
+ CellID->1248592482],
+Cell[7916, 282, 223, 7, 37, "Output",
+ CellID->614374293]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8176, 294, 193, 6, 27, "Input",
+ CellID->2072723527],
+Cell[8372, 302, 397, 13, 59, "Output",
+ CellID->775606093]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8806, 320, 109, 3, 27, "Input",
+ CellID->577739633],
+Cell[8918, 325, 224, 7, 37, "Output",
+ CellID->1128425775]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9181, 337, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCI.nb
index b93a6dd74..335869208 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCI.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16422, 602]
-NotebookOptionsPosition[ 11907, 450]
-NotebookOutlinePosition[ 14919, 541]
-CellTagsIndexPosition[ 14812, 535]
+NotebookDataLength[ 16703, 596]
+NotebookOptionsPosition[ 12489, 459]
+NotebookOutlinePosition[ 15351, 543]
+CellTagsIndexPosition[ 15244, 537]
WindowTitle->FCI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FCI.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$59669],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FeynCalcInternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcInternal"], "\<\"FCE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$103649],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->370350899],
+ CellID->832557140],
Cell[CellGroupData[{
@@ -118,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1640505337],
+ CellID->249558270],
Cell[CellGroupData[{
@@ -182,46 +218,35 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ",",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ",",
- FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCI",
- CellLabel->"Out[1]=",
- CellID->290735342]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -244,12 +269,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCI",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1941338896]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -295,43 +319,32 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ",",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], ",",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ TraditionalForm]}]], ",",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCI",
- CellLabel->"Out[3]=",
- CellID->1585911965]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -365,12 +378,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}], "}"}]], "Output",
- ImageSize->{521, 67},
+ ImageSize->{523, 67},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCI",
- CellLabel->"Out[4]//StandardForm=",
- CellID->653246170]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -394,12 +406,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FCI",
- CellLabel->"Out[5]//StandardForm=",
- CellID->2132613884]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -441,9 +452,7 @@ Cell[TextData[{
ButtonNote->"FCE"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCI",
- CellID->794130940]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -451,7 +460,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCI",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -460,10 +469,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 14.195999}",
+ "built" -> "{2020, 1, 5, 18, 56, 13.648496}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -471,11 +480,11 @@ TaggingRules->{
"None", "summary" ->
"FCI[exp] translates exp into the internal FeynCalc \
(datatype-)representation.FCI is equivalent to FeynCalcInternal.",
- "synonyms" -> {}, "title" -> "FCI", "titlemodifier" -> "", "windowtitle" ->
- "FCI", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCI"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCI", "titlemodifier" ->
+ "", "windowtitle" -> "FCI", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCI"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -483,8 +492,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -493,117 +503,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3337, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4526, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->370350899]},
+ CellID->832557140]},
"FCI"->{
- Cell[3970, 124, 455, 14, 27, "Input",
+ Cell[5158, 160, 455, 14, 27, "Input",
CellTags->"FCI",
CellID->714358706],
- Cell[4428, 140, 1993, 83, 46, "Output",
- CellTags->"FCI",
- CellID->290735342],
- Cell[6458, 228, 122, 4, 27, "Input",
+ Cell[5616, 176, 1734, 72, 42, "Output",
+ CellTags->"FCI"],
+ Cell[7387, 253, 122, 4, 27, "Input",
CellTags->"FCI",
CellID->384617007],
- Cell[6583, 234, 559, 17, 49, "Output",
- CellTags->"FCI",
- CellID->1941338896],
- Cell[7179, 256, 113, 4, 27, "Input",
+ Cell[7512, 259, 538, 16, 51, "Output",
+ CellTags->"FCI"],
+ Cell[8087, 280, 113, 4, 27, "Input",
CellTags->"FCI",
CellID->808180913],
- Cell[7295, 262, 1716, 71, 46, "Output",
- CellTags->"FCI",
- CellID->1585911965],
- Cell[9048, 338, 122, 4, 27, "Input",
+ Cell[8203, 286, 1466, 60, 42, "Output",
+ CellTags->"FCI"],
+ Cell[9706, 351, 122, 4, 27, "Input",
CellTags->"FCI",
CellID->986821422],
- Cell[9173, 344, 999, 28, 101, "Output",
- CellTags->"FCI",
- CellID->653246170],
- Cell[10209, 377, 153, 5, 27, "Input",
+ Cell[9831, 357, 979, 27, 103, "Output",
+ CellTags->"FCI"],
+ Cell[10847, 389, 153, 5, 27, "Input",
CellTags->"FCI",
CellID->1427781639],
- Cell[10365, 384, 559, 17, 49, "Output",
- CellTags->"FCI",
- CellID->2132613884],
- Cell[11292, 424, 573, 21, 70, "Text",
- CellTags->"FCI",
- CellID->794130940]}
+ Cell[11003, 396, 538, 16, 51, "Output",
+ CellTags->"FCI"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13736, 494},
- {"FCI", 13865, 498}
+ {"PrimaryExamplesSection", 14363, 504},
+ {"FCI", 14493, 508}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3192, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 448, 13, 98, "Usage",
+Cell[3770, 101, 280, 11, 45, "ObjectNameGrid"],
+Cell[4053, 114, 448, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3337, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4526, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->370350899],
+ CellID->832557140],
Cell[CellGroupData[{
-Cell[3749, 114, 196, 6, 25, "ExampleSection",
- CellID->1640505337],
+Cell[4938, 150, 195, 6, 26, "ExampleSection",
+ CellID->249558270],
Cell[CellGroupData[{
-Cell[3970, 124, 455, 14, 27, "Input",
+Cell[5158, 160, 455, 14, 27, "Input",
CellTags->"FCI",
CellID->714358706],
-Cell[4428, 140, 1993, 83, 46, "Output",
- CellTags->"FCI",
- CellID->290735342]
+Cell[5616, 176, 1734, 72, 42, "Output",
+ CellTags->"FCI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6458, 228, 122, 4, 27, "Input",
+Cell[7387, 253, 122, 4, 27, "Input",
CellTags->"FCI",
CellID->384617007],
-Cell[6583, 234, 559, 17, 49, "Output",
- CellTags->"FCI",
- CellID->1941338896]
+Cell[7512, 259, 538, 16, 51, "Output",
+ CellTags->"FCI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7179, 256, 113, 4, 27, "Input",
+Cell[8087, 280, 113, 4, 27, "Input",
CellTags->"FCI",
CellID->808180913],
-Cell[7295, 262, 1716, 71, 46, "Output",
- CellTags->"FCI",
- CellID->1585911965]
+Cell[8203, 286, 1466, 60, 42, "Output",
+ CellTags->"FCI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9048, 338, 122, 4, 27, "Input",
+Cell[9706, 351, 122, 4, 27, "Input",
CellTags->"FCI",
CellID->986821422],
-Cell[9173, 344, 999, 28, 101, "Output",
- CellTags->"FCI",
- CellID->653246170]
+Cell[9831, 357, 979, 27, 103, "Output",
+ CellTags->"FCI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10209, 377, 153, 5, 27, "Input",
+Cell[10847, 389, 153, 5, 27, "Input",
CellTags->"FCI",
CellID->1427781639],
-Cell[10365, 384, 559, 17, 49, "Output",
- CellTags->"FCI",
- CellID->2132613884]
+Cell[11003, 396, 538, 16, 51, "Output",
+ CellTags->"FCI"]
}, Open ]]
}, Open ]],
-Cell[10951, 405, 31, 0, 70, "SectionFooterSpacer"]
+Cell[11568, 416, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11019, 410, 270, 12, 70, "SeeAlsoSection",
+Cell[11636, 421, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[11292, 424, 573, 21, 70, "Text",
- CellTags->"FCI",
- CellID->794130940]
+Cell[11909, 435, 538, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[11880, 448, 23, 0, 70, "FooterCell"]
+Cell[12462, 457, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegral.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegral.nb
index c38100c6a..fd53d6ef9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegral.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegral.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6453, 195]
-NotebookOptionsPosition[ 4151, 128]
-NotebookOutlinePosition[ 6189, 184]
-CellTagsIndexPosition[ 6117, 179]
+NotebookDataLength[ 7338, 218]
+NotebookOptionsPosition[ 5243, 161]
+NotebookOutlinePosition[ 7129, 210]
+CellTagsIndexPosition[ 7086, 207]
WindowTitle->FCIntegral
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCIntegral\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCIntegral"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FCIntegral.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$60009],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCIntegral", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"IntegralTable\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/IntegralTable"], \
+"\<\"FeynAmpDenominatorSimplify\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCIntegral\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCIntegral"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCIntegral.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104089],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCIntegral", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCIntegral", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCIntegral", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +154,7 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominatorSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCIntegral",
- CellID->1473303021]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,10 +171,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 15.809778}",
+ "built" -> "{2020, 1, 5, 18, 56, 14.941564}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -149,11 +182,11 @@ TaggingRules->{
"None", "summary" ->
"FCIntegral is the head of integrals in a setting of the option \
IntegralTable of FeynAmpDenominatorSimplify. Currently implemented only for \
-2-loop integrals.", "synonyms" -> {}, "title" -> "FCIntegral",
- "titlemodifier" -> "", "windowtitle" -> "FCIntegral", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FCIntegral"}},
+2-loop integrals.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCIntegral", "titlemodifier" -> "", "windowtitle" -> "FCIntegral",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCIntegral"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,41 +195,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FCIntegral"->{
- Cell[3651, 108, 458, 15, 70, "Text",
- CellTags->"FCIntegral",
- CellID->1473303021]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FCIntegral", 6003, 172}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3153, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 460, 12, 70, "Usage",
+Cell[3738, 100, 287, 11, 70, "ObjectNameGrid"],
+Cell[4028, 113, 460, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3378, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4513, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3651, 108, 458, 15, 70, "Text",
- CellTags->"FCIntegral",
- CellID->1473303021]
+Cell[4786, 143, 415, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4124, 126, 23, 0, 70, "FooterCell"]
+Cell[5216, 159, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegrate.nb
index 074b809cb..496f493d6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCIntegrate.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6405, 191]
-NotebookOptionsPosition[ 4020, 123]
-NotebookOutlinePosition[ 6141, 180]
-CellTagsIndexPosition[ 6068, 175]
+NotebookDataLength[ 7150, 211]
+NotebookOptionsPosition[ 4976, 153]
+NotebookOutlinePosition[ 6943, 203]
+CellTagsIndexPosition[ 6900, 200]
WindowTitle->FCIntegrate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCIntegrate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCIntegrate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCNIntegrate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCNIntegrate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCIntegrate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCIntegrate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$60354],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCIntegrate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104532],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCIntegrate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FCIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"FCNIntegrate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCIntegrate",
- CellID->1030773877]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 17.071241}",
+ "built" -> "{2020, 1, 5, 18, 56, 15.788449}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -145,11 +175,11 @@ TaggingRules->{
"FCIntegrate is an option of certain Feynman integral related functions. \
It determines which integration function is used to evaluate analytic \
integrals. Possible settings include Integrate, NIntegrate, \
-(Dot[Integratedx@@#2, #1] &).", "synonyms" -> {}, "title" -> "FCIntegrate",
- "titlemodifier" -> "", "windowtitle" -> "FCIntegrate", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FCIntegrate"}},
+(Dot[Integratedx@@#2, #1] &).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCIntegrate", "titlemodifier" -> "", "windowtitle" -> "FCIntegrate",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCIntegrate"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -158,41 +188,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FCIntegrate"->{
- Cell[3735, 109, 243, 9, 70, "Text",
- CellTags->"FCIntegrate",
- CellID->1030773877]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FCIntegrate", 5954, 168}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3023, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 537, 13, 70, "Usage",
+Cell[3609, 97, 288, 11, 70, "ObjectNameGrid"],
+Cell[3900, 110, 537, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3462, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4462, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3735, 109, 243, 9, 70, "Text",
- CellTags->"FCIntegrate",
- CellID->1030773877]
+Cell[4735, 141, 199, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3993, 121, 23, 0, 70, "FooterCell"]
+Cell[4949, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisCreateScalarProducts.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisCreateScalarProducts.nb
new file mode 100644
index 000000000..0186ec8e4
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisCreateScalarProducts.nb
@@ -0,0 +1,431 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12445, 421]
+NotebookOptionsPosition[ 8808, 315]
+NotebookOutlinePosition[ 11302, 377]
+CellTagsIndexPosition[ 11217, 372]
+WindowTitle->FCLoopBasisCreateScalarProducts
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopBasisCreateScalarProducts\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisCreateScalarProducts"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisCreateScalarProducts.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104973],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisCreateScalarProducts", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisCreateScalarProducts", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"FCLoopBasisCreateScalarProducts",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"d1", ",", "d2", ",", "..."}], "}"}], ",", "head"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]generates a list of all loop-momentum dependent scalar \
+products made out of the loop momenta q1, q2, ... and external momenta p1, \
+p2, ... in the space-time dimensions d1, d2, .... The argument head can be \
+Pair to generate Lorentzian scalar products or CartesianPair to generate \
+Cartesian scalar products."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->57625812],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisCreateScalarProducts", "]"}]], "Input",
+ CellLabel->"In[16]:=",
+ CellID->534446904],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{165, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[16]=",
+ CellID->245430398]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->41001967],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->316979101],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisCreateScalarProducts", "[",
+ RowBox[{
+ RowBox[{"{", "l", "}"}], ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{", "D", "}"}], ",", "Pair"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->290433563],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ SuperscriptBox[
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm], "2"], "}"}], TraditionalForm]], "Output",
+ ImageSize->{34, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1018605416]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisCreateScalarProducts", "[",
+ RowBox[{
+ RowBox[{"{", "l", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2"}], "}"}], ",",
+ RowBox[{"{", "4", "}"}], ",", "Pair"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->188169265],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["l",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["l",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["l",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{130, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->551385402]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisCreateScalarProducts", "[",
+ RowBox[{
+ RowBox[{"{", "l", "}"}], ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"D", "-", "1"}], "}"}], ",", "CartesianPair"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2129701176],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], "}"}], TraditionalForm]], "Output",
+ ImageSize->{35, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1472556250]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCLoopBasisCreateScalarProducts",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 16.623085}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisCreateScalarProducts {q1, q2, ...}, {p1, p2, ...}, {d1, d2, \
+...}, head] generates a list of all loop-momentum dependent scalar products \
+made out of the loop momenta q1, q2, ... and external momenta p1, p2, ... in \
+the space-time dimensions d1, d2, .... The argument head can be Pair to \
+generate Lorentzian scalar products or CartesianPair to generate Cartesian \
+scalar products.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopBasisCreateScalarProducts", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopBasisCreateScalarProducts", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisCreateScalarProducts"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5582, 173, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->41001967]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11075, 365}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[603, 21, 2399, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3005, 79, 308, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3338, 94, 962, 24, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4325, 122, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->57625812],
+Cell[5065, 148, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5121, 152, 134, 3, 70, "Input",
+ CellID->534446904],
+Cell[5258, 157, 263, 9, 37, "Output",
+ CellID->245430398]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5582, 173, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->41001967],
+Cell[CellGroupData[{
+Cell[5993, 192, 195, 6, 26, "ExampleSection",
+ CellID->316979101],
+Cell[CellGroupData[{
+Cell[6213, 202, 240, 7, 27, "Input",
+ CellID->290433563],
+Cell[6456, 211, 309, 12, 42, "Output",
+ CellID->1018605416]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6802, 228, 272, 8, 27, "Input",
+ CellID->188169265],
+Cell[7077, 238, 971, 40, 42, "Output",
+ CellID->551385402]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8085, 283, 275, 8, 27, "Input",
+ CellID->2129701176],
+Cell[8363, 293, 379, 15, 42, "Output",
+ CellID->1472556250]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8781, 313, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisExtract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisExtract.nb
new file mode 100644
index 000000000..14c6d0824
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisExtract.nb
@@ -0,0 +1,605 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 17538, 595]
+NotebookOptionsPosition[ 14086, 494]
+NotebookOutlinePosition[ 16413, 553]
+CellTagsIndexPosition[ 16328, 548]
+WindowTitle->FCLoopBasisExtract
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopBasisExtract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisExtract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisExtract.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$105403],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisExtract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisExtract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisExtract", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] is an auxiliary function that extracts the scalar \
+products that form the basis of the loop integral in int. It needs to know \
+the loop momenta on which the integral depends and the dimensions of the \
+momenta that may occur in the integral."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->519074432],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisExtract", "]"}]], "Input",
+ CellLabel->"In[20]:=",
+ CellID->976561677],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FCTopology", "\[Rule]", "False"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",", "4", ",", "D", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{484, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[20]=",
+ CellID->1988549580]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1814077800],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1221270702],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}], " ",
+ RowBox[{"SFAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}], ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]}], "\[IndentingNewLine]",
+ RowBox[{"FCLoopBasisExtract", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"4", ",", "D"}], "}"}]}]}], "]"}]}], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1087542221],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q", TraditionalForm], "-",
+ FormBox["p", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]}]], TraditionalForm]], "Output",
+ ImageSize->{189, 36},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1913056698],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"-", "1"}], ",", "1", ",", "2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q", TraditionalForm], "-",
+ FormBox["p", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm]}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{341, 70},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->336549085]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"SFAD", "[", "p1", "]"}], "\[IndentingNewLine]",
+ RowBox[{"FCLoopBasisExtract", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], ",",
+ RowBox[{"FCTopology", "\[Rule]", "True"}], ",",
+ RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->280018364],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{72, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->5648788],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ",",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "}"}], ",",
+ RowBox[{"{", "1", "}"}], ",",
+ RowBox[{"{",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{438, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1391901442]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopBasisExtract",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 17.891284}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisExtract[int, {q1, q2, ...}] is an auxiliary function that \
+extracts the scalar products that form the basis of the loop integral in int. \
+It needs to know the loop momenta on which the integral depends and the \
+dimensions of the momenta that may occur in the integral.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopBasisExtract", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopBasisExtract", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisExtract"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5532, 172, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1814077800]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16184, 541}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3227, 91, 698, 18, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3950, 113, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->519074432],
+Cell[4691, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4747, 143, 121, 3, 70, "Input",
+ CellID->976561677],
+Cell[4871, 148, 600, 17, 56, "Output",
+ CellID->1988549580]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5532, 172, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1814077800],
+Cell[CellGroupData[{
+Cell[5945, 191, 196, 6, 26, "ExampleSection",
+ CellID->1221270702],
+Cell[CellGroupData[{
+Cell[6166, 201, 486, 15, 45, "Input",
+ CellID->1087542221],
+Cell[6655, 218, 1222, 40, 57, "Output",
+ CellID->1913056698],
+Cell[7880, 260, 3061, 109, 91, "Output",
+ CellID->336549085]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10978, 374, 357, 9, 45, "Input",
+ CellID->280018364],
+Cell[11338, 385, 404, 12, 61, "Output",
+ CellID->5648788],
+Cell[11745, 399, 2275, 88, 61, "Output",
+ CellID->1391901442]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[14059, 492, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisFindCompletion.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisFindCompletion.nb
new file mode 100644
index 000000000..eed7d36cf
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisFindCompletion.nb
@@ -0,0 +1,1075 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 31833, 1065]
+NotebookOptionsPosition[ 27270, 926]
+NotebookOutlinePosition[ 29841, 989]
+CellTagsIndexPosition[ 29756, 984]
+WindowTitle->FCLoopBasisFindCompletion
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopBasisFindCompletion\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisFindCompletion"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisFindCompletion.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$105834],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisFindCompletion", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisFindCompletion", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisFindCompletion", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]determines propagators that need to be included in the \
+loop integral int (that depends on the loop momenta q1,q2,...), to ensure \
+that the propagators of int form a basis. For integrals with propagators that \
+do not form a basis, such a completion must be found prior to processing \
+those integrals with tools that do Integration-By-Parts (IBP) reduction (e.g. \
+FIRE). Furthermore, int must not contain propagators that are linearly \
+dependent."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1856114390],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisFindCompletion", "]"}]], "Input",
+ CellLabel->"In[25]:=",
+ CellID->725102416],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Abort", "\[Rule]", "False"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Check", "\[Rule]", "True"}], ",",
+ RowBox[{"Method", "\[Rule]", "ScalarProduct"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",", "4", ",", "D", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{430, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[25]=",
+ CellID->1566384245]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->4555670],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1777702162],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "-", "p", "+", "l"}], ",", "m"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->680451350],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["l",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`l - $CellContext`p + $CellContext`q,
+ D],
+ FeynCalc`Momentum[$CellContext`l - $CellContext`p + $CellContext`q,
+ D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{169, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2102952412]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisFindCompletion", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1061934835],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["l",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`l, D] -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`l, D] -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ",",
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{238, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1399048154]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q2", ",", "m2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->437279666],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m2^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{155, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1080324517]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisFindCompletion", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1012989858],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m2^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ",",
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{234, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1807818720]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"q1", "+", "p"}], ",",
+ RowBox[{"q2", "-", "k"}]}], "]"}], " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q1", ",", "q2"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->152449709],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`k + $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{152, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->227748313]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisFindCompletion", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}], ",",
+ RowBox[{"Method", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q2", "+", "k"}], ",", "m"}], "}"}], "]"}], ",",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "p"}], ",", "m"}], "}"}], "]"}], ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "q2"}], "]"}], ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"k", ",", "q1"}], "]"}]}], "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->149942360],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`k, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`k, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]],
+ TraditionalForm], ",",
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "+",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] +
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`k, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ",",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}]}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{510, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1567923042]
+}, Open ]],
+
+Cell["Cartesian integrals are also supported.", "Notes",
+ CellID->1222037835],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"q1", ",", "q2", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "l1"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q2", "-", "l2"}], ",", "m2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->478538861],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q2", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False], TraditionalForm],
+ "-",
+ FormBox[
+ StyleBox["l1", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"","m1","\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["q2", Bold, StripOnInput -> False], TraditionalForm],
+ "-",
+ FormBox[
+ StyleBox["l2", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"","m2","\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{442, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->1507736279]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisFindCompletion", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->958430790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q2", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False],
+ TraditionalForm], "-",
+ FormBox[
+ StyleBox["l1", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"","m1","\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["q2", Bold, StripOnInput -> False],
+ TraditionalForm], "-",
+ FormBox[
+ StyleBox["l2", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"","m2","\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]],
+ TraditionalForm], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["l1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["l2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["q1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{455, 71},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1992108554]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopBasisFindCompletion",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 19.091988}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisFindCompletion[int, {q1, q2, ...}] determines propagators \
+that need to be included in the loop integral int (that depends on the loop \
+momenta q1,q2,...), to ensure that the propagators of int form a basis. For \
+integrals with propagators that do not form a basis, such a completion must \
+be found prior to processing those integrals with tools that do \
+Integration-By-Parts (IBP) reduction (e.g. FIRE). Furthermore, int must not \
+contain propagators that are linearly dependent.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopBasisFindCompletion",
+ "titlemodifier" -> "", "windowtitle" -> "FCLoopBasisFindCompletion",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCLoopBasisFindCompletion"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5981, 180, 385, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->4555670]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 29615, 977}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[597, 21, 2364, 55, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2964, 78, 302, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3291, 93, 912, 21, 154, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4228, 118, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1856114390],
+Cell[4970, 144, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5026, 148, 128, 3, 70, "Input",
+ CellID->725102416],
+Cell[5157, 153, 763, 20, 74, "Output",
+ CellID->1566384245]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5981, 180, 385, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->4555670],
+Cell[CellGroupData[{
+Cell[6391, 199, 196, 6, 26, "ExampleSection",
+ CellID->1777702162],
+Cell[CellGroupData[{
+Cell[6612, 209, 207, 7, 27, "Input",
+ CellID->680451350],
+Cell[6822, 218, 1414, 48, 64, "Output",
+ CellID->2102952412]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8273, 271, 169, 5, 27, "Input",
+ CellID->1061934835],
+Cell[8445, 278, 2006, 66, 64, "Output",
+ CellID->1399048154]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10488, 349, 224, 8, 27, "Input",
+ CellID->437279666],
+Cell[10715, 359, 1175, 38, 64, "Output",
+ CellID->1080324517]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11927, 402, 196, 6, 27, "Input",
+ CellID->1012989858],
+Cell[12126, 410, 1630, 54, 64, "Output",
+ CellID->1807818720]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13793, 469, 254, 9, 27, "Input",
+ CellID->152449709],
+Cell[14050, 480, 1672, 63, 61, "Output",
+ CellID->227748313]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15759, 548, 681, 21, 45, "Input",
+ CellID->149942360],
+Cell[16443, 571, 4513, 150, 61, "Output",
+ CellID->1567923042]
+}, Open ]],
+Cell[20971, 724, 77, 1, 32, "Notes",
+ CellID->1222037835],
+Cell[CellGroupData[{
+Cell[21073, 729, 301, 10, 27, "Input",
+ CellID->478538861],
+Cell[21377, 741, 2021, 54, 61, "Output",
+ CellID->1507736279]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[23435, 800, 195, 6, 27, "Input",
+ CellID->958430790],
+Cell[23633, 808, 3571, 111, 92, "Output",
+ CellID->1992108554]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[27243, 924, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisGetSize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisGetSize.nb
new file mode 100644
index 000000000..4436a6b73
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisGetSize.nb
@@ -0,0 +1,339 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9666, 329]
+NotebookOptionsPosition[ 6343, 227]
+NotebookOutlinePosition[ 8542, 285]
+CellTagsIndexPosition[ 8458, 280]
+WindowTitle->FCLoopBasisGetSize
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopBasisGetSize\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisGetSize"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisGetSize.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$106271],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisGetSize", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisGetSize", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisGetSize", "[",
+ RowBox[{"n1", ",", " ", "n2"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]returns the number of linearly independent propagators \
+for a topology that contains n1 loop momenta and n2 external momenta."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->865487204],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2048789073],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisGetSize", "[",
+ RowBox[{"1", ",", "0"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->349011384],
+
+Cell[BoxData[
+ FormBox["1", TraditionalForm]], "Output",
+ ImageSize->{11, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1252755952]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisGetSize", "[",
+ RowBox[{"2", ",", "1"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->292533539],
+
+Cell[BoxData[
+ FormBox["5", TraditionalForm]], "Output",
+ ImageSize->{12, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1276870913]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisGetSize", "[",
+ RowBox[{"3", ",", "2"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->899520067],
+
+Cell[BoxData[
+ FormBox["12", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->95047077]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisGetSize", "[",
+ RowBox[{"4", ",", "1"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->422089743],
+
+Cell[BoxData[
+ FormBox["14", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1516109657]
+}, Open ]],
+
+Cell["\<\
+The third argument (if given) is simply added to the final result.\
+\>", "Notes",
+ CellID->1057019565],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisGetSize", "[",
+ RowBox[{"4", ",", "1", ",", "1"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->580552192],
+
+Cell[BoxData[
+ FormBox["15", TraditionalForm]], "Output",
+ ImageSize->{18, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1181721294]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"FCLoopBasisGetSize",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 20.364311}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisGetSize[n1, n2] returns the number of linearly independent \
+propagators for a topology that contains n1 loop momenta and n2 external \
+momenta.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopBasisGetSize", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopBasisGetSize", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisGetSize"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3735, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->865487204]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8315, 273}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
+Cell[3205, 89, 505, 13, 101, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3735, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->865487204],
+Cell[CellGroupData[{
+Cell[4147, 125, 196, 6, 26, "ExampleSection",
+ CellID->2048789073],
+Cell[CellGroupData[{
+Cell[4368, 135, 137, 4, 27, "Input",
+ CellID->349011384],
+Cell[4508, 141, 187, 6, 35, "Output",
+ CellID->1252755952]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4732, 152, 137, 4, 27, "Input",
+ CellID->292533539],
+Cell[4872, 158, 187, 6, 35, "Output",
+ CellID->1276870913]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5096, 169, 137, 4, 27, "Input",
+ CellID->899520067],
+Cell[5236, 175, 186, 6, 35, "Output",
+ CellID->95047077]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5459, 186, 137, 4, 27, "Input",
+ CellID->422089743],
+Cell[5599, 192, 188, 6, 35, "Output",
+ CellID->1516109657]
+}, Open ]],
+Cell[5802, 201, 112, 3, 32, "Notes",
+ CellID->1057019565],
+Cell[CellGroupData[{
+Cell[5939, 208, 147, 4, 27, "Input",
+ CellID->580552192],
+Cell[6089, 214, 188, 6, 35, "Output",
+ CellID->1181721294]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6316, 225, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisIncompleteQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisIncompleteQ.nb
new file mode 100644
index 000000000..3055a0520
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisIncompleteQ.nb
@@ -0,0 +1,857 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 23627, 847]
+NotebookOptionsPosition[ 18866, 691]
+NotebookOutlinePosition[ 21089, 749]
+CellTagsIndexPosition[ 21004, 744]
+WindowTitle->FCLoopBasisIncompleteQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopBasisIncompleteQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisIncompleteQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisIncompleteQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$106702],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisIncompleteQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisIncompleteQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]checks if the propagators of the loop integral int( \
+that depends on the loop momenta q1,q2,...) do not form a basis."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1936069838],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisIncompleteQ", "]"}]], "Input",
+ CellLabel->"In[80]:=",
+ CellID->1660585574],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FCTopology", "\[Rule]", "False"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",", "4", ",", "D", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{363, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[80]=",
+ CellID->498535268]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1832231010],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->578106313],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1177324733],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{67, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1664740793]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q1", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->324168688],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2035889265]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q1", ",", "l"}], "]"}],
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "l", "+", "p"}], ",", "m"}], "}"}]}],
+ "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->162073799],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["l",
+ TraditionalForm]}], "+",
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`p + $CellContext`q1,
+ D],
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`p + $CellContext`q1,
+ D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{234, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1816296714]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q1", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1430971551],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1815494056]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q2", ",", "m2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1347400434],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m2^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{155, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1075936186]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1366180611],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1882295038]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",", "q2", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "l1"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q2", "-", "l2"}], ",", "m2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1855786348],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["l1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`l1 + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`l1 + $CellContext`q1, D]],
+ "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["l2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`l2 + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`l2 + $CellContext`q2, D]],
+ "-", $CellContext`m2^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{305, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->846960429]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->624132630],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1579405505]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"q1", ",", "l"}], "]"}],
+ RowBox[{"CFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "l", "+", "p"}], ",", "m"}], "}"}]}],
+ "]"}]}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1169288734],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"","m1","\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox[
+ StyleBox["l", Bold, StripOnInput -> False],
+ TraditionalForm]}], "+",
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ "+",
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"","m","\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{282, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->1658469437]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q1", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->106404590],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->1156381590]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q2", ",", "m2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->926675422],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q1", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m1"}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q2", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m2"}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{200, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]=",
+ CellID->49160134]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIncompleteQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[12]:=",
+ CellID->1934608699],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]=",
+ CellID->1356566344]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCLoopBasisIncompleteQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 21.572329}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisIncompleteQ[int, {q1, q2, ...}] checks if the propagators of \
+the loop integral int( that depends on the loop momenta q1,q2,...) do not \
+form a basis.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopBasisIncompleteQ", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopBasisIncompleteQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisIncompleteQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5379, 169, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1832231010]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 20860, 737}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[594, 21, 2330, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2927, 76, 299, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3251, 91, 576, 16, 101, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3852, 111, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1936069838],
+Cell[4594, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4650, 141, 126, 3, 70, "Input",
+ CellID->1660585574],
+Cell[4779, 146, 539, 16, 56, "Output",
+ CellID->498535268]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5379, 169, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1832231010],
+Cell[CellGroupData[{
+Cell[5792, 188, 195, 6, 26, "ExampleSection",
+ CellID->578106313],
+Cell[CellGroupData[{
+Cell[6012, 198, 149, 5, 27, "Input",
+ CellID->1177324733],
+Cell[6164, 205, 626, 21, 61, "Output",
+ CellID->1664740793]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6827, 231, 166, 5, 27, "Input",
+ CellID->324168688],
+Cell[6996, 238, 191, 6, 35, "Output",
+ CellID->2035889265]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7224, 249, 342, 13, 27, "Input",
+ CellID->162073799],
+Cell[7569, 264, 1905, 66, 64, "Output",
+ CellID->1816296714]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9511, 335, 167, 5, 27, "Input",
+ CellID->1430971551],
+Cell[9681, 342, 191, 6, 35, "Output",
+ CellID->1815494056]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9909, 353, 225, 8, 27, "Input",
+ CellID->1347400434],
+Cell[10137, 363, 1175, 38, 64, "Output",
+ CellID->1075936186]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11349, 406, 193, 6, 27, "Input",
+ CellID->1366180611],
+Cell[11545, 414, 190, 6, 35, "Output",
+ CellID->1882295038]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11772, 425, 301, 10, 27, "Input",
+ CellID->1855786348],
+Cell[12076, 437, 2424, 82, 64, "Output",
+ CellID->846960429]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14537, 524, 192, 6, 27, "Input",
+ CellID->624132630],
+Cell[14732, 532, 190, 6, 35, "Output",
+ CellID->1579405505]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14959, 543, 345, 13, 27, "Input",
+ CellID->1169288734],
+Cell[15307, 558, 1709, 54, 62, "Output",
+ CellID->1658469437]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17053, 617, 167, 5, 27, "Input",
+ CellID->106404590],
+Cell[17223, 624, 192, 6, 35, "Output",
+ CellID->1156381590]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17452, 635, 226, 8, 27, "Input",
+ CellID->926675422],
+Cell[17681, 645, 694, 20, 61, "Output",
+ CellID->49160134]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18412, 670, 194, 6, 27, "Input",
+ CellID->1934608699],
+Cell[18609, 678, 191, 6, 35, "Output",
+ CellID->1356566344]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[18839, 689, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisIntegralToPropagators.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisIntegralToPropagators.nb
new file mode 100644
index 000000000..ddc8b4511
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisIntegralToPropagators.nb
@@ -0,0 +1,574 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 17147, 564]
+NotebookOptionsPosition[ 13094, 441]
+NotebookOutlinePosition[ 15539, 502]
+CellTagsIndexPosition[ 15454, 497]
+WindowTitle->FCLoopBasisIntegralToPropagators
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopBasisIntegralToPropagators\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisIntegralToPropagators"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisIntegralToPropagators.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$107141],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisIntegralToPropagators", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisIntegralToPropagators", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisIntegralToPropagators", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]is an auxiliary function that converts the loop \
+integral int that depends on the loop momenta q1, q2, ... to a list of \
+propagators and scalar products. All propagators and scalar products that do \
+not depend on the loop momenta are discarded, unless the Rest option is set \
+to True."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->31766683],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisIntegralToPropagators", "]"}]], "Input",
+ CellLabel->"In[123]:=",
+ CellID->1432349722],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CartesianPair", "\[Rule]", "False"}], ",",
+ RowBox[{"EtaSign", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}], ",", "1"}], "}"}]}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"MomentumCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"Negative", "\[Rule]", "False"}], ",",
+ RowBox[{"Pair", "\[Rule]", "False"}], ",",
+ RowBox[{"Rest", "\[Rule]", "False"}], ",",
+ RowBox[{"Sort", "\[Rule]", "True"}], ",",
+ RowBox[{"Tally", "\[Rule]", "False"}], ",",
+ RowBox[{"TemporalPair", "\[Rule]", "False"}], ",",
+ RowBox[{"ToSFAD", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{460, 73},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[123]=",
+ CellID->869173064]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->717487452],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1004176351],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[", "p1", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1992932500],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{72, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1882078390]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIntegralToPropagators", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "p1", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1918606203],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], "}"}], TraditionalForm]], "Output",
+ ImageSize->{88, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->81862528]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->581443369],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{141, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->785924661]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIntegralToPropagators", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1129375678],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{165, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->152119946]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}], " ",
+ RowBox[{"SFAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}], ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->245070355],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q", TraditionalForm], "-",
+ FormBox["p", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]}]], TraditionalForm]], "Output",
+ ImageSize->{189, 36},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->456033020]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisIntegralToPropagators", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->814711214],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q", TraditionalForm], "-",
+ FormBox["p", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{290, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1751204889]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopBasisIntegralToPropagators",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 22.769468}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisIntegralToPropagators[int, {q1, q2, ...}] is an auxiliary \
+function that converts the loop integral int that depends on the loop momenta \
+q1, q2, ... to a list of propagators and scalar products. All propagators and \
+scalar products that do not depend on the loop momenta are discarded, unless \
+the Rest option is set to True.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCLoopBasisIntegralToPropagators", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopBasisIntegralToPropagators", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCLoopBasisIntegralToPropagators"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6175, 185, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->717487452]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15311, 490}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[604, 21, 2403, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3010, 79, 309, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3344, 94, 756, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4125, 117, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->31766683],
+Cell[4865, 143, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4921, 147, 137, 3, 70, "Input",
+ CellID->1432349722],
+Cell[5061, 152, 1053, 26, 94, "Output",
+ CellID->869173064]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6175, 185, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->717487452],
+Cell[CellGroupData[{
+Cell[6587, 204, 196, 6, 26, "ExampleSection",
+ CellID->1004176351],
+Cell[CellGroupData[{
+Cell[6808, 214, 102, 3, 27, "Input",
+ CellID->1992932500],
+Cell[6913, 219, 407, 12, 61, "Output",
+ CellID->1882078390]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7357, 236, 177, 5, 27, "Input",
+ CellID->1918606203],
+Cell[7537, 243, 474, 15, 61, "Output",
+ CellID->81862528]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8048, 263, 125, 4, 27, "Input",
+ CellID->581443369],
+Cell[8176, 269, 640, 18, 61, "Output",
+ CellID->785924661]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8853, 292, 203, 6, 27, "Input",
+ CellID->1129375678],
+Cell[9059, 300, 782, 24, 61, "Output",
+ CellID->152119946]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9878, 329, 261, 9, 27, "Input",
+ CellID->245070355],
+Cell[10142, 340, 1221, 40, 57, "Output",
+ CellID->456033020]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11400, 385, 175, 5, 27, "Input",
+ CellID->814711214],
+Cell[11578, 392, 1450, 42, 61, "Output",
+ CellID->1751204889]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[13067, 439, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisOverdeterminedQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisOverdeterminedQ.nb
new file mode 100644
index 000000000..f7cc75db5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisOverdeterminedQ.nb
@@ -0,0 +1,661 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18808, 651]
+NotebookOptionsPosition[ 14944, 530]
+NotebookOutlinePosition[ 17196, 589]
+CellTagsIndexPosition[ 17111, 584]
+WindowTitle->FCLoopBasisOverdeterminedQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopBasisOverdeterminedQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisOverdeterminedQ"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisOverdeterminedQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$107574],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisOverdeterminedQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisOverdeterminedQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisOverdeterminedQ", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]checks if the propagators of the loop integral int \
+(that depends on the loop momenta q1,q2,... ) are linearly dependent."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1867845114],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisOverdeterminedQ", "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->873902712],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",", "4", ",", "D", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{503, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->2032162173]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1797606053],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1798119519],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "l", "+", "p"}], ",", "m"}], "}"}]}], "]"}]], "Input",\
+
+ CellLabel->"In[1]:=",
+ CellID->1007262632],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["l",
+ TraditionalForm]}], "+",
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`p + $CellContext`q1,
+ D],
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`p + $CellContext`q1,
+ D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{234, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->412071257]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisOverdeterminedQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q1", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->30739365],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->254576575]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m1"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1389435958],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{107, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1884462615]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisOverdeterminedQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q1", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2142881934],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1262909302]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",", "q2", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "+", "l"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "-", "l"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q2", "+", "l"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q2", "-", "l"}], ",", "m1"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1391618340],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["l",
+ TraditionalForm], "+",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`l + $CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`l + $CellContext`q1, D]],
+ "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["l",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`q1, D]],
+ "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["l",
+ TraditionalForm], "+",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`l + $CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`l + $CellContext`q2, D]],
+ "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["l",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`l + $CellContext`q2, D]],
+ "-", $CellContext`m1^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{537, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->167702918]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisOverdeterminedQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1537071496],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->982835686]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopBasisOverdeterminedQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 23.969241}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisOverdeterminedQ[int, {q1, q2, ...}] checks if the propagators \
+of the loop integral int (that depends on the loop momenta q1,q2,... ) are \
+linearly dependent.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopBasisOverdeterminedQ", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopBasisOverdeterminedQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisOverdeterminedQ"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5381, 170, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1797606053]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16967, 577}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[598, 21, 2368, 55, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2969, 78, 303, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3297, 93, 584, 16, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3906, 113, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1867845114],
+Cell[4648, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4704, 143, 128, 3, 70, "Input",
+ CellID->873902712],
+Cell[4835, 148, 485, 15, 37, "Output",
+ CellID->2032162173]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5381, 170, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1797606053],
+Cell[CellGroupData[{
+Cell[5794, 189, 196, 6, 26, "ExampleSection",
+ CellID->1798119519],
+Cell[CellGroupData[{
+Cell[6015, 199, 262, 10, 27, "Input",
+ CellID->1007262632],
+Cell[6280, 211, 1631, 53, 64, "Output",
+ CellID->412071257]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7948, 269, 169, 5, 27, "Input",
+ CellID->30739365],
+Cell[8120, 276, 190, 6, 35, "Output",
+ CellID->254576575]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8347, 287, 175, 6, 27, "Input",
+ CellID->1389435958],
+Cell[8525, 295, 995, 34, 64, "Output",
+ CellID->1884462615]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9557, 334, 171, 5, 27, "Input",
+ CellID->2142881934],
+Cell[9731, 341, 190, 6, 35, "Output",
+ CellID->1262909302]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9958, 352, 473, 16, 27, "Input",
+ CellID->1391618340],
+Cell[10434, 370, 4018, 134, 64, "Output",
+ CellID->167702918]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14489, 509, 197, 6, 27, "Input",
+ CellID->1537071496],
+Cell[14689, 517, 189, 6, 35, "Output",
+ CellID->982835686]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[14917, 528, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisPropagatorsToTopology.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisPropagatorsToTopology.nb
new file mode 100644
index 000000000..14b9ac12b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisPropagatorsToTopology.nb
@@ -0,0 +1,538 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14831, 528]
+NotebookOptionsPosition[ 10918, 406]
+NotebookOutlinePosition[ 13223, 466]
+CellTagsIndexPosition[ 13138, 461]
+WindowTitle->FCLoopBasisPropagatorsToTopology
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopBasisPropagatorsToTopology\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisPropagatorsToTopology"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisPropagatorsToTopology.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108007],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisPropagatorsToTopology", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisPropagatorsToTopology", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisPropagatorsToTopology", "[",
+ RowBox[{"{",
+ RowBox[{"pr1", ",", "pr2", ",", "..."}], "}"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]takes the list of Pairs and FeynAmpDenominators pr1, \
+p2, ... and converts it into a list of propagators that can be used to \
+describe a topology"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->663054831],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisPropagatorsToTopology", "]"}]], "Input",
+ CellLabel->"In[15]:=",
+ CellID->2120642970],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DeleteDuplicates", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"MomentumCombine", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{497, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[15]=",
+ CellID->724039617]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->588592236],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2113675355],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"FAD", "[", "q", "]"}], "}"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1956316226],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]],
+ TraditionalForm], "}"}], TraditionalForm]], "Output",
+ ImageSize->{44, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->19446749]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisPropagatorsToTopology", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1087227778],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "}"}], TraditionalForm]], "Output",
+ ImageSize->{37, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2002437231]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}], "}"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->693257325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], "}"}], TraditionalForm]], "Output",
+ ImageSize->{77, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->387382784]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisPropagatorsToTopology", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1731709650],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["m", "2"]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{76, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1002887494]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}], ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}]}], "}"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->845789532],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ",",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{121, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1949357915]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisPropagatorsToTopology", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1200669594],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["m", "2"]}], ",",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{120, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->589509649]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopBasisPropagatorsToTopology",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 25.244772}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisPropagatorsToTopology[{pr1, pr2, ...}] takes the list of \
+Pairs and FeynAmpDenominators pr1, p2, ... and converts it into a list of \
+propagators that can be used to describe a topology", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopBasisPropagatorsToTopology",
+ "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopBasisPropagatorsToTopology", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisPropagatorsToTopology"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5470, 170, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->588592236]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12995, 454}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[604, 21, 2403, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3010, 79, 309, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3344, 94, 585, 16, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3954, 114, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->663054831],
+Cell[4695, 140, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4751, 144, 136, 3, 70, "Input",
+ CellID->2120642970],
+Cell[4890, 149, 519, 14, 56, "Output",
+ CellID->724039617]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5470, 170, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->588592236],
+Cell[CellGroupData[{
+Cell[5882, 189, 196, 6, 26, "ExampleSection",
+ CellID->2113675355],
+Cell[CellGroupData[{
+Cell[6103, 199, 123, 4, 27, "Input",
+ CellID->1956316226],
+Cell[6229, 205, 564, 21, 61, "Output",
+ CellID->19446749]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6830, 231, 129, 3, 27, "Input",
+ CellID->1087227778],
+Cell[6962, 236, 309, 12, 42, "Output",
+ CellID->2002437231]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7308, 253, 171, 6, 27, "Input",
+ CellID->693257325],
+Cell[7482, 261, 707, 24, 61, "Output",
+ CellID->387382784]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8226, 290, 129, 3, 27, "Input",
+ CellID->1731709650],
+Cell[8358, 295, 364, 14, 42, "Output",
+ CellID->1002887494]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8759, 314, 253, 9, 27, "Input",
+ CellID->845789532],
+Cell[9015, 325, 1035, 38, 61, "Output",
+ CellID->1949357915]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10087, 368, 129, 3, 27, "Input",
+ CellID->1200669594],
+Cell[10219, 373, 633, 26, 42, "Output",
+ CellID->589509649]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[10891, 404, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisSplit.nb
new file mode 100644
index 000000000..655bffb9b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopBasisSplit.nb
@@ -0,0 +1,607 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18204, 597]
+NotebookOptionsPosition[ 14731, 490]
+NotebookOutlinePosition[ 16898, 547]
+CellTagsIndexPosition[ 16813, 542]
+WindowTitle->FCLoopBasisSplit
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopBasisSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopBasisSplit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopBasisSplit.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108440],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopBasisSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopBasisSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopBasisSplit", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]checks if the given loop integral factorizes and if so \
+splits it into independent integrals."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->598479817],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopBasisSplit", "]"}]], "Input",
+ CellLabel->"In[109]:=",
+ CellID->165011923],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}]}], ",",
+ RowBox[{"List", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{397, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[109]=",
+ CellID->164487497]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->97242643],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->492136138],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q2", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "-", "p2"}], ",", "0"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1740798400],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1, D] -
+ FeynCalc`Momentum[$CellContext`p2, D],
+ FeynCalc`Momentum[$CellContext`p1, D] -
+ FeynCalc`Momentum[$CellContext`p2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{227, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->585852077]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisSplit", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]", "loopInt"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->889078406],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"loopInt", "(",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ",",
+ RowBox[{"{", "q1", "}"}]}], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ",",
+ RowBox[{"{", "q2", "}"}]}], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1, D] -
+ FeynCalc`Momentum[$CellContext`p2, D],
+ FeynCalc`Momentum[$CellContext`p1, D] -
+ FeynCalc`Momentum[$CellContext`p2, D]]],
+ Editable->False]],
+ TraditionalForm], ",", "0"}], ")"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{494, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1291843966]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{"SFAD", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"q1", "-", "q2"}], ",", "q2", ",",
+ RowBox[{"{",
+ RowBox[{"q3", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1175078470],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1", TraditionalForm], "-",
+ FormBox["q2", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q2", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q3", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{363, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1570685614]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopBasisSplit", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "q3"}], "}"}], ",",
+ RowBox[{"Head", "\[Rule]", "loop"}], ",",
+ RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2024603521],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"loop", "(",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q3", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ RowBox[{"{", "q3", "}"}]}], ")"}], ",",
+ RowBox[{"loop", "(",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q2", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1", TraditionalForm], "-",
+ FormBox["q2", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]],
+ TraditionalForm], ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], ")"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{566, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->69316672]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCLoopBasisSplit",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 26.599524}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopBasisSplit[int, {q1, q2, ...}] checks if the given loop integral \
+factorizes and if so splits it into independent integrals.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopBasisSplit", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopBasisSplit", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopBasisSplit"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5252, 167, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->97242643]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16671, 535}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3215, 91, 546, 16, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3786, 111, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->598479817],
+Cell[4527, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4583, 141, 120, 3, 70, "Input",
+ CellID->165011923],
+Cell[4706, 146, 485, 14, 56, "Output",
+ CellID->164487497]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5252, 167, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->97242643],
+Cell[CellGroupData[{
+Cell[5663, 186, 195, 6, 26, "ExampleSection",
+ CellID->492136138],
+Cell[CellGroupData[{
+Cell[5883, 196, 343, 12, 27, "Input",
+ CellID->1740798400],
+Cell[6229, 210, 1824, 61, 64, "Output",
+ CellID->585852077]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8090, 276, 235, 7, 27, "Input",
+ CellID->889078406],
+Cell[8328, 285, 2396, 77, 61, "Output",
+ CellID->1291843966]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10761, 367, 283, 9, 27, "Input",
+ CellID->1175078470],
+Cell[11047, 378, 1391, 37, 61, "Output",
+ CellID->1570685614]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12475, 420, 289, 8, 27, "Input",
+ CellID->2024603521],
+Cell[12767, 430, 1898, 53, 61, "Output",
+ CellID->69316672]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[14704, 488, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopCanonicalize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopCanonicalize.nb
new file mode 100644
index 000000000..242de2706
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopCanonicalize.nb
@@ -0,0 +1,784 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 24510, 774]
+NotebookOptionsPosition[ 20872, 673]
+NotebookOutlinePosition[ 23506, 736]
+CellTagsIndexPosition[ 23421, 731]
+WindowTitle->FCLoopCanonicalize
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopCanonicalize\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopCanonicalize"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopCanonicalize.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108872],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopCanonicalize", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopCanonicalize", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopCanonicalize", "[",
+ RowBox[{"exp", ",", "q", ",", "loopHead"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is an auxiliary internal function that canonicalizes \
+indices of 1-loop integrals with loop momentum q that are wrapped inside \
+loopHead. The output is given as a list of four entries, from which the last \
+one contains a list of all the unique 1-loop integrals in the given \
+expression. After those are simplified, the original output of \
+FCLoopCanonicalize together with the list of the simplified unique integrals \
+should be inserted into FCLoopSolutionList to obtain the final replacement \
+list that will be applied to the original expression."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1735573394],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopCanonicalize", "]"}]], "Input",
+ CellLabel->"In[34]:=",
+ CellID->9431103],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"PaVeIntegralHeads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "PaVe", ",", "GenPaVe", ",", "A0", ",", "A00", ",", "B0", ",", "B00",
+ ",", "B1", ",", "B11", ",", "DB1", ",", "C0", ",", "D0"}], "}"}]}]}],
+ "}"}], TraditionalForm]], "Output",
+ ImageSize->{527, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[34]=",
+ CellID->993334201]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1344012086],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1478603305],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopCanonicalize", "[",
+ RowBox[{
+ RowBox[{"myHead", "[",
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], "]"}], ",", "q", ",", "myHead"}],
+ "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->2071184719],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ RowBox[{"myHead", "(",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}]},
+ {
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3791\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Mu]",
+ TraditionalForm]}], "}"}]},
+ {
+ RowBox[{"myHead", "(",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3791\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ")"}]},
+ {
+ RowBox[{"myHead", "(",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3791\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ")"}]}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{170, 82},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1709735982]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopCanonicalize", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"myHead", "[",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",", "m"}], "}"}]}], "]"}]}], "]"}], "+",
+ RowBox[{"myHead", "[",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Rho]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Sigma]"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",", "m"}], "}"}]}], "]"}]}], "]"}]}], ",",
+ "q", ",", "myHead"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1969432234],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3801\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Mu]",
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3802\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Nu]",
+ TraditionalForm]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3801\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Rho]",
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3802\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Sigma]",
+ TraditionalForm]}]}], "}"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3801\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3802\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3801\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3802\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3801\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli3802\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{573, 176},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->512363724]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCLoopCanonicalize",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 27.881896}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopCanonicalize[exp, q, loopHead] is an auxiliary internal function \
+that canonicalizes indices of 1-loop integrals with loop momentum q that are \
+wrapped inside loopHead. The output is given as a list of four entries, from \
+which the last one contains a list of all the unique 1-loop integrals in the \
+given expression. After those are simplified, the original output of \
+FCLoopCanonicalize together with the list of the simplified unique integrals \
+should be inserted into FCLoopSolutionList to obtain the final replacement \
+list that will be applied to the original expression.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopCanonicalize", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopCanonicalize", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopCanonicalize"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5694, 171, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1344012086]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 23277, 724}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3227, 91, 945, 19, 154, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4197, 114, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1735573394],
+Cell[4939, 140, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4995, 144, 119, 3, 70, "Input",
+ CellID->9431103],
+Cell[5117, 149, 516, 15, 56, "Output",
+ CellID->993334201]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5694, 171, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1344012086],
+Cell[CellGroupData[{
+Cell[6107, 190, 196, 6, 26, "ExampleSection",
+ CellID->1478603305],
+Cell[CellGroupData[{
+Cell[6328, 200, 252, 8, 27, "Input",
+ CellID->2071184719],
+Cell[6583, 210, 1753, 62, 103, "Output",
+ CellID->1709735982]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8373, 277, 895, 28, 45, "Input",
+ CellID->1969432234],
+Cell[9271, 307, 11535, 359, 197, "Output",
+ CellID->512363724]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[20845, 671, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopEikonalPropagatorFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopEikonalPropagatorFreeQ.nb
new file mode 100644
index 000000000..462919d7b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopEikonalPropagatorFreeQ.nb
@@ -0,0 +1,552 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15912, 542]
+NotebookOptionsPosition[ 11419, 404]
+NotebookOutlinePosition[ 14000, 468]
+CellTagsIndexPosition[ 13915, 463]
+WindowTitle->FCLoopEikonalPropagatorFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopEikonalPropagatorFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopEikonalPropagatorFreeQ"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopEikonalPropagatorFreeQ.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$109301],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopEikonalPropagatorFreeQ", ".html"]], None}]}]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopEikonalPropagatorFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopEikonalPropagatorFreeQ", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] checks if the integral is free of eikonal propagators \
+1/[p.q+x]. If the option First is set to False, propagators that have both a \
+quadratic and linear piece, e.g. 1/[(q-p)^2+q.r+x] will also count as eikonal \
+propagators. The option Momentum can be used to check for the presence of \
+eikonal propagators only with respect to particular momenta. The check is \
+performed only for StandardPropagatorDenominator and \
+CartesianPropagatorDenominator."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->420646886],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopEikonalPropagatorFreeQ", "]"}]], "Input",
+ CellLabel->"In[30]:=",
+ CellID->1008394849],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"First", "\[Rule]", "True"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{202, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[30]=",
+ CellID->1586327075]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1593570356],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1536229117],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"SFAD", "[",
+ RowBox[{"p", ",",
+ RowBox[{"p", "-", "q"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->874710363],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "-",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{181, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1831254886]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopEikonalPropagatorFreeQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->83772730],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1036004978]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->565778390],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{84, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->460932110]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopEikonalPropagatorFreeQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1467055058],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1328254364]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->308483373],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{86, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1982420719]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopEikonalPropagatorFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "q", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1669661030],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1377101917]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"q", ",",
+ RowBox[{"q", ".", "p"}]}], "}"}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1841906262],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{114, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->2052109057]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopEikonalPropagatorFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"First", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1236788248],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->477486752]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCLoopEikonalPropagatorFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 29.074168}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopEikonalPropagatorFreeQ[exp] checks if the integral is free of \
+eikonal propagators 1/[p.q+x]. If the option First is set to False, \
+propagators that have both a quadratic and linear piece, e.g. \
+1/[(q-p)^2+q.r+x] will also count as eikonal propagators. The option Momentum \
+can be used to check for the presence of eikonal propagators only with \
+respect to particular momenta. The check is performed only for \
+StandardPropagatorDenominator and CartesianPropagatorDenominator.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopEikonalPropagatorFreeQ", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopEikonalPropagatorFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopEikonalPropagatorFreeQ"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5468, 169, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1593570356]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13771, 456}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[600, 21, 2383, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2986, 79, 305, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3316, 94, 817, 18, 154, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4158, 116, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->420646886],
+Cell[4899, 142, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4955, 146, 132, 3, 70, "Input",
+ CellID->1008394849],
+Cell[5090, 151, 317, 11, 35, "Output",
+ CellID->1586327075]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5468, 169, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1593570356],
+Cell[CellGroupData[{
+Cell[5881, 188, 196, 6, 26, "ExampleSection",
+ CellID->1536229117],
+Cell[CellGroupData[{
+Cell[6102, 198, 174, 6, 27, "Input",
+ CellID->874710363],
+Cell[6279, 206, 911, 26, 61, "Output",
+ CellID->1831254886]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7227, 237, 123, 3, 27, "Input",
+ CellID->83772730],
+Cell[7353, 242, 190, 6, 35, "Output",
+ CellID->1036004978]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7580, 253, 227, 8, 27, "Input",
+ CellID->565778390],
+Cell[7810, 263, 526, 15, 59, "Output",
+ CellID->460932110]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8373, 283, 125, 3, 27, "Input",
+ CellID->1467055058],
+Cell[8501, 288, 191, 6, 35, "Output",
+ CellID->1328254364]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8729, 299, 227, 8, 27, "Input",
+ CellID->308483373],
+Cell[8959, 309, 643, 19, 59, "Output",
+ CellID->1982420719]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9639, 333, 210, 6, 27, "Input",
+ CellID->1669661030],
+Cell[9852, 341, 191, 6, 35, "Output",
+ CellID->1377101917]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10080, 352, 228, 8, 27, "Input",
+ CellID->1841906262],
+Cell[10311, 362, 626, 17, 61, "Output",
+ CellID->2052109057]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10974, 384, 186, 5, 27, "Input",
+ CellID->1236788248],
+Cell[11163, 391, 190, 6, 35, "Output",
+ CellID->477486752]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11392, 402, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopExtract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopExtract.nb
index 30e02fa74..277c680d6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopExtract.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopExtract.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11810, 374]
-NotebookOptionsPosition[ 8648, 290]
-NotebookOutlinePosition[ 11268, 353]
-CellTagsIndexPosition[ 11183, 348]
+NotebookDataLength[ 46899, 1437]
+NotebookOptionsPosition[ 43326, 1340]
+NotebookOutlinePosition[ 45991, 1404]
+CellTagsIndexPosition[ 45905, 1399]
WindowTitle->FCLoopExtract
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FCLoopExtract.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$60697],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$109736],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCLoopExtract", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ FCLoopExtract.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCLoopExtract", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCLoopExtract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -103,6 +116,75 @@ canonicalized."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->461648854],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopExtract", "]"}]], "Input",
+ CellLabel->"In[39]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CFAD", "\[Rule]", "True"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DropScaleless", "\[Rule]", "False"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "False"}], ",",
+ RowBox[{"FAD", "\[Rule]", "True"}], ",",
+ RowBox[{"Full", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCLoopIBPReducableQ", "\[Rule]", "False"}], ",",
+ RowBox[{"FCLoopSplit", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], ",",
+ RowBox[{"FCLoopBasisSplit", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"GFAD", "\[Rule]", "True"}], ",",
+ RowBox[{"MultiLoop", "\[Rule]", "False"}], ",",
+ RowBox[{"Numerator", "\[Rule]", "True"}], ",",
+ RowBox[{"PaVe", "\[Rule]", "True"}], ",",
+ RowBox[{"SFAD", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{528, 92},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[39]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -118,7 +200,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->292250804],
+ CellID->1910549458],
Cell[CellGroupData[{
@@ -128,11 +210,11 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1697498870],
+ CellID->2055303549],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{"FCI", "[",
RowBox[{
RowBox[{
@@ -150,11 +232,8 @@ Cell[BoxData[{
RowBox[{"q", "-", "p1"}], ",",
RowBox[{"{",
RowBox[{
- RowBox[{"q", "-", "p2"}], ",", "m"}], "}"}]}], "]"}]}],
- "]"}], "\[IndentingNewLine]",
- RowBox[{"FCLoopExtract", "[",
- RowBox[{"int", ",",
- RowBox[{"{", "q", "}"}], ",", "loopInt"}], "]"}]}], "Input",
+ RowBox[{"q", "-", "p2"}], ",", "m"}], "}"}]}], "]"}]}], "]"}]], "Input",\
+
CellLabel->"In[1]:=",
CellID->1841949927],
@@ -205,83 +284,1054 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}],
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{305, 48},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{324, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->634192799],
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopExtract", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",", "loopInt"}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"0", ",",
- RowBox[{"loopInt", "(",
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"M", " ",
RowBox[{
- FormBox["p",
- TraditionalForm], "+",
- FormBox["q",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}]}], ")"}], " ",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], ")"}], ",",
- RowBox[{"{",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"M", " ",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "-",
RowBox[{"loopInt", "(",
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
+ FormBox[
+ FractionBox[
+ RowBox[{
RowBox[{"(",
RowBox[{
- FormBox["p",
- TraditionalForm], "+",
- FormBox["q",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "-",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "+",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
RowBox[{"(",
RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], ")"}], "}"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{460, 48},
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "}"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{332, 572},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->10831768]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -291,7 +1341,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCLoopExtract",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -300,10 +1350,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 18.316417}",
+ "built" -> "{2020, 1, 5, 18, 56, 30.447330}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -317,12 +1367,12 @@ loop integrals. The second entry contains relevant loop integrals, where each \
integral is wrapped into loopHead. The third entry is a list of all the \
unique loop integrals from the second entry and can be used as an input to \
another function. Note that if loop integrals contain free indices, those \
-will not be canonicalized.", "synonyms" -> {}, "title" -> "FCLoopExtract",
- "titlemodifier" -> "", "windowtitle" -> "FCLoopExtract", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FCLoopExtract"}, "SearchTextTranslated" ->
- ""},
+will not be canonicalized.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopExtract", "titlemodifier" -> "", "windowtitle" -> "FCLoopExtract",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCLoopExtract"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -330,8 +1380,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -340,42 +1391,54 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4000, 105, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6478, 187, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->292250804]}
+ CellID->1910549458]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11040, 341}
+ {"PrimaryExamplesSection", 45761, 1392}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 1063, 23, 157, "Usage",
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3197, 91, 1063, 23, 170, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4000, 105, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4285, 118, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->461648854],
+Cell[5026, 144, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5082, 148, 96, 2, 70, "Input"],
+Cell[5181, 152, 1236, 28, 113, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6478, 187, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->292250804],
+ CellID->1910549458],
Cell[CellGroupData[{
-Cell[4412, 124, 196, 6, 25, "ExampleSection",
- CellID->1697498870],
+Cell[6891, 206, 196, 6, 26, "ExampleSection",
+ CellID->2055303549],
Cell[CellGroupData[{
-Cell[4633, 134, 732, 24, 62, "Input",
+Cell[7112, 216, 597, 21, 45, "Input",
CellID->1841949927],
-Cell[5368, 160, 1844, 71, 69, "Output",
- CellID->634192799],
-Cell[7215, 233, 1367, 50, 69, "Output",
- CellID->10831768]
+Cell[7712, 239, 3100, 109, 64, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10849, 353, 152, 4, 27, "Input"],
+Cell[11004, 359, 32256, 974, 593, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[8621, 288, 23, 0, 42, "FooterCell"]
+Cell[43299, 1338, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIBPReducableQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIBPReducableQ.nb
new file mode 100644
index 000000000..50e09cb7a
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIBPReducableQ.nb
@@ -0,0 +1,380 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10781, 370]
+NotebookOptionsPosition[ 7775, 278]
+NotebookOutlinePosition[ 9862, 334]
+CellTagsIndexPosition[ 9778, 329]
+WindowTitle->FCLoopIBPReducableQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopIBPReducableQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopIBPReducableQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopIBPReducableQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$110165],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopIBPReducableQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopIBPReducableQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopIBPReducableQ", "[", "int", "]"}]], "InlineFormula"],
+ " \[LineSeparator]checks if the integral contains propagators raised to \
+integer powers."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->128243006],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->984336512],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1041712583],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{99, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->190314251]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIBPReducableQ", "[",
+ RowBox[{"FCI", "[", "%", "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1082785845],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->334158586]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "0", ",", "2"}], "}"}], ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1838519299],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ")"}], "2"], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{119, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1784481217]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIBPReducableQ", "[",
+ RowBox[{"FCI", "[", "%", "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1330916288],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->484198112]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCLoopIBPReducableQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 31.793206}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopIBPReducableQ[int] checks if the integral contains propagators \
+raised to integer powers.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopIBPReducableQ", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopIBPReducableQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopIBPReducableQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3654, 105, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->128243006]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9635, 322}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
+Cell[3211, 89, 418, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3654, 105, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->128243006],
+Cell[CellGroupData[{
+Cell[4066, 124, 195, 6, 26, "ExampleSection",
+ CellID->984336512],
+Cell[CellGroupData[{
+Cell[4286, 134, 147, 5, 27, "Input",
+ CellID->1041712583],
+Cell[4436, 141, 1100, 40, 61, "Output",
+ CellID->190314251]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5573, 186, 146, 4, 27, "Input",
+ CellID->1082785845],
+Cell[5722, 192, 190, 6, 35, "Output",
+ CellID->334158586]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5949, 203, 206, 7, 27, "Input",
+ CellID->1838519299],
+Cell[6158, 212, 1176, 42, 64, "Output",
+ CellID->1784481217]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7371, 259, 146, 4, 27, "Input",
+ CellID->1330916288],
+Cell[7520, 265, 189, 6, 35, "Output",
+ CellID->484198112]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7748, 276, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIsolate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIsolate.nb
index b4e6d56f2..f7c20e061 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIsolate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopIsolate.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 56913, 2028]
-NotebookOptionsPosition[ 53183, 1914]
-NotebookOutlinePosition[ 55354, 1971]
-CellTagsIndexPosition[ 55268, 1966]
+NotebookDataLength[ 76798, 2603]
+NotebookOptionsPosition[ 72629, 2474]
+NotebookOutlinePosition[ 74779, 2531]
+CellTagsIndexPosition[ 74693, 2526]
WindowTitle->FCLoopIsolate
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FCLoopIsolate.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$61028],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$110595],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCLoopIsolate", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ FCLoopIsolate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCLoopIsolate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCLoopIsolate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -85,8 +98,8 @@ Cell[BoxData[GridBox[{
RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
"InlineFormula"],
" \[LineSeparator]wraps loop integrals into heads specified by the user. \
-This is useful when you want to know which loop integrals appear appear in \
-the given expression."
+This is useful when you want to know which loop integrals appear in the given \
+expression."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,75 +110,120 @@ the given expression."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1466522251],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1763934292],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->615159128],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FCLoopIsolate", "]"}]], "Input",
- CellLabel->"In[1]:=",
- CellID->1399029530],
+ CellLabel->"In[42]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- RowBox[{"ExceptHeads", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"ExpandScalarProduct", "\[Rule]", "False"}], ",",
- RowBox[{"Head", "\[Rule]",
- RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}]}], ",",
+ RowBox[{"CFAD", "\[Rule]", "True"}], ",",
RowBox[{"ClearHeads", "\[Rule]",
RowBox[{"{",
RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}], "}"}]}], ",",
RowBox[{"Collecting", "\[Rule]", "True"}], ",",
- RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
RowBox[{"DropScaleless", "\[Rule]", "False"}], ",",
+ RowBox[{"ExceptHeads", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "False"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}], ",",
- RowBox[{"FeynAmpDenominatorSplit", "\[Rule]", "True"}], ",",
+ RowBox[{"FAD", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCLoopIBPReducableQ", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FeynAmpDenominatorSplit", "\[Rule]", "True"}], ",",
+ RowBox[{"Full", "\[Rule]", "True"}], ",",
+ RowBox[{"GFAD", "\[Rule]", "True"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}]}], ",",
RowBox[{"Isolate", "\[Rule]", "False"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
RowBox[{"MultiLoop", "\[Rule]", "False"}], ",",
- RowBox[{"PaVe", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+ RowBox[{"Numerator", "\[Rule]", "True"}], ",",
+ RowBox[{"PaVe", "\[Rule]", "True"}], ",",
+ RowBox[{"PaVeIntegralHeads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "PaVe", ",", "GenPaVe", ",", "A0", ",", "A00", ",", "B0", ",", "B00",
+ ",", "B1", ",", "B11", ",", "DB1", ",", "C0", ",", "D0"}], "}"}]}],
+ ",",
+ RowBox[{"SFAD", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{538, 92},
+ ImageSize->{539, 148},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->728887186]
+ CellLabel->"Out[42]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->132798676],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->614555026],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{"FCI", "[",
RowBox[{
RowBox[{
@@ -183,16 +241,9 @@ Cell[BoxData[{
RowBox[{"q", "-", "p1"}], ",",
RowBox[{"{",
RowBox[{
- RowBox[{"q", "-", "p2"}], ",", "m"}], "}"}]}], "]"}]}],
- "]"}], "\[IndentingNewLine]",
- RowBox[{"FCLoopIsolate", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}], ",",
- RowBox[{"Head", "\[Rule]", "loopInt"}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"Cases2", "[",
- RowBox[{"%", ",", "loopInt"}], "]"}]}], "Input",
- CellLabel->"In[2]:=",
- CellID->1295259209],
+ RowBox[{"q", "-", "p2"}], ",", "m"}], "}"}]}], "]"}]}], "]"}]], "Input",\
+
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
@@ -241,70 +292,85 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}],
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{305, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->360660091],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- RowBox[{"loopInt", "(",
- FractionBox[
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ FormBox[
RowBox[{
FormBox["q",
TraditionalForm], "-",
FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
RowBox[{
FormBox["q",
TraditionalForm], "-",
FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], " ",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{324, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIsolate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"Head", "\[Rule]", "loopInt"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1295259209],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
@@ -339,9 +405,179 @@ Cell[BoxData[
FormBox[
FormBox["p3",
TraditionalForm],
- TraditionalForm]}], ")"}]}]}]}], ")"}]}], "+",
+ TraditionalForm]}], ")"}]}]}]}], ")"}], " ",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "+",
RowBox[{"M", " ",
RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{"loopInt", "(",
+ FormBox[
FractionBox[
RowBox[{
RowBox[{"(",
@@ -357,6 +593,12 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}], " ",
RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
RowBox[{"(",
RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
@@ -370,237 +612,69 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}],
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}]}], "-",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "-",
RowBox[{"loopInt", "(",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["p3",
- TraditionalForm],
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], "-",
- RowBox[{"loopInt", "(",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["p3",
- TraditionalForm],
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], "+",
- RowBox[{"loopInt", "(",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox["p3",
- TraditionalForm],
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{563, 230},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->2088300933],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"loopInt", "(",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], ",",
- RowBox[{"loopInt", "(",
+ FormBox[
FractionBox[
RowBox[{
RowBox[{"(",
@@ -622,6 +696,12 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
RowBox[{"(",
RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
@@ -629,27 +709,69 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}],
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], ",",
- RowBox[{"loopInt", "(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "+",
+ RowBox[{"loopInt", "(",
+ FormBox[
FractionBox[
RowBox[{
RowBox[{"(",
@@ -668,7 +790,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- FormBox["p1",
+ FormBox["q",
TraditionalForm],
TraditionalForm]}], ")"}], ".",
RowBox[{"(",
@@ -684,147 +806,556 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}],
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], ",",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{322, 287},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Cases2", "[",
+ RowBox[{"%", ",", "loopInt"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
RowBox[{"loopInt", "(",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], " ",
+ FormBox[
+ FractionBox[
RowBox[{
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm]}], ")"}], ".",
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["p2",
TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["p3",
+ FormBox["q",
TraditionalForm],
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
+ TraditionalForm]}], ")"}], " ",
RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}], ",",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
RowBox[{"loopInt", "(",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p2",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], " ",
+ FormBox[
+ FractionBox[
RowBox[{
RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm]}], ")"}], ".",
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["p3",
+ FormBox["p2",
TraditionalForm],
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"loopInt", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
RowBox[{"(",
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- RowBox[{"(",
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{555, 170},
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{580, 156},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->1040995888]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{"TID", "[",
RowBox[{
RowBox[{
@@ -843,38 +1374,25 @@ Cell[BoxData[{
RowBox[{
RowBox[{"q", "+", "r"}], ",", "m"}], "}"}]}], "]"}]}], ",", "q", ",",
- RowBox[{"UsePaVeBasis", "\[Rule]", "True"}]}],
- "]"}], "\[IndentingNewLine]",
- RowBox[{"FCLoopIsolate", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}], ",",
- RowBox[{"Head", "\[Rule]", "l"}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"Cases2", "[",
- RowBox[{"%", ",", "l"}], "]"}]}], "Input",
- CellLabel->"In[3]:=",
- CellID->1424929986],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Pi]", "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ RowBox[{"UsePaVeBasis", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1424929986],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Pi]", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
FormBox[
RowBox[{
SubscriptBox["\<\"C\"\>", "\<\"00\"\>"], "(",
@@ -920,32 +1438,24 @@ Cell[BoxData[
TraditionalForm]}], "+",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Pi]", "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
FormBox[
RowBox[{
SubscriptBox["\<\"C\"\>", "\<\"11\"\>"], "(",
@@ -994,59 +1504,43 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], " ",
FormBox[
RowBox[{
SubscriptBox["\<\"C\"\>", "\<\"12\"\>"], "(",
@@ -1092,32 +1586,24 @@ Cell[BoxData[
TraditionalForm]}], "+",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Pi]", "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
FormBox[
RowBox[{
SubscriptBox["\<\"C\"\>", "\<\"22\"\>"], "(",
@@ -1161,33 +1647,36 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{473, 93},
+ ImageSize->{495, 93},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->1537902666],
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIsolate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"Head", "\[Rule]", "l"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Pi]", "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"l", "(",
FormBox[
RowBox[{
@@ -1234,32 +1723,24 @@ Cell[BoxData[
TraditionalForm], ")"}]}], "+",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Pi]", "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"l", "(",
FormBox[
RowBox[{
@@ -1309,59 +1790,43 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], " ",
RowBox[{"l", "(",
FormBox[
RowBox[{
@@ -1408,32 +1873,24 @@ Cell[BoxData[
TraditionalForm], ")"}]}], "+",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Pi]", "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"l", "(",
FormBox[
RowBox[{
@@ -1478,11 +1935,18 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{493, 93},
+ ImageSize->{516, 93},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->1668499070],
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Cases2", "[",
+ RowBox[{"%", ",", "l"}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
FormBox[
@@ -1664,16 +2128,15 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{346, 93},
+ ImageSize->{365, 93},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->379091620]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
@@ -1683,36 +2146,38 @@ Cell[BoxData[{
RowBox[{"{",
RowBox[{"q", ",", "m"}], "}"}], "]"}]}], "+",
RowBox[{"SPD", "[",
- RowBox[{"q", ",", "q"}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"FCLoopIsolate", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}], ",",
- RowBox[{"DropScaleless", "\[Rule]", "True"}]}], "]"}]}], "Input",
- CellLabel->"In[4]:=",
+ RowBox[{"q", ",", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[7]:=",
CellID->197320434],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- SuperscriptBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm], "2"],
- TraditionalForm], "2"], " ",
- FormBox[
- FractionBox["1",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`m^2, "]"],
- Editable->False]],
- TraditionalForm]}], "+",
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], "+",
FormBox[
SuperscriptBox[
FormBox[
@@ -1720,38 +2185,57 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{128, 47},
+ ImageSize->{97, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->2079129806],
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIsolate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"DropScaleless", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:="],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}], "\[InvisibleApplication]",
RowBox[{"(",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm], "4"],
- RowBox[{
+ FormBox[
+ FractionBox[
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}]], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{178, 50},
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "4"],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{171, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->1866108034]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{
RowBox[{"a", " ",
RowBox[{"FAD", "[",
@@ -1763,62 +2247,79 @@ Cell[BoxData[{
RowBox[{"b", " ",
RowBox[{"FAD", "[",
RowBox[{"{",
- RowBox[{"q1", ",", "m", ",", "2"}], "}"}],
- "]"}]}]}], "\[IndentingNewLine]",
- RowBox[{"FCLoopIsolate", "[",
- RowBox[{"%", ",",
- RowBox[{"{",
- RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"FCLoopIsolate", "[",
- RowBox[{"%%", ",",
- RowBox[{"{",
- RowBox[{"q1", ",", "q2"}], "}"}], ",",
- RowBox[{"MultiLoop", "\[Rule]", "True"}]}], "]"}]}], "Input",
- CellLabel->"In[5]:=",
- CellID->90885492],
+ RowBox[{"q1", ",", "m", ",", "2"}], "}"}], "]"}]}]}]], "Input",
+ CellLabel->"In[9]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"a", " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q1", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q1^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q2", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q2^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], "+",
- RowBox[{"b", " ",
- FormBox[
- FractionBox["1",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q1", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q1^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], "2"]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{298, 48},
+ FormBox[
+ FractionBox["a",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["b",
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], "2"]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{245, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->1208134763],
+ CellLabel->"Out[9]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIsolate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:="],
Cell[BoxData[
FormBox[
@@ -1827,44 +2328,79 @@ Cell[BoxData[
RowBox[{
RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}], "\[InvisibleApplication]",
RowBox[{"(",
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}]}]}], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}]}], "+",
RowBox[{"b", " ",
RowBox[{
RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}], "\[InvisibleApplication]",
RowBox[{"(",
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}]}]}]}],
- TraditionalForm]], "Output",
- ImageSize->{298, 110},
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], "2"]],
+ TraditionalForm], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{493, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->1977245432],
+ CellLabel->"Out[10]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopIsolate", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}], ",",
+ RowBox[{"MultiLoop", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->90885492],
Cell[BoxData[
FormBox[
@@ -1873,39 +2409,63 @@ Cell[BoxData[
RowBox[{
RowBox[{"FCGV", "(", "\<\"LoopInt\"\>", ")"}], "\[InvisibleApplication]",
RowBox[{"(",
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}]}], "+",
+ FormBox[
+ FractionBox["b",
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], ")"}]}]}], "+",
- FractionBox["b",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{455, 50},
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], "2"]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{368, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->341099354]
+ CellLabel->"Out[11]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -1915,7 +2475,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"FCLoopIsolate",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1924,10 +2484,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 19.860660}",
+ "built" -> "{2020, 1, 5, 18, 56, 33.086816}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1935,12 +2495,12 @@ TaggingRules->{
"None", "summary" ->
"FCLoopIsolate[expr, {q1, q2, ...}] wraps loop integrals into heads \
specified by the user. This is useful when you want to know which loop \
-integrals appear appear in the given expression.", "synonyms" -> {}, "title" ->
- "FCLoopIsolate", "titlemodifier" -> "", "windowtitle" -> "FCLoopIsolate",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCLoopIsolate"},
- "SearchTextTranslated" -> ""},
+integrals appear in the given expression.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopIsolate", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopIsolate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopIsolate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1949,7 +2509,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1958,78 +2518,93 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3542, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6691, 196, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1466522251]}
+ CellID->132798676]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 55125, 1959}
+ {"PrimaryExamplesSection", 74550, 2519}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 605, 17, 97, "Usage",
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3197, 91, 598, 17, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3542, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3820, 112, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1763934292],
+Cell[4562, 138, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4618, 142, 96, 2, 70, "Input"],
+Cell[4717, 146, 1913, 43, 169, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6691, 196, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1466522251],
+ CellID->132798676],
Cell[CellGroupData[{
-Cell[3955, 118, 195, 6, 25, "ExampleSection",
- CellID->615159128],
+Cell[7103, 215, 195, 6, 26, "ExampleSection",
+ CellID->614555026],
Cell[CellGroupData[{
-Cell[4175, 128, 116, 3, 27, "Input",
- CellID->1399029530],
-Cell[4294, 133, 1227, 29, 113, "Output",
- CellID->728887186]
+Cell[7323, 225, 576, 20, 45, "Input"],
+Cell[7902, 247, 3100, 109, 64, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5558, 167, 852, 27, 79, "Input",
+Cell[11039, 361, 206, 6, 27, "Input",
CellID->1295259209],
-Cell[6413, 196, 1844, 71, 69, "Output",
- CellID->360660091],
-Cell[8260, 269, 8029, 293, 251, "Output",
- CellID->2088300933],
-Cell[16292, 564, 7165, 257, 191, "Output",
- CellID->1040995888]
+Cell[11248, 369, 15554, 503, 308, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23494, 826, 865, 28, 79, "Input",
+Cell[26839, 877, 111, 3, 27, "Input"],
+Cell[26953, 882, 14849, 470, 177, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[41839, 1357, 620, 21, 45, "Input",
CellID->1424929986],
-Cell[24362, 856, 8165, 311, 114, "Output",
- CellID->1537902666],
-Cell[32530, 1169, 8457, 315, 114, "Output",
- CellID->1668499070],
-Cell[40990, 1486, 5298, 184, 114, "Output",
- CellID->379091620]
+Cell[42462, 1380, 7246, 272, 114, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[49745, 1657, 179, 5, 27, "Input"],
+Cell[49927, 1664, 7538, 276, 114, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[46325, 1675, 499, 16, 45, "Input",
+Cell[57502, 1945, 105, 3, 27, "Input"],
+Cell[57610, 1950, 5278, 183, 114, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[62925, 2138, 328, 12, 27, "Input",
CellID->197320434],
-Cell[46827, 1693, 948, 33, 68, "Output",
- CellID->2079129806],
-Cell[47778, 1728, 559, 20, 71, "Output",
- CellID->1866108034]
+Cell[63256, 2152, 1011, 38, 64, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[64304, 2195, 191, 5, 27, "Input"],
+Cell[64498, 2202, 911, 30, 64, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[65446, 2237, 375, 13, 27, "Input"],
+Cell[65824, 2252, 1854, 59, 64, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[67715, 2316, 164, 5, 27, "Input"],
+Cell[67882, 2323, 2304, 67, 67, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[48374, 1753, 735, 24, 62, "Input",
+Cell[70223, 2395, 235, 7, 27, "Input",
CellID->90885492],
-Cell[49112, 1779, 1577, 41, 69, "Output",
- CellID->1208134763],
-Cell[50692, 1822, 1307, 44, 131, "Output",
- CellID->1977245432],
-Cell[52002, 1868, 1115, 39, 71, "Output",
- CellID->341099354]
+Cell[70461, 2404, 2102, 63, 67, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[53156, 1912, 23, 0, 42, "FooterCell"]
+Cell[72602, 2472, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopMixedIntegralQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopMixedIntegralQ.nb
new file mode 100644
index 000000000..ab6490def
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopMixedIntegralQ.nb
@@ -0,0 +1,393 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11322, 383]
+NotebookOptionsPosition[ 8238, 290]
+NotebookOutlinePosition[ 10404, 347]
+CellTagsIndexPosition[ 10319, 342]
+WindowTitle->FCLoopMixedIntegralQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopMixedIntegralQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopMixedIntegralQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopMixedIntegralQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111033],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopMixedIntegralQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopMixedIntegralQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopMixedIntegralQ", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] returns True if the integral contains both Lorentz \
+and Cartesian indices and momenta."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->481937848],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->34104101],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "mu"}], "]"}], " ",
+ RowBox[{"CFAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1475735620],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ "-",
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{184, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->438100970]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopMixedIntegralQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1472762504],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->87331192]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "mu"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1995971358],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{99, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1927339880]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopMixedIntegralQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1422411320],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1289442983]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopMixedIntegralQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 34.474824}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopMixedIntegralQ[exp] returns True if the integral contains both \
+Lorentz and Cartesian indices and momenta.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopMixedIntegralQ", "titlemodifier" ->
+ "", "windowtitle" -> "FCLoopMixedIntegralQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopMixedIntegralQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3678, 105, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->481937848]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10176, 335}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 2322, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2917, 76, 297, 11, 45, "ObjectNameGrid"],
+Cell[3217, 89, 436, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3678, 105, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->481937848],
+Cell[CellGroupData[{
+Cell[4090, 124, 194, 6, 26, "ExampleSection",
+ CellID->34104101],
+Cell[CellGroupData[{
+Cell[4309, 134, 263, 9, 27, "Input",
+ CellID->1475735620],
+Cell[4575, 145, 1274, 40, 62, "Output",
+ CellID->438100970]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5886, 190, 117, 3, 27, "Input",
+ CellID->1472762504],
+Cell[6006, 195, 188, 6, 35, "Output",
+ CellID->87331192]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6231, 206, 262, 9, 27, "Input",
+ CellID->1995971358],
+Cell[6496, 217, 1328, 50, 62, "Output",
+ CellID->1927339880]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7861, 272, 117, 3, 27, "Input",
+ CellID->1422411320],
+Cell[7981, 277, 191, 6, 35, "Output",
+ CellID->1289442983]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8211, 288, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopMixedToCartesianAndTemporal.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopMixedToCartesianAndTemporal.nb
new file mode 100644
index 000000000..03cc0b101
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopMixedToCartesianAndTemporal.nb
@@ -0,0 +1,686 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19902, 676]
+NotebookOptionsPosition[ 15977, 554]
+NotebookOutlinePosition[ 18288, 614]
+CellTagsIndexPosition[ 18203, 609]
+WindowTitle->FCLoopMixedToCartesianAndTemporal
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopMixedToCartesianAndTemporal\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopMixedToCartesianAndTemporal"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopMixedToCartesianAndTemporal.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111463],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopMixedToCartesianAndTemporal", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopMixedToCartesianAndTemporal", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopMixedToCartesianAndTemporal", "[",
+ RowBox[{"int", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]attempts to convert loop integrals that contain both \
+Lorentz and Cartesian or temporal indices/momenta to pure temporal and \
+Cartesian indices."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->403141216],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopMixedToCartesianAndTemporal", "]"}]], "Input",\
+
+ CellLabel->"In[265]:=",
+ CellID->100073618],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Uncontract", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{286, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[265]=",
+ CellID->2058683118]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->166685210],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->612210414],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"SFAD", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1021152012],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{69, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1206643448]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopMixedToCartesianAndTemporal", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1421434927],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],RowBox[{"-",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm],
+ TraditionalForm]}], 0], ")"}], "2"], TraditionalForm]}],
+ "\"-\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]]}], TraditionalForm]], "Output",
+ ImageSize->{132, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1624053675]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q1", "+", "q2", "+", "p"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1679842845],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q1", TraditionalForm], "+",
+ FormBox["q2", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{184, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->749478934]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopMixedToCartesianAndTemporal", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->117589773],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ "+",
+ FormBox[
+ StyleBox["q1", Bold, StripOnInput -> False], TraditionalForm],
+ "+",
+ FormBox[
+ StyleBox["q2", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q1", TraditionalForm], "+",
+ FormBox["q2", TraditionalForm]}], TraditionalForm],
+ TraditionalForm], TraditionalForm], TraditionalForm],
+ TraditionalForm], ")"}], 0], ")"}], "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]]}], TraditionalForm]], "Output",
+ ImageSize->{330, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1876564900]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"TC", "[", "k", "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"k", ",", "mu"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"k", ",",
+ RowBox[{"k", "+", "p"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->194657007],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "+",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] +
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`k, D] +
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{99, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1195082021]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopMixedToCartesianAndTemporal", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "k", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->732847737],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["\<\"$\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["\<\"$\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]}]]}],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["k", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ FormBox["k", TraditionalForm], TraditionalForm],
+ TraditionalForm]}], 0], ")"}], "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["k", Bold, StripOnInput -> False], TraditionalForm],
+ "+",
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],RowBox[{"-",
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k", TraditionalForm], "+",
+ FormBox["p", TraditionalForm]}], TraditionalForm],
+ TraditionalForm], TraditionalForm], TraditionalForm],
+ TraditionalForm], ")"}], 0], ")"}], "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{326, 51},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->148904556]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCLoopMixedToCartesianAndTemporal",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 35.703708}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopMixedToCartesianAndTemporal[int, {q1, q2, ...}] attempts to \
+convert loop integrals that contain both Lorentz and Cartesian or temporal \
+indices/momenta to pure temporal and Cartesian indices.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCLoopMixedToCartesianAndTemporal",
+ "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopMixedToCartesianAndTemporal", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopMixedToCartesianAndTemporal"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5324, 169, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->166685210]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 18060, 602}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[605, 21, 2407, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3015, 79, 310, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3350, 94, 615, 17, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3990, 115, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->403141216],
+Cell[4731, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4787, 145, 139, 4, 70, "Input",
+ CellID->100073618],
+Cell[4929, 151, 334, 11, 37, "Output",
+ CellID->2058683118]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5324, 169, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->166685210],
+Cell[CellGroupData[{
+Cell[5736, 188, 195, 6, 26, "ExampleSection",
+ CellID->612210414],
+Cell[CellGroupData[{
+Cell[5956, 198, 126, 4, 27, "Input",
+ CellID->1021152012],
+Cell[6085, 204, 406, 12, 61, "Output",
+ CellID->1206643448]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6528, 221, 222, 6, 27, "Input",
+ CellID->1421434927],
+Cell[6753, 229, 807, 24, 64, "Output",
+ CellID->1624053675]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7597, 258, 239, 8, 27, "Input",
+ CellID->1679842845],
+Cell[7839, 268, 771, 22, 61, "Output",
+ CellID->749478934]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8647, 295, 203, 6, 27, "Input",
+ CellID->117589773],
+Cell[8853, 303, 1590, 43, 64, "Output",
+ CellID->1876564900]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10480, 351, 301, 10, 27, "Input",
+ CellID->194657007],
+Cell[10784, 363, 1511, 59, 64, "Output",
+ CellID->1195082021]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12332, 427, 176, 5, 27, "Input",
+ CellID->732847737],
+Cell[12511, 434, 3400, 113, 72, "Output",
+ CellID->148904556]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[15950, 552, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopNonIntegerPropagatorPowersFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopNonIntegerPropagatorPowersFreeQ.nb
new file mode 100644
index 000000000..43f83cb08
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopNonIntegerPropagatorPowersFreeQ.nb
@@ -0,0 +1,409 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11945, 399]
+NotebookOptionsPosition[ 8452, 292]
+NotebookOutlinePosition[ 10724, 351]
+CellTagsIndexPosition[ 10639, 346]
+WindowTitle->FCLoopNonIntegerPropagatorPowersFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopNonIntegerPropagatorPowersFreeQ.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111896],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopNonIntegerPropagatorPowersFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorPowersFreeQ", "[", "int", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]checks if the integral contains propagators raised to \
+noninteger (i.e. fractional or symbolic) powers."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->434907899],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->884172662],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",",
+ RowBox[{"m", "^", "2"}], ",", "2"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1817883675],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]], TraditionalForm]], "Output",
+ ImageSize->{157, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1270165313]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorPowersFreeQ", "[",
+ RowBox[{"FCI", "[", "%", "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1009675301],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2046340947]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",",
+ RowBox[{"m", "^", "2"}], ",", "n"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->528515647],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"],
+ RowBox[{"-", "n"}]], TraditionalForm]], "Output",
+ ImageSize->{164, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->333755154]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorPowersFreeQ", "[",
+ RowBox[{"FCI", "[", "%", "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->881584896],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1180306013]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{"l", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"1", "/", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1771674880],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SqrtBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["l", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]]], TraditionalForm]], "Output",
+ ImageSize->{121, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->213688808]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorPowersFreeQ", "[",
+ RowBox[{"FCI", "[", "%", "]"}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->2133218472],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->2098499240]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopNonIntegerPropagatorPowersFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 37.062328}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopNonIntegerPropagatorPowersFreeQ[int] checks if the integral \
+contains propagators raised to noninteger (i.e. fractional or symbolic) \
+powers.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopNonIntegerPropagatorPowersFreeQ", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopNonIntegerPropagatorPowersFreeQ", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3852, 109, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->434907899]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10496, 339}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[609, 21, 2422, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3034, 79, 314, 11, 45, "ObjectNameGrid"],
+Cell[3351, 92, 476, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3852, 109, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->434907899],
+Cell[CellGroupData[{
+Cell[4264, 128, 195, 6, 26, "ExampleSection",
+ CellID->884172662],
+Cell[CellGroupData[{
+Cell[4484, 138, 208, 7, 27, "Input",
+ CellID->1817883675],
+Cell[4695, 147, 758, 22, 61, "Output",
+ CellID->1270165313]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5490, 174, 164, 4, 27, "Input",
+ CellID->1009675301],
+Cell[5657, 180, 190, 6, 35, "Output",
+ CellID->2046340947]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5884, 191, 207, 7, 27, "Input",
+ CellID->528515647],
+Cell[6094, 200, 740, 22, 39, "Output",
+ CellID->333755154]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6871, 227, 163, 4, 27, "Input",
+ CellID->881584896],
+Cell[7037, 233, 191, 6, 35, "Output",
+ CellID->1180306013]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7265, 244, 208, 7, 27, "Input",
+ CellID->1771674880],
+Cell[7476, 253, 515, 15, 68, "Output",
+ CellID->213688808]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8028, 273, 164, 4, 27, "Input",
+ CellID->2133218472],
+Cell[8195, 279, 191, 6, 35, "Output",
+ CellID->2098499240]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8425, 290, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopNonIntegerPropagatorsFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopNonIntegerPropagatorsFreeQ.nb
new file mode 100644
index 000000000..91c996066
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopNonIntegerPropagatorsFreeQ.nb
@@ -0,0 +1,356 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10633, 346]
+NotebookOptionsPosition[ 7469, 251]
+NotebookOutlinePosition[ 9719, 310]
+CellTagsIndexPosition[ 9635, 305]
+WindowTitle->FCLoopNonIntegerPropagatorsFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopNonIntegerPropagatorsFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopNonIntegerPropagatorsFreeQ"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopNonIntegerPropagatorsFreeQ.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$112328],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopNonIntegerPropagatorsFreeQ", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopNonIntegerPropagatorsFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorsFreeQ", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]checks if the integral contains propagators raised to \
+noninteger (i.e. fractional or symbolic) powers"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1616386766],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->155269366],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->2106819447],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ "+",
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm]}],
+ TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",SuperscriptBox[
+ "m", "2"],"\"-\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{150, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1331990211]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorPowersFreeQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->587936085],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->514665586]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"1", "/", "2"}]}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1911230333],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SqrtBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ "+",
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",SuperscriptBox[
+ "m", "2"],"\"-\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+
+ "RowDefault"]]], TraditionalForm]], "Output",
+ ImageSize->{171, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2193373]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopNonIntegerPropagatorPowersFreeQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->152362916],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->715931409]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopNonIntegerPropagatorsFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 38.409878}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopNonIntegerPropagatorsFreeQ[exp] checks if the integral contains \
+propagators raised to noninteger (i.e. fractional or symbolic) powers",
+ "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopNonIntegerPropagatorsFreeQ", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopNonIntegerPropagatorsFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopNonIntegerPropagatorsFreeQ"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3817, 109, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1616386766]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9491, 298}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[604, 21, 2403, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3010, 79, 309, 11, 45, "ObjectNameGrid"],
+Cell[3322, 92, 470, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3817, 109, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1616386766],
+Cell[CellGroupData[{
+Cell[4230, 128, 195, 6, 26, "ExampleSection",
+ CellID->155269366],
+Cell[CellGroupData[{
+Cell[4450, 138, 227, 8, 27, "Input",
+ CellID->2106819447],
+Cell[4680, 148, 830, 23, 61, "Output",
+ CellID->1331990211]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5547, 176, 133, 3, 27, "Input",
+ CellID->587936085],
+Cell[5683, 181, 189, 6, 35, "Output",
+ CellID->514665586]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5909, 192, 263, 9, 27, "Input",
+ CellID->1911230333],
+Cell[6175, 203, 865, 25, 68, "Output",
+ CellID->2193373]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7077, 233, 133, 3, 27, "Input",
+ CellID->152362916],
+Cell[7213, 238, 190, 6, 35, "Output",
+ CellID->715931409]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7442, 249, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopPropagatorPowersCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopPropagatorPowersCombine.nb
new file mode 100644
index 000000000..90b7eeaf2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopPropagatorPowersCombine.nb
@@ -0,0 +1,454 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13090, 444]
+NotebookOptionsPosition[ 9494, 333]
+NotebookOutlinePosition[ 11728, 392]
+CellTagsIndexPosition[ 11643, 387]
+WindowTitle->FCLoopPropagatorPowersCombine
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopPropagatorPowersCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopPropagatorPowersCombine"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopPropagatorPowersCombine.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$112758],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopPropagatorPowersCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopPropagatorPowersCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopPropagatorPowersCombine", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]combines the same propagators in a FeynAmpDenominator \
+to one propagator raised to an integer power."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->534295068],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopPropagatorPowersCombine", "]"}]], "Input",
+ CellLabel->"In[275]:=",
+ CellID->1520756746],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[275]=",
+ CellID->2127090445]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1267022637],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->818324197],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "1"}], "}"}], ",", "1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "1"}], "}"}], ",", "1"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->439673140],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],
+ "\")\""},
+ "RowDefault"], "2"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->152014335]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"FCLoopPropagatorPowersCombine", "[", "%",
+ "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->629606014],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],
+ "\")\""},
+ "RowDefault"], "2"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2052519228],
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-", "m"}], ",",
+ RowBox[{"{",
+ RowBox[{"2", ",", "1"}], "}"}]}], "]"}], "]"}]], "Output",
+ ImageSize->{496, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1156261866]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "1"}], "}"}], ",",
+ RowBox[{"-", "1"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "1"}], "}"}], ",", "1"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1124700619],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],
+ "\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{191, 60},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1744946370]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopPropagatorPowersCombine", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1103042667],
+
+Cell[BoxData[
+ FormBox["1", TraditionalForm]], "Output",
+ ImageSize->{11, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->505690586]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCLoopPropagatorPowersCombine",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 39.720906}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopPropagatorPowersCombine[exp] combines the same propagators in a \
+FeynAmpDenominator to one propagator raised to an integer power.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopPropagatorPowersCombine", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopPropagatorPowersCombine", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopPropagatorPowersCombine"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5140, 163, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1267022637]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11499, 380}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[601, 21, 2380, 55, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2984, 78, 306, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3315, 93, 465, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3805, 110, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->534295068],
+Cell[4546, 136, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4602, 140, 134, 3, 70, "Input",
+ CellID->1520756746],
+Cell[4739, 145, 340, 11, 37, "Output",
+ CellID->2127090445]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5140, 163, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1267022637],
+Cell[CellGroupData[{
+Cell[5553, 182, 195, 6, 26, "ExampleSection",
+ CellID->818324197],
+Cell[CellGroupData[{
+Cell[5773, 192, 453, 16, 27, "Input",
+ CellID->439673140],
+Cell[6229, 210, 462, 14, 61, "Output",
+ CellID->152014335]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6728, 229, 192, 5, 45, "Input",
+ CellID->629606014],
+Cell[6923, 236, 463, 14, 61, "Output",
+ CellID->2052519228],
+Cell[7389, 252, 452, 13, 69, "Output",
+ CellID->1156261866]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7878, 270, 475, 17, 27, "Input",
+ CellID->1124700619],
+Cell[8356, 289, 720, 21, 81, "Output",
+ CellID->1744946370]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9113, 315, 126, 3, 27, "Input",
+ CellID->1103042667],
+Cell[9242, 320, 186, 6, 35, "Output",
+ CellID->505690586]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9467, 331, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopPropagatorPowersExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopPropagatorPowersExpand.nb
new file mode 100644
index 000000000..c3383b2dc
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopPropagatorPowersExpand.nb
@@ -0,0 +1,526 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15247, 516]
+NotebookOptionsPosition[ 11455, 396]
+NotebookOutlinePosition[ 13637, 454]
+CellTagsIndexPosition[ 13552, 449]
+WindowTitle->FCLoopPropagatorPowersExpand
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopPropagatorPowersExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopPropagatorPowersExpand"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopPropagatorPowersExpand.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$113189],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopPropagatorPowersExpand", ".html"]], None}]}]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopPropagatorPowersExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopPropagatorPowersExpand", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] rewrites propagators raised to integer powers as \
+products"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1122887304],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopPropagatorPowersExpand", "]"}]], "Input",
+ CellLabel->"In[283]:=",
+ CellID->691353193],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[283]=",
+ CellID->1376078338]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1233214344],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1416804014],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m", ",", "2"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1123033438],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],
+ "\")\""},
+ "RowDefault"], "2"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1160727391]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopPropagatorPowersExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1046917037],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],
+ "\")\""},
+ "RowDefault"], "2"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1656231810]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->659131636],
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-", "m"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], ",",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-", "m"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{496, 50},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->444564108]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m", ",", "2"}], "}"}], ",",
+ RowBox[{"q", "+", "p"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->488856217],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{215, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1404156276]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopPropagatorPowersExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->886566468],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{215, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->939649136]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->670891110],
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-", "m"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], ",",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-", "m"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], ",",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], "+",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], ",", "0", ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{496, 84},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->1930502220]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCLoopPropagatorPowersExpand",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 40.995282}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopPropagatorPowersExpand[exp] rewrites propagators raised to integer \
+powers as products", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopPropagatorPowersExpand", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopPropagatorPowersExpand", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopPropagatorPowersExpand"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5098, 164, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1233214344]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13408, 442}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[600, 21, 2383, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2986, 79, 305, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3316, 94, 423, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3764, 111, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1122887304],
+Cell[4506, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4562, 141, 132, 3, 70, "Input",
+ CellID->691353193],
+Cell[4697, 146, 340, 11, 37, "Output",
+ CellID->1376078338]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5098, 164, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1233214344],
+Cell[CellGroupData[{
+Cell[5511, 183, 196, 6, 26, "ExampleSection",
+ CellID->1416804014],
+Cell[CellGroupData[{
+Cell[5732, 193, 158, 5, 27, "Input",
+ CellID->1123033438],
+Cell[5893, 200, 463, 14, 61, "Output",
+ CellID->1160727391]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6393, 219, 125, 3, 27, "Input",
+ CellID->1046917037],
+Cell[6521, 224, 463, 14, 61, "Output",
+ CellID->1656231810]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7021, 243, 104, 3, 27, "Input",
+ CellID->659131636],
+Cell[7128, 248, 722, 21, 86, "Output",
+ CellID->444564108]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7887, 274, 206, 7, 27, "Input",
+ CellID->488856217],
+Cell[8096, 283, 969, 28, 61, "Output",
+ CellID->1404156276]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9102, 316, 124, 3, 27, "Input",
+ CellID->886566468],
+Cell[9229, 321, 968, 28, 61, "Output",
+ CellID->939649136]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10234, 354, 104, 3, 27, "Input",
+ CellID->670891110],
+Cell[10341, 359, 1048, 30, 120, "Output",
+ CellID->1930502220]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11428, 394, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopRemoveNegativePropagatorPowers.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopRemoveNegativePropagatorPowers.nb
new file mode 100644
index 000000000..d78e22ae8
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopRemoveNegativePropagatorPowers.nb
@@ -0,0 +1,499 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14533, 489]
+NotebookOptionsPosition[ 10884, 377]
+NotebookOutlinePosition[ 13106, 435]
+CellTagsIndexPosition[ 13021, 430]
+WindowTitle->FCLoopRemoveNegativePropagatorPowers
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopRemoveNegativePropagatorPowers.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$113622],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopRemoveNegativePropagatorPowers", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopRemoveNegativePropagatorPowers", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]rewrites propagators raised to integer powers as \
+products."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1220129947],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopRemoveNegativePropagatorPowers",
+ "]"}]], "Input",
+ CellLabel->"In[13]:=",
+ CellID->2084003220],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCLoopPropagatorPowersCombine", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{569, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[13]=",
+ CellID->829881120]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1725350482],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1004893760],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m", ",",
+ RowBox[{"-", "1"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->780191296],
+
+Cell[BoxData[
+ FormBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],RowBox[{"-", "m"}],
+ "\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], TraditionalForm]], "Output",
+ ImageSize->{91, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1358803988]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"FCLoopRemoveNegativePropagatorPowers", "[", "%",
+ "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->970414709],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-", "m"}], TraditionalForm]], "Output",
+ ImageSize->{55, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1116802626],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-", "m"}], "+",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}]}]], "Output",
+ ImageSize->{330, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->416010148]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], ",",
+ RowBox[{"q", "+", "p"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m", ",",
+ RowBox[{"-", "2"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->141400788],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],
+ "\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],
+ RowBox[{"-", "m"}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]]}]], TraditionalForm]], "Output",
+ ImageSize->{311, 60},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2048218315]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"FCLoopRemoveNegativePropagatorPowers", "[", "%",
+ "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1504944720],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-", "m"}],
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{115, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1100467970],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], "+",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], ",", "0", ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "m"}], "+",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}]}], ")"}]}]], "Output",
+ ImageSize->{399, 50},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1579813190]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopRemoveNegativePropagatorPowers",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 42.216579}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopRemoveNegativePropagatorPowers[exp] rewrites propagators raised to \
+integer powers as products.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopRemoveNegativePropagatorPowers", "titlemodifier" -> "",
+ "windowtitle" -> "FCLoopRemoveNegativePropagatorPowers", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5238, 166, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1725350482]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12877, 423}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[608, 21, 2418, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3029, 79, 313, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3367, 94, 431, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3823, 111, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1220129947],
+Cell[4565, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4621, 141, 143, 4, 70, "Input",
+ CellID->2084003220],
+Cell[4767, 147, 410, 12, 37, "Output",
+ CellID->829881120]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5238, 166, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1725350482],
+Cell[CellGroupData[{
+Cell[5651, 185, 196, 6, 26, "ExampleSection",
+ CellID->1004893760],
+Cell[CellGroupData[{
+Cell[5872, 195, 177, 6, 27, "Input",
+ CellID->780191296],
+Cell[6052, 203, 399, 11, 39, "Output",
+ CellID->1358803988]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6488, 219, 199, 5, 45, "Input",
+ CellID->970414709],
+Cell[6690, 226, 309, 12, 39, "Output",
+ CellID->1116802626],
+Cell[7002, 240, 394, 13, 51, "Output",
+ CellID->416010148]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7433, 258, 286, 10, 27, "Input",
+ CellID->141400788],
+Cell[7722, 270, 1238, 35, 81, "Output",
+ CellID->2048218315]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8997, 310, 200, 5, 45, "Input",
+ CellID->1504944720],
+Cell[9200, 317, 799, 26, 64, "Output",
+ CellID->1100467970],
+Cell[10002, 345, 816, 25, 86, "Output",
+ CellID->1579813190]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[10857, 375, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSamePropagatorHeadsQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSamePropagatorHeadsQ.nb
new file mode 100644
index 000000000..72b12b62b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSamePropagatorHeadsQ.nb
@@ -0,0 +1,383 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11700, 373]
+NotebookOptionsPosition[ 8481, 277]
+NotebookOutlinePosition[ 10783, 337]
+CellTagsIndexPosition[ 10698, 332]
+WindowTitle->FCLoopSamePropagatorHeadsQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCLoopSamePropagatorHeadsQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopSamePropagatorHeadsQ"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopSamePropagatorHeadsQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$114053],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopSamePropagatorHeadsQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopSamePropagatorHeadsQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopSamePropagatorHeadsQ", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] returns True if the FeynAmpDenominator of exp \
+contains only propagator denominators of the same type (e.g. only \
+StandardPropagatorDenominator or only CartesianPropagatorDenominator)."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->416658385],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1056470140],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"SFAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->698415375],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q", TraditionalForm], "-",
+ FormBox["p", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{181, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1009347432]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopSamePropagatorHeadsQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->74196720],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1476308724]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorCombine", "[",
+ RowBox[{
+ RowBox[{"CFAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"q", "-", "p"}]}], "]"}],
+ RowBox[{"SFAD", "[",
+ RowBox[{"l", ",",
+ RowBox[{"l", "+", "k"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->218433689],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ "-",
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False],
+ TraditionalForm]}], TraditionalForm], TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["l", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], ".",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k", TraditionalForm], "+",
+ FormBox["l", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]}]], TraditionalForm]], "Output",
+ ImageSize->{356, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->52978389]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopSamePropagatorHeadsQ", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->598882292],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1795207588]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopSamePropagatorHeadsQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 43.614524}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopSamePropagatorHeadsQ[exp] returns True if the FeynAmpDenominator \
+of exp contains only propagator denominators of the same type (e.g. only \
+StandardPropagatorDenominator or only CartesianPropagatorDenominator).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopSamePropagatorHeadsQ", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopSamePropagatorHeadsQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopSamePropagatorHeadsQ"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3848, 109, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->416658385]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10555, 325}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[598, 21, 2368, 55, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2969, 78, 303, 11, 45, "ObjectNameGrid"],
+Cell[3275, 91, 548, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3848, 109, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->416658385],
+Cell[CellGroupData[{
+Cell[4260, 128, 196, 6, 26, "ExampleSection",
+ CellID->1056470140],
+Cell[CellGroupData[{
+Cell[4481, 138, 174, 6, 27, "Input",
+ CellID->698415375],
+Cell[4658, 146, 911, 26, 61, "Output",
+ CellID->1009347432]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5606, 177, 121, 3, 27, "Input",
+ CellID->74196720],
+Cell[5730, 182, 190, 6, 35, "Output",
+ CellID->1476308724]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5957, 193, 305, 10, 27, "Input",
+ CellID->218433689],
+Cell[6265, 205, 1797, 49, 61, "Output",
+ CellID->52978389]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8099, 259, 122, 3, 27, "Input",
+ CellID->598882292],
+Cell[8224, 264, 191, 6, 35, "Output",
+ CellID->1795207588]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8454, 275, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSolutionList.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSolutionList.nb
new file mode 100644
index 000000000..93a0dad4c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSolutionList.nb
@@ -0,0 +1,954 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 29426, 944]
+NotebookOptionsPosition[ 26070, 846]
+NotebookOutlinePosition[ 28420, 906]
+CellTagsIndexPosition[ 28335, 901]
+WindowTitle->FCLoopSolutionList
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopSolutionList\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopSolutionList"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopSolutionList.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$114483],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopSolutionList", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopSolutionList", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"FCLoopSolutionList", "[",
+ RowBox[{
+ "loopList", ",", "reversedRepIndexList", ",", "canIndexList", ",",
+ "uniqueCanIndexList"}]}], "}"}], ",", "solsList"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]is an auxiliary internal function that uses the output \
+of FCLoopCanonicalize and the list of simplified integrals solsList to create \
+the substitution list of type \"Integral\" -> \"simplified Integral\""
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1425540647],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopSolutionList", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->880215929],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Dispatch", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{113, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->493603233]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2010228741],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->445215609],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"li", "=",
+ RowBox[{"FCLoopCanonicalize", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"myHead", "[",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",", "m"}], "}"}]}], "]"}]}], "]"}], "+",
+
+ RowBox[{"myHead", "[",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Rho]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Sigma]"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p"}], ",", "m"}], "}"}]}], "]"}]}], "]"}]}],
+ ",", "q", ",", "myHead"}], "]"}], " "}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->47709897],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4051\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Mu]",
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4052\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Nu]",
+ TraditionalForm]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4051\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Rho]",
+ TraditionalForm]}], ",",
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4052\"\>", ")"}],
+ TraditionalForm], "\[Rule]",
+ FormBox["\[Sigma]",
+ TraditionalForm]}]}], "}"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4051\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4052\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], ",",
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4051\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4052\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4051\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"cli4052\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{573, 176},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->617892928]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{" ",
+ RowBox[{"FCLoopSolutionList", "[",
+ RowBox[{"li", ",",
+ RowBox[{"prefactor", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"li", "[",
+ RowBox[{"[", "4", "]"}], "]"}], "/.",
+ RowBox[{"myHead", "\[Rule]", "Identity"}]}], "/.",
+ RowBox[{"q", "\[Rule]", "p"}]}], ")"}]}], ",",
+ RowBox[{"Dispatch", "\[Rule]", "False"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1357142669],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "\[Rule]",
+ FormBox[
+ FractionBox[
+ RowBox[{"prefactor", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[4 FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], ",",
+ RowBox[{
+ RowBox[{"myHead", "(",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm], ")"}], "\[Rule]",
+ FormBox[
+ FractionBox[
+ RowBox[{"prefactor", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[4 FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{350, 101},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2061283207]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCLoopSolutionList",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 44.949113}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopSolutionList[loopList, reversedRepIndexList, canIndexList, \
+uniqueCanIndexList}, solsList] is an auxiliary internal function that uses \
+the output of FCLoopCanonicalize and the list of simplified integrals \
+solsList to create the substitution list of type \"Integral\" -> \"simplified \
+Integral\"", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCLoopSolutionList", "titlemodifier" -> "", "windowtitle" ->
+ "FCLoopSolutionList", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCLoopSolutionList"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5250, 166, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2010228741]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 28191, 894}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3227, 91, 764, 20, 120, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4016, 115, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1425540647],
+Cell[4758, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4814, 145, 120, 3, 70, "Input",
+ CellID->880215929],
+Cell[4937, 150, 252, 9, 37, "Output",
+ CellID->493603233]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5250, 166, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2010228741],
+Cell[CellGroupData[{
+Cell[5663, 185, 195, 6, 26, "ExampleSection",
+ CellID->445215609],
+Cell[CellGroupData[{
+Cell[5883, 195, 953, 30, 45, "Input",
+ CellID->47709897],
+Cell[6839, 227, 11535, 359, 197, "Output",
+ CellID->617892928]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18411, 591, 472, 14, 45, "Input",
+ CellID->1357142669],
+Cell[18886, 607, 7118, 232, 122, "Output",
+ CellID->2061283207]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[26043, 844, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSplit.nb
new file mode 100644
index 000000000..ebd253dd3
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCLoopSplit.nb
@@ -0,0 +1,539 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15644, 529]
+NotebookOptionsPosition[ 11942, 419]
+NotebookOutlinePosition[ 14338, 479]
+CellTagsIndexPosition[ 14253, 474]
+WindowTitle->FCLoopSplit
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCLoopSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCLoopSplit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCLoopSplit.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$114912],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCLoopSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCLoopSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCLoopSplit", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] separates exp into following four pieces: \
+\[LineSeparator]\[LineSeparator]1) \tterms that are free of loop integrals\
+\[LineSeparator]2) \tterms with scalar loop integrals\[LineSeparator]3) \t\
+terms with tensor loop integrals, where all loop momenta are contracted \
+\[LineSeparator]4) \tterms with tensor loop integrals, where at least some \
+loop momenta have free indices\[LineSeparator]\[LineSeparator]The result is \
+returned as a list with the 4 above elements."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1887189501],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCLoopSplit", "]"}]], "Input",
+ CellLabel->"In[15]:=",
+ CellID->1603418380],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor2"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"PaVeIntegralHeads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "PaVe", ",", "GenPaVe", ",", "A0", ",", "A00", ",", "B0", ",", "B00",
+ ",", "B1", ",", "B11", ",", "DB1", ",", "C0", ",", "D0"}], "}"}]}]}],
+ "}"}], TraditionalForm]], "Output",
+ ImageSize->{534, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[15]=",
+ CellID->877488909]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1773294551],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->353035511],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->823323120],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 42},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1503217360]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopSplit", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1597311269],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"0", ",", "0", ",", "0", ",",
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{131, 42},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1245454217]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"x", "+",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}]}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->459381565],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], "+", "x"}], TraditionalForm]], "Output",
+ ImageSize->{106, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1669307330]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCLoopSplit", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->664175678],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"x", ",",
+ FormBox[
+ FractionBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm], ",", "0", ",",
+ FormBox[
+ FractionBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{181, 36},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->963406609]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCLoopSplit",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 46.121894}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCLoopSplit[exp, {q1, q2, ...}] separates exp into following four \
+pieces: 1) terms that are free of loop integrals 2) terms with scalar loop \
+integrals 3) terms with tensor loop integrals, where all loop momenta are \
+contracted 4) terms with tensor loop integrals, where at least some loop \
+momenta have free indices The result is returned as a list with the 4 above \
+elements.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCLoopSplit",
+ "titlemodifier" -> "", "windowtitle" -> "FCLoopSplit", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCLoopSplit"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5954, 179, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1773294551]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 14109, 467}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2286, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2872, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3185, 91, 918, 21, 202, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4128, 116, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1887189501],
+Cell[4870, 142, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4926, 146, 115, 3, 70, "Input",
+ CellID->1603418380],
+Cell[5044, 151, 849, 21, 75, "Output",
+ CellID->877488909]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5954, 179, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1773294551],
+Cell[CellGroupData[{
+Cell[6367, 198, 195, 6, 26, "ExampleSection",
+ CellID->353035511],
+Cell[CellGroupData[{
+Cell[6587, 208, 229, 8, 27, "Input",
+ CellID->823323120],
+Cell[6819, 218, 841, 32, 63, "Output",
+ CellID->1503217360]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7697, 255, 155, 5, 27, "Input",
+ CellID->1597311269],
+Cell[7855, 262, 974, 34, 63, "Output",
+ CellID->1245454217]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8866, 301, 253, 9, 27, "Input",
+ CellID->459381565],
+Cell[9122, 312, 1014, 36, 60, "Output",
+ CellID->1669307330]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10173, 353, 154, 5, 27, "Input",
+ CellID->664175678],
+Cell[10330, 360, 1546, 52, 57, "Output",
+ CellID->963406609]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11915, 417, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMakeIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMakeIndex.nb
new file mode 100644
index 000000000..81b3aae4a
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMakeIndex.nb
@@ -0,0 +1,380 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11013, 370]
+NotebookOptionsPosition[ 7361, 261]
+NotebookOutlinePosition[ 9794, 322]
+CellTagsIndexPosition[ 9710, 317]
+WindowTitle->FCMakeIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCMakeIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCMakeIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCMakeIndex.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$115343],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCMakeIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCMakeIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCMakeIndex", "[",
+ RowBox[{"str1", ",", "str2", ",", "head"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]generates an index with the given head out of the \
+string str1 and str2. For example, FCMakeIndex[\"Lor\",\"1\",LorentzIndex] \
+yields LorentzIndex[Lor1]. The second argument can also be an integer. \
+FCMakeIndex is useful for converting the output of different diagram \
+generators such as FeynArts or QGAF into the FeynCalc notation. It uses \
+memoization to improve the performance."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2015432507],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->610147415],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCMakeIndex", "[",
+ RowBox[{"\"\\"", ",", "\"\<1\>\""}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->733750340],
+
+Cell[BoxData[
+ FormBox["Lor1", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2039167829]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1546330290],
+
+Cell[BoxData["Lor1"], "Output",
+ ImageSize->{37, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1034572039]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCMakeIndex", "[",
+ RowBox[{"\"\\"", ",",
+ RowBox[{"{",
+ RowBox[{"3", ",", "1", ",", "4"}], "}"}], ",", "LorentzIndex"}],
+ "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->897453820],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox["Lor3",
+ TraditionalForm], ",",
+ FormBox["Lor1",
+ TraditionalForm], ",",
+ FormBox["Lor4",
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{116, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->854514805]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1618032566],
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "Lor3", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "Lor1", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "Lor4", "]"}]}], "}"}]], "Output",
+ ImageSize->{487, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->215470001]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCMakeIndex", "[",
+ RowBox[{"\"\\"", ",",
+ RowBox[{"{",
+ RowBox[{"\"\\"", ",", "1", ",",
+ RowBox[{"-", "4"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->584001586],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Suna", ",", "Sun1", ",", "SunMinus4"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{157, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->619574853]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1215526637],
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"Suna", ",", "Sun1", ",", "SunMinus4"}], "}"}]], "Output",
+ ImageSize->{183, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->864010922]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCMakeIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 47.429485}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCMakeIndex[str1, str2, head] generates an index with the given head out \
+of the string str1 and str2. For example, \
+FCMakeIndex[\"Lor\",\"1\",LorentzIndex] yields LorentzIndex[Lor1]. The second \
+argument can also be an integer. FCMakeIndex is useful for converting the \
+output of different diagram generators such as FeynArts or QGAF into the \
+FeynCalc notation. It uses memoization to improve the performance.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCMakeIndex",
+ "titlemodifier" -> "", "windowtitle" -> "FCMakeIndex", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCMakeIndex"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3958, 110, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2015432507]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9566, 310}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2286, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2872, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[3163, 89, 770, 17, 136, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3958, 110, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2015432507],
+Cell[CellGroupData[{
+Cell[4371, 129, 195, 6, 26, "ExampleSection",
+ CellID->610147415],
+Cell[CellGroupData[{
+Cell[4591, 139, 148, 4, 27, "Input",
+ CellID->733750340],
+Cell[4742, 145, 190, 6, 35, "Output",
+ CellID->2039167829]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4969, 156, 105, 3, 27, "Input",
+ CellID->1546330290],
+Cell[5077, 161, 176, 5, 51, "Output",
+ CellID->1034572039]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5290, 171, 223, 7, 27, "Input",
+ CellID->897453820],
+Cell[5516, 180, 361, 14, 35, "Output",
+ CellID->854514805]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5914, 199, 105, 3, 27, "Input",
+ CellID->1618032566],
+Cell[6022, 204, 357, 10, 51, "Output",
+ CellID->215470001]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6416, 219, 228, 7, 27, "Input",
+ CellID->584001586],
+Cell[6647, 228, 261, 9, 35, "Output",
+ CellID->619574853]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6945, 242, 105, 3, 27, "Input",
+ CellID->1215526637],
+Cell[7053, 247, 242, 7, 51, "Output",
+ CellID->864010922]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7334, 259, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMatrixIsolate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMatrixIsolate.nb
new file mode 100644
index 000000000..a35e74d60
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMatrixIsolate.nb
@@ -0,0 +1,1061 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 32012, 1051]
+NotebookOptionsPosition[ 28649, 949]
+NotebookOutlinePosition[ 30786, 1006]
+CellTagsIndexPosition[ 30701, 1001]
+WindowTitle->FCMatrixIsolate
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCDiracIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCDiracIsolate"], "\<\"FCColorIsolate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCColorIsolate"], "\<\"FCPauliIsolate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCPauliIsolate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCMatrixIsolate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCMatrixIsolate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCMatrixIsolate.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$115778],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCMatrixIsolate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCMatrixIsolate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCMatrixIsolate", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]wraps the occurring Dirac, Pauli and color objects \
+into heads specified by the user."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2116969803],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCMatrixIsolate", "]"}]], "Input",
+ CellLabel->"In[26]:=",
+ CellID->892289596],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"FCColorIsolate", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FCGV", "(", "\<\"ColorObject\"\>", ")"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "False"}]}], "}"}]}], "}"}]}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FCGV", "(", "\<\"DiracObject\"\>", ")"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracChain", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "False"}]}], "}"}]}], "}"}]}], ",",
+
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCPauliIsolate", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FCGV", "(", "\<\"PauliObject\"\>", ")"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "False"}]}], "}"}]}], "}"}]}], ",",
+
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
+ RowBox[{"Ordering", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "FCDiracIsolate", ",", "FCColorIsolate", ",", "FCPauliIsolate"}],
+ "}"}]}], ",",
+ RowBox[{"TimeConstrained", "\[Rule]", "3"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{574, 149},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[26]=",
+ CellID->690202715]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->747535],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1224702441],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "e"}], " ", "eQ", " ", "gs", " ",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k2", "]"}], ",", "mu", ",", "1"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"mu", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"k1", "+", "k2"}], "]"}]}], ")"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p2", ",", "I"}], "]"}], "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "mu", ",", "1"}], "]"}]}],
+ " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k1"}], "-", "k2"}], ",", "mu"}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu3", "}"}], ",", "Col4", ",", "Col1"}], "]"}]}], "-",
+ RowBox[{"e", " ", "eQ", " ", "gs", " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k2", "]"}], ",", "mu", ",", "1"}], "]"}],
+ ",", "i"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"p2", ",", "I"}], "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"mu", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"k2", "-", "p2"}], "]"}]}], ")"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}]}], ",",
+ "i", ",", "j"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "mu", ",", "1"}], "]"}],
+ ",", "j"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "k2"}], "+", "p2"}], ",", "mu"}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "Glu3", "}"}], ",", "Col4", ",", "Col1"}],
+ "]"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->827281752],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["mu", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k1 - $CellContext`k2],
+ FeynCalc`Momentum[-$CellContext`k1 - $CellContext`k2]],
+ "-", $CellContext`mu^2],
+ Editable->False]],
+ RowBox[{"e", " ", "eQ", " ", "gs", " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col4",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu3",
+ TraditionalForm]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "mu"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["mu", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k2 + $CellContext`p2],
+ FeynCalc`Momentum[-$CellContext`k2 + $CellContext`p2]],
+ "-", $CellContext`mu^2],
+ Editable->False]],
+ RowBox[{"e", " ", "eQ", " ", "gs", " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col4",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu3",
+ TraditionalForm]], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "mu"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{531, 139},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1730362021]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCMatrixIsolate", "[",
+ RowBox[{"%", ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]",
+ RowBox[{"{", "dch", "}"}]}], ",",
+ RowBox[{"FCColorIsolate", "\[Rule]",
+ RowBox[{"{", "cch", "}"}]}], ",",
+ RowBox[{"FCPauliIsolate", "\[Rule]",
+ RowBox[{"{", "pch", "}"}]}], ",",
+ RowBox[{"Head", "\[Rule]", "re"}], ",",
+ RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->868980652],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"cch", "(",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col4",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu3",
+ TraditionalForm]], ")"}], " ",
+ RowBox[{"re", "(",
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"e", " ", "eQ", " ", "gs"}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["mu", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k2 + $CellContext`p2],
+ FeynCalc`Momentum[-$CellContext`k2 + $CellContext`p2]],
+ "-", $CellContext`mu^2],
+ Editable->False]]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"dch", "(",
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "mu"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"cch", "(",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["Col4",
+ TraditionalForm],
+ FormBox["Col1",
+ TraditionalForm]}],
+ FormBox["Glu3",
+ TraditionalForm]], ")"}], " ",
+ RowBox[{"re", "(",
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"e", " ", "eQ", " ", "gs"}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["mu", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k1 - $CellContext`k2],
+ FeynCalc`Momentum[-$CellContext`k1 - $CellContext`k2]],
+ "-", $CellContext`mu^2],
+ Editable->False]]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"dch", "(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "mu"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{531, 145},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->987669620]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCDiracIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCDiracIsolate",
+ ButtonNote->"FCDiracIsolate"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCColorIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCColorIsolate",
+ ButtonNote->"FCColorIsolate"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCPauliIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCPauliIsolate",
+ ButtonNote->"FCPauliIsolate"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCMatrixIsolate",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 48.665163}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCMatrixIsolate[exp] wraps the occurring Dirac, Pauli and color objects \
+into heads specified by the user.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCMatrixIsolate", "titlemodifier" -> "", "windowtitle" ->
+ "FCMatrixIsolate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCMatrixIsolate"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7511, 224, 384, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->747535]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 30561, 994}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[587, 21, 3255, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3845, 101, 292, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4162, 116, 429, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4616, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2116969803],
+Cell[5358, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5414, 162, 118, 3, 70, "Input",
+ CellID->892289596],
+Cell[5535, 167, 1915, 50, 170, "Output",
+ CellID->690202715]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7511, 224, 384, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->747535],
+Cell[CellGroupData[{
+Cell[7920, 243, 196, 6, 26, "ExampleSection",
+ CellID->1224702441],
+Cell[CellGroupData[{
+Cell[8141, 253, 2451, 75, 164, "Input",
+ CellID->827281752],
+Cell[10595, 330, 8216, 272, 160, "Output",
+ CellID->1730362021]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[18848, 607, 453, 12, 45, "Input",
+ CellID->868980652],
+Cell[19304, 621, 8356, 280, 166, "Output",
+ CellID->987669620]
+}, Open ]]
+}, Open ]],
+Cell[27687, 905, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[27755, 910, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[28028, 924, 579, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[28622, 947, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMemoryAvailable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMemoryAvailable.nb
new file mode 100644
index 000000000..74a576c62
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMemoryAvailable.nb
@@ -0,0 +1,227 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 7369, 218]
+NotebookOptionsPosition[ 5222, 160]
+NotebookOutlinePosition[ 7161, 210]
+CellTagsIndexPosition[ 7118, 207]
+WindowTitle->FCMemoryAvailable
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"MemSet\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/MemSet"], "\<\"$FCMemoryAvailable\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/$FCMemoryAvailable"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCMemoryAvailable\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCMemoryAvailable"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCMemoryAvailable.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$116216],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCMemoryAvailable", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCMemoryAvailable", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["FCMemoryAvailable"], "InlineFormula"],
+ " \[LineSeparator]",
+ "is an option of MemSet. It can be set to an integer n, where n is the \
+available amount of main memory in Mega Byte. The default setting is \
+$FCMemoryAvailable."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["MemSet",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/MemSet",
+ ButtonNote->"MemSet"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["$FCMemoryAvailable",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/$FCMemoryAvailable",
+ ButtonNote->"$FCMemoryAvailable"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCMemoryAvailable",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 49.811838}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCMemoryAvailable is an option of MemSet. It can be set to an integer n, \
+where n is the available amount of main memory in Mega Byte. The default \
+setting is $FCMemoryAvailable.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCMemoryAvailable", "titlemodifier" -> "", "windowtitle" ->
+ "FCMemoryAvailable", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCMemoryAvailable"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 3141, 75, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[3733, 98, 294, 11, 70, "ObjectNameGrid"],
+Cell[4030, 111, 482, 13, 70, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4537, 128, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[4810, 142, 370, 13, 70, "SeeAlso"]
+}, Open ]],
+Cell[5195, 158, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMultiLoopTID.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMultiLoopTID.nb
index e440f2c0c..eb8f8bdf8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMultiLoopTID.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCMultiLoopTID.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17312, 629]
-NotebookOptionsPosition[ 14488, 550]
-NotebookOutlinePosition[ 16764, 608]
-CellTagsIndexPosition[ 16679, 603]
+NotebookDataLength[ 25025, 648]
+NotebookOptionsPosition[ 21594, 548]
+NotebookOutlinePosition[ 24073, 613]
+CellTagsIndexPosition[ 23953, 607]
WindowTitle->FCMultiLoopTID
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FCMultiLoopTID.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$61363],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$116658],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCMultiLoopTID", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ FCMultiLoopTID.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCMultiLoopTID", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCMultiLoopTID", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -98,6 +111,65 @@ contracted with Dirac matrices or epsilon tensors."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->451424003],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCMultiLoopTID", "]"}]], "Input",
+ CellLabel->"In[18]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"ApartFF", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{497, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[18]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -113,7 +185,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1714592034],
+ CellID->34851636],
Cell[CellGroupData[{
@@ -123,17 +195,17 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2017960885],
+ CellID->1627843658],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{"FCI", "[",
RowBox[{
RowBox[{"FVD", "[",
- RowBox[{"q1", ",", "mu"}], "]"}], " ",
+ RowBox[{"q1", ",", "\[Mu]"}], "]"}], " ",
RowBox[{"FVD", "[",
- RowBox[{"q2", ",", "nu"}], "]"}], " ",
+ RowBox[{"q2", ",", "\[Nu]"}], "]"}], " ",
RowBox[{"FAD", "[",
RowBox[{"q1", ",", "q2", ",",
RowBox[{"{",
@@ -141,12 +213,7 @@ Cell[BoxData[{
RowBox[{"{",
RowBox[{"q2", "-", "p1"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"q1", "-", "q2"}], "}"}]}], "]"}]}],
- "]"}], "\[IndentingNewLine]",
- RowBox[{"FCMultiLoopTID", "[",
- RowBox[{"%", ",",
- RowBox[{"{",
- RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]}], "Input",
+ RowBox[{"q1", "-", "q2"}], "}"}]}], "]"}]}], "]"}]], "Input",
CellLabel->"In[1]:=",
CellID->1095109255],
@@ -154,394 +221,325 @@ Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
FormBox[
FormBox["q1",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
FormBox[
FormBox["q2",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{268, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1866145795],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"D", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- RowBox[{
- SuperscriptBox[
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}],
- RowBox[{"4", " ",
- RowBox[{"(",
- RowBox[{"D", "-", "1"}], ")"}], " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- RowBox[{"D", " ",
- FormBox[
- SuperscriptBox[
FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p1",
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
TraditionalForm],
- TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}],
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{"D", "-", "1"}], ")"}], " ",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm], "4"], " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- RowBox[{
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}],
- RowBox[{
- RowBox[{"(",
- RowBox[{"D", "-", "1"}], ")"}], " ",
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- RowBox[{
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}],
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{"D", "-", "1"}], ")"}], " ",
- SuperscriptBox[
- FormBox[
- FormBox["p1",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{292, 42},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
- ImageSize->{568, 168},
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCMultiLoopTID", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQtUVNX+x/X/t/qnrqUkKVbcq4YC4oUSKwgVeYSP8JH6v39sgSXlJQFR
+01DzryGkKIjig9YNs1RM8+aLMEFlaZfQeKiYoiAIKMpDGJhhQObBzJn/DMxf
+YOacM+ex9zyY32etWvfGzG/v7+939j77nDNnf0eHrpj/j//o16/f6v9S/2v+
+krU+n3++ZP2Coer/899Rq5eFRS39dGbUmqVhSz/3CP1P9X/8t/qfqP79+mn+
+twoAAAAALASlKD/pH4FezqPf+DDlzlPC1N0BACtHaZmDUFJ15PvrLUqVrGr/
+1NffvyREFNZCswEApqCj+uCC0N9FKlVbUdTUxVdbeIaTN+QkzPT66q5E1V68
+duq8LIExRiOhaFd0tvO0KMrr04JW7pHosmESaQBglhAdOoc/IchcMOtYrUIl
+vfe1h//P9Ur+MUU5wQH7KiX1GaGxBWJco01PiIantxOWplZIeUQ1kA2jSAMA
+DBCS6uzd/rbPDR4fsvarjeuilszznbFka8YDCcvjmJDV5u5fNWPSvFxRr//e
+di08IP6eVKWoSZvmEV/GahRSxJSUbA3clFd4+OAtHIONSoiKaC0++l2OQMEn
+uKFs4JUGADhRNpzxHWY745x2Ma1oyPj0r4P/8tF5AZvlAyFteFxbuMphZEBO
+rwGoPvd6vqcOLav41md8SL4YRUzJnc0+wRt/vN/OIhbfRgnJw/Mn//1Erk5X
+28NyMcfpxGA2sEoDAJwQTRcChw+bdqJ7pS0ti3cZOCwgu5llJPU4Gf9q7wGo
+qD3m4+TtG7xyc+Kuue5zd6RXtbM715LEVIkLIz47Ui1n2Ts+jcofHw1xHOPo
+omb8hCn/W8xxoBvOBnZpAIALUc7fR9p4Hn7cfZqVV+11G2Tjc6FJ/8PK1uKf
+vpw/2Xtd0prggDfsR3ssO/rg2RJdf9QTgqyFfilV9CODZUw04GtU9ujXXYn7
+j6SEjRv4/IiAyLjDVRLtXxhlAwAsE3HeR68Ndf/nw+7jmxBkzrId7JpUISP7
+PNGUNWX46OVXWghVR82/Fox82fd4nXYS0huAmqHjGX3b4BmcTUxkYGmUEBd8
+8bZ3qjqb0tIY5xHvHq/rvoBhmg0AsEDaisJHDfnbjvvds4ai9id/25e8v3/U
+Qf4N0W/TXnFNruz8gviP/7Ef9cn1tq6/cB+ASGN21P4cOt1bh1mRV0Q6VxIY
+hCgbz86wd+vMZmthqMuU76opkggAfYv24miHIU4xpc8W9orGc6Gjhk9NKqE8
+dfYcgG03/jFuwqYS7fIdzUyCKqYpGu2oPjDJzl09fygbs5YtjC9qhQcwgFUg
+KdnkNMRhjXbFrWwtTovwcA7cmiukeTahGYDaRYy8at/kyZqHml1I78XxmElQ
+xzRFo5q7L+vD1+w9nn7mUgX8qB6wCmT1eafiZw5/7oXXFn6xOTZ2U3TkJx8v
+Tzh1u8XAE071AHzZblb0tt37dsWs+N+f//8+pbzxz8ztU18aNHb1v/IqnrL8
+/RmOmMZvVCnI+tjZftigAf3VDBg6cfUNHj+GBYA+Ts+LAnOOaexG5XWZ2+JO
+Puyaj4iO5sLkdXmoXtABgL5H5wDcSf5gx5xiGrdRRf3J6Q7+Zxq61jDK1vLs
+9Is1PH5WDwB9GoX41r+iXh9k67/j3C1Dl0GmjGn0Rom224nznO3s3wgIClu3
+PfXU9SZ4agMAAAAAAAAAAACYCn8AAIBOKisrTT0hAQDQZ2H6GgUAAAAAAAAA
+AABgaeCwX7ESSxcrkakCpYBhcNivYLJ0MTesRKYKlAIMQGe/gjemGWIlMlWg
+tK9BapuCKg5v+xUScMTsAlUqkAS3UJkcwKcUNyataUfdiaA3g/PF5H+V1VxK
+O3W3rXf/UBm+6KBnm6JsKTpx9Eoj2xe70NuvEO3laVG+414ebDN6csShsp7b
+mzOLSZpGugapJKCAOjh1wi1OJk3JNBhXqYHOIABfTZnSUXvy08kv2weRziQd
+9ekrF+8nm7KQGL7oQGqb0n4nOXh9dhMbtejtV9rv7lyRkvdEJm+6ljLHbohb
+QrmMTUzqNLKUgAb64GQJt0CZlCXr8RGjKWXQGZ7gqilj5I9PbEj+NXGiA9lM
+ohRkBntEkE4x6AxfdCBxbWi+FPzOMs125rzi8LFfkddfzq7T1v7pzcgxr87O
+bWEekyaN7CSghCa4XsItUSZVyXphLKWMOsMf9DVljLz6+JeppS1V37iTzSSK
+2mPeTov+IE0YK8MXNpBkg2i++L5T4PkmkqlEvWg8HrMhaf+hH/bFLA2aFXRF
+RBOHIdQxO2ktXOLs2dOgwhB0acQkoQvO9jQ0CafGZDJpg3dCXTLjKjXQGSYY
+t6ZMkT048uWBcolK/oB8JmnND3KYuKeSTDNbwxfmkGVDUrLR1eXzW3rTJiHO
+WzFpusZ7Wi2mPGHCSO/up1lcj0+6mJo/C3PC/VbnsnnrgCaNeCT0iM7RnoYq
+4XSYTiafkhlVqaHOMMKYNWWGtOLQl4cqNfMZ1Uwi/M3H/q20GpILKNaGL8zf
+AyLLhqxi55sOH+brPakS5weNmRDXtbu5vHKP2ysIjk+6mCql8Gr8qgOl7O6X
+UaeRuwTM9jRUCTdPmXxKZlSl9J0xw5oyQlqWOM3tb26djLcf+MLQsa4+K262
+9fyI+Or8Me7fPNCfezkYvjDvF0k2pKWxrs6RN5/qflZ42c/u9VVd0yyqmYQ6
+pnrVenT7gT/FbE8nlGnEJaEHHO1pqBJOh+lk8imZEZVyPX50MWJN2dJR/d3b
+Y0nWJLKKJHeX5fptczF8YQyZbYo4b5Gj19FavfCy+zvcbEaFXdA8xmq7Hj12
+RK/jk7H9ikJYeOJ0kUhBG1P26JddqQWizhvMSlHxmcxa2su4HjGp0ohSAhUc
+7WmoEq6HWcjkUzKjKWV5/NCAu6Y8oJpJ1OuWLR5evW8OcTV8YQa5bYr03hYP
+P1KPR2VL4bbZY21Hus8J37Rt+dhn16Ts7FdEuSGOjiE52lUkWUz1mmuZ44v9
++2npP9A18T79gdAzJkkaUUug7AYnexrqhJunTO4lM5JS9scPXU8w1xQLSmHO
+2g+2831CxA9CXLBhftwNQx6PetekCEAVk2EaMUjgYk/DMOH6mE4mx+CWqdSo
+NUWItDojOfVyPceHVgiaP7dv94U6w83LK5Nd0c8kyGIySSMGCeztaRgnnOLb
+JpHJKbilKjV2TRFCyARNMtPMZkrJEyGDphUtt87Gq1d2DitPV6D6ITLymPRp
+xCCBiz0Nw4TTYHSZHINbplLT1BQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAMAiATs2ADAnlJY5CDHZsVloNgDAFHRUH1wQ+rtIsyFl1NTFV/nu
+GC5vyEmY6fXVXYmqvXjt1HlZAmOMRnR2bHTZMIk0ADBL9AzOCEHmglma7X+l
+97728P+5nsNWPboxRTnBAfsqJfUZobEFvHfqY9poJ7zt2AxlwyjSAAADqLwC
+qQzO2q6FB2h2v1PUpE3ziC9jNQopYkpKtgZuyis8fPAWjsGG3p2wB4aygVca
+AOAEiVcglcGZ+tzr+Z46tKziW5/xIfliFDEldzb7BG/88T6WjerQuxP2wGA2
+sEoDAJyg8wok2bhbUXvMx8nbN3jl5sRdc93n7kivYrmlDdlm4OLCiM+OVGPc
+3wqpO2EPDGcDuzQAwAUrr0CWBmeEIGuhX0oV/cjgbJrGB3yNyh79uitx/5GU
+sHEDnx8REBl3uErrkMAsGwBgmbD1CmRjcKYZOp7Rtw2ewbmapvECS6OEuOCL
+t71T1dmUlsY4j3j3eF33BQzTbACABcLaK5CrwRktSGNidmqjQ9l4doa9W2c2
+WwtDXaaYzvMAAIwKB69AjgZntOCIaYpGO6oPTLJzV88fysasZQvji0zqeQAA
+RoOLVyBHgzNacMQ0RaOauy/rw9fsPZ5+5lIF/KgesAq4egVyMzgzfkzjN6oU
+ZH3sbD9s0ID+agYMnbj6BnqzagDoK3AxODNFTGM3Kq/L3BZ38mHXfER0NBcm
+r8vD430FAH0B9gZnpolp3EYV9SenO/ifaehawyhby7PTL9bw+Fk9APRpuBic
+mSKm0Rsl2m4nznO2s38jIChs3fbUU9eb4KkNAAAAAACARaB4khG2vEBs6m4A
+AGDRKB4ffi8Q2b5RFo0/AADUVFZW0gwfmEkAAOBM9+sMnk42w9y8qF5nAAAA
+YACsSQAA4A/MJAAA8AdmEmtG/ujwomlbS3n/fNN6HGRAKQDoQDy9d2zHFq93
+YnnPJJgcZMwQUAoAvVEK87//8W7Nb3O8+M8k6BxkzB1QClgspF4tfOPIazO/
+O/tYphLlcJxJ8DjIsGvOhOBTihu2mbRcpaaCaC9Pi/Id9/Jgm9GTIw6VUeya
+Lqu5lHbqblvvP6JymdHtka5Xi7Kl6MTRK41s3yYj8XyRlu9cOHvO3Llz358y
+cpjzjE+/e8D4JVqeDjKkCeTSHH8MVJw62ziUMjv8+ECdSb5KgZ603925IiXv
+iUzedC1ljt0Qt4Ry/bHVUZ++cvF+svkZicuMDqReLe13koPXZzexKS2V0Uwn
+LbkLp8SxWZPwcpChTiCnzvODQcXJso1HKZPDjx/0meSuFOiNvP5ydp22eE9v
+Ro55dXauruetUpAZ7BGRT/aKEjqXGR1IrCKaLwW/s0yzhzq/OFpYzySk0Zg5
+yNAkkF1zSGBQcZJsY1LKqDP8ockkR6UAHa2FS5w9ezo9dKKoPebttOgP0qOD
+lcsMG0hKTzRffN8p8HyT7lSC3PNFvd4+HrMhaf+hH/bFLA2aFXSl+9qI09Cm
+SyCG5hgG74S84p1fpMg2LZyVGugMEzgfBpyUAjQQwpxwv9W5eq8NtOYHOUzc
+U0lWYLYuM8whK72kZKOry+e39M8RSD1fCHHeiknTNfbZ6iv+8oQJI727HwRy
+G9o0CcTRHMPgKuqKd0KZbRo4KzXUGUZwPQy4KAUoUQqvxq86UEpyw0v4m4/9
+W2k1JFeLrF1mmHq4kJdeVrHzTYcP80key6H0fBHnB42ZENe1Qbu8co/bK7yH
+NnUCuTfHLJN0wWkq3gl1tjEope8MZusfLkoBctTLzqPbD/xJbiwvvjp/jPs3
+D/RPNBxcZhhDVnppaayrc+TNp/qfRun5IrzsZ/f6qq4zFJqZhDKBeJpjFJy2
+4l2NU2abGo5KDXeGGRwPAy5KATJkj37ZlVog6rxpqhQVn8ms7XVpIqtIcndZ
+rp9oLi4zjCHzahHnLXL0OlpLEh6l54vs/g43m1FhFzRPANuuR48d0WtoM46m
+EBaeOF0k6lzKUyQQZXPstBioeCfU2daBr1ImnWEGx8OAsVKADvU6Ypnji/37
+aek/0DXxvk4lpWVbPLx63wnj6jLDDHKvFum9LR5+5MaSSD1flC2F22aPtR3p
+Pid807blY59dzrOLJsoNcXQMyelcgJMkEHVzLLQwqLiKNtsolTLrDEO4HQbM
+lQJ8UQpz1n6w3bSPwwhxwYb5cTfIjSVxGc3oXc5zhGECUTXHPzhttukwqVIu
+hwFnpQA3pNUZyamX6zk+oUPQ/Ll9uy/UUTWPy2hGXpnsiuiAZ5JAhM3xCm4g
+2wa/bSql7A8DfkoBbhAyQZPMNFO3UvJESNk0LqMZRcuts/HqRbHDytMVSH7D
+TZ9A5M1xDk6bbUaYQimXw4C/UgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAEsFHNkAAOANJkc2pVlOSebZKwDoA6BzZOuoPrgg9HeRZtPKqKmL
+r/baQl3ekJMw0+uruxJVe/HaqfOyBEYb0nS94oDphACAuYHHZY8QZC6YpdkP
+WXrvaw//n+t1d9wR5QQH7KuU1GeExhbw3oeQshO60gz1ikNMowgBADOGp8se
+PW3XwgM02wEqatKmecSX6c1JkpKtgZvyCg8fvIVj+FFJM9QrDjHxCgEAs4eX
+y54h1Od8z/fOCQhZxbc+40PyxXonf8mdzT7BG3+8j2VnOiofOoO94hATqxAA
+sAw4uuwZRFF7zMfJ2zd45ebEXXPd5+5Ir9Ld40dcGPHZkWqMu3eR7K9uuFfs
+Y+IXAgBmAXLPvmfIHv26K3H/kZSwcQOfHxEQGXe4SmuSoCIEWQv9UqpwDy+W
+0hj1Cl+6AMDCQerZ9yyouOCLt71TH8pV0tIY5xHvHq/rvlTQDFnP6NtGWO+z
+kca0V1jSBQB9AJSefVqUjWdn2Lt1mq20Foa6TEFte4DZh44WHDEBoA+A0rNP
+S0f1gUl27ur5Q9mYtWxhfJGpbA8wSMMSEwD6ACg9+7RobiesD1+z93j6mUsV
+JvxRPQZpWGICQB8AqWefBqUg62Nn+2GDBvRXM2DoxNU3TOVXjVwappgA0AdA
+7Nknr8vcFnfyYdcAIzqaC5PX5eGxvzIMDjtCXBaHAGDhIPXsU9SfnO7gf6ah
+66SsbC3PTr9Yw+Nn9fzAYUeIy+IQACwZ1J59RNvtxHnOdvZvBASFrdueeup6
+k8nMqnHYEeKyOAQAAAAAAAAAAAAAM8UfAABEVFZWmnpAAwDQN2H6sgMAAAAA
+AAAAAAAAoAOtNw0Opxsrcc+xEpkqa1JqTaD1psHhdIPJPcfcsBKZKmtSalWg
+86ZBHw1fTDPESmSqrEmpuULqKYMqDmdvGjxONyTgiNkFqsQiCW6hMjmAT6lF
+Iau5lHbqblvv2hCS6uzd/rbPDR4fsvarjeuilszznbFka8YDCb8S6pmkKFuK
+Thy90sj2rTe03jTonW6I9vK0KN9xLw+2GT054lBZzz3bmcUkLQpdg1QSUEAd
+nLp8FieTpmQa+Crt83TUp69cvJ9sOlU2nPEdZjvjnNaRUdGQ8elfB//lo/MC
+HpvakJqktN9JDl6f3cSmEmi9adA73bTf3bkiJe+JTN50LWWO3RC3hHIZm5jU
+RWEpAQ30wcnKZ4EyKUvW4yOclfZ9lILMYI+IfDHJn4imC4HDh0070e3wKC2L
+dxk4LCC7mV+bJHYJzZeC31mm2bycVxxe3jRIo8nrL2fXaQ/Epzcjx7w6O7eF
+eUyaorCTgBKa4Hrls0SZVCXrBUelVoCi9pi306I/SIspyvn7SBvPw4+7Z1l5
+1V63QTY+F5r4NUpyJBDNF993CjzfpDuVIDdbUa9gj8dsSNp/6Id9MUuDZgVd
+efZtHv4UlDE7aS1c4uz5z4fMvW7oioJJQhecs01VPlpMJpM2eCfUJeOk1Bpo
+zQ9ymLinkuwoF+d99NpQ957pJASZs2wHuybx3TyL7EiQlGx0dfn8lv6UjtRs
+hRDnrZg0XWOorb5AL0+YMNK7+7kd1+OTLqbmz8KccL/VuWzer6ApCh4JPaJz
+zDZl+WgwnUw+JeOi1BoQ/uZj/1ZaDcnFXVtR+Kgh2g3Fu1DU/uRv+5L394/I
+b44yf0eJ7EiQVex80+HDfJKnaCjNVsT5QWMmxHXtjC6v3OP2CoLjky6mSim8
+Gr/qQCk7j0zqonCXgNkuh7p85iiTT8m4KLUGxFfnj3H/5oH+eaG9ONphiFNM
+6bPFraLxXOio4VOTSvjPxmRHgrQ01tU58uZT/U+jNFsRXvaze31V1wkF1UxC
+HVO9hD66/cCfYrYrYcqi4JLQA47Zpi4fNaaTyadkXJRaA7KKJHeX5fp5kZRs
+chrisEbr9Ki+fk6L8HAO3JorRHFrmswkRZy3yNHraC1JeJRmK7L7O9xsRoVd
+0Dywa7sePXZEr+OTcTSFsPDE6SKRgjam7NEvu1ILRJ23q5Wi4jOZtbQXhT1i
+UhUFpQQqOGabunw6mIVMPiVjrNTakJZt8fDqfW9JVp93Kn7m8OdeeG3hF5tj
+YzdFR37y8fKEU7fRbAdMbpIivbfFw4/cABOp2YqypXDb7LG2I93nhG/atnzs
+swtkdtFEuSGOjiE52iUzWUz1Cm6Z44v9+2npP9A18T793aWeMUmKgloCZTc4
+ZZumfGYpk3vJmCu1OpTCnLUfbDft0ytCXLBhftwNcgNMXGYrehfIZhSTYVEw
+SOCSbdry0WE6mRyDc1ZqJUirM5JTL9czf0yJuvlz+3ZfqKNqHpfZirwy2RX9
+TIIsJpOiYJDAPtsGymfw2yaRySk4P6VWAiETNMlMM9MqJU+ElE3jMltRtNw6
+G69eIzusPF3B7sGKEWPSFwWDBC7Zpi0fI4wuk2Nw/koBAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAADMGrBdAwCAN5hs15RmOSWZZ68AoA+Aznat
+o/rggtDfRZqtLqOmLr7aaytzeUNOwkyvr+5KVO3Fa6fOyxIYbUjT9YoDphMC
+AOYGHm8+QpC5YJZmX2Lpva89/H+u1922R5QTHLCvUlKfERpbwHoLR8ad0JVm
+qFccYhpFCACYMei9+XrQdi08QLO7oaImbZpHfJnenCQp2Rq4Ka/w8MFbOIYf
+lTRDveIQE68QADB70Hvz9UB9zvd875yAkFV86zM+JF+sd/KX3NnsE7zxx/tY
+9rOjMrMz2CsOMbEKAQDLAK3TXzeK2mM+Tt6+wSs3J+6a6z53R3qV7l474sKI
+z45UY9yii2STdsO9Yh8TvxAAMAuQO/09Q/bo112J+4+khI0b+PyIgMi4w1Va
+zwcVIcha6JdShXt4sZTGqFf40gUAFg5Sp79nQcUFX7ztnfpQrpKWxjiPePd4
+XfelgmbIekbfNsJ6n400pr3Cki4A6AOgdPrTomw8O8PerdM7prUw1GUKam8D
+zLZ6tOCICQB9AJROf1o6qg9MsnNXzx/KxqxlC+OLTOVtgEEalpgA0AdA6fSn
+RXM7YX34mr3H089cqjDhj+oxSMMSEwD6AEid/jQoBVkfO9sPGzSgv5oBQyeu
+vmEqU2rk0jDFBIA+AGKnP3ld5ra4kw+7BhjR0VyYvC4Pj/OTYXCYGOIyRgQA
+Cwep05+i/uR0B/8zDV0nZWVreXb6xRoeP6vnBw4TQ1zGiABgyaB2+iPabifO
+c7azfyMgKGzd9tRT15tM5kiNw8QQlzEiAAAAAAAAAAAAAJgF/gAAGJHKykpT
+D3oAAAAAAAAAAAAAAAAAQANatxoc3jdW4qdjJTJV1qTUmkDrVoPD+waTn465
+YSUyVdak1KpA51aDPhq+mGaIlchUWZNSc4XUZQZVHM5uNXi8b0jAEbMLVIlF
+EhyfTNxYj1KGEO3laVG+414ebDN6csShMoq9xGU1l9JO3W3r/UdCUp2929/2
+ucHjQ9Z+tXFd1JJ5vjOWbM14IOF3pOrZpihbik4cvdLI9j04tG416L1vaDLP
+LCZpUegapJKAAurg1OXDIZPZ8cwHfEotmva7O1ek5D2RyZuupcyxG+KWUK7/
+rnhHffrKxfvJplNlwxnfYbYzzmk9GhUNGZ/+dfBfPjov4LHNDaltSvud5OD1
+2U1sKoHWrQa99w1l5pnFpC4KSwlooA9OVj48Mpkcz/zApdTCkddfzq7T5vrp
+zcgxr87O1XWCVQoygz0i8sUk3yaaLgQOHzbtRLfno7Qs3mXgsIDsZn7dIjFQ
+aL4U/M4yzXbmvOLwcqtBGo0q88xi0hSFnQSU0ATXKx8mmQyOZxSgV9qnaC1c
+4uz5z4c6bieK2mPeTov+IC2mKOfvI208Dz/unmXlVXvdBtn4XGji1xWSShHN
+F993CjzfpDuVILdfUS+Pj8dsSNp/6Id9MUuDZgVdefZtHo4VlDE7Ic88DXRF
+wSShC87ZpiofLZxldsI6q70wrtK+BCHMCfdbnatrcqBqzQ9ymLinkqwe4ryP
+Xhvq3rNWhCBzlu1g1yS+22mRVUpSstHV5fNb+lM6UvsVQpy3YtJ0jcW2+gK9
+PGHCSO/u53ZchyFdTBV15mmgKQoeCT2ic8w2Zflo4CxTxSmrug0YUWnfQSm8
+Gr/qQCnJ/Snhbz72b6XVkFzctRWFjxqi3WK8C0XtT/62L3l//4j85ihTixby
+Sskqdr7p8GE+yVM0lPYr4vygMRPiuvZKl1fucXsFwTCki0mTeRqoi8JdAmYD
+HeryYZBJn1UzVNpHUK8Sj24/8Ce5k7z46vwx7t880D8vtBdHOwxxiil9tuRT
+NJ4LHTV8alIJ/9mYrFLS0lhX58ibT/U/jdJ+RXjZz+71VV0nFFQzCXVM2szT
+QFkUXBJ6wDHb1OWjhqNMrlnVxYhK+wSyR7/sSi0Qdd40VYqKz2TW9ro0kVUk
+ubss18+LpGST0xCHNVrvR/VVZVqEh3Pg1lwhilvTZLYp4rxFjl5Ha0nCo7Rf
+kd3f4WYzKuyC5oFd2/XosSN6DUPG0RTCwhOni0QK2pgGMk8Tk6ooKCVQwTHb
+1OXTga9MllmlAbfSPoV6HbHM8cX+/bT0H+iaeF8n8dKyLR5evW9cyerzTsXP
+HP7cC68t/GJzbOym6MhPPl6ecOo2mg2CyW1TpPe2ePiRW2IitV9RthRumz3W
+dqT7nPBN25aPfXb1zS6aKDfE0TEkR7teJovJIPM0MUmKgloCZTc4ZZumfChl
+ss+qCZVaHUphztoPtpv26RUhLtgwP+4GuSUmLvsVvatvM4rJsCgYJHDJNm35
+6DCdTJWRlVoJ0uqM5NTL9RwfqCFo/ty+3RfqqJrHZb8ir0x2RT+TIIvJpCgY
+JLDPtoHyGfy2SWSqjK/USiBkgiaZaWZapeSJkLJpXPYripZbZ+PVa1iHlacr
+UP3kGnlM+qJgkMAl27TlY4TRZapMpRQAAAAAAAAg5/8A3FptUQ==
+ "], {{0, 193}, {366,
+ 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{366, 193},
+ PlotRange->{{0, 366}, {0, 193}}]], "Output",
+ ImageSize->{370, 193},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1111325861]
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->618109214]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -551,7 +549,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"FCMultiLoopTID",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -560,10 +558,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 21.615738}",
+ "built" -> "{2020, 1, 5, 18, 56, 50.903800}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -573,11 +571,12 @@ TaggingRules->{
decomposition, transforming the Lorentz indices away from the loop momenta \
q1,q2,... The decomposition is applied only to the loop integrals where loop \
momenta are contracted with Dirac matrices or epsilon tensors.",
- "synonyms" -> {}, "title" -> "FCMultiLoopTID", "titlemodifier" -> "",
- "windowtitle" -> "FCMultiLoopTID", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FCMultiLoopTID"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCMultiLoopTID",
+ "titlemodifier" -> "", "windowtitle" -> "FCMultiLoopTID", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCMultiLoopTID"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -585,8 +584,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -595,42 +595,61 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3647, 100, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5651, 172, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1714592034]}
+ CellID->34851636]},
+ "RasterizedOutput"->{
+ Cell[10144, 346, 11384, 195, 214, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->618109214]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16535, 596}
+ {"PrimaryExamplesSection", 23685, 596},
+ {"RasterizedOutput", 23827, 600}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 704, 18, 112, "Usage",
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3203, 91, 704, 18, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3647, 100, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3932, 113, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->451424003],
+Cell[4673, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4729, 143, 97, 2, 70, "Input"],
+Cell[4829, 147, 761, 18, 75, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5651, 172, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1714592034],
+ CellID->34851636],
Cell[CellGroupData[{
-Cell[4060, 119, 196, 6, 25, "ExampleSection",
- CellID->2017960885],
+Cell[6062, 191, 196, 6, 26, "ExampleSection",
+ CellID->1627843658],
Cell[CellGroupData[{
-Cell[4281, 129, 649, 21, 45, "Input",
+Cell[6283, 201, 508, 16, 27, "Input",
CellID->1095109255],
-Cell[4933, 152, 1458, 62, 69, "Output",
- CellID->1866145795],
-Cell[6394, 216, 8028, 327, 189, "Output",
- CellID->1111325861]
+Cell[6794, 219, 3146, 115, 63, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9977, 339, 164, 5, 27, "Input"],
+Cell[10144, 346, 11384, 195, 214, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->618109214]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[14461, 548, 23, 0, 42, "FooterCell"]
+Cell[21567, 546, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCNIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCNIntegrate.nb
index 8e324282e..66e46b53e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCNIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCNIntegrate.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6679, 194]
-NotebookOptionsPosition[ 4156, 125]
-NotebookOutlinePosition[ 6414, 183]
-CellTagsIndexPosition[ 6340, 178]
+NotebookDataLength[ 7422, 215]
+NotebookOptionsPosition[ 5109, 155]
+NotebookOutlinePosition[ 7215, 207]
+CellTagsIndexPosition[ 7172, 204]
WindowTitle->FCNIntegrate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCNIntegrate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCNIntegrate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCIntegrate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCIntegrate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCNIntegrate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCNIntegrate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCNIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$62045],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCNIntegrate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$117538],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCNIntegrate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FCNIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCNIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCNIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,9 +148,7 @@ Cell[TextData[{
ButtonNote->"FCIntegrate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCNIntegrate",
- CellID->1196503854]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -135,10 +165,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 24.582054}",
+ "built" -> "{2020, 1, 5, 18, 56, 53.310611}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -149,10 +179,11 @@ which may return output containing both integrals that can be evaluated and \
integrals that can only be evaluated numerically. It then determines which \
integration function is used to evaluate numeric integrals. Possible settings \
include NIntegrate, (0*#1)&, (Dot[Integratedx@@#2, #1] &).", "synonyms" -> {},
- "title" -> "FCNIntegrate", "titlemodifier" -> "", "windowtitle" ->
- "FCNIntegrate", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCNIntegrate"}},
+ "tabletags" -> {}, "title" -> "FCNIntegrate", "titlemodifier" -> "",
+ "windowtitle" -> "FCNIntegrate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCNIntegrate"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +192,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FCNIntegrate"->{
- Cell[3873, 111, 241, 9, 70, "Text",
- CellTags->"FCNIntegrate",
- CellID->1196503854]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FCNIntegrate", 6225, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3025, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 669, 15, 70, "Usage",
+Cell[3612, 97, 289, 11, 70, "ObjectNameGrid"],
+Cell[3904, 110, 669, 15, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3600, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[4598, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3873, 111, 241, 9, 70, "Text",
- CellTags->"FCNIntegrate",
- CellID->1196503854]
+Cell[4871, 143, 196, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4129, 123, 23, 0, 70, "FooterCell"]
+Cell[5082, 153, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPartialD.nb
index b9811c35b..d99cb20a9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPartialD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPartialD.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12210, 425]
-NotebookOptionsPosition[ 7974, 293]
-NotebookOutlinePosition[ 10968, 377]
-CellTagsIndexPosition[ 10857, 371]
+NotebookDataLength[ 12890, 437]
+NotebookOptionsPosition[ 9117, 323]
+NotebookOutlinePosition[ 11850, 398]
+CellTagsIndexPosition[ 11738, 392]
WindowTitle->FCPartialD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCPartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCPartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FCPartialD.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$62391],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCPartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"LeftPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftPartialD"], "\<\"LeftRightPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftRightPartialD"], "\<\"RightPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RightPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCPartialD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCPartialD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCPartialD.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$117982],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCPartialD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCPartialD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCPartialD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -136,7 +174,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->601913671],
+ CellID->1502281876],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -144,13 +184,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->783737016],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"PartialD",
- CellID->521788538],
+ CellID->115965169],
Cell[CellGroupData[{
@@ -178,12 +212,11 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 27},
+ ImageSize->{47, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialD",
- CellLabel->"Out[1]=",
- CellID->1113557239]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -197,24 +230,24 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], TraditionalForm]], "Output",
- ImageSize->{39, 19},
+ TraditionalForm]], ")"}], TraditionalForm]], "Output",
+ ImageSize->{57, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialD",
- CellLabel->"Out[2]=",
- CellID->1344586855]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -231,16 +264,15 @@ Cell[BoxData[
RowBox[{"FCPartialD", "[",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",", "A", ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]], "Output",
- ImageSize->{497, 15},
+ ImageSize->{500, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->74553335]
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -284,17 +316,15 @@ Cell[TextData[{
ButtonNote->"RightPartialD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PartialD",
- CellID->1527820766]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCPartialD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -303,10 +333,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 25.795460}",
+ "built" -> "{2020, 1, 5, 18, 56, 54.192687}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -316,11 +346,11 @@ TaggingRules->{
\\[PartialD]TraditionalForm\\`TraditionalForm\\`\\[Mu]. FCPartialD is used to \
denote derivative fields. FCPartialD[LorentzIndex[\\[Mu], D]] denotes the \
D-dimensional \\[PartialD]TraditionalForm\\`TraditionalForm\\`\\[Mu].",
- "synonyms" -> {}, "title" -> "FCPartialD", "titlemodifier" -> "",
- "windowtitle" -> "FCPartialD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FCPartialD"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCPartialD",
+ "titlemodifier" -> "", "windowtitle" -> "FCPartialD", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCPartialD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -329,7 +359,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -338,95 +368,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4106, 123, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5429, 161, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->601913671]},
+ CellID->1502281876]},
"PartialD"->{
- Cell[4716, 150, 85, 2, 35, "Subsubsection",
- CellTags->"PartialD",
- CellID->521788538],
- Cell[4826, 156, 250, 8, 27, "Input",
+ Cell[6062, 190, 250, 8, 27, "Input",
CellTags->"PartialD",
CellID->426841837],
- Cell[5079, 166, 479, 19, 48, "Output",
- CellTags->"PartialD",
- CellID->1113557239],
- Cell[5595, 190, 133, 4, 27, "Input",
+ Cell[6315, 200, 458, 18, 45, "Output",
+ CellTags->"PartialD"],
+ Cell[6810, 223, 133, 4, 27, "Input",
CellTags->"PartialD",
CellID->820901076],
- Cell[5731, 196, 492, 20, 40, "Output",
- CellTags->"PartialD",
- CellID->1344586855],
- Cell[6260, 221, 131, 4, 27, "Input",
+ Cell[6946, 229, 480, 20, 40, "Output",
+ CellTags->"PartialD"],
+ Cell[7463, 254, 131, 4, 27, "Input",
CellTags->"PartialD",
CellID->820708648],
- Cell[6394, 227, 393, 11, 49, "Output",
- CellTags->"PartialD",
- CellID->74553335],
- Cell[7155, 261, 777, 27, 32, "Text",
- CellTags->"PartialD",
- CellID->1527820766]}
+ Cell[7597, 260, 374, 10, 51, "Output",
+ CellTags->"PartialD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9987, 339},
- {"PartialD", 10122, 343}
+ {"PrimaryExamplesSection", 11116, 369},
+ {"PartialD", 11252, 373}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3341, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 1188, 41, 105, "Usage",
+Cell[3926, 103, 287, 11, 45, "ObjectNameGrid"],
+Cell[4216, 116, 1188, 41, 108, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4106, 123, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5429, 161, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->601913671],
-Cell[4496, 140, 195, 6, 25, "ExampleSection",
- CellID->783737016],
+ CellID->1502281876],
Cell[CellGroupData[{
-Cell[4716, 150, 85, 2, 35, "Subsubsection",
- CellTags->"PartialD",
- CellID->521788538],
+Cell[5842, 180, 195, 6, 26, "ExampleSection",
+ CellID->115965169],
Cell[CellGroupData[{
-Cell[4826, 156, 250, 8, 27, "Input",
+Cell[6062, 190, 250, 8, 27, "Input",
CellTags->"PartialD",
CellID->426841837],
-Cell[5079, 166, 479, 19, 48, "Output",
- CellTags->"PartialD",
- CellID->1113557239]
+Cell[6315, 200, 458, 18, 45, "Output",
+ CellTags->"PartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5595, 190, 133, 4, 27, "Input",
+Cell[6810, 223, 133, 4, 27, "Input",
CellTags->"PartialD",
CellID->820901076],
-Cell[5731, 196, 492, 20, 40, "Output",
- CellTags->"PartialD",
- CellID->1344586855]
+Cell[6946, 229, 480, 20, 40, "Output",
+ CellTags->"PartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6260, 221, 131, 4, 27, "Input",
+Cell[7463, 254, 131, 4, 27, "Input",
CellTags->"PartialD",
CellID->820708648],
-Cell[6394, 227, 393, 11, 49, "Output",
- CellTags->"PartialD",
- CellID->74553335]
-}, Open ]],
-Cell[6802, 241, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7597, 260, 374, 10, 51, "Output",
+ CellTags->"PartialD"]
}, Open ]]
}, Open ]],
+Cell[7998, 274, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[6882, 247, 270, 12, 31, "SeeAlsoSection",
+Cell[8066, 279, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7155, 261, 777, 27, 32, "Text",
- CellTags->"PartialD",
- CellID->1527820766]
+Cell[8339, 293, 736, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[7947, 291, 23, 0, 42, "FooterCell"]
+Cell[9090, 321, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPatternFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPatternFreeQ.nb
new file mode 100644
index 000000000..067d77389
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPatternFreeQ.nb
@@ -0,0 +1,292 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8698, 282]
+NotebookOptionsPosition[ 5646, 193]
+NotebookOutlinePosition[ 7933, 252]
+CellTagsIndexPosition[ 7849, 247]
+WindowTitle->FCPatternFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCPatternFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCPatternFreeQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCPatternFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$118419],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCPatternFreeQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCPatternFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCPatternFreeQ", "[",
+ RowBox[{"{", "exp", "}"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields True if {exp} does not contain any pattern \
+objects, e.g. Pattern, Blank, BlankSequence and BlankNullSequence. \
+FCPatternFreeQ[{exp},{h1,h2,...}] checks that in addition to the pattern \
+objects, no heads h1, h2, ... are present."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->70537275],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2036576944],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPatternFreeQ", "[",
+ RowBox[{"{", "a", "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->537255250],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1097295116]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPatternFreeQ", "[",
+ RowBox[{"{", "a_", "}"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1128750861],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1194026401]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPatternFreeQ", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"g", "[", "x", "]"}], "}"}], ",",
+ RowBox[{"{", "g", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->362852429],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1506757428]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCPatternFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 55.418326}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCPatternFreeQ[{exp}] yields True if {exp} does not contain any pattern \
+objects, e.g. Pattern, Blank, BlankSequence and BlankNullSequence. \
+FCPatternFreeQ[{exp},{h1,h2,...}] checks that in addition to the pattern \
+objects, no heads h1, h2, ... are present.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCPatternFreeQ", "titlemodifier" -> "",
+ "windowtitle" -> "FCPatternFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCPatternFreeQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3814, 108, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->70537275]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7707, 240}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[3181, 89, 608, 15, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3814, 108, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->70537275],
+Cell[CellGroupData[{
+Cell[4225, 127, 196, 6, 26, "ExampleSection",
+ CellID->2036576944],
+Cell[CellGroupData[{
+Cell[4446, 137, 133, 4, 27, "Input",
+ CellID->537255250],
+Cell[4582, 143, 190, 6, 35, "Output",
+ CellID->1097295116]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4809, 154, 135, 4, 29, "Input",
+ CellID->1128750861],
+Cell[4947, 160, 191, 6, 35, "Output",
+ CellID->1194026401]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5175, 171, 211, 7, 27, "Input",
+ CellID->362852429],
+Cell[5389, 180, 191, 6, 35, "Output",
+ CellID->1506757428]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5619, 191, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPauliIsolate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPauliIsolate.nb
new file mode 100644
index 000000000..a4f501e6d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPauliIsolate.nb
@@ -0,0 +1,374 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11337, 364]
+NotebookOptionsPosition[ 8376, 275]
+NotebookOutlinePosition[ 10490, 332]
+CellTagsIndexPosition[ 10405, 327]
+WindowTitle->FCPauliIsolate
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCPauliIsolate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCPauliIsolate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCPauliIsolate.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$118848],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCPauliIsolate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCPauliIsolate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCPauliIsolate", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]wraps chains of Pauli matrices into heads specified by \
+the user"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1382987806],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCPauliIsolate", "]"}]], "Input",
+ CellLabel->"In[27]:=",
+ CellID->955054543],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"ClearHeads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"FCGV", "(", "\<\"PauliChain\"\>", ")"}], "}"}]}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"PauliSigma", "\[Rule]", "True"}], ",",
+ RowBox[{"PauliSigmaCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"ExceptHeads", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"PauliChain\"\>", ")"}]}], ",",
+ RowBox[{"Isolate", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
+ RowBox[{"LorentzIndex", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliXi", "\[Rule]", "True"}], ",",
+ RowBox[{"PauliEta", "\[Rule]", "True"}], ",",
+ RowBox[{"Split", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{522, 92},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[27]=",
+ CellID->2112102999]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->888861473],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1011980600],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPauliIsolate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"y", " ",
+ RowBox[{"SI", "[", "i", "]"}]}], "+",
+ RowBox[{"x", " ",
+ RowBox[{
+ RowBox[{"PauliXi", "[",
+ RowBox[{"-", "I"}], "]"}], ".",
+ RowBox[{"SIS", "[", "p1", "]"}], ".",
+ RowBox[{"PauliEta", "[", "I", "]"}], ".",
+ RowBox[{"PauliEta", "[",
+ RowBox[{"-", "I"}], "]"}], ".",
+ RowBox[{"SIS", "[", "p2", "]"}], ".",
+ RowBox[{"PauliXi", "[", "I", "]"}]}]}]}], ",",
+ RowBox[{"Head", "\[Rule]", "pChain"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->181454105],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"y", " ",
+ RowBox[{"pChain", "(",
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], "+",
+ RowBox[{"x", " ",
+ RowBox[{"pChain", "(",
+ RowBox[{
+ SuperscriptBox["\[Xi]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".", "\[Eta]"}], ")"}], " ",
+ RowBox[{"pChain", "(",
+ RowBox[{
+ SuperscriptBox["\[Eta]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".", "\[Xi]"}], ")"}]}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{409, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->500707432]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCPauliIsolate",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 56.632711}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCPauliIsolate[exp] wraps chains of Pauli matrices into heads specified \
+by the user", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCPauliIsolate", "titlemodifier" -> "", "windowtitle" ->
+ "FCPauliIsolate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCPauliIsolate"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5930, 180, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->888861473]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10262, 320}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3203, 91, 407, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3635, 107, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1382987806],
+Cell[4377, 133, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4433, 137, 117, 3, 70, "Input",
+ CellID->955054543],
+Cell[4553, 142, 1316, 31, 113, "Output",
+ CellID->2112102999]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5930, 180, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->888861473],
+Cell[CellGroupData[{
+Cell[6342, 199, 196, 6, 26, "ExampleSection",
+ CellID->1011980600],
+Cell[CellGroupData[{
+Cell[6563, 209, 613, 18, 62, "Input",
+ CellID->181454105],
+Cell[7179, 229, 1131, 39, 43, "Output",
+ CellID->500707432]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8349, 273, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPermuteMomentaRules.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPermuteMomentaRules.nb
new file mode 100644
index 000000000..f78281c52
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPermuteMomentaRules.nb
@@ -0,0 +1,374 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11148, 364]
+NotebookOptionsPosition[ 7843, 268]
+NotebookOutlinePosition[ 10230, 328]
+CellTagsIndexPosition[ 10145, 323]
+WindowTitle->FCPermuteMomentaRules
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCPermuteMomentaRules\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCPermuteMomentaRules"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCPermuteMomentaRules.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$119276],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCPermuteMomentaRules", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCPermuteMomentaRules", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCPermuteMomentaRules", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] returns a set of rules that contain all possible \
+permutations of the momenta p1, p2, ... . This can be useful when working \
+with amplitudes that exhibit a symmetry in some or all of the final state \
+momenta or when trying to find mappings between loop integrals fromdifferent \
+topologies."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->468718502],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->158181839],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPermuteMomentaRules", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->687354172],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "\[Rule]", "p2"}], ",",
+ RowBox[{"p2", "\[Rule]", "p1"}]}], "}"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{158, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->393139574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"f", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}], "/.", "%"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->20836829],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"f", "(",
+ RowBox[{"p1", ",", "p2"}], ")"}], ",",
+ RowBox[{"f", "(",
+ RowBox[{"p2", ",", "p1"}], ")"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{151, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1821074397]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPermuteMomentaRules", "[",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->266318701],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "\[Rule]", "p2"}], ",",
+ RowBox[{"p2", "\[Rule]", "p1"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "\[Rule]", "p3"}], ",",
+ RowBox[{"p3", "\[Rule]", "p1"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p2", "\[Rule]", "p3"}], ",",
+ RowBox[{"p3", "\[Rule]", "p2"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "\[Rule]", "p2"}], ",",
+ RowBox[{"p2", "\[Rule]", "p3"}], ",",
+ RowBox[{"p3", "\[Rule]", "p1"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "\[Rule]", "p3"}], ",",
+ RowBox[{"p2", "\[Rule]", "p1"}], ",",
+ RowBox[{"p3", "\[Rule]", "p2"}]}], "}"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{415, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1512346392]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"f", "[",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], "]"}], "/.", "%"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1579987801],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"f", "(",
+ RowBox[{"p1", ",", "p2", ",", "p3"}], ")"}], ",",
+ RowBox[{"f", "(",
+ RowBox[{"p2", ",", "p1", ",", "p3"}], ")"}], ",",
+ RowBox[{"f", "(",
+ RowBox[{"p3", ",", "p2", ",", "p1"}], ")"}], ",",
+ RowBox[{"f", "(",
+ RowBox[{"p1", ",", "p3", ",", "p2"}], ")"}], ",",
+ RowBox[{"f", "(",
+ RowBox[{"p2", ",", "p3", ",", "p1"}], ")"}], ",",
+ RowBox[{"f", "(",
+ RowBox[{"p3", ",", "p1", ",", "p2"}], ")"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{300, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1585727552]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCPermuteMomentaRules",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 57.865925}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCPermuteMomentaRules[{p1, p2, ...}] returns a set of rules that contain \
+all possible permutations of the momenta p1, p2, ... . This can be useful \
+when working with amplitudes that exhibit a symmetry in some or all of the \
+final state momenta or when trying to find mappings between loop integrals \
+fromdifferent topologies.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCPermuteMomentaRules", "titlemodifier" -> "", "windowtitle" ->
+ "FCPermuteMomentaRules", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCPermuteMomentaRules"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3960, 110, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->468718502]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10002, 316}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[593, 21, 2326, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2922, 76, 298, 11, 45, "ObjectNameGrid"],
+Cell[3223, 89, 712, 17, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3960, 110, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->468718502],
+Cell[CellGroupData[{
+Cell[4372, 129, 195, 6, 26, "ExampleSection",
+ CellID->158181839],
+Cell[CellGroupData[{
+Cell[4592, 139, 166, 5, 27, "Input",
+ CellID->687354172],
+Cell[4761, 146, 378, 14, 37, "Output",
+ CellID->393139574]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5176, 165, 146, 5, 27, "Input",
+ CellID->20836829],
+Cell[5325, 172, 351, 12, 37, "Output",
+ CellID->1821074397]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5713, 189, 177, 5, 27, "Input",
+ CellID->266318701],
+Cell[5893, 196, 993, 32, 56, "Output",
+ CellID->1512346392]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6923, 233, 159, 5, 27, "Input",
+ CellID->1579987801],
+Cell[7085, 240, 692, 21, 56, "Output",
+ CellID->1585727552]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7816, 266, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPrepareFAAmp.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPrepareFAAmp.nb
new file mode 100644
index 000000000..67ce7c549
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCPrepareFAAmp.nb
@@ -0,0 +1,478 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13517, 468]
+NotebookOptionsPosition[ 9923, 355]
+NotebookOutlinePosition[ 12059, 412]
+CellTagsIndexPosition[ 11974, 407]
+WindowTitle->FCPrepareFAAmp
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCPrepareFAAmp\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCPrepareFAAmp"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCPrepareFAAmp.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$119714],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCPrepareFAAmp", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCPrepareFAAmp", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCPrepareFAAmp", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] is an auxiliary function for a partial conversion of \
+a FeynArts amplitude to FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->84626899],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCPrepareFAAmp", "]"}]], "Input",
+ CellLabel->"In[44]:=",
+ CellID->1044329933],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"SMP", "\[Rule]", "False"}], ",",
+ RowBox[{"UndoChiralSplittings", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{272, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[44]=",
+ CellID->2086284360]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->46585337],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1163075600],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1251426035],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynArts`FAFeynAmpDenominator", "[",
+ RowBox[{
+ RowBox[{"FeynArts`FAPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"P", ",", "D"}], "]"}], ",",
+ RowBox[{"MW", " ",
+ RowBox[{"Sqrt", "[",
+ RowBox[{"FeynArts`FAGaugeXi", "[", "W", "]"}], "]"}]}]}], "]"}], ",",
+ RowBox[{"FeynArts`FAPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"k", ",", "D"}], "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1953497285],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"FeynArts`FAFeynAmpDenominator", "(",
+ RowBox[{
+ RowBox[{"FeynArts`FAPropagatorDenominator", "(",
+ RowBox[{
+ FormBox["P",
+ TraditionalForm], ",",
+ RowBox[{"MW", " ",
+ SqrtBox[
+ RowBox[{"FeynArts`FAGaugeXi", "(", "W", ")"}]]}]}], ")"}], ",",
+ RowBox[{"FeynArts`FAPropagatorDenominator", "(",
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], ",", "m"}], ")"}]}], ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{461, 68},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->395273206]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPrepareFAAmp", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1929840896],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["P",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ RowBox[{
+ SuperscriptBox["MW", "2"], " ",
+ SubscriptBox["\[Xi]",
+ FormBox["W",
+ TraditionalForm]]}]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`P],
+ FeynCalc`Momentum[$CellContext`P]], "-", $CellContext`MW^2
+ FeynCalc`GaugeXi[$CellContext`W]],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k],
+ FeynCalc`Momentum[$CellContext`k]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{187, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->863259577]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->170735799],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynArts`IndexDelta", "[",
+ RowBox[{
+ RowBox[{"FeynArts`Index", "[",
+ RowBox[{"Global`Gluon", ",", "1"}], "]"}], ",",
+ RowBox[{"FeynArts`Index", "[",
+ RowBox[{"Global`Gluon", ",", "2"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->688763902],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"FeynArts`IndexDelta", "(",
+ RowBox[{
+ RowBox[{"FeynArts`Index", "(",
+ RowBox[{"Gluon", ",", "1"}], ")"}], ",",
+ RowBox[{"FeynArts`Index", "(",
+ RowBox[{"Gluon", ",", "2"}], ")"}]}], ")"}], TraditionalForm]], "Output",\
+
+ ImageSize->{448, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1445715070]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCPrepareFAAmp", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->34271691],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["Glu1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Glu2",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{60, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->892754997]
+}, Open ]]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCPrepareFAAmp",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 56, 58.986259}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCPrepareFAAmp[exp] is an auxiliary function for a partial conversion of \
+a FeynArts amplitude to FeynCalc.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCPrepareFAAmp", "titlemodifier" -> "", "windowtitle" ->
+ "FCPrepareFAAmp", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCPrepareFAAmp"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4967, 160, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->46585337]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11832, 400}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3203, 91, 431, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3659, 107, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->84626899],
+Cell[4399, 133, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4455, 137, 118, 3, 70, "Input",
+ CellID->1044329933],
+Cell[4576, 142, 330, 11, 37, "Output",
+ CellID->2086284360]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4967, 160, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->46585337],
+Cell[CellGroupData[{
+Cell[5378, 179, 196, 6, 26, "ExampleSection",
+ CellID->1163075600],
+Cell[5577, 187, 113, 3, 27, "Input",
+ CellID->1251426035],
+Cell[CellGroupData[{
+Cell[5715, 194, 561, 15, 62, "Input",
+ CellID->1953497285],
+Cell[6279, 211, 620, 20, 89, "Output",
+ CellID->395273206]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6936, 236, 111, 3, 27, "Input",
+ CellID->1929840896],
+Cell[7050, 241, 1366, 45, 64, "Output",
+ CellID->863259577]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8453, 291, 125, 3, 9, "ExampleDelimiter",
+ CellID->170735799],
+Cell[CellGroupData[{
+Cell[8603, 298, 294, 8, 45, "Input",
+ CellID->688763902],
+Cell[8900, 308, 406, 13, 37, "Output",
+ CellID->1445715070]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9343, 326, 109, 3, 27, "Input",
+ CellID->34271691],
+Cell[9455, 331, 390, 16, 38, "Output",
+ CellID->892754997]
+}, Open ]]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9896, 353, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCProductSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCProductSplit.nb
new file mode 100644
index 000000000..29e04113c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCProductSplit.nb
@@ -0,0 +1,386 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11113, 376]
+NotebookOptionsPosition[ 7619, 272]
+NotebookOutlinePosition[ 9966, 332]
+CellTagsIndexPosition[ 9882, 327]
+WindowTitle->FCProductSplit
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCProductSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCProductSplit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCProductSplit.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$120146],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCProductSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCProductSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCProductSplit", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{",
+ RowBox[{"v1", ",", "v2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]splits expr into pieces that are free of any occurence \
+of v1, v2, ... and pieces that contain those variables. This works both on \
+sums and products. The output is provided in the form of a two element list. \
+One can recover the original expression by applying Total to that list."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->501285284],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCProductSplit", "]"}]], "Input",
+ CellLabel->"In[39]:=",
+ CellID->1951530481],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Abort", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{99, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[39]=",
+ CellID->1700704682]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1103055477],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->441132599],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCProductSplit", "[",
+ RowBox[{
+ RowBox[{"c", "^", "2"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1564402182],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["c", "2"], ",", "1"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{51, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->904376361]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCProductSplit", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"a", "^", "2"}], "*", "b"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1806431082],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"b", ",",
+ SuperscriptBox["a", "2"]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{56, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->576362631]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCProductSplit", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"a", "^", "2"}], "+", "b"}], ")"}], "*", "b", "*",
+ RowBox[{"(",
+ RowBox[{"c", "+", "d"}], ")"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "c"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->719144238],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["a", "2"], "+", "b"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"c", "+", "d"}], ")"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{149, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1449583202]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCProductSplit",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 0.184309}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCProductSplit[exp, {v1, v2, ...}] splits expr into pieces that are free \
+of any occurence of v1, v2, ... and pieces that contain those variables. This \
+works both on sums and products. The output is provided in the form of a two \
+element list. One can recover the original expression by applying Total to \
+that list.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCProductSplit",
+ "titlemodifier" -> "", "windowtitle" -> "FCProductSplit", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCProductSplit"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5190, 163, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1103055477]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9738, 320}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3203, 91, 734, 18, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3962, 113, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->501285284],
+Cell[4703, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4759, 143, 118, 3, 70, "Input",
+ CellID->1951530481],
+Cell[4880, 148, 249, 8, 35, "Output",
+ CellID->1700704682]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5190, 163, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1103055477],
+Cell[CellGroupData[{
+Cell[5603, 182, 195, 6, 26, "ExampleSection",
+ CellID->441132599],
+Cell[CellGroupData[{
+Cell[5823, 192, 182, 6, 27, "Input",
+ CellID->1564402182],
+Cell[6008, 200, 259, 9, 42, "Output",
+ CellID->904376361]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6304, 214, 207, 7, 27, "Input",
+ CellID->1806431082],
+Cell[6514, 223, 259, 9, 42, "Output",
+ CellID->576362631]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6810, 237, 345, 12, 27, "Input",
+ CellID->719144238],
+Cell[7158, 251, 395, 14, 42, "Output",
+ CellID->1449583202]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7592, 270, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCProgressBar.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCProgressBar.nb
new file mode 100644
index 000000000..1fb8bd419
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCProgressBar.nb
@@ -0,0 +1,259 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 7948, 250]
+NotebookOptionsPosition[ 5247, 172]
+NotebookOutlinePosition[ 7445, 230]
+CellTagsIndexPosition[ 7361, 225]
+WindowTitle->FCProgressBar
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCProgressBar\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCProgressBar"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCProgressBar.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$120580],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCProgressBar", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCProgressBar", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCProgressBar", "[",
+ RowBox[{"text", ",", "i", ",", "total"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is a simple auxiliary function that can be used to \
+display the progress of a certain evaluation, e.g. mapping a list of \
+integrals to some function. Here i is the number of the current step while \
+total denotes the overall number of steps."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1],
+
+Cell["A simple usage example", "Notes",
+ CellID->797405968],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Table", "[",
+ RowBox[{
+ RowBox[{"FCProgressBar", "[",
+ RowBox[{"\"\\"", ",", " ", "i", ",", " ", "10"}],
+ "]"}], ",", " ",
+ RowBox[{"{",
+ RowBox[{"i", ",", " ", "1", ",", " ", "10"}], "}"}]}], "]"}],
+ ";"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->872772427],
+
+Cell["\<\
+Calculating integral 1 / 10
+Calculating integral 2 / 10
+Calculating integral 3 / 10
+Calculating integral 4 / 10
+Calculating integral 5 / 10
+Calculating integral 6 / 10
+Calculating integral 7 / 10
+Calculating integral 8 / 10
+Calculating integral 9 / 10
+Calculating integral 10 / 10\
+\>", "Print",
+ CellID->1350698012]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"FCProgressBar",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 1.396183}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCProgressBar[text, i, total] is a simple auxiliary function that can be \
+used to display the progress of a certain evaluation, e.g. mapping a list of \
+integrals to some function. Here i is the number of the current step while \
+total denotes the overall number of steps.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCProgressBar", "titlemodifier" -> "",
+ "windowtitle" -> "FCProgressBar", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCProgressBar"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3828, 108, 379, 15, 70, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7226, 218}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 2294, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2882, 76, 290, 11, 70, "ObjectNameGrid"],
+Cell[3175, 89, 628, 15, 70, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3828, 108, 379, 15, 70, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1],
+Cell[CellGroupData[{
+Cell[4232, 127, 187, 6, 70, "ExampleSection",
+ CellID->1],
+Cell[4422, 135, 59, 1, 70, "Notes",
+ CellID->797405968],
+Cell[CellGroupData[{
+Cell[4506, 140, 346, 11, 70, "Input",
+ CellID->872772427],
+Cell[4855, 153, 326, 12, 70, "Print",
+ CellID->1350698012]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5220, 170, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCRenameDummyIndices.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCRenameDummyIndices.nb
new file mode 100644
index 000000000..dfba96374
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCRenameDummyIndices.nb
@@ -0,0 +1,806 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 22138, 796]
+NotebookOptionsPosition[ 18304, 685]
+NotebookOutlinePosition[ 20796, 747]
+CellTagsIndexPosition[ 20711, 742]
+WindowTitle->FCRenameDummyIndices
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FCCanonicalizeDummyIndices\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCCanonicalizeDummyIndices"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCCanonicalizeDummyIndices.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$121017],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCCanonicalizeDummyIndices", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCRenameDummyIndices", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCRenameDummyIndices", "[", "expr", "]"}]], "InlineFormula"],
+ " \[LineSeparator] identifies all dummy Lorentz and SU(N) indices and \
+changes their names pairwise to random symbols. This can be useful if you \
+have an expression that contains dummy indices and want to compute the square \
+of it. For example, the square of GA[a, l, a] equals 16. However, if you \
+forget to rename the dummy indices and compute GA[a, l, a, a, l, a] instead \
+of GA[a, l, a, b, l, b], you will get 64."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->364030378],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCRenameDummyIndices", "]"}]], "Input",
+ CellLabel->"In[51]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "LorentzIndex", ",", "CartesianIndex", ",", "SUNIndex", ",",
+ "SUNFIndex"}], "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{396, 34},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[51]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1548271086],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->180838452],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "mu"}], "]"}],
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "mu"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "nu"}], "]"}],
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "nu"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "si"}], "]"}],
+ RowBox[{"FVD", "[",
+ RowBox[{"r", ",", "si"}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->720389846],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["si",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["si",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{192, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCRenameDummyIndices", "[", "%", "]"}], "//", "Factor2"}]], "Input",\
+
+ CellLabel->"In[2]:=",
+ CellID->1752687288],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$493", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$493", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$494", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$494", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$495", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$495", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{438, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Uncontract", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}], "^", "2"}], ",", "q", ",", "p", ",",
+ RowBox[{"Pair", "\[Rule]", "All"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1834012343],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$496", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$497", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$496", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$497", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{277, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCRenameDummyIndices", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->151485661],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$498", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$499", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$498", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$499", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{277, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"amp", "=",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "Lor1", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "k2", "]"}]}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "Lor1", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"k1", "+", "k2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], ")"}]}]}],
+ ";"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"amp", "//", "FCRenameDummyIndices"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1] +
+ FeynCalc`Momentum[$CellContext`k2],
+ FeynCalc`Momentum[$CellContext`k1] +
+ FeynCalc`Momentum[$CellContext`k2]]],
+ Editable->False]],
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$500", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "\[Mu]"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$500", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "\[Mu]"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{386, 68},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"FCRenameDummyIndices",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 2.250816}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCRenameDummyIndices[expr] identifies all dummy Lorentz and SU(N) \
+indices and changes their names pairwise to random symbols. This can be \
+useful if you have an expression that contains dummy indices and want to \
+compute the square of it. For example, the square of GA[a, l, a] equals 16. \
+However, if you forget to rename the dummy indices and compute GA[a, l, a, a, \
+l, a] instead of GA[a, l, a, b, l, b], you will get 64.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCRenameDummyIndices", "titlemodifier" ->
+ "", "windowtitle" -> "FCRenameDummyIndices", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCCanonicalizeDummyIndices"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5513, 168, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1548271086]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 20567, 735}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 2368, 55, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2963, 78, 297, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3285, 93, 753, 16, 136, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4063, 113, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->364030378],
+Cell[4804, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4860, 143, 103, 2, 70, "Input"],
+Cell[4966, 147, 486, 14, 55, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5513, 168, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1548271086],
+Cell[CellGroupData[{
+Cell[5926, 187, 195, 6, 26, "ExampleSection",
+ CellID->180838452],
+Cell[CellGroupData[{
+Cell[6146, 197, 498, 18, 27, "Input",
+ CellID->720389846],
+Cell[6647, 217, 1640, 75, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8324, 297, 149, 5, 27, "Input",
+ CellID->1752687288],
+Cell[8476, 304, 1868, 75, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10381, 384, 267, 8, 27, "Input",
+ CellID->1834012343],
+Cell[10651, 394, 1230, 50, 40, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11918, 449, 116, 3, 27, "Input",
+ CellID->151485661],
+Cell[12037, 454, 1230, 50, 40, "Output"]
+}, Open ]],
+Cell[13282, 507, 1268, 36, 99, "Input"],
+Cell[CellGroupData[{
+Cell[14575, 547, 94, 2, 27, "Input"],
+Cell[14672, 551, 3566, 127, 89, "Output"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[18277, 683, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceAll.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceAll.nb
new file mode 100644
index 000000000..e480d653f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceAll.nb
@@ -0,0 +1,302 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8907, 292]
+NotebookOptionsPosition[ 5904, 203]
+NotebookOutlinePosition[ 8140, 262]
+CellTagsIndexPosition[ 8056, 257]
+WindowTitle->FCReplaceAll
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCReplaceAll\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCReplaceAll"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCReplaceAll.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$121450],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCReplaceAll", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCReplaceAll", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCReplaceAll", "[",
+ RowBox[{"exp", ",", " ", "ru1", ",", " ", "..."}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]is like ReplaceAll, but it also allows to apply \
+multiple replacement rules sequentially. Instead of doing exp /. ru1 /. ru2 \
+/. ru3 one can just write FCReplaceAll[exp, ru1, ru2, ru3]"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2137324929],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1901306597],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceAll", "[",
+ RowBox[{"a", ",",
+ RowBox[{"a", "\[Rule]", "b"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->52762404],
+
+Cell[BoxData[
+ FormBox["b", TraditionalForm]], "Output",
+ ImageSize->{16, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1612762649]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceAll", "[",
+ RowBox[{
+ RowBox[{"a", " ", "c"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"a", "\[Rule]", "b"}], ",",
+ RowBox[{"c", "\[Rule]", "d"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1810816466],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"b", " ", "d"}], TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2011322610]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceAll", "[",
+ RowBox[{
+ RowBox[{"a", " ", "c"}], ",",
+ RowBox[{"a", "\[Rule]", "b"}], ",",
+ RowBox[{"c", "\[Rule]", "d"}], ",",
+ RowBox[{"d", "\[Rule]", "e"}], ",",
+ RowBox[{"b", "\[Rule]", "f"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1366564949],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"e", " ", "f"}], TraditionalForm]], "Output",
+ ImageSize->{28, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2023491188]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCReplaceAll",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 3.448841}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCReplaceAll[exp, ru1, ...] is like ReplaceAll, but it also allows to \
+apply multiple replacement rules sequentially. Instead of doing exp /. ru1 /. \
+ru2 /. ru3 one can just write FCReplaceAll[exp, ru1, ru2, ru3]",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCReplaceAll",
+ "titlemodifier" -> "", "windowtitle" -> "FCReplaceAll", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCReplaceAll"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3779, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2137324929]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7912, 250}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[584, 21, 2290, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2877, 76, 289, 11, 45, "ObjectNameGrid"],
+Cell[3169, 89, 585, 15, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3779, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2137324929],
+Cell[CellGroupData[{
+Cell[4192, 127, 196, 6, 26, "ExampleSection",
+ CellID->1901306597],
+Cell[CellGroupData[{
+Cell[4413, 137, 160, 5, 27, "Input",
+ CellID->52762404],
+Cell[4576, 144, 187, 6, 35, "Output",
+ CellID->1612762649]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4800, 155, 269, 9, 27, "Input",
+ CellID->1810816466],
+Cell[5072, 166, 210, 7, 35, "Output",
+ CellID->2011322610]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5319, 178, 306, 9, 27, "Input",
+ CellID->1366564949],
+Cell[5628, 189, 210, 7, 35, "Output",
+ CellID->2023491188]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5877, 201, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceD.nb
index e971ae44a..aa2d53b13 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceD.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11444, 394]
-NotebookOptionsPosition[ 8288, 303]
-NotebookOutlinePosition[ 10561, 361]
-CellTagsIndexPosition[ 10476, 356]
+NotebookDataLength[ 12820, 450]
+NotebookOptionsPosition[ 9291, 346]
+NotebookOutlinePosition[ 11609, 406]
+CellTagsIndexPosition[ 11524, 401]
WindowTitle->FCReplaceD
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$62730],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$121883],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCReplaceD", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCReplaceD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCReplaceD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,6 +109,58 @@ ChangeDimension."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->48787311],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCReplaceD", "]"}]], "Input",
+ CellLabel->"In[61]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{440, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[61]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -111,7 +176,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1131085421],
+ CellID->599988697],
Cell[CellGroupData[{
@@ -121,52 +186,50 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->843909327],
+ CellID->1870792752],
Cell["\<\
Applying the replacement rule directly to the expression doesn't give the \
desired result\
-\>", "ExampleText",
- CellID->1023979741],
+\>", "Notes"],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{"FCI", "[",
RowBox[{"D", " ",
RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"%", "/.",
- RowBox[{"D", "\[Rule]",
- RowBox[{"4", "-",
- RowBox[{"2", "Epsilon"}]}]}]}]}], "Input",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}], "]"}]], "Input",
CellLabel->"In[1]:=",
CellID->1718131501],
Cell[BoxData[
FormBox[
RowBox[{"D", " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{48, 17},
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{53, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->871175171],
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "/.",
+ RowBox[{"D", "\[Rule]",
+ RowBox[{"4", "-",
+ RowBox[{"2", "Epsilon"}]}]}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -176,52 +239,40 @@ Cell[BoxData[
RowBox[{"2", " ",
TagBox["\[CurlyEpsilon]",
TraditionalForm]}]}], ")"}], " ",
- FormBox[
- SuperscriptBox[
- SubscriptBox["g",
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"4", "-",
- RowBox[{"2", " ",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm]}]}], ",",
- RowBox[{"4", "-",
- RowBox[{"2", " ",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm]}]}]}], "}"}],
- TraditionalForm]],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{170, 22},
+ SuperscriptBox[
+ SubscriptBox["g",
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"4", "-",
+ RowBox[{"2", " ",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]}]}], ",",
+ RowBox[{"4", "-",
+ RowBox[{"2", " ",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]}]}]}], "}"}],
+ TraditionalForm]],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{171, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->430882547]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell[TextData[{
- "With ",
- StyleBox["FCReplaceD", "Input"],
- " we get what we want"
-}], "ExampleText",
- CellID->961744640],
+Cell["With FCReplaceD we get what we want", "Notes"],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{"FCReplaceD", "[",
RowBox[{
RowBox[{"D", " ",
@@ -229,10 +280,8 @@ Cell[BoxData[{
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}], ",",
RowBox[{"D", "\[Rule]",
RowBox[{"4", "-",
- RowBox[{"2", "Epsilon"}]}]}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"ChangeDimension", "[",
- RowBox[{"%", ",", "4"}], "]"}]}], "Input",
- CellLabel->"In[2]:=",
+ RowBox[{"2", "Epsilon"}]}]}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
CellID->1500698710],
Cell[BoxData[
@@ -243,27 +292,28 @@ Cell[BoxData[
RowBox[{"2", " ",
TagBox["\[CurlyEpsilon]",
TraditionalForm]}]}], ")"}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{92, 17},
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{96, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->582387944],
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{"%", ",", "4"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
@@ -273,28 +323,21 @@ Cell[BoxData[
RowBox[{"2", " ",
TagBox["\[CurlyEpsilon]",
TraditionalForm]}]}], ")"}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{94, 17},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{98, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->2085927952]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -313,10 +356,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 27.296247}",
+ "built" -> "{2020, 1, 5, 18, 57, 4.473708}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -326,11 +369,12 @@ TaggingRules->{
replacement rule (e.g. D -> 4 - 2*Epsilon) but doesn't touch D inside Pairs \
and DiracGammas, i.e the dimension of scalar products, metric tensors and \
dirac matrices is unchanged. The latter can and should be done via \
-ChangeDimension.", "synonyms" -> {}, "title" -> "FCReplaceD", "titlemodifier" ->
- "", "windowtitle" -> "FCReplaceD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FCReplaceD"}, "SearchTextTranslated" -> ""},
+ChangeDimension.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCReplaceD", "titlemodifier" -> "", "windowtitle" -> "FCReplaceD",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCReplaceD"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -338,8 +382,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -348,54 +393,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3573, 98, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5182, 163, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1131085421]}
+ CellID->599988697]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10333, 349}
+ {"PrimaryExamplesSection", 11381, 394}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 2281, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 655, 16, 113, "Usage",
+Cell[2866, 76, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3178, 91, 655, 16, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3573, 98, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3858, 111, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->48787311],
+Cell[4598, 137, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4654, 141, 93, 2, 70, "Input"],
+Cell[4750, 145, 371, 11, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5182, 163, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1131085421],
+ CellID->599988697],
Cell[CellGroupData[{
-Cell[3986, 117, 195, 6, 25, "ExampleSection",
- CellID->843909327],
-Cell[4184, 125, 142, 4, 34, "ExampleText",
- CellID->1023979741],
+Cell[5594, 182, 196, 6, 26, "ExampleSection",
+ CellID->1870792752],
+Cell[5793, 190, 115, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4351, 133, 319, 10, 45, "Input",
+Cell[5933, 197, 187, 6, 27, "Input",
CellID->1718131501],
-Cell[4673, 145, 550, 23, 38, "Output",
- CellID->871175171],
-Cell[5226, 170, 1049, 41, 43, "Output",
- CellID->430882547]
+Cell[6123, 205, 398, 16, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6558, 226, 152, 5, 27, "Input"],
+Cell[6713, 233, 884, 34, 39, "Output"]
}, Open ]],
-Cell[6290, 214, 122, 5, 35, "ExampleText",
- CellID->961744640],
+Cell[7612, 270, 52, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6437, 223, 396, 12, 45, "Input",
+Cell[7689, 274, 302, 10, 27, "Input",
CellID->1500698710],
-Cell[6836, 237, 678, 28, 38, "Output",
- CellID->582387944],
-Cell[7517, 267, 705, 29, 38, "Output",
- CellID->2085927952]
+Cell[7994, 286, 526, 21, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8557, 312, 114, 3, 27, "Input"],
+Cell[8674, 317, 551, 22, 37, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[8261, 301, 23, 0, 42, "FooterCell"]
+Cell[9264, 344, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceMomenta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceMomenta.nb
new file mode 100644
index 000000000..eebed0284
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceMomenta.nb
@@ -0,0 +1,894 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 27323, 884]
+NotebookOptionsPosition[ 23715, 774]
+NotebookOutlinePosition[ 25923, 832]
+CellTagsIndexPosition[ 25838, 827]
+WindowTitle->FCReplaceMomenta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCReplaceMomenta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCReplaceMomenta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCReplaceMomenta.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$122316],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCReplaceMomenta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCReplaceMomenta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCReplaceMomenta", "[",
+ RowBox[{"exp", ",", "rule"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] replaces the given momentum according to the \
+specified replacement rules. Various options can be used to customize the \
+replacement procedure."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->49534846],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCReplaceMomenta", "]"}]], "Input",
+ CellLabel->"In[343]:=",
+ CellID->1998136416],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimensions", "\[Rule]", "All"}], ",",
+ RowBox[{"EpsEvaluate", "\[Rule]", "False"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"SelectFree", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"MomentumExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"Variables", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Head", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "DiracGamma", ",", "PauliSigma", ",", "CartesianPair", ",",
+ "TemporalPair", ",", "Pair", ",", "Eps", ",", "FeynAmpDenominator"}],
+ "}"}]}], ",",
+ RowBox[{"Replace", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Momentum", ",", "CartesianMomentum", ",", "TemporalMomentum"}],
+ "}"}]}], ",",
+ RowBox[{"Polarization", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{560, 92},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[343]=",
+ CellID->580862538]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1824691138],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->174733108],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"amp", "=",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"-", "I"}], ")"}], "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "l2", "]"}]}], ",", "ME", ",", "1"}], "]"}],
+ ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "l1", "]"}], ",", "ME", ",", "1"}], "]"}]}],
+ "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"kp", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"kp", "+", "p1"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"kp", "+", "p1", "+", "p2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "l1"}], "-", "l2", "-", "p2"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{"SDF", "[",
+ RowBox[{"cq", ",", "cqbar"}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "3"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->652639515],
+
+Cell[BoxData[
+ FormBox[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\<\"e\"\>", "3"], " ",
+ SubsuperscriptBox["Q", "u", "2"], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["cq",
+ TraditionalForm],
+ FormBox["cqbar",
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["kp",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "Q"]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+
+ FeynCalc`Momentum[$CellContext`kp + $CellContext`p1 + \
+$CellContext`p2],
+
+ FeynCalc`Momentum[$CellContext`kp + $CellContext`p1 + \
+$CellContext`p2]]],
+ Editable->False], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "Q", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+
+ FeynCalc`Momentum[-$CellContext`l1 - $CellContext`l2 - \
+$CellContext`p2],
+
+ FeynCalc`Momentum[-$CellContext`l1 - $CellContext`l2 - \
+$CellContext`p2]], "-", FeynCalc`SMP["m_Q"]^2],
+ Editable->False], ")"}]}], ")"}]}], ")"}]}],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{530, 70},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->533319753]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceMomenta", "[",
+ RowBox[{"amp", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p1", "\[Rule]",
+ RowBox[{"P", "+",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], " ", "q"}]}]}], ",",
+ RowBox[{"p2", "\[Rule]",
+ RowBox[{"P", "-",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], " ", "q"}]}]}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1708580280],
+
+Cell[BoxData[
+ FormBox[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\<\"e\"\>", "3"], " ",
+ SubsuperscriptBox["Q", "u", "2"], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["cq",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["cqbar",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["kp",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["P",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "2"], "+",
+ SubscriptBox["m", "Q"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"], "+",
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["P",
+ TraditionalForm], "_"]}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`kp] +
+ 2 FeynCalc`Momentum[$CellContext`P],
+ FeynCalc`Momentum[$CellContext`kp] +
+ 2 FeynCalc`Momentum[$CellContext`P]]],
+ Editable->False], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["P",
+ TraditionalForm], "_"], "+",
+ FractionBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"], "2"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "Q", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`l1] -
+ FeynCalc`Momentum[$CellContext`l2] -
+ FeynCalc`Momentum[$CellContext`P] +
+ Rational[1, 2] FeynCalc`Momentum[$CellContext`q], -
+ FeynCalc`Momentum[$CellContext`l1] -
+ FeynCalc`Momentum[$CellContext`l2] -
+ FeynCalc`Momentum[$CellContext`P] +
+ Rational[1, 2] FeynCalc`Momentum[$CellContext`q]], "-",
+ FeynCalc`SMP["m_Q"]^2],
+ Editable->False], ")"}]}], ")"}]}], ")"}]}],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{509, 114},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->909800019]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "amp", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1788517480],
+
+Cell["\<\
+Notice that FCReplaceMomenta is not suitable for expanding in 4-momenta (soft \
+limits etc.) as it does not check for cases where a particular substitution \
+yields a singularity. For example, the following code obviously returns a \
+nonsensical result\
+\>", "Notes",
+ CellID->854583664],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}], "\n",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[", "q", "]"}], "=", "0"}], ";"}]}], "Input",
+ CellLabel->"In[4]:=",
+ CellID->117014617],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceMomenta", "[",
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{"q", "+", "p"}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"p", "\[Rule]", "0"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1500683361],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ InterpretationBox["0",
+ SequenceForm[0],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{17, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->355213937]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1564106320]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCReplaceMomenta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 5.604165}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCReplaceMomenta[exp, rule] replaces the given momentum according to the \
+specified replacement rules. Various options can be used to customize the \
+replacement procedure.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCReplaceMomenta", "titlemodifier" -> "", "windowtitle" ->
+ "FCReplaceMomenta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCReplaceMomenta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5945, 182, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1824691138]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 25694, 820}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3215, 91, 521, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3761, 109, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->49534846],
+Cell[4501, 135, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4557, 139, 121, 3, 70, "Input",
+ CellID->1998136416],
+Cell[4681, 144, 1203, 31, 113, "Output",
+ CellID->580862538]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5945, 182, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1824691138],
+Cell[CellGroupData[{
+Cell[6358, 201, 195, 6, 26, "ExampleSection",
+ CellID->174733108],
+Cell[CellGroupData[{
+Cell[6578, 211, 1895, 56, 152, "Input",
+ CellID->652639515],
+Cell[8476, 269, 6448, 208, 91, "Output",
+ CellID->533319753]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14961, 482, 421, 14, 27, "Input",
+ CellID->1708580280],
+Cell[15385, 498, 6944, 216, 135, "Output",
+ CellID->909800019]
+}, Open ]],
+Cell[22344, 717, 107, 3, 27, "Input",
+ CellID->1788517480],
+Cell[22454, 722, 297, 6, 66, "Notes",
+ CellID->854583664],
+Cell[22754, 730, 214, 7, 45, "Input",
+ CellID->117014617],
+Cell[CellGroupData[{
+Cell[22993, 741, 247, 8, 27, "Input",
+ CellID->1500683361],
+Cell[23243, 751, 272, 10, 56, "Output",
+ CellID->355213937]
+}, Open ]],
+Cell[23530, 764, 131, 4, 27, "Input",
+ CellID->1564106320]
+}, Open ]]
+}, Open ]],
+Cell[23688, 772, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceRepeated.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceRepeated.nb
new file mode 100644
index 000000000..4d65618ee
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCReplaceRepeated.nb
@@ -0,0 +1,328 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9623, 318]
+NotebookOptionsPosition[ 6433, 223]
+NotebookOutlinePosition[ 8704, 282]
+CellTagsIndexPosition[ 8620, 277]
+WindowTitle->FCReplaceRepeated
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCReplaceRepeated\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCReplaceRepeated"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCReplaceRepeated.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$122749],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCReplaceRepeated", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCReplaceRepeated", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCReplaceRepeated", "[",
+ RowBox[{"exp", ",", "ru1", ",", "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is like ReplaceRepeated, but it also allows to apply \
+multiple replacement rules sequentially. Instead of doing exp //. ru1 //. ru2 \
+//. ru3 one can just write FCReplaceRepeated[exp, ru1, ru2, ru3]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->84386482],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1305051148],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceRepeated", "[",
+ RowBox[{"a", ",",
+ RowBox[{"a", "\[Rule]", "b"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1953443279],
+
+Cell[BoxData[
+ FormBox["b", TraditionalForm]], "Output",
+ ImageSize->{16, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1385622949]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceRepeated", "[",
+ RowBox[{
+ RowBox[{"a", " ", "c"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"a", "\[Rule]", "b"}], ",",
+ RowBox[{"c", "\[Rule]", "d"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2016543797],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"b", " ", "d"}], TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1020369204]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceRepeated", "[",
+ RowBox[{
+ RowBox[{"a", " ", "c"}], ",",
+ RowBox[{"a", "\[Rule]", "b"}], ",",
+ RowBox[{"c", "\[Rule]", "d"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1921067494],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"b", " ", "d"}], TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1391169941]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCReplaceRepeated", "[",
+ RowBox[{
+ RowBox[{"a", " ", "c"}], ",",
+ RowBox[{"a", "\[Rule]", "b"}], ",",
+ RowBox[{"c", "\[Rule]", "d"}], ",",
+ RowBox[{"d", "\[Rule]", "e"}], ",",
+ RowBox[{"b", "\[Rule]", "f"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1480097144],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"e", " ", "f"}], TraditionalForm]], "Output",
+ ImageSize->{28, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1012664729]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCReplaceRepeated",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 6.801885}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCReplaceRepeated[exp, ru1, ...] is like ReplaceRepeated, but it also \
+allows to apply multiple replacement rules sequentially. Instead of doing exp \
+//. ru1 //. ru2 //. ru3 one can just write FCReplaceRepeated[exp, ru1, ru2, \
+ru3].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCReplaceRepeated",
+ "titlemodifier" -> "", "windowtitle" -> "FCReplaceRepeated", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCReplaceRepeated"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3812, 107, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->84386482]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8478, 270}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 2310, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2902, 76, 294, 11, 45, "ObjectNameGrid"],
+Cell[3199, 89, 588, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3812, 107, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->84386482],
+Cell[CellGroupData[{
+Cell[4223, 126, 196, 6, 26, "ExampleSection",
+ CellID->1305051148],
+Cell[CellGroupData[{
+Cell[4444, 136, 167, 5, 27, "Input",
+ CellID->1953443279],
+Cell[4614, 143, 187, 6, 35, "Output",
+ CellID->1385622949]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4838, 154, 274, 9, 27, "Input",
+ CellID->2016543797],
+Cell[5115, 165, 210, 7, 35, "Output",
+ CellID->1020369204]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5362, 177, 231, 7, 27, "Input",
+ CellID->1921067494],
+Cell[5596, 186, 210, 7, 35, "Output",
+ CellID->1391169941]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5843, 198, 311, 9, 27, "Input",
+ CellID->1480097144],
+Cell[6157, 209, 210, 7, 35, "Output",
+ CellID->1012664729]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6406, 221, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCRerouteMomenta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCRerouteMomenta.nb
new file mode 100644
index 000000000..5bbc72b6c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCRerouteMomenta.nb
@@ -0,0 +1,828 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 26042, 818]
+NotebookOptionsPosition[ 22298, 714]
+NotebookOutlinePosition[ 24972, 778]
+CellTagsIndexPosition[ 24887, 773]
+WindowTitle->FCRerouteMomenta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCRerouteMomenta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCRerouteMomenta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCRerouteMomenta.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$123179],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCRerouteMomenta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCRerouteMomenta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCRerouteMomenta", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k1", ",", "k2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] changes the routing of the momenta by exploiting the \
+4-momentum conservation law p1+p2+... = k1+k2+... The main aim of this \
+function is to simplify the input expression by replacing simple linear \
+combinations of the external momenta with shorter expressions. For example, \
+in a process p1+p2 -> k1+k2+k3, the combination k1+k2-p2 can be replaced with \
+the shorter expression p1-k3. The replacements are applied using the \
+FeynCalcExternal form of the expression. Ideally, this function should be \
+used directly on the output of a diagram generator such as FeynArts or \
+QGRAF."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->792842322],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCRerouteMomenta", "]"}]], "Input",
+ CellLabel->"In[335]:=",
+ CellID->1812704255],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Check", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"Eliminate", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Expand", "\[Rule]", "ExpandAll"}], ",",
+ RowBox[{"InitialSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}], ",",
+ RowBox[{"MomentumCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"Replace", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ "FAD", ",", "SFAD", ",", "CFAD", ",", "GFAD", ",", "GS", ",", "GSD",
+ ",", "GSE", ",", "FV", ",", "FVD", ",", "FVE", ",", "CV", ",", "CVD",
+ ",", "CVE", ",", "SP", ",", "SPD", ",", "SPE", ",", "CSP", ",", "CSPD",
+ ",", "CSPE", ",", "TC"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{450, 89},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[335]=",
+ CellID->1115039146]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->731448533],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1220319058],
+
+Cell[TextData[{
+ "Reroute momenta according to the momentum conservation relation ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"l1", "+", "l2"}], "=",
+ RowBox[{"p1", "+", "p2", "+", "kp"}]}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->1405927763],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"-", "I"}], ")"}], "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "l2", "]"}]}], ",", "ME", ",", "1"}], "]"}],
+ ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "l1", "]"}], ",", "ME", ",", "1"}], "]"}]}],
+ "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"kp", ",",
+ RowBox[{"-", "I"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"kp", "+", "p1"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p2", "]"}]}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"kp", "+", "p1", "+", "p2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "l1"}], "-", "l2", "-", "p2"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{"SDF", "[",
+ RowBox[{"cq", ",", "cqbar"}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "3"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1789291289],
+
+Cell[BoxData[
+ FormBox[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\<\"e\"\>", "3"], " ",
+ SubsuperscriptBox["Q", "u", "2"], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["cq",
+ TraditionalForm],
+ FormBox["cqbar",
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["kp",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "Q"]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+
+ FeynCalc`Momentum[$CellContext`kp + $CellContext`p1 + \
+$CellContext`p2],
+
+ FeynCalc`Momentum[$CellContext`kp + $CellContext`p1 + \
+$CellContext`p2]]],
+ Editable->False], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "Q", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+
+ FeynCalc`Momentum[-$CellContext`l1 - $CellContext`l2 - \
+$CellContext`p2],
+
+ FeynCalc`Momentum[-$CellContext`l1 - $CellContext`l2 - \
+$CellContext`p2]], "-", FeynCalc`SMP["m_Q"]^2],
+ Editable->False], ")"}]}], ")"}]}], ")"}]}],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{530, 70},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1039412028]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCRerouteMomenta", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"l1", ",", "l2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "kp"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->216847885],
+
+Cell[BoxData[
+ FormBox[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\<\"e\"\>", "3"], " ",
+ SubsuperscriptBox["Q", "u", "2"], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["cq",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["cqbar",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["ME",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["kp",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["kp",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "Q"]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "Q"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`l1] +
+ FeynCalc`Momentum[$CellContext`l2],
+ FeynCalc`Momentum[$CellContext`l1] +
+ FeynCalc`Momentum[$CellContext`l2]]],
+ Editable->False], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["l1",
+ TraditionalForm], "_"]}], "-",
+ OverscriptBox[
+ FormBox["l2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SubsuperscriptBox["m", "Q", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`l1] -
+ FeynCalc`Momentum[$CellContext`l2] -
+ FeynCalc`Momentum[$CellContext`p2], -
+ FeynCalc`Momentum[$CellContext`l1] -
+ FeynCalc`Momentum[$CellContext`l2] -
+ FeynCalc`Momentum[$CellContext`p2]], "-", FeynCalc`SMP["m_Q"]^2],
+ Editable->False], ")"}]}], ")"}]}], ")"}]}],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{530, 70},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1950312178]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCRerouteMomenta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 8.012620}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCRerouteMomenta[exp, {p1, p2, ...}, {k1, k2, ...}] changes the routing \
+of the momenta by exploiting the 4-momentum conservation law p1+p2+... = \
+k1+k2+... The main aim of this function is to simplify the input expression \
+by replacing simple linear combinations of the external momenta with shorter \
+expressions. For example, in a process p1+p2 -> k1+k2+k3, the combination \
+k1+k2-p2 can be replaced with the shorter expression p1-k3. The replacements \
+are applied using the FeynCalcExternal form of the expression. Ideally, this \
+function should be used directly on the output of a diagram generator such as \
+FeynArts or QGRAF.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCRerouteMomenta", "titlemodifier" -> "", "windowtitle" ->
+ "FCRerouteMomenta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCRerouteMomenta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6464, 189, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->731448533]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 24744, 766}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3215, 91, 1122, 25, 171, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4362, 120, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->792842322],
+Cell[5103, 146, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5159, 150, 121, 3, 70, "Input",
+ CellID->1812704255],
+Cell[5283, 155, 1120, 27, 110, "Output",
+ CellID->1115039146]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6464, 189, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->731448533],
+Cell[CellGroupData[{
+Cell[6876, 208, 196, 6, 26, "ExampleSection",
+ CellID->1220319058],
+Cell[7075, 216, 247, 8, 32, "Notes",
+ CellID->1405927763],
+Cell[CellGroupData[{
+Cell[7347, 228, 1819, 55, 134, "Input",
+ CellID->1789291289],
+Cell[9169, 285, 6449, 208, 91, "Output",
+ CellID->1039412028]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15655, 498, 258, 8, 27, "Input",
+ CellID->216847885],
+Cell[15916, 508, 6316, 199, 91, "Output",
+ CellID->1950312178]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[22271, 712, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSchoutenBruteForce.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSchoutenBruteForce.nb
new file mode 100644
index 000000000..ac35d91f9
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSchoutenBruteForce.nb
@@ -0,0 +1,877 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 25458, 867]
+NotebookOptionsPosition[ 21560, 755]
+NotebookOutlinePosition[ 24123, 817]
+CellTagsIndexPosition[ 24038, 812]
+WindowTitle->FCSchoutenBruteForce
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSchoutenBruteForce\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSchoutenBruteForce"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCSchoutenBruteForce.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$123610],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSchoutenBruteForce", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCSchoutenBruteForce", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCSchoutenBruteForce", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{", "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] can be used to show that certain terms are zero by \
+repeatedly Schouten identity in a brute force way. The algorithm tries to \
+find replacements which follow from the Schouten identity and make the length \
+of the given expression shorter. It is not guaranteed to terminate and in \
+general can often get stucked. Still, with some luck it is often possible to \
+show that certain terms vanish by a sequence of transformations that would be \
+otherwise very difficult to find."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->147640550],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCSchoutenBruteForce", "]"}]], "Input",
+ CellLabel->"In[402]:=",
+ CellID->264147975],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor2"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Information", "\[Rule]", "True"}], ",",
+ RowBox[{"Rule", "\[Rule]", "True"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}], ",",
+ RowBox[{"Take", "\[Rule]", "1"}], ",",
+ RowBox[{"Schouten", "\[Rule]", "False"}], ",",
+ RowBox[{"SchoutenAllowNegativeGain", "\[Rule]", "False"}], ",",
+ RowBox[{"SchoutenAllowZeroGain", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{558, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[402]=",
+ CellID->1175898252]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->847413702],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1290856333],
+
+Cell["\<\
+One may not recognize it easily, but the following expression is zero by \
+Schouten's identity\
+\>", "Notes",
+ CellID->723339137],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1332338150],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"LC", "[", "]"}], "[",
+ RowBox[{"p1", ",", "p2", ",", "p3", ",", "p4"}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"p5", ",", "p6"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{
+ RowBox[{"LC", "[", "]"}], "[",
+ RowBox[{"p2", ",", "p3", ",", "p4", ",", "p5"}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"p1", ",", "p6"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{
+ RowBox[{"LC", "[", "]"}], "[",
+ RowBox[{"p3", ",", "p4", ",", "p5", ",", "p1"}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"p2", ",", "p6"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{
+ RowBox[{"LC", "[", "]"}], "[",
+ RowBox[{"p4", ",", "p5", ",", "p1", ",", "p2"}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"p3", ",", "p6"}], "]"}]}], "-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"LC", "[", "]"}], "[",
+ RowBox[{"p1", ",", "p2", ",", "p3", ",", "p5"}], "]"}], " ",
+ RowBox[{"SP", "[",
+ RowBox[{"p4", ",", "p6"}], "]"}]}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1838333672],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{427, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->343559860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSchoutenBruteForce", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->148970268],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"FCSchoutenBruteForce: The following rule was applied: \"\>",
+ "\[InvisibleSpace]",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "\[RuleDelayed]",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}]}], "\[InvisibleSpace]", "\<\" \"\>"}],
+
+ SequenceForm[
+ "FCSchoutenBruteForce: The following rule was applied: ", FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p6]] :> FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p6]] - FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p6]] + FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p6]] - FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p4]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p5],
+ FeynCalc`Momentum[$CellContext`p6]], " "],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[100]:=",
+ CellID->157369453],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"FCSchoutenBruteForce: The numbers of terms in the expression \
+decreased by: \"\>", "\[InvisibleSpace]", "5"}],
+ SequenceForm[
+ "FCSchoutenBruteForce: The numbers of terms in the expression decreased \
+by: ", 5],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[100]:=",
+ CellID->1838284525],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"FCSchoutenBruteForce: Current length of the expression: \"\>",
+ "\[InvisibleSpace]", "0"}],
+ SequenceForm["FCSchoutenBruteForce: Current length of the expression: ", 0],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[100]:=",
+ CellID->1164973788]
+}, Open ]],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1040921019]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCSchoutenBruteForce",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 9.243327}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCSchoutenBruteForce[exp, {}, {}] can be used to show that certain terms \
+are zero by repeatedly Schouten identity in a brute force way. The algorithm \
+tries to find replacements which follow from the Schouten identity and make \
+the length of the given expression shorter. It is not guaranteed to terminate \
+and in general can often get stucked. Still, with some luck it is often \
+possible to show that certain terms vanish by a sequence of transformations \
+that would be otherwise very difficult to find.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCSchoutenBruteForce", "titlemodifier" ->
+ "", "windowtitle" -> "FCSchoutenBruteForce", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCSchoutenBruteForce"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6041, 178, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->847413702]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 23895, 805}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 2322, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2917, 76, 297, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3239, 91, 912, 20, 154, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4176, 115, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->147640550],
+Cell[4917, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4973, 145, 124, 3, 70, "Input",
+ CellID->264147975],
+Cell[5100, 150, 880, 21, 74, "Output",
+ CellID->1175898252]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6041, 178, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->847413702],
+Cell[CellGroupData[{
+Cell[6453, 197, 196, 6, 26, "ExampleSection",
+ CellID->1290856333],
+Cell[6652, 205, 139, 4, 32, "Notes",
+ CellID->723339137],
+Cell[6794, 211, 113, 3, 27, "Input",
+ CellID->1332338150],
+Cell[CellGroupData[{
+Cell[6932, 218, 1043, 33, 62, "Input",
+ CellID->1838333672],
+Cell[7978, 253, 5310, 217, 75, "Output",
+ CellID->343559860]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13325, 475, 187, 6, 27, "Input",
+ CellID->148970268],
+Cell[CellGroupData[{
+Cell[13537, 485, 7004, 232, 81, "Print",
+ CellID->157369453],
+Cell[20544, 719, 393, 10, 24, "Print",
+ CellID->1838284525],
+Cell[20940, 731, 352, 8, 24, "Print",
+ CellID->1164973788]
+}, Open ]],
+Cell[21307, 742, 187, 6, 35, "Output",
+ CellID->1040921019]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[21533, 753, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetDiracGammaScheme.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetDiracGammaScheme.nb
new file mode 100644
index 000000000..d9e7d8eb1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetDiracGammaScheme.nb
@@ -0,0 +1,1637 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 50091, 1627]
+NotebookOptionsPosition[ 43894, 1427]
+NotebookOutlinePosition[ 46458, 1494]
+CellTagsIndexPosition[ 46336, 1488]
+WindowTitle->FCSetDiracGammaScheme
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCGetDiracGammaScheme\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCGetDiracGammaScheme"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSetDiracGammaScheme\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSetDiracGammaScheme"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCSetDiracGammaScheme.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$124054],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSetDiracGammaScheme", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCSetDiracGammaScheme", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]allows you to specify how Dirac matrices will be \
+handled in D dimensions. This is mainly relevant to the treatment of the \
+fifth Dirac matrix ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ", which is not well-defined in dimensional regularization."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->36733847],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["Following schemes are supported: ", "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "\"NDR\" - This is the default value. In the naive dimensional \
+regularization (also known as conventional dimensional regularization or CDR) \
+",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]]],
+ " is assumed to anticommute with all Dirac matrices in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " dimensions. Hence, every Dirac trace can be rewritten in such a way, that \
+it contains either just one or not a single ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]]],
+ " matrix. The latter traces are obviously unambiguous. The traces with one \
+",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]]],
+ " are not well-defined in this scheme. It usually depends on the physics of \
+the process, whether and how they can contribute to the final result. \
+Therefore, FeynCalc will keep such traces unevaluated, leaving it to the user \
+to decide how to treat them. "
+}], "Notes",
+ CellID->190401776],
+
+Cell[TextData[{
+ "Notice that traces with an odd number of the usual Dirac matrices and one \
+",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]]],
+ ", that vanish in 4 dimensions, will be also put to zero in this scheme."
+}], "Notes",
+ CellID->1784502655],
+
+Cell[TextData[{
+ "\"NDR-Discard\" - This is a special version of the NDR scheme. The Dirac \
+algebra is\nevaluated in the same way as with \"NDR\", but the remaining \
+traces with one ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]]],
+ "\nare put to zero. This assumes that such traces do not contribute to the \
+final result,\nwhich is obviously true only for specific calculations."
+}], "Notes",
+ CellID->665441283],
+
+Cell[TextData[{
+ "\"BMHV\" - The Breitenlohner-Maison extension of the t'Hooft-Veltman \
+scheme. This scheme introduces Dirac and Lorentz tensors living in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ ", ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "4"}]], "InlineFormula"],
+ " dimensions, while ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " is a purely ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional object. BMHV is algebraically consistent but often suffers \
+from nonconservation of currents in the final results. The conservation must \
+be then enfornced by introducing finite counter-terms. The counter-terms are \
+to be supplied by the users, FeynCalc does not do this automatically."
+}], "Notes",
+ CellID->2003509557],
+
+Cell[TextData[{
+ "\"Larin\" - Special prescription developed by Larin, also known as the \
+Larin-Gorishny-Atkyampo-DelBurgo scheme. Essentially, it is a shortcut \
+(mostly used in QCD) for obtaining the same results as in BMHV but without \
+the necessity to deal with tensors from different dimensions. That is, before \
+evaluating traces (but after moving gamma5 anticommuting in D-dimensions to \
+the right of the Dirac string inside a trace) a product gamma[mu].gamma5 is \
+substituted to -I/6 Eps[mu,al,be,si] gamma[al,be,si], where all indices live \
+in D-dimensions now. The Levi-Civita tensor is taken to be",
+ StyleBox[" ", "Tutorials"],
+ Cell[BoxData["D"], "InlineFormula"],
+ StyleBox["-", "Tutorials"],
+ "dimensional, i.e., contraction of two Eps's results in D's. \\\nThis scheme \
+is often used for performance reasons and is assumed to give the same results \
+as the Breitenlohner-Maison-'t Hooft-Veltman (BMHV) scheme. However, ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " is not anticommuting inside closed fermion loops and it is not so clear if \
+this scheme works for more than one fermion line involving ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " When in doubt, it might be better to use BMHV instead."
+}], "Notes",
+ CellID->93561036]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->82917860],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->32234158],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1948773281],
+
+Cell[BoxData[
+ FormBox["\<\"NDR\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1851033209]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]", ",", "5"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->98306849],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{189, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->319736968]
+}, Open ]],
+
+Cell["\<\
+In NDR chiral traces remain unevaluated. You decide how to treat them.\
+\>", "ExampleText",
+ CellID->1475497628],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->933234494],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{189, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1219913945]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1854871493],
+
+Cell[BoxData[
+ FormBox["\<\"NDR-Drop\"\>", TraditionalForm]], "Output",
+ ImageSize->{75, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->771760149]
+}, Open ]],
+
+Cell["\<\
+If you know that such traces do not contribute, use NDR-Drop scheme to put \
+them to zero\
+\>", "ExampleText",
+ CellID->2003592022],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]", ",", "5"}], "]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->415066987],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->2065197167]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1400459732],
+
+Cell[BoxData[
+ FormBox["\<\"BMHV\"\>", TraditionalForm]], "Output",
+ ImageSize->{47, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->153708414]
+}, Open ]],
+
+Cell["In BMHV chiral traces are algebraically well-defined", "ExampleText",
+ CellID->204593488],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"res1", "=",
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]", ",", "5"}], "]"}], "]"}], "]"}]}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1352029659],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQtwVNUZgLF12o6dTlHHkanDjDqAPEQEOkhA3hgKQwcBLQEjlQxvNDqA
+gHQKCGhKgwMjr2kAGzBoEcjwEEFBOkKlCNhQk/IKEAiPBBIxL7KbbDanu7lI
+ILn3nLv33HPOfw7/NwMD7Gaz5zv/vbmb7PA9lvT6sPE/adKkybRfRH4bNmZm
+n6lTx7w1vGnkLy8mT5s0IXnc2IHJ08dNGDe1a9JPI/84MPLr0j1NmkT/TLQk
+XKv6GSBUcIPkgJ4RFYS/3zsxcV1+xcWNb4xbeTbY4NZQfvrwpAMlhFRkJfcc
+fbA0poeuvrb/rwO7zz0eIJU5M3s+v7u44YiHy7I3rv7kiy8y5o5ZeKj09ltr
+A+c//2DDjs/Sp3d64IFHWz3xRPv+754K3Lq5pmjv/JG9nnr01/c/3ubJLiO3
+X62J6YlJx1EyUxEL9gah5Js3O3pwA80zdRMNk4wopPTgy3FT9h9MX7bnaqjR
+jbXFu4YP+vhKDQmeWti1/6bCcKyPXrI/MX75uUDhjqT5h8saHB/h619O+f3y
+s1WEBE8u7D3qYFn9py05MG3o8jNV0UNkbb/BuxqewcKBwqJgbWX23BHr8hs/
+aYDQJNMUMWFuEEq2cPbgCpZnp000TjJCJVSwOaFj4jfO0xU8s2TEH97LDTje
+gUJl9pttf9O+0+h91+1OExVHJ8ennAqSmssf9u6acrrRtQqTwIl3B885dGR9
++neNTkPhq5mDeqTmRsaY3Dg2tf/s7MpbN13/clj3Ocej66nKfa//H/9tu/Tg
+ycUJaeeqY35K9qiTTFHEhrVBKNmC4sEVLM9Om6hAMqKM0JUtY599qHkCZcLD
+pVmZmVklMV/0RqjOW96z36qPkrq89Hlx44+PXETEPfdZcW3V2b/1afvyN2Wx
+f4bA/97uk/jnDWdsDo2ygyNaxmVcjrzmq/jvgsQV0WuPm4QLN/WNWxQ9sIJn
+Vo2c959yu0cOXVgzYNQe268wsaNSMkURE+YGoWQLZw+uYHp22ET5khFlVF/a
+/KelO1M7taBNuHdCl9b365aaW3H5o9GD3vm64TFSc+XjPq179U184+3UJUM6
+D1m8La/SfqBm3klBQcGPt5QdmTIxI9/ukiFwYm77R54ZPHfd9q0b0v9ZeMdd
+Qlc2Txo6K/3T7Rkf7LnkcDEfuvj3fq0G7ixiHdc1V3dMeO0wVZ5SyRRFP+Ko
+l7lBsiS7QKlkmod6vHt23ETJk4woozp/4+y0k6V5Kzs7TXh10YG1E+N7DF20
+OI12YVZ1ceeS1NUZKya0uu9nD8e/umB9nouXmbXFu1/otyKP/dqs5ofDq6cl
+jhqbPH32O2uySl0d2KELaT26Lo71+sYDNZfWPzd43w/Od1Ar2QWOepkbJE0y
+E7WS3Xnw7lkOzElGlFF1PmP22twAqT7vPOGElHw1tMUzS7euOu74Bbe27PCb
+XXqlXagmwZPz2jzcbWOBq7NpdELjZrC/sRc4kfJs65e2XI5plKvzlsU9PSPH
+y+v+GGFMuGLJbJz1MjdInmQGiiW78sDhWRJ4rlZF6MqmpAG9GjDo1a9Lbr66
+Cp5dN3vduejLJuqEVxwd37rjnK3vf+v4/a5w0ae/a96h7qqi/EhSux5r/P2B
+842syY/96pG+w0ZESBibcuKGnw/unXq9ca3vf7BD94Z6LeBLBqrXgjXDFvAl
+E8ie3U0yoo7g6dTeHdp3qKNt8/t+3rTlU31eP1bR8G6VOTPbtZucufyra47v
+ywzlr/1ts86RuQ4X7Z70QkpWub97XLI/vtnjrx2DM9sNoF2NaCAZul42Gkgm
+WnjG62r4hPLXdGlpfzVSdSa1Y+vET1ZlHP3X3hyHt2mEy3P+8dbk6cs2btu6
+7+wN378YB0+ntH+o45Lc2N/PJweXEw5VMnS9MQFVMtHCM56r4UOZ8MDJ+T2e
+HPbK8OS12eUO8128+5U2zR/85b33RLi3aadp9u8b4qC2/LuVSb27DRk/Y868
+BUt2FKj+EUwD+M/VaiUD1xsTYCUTHTzjudpoqgt2/WXBlgvWxUJt6PqRpbMO
+4Wb7DEqWAEpGTKamcMuAFv23XrOuU8LluXu37bkM+EWelqBkCaBkxGxqK7JT
+n2/TrPnT8QkTZi1Ky/z2e/wvB3wHJUsAJSMIgiAIgiAIgiAIgiAIgiAIgtxl
+YPlIKKj3dtCGBFCyRCjZI0Z7yB2ey0d1T84huqRb9shRMvdChOj1aevlw2WD
+iuc6mHkBL55mHBNvqTvzJNvimD1itYfc4bV8FMUxuqRd9shJMvdChOj1aevl
+w2ODgcc6mIEBL45mnAu8pO4ASVaUPXLVHmLitXxEmNElU9pSXAsRo9efrW+M
+UMmEywYDr3Uw0ypphKsZx8ZT6g5MJU1V9shVe4iJ1/JRFHp0yZi2FM9CxOj1
+Z+sbIVYy4bNBx2sdzLRKGuFqxrHxlLqDUklTmD1y0x6qxz5+5L18xIwumdKW
+crcQuXpj23oCoZJG+Gzcho1q73UwsypphLMZdwcxe4ZdSQPflrIQUj6SFp8C
+L1kDvRAqaX5ktkCn6JhAkMzZSlOOx//JEHxbykJM+UhWfAq8ZC30Aqik+ZDZ
+Ap6iYwBCMmcrTT2eztVaZI8I2PKRKW0poHotTKmkWQBVbcok3wKiZ65Kmh7Z
+I6JF+cgRDSTroVfzSpqFHqrt0UYyAe6Zs+YAOHtEtCgfuQGqZD30al5Js9BD
+NRPYkglwz+LO1cqzR0SH8pEbwErWQq/ulTQLLVQzAS6ZwPasrpKG2SMJoGQJ
+oGQJoGRlYPZIAihZAihZAihZIZg9kgBKlgBKlgBKRhAEQRAEQRAEQRAEQRAE
+QRAkdjDKIwGUbCq4s3K4Wz3Tozz8OSdvXZ66jzSk4UXokvmW479eHRteHItl
+Qg94cR0+ek0yT0jLBTye6z7enNOFA9Qojx85Jy9dnijmNLzokjmX47teXRte
+3hbrAmrAi+vw0W+SvYa03ODdcxQIpwulUR4fck6eujzEpIYXYZePvC9HgF5N
+G17eZ4kOPcHGf/hoNclcIS06HJ6J5NOFPWqjPD7knDx1eaIY0/AiLspHnpcj
+QK+uDS/Ps0SHbpj/8NFrknlCWnQ4PEeReLqwR3mUh7vk5bHLY1DDi7jJS3kt
+eQnRq2fDy/ss1ROzYR8OH60mmSukVY/fnn07XUBuePlRPrLwuctjUsNLVV6K
+gnkNLwriwlL+HT4+AL5GZyHEs1/zDLjh5UP5yMLvLo9JDS9VeSkK5jW8KIgL
+S/l2+PgA+BqdhRjPvs2z0Q0vC3BdHrPKR+D0WhjU8AJqmOAkS+HuaHhZgO7y
+OKKNZOh69W94QTfMQA/JBL5noxteFqC7PG6ALRm6Xv0bXtANuwewZALfs9kN
+LwvIXR43AJcMXK8BDS/ght0DWTIB7xkbXkaDkiWAkiWAkpWBUR4JoGQJoGQJ
+oGSFYJRHAihZAihZAigZQRAEQRAEQRAEQRAEQRAEQRAduFtzPGpA20JBvXK4
+Cz1TojyCwlJ1eM/x6JiXshC5Iu+2hQ2AGsRUnITo1XOShSbJBHmue2jvBTdA
+OER5BIalOHI8uualBK+Iy7aYAVCBqIqTCL1aTrLgJJkQz3XPi6fgFgvqykeC
+wlI8OR5N81JiV8RnW8gA2KJOct2DqxlmgdErW0RKFpskEzbGXAW3GFBZPhIU
+luLI8eialxK6Ik7bIgbADoWS6z69omEWF72yQ6hksUkycWPMU3CL4fmrLB8J
+Cktx5Xj0zEv5tyL/bXMPgDvUSibKhtmn6BUBMcm+JcmkjrHrghsP4KM8oHM8
+N58igLyUTyvSODKlg2ToeiFMsh/I9iyjBgg+ygM8x2MBIC/lz4o0jkzpIBm+
+XgCT7APSPUuoAcKP8gDN8VgYlJeygGjboLwURL0WZk0yXM/e0SDKAz3HY6F/
+XspCD9s26CFZA71GTLIGnnmAGuWBnuOx0D8vZaGHbTqAJWug14hJ1sAzD2Cj
+PMBzPBYG5KUstLBNB7Jk+HrNmGT4nhWBUR4JoGQJoGQJoGRlYJRHAihZAihZ
+AihZIRjlkQBKlgBKlgBKRhAEQfTl/9uYo7I=
+ "], {{0, 73}, {484, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{484, 73},
+ PlotRange->{{0, 484}, {0, 73}}]], "Output",
+ ImageSize->{488, 73},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[7]=",
+ CellID->1048714447]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->969077787],
+
+Cell[BoxData[
+ FormBox["\<\"Larin\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1981877909]
+}, Open ]],
+
+Cell["In Larin's scheme reproduces the results of the BMHV scheme", \
+"ExampleText",
+ CellID->1939646369],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"res2", "=",
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]", ",", "5"}], "]"}], "]"}], "]"}]}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1886065691],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQtQVFUYgLGcamyaLMfJqWFGHTV8oKkNioaKEKZjo6IlGlkyKj6xEZ80
+ialFhg1Ook4oBoYWqQxq5jObNMlnmJCigCgKoqDxkl32ddsHpbJ7z7177zl7
+/7P834yOunDZ851/795d1K9T1PzwGU/4+PjEPmP9KXzqkuAFC6YuG9/W+pt3
+YmJnRcdMnzYyZuH06OkLBkY9af3DAOuPvFY+PrZfC5phtmj3tVsGaJg1aBjh
+AWNp2vioE9WCUJ8bM2RKTs2jtxnuHv9y5OD4SzqhIX/JkLEHq+TPtPne0ZmR
+6aX1NzM/mr6xWO90c21e5uYfDx/OiJ+6+lTNo4e16K4f2rp9389pC/u9+GLH
+bq++6h/6+RXd/zebKo+unDS0d8fnX+jcvVfApL13TArW7FlIhh2I2yAjKpm4
+cS3NsMR6pVAm2f6ZItvKoWGENpaqA+NHfV9uEvRXVg8M3VlhbnZ79fHIsORr
+uop9USvP1LpxLVGT837gnOM5aeuP3DE63Wi+/8uct5OLGwVBX7B62OSc2od3
+p/pE7Ljkokbbgyk1ZPSB5sNs1lVU6i0NefET00udjwsSKcMEG1KQJIttXEsz
+LLVeSZRItiG6rRwaboEYb++K6Bt5WvzBqC9KmvjuV4Xyn8Efp/7c7LCEK3rB
+VPbdsIEJV50uTXWXPx+9/NTZbWkX3TntCg15i3q87N9vyrH7Lj7LfCdrVFBi
+oXUkhQcXFoTG5TX8f9P9X8IHL79kW0xj4VehH/zhct36grURKdcMbtwdElob
+JtiQgChZbONammFZ6yWgSLIgua10DSOUMZbvnvZGe98IwtCaa3KzsnKrna6j
+5GG9Rgh88+cqS2PxN8E93j9d63QY3d+fBkd+sr1I9tnAjqEkeUjIph1RAe8d
+qnK+Z7U5E7sGZpRZX2DV/7UqcoPtaqQJc8XO4YFrbNOqL9o0acWfda4Obryx
+ZcTkI64eBwrQ3rC4DQnIkkU2rqUZlrVeAook2yBvK1XDCGUMt3Z9vG5/Yr8u
+pKFVhan8+2C/ocMjP/o0MWlM/zFr95Q0NJuF2rNzZmaUuvnMbLy1LWRQYmF9
+2Y4poz472fwBpbsc7//KgNHx6Xuzt6f9WvHYsY3lu2aNW5r2096MrUduOV0c
+Nn3MzW9Duo3cX6nwcfooAAyTbBAhSxbdOJqGTXf2Rc87QzSnuWE56xVHoWTJ
+baU4wwhlDKWZcSkFNSUb+4sNraHyROrMsKBxa9amkK5IG2/uT0rcnLEhulub
+p14Km7tqW8l/r+ksVQcnhGwoUfWCx/TPmc2xkZOnxSyM+2xLbo30JBlvpAQN
+XCv/wo4dEAzLs+G2ZM9gurXtzdHH/hH/AAiGZUNTMpwhR9yj8XpGXGqhTjBc
+Fx9aQaj+bVyXAeuyN10SvZqw1J5ZFDA05YZB0Bes6P7SoMzbDwfKNrOBi+W/
+p+gC3eWEN/ze210mf+4NJesDX1ucr+aL0gGEYVk23JfsISROvCAMy4WqZDBD
+jriHvjg9Lv2a7YURcWjrz83w67s8++vzom8WmSt/esu3j/2pt+5sVM+gLXS/
+j/ogd3an514ZHj7RSsS0hMsPaB5cIcbynVEjhjZj1NyT1Y854sWwAFDyQ8OB
+fi+06zOYe8MCNMnyZhihjf5q4rA+/n3s9PBt83Tbrr2D51+ob/5hDflLevac
+nZX8213RvwhoLE19vUN/66iaKw/OmpCQW0d356qPh3XoPO+C5qcCt+HGsABZ
+MumKlyfDAmTJiCYYS7cEdHV9tdBYlNjXL/LHTRnnfj+a7/zdcjvmuvwfls1e
+uD5zT/ax4gfUJ1Z/NcG/fd+kQre/aQEI2IYFyJIl3+N1AN6wAFkyogmEodUV
+rAzqFf7h+JjUvDqRka06+GF333bPtm5lpXXbfrFu/20aKSx1FzdGDRs0Zsbi
+5StWJe27De5tSGmAGxYAS1Z/4gViWAAsGeENw+0DX6zafcPxHG4x3j+7bukp
+yQcJ4gZomDVoGOEMU8XuEV1Cs+86riPMdYVH9xwpwxdSFEHDrEHDCHdY6vMS
+x3bv4PtaWET00jUpWefv4b8LpwsaZg0aRhAEQRAEQRAEQRAEQRAEQRCEZzCq
+4n3gnnoAlIy4CSmqoqJgQj+norrwogEqFkuG3F1SFcrhK1ujJoEkhRrJ9s/H
+MBAiBimqoqZgQj2nor7wog3KFisFsbukKpTDX7ZGaQJJEuWSbWAYiGu0ztYo
+LJgwyKmoLbyIwdiw8nYMAaJeCqEcrsJAqhJIBFRIFjAMxDfaZ2uUFUwY5FTU
+Fl5EYG5YcTuGAFmv+lAOX2EgNQkkAiok28AwEL9oHlURFBZMmORU3C68gMjW
+KG/HiEPWSyGUw1V6SVUCSRxVkqmFgWTMMEIZTqIqcHMqELI1BBglgeiFciig
+rWHZ0JdMa5Jl/u9wCDU4iapAzqkAyNYQYJQEohbKoYDGhuXCQDK1ScYTr2fh
+JaoCK6fiwIuyNRD1Ct6WXoIoWd4MI7ThJqoCOqfCf7YGtF4J+DAsAJeMV7xa
+ATuqAjqnwn+2BrRe+QA2LACXjCderQAeVYGcU/GCbA1kvfKBbFiALRlPvByC
+URXWoGHWoGGEMzCqwho0zBo0jHAHRlVYg4ZZg4YRBEEQBEEQBEEQBEEQBEEQ
+BEEeAYMpHgNVswPdegBvkkzIprCI/thRHkzhMf3jgNmKlKtms/WawSCyw8Qt
+nzPMrhXFSLL90AqjWh5CJJvCKvqjIpjCa/qH5YpUqWaw9RrBJLLDwi2XM8yy
+FcVEsv1OKY5q/Yd2YRoW0R81wRRO0z8MV6RONf2tF0M7w/aDazDGrGpEYrA0
+zLAVxWyAlUe1mtAyTMMi+qMimMJr+ofdilSqpr71Imho2P7ltRhjRjUiEZga
+ZtiKYjfAiqNaTXdMyzANi+iPqmAKn+kfqit6DJWqqW+9a7Q1LGgzxvRqRABm
+mFkrit0AK45q2QGfTYEbTGm6fwDSP5RWxGsAiAfDoN1CmGEaeFSyqpEAn02B
+HExxACD9Q2dFvAaAeDAM3C2AGaaAZyWrGQn42RSIwRQHXpT+cQBOtRelf8C5
+deBdMwxUsgs4yKaADqY44D/944AD1S7gwzB0t14xw9AluwRqNgV0MMUB/+kf
+BxyoJgPYMHS3XjHD0CW7BGw2BXIwxYEXpH8cwFdNBrJh4G69Y4aBS6YNZlNY
+g4ZZg4ZZg4Ypg9kU1qBh1qBh1qBh6mA2hTVomDVomDVoGEEQBGHKv+Zq7iY=
+
+ "], {{0, 54}, {467, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{467, 54},
+ PlotRange->{{0, 467}, {0, 54}}]], "Output",
+ ImageSize->{471, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[9]=",
+ CellID->551636363]
+}, Open ]],
+
+Cell["\<\
+Owing to Schouten identities, proving the equivalence of chiral traces is not \
+so simple, especially for many terms. FCSchoutenBruteForce can be helpful here\
+\>", "ExampleText",
+ CellID->958789175],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"diff", "=",
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"res1", "-", "res2"}], ",", "D"}], "]"}]}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1406824487],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{353, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->981092168]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p1", ",", "\[Mu]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"p2", ",", "\[Nu]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"p3", ",", "\[Rho]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"p4", ",", "\[Sigma]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"p5", ",", "\[Tau]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"p6", ",", "\[Kappa]"}], "]"}], "diff"}],
+ "]"}], "\[IndentingNewLine]",
+ RowBox[{"FCSchoutenBruteForce", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{", "}"}]}], "]"}]}], "Input",
+ CellLabel->"In[11]:=",
+ CellID->1776546156],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{493, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]=",
+ CellID->8901553],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"FCSchoutenBruteForce: The following rule was applied: \"\>",
+ "\[InvisibleSpace]",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "\[RuleDelayed]",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p5",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p6",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}]}], "\[InvisibleSpace]", "\<\" \"\>"}],
+
+ SequenceForm[
+ "FCSchoutenBruteForce: The following rule was applied: ", FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p6]] :> FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p6]] - FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p6]] + FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p5]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p4],
+ FeynCalc`Momentum[$CellContext`p6]] - FeynCalc`Eps[
+ FeynCalc`Momentum[$CellContext`p1],
+ FeynCalc`Momentum[$CellContext`p2],
+ FeynCalc`Momentum[$CellContext`p3],
+ FeynCalc`Momentum[$CellContext`p4]] FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p5],
+ FeynCalc`Momentum[$CellContext`p6]], " "],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[59]:=",
+ CellID->1870797322],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"FCSchoutenBruteForce: The numbers of terms in the expression \
+decreased by: \"\>", "\[InvisibleSpace]", "5"}],
+ SequenceForm[
+ "FCSchoutenBruteForce: The numbers of terms in the expression decreased \
+by: ", 5],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[59]:=",
+ CellID->2083320504],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"FCSchoutenBruteForce: Current length of the expression: \"\>",
+ "\[InvisibleSpace]", "0"}],
+ SequenceForm["FCSchoutenBruteForce: Current length of the expression: ", 0],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[59]:=",
+ CellID->353050808]
+}, Open ]],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]=",
+ CellID->2075390810]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[12]:=",
+ CellID->692469312],
+
+Cell[BoxData[
+ FormBox["\<\"NDR\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]=",
+ CellID->1788510841]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCGetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCGetDiracGammaScheme"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCSetDiracGammaScheme",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 10.479595}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCSetDiracGammaScheme[\"scheme\"] allows you to specify how Dirac \
+matrices will be handled in D dimensions. This is mainly relevant to the \
+treatment of the fifth Dirac matrix \\[Gamma]^5, which is not well-defined in \
+dimensional regularization.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCSetDiracGammaScheme", "titlemodifier" -> "", "windowtitle" ->
+ "FCSetDiracGammaScheme", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCSetDiracGammaScheme"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[9400, 259, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->82917860]},
+ "RasterizedOutput"->{
+ Cell[15402, 508, 4650, 84, 94, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1048714447],
+ Cell[20895, 628, 3820, 71, 75, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->551636363]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 45971, 1474},
+ {"RasterizedOutput", 46113, 1478}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[593, 21, 3179, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3775, 99, 298, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4098, 114, 656, 17, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4779, 135, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->36733847],
+Cell[5519, 161, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5553, 163, 71, 1, 70, "Notes",
+ CellID->1067943069],
+Cell[5627, 166, 919, 21, 70, "Notes",
+ CellID->190401776],
+Cell[6549, 189, 257, 7, 70, "Notes",
+ CellID->1784502655],
+Cell[6809, 198, 421, 9, 70, "Notes",
+ CellID->665441283],
+Cell[7233, 209, 799, 19, 70, "Notes",
+ CellID->2003509557],
+Cell[8035, 230, 1316, 23, 70, "Notes",
+ CellID->93561036]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9400, 259, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->82917860],
+Cell[CellGroupData[{
+Cell[9811, 278, 194, 6, 26, "ExampleSection",
+ CellID->32234158],
+Cell[CellGroupData[{
+Cell[10030, 288, 128, 3, 27, "Input",
+ CellID->1948773281],
+Cell[10161, 293, 197, 6, 35, "Output",
+ CellID->1851033209]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10395, 304, 250, 7, 27, "Input",
+ CellID->98306849],
+Cell[10648, 313, 1454, 58, 43, "Output",
+ CellID->319736968]
+}, Open ]],
+Cell[12117, 374, 122, 3, 35, "ExampleText",
+ CellID->1475497628],
+Cell[CellGroupData[{
+Cell[12264, 381, 109, 3, 27, "Input",
+ CellID->933234494],
+Cell[12376, 386, 1155, 44, 43, "Output",
+ CellID->1219913945]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13568, 435, 133, 3, 27, "Input",
+ CellID->1854871493],
+Cell[13704, 440, 201, 6, 37, "Output",
+ CellID->771760149]
+}, Open ]],
+Cell[13920, 449, 141, 4, 36, "ExampleText",
+ CellID->2003592022],
+Cell[CellGroupData[{
+Cell[14086, 457, 295, 8, 27, "Input",
+ CellID->415066987],
+Cell[14384, 467, 187, 6, 35, "Output",
+ CellID->2065197167]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14608, 478, 129, 3, 27, "Input",
+ CellID->1400459732],
+Cell[14740, 483, 197, 6, 35, "Output",
+ CellID->153708414]
+}, Open ]],
+Cell[14952, 492, 95, 1, 36, "ExampleText",
+ CellID->204593488],
+Cell[CellGroupData[{
+Cell[15072, 497, 327, 9, 27, "Input",
+ CellID->1352029659],
+Cell[15402, 508, 4650, 84, 94, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1048714447]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20089, 597, 129, 3, 27, "Input",
+ CellID->969077787],
+Cell[20221, 602, 199, 6, 35, "Output",
+ CellID->1981877909]
+}, Open ]],
+Cell[20435, 611, 105, 2, 36, "ExampleText",
+ CellID->1939646369],
+Cell[CellGroupData[{
+Cell[20565, 617, 327, 9, 27, "Input",
+ CellID->1886065691],
+Cell[20895, 628, 3820, 71, 75, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->551636363]
+}, Open ]],
+Cell[24730, 702, 209, 4, 53, "ExampleText",
+ CellID->958789175],
+Cell[CellGroupData[{
+Cell[24964, 710, 194, 6, 27, "Input",
+ CellID->1406824487],
+Cell[25161, 718, 3880, 158, 56, "Output",
+ CellID->981092168]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29078, 881, 670, 21, 62, "Input",
+ CellID->1776546156],
+Cell[29751, 904, 4976, 198, 75, "Output",
+ CellID->8901553],
+Cell[CellGroupData[{
+Cell[34752, 1106, 7004, 232, 81, "Print",
+ CellID->1870797322],
+Cell[41759, 1340, 392, 10, 24, "Print",
+ CellID->2083320504],
+Cell[42154, 1352, 350, 8, 24, "Print",
+ CellID->353050808]
+}, Open ]],
+Cell[42519, 1363, 188, 6, 35, "Output",
+ CellID->2075390810]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[42744, 1374, 128, 3, 27, "Input",
+ CellID->692469312],
+Cell[42875, 1379, 198, 6, 35, "Output",
+ CellID->1788510841]
+}, Open ]]
+}, Open ]],
+Cell[43100, 1389, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[43168, 1394, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[43441, 1408, 411, 14, 56, "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+Cell[43867, 1425, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetMetricSignature.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetMetricSignature.nb
new file mode 100644
index 000000000..b25e4647e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetMetricSignature.nb
@@ -0,0 +1,409 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11618, 399]
+NotebookOptionsPosition[ 8362, 305]
+NotebookOutlinePosition[ 10670, 364]
+CellTagsIndexPosition[ 10585, 359]
+WindowTitle->FCSetMetricSignature
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCGetMetricSignature\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCGetMetricSignature"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSetMetricSignature\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSetMetricSignature"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCSetMetricSignature.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$124500],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSetMetricSignature", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCSetMetricSignature", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["FCSetMetricSignature"], "InlineFormula"],
+ " \[LineSeparator]sets the signature of the Minkowski metric used when \
+working with Cartesian objects, like CartesianPair, CartesianIndex, \
+CartesianMomentum etc. The default choice is (1,-1,-1,-1) which corresponds \
+to FCSetMetricSignature[{1,-1}]"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->190415998],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1133341347],
+
+Cell[BoxData[
+ RowBox[{"FCSetMetricSignature", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"-", "1"}], ",", "1"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->529155880],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}], "//", "LorentzToCartesian"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1237585883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"]}]}], TraditionalForm]], "Output",
+ ImageSize->{100, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->109535351]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"FCSetMetricSignature", "[",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1217187043],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}], "//", "LorentzToCartesian"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1151363561],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{100, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->881912508]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCGetMetricSignature",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetMetricSignature",
+ ButtonNote->"FCGetMetricSignature"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1449420911]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCSetMetricSignature",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 11.692516}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCSetMetricSignature sets the signature of the Minkowski metric used \
+when working with Cartesian objects, like CartesianPair, CartesianIndex, \
+CartesianMomentum etc. The default choice is (1,-1,-1,-1) which corresponds \
+to FCSetMetricSignature[{1,-1}]", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FCSetMetricSignature", "titlemodifier" -> "", "windowtitle" ->
+ "FCSetMetricSignature", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCSetMetricSignature"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4543, 127, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->190415998]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10442, 352}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 3075, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3670, 97, 297, 11, 45, "ObjectNameGrid"],
+Cell[3970, 110, 548, 13, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4543, 127, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->190415998],
+Cell[CellGroupData[{
+Cell[4955, 146, 196, 6, 26, "ExampleSection",
+ CellID->1133341347],
+Cell[5154, 154, 183, 6, 27, "Input",
+ CellID->529155880],
+Cell[CellGroupData[{
+Cell[5362, 164, 165, 5, 27, "Input",
+ CellID->1237585883],
+Cell[5530, 171, 893, 39, 39, "Output",
+ CellID->109535351]
+}, Open ]],
+Cell[6438, 213, 184, 6, 27, "Input",
+ CellID->1217187043],
+Cell[CellGroupData[{
+Cell[6647, 223, 165, 5, 27, "Input",
+ CellID->1151363561],
+Cell[6815, 230, 893, 39, 39, "Output",
+ CellID->881912508]
+}, Open ]]
+}, Open ]],
+Cell[7735, 273, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7803, 278, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8076, 292, 244, 8, 56, "SeeAlso",
+ CellID->1449420911]
+}, Open ]],
+Cell[8335, 303, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetPauliSigmaScheme.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetPauliSigmaScheme.nb
new file mode 100644
index 000000000..196b1f426
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSetPauliSigmaScheme.nb
@@ -0,0 +1,719 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 21124, 709]
+NotebookOptionsPosition[ 16737, 571]
+NotebookOutlinePosition[ 19065, 633]
+CellTagsIndexPosition[ 18945, 627]
+WindowTitle->FCSetPauliSigmaScheme
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"], "\<\"FCGetPauliSigmaScheme\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCGetPauliSigmaScheme"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSetPauliSigmaScheme\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSetPauliSigmaScheme"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCSetPauliSigmaScheme.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$124939],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSetPauliSigmaScheme", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCSetPauliSigmaScheme", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCSetPauliSigmaScheme", "[", "\"\\"", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]allows you to specify how Pauli matrices will be \
+handled in ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ " dimensions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->598221700],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "This is mainly related to the commutator of two Pauli matrices, which \
+involves a Levi-Civita tensor. The latter is not a well-defined quantity in \
+",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ " dimensions."
+}], "Notes",
+ CellID->108611295],
+
+Cell["Following schemes are supported:", "Notes",
+ CellID->1537905166],
+
+Cell[TextData[{
+ "\"None\" - This is the default value. The anticommutator relation is not \
+applied to ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ " dimensional Pauli matrices."
+}], "Notes",
+ CellID->1063338329],
+
+Cell[TextData[{
+ "\"Naive\" - Naively apply the commutator relation in ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ "-dimensions, i.e. ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], " ", "=", " ",
+ RowBox[{"2", " ", "i", " ",
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CSID", "[", "k", "]"}]}]}]], "InlineFormula"],
+ ". The Levi-Civita tensor lives in ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ "-dimensions, so that a contraction of two such tensors which have all \
+indices in common yields ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "3"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "1"}], ")"}]}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->848562608]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1353491598],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1634626631],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGetPauliSigmaScheme", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1875419531],
+
+Cell[BoxData[
+ FormBox["\<\"None\"\>", TraditionalForm]], "Output",
+ ImageSize->{36, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->20101800]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->179609494],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{81, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->3552359]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//",
+ RowBox[{
+ RowBox[{"PauliTrick", "[",
+ RowBox[{"#", ",",
+ RowBox[{"PauliReduce", "\[Rule]", "True"}]}], "]"}], "&"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1706373353],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{81, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2061667095]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetPauliSigmaScheme", "[", "\"\\"", "]"}],
+ ";"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->320749020],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCGetPauliSigmaScheme", "[", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->504297775],
+
+Cell[BoxData[
+ FormBox["\<\"Naive\"\>", TraditionalForm]], "Output",
+ ImageSize->{39, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->773704112]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliTrick", "[",
+ RowBox[{
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], ",",
+ RowBox[{"PauliReduce", "\[Rule]", "True"}]}], "]"}], "//",
+ "Contract"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1542692665],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztmws0VHkcx+12YiuVDMqj0KKJZNmzK5USJaxNkcdudeRdCpVK7dmwOijl
+sEVs72JLu2UddkttT+mxJSJFWI8NlfEahjEPd3YYNZiZe+/M3GvuzNzPORyP
+e+/v//3+fv////7/946+b5hr4KcKCgrhn7G/ufpELNuxw2evmwr7F/fQ8M1B
+oQH+jqE7A4ICdizwHcf+oyr76+UnCgoDP7NwcHBwcOQUgAlIugkYAndjOHLr
+Bi5cTuKKB6P1ce712l7QpvdTXufnFnUwec5tyd+71srIyPNuh3RIhyMWEplx
+g4MgOXAA8RPLbsh5GchYxhGMK85gKBI9pWEG6ovT6ukgxzCbMi3VPt9UTOH9
+F7nQU0fb7TZWC20UcMRCIjNucACRAwm4n5h1Q87LQPYyjlRcMQdDUQBo7W00
+iHYD9PbGbn7DfXdRgP5M9/zy3DPpaWnHLzxqR2ZOQA04YqEvIitucBAoB865
+IH5i2A05LwNZyzhyccUaDIWF1ngpYu0Cg3nhZb0Cj2G23onysNCaYXvlXT/P
+P3vLthnpeuQ/SV9t5hiRUVDRJtb9BLrAEQuJzLjBAVQOBFB+YtQNOS8DWcw4
+MnHFHgyFBqDVZS1R1/V72g12VE/JFn2CVUYT74BPffUjkWDo4uASd7eVIX5z
+0AWeWEhkxI0PCJYDBYSfWHVD7stA5jKOUFxxB8O+miRPj8RqqhARW685Ttf5
+rpAMdlBveYQh4cv0Bt4phVZ9cJ6yooqSsml8VR/8qNDNov538+flauOVjTdE
+RO3bE+qz2tbBJy6vnirWchGWWDa0pryU1F+OHQj91i44nzTaZllxYwjBcrgI
+MATcTzTcoNZmRWz4xtpYZ+ZX/pkNNNEuIo1lgIjwIaQq43AQOq5I6oYAca+f
+XJKdXdIJ/64Y6LjtpqXpcqsdrCP3vd5vrGqaWMObdHpdqrmqYUhGwOxJswIK
+yUhut/e35NgS1ByutnIuymzJ89dVnuV9vVX0W35YYtnQ68/6ZjYwBoa9902U
+0d1OVtwYQrAcLgIMAfcTBTf6GrKO5jeyW8p8n+s1a7bfM5GefUhhGSAj/MPF
+pCjjsBA6rkjqhoDjHjyYpL+jvYjKigTbqOJuwSFptcnzCXNjKkfPK7Q3F7et
+mK44Qc8rzNt08jgl7dUJlXA205jv84JCnnSBHwS03XDWINhc5m6w9FXFm0wk
+2N9shxGCX1R4YjmhqpMdnaPvtPFbnCHtBiwQd+MjguSMhI8h4H6i40Y/vYfB
+CdVXGWNpJ8p7C1gtA/BOgYBwyJaPZMwyDms0AEGkuEKr44YT4B6ddP/UJnvr
+NQcPH6/hE57Z8eRE+Prv/UN3/hB7soQM76aJQXqYfa3y5RELrUWpdYhtojMb
+z69wvt0BflBngYfmNKvzjVyD6HVHzSZNW3ajTcAZQG/15ZgtexPTEjebTxn4
+LOAgE4xjhV0H0VseXjqVFGipbb7rwfCFBDpuwAINN+DLEWSIpOgnF6Wsc02u
+5LvHJqVlAKtTiCkckxmHFI5YQj8imjoo9zrvrTGwTM5Je8U7lVAr4hcT111p
+Eq5aGM0XnXRU9BY678kR8kxQ4FRa12NvHZURGyxA6zUnNeX5if/yvesHesoP
+2WgabX80sPRov7WSoKjleeH+06dFJVVCvSACdBUneLgmP6cA1IoYY02bnJaP
+6UHJDTig4QZMOSCGSAZmZ/Gl2CCHOZMn6vtcHb0hK71lAN0pxBaOzYyDC0cq
+odwLiqoOyj1KUSDRPDLnyDPerYuekmD9ydq2rp5svPzjK3pEabi4MJp/9125
+dAAr4jSC2aLBH522Pujkc6dPKQnWm2p6eNgGC7M5a7ma6tLTb/g+2GQ0nrNW
+mWRyoHrwhK5H7jOUdLxFeLDd9zrWghjIOZH8YJX+12cbUXqAy3VjGBhzgzVm
+hgjjxiBA1z+7DKcvzSONOECaywC6UwyCrnCWBDIOJhxBXRxQU9dbHmFiEpyd
+cq+Fd1boLLCfMTvkuURGXV6gJ/re8t0GU4nR3A0WJumqr57GksQKAbs65EJn
+9XEEh4LOgV8YDenmUzRW/UkSetZmNl+01Lbi7LCyW7nYLKwUA55Jyg0WVg0Z
+hFLkN3/FX60jeqsUlwGszYdBUBTOkoB2UOHI6RoKhpY6Ws0hc+L639Iyiwpv
+lneNamBfVbypunlS9Vi+DCIYyEqjVkQSpxrsfMEZXfq7yzO2LJjrHFco+DPW
+lOJAXUVVu1sDD6J6SqPM9F1O1ovwaJK9pLefaZFaT2cvesri7dzPvsHA6/IS
+c4OFOUMA6tt6EucTSbTadJdNo9fgUlwGEGvwsRHOkoB2UOHI6eKAmjpqZYz1
+PNeNbqGnXnTzzg5Ad9kxX5uFLoG7I6P3J+W9lWgnAjWc9u5xdryjxnglnbW7
+foqJidy91W9jSEL2CzL4Tg+9+Y9tdhZO+06cS4neHpdTJ+IbsQClNNHDLjDx
+dHrCT2eej57Fxh7JusHCmCFAx/2gL7TmOIQcOv1r5vnrfGRJbxmAdooxE84a
+e+3g8w5yujhgqp5xcHBwcHBwcHBwpI//AUDM91w=
+ "], {{0, 18}, {469, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{469, 18},
+ PlotRange->{{0, 469}, {0, 18}}]], "Output",
+ ImageSize->{473, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[6]=",
+ CellID->1701277177]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1864890408],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"CSID", "[", "k", "]"}], " ",
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], "+",
+ RowBox[{"3", " ",
+ RowBox[{"CSID", "[", "j", "]"}], " ",
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "k"}], "]"}]}], "-",
+ RowBox[{"D", " ",
+ RowBox[{"CSID", "[", "j", "]"}], " ",
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "k"}], "]"}]}], "-",
+ RowBox[{"3", " ",
+ RowBox[{"CSID", "[", "i", "]"}], " ",
+ RowBox[{"KDD", "[",
+ RowBox[{"j", ",", "k"}], "]"}]}], "+",
+ RowBox[{"D", " ",
+ RowBox[{"CSID", "[", "i", "]"}], " ",
+ RowBox[{"KDD", "[",
+ RowBox[{"j", ",", "k"}], "]"}]}]}]], "Output",
+ ImageSize->{489, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->915050494]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetPauliSigmaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[8]:=",
+ CellID->1277991442]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCGetPauliSigmaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetPauliSigmaScheme",
+ ButtonNote->"FCSetPauliSigmaScheme"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCSetPauliSigmaScheme",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 12.813072}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCSetPauliSigmaScheme[\"scheme\"] allows you to specify how Pauli \
+matrices will be handled in D - 1 dimensions.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCSetPauliSigmaScheme", "titlemodifier" ->
+ "", "windowtitle" -> "FCSetPauliSigmaScheme", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCSetPauliSigmaScheme"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7032, 221, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1353491598]},
+ "RasterizedOutput"->{
+ Cell[11532, 423, 3129, 59, 40, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1701277177]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 18677, 616},
+ {"RasterizedOutput", 18821, 620}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[593, 21, 3179, 76, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3775, 99, 298, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4098, 114, 519, 16, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4642, 134, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->598221700],
+Cell[5383, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5417, 162, 280, 8, 70, "Notes",
+ CellID->108611295],
+Cell[5700, 172, 70, 1, 70, "Notes",
+ CellID->1537905166],
+Cell[5773, 175, 233, 7, 70, "Notes",
+ CellID->1063338329],
+Cell[6009, 184, 974, 31, 70, "Notes",
+ CellID->848562608]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7032, 221, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1353491598],
+Cell[CellGroupData[{
+Cell[7445, 240, 196, 6, 26, "ExampleSection",
+ CellID->1634626631],
+Cell[CellGroupData[{
+Cell[7666, 250, 113, 3, 27, "Input",
+ CellID->1875419531],
+Cell[7782, 255, 196, 6, 35, "Output",
+ CellID->20101800]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8015, 266, 133, 4, 27, "Input",
+ CellID->179609494],
+Cell[8151, 272, 1219, 52, 39, "Output",
+ CellID->3552359]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9407, 329, 220, 7, 27, "Input",
+ CellID->1706373353],
+Cell[9630, 338, 1081, 46, 39, "Output",
+ CellID->2061667095]
+}, Open ]],
+Cell[10726, 387, 150, 5, 27, "Input",
+ CellID->320749020],
+Cell[CellGroupData[{
+Cell[10901, 396, 112, 3, 27, "Input",
+ CellID->504297775],
+Cell[11016, 401, 198, 6, 35, "Output",
+ CellID->773704112]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11251, 412, 278, 9, 27, "Input",
+ CellID->1542692665],
+Cell[11532, 423, 3129, 59, 40, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1701277177]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14698, 487, 131, 4, 27, "Input",
+ CellID->1864890408],
+Cell[14832, 493, 932, 29, 69, "Output",
+ CellID->915050494]
+}, Open ]],
+Cell[15779, 525, 149, 5, 70, "Input",
+ CellID->1277991442]
+}, Open ]],
+Cell[15943, 533, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16011, 538, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[16284, 552, 411, 14, 70, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[16710, 569, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCShowEpsilon.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCShowEpsilon.nb
new file mode 100644
index 000000000..f7fe22b1e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCShowEpsilon.nb
@@ -0,0 +1,457 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12573, 447]
+NotebookOptionsPosition[ 8862, 328]
+NotebookOutlinePosition[ 10974, 385]
+CellTagsIndexPosition[ 10889, 380]
+WindowTitle->FCShowEpsilon
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCShowEpsilon\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCShowEpsilon"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCShowEpsilon.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$125379],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCShowEpsilon", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCShowEpsilon", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCShowEpsilon", "[", "expr", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitutes ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " with ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "Epsilon"}], " ", "-", " ", "EulerGamma", " ", "+",
+ " ",
+ RowBox[{"Log", "[",
+ RowBox[{"4", "Pi"}], "]"}]}]], "InlineFormula"]
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1794624197],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCShowEpsilon", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1390006382],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"D", "\[Rule]",
+ RowBox[{"4", "-",
+ RowBox[{"2", " ",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]}]}]}], ",",
+ RowBox[{"Subtract", "\[Rule]",
+ RowBox[{
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "-",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{250, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->1883203301]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1998657009],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1102064615],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->7187582],
+
+Cell[BoxData[
+ FormBox["\<\"\[CapitalDelta]\"\>", TraditionalForm]], "Output",
+ ImageSize->{15, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1703461368]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCShowEpsilon", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->513597549],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]], "-",
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "+",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{112, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1973382540]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1778637406],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[CapitalDelta]", "UV"], TraditionalForm]], "Output",
+ ImageSize->{31, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1406308911]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCShowEpsilon", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->41298138],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ SubscriptBox["\[CurlyEpsilon]", "UV"]], "-",
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "+",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{128, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->419170546]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->905775658],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[CapitalDelta]", "IR"], TraditionalForm]], "Output",
+ ImageSize->{26, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1448932438]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCShowEpsilon", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->912335152],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1",
+ SubscriptBox["\[CurlyEpsilon]", "IR"]], "-",
+ TagBox["\[DoubledGamma]",
+ Function[{}, EulerGamma]], "+",
+ RowBox[{"log", "(",
+ RowBox[{"4", " ", "\[Pi]"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{123, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->731912798]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"FCShowEpsilon",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 14.042713}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCShowEpsilon[expr] substitutes SMP[\"Delta\"] with 1/Epsilon - \
+EulerGamma + Log[4 Pi]", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCShowEpsilon", "titlemodifier" -> "", "windowtitle" -> "FCShowEpsilon",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCShowEpsilon"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5436, 177, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1998657009]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10745, 373}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3197, 91, 667, 20, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3889, 115, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1794624197],
+Cell[4631, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4687, 145, 116, 3, 70, "Input",
+ CellID->1390006382],
+Cell[4806, 150, 569, 20, 37, "Output",
+ CellID->1883203301]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5436, 177, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1998657009],
+Cell[CellGroupData[{
+Cell[5849, 196, 196, 6, 26, "ExampleSection",
+ CellID->1102064615],
+Cell[CellGroupData[{
+Cell[6070, 206, 109, 3, 27, "Input",
+ CellID->7187582],
+Cell[6182, 211, 209, 6, 35, "Output",
+ CellID->1703461368]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6428, 222, 109, 3, 27, "Input",
+ CellID->513597549],
+Cell[6540, 227, 408, 14, 56, "Output",
+ CellID->1973382540]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6985, 246, 115, 3, 29, "Input",
+ CellID->1778637406],
+Cell[7103, 251, 224, 7, 37, "Output",
+ CellID->1406308911]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7364, 263, 108, 3, 27, "Input",
+ CellID->41298138],
+Cell[7475, 268, 397, 13, 59, "Output",
+ CellID->419170546]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7909, 286, 114, 3, 29, "Input",
+ CellID->905775658],
+Cell[8026, 291, 224, 7, 37, "Output",
+ CellID->1448932438]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8287, 303, 109, 3, 27, "Input",
+ CellID->912335152],
+Cell[8399, 308, 397, 13, 59, "Output",
+ CellID->731912798]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8835, 326, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCShowReferenceCard.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCShowReferenceCard.nb
new file mode 100644
index 000000000..2672bf30e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCShowReferenceCard.nb
@@ -0,0 +1,801 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 26956, 791]
+NotebookOptionsPosition[ 24052, 708]
+NotebookOutlinePosition[ 26335, 767]
+CellTagsIndexPosition[ 26250, 762]
+WindowTitle->FCShowReferenceCard
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCShowReferenceCard\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCShowReferenceCard"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FCShowReferenceCard.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$125859],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCShowReferenceCard", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCShowReferenceCard", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCShowReferenceCard", "[",
+ RowBox[{"{", "\"\\"", "}"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] shows the reference card that corresponds to \
+\"name\". Reference cards are stored in Tables/ReferenceCards inside the \
+FeynCalc main directory. \
+\[LineSeparator]\[LineSeparator]FCShowReferenceCard[] lists available \
+reference cards."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1975462649],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1988498291],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCShowReferenceCard", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->883455219],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"\<\"FeynArts\"\>"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{74, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1406122714]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCShowReferenceCard", "[",
+ RowBox[{"{", "\"\\"", "}"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->398948618],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[GridBox[{
+ {"\<\"\\!\\(\\*\\nStyleBox[\\\"class\\\",\\nFontSlant->\\\"Italic\\\"]\\)\
+\"\>", "\<\"\\!\\(\\*\\nStyleBox[\\\"self\\\",\\nFontSlant->\\\"Italic\\\"]\\)\
+\\!\\(\\*\\nStyleBox[\\\"-\\\",\\nFontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\\\
+nStyleBox[\\\"conj\\\",\\nFontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\\nStyleBox[\\\
+\".\\\",\\nFontSlant->\\\"Italic\\\"]\\)\"\>", \
+"\<\"\\!\\(\\*\\nStyleBox[\\\"indices\\\",\\nFontSlant->\\\"Italic\\\"]\\)\"\>\
+", "\<\"\\!\\(\\*\\nStyleBox[\\\"members\\\",\\nFontSlant->\\\"Italic\\\"]\\)\
+\"\>", "\<\"\\!\\(\\*\\nStyleBox[\\\"mass\\\",\\nFontSlant->\\\"Italic\\\"]\\)\
+\"\>"},
+ {
+ TagBox[GridBox[{
+ {"\<\"F[1]\"\>"},
+ {"\<\"(neutrinos)\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"no\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"Generation\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"F[1, {1}] \\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(e\\)]\\) \
+\"\>"},
+ {"\<\"F[1, {2}] \\!\\(\\*SubscriptBox[\\(\[Nu]\\), \\(\[Mu]\\)]\\) \
+ \"\>"},
+ {"\<\"F[1, {3}] \\!\\(\\*SubscriptBox[\\(\[Nu]\\), \
+\\(\[Tau]\\)]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"0\"\>"},
+ {"\<\"0\"\>"},
+ {"\<\"0\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"F[2]\"\>"},
+ {"\<\"(massive leptons)\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"no\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"Generation\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"F[2, {1}] \
+\\!\\(\\*\\nStyleBox[\\\"e\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"F[2, {2}] \[Mu] \"\>"},
+ {"\<\"F[2, {3}] \[Tau] \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"ME\"\>"},
+ {"\<\"MM\"\>"},
+ {"\<\"ML\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"F[3]\"\>"},
+ {"\<\"(up-type quarks)\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"no\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"Generation\"\>"},
+ {"\<\"Color\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"F[3, {1, \
+\\!\\(\\*\\nStyleBox[\\\"o\\\",\\nFontSlant->\\\"Italic\\\"]\\)}] \
+\\!\\(\\*\\nStyleBox[\\\"u\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"F[3, {2, \
+\\!\\(\\*\\nStyleBox[\\\"o\\\",\\nFontSlant->\\\"Italic\\\"]\\)}] \
+\\!\\(\\*\\nStyleBox[\\\"c\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"F[3, {3, \
+\\!\\(\\*\\nStyleBox[\\\"o\\\",\\nFontSlant->\\\"Italic\\\"]\\)}] \
+\\!\\(\\*\\nStyleBox[\\\"t\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"MU\"\>"},
+ {"\<\"MC\"\>"},
+ {"\<\"MT\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"F[4]\"\>"},
+ {"\<\"(down-type quarks)\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"no\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"Generation\"\>"},
+ {"\<\"Color\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"F[4, {1, \
+\\!\\(\\*\\nStyleBox[\\\"o\\\",\\nFontSlant->\\\"Italic\\\"]\\)}] \
+\\!\\(\\*\\nStyleBox[\\\"d\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"F[4, {2, \
+\\!\\(\\*\\nStyleBox[\\\"o\\\",\\nFontSlant->\\\"Italic\\\"]\\)}] \
+\\!\\(\\*\\nStyleBox[\\\"s\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"F[4, {3, \
+\\!\\(\\*\\nStyleBox[\\\"o\\\",\\nFontSlant->\\\"Italic\\\"]\\)}] \
+\\!\\(\\*\\nStyleBox[\\\"b\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"MD\"\>"},
+ {"\<\"MS\"\>"},
+ {"\<\"MB\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"V[1]\"\>"},
+ {"\<\"V[2]\"\>"},
+ {"\<\"V[3]\"\>"},
+ {"\<\"V[4] (mixing field)\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"yes\"\>"},
+ {"\<\"yes\"\>"},
+ {"\<\"no\"\>"},
+ {"\<\"yes\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"V[1] \[Gamma] \"\>"},
+ {"\<\"V[2] \
+\\!\\(\\*\\nStyleBox[\\\"Z\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"V[3] \\!\\(\\*\\nStyleBox[SuperscriptBox[\\\"W\\\", \
+\\\"-\\\"],\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"V[4] \
+\\!\\(\\*\\nStyleBox[\\\"\[Gamma]\\\",\\nFontSlant->\\\"Italic\\\"]\\)\\!\\(\\\
+*\\nStyleBox[\\\"-\\\",\\nFontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\\nStyleBox[\\\
+\"Z\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"0\"\>"},
+ {"\<\"MZ\"\>"},
+ {"\<\"MW\"\>"},
+ {"\<\"MAZ\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"S[1]\"\>"},
+ {"\<\"S[2]\"\>"},
+ {"\<\"S[3]\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"yes\"\>"},
+ {"\<\"yes\"\>"},
+ {"\<\"no\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"S[1] \
+\\!\\(\\*\\nStyleBox[\\\"H\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"S[2] \
+\\!\\(\\*\\nStyleBox[SuperscriptBox[\\nStyleBox[\\\"G\\\",\\nFontSlant->\\\"\
+Italic\\\"], \\\"0\\\"],\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"S[3] \\!\\(\\*\\nStyleBox[SuperscriptBox[\\\"G\\\", \
+\\\"-\\\"],\\nFontSlant->\\\"Italic\\\"]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"MH\"\>"},
+ {"\<\"MG0\"\>"},
+ {"\<\"MGp\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"U[1]\"\>"},
+ {"\<\"U[2]\"\>"},
+ {"\<\"U[3]\"\>"},
+ {"\<\"U[4]\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"no\"\>"},
+ {"\<\"no\"\>"},
+ {"\<\"no\"\>"},
+ {"\<\"no\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"U[1] \
+\\!\\(\\*SubscriptBox[\\nStyleBox[\\\"u\\\",\\nFontSlant->\\\"Italic\\\"], \
+\\(\[Gamma]\\)]\\) \"\>"},
+ {"\<\"U[2] \\!\\(\\*\\nStyleBox[SubscriptBox[\\nStyleBox[\\\"u\\\",\
+\\nFontSlant->\\\"Italic\\\"], \\\"Z\\\"],\\nFontSlant->\\\"Italic\\\"]\\) \
+\"\>"},
+ {"\<\"U[3] \
+\\!\\(\\*SubscriptBox[\\nStyleBox[\\\"u\\\",\\nFontSlant->\\\"Italic\\\"], \
+\\(-\\)]\\) \"\>"},
+ {"\<\"U[4] \\!\\(\\*\\nStyleBox[SubscriptBox[\\\"u\\\", \\\"+\\\"],\
+\\nFontSlant->\\\"Italic\\\"]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"0\"\>"},
+ {"\<\"MZ\"\>"},
+ {"\<\"MW\"\>"},
+ {"\<\"MW\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {
+ TagBox[GridBox[{
+ {"\<\"SV[2] (mixing field)\"\>"},
+ {"\<\"SV[3] (mixing field)\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"yes\"\>"},
+ {"\<\"no\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"\"\>"},
+ {"\<\"\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"SV[2] \\!\\(\\*\\nStyleBox[SuperscriptBox[\\nStyleBox[\\\"G\\\
+\",\\nFontSlant->\\\"Italic\\\"], \\\"0\\\"],\\nFontSlant->\\\"Italic\\\"]\\)\
+\\!\\(\\*\\nStyleBox[\\\"-\\\",\\nFontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\\\
+nStyleBox[\\\"Z\\\",\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"SV[3] \\!\\(\\*\\nStyleBox[SuperscriptBox[\\nStyleBox[\\\"G\\\
+\",\\nFontSlant->\\\"Italic\\\"], \\\"-\\\"],\\nFontSlant->\\\"Italic\\\"]\\)\
+\\!\\(\\*\\nStyleBox[\\\"-\\\",\\nFontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+SuperscriptBox[\\nStyleBox[\\\"W\\\",\\nFontSlant->\\\"Italic\\\"], \
+\\(-\\)]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"MZ\"\>"},
+ {"\<\"MW\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {"\<\"The following fields are avaialble via the SMQCD extension:\"\>",
+ "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]",
+ "\[SpanFromLeft]"},
+ {
+ TagBox[GridBox[{
+ {"\<\"V[5]\"\>"},
+ {"\<\"U[5]\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"yes\"\>"},
+ {"\<\"no\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"Gluon\"\>"},
+ {"\<\"Gluon\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"V[5, {i}] \\!\\(\\*\\nStyleBox[SubscriptBox[\\\"g\\\", \
+\\\"i\\\"],\\nFontSlant->\\\"Italic\\\"]\\) \"\>"},
+ {"\<\"U[5, {i}] \
+\\!\\(\\*SubscriptBox[\\nStyleBox[\\\"u\\\",\\nFontSlant->\\\"Italic\\\"],\\\
+nStyleBox[SubscriptBox[\\\"g\\\",\\nStyleBox[\\\"i\\\",\\nFontSlant->\\\"\
+Italic\\\"]],\\nFontSlant->\\\"Italic\\\"]]\\) \"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"],
+ TagBox[GridBox[{
+ {"\<\"0\"\>"},
+ {"\<\"0\"\>"}
+ },
+ DefaultBaseStyle->"Column",
+ GridBoxAlignment->{"Columns" -> {{Left}}},
+ GridBoxItemSize->{
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
+ "Column"]},
+ {"\<\"Comments: V[4] is commented out by default in SM.mod;\\n\\tSV[2] \
+and SV[3] must be enabled with $SVMixing = True.\"\>", "\[SpanFromLeft]",
+ "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]"}
+ },
+ AutoDelete->False,
+ GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}},
+ GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
+ GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+ GridBoxSpacings->{"Columns" -> {{1.5}}, "Rows" -> {{1.5}}}],
+ "Grid"], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[106]:=",
+ CellID->1009590126]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"FCShowReferenceCard",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 15.249327}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCShowReferenceCard[{\"name\"}] shows the reference card that \
+corresponds to \"name\". Reference cards are stored in Tables/ReferenceCards \
+inside the FeynCalc main directory. FCShowReferenceCard[] lists available \
+reference cards.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCShowReferenceCard", "titlemodifier" -> "", "windowtitle" ->
+ "FCShowReferenceCard", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCShowReferenceCard"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3858, 109, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1975462649]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 26106, 755}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
+Cell[3211, 89, 622, 16, 134, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3858, 109, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1975462649],
+Cell[CellGroupData[{
+Cell[4271, 128, 196, 6, 26, "ExampleSection",
+ CellID->1988498291],
+Cell[CellGroupData[{
+Cell[4492, 138, 110, 3, 27, "Input",
+ CellID->883455219],
+Cell[4605, 143, 678, 20, 37, "Output",
+ CellID->1406122714]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5320, 168, 153, 4, 27, "Input",
+ CellID->398948618],
+Cell[5476, 174, 18510, 527, 740, "Print",
+ CellID->1009590126]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[24025, 706, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSplit.nb
new file mode 100644
index 000000000..8398ec787
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSplit.nb
@@ -0,0 +1,362 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10500, 352]
+NotebookOptionsPosition[ 7197, 255]
+NotebookOutlinePosition[ 9507, 314]
+CellTagsIndexPosition[ 9423, 309]
+WindowTitle->FCSplit
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSplit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCSplit.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$126287],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCSplit", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{",
+ RowBox[{"v1", ",", "v2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]splits expr into pieces that are free of any occurence \
+of v1, v2, ... and pieces that contain those variables. This works both on \
+sums and products. The output is provided in the form of a two element list. \
+One can recover the original expression by applying Total to that list."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->855887565],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCSplit", "]"}]], "Input",
+ CellLabel->"In[158]:=",
+ CellID->516520341],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Expanding", "\[Rule]", "True"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{124, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[158]=",
+ CellID->791302016]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2024249960],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->441003340],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSplit", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+", "b"}], ")"}], "^", "2"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1633798001],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["b", "2"], ",",
+ RowBox[{
+ SuperscriptBox["a", "2"], "+",
+ RowBox[{"2", " ", "a", " ", "b"}]}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{117, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1044001596]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSplit", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+", "b", "+", "c"}], ")"}], "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->25854671],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["c", "2"], ",",
+ RowBox[{
+ SuperscriptBox["a", "2"], "+",
+ RowBox[{"2", " ", "a", " ", "b"}], "+",
+ RowBox[{"2", " ", "a", " ", "c"}], "+",
+ SuperscriptBox["b", "2"], "+",
+ RowBox[{"2", " ", "b", " ", "c"}]}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{255, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->803702257]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCSplit",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 16.610772}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCSplit[exp, {v1, v2, ...}] splits expr into pieces that are free of any \
+occurence of v1, v2, ... and pieces that contain those variables. This works \
+both on sums and products. The output is provided in the form of a two \
+element list. One can recover the original expression by applying Total to \
+that list.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCSplit",
+ "titlemodifier" -> "", "windowtitle" -> "FCSplit", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCSplit"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5140, 164, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2024249960]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9279, 302}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3160, 91, 727, 18, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3912, 113, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->855887565],
+Cell[4653, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4709, 143, 111, 3, 70, "Input",
+ CellID->516520341],
+Cell[4823, 148, 256, 9, 37, "Output",
+ CellID->791302016]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5140, 164, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2024249960],
+Cell[CellGroupData[{
+Cell[5553, 183, 195, 6, 26, "ExampleSection",
+ CellID->441003340],
+Cell[CellGroupData[{
+Cell[5773, 193, 226, 8, 27, "Input",
+ CellID->1633798001],
+Cell[6002, 203, 351, 13, 42, "Output",
+ CellID->1044001596]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6390, 221, 259, 9, 27, "Input",
+ CellID->25854671],
+Cell[6652, 232, 479, 16, 42, "Output",
+ CellID->803702257]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7170, 253, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSubsetQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSubsetQ.nb
new file mode 100644
index 000000000..3dae5e08f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSubsetQ.nb
@@ -0,0 +1,274 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8334, 264]
+NotebookOptionsPosition[ 5430, 181]
+NotebookOutlinePosition[ 7721, 240]
+CellTagsIndexPosition[ 7637, 235]
+WindowTitle->FCSubsetQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSubsetQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSubsetQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCSubsetQ.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$126716],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSubsetQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCSubsetQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCSubsetQ", "[",
+ RowBox[{"list1", ",", "list2"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] yields True if list2 is a subset of list1 and False \
+otherwise. It returns the same results as the standard SubsetQ. The only \
+reason for introducing FCSubsetQ is that SubsetQ is not available in \
+Mathematica 8 and 9, which are still supported by FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->579196669],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2073784806],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSubsetQ", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "d", ",", "e"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->798961655],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1692783659]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSubsetQ", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "d"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->772553479],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->792457600]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FCSubsetQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 17.612233}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCSubsetQ[list1, list2] yields True if list2 is a subset of list1 and \
+False otherwise. It returns the same results as the standard SubsetQ. The \
+only reason for introducing FCSubsetQ is that SubsetQ is not available in \
+Mathematica 8 and 9, which are still supported by FeynCalc.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCSubsetQ",
+ "titlemodifier" -> "", "windowtitle" -> "FCSubsetQ", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCSubsetQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3806, 108, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->579196669]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7494, 228}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[581, 21, 2277, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2861, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[3150, 89, 631, 15, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3806, 108, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->579196669],
+Cell[CellGroupData[{
+Cell[4218, 127, 196, 6, 26, "ExampleSection",
+ CellID->2073784806],
+Cell[CellGroupData[{
+Cell[4439, 137, 256, 8, 27, "Input",
+ CellID->798961655],
+Cell[4698, 147, 191, 6, 35, "Output",
+ CellID->1692783659]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4926, 158, 246, 8, 27, "Input",
+ CellID->772553479],
+Cell[5175, 168, 189, 6, 35, "Output",
+ CellID->792457600]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5403, 179, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSymmetrize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSymmetrize.nb
index 799240e63..533ecbb3d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSymmetrize.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCSymmetrize.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10109, 343]
-NotebookOptionsPosition[ 6528, 231]
-NotebookOutlinePosition[ 9144, 306]
-CellTagsIndexPosition[ 9002, 299]
+NotebookDataLength[ 10779, 359]
+NotebookOptionsPosition[ 7437, 258]
+NotebookOutlinePosition[ 9912, 327]
+CellTagsIndexPosition[ 9800, 321]
WindowTitle->FCSymmetrize
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCSymmetrize\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCSymmetrize"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCAntiSymmetrize\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCAntiSymmetrize"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCSymmetrize\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCSymmetrize"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCSymmetrize.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63063],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCSymmetrize", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$127145],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCSymmetrize", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FCSymmetrize.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCSymmetrize", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCSymmetrize", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->567015928],
+ CellID->118210830],
Cell[CellGroupData[{
@@ -121,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->320775024],
+ CellID->753929777],
Cell[CellGroupData[{
@@ -146,12 +178,11 @@ Cell[BoxData[
RowBox[{"a", ",", "b"}], ")"}], "+",
RowBox[{"f", "(",
RowBox[{"b", ",", "a"}], ")"}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{143, 41},
+ ImageSize->{156, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Symmetrize",
- CellLabel->"Out[1]=",
- CellID->371734059]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -186,12 +217,11 @@ Cell[BoxData[
RowBox[{"f", "(",
RowBox[{"z", ",", "y", ",", "x"}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{496, 41},
+ ImageSize->{556, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Symmetrize",
- CellLabel->"Out[2]=",
- CellID->125642352]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -215,16 +245,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["FCAntiSymmetrize",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FCAntiSymmetrize",
ButtonNote->"FCAntiSymmetrize"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FCSymmetrize",
- CellID->714962705]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -241,22 +268,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 28.860664}",
+ "built" -> "{2020, 1, 5, 18, 57, 18.649750}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FCSymmetrize[expr, {a1, a2, ...}] symmetrizes expr with respect to the \
-variables a1,a2, ... ", "synonyms" -> {}, "title" -> "FCSymmetrize",
- "titlemodifier" -> "", "windowtitle" -> "FCSymmetrize", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FCSymmetrize"}, "SearchTextTranslated" ->
- ""},
+variables a1,a2, ... ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FCSymmetrize", "titlemodifier" -> "", "windowtitle" -> "FCSymmetrize",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FCSymmetrize"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -264,8 +291,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -274,77 +302,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3455, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4463, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->567015928]},
+ CellID->118210830]},
"Symmetrize"->{
- Cell[4087, 127, 259, 9, 27, "Input",
+ Cell[5095, 159, 259, 9, 27, "Input",
CellTags->"Symmetrize",
CellID->848650980],
- Cell[4349, 138, 422, 15, 62, "Output",
- CellTags->"Symmetrize",
- CellID->371734059],
- Cell[4808, 158, 280, 9, 27, "Input",
+ Cell[5357, 170, 402, 14, 56, "Output",
+ CellTags->"Symmetrize"],
+ Cell[5796, 189, 280, 9, 27, "Input",
CellTags->"Symmetrize",
CellID->1287424961],
- Cell[5091, 169, 757, 24, 62, "Output",
- CellTags->"Symmetrize",
- CellID->125642352]},
- "FCSymmetrize"->{
- Cell[6216, 216, 270, 10, 32, "Text",
- CellTags->"FCSymmetrize",
- CellID->714962705]}
+ Cell[6079, 200, 737, 23, 56, "Output",
+ CellTags->"Symmetrize"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8370, 275},
- {"Symmetrize", 8506, 279},
- {"FCSymmetrize", 8887, 292}
+ {"PrimaryExamplesSection", 9322, 303},
+ {"Symmetrize", 9459, 307}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3035, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 524, 16, 82, "Usage",
+Cell[3622, 97, 289, 11, 45, "ObjectNameGrid"],
+Cell[3914, 110, 524, 16, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3455, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4463, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->567015928],
+ CellID->118210830],
Cell[CellGroupData[{
-Cell[3867, 117, 195, 6, 25, "ExampleSection",
- CellID->320775024],
+Cell[4875, 149, 195, 6, 26, "ExampleSection",
+ CellID->753929777],
Cell[CellGroupData[{
-Cell[4087, 127, 259, 9, 27, "Input",
+Cell[5095, 159, 259, 9, 27, "Input",
CellTags->"Symmetrize",
CellID->848650980],
-Cell[4349, 138, 422, 15, 62, "Output",
- CellTags->"Symmetrize",
- CellID->371734059]
+Cell[5357, 170, 402, 14, 56, "Output",
+ CellTags->"Symmetrize"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4808, 158, 280, 9, 27, "Input",
+Cell[5796, 189, 280, 9, 27, "Input",
CellTags->"Symmetrize",
CellID->1287424961],
-Cell[5091, 169, 757, 24, 62, "Output",
- CellTags->"Symmetrize",
- CellID->125642352]
+Cell[6079, 200, 737, 23, 56, "Output",
+ CellTags->"Symmetrize"]
}, Open ]]
}, Open ]],
-Cell[5875, 197, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6843, 227, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5943, 202, 270, 12, 31, "SeeAlsoSection",
+Cell[6911, 232, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6216, 216, 270, 10, 32, "Text",
- CellTags->"FCSymmetrize",
- CellID->714962705]
+Cell[7184, 246, 211, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6501, 229, 23, 0, 42, "FooterCell"]
+Cell[7410, 256, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTopology.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTopology.nb
new file mode 100644
index 000000000..b2d9d3521
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTopology.nb
@@ -0,0 +1,505 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16894, 495]
+NotebookOptionsPosition[ 13870, 408]
+NotebookOutlinePosition[ 16159, 467]
+CellTagsIndexPosition[ 16074, 462]
+WindowTitle->FCTopology
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCTopology\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCTopology"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCTopology.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$127582],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCTopology", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCTopology", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FCTopology", "[",
+ RowBox[{"id", ",",
+ RowBox[{"{",
+ RowBox[{"prop1", ",", "prop2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]denotes a topology with the identifier id that is \
+characterized by the propagators {prop1, prop2, ...}. The propagators in the \
+list do not necessarily have to form a valid basis, i.e. the basis may also \
+be incomplete or overdetermined."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->10687640],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1423261979],
+
+Cell["A 2-loop topology with one external momentum Q", "Notes",
+ CellID->61003118],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCTopology", "[",
+ RowBox[{"topo1", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"SFAD", "[", "p1", "]"}], ",",
+ RowBox[{"SFAD", "[", "p2", "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p1", "-", "p2"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p2"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p1"}], "]"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->118610951],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"FCTopology", "(",
+ RowBox[{"topo1", ",",
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["p1", TraditionalForm]}], "-",
+ FormBox["p2", TraditionalForm], "+",
+ FormBox["Q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["Q", TraditionalForm], "-",
+ FormBox["p2", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["Q", TraditionalForm], "-",
+ FormBox["p1", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm]}], "}"}]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{456, 87},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1251398012]
+}, Open ]],
+
+Cell["A 3-loop topology with one external momentum Q", "Notes",
+ CellID->775051570],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCTopology", "[",
+ RowBox[{"topo2", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"SFAD", "[", "p1", "]"}], ",",
+ RowBox[{"SFAD", "[", "p2", "]"}], ",",
+ RowBox[{"SFAD", "[", "p3", "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p1", "-", "p2", "-", "p3"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p1", "-", "p2"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p1"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"Q", "-", "p2"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"p1", "+", "p3"}], "]"}], ",",
+ RowBox[{"SFAD", "[",
+ RowBox[{"p2", "+", "p3"}], "]"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1727195996],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"FCTopology", "(",
+ RowBox[{"topo2", ",",
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p3", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["p1", TraditionalForm]}], "-",
+ FormBox["p2", TraditionalForm], "-",
+ FormBox["p3", TraditionalForm], "+",
+ FormBox["Q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["p1", TraditionalForm]}], "-",
+ FormBox["p2", TraditionalForm], "+",
+ FormBox["Q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["Q", TraditionalForm], "-",
+ FormBox["p1", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["Q", TraditionalForm], "-",
+ FormBox["p2", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1", TraditionalForm], "+",
+ FormBox["p3", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm], ",",
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p2", TraditionalForm], "+",
+ FormBox["p3", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]],
+ TraditionalForm]}], "}"}]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{519, 134},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->98652862]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"FCTopology",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 19.742508}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCTopology[id, {prop1, prop2, ...}] denotes a topology with the \
+identifier id that is characterized by the propagators {prop1, prop2, ...}. \
+The propagators in the list do not necessarily have to form a valid basis, \
+i.e. the basis may also be incomplete or overdetermined.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FCTopology", "titlemodifier" -> "",
+ "windowtitle" -> "FCTopology", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FCTopology"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3873, 111, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->10687640]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15932, 455}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 2281, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2866, 76, 287, 11, 45, "ObjectNameGrid"],
+Cell[3156, 89, 692, 18, 118, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3873, 111, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->10687640],
+Cell[CellGroupData[{
+Cell[4284, 130, 196, 6, 26, "ExampleSection",
+ CellID->1423261979],
+Cell[4483, 138, 82, 1, 32, "Notes",
+ CellID->61003118],
+Cell[CellGroupData[{
+Cell[4590, 143, 479, 14, 45, "Input",
+ CellID->118610951],
+Cell[5072, 159, 2789, 76, 108, "Output",
+ CellID->1251398012]
+}, Open ]],
+Cell[7876, 238, 83, 1, 32, "Notes",
+ CellID->775051570],
+Cell[CellGroupData[{
+Cell[7984, 243, 765, 21, 62, "Input",
+ CellID->1727195996],
+Cell[8752, 266, 5052, 135, 155, "Output",
+ CellID->98652862]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[13843, 406, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceExpand.nb
index e4c9498d3..ad89bddb8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceExpand.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceExpand.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 28644, 1059]
-NotebookOptionsPosition[ 24531, 927]
-NotebookOutlinePosition[ 26648, 983]
-CellTagsIndexPosition[ 26563, 978]
+NotebookDataLength[ 31459, 1157]
+NotebookOptionsPosition[ 27014, 1016]
+NotebookOutlinePosition[ 29178, 1074]
+CellTagsIndexPosition[ 29092, 1069]
WindowTitle->FCTraceExpand
WindowFrame->Normal*)
@@ -80,12 +80,13 @@ FCTraceExpand.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63400],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$128030],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FCTraceExpand", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]
}], "AnchorBar"]}
}]], "AnchorBarGrid",
@@ -95,15 +96,31 @@ FCTraceExpand.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCTraceExpand", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCTraceExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"FCTraceExpand", "[", "expr", "]"}]], "InlineFormula"],
- " expands traces of Dirac and SU(N) matrices using linearity of the \
-trace. The traces themselves are not evaluated."
+ RowBox[{"FCTraceExpand", "[", "exp", "]"}]], "InlineFormula"],
+ " expands traces of Dirac and ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " matrices using linearity of the trace. The traces themselves are not \
+evaluated."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -114,6 +131,65 @@ trace. The traces themselves are not evaluated."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1546772099],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCTraceExpand", "]"}]], "Input",
+ CellLabel->"In[115]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracTrace", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCTraceFactor", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}], ",",
+ RowBox[{"PreservePropagatorStructures", "\[Rule]", "False"}], ",",
+ RowBox[{"SUNTrace", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{573, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[115]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -125,38 +201,37 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->216663855],
+ CellID->742136174],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->718614792],
+ CellID->496097389],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"dtr1", "=",
- RowBox[{"DiracTrace", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"GA", "[", "mu", "]"}], ".",
- RowBox[{"(",
- RowBox[{
- RowBox[{"GS", "[", "p1", "]"}], "+", "m1"}], ")"}], ".",
- RowBox[{"GA", "[", "nu", "]"}], ".",
- RowBox[{"(",
- RowBox[{
- RowBox[{"GS", "[", "p2", "]"}], "+", "m2"}], ")"}], ".",
- RowBox[{"GA", "[", "rho", "]"}]}], "+", "x"}], "]"}]}]], "Input",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p1", "]"}], "+", "m1"}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p2", "]"}], "+", "m2"}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Rho]", "]"}]}], "+", "x"}], "]"}]], "Input",
CellLabel->"In[1]:=",
CellID->55860621],
@@ -170,7 +245,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
@@ -189,7 +264,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
@@ -208,22 +283,21 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], "+", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{314, 25},
+ ImageSize->{299, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->632138578]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FCTraceExpand", "[", "dtr1", "]"}]], "Input",
+ RowBox[{"FCTraceExpand", "[", "%", "]"}]], "Input",
CellLabel->"In[2]:=",
CellID->502042032],
@@ -237,19 +311,19 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}]}], "+",
@@ -260,13 +334,13 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -280,7 +354,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}]}], "+",
@@ -291,7 +365,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -305,13 +379,13 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}]}], "+",
@@ -321,7 +395,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -335,7 +409,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -349,7 +423,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}], "+",
@@ -357,18 +431,17 @@ Cell[BoxData[
RowBox[{"tr", "(",
FormBox["1",
TraditionalForm], ")"}], " ", "x"}]}], TraditionalForm]], "Output",
- ImageSize->{494, 54},
+ ImageSize->{457, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->712633835]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FCTraceExpand", "[",
- RowBox[{"dtr1", ",",
+ RowBox[{"%%", ",",
RowBox[{"DotSimplify", "\[Rule]", "False"}]}], "]"}]], "Input",
CellLabel->"In[3]:=",
CellID->611074974],
@@ -382,7 +455,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -397,7 +470,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -412,7 +485,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}], "+",
@@ -420,18 +493,17 @@ Cell[BoxData[
RowBox[{"tr", "(",
FormBox["1",
TraditionalForm], ")"}], " ", "x"}]}], TraditionalForm]], "Output",
- ImageSize->{348, 25},
+ ImageSize->{332, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->1845830738]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FCTraceExpand", "[",
- RowBox[{"dtr1", ",",
+ RowBox[{"%%%", ",",
RowBox[{"DiracTrace", "\[Rule]", "False"}]}], "]"}]], "Input",
CellLabel->"In[4]:=",
CellID->1030948092],
@@ -445,7 +517,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -460,7 +532,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -475,39 +547,43 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["rho",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}], "+", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{314, 25},
+ ImageSize->{299, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->1121814026]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"dtr2", "=",
- RowBox[{
- RowBox[{"a", "*",
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"GA", "[", "mu", "]"}], ".",
- RowBox[{"(",
- RowBox[{
- RowBox[{"GS", "[", "p1", "]"}], "+", "m1"}], ")"}], ".",
- RowBox[{"GA", "[", "nu", "]"}]}], "]"}]}], "+",
- RowBox[{"b", "*",
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"GA", "[", "mu", "]"}], ".",
- RowBox[{"(",
- RowBox[{
- RowBox[{"GS", "[", "p2", "]"}], "+", "m2"}], ")"}], ".",
- RowBox[{"GA", "[", "nu", "]"}]}], "]"}]}]}]}]], "Input",
- CellLabel->"In[5]:=",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"a", "*",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p1", "]"}], "+", "m1"}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}], "]"}]}], "+",
+ RowBox[{"b", "*",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p2", "]"}], "+", "m2"}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
CellID->312665650],
Cell[BoxData[
@@ -521,7 +597,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
@@ -540,7 +616,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}],
@@ -553,7 +629,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
@@ -572,26 +648,25 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{381, 21},
+ ImageSize->{359, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[5]=",
- CellID->141070294]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FCTraceExpand", "[",
- RowBox[{"dtr2", ",",
+ RowBox[{"%", ",",
RowBox[{"Momentum", "\[Rule]",
RowBox[{"{", "p1", "}"}]}]}], "]"}]], "Input",
- CellLabel->"In[6]:=",
+ CellLabel->"In[2]:=",
CellID->851121632],
Cell[BoxData[
@@ -607,13 +682,13 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}]}], "+",
@@ -623,7 +698,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -637,7 +712,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}]}], ")"}]}], "+",
@@ -648,7 +723,7 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["mu",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
@@ -663,34 +738,48 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["nu",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{480, 21},
+ ImageSize->{442, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[6]=",
- CellID->1128579487]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
-Cell["\<\
-At the moment SUNTrace automatically expands its content, so here \
-FCTraceExpand is not needed. However, this may change in the future.\
-\>", "Notes",
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "At the moment ",
+ ButtonBox["SUNTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTrace",
+ ButtonNote->"SUNTrace"],
+ " automatically expands its content, so here ",
+ ButtonBox["FCTraceExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCTraceExpand",
+ ButtonNote->"FCTraceExpand"],
+ " is not needed. However, this may change in the future."
+}], "Notes",
CellID->1671076290],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"str", "=",
- RowBox[{"SUNTrace", "[",
- RowBox[{
- RowBox[{"SUNT", "[",
- RowBox[{"i", ",", "j", ",", "k"}], "]"}], "+",
- RowBox[{"SUNT", "[",
- RowBox[{"l", ",", "m", ",", "n"}], "]"}]}], "]"}]}]], "Input",
- CellLabel->"In[7]:=",
+ RowBox[{"SUNTrace", "[",
+ RowBox[{
+ RowBox[{"SUNT", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], "+",
+ RowBox[{"SUNT", "[",
+ RowBox[{"l", ",", "m", ",", "n"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
CellID->1858007214],
Cell[BoxData[
@@ -746,18 +835,17 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{217, 19},
+ ImageSize->{246, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[7]=",
- CellID->1073657663]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FCTraceExpand", "[", "str", "]"}]], "Input",
- CellLabel->"In[8]:=",
+ RowBox[{"FCTraceExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
CellID->1593699893],
Cell[BoxData[
@@ -813,20 +901,19 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{217, 19},
+ ImageSize->{246, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[8]=",
- CellID->1696291909]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FCTraceExpand", "[",
- RowBox[{"str", ",",
+ RowBox[{"%%", ",",
RowBox[{"SUNTrace", "\[Rule]", "False"}]}], "]"}]], "Input",
- CellLabel->"In[9]:=",
+ CellLabel->"In[3]:=",
CellID->805159379],
Cell[BoxData[
@@ -882,11 +969,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{217, 19},
+ ImageSize->{246, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[9]=",
- CellID->555663597]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -912,15 +999,17 @@ Cell[TextData[{
Cell[TextData[{
StyleBox[ButtonBox["DiracTrace",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracTrace"],
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["SUNTrace",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SUNTrace"],
- FontFamily->"Verdana"]
-}], "SeeAlso",
- CellID->929782353]
+ ButtonData->"paclet:FeynCalc/ref/SUNTrace",
+ ButtonNote->"SUNTrace"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -928,7 +1017,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FCTraceExpand",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -937,22 +1026,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 30.422965}",
+ "built" -> "{2020, 1, 5, 18, 57, 20.737135}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FCTraceExpand[expr] expands traces of Dirac and SU(N) matrices using \
+ "FCTraceExpand[exp] expands traces of Dirac and SU (N) matrices using \
linearity of the trace. The traces themselves are not evaluated.",
- "synonyms" -> {}, "title" -> "FCTraceExpand", "titlemodifier" -> "",
- "windowtitle" -> "FCTraceExpand", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FCTraceExpand"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCTraceExpand",
+ "titlemodifier" -> "", "windowtitle" -> "FCTraceExpand", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FCTraceExpand"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -960,8 +1050,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -970,97 +1061,104 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4196, 116, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6304, 192, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->216663855]}
+ CellID->742136174]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 26420, 971}
+ {"PrimaryExamplesSection", 28949, 1062}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 3083, 74, 51, "AnchorBarGrid",
+Cell[585, 21, 3113, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[3671, 97, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3730, 100, 441, 12, 82, "Usage",
+Cell[3701, 98, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4016, 113, 537, 16, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4196, 116, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4578, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1546772099],
+Cell[5320, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5376, 163, 97, 2, 70, "Input"],
+Cell[5476, 167, 767, 18, 75, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6304, 192, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->216663855],
+ CellID->742136174],
Cell[CellGroupData[{
-Cell[4608, 135, 195, 6, 25, "ExampleSection",
- CellID->718614792],
+Cell[6716, 211, 195, 6, 26, "ExampleSection",
+ CellID->496097389],
Cell[CellGroupData[{
-Cell[4828, 145, 488, 15, 27, "Input",
+Cell[6936, 221, 460, 14, 27, "Input",
CellID->55860621],
-Cell[5319, 162, 1544, 57, 46, "Output",
- CellID->632138578]
+Cell[7399, 237, 1533, 56, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6900, 224, 112, 3, 27, "Input",
+Cell[8969, 298, 109, 3, 27, "Input",
CellID->502042032],
-Cell[7015, 229, 3653, 134, 75, "Output",
- CellID->712633835]
+Cell[9081, 303, 3669, 133, 64, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10705, 368, 179, 5, 27, "Input",
+Cell[12787, 441, 177, 5, 27, "Input",
CellID->611074974],
-Cell[10887, 375, 1399, 51, 46, "Output",
- CellID->1845830738]
+Cell[12967, 448, 1387, 50, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12323, 431, 179, 5, 27, "Input",
+Cell[14391, 503, 178, 5, 27, "Input",
CellID->1030948092],
-Cell[12505, 438, 1305, 47, 46, "Output",
- CellID->1121814026]
+Cell[14572, 510, 1293, 46, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13847, 490, 636, 20, 45, "Input",
+Cell[15902, 561, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[16032, 567, 606, 19, 45, "Input",
CellID->312665650],
-Cell[14486, 512, 1932, 71, 42, "Output",
- CellID->141070294]
+Cell[16641, 588, 1924, 70, 42, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16455, 588, 198, 6, 27, "Input",
+Cell[18602, 663, 195, 6, 27, "Input",
CellID->851121632],
-Cell[16656, 596, 2181, 77, 42, "Output",
- CellID->1128579487]
+Cell[18800, 671, 2178, 76, 42, "Output"]
+}, Open ]]
}, Open ]],
-Cell[18852, 676, 182, 4, 45, "Notes",
+Cell[CellGroupData[{
+Cell[21027, 753, 105, 2, 9, "ExampleDelimiter"],
+Cell[21135, 757, 425, 13, 49, "Notes",
CellID->1671076290],
Cell[CellGroupData[{
-Cell[19059, 684, 292, 9, 27, "Input",
+Cell[21585, 774, 262, 8, 27, "Input",
CellID->1858007214],
-Cell[19354, 695, 1363, 57, 40, "Output",
- CellID->1073657663]
+Cell[21850, 784, 1342, 56, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20754, 757, 112, 3, 27, "Input",
+Cell[23229, 845, 110, 3, 27, "Input",
CellID->1593699893],
-Cell[20869, 762, 1363, 57, 40, "Output",
- CellID->1696291909]
+Cell[23342, 850, 1342, 56, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[22269, 824, 175, 5, 27, "Input",
+Cell[24721, 911, 174, 5, 27, "Input",
CellID->805159379],
-Cell[22447, 831, 1362, 57, 40, "Output",
- CellID->555663597]
+Cell[24898, 918, 1342, 56, 40, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[23836, 892, 31, 0, 29, "SectionFooterSpacer"]
+Cell[26279, 979, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23904, 897, 270, 12, 31, "SeeAlsoSection",
+Cell[26347, 984, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[24177, 911, 312, 11, 55, "SeeAlso",
- CellID->929782353]
+Cell[26620, 998, 352, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[24504, 925, 23, 0, 42, "FooterCell"]
+Cell[26987, 1014, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceFactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceFactor.nb
index c0578d3a9..9fe48ebba 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceFactor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCTraceFactor.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8493, 266]
-NotebookOptionsPosition[ 5773, 188]
-NotebookOutlinePosition[ 7957, 245]
-CellTagsIndexPosition[ 7873, 240]
+NotebookDataLength[ 12039, 401]
+NotebookOptionsPosition[ 8828, 307]
+NotebookOutlinePosition[ 11002, 364]
+CellTagsIndexPosition[ 10917, 359]
WindowTitle->FCTraceFactor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FCTraceFactor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FCTraceFactor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracTrace\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"SUNTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCTraceFactor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCTraceFactor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FCTraceFactor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$63747],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FCTraceFactor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$128478],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCTraceFactor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ FCTraceFactor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FCTraceFactor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FCTraceFactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +128,57 @@ can be safely factrored out from every Dirac trace."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1694412650],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FCTraceFactor", "]"}]], "Input",
+ CellLabel->"In[148]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[148]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +194,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->25447357],
+ CellID->1589549876],
Cell[CellGroupData[{
@@ -118,9 +204,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1004436620],
+ CellID->1786953722],
-Cell["Pull out constants out of the Dirac trace", "Notes",
+Cell["Pull constants out of the Dirac trace", "Notes",
CellID->1912475528],
Cell[CellGroupData[{
@@ -175,15 +261,48 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], "+", "M2"}], ")"}]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{269, 21},
+ ImageSize->{276, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[1]=",
- CellID->1311852686]
-}, Open ]]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTrace",
+ ButtonNote->"SUNTrace"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
@@ -198,10 +317,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 32.082177}",
+ "built" -> "{2020, 1, 5, 18, 57, 22.044482}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -210,11 +329,11 @@ TaggingRules->{
"FCTraceFactor[expr] factors out all expressions inside a trace to which \
the trace doesn't apply. For example, all objects that are not Dirac matrices \
can be safely factrored out from every Dirac trace.", "synonyms" -> {},
- "title" -> "FCTraceFactor", "titlemodifier" -> "", "windowtitle" ->
- "FCTraceFactor", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "FCTraceFactor", "titlemodifier" -> "",
+ "windowtitle" -> "FCTraceFactor", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FCTraceFactor"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -223,7 +342,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -232,42 +351,58 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3464, 95, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[5846, 181, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->25447357]}
+ CellID->1589549876]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7732, 233}
+ {"PrimaryExamplesSection", 10773, 352}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3113, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 527, 13, 97, "Usage",
+Cell[3701, 98, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4016, 113, 527, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3464, 95, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4568, 130, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1694412650],
+Cell[5310, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5366, 160, 97, 2, 70, "Input"],
+Cell[5466, 164, 319, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5846, 181, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->25447357],
+ CellID->1589549876],
Cell[CellGroupData[{
-Cell[3875, 114, 196, 6, 25, "ExampleSection",
- CellID->1004436620],
-Cell[4074, 122, 79, 1, 31, "Notes",
+Cell[6259, 200, 196, 6, 26, "ExampleSection",
+ CellID->1786953722],
+Cell[6458, 208, 75, 1, 32, "Notes",
CellID->1912475528],
Cell[CellGroupData[{
-Cell[4178, 127, 516, 17, 45, "Input",
+Cell[6558, 213, 516, 17, 45, "Input",
CellID->802335918],
-Cell[4697, 146, 1010, 35, 42, "Output",
- CellID->1311852686]
-}, Open ]]
+Cell[7077, 232, 989, 34, 42, "Output"]
}, Open ]]
}, Open ]],
-Cell[5746, 186, 23, 0, 42, "FooterCell"]
+Cell[8093, 270, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8161, 275, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8434, 289, 352, 13, 56, "SeeAlso"]
+}, Open ]],
+Cell[8801, 305, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCVariable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCVariable.nb
new file mode 100644
index 000000000..745adf79b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FCVariable.nb
@@ -0,0 +1,630 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 17195, 620]
+NotebookOptionsPosition[ 13358, 498]
+NotebookOutlinePosition[ 15434, 554]
+CellTagsIndexPosition[ 15349, 549]
+WindowTitle->FCVariable
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FCVariable\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FCVariable"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FCVariable.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$128920],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FCVariable", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FCVariable", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["FCVariable"], "InlineFormula"],
+ " \[LineSeparator]",
+ " is a data type. E.g. DataType[z, FCVariable] = True."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1731146497],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1672467737],
+
+Cell["\<\
+If we want to introduce constants c1 and c2, the naive way doesn't lead to \
+the desired result\
+\>", "Notes",
+ CellID->247520490],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"c1", " ", "p1"}], "+",
+ RowBox[{"c2", " ", "p2"}]}], ",", "q"}], "]"}], "//",
+ "ExpandScalarProduct"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1215664914],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{"c1", " ", "p1"}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{"c2", " ", "p2"}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{132, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->63183590]
+}, Open ]],
+
+Cell["\<\
+The solution is to declare c1 and c2 as FCVariable so that FeynCalc can \
+distinguish them from the 4-momenta\
+\>", "Notes",
+ CellID->1683370483],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"DataType", "[",
+ RowBox[{"c1", ",", "FCVariable"}], "]"}], "=", "True"}], ";"}], "\n",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DataType", "[",
+ RowBox[{"c2", ",", "FCVariable"}], "]"}], "=", "True"}], ";"}], "\n",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"c1", " ", "p1"}], "+",
+ RowBox[{"c2", " ", "p2"}]}], ",", "q"}], "]"}], "//",
+ "ExpandScalarProduct"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1946914218],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{156, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->425164179]
+}, Open ]],
+
+Cell["This works also for propagator denominators and matrices", "Notes",
+ CellID->84688361],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"FCI", "[",
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+",
+ RowBox[{"c1", " ", "p1"}]}], ",", "m"}], "}"}], "]"}],
+ "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[3]:=",
+ CellID->228259200],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ FormBox["p1", TraditionalForm]}], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],RowBox[{"-", "m"}],
+ "\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{161, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->365749151],
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}]}], "+",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], ",", "0", ",",
+ RowBox[{"-", "m"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Output",
+ ImageSize->{420, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1642692538]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"c1", " ", "p"}], "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], "//", "FCI"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1015735328],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{143, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->2133407116],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"c1", " ",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "D"}], "]"}]}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Nu]", ",", "D"}], "]"}], ",", "D"}], "]"}]}]], "Output",
+ ImageSize->{318, 50},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->2114556516]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSI", "[", "i", "]"}], ".",
+ RowBox[{"CSIS", "[",
+ RowBox[{"c1", " ", "p"}], "]"}], ".",
+ RowBox[{"CSI", "[", "j", "]"}]}], "//", "FCI"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[5]:=",
+ CellID->897525840],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"c1", " ",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{122, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->825817380],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"c1", " ",
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianIndex", "[", "j", "]"}], "]"}]}]], "Output",
+ ImageSize->{557, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->19578284]
+}, Open ]],
+
+Cell["To undo the declarations use", "Notes",
+ CellID->874852462],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"DataType", "[",
+ RowBox[{"c1", ",", "FCVariable"}], "]"}], "=",
+ "False"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"DataType", "[",
+ RowBox[{"c2", ",", "FCVariable"}], "]"}], "=", "False"}]}], "Input",
+ CellLabel->"In[6]:=",
+ CellID->219796287],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1930979781],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1284707712]
+}, Open ]],
+
+Cell[BoxData[""], "Input",
+ CellLabel->"In[7]:=",
+ CellID->58122944]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FCVariable",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 23.279628}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FCVariable is a data type. E.g. DataType[z, FCVariable] = True.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCVariable",
+ "titlemodifier" -> "", "windowtitle" -> "FCVariable", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FCVariable"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3547, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1731146497]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15205, 542}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 2281, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2866, 76, 287, 11, 45, "ObjectNameGrid"],
+Cell[3156, 89, 366, 11, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3547, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1731146497],
+Cell[CellGroupData[{
+Cell[3960, 123, 196, 6, 26, "ExampleSection",
+ CellID->1672467737],
+Cell[4159, 131, 140, 4, 32, "Notes",
+ CellID->247520490],
+Cell[CellGroupData[{
+Cell[4324, 139, 250, 9, 27, "Input",
+ CellID->1215664914],
+Cell[4577, 150, 721, 31, 37, "Output",
+ CellID->63183590]
+}, Open ]],
+Cell[5313, 184, 155, 4, 48, "Notes",
+ CellID->1683370483],
+Cell[CellGroupData[{
+Cell[5493, 192, 502, 17, 62, "Input",
+ CellID->1946914218],
+Cell[5998, 211, 810, 33, 37, "Output",
+ CellID->425164179]
+}, Open ]],
+Cell[6823, 247, 92, 1, 32, "Notes",
+ CellID->84688361],
+Cell[CellGroupData[{
+Cell[6940, 252, 301, 10, 45, "Input",
+ CellID->228259200],
+Cell[7244, 264, 728, 21, 61, "Output",
+ CellID->365749151],
+Cell[7975, 287, 574, 17, 69, "Output",
+ CellID->1642692538]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8586, 309, 373, 11, 45, "Input",
+ CellID->1015735328],
+Cell[8962, 322, 648, 25, 37, "Output",
+ CellID->2133407116],
+Cell[9613, 349, 679, 21, 86, "Output",
+ CellID->2114556516]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10329, 375, 312, 9, 45, "Input",
+ CellID->897525840],
+Cell[10644, 386, 1292, 52, 40, "Output",
+ CellID->825817380],
+Cell[11939, 440, 496, 14, 69, "Output",
+ CellID->19578284]
+}, Open ]],
+Cell[12450, 457, 65, 1, 32, "Notes",
+ CellID->874852462],
+Cell[CellGroupData[{
+Cell[12540, 462, 293, 9, 45, "Input",
+ CellID->219796287],
+Cell[12836, 473, 191, 6, 35, "Output",
+ CellID->1930979781],
+Cell[13030, 481, 191, 6, 35, "Output",
+ CellID->1284707712]
+}, Open ]],
+Cell[13236, 490, 68, 2, 27, "Input",
+ CellID->58122944]
+}, Open ]]
+}, Open ]],
+Cell[13331, 496, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FDS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FDS.nb
index 571f59f1e..5810117d0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FDS.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FDS.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5955, 185]
-NotebookOptionsPosition[ 3830, 121]
-NotebookOutlinePosition[ 5700, 174]
-CellTagsIndexPosition[ 5635, 169]
+NotebookDataLength[ 6771, 207]
+NotebookOptionsPosition[ 4818, 152]
+NotebookOutlinePosition[ 6564, 199]
+CellTagsIndexPosition[ 6521, 196]
WindowTitle->FDS
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FDS\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FDS"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FDS.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$64085],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FDS",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmpDenominatorSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FDS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FDS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FDS.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$129360],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FDS",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FDS", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FDS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +145,7 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominatorSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FDS",
- CellID->429222179]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +162,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 33.487746}",
+ "built" -> "{2020, 1, 5, 18, 57, 24.526755}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "FDS is shorthand for FeynAmpDenominatorSimplify.",
- "synonyms" -> {}, "title" -> "FDS", "titlemodifier" -> "", "windowtitle" ->
- "FDS", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FDS"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FDS", "titlemodifier" ->
+ "", "windowtitle" -> "FDS", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FDS"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +184,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FDS"->{
- Cell[3512, 107, 276, 9, 70, "Text",
- CellTags->"FDS",
- CellID->429222179]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FDS", 5530, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 3026, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 350, 11, 70, "Usage",
+Cell[3604, 98, 280, 11, 70, "ObjectNameGrid"],
+Cell[3887, 111, 350, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3239, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4262, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3512, 107, 276, 9, 70, "Text",
- CellTags->"FDS",
- CellID->429222179]
+Cell[4535, 140, 241, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3803, 119, 23, 0, 70, "FooterCell"]
+Cell[4791, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FI.nb
index 95271610c..823bbdc7c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FI.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6625, 207]
-NotebookOptionsPosition[ 4397, 141]
-NotebookOutlinePosition[ 6369, 196]
-CellTagsIndexPosition[ 6305, 191]
+NotebookDataLength[ 7724, 234]
+NotebookOptionsPosition[ 5665, 177]
+NotebookOutlinePosition[ 7515, 226]
+CellTagsIndexPosition[ 7472, 223]
WindowTitle->FI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FI.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$72316],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcForm\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcForm"], "\<\"FC\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FC"], "\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FeynCalcInternal\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalcInternal"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FI.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$140577],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -132,9 +170,7 @@ Cell[TextData[{
ButtonNote->"FeynCalcInternal"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FI",
- CellID->1056689858]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -151,10 +187,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 8.723866}",
+ "built" -> "{2020, 1, 5, 18, 57, 53.943509}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -162,10 +198,11 @@ TaggingRules->{
"None", "summary" ->
"FI changes the output format to InputForm. This is useful to see the \
internal representation of FeynCalc objects. To change back to FeynCalcForm \
-use FC.", "synonyms" -> {}, "title" -> "FI", "titlemodifier" -> "",
- "windowtitle" -> "FI", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FI"}},
+use FC.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FI",
+ "titlemodifier" -> "", "windowtitle" -> "FI", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FI"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -174,41 +211,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FI"->{
- Cell[3614, 109, 741, 27, 70, "Text",
- CellTags->"FI",
- CellID->1056689858]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FI", 6199, 184}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3302, 80, 70, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 458, 13, 70, "Usage",
+Cell[3879, 103, 279, 11, 70, "ObjectNameGrid"],
+Cell[4161, 116, 458, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3341, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4644, 133, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3614, 109, 741, 27, 70, "Text",
- CellTags->"FI",
- CellID->1056689858]
+Cell[4917, 147, 706, 25, 70, "SeeAlso"]
}, Open ]],
-Cell[4370, 139, 23, 0, 70, "FooterCell"]
+Cell[5638, 175, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM.nb
index 301cbfb9c..bbb63b223 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6298, 196]
-NotebookOptionsPosition[ 4043, 129]
-NotebookOutlinePosition[ 6040, 185]
-CellTagsIndexPosition[ 5974, 180]
+NotebookDataLength[ 7172, 218]
+NotebookOptionsPosition[ 5101, 161]
+NotebookOutlinePosition[ 6964, 210]
+CellTagsIndexPosition[ 6921, 207]
WindowTitle->FORM
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FORM\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FORM"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FORM.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$73361],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FORM",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"], "\<\"FeynCalc2FORM\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalc2FORM"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FORM\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FORM"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/FORM.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141944],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FORM",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FORM", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FORM", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,9 +154,7 @@ Cell[TextData[{
ButtonNote->"FeynCalc2FORM"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FORM",
- CellID->2094325907]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,10 +171,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 12.802762}",
+ "built" -> "{2020, 1, 5, 18, 57, 57.250397}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -150,11 +182,11 @@ TaggingRules->{
"None", "summary" ->
"FORM is an option for RHI. If set to True a FORM file is generated and \
run from Mathematica (provided R. Hamberg's FORM-program is installed \
-correctly ... ).", "synonyms" -> {}, "title" -> "FORM", "titlemodifier" -> "",
- "windowtitle" -> "FORM", "type" -> "Symbol", "uri" ->
+correctly ... ).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "FORM",
+ "titlemodifier" -> "", "windowtitle" -> "FORM", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FORM"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +195,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FORM"->{
- Cell[3618, 109, 383, 15, 70, "Text",
- CellTags->"FORM",
- CellID->2094325907]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FORM", 5866, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2228, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 3089, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2807, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2857, 78, 463, 13, 70, "Usage",
+Cell[3668, 99, 281, 11, 70, "ObjectNameGrid"],
+Cell[3952, 112, 463, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3345, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4440, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3618, 109, 383, 15, 70, "Text",
- CellTags->"FORM",
- CellID->2094325907]
+Cell[4713, 143, 346, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4016, 127, 23, 0, 70, "FooterCell"]
+Cell[5074, 159, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM2FeynCalc.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM2FeynCalc.nb
index 9bf916c47..d3b79aff8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM2FeynCalc.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORM2FeynCalc.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21579, 771]
-NotebookOptionsPosition[ 13924, 525]
-NotebookOutlinePosition[ 18626, 659]
-CellTagsIndexPosition[ 18509, 653]
+NotebookDataLength[ 23333, 824]
+NotebookOptionsPosition[ 16156, 599]
+NotebookOutlinePosition[ 20313, 715]
+CellTagsIndexPosition[ 20196, 709]
WindowTitle->FORM2FeynCalc
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FORM2FeynCalc\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FORM2FeynCalc"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc2FORM\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalc2FORM"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FORM2FeynCalc\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FORM2FeynCalc"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FORM2FeynCalc.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$72665],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FORM2FeynCalc", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141050],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FORM2FeynCalc", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,63 +95,107 @@ FORM2FeynCalc.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FORM2FeynCalc", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FORM2FeynCalc", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"FORM2FeynCalc", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "translates the FORM expr into FeynCalc notation. FORM2FeynCalc[file] \
-translates the FORM expresssions in file into FeynCalcnotation. \
-FORM2FeynCalc[file, x1, x2, ...] reads in a file in FORM-format and \
-translates the assignments for the variables a, b, ... into FeynCalc syntax. \
-If the option Set is True, the variables x1, x2 are assigned to the right \
-hand sides defined in the FORM-file."
+ RowBox[{"FORM2FeynCalc", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]translates the FORM ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " into FeynCalc notation."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FORM2FeynCalc", "[", "file", "]"}]], "InlineFormula"],
+ " \[LineSeparator] translates the FORM expresssions in ",
+ Cell[BoxData["file"], "InlineFormula"],
+ " into FeynCalc notation."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FORM2FeynCalc", "[",
+ RowBox[{"file", ",", "x1", ",", "x2", ",", "..."}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]reads in a file in FORM-format and translates the \
+assignments for the variables ",
+ Cell[BoxData[
+ RowBox[{"a", ",", " ", "b", ",", " ", "..."}]], "InlineFormula"],
+ " into FeynCalc syntax."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {},
+ "Rows" -> {None, None, {None}}, "RowsIndexed" -> {}}},
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1208601621],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->376987914],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1619789030],
+ "If the option ",
+ Cell[BoxData["Set"], "InlineFormula"],
+ " is ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ", the variables ",
+ Cell[BoxData["x1"], "InlineFormula"],
+ ", ",
+ Cell[BoxData["x2"], "InlineFormula"],
+ " are assigned to the right hand sides defined in the FORM-file."
+}], "Notes"],
+
+Cell["\<\
+The capabilities of this function are very limited, so that you should not \
+expect it to easily handle large and compicated expressions.\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FORM2FeynCalc", "]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[1]:=",
+ CellLabel->"In[136]:=",
CellID->1139385107],
Cell[BoxData[
@@ -153,20 +219,50 @@ Cell[BoxData[
RowBox[{"{", "}"}]}], ",",
RowBox[{"Vectors", "\[Rule]", "Automatic"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{472, 54},
+ ImageSize->{435, 53},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[1]=",
- CellID->1509057543]
+ CellLabel->"Out[136]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1071045998],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1307185854],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"FORM2FeynCalc", "[", "\"\\"", "]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1971183578],
Cell[BoxData[
@@ -190,12 +286,11 @@ Cell[BoxData[
RowBox[{"2", " ",
RowBox[{"x", ".",
SuperscriptBox["m", "2"]}]}]}], TraditionalForm]], "Output",
- ImageSize->{96, 20},
+ ImageSize->{110, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[2]=",
- CellID->437204044]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -203,7 +298,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1292875249],
Cell[BoxData[
@@ -213,20 +308,23 @@ Cell[BoxData[
SuperscriptBox["m", "2"]}]}], "+",
RowBox[{"SP", "[",
RowBox[{"p", ",", "q"}], "]"}]}]], "Output",
- ImageSize->{129, 15},
+ ImageSize->{132, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1525941930]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell["\<\
Functions are automatically converted right, but bracketed expressions need \
to be substituted explicitly.\
-\>", "Text",
- CellTags->"FORM2FeynCalc",
- CellID->1823304465],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -238,7 +336,7 @@ Cell[BoxData[
RowBox[{"\"\<[li2(1-x)]\>\"", "\[Rule]", "\"\\""}],
"}"}]}]}], "]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->1620741920],
Cell[BoxData[
@@ -250,12 +348,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",\
- ImageSize->{202, 18},
+ ImageSize->{213, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[4]=",
- CellID->827693663]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -263,7 +360,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->1897584456],
Cell[BoxData[
@@ -274,12 +371,11 @@ Cell[BoxData[
RowBox[{"PolyLog", "[",
RowBox[{"2", ",",
RowBox[{"1", "-", "x"}]}], "]"}]}]], "Output",
- ImageSize->{273, 15},
+ ImageSize->{275, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[5]//StandardForm=",
- CellID->879638641]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -288,7 +384,7 @@ Cell[BoxData[
RowBox[{"FORM2FeynCalc", "[", "\"\\"",
"]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[6]:=",
+ CellLabel->"In[3]:=",
CellID->1533060910],
Cell[BoxData[
@@ -302,12 +398,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Hold", "[", "1", "]"}], ".", "y"}], "+", "x"}],
TraditionalForm]], "Output",
- ImageSize->{205, 18},
+ ImageSize->{207, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[6]=",
- CellID->1027470118]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -315,7 +410,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ReleaseHold", "[", "%", "]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[7]:=",
+ CellLabel->"In[4]:=",
CellID->1512515442],
Cell[BoxData[
@@ -326,12 +421,11 @@ Cell[BoxData[
RowBox[{"-", "1"}], ")"}],
RowBox[{"m", "+", "1"}]], "+", "x", "+",
RowBox[{"1", ".", "y"}]}], TraditionalForm]], "Output",
- ImageSize->{120, 18},
+ ImageSize->{128, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[7]=",
- CellID->1640354437]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -340,40 +434,33 @@ Cell[BoxData[
RowBox[{"FORM2FeynCalc", "[", "\"\\"",
"]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[8]:=",
+ CellLabel->"In[5]:=",
CellID->2089442701],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], "+",
RowBox[{
RowBox[{"p", "(", "mu", ")"}], ".",
RowBox[{"q", "(", "nu", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{154, 19},
+ ImageSize->{152, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[8]=",
- CellID->758219802]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -381,7 +468,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[9]:=",
+ CellLabel->"In[6]:=",
CellID->1054646204],
Cell[BoxData[
@@ -391,12 +478,11 @@ Cell[BoxData[
RowBox[{"q", "[", "nu", "]"}]}], "+",
RowBox[{"MT", "[",
RowBox[{"mu", ",", "nu"}], "]"}]}]], "Output",
- ImageSize->{203, 15},
+ ImageSize->{197, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[9]//StandardForm=",
- CellID->11165984]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -410,40 +496,33 @@ Cell[BoxData[
RowBox[{"mu", "\[Rule]", "\[Mu]"}], ",",
RowBox[{"nu", "\[Rule]", "\[Nu]"}]}], "}"}]}]}], "]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[10]:=",
+ CellLabel->"In[7]:=",
CellID->1352382070],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], "+",
RowBox[{
RowBox[{"p", "(", "\[Mu]", ")"}], ".",
RowBox[{"q", "(", "\[Nu]", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{116, 19},
+ ImageSize->{125, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[10]=",
- CellID->291792517]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -453,7 +532,7 @@ Cell[BoxData[
"\"\\"",
"]"}]], "Input",
CellTags->"FORM2FeynCalc",
- CellLabel->"In[11]:=",
+ CellLabel->"In[8]:=",
CellID->476542838],
Cell[BoxData[
@@ -481,12 +560,12 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm], ")"}], ".", "blam"}], TraditionalForm]], "Output",
- ImageSize->{446, 25},
+ ImageSize->{432, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FORM2FeynCalc",
- CellLabel->"Out[11]=",
- CellID->276944378]
+ CellLabel->"Out[8]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -509,24 +588,19 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["FeynCalc2FORM",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynCalc2FORM",
- ButtonNote->"FeynCalc2FORM"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"FORM2FeynCalc",
- CellID->1782635377]
+Cell[TextData[StyleBox[ButtonBox["FeynCalc2FORM",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynCalc2FORM",
+ ButtonNote->"FeynCalc2FORM"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FORM2FeynCalc",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -535,26 +609,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 10.034466}",
+ "built" -> "{2020, 1, 5, 18, 57, 54.917912}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FORM2FeynCalc[expr] translates the FORM expr into FeynCalc notation. \
-FORM2FeynCalc[file] translates the FORM expresssions in file into \
-FeynCalcnotation. FORM2FeynCalc[file, x1, x2, ...] reads in a file in \
-FORM-format and translates the assignments for the variables a, b, ... into \
-FeynCalc syntax. If the option Set is True, the variables x1, x2 are assigned \
-to the right hand sides defined in the FORM-file.", "synonyms" -> {}, "title" ->
- "FORM2FeynCalc", "titlemodifier" -> "", "windowtitle" -> "FORM2FeynCalc",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FORM2FeynCalc"},
- "SearchTextTranslated" -> ""},
+ "FORM2FeynCalc[exp] translates the FORM exp into FeynCalc notation. \
+FORM2FeynCalc[file] translates the FORM expresssions in file into FeynCalc \
+notation. FORM2FeynCalc[file, x1, x2, ...] reads in a file in FORM-format and \
+translates the assignments for the variables a, b, ... into FeynCalc syntax.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FORM2FeynCalc",
+ "titlemodifier" -> "", "windowtitle" -> "FORM2FeynCalc", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FORM2FeynCalc"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -563,7 +636,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -571,208 +644,188 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3686, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1208601621]},
"FORM2FeynCalc"->{
- Cell[4320, 128, 144, 4, 27, "Input",
+ Cell[6361, 194, 146, 4, 70, "Input",
CellTags->"FORM2FeynCalc",
CellID->1139385107],
- Cell[4467, 134, 945, 26, 75, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1509057543],
- Cell[5449, 165, 158, 4, 27, "Input",
+ Cell[6510, 200, 926, 25, 74, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[8131, 261, 158, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1971183578],
- Cell[5610, 171, 643, 26, 41, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->437204044],
- Cell[6290, 202, 133, 4, 27, "Input",
+ Cell[8292, 267, 624, 25, 39, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[8953, 297, 133, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1292875249],
- Cell[6426, 208, 350, 12, 49, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1525941930],
- Cell[6791, 223, 180, 5, 52, "Text",
- CellTags->"FORM2FeynCalc",
- CellID->1823304465],
- Cell[6996, 232, 333, 9, 45, "Input",
+ Cell[9089, 303, 329, 11, 53, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[9720, 330, 333, 9, 45, "Input",
CellTags->"FORM2FeynCalc",
CellID->1620741920],
- Cell[7332, 243, 404, 14, 39, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->827693663],
- Cell[7773, 262, 133, 4, 27, "Input",
+ Cell[10056, 341, 384, 13, 39, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[10477, 359, 133, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1897584456],
- Cell[7909, 268, 409, 13, 49, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->879638641],
- Cell[8355, 286, 169, 5, 27, "Input",
+ Cell[10613, 365, 389, 12, 53, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[11039, 382, 169, 5, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1533060910],
- Cell[8527, 293, 438, 16, 39, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1027470118],
- Cell[9002, 314, 136, 4, 27, "Input",
+ Cell[11211, 389, 417, 15, 37, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[11665, 409, 136, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1512515442],
- Cell[9141, 320, 369, 13, 39, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1640354437],
- Cell[9547, 338, 169, 5, 29, "Input",
+ Cell[11804, 415, 348, 12, 40, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[12189, 432, 169, 5, 29, "Input",
CellTags->"FORM2FeynCalc",
CellID->2089442701],
- Cell[9719, 345, 736, 30, 40, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->758219802],
- Cell[10492, 380, 133, 4, 27, "Input",
+ Cell[12361, 439, 577, 23, 37, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[12975, 467, 133, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1054646204],
- Cell[10628, 386, 360, 12, 49, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->11165984],
- Cell[11025, 403, 353, 10, 29, "Input",
+ Cell[13111, 473, 341, 11, 51, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[13489, 489, 352, 10, 29, "Input",
CellTags->"FORM2FeynCalc",
CellID->1352382070],
- Cell[11381, 415, 749, 30, 40, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->291792517],
- Cell[12167, 450, 214, 6, 46, "Input",
+ Cell[13844, 501, 589, 23, 37, "Output",
+ CellTags->"FORM2FeynCalc"],
+ Cell[14470, 529, 213, 6, 46, "Input",
CellTags->"FORM2FeynCalc",
CellID->476542838],
- Cell[12384, 458, 882, 30, 46, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->276944378],
- Cell[13634, 511, 248, 9, 32, "Text",
- CellTags->"FORM2FeynCalc",
- CellID->1782635377]}
+ Cell[14686, 537, 861, 29, 42, "Output",
+ CellTags->"FORM2FeynCalc"]},
+ "PrimaryExamplesSection"->{
+ Cell[7497, 232, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1071045998]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16094, 573},
- {"FORM2FeynCalc", 16234, 577}
+ {"FORM2FeynCalc", 18192, 646},
+ {"PrimaryExamplesSection", 20052, 702}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3033, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 749, 17, 129, "Usage",
- CellID->982511436],
+Cell[3621, 97, 290, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3686, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1208601621],
+Cell[3936, 112, 1125, 31, 211, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[4099, 118, 196, 6, 25, "ExampleSection",
- CellID->1619789030],
+Cell[5086, 147, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->376987914],
+Cell[5827, 173, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5861, 175, 310, 10, 70, "Notes"],
+Cell[6174, 187, 162, 3, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4320, 128, 144, 4, 27, "Input",
+Cell[6361, 194, 146, 4, 70, "Input",
CellTags->"FORM2FeynCalc",
CellID->1139385107],
-Cell[4467, 134, 945, 26, 75, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1509057543]
+Cell[6510, 200, 926, 25, 74, "Output",
+ CellTags->"FORM2FeynCalc"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5449, 165, 158, 4, 27, "Input",
+Cell[7497, 232, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1071045998],
+Cell[CellGroupData[{
+Cell[7910, 251, 196, 6, 26, "ExampleSection",
+ CellID->1307185854],
+Cell[CellGroupData[{
+Cell[8131, 261, 158, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1971183578],
-Cell[5610, 171, 643, 26, 41, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->437204044]
+Cell[8292, 267, 624, 25, 39, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6290, 202, 133, 4, 27, "Input",
+Cell[8953, 297, 133, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1292875249],
-Cell[6426, 208, 350, 12, 49, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1525941930]
+Cell[9089, 303, 329, 11, 53, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
-Cell[6791, 223, 180, 5, 52, "Text",
- CellTags->"FORM2FeynCalc",
- CellID->1823304465],
Cell[CellGroupData[{
-Cell[6996, 232, 333, 9, 45, "Input",
+Cell[9455, 319, 105, 2, 9, "ExampleDelimiter"],
+Cell[9563, 323, 132, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[9720, 330, 333, 9, 45, "Input",
CellTags->"FORM2FeynCalc",
CellID->1620741920],
-Cell[7332, 243, 404, 14, 39, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->827693663]
+Cell[10056, 341, 384, 13, 39, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7773, 262, 133, 4, 27, "Input",
+Cell[10477, 359, 133, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1897584456],
-Cell[7909, 268, 409, 13, 49, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->879638641]
+Cell[10613, 365, 389, 12, 53, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8355, 286, 169, 5, 27, "Input",
+Cell[11039, 382, 169, 5, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1533060910],
-Cell[8527, 293, 438, 16, 39, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1027470118]
+Cell[11211, 389, 417, 15, 37, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9002, 314, 136, 4, 27, "Input",
+Cell[11665, 409, 136, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1512515442],
-Cell[9141, 320, 369, 13, 39, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->1640354437]
+Cell[11804, 415, 348, 12, 40, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9547, 338, 169, 5, 29, "Input",
+Cell[12189, 432, 169, 5, 29, "Input",
CellTags->"FORM2FeynCalc",
CellID->2089442701],
-Cell[9719, 345, 736, 30, 40, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->758219802]
+Cell[12361, 439, 577, 23, 37, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10492, 380, 133, 4, 27, "Input",
+Cell[12975, 467, 133, 4, 27, "Input",
CellTags->"FORM2FeynCalc",
CellID->1054646204],
-Cell[10628, 386, 360, 12, 49, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->11165984]
+Cell[13111, 473, 341, 11, 51, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11025, 403, 353, 10, 29, "Input",
+Cell[13489, 489, 352, 10, 29, "Input",
CellTags->"FORM2FeynCalc",
CellID->1352382070],
-Cell[11381, 415, 749, 30, 40, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->291792517]
+Cell[13844, 501, 589, 23, 37, "Output",
+ CellTags->"FORM2FeynCalc"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12167, 450, 214, 6, 46, "Input",
+Cell[14470, 529, 213, 6, 46, "Input",
CellTags->"FORM2FeynCalc",
CellID->476542838],
-Cell[12384, 458, 882, 30, 46, "Output",
- CellTags->"FORM2FeynCalc",
- CellID->276944378]
+Cell[14686, 537, 861, 29, 42, "Output",
+ CellTags->"FORM2FeynCalc"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[13293, 492, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15586, 571, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13361, 497, 270, 12, 31, "SeeAlsoSection",
+Cell[15654, 576, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13634, 511, 248, 9, 32, "Text",
- CellTags->"FORM2FeynCalc",
- CellID->1782635377]
+Cell[15927, 590, 187, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[13897, 523, 23, 0, 42, "FooterCell"]
+Cell[16129, 597, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMEpilog.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMEpilog.nb
index 90bf1ed03..d761361e8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMEpilog.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMEpilog.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6308, 194]
-NotebookOptionsPosition[ 4056, 128]
-NotebookOutlinePosition[ 6045, 183]
-CellTagsIndexPosition[ 5973, 178]
+NotebookDataLength[ 7166, 217]
+NotebookOptionsPosition[ 5115, 160]
+NotebookOutlinePosition[ 6958, 209]
+CellTagsIndexPosition[ 6915, 206]
WindowTitle->FORMEpilog
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FORMEpilog\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FORMEpilog"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FORMEpilog.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$73009],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FORMEpilog", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc2FORM\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalc2FORM"], "\<\"FORMProlog\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FORMProlog"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FORMEpilog\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FORMEpilog"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FORMEpilog.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141494],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FORMEpilog", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FORMEpilog", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FORMEpilog", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +153,7 @@ Cell[TextData[{
ButtonNote->"FORMProlog"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FORMEpilog",
- CellID->703276888]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,21 +170,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 11.561638}",
+ "built" -> "{2020, 1, 5, 18, 57, 56.228565}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FORMEpilog is an option for FeynCalc2FORM. It may be set to a string \
-which is put at the end of the FORM-file.", "synonyms" -> {}, "title" ->
- "FORMEpilog", "titlemodifier" -> "", "windowtitle" -> "FORMEpilog",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FORMEpilog"}},
+which is put at the end of the FORM-file.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FORMEpilog", "titlemodifier" -> "",
+ "windowtitle" -> "FORMEpilog", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FORMEpilog"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FORMEpilog"->{
- Cell[3605, 108, 409, 15, 70, "Text",
- CellTags->"FORMEpilog",
- CellID->703276888]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FORMEpilog", 5860, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3119, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 414, 12, 70, "Usage",
+Cell[3704, 99, 287, 11, 70, "ObjectNameGrid"],
+Cell[3994, 112, 414, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3332, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4433, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3605, 108, 409, 15, 70, "Text",
- CellTags->"FORMEpilog",
- CellID->703276888]
+Cell[4706, 142, 367, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4029, 126, 23, 0, 70, "FooterCell"]
+Cell[5088, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMProlog.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMProlog.nb
index c7e83e0fd..bd1262b5c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMProlog.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FORMProlog.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6342, 194]
-NotebookOptionsPosition[ 4073, 128]
-NotebookOutlinePosition[ 6079, 183]
-CellTagsIndexPosition[ 6007, 178]
+NotebookDataLength[ 7200, 217]
+NotebookOptionsPosition[ 5132, 160]
+NotebookOutlinePosition[ 6992, 209]
+CellTagsIndexPosition[ 6949, 206]
WindowTitle->FORMProlog
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FORMProlog\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FORMProlog"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FORMProlog.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$73707],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FORMProlog", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc2FORM\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalc2FORM"], "\<\"FORMEpilog\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FORMEpilog"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FORMProlog\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FORMProlog"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FORMProlog.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$142388],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FORMProlog", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FORMProlog", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FORMProlog", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +153,7 @@ Cell[TextData[{
ButtonNote->"FORMEpilog"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FORMProlog",
- CellID->553964491]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,10 +170,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 14.092232}",
+ "built" -> "{2020, 1, 5, 18, 57, 58.143261}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -149,10 +181,11 @@ TaggingRules->{
"None", "summary" ->
"FORMProlog is an option for FeynCalc2FORM. It may be set to a string \
which is put after the type declarations of the FORM-file.", "synonyms" -> {},
- "title" -> "FORMProlog", "titlemodifier" -> "", "windowtitle" ->
- "FORMProlog", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FORMProlog"}},
+ "tabletags" -> {}, "title" -> "FORMProlog", "titlemodifier" -> "",
+ "windowtitle" -> "FORMProlog", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FORMProlog"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FORMProlog"->{
- Cell[3622, 108, 409, 15, 70, "Text",
- CellTags->"FORMProlog",
- CellID->553964491]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FORMProlog", 5894, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3119, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 431, 12, 70, "Usage",
+Cell[3704, 99, 287, 11, 70, "ObjectNameGrid"],
+Cell[3994, 112, 431, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3349, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4450, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3622, 108, 409, 15, 70, "Text",
- CellTags->"FORMProlog",
- CellID->553964491]
+Cell[4723, 142, 367, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4046, 126, 23, 0, 70, "FooterCell"]
+Cell[5105, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FRH.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FRH.nb
index fd5bce1d8..90bc28c77 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FRH.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FRH.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11330, 412]
-NotebookOptionsPosition[ 7057, 269]
-NotebookOutlinePosition[ 9948, 356]
-CellTagsIndexPosition[ 9843, 350]
+NotebookDataLength[ 14076, 496]
+NotebookOptionsPosition[ 10215, 372]
+NotebookOutlinePosition[ 12899, 450]
+CellTagsIndexPosition[ 12792, 444]
WindowTitle->FRH
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FRH\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FRH"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FRH.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$75762],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FRH",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FRH\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FRH"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FRH.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$145488],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FRH",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FRH", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FRH", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1462863261],
+ CellID->277173287],
Cell[CellGroupData[{
@@ -118,7 +150,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1933653438],
+ CellID->726842935],
Cell[CellGroupData[{
@@ -139,12 +171,11 @@ Cell[BoxData[
RowBox[{"Hold", "[",
RowBox[{"2", "-", "2"}], "]"}]}], "+", "1", "-", "1"}], "]"}],
TraditionalForm]], "Output",
- ImageSize->{177, 15},
+ ImageSize->{177, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FRH",
- CellLabel->"Out[1]=",
- CellID->1110463745]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -157,12 +188,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FRH",
- CellLabel->"Out[2]=",
- CellID->313757423]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -175,7 +205,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"x", "^", "3"}], "-", "x", "-", "1"}], "==", "0"}], "]"}], ",",
"x", ",",
- RowBox[{"IsolateNames", "\[Rule]", "hh"}]}], "]"}]], "Input",
+ RowBox[{"IsolateNames", "\[Rule]", "KK"}]}], "]"}]], "Input",
CellTags->"FRH",
CellLabel->"In[3]:=",
CellID->971664034],
@@ -187,51 +217,126 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", "\[Rule]",
TagBox[
- RowBox[{"hh", "(", "670", ")"}],
+ RowBox[{"KK", "(", "510", ")"}],
HoldForm]}], "}"}], ",",
RowBox[{"{",
RowBox[{"x", "\[Rule]",
TagBox[
- RowBox[{"hh", "(", "673", ")"}],
+ RowBox[{"KK", "(", "513", ")"}],
HoldForm]}], "}"}], ",",
RowBox[{"{",
RowBox[{"x", "\[Rule]",
TagBox[
- RowBox[{"hh", "(", "674", ")"}],
+ RowBox[{"KK", "(", "514", ")"}],
HoldForm]}], "}"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{316, 15},
+ ImageSize->{330, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FRH",
- CellLabel->"Out[3]=",
- CellID->529538815]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FRH", "[",
- RowBox[{"hh", "[", "3", "]"}], "]"}]], "Input",
+ RowBox[{"FRH", "[", "%", "]"}]], "Input",
CellTags->"FRH",
CellLabel->"In[4]:=",
CellID->866394763],
Cell[BoxData[
FormBox[
- RowBox[{"hh", "(", "3", ")"}], TraditionalForm]], "Output",
- ImageSize->{42, 15},
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"x", "\[Rule]",
+ RowBox[{
+ RowBox[{
+ FractionBox["1", "3"], " ",
+ RadicalBox[
+ RowBox[{
+ FractionBox["27", "2"], "-",
+ FractionBox[
+ RowBox[{"3", " ",
+ SqrtBox["69"]}], "2"]}], "3"]}], "+",
+ FractionBox[
+ RadicalBox[
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{"9", "+",
+ SqrtBox["69"]}], ")"}]}], "3"],
+ SuperscriptBox["3",
+ RowBox[{"2", "/", "3"}]]]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"x", "\[Rule]",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1", "6"], " ",
+ RowBox[{"(",
+ RowBox[{"1", "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SqrtBox["3"]}]}], ")"}], " ",
+ RadicalBox[
+ RowBox[{
+ FractionBox["27", "2"], "-",
+ FractionBox[
+ RowBox[{"3", " ",
+ SqrtBox["69"]}], "2"]}], "3"]}]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SqrtBox["3"]}]}], ")"}], " ",
+ RadicalBox[
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{"9", "+",
+ SqrtBox["69"]}], ")"}]}], "3"]}],
+ RowBox[{"2", " ",
+ SuperscriptBox["3",
+ RowBox[{"2", "/", "3"}]]}]]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"x", "\[Rule]",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1", "6"], " ",
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SqrtBox["3"]}]}], ")"}], " ",
+ RadicalBox[
+ RowBox[{
+ FractionBox["27", "2"], "-",
+ FractionBox[
+ RowBox[{"3", " ",
+ SqrtBox["69"]}], "2"]}], "3"]}]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SqrtBox["3"]}]}], ")"}], " ",
+ RadicalBox[
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{"9", "+",
+ SqrtBox["69"]}], ")"}]}], "3"]}],
+ RowBox[{"2", " ",
+ SuperscriptBox["3",
+ RowBox[{"2", "/", "3"}]]}]]}]}], "}"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{484, 232},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FRH",
- CellLabel->"Out[4]=",
- CellID->166257414]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[", "hh", "]"}]], "Input",
- CellTags->"FRH",
- CellLabel->"In[5]:=",
- CellID->1669049321]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -260,9 +365,7 @@ Cell[TextData[{
ButtonNote->"Isolate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FRH",
- CellID->1874942431]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -279,21 +382,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 22.899713}",
+ "built" -> "{2020, 1, 5, 18, 58, 6.476129}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FRH[exp_] := FixedPoint[ReleaseHold, exp], i.e., FRH removes all \
-HoldForm and Hold in exp.", "synonyms" -> {}, "title" -> "FRH",
- "titlemodifier" -> "", "windowtitle" -> "FRH", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FRH"}, "SearchTextTranslated" -> ""},
+HoldForm and Hold in exp.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FRH", "titlemodifier" -> "", "windowtitle" -> "FRH", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/FRH"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -301,8 +404,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -311,109 +415,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3312, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4289, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1462863261]},
+ CellID->277173287]},
"FRH"->{
- Cell[3946, 124, 219, 7, 27, "Input",
+ Cell[4921, 156, 219, 7, 27, "Input",
CellTags->"FRH",
CellID->1505003969],
- Cell[4168, 133, 355, 13, 36, "Output",
- CellTags->"FRH",
- CellID->1110463745],
- Cell[4560, 151, 118, 4, 27, "Input",
+ Cell[5143, 165, 334, 12, 35, "Output",
+ CellTags->"FRH"],
+ Cell[5514, 182, 118, 4, 27, "Input",
CellTags->"FRH",
CellID->1714875295],
- Cell[4681, 157, 204, 7, 36, "Output",
- CellTags->"FRH",
- CellID->313757423],
- Cell[4922, 169, 322, 11, 27, "Input",
+ Cell[5635, 188, 184, 6, 35, "Output",
+ CellTags->"FRH"],
+ Cell[5856, 199, 322, 11, 27, "Input",
CellTags->"FRH",
CellID->971664034],
- Cell[5247, 182, 637, 24, 36, "Output",
- CellTags->"FRH",
- CellID->529538815],
- Cell[5921, 211, 146, 5, 27, "Input",
+ Cell[6181, 212, 617, 23, 37, "Output",
+ CellTags->"FRH"],
+ Cell[6835, 240, 117, 4, 27, "Input",
CellTags->"FRH",
CellID->866394763],
- Cell[6070, 218, 233, 8, 36, "Output",
- CellTags->"FRH",
- CellID->166257414],
- Cell[6318, 229, 121, 4, 27, "Input",
- CellTags->"FRH",
- CellID->1669049321],
- Cell[6795, 255, 220, 9, 31, "Text",
- CellTags->"FRH",
- CellID->1874942431]}
+ Cell[6955, 246, 2666, 91, 253, "Output",
+ CellTags->"FRH"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8858, 312},
- {"FRH", 8988, 316}
+ {"PrimaryExamplesSection", 12058, 416},
+ {"FRH", 12188, 420}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2980, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 423, 13, 83, "Usage",
+Cell[3558, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[3841, 110, 423, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3312, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4289, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1462863261],
+ CellID->277173287],
Cell[CellGroupData[{
-Cell[3725, 114, 196, 6, 25, "ExampleSection",
- CellID->1933653438],
+Cell[4701, 146, 195, 6, 26, "ExampleSection",
+ CellID->726842935],
Cell[CellGroupData[{
-Cell[3946, 124, 219, 7, 27, "Input",
+Cell[4921, 156, 219, 7, 27, "Input",
CellTags->"FRH",
CellID->1505003969],
-Cell[4168, 133, 355, 13, 36, "Output",
- CellTags->"FRH",
- CellID->1110463745]
+Cell[5143, 165, 334, 12, 35, "Output",
+ CellTags->"FRH"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4560, 151, 118, 4, 27, "Input",
+Cell[5514, 182, 118, 4, 27, "Input",
CellTags->"FRH",
CellID->1714875295],
-Cell[4681, 157, 204, 7, 36, "Output",
- CellTags->"FRH",
- CellID->313757423]
+Cell[5635, 188, 184, 6, 35, "Output",
+ CellTags->"FRH"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4922, 169, 322, 11, 27, "Input",
+Cell[5856, 199, 322, 11, 27, "Input",
CellTags->"FRH",
CellID->971664034],
-Cell[5247, 182, 637, 24, 36, "Output",
- CellTags->"FRH",
- CellID->529538815]
+Cell[6181, 212, 617, 23, 37, "Output",
+ CellTags->"FRH"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5921, 211, 146, 5, 27, "Input",
+Cell[6835, 240, 117, 4, 27, "Input",
CellTags->"FRH",
CellID->866394763],
-Cell[6070, 218, 233, 8, 36, "Output",
- CellTags->"FRH",
- CellID->166257414]
+Cell[6955, 246, 2666, 91, 253, "Output",
+ CellTags->"FRH"]
+}, Open ]]
}, Open ]],
-Cell[6318, 229, 121, 4, 27, "Input",
- CellTags->"FRH",
- CellID->1669049321]
-}, Open ]],
-Cell[6454, 236, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9648, 341, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6522, 241, 270, 12, 31, "SeeAlsoSection",
+Cell[9716, 346, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[6795, 255, 220, 9, 31, "Text",
- CellTags->"FRH",
- CellID->1874942431]
+Cell[9989, 360, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[7030, 267, 23, 0, 42, "FooterCell"]
+Cell[10188, 370, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FUNCTION.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FUNCTION.nb
index 54cc83957..ded691916 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FUNCTION.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FUNCTION.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6151, 190]
-NotebookOptionsPosition[ 3916, 124]
-NotebookOutlinePosition[ 5891, 179]
-CellTagsIndexPosition[ 5821, 174]
+NotebookDataLength[ 6907, 211]
+NotebookOptionsPosition[ 4864, 154]
+NotebookOutlinePosition[ 6700, 203]
+CellTagsIndexPosition[ 6657, 200]
WindowTitle->FUNCTION
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FUNCTION\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FUNCTION"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FUNCTION.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Write2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Write2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FUNCTION\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FUNCTION"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FUNCTION.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$76822],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FUNCTION", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$146882],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FUNCTION", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FUNCTION", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FUNCTION", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -115,9 +147,7 @@ Cell[TextData[{
ButtonNote->"Write2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FUNCTION",
- CellID->234059656]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -134,21 +164,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 28.134756}",
+ "built" -> "{2020, 1, 5, 18, 58, 10.454556}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FUNCTION[exp, string] is a head of an expression to be declared a \
-function (of type string), if used in Write2.", "synonyms" -> {}, "title" ->
- "FUNCTION", "titlemodifier" -> "", "windowtitle" -> "FUNCTION", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FUNCTION"}},
+function (of type string), if used in Write2.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FUNCTION", "titlemodifier" -> "",
+ "windowtitle" -> "FUNCTION", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FUNCTION"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +188,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FUNCTION"->{
- Cell[3653, 110, 221, 9, 70, "Text",
- CellTags->"FUNCTION",
- CellID->234059656]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FUNCTION", 5711, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 70, "AnchorBarGrid",
+Cell[580, 21, 2998, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 474, 14, 70, "Usage",
+Cell[3581, 97, 285, 11, 70, "ObjectNameGrid"],
+Cell[3869, 110, 474, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3380, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4368, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3653, 110, 221, 9, 70, "Text",
- CellTags->"FUNCTION",
- CellID->234059656]
+Cell[4641, 142, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3889, 122, 23, 0, 70, "FooterCell"]
+Cell[4837, 152, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FV.nb
index b99a4b21b..8f1245ce7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FV.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FV.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14552, 557]
-NotebookOptionsPosition[ 9636, 387]
-NotebookOutlinePosition[ 12805, 485]
-CellTagsIndexPosition[ 12699, 479]
+NotebookDataLength[ 13383, 491]
+NotebookOptionsPosition[ 9453, 361]
+NotebookOutlinePosition[ 12026, 438]
+CellTagsIndexPosition[ 11920, 432]
WindowTitle->FV
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FV\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FV"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FV.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$77532],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FV",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"FVD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FVD"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FV.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$148242],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FV",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FV", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2064034391],
+ CellID->1196530961],
Cell[CellGroupData[{
@@ -122,7 +157,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1940107799],
+ CellID->792562904],
Cell[CellGroupData[{
@@ -135,26 +170,21 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{24, 19},
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FV",
- CellLabel->"Out[1]=",
- CellID->1773215925]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -169,33 +199,28 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{62, 20},
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FV",
- CellLabel->"Out[2]=",
- CellID->1009721662]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -211,12 +236,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Output",
- ImageSize->{70, 15},
+ ImageSize->{71, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FV",
- CellLabel->"Out[3]//StandardForm=",
- CellID->732230663]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -236,20 +260,15 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Output",
- ImageSize->{281, 15},
+ ImageSize->{283, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FV",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1070070718]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
-Cell["\<\
-There is no special function to expand momenta in FV; ExpandScalarProduct \
-does the job.\
-\>", "Text",
- CellTags->"FV",
- CellID->1859479702],
+Cell["ExpandScalarProduct is used to expand momenta in FV", "Notes",
+ CellID->97927264],
Cell[CellGroupData[{
@@ -258,73 +277,36 @@ Cell[BoxData[
RowBox[{"FV", "[",
RowBox[{
RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}], "]"}]], "Input",
- CellTags->"FV",
CellLabel->"In[5]:=",
- CellID->260687674],
+ CellID->1140711302],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{58, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FV",
- CellLabel->"Out[5]=",
- CellID->1212809923]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
- CellTags->"FV",
- CellLabel->"In[6]:=",
- CellID->306111649],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[", "p", "]"}]}], "]"}], "-",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]}]], "Output",
- ImageSize->{572, 15},
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{68, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FV",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1086258444]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -366,21 +348,13 @@ Cell[TextData[{
ButtonNote->"FVD"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["FourVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector",
- ButtonNote->"FourVector"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["Pair",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Pair",
ButtonNote->"Pair"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FV",
- CellID->449809030]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -388,7 +362,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"FV",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -397,20 +371,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 31.033352}",
+ "built" -> "{2020, 1, 5, 18, 58, 13.893687}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FV[p, mu] is the four-dimensional vector p^\\[Mu]. ", "synonyms" -> {},
- "title" -> "FV", "titlemodifier" -> "", "windowtitle" -> "FV", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FV"}, "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "FV", "titlemodifier" -> "", "windowtitle" ->
+ "FV", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FV"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -419,7 +394,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -428,137 +403,96 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3382, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4595, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2064034391]},
+ CellID->1196530961]},
"FV"->{
- Cell[4016, 128, 143, 5, 27, "Input",
+ Cell[5228, 163, 143, 5, 27, "Input",
CellTags->"FV",
CellID->1800701132],
- Cell[4162, 135, 481, 21, 40, "Output",
- CellTags->"FV",
- CellID->1773215925],
- Cell[4680, 161, 167, 6, 27, "Input",
+ Cell[5374, 170, 378, 16, 37, "Output",
+ CellTags->"FV"],
+ Cell[5789, 191, 167, 6, 27, "Input",
CellTags->"FV",
CellID->1600944575],
- Cell[4850, 169, 660, 28, 41, "Output",
- CellTags->"FV",
- CellID->1009721662],
- Cell[5547, 202, 179, 6, 27, "Input",
+ Cell[5959, 199, 550, 23, 37, "Output",
+ CellTags->"FV"],
+ Cell[6546, 227, 179, 6, 27, "Input",
CellTags->"FV",
CellID->2031151174],
- Cell[5729, 210, 244, 8, 49, "Output",
- CellTags->"FV",
- CellID->732230663],
- Cell[6010, 223, 214, 8, 27, "Input",
+ Cell[6728, 235, 224, 7, 51, "Output",
+ CellTags->"FV"],
+ Cell[6989, 247, 214, 8, 27, "Input",
CellTags->"FV",
CellID->1187758267],
- Cell[6227, 233, 324, 10, 49, "Output",
- CellTags->"FV",
- CellID->1070070718],
- Cell[6566, 246, 151, 5, 32, "Text",
- CellTags->"FV",
- CellID->1859479702],
- Cell[6742, 255, 214, 7, 27, "Input",
- CellTags->"FV",
- CellID->260687674],
- Cell[6959, 264, 809, 36, 40, "Output",
- CellTags->"FV",
- CellID->1212809923],
- Cell[7805, 305, 125, 4, 27, "Input",
- CellTags->"FV",
- CellID->306111649],
- Cell[7933, 311, 487, 15, 49, "Output",
- CellTags->"FV",
- CellID->1086258444],
- Cell[8788, 349, 806, 33, 70, "Text",
- CellTags->"FV",
- CellID->449809030]}
+ Cell[7206, 257, 303, 9, 51, "Output",
+ CellTags->"FV"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11392, 429},
- {"FV", 11521, 433}
+ {"PrimaryExamplesSection", 11196, 404},
+ {"FV", 11326, 408}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3212, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 499, 17, 82, "Usage",
+Cell[3789, 100, 279, 11, 45, "ObjectNameGrid"],
+Cell[4071, 113, 499, 17, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3382, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4595, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2064034391],
+ CellID->1196530961],
Cell[CellGroupData[{
-Cell[3795, 118, 196, 6, 25, "ExampleSection",
- CellID->1940107799],
+Cell[5008, 153, 195, 6, 26, "ExampleSection",
+ CellID->792562904],
Cell[CellGroupData[{
-Cell[4016, 128, 143, 5, 27, "Input",
+Cell[5228, 163, 143, 5, 27, "Input",
CellTags->"FV",
CellID->1800701132],
-Cell[4162, 135, 481, 21, 40, "Output",
- CellTags->"FV",
- CellID->1773215925]
+Cell[5374, 170, 378, 16, 37, "Output",
+ CellTags->"FV"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4680, 161, 167, 6, 27, "Input",
+Cell[5789, 191, 167, 6, 27, "Input",
CellTags->"FV",
CellID->1600944575],
-Cell[4850, 169, 660, 28, 41, "Output",
- CellTags->"FV",
- CellID->1009721662]
+Cell[5959, 199, 550, 23, 37, "Output",
+ CellTags->"FV"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5547, 202, 179, 6, 27, "Input",
+Cell[6546, 227, 179, 6, 27, "Input",
CellTags->"FV",
CellID->2031151174],
-Cell[5729, 210, 244, 8, 49, "Output",
- CellTags->"FV",
- CellID->732230663]
+Cell[6728, 235, 224, 7, 51, "Output",
+ CellTags->"FV"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6010, 223, 214, 8, 27, "Input",
+Cell[6989, 247, 214, 8, 27, "Input",
CellTags->"FV",
CellID->1187758267],
-Cell[6227, 233, 324, 10, 49, "Output",
- CellTags->"FV",
- CellID->1070070718]
+Cell[7206, 257, 303, 9, 51, "Output",
+ CellTags->"FV"]
}, Open ]],
-Cell[6566, 246, 151, 5, 32, "Text",
- CellTags->"FV",
- CellID->1859479702],
+Cell[7524, 269, 87, 1, 32, "Notes",
+ CellID->97927264],
Cell[CellGroupData[{
-Cell[6742, 255, 214, 7, 27, "Input",
- CellTags->"FV",
- CellID->260687674],
-Cell[6959, 264, 809, 36, 40, "Output",
- CellTags->"FV",
- CellID->1212809923]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7805, 305, 125, 4, 27, "Input",
- CellTags->"FV",
- CellID->306111649],
-Cell[7933, 311, 487, 15, 49, "Output",
- CellTags->"FV",
- CellID->1086258444]
+Cell[7636, 274, 198, 6, 27, "Input",
+ CellID->1140711302],
+Cell[7837, 282, 599, 26, 37, "Output"]
}, Open ]]
}, Open ]],
-Cell[8447, 330, 31, 0, 70, "SectionFooterSpacer"]
+Cell[8463, 312, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8515, 335, 270, 12, 70, "SeeAlsoSection",
+Cell[8531, 317, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[8788, 349, 806, 33, 70, "Text",
- CellTags->"FV",
- CellID->449809030]
+Cell[8804, 331, 607, 25, 70, "SeeAlso"]
}, Open ]],
-Cell[9609, 385, 23, 0, 70, "FooterCell"]
+Cell[9426, 359, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVD.nb
index 0af8a20d2..1ea7f8219 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVD.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14619, 558]
-NotebookOptionsPosition[ 9660, 387]
-NotebookOutlinePosition[ 12863, 486]
-CellTagsIndexPosition[ 12756, 480]
+NotebookDataLength[ 14597, 538]
+NotebookOptionsPosition[ 10158, 390]
+NotebookOutlinePosition[ 13050, 477]
+CellTagsIndexPosition[ 12943, 471]
WindowTitle->FVD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FVD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FVD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FVD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$77178],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FVD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"FV\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FVD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FVD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FVD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$147335],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FVD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FVD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FVD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,7 +149,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->524603258],
+ CellID->1763590825],
Cell[CellGroupData[{
@@ -124,7 +159,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1875307971],
+ CellID->1938429727],
Cell[CellGroupData[{
@@ -137,25 +172,20 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{23, 19},
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FVD",
- CellLabel->"Out[1]=",
- CellID->523628619]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -170,31 +200,26 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{59, 19},
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{66, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FVD",
- CellLabel->"Out[2]=",
- CellID->1285947653]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -210,12 +235,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"FVD", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{79, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FVD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1974189044]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -237,17 +261,14 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}]}], "]"}]], "Output",
- ImageSize->{327, 15},
+ ImageSize->{329, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FVD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->2132317319]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
-Cell["There is no special function to expand momenta in FVD.", "Text",
- CellTags->"FVD",
- CellID->1109547966],
+Cell["There is no special function to expand momenta in FVD.", "Notes"],
Cell[CellGroupData[{
@@ -263,38 +284,29 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{56, 19},
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{64, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FVD",
- CellLabel->"Out[5]=",
- CellID->1622123785]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -319,12 +331,11 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"q", ",", "D"}], "]"}]}], "]"}]}]], "Output",
- ImageSize->{338, 33},
+ ImageSize->{340, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FVD",
- CellLabel->"Out[6]//StandardForm=",
- CellID->779988217]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -366,21 +377,13 @@ Cell[TextData[{
ButtonNote->"FV"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["FourVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector",
- ButtonNote->"FourVector"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["Pair",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Pair",
ButtonNote->"Pair"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FVD",
- CellID->213085227]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -397,21 +400,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 29.470359}",
+ "built" -> "{2020, 1, 5, 18, 58, 11.401855}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FVD[p, mu] is the D-dimensional vector p with Lorentz index \\[Mu].",
- "synonyms" -> {}, "title" -> "FVD", "titlemodifier" -> "", "windowtitle" ->
- "FVD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FVD"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FVD", "titlemodifier" ->
+ "", "windowtitle" -> "FVD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FVD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -420,7 +423,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -429,137 +432,114 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3432, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4629, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->524603258]},
+ CellID->1763590825]},
"FVD"->{
- Cell[4065, 130, 145, 5, 27, "Input",
+ Cell[5263, 165, 145, 5, 27, "Input",
CellTags->"FVD",
CellID->1179313259],
- Cell[4213, 137, 453, 20, 40, "Output",
- CellTags->"FVD",
- CellID->523628619],
- Cell[4703, 162, 166, 6, 27, "Input",
+ Cell[5411, 172, 352, 15, 37, "Output",
+ CellTags->"FVD"],
+ Cell[5800, 192, 166, 6, 27, "Input",
CellTags->"FVD",
CellID->4229236],
- Cell[4872, 170, 599, 26, 40, "Output",
- CellTags->"FVD",
- CellID->1285947653],
- Cell[5508, 201, 180, 6, 27, "Input",
+ Cell[5969, 200, 491, 21, 37, "Output",
+ CellTags->"FVD"],
+ Cell[6497, 226, 180, 6, 27, "Input",
CellTags->"FVD",
CellID->417689841],
- Cell[5691, 209, 247, 8, 49, "Output",
- CellTags->"FVD",
- CellID->1974189044],
- Cell[5975, 222, 215, 8, 27, "Input",
+ Cell[6680, 234, 226, 7, 51, "Output",
+ CellTags->"FVD"],
+ Cell[6943, 246, 215, 8, 27, "Input",
CellTags->"FVD",
CellID->387897032],
- Cell[6193, 232, 375, 12, 49, "Output",
- CellTags->"FVD",
- CellID->2132317319],
- Cell[6583, 247, 109, 2, 32, "Text",
- CellTags->"FVD",
- CellID->1109547966],
- Cell[6717, 253, 216, 7, 27, "Input",
+ Cell[7161, 256, 354, 11, 51, "Output",
+ CellTags->"FVD"],
+ Cell[7626, 274, 216, 7, 27, "Input",
CellTags->"FVD",
CellID->117451470],
- Cell[6936, 262, 752, 34, 40, "Output",
- CellTags->"FVD",
- CellID->1622123785],
- Cell[7725, 301, 127, 4, 27, "Input",
+ Cell[7845, 283, 561, 25, 37, "Output",
+ CellTags->"FVD"],
+ Cell[8443, 313, 127, 4, 27, "Input",
CellTags->"FVD",
CellID->1697636138],
- Cell[7855, 307, 591, 19, 67, "Output",
- CellTags->"FVD",
- CellID->779988217],
- Cell[8814, 349, 804, 33, 70, "Text",
- CellTags->"FVD",
- CellID->213085227]}
+ Cell[8573, 319, 571, 18, 69, "Output",
+ CellTags->"FVD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11439, 430},
- {"FVD", 11569, 434}
+ {"PrimaryExamplesSection", 11925, 433},
+ {"FVD", 12056, 437}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3200, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 543, 19, 84, "Usage",
+Cell[3778, 100, 280, 11, 45, "ObjectNameGrid"],
+Cell[4061, 113, 543, 19, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3432, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4629, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->524603258],
+ CellID->1763590825],
Cell[CellGroupData[{
-Cell[3844, 120, 196, 6, 25, "ExampleSection",
- CellID->1875307971],
+Cell[5042, 155, 196, 6, 26, "ExampleSection",
+ CellID->1938429727],
Cell[CellGroupData[{
-Cell[4065, 130, 145, 5, 27, "Input",
+Cell[5263, 165, 145, 5, 27, "Input",
CellTags->"FVD",
CellID->1179313259],
-Cell[4213, 137, 453, 20, 40, "Output",
- CellTags->"FVD",
- CellID->523628619]
+Cell[5411, 172, 352, 15, 37, "Output",
+ CellTags->"FVD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4703, 162, 166, 6, 27, "Input",
+Cell[5800, 192, 166, 6, 27, "Input",
CellTags->"FVD",
CellID->4229236],
-Cell[4872, 170, 599, 26, 40, "Output",
- CellTags->"FVD",
- CellID->1285947653]
+Cell[5969, 200, 491, 21, 37, "Output",
+ CellTags->"FVD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5508, 201, 180, 6, 27, "Input",
+Cell[6497, 226, 180, 6, 27, "Input",
CellTags->"FVD",
CellID->417689841],
-Cell[5691, 209, 247, 8, 49, "Output",
- CellTags->"FVD",
- CellID->1974189044]
+Cell[6680, 234, 226, 7, 51, "Output",
+ CellTags->"FVD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5975, 222, 215, 8, 27, "Input",
+Cell[6943, 246, 215, 8, 27, "Input",
CellTags->"FVD",
CellID->387897032],
-Cell[6193, 232, 375, 12, 49, "Output",
- CellTags->"FVD",
- CellID->2132317319]
+Cell[7161, 256, 354, 11, 51, "Output",
+ CellTags->"FVD"]
}, Open ]],
-Cell[6583, 247, 109, 2, 32, "Text",
- CellTags->"FVD",
- CellID->1109547966],
+Cell[7530, 270, 71, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6717, 253, 216, 7, 27, "Input",
+Cell[7626, 274, 216, 7, 27, "Input",
CellTags->"FVD",
CellID->117451470],
-Cell[6936, 262, 752, 34, 40, "Output",
- CellTags->"FVD",
- CellID->1622123785]
+Cell[7845, 283, 561, 25, 37, "Output",
+ CellTags->"FVD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7725, 301, 127, 4, 27, "Input",
+Cell[8443, 313, 127, 4, 27, "Input",
CellTags->"FVD",
CellID->1697636138],
-Cell[7855, 307, 591, 19, 67, "Output",
- CellTags->"FVD",
- CellID->779988217]
+Cell[8573, 319, 571, 18, 69, "Output",
+ CellTags->"FVD"]
}, Open ]]
}, Open ]],
-Cell[8473, 330, 31, 0, 70, "SectionFooterSpacer"]
+Cell[9171, 341, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8541, 335, 270, 12, 70, "SeeAlsoSection",
+Cell[9239, 346, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8814, 349, 804, 33, 70, "Text",
- CellTags->"FVD",
- CellID->213085227]
+Cell[9512, 360, 604, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[9633, 385, 23, 0, 70, "FooterCell"]
+Cell[10131, 388, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVE.nb
new file mode 100644
index 000000000..90f60f858
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FVE.nb
@@ -0,0 +1,597 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15833, 587]
+NotebookOptionsPosition[ 11246, 433]
+NotebookOutlinePosition[ 14173, 522]
+CellTagsIndexPosition[ 14044, 515]
+WindowTitle->FVE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCE\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"FV\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"FVD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FVD"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FVE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FVE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FVE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$147788],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/FVE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FVE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FVE", "[",
+ RowBox[{"p", ",", "mu"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ "is the D-4-dimensional vector ",
+ StyleBox["p",
+ FontSlant->"Italic"],
+ " with Lorentz index ",
+ Cell[BoxData[
+ FormBox["\[Mu]", TraditionalForm]]],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1746275286],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1281153066],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FVE", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellTags->"FVE",
+ CellLabel->"In[1]:=",
+ CellID->1179313259],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FVE",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FVE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}]], "Input",
+ CellTags->"FVE",
+ CellLabel->"In[2]:=",
+ CellID->4229236],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{66, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FVE",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FVE", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"FVE",
+ CellLabel->"In[3]:=",
+ CellID->417689841],
+
+Cell[BoxData[
+ RowBox[{"FVE", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Output",
+ ImageSize->{79, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FVE",
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"FVE", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"FVD",
+ CellLabel->"In[4]:=",
+ CellID->387897032],
+
+Cell[BoxData[
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{393, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FVD",
+ CellLabel->"Out[4]//StandardForm="]
+}, Open ]],
+
+Cell["There is no special function to expand momenta in FVE.", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"FVE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}], "]"}]], "Input",
+ CellTags->"FVD",
+ CellLabel->"In[5]:=",
+ CellID->117451470],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{64, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FVD",
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
+ CellTags->"FVD",
+ CellLabel->"In[6]:=",
+ CellID->1697636138],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}], "-",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]}]], "Output",
+ ImageSize->{404, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FVD",
+ CellLabel->"Out[6]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"FVE", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}],
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCE",
+ ButtonNote->"FCE"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCI",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FV",
+ ButtonNote->"FV"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FVD",
+ ButtonNote->"FVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FVE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 12.588866}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FVE[p, mu] is the D-4-dimensional vector p with Lorentz index \\[Mu].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FVE", "titlemodifier" ->
+ "", "windowtitle" -> "FVE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FVE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4707, 137, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1746275286]},
+ "FVE"->{
+ Cell[5341, 166, 145, 5, 27, "Input",
+ CellTags->"FVE",
+ CellID->1179313259],
+ Cell[5489, 173, 379, 16, 37, "Output",
+ CellTags->"FVE"],
+ Cell[5905, 194, 166, 6, 27, "Input",
+ CellTags->"FVE",
+ CellID->4229236],
+ Cell[6074, 202, 551, 23, 37, "Output",
+ CellTags->"FVE"],
+ Cell[6662, 230, 180, 6, 27, "Input",
+ CellTags->"FVE",
+ CellID->417689841],
+ Cell[6845, 238, 226, 7, 51, "Output",
+ CellTags->"FVE"]},
+ "FVD"->{
+ Cell[7108, 250, 215, 8, 27, "Input",
+ CellTags->"FVD",
+ CellID->387897032],
+ Cell[7326, 260, 450, 15, 51, "Output",
+ CellTags->"FVD"],
+ Cell[7887, 282, 216, 7, 27, "Input",
+ CellTags->"FVD",
+ CellID->117451470],
+ Cell[8106, 291, 617, 27, 37, "Output",
+ CellTags->"FVD"],
+ Cell[8760, 323, 127, 4, 27, "Input",
+ CellTags->"FVD",
+ CellID->1697636138],
+ Cell[8890, 329, 771, 26, 69, "Output",
+ CellTags->"FVD"]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13015, 476},
+ {"FVE", 13146, 480},
+ {"FVD", 13587, 496}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3276, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3854, 101, 280, 11, 45, "ObjectNameGrid"],
+Cell[4137, 114, 545, 19, 86, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4707, 137, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1746275286],
+Cell[CellGroupData[{
+Cell[5120, 156, 196, 6, 26, "ExampleSection",
+ CellID->1281153066],
+Cell[CellGroupData[{
+Cell[5341, 166, 145, 5, 27, "Input",
+ CellTags->"FVE",
+ CellID->1179313259],
+Cell[5489, 173, 379, 16, 37, "Output",
+ CellTags->"FVE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5905, 194, 166, 6, 27, "Input",
+ CellTags->"FVE",
+ CellID->4229236],
+Cell[6074, 202, 551, 23, 37, "Output",
+ CellTags->"FVE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6662, 230, 180, 6, 27, "Input",
+ CellTags->"FVE",
+ CellID->417689841],
+Cell[6845, 238, 226, 7, 51, "Output",
+ CellTags->"FVE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7108, 250, 215, 8, 27, "Input",
+ CellTags->"FVD",
+ CellID->387897032],
+Cell[7326, 260, 450, 15, 51, "Output",
+ CellTags->"FVD"]
+}, Open ]],
+Cell[7791, 278, 71, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[7887, 282, 216, 7, 27, "Input",
+ CellTags->"FVD",
+ CellID->117451470],
+Cell[8106, 291, 617, 27, 37, "Output",
+ CellTags->"FVD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8760, 323, 127, 4, 27, "Input",
+ CellTags->"FVD",
+ CellID->1697636138],
+Cell[8890, 329, 771, 26, 69, "Output",
+ CellTags->"FVD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9698, 360, 221, 7, 27, "Input"],
+Cell[9922, 369, 166, 5, 35, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[10115, 378, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10183, 383, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10456, 397, 748, 31, 70, "SeeAlso"]
+}, Open ]],
+Cell[11219, 431, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor1.nb
index e050de891..9b9b94bcf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor1.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12428, 454]
-NotebookOptionsPosition[ 7676, 297]
-NotebookOutlinePosition[ 10811, 390]
-CellTagsIndexPosition[ 10702, 384]
+NotebookDataLength[ 12551, 449]
+NotebookOptionsPosition[ 8276, 312]
+NotebookOutlinePosition[ 11172, 396]
+CellTagsIndexPosition[ 11061, 390]
WindowTitle->Factor1
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Factor1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Factor1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Factor1.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Factor2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Factor2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Factor1\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Factor1"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Factor1.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$54880],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Factor1", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$87357],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Factor1", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Factor1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Factor1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1743631578],
+ CellID->256108941],
Cell[CellGroupData[{
@@ -118,17 +150,16 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->442500656],
+ CellID->1116701667],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "-", "x"}], ")"}],
- RowBox[{"(",
- RowBox[{"b", "-", "x"}], ")"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "-", "x"}], ")"}],
+ RowBox[{"(",
+ RowBox[{"b", "-", "x"}], ")"}]}]], "Input",
CellTags->"Factor1",
CellLabel->"In[1]:=",
CellID->106113384],
@@ -140,22 +171,20 @@ Cell[BoxData[
RowBox[{"a", "-", "x"}], ")"}], " ",
RowBox[{"(",
RowBox[{"b", "-", "x"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{97, 15},
+ ImageSize->{107, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor1",
- CellLabel->"Out[1]=",
- CellID->705307377]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factor1", "[", "t1", "]"}], ",", " ",
- RowBox[{"Factor", "[", "t1", "]"}]}], "}"}]}]], "Input",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factor1", "[", "%", "]"}], ",", " ",
+ RowBox[{"Factor", "[", "%", "]"}]}], "}"}]], "Input",
CellTags->"Factor1",
CellLabel->"In[2]:=",
CellID->1501862951],
@@ -175,24 +204,22 @@ Cell[BoxData[
RowBox[{"a", "-", "x"}], ")"}]}], " ",
RowBox[{"(",
RowBox[{"x", "-", "b"}], ")"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{221, 15},
+ ImageSize->{242, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor1",
- CellLabel->"Out[2]=",
- CellID->1528620346]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"Expand", "[",
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "-", "b"}], ")"}],
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}]}], "]"}]}]], "Input",
+ RowBox[{"Expand", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "-", "b"}], ")"}],
+ RowBox[{"(",
+ RowBox[{"a", "+", "b"}], ")"}]}], "]"}]], "Input",
CellTags->"Factor1",
CellLabel->"In[3]:=",
CellID->641613489],
@@ -202,18 +229,17 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["a", "2"], "-",
SuperscriptBox["b", "2"]}], TraditionalForm]], "Output",
- ImageSize->{53, 18},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor1",
- CellLabel->"Out[3]=",
- CellID->2030611853]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Factor", "[", "t3", "]"}]], "Input",
+ RowBox[{"Factor", "[", "%", "]"}]], "Input",
CellTags->"Factor1",
CellLabel->"In[4]:=",
CellID->916389340],
@@ -225,18 +251,17 @@ Cell[BoxData[
RowBox[{"a", "-", "b"}], ")"}], " ",
RowBox[{"(",
RowBox[{"a", "+", "b"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{97, 15},
+ ImageSize->{107, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor1",
- CellLabel->"Out[4]=",
- CellID->865327707]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Factor1", "[", "t3", "]"}]], "Input",
+ RowBox[{"Factor1", "[", "%%", "]"}]], "Input",
CellTags->"Factor1",
CellLabel->"In[5]:=",
CellID->892191531],
@@ -246,20 +271,12 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["a", "2"], "-",
SuperscriptBox["b", "2"]}], TraditionalForm]], "Output",
- ImageSize->{53, 18},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor1",
- CellLabel->"Out[5]=",
- CellID->1139945824]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3"}], "]"}]], "Input",
- CellTags->"Factor1",
- CellLabel->"In[6]:=",
- CellID->1482315372]
+ CellLabel->"Out[5]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -288,9 +305,7 @@ Cell[TextData[{
ButtonNote->"Factor2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Factor1",
- CellID->73262209]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -298,7 +313,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Factor1",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -307,21 +322,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 53.580150}",
+ "built" -> "{2020, 1, 5, 18, 55, 30.104899}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Factor1[poly] factorizes common terms in the summands of poly. It uses \
-basically PolynomialGCD.", "synonyms" -> {}, "title" -> "Factor1",
- "titlemodifier" -> "", "windowtitle" -> "Factor1", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Factor1"}, "SearchTextTranslated" -> ""},
+basically PolynomialGCD.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Factor1", "titlemodifier" -> "", "windowtitle" -> "Factor1", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Factor1"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -329,8 +345,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -339,123 +356,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3329, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4318, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1743631578]},
+ CellID->256108941]},
"Factor1"->{
- Cell[3962, 124, 231, 9, 27, "Input",
+ Cell[4951, 156, 203, 8, 27, "Input",
CellTags->"Factor1",
CellID->106113384],
- Cell[4196, 135, 329, 12, 36, "Output",
- CellTags->"Factor1",
- CellID->705307377],
- Cell[4562, 152, 241, 8, 27, "Input",
+ Cell[5157, 166, 310, 11, 37, "Output",
+ CellTags->"Factor1"],
+ Cell[5504, 182, 212, 7, 27, "Input",
CellTags->"Factor1",
CellID->1501862951],
- Cell[4806, 162, 542, 20, 36, "Output",
- CellTags->"Factor1",
- CellID->1528620346],
- Cell[5385, 187, 269, 10, 27, "Input",
+ Cell[5719, 191, 521, 19, 37, "Output",
+ CellTags->"Factor1"],
+ Cell[6277, 215, 240, 9, 27, "Input",
CellTags->"Factor1",
CellID->641613489],
- Cell[5657, 199, 282, 10, 39, "Output",
- CellTags->"Factor1",
- CellID->2030611853],
- Cell[5976, 214, 125, 4, 27, "Input",
+ Cell[6520, 226, 261, 9, 37, "Output",
+ CellTags->"Factor1"],
+ Cell[6818, 240, 124, 4, 27, "Input",
CellTags->"Factor1",
CellID->916389340],
- Cell[6104, 220, 329, 12, 36, "Output",
- CellTags->"Factor1",
- CellID->865327707],
- Cell[6470, 237, 126, 4, 27, "Input",
+ Cell[6945, 246, 310, 11, 37, "Output",
+ CellTags->"Factor1"],
+ Cell[7292, 262, 126, 4, 27, "Input",
CellTags->"Factor1",
CellID->892191531],
- Cell[6599, 243, 282, 10, 39, "Output",
- CellTags->"Factor1",
- CellID->1139945824],
- Cell[6896, 256, 160, 5, 27, "Input",
- CellTags->"Factor1",
- CellID->1482315372],
- Cell[7412, 283, 222, 9, 31, "Text",
- CellTags->"Factor1",
- CellID->73262209]}
+ Cell[7421, 268, 261, 9, 37, "Output",
+ CellTags->"Factor1"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9498, 340},
- {"Factor1", 9632, 344}
+ {"PrimaryExamplesSection", 10144, 357},
+ {"Factor1", 10278, 361}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2995, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 429, 13, 82, "Usage",
+Cell[3577, 97, 284, 11, 45, "ObjectNameGrid"],
+Cell[3864, 110, 429, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3329, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4318, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1743631578],
+ CellID->256108941],
Cell[CellGroupData[{
-Cell[3742, 114, 195, 6, 25, "ExampleSection",
- CellID->442500656],
+Cell[4730, 146, 196, 6, 26, "ExampleSection",
+ CellID->1116701667],
Cell[CellGroupData[{
-Cell[3962, 124, 231, 9, 27, "Input",
+Cell[4951, 156, 203, 8, 27, "Input",
CellTags->"Factor1",
CellID->106113384],
-Cell[4196, 135, 329, 12, 36, "Output",
- CellTags->"Factor1",
- CellID->705307377]
+Cell[5157, 166, 310, 11, 37, "Output",
+ CellTags->"Factor1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4562, 152, 241, 8, 27, "Input",
+Cell[5504, 182, 212, 7, 27, "Input",
CellTags->"Factor1",
CellID->1501862951],
-Cell[4806, 162, 542, 20, 36, "Output",
- CellTags->"Factor1",
- CellID->1528620346]
+Cell[5719, 191, 521, 19, 37, "Output",
+ CellTags->"Factor1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5385, 187, 269, 10, 27, "Input",
+Cell[6277, 215, 240, 9, 27, "Input",
CellTags->"Factor1",
CellID->641613489],
-Cell[5657, 199, 282, 10, 39, "Output",
- CellTags->"Factor1",
- CellID->2030611853]
+Cell[6520, 226, 261, 9, 37, "Output",
+ CellTags->"Factor1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5976, 214, 125, 4, 27, "Input",
+Cell[6818, 240, 124, 4, 27, "Input",
CellTags->"Factor1",
CellID->916389340],
-Cell[6104, 220, 329, 12, 36, "Output",
- CellTags->"Factor1",
- CellID->865327707]
+Cell[6945, 246, 310, 11, 37, "Output",
+ CellTags->"Factor1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6470, 237, 126, 4, 27, "Input",
+Cell[7292, 262, 126, 4, 27, "Input",
CellTags->"Factor1",
CellID->892191531],
-Cell[6599, 243, 282, 10, 39, "Output",
- CellTags->"Factor1",
- CellID->1139945824]
-}, Open ]],
-Cell[6896, 256, 160, 5, 27, "Input",
- CellTags->"Factor1",
- CellID->1482315372]
+Cell[7421, 268, 261, 9, 37, "Output",
+ CellTags->"Factor1"]
+}, Open ]]
}, Open ]],
-Cell[7071, 264, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7709, 281, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7139, 269, 270, 12, 31, "SeeAlsoSection",
+Cell[7777, 286, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7412, 283, 222, 9, 31, "Text",
- CellTags->"Factor1",
- CellID->73262209]
+Cell[8050, 300, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[7649, 295, 23, 0, 70, "FooterCell"]
+Cell[8249, 310, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor2.nb
index 6e169ea70..ec6fdeef9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factor2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14748, 536]
-NotebookOptionsPosition[ 8999, 347]
-NotebookOutlinePosition[ 12741, 456]
-CellTagsIndexPosition[ 12630, 450]
+NotebookDataLength[ 15543, 555]
+NotebookOptionsPosition[ 10346, 391]
+NotebookOutlinePosition[ 13650, 483]
+CellTagsIndexPosition[ 13539, 477]
WindowTitle->Factor2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Factor2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Factor2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Factor2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Collect2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Collect2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Factor2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Factor2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Factor2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$55218],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Factor2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$87794],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Factor2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Factor2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Factor2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,6 +130,56 @@ will work faster than Factor2."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1508085123],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Factor2", "]"}]], "Input",
+ CellLabel->"In[191]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FactorFull", "\[Rule]", "False"}], ",",
+ RowBox[{"Method", "\[Rule]", "3"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{204, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[191]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -111,7 +195,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->359071766],
+ CellID->2128865875],
Cell[CellGroupData[{
@@ -121,41 +205,18 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->916560655],
+ CellID->618603978],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "Factor2", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "-", "x"}], ")"}],
+ RowBox[{"(",
+ RowBox[{"b", "-", "x"}], ")"}]}]], "Input",
CellTags->"Factor2",
CellLabel->"In[1]:=",
- CellID->1016935483],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"FactorFull", "\[Rule]", "False"}], ",",
- RowBox[{"Method", "\[Rule]", "3"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{225, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Factor2",
- CellLabel->"Out[1]=",
- CellID->607387604]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "-", "x"}], ")"}],
- RowBox[{"(",
- RowBox[{"b", "-", "x"}], ")"}]}]}]], "Input",
- CellTags->"Factor2",
- CellLabel->"In[2]:=",
CellID->1709627606],
Cell[BoxData[
@@ -165,24 +226,22 @@ Cell[BoxData[
RowBox[{"a", "-", "x"}], ")"}], " ",
RowBox[{"(",
RowBox[{"b", "-", "x"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{97, 15},
+ ImageSize->{107, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor2",
- CellLabel->"Out[2]=",
- CellID->309712518]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factor2", "[", "t1", "]"}], ",", " ",
- RowBox[{"Factor", "[", "t1", "]"}]}], "}"}]}]], "Input",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factor2", "[", "%", "]"}], ",", " ",
+ RowBox[{"Factor", "[", "%", "]"}]}], "}"}]], "Input",
CellTags->"Factor2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1823984490],
Cell[BoxData[
@@ -200,26 +259,24 @@ Cell[BoxData[
RowBox[{"a", "-", "x"}], ")"}]}], " ",
RowBox[{"(",
RowBox[{"x", "-", "b"}], ")"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{221, 15},
+ ImageSize->{242, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor2",
- CellLabel->"Out[3]=",
- CellID->136738799]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"Expand", "[",
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "-", "b"}], ")"}],
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}]}], "]"}]}]], "Input",
+ RowBox[{"Expand", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "-", "b"}], ")"}],
+ RowBox[{"(",
+ RowBox[{"a", "+", "b"}], ")"}]}], "]"}]], "Input",
CellTags->"Factor2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->3094581],
Cell[BoxData[
@@ -227,20 +284,19 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["a", "2"], "-",
SuperscriptBox["b", "2"]}], TraditionalForm]], "Output",
- ImageSize->{53, 18},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor2",
- CellLabel->"Out[4]=",
- CellID->470899621]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Factor", "[", "t3", "]"}]], "Input",
+ RowBox[{"Factor", "[", "%", "]"}]], "Input",
CellTags->"Factor2",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->791609042],
Cell[BoxData[
@@ -250,20 +306,19 @@ Cell[BoxData[
RowBox[{"a", "-", "b"}], ")"}], " ",
RowBox[{"(",
RowBox[{"a", "+", "b"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{97, 15},
+ ImageSize->{107, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor2",
- CellLabel->"Out[5]=",
- CellID->2074352994]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Factor2", "[", "t3", "]"}]], "Input",
+ RowBox[{"Factor2", "[", "%%", "]"}]], "Input",
CellTags->"Factor2",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->880415397],
Cell[BoxData[
@@ -271,22 +326,21 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["a", "2"], "-",
SuperscriptBox["b", "2"]}], TraditionalForm]], "Output",
- ImageSize->{53, 18},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor2",
- CellLabel->"Out[6]=",
- CellID->611482702]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Factor2", "[",
- RowBox[{"t3", ",",
+ RowBox[{"%%%", ",",
RowBox[{"FactorFull", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"Factor2",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->17862753],
Cell[BoxData[
@@ -296,20 +350,12 @@ Cell[BoxData[
RowBox[{"a", "-", "b"}], ")"}], " ",
RowBox[{"(",
RowBox[{"a", "+", "b"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{97, 15},
+ ImageSize->{107, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Factor2",
- CellLabel->"Out[7]=",
- CellID->1886805891]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3"}], "]"}]], "Input",
- CellTags->"Factor2",
- CellLabel->"In[8]:=",
- CellID->2010909365]
+ CellLabel->"Out[6]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -338,17 +384,15 @@ Cell[TextData[{
ButtonNote->"Collect2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Factor2",
- CellID->1336134208]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Factor2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -357,10 +401,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 55.029800}",
+ "built" -> "{2020, 1, 5, 18, 55, 31.306495}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -370,12 +414,12 @@ TaggingRules->{
sometimes better than Factor on polynomials involving rationals with sums in \
the denominator. Factor2 uses Factor internally and is in general slower than \
Factor. There are four possible settings of the option Method (0,1,2,3). In \
-general Factor will work faster than Factor2.", "synonyms" -> {}, "title" ->
- "Factor2", "titlemodifier" -> "", "windowtitle" -> "Factor2", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Factor2"}, "SearchTextTranslated" ->
- ""},
+general Factor will work faster than Factor2.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Factor2", "titlemodifier" -> "",
+ "windowtitle" -> "Factor2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Factor2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -383,8 +427,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -393,151 +438,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3583, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5845, 182, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->359071766]},
+ CellID->2128865875]},
"Factor2"->{
- Cell[4215, 127, 132, 4, 27, "Input",
- CellTags->"Factor2",
- CellID->1016935483],
- Cell[4350, 133, 336, 11, 36, "Output",
- CellTags->"Factor2",
- CellID->607387604],
- Cell[4723, 149, 232, 9, 27, "Input",
+ Cell[6478, 211, 204, 8, 27, "Input",
CellTags->"Factor2",
CellID->1709627606],
- Cell[4958, 160, 329, 12, 36, "Output",
- CellTags->"Factor2",
- CellID->309712518],
- Cell[5324, 177, 241, 8, 27, "Input",
+ Cell[6685, 221, 310, 11, 37, "Output",
+ CellTags->"Factor2"],
+ Cell[7032, 237, 212, 7, 27, "Input",
CellTags->"Factor2",
CellID->1823984490],
- Cell[5568, 187, 541, 20, 36, "Output",
- CellTags->"Factor2",
- CellID->136738799],
- Cell[6146, 212, 267, 10, 27, "Input",
+ Cell[7247, 246, 521, 19, 37, "Output",
+ CellTags->"Factor2"],
+ Cell[7805, 270, 238, 9, 27, "Input",
CellTags->"Factor2",
CellID->3094581],
- Cell[6416, 224, 281, 10, 39, "Output",
- CellTags->"Factor2",
- CellID->470899621],
- Cell[6734, 239, 125, 4, 27, "Input",
+ Cell[8046, 281, 261, 9, 37, "Output",
+ CellTags->"Factor2"],
+ Cell[8344, 295, 124, 4, 27, "Input",
CellTags->"Factor2",
CellID->791609042],
- Cell[6862, 245, 330, 12, 36, "Output",
- CellTags->"Factor2",
- CellID->2074352994],
- Cell[7229, 262, 126, 4, 27, "Input",
+ Cell[8471, 301, 310, 11, 37, "Output",
+ CellTags->"Factor2"],
+ Cell[8818, 317, 126, 4, 27, "Input",
CellTags->"Factor2",
CellID->880415397],
- Cell[7358, 268, 281, 10, 39, "Output",
- CellTags->"Factor2",
- CellID->611482702],
- Cell[7676, 283, 190, 6, 27, "Input",
+ Cell[8947, 323, 261, 9, 37, "Output",
+ CellTags->"Factor2"],
+ Cell[9245, 337, 191, 6, 27, "Input",
CellTags->"Factor2",
CellID->17862753],
- Cell[7869, 291, 330, 12, 36, "Output",
- CellTags->"Factor2",
- CellID->1886805891],
- Cell[8214, 306, 160, 5, 27, "Input",
- CellTags->"Factor2",
- CellID->2010909365],
- Cell[8730, 333, 227, 9, 31, "Text",
- CellTags->"Factor2",
- CellID->1336134208]}
+ Cell[9439, 345, 310, 11, 37, "Output",
+ CellTags->"Factor2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11079, 394},
- {"Factor2", 11212, 398}
+ {"PrimaryExamplesSection", 12471, 439},
+ {"Factor2", 12606, 443}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2997, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 683, 16, 130, "Usage",
- CellID->982511436],
+Cell[3579, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3583, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->359071766],
+Cell[3888, 112, 683, 16, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3995, 117, 195, 6, 25, "ExampleSection",
- CellID->916560655],
+Cell[4596, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1508085123],
+Cell[5338, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4215, 127, 132, 4, 27, "Input",
- CellTags->"Factor2",
- CellID->1016935483],
-Cell[4350, 133, 336, 11, 36, "Output",
- CellTags->"Factor2",
- CellID->607387604]
+Cell[5394, 162, 91, 2, 70, "Input"],
+Cell[5488, 166, 296, 9, 35, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4723, 149, 232, 9, 27, "Input",
+Cell[5845, 182, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2128865875],
+Cell[CellGroupData[{
+Cell[6258, 201, 195, 6, 26, "ExampleSection",
+ CellID->618603978],
+Cell[CellGroupData[{
+Cell[6478, 211, 204, 8, 27, "Input",
CellTags->"Factor2",
CellID->1709627606],
-Cell[4958, 160, 329, 12, 36, "Output",
- CellTags->"Factor2",
- CellID->309712518]
+Cell[6685, 221, 310, 11, 37, "Output",
+ CellTags->"Factor2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5324, 177, 241, 8, 27, "Input",
+Cell[7032, 237, 212, 7, 27, "Input",
CellTags->"Factor2",
CellID->1823984490],
-Cell[5568, 187, 541, 20, 36, "Output",
- CellTags->"Factor2",
- CellID->136738799]
+Cell[7247, 246, 521, 19, 37, "Output",
+ CellTags->"Factor2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6146, 212, 267, 10, 27, "Input",
+Cell[7805, 270, 238, 9, 27, "Input",
CellTags->"Factor2",
CellID->3094581],
-Cell[6416, 224, 281, 10, 39, "Output",
- CellTags->"Factor2",
- CellID->470899621]
+Cell[8046, 281, 261, 9, 37, "Output",
+ CellTags->"Factor2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6734, 239, 125, 4, 27, "Input",
+Cell[8344, 295, 124, 4, 27, "Input",
CellTags->"Factor2",
CellID->791609042],
-Cell[6862, 245, 330, 12, 36, "Output",
- CellTags->"Factor2",
- CellID->2074352994]
+Cell[8471, 301, 310, 11, 37, "Output",
+ CellTags->"Factor2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7229, 262, 126, 4, 27, "Input",
+Cell[8818, 317, 126, 4, 27, "Input",
CellTags->"Factor2",
CellID->880415397],
-Cell[7358, 268, 281, 10, 39, "Output",
- CellTags->"Factor2",
- CellID->611482702]
+Cell[8947, 323, 261, 9, 37, "Output",
+ CellTags->"Factor2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7676, 283, 190, 6, 27, "Input",
+Cell[9245, 337, 191, 6, 27, "Input",
CellTags->"Factor2",
CellID->17862753],
-Cell[7869, 291, 330, 12, 36, "Output",
- CellTags->"Factor2",
- CellID->1886805891]
+Cell[9439, 345, 310, 11, 37, "Output",
+ CellTags->"Factor2"]
+}, Open ]]
}, Open ]],
-Cell[8214, 306, 160, 5, 27, "Input",
- CellTags->"Factor2",
- CellID->2010909365]
-}, Open ]],
-Cell[8389, 314, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9776, 360, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8457, 319, 270, 12, 31, "SeeAlsoSection",
+Cell[9844, 365, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8730, 333, 227, 9, 31, "Text",
- CellTags->"Factor2",
- CellID->1336134208]
+Cell[10117, 379, 187, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[8972, 345, 23, 0, 42, "FooterCell"]
+Cell[10319, 389, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FactorFull.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FactorFull.nb
index b24ff8b7d..515020c01 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FactorFull.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FactorFull.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6563, 208]
-NotebookOptionsPosition[ 4295, 142]
-NotebookOutlinePosition[ 6299, 197]
-CellTagsIndexPosition[ 6227, 192]
+NotebookDataLength[ 7307, 229]
+NotebookOptionsPosition[ 5242, 172]
+NotebookOutlinePosition[ 7100, 221]
+CellTagsIndexPosition[ 7057, 218]
WindowTitle->FactorFull
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FactorFull\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FactorFull"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FactorFull.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$55558],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FactorFull", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Factor2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Factor2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FactorFull\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FactorFull"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FactorFull.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$88233],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FactorFull", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FactorFull", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FactorFull", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -133,9 +165,7 @@ Cell[TextData[{
ButtonNote->"Factor2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FactorFull",
- CellID->1018782586]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -152,10 +182,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 56.603925}",
+ "built" -> "{2020, 1, 5, 18, 55, 32.525318}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -163,10 +193,11 @@ TaggingRules->{
"None", "summary" ->
"FactorFull is an option of Factor2 (default False). If set to False, \
products like (a-b) (a+b) will be replaced by (a^2-b^2).", "synonyms" -> {},
- "title" -> "FactorFull", "titlemodifier" -> "", "windowtitle" ->
- "FactorFull", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FactorFull"}},
+ "tabletags" -> {}, "title" -> "FactorFull", "titlemodifier" -> "",
+ "windowtitle" -> "FactorFull", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FactorFull"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -175,41 +206,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FactorFull"->{
- Cell[4026, 128, 227, 9, 70, "Text",
- CellTags->"FactorFull",
- CellID->1018782586]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FactorFull", 6114, 185}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3008, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 835, 32, 70, "Usage",
+Cell[3593, 97, 287, 11, 70, "ObjectNameGrid"],
+Cell[3883, 110, 835, 32, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3753, 114, 270, 12, 70, "SeeAlsoSection",
+Cell[4743, 146, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4026, 128, 227, 9, 70, "Text",
- CellTags->"FactorFull",
- CellID->1018782586]
+Cell[5016, 160, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4268, 140, 23, 0, 70, "FooterCell"]
+Cell[5215, 170, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factoring.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factoring.nb
index b00b92400..3cfebd87e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factoring.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factoring.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6566, 202]
-NotebookOptionsPosition[ 4245, 135]
-NotebookOutlinePosition[ 6303, 191]
-CellTagsIndexPosition[ 6232, 186]
+NotebookDataLength[ 7471, 224]
+NotebookOptionsPosition[ 5354, 167]
+NotebookOutlinePosition[ 7263, 216]
+CellTagsIndexPosition[ 7220, 213]
WindowTitle->Factoring
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Factoring\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Factoring"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Factoring.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Collect2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Collect2"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Contract"], "\<\"Tr\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Tr"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Factoring\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Factoring"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Factoring.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$55904],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Factoring", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$88677],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Factoring", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Factoring", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Factoring", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -126,9 +160,7 @@ Cell[TextData[{
ButtonNote->"Tr"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Factoring",
- CellID->1376974355]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -145,10 +177,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 57.884378}",
+ "built" -> "{2020, 1, 5, 18, 55, 33.553768}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -156,11 +188,11 @@ TaggingRules->{
"None", "summary" ->
"Factoring is an option for Collect2, Contract, Tr and more functions. If \
set to True, the result will be factored, using Factor2. If set to any \
-function f, this function will be used.", "synonyms" -> {}, "title" ->
- "Factoring", "titlemodifier" -> "", "windowtitle" -> "Factoring", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Factoring"}},
+function f, this function will be used.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Factoring", "titlemodifier" -> "", "windowtitle" ->
+ "Factoring", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Factoring"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -169,41 +201,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Factoring"->{
- Cell[3674, 109, 529, 21, 70, "Text",
- CellTags->"Factoring",
- CellID->1376974355]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Factoring", 6119, 179}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3165, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 489, 13, 70, "Usage",
+Cell[3749, 99, 286, 11, 70, "ObjectNameGrid"],
+Cell[4038, 112, 489, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3401, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4552, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3674, 109, 529, 21, 70, "Text",
- CellTags->"Factoring",
- CellID->1376974355]
+Cell[4825, 143, 487, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4218, 133, 23, 0, 70, "FooterCell"]
+Cell[5327, 165, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factorout.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factorout.nb
index 55aab7dbc..669b16189 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factorout.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Factorout.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6156, 192]
-NotebookOptionsPosition[ 3973, 127]
-NotebookOutlinePosition[ 5894, 181]
-CellTagsIndexPosition[ 5823, 176]
+NotebookDataLength[ 6999, 214]
+NotebookOptionsPosition[ 5013, 158]
+NotebookOutlinePosition[ 6791, 206]
+CellTagsIndexPosition[ 6748, 203]
WindowTitle->Factorout
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Factorout\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Factorout"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Factorout.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPEInt\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPEInt"], "\<\"OPEIntegrate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPEIntegrate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Factorout\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Factorout"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Factorout.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$56251],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Factorout", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$89122],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Factorout", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Factorout", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Factorout", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,9 +151,7 @@ Cell[TextData[{
ButtonNote->"OPEIntegrate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Factorout",
- CellID->885134333]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -137,20 +168,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 18, 59.119393}",
+ "built" -> "{2020, 1, 5, 18, 55, 34.395759}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Factorout is an option for OPEInt and OPEIntegrate.", "synonyms" -> {},
- "title" -> "Factorout", "titlemodifier" -> "", "windowtitle" ->
- "Factorout", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Factorout"}},
+ "tabletags" -> {}, "title" -> "Factorout", "titlemodifier" -> "",
+ "windowtitle" -> "Factorout", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Factorout"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -159,41 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Factorout"->{
- Cell[3538, 107, 393, 15, 70, "Text",
- CellTags->"Factorout",
- CellID->885134333]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Factorout", 5711, 169}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3095, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 353, 11, 70, "Usage",
+Cell[3679, 98, 286, 11, 70, "ObjectNameGrid"],
+Cell[3968, 111, 353, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3265, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4346, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3538, 107, 393, 15, 70, "Text",
- CellTags->"Factorout",
- CellID->885134333]
+Cell[4619, 140, 352, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3946, 125, 23, 0, 70, "FooterCell"]
+Cell[4986, 156, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionSpinSum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionSpinSum.nb
index e8168e991..66fd31e27 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionSpinSum.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionSpinSum.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 26154, 975]
-NotebookOptionsPosition[ 18420, 722]
-NotebookOutlinePosition[ 22996, 857]
-CellTagsIndexPosition[ 22878, 851]
+NotebookDataLength[ 25402, 927]
+NotebookOptionsPosition[ 19341, 736]
+NotebookOutlinePosition[ 22687, 830]
+CellTagsIndexPosition[ 22569, 824]
WindowTitle->FermionSpinSum
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FermionSpinSum\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FermionSpinSum"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"ComplexConjugate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ComplexConjugate"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FermionSpinSum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FermionSpinSum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FermionSpinSum.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$64434],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FermionSpinSum", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$129816],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FermionSpinSum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +98,28 @@ FermionSpinSum.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FermionSpinSum", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FermionSpinSum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"FermionSpinSum", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "constructs the Traces out of squared ampliudes."
+ RowBox[{"FermionSpinSum", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]converts products of closed spinor chains in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " into Dirac traces. "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,76 +130,104 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->618716005],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1819187881],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
+
+Cell["Both Dirac and Majorana particles are supported.", "Notes"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->985692734],
+ "It is understood, that ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " represents a squared amplitude."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FermionSpinSum", "]"}]], "Input",
- CellTags->"FermionSpinSum",
- CellLabel->"In[1]:=",
- CellID->1391906924],
+ CellLabel->"In[9]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
RowBox[{"Collecting", "\[Rule]", "True"}], ",",
- RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
RowBox[{"ExtraFactor", "\[Rule]", "1"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCTraceFactor", "\[Rule]", "True"}], ",",
RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
RowBox[{"Momentum", "\[Rule]", "All"}], ",",
- RowBox[{"SpinPolarizationSum", "\[Rule]", "Identity"}]}], "}"}],
+ RowBox[{"SpinorChainTranspose", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{444, 54},
+ ImageSize->{530, 54},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FermionSpinSum",
- CellLabel->"Out[1]=",
- CellID->1112492862]
+ CellLabel->"Out[9]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[TextData[{
- "Spinors of fermions of mass ",
- StyleBox["m",
- FontSlant->"Italic"],
- " are normalized to have square 2 ",
- StyleBox["m",
- FontSlant->"Italic"],
- " or -2 ",
- StyleBox["m",
- FontSlant->"Italic"],
- "."
-}], "Text",
- CellTags->"FermionSpinSum",
- CellID->1255696897],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->632377296],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->76620452],
+
+Cell["\<\
+FeynCalc uses the customary relativistic normalization of the spinors.\
+\>", "Notes"],
Cell[CellGroupData[{
@@ -174,7 +240,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}]}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->278938360],
Cell[BoxData[
@@ -189,38 +255,27 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["m",
TraditionalForm], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"u\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{143, 18},
+ RowBox[{"u", "(",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{133, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[2]=",
- CellID->1523865852]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"%", "//", "FCI"}], "//", "FermionSpinSum"}]], "Input",
+ RowBox[{"FermionSpinSum", "[", "%", "]"}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->505730343],
Cell[BoxData[
@@ -236,32 +291,29 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], "+", "m"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{87, 18},
+ ImageSize->{92, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[3]=",
- CellID->385708083]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "/.",
- RowBox[{"DiracTrace", "\[Rule]", "TR"}]}]], "Input",
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1201144341],
Cell[BoxData[
FormBox[
RowBox[{"4", " ", "m"}], TraditionalForm]], "Output",
- ImageSize->{30, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[4]=",
- CellID->867661469]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -275,7 +327,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}]}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1209998846],
Cell[BoxData[
@@ -290,38 +342,27 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["m",
TraditionalForm], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"v\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{140, 18},
+ RowBox[{"v", "(",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{133, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[5]=",
- CellID->1761985113]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"%", "//", "FCI"}], "//", "FermionSpinSum"}]], "Input",
+ RowBox[{"FermionSpinSum", "[", "%", "]"}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->723398437],
Cell[BoxData[
@@ -337,191 +378,187 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], "-", "m"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{87, 18},
+ ImageSize->{92, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[6]=",
- CellID->1462275463]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "/.",
- RowBox[{"DiracTrace", "\[Rule]", "TR"}]}]], "Input",
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->680865455],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "4"}], " ", "m"}], TraditionalForm]], "Output",
- ImageSize->{40, 15},
+ ImageSize->{42, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[7]=",
- CellID->1782629402]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{
- RowBox[{"Spinor", "[",
- RowBox[{"k1", ",", "m"}], "]"}], ".",
- RowBox[{"DiracSlash", "[", "p", "]"}], ".",
- RowBox[{"GA", "[", "5", "]"}], ".",
- RowBox[{"Spinor", "[",
- RowBox[{"p1", ",", "m"}], "]"}]}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"k1", ",", "m"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p1", ",", "m"}], "]"}]}]], "Input",
CellTags->"FermionSpinSum",
- CellLabel->"In[8]:=",
+ CellLabel->"In[1]:=",
CellID->1094170176],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["k1",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["k1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]],
TraditionalForm], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{242, 25},
+ RowBox[{"u", "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{210, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FermionSpinSum",
- CellLabel->"Out[8]=",
- CellID->690680779]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["\<\
-Notice that SpinorUBar and SpinorU are only input functions. Internally they \
-are converted to Spinor objects.\
-\>", "Text",
- CellTags->"FermionSpinSum",
- CellID->306087100],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ct", "=",
- RowBox[{"ComplexConjugate", "[", "t", "]"}]}]], "Input",
- CellTags->"FermionSpinSum",
- CellLabel->"In[9]:=",
- CellID->1096475209],
+ RowBox[{"%", " ",
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{"-",
+ RowBox[{
RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["k1",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{"(",
+ RowBox[{"-",
RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["k1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{252, 25},
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{484, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FermionSpinSum",
- CellLabel->"Out[9]=",
- CellID->1746604990]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FermionSpinSum", "[",
- RowBox[{"t", " ", "ct"}], "]"}]], "Input",
- CellTags->"FermionSpinSum",
- CellLabel->"In[10]:=",
- CellID->2140871689],
+ RowBox[{"FermionSpinSum", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
@@ -535,13 +572,9 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["p1",
+ FormBox["k1",
TraditionalForm], "_"],
TraditionalForm]}], "+", "m"}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
RowBox[{"(",
RowBox[{
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
@@ -550,15 +583,23 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ".",
RowBox[{"(",
RowBox[{
RowBox[{
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["k1",
+ FormBox["p1",
TraditionalForm], "_"],
TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ".",
RowBox[{"(",
RowBox[{
OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
@@ -566,107 +607,88 @@ Cell[BoxData[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}],
+ TraditionalForm]}], ")"}]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{328, 25},
+ ImageSize->{349, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FermionSpinSum",
- CellLabel->"Out[10]=",
- CellID->1062780285]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", " ", "/.",
- RowBox[{"DiracTrace", "\[Rule]", "TR"}]}]], "Input",
- CellTags->"FermionSpinSum",
- CellLabel->"In[11]:=",
- CellID->1433763873],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-", "4"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- SuperscriptBox[
+ RowBox[{"-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["k1",
TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- SuperscriptBox["m", "2"], " ",
- SuperscriptBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["p1",
TraditionalForm], "_"],
- TraditionalForm], "2"]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{299, 25},
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}]}], TraditionalForm]], "Output",
+ ImageSize->{315, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FermionSpinSum",
- CellLabel->"Out[11]=",
- CellID->153933314]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t", ",", " ", "ct"}], "]"}]], "Input",
- CellTags->"FermionSpinSum",
- CellLabel->"In[12]:=",
- CellID->1557584860]
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -706,16 +728,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DiracTrace",
ButtonNote->"DiracTrace"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Tr",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Tr",
- ButtonNote->"Tr"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FermionSpinSum",
- CellID->1427307746]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -732,21 +746,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 34.801313}",
+ "built" -> "{2020, 1, 5, 18, 57, 25.496689}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FermionSpinSum[x] constructs the Traces out of squared ampliudes.",
- "synonyms" -> {}, "title" -> "FermionSpinSum", "titlemodifier" -> "",
- "windowtitle" -> "FermionSpinSum", "type" -> "Symbol", "uri" ->
+ "FermionSpinSum[exp] converts products of closed spinor chains in exp \
+into Dirac traces. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FermionSpinSum", "titlemodifier" -> "", "windowtitle" ->
+ "FermionSpinSum", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FermionSpinSum"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -754,8 +769,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -764,219 +780,155 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3339, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6576, 200, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->618716005]},
+ CellID->632377296]},
"FermionSpinSum"->{
- Cell[3971, 123, 146, 4, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1391906924],
- Cell[4120, 129, 688, 18, 75, "Output",
- CellTags->"FermionSpinSum",
- CellID->1112492862],
- Cell[4823, 150, 282, 13, 32, "Text",
- CellTags->"FermionSpinSum",
- CellID->1255696897],
- Cell[5130, 167, 314, 10, 27, "Input",
+ Cell[7305, 233, 314, 10, 27, "Input",
CellTags->"FermionSpinSum",
CellID->278938360],
- Cell[5447, 179, 835, 34, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->1523865852],
- Cell[6319, 218, 161, 5, 27, "Input",
+ Cell[7622, 245, 598, 24, 37, "Output",
+ CellTags->"FermionSpinSum"],
+ Cell[8257, 274, 139, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->505730343],
- Cell[6483, 225, 486, 18, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->385708083],
- Cell[7006, 248, 162, 5, 27, "Input",
+ Cell[8399, 280, 466, 17, 37, "Output",
+ CellTags->"FermionSpinSum"],
+ Cell[8902, 302, 139, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->1201144341],
- Cell[7171, 255, 238, 8, 36, "Output",
- CellTags->"FermionSpinSum",
- CellID->867661469],
- Cell[7446, 268, 315, 10, 27, "Input",
+ Cell[9044, 308, 218, 7, 35, "Output",
+ CellTags->"FermionSpinSum"],
+ Cell[9299, 320, 315, 10, 27, "Input",
CellTags->"FermionSpinSum",
CellID->1209998846],
- Cell[7764, 280, 835, 34, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->1761985113],
- Cell[8636, 319, 161, 5, 27, "Input",
+ Cell[9617, 332, 598, 24, 37, "Output",
+ CellTags->"FermionSpinSum"],
+ Cell[10252, 361, 139, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->723398437],
- Cell[8800, 326, 487, 18, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->1462275463],
- Cell[9324, 349, 161, 5, 27, "Input",
+ Cell[10394, 367, 466, 17, 37, "Output",
+ CellTags->"FermionSpinSum"],
+ Cell[10897, 389, 138, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->680865455],
- Cell[9488, 356, 258, 9, 36, "Output",
- CellTags->"FermionSpinSum",
- CellID->1782629402],
- Cell[9783, 370, 353, 11, 27, "Input",
+ Cell[11038, 395, 237, 8, 35, "Output",
+ CellTags->"FermionSpinSum"],
+ Cell[11442, 414, 321, 10, 27, "Input",
CellTags->"FermionSpinSum",
CellID->1094170176],
- Cell[10139, 383, 1398, 56, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->690680779],
- Cell[11552, 442, 184, 5, 52, "Text",
- CellTags->"FermionSpinSum",
- CellID->306087100],
- Cell[11761, 451, 166, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1096475209],
- Cell[11930, 458, 1426, 55, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->1746604990],
- Cell[13393, 518, 165, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->2140871689],
- Cell[13561, 525, 1546, 54, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->1062780285],
- Cell[15144, 584, 168, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1433763873],
- Cell[15315, 591, 1814, 69, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->153933314],
- Cell[17144, 663, 161, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1557584860],
- Cell[17661, 690, 717, 27, 32, "Text",
- CellTags->"FermionSpinSum",
- CellID->1427307746]}
+ Cell[11766, 426, 862, 34, 40, "Output",
+ CellTags->"FermionSpinSum"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 20243, 765},
- {"FermionSpinSum", 20383, 769}
+ {"PrimaryExamplesSection", 21232, 781},
+ {"FermionSpinSum", 21373, 785}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3223, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 396, 12, 82, "Usage",
- CellID->982511436],
+Cell[3812, 100, 291, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3339, 94, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->618716005],
+Cell[4128, 115, 460, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3751, 113, 195, 6, 25, "ExampleSection",
- CellID->985692734],
+Cell[4613, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1819187881],
+Cell[5355, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5389, 160, 65, 0, 70, "Notes"],
+Cell[5457, 162, 132, 4, 70, "Notes"],
Cell[CellGroupData[{
-Cell[3971, 123, 146, 4, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1391906924],
-Cell[4120, 129, 688, 18, 75, "Output",
- CellTags->"FermionSpinSum",
- CellID->1112492862]
+Cell[5614, 170, 96, 2, 70, "Input"],
+Cell[5713, 174, 802, 19, 75, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4823, 150, 282, 13, 32, "Text",
- CellTags->"FermionSpinSum",
- CellID->1255696897],
Cell[CellGroupData[{
-Cell[5130, 167, 314, 10, 27, "Input",
+Cell[6576, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->632377296],
+Cell[CellGroupData[{
+Cell[6988, 219, 194, 6, 26, "ExampleSection",
+ CellID->76620452],
+Cell[7185, 227, 95, 2, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[7305, 233, 314, 10, 27, "Input",
CellTags->"FermionSpinSum",
CellID->278938360],
-Cell[5447, 179, 835, 34, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->1523865852]
+Cell[7622, 245, 598, 24, 37, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6319, 218, 161, 5, 27, "Input",
+Cell[8257, 274, 139, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->505730343],
-Cell[6483, 225, 486, 18, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->385708083]
+Cell[8399, 280, 466, 17, 37, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7006, 248, 162, 5, 27, "Input",
+Cell[8902, 302, 139, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->1201144341],
-Cell[7171, 255, 238, 8, 36, "Output",
- CellTags->"FermionSpinSum",
- CellID->867661469]
+Cell[9044, 308, 218, 7, 35, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7446, 268, 315, 10, 27, "Input",
+Cell[9299, 320, 315, 10, 27, "Input",
CellTags->"FermionSpinSum",
CellID->1209998846],
-Cell[7764, 280, 835, 34, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->1761985113]
+Cell[9617, 332, 598, 24, 37, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8636, 319, 161, 5, 27, "Input",
+Cell[10252, 361, 139, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->723398437],
-Cell[8800, 326, 487, 18, 39, "Output",
- CellTags->"FermionSpinSum",
- CellID->1462275463]
+Cell[10394, 367, 466, 17, 37, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9324, 349, 161, 5, 27, "Input",
+Cell[10897, 389, 138, 4, 27, "Input",
CellTags->"FermionSpinSum",
CellID->680865455],
-Cell[9488, 356, 258, 9, 36, "Output",
- CellTags->"FermionSpinSum",
- CellID->1782629402]
+Cell[11038, 395, 237, 8, 35, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9783, 370, 353, 11, 27, "Input",
+Cell[11312, 408, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[11442, 414, 321, 10, 27, "Input",
CellTags->"FermionSpinSum",
CellID->1094170176],
-Cell[10139, 383, 1398, 56, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->690680779]
+Cell[11766, 426, 862, 34, 40, "Output",
+ CellTags->"FermionSpinSum"]
}, Open ]],
-Cell[11552, 442, 184, 5, 52, "Text",
- CellTags->"FermionSpinSum",
- CellID->306087100],
Cell[CellGroupData[{
-Cell[11761, 451, 166, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1096475209],
-Cell[11930, 458, 1426, 55, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->1746604990]
+Cell[12665, 465, 115, 3, 27, "Input"],
+Cell[12783, 470, 2213, 83, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13393, 518, 165, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->2140871689],
-Cell[13561, 525, 1546, 54, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->1062780285]
+Cell[15033, 558, 90, 2, 27, "Input"],
+Cell[15126, 562, 1495, 52, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15144, 584, 168, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1433763873],
-Cell[15315, 591, 1814, 69, 46, "Output",
- CellTags->"FermionSpinSum",
- CellID->153933314]
+Cell[16658, 619, 89, 2, 27, "Input"],
+Cell[16750, 623, 1640, 65, 42, "Output"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[17144, 663, 161, 5, 27, "Input",
- CellTags->"FermionSpinSum",
- CellID->1557584860]
-}, Open ]],
-Cell[17320, 671, 31, 0, 29, "SectionFooterSpacer"]
+Cell[18429, 693, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17388, 676, 270, 12, 31, "SeeAlsoSection",
+Cell[18497, 698, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[17661, 690, 717, 27, 32, "Text",
- CellTags->"FermionSpinSum",
- CellID->1427307746]
+Cell[18770, 712, 529, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[18393, 720, 23, 0, 42, "FooterCell"]
+Cell[19314, 734, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionicChain.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionicChain.nb
new file mode 100644
index 000000000..957279c73
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionicChain.nb
@@ -0,0 +1,888 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 23290, 878]
+NotebookOptionsPosition[ 19122, 742]
+NotebookOutlinePosition[ 21209, 798]
+CellTagsIndexPosition[ 21124, 793]
+WindowTitle->FermionicChain
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FermionicChain\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FermionicChain"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FermionicChain.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$131438],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FermionicChain", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FermionicChain", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a chain of Dirac matrices x, where the Dirac \
+indices i and j are explicit."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->389030547],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1360160300],
+
+Cell["A standalone Dirac matrix", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1948609293],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{57, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->540820865]
+}, Open ]],
+
+Cell["A chain of Dirac matrices with open indices", "Notes",
+ CellID->976984379],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Nu]", ",", "D"}], "]"}], ",", "D"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->699845331],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{78, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1042361559]
+}, Open ]],
+
+Cell["\<\
+A FermionicChain with only two arguments denotes a spinor component\
+\>", "Notes",
+ CellID->1440903900],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1523270401],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{94, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1692835604]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "p"}], "]"}], ",", "m"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2053038750],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{105, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1158219305]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",\
+
+ CellLabel->"In[5]:=",
+ CellID->10435576],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{94, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1027004853]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "p"}], "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->213074326],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{105, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->317258919]
+}, Open ]],
+
+Cell["The chain may also be partially open or closed", "Notes",
+ CellID->853429857],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->943655043],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{221, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->308665713]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1504197659],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{220, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1622089204]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1", ",", "1"}], "]"}], ",",
+
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->765104786],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{297, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->1205748360]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChain", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1", ",", "1"}], "]"}], ",",
+
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->322314800],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{171, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->215830603]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FermionicChain",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2019, 3, 29, 17, 49, 18.853316}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FermionicChain[x, i, j] denotes a chain of Dirac matrices x, where the \
+Dirac indices i and j are explicit.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FermionicChain", "titlemodifier" -> "", "windowtitle" ->
+ "FermionicChain", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FermionicChain"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3668, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->389030547]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 20981, 786}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2298, 53, 50, "AnchorBarGrid",
+ CellID->1],
+Cell[2887, 76, 291, 11, 44, "ObjectNameGrid"],
+Cell[3181, 89, 462, 13, 83, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3668, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->389030547],
+Cell[CellGroupData[{
+Cell[4080, 125, 196, 6, 25, "ExampleSection",
+ CellID->1360160300],
+Cell[4279, 133, 63, 1, 31, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[4367, 138, 303, 8, 45, "Input",
+ CellID->1948609293],
+Cell[4673, 148, 582, 25, 40, "Output",
+ CellID->540820865]
+}, Open ]],
+Cell[5270, 176, 80, 1, 31, "Notes",
+ CellID->976984379],
+Cell[CellGroupData[{
+Cell[5375, 181, 523, 15, 62, "Input",
+ CellID->699845331],
+Cell[5901, 198, 712, 30, 40, "Output",
+ CellID->1042361559]
+}, Open ]],
+Cell[6628, 231, 113, 3, 31, "Notes",
+ CellID->1440903900],
+Cell[CellGroupData[{
+Cell[6766, 238, 269, 8, 27, "Input",
+ CellID->1523270401],
+Cell[7038, 248, 734, 30, 38, "Output",
+ CellID->1692835604]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7809, 283, 291, 9, 27, "Input",
+ CellID->2053038750],
+Cell[8103, 294, 761, 31, 38, "Output",
+ CellID->1158219305]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8901, 330, 269, 9, 27, "Input",
+ CellID->10435576],
+Cell[9173, 341, 734, 30, 38, "Output",
+ CellID->1027004853]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9944, 376, 290, 9, 27, "Input",
+ CellID->213074326],
+Cell[10237, 387, 760, 31, 38, "Output",
+ CellID->317258919]
+}, Open ]],
+Cell[11012, 421, 83, 1, 31, "Notes",
+ CellID->853429857],
+Cell[CellGroupData[{
+Cell[11120, 426, 624, 17, 62, "Input",
+ CellID->943655043],
+Cell[11747, 445, 1381, 54, 40, "Output",
+ CellID->308665713]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13165, 504, 628, 18, 62, "Input",
+ CellID->1504197659],
+Cell[13796, 524, 1382, 54, 38, "Output",
+ CellID->1622089204]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15215, 583, 704, 21, 62, "Input",
+ CellID->765104786],
+Cell[15922, 606, 1674, 67, 41, "Output",
+ CellID->1205748360]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17633, 678, 369, 12, 45, "Input",
+ CellID->322314800],
+Cell[18005, 692, 1051, 43, 41, "Output",
+ CellID->215830603]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[19095, 740, 23, 0, 40, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionicChainSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionicChainSimplify.nb
new file mode 100644
index 000000000..535c79406
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FermionicChainSimplify.nb
@@ -0,0 +1,537 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15319, 527]
+NotebookOptionsPosition[ 11958, 426]
+NotebookOutlinePosition[ 14099, 482]
+CellTagsIndexPosition[ 14014, 477]
+WindowTitle->FermionicChainSimplify
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FermionicChain\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FermionicChain"], "\<\"DiracIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracIndex"], "\<\"DiracIndexDelta\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracIndexDelta"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FermionicChainSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FermionicChainSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FermionicChainSimplify.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$131898],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FermionicChainSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FermionicChainSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FermionicChainSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]simplifies chains of Dirac matrices with explicit \
+Dirac indices wrapped with a head ",
+ ButtonBox["FermionicChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FermionicChain",
+ ButtonNote->"FermionicChain"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1610067633],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FermionicChainSimplify", "]"}]], "Input",
+ CellLabel->"In[87]:=",
+ CellID->1965709680],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"FCCanonicalizeDummyIndices", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{539, 73},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[87]=",
+ CellID->433648002]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1475130097],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1697219253],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ",", "i"}], "]"}], " ",
+ RowBox[{"FCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}], "]"}], " ",
+ RowBox[{"FCHN", "[",
+ RowBox[{"j", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->857331981],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{265, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1603930999]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FermionicChainSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1834507663],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{237, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->946831053]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FermionicChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FermionicChain",
+ ButtonNote->"FermionicChain"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FermionicChainSimplify",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2019, 3, 29, 17, 49, 19.892212}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FermionicChainSimplify[exp] simplifies chains of Dirac matrices with \
+explicit Dirac indices wrapped with a head FermionicChain.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FermionicChainSimplify", "titlemodifier" ->
+ "", "windowtitle" -> "FermionicChainSimplify", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FermionicChainSimplify"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6765, 201, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1475130097]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13870, 470}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[594, 21, 3277, 78, 50, "AnchorBarGrid",
+ CellID->1],
+Cell[3874, 101, 299, 11, 44, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4198, 116, 597, 17, 83, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4820, 137, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1610067633],
+Cell[5562, 163, 31, 0, 14, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5618, 167, 126, 3, 27, "Input",
+ CellID->1965709680],
+Cell[5747, 172, 957, 22, 94, "Output",
+ CellID->433648002]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6765, 201, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1475130097],
+Cell[CellGroupData[{
+Cell[7178, 220, 196, 6, 25, "ExampleSection",
+ CellID->1697219253],
+Cell[CellGroupData[{
+Cell[7399, 230, 507, 16, 45, "Input",
+ CellID->857331981],
+Cell[7909, 248, 1625, 68, 40, "Output",
+ CellID->1603930999]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9571, 321, 119, 3, 27, "Input",
+ CellID->1834507663],
+Cell[9693, 326, 1285, 52, 41, "Output",
+ CellID->946831053]
+}, Open ]]
+}, Open ]],
+Cell[11005, 382, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11073, 387, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11346, 401, 570, 20, 55, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[11931, 424, 23, 0, 40, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmp.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmp.nb
index 341925c05..b7d8a7514 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmp.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmp.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14283, 500]
-NotebookOptionsPosition[ 10240, 376]
-NotebookOutlinePosition[ 13169, 457]
-CellTagsIndexPosition[ 13058, 451]
+NotebookDataLength[ 15673, 550]
+NotebookOptionsPosition[ 11946, 437]
+NotebookOutlinePosition[ 14444, 506]
+CellTagsIndexPosition[ 14333, 500]
WindowTitle->FeynAmp
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmp\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynAmp"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FeynAmp.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Amplitude\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Amplitude"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmp\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmp"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FeynAmp.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$66485],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynAmp", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$132958],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmp", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +95,29 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynAmp", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynAmp", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"FeynAmp", "[",
RowBox[{"q", ",", " ", "amp"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of a Feynman amplitude, where amp denotes the analytical \
-expression for the amplitude and q is the integration variable. FeynAmp[q1, \
-q2, amp] denotes a two-loop amplitude.\n\nFeynAmp has no functional \
-properties and serves just as a head. There are however special typesetting \
-rules attached."
+ " \[LineSeparator]is the head of a Feynman amplitude, where amp denotes \
+the analytical expression for the amplitude and q is the integration \
+variable. FeynAmp[q1, q2, amp] denotes a two-loop amplitude."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,6 +128,44 @@ rules attached."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1386052971],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+FeynAmp has no functional properties and serves just as a head. There are \
+however special typesetting rules attached.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +181,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1464467340],
+ CellID->618300883],
Cell[CellGroupData[{
@@ -122,14 +191,12 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->652924101],
+ CellID->493798849],
Cell["\<\
This is a 1-loop gluon self-energy amplitude (ignoring factors of (2 \[Pi])).\
\
-\>", "Text",
- CellTags->"FeynAmp",
- CellID->1803940715],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -302,17 +369,14 @@ Cell[BoxData[
RowBox[{"p", "-", "q"}],
TraditionalForm], ")"}]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{574, 33},
+ ImageSize->{449, 69},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmp",
- CellLabel->"Out[1]=",
- CellID->1301141355]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["This is a generic 2-loop amplitude.", "Text",
- CellTags->"FeynAmp",
- CellID->311938840],
+Cell["This is a generic 2-loop amplitude.", "Notes"],
Cell[CellGroupData[{
@@ -332,12 +396,11 @@ Cell[BoxData[
SubscriptBox["q", "1"], ",",
SubscriptBox["q", "2"], ",", "anyexpression"}], ")"}],
TraditionalForm]], "Output",
- ImageSize->{209, 17},
+ ImageSize->{203, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmp",
- CellLabel->"Out[2]=",
- CellID->1833982253]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -367,9 +430,7 @@ Cell[TextData[{
ButtonNote->"Amplitude"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynAmp",
- CellID->1771618737]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -386,10 +447,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 43.798937}",
+ "built" -> "{2020, 1, 5, 18, 57, 34.080536}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -397,13 +458,12 @@ TaggingRules->{
"None", "summary" ->
"FeynAmp[q, amp] is the head of a Feynman amplitude, where amp denotes \
the analytical expression for the amplitude and q is the integration \
-variable. FeynAmp[q1, q2, amp] denotes a two-loop amplitude. FeynAmp has no \
-functional properties and serves just as a head. There are however special \
-typesetting rules attached.", "synonyms" -> {}, "title" -> "FeynAmp",
+variable. FeynAmp[q1, q2, amp] denotes a two-loop amplitude.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FeynAmp",
"titlemodifier" -> "", "windowtitle" -> "FeynAmp", "type" -> "Symbol",
"uri" -> "FeynCalc/ref/FeynAmp"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -412,7 +472,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -421,87 +481,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3589, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5461, 168, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1464467340]},
+ CellID->618300883]},
"FeynAmp"->{
- Cell[4200, 126, 146, 5, 32, "Text",
- CellTags->"FeynAmp",
- CellID->1803940715],
- Cell[4371, 135, 864, 23, 45, "Input",
+ Cell[6200, 202, 864, 23, 45, "Input",
CellTags->"FeynAmp",
CellID->772375685],
- Cell[5238, 160, 3668, 149, 54, "Output",
- CellTags->"FeynAmp",
- CellID->1301141355],
- Cell[8921, 312, 93, 2, 32, "Text",
- CellTags->"FeynAmp",
- CellID->311938840],
- Cell[9039, 318, 217, 7, 27, "Input",
+ Cell[7067, 227, 3647, 148, 90, "Output",
+ CellTags->"FeynAmp"],
+ Cell[10806, 382, 217, 7, 27, "Input",
CellTags->"FeynAmp",
CellID->1547526680],
- Cell[9259, 327, 341, 12, 38, "Output",
- CellTags->"FeynAmp",
- CellID->1833982253],
- Cell[9968, 362, 230, 9, 32, "Text",
- CellTags->"FeynAmp",
- CellID->1771618737]}
+ Cell[11026, 391, 320, 11, 38, "Output",
+ CellTags->"FeynAmp"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12290, 422},
- {"FeynAmp", 12424, 426}
+ {"PrimaryExamplesSection", 13865, 482},
+ {"FeynAmp", 13999, 486}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3000, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 689, 17, 162, "Usage",
+Cell[3582, 97, 284, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3891, 112, 555, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3589, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4471, 130, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1386052971],
+Cell[5213, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5247, 158, 165, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5461, 168, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1464467340],
+ CellID->618300883],
Cell[CellGroupData[{
-Cell[4002, 118, 195, 6, 25, "ExampleSection",
- CellID->652924101],
-Cell[4200, 126, 146, 5, 32, "Text",
- CellTags->"FeynAmp",
- CellID->1803940715],
+Cell[5873, 187, 195, 6, 26, "ExampleSection",
+ CellID->493798849],
+Cell[6071, 195, 104, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4371, 135, 864, 23, 45, "Input",
+Cell[6200, 202, 864, 23, 45, "Input",
CellTags->"FeynAmp",
CellID->772375685],
-Cell[5238, 160, 3668, 149, 54, "Output",
- CellTags->"FeynAmp",
- CellID->1301141355]
+Cell[7067, 227, 3647, 148, 90, "Output",
+ CellTags->"FeynAmp"]
}, Open ]],
-Cell[8921, 312, 93, 2, 32, "Text",
- CellTags->"FeynAmp",
- CellID->311938840],
+Cell[10729, 378, 52, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[9039, 318, 217, 7, 27, "Input",
+Cell[10806, 382, 217, 7, 27, "Input",
CellTags->"FeynAmp",
CellID->1547526680],
-Cell[9259, 327, 341, 12, 38, "Output",
- CellTags->"FeynAmp",
- CellID->1833982253]
+Cell[11026, 391, 320, 11, 38, "Output",
+ CellTags->"FeynAmp"]
}, Open ]]
}, Open ]],
-Cell[9627, 343, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11373, 406, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9695, 348, 270, 12, 31, "SeeAlsoSection",
+Cell[11441, 411, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9968, 362, 230, 9, 32, "Text",
- CellTags->"FeynAmp",
- CellID->1771618737]
+Cell[11714, 425, 190, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[10213, 374, 23, 0, 42, "FooterCell"]
+Cell[11919, 435, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominator.nb
index d458a7eb6..a3e4ad6d4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominator.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12916, 435]
-NotebookOptionsPosition[ 7939, 284]
-NotebookOutlinePosition[ 11286, 376]
-CellTagsIndexPosition[ 11165, 370]
+NotebookDataLength[ 39979, 1339]
+NotebookOptionsPosition[ 32874, 1121]
+NotebookOutlinePosition[ 35922, 1202]
+CellTagsIndexPosition[ 35798, 1196]
WindowTitle->FeynAmpDenominator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmpDenominator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynAmpDenominator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FAD"], "\<\"SFAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SFAD"], "\<\"CFAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CFAD"], "\<\"GFAD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GFAD"], "\<\"FeynAmpDenominatorSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmpDenominator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmpDenominator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynAmpDenominator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$65117],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynAmpDenominator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$131164],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmpDenominator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +100,27 @@ FeynAmpDenominator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynAmpDenominator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynAmpDenominator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"FeynAmpDenominator", "["}]], "InlineFormula"],
- " \[LineSeparator]",
- "PropagatorDenominator[ ... ], PropagatorDenominator[ ... ], ...] is the \
-head of the denominators of the propagators, i.e., FeynAmpDenominator[x] is \
-the representation of 1/x ."
+ RowBox[{"FeynAmpDenominator", "[", "...", "]"}]], "InlineFormula"],
+ " represents the inverse denominators of the propagators, i.e. \
+FeynAmpDenominator[x] is 1/x. Different propagator denominators are \
+represented using special heads such as PropagatorDenominator, \
+StandardPropagatorDenominator, CartesianPropagatorDenominator etc."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,7 +146,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1040198196],
+ CellID->228635681],
Cell[CellGroupData[{
@@ -119,14 +156,28 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1501059196],
+ CellID->862752378],
+
+Cell[TextData[{
+ "The old way to represent standard Lorentzian propagators is to use \
+PropagatorDenominator. Here the sign of the mass term is fixed to be ",
+ Cell[BoxData[
+ RowBox[{"-", "1"}]], "InlineFormula"],
+ " and no information on the ",
+ Cell[BoxData[
+ RowBox[{"I", " ", "\[Eta]"}]], "InlineFormula"],
+ "- prescription is available. Furterhmore, this way it is not possible to \
+enter eikonal propagators"
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FeynAmpDenominator", "[",
RowBox[{"PropagatorDenominator", "[",
- RowBox[{"p", ",", "m"}], "]"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "m"}], "]"}], "]"}]], "Input",
CellTags->"FeynAmpDenominator",
CellLabel->"In[1]:=",
CellID->1348679348],
@@ -134,15 +185,25 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["1",
- RowBox[{
- SuperscriptBox["p", "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{64, 47},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominator",
- CellLabel->"Out[1]=",
- CellID->1385454227]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -151,10 +212,15 @@ Cell[BoxData[
RowBox[{"FeynAmpDenominator", "[",
RowBox[{
RowBox[{"PropagatorDenominator", "[",
- RowBox[{"p", ",", "m"}], "]"}], ",",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "m"}], "]"}], ",",
RowBox[{"PropagatorDenominator", "[",
RowBox[{
- RowBox[{"p", "-", "q"}], ",", "m"}], "]"}]}], "]"}]], "Input",
+ RowBox[{"Momentum", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "D"}], "]"}], ",", "m"}], "]"}]}],
+ "]"}]], "Input",
CellTags->"FeynAmpDenominator",
CellLabel->"In[2]:=",
CellID->1096136338],
@@ -164,83 +230,838 @@ Cell[BoxData[
FractionBox["1",
RowBox[{
RowBox[{"(",
- RowBox[{
- SuperscriptBox["p", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"p", "-", "q"}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{185, 48},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p - $CellContext`q, D]],
+ "-", $CellContext`m^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{189, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominator",
- CellLabel->"Out[2]=",
- CellID->303237864]
+ CellLabel->"Out[2]="]
}, Open ]],
+Cell["\<\
+The shortcut to enter FeynAmpDenominators with PropagatorDenominators is FAD\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
- RowBox[{"t", "=",
+ RowBox[{
RowBox[{"FeynAmpDenominator", "[",
RowBox[{"PropagatorDenominator", "[",
- RowBox[{"p", ",", "m"}], "]"}], "]"}]}], ";"}]], "Input",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "m"}], "]"}], "]"}], "//",
+ "FCE"}], "//", "StandardForm"}]], "Input",
CellTags->"FeynAmpDenominator",
CellLabel->"In[3]:=",
- CellID->1741601383],
+ CellID->1592188506],
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",", "m"}], "}"}], "]"}]], "Output",
+ ImageSize->{95, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FeynAmpDenominator",
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]],
+
+Cell["\<\
+Since version 9.3, a more flexible input is possible using \
+StandardPropagatorDenominator\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"t", "//", "FCI"}], "]"}]], "Input",
- CellTags->"FeynAmpDenominator",
- CellLabel->"In[4]:=",
- CellID->1540629635],
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell["\<\
+The mass term can be anything, as long as it does not depend on the loop \
+momenta\
+\>", "Notes"],
+
+Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FeynAmpDenominator", "[",
- RowBox[{"PropagatorDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
RowBox[{
RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "D"}], "]"}], ",", "m"}], "]"}], "]"}]], "Output",
- ImageSize->{490, 15},
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ SuperscriptBox["m", "2"],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{102, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynAmpDenominator",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1126645796]
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",", "MM", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"","MM",
+ "\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{105, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm], 2], TraditionalForm],
+ "\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{99, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[TextData[{
+ "One can also change the sign of the ",
+ Cell[BoxData[
+ RowBox[{"I", " ", "\[Eta]"}]], "InlineFormula"],
+ "- prescription, although currently no internal functions make use of it"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]],
+
+Cell["The propagator may be raised to integer or symbolic powers", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"3", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[9]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ SuperscriptBox["m", "2"],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "3"]], TraditionalForm]], "Output",
+ ImageSize->{110, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"-", "2"}], ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[10]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ SuperscriptBox["m", "2"],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"], TraditionalForm]], "Output",
+ ImageSize->{106, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[11]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ SuperscriptBox["m", "2"],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"],
+ RowBox[{"-", "n"}]], TraditionalForm]], "Output",
+ ImageSize->{117, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]="]
+}, Open ]],
+
+Cell["Eikonal propagators are also supported", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}], ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[12]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{118, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}], ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[13]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{84, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[13]="]
+}, Open ]],
+
+Cell[TextData[{
+ "FeynCalc keeps trace of the signs of the scalar products in the eikonal \
+propagators. This is where the ",
+ Cell[BoxData[
+ RowBox[{"I", " ", "\[Eta]"}]], "InlineFormula"],
+ "- prescription may come handy"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"-",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}]}], ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[14]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"","\"-\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{94, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"t", "//", "FCE"}], "]"}]], "Input",
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}], ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[15]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{84, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[15]="]
+}, Open ]],
+
+Cell["\<\
+The shortcut to enter FeynAmpDenominators with StandardPropagatorDenominators \
+is SFAD\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
CellTags->"FeynAmpDenominator",
- CellLabel->"In[5]:=",
- CellID->1592188506],
+ CellLabel->"In[16]:=",
+ CellID->484409356],
Cell[BoxData[
- RowBox[{"FAD", "[",
+ RowBox[{"SFAD", "[",
RowBox[{"{",
- RowBox[{"p", ",", "m"}], "}"}], "]"}]], "Output",
- ImageSize->{94, 15},
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "1"}], "}"}], ",", "1"}], "}"}],
+ "]"}]], "Output",
+ ImageSize->{205, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominator",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1536013774]
+ CellLabel->"Out[16]//StandardForm="]
}, Open ]],
+Cell["\<\
+Eikonal propagators are entered using the dot (\".\") as in noncommutative \
+products\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
- RowBox[{"Clear", "[", "t", "]"}], ";"}]], "Input",
- CellTags->"FeynAmpDenominator",
- CellLabel->"In[6]:=",
- CellID->1230382152]
+ RowBox[{
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}], ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[17]:="],
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "1"}], "}"}], ",", "1"}], "}"}],
+ "]"}]], "Output",
+ ImageSize->{223, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[17]//StandardForm="]
+}, Open ]],
+
+Cell["\<\
+The Cartesian version of StandardPropagatorDenominator is called \
+CartesianPropagatorDenominator. The syntax is almost the same as in \
+StandardPropagatorDenominator, except that the momenta and scalar products \
+must be Cartesian.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[18]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[18]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[19]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{119, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[19]="]
+}, Open ]],
+
+Cell["\<\
+The shortcut to enter FeynAmpDenominators with \
+CartesianPropagatorDenominators is CFAD\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[20]:="],
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"-", "1"}]}], "}"}], ",", "1"}], "}"}], "]"}]], "Output",
+ ImageSize->{215, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[20]//StandardForm="]
+}, Open ]],
+
+Cell["\<\
+To represent completely arbitrary propagators one can use \
+GenericPropagatorDenominator. However, one should keep in mind that the \
+number of operations using such propagators is very limited.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"GenericPropagatorDenominator", "[",
+ RowBox[{"x", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[21]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{
+ "\"(\"","x","\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{60, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[21]="]
+}, Open ]],
+
+Cell["\<\
+This is a nonlinear propagator that appears in the calculation of the QCD \
+Energy-Energy-Correlation function\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"GenericPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Q", ",", "D"}], "]"}]}], "]"}],
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p2", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Q", ",", "D"}], "]"}]}], "]"}]}], "-",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p2", ",", "D"}], "]"}]}], "]"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[22]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["Q", TraditionalForm], TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["Q", TraditionalForm], TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm]}]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{244, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[22]="]
+}, Open ]],
+
+Cell["\<\
+The shortcut to enter FeynAmpDenominators with GenericPropagatorDenominators \
+is GFAD\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"GenericPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Q", ",", "D"}], "]"}]}], "]"}],
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p2", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Q", ",", "D"}], "]"}]}], "]"}]}], "-",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p2", ",", "D"}], "]"}]}], "]"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[23]:="],
+
+Cell[BoxData[
+ RowBox[{"GFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}], "+",
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "Q"}], "]"}], " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p2", ",", "Q"}], "]"}]}]}], ",", "1"}], "}"}], ",", "1"}],
+ "}"}], "]"}]], "Output",
+ ImageSize->{429, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[23]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -269,15 +1090,31 @@ Cell[TextData[{
ButtonNote->"FAD"],
FontFamily->"Verdana"],
", ",
+ StyleBox[ButtonBox["SFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SFAD",
+ ButtonNote->"SFAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["CFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CFAD",
+ ButtonNote->"CFAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GFAD",
+ ButtonNote->"GFAD"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["FeynAmpDenominatorSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominatorSimplify",
ButtonNote->"FeynAmpDenominatorSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynAmpDenominator",
- CellID->1703753966]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -294,23 +1131,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 37.964157}",
+ "built" -> "{2020, 1, 5, 18, 57, 29.310668}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FeynAmpDenominator[PropagatorDenominator[ ... ], PropagatorDenominator[ \
-... ], ...] is the head of the denominators of the propagators, i.e., \
-FeynAmpDenominator[x] is the representation of 1/x .", "synonyms" -> {},
+ "FeynAmpDenominator[ ...] represents the inverse denominators of the \
+propagators, i.e. FeynAmpDenominator[x] is 1/x. Different propagator \
+denominators are represented using special heads such as \
+PropagatorDenominator, StandardPropagatorDenominator, \
+CartesianPropagatorDenominator etc.", "synonyms" -> {}, "tabletags" -> {},
"title" -> "FeynAmpDenominator", "titlemodifier" -> "", "windowtitle" ->
"FeynAmpDenominator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynAmpDenominator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -319,7 +1158,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -328,115 +1167,180 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3489, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4907, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1040198196]},
+ CellID->228635681]},
"FeynAmpDenominator"->{
- Cell[4123, 125, 220, 6, 27, "Input",
+ Cell[5971, 174, 283, 8, 27, "Input",
CellTags->"FeynAmpDenominator",
CellID->1348679348],
- Cell[4346, 133, 317, 11, 68, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->1385454227],
- Cell[4700, 149, 345, 10, 45, "Input",
+ Cell[6257, 184, 633, 21, 61, "Output",
+ CellTags->"FeynAmpDenominator"],
+ Cell[6927, 210, 480, 15, 45, "Input",
CellTags->"FeynAmpDenominator",
CellID->1096136338],
- Cell[5048, 161, 536, 19, 69, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->303237864],
- Cell[5599, 183, 266, 8, 27, "Input",
- CellTags->"FeynAmpDenominator",
- CellID->1741601383],
- Cell[5890, 195, 168, 5, 27, "Input",
- CellTags->"FeynAmpDenominator",
- CellID->1540629635],
- Cell[6061, 202, 386, 11, 49, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->1126645796],
- Cell[6484, 218, 168, 5, 27, "Input",
+ Cell[7410, 227, 1496, 49, 64, "Output",
+ CellTags->"FeynAmpDenominator"],
+ Cell[9047, 285, 357, 11, 45, "Input",
CellTags->"FeynAmpDenominator",
CellID->1592188506],
- Cell[6655, 225, 282, 9, 49, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->1536013774],
- Cell[6952, 237, 153, 5, 27, "Input",
+ Cell[9407, 298, 261, 8, 51, "Output",
+ CellTags->"FeynAmpDenominator"],
+ Cell[21358, 713, 489, 15, 45, "Input",
CellTags->"FeynAmpDenominator",
- CellID->1230382152],
- Cell[7461, 264, 436, 15, 70, "Text",
- CellTags->"FeynAmpDenominator",
- CellID->1703753966]}
+ CellID->484409356],
+ Cell[21850, 730, 407, 14, 57, "Output",
+ CellTags->"FeynAmpDenominator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9911, 329},
- {"FeynAmpDenominator", 10056, 333}
+ {"PrimaryExamplesSection", 34925, 1168},
+ {"FeynAmpDenominator", 35070, 1172}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3397, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 522, 14, 99, "Usage",
+Cell[3990, 102, 295, 11, 45, "ObjectNameGrid"],
+Cell[4288, 115, 594, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3489, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4907, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1040198196],
+ CellID->228635681],
Cell[CellGroupData[{
-Cell[3902, 115, 196, 6, 25, "ExampleSection",
- CellID->1501059196],
+Cell[5319, 152, 195, 6, 26, "ExampleSection",
+ CellID->862752378],
+Cell[5517, 160, 429, 10, 66, "Notes"],
Cell[CellGroupData[{
-Cell[4123, 125, 220, 6, 27, "Input",
+Cell[5971, 174, 283, 8, 27, "Input",
CellTags->"FeynAmpDenominator",
CellID->1348679348],
-Cell[4346, 133, 317, 11, 68, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->1385454227]
+Cell[6257, 184, 633, 21, 61, "Output",
+ CellTags->"FeynAmpDenominator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4700, 149, 345, 10, 45, "Input",
+Cell[6927, 210, 480, 15, 45, "Input",
CellTags->"FeynAmpDenominator",
CellID->1096136338],
-Cell[5048, 161, 536, 19, 69, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->303237864]
+Cell[7410, 227, 1496, 49, 64, "Output",
+ CellTags->"FeynAmpDenominator"]
}, Open ]],
-Cell[5599, 183, 266, 8, 27, "Input",
- CellTags->"FeynAmpDenominator",
- CellID->1741601383],
+Cell[8921, 279, 101, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5890, 195, 168, 5, 27, "Input",
- CellTags->"FeynAmpDenominator",
- CellID->1540629635],
-Cell[6061, 202, 386, 11, 49, "Output",
+Cell[9047, 285, 357, 11, 45, "Input",
CellTags->"FeynAmpDenominator",
- CellID->1126645796]
+ CellID->1592188506],
+Cell[9407, 298, 261, 8, 51, "Output",
+ CellTags->"FeynAmpDenominator"]
}, Open ]],
+Cell[9683, 309, 115, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6484, 218, 168, 5, 27, "Input",
- CellTags->"FeynAmpDenominator",
- CellID->1592188506],
-Cell[6655, 225, 282, 9, 49, "Output",
- CellTags->"FeynAmpDenominator",
- CellID->1536013774]
+Cell[9823, 316, 354, 10, 45, "Input"],
+Cell[10180, 328, 434, 12, 61, "Output"]
+}, Open ]],
+Cell[10629, 343, 107, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[10761, 350, 333, 9, 45, "Input"],
+Cell[11097, 361, 425, 12, 61, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11559, 378, 309, 8, 45, "Input"],
+Cell[11871, 388, 399, 11, 61, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12307, 404, 366, 10, 45, "Input"],
+Cell[12676, 416, 518, 14, 61, "Output"]
+}, Open ]],
+Cell[13209, 433, 211, 5, 48, "Notes"],
+Cell[CellGroupData[{
+Cell[13445, 442, 376, 11, 45, "Input"],
+Cell[13824, 455, 434, 12, 61, "Output"]
+}, Open ]],
+Cell[14273, 470, 75, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[14373, 474, 333, 9, 45, "Input"],
+Cell[14709, 485, 456, 13, 61, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15202, 503, 356, 10, 45, "Input"],
+Cell[15561, 515, 429, 12, 39, "Output"]
}, Open ]],
-Cell[6952, 237, 153, 5, 27, "Input",
+Cell[CellGroupData[{
+Cell[16027, 532, 334, 9, 45, "Input"],
+Cell[16364, 543, 448, 13, 39, "Output"]
+}, Open ]],
+Cell[16827, 559, 55, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[16907, 563, 485, 14, 45, "Input"],
+Cell[17395, 579, 556, 15, 61, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17988, 599, 439, 12, 45, "Input"],
+Cell[18430, 613, 507, 14, 59, "Output"]
+}, Open ]],
+Cell[18952, 630, 238, 6, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[19215, 640, 465, 13, 45, "Input"],
+Cell[19683, 655, 515, 14, 59, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20235, 674, 461, 13, 45, "Input"],
+Cell[20699, 689, 507, 14, 59, "Output"]
+}, Open ]],
+Cell[21221, 706, 112, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[21358, 713, 489, 15, 45, "Input",
CellTags->"FeynAmpDenominator",
- CellID->1230382152]
+ CellID->484409356],
+Cell[21850, 730, 407, 14, 57, "Output",
+ CellTags->"FeynAmpDenominator"]
+}, Open ]],
+Cell[22272, 747, 110, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[22407, 754, 574, 17, 62, "Input"],
+Cell[22984, 773, 401, 14, 57, "Output"]
}, Open ]],
-Cell[7120, 245, 31, 0, 70, "SectionFooterSpacer"]
+Cell[23400, 790, 257, 5, 66, "Notes"],
+Cell[CellGroupData[{
+Cell[23682, 799, 393, 11, 45, "Input"],
+Cell[24078, 812, 476, 13, 61, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7188, 250, 270, 12, 70, "SeeAlsoSection",
+Cell[24591, 830, 572, 16, 62, "Input"],
+Cell[25166, 848, 657, 18, 61, "Output"]
+}, Open ]],
+Cell[25838, 869, 113, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[25976, 876, 480, 14, 45, "Input"],
+Cell[26459, 892, 393, 13, 57, "Output"]
+}, Open ]],
+Cell[26867, 908, 219, 4, 65, "Notes"],
+Cell[CellGroupData[{
+Cell[27111, 916, 225, 6, 27, "Input"],
+Cell[27339, 924, 304, 10, 59, "Output"]
+}, Open ]],
+Cell[27658, 937, 135, 3, 48, "Notes"],
+Cell[CellGroupData[{
+Cell[27818, 944, 904, 26, 79, "Input"],
+Cell[28725, 972, 1156, 30, 59, "Output"]
+}, Open ]],
+Cell[29896, 1005, 111, 3, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[30032, 1012, 1017, 29, 79, "Input"],
+Cell[31052, 1043, 586, 19, 51, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[31665, 1066, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[31733, 1071, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7461, 264, 436, 15, 70, "Text",
- CellTags->"FeynAmpDenominator",
- CellID->1703753966]
+Cell[32006, 1085, 826, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[7912, 282, 23, 0, 70, "FooterCell"]
+Cell[32847, 1119, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorCombine.nb
index 2ef4e4a5d..8abc3bf81 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorCombine.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorCombine.nb
@@ -3,71 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11443, 375]
-NotebookOptionsPosition[ 7169, 250]
-NotebookOutlinePosition[ 10173, 330]
-CellTagsIndexPosition[ 10046, 324]
+NotebookDataLength[ 15162, 512]
+NotebookOptionsPosition[ 10908, 390]
+NotebookOutlinePosition[ 13792, 465]
+CellTagsIndexPosition[ 13663, 459]
WindowTitle->FeynAmpDenominatorCombine
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/FeynAmpDenominatorCombine\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynAmpDenominatorCombine"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmpDenominatorSplit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSplit"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FeynAmpDenominatorCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmpDenominatorCombine"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynAmpDenominatorCombine.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$64781],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynAmpDenominatorCombine", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$130261],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmpDenominatorCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -75,8 +98,18 @@ FeynAmpDenominatorCombine.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynAmpDenominatorCombine", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynAmpDenominatorCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->325844074],
+ CellID->2009603879],
Cell[CellGroupData[{
@@ -121,12 +154,12 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->138877958],
+ CellID->1765718643],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", " ", "=", " ",
+ RowBox[{" ",
RowBox[{
RowBox[{"FAD", "[", "q", "]"}], " ",
RowBox[{"FAD", "[",
@@ -137,81 +170,190 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- FractionBox["1",
+ FormBox[
+ FractionBox["1",
+ RowBox[{
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False]],
- TraditionalForm], " ",
- FormBox[
- FractionBox["1",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], " ",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{109, 47},
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{97, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorCombine",
- CellLabel->"Out[1]=",
- CellID->947419754]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"FeynAmpDenominatorCombine", "[", "%", "]"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
+ RowBox[{"FeynAmpDenominatorCombine", "[", "%", "]"}]], "Input",
CellTags->"FeynAmpDenominatorCombine",
CellLabel->"In[2]:=",
CellID->102451509],
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{99, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FeynAmpDenominatorCombine",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:="],
+
Cell[BoxData[
RowBox[{"FAD", "[",
RowBox[{"q", ",",
RowBox[{
RowBox[{"-", "p"}], "+", "q"}]}], "]"}]], "Output",
- ImageSize->{111, 15},
+ ImageSize->{112, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynAmpDenominatorCombine",
- CellLabel->"Out[2]//StandardForm=",
- CellID->230589417]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"FeynAmpDenominatorSplit", "[", "%", "]"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
+ RowBox[{"FeynAmpDenominatorSplit", "[", "%", "]"}]], "Input",
CellTags->"FeynAmpDenominatorCombine",
- CellLabel->"In[3]:=",
+ CellLabel->"In[4]:=",
CellID->1679025277],
+Cell[BoxData[
+ FormBox[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{97, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FeynAmpDenominatorCombine",
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[5]:="],
+
Cell[BoxData[
RowBox[{
RowBox[{"FAD", "[", "q", "]"}], " ",
RowBox[{"FAD", "[",
RowBox[{
RowBox[{"-", "p"}], "+", "q"}], "]"}]}]], "Output",
- ImageSize->{143, 15},
+ ImageSize->{145, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynAmpDenominatorCombine",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1242071440]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -241,17 +383,15 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominatorSplit"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->842767494]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FeynAmpDenominatorCombine",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -260,10 +400,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 36.409820}",
+ "built" -> "{2020, 1, 5, 18, 57, 26.743172}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -271,12 +411,12 @@ TaggingRules->{
"None", "summary" ->
"FeynAmpDenominatorCombine[expr] expands expr with respect to \
FeynAmpDenominator and combines products of FeynAmpDenominator in expr into \
-one FeynAmpDenominator.", "synonyms" -> {}, "title" ->
+one FeynAmpDenominator.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"FeynAmpDenominatorCombine", "titlemodifier" -> "", "windowtitle" ->
"FeynAmpDenominatorCombine", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynAmpDenominatorCombine"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -284,8 +424,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -294,89 +435,85 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3531, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4563, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->325844074]},
+ CellID->2009603879]},
"FeynAmpDenominatorCombine"->{
- Cell[4163, 127, 253, 8, 27, "Input",
+ Cell[5197, 160, 238, 8, 27, "Input",
CellTags->"FeynAmpDenominatorCombine",
CellID->1769548352],
- Cell[4419, 137, 871, 27, 68, "Output",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->947419754],
- Cell[5327, 169, 226, 7, 27, "Input",
+ Cell[5438, 170, 1186, 42, 61, "Output",
+ CellTags->"FeynAmpDenominatorCombine"],
+ Cell[6661, 217, 161, 4, 27, "Input",
CellTags->"FeynAmpDenominatorCombine",
CellID->102451509],
- Cell[5556, 178, 309, 10, 49, "Output",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->230589417],
- Cell[5902, 193, 225, 7, 27, "Input",
+ Cell[6825, 223, 1173, 41, 61, "Output",
+ CellTags->"FeynAmpDenominatorCombine"],
+ Cell[8434, 287, 160, 4, 27, "Input",
CellTags->"FeynAmpDenominatorCombine",
CellID->1679025277],
- Cell[6130, 202, 340, 11, 49, "Output",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->1242071440],
- Cell[6838, 236, 289, 9, 32, "Text",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->842767494]}
+ Cell[8597, 293, 1240, 43, 61, "Output",
+ CellTags->"FeynAmpDenominatorCombine"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9135, 295},
- {"FeynAmpDenominatorCombine", 9286, 299}
+ {"PrimaryExamplesSection", 12917, 436},
+ {"FeynAmpDenominatorCombine", 13070, 440}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[597, 21, 2335, 54, 51, "AnchorBarGrid",
+Cell[597, 21, 3133, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2935, 77, 68, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3006, 80, 500, 14, 97, "Usage",
+Cell[3733, 100, 302, 11, 45, "ObjectNameGrid"],
+Cell[4038, 113, 500, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3531, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4563, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->325844074],
+ CellID->2009603879],
Cell[CellGroupData[{
-Cell[3943, 117, 195, 6, 25, "ExampleSection",
- CellID->138877958],
+Cell[4976, 150, 196, 6, 26, "ExampleSection",
+ CellID->1765718643],
Cell[CellGroupData[{
-Cell[4163, 127, 253, 8, 27, "Input",
+Cell[5197, 160, 238, 8, 27, "Input",
CellTags->"FeynAmpDenominatorCombine",
CellID->1769548352],
-Cell[4419, 137, 871, 27, 68, "Output",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->947419754]
+Cell[5438, 170, 1186, 42, 61, "Output",
+ CellTags->"FeynAmpDenominatorCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5327, 169, 226, 7, 27, "Input",
+Cell[6661, 217, 161, 4, 27, "Input",
CellTags->"FeynAmpDenominatorCombine",
CellID->102451509],
-Cell[5556, 178, 309, 10, 49, "Output",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->230589417]
+Cell[6825, 223, 1173, 41, 61, "Output",
+ CellTags->"FeynAmpDenominatorCombine"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8035, 269, 110, 3, 27, "Input"],
+Cell[8148, 274, 249, 8, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5902, 193, 225, 7, 27, "Input",
+Cell[8434, 287, 160, 4, 27, "Input",
CellTags->"FeynAmpDenominatorCombine",
CellID->1679025277],
-Cell[6130, 202, 340, 11, 49, "Output",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->1242071440]
+Cell[8597, 293, 1240, 43, 61, "Output",
+ CellTags->"FeynAmpDenominatorCombine"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9874, 341, 110, 3, 27, "Input"],
+Cell[9987, 346, 279, 9, 51, "Output"]
}, Open ]]
}, Open ]],
-Cell[6497, 217, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10293, 359, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6565, 222, 270, 12, 31, "SeeAlsoSection",
+Cell[10361, 364, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6838, 236, 289, 9, 32, "Text",
- CellTags->"FeynAmpDenominatorCombine",
- CellID->842767494]
+Cell[10634, 378, 232, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[7142, 248, 23, 0, 42, "FooterCell"]
+Cell[10881, 388, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorExplicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorExplicit.nb
new file mode 100644
index 000000000..66abfdc54
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorExplicit.nb
@@ -0,0 +1,533 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15643, 523]
+NotebookOptionsPosition[ 11531, 404]
+NotebookOutlinePosition[ 14248, 475]
+CellTagsIndexPosition[ 14118, 469]
+WindowTitle->FeynAmpDenominatorExplicit
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmpDenominator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominator"], \
+"\<\"PropagatorDenominator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PropagatorDenominator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FeynAmpDenominatorExplicit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmpDenominatorExplicit"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FeynAmpDenominatorExplicit.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$130699],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmpDenominatorExplicit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FeynAmpDenominatorExplicit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "exp", "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]",
+ "changes each occurence of PropagatorDenominator[a,b] in exp into \
+1/(ScalarProduct[a,a]-b^2) and replaces FeynAmpDenominator by Identity."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->674842152],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FeynAmpDenominatorExplicit", "]"}]], "Input",
+ CellLabel->"In[45]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Denominator", "\[Rule]", "False"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "False"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
+ RowBox[{"Mandelstam", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"MomentumCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"SmallVariable", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{433, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[45]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1215611829],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1252861627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "-", "p"}], ",", "0"}], "}"}]}], "]"}]], "Input",
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellLabel->"In[1]:=",
+ CellID->1979434489],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{144, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellLabel->"In[2]:=",
+ CellID->1414487344],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["m", "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{236, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ SuperscriptBox["m", "2"]}], "+",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], "-",
+ RowBox[{"2", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}]}], "+",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}]]], "Output",
+ ImageSize->{422, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator",
+ ButtonNote->"FeynAmpDenominator"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["PropagatorDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PropagatorDenominator",
+ ButtonNote->"PropagatorDenominator"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"FeynAmpDenominatorExplicit",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 57, 27.960534}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FeynAmpDenominatorExplicit[exp] changes each occurence of \
+PropagatorDenominator[a,b] in exp into 1/(ScalarProduct[a,a]-b^2) and \
+replaces FeynAmpDenominator by Identity.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FeynAmpDenominatorExplicit",
+ "titlemodifier" -> "", "windowtitle" -> "FeynAmpDenominatorExplicit",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FeynAmpDenominatorExplicit"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6399, 194, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1215611829]},
+ "FeynAmpDenominatorExplicit"->{
+ Cell[7033, 223, 288, 10, 27, "Input",
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellID->1979434489],
+ Cell[7324, 235, 1300, 44, 64, "Output",
+ CellTags->"FeynAmpDenominatorExplicit"],
+ Cell[8661, 284, 164, 4, 27, "Input",
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellID->1414487344],
+ Cell[8828, 290, 1107, 42, 64, "Output",
+ CellTags->"FeynAmpDenominatorExplicit"]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13555, 451},
+ {"FeynAmpDenominatorExplicit", 13709, 455}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[598, 21, 3241, 79, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3842, 102, 303, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4170, 117, 508, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4703, 135, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->674842152],
+Cell[5444, 161, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5500, 165, 109, 2, 70, "Input"],
+Cell[5612, 169, 726, 18, 74, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6399, 194, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1215611829],
+Cell[CellGroupData[{
+Cell[6812, 213, 196, 6, 26, "ExampleSection",
+ CellID->1252861627],
+Cell[CellGroupData[{
+Cell[7033, 223, 288, 10, 27, "Input",
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellID->1979434489],
+Cell[7324, 235, 1300, 44, 64, "Output",
+ CellTags->"FeynAmpDenominatorExplicit"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8661, 284, 164, 4, 27, "Input",
+ CellTags->"FeynAmpDenominatorExplicit",
+ CellID->1414487344],
+Cell[8828, 290, 1107, 42, 64, "Output",
+ CellTags->"FeynAmpDenominatorExplicit"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9972, 337, 110, 3, 27, "Input"],
+Cell[10085, 342, 621, 21, 76, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[10733, 367, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10801, 372, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11074, 386, 415, 13, 56, "SeeAlso"]
+}, Open ]],
+Cell[11504, 402, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSimplify.nb
index 9b9bb72d5..26cdbb688 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSimplify.nb
@@ -3,71 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 26192, 947]
-NotebookOptionsPosition[ 18356, 717]
-NotebookOutlinePosition[ 23189, 845]
-CellTagsIndexPosition[ 23059, 839]
+NotebookDataLength[ 31096, 1085]
+NotebookOptionsPosition[ 24055, 884]
+NotebookOutlinePosition[ 28281, 992]
+CellTagsIndexPosition[ 28151, 986]
WindowTitle->FeynAmpDenominatorSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/FeynAmpDenominatorSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynAmpDenominatorSimplify"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TID\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TID"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/FeynAmpDenominatorSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmpDenominatorSimplify"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynAmpDenominatorSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$65456],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynAmpDenominatorSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$131625],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmpDenominatorSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -75,20 +97,31 @@ FeynAmpDenominatorSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynAmpDenominatorSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynAmpDenominatorSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"FeynAmpDenominatorSimplify", "[", "exp", "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "tries to simplify each PropagatorDenominator in a canonical way. \
-FeynAmpDenominatorSimplify[exp, q1] simplifies all FeynAmpDenominator's in \
-exp in a canonical way, including some translation of momenta. \
-FeynAmpDenominatorSimplify[exp, q1, q2] additionally removes integrals with \
-no mass scale.\n\nFDS can be used as an alias."
+ " \[LineSeparator]tries to simplify each PropagatorDenominator in a \
+canonical way. FeynAmpDenominatorSimplify[exp, q1] simplifies all \
+FeynAmpDenominator's in exp in a canonical way, including some translation of \
+momenta. FeynAmpDenominatorSimplify[exp, q1, q2] additionally removes \
+integrals with no mass scale."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -99,6 +132,41 @@ no mass scale.\n\nFDS can be used as an alias."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1104034988],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["FDS can be used as an alias.", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -114,7 +182,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->865391719],
+ CellID->1330700296],
Cell[CellGroupData[{
@@ -124,7 +192,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1544574464],
+ CellID->690731379],
Cell[CellGroupData[{
@@ -135,12 +203,11 @@ Cell[BoxData["FDS"], "Input",
Cell[BoxData[
FormBox["FeynAmpDenominatorSimplify", TraditionalForm]], "Output",
- ImageSize->{196, 15},
+ ImageSize->{179, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[1]=",
- CellID->1554505245]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[TextData[{
@@ -156,9 +223,7 @@ Cell[TextData[{
SuperscriptBox["k",
RowBox[{"2", "m"}]]}]}]}], "=", " ",
RowBox[{"0", " ", "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->652878159],
+}], "Notes"],
Cell[CellGroupData[{
@@ -175,12 +240,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[2]=",
- CellID->1407968210]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[TextData[{
@@ -200,9 +264,7 @@ Cell[TextData[{
SubscriptBox["p", "2"]}], ")"}], "2"]}], ")"}]}],
TraditionalForm]]],
" into a standard form."
-}], "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->2080676792],
+}], "Notes"],
Cell[CellGroupData[{
@@ -223,34 +285,58 @@ Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]], "+",
- SubscriptBox[
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{123, 47},
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]], "+",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{136, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[3]=",
- CellID->1152934488]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -269,25 +355,47 @@ Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
SuperscriptBox[
RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ")"}], "2"], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{104, 47},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{119, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[4]=",
- CellID->1656287714]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -309,46 +417,65 @@ Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"f", "(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-", "k"}], ")"}],
+ RowBox[{"q", "-", "k"}], ")"}],
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
SuperscriptBox[
RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ")"}], "2"], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{104, 47},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{119, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[5]=",
- CellID->1162523265]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{"FeynAmpDenominatorSimplify", "[",
+ RowBox[{"FeynAmpDenominatorSimplify", "[",
+ RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"FAD", "[",
- RowBox[{
- RowBox[{"k", "-",
- SubscriptBox["p", "1"]}], ",",
- RowBox[{"k", "-",
- SubscriptBox["p", "2"]}]}], "]"}], " ",
- RowBox[{"SPD", "[",
- RowBox[{"k", ",", "k"}], "]"}]}], ",", "k"}], "]"}]}]], "Input",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"k", "-",
+ SubscriptBox["p", "1"]}], ",",
+ RowBox[{"k", "-",
+ SubscriptBox["p", "2"]}]}], "]"}], " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"k", ",", "k"}], "]"}]}], ",", "k"}], "]"}]], "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellLabel->"In[6]:=",
CellID->1038515872],
@@ -391,109 +518,74 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm], "2"]}],
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]], "+",
- SubscriptBox[
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{140, 50},
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]], "+",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{149, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[6]=",
- CellID->835220006]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"r", "=",
- RowBox[{"SPC", "[",
- RowBox[{"t", ",", "k", ",",
- RowBox[{"FDS", "\[Rule]", "True"}]}], "]"}]}]], "Input",
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "k", "}"}]}], "]"}]], "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellLabel->"In[7]:=",
CellID->189899711],
Cell[BoxData[
FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "-",
- SuperscriptBox[
- FormBox[
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]],
- TraditionalForm], "2"]}],
- RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]], "+",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]], "-",
- FractionBox[
+ FractionBox[
+ RowBox[{
RowBox[{"2", " ",
RowBox[{"(",
RowBox[{
@@ -511,43 +603,78 @@ Cell[BoxData[
TraditionalForm],
FormBox["2",
TraditionalForm]],
- TraditionalForm]}], ")"}]}],
- RowBox[{
+ TraditionalForm]}], ")"}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm], "2"]}],
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]], "+",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]]}], TraditionalForm]], "Output",
- ImageSize->{256, 50},
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]], "+",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{136, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[7]=",
- CellID->1831290605]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"OneLoopSimplify", "[",
- RowBox[{"r", ",", "k"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"TID", "[",
+ RowBox[{"%", ",", "k"}], "]"}], "//", "Factor2"}]], "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellLabel->"In[8]:=",
CellID->934998310],
@@ -577,34 +704,58 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}],
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]], "+",
- SubscriptBox[
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{123, 44},
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]], "+",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{136, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[8]=",
- CellID->1920009759]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -654,32 +805,50 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]}], ")"}], "2"],
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "-",
- FormBox["p1",
- TraditionalForm], "+",
- FormBox["p2",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{121, 50},
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`p2, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`p2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{134, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"Out[9]=",
- CellID->1092598212]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t", ",", "r"}], "]"}]], "Input",
- CellTags->"FeynAmpDenominatorSimplify",
- CellLabel->"In[10]:=",
- CellID->1443488055]
+ CellLabel->"Out[9]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -702,23 +871,21 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["OneLoopSimplify",
+ StyleBox[ButtonBox["TID",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/OneLoopSimplify",
- ButtonNote->"OneLoopSimplify"],
+ ButtonData->"paclet:FeynCalc/ref/TID",
+ ButtonNote->"TID"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1104174358]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FeynAmpDenominatorSimplify",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -727,10 +894,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 39.446097}",
+ "built" -> "{2020, 1, 5, 18, 57, 30.673972}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -740,13 +907,13 @@ TaggingRules->{
PropagatorDenominator in a canonical way. FeynAmpDenominatorSimplify[exp, q1] \
simplifies all FeynAmpDenominator's in exp in a canonical way, including some \
translation of momenta. FeynAmpDenominatorSimplify[exp, q1, q2] additionally \
-removes integrals with no mass scale. FDS can be used as an alias.",
- "synonyms" -> {}, "title" -> "FeynAmpDenominatorSimplify",
- "titlemodifier" -> "", "windowtitle" -> "FeynAmpDenominatorSimplify",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FeynAmpDenominatorSimplify"},
- "SearchTextTranslated" -> ""},
+removes integrals with no mass scale.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FeynAmpDenominatorSimplify", "titlemodifier" -> "",
+ "windowtitle" -> "FeynAmpDenominatorSimplify", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FeynAmpDenominatorSimplify"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -754,8 +921,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -764,191 +932,161 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3740, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5596, 169, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->865391719]},
+ CellID->1330700296]},
"FeynAmpDenominatorSimplify"->{
- Cell[4373, 130, 113, 3, 27, "Input",
+ Cell[6229, 198, 113, 3, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->792645925],
- Cell[4489, 135, 254, 7, 36, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1554505245],
- Cell[4758, 145, 452, 15, 36, "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->652878159],
- Cell[5235, 164, 297, 9, 27, "Input",
+ Cell[6345, 203, 233, 6, 37, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[7010, 229, 297, 9, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->50583569],
- Cell[5535, 175, 228, 7, 36, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1407968210],
- Cell[5778, 185, 489, 19, 35, "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->2080676792],
- Cell[6292, 208, 347, 11, 27, "Input",
+ Cell[7310, 240, 207, 6, 35, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[7985, 270, 347, 11, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->1115628449],
- Cell[6642, 221, 791, 31, 68, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1152934488],
- Cell[7470, 257, 279, 8, 27, "Input",
+ Cell[8335, 283, 1654, 55, 62, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[10026, 343, 279, 8, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->1440416368],
- Cell[7752, 267, 575, 22, 68, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1656287714],
- Cell[8364, 294, 357, 11, 27, "Input",
+ Cell[10308, 353, 1253, 44, 64, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[11598, 402, 357, 11, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->204796635],
- Cell[8724, 307, 667, 26, 68, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1162523265],
- Cell[9428, 338, 468, 15, 27, "Input",
+ Cell[11958, 415, 1307, 46, 63, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[13302, 466, 435, 14, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->1038515872],
- Cell[9899, 355, 1581, 65, 71, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->835220006],
- Cell[11517, 425, 233, 7, 27, "Input",
+ Cell[13740, 482, 2445, 89, 65, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[16222, 576, 191, 6, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->189899711],
- Cell[11753, 434, 2694, 108, 71, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1831290605],
- Cell[14484, 547, 175, 5, 27, "Input",
+ Cell[16416, 584, 2331, 84, 65, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[18784, 673, 194, 6, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->934998310],
- Cell[14662, 554, 1236, 52, 65, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1920009759],
- Cell[15935, 611, 391, 14, 27, "Input",
+ Cell[18981, 681, 2099, 76, 57, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"],
+ Cell[21117, 762, 391, 14, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->188914674],
- Cell[16329, 627, 1180, 46, 71, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1092598212],
- Cell[17524, 676, 167, 5, 27, "Input",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1443488055],
- Cell[18047, 703, 267, 9, 32, "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1104174358]}
+ Cell[21511, 778, 1962, 71, 64, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 20527, 765},
- {"FeynAmpDenominatorSimplify", 20680, 769}
+ {"PrimaryExamplesSection", 26240, 933},
+ {"FeynAmpDenominatorSimplify", 26394, 937}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[598, 21, 2339, 54, 51, "AnchorBarGrid",
+Cell[598, 21, 3089, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2940, 77, 69, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3012, 80, 703, 17, 163, "Usage",
+Cell[3690, 99, 303, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4018, 114, 662, 16, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3740, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4705, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1104034988],
+Cell[5447, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5481, 162, 66, 1, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5596, 169, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->865391719],
+ CellID->1330700296],
Cell[CellGroupData[{
-Cell[4152, 120, 196, 6, 25, "ExampleSection",
- CellID->1544574464],
+Cell[6009, 188, 195, 6, 26, "ExampleSection",
+ CellID->690731379],
Cell[CellGroupData[{
-Cell[4373, 130, 113, 3, 27, "Input",
+Cell[6229, 198, 113, 3, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->792645925],
-Cell[4489, 135, 254, 7, 36, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1554505245]
+Cell[6345, 203, 233, 6, 37, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
-Cell[4758, 145, 452, 15, 36, "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->652878159],
+Cell[6593, 212, 392, 13, 40, "Notes"],
Cell[CellGroupData[{
-Cell[5235, 164, 297, 9, 27, "Input",
+Cell[7010, 229, 297, 9, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->50583569],
-Cell[5535, 175, 228, 7, 36, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1407968210]
+Cell[7310, 240, 207, 6, 35, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
-Cell[5778, 185, 489, 19, 35, "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->2080676792],
+Cell[7532, 249, 428, 17, 40, "Notes"],
Cell[CellGroupData[{
-Cell[6292, 208, 347, 11, 27, "Input",
+Cell[7985, 270, 347, 11, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->1115628449],
-Cell[6642, 221, 791, 31, 68, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1152934488]
+Cell[8335, 283, 1654, 55, 62, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7470, 257, 279, 8, 27, "Input",
+Cell[10026, 343, 279, 8, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->1440416368],
-Cell[7752, 267, 575, 22, 68, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1656287714]
+Cell[10308, 353, 1253, 44, 64, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8364, 294, 357, 11, 27, "Input",
+Cell[11598, 402, 357, 11, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->204796635],
-Cell[8724, 307, 667, 26, 68, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1162523265]
+Cell[11958, 415, 1307, 46, 63, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9428, 338, 468, 15, 27, "Input",
+Cell[13302, 466, 435, 14, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->1038515872],
-Cell[9899, 355, 1581, 65, 71, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->835220006]
+Cell[13740, 482, 2445, 89, 65, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11517, 425, 233, 7, 27, "Input",
+Cell[16222, 576, 191, 6, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->189899711],
-Cell[11753, 434, 2694, 108, 71, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1831290605]
+Cell[16416, 584, 2331, 84, 65, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14484, 547, 175, 5, 27, "Input",
+Cell[18784, 673, 194, 6, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->934998310],
-Cell[14662, 554, 1236, 52, 65, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1920009759]
+Cell[18981, 681, 2099, 76, 57, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15935, 611, 391, 14, 27, "Input",
+Cell[21117, 762, 391, 14, 27, "Input",
CellTags->"FeynAmpDenominatorSimplify",
CellID->188914674],
-Cell[16329, 627, 1180, 46, 71, "Output",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1092598212]
+Cell[21511, 778, 1962, 71, 64, "Output",
+ CellTags->"FeynAmpDenominatorSimplify"]
+}, Open ]]
}, Open ]],
-Cell[17524, 676, 167, 5, 27, "Input",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1443488055]
-}, Open ]],
-Cell[17706, 684, 31, 0, 29, "SectionFooterSpacer"]
+Cell[23500, 853, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17774, 689, 270, 12, 31, "SeeAlsoSection",
+Cell[23568, 858, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[18047, 703, 267, 9, 32, "Text",
- CellTags->"FeynAmpDenominatorSimplify",
- CellID->1104174358]
+Cell[23841, 872, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[18329, 715, 23, 0, 42, "FooterCell"]
+Cell[24028, 882, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSplit.nb
index 963cf3021..d254c5432 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSplit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpDenominatorSplit.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16057, 547]
-NotebookOptionsPosition[ 10187, 373]
-NotebookOutlinePosition[ 14017, 475]
-CellTagsIndexPosition[ 13890, 469]
+NotebookDataLength[ 21796, 742]
+NotebookOptionsPosition[ 16935, 599]
+NotebookOutlinePosition[ 19870, 675]
+CellTagsIndexPosition[ 19743, 669]
WindowTitle->FeynAmpDenominatorSplit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmpDenominatorSplit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynAmpDenominatorSplit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmpDenominatorCombine\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorCombine"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmpDenominatorSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmpDenominatorSplit"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynAmpDenominatorSplit.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$65798],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynAmpDenominatorSplit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$132067],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmpDenominatorSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ FeynAmpDenominatorSplit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynAmpDenominatorSplit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynAmpDenominatorSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,6 +132,60 @@ q1."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->945049631],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FeynAmpDenominatorSplit", "]"}]], "Input",
+ CellLabel->"In[73]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}], ",",
+ RowBox[{"MomentumExpand", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{369, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[73]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -111,7 +201,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2104894422],
+ CellID->39104213],
Cell[CellGroupData[{
@@ -121,18 +211,16 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2027680172],
+ CellID->567497691],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{
- RowBox[{"FAD", "[",
- RowBox[{"q1", ",",
- RowBox[{"q1", "-", "p"}], ",",
- RowBox[{"q1", "-", "q2"}], ",", "q2", ",",
- RowBox[{"q2", "-", "p"}]}], "]"}], "//", "FCI"}]}]], "Input",
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"q1", "-", "p"}], ",",
+ RowBox[{"q1", "-", "q2"}], ",", "q2", ",",
+ RowBox[{"q2", "-", "p"}]}], "]"}]], "Input",
CellTags->"FeynAmpDenominatorSplit",
CellLabel->"In[1]:=",
CellID->403484877],
@@ -141,104 +229,231 @@ Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{256, 47},
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{286, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"Out[1]=",
- CellID->305665918]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "//", "Head"}]], "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"In[2]:=",
- CellID->388100450],
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
- FormBox["FeynAmpDenominator", TraditionalForm]], "Output",
- ImageSize->{146, 15},
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q1"}], ",",
+ RowBox[{"q1", "-", "q2"}], ",", "q2", ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q2"}]}], "]"}]], "Output",
+ ImageSize->{280, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"Out[2]=",
- CellID->818053302]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FeynAmpDenominatorSplit", "[", "t", "]"}]], "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"In[3]:=",
- CellID->922049966],
+ RowBox[{"FeynAmpDenominatorSplit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{252, 47},
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{278, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"Out[3]=",
- CellID->810343253]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -246,9 +461,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"In[4]:=",
- CellID->1536194379],
+ CellLabel->"In[4]:="],
Cell[BoxData[
RowBox[{
@@ -262,43 +475,68 @@ Cell[BoxData[
RowBox[{"FAD", "[",
RowBox[{
RowBox[{"-", "p"}], "+", "q2"}], "]"}]}]], "Output",
- ImageSize->{404, 15},
+ ImageSize->{412, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1693985591]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"FeynAmpDenominatorSplit", "[",
- RowBox[{"t", ",", "q1"}], "]"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"In[5]:=",
- CellID->1257504819],
-
Cell[BoxData[
RowBox[{"FeynAmpDenominatorSplit", "[",
RowBox[{
RowBox[{"FAD", "[",
RowBox[{"q1", ",",
- RowBox[{
- RowBox[{"-", "p"}], "+", "q1"}], ",",
+ RowBox[{"q1", "-", "p"}], ",",
RowBox[{"q1", "-", "q2"}], ",", "q2", ",",
- RowBox[{
- RowBox[{"-", "p"}], "+", "q2"}]}], "]"}], ",", "q1"}], "]"}]], "Output",\
+ RowBox[{"q2", "-", "p"}]}], "]"}], ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "q1", "}"}]}]}], "]"}]], "Input",
+ CellTags->"FeynAmpDenominatorSplit",
+ CellLabel->"In[5]:=",
+ CellID->1257504819],
- ImageSize->{508, 15},
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{"q2", ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q2"}]}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q1"}], ",",
+ RowBox[{"q1", "-", "q2"}]}], "]"}]}]], "Output",
+ ImageSize->{313, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"Out[5]//StandardForm=",
- CellID->863883694]
+ CellLabel->"Out[5]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{"q2", ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q2"}]}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q1"}], ",",
+ RowBox[{"q1", "-", "q2"}]}], "]"}]}]], "Output",
+ ImageSize->{313, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -309,33 +547,23 @@ Cell[BoxData[
RowBox[{"FeynAmpDenominatorCombine", "[", "%", "]"}], "//", "FCE"}], "//",
"StandardForm"}]], "Input",
CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"In[6]:=",
+ CellLabel->"In[7]:=",
CellID->1174376888],
Cell[BoxData[
- RowBox[{"FeynAmpDenominatorSplit", "[",
- RowBox[{
- RowBox[{"FAD", "[",
- RowBox[{"q2", ",", "q1", ",",
- RowBox[{
- RowBox[{"-", "p"}], "+", "q2"}], ",",
- RowBox[{"q1", "-", "q2"}], ",",
- RowBox[{
- RowBox[{"-", "p"}], "+", "q1"}]}], "]"}], ",", "q1"}], "]"}]], "Output",\
-
- ImageSize->{508, 15},
+ RowBox[{"FAD", "[",
+ RowBox[{"q1", ",", "q2", ",",
+ RowBox[{"q1", "-", "q2"}], ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q1"}], ",",
+ RowBox[{
+ RowBox[{"-", "p"}], "+", "q2"}]}], "]"}]], "Output",
+ ImageSize->{280, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1033440679]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[", "t", "]"}]], "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellLabel->"In[7]:=",
- CellID->616885004]
+ CellLabel->"Out[7]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -364,9 +592,7 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominatorCombine"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1583918878]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -383,10 +609,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 40.992096}",
+ "built" -> "{2020, 1, 5, 18, 57, 31.865841}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -396,11 +622,12 @@ TaggingRules->{
expr into FeynAmpDenominator[a]*FeynAmpDenominator[b] ... . \
FeynAmpDenominatorSplit[expr, q1] splits all FeynAmpDenominator in expr into \
a product of two, one containing q1 and other momenta, the second without \
-q1.", "synonyms" -> {}, "title" -> "FeynAmpDenominatorSplit", "titlemodifier" ->
- "", "windowtitle" -> "FeynAmpDenominatorSplit", "type" -> "Symbol", "uri" ->
+q1.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FeynAmpDenominatorSplit", "titlemodifier" -> "", "windowtitle" ->
+ "FeynAmpDenominatorSplit", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynAmpDenominatorSplit"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -409,7 +636,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -418,137 +645,105 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3623, 98, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6133, 188, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2104894422]},
+ CellID->39104213]},
"FeynAmpDenominatorSplit"->{
- Cell[4257, 127, 326, 10, 27, "Input",
+ Cell[6764, 217, 268, 8, 27, "Input",
CellTags->"FeynAmpDenominatorSplit",
CellID->403484877],
- Cell[4586, 139, 923, 36, 68, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->305665918],
- Cell[5546, 180, 134, 4, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->388100450],
- Cell[5683, 186, 242, 7, 36, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->818053302],
- Cell[5962, 198, 157, 4, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->922049966],
- Cell[6122, 204, 923, 36, 68, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->810343253],
- Cell[7082, 245, 169, 5, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1536194379],
- Cell[7254, 252, 532, 17, 49, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1693985591],
- Cell[7823, 274, 249, 8, 27, "Input",
+ Cell[7035, 227, 2615, 93, 61, "Output",
+ CellTags->"FeynAmpDenominatorSplit"],
+ Cell[14194, 485, 414, 12, 45, "Input",
CellTags->"FeynAmpDenominatorSplit",
CellID->1257504819],
- Cell[8075, 284, 500, 16, 49, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->863883694],
- Cell[8612, 305, 225, 7, 27, "Input",
+ Cell[14611, 499, 454, 15, 51, "Output",
+ CellTags->"FeynAmpDenominatorSplit"],
+ Cell[15668, 543, 225, 7, 27, "Input",
CellTags->"FeynAmpDenominatorSplit",
CellID->1174376888],
- Cell[8840, 314, 501, 16, 49, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1033440679],
- Cell[9356, 333, 139, 4, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->616885004],
- Cell[9851, 359, 294, 9, 32, "Text",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1583918878]}
+ Cell[15896, 552, 391, 12, 51, "Output",
+ CellTags->"FeynAmpDenominatorSplit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12271, 419},
- {"FeynAmpDenominatorSplit", 12421, 423}
+ {"PrimaryExamplesSection", 19010, 646},
+ {"FeynAmpDenominatorSplit", 19159, 650}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[595, 21, 2305, 52, 51, "AnchorBarGrid",
+Cell[595, 21, 3119, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2903, 75, 66, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2972, 78, 626, 16, 114, "Usage",
+Cell[3717, 99, 300, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4042, 114, 626, 16, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3623, 98, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4693, 134, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->945049631],
+Cell[5434, 160, 31, 0, 14, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5490, 164, 106, 2, 27, "Input"],
+Cell[5599, 168, 473, 13, 56, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6133, 188, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2104894422],
+ CellID->39104213],
Cell[CellGroupData[{
-Cell[4036, 117, 196, 6, 25, "ExampleSection",
- CellID->2027680172],
+Cell[6544, 207, 195, 6, 26, "ExampleSection",
+ CellID->567497691],
Cell[CellGroupData[{
-Cell[4257, 127, 326, 10, 27, "Input",
+Cell[6764, 217, 268, 8, 27, "Input",
CellTags->"FeynAmpDenominatorSplit",
CellID->403484877],
-Cell[4586, 139, 923, 36, 68, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->305665918]
+Cell[7035, 227, 2615, 93, 61, "Output",
+ CellTags->"FeynAmpDenominatorSplit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5546, 180, 134, 4, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->388100450],
-Cell[5683, 186, 242, 7, 36, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->818053302]
+Cell[9687, 325, 84, 2, 27, "Input"],
+Cell[9774, 329, 353, 11, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5962, 198, 157, 4, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->922049966],
-Cell[6122, 204, 923, 36, 68, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->810343253]
+Cell[10164, 345, 99, 2, 27, "Input"],
+Cell[10266, 349, 3268, 106, 61, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7082, 245, 169, 5, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1536194379],
-Cell[7254, 252, 532, 17, 49, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1693985591]
+Cell[13571, 460, 110, 3, 27, "Input"],
+Cell[13684, 465, 473, 15, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7823, 274, 249, 8, 27, "Input",
+Cell[14194, 485, 414, 12, 45, "Input",
CellTags->"FeynAmpDenominatorSplit",
CellID->1257504819],
-Cell[8075, 284, 500, 16, 49, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->863883694]
+Cell[14611, 499, 454, 15, 51, "Output",
+ CellTags->"FeynAmpDenominatorSplit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8612, 305, 225, 7, 27, "Input",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1174376888],
-Cell[8840, 314, 501, 16, 49, "Output",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1033440679]
+Cell[15102, 519, 110, 3, 27, "Input"],
+Cell[15215, 524, 416, 14, 51, "Output"]
}, Open ]],
-Cell[9356, 333, 139, 4, 27, "Input",
+Cell[CellGroupData[{
+Cell[15668, 543, 225, 7, 27, "Input",
CellTags->"FeynAmpDenominatorSplit",
- CellID->616885004]
+ CellID->1174376888],
+Cell[15896, 552, 391, 12, 51, "Output",
+ CellTags->"FeynAmpDenominatorSplit"]
+}, Open ]]
}, Open ]],
-Cell[9510, 340, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16314, 568, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9578, 345, 270, 12, 31, "SeeAlsoSection",
+Cell[16382, 573, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9851, 359, 294, 9, 32, "Text",
- CellTags->"FeynAmpDenominatorSplit",
- CellID->1583918878]
+Cell[16655, 587, 238, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[10160, 371, 23, 0, 42, "FooterCell"]
+Cell[16908, 597, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpList.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpList.nb
index b86a1f0fa..f04f504e5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpList.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynAmpList.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6420, 195]
-NotebookOptionsPosition[ 4104, 128]
-NotebookOutlinePosition[ 6155, 184]
-CellTagsIndexPosition[ 6082, 179]
+NotebookDataLength[ 8167, 256]
+NotebookOptionsPosition[ 5887, 192]
+NotebookOutlinePosition[ 7714, 240]
+CellTagsIndexPosition[ 7671, 237]
WindowTitle->FeynAmpList
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmpList\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynAmpList"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmp\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmp"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynAmpList\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynAmpList"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynAmpList.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$66137],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynAmpList", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$132509],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynAmpList", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FeynAmpList.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynAmpList", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynAmpList", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -85,9 +117,7 @@ Cell[BoxData[GridBox[{
RowBox[{"FeynAmp", "[", "...", "]"}], ",", " ",
RowBox[{"FeynAmp", "[", "...", "]"}], ",", " ", "..."}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "is a head of a list of Feynman amplitudes.\nFeynAmpList has no \
-functional properties and serves just as a head."
+ " \[LineSeparator]is a head of a list of Feynman amplitudes."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -98,6 +128,42 @@ functional properties and serves just as a head."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+FeynAmpList has no functional properties and serves just as a head.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -119,9 +185,7 @@ Cell[TextData[{
ButtonNote->"FeynAmp"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynAmpList",
- CellID->1636179239]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,22 +202,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 42.510512}",
+ "built" -> "{2020, 1, 5, 18, 57, 33.138252}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FeynAmpList[info][FeynAmp[ ...], FeynAmp[ ...], ...] is a head of a list \
-of Feynman amplitudes. FeynAmpList has no functional properties and serves \
-just as a head.", "synonyms" -> {}, "title" -> "FeynAmpList", "titlemodifier" ->
- "", "windowtitle" -> "FeynAmpList", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FeynAmpList"}},
+of Feynman amplitudes.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FeynAmpList", "titlemodifier" -> "", "windowtitle" -> "FeynAmpList",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FeynAmpList"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,41 +225,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FeynAmpList"->{
- Cell[3834, 114, 228, 9, 70, "Text",
- CellTags->"FeynAmpList",
- CellID->1636179239]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FeynAmpList", 5968, 172}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3013, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 636, 18, 70, "Usage",
+Cell[3599, 97, 288, 11, 70, "ObjectNameGrid"],
+Cell[3890, 110, 556, 16, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3561, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[4471, 130, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5204, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5238, 158, 113, 3, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5388, 166, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3834, 114, 228, 9, 70, "Text",
- CellTags->"FeynAmpList",
- CellID->1636179239]
+Cell[5661, 180, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4077, 126, 23, 0, 70, "FooterCell"]
+Cell[5860, 190, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc.nb
index ba96a9cd5..83c3d8722 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8094, 245]
-NotebookOptionsPosition[ 4884, 151]
-NotebookOutlinePosition[ 7453, 221]
-CellTagsIndexPosition[ 7284, 214]
+NotebookDataLength[ 7864, 240]
+NotebookOptionsPosition[ 4927, 155]
+NotebookOutlinePosition[ 7347, 221]
+CellTagsIndexPosition[ 7178, 214]
WindowTitle->FeynCalc
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$68207],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$135222],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FeynCalc", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynCalc", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynCalc", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,10 +129,6 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1],
-Cell["Examples", "Subsubsection",
- CellTags->"FeynCalc",
- CellID->1788950203],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -131,18 +138,15 @@ Cell[BoxData[
CellID->1258876634],
Cell[BoxData[
- StyleBox["\<\"For installation notes visit www.feyncalc.org\\n\\nFor a list \
-of availabe objects type $FeynCalcStuff, which contains a list of all \
-functions and options in StringForm. You can get on-line information by \
-?function, e.g. ?Contract.\\n\\nThere are several useful functions for short \
-input, type $FCS for a list of short commands. Then type, e.g., \
-?GA.\\n\\n\\nTo enable/disable start-up messages, put the \
+ StyleBox["\<\"For installation notes visit www.feyncalc.github.io. You can \
+get on-line information by ?function, e.g. ?Contract.\\n\\nThere are several \
+useful functions for short input, type $FCS for a list of short commands. \
+Then type, e.g., ?GA.\\n\\n\\nTo enable/disable start-up messages, put the \
line\\n\\n$FeynCalcStartupMessages = \
True;\\n\\nor\\n\\n$FeynCalcStartupMessages = False;\\n\\ninto your \
\\\"init.m\\\" file or into your \\\"FCConfig.m\\\" file.\"\>",
"MSG"]], "Print", "PrintUsage",
- CellTags->{"FeynCalc", "Info-1d55ee43-67b8-4d8b-8c35-3f3a2bc368ed"},
- CellID->144621555]
+ CellTags->{"FeynCalc", "Info-d5d5947c-0e52-48a8-b6a9-37ad11b1e404"}]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -161,20 +165,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 51.643140}",
+ "built" -> "{2020, 1, 5, 18, 57, 40.058823}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FeynCalc is simply a symbol with a usage definition.", "synonyms" -> {},
- "title" -> "FeynCalc", "titlemodifier" -> "", "windowtitle" -> "FeynCalc",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FeynCalc"}},
+ "tabletags" -> {}, "title" -> "FeynCalc", "titlemodifier" -> "",
+ "windowtitle" -> "FeynCalc", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FeynCalc"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -183,7 +188,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -192,61 +197,51 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3260, 93, 379, 15, 70, "PrimaryExamplesSection",
+ Cell[3523, 104, 379, 15, 70, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
CellID->1]},
"FeynCalc"->{
- Cell[3854, 120, 77, 2, 70, "Subsubsection",
- CellTags->"FeynCalc",
- CellID->1788950203],
- Cell[3956, 126, 118, 4, 70, "Input",
+ Cell[4139, 133, 118, 4, 70, "Input",
CellTags->"FeynCalc",
CellID->1258876634],
- Cell[4077, 132, 741, 12, 70, "Print",
- CellTags->{"FeynCalc", "Info-1d55ee43-67b8-4d8b-8c35-3f3a2bc368ed"},
- CellID->144621555]},
- "Info-1d55ee43-67b8-4d8b-8c35-3f3a2bc368ed"->{
- Cell[4077, 132, 741, 12, 70, "Print",
- CellTags->{"FeynCalc", "Info-1d55ee43-67b8-4d8b-8c35-3f3a2bc368ed"},
- CellID->144621555]}
+ Cell[4260, 139, 601, 9, 70, "Print",
+ CellTags->{"FeynCalc", "Info-d5d5947c-0e52-48a8-b6a9-37ad11b1e404"}]},
+ "Info-d5d5947c-0e52-48a8-b6a9-37ad11b1e404"->{
+ Cell[4260, 139, 601, 9, 70, "Print",
+ CellTags->{"FeynCalc", "Info-d5d5947c-0e52-48a8-b6a9-37ad11b1e404"}]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 6632, 193},
- {"FeynCalc", 6758, 197},
- {"Info-1d55ee43-67b8-4d8b-8c35-3f3a2bc368ed", 7125, 207}
+ {"PrimaryExamplesSection", 6666, 198},
+ {"FeynCalc", 6793, 202},
+ {"Info-d5d5947c-0e52-48a8-b6a9-37ad11b1e404", 7042, 208}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 70, "AnchorBarGrid",
+Cell[580, 21, 2273, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 354, 11, 70, "Usage",
+Cell[2856, 76, 285, 11, 70, "ObjectNameGrid"],
+Cell[3144, 89, 354, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3260, 93, 379, 15, 70, "PrimaryExamplesSection",
+Cell[3523, 104, 379, 15, 70, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
CellID->1],
Cell[CellGroupData[{
-Cell[3664, 112, 187, 6, 70, "ExampleSection",
+Cell[3927, 123, 187, 6, 70, "ExampleSection",
CellID->1],
-Cell[3854, 120, 77, 2, 70, "Subsubsection",
- CellTags->"FeynCalc",
- CellID->1788950203],
Cell[CellGroupData[{
-Cell[3956, 126, 118, 4, 70, "Input",
+Cell[4139, 133, 118, 4, 70, "Input",
CellTags->"FeynCalc",
CellID->1258876634],
-Cell[4077, 132, 741, 12, 70, "Print",
- CellTags->{"FeynCalc", "Info-1d55ee43-67b8-4d8b-8c35-3f3a2bc368ed"},
- CellID->144621555]
+Cell[4260, 139, 601, 9, 70, "Print",
+ CellTags->{"FeynCalc", "Info-d5d5947c-0e52-48a8-b6a9-37ad11b1e404"}]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[4857, 149, 23, 0, 70, "FooterCell"]
+Cell[4900, 153, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc2FORM.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc2FORM.nb
index fa7295b78..30fa2f2c1 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc2FORM.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalc2FORM.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 34229, 1059]
-NotebookOptionsPosition[ 25650, 779]
-NotebookOutlinePosition[ 30780, 930]
-CellTagsIndexPosition[ 30628, 923]
+NotebookDataLength[ 33037, 1078]
+NotebookOptionsPosition[ 24510, 807]
+NotebookOutlinePosition[ 29351, 945]
+CellTagsIndexPosition[ 29199, 938]
WindowTitle->FeynCalc2FORM
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalc2FORM\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynCalc2FORM"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FORM2FeynCalc\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FORM2FeynCalc"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalc2FORM\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynCalc2FORM"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynCalc2FORM.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$66828],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynCalc2FORM", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$133444],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynCalc2FORM", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,60 +95,95 @@ FeynCalc2FORM.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynCalc2FORM", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynCalc2FORM", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"FeynCalc2FORM", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "displays expr in FORM syntax. FeynCalc2FORM[file, x] writes x in FORM \
-syntax to a file. FeynCalc2FORM[file, x==y] writes x=y to a file in FORM \
-syntax."
+ RowBox[{"FeynCalc2FORM", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]displays ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " in FORM syntax."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FeynCalc2FORM", "[",
+ RowBox[{"file", ",", "x"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]writes ",
+ Cell[BoxData["x"], "InlineFormula"],
+ " in FORM syntax to a file."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FeynCalc2FORM", "[",
+ RowBox[{"file", ",",
+ RowBox[{"x", "\[Equal]", "y"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]writes ",
+ Cell[BoxData[
+ RowBox[{"x", "=", "y"}]], "InlineFormula"],
+ " to a file in FORM syntax."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {},
+ "Rows" -> {None, None, {None}}, "RowsIndexed" -> {}}},
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1331395716],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1504263802],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1715256460],
+Cell["\<\
+The capabilities of this function are very limited, so that you should not \
+expect it to easily handle large and compicated expressions.\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FeynCalc2FORM", "]"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[1]:=",
+ CellLabel->"In[135]:=",
CellID->1031702605],
Cell[BoxData[
@@ -134,7 +191,16 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"EpsDiscard", "\[Rule]", "False"}], ",",
- RowBox[{"FORMEpilog", "\[Rule]", "\<\"\"\>"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"FORMAbbreviations", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"\<\"syFC\"\>", ",", "\<\"vFC\"\>"}], "}"}]}], ",",
+ RowBox[{"FORMEpilog", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"\<\"print;\"\>", ",", "\<\".end\"\>"}], "}"}]}], ",",
+ RowBox[{"FORMIdStatements", "\[Rule]", "True"}], ",",
RowBox[{"FORMProlog", "\[Rule]", "\<\"write statistics;\"\>"}], ",",
RowBox[{"Replace", "\[Rule]",
RowBox[{"{",
@@ -150,16 +216,46 @@ Cell[BoxData[
",",
RowBox[{"TraceDimension", "\[Rule]", "4"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{524, 54},
+ ImageSize->{492, 92},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[1]=",
- CellID->490814627]
+ CellLabel->"Out[135]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1372230660],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->504486489],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{"MT", "[",
@@ -169,7 +265,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"y", "^", "2"}], "/", "d"}]}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1451127405],
Cell[BoxData[
@@ -178,46 +274,35 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["y", "2"], " ",
FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm]}], "d"], TraditionalForm]], "Output",
- ImageSize->{83, 45},
+ ImageSize->{90, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[2]=",
- CellID->1238649149]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -226,13 +311,12 @@ Cell[BoxData[
RowBox[{
RowBox[{"FeynCalc2FORM", "[", "%", "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->208321779],
Cell["(y^2*d_(mu,nu)*p(ro))/d", "Print",
CellTags->"FeynCalc2FORM",
- CellLabel->"During evaluation of In[3]:=",
- CellID->460002283]
+ CellLabel->"During evaluation of In[121]:="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,12 +327,13 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]", ",", "\[Rho]"}],
"]"}]}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->14977898],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Alpha]",
@@ -266,12 +351,11 @@ Cell[BoxData[
FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{56, 19},
+ ImageSize->{53, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[4]=",
- CellID->1443194788]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -280,24 +364,29 @@ Cell[BoxData[
RowBox[{
RowBox[{"FeynCalc2FORM", "[", "%", "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1598383483],
-Cell["(-i_)*e_(al,be,de,ro,Dimension->4)", "Print",
+Cell["(-i_)*e_(al,be,de,ro)", "Print",
CellTags->"FeynCalc2FORM",
- CellLabel->"During evaluation of In[5]:=",
- CellID->924497195]
+ CellLabel->"During evaluation of In[123]:="]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"DiracTrace", "[",
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
"]"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[6]:=",
+ CellLabel->"In[1]:=",
CellID->1937829856],
Cell[BoxData[
@@ -338,12 +427,11 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{118, 21},
+ ImageSize->{123, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[6]=",
- CellID->388485027]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -352,13 +440,12 @@ Cell[BoxData[
RowBox[{
RowBox[{"FeynCalc2FORM", "[", "%", "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[7]:=",
+ CellLabel->"In[2]:=",
CellID->1415350890],
Cell["g_(0,mu)*g_(0,nu)*g_(0,ro)*g_(0,si)", "Print",
CellTags->"FeynCalc2FORM",
- CellLabel->"During evaluation of In[7]:=",
- CellID->914453267]
+ CellLabel->"During evaluation of In[117]:="]
}, Open ]],
Cell[CellGroupData[{
@@ -372,7 +459,7 @@ Cell[BoxData[
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Rho]"}], "]"}], "]"}]}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[8]:=",
+ CellLabel->"In[3]:=",
CellID->2088847593],
Cell[BoxData[
@@ -418,12 +505,11 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{140, 20},
+ ImageSize->{144, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[8]=",
- CellID->1720680077]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -432,15 +518,21 @@ Cell[BoxData[
RowBox[{
RowBox[{"FeynCalc2FORM", "[", "%", "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[9]:=",
+ CellLabel->"In[4]:=",
CellID->1981124799],
Cell["g_(0,mu)*g_(0,nu)*g_(1,mu)*g_(1,ro)", "Print",
CellTags->"FeynCalc2FORM",
- CellLabel->"During evaluation of In[9]:=",
- CellID->1021911992]
+ CellLabel->"During evaluation of In[119]:="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[BoxData[
RowBox[{
RowBox[{"FeynCalc2FORM", "[",
@@ -451,7 +543,7 @@ Cell[BoxData[
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}]}], "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[10]:=",
+ CellLabel->"In[1]:=",
CellID->118791271],
Cell[CellGroupData[{
@@ -466,193 +558,134 @@ Cell[BoxData[
",", "\"\<\>\""}], "]"}], "<>", "\"\\""}], ",", "String"}],
"]"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[11]:=",
+ CellLabel->"In[2]:=",
CellID->2027596058],
Cell[BoxData[
FormBox[
RowBox[{"{", "\<\"d_(mu,nu)*p(mu)\"\>", "}"}], TraditionalForm]], "Output",
- ImageSize->{139, 15},
+ ImageSize->{133, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[11]=",
- CellID->801247046]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"t", "=",
- RowBox[{"TR", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
- ".",
- RowBox[{"GS", "[",
- RowBox[{"p", ",", "q"}], "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ".",
+ RowBox[{"GS", "[",
+ RowBox[{"p", ",", "q"}], "]"}]}], "]"}], "]"}]}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[12]:=",
+ CellLabel->"In[1]:=",
CellID->730601730],
Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
-1:eJztnQlUVGXfwMv3K7Ps60sDRCMV2VHWgYEh8QUFVBYjAYVjhMGn5ZLmkiIu
-ib6AueJnWkfPcU9zIRNTUVPEFCg0HNMMAhEhZBmYYZ3t3vvBjBLL3P2ZO3fg
-+Z3zvmc6Mvf539///9x57nOXZ/RHi96fM+CFF15Y+kr7/70/e4XfkiWzE6f/
-V/t/+Ccu+9+P/tX+YVL7/3zb/6bjMwaBQCAQCMTIQdrqivPz6pSGjoNnQC06
-gVp0ArXoBGrRCb+0oLXnJrosKGxp/9j2YL1o8v4nKtqbqL8cIvj0bsuzT4s7
-PjEGkf26LVo41mHMKPfZhx4revyrouL8hmg/L6GHi/UbQ1zj0zKeyFm0RQK7
-/QIgtgs80kIWDDmACobUsBFpAVktZHqNqBNpYVtv2kB4Uy1Acg3EiSYavlSL
-8umVU9dqaKhoKVzoGpQlQZGazBneSwua6DfZen+lIOCHGqQjEUmegWdrUN1/
-9wIOYrH4+Z+gDdfinSfvediKyot3eton3G7uFqp4jbd3UrZEjWENVwOcevwr
-cKjuFw5UxRqbFuJgqACqYIgNG5cWgNVCrNe4OhFGXazxVAv7Qy4oJxhvqgWp
-PTfDffZ1affyIAxeXXl4gveWv2QPUyaEHa3E+ckj2nfk6Sl/QeL9to7BRGag
-Z9KDNpzgSnBQKJ4PGVBJVpj7vAKNnab8mHFhP8u6fF+aM9Ml+lpDx76pq45P
-EKzGbYkaJDmltl8sxRqfFuJgyLUALBhCw0amBVy1EOs1sk5EVSwFM/ypFtaH
-XGBOuK4WXNoerHMd97m4lUr8ncE35cd6xF44Oct3VSHumTzRvjffnuMy5ZKk
-fe+a78xzC75cT3tU1UlL4QJnv3O1HRtQlGzzEu0s7TKnKn+Y7OGzr7wj0WhD
-9kzniKsNzFvqgCSn1PaLpVhK8EoLYTAEG9FHwRAYNjotwKqFUK/RdSKKYqnA
-n2phe8gF54TLapEXbxO+458t7f0vqPTGB2PGrv2D5s+isjTdyyZEEHmqSs0k
-HlX5Xg+rqFuNmKoqY4alc2oR82lQdcUBgem4zUVyVPH4u1i3qIynXSNSlO5w
-t4vPkaKILDdZ5LasoIldcZHAfr9Yiu2EV1qIg6ECwIIhMGx0WkBVC7Feo+tE
-7MV2wp9qYZlrgE64qxblk+9iw8yH/VvHLxdaf/V9C5slvc64SJFeD7ZwWHOP
-9ve0yG5GjbEd7+MfFBY9J9Q58oaOn1QcEHmTqpuJxtwYe/cwH0dHJ1fvmC25
-DUj3v1fXXlruZ2vj6OzqP/9QUatea4vNfnXCTCy/tZAEQwGABUNk2Ni0gKoW
-Er3G1omYi+VxtbA85AJ0wlW1qGsuLF31Q4bvKF2/XI15syxGTL+hY8ZTWf3T
-vpWTHa39Dz+qvLZ7dcJES/vo01W0bmhRPr2yZX7CZ2vWLZ/lNWSgedTN580o
-itOE72pPKAlR1ebsWhgz9/N1ycmrF8cGh0ZOCwqKy+gWhKL4Sy/fgxXshpw0
-INRCdb/wzVDC+LRQDIaLggEKKruTvvHrEtwJCz1roQSlaqFYtxRhqYVtJ6Iq
-lutqIUO/h1xgTjiqFrTh5zULvq+qy/63rl8uedF/HN5y++axziiQ6jPvDrNb
-vj8lLbNcoa7O8LEMwbuopwN17fmPBUFb7za3/+a2/DZvtIlvRvWz33lUkjXV
-bd5vZDPzysff+NuEHS3XTseq/z4mtPDruQuo5FKw2wKWk/z0wNdCcb8IzFDB
-CLVQCoabggGL+u9vcWbhn6NPLVSgVi2U9FKHnRa2nYiiWO6rhRw9HnKBOeGo
-WprvborfW6LApLp/uWQ3p5mZTsnRna/mgo9GmQhiU3+RIpq5TaHjx5TjRWU/
-z3UQbv9Lc3mwRbzU6k2n7SU0HyBozI2wFh2v0rpXV52ebum+8U+9PlxDCTZa
-MABmoBY8uDdDfog2tBaDVAv/tWD87Ef98pCrq1rkxbs/3CTu2HWcX676y75D
-h8fk63w4QFGy3WnwW1M0d+1jaN3FUJvAszUUR3to3YVQm4ATmmuJ6uoz4WaD
-RtM/A0Cb720NsfMOn7ty/RcrEiLjks/o8+nHxvzod14d2JXX7ZbpmFRmowUD
-YQZqwd0Id2Y6tbw04MUBL/NYi4Gqhe9aMMNUix47kbE5wYiqpSE73Oxf3e7u
-/2/RmW4mpDlBJmZhOufN201MMhkela25pRGpyZw2NuJCHdXiar6dYOexu6z9
-pBNtvJMaNeo109CrtO9jbitKneSVXNii7yufWlB5TXnZo66UVUiUvdpmpQUD
-YQZqwYNDM8+0lOSnuwwXHRfzV4tBqoX/WjBDVIteO5GxOcEoVgvOOVfrvWVW
-Qz2PVOq4cNcxUWo2SXP/P1KfvVQ49asS6j+/shtTLH2+r1a3FB3flH5skbWJ
-UGcbxCjL90daDBpk7jQxZnHawStFTQzuvQIOKy0YCDNQCx7cmyGbFjO8FoNU
-C/+1YHzsR/30kItfLcqaa99u/WjU/4ye81VWdfenz1BJVpCZxYe/9p4uVJbt
-cR38ikXg3FVrExfGzt+V10BHg/LJoem2tsGfrD9UWF9+RGjqsIH2bKmq+mLK
-gqT0k5kn9m5O+iTCc9jg4UFbxM3cjAZwYacFY28GasHDEGYQSfaSuFX38N5u
-Y3AtBqoWvmvBeNmP+ushl6RacFBXHhWZOab0etgPrb8ydZjFB3mNrOOS5oSP
-GBn3C933bDUXxNmLuowaEFlekv3I8FvsA2IDOC0YMzNQCx48NGNwLTx0gvFA
-C8ZLM/CQS4/2ny7fEYJe98W3ipdYmQf8WMf697b19xU25gHnaW+o5e4iO7vF
-ubLn30NkNxNF4QeeGPZt+cC0YAzNQC148NCMwbXw0AnGAy0YL83AQy5NEElW
-pJVwT1m3+FRP9nu+7cNujQ3thioOjneceriC/oaQxju75gS/F79s3eYd6ds3
-b0pNP1uq98fUSQCmBWNsBmrBg3dmeKCFd04wXmjBeGgGHnLpI/8zzcttbfcX
-+qIqFZiQUTWfd50uwLRgfcoM1KITqEUnUItO4CGXPqg0P2UFq5XGIBAIBAKB
-QCAQCAQCgUAgEAgEAoFAIBAIBAKBQCAQCAQCgUDYg7TVFefn1fH1STdDAbXo
-BGrRE1Bsb6ATSE8UFec3RPt5CT1crN8Y4hqflsHoPfpo/eUQwad3W559WnyX
-2UJnaO25iS7axQDaHqwXTe71ICAi+3VbtHCsw5hR7rP1+twAey2k+0JnWyR6
-jUiLFmAB45sB6Z9pDNQBJRbjRycCIh+gE01MfOlEEAC0iNd4eydlS9QY1nA1
-wCnhNs33LD6n9f5KQYBmHZu2B0megWdrcB6+ewEHsVisjadwoWtQlgRFajJn
-eC8t6PGqL7ThWrzz5D0PW1F58U5Pe8bRkgJEC/G+/AOZE4xMr3FpwagHzM4M
-Vf+soVr8+NATawydiL18sE4w3nQiCCVIsinNmekSfU2z/oy66vgEwerub+4g
-39qzTSFPT/kLEu+3dQy2MgM9k3A3U4KDQqEd46grD0/w3vKX7GHKhLCjlT3G
-aagkK8x9XoGmpJryY8aF0VhZ2wBaCPeFhhMyvUamhUbA7MxQ9c9WC+Xix90I
-TbHG0ImoyufKCXedCAIE4mzKHyZ7+Owr76grtCF7pnPE1QbC4SLupppvz3GZ
-cknS/uXmO/Pcgi/TXkKtk6b8WI/YCydn+a7qvYBoS+ECZz/NcjmYomSbl2hn
-KdN5b260EO0LLYj1GpsWgAETmwHln+SQSLn48TZCVywpfOhEFOVz5oSzTgTh
-AEXpDne7+Bwpishyk0VuywqamFWHqnyvh1XUrUZMVZUxw9I5tdciLdRRlqZ7
-2YQIIk9V9VoMR11xQGA6bnORHFU8/i7WLSrjKe2V2qgBSgvBvtCCWK/RaQEY
-MLEZUP7ZxEAFUGI74UMnYikfuBOedCIIGNS1l5b72do4Orv6zz9UxPg9xLKb
-UWNsx/v4B4VFzwl1jryBu/hqLxB5U4/3WkqvB1s4rLnX2vtvG3Nj7N3DfBwd
-nVy9Y7bkNuhvfVBAWgj2hYheToj1Gp0W5gHTNMPQP02YF38nLMXysxOxlA/a
-CV86EYQayuqf9q2c7Gjtf/hR5bXdqxMmWtpHn65iNuevfHply/yEz9asWz7L
-a8hA86ibz2eCFcVpwne1Z/aEqGpzdi2Mmfv5uuTk1Ytjg0MjpwUFxWVQjUZR
-/KWX78EKIGMhTrRQgoITYr10tKCyO+kbvy7BvWDAUbVQC5i1GWAQaqEcA7s6
-6YS7TsRBtXDnBFwngnAEUn3m3WF2y/enpGWWK9TVGT6WIUwuPqprz38sCNp6
-t2Mt6Zbf5o028c2ofjYwQSVZU93m/UZ2KUH5+Bt/m7Cj5dr5Y/Xfx4QWftnU
-B6io5FKw2wKWF4z+Qf9aqEDFCbFeWlrUf38rfMefSDoX1UIpYPZmQIKvhWIM
-LOukEy47kb6rhUsnADsRhCOaCz4aZSKITf1Fimgme4WOH9Pv66js57kOwu1/
-aS+wi5davem0vYTmEw+NuRHWouNV2tpUV52ebum+8U9WD2iwgR9aOHZCfizi
-hxasj1ULCCFauNSi32oxTicQzlCUbHca/NYUzWMMGFp3MdQm8GwN3ZENWnch
-1CbghOZaq7r6TLjZoNH0Ryho872tIXbe4XNXrv9iRUJkXPIZdg8W6qQxP/qd
-Vwd25XW7ZTrm2nmihRMnWBctLw14ccDLvNeC9a1qASLk2aY41aLHajE2Jxj1
-aoGAoL1AJpkMj8rW3FKK1GROGxtxoY72KXnz7QQ7j91l7afjaOOd1KhRr5mG
-XqV943tbUeokr+TCFr0uEIrKa8rLHnWlrEKi7NUkX7Rw4gTr1FKSn+4yXHRc
-zHctWN+qFiBCtHCpRa/VYmxOMMrVAgFCx/yx2STNcwpIffZS4dSvShiMR2Q3
-plj6fF+tbik6vin92CJrE+GRStpXM5Xl+yMtBg0yd5oYszjt4JWiJgPev8MX
-LRw7IZv/4YsWrG9VCxAhWrjUotdqMVInEI5Qlu1xHfyKReDcVWsTF8bO35XX
-wKg6lE8OTbe1Df5k/aHC+vIjQlOHDbTnkVXVF1MWJKWfzDyxd3PSJxGewwYP
-D9oibjbMiIUnWjh3gkiyl8Stuof3XhueaMH6WrUAEKKFWy16rRYjdQLhBrT+
-ytRhFh/kNYLbpDQnfMTIuF/ovoesuSDOXtRlVIXI8pLsR4bfAhgZdXiihVdO
-MN5owXhmBqgWhkK09FEtfccJBBSt4iVW5gE/1oEbgLT+vsLGPOA87S223F1k
-Z7c4V/b8e4jsZqIo/MATg7xihSdaeOUE440WjGdmQGphKkRL39TSh5xAAKF6
-st/zbR+QqzuoKg6Od5x6uIL+FpHGO7vmBL8Xv2zd5h3p2zdvSk0/W8r85RSs
-4I0WHjnBeKQF45UZkFqYC9HSF7X0IScQYKAqFeAcouo+UBRQi06gFp2A1NIn
-hGgBpqUPOYFAIBAIBAKBQCAQCAQCgUAgEAgEAoFAIBAIBAKBQCA4IG11xfl5
-dfBhCv0A9RID/fQfYK77O4js123RwrEOY0a5zz70mMkyA4qK8xui/byEHi7W
-bwxxjU/LYPeqZrT+cojg07stzz4tvtv5Bmm09txEF+0bpdserBdNBvnskSEj
-IU4BYL1GB34WtAD0Q5pW9p3FWCHLAhAzpP77e1+AdII2XIt3nrznYSsqL97p
-aZ9wG+8tZbi0iNd4eydlS9QY1nA1wIlkCy/gIBaLn/9J6/2VggDNygltD5I8
-A8/W/PO4R0vhQtegLAmK1GTO8F5awOx9MZxGQqEV4hTQ0at8euXUtRp9rxDc
-AdJ47/sf/gTwcjh2WcBAlx9xWql1lv6YBaqHEXb+jaUvAMtLf4akIFFJVpj7
-vAJNBTTlx4wLw1vSFHcj0pyZLtHXNAsdqKuOTxCsfoC7+ncHJTgoFM+HacjT
-U/6CxPttHSOwzEDPpK7bU1cenuC95S/Zw5QJYUcr2ZUlN5GQt0KcAhp6kdpz
-M9xnX5d27zBkRyRydH5dXpTm7Zteyvqsg10WgJcfYVopdZZ+mQXKhxFW/o2n
-L4DKS3+GpCBbChc4+2nWKcAUJdu8RDtLceaN8TYif5js4bOvvKPG0Ibsmc4R
-VxtYDjWab89xmXJJ0r6V5jvz3IIvd1u0pyk/1iP2wslZvqs4WHqbm0gIU0BD
-b9uDda7jPhf3XOiOpAAooPvrqooDE+xnMV1SiQaEWQBefkRppdJZ+mUWqB9G
-SCHwb0x9gbO89FfUFQcEpuM2F8lRxePvYt2iMp7SXdZCUbrD3S4+R4oistxk
-kduygiaWyVKV7/WwirrViKmqMmZYOqcWdZvIVpame9mECCJPVTFcy4d3kRCn
-gLJeVHrjgzFj1/5BeMYBFHXVdxNGTTjM8syXFOIsAC8/grRS6Cz9NAvsDyOd
-EPg3qr7AUV76LY25MfbuYT6Ojk6u3jFbchsYLMmmrr203M/WxtHZ1X/+oSLa
-r7pE5E3dX38muxk1xna8j39QWPScUOfIGz3WtZNeD7ZwWKOPJbS5iaRXKyQp
-oKgXrb/6voXNkl6jTH3SPq70NPf45jHQzkk3C6DLjyCt5J2lv2aB+WGEjn/j
-6gt6yUt/Qln9076Vkx2t/Q8/qry2e3XCREv76NNVz3Qqir/08j1YQT5AUj69
-smV+wmdr1i2f5TVkoHnUTZxpbBJUtTm7FsbM/XxdcvLqxbHBoZHTgoLiMqq6
-JldRnCZ8VzslwAZUdid949cluKMubiKh1ArFFBDTmDfLYsT0GzrSQlgAFCBI
-fdsf6+xMRd/+jRs8P7JApzkCKGSKn1kgg3UWqNYwO/+U4UkWWOel34NUn3l3
-mN3y/SlpmeUKdXWGj2XIs+unqORSsNsC0ss06trzHwuCtt7tuFemYwFvE9+M
-aibrZSsff+NvE3a0XDsFrv77mNDCr+dS4agka6rbvN9YX8MiXoicm0iotUIp
-BWTIi/7j8JYbzgAPvwC6xFr769Xbkl5fJ0m99HqI2fAI/EX8+JAFWs0RQCFT
-PM0CMeyzQLGGWfqnDG+ywC4vEKy54KNRJoLY1F+kiGa+Wuj4MZ0jASr7ea6D
-cPtfmsuYLeKlVm86bS9hdNNMY26Eteh4lTbb6qrT0y3dNzJcwZsU4mMmN5Fw
-uL+ym9PMTKfk6N5dCgXQdn+l9Ru2Pa8MkKa+7UGSzVB3/DMiPmSBw+Z4mgVi
-OMsCVw3xJgvs8gJRlGx3GvzWFM2TGBhadzHUJvBsDfVTJrTuQqhNwAnN9VJ1
-9Zlws0GjmZ4ioM33tobYeYfPXbn+ixUJkXHJZ/TwGGFjfvQ7rw5s56UBLw54
-uePD63bLes6acxIJR61oqL/sO3R4TL7Op8ooFQAqr62Q9rwJnDT1ipKt44Y6
-9rhc3wGPssBhc7zNQieGzAJXDfEmC7h5gVChXfkkk+FR2ZobSJGazGljIy7U
-0Zjra76dYOexu6z9FB9tvJMaNeo101Cm93q2FaVO8koubNHrnaKovKa87NGj
-kvx0l+Gi4+JHjx6VVUiUPZrkJBKOWtEgzQkyMQvTefWReQGQp17+cL39UJf/
-e9TrFmgeZYHD5niahS4YMgtcNcSbLODmBUKFjhlZs0maRy2Q+uylwqlfldAa
-A8huTLH0+b5a3VJ0fFP6sUXWJsIjlQyvOSrL90daDBpk7jQxZnHawStFTUwu
-llGE5AoLJ5FwuL+t95ZZDfXUmRnmBUCe+sZbEeYmgT/V422BD1ngsDmeZoEY
-zrLAVUO8yQK7vPR3lGV7XAe/YhE4d9XaxIWx83flNdD82VE+OTTd1jb4k/WH
-CuvLjwhNHTYwnJtWVV9MWZCUfjLzxN7NSZ9EeA4bPDxoi1hfb0hBJNlL4lbd
-0/l2GG4i4XR/UUlWkJnFh7/2niJhUQCkqZcXpTgMddqGf9XT8FngtDmeZoEI
-zrLAXbr5kgVWeen3oPVXpg6z+CAPyP0t0pzwESPjfmH2ssDmgjh7UZdxCiLL
-S7IfGW6AO2+4iYTj/VVXHhWZOab0mlMHVAA6U49Unx5vav3574yem+HYDzfN
-wSwYvCGML1lglRdIq3iJlXnAj3Ughjatv6+wMQ84z3BbLXcX2dktzpU9/zYi
-u5koCj/whPtJYG4i4Xp/27ur7whBr3uBwRSAztSj9T9Ns7BLvM+sa3Lsh6Pm
-YBYM3VAHfMgCu7z0e1RP9nu+7QNmLRBVxcHxjlMPVzDdFtJ4Z9ec4Pfil63b
-vCN9++ZNqelnS2m/8gAI3ETC9f4ikqxIK+Gesm7HAjAFoDP1aP3l98d47WJ8
-/ZljPxw1B7Ng6IY0jRk8C2zz0u9BVSpg1YGq4esjeY38zzQvt7U9XuINpAB0
-pF5ddXKKc3w229cr9z1gFviAgbMA8wKBUAeV5qes4Ga9Q6T+xvrEU5VwSNkb
-mAU+YNAswLxAIBAIBGJI/h+YSftt
- "], {{0, 68}, {574, 0}}, {0, 255},
+1:eJztnQtQVNcZgE2baTtpZupjMrE1tNGgohafrUIoURQ1GlMj2kYtTStRqUGJ
+g8ZnfMcYJcZHNKn4GFQwGtHxkfiOWo1G0ahV4xtRlIfKS0B3Ydk93eVio3D3
+7r17z/3vf3b/byaZPJg9h+8/3Au7K1/jmHejhv+kTp06Y37h/FvUkPERCQlD
+Jvav6/yXv8SPGREbP2xor/ixw2KHJYTE/NT5H3s5/zrzVJ06rn9mImF3mL0D
+NJAK/NCMkOMDA6q4e2her7BpFyzs4fnxr7yxK1/np2TLSu4fc7iYsbLT8a+8
+dfS+/h3aS85tWP7lnj0p04Z8cOz+49tzWG7sXpW6fUfy2Pb167/YrHnz4MgP
+L1v0r8gJnip4j0lcqwo79wKwGfmLVdjrCXarshQfiu6x5Lolb3vMzPQSnXoc
++Tv79/4ip5JZL38QErkxz653c/bCb+JeX5JRzpj10gddBh8t+XGp4sNj+i25
+Vu6aycpufXbqvgRxhrcKnmMS16r7nXsD1Iz8yirY9QTaqi03bWC76OP6jhxj
+losf9pl67MSa5LN67TjvQiff6THnspVVZq/tEjLnilXv49nvbO4dnnjVqZQ9
+OJMQOencw///r8JvosKmXnDdzMqvzo/8x3d6NTyCk1XuKjiOSVyrCjv3BqgZ
++ZVVsOuJUVblseVsGvqn5wIG6r/e/jAjInpK6jV9R7cK510otPuOfEd5xrKI
+ln8/XqL729uSo282DU3JrnSa/++s6KWue1k19ryNXUPnus6I9drng6afKtW7
+lAQ3q9xVcByTuFbd79wboGbkX1ahricGWZWn4nba5IVfJ7YPVLI93j25ubmP
+PqrkRNy/UrIqlNdT9VCVOV9EBHXuGj16RuKCvh36frw186HbO5yqB7RcnBbc
+qFOfaau3bUlNPpD3xB5tOWkj+k1I/mpbyqq9t3V/ZyLBzyp3FRzHJK5VpZ1r
+fzS4GWm2Wnlne+yodMXrKFarcNcTI6zKU5G1YVLSpfuZn3VQtF1ZdCz5vQER
+kRM+mRn3Wqv6DYJjNuXatK9Wjb30XNqC+StS162cF/fXgQPijxTVOJ2O/F0D
+ui3N9GD6Mcpvfb0gcXnK0thmz/zs+R4jZ63JfPK5btvNpPCQj3XebtXD0apW
+FR7dasB3rWraOfxx5Ujl7TXd++wvcv8BaK1qwJNPzQPyhEerbvZ5I2XSyqsW
+VnHDg23mKNj96m8CR++7V8ns9756/bm6ndbnevdDk73w4Liuf/78mus2UnF9
+UdsXIrfdrfFILj2h41Q/9+MoSX+vY+ekmxXMeml6i+df3lBrZxWZn4a2HXee
+w88lauBpVZsKFW5V48tWNezcjOPKEw9XBrxWVePZp8YBqcCr6601Y/Wk1der
+PmWPtosPv9m45ZSqp5RZ2anYxi/0+0+xVzstPRkf1Hzk92VVu85e+3JA+Prc
+Sq8e6RHO6b8a0Kbqtlp6IqZV+Ios77/zVsSWszGmZ+ca9B55pPiJG7MpViV4
+uiWrVYh6XH+0GhpUr0GbMN+1CnZQmVqrbrBeSezSJrhNFS0Dnvl53aatI949
+Uyb7saXpMS81H3226g5huTg9uNnQb1WtUYuyk0N+1yjqSNW73+x3NkcEdFx5
+S6cfW9bKPzTs4NRsv7drxIA5p0tNfYuMKVYluLolqy7EP65K34n5hFVTDqqX
+zyc8wpa1omNThbvbgzPxzZoMSXe9bmfLXj84fNSufC9vRwW7O9erG57qegXT
+emVZeKN2i67rfVbFXnp+/cR3xn66YeuW/RkPEL0fEc6qBFe3ZNWF+MdV5ZVB
+XKumHFRjr7eWC5NbNuz4t4TZCxcnzpi0+MBd72/xtrwtbwfX+9VL3YdPn/d+
+p1//fvZlnS9d2/N3/bNFQINfPv2Uk6frth9j7Ls5tABntXo9fm7JavViwh9X
+PtdbtFZNOqg6r7fKlF/9qPWLUQd0vH4ox/2j0U1ajNf5aktF7s6PZm26KY3L
+YSs8sXDCMYMs8MYYqxI63ZLV2vj1ccVqVVSfilRkLmn/2547OP8Zt9ITwwOb
+xp1+oOcxKvM29QyM3FL9yqa99Oq+rXuzOb3V02iMsSqhzy1ZlcGvjytSq8L6
+dI/DcuvwqrcbP9uw77LDOVZOvh0Pb3735fth9Z4NmnqwSM8zlo6yc4lvtGgY
+0LbHwNgJc5M2f19g3EuTPDHEavVD63dLVms8rl8fV8RWhfRJEARBEARBEARB
+EARBEARBEE/gA0kLQj007schG8jxiQFBJnK0IWjBBDCO4wXiFkyM2BtoFInr
+HHnB2Sp8wAulVfcAJnK8QNCCCUwcxxtQFUy0YMjeIKNIfOfICSOsgga8wKxi
+7cLAxDuQF0xg4jjeYErBhIdVQ/YGGEXiPEeG1ypkwIu/VXnwdmFA4h3YCyYg
+cRxvMKNgwsWqIXuDjCLxnSNmq5ABL95W5UHchQGKd+DuwgDFcbQ/mgkFE15W
+te2Nhw3tD6gwd9VzVAdiq5ABLy1WMdR2uHdhtMVcAAsmHsHZMOLrE75gYopV
+CVTBHb6RI8xWNaD7uGqyiqC2w70LoyXmAlsw8QDShhFfn+AFEzOsSiAL7nCN
+HKG2qhoOx1WbVXFqOxKcIybQBRN0XRghfUrg7sIwQYM7iM+qhJDBHfFqOxK8
+IyaI0jA+0TBCVzDxobPK8BxXX7EK71OY2o4E74gJzjSMuA0jzAUT0c8qQ3lc
+hbYK71OY2k71elwjJljTMKI2jHAXTMQ+qwzpcRXYqhk+BaztSOiPmIha3MDa
+MBLVpwTus8oE1YvYqpA+FcHbhWECFzeQNoyE9SmB+qwyUfXitSqmT/fg7sIw
+QYsbiBtGQvqUQH9WmYh6cVsVzydBEARBEARBEARBEARBEARB4ELQoIag2ya8
+hiZuEIKLNaSfAtZ/4V6u4QffShF09ARho4TrrM1J8yC0KsFvY9BiEV8BZDCk
+UQLYf2F84x0c4RpqgY6eoCy/MH6zNifNg9Uqx42ZIhboCoC1pgHZf2F84x0M
+aaUIOHqCs/zC+M3alDQPWqscN2aKWM5XAHnw1jQA+y8uOMY7sFaKoKMnKMsv
+LjjN2pw0D1qr/DZmjliuVwB5ENc0QPsvTGW8Qx1oK0Ww0RPOjRKElSIz0jxI
+ezp8v2BNaR6pvQJg6OloRfT+iwKYK0WagSq/4OzpwPvkW37xCEermjaGUKx6
+EPR0tOED/Re3oK4UaQSw/IKwp2OGT87lFw/wtKphYyjFaoB6Ov7d05EQvPyC
+rqcjpE8J3GdVVLHU05HAEihhPmWVwYpF19MR3KdnzDqr4oulng62QAkT3yqD
+FYuupyO4T02AnlXxxVJPB1ughIlulUGLRdfTEdynJkDPqvhiqacjXFADt1Um
+qFislSImqE8Jw86qv4uVA29Ngwkc1EBtlYkqFmmliInqU8Kws+rvYmuBu6bB
+BA1qoLfKRBSLuFLERPQpYdRZ9XuxBEEQBEEQBEEQBEEQBEEQhL8geK6CqIbm
+6BvQHH0O0FyF+3KHIWUff0K550JFHlGA6/IoDpG+Ho0BMlfhvtxhSInDr1Cc
+IxV5hAG2y+NuiPT1WBOo8gvHXIVCuUNDiaM8e//azRfKTDsA9vun09Yducfr
+HYMgc8RY5KE5ygLb5XE3RP/9epQHrvzCMVfhvtyhusRhy9s6+q3lGSb/WZSH
+PyyMnrivQN+vo6sCZo74ijw0RzcAd3ncDNFvvx7lgSy/8IqYKJc71JU47Pk7
+o0Pi5D5nVRtQh5qHchTuj+404ojic2egrRkPc0RW5BFqjioA/Hrk26tyO0Qf
+/Hr0GpU1DReQwRpPa+lPijgPY+egQbI/20AHWRyFe18L6rO7QGHAvFozLuDD
+Q0YWecSao0cg58i3V6UTH5ujPBpqGoC5Cs9rcUiKlB4fGNh+sfzv3dQUZLFc
+T1uU9K2bnz/UdUMsF6e0bpVwVuHT4deaAQ8PGVzkEWuOHgCdI99elV58ao7y
+aKhpgHVAwNYqOhgR8Me12bJj0ZIOsWWn9gwIGnFK9rfiq+yGlGd80i5w8PHa
+T2xxb81AzhFmRcHmyKluAzxHgOWEmKMutNQ0IHMVMGuVHI1q0uGzG3L3U/Ag
+i/XSzNYtRp5R+LV0vFoz8D0Xo1cUa45KIJ4jwHK+M0cVeKppgOYqYNYqz5jf
+odUoOafwQZaSY4Oah63LUViFU2vGhJ6L0SuKNUeVYJsjwHI+OUd3eJgvZK4C
+bC3rldkhYf++WUs4fJDFenl2SDflH9H4XG/hey4AKwo1R7ULopojzHK+OEev
+gMxVQK5lLzo0vt/cmq8XgAdZHCXpk6NmnTL+J3v47AjMijRHQ+cItpy/zVEe
+yFwFeBrDmrV9YdITbzyEDrJYs3YsWbQnl+Obr9wAnx0BXJHm6BvL+dEc3QGZ
+qzAjjeEozy8ol6ZpQpDFbrlTVA5yJ4V3C7sizdEXlvOfORIEQRBe8z9y9YId
+
+ "], {{0, 73}, {464, 0}}, {0, 255},
ColorFunction->RGBColor],
BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
Selectable->False],
- BaseStyle->"ImageGraphics",
+ DefaultBaseStyle->"ImageGraphics",
ImageSize->Automatic,
- ImageSizeRaw->{574, 68},
- PlotRange->{{0, 574}, {0, 68}}]], "Output",
- ImageSize->{578, 68},
+ ImageSizeRaw->{464, 73},
+ PlotRange->{{0, 464}, {0, 73}}]], "Output",
+ ImageSize->{468, 73},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"FeynCalc2FORM", "RasterizedOutput"},
- CellLabel->"Out[12]=",
- CellID->202893513]
+ CellLabel->"Out[1]=",
+ CellID->780042133]
}, Open ]],
Cell[BoxData[
@@ -661,7 +694,7 @@ Cell[BoxData[
RowBox[{"\"\\"", ",",
RowBox[{"L", " ", "==", "t"}]}], "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[13]:=",
+ CellLabel->"In[2]:=",
CellID->404985950],
Cell[CellGroupData[{
@@ -677,7 +710,7 @@ Cell[BoxData[
",", "\"\<\>\""}], "]"}], "<>", "\"\\""}], ",",
"String"}], "]"}], "]"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[14]:=",
+ CellLabel->"In[3]:=",
CellID->69651380],
Cell[BoxData[
@@ -688,18 +721,18 @@ Cell[BoxData[
{"\<\"Vectors p,q;\"\>"},
{"\<\"write statistics;\"\>"},
{"\<\"Local L = ( \"\>"},
- {"\<\"4*(d_(mu,si)*d_(nu,ro)*q.p-d_(mu,ro)*d_(nu,si)*q.p+d_(mu,nu)*d_(\
-ro,si)*q.p+\"\>"},
- {"\<\"d_(ro,si)*p(nu)*q(mu)-d_(nu,si)*p(ro)*q(mu)+d_(nu,ro)*p(si)*q(mu)-\
-\"\>"},
- {"\<\"d_(ro,si)*p(mu)*q(nu)+d_(mu,si)*p(ro)*q(nu)-d_(mu,ro)*p(si)*q(nu)+\
-\"\>"},
- {"\<\"d_(nu,si)*p(mu)*q(ro)-d_(mu,si)*p(nu)*q(ro)+d_(mu,nu)*p(si)*q(ro)-\
-\"\>"},
- {"\<\"d_(nu,ro)*p(mu)*q(si)+d_(mu,ro)*p(nu)*q(si)-d_(mu,nu)*p(ro)*q(si))\
- ); \"\>"},
+ {"\<\"4*d_(mu,si)*d_(nu,ro)*q.p-4*d_(mu,ro)*d_(nu,si)*q.p+4*d_(mu,nu)*d_\
+(ro,si)*q.p+\"\>"},
+ {"\<\"4*d_(ro,si)*p(nu)*q(mu)-4*d_(nu,si)*p(ro)*q(mu)+4*d_(nu,ro)*p(si)*\
+q(mu)-\"\>"},
+ {"\<\"4*d_(ro,si)*p(mu)*q(nu)+4*d_(mu,si)*p(ro)*q(nu)-4*d_(mu,ro)*p(si)*\
+q(nu)+\"\>"},
+ {"\<\"4*d_(nu,si)*p(mu)*q(ro)-4*d_(mu,si)*p(nu)*q(ro)+4*d_(mu,nu)*p(si)*\
+q(ro)-\"\>"},
+ {"\<\"4*d_(nu,ro)*p(mu)*q(si)+4*d_(mu,ro)*p(nu)*q(si)-4*d_(mu,nu)*p(ro)*\
+q(si) ); \"\>"},
{"\<\" \"\>"},
- {"\<\"Print; \"\>"},
+ {"\<\"print;\"\>"},
{"\<\".end\"\>"}
},
GridBoxAlignment->{
@@ -715,12 +748,11 @@ ro,si)*q.p+\"\>"},
Column],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]], TraditionalForm]], "Output",
- ImageSize->{545, 213},
+ ImageSize->{583, 208},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalc2FORM",
- CellLabel->"Out[14]//TableForm=",
- CellID->1446352458]
+ CellLabel->"Out[3]//TableForm="]
}, Open ]],
Cell[BoxData[
@@ -733,15 +765,16 @@ Cell[BoxData[
RowBox[{"DeleteFile", "[", "\"\\"", "]"}]}], "]"}],
";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[15]:=",
+ CellLabel->"In[4]:=",
CellID->687280976],
Cell[BoxData[
RowBox[{
RowBox[{"Clear", "[", "t", "]"}], ";"}]], "Input",
CellTags->"FeynCalc2FORM",
- CellLabel->"In[16]:=",
+ CellLabel->"In[5]:=",
CellID->261285927]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -763,16 +796,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["FORM2FeynCalc",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FORM2FeynCalc",
- ButtonNote->"FORM2FeynCalc"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"FeynCalc2FORM",
- CellID->610402838]
+Cell[TextData[StyleBox[ButtonBox["FORM2FeynCalc",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FORM2FeynCalc",
+ ButtonNote->"FORM2FeynCalc"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -789,23 +817,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 45.277886}",
+ "built" -> "{2020, 1, 5, 18, 57, 35.290011}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FeynCalc2FORM[expr] displays expr in FORM syntax. FeynCalc2FORM[file, x] \
-writes x in FORM syntax to a file. FeynCalc2FORM[file, x==y] writes x=y to a \
-file in FORM syntax.", "synonyms" -> {}, "title" -> "FeynCalc2FORM",
- "titlemodifier" -> "", "windowtitle" -> "FeynCalc2FORM", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FeynCalc2FORM"}, "SearchTextTranslated" ->
- ""},
+ "FeynCalc2FORM[exp] displays exp in FORM syntax. FeynCalc2FORM[file, x] \
+writes x in FORM syntax to a file. FeynCalc2FORM[file, x == y] writes x = y \
+to a file in FORM syntax.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FeynCalc2FORM", "titlemodifier" -> "", "windowtitle" -> "FeynCalc2FORM",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FeynCalc2FORM"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -813,8 +841,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -822,245 +851,235 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3442, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1331395716]},
"FeynCalc2FORM"->{
- Cell[4076, 125, 144, 4, 27, "Input",
+ Cell[5939, 182, 146, 4, 70, "Input",
CellTags->"FeynCalc2FORM",
CellID->1031702605],
- Cell[4223, 131, 1128, 26, 75, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->490814627],
- Cell[5388, 162, 292, 10, 27, "Input",
+ Cell[6088, 188, 1502, 34, 113, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[8284, 258, 292, 10, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1451127405],
- Cell[5683, 174, 1089, 45, 66, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1238649149],
- Cell[6809, 224, 155, 5, 27, "Input",
+ Cell[8579, 270, 829, 34, 59, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[9445, 309, 155, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->208321779],
- Cell[6967, 231, 132, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->460002283],
- Cell[7136, 239, 216, 7, 27, "Input",
+ Cell[9603, 316, 114, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"],
+ Cell[9754, 323, 216, 7, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->14977898],
- Cell[7355, 248, 598, 25, 40, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1443194788],
- Cell[7990, 278, 156, 5, 27, "Input",
+ Cell[9973, 332, 601, 25, 37, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[10611, 362, 156, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1598383483],
- Cell[8149, 285, 143, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->924497195],
- Cell[8329, 293, 231, 7, 27, "Input",
+ Cell[10770, 369, 112, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"],
+ Cell[11049, 382, 231, 7, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1937829856],
- Cell[8563, 302, 1091, 43, 42, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->388485027],
- Cell[9691, 350, 156, 5, 27, "Input",
+ Cell[11283, 391, 1071, 42, 40, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[12391, 438, 156, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1415350890],
- Cell[9850, 357, 144, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->914453267],
- Cell[10031, 365, 317, 10, 27, "Input",
+ Cell[12550, 445, 126, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"],
+ Cell[12713, 452, 317, 10, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->2088847593],
- Cell[10351, 377, 1220, 48, 41, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1720680077],
- Cell[11608, 430, 156, 5, 27, "Input",
+ Cell[13033, 464, 1199, 47, 40, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[14269, 516, 156, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1981124799],
- Cell[11767, 437, 145, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->1021911992],
- Cell[11927, 443, 347, 11, 27, "Input",
+ Cell[14428, 523, 126, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"],
+ Cell[14711, 535, 346, 11, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->118791271],
- Cell[12299, 458, 352, 11, 45, "Input",
+ Cell[15082, 550, 351, 11, 45, "Input",
CellTags->"FeynCalc2FORM",
CellID->2027596058],
- Cell[12654, 471, 261, 8, 36, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->801247046],
- Cell[12952, 484, 333, 11, 27, "Input",
+ Cell[15436, 563, 240, 7, 37, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[15855, 582, 387, 12, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->730601730],
- Cell[13288, 497, 9107, 157, 82, "Output",
+ Cell[16245, 596, 5059, 91, 94, "Output",
CellTags->{"FeynCalc2FORM", "RasterizedOutput"},
- CellID->202893513],
- Cell[22410, 657, 228, 7, 27, "Input",
+ CellID->780042133],
+ Cell[21319, 690, 227, 7, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->404985950],
- Cell[22663, 668, 394, 12, 45, "Input",
+ Cell[21571, 701, 393, 12, 45, "Input",
CellTags->"FeynCalc2FORM",
CellID->69651380],
- Cell[23060, 682, 1447, 40, 247, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1446352458],
- Cell[24522, 725, 332, 11, 27, "Input",
+ Cell[21967, 715, 1450, 39, 244, "Output",
+ CellTags->"FeynCalc2FORM"],
+ Cell[23432, 757, 331, 11, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->687280976],
- Cell[24857, 738, 148, 5, 27, "Input",
+ Cell[23766, 770, 147, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
- CellID->261285927],
- Cell[25361, 765, 247, 9, 32, "Text",
- CellTags->"FeynCalc2FORM",
- CellID->610402838]},
+ CellID->261285927]},
+ "PrimaryExamplesSection"->{
+ Cell[7651, 229, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1372230660]},
"RasterizedOutput"->{
- Cell[13288, 497, 9107, 157, 82, "Output",
+ Cell[16245, 596, 5059, 91, 94, "Output",
CellTags->{"FeynCalc2FORM", "RasterizedOutput"},
- CellID->202893513]}
+ CellID->780042133]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 27576, 824},
- {"FeynCalc2FORM", 27716, 828},
- {"RasterizedOutput", 30485, 916}
+ {"FeynCalc2FORM", 26472, 853},
+ {"PrimaryExamplesSection", 28913, 927},
+ {"RasterizedOutput", 29057, 931}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3033, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 505, 14, 99, "Usage",
- CellID->982511436],
+Cell[3621, 97, 290, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3442, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1331395716],
+Cell[3936, 112, 1015, 31, 211, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[3855, 115, 196, 6, 25, "ExampleSection",
- CellID->1715256460],
+Cell[4976, 147, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1504263802],
+Cell[5718, 173, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5752, 175, 162, 3, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4076, 125, 144, 4, 27, "Input",
+Cell[5939, 182, 146, 4, 70, "Input",
CellTags->"FeynCalc2FORM",
CellID->1031702605],
-Cell[4223, 131, 1128, 26, 75, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->490814627]
+Cell[6088, 188, 1502, 34, 113, "Output",
+ CellTags->"FeynCalc2FORM"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5388, 162, 292, 10, 27, "Input",
+Cell[7651, 229, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1372230660],
+Cell[CellGroupData[{
+Cell[8064, 248, 195, 6, 26, "ExampleSection",
+ CellID->504486489],
+Cell[CellGroupData[{
+Cell[8284, 258, 292, 10, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1451127405],
-Cell[5683, 174, 1089, 45, 66, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1238649149]
+Cell[8579, 270, 829, 34, 59, "Output",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6809, 224, 155, 5, 27, "Input",
+Cell[9445, 309, 155, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->208321779],
-Cell[6967, 231, 132, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->460002283]
+Cell[9603, 316, 114, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7136, 239, 216, 7, 27, "Input",
+Cell[9754, 323, 216, 7, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->14977898],
-Cell[7355, 248, 598, 25, 40, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1443194788]
+Cell[9973, 332, 601, 25, 37, "Output",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7990, 278, 156, 5, 27, "Input",
+Cell[10611, 362, 156, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1598383483],
-Cell[8149, 285, 143, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->924497195]
+Cell[10770, 369, 112, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8329, 293, 231, 7, 27, "Input",
+Cell[10919, 376, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[11049, 382, 231, 7, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1937829856],
-Cell[8563, 302, 1091, 43, 42, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->388485027]
+Cell[11283, 391, 1071, 42, 40, "Output",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9691, 350, 156, 5, 27, "Input",
+Cell[12391, 438, 156, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1415350890],
-Cell[9850, 357, 144, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->914453267]
+Cell[12550, 445, 126, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10031, 365, 317, 10, 27, "Input",
+Cell[12713, 452, 317, 10, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->2088847593],
-Cell[10351, 377, 1220, 48, 41, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1720680077]
+Cell[13033, 464, 1199, 47, 40, "Output",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11608, 430, 156, 5, 27, "Input",
+Cell[14269, 516, 156, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->1981124799],
-Cell[11767, 437, 145, 3, 23, "Print",
- CellTags->"FeynCalc2FORM",
- CellID->1021911992]
+Cell[14428, 523, 126, 2, 23, "Print",
+ CellTags->"FeynCalc2FORM"]
+}, Open ]]
}, Open ]],
-Cell[11927, 443, 347, 11, 27, "Input",
+Cell[CellGroupData[{
+Cell[14603, 531, 105, 2, 9, "ExampleDelimiter"],
+Cell[14711, 535, 346, 11, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->118791271],
Cell[CellGroupData[{
-Cell[12299, 458, 352, 11, 45, "Input",
+Cell[15082, 550, 351, 11, 45, "Input",
CellTags->"FeynCalc2FORM",
CellID->2027596058],
-Cell[12654, 471, 261, 8, 36, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->801247046]
+Cell[15436, 563, 240, 7, 37, "Output",
+ CellTags->"FeynCalc2FORM"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[12952, 484, 333, 11, 27, "Input",
+Cell[15725, 576, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[15855, 582, 387, 12, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->730601730],
-Cell[13288, 497, 9107, 157, 82, "Output",
+Cell[16245, 596, 5059, 91, 94, "Output",
CellTags->{"FeynCalc2FORM", "RasterizedOutput"},
- CellID->202893513]
+ CellID->780042133]
}, Open ]],
-Cell[22410, 657, 228, 7, 27, "Input",
+Cell[21319, 690, 227, 7, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->404985950],
Cell[CellGroupData[{
-Cell[22663, 668, 394, 12, 45, "Input",
+Cell[21571, 701, 393, 12, 45, "Input",
CellTags->"FeynCalc2FORM",
CellID->69651380],
-Cell[23060, 682, 1447, 40, 247, "Output",
- CellTags->"FeynCalc2FORM",
- CellID->1446352458]
+Cell[21967, 715, 1450, 39, 244, "Output",
+ CellTags->"FeynCalc2FORM"]
}, Open ]],
-Cell[24522, 725, 332, 11, 27, "Input",
+Cell[23432, 757, 331, 11, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->687280976],
-Cell[24857, 738, 148, 5, 27, "Input",
+Cell[23766, 770, 147, 5, 27, "Input",
CellTags->"FeynCalc2FORM",
CellID->261285927]
+}, Open ]]
}, Open ]],
-Cell[25020, 746, 31, 0, 29, "SectionFooterSpacer"]
+Cell[23940, 779, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25088, 751, 270, 12, 31, "SeeAlsoSection",
+Cell[24008, 784, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[25361, 765, 247, 9, 32, "Text",
- CellTags->"FeynCalc2FORM",
- CellID->610402838]
+Cell[24281, 798, 187, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[25623, 777, 23, 0, 42, "FooterCell"]
+Cell[24483, 805, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcExternal.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcExternal.nb
index d0df2dd30..c14665e6a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcExternal.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcExternal.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18418, 660]
-NotebookOptionsPosition[ 12736, 480]
-NotebookOutlinePosition[ 16343, 583]
-CellTagsIndexPosition[ 16223, 577]
+NotebookDataLength[ 18355, 644]
+NotebookOptionsPosition[ 13086, 483]
+NotebookOutlinePosition[ 16484, 577]
+CellTagsIndexPosition[ 16364, 571]
WindowTitle->FeynCalcExternal
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalcExternal\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynCalcExternal"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcInternal\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalcInternal"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalcExternal\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynCalcExternal"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynCalcExternal.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$67176],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynCalcExternal", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$133892],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynCalcExternal", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FeynCalcExternal.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynCalcExternal", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynCalcExternal", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1340436034],
+ CellID->771519112],
Cell[CellGroupData[{
@@ -118,7 +150,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->549088434],
+ CellID->1246622663],
Cell[CellGroupData[{
@@ -135,12 +167,11 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{22, 18},
+ ImageSize->{23, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[1]=",
- CellID->539530492]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -157,8 +188,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[2]//StandardForm=",
- CellID->2042610193]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -223,46 +253,35 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ",",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ",",
- FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[3]=",
- CellID->1438725943]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -285,12 +304,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[4]//StandardForm=",
- CellID->689065963]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -336,43 +354,32 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ",",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], ",",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ TraditionalForm]}]], ",",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[5]=",
- CellID->16755113]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -406,12 +413,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}], "}"}]], "Output",
- ImageSize->{521, 67},
+ ImageSize->{523, 67},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1797900650]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -436,12 +442,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcExternal",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1902701879]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -471,17 +476,15 @@ Cell[TextData[{
ButtonNote->"FeynCalcInternal"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynCalcExternal",
- CellID->35172117]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FeynCalcExternal",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -490,22 +493,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 46.839073}",
+ "built" -> "{2020, 1, 5, 18, 57, 36.479239}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FeynCalcExternal[exp] translates exp from the internal FeynCalc \
-representation to a shorthand form.", "synonyms" -> {}, "title" ->
- "FeynCalcExternal", "titlemodifier" -> "", "windowtitle" ->
+representation to a shorthand form.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FeynCalcExternal", "titlemodifier" -> "", "windowtitle" ->
"FeynCalcExternal", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynCalcExternal"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -513,8 +516,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -523,145 +527,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3387, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4395, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1340436034]},
+ CellID->771519112]},
"FeynCalcExternal"->{
- Cell[4020, 124, 180, 5, 27, "Input",
+ Cell[5028, 156, 180, 5, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->642848596],
- Cell[4203, 131, 306, 11, 39, "Output",
- CellTags->"FeynCalcExternal",
- CellID->539530492],
- Cell[4546, 147, 135, 4, 27, "Input",
+ Cell[5211, 163, 286, 10, 40, "Output",
+ CellTags->"FeynCalcExternal"],
+ Cell[5534, 178, 135, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->546432132],
- Cell[4684, 153, 232, 7, 49, "Output",
- CellTags->"FeynCalcExternal",
- CellID->2042610193],
- Cell[4953, 165, 469, 14, 27, "Input",
+ Cell[5672, 184, 211, 6, 51, "Output",
+ CellTags->"FeynCalcExternal"],
+ Cell[5920, 195, 469, 14, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->1924736613],
- Cell[5425, 181, 2007, 83, 46, "Output",
- CellTags->"FeynCalcExternal",
- CellID->1438725943],
- Cell[7469, 269, 135, 4, 27, "Input",
+ Cell[6392, 211, 1747, 72, 42, "Output",
+ CellTags->"FeynCalcExternal"],
+ Cell[8176, 288, 135, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->127506318],
- Cell[7607, 275, 571, 17, 49, "Output",
- CellTags->"FeynCalcExternal",
- CellID->689065963],
- Cell[8215, 297, 140, 4, 27, "Input",
+ Cell[8314, 294, 551, 16, 51, "Output",
+ CellTags->"FeynCalcExternal"],
+ Cell[8902, 315, 140, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->1535054786],
- Cell[8358, 303, 1727, 71, 46, "Output",
- CellTags->"FeynCalcExternal",
- CellID->16755113],
- Cell[10122, 379, 136, 4, 27, "Input",
+ Cell[9045, 321, 1479, 60, 42, "Output",
+ CellTags->"FeynCalcExternal"],
+ Cell[10561, 386, 136, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->1247696784],
- Cell[10261, 385, 1013, 28, 101, "Output",
- CellTags->"FeynCalcExternal",
- CellID->1797900650],
- Cell[11311, 418, 182, 6, 27, "Input",
+ Cell[10700, 392, 992, 27, 103, "Output",
+ CellTags->"FeynCalcExternal"],
+ Cell[11729, 424, 182, 6, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->2037530155],
- Cell[11496, 426, 572, 17, 49, "Output",
- CellTags->"FeynCalcExternal",
- CellID->1902701879],
- Cell[12436, 466, 258, 9, 32, "Text",
- CellTags->"FeynCalcExternal",
- CellID->35172117]}
+ Cell[11914, 432, 551, 16, 51, "Output",
+ CellTags->"FeynCalcExternal"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14603, 524},
- {"FeynCalcExternal", 14746, 528}
+ {"PrimaryExamplesSection", 14996, 528},
+ {"FeynCalcExternal", 15139, 532}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3051, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 432, 13, 82, "Usage",
+Cell[3642, 97, 293, 11, 45, "ObjectNameGrid"],
+Cell[3938, 110, 432, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3387, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4395, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1340436034],
+ CellID->771519112],
Cell[CellGroupData[{
-Cell[3800, 114, 195, 6, 25, "ExampleSection",
- CellID->549088434],
+Cell[4807, 146, 196, 6, 26, "ExampleSection",
+ CellID->1246622663],
Cell[CellGroupData[{
-Cell[4020, 124, 180, 5, 27, "Input",
+Cell[5028, 156, 180, 5, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->642848596],
-Cell[4203, 131, 306, 11, 39, "Output",
- CellTags->"FeynCalcExternal",
- CellID->539530492]
+Cell[5211, 163, 286, 10, 40, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4546, 147, 135, 4, 27, "Input",
+Cell[5534, 178, 135, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->546432132],
-Cell[4684, 153, 232, 7, 49, "Output",
- CellTags->"FeynCalcExternal",
- CellID->2042610193]
+Cell[5672, 184, 211, 6, 51, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4953, 165, 469, 14, 27, "Input",
+Cell[5920, 195, 469, 14, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->1924736613],
-Cell[5425, 181, 2007, 83, 46, "Output",
- CellTags->"FeynCalcExternal",
- CellID->1438725943]
+Cell[6392, 211, 1747, 72, 42, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7469, 269, 135, 4, 27, "Input",
+Cell[8176, 288, 135, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->127506318],
-Cell[7607, 275, 571, 17, 49, "Output",
- CellTags->"FeynCalcExternal",
- CellID->689065963]
+Cell[8314, 294, 551, 16, 51, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8215, 297, 140, 4, 27, "Input",
+Cell[8902, 315, 140, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->1535054786],
-Cell[8358, 303, 1727, 71, 46, "Output",
- CellTags->"FeynCalcExternal",
- CellID->16755113]
+Cell[9045, 321, 1479, 60, 42, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10122, 379, 136, 4, 27, "Input",
+Cell[10561, 386, 136, 4, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->1247696784],
-Cell[10261, 385, 1013, 28, 101, "Output",
- CellTags->"FeynCalcExternal",
- CellID->1797900650]
+Cell[10700, 392, 992, 27, 103, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11311, 418, 182, 6, 27, "Input",
+Cell[11729, 424, 182, 6, 27, "Input",
CellTags->"FeynCalcExternal",
CellID->2037530155],
-Cell[11496, 426, 572, 17, 49, "Output",
- CellTags->"FeynCalcExternal",
- CellID->1902701879]
+Cell[11914, 432, 551, 16, 51, "Output",
+ CellTags->"FeynCalcExternal"]
}, Open ]]
}, Open ]],
-Cell[12095, 447, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12492, 452, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12163, 452, 270, 12, 31, "SeeAlsoSection",
+Cell[12560, 457, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12436, 466, 258, 9, 32, "Text",
- CellTags->"FeynCalcExternal",
- CellID->35172117]
+Cell[12833, 471, 211, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[12709, 478, 23, 0, 42, "FooterCell"]
+Cell[13059, 481, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcForm.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcForm.nb
index 07f314b37..ea9b938f4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcForm.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcForm.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14143, 475]
-NotebookOptionsPosition[ 8999, 319]
-NotebookOutlinePosition[ 12566, 417]
-CellTagsIndexPosition[ 12450, 411]
+NotebookDataLength[ 15691, 529]
+NotebookOptionsPosition[ 11036, 392]
+NotebookOutlinePosition[ 14241, 478]
+CellTagsIndexPosition[ 14125, 472]
WindowTitle->FeynCalcForm
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalcForm\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynCalcForm"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FC"], "\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FeynCalcInternal\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalcInternal"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalcForm\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynCalcForm"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynCalcForm.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$67523],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynCalcForm", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$134339],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynCalcForm", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ FeynCalcForm.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynCalcForm", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynCalcForm", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,7 +149,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->693458567],
+ CellID->1276139522],
Cell[CellGroupData[{
@@ -124,11 +159,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1231677925],
+ CellID->318448114],
-Cell["This is the normal notebook display:", "Text",
- CellTags->"FeynCalcForm",
- CellID->1383220456],
+Cell["This is the normal notebook display:", "Notes"],
Cell[CellGroupData[{
@@ -169,19 +202,16 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{104, 19},
+ ImageSize->{116, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcForm",
- CellLabel->"Out[1]=",
- CellID->2135875157]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
This is the shorthand (terminal) display (easy-to-read form):\
-\>", "Text",
- CellTags->"FeynCalcForm",
- CellID->981626969],
+\>", "Notes"],
Cell[BoxData[
RowBox[{
@@ -193,14 +223,15 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{
RowBox[{"SetOptions", "[",
- RowBox[{"$FrontEnd", ",",
+ RowBox[{"$FrontEndSession", ",",
RowBox[{"Evaluate", "[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Options", "[",
- RowBox[{"$FrontEnd", ",", "\"\\""}],
- "]"}], "/.",
+ RowBox[{
+ "$FrontEndSession", ",", "\"\\""}], "]"}],
+ "/.",
RowBox[{
RowBox[{"(",
RowBox[{"\"\\"", "\[Rule]", "_"}], ")"}], "\[Rule]",
@@ -228,19 +259,19 @@ Cell[OutputFormData["\<\
SUNTrace[SUNT[SUNIndex[a]] . SUNT[SUNIndex[b]] .
SUNT[SUNIndex[c]]]\
\>", "\<\
-tr[T[a] T[b] T[c]]\
+SUNTrace[SUNT[SUNIndex[a]] . SUNT[SUNIndex[b]] .
+
+
+ SUNT[SUNIndex[c]]]\
\>"], "Output",
- ImageSize->{144, 20},
+ ImageSize->{392, 50},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcForm",
- CellLabel->"Out[4]=",
- CellID->1930690446]
+ CellLabel->"Out[4]="]
}, Open ]],
-Cell["Reset to normal notebook display:", "Text",
- CellTags->"FeynCalcForm",
- CellID->1776666281],
+Cell["Reset to normal notebook display:", "Notes"],
Cell[BoxData[
RowBox[{
@@ -252,14 +283,15 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{
RowBox[{"SetOptions", "[",
- RowBox[{"$FrontEnd", ",",
+ RowBox[{"$FrontEndSession", ",",
RowBox[{"Evaluate", "[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Options", "[",
- RowBox[{"$FrontEnd", ",", "\"\\""}],
- "]"}], "/.",
+ RowBox[{
+ "$FrontEndSession", ",", "\"\\""}], "]"}],
+ "/.",
RowBox[{
RowBox[{"(",
RowBox[{"\"\\"", "\[Rule]", "_"}], ")"}], "\[Rule]",
@@ -269,7 +301,50 @@ Cell[BoxData[
RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "]"}], ";"}]], "Input",
CellTags->"FeynCalcForm",
CellLabel->"In[6]:=",
- CellID->803099917]
+ CellID->803099917],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNTrace", "[",
+ RowBox[{
+ RowBox[{"SUNT", "[", "a", "]"}], ".",
+ RowBox[{"SUNT", "[", "b", "]"}], ".",
+ RowBox[{"SUNT", "[", "c", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"tr\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{116, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -310,9 +385,7 @@ Cell[TextData[{
ButtonNote->"FeynCalcInternal"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynCalcForm",
- CellID->1584845220]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -320,7 +393,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FeynCalcForm",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -329,10 +402,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 48.450259}",
+ "built" -> "{2020, 1, 5, 18, 57, 37.694365}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -344,11 +417,12 @@ session. Whether the result of FeynCalcForm[expr] is displayed or not, \
depends on the setting of $PrePrint. $PrePrint = FeynCalcForm forces \
displaying everything after applying FeynCalcForm. In order to change to the \
normal (internal) Mathematica OutputForm, do: ($PrePrint=.).",
- "synonyms" -> {}, "title" -> "FeynCalcForm", "titlemodifier" -> "",
- "windowtitle" -> "FeynCalcForm", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FeynCalcForm"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FeynCalcForm",
+ "titlemodifier" -> "", "windowtitle" -> "FeynCalcForm", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FeynCalcForm"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -356,8 +430,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -366,117 +441,96 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3750, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4942, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->693458567]},
+ CellID->1276139522]},
"FeynCalcForm"->{
- Cell[4361, 128, 100, 2, 32, "Text",
- CellTags->"FeynCalcForm",
- CellID->1383220456],
- Cell[4486, 134, 261, 8, 27, "Input",
+ Cell[5631, 167, 261, 8, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1625719649],
- Cell[4750, 144, 766, 32, 40, "Output",
- CellTags->"FeynCalcForm",
- CellID->2135875157],
- Cell[5531, 179, 132, 4, 32, "Text",
- CellTags->"FeynCalcForm",
- CellID->981626969],
- Cell[5666, 185, 167, 5, 27, "Input",
+ Cell[5895, 177, 745, 31, 40, "Output",
+ CellTags->"FeynCalcForm"],
+ Cell[6744, 215, 167, 5, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1192476093],
- Cell[5836, 192, 665, 20, 63, "Input",
+ Cell[6914, 222, 688, 21, 63, "Input",
CellTags->"FeynCalcForm",
CellID->204502333],
- Cell[6526, 216, 261, 8, 27, "Input",
+ Cell[7627, 247, 261, 8, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1641498185],
- Cell[6790, 226, 301, 11, 41, "Output",
- CellTags->"FeynCalcForm",
- CellID->1930690446],
- Cell[7106, 240, 97, 2, 32, "Text",
- CellTags->"FeynCalcForm",
- CellID->1776666281],
- Cell[7206, 244, 142, 5, 27, "Input",
+ Cell[7891, 257, 335, 13, 71, "Output",
+ CellTags->"FeynCalcForm"],
+ Cell[8294, 275, 142, 5, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1847759077],
- Cell[7351, 251, 670, 20, 63, "Input",
+ Cell[8439, 282, 693, 21, 63, "Input",
CellTags->"FeynCalcForm",
- CellID->803099917],
- Cell[8377, 293, 580, 21, 70, "Text",
- CellTags->"FeynCalcForm",
- CellID->1584845220]}
+ CellID->803099917]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11184, 367},
- {"FeynCalcForm", 11323, 371}
+ {"PrimaryExamplesSection", 13267, 442},
+ {"FeynCalcForm", 13407, 446}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3219, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 819, 19, 146, "Usage",
+Cell[3806, 100, 289, 11, 45, "ObjectNameGrid"],
+Cell[4098, 113, 819, 19, 136, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3750, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4942, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->693458567],
+ CellID->1276139522],
Cell[CellGroupData[{
-Cell[4162, 120, 196, 6, 25, "ExampleSection",
- CellID->1231677925],
-Cell[4361, 128, 100, 2, 32, "Text",
- CellTags->"FeynCalcForm",
- CellID->1383220456],
+Cell[5355, 155, 195, 6, 26, "ExampleSection",
+ CellID->318448114],
+Cell[5553, 163, 53, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4486, 134, 261, 8, 27, "Input",
+Cell[5631, 167, 261, 8, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1625719649],
-Cell[4750, 144, 766, 32, 40, "Output",
- CellTags->"FeynCalcForm",
- CellID->2135875157]
+Cell[5895, 177, 745, 31, 40, "Output",
+ CellTags->"FeynCalcForm"]
}, Open ]],
-Cell[5531, 179, 132, 4, 32, "Text",
- CellTags->"FeynCalcForm",
- CellID->981626969],
-Cell[5666, 185, 167, 5, 27, "Input",
+Cell[6655, 211, 86, 2, 32, "Notes"],
+Cell[6744, 215, 167, 5, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1192476093],
-Cell[5836, 192, 665, 20, 63, "Input",
+Cell[6914, 222, 688, 21, 63, "Input",
CellTags->"FeynCalcForm",
CellID->204502333],
Cell[CellGroupData[{
-Cell[6526, 216, 261, 8, 27, "Input",
+Cell[7627, 247, 261, 8, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1641498185],
-Cell[6790, 226, 301, 11, 41, "Output",
- CellTags->"FeynCalcForm",
- CellID->1930690446]
+Cell[7891, 257, 335, 13, 71, "Output",
+ CellTags->"FeynCalcForm"]
}, Open ]],
-Cell[7106, 240, 97, 2, 32, "Text",
- CellTags->"FeynCalcForm",
- CellID->1776666281],
-Cell[7206, 244, 142, 5, 27, "Input",
+Cell[8241, 273, 50, 0, 32, "Notes"],
+Cell[8294, 275, 142, 5, 27, "Input",
CellTags->"FeynCalcForm",
CellID->1847759077],
-Cell[7351, 251, 670, 20, 63, "Input",
+Cell[8439, 282, 693, 21, 63, "Input",
CellTags->"FeynCalcForm",
- CellID->803099917]
+ CellID->803099917],
+Cell[CellGroupData[{
+Cell[9157, 307, 213, 6, 27, "Input"],
+Cell[9373, 315, 718, 30, 40, "Output"]
+}, Open ]]
}, Open ]],
-Cell[8036, 274, 31, 0, 70, "SectionFooterSpacer"]
+Cell[10118, 349, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8104, 279, 270, 12, 70, "SeeAlsoSection",
+Cell[10186, 354, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8377, 293, 580, 21, 70, "Text",
- CellTags->"FeynCalcForm",
- CellID->1584845220]
+Cell[10459, 368, 535, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[8972, 317, 23, 0, 70, "FooterCell"]
+Cell[11009, 390, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcInternal.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcInternal.nb
index a5ba18cea..261375aa8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcInternal.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcInternal.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21439, 768]
-NotebookOptionsPosition[ 15739, 588]
-NotebookOutlinePosition[ 19355, 691]
-CellTagsIndexPosition[ 19235, 685]
+NotebookDataLength[ 21790, 766]
+NotebookOptionsPosition[ 16505, 605]
+NotebookOutlinePosition[ 19911, 699]
+CellTagsIndexPosition[ 19791, 693]
WindowTitle->FeynCalcInternal
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalcInternal\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynCalcInternal"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FCI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCI"], "\<\"FCE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynCalcInternal\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynCalcInternal"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynCalcInternal.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$67865],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynCalcInternal", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$134782],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynCalcInternal", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ FeynCalcInternal.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynCalcInternal", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynCalcInternal", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1620212646],
+ CellID->688688892],
Cell[CellGroupData[{
@@ -118,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1845158141],
+ CellID->915609596],
Cell[CellGroupData[{
@@ -182,46 +217,35 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ",",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ",",
- FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[1]=",
- CellID->1418441538]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -244,12 +268,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[2]//StandardForm=",
- CellID->603554670]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -295,43 +318,32 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ",",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], ",",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["\[Alpha]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{213, 25},
+ TraditionalForm]}]], ",",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{234, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[3]=",
- CellID->618861015]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -365,12 +377,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}], "}"}]], "Output",
- ImageSize->{521, 67},
+ ImageSize->{523, 67},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1678932419]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -395,12 +406,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "}"}]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{424, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[5]//StandardForm=",
- CellID->44863235]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -465,11 +475,22 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]], ",",
- FractionBox["1",
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"]], ",",
- SuperscriptBox["\[Epsilon]",
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]],
+ TraditionalForm], ",",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -487,12 +508,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{231, 47},
+ ImageSize->{249, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[6]=",
- CellID->164140775]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -530,14 +550,13 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
- RowBox[{"LorentzIndex", "[", "\[Sigma]", "]"}], ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}]}], "}"}]], "Output",
- ImageSize->{505, 101},
+ RowBox[{"LorentzIndex", "[", "\[Sigma]", "]"}]}], "]"}]}],
+ "}"}]], "Output",
+ ImageSize->{573, 84},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynCalcInternal",
- CellLabel->"Out[7]//StandardForm=",
- CellID->700854959]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -579,17 +598,15 @@ Cell[TextData[{
ButtonNote->"FCE"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynCalcInternal",
- CellID->1416834624]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FeynCalcInternal",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -598,22 +615,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 49.988209}",
+ "built" -> "{2020, 1, 5, 18, 57, 38.810751}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FeynCalcInternal[exp] translates exp into the internal FeynCalc \
-(abstract data-type) representation.", "synonyms" -> {}, "title" ->
- "FeynCalcInternal", "titlemodifier" -> "", "windowtitle" ->
+(abstract data-type) representation.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FeynCalcInternal", "titlemodifier" -> "", "windowtitle" ->
"FeynCalcInternal", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynCalcInternal"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -621,8 +638,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -631,145 +649,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3388, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4556, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1620212646]},
+ CellID->688688892]},
"FeynCalcInternal"->{
- Cell[4022, 124, 469, 14, 27, "Input",
+ Cell[5188, 159, 469, 14, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1722777606],
- Cell[4494, 140, 2007, 83, 46, "Output",
- CellTags->"FeynCalcInternal",
- CellID->1418441538],
- Cell[6538, 228, 136, 4, 27, "Input",
+ Cell[5660, 175, 1747, 72, 42, "Output",
+ CellTags->"FeynCalcInternal"],
+ Cell[7444, 252, 136, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1982442552],
- Cell[6677, 234, 571, 17, 49, "Output",
- CellTags->"FeynCalcInternal",
- CellID->603554670],
- Cell[7285, 256, 140, 4, 27, "Input",
+ Cell[7583, 258, 551, 16, 51, "Output",
+ CellTags->"FeynCalcInternal"],
+ Cell[8171, 279, 140, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1465614164],
- Cell[7428, 262, 1728, 71, 46, "Output",
- CellTags->"FeynCalcInternal",
- CellID->618861015],
- Cell[9193, 338, 136, 4, 27, "Input",
+ Cell[8314, 285, 1479, 60, 42, "Output",
+ CellTags->"FeynCalcInternal"],
+ Cell[9830, 350, 136, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1783117065],
- Cell[9332, 344, 1013, 28, 101, "Output",
- CellTags->"FeynCalcInternal",
- CellID->1678932419],
- Cell[10382, 377, 180, 6, 27, "Input",
+ Cell[9969, 356, 992, 27, 103, "Output",
+ CellTags->"FeynCalcInternal"],
+ Cell[10998, 388, 180, 6, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->53564155],
- Cell[10565, 385, 570, 17, 49, "Output",
- CellTags->"FeynCalcInternal",
- CellID->44863235],
- Cell[11172, 407, 536, 16, 27, "Input",
+ Cell[11181, 396, 551, 16, 51, "Output",
+ CellTags->"FeynCalcInternal"],
+ Cell[11769, 417, 536, 16, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1030775122],
- Cell[11711, 425, 1613, 69, 68, "Output",
- CellTags->"FeynCalcInternal",
- CellID->164140775],
- Cell[13361, 499, 135, 4, 27, "Input",
+ Cell[12308, 435, 1899, 79, 61, "Output",
+ CellTags->"FeynCalcInternal"],
+ Cell[14244, 519, 135, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->438838711],
- Cell[13499, 505, 1282, 34, 135, "Output",
- CellTags->"FeynCalcInternal",
- CellID->700854959],
- Cell[15149, 562, 548, 21, 32, "Text",
- CellTags->"FeynCalcInternal",
- CellID->1416834624]}
+ Cell[14382, 525, 1214, 33, 120, "Output",
+ CellTags->"FeynCalcInternal"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17607, 632},
- {"FeynCalcInternal", 17750, 636}
+ {"PrimaryExamplesSection", 18416, 650},
+ {"FeynCalcInternal", 18559, 654}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3211, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 433, 13, 83, "Usage",
+Cell[3802, 100, 293, 11, 45, "ObjectNameGrid"],
+Cell[4098, 113, 433, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3388, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4556, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1620212646],
+ CellID->688688892],
Cell[CellGroupData[{
-Cell[3801, 114, 196, 6, 25, "ExampleSection",
- CellID->1845158141],
+Cell[4968, 149, 195, 6, 26, "ExampleSection",
+ CellID->915609596],
Cell[CellGroupData[{
-Cell[4022, 124, 469, 14, 27, "Input",
+Cell[5188, 159, 469, 14, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1722777606],
-Cell[4494, 140, 2007, 83, 46, "Output",
- CellTags->"FeynCalcInternal",
- CellID->1418441538]
+Cell[5660, 175, 1747, 72, 42, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6538, 228, 136, 4, 27, "Input",
+Cell[7444, 252, 136, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1982442552],
-Cell[6677, 234, 571, 17, 49, "Output",
- CellTags->"FeynCalcInternal",
- CellID->603554670]
+Cell[7583, 258, 551, 16, 51, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7285, 256, 140, 4, 27, "Input",
+Cell[8171, 279, 140, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1465614164],
-Cell[7428, 262, 1728, 71, 46, "Output",
- CellTags->"FeynCalcInternal",
- CellID->618861015]
+Cell[8314, 285, 1479, 60, 42, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9193, 338, 136, 4, 27, "Input",
+Cell[9830, 350, 136, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1783117065],
-Cell[9332, 344, 1013, 28, 101, "Output",
- CellTags->"FeynCalcInternal",
- CellID->1678932419]
+Cell[9969, 356, 992, 27, 103, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10382, 377, 180, 6, 27, "Input",
+Cell[10998, 388, 180, 6, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->53564155],
-Cell[10565, 385, 570, 17, 49, "Output",
- CellTags->"FeynCalcInternal",
- CellID->44863235]
+Cell[11181, 396, 551, 16, 51, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11172, 407, 536, 16, 27, "Input",
+Cell[11769, 417, 536, 16, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->1030775122],
-Cell[11711, 425, 1613, 69, 68, "Output",
- CellTags->"FeynCalcInternal",
- CellID->164140775]
+Cell[12308, 435, 1899, 79, 61, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13361, 499, 135, 4, 27, "Input",
+Cell[14244, 519, 135, 4, 27, "Input",
CellTags->"FeynCalcInternal",
CellID->438838711],
-Cell[13499, 505, 1282, 34, 135, "Output",
- CellTags->"FeynCalcInternal",
- CellID->700854959]
+Cell[14382, 525, 1214, 33, 120, "Output",
+ CellTags->"FeynCalcInternal"]
}, Open ]]
}, Open ]],
-Cell[14808, 543, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15623, 562, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14876, 548, 270, 12, 31, "SeeAlsoSection",
+Cell[15691, 567, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[15149, 562, 548, 21, 32, "Text",
- CellTags->"FeynCalcInternal",
- CellID->1416834624]
+Cell[15964, 581, 499, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[15712, 586, 23, 0, 42, "FooterCell"]
+Cell[16478, 603, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcToLaTeX.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcToLaTeX.nb
index 9f607eeb5..0969516cb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcToLaTeX.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynCalcToLaTeX.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5615, 150]
-NotebookOptionsPosition[ 3532, 96]
-NotebookOutlinePosition[ 5537, 146]
-CellTagsIndexPosition[ 5494, 143]
+NotebookDataLength[ 7393, 217]
+NotebookOptionsPosition[ 5089, 155]
+NotebookOutlinePosition[ 7082, 206]
+CellTagsIndexPosition[ 7039, 203]
WindowTitle->FeynCalcToLaTeX
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FeynCalcToLaTeX.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$68550],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$135667],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FeynCalcToLaTeX", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,24 +74,82 @@ FeynCalcToLaTeX.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynCalcToLaTeX", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynCalcToLaTeX", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"FeynCalcToLaTeX", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "generates LaTeX with line-breaking for expr. \nFeynCalcToLaTeX[expr, \
-500] generates LaTeX for expr where 500 is the Window width setting for the \
-Mathematica frontend. Increasing its value will generate less line breaks."
+ RowBox[{"FeynCalcToLaTeX", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]generates LaTeX with line-breaking for ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ "."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FeynCalcToLaTeX", "[",
+ RowBox[{"expr", ",", "500"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]generates LaTeX for ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " where 500 is the Window width setting for the Mathematica frontend. \
+Increasing its value will generate less line breaks."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "This function appears to be broken in the recent ",
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " versions, most likely it will be rewritten from scratch in a future \
+version of FeynCalc."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
Cell[" ", "FooterCell"]
},
@@ -106,23 +165,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 52.976412}",
+ "built" -> "{2020, 1, 5, 18, 57, 41.035316}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FeynCalcToLaTeX[expr] generates LaTeX with line-breaking for expr. \
-FeynCalcToLaTeX[expr, 500] generates LaTeX for expr where 500 is the Window \
+ "FeynCalcToLaTeX[exp] generates LaTeX with line-breaking for exp. \
+FeynCalcToLaTeX[expr, 500] generates LaTeX for exp where 500 is the Window \
width setting for the Mathematica frontend. Increasing its value will \
-generate less line breaks.", "synonyms" -> {}, "title" -> "FeynCalcToLaTeX",
- "titlemodifier" -> "", "windowtitle" -> "FeynCalcToLaTeX", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FeynCalcToLaTeX"}},
+generate less line breaks.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FeynCalcToLaTeX", "titlemodifier" -> "", "windowtitle" ->
+ "FeynCalcToLaTeX", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FeynCalcToLaTeX"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -131,7 +191,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -145,13 +205,20 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 2302, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2892, 76, 292, 11, 70, "ObjectNameGrid"],
+Cell[3187, 89, 821, 22, 70, "Usage",
+ CellID->2010081510],
+Cell[CellGroupData[{
+Cell[4033, 115, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
CellID->1],
-Cell[2863, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 578, 14, 70, "Usage",
- CellID->982511436],
-Cell[3505, 94, 23, 0, 70, "FooterCell"]
+Cell[4766, 141, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4800, 143, 247, 7, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[5062, 153, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynRule.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynRule.nb
index fcc95a3a0..d1447977f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynRule.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynRule.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 108718, 4060]
-NotebookOptionsPosition[ 94644, 3573]
-NotebookOutlinePosition[ 102339, 3812]
-CellTagsIndexPosition[ 102225, 3806]
+NotebookDataLength[ 100307, 3704]
+NotebookOptionsPosition[ 93137, 3475]
+NotebookOutlinePosition[ 95412, 3538]
+CellTagsIndexPosition[ 95298, 3532]
WindowTitle->FeynRule
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynRule\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynRule"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FeynRule.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Lagrangian\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Lagrangian"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynRule\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynRule"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FeynRule.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$70579],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynRule", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$138323],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynRule", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynRule", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynRule", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -82,11 +116,12 @@ Cell[BoxData[GridBox[{
RowBox[{"FeynRule", "[",
RowBox[{"lag", ",", " ",
RowBox[{"{", "fields", "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "derives the Feynman rule corresponding to the field configuration \
-fields of the lagrangian lag.\n\nFeynRule does not calculate propagator \
-Feynman rules.\n\nThe option ZeroMomentumInsertion can be used for twist-2 \
-and higher twist operators."
+ " \[LineSeparator]derives the Feynman rule corresponding to the field \
+configuration ",
+ Cell[BoxData["fields"], "InlineFormula"],
+ " of the lagrangian ",
+ Cell[BoxData["lag"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,6 +132,105 @@ and higher twist operators."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->290293433],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ ButtonBox["FeynRule",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynRule",
+ ButtonNote->"FeynRule"],
+ " does not calculate propagator Feynman rules."
+}], "Notes"],
+
+Cell[TextData[{
+ "The option ",
+ ButtonBox["ZeroMomentumInsertion",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ZeroMomentumInsertion",
+ ButtonNote->"ZeroMomentumInsertion"],
+ " can be used for twist-2 and higher twist operators."
+}], "Notes"],
+
+Cell[TextData[{
+ ButtonBox["FeynRule",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynRule",
+ ButtonNote->"FeynRule"],
+ " is not very versatile and was primarily developed for QCD calculations. It \
+is often more useful when dealing with bosonic fields than with fermions. If \
+you need a more powerful and universal solution for deriving Feynman rules, \
+have a look at the standalone ",
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " Package ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["FeynRules"]],"http://feynrules.irmp.ucl.ac.be/"},
+ "WebLink",
+ BaseStyle->{"Notes"}]]],
+ " (not related to FeynCalc)."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FeynRule", "]"}]], "Input",
+ CellLabel->"In[31]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Anti5", "\[Rule]",
+ RowBox[{"-", "\[Infinity]"}]}], ",",
+ RowBox[{"Assumptions", "\[Rule]", "Automatic"}], ",",
+ RowBox[{"Contract", "\[Rule]", "False"}], ",",
+ RowBox[{"Factor1", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"FCPartialD", "\[Rule]", "RightPartialD"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Schouten", "\[Rule]", "False"}], ",",
+ RowBox[{"ZeroMomentumInsertion", "\[Rule]", "True"}], ",",
+ RowBox[{"InitialFunction", "\[Rule]", "Identity"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{473, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[31]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,1325 +242,998 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->228290916],
+ CellID->449434060],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(5)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->77448669],
+ CellID->152723255],
+
+Cell[TextData[{
+ "Derive the Feyman rule for the ",
+ Cell[BoxData[
+ SuperscriptBox["\[Phi]", "4"]], "InlineFormula"],
+ " theory."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "FeynRule", "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[1]:=",
- CellID->1110862301],
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", " ", "\[Lambda]"}], "/",
+ RowBox[{"4", "!"}]}], " ",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}], "^", "4"}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Anti5", "\[Rule]",
- RowBox[{"-", "\[Infinity]"}]}], ",",
- RowBox[{"Assumptions", "\[Rule]", "Automatic"}], ",",
- RowBox[{"Contract", "\[Rule]", "False"}], ",",
- RowBox[{"Factor1", "\[Rule]", "False"}], ",",
- RowBox[{"FinalSubstitutions", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"FCPartialD", "\[Rule]", "RightPartialD"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"Schouten", "\[Rule]", "False"}], ",",
- RowBox[{"ZeroMomentumInsertion", "\[Rule]", "True"}], ",",
- RowBox[{"InitialFunction", "\[Rule]", "Identity"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{528, 54},
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[Lambda]", " ",
+ SuperscriptBox[
+ FormBox["\[Phi]",
+ TraditionalForm], "4"]}], "24"]}], TraditionalForm]], "Output",
+ ImageSize->{48, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[1]=",
- CellID->2080342182]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"gou", "=",
- RowBox[{"Lagrangian", "[", "\"\\"", "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[2]:=",
- CellID->365740759],
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}], "[", "p1", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}], "[", "p2", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}], "[", "p3", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}], "[", "p4", "]"}]}],
+ "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["\[ImaginaryI]",
- RowBox[{"m", "-", "1"}]], " ",
+ RowBox[{"-", "\[ImaginaryI]"}], " ", "\[Lambda]"}],
+ TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["Derive the Feyman rule for the quark-gluon vertex", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"I", " ",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "AntiQuarkField", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"QuantumField", "[", "QuarkField", "]"}]}]}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
- SubsuperscriptBox["F",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ FormBox[
+ OverscriptBox["\[Psi]", "_"],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]}],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ SubscriptBox["D",
+ FormBox["\[Mu]",
TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubsuperscriptBox["D",
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm]}]], ")"}],
- RowBox[{"m", "-", "2"}]], ".",
- SubsuperscriptBox["F",
+ FormBox["\[Psi]",
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{94, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{355, 41},
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p1", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "QuarkField", "]"}], "[", "p2", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "AntiQuarkField", "]"}], "[", "p3",
+ "]"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{82, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[2]=",
- CellID->1817291236]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"gop", "=",
- RowBox[{"Lagrangian", "[", "\"\\"", "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[3]:=",
- CellID->231547110],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["Derive the Feyman rule for the 4-gluon vertex.", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "4"]}], " ",
+ RowBox[{
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "i"}], "]"}], ".",
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "i"}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["\[ImaginaryI]", "m"], " ",
+ RowBox[{"-",
+ FractionBox["1", "4"]}], " ",
RowBox[{
- FormBox[
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], ".",
SubsuperscriptBox["F",
RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
+ FormBox["\[Alpha]",
TraditionalForm],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
+ FormBox["\[Beta]",
TraditionalForm]}],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ FormBox["i",
TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubsuperscriptBox["D",
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm]}]], ")"}],
- RowBox[{"m", "-", "2"}]], ".",
SubsuperscriptBox["F",
RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
+ FormBox["\[Alpha]",
TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm]}],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ FormBox["i",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{553, 41},
+ ImageSize->{94, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[3]=",
- CellID->230270815]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Explicit", "[", "gop", "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[4]:=",
- CellID->2084194058],
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p1", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Nu]", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "p2", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Rho]", "}"}], ",",
+ RowBox[{"{", "c", "}"}]}], "]"}], "[", "p3", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Sigma]", "}"}], ",",
+ RowBox[{"{", "d", "}"}]}], "]"}], "[", "p4", "]"}]}], "}"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["\[ImaginaryI]", "m"], " ",
- RowBox[{
- SuperscriptBox["\[Epsilon]",
+ RowBox[{"\[ImaginaryI]", " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
+ FormBox["a",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"si550\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"si550\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]], ".",
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- SubscriptBox["g", "s"], " ",
- SuperscriptBox["f",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["b24",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c25",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["b24",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]], ".",
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c25",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]}]]}]}], ")"}]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"si550\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"si550\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]]}], "-",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]]}]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubsuperscriptBox["D",
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm]}]], ")"}],
- RowBox[{"m", "-", "2"}]], ".",
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"si550\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"si550\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- SubscriptBox["g", "s"], " ",
- SuperscriptBox["f",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["b26",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c27",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["b26",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]], ".",
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["c27",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]]}]}], "+",
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
+ TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- SubsuperscriptBox[
- FormBox["A",
+ TraditionalForm]}]]}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{434, 72},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u663\"\>", ")"}],
TraditionalForm],
- TraditionalForm]]}], "-",
- RowBox[{
- SubscriptBox["\[PartialD]",
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u663\"\>", ")"}],
TraditionalForm],
- TraditionalForm]]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{550, 154},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[4]=",
- CellID->1724255356]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Cases2", "[",
- RowBox[{"%", ",", "QuantumField"}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[5]:=",
- CellID->1005254277],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b26",
- TraditionalForm],
- TraditionalForm]], ",",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b24",
- TraditionalForm],
- TraditionalForm]], ",",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c25",
- TraditionalForm],
- TraditionalForm]], ",",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c27",
- TraditionalForm],
- TraditionalForm]], ",",
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]]}], ",",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]]}], ",",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]]}], ",",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{371, 68},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[5]=",
- CellID->1380033212]
-}, Open ]],
-
-Cell["2-gluon Feynman rules (unpolarized)", "Text",
- CellTags->"FeynRule",
- CellID->1873597477],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"fi", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Nu]", "}"}], ",",
- RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}]}], "}"}]}]], "Input",\
-
- CellTags->"FeynRule",
- CellLabel->"In[6]:=",
- CellID->1070076155],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["q",
- TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{113, 25},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[6]=",
- CellID->1378008374]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"f2u", "=",
- RowBox[{"FullSimplify", "/@",
- RowBox[{"Factor2", "[",
- RowBox[{"FeynRule", "[",
- RowBox[{"gou", ",", "fi", ",",
- RowBox[{"ZeroMomentumInsertion", "\[Rule]", "False"}]}], "]"}],
- "]"}]}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[7]:=",
- CellID->1360773115],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], "m"], " ",
- SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]}], "+",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], "m"], " ",
- SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- RowBox[{"(",
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], "+",
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "+",
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"u663\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
RowBox[{
FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"u663\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "-",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{"2", " ",
- SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"u663\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"], " ",
- SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
+ RowBox[{"FCGV", "(", "\<\"u663\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{511, 79},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{436, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[7]=",
- CellID->587598]
+ CellLabel->"Out[3]="]
}, Open ]],
-Cell["2-gluon Feynman rules (polarized)", "Text",
- CellTags->"FeynRule",
- CellID->1948485262],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCCanonicalizeDummyIndices", "[",
+ RowBox[{"%", "-", "%%"}], "]"}], "//", "Factor"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"fi", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Nu]", "}"}], ",",
- RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}]}], "}"}]}]], "Input",\
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
- CellTags->"FeynRule",
- CellLabel->"In[8]:=",
- CellID->1064711177],
+Cell["Derive the Feyman rule for the 3-gluon vertex.", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "4"]}], " ",
+ RowBox[{
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "i"}], "]"}], ".",
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "i"}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "4"]}], " ",
RowBox[{
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
+ SubsuperscriptBox["F",
+ RowBox[{
+ FormBox["\[Alpha]",
TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Beta]",
+ TraditionalForm]}],
+ FormBox["i",
+ TraditionalForm]], ".",
+ SubsuperscriptBox["F",
+ RowBox[{
+ FormBox["\[Alpha]",
TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["q",
- TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{113, 25},
+ FormBox["\[Beta]",
+ TraditionalForm]}],
+ FormBox["i",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{94, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[8]=",
- CellID->306238305]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"f2p", "=",
- RowBox[{"FullSimplify", "/@",
- RowBox[{"Factor2", "[",
- RowBox[{"FeynRule", "[",
- RowBox[{"gop", ",", "fi", ",",
- RowBox[{"ZeroMomentumInsertion", "\[Rule]", "False"}]}], "]"}],
- "]"}]}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[9]:=",
- CellID->1030963620],
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Nu]", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Rho]", "}"}], ",",
+ RowBox[{"{", "c", "}"}]}], "]"}], "[", "r", "]"}]}], "}"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{"-",
- RowBox[{
- FractionBox["1",
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
RowBox[{
SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
FormBox[
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"], " ",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "-",
+ RowBox[{
SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
FormBox[
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}],
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]}]],
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
RowBox[{
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], "m"], " ",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]]}]}], ")"}]}], "-",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
RowBox[{
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], "m"], " ",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}]}]}],
- TraditionalForm]], "Output",
- ImageSize->{521, 81},
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{440, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[9]=",
- CellID->256890280]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Factor2", "[",
- RowBox[{"Calc", "[",
- RowBox[{
- RowBox[{"f2p", "/.",
- RowBox[{"p", "\[Rule]",
- RowBox[{"-", "q"}]}]}], ",",
- RowBox[{"Assumptions", "\[Rule]", "Automatic"}]}], "]"}], "]"}]], "Input",\
-
- CellTags->"FeynRule",
- CellLabel->"In[10]:=",
- CellID->2139802029],
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}],
- RowBox[{"m", "+", "1"}]], "+", "1"}], ")"}], " ",
- SuperscriptBox["\[Delta]",
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox["f",
RowBox[{
FormBox[
FormBox["a",
@@ -1435,80 +1242,198 @@ Cell[BoxData[
FormBox[
FormBox["b",
TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}],
- RowBox[{"m", "-", "1"}]], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["c",
TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{267, 24},
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{413, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[10]=",
- CellID->182487379]
+ CellLabel->"Out[3]="]
}, Open ]],
-Cell["\<\
-Compare with the Feynman rule tabulated in Twist2GluonOperator.\
-\>", "Text",
- CellTags->"FeynRule",
- CellID->163895632],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"%", "-", "%%"}], "]"}], "//", "Factor"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Twist2GluonOperator", "[",
- RowBox[{"q", ",",
- RowBox[{"{",
- RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["Derive the Feynman rules for the Higgs EFT.", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{"1", "/", "4"}], ")"}]}], " ", "CH", " ",
+ RowBox[{
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"mu", ",", "nu", ",", "a"}], "]"}], ".",
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"mu", ",", "nu", ",", "a"}], "]"}], ".",
+ RowBox[{"QuantumField", "[", "H", "]"}]}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "4"]}], " ", "CH", " ",
+ RowBox[{
+ SubsuperscriptBox["F",
+ RowBox[{
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["nu",
+ TraditionalForm]}],
+ FormBox["a",
+ TraditionalForm]], ".",
+ SubsuperscriptBox["F",
+ RowBox[{
+ FormBox["mu",
+ TraditionalForm],
+ FormBox["nu",
+ TraditionalForm]}],
+ FormBox["a",
+ TraditionalForm]], ".",
+ FormBox["H",
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{156, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell["Higgs-gg vertex.", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%", ",",
RowBox[{"{",
- RowBox[{"\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"Polarization", "\[Rule]", "1"}], ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[11]:=",
- CellID->1311336663],
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "i", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p1", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "j", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "p2", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "H", "]"}], "[", "p3", "]"}]}], "}"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}], "m"],
- TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"-", "\[ImaginaryI]"}], " ", "CH", " ",
SuperscriptBox["\[Delta]",
RowBox[{
FormBox[
@@ -1519,306 +1444,621 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["q",
+ FormBox["j",
TraditionalForm],
- TraditionalForm]}], ")"}],
- RowBox[{"m", "-", "1"}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{250, 24},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[11]=",
- CellID->1828007555]
-}, Open ]],
-
-Cell["quark-quark Feynman rule (unpolarized)", "Text",
- CellTags->"FeynRule",
- CellID->1475726296],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"qo", "=",
- RowBox[{"Lagrangian", "[", "\"\\"", "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[12]:=",
- CellID->940220202],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[ImaginaryI]", "m"], " ",
- RowBox[{
- FormBox[
- OverscriptBox["\[Psi]", "_"],
- TraditionalForm], ".",
- RowBox[{"(",
+ TraditionalForm]]}], "-",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- SubscriptBox["D",
- FormBox["\[CapitalDelta]",
- TraditionalForm]],
- RowBox[{"m", "-", "1"}]], ".",
- FormBox["\[Psi]",
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{156, 21},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{257, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[12]=",
- CellID->427583807]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["quark-quark -gluon-gluon Feynman rule (unpolarized)", "Text",
- CellTags->"FeynRule",
- CellID->624473640],
+Cell["Higgs-ggg vertex.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"qo", "=",
- RowBox[{"Lagrangian", "[", "\"\\"", "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[13]:=",
- CellID->463480668],
+ RowBox[{
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "i", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p1", "]"}], ",", "\n", "\t",
+
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "j", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "p2", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "k", "}"}], ",",
+ RowBox[{"{", "c", "}"}]}], "]"}], "[", "p3", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "H", "]"}], "[", "p4", "]"}]}], "}"}]}],
+ "]"}], "//", "Simplify"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- SuperscriptBox["\[ImaginaryI]", "m"], " ",
- RowBox[{
- FormBox[
- OverscriptBox["\[Psi]", "_"],
- TraditionalForm], ".",
- RowBox[{"(",
+ RowBox[{"CH", " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- SubscriptBox["D",
- FormBox["\[CapitalDelta]",
- TraditionalForm]],
- RowBox[{"m", "-", "1"}]], ".",
- FormBox["\[Psi]",
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{156, 21},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{496, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell["Higgs-gggg vertex.", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%%%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "i", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p1", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "j", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "p2", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "k", "}"}], ",",
+ RowBox[{"{", "c", "}"}]}], "]"}], "[", "p3", "]"}], ",", "\n",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "l", "}"}], ",",
+ RowBox[{"{", "d", "}"}]}], "]"}], "[", "p4", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "H", "]"}], "[", "p5", "]"}]}], "}"}]}],
+ "]"}], "//", "\n",
+ RowBox[{
+ RowBox[{"FCCanonicalizeDummyIndices", "[",
+ RowBox[{"#", ",",
+ RowBox[{"SUNIndexNames", "->",
+ RowBox[{"{", "e", "}"}]}]}], "]"}], "&"}]}], "//",
+ RowBox[{
+ RowBox[{"Collect2", "[",
+ RowBox[{"#", ",", "SUNF", ",", "\n",
+ RowBox[{"FCFactorOut", "->", " ",
+ RowBox[{"I", " ", "CH", " ",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}]}]}], "]"}],
+ "&"}]}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ", "CH", " ",
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{511, 47},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[13]=",
- CellID->596814988]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"qggf", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[", "QuarkField", "]"}], "[", "p", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[", "AntiQuarkField", "]"}], "[", "q", "]"}],
- ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"{", "a", "}"}]}], "]"}], "[", "r", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Nu]", "}"}], ",",
- RowBox[{"{", "b", "}"}]}], "]"}], "[", "s", "]"}]}], "}"}]}]], "Input",\
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
- CellTags->"FeynRule",
- CellLabel->"In[14]:=",
- CellID->1181779598],
+Cell["Some OPE-related examples:", "Notes"],
+
+Cell["2-gluon Feynman rules (unpolarized).", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Lagrangian", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ SuperscriptBox["\[ImaginaryI]",
+ RowBox[{"m", "-", "1"}]], " ",
RowBox[{
- RowBox[{
- FormBox["\[Psi]",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox["p",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ",",
- RowBox[{
- FormBox[
- OverscriptBox["\[Psi]", "_"],
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox["q",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ SubsuperscriptBox["F",
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["a",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], "(",
- FormBox["r",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubsuperscriptBox["D",
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm],
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ TraditionalForm]}]], ")"}],
+ RowBox[{"m", "-", "2"}]], ".",
+ SubsuperscriptBox["F",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], "(",
- FormBox["s",
- TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{212, 25},
+ TraditionalForm]}],
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{358, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[14]=",
- CellID->1382795551]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"n4", "=",
+ RowBox[{
RowBox[{"FeynRule", "[",
- RowBox[{"qo", ",", "qggf", ",",
- RowBox[{"ZeroMomentumInsertion", "\[Rule]", "True"}], ",",
- RowBox[{"InitialFunction", "\[Rule]", "Identity"}]}], "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[15]:=",
- CellID->920183877],
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Nu]", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}]}], "}"}], ",",
+ RowBox[{"ZeroMomentumInsertion", "\[Rule]", "False"}]}], "]"}], "//",
+ "Factor"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}],
- RowBox[{"m", "+", "1"}]], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["\[Delta]",
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["a",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["b",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SubsuperscriptBox["g", "s", "2"], " ",
- RowBox[{
- SuperscriptBox["T",
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["T",
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], ".",
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"j", "=", "0"}],
- RowBox[{
- RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
- HoldForm],
- TraditionalForm],
- FormBox[
- RowBox[{"\<\"\"\>", " ",
- RowBox[{"(",
- RowBox[{"j", "+", "1"}], ")"}]}],
- TraditionalForm],
- FormBox[
RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}], "j"], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -1832,7 +2072,28 @@ Cell[BoxData[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}], "i"], " ",
+ TraditionalForm]}], ")"}], "m"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -1846,12 +2107,12 @@ Cell[BoxData[
OverscriptBox[
FormBox["q",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}],
- RowBox[{
- RowBox[{"-", "j"}], "+", "m", "-", "3"}]], " ",
+ TraditionalForm]}], ")"}], "m"], " ",
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
@@ -1863,89 +2124,25 @@ Cell[BoxData[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["s",
- TraditionalForm], "_"],
- TraditionalForm]}]}], ")"}],
- RowBox[{"j", "-", "i"}]]}],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SubsuperscriptBox["g", "s", "2"], " ",
- RowBox[{
- SuperscriptBox["T",
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["T",
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"j", "=", "0"}],
- RowBox[{
- RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
- HoldForm],
- TraditionalForm],
- FormBox[
- RowBox[{"\<\"\"\>", " ",
- RowBox[{"(",
- RowBox[{"j", "+", "1"}], ")"}]}],
- TraditionalForm],
- FormBox[
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}], "j"], " ",
- SuperscriptBox[
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1956,10 +2153,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["q",
+ FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}], "i"], " ",
- SuperscriptBox[
+ TraditionalForm]}], ")"}], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1970,623 +2166,588 @@ Cell[BoxData[
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["q",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}],
- RowBox[{
- RowBox[{"-", "j"}], "+", "m", "-", "3"}]], " ",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["s",
- TraditionalForm], "_"],
- TraditionalForm]}]}], ")"}],
- RowBox[{"j", "-", "i"}]]}],
- TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{521, 139},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[15]=",
- CellID->1743631695]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"Twist2QuarkOperator", "[",
- RowBox[{
- RowBox[{"{", "p", "}"}], ",",
- RowBox[{"{", "q", "}"}], ",",
- RowBox[{"{",
- RowBox[{"r", ",", "\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"s", ",", "\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[16]:=",
- CellID->155964865],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}],
- RowBox[{"m", "+", "1"}]], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SubsuperscriptBox["g", "s", "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
RowBox[{
- SuperscriptBox["T",
+ SuperscriptBox[
FormBox[
- FormBox["a",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["T",
+ TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]]}], " ",
- RowBox[{"(",
- RowBox[{
+ TraditionalForm]], " ",
+ SuperscriptBox[
FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}],
- RowBox[{
- RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
- HoldForm],
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- RowBox[{"\<\"\"\>", " ",
- RowBox[{"(",
- RowBox[{"i", "+", "1"}], ")"}]}],
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], "j"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], ")"}],
- RowBox[{
- RowBox[{"-", "i"}], "+", "m", "-", "3"}]], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}]}], ")"}],
- RowBox[{"i", "-", "j"}]]}],
- TraditionalForm]}], ")"}]}], "+",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"2", " ",
+ SuperscriptBox[
RowBox[{
- RowBox[{
- SuperscriptBox["T",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
FormBox[
- FormBox["b",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["T",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], " ",
- RowBox[{"(",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
RowBox[{
FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}],
- RowBox[{
- RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
- HoldForm],
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
TraditionalForm],
- FormBox[
- RowBox[{"\<\"\"\>", " ",
- RowBox[{"(",
- RowBox[{"i", "+", "1"}], ")"}]}],
+ FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], "j"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], ")"}],
- RowBox[{
- RowBox[{"-", "i"}], "+", "m", "-", "3"}]], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["s",
- TraditionalForm],
- TraditionalForm]}]}], ")"}],
- RowBox[{"i", "-", "j"}]]}],
- TraditionalForm]}], ")"}]}]}], ")"}]}]}],
- TraditionalForm]], "Output",
- ImageSize->{502, 130},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[16]=",
- CellID->1353822811]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"n4", "-", "t4"}], "/.",
- RowBox[{"OPEm", "\[Rule]", "5"}]}], "/.",
- RowBox[{"s", "\[Rule]",
- RowBox[{
- RowBox[{"-", "p"}], "-", "q", "-", "r"}]}]}], "/.",
- RowBox[{"D", "\[Rule]", "4"}]}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[17]:=",
- CellID->1098560652],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{550, 69},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[17]=",
- CellID->310763994]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["\<\
- In general equality can be shown by Timing[Factor2[ \
-FCE[Calc[ChangeDimension[FCE[OPESumExplicit[n4-t4]],4]/.s\[Rule]-p-q-r]]]] \
-but it is a little bit slow ...\
-\>", "Text",
- CellTags->"FeynRule",
- CellID->884578703],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"qggf", ",", "n2", ",", "n4"}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[18]:=",
- CellID->1397309872],
-
-Cell["QCD vertices", "Text",
- CellTags->"FeynRule",
- CellID->1987436758],
+Cell["2-gluon Feynman rules (polarized).", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"fii", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Nu]", "}"}], ",",
- RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Rho]", "}"}], ",",
- RowBox[{"{", "c", "}"}]}], "]"}], "[", "r", "]"}]}], "}"}]}]], "Input",\
-
- CellTags->"FeynRule",
- CellLabel->"In[19]:=",
- CellID->32161051],
+ RowBox[{"Lagrangian", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ SuperscriptBox["\[ImaginaryI]", "m"], " ",
RowBox[{
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], ".",
+ SubsuperscriptBox["F",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["q",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Gamma]\"\>", ")"}],
+ TraditionalForm]}],
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubsuperscriptBox["D",
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm],
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ TraditionalForm]}]], ")"}],
+ RowBox[{"m", "-", "2"}]], ".",
+ SubsuperscriptBox["F",
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], "(",
- FormBox["r",
- TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{160, 25},
+ TraditionalForm]}],
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{559, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[19]=",
- CellID->2047715594]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"g3", "=",
+ RowBox[{
RowBox[{"FeynRule", "[",
- RowBox[{
- RowBox[{"Lagrangian", "[", "\"\\"", "]"}], ",", "fii"}],
- "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[20]:=",
- CellID->1456048555],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["g", "s"], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Nu]", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}]}], "}"}], ",",
+ RowBox[{"ZeroMomentumInsertion", "\[Rule]", "False"}]}], "]"}], "//",
+ "Factor"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}]],
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm],
FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], "m"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm],
FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}],
+ RowBox[{"m", "+", "1"}]], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["q",
TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], "m"], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}],
+ RowBox[{"m", "+", "1"}]], " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
+ TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["r",
+ FormBox["p",
TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{406, 22},
+ TraditionalForm]}]]}]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{511, 93},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[20]=",
- CellID->1737819068]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GluonVertex", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}], ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[21]:=",
- CellID->172674222],
+ RowBox[{"Factor2", "[",
+ RowBox[{"Calc", "[",
+ RowBox[{
+ RowBox[{"%", "/.",
+ RowBox[{"p", "\[Rule]",
+ RowBox[{"-", "q"}]}]}], ",",
+ RowBox[{"Assumptions", "\[Rule]", "Automatic"}]}], "]"}], "]"}]], "Input",\
+
+ CellLabel->"In[5]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- SubscriptBox["g", "s"], " ",
- SuperscriptBox["f",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}],
+ RowBox[{"m", "+", "1"}]], "+", "1"}], ")"}], " ",
+ SuperscriptBox["\[Delta]",
RowBox[{
FormBox[
FormBox["a",
@@ -2595,947 +2756,693 @@ Cell[BoxData[
FormBox[
FormBox["b",
TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}],
+ RowBox[{"m", "-", "1"}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]], " ",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{275, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell["\<\
+Compare with the Feynman rule tabulated in Twist2GluonOperator.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Twist2GluonOperator", "[",
+ RowBox[{"q", ",",
+ RowBox[{"{",
+ RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellTags->"FeynRule",
+ CellLabel->"In[6]:=",
+ CellID->1311336663],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{"(",
+ RowBox[{"1", "-",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}], "m"],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox["\[Delta]",
RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["r",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{365, 22},
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}],
+ RowBox[{"m", "-", "1"}]],
+ TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{256, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynRule",
- CellLabel->"Out[21]=",
- CellID->1435680162]
+ CellLabel->"Out[6]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"g3", "-",
- RowBox[{"ChangeDimension", "[",
- RowBox[{"%", ",", "4"}], "]"}]}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[22]:=",
- CellID->1637338472],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[22]=",
- CellID->55518269]
-}, Open ]],
+Cell["quark-quark -gluon-gluon Feynman rule (unpolarized).", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"fi4", "=",
- RowBox[{"{",
- RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Nu]", "}"}], ",",
- RowBox[{"{", "b", "}"}]}], "]"}], "[", "q", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Rho]", "}"}], ",",
- RowBox[{"{", "c", "}"}]}], "]"}], "[", "r", "]"}], ",",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"GaugeField", ",",
- RowBox[{"{", "\[Sigma]", "}"}], ",",
- RowBox[{"{", "d", "}"}]}], "]"}], "[", "s", "]"}]}], "}"}]}]], "Input",\
-
- CellTags->"FeynRule",
- CellLabel->"In[23]:=",
- CellID->2124540082],
+ RowBox[{"Lagrangian", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["\[ImaginaryI]", "m"], " ",
RowBox[{
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["p",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["q",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["r",
- TraditionalForm], ")"}], ",",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
+ FormBox[
+ OverscriptBox["\[Psi]", "_"],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- FormBox["d",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], "(",
- FormBox["s",
- TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{208, 25},
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ SubscriptBox["D",
+ FormBox["\[CapitalDelta]",
+ TraditionalForm]],
+ RowBox[{"m", "-", "1"}]], ".",
+ FormBox["\[Psi]",
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{156, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[23]=",
- CellID->575121014]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"g4", "=",
- RowBox[{"FeynRule", "[",
- RowBox[{
- RowBox[{"Lagrangian", "[", "\"\\"", "]"}], ",", "fi4"}],
- "]"}]}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[24]:=",
- CellID->1017933843],
+ RowBox[{"FeynRule", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[", "QuarkField", "]"}], "[", "p", "]"}], ",",
+
+ RowBox[{
+ RowBox[{"QuantumField", "[", "AntiQuarkField", "]"}], "[", "q", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "a", "}"}]}], "]"}], "[", "r", "]"}], ",",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"GaugeField", ",",
+ RowBox[{"{", "\[Nu]", "}"}], ",",
+ RowBox[{"{", "b", "}"}]}], "]"}], "[", "s", "]"}]}], "}"}], ",",
+ RowBox[{"ZeroMomentumInsertion", "\[Rule]", "True"}], ",",
+ RowBox[{"InitialFunction", "\[Rule]", "Identity"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}],
+ RowBox[{"m", "+", "1"}]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
SubsuperscriptBox["g", "s", "2"], " ",
- SuperscriptBox["f",
- RowBox[{
+ RowBox[{
+ SuperscriptBox["T",
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"si41\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
FormBox[
FormBox["b",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"si41\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
+ TraditionalForm]]}], " ",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]}], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{"\[ImaginaryI]", " ",
- SubsuperscriptBox["g", "s", "2"], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"si41\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
FormBox[
- FormBox["d",
- TraditionalForm],
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"j", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
+ HoldForm],
TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"si41\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
+ FormBox[
+ RowBox[{"\<\"\"\>", " ",
+ RowBox[{"(",
+ RowBox[{"j", "+", "1"}], ")"}]}],
+ TraditionalForm],
+ FormBox[
+ RowBox[{
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}], "j"], " ",
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], "i"], " ",
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}],
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"-", "j"}], "+", "m", "-", "3"}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}],
+ RowBox[{"j", "-", "i"}]]}],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
SubsuperscriptBox["g", "s", "2"], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
+ RowBox[{
+ SuperscriptBox["T",
FormBox[
FormBox["b",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"si41\"\>", ")"}],
+ FormBox["a",
TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
+ TraditionalForm]]}], " ",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]}], " ",
+ RowBox[{"(",
RowBox[{
FormBox[
- FormBox["c",
- TraditionalForm],
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"j", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
+ HoldForm],
TraditionalForm],
FormBox[
- FormBox["d",
- TraditionalForm],
+ RowBox[{"\<\"\"\>", " ",
+ RowBox[{"(",
+ RowBox[{"j", "+", "1"}], ")"}]}],
TraditionalForm],
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"si41\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
+ RowBox[{
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}], "j"], " ",
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], "i"], " ",
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}],
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{413, 77},
+ RowBox[{"-", "j"}], "+", "m", "-", "3"}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}],
+ RowBox[{"j", "-", "i"}]]}],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{549, 135},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[24]=",
- CellID->1278708678]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GluonVertex", "[",
+ RowBox[{"Twist2QuarkOperator", "[",
RowBox[{
+ RowBox[{"{", "p", "}"}], ",",
+ RowBox[{"{", "q", "}"}], ",",
RowBox[{"{",
- RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}], ",",
+ RowBox[{"r", ",", "\[Mu]", ",", "a"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}], ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[25]:=",
- CellID->1003097458],
+ RowBox[{"s", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-", "\[ImaginaryI]"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}],
+ RowBox[{"m", "+", "1"}]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
SubsuperscriptBox["g", "s", "2"], " ",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"u117\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"u117\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"u117\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"u117\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
+ RowBox[{
RowBox[{
- RowBox[{
+ SuperscriptBox["T",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ RowBox[{"(",
RowBox[{
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
+ TagBox[
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
+ HoldForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"u117\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ RowBox[{"\<\"\"\>", " ",
+ RowBox[{"(",
+ RowBox[{"i", "+", "1"}], ")"}]}],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"u117\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "j"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], ")"}],
+ RowBox[{
+ RowBox[{"-", "i"}], "+", "m", "-", "3"}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}],
+ RowBox[{"i", "-", "j"}]]}],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
RowBox[{
- RowBox[{
+ SuperscriptBox["T",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ RowBox[{"(",
RowBox[{
FormBox[
- SuperscriptBox["g",
+ TagBox[
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "m"}]], "\<\"\"\>"}],
+ HoldForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ RowBox[{"\<\"\"\>", " ",
+ RowBox[{"(",
+ RowBox[{"i", "+", "1"}], ")"}]}],
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "j"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], ")"}],
+ RowBox[{
+ RowBox[{"-", "i"}], "+", "m", "-", "3"}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["s",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}],
+ RowBox[{"i", "-", "j"}]]}],
+ TraditionalForm]}], ")"}]}]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{414, 83},
+ ImageSize->{544, 127},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[25]=",
- CellID->901215661]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Calc", "[",
- RowBox[{"g4", "-",
- RowBox[{"ChangeDimension", "[",
- RowBox[{"%", ",", "4"}], "]"}]}], "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[26]:=",
- CellID->1307092387],
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"%", "-", "%%"}], "/.",
+ RowBox[{"OPEm", "\[Rule]", "5"}]}], "/.",
+ RowBox[{"s", "\[Rule]",
+ RowBox[{
+ RowBox[{"-", "p"}], "-", "q", "-", "r"}]}]}], "/.",
+ RowBox[{"D", "\[Rule]", "4"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:="],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FeynRule",
- CellLabel->"Out[26]=",
- CellID->111249247]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{
- "f2p", ",", "f2u", ",", "f3", ",", "f32", ",", "fi", ",", "fi4", ",", "fii",
- ",", "g3", ",", "g4", ",", "gop", ",", "gou", ",", "n3", ",", "nf3", ",",
- "n4", ",", "np2", ",", "npf3", ",", "p33", ",", "pf3", ",", "pn3", ",",
- "pqo", ",", "qf", ",", "qp", ",", "qgf", ",", "qo", ",", "t4"}],
- "]"}]], "Input",
- CellTags->"FeynRule",
- CellLabel->"In[27]:=",
- CellID->2027297687]
+ CellLabel->"Out[10]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -3557,24 +3464,19 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["Lagrangian",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Lagrangian",
- ButtonNote->"Lagrangian"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"FeynRule",
- CellID->1949003728]
+Cell[TextData[StyleBox[ButtonBox["Lagrangian",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Lagrangian",
+ ButtonNote->"Lagrangian"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FeynRule",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -3583,23 +3485,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 1.290556}",
+ "built" -> "{2020, 1, 5, 18, 57, 47.257891}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FeynRule[lag, {fields}] derives the Feynman rule corresponding to the \
-field configuration fields of the lagrangian lag. FeynRule does not calculate \
-propagator Feynman rules. The option ZeroMomentumInsertion can be used for \
-twist-2 and higher twist operators.", "synonyms" -> {}, "title" -> "FeynRule",
- "titlemodifier" -> "", "windowtitle" -> "FeynRule", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FeynRule"}, "SearchTextTranslated" -> ""},
+field configuration fields of the lagrangian lag.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FeynRule", "titlemodifier" -> "",
+ "windowtitle" -> "FeynRule", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FeynRule"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -3608,7 +3509,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -3617,451 +3518,194 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3564, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7416, 233, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->228290916]},
+ CellID->449434060]},
"FeynRule"->{
- Cell[4195, 128, 134, 4, 27, "Input",
- CellTags->"FeynRule",
- CellID->1110862301],
- Cell[4332, 134, 851, 22, 75, "Output",
- CellTags->"FeynRule",
- CellID->2080342182],
- Cell[5220, 161, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->365740759],
- Cell[5387, 168, 1381, 49, 62, "Output",
- CellTags->"FeynRule",
- CellID->1817291236],
- Cell[6805, 222, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->231547110],
- Cell[6972, 229, 1979, 70, 62, "Output",
- CellTags->"FeynRule",
- CellID->230270815],
- Cell[8988, 304, 130, 4, 27, "Input",
- CellTags->"FeynRule",
- CellID->2084194058],
- Cell[9121, 310, 5874, 212, 175, "Output",
- CellTags->"FeynRule",
- CellID->1724255356],
- Cell[15032, 527, 160, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->1005254277],
- Cell[15195, 534, 3470, 136, 89, "Output",
- CellTags->"FeynRule",
- CellID->1380033212],
- Cell[18680, 673, 95, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->1873597477],
- Cell[18800, 679, 522, 17, 45, "Input",
- CellTags->"FeynRule",
- CellID->1070076155],
- Cell[19325, 698, 880, 37, 46, "Output",
- CellTags->"FeynRule",
- CellID->1378008374],
- Cell[20242, 740, 326, 10, 45, "Input",
- CellTags->"FeynRule",
- CellID->1360773115],
- Cell[20571, 752, 8315, 294, 100, "Output",
- CellTags->"FeynRule",
- CellID->587598],
- Cell[28901, 1049, 93, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->1948485262],
- Cell[29019, 1055, 522, 17, 45, "Input",
- CellTags->"FeynRule",
- CellID->1064711177],
- Cell[29544, 1074, 879, 37, 46, "Output",
- CellTags->"FeynRule",
- CellID->306238305],
- Cell[30460, 1116, 326, 10, 45, "Input",
- CellTags->"FeynRule",
- CellID->1030963620],
- Cell[30789, 1128, 7991, 273, 102, "Output",
- CellTags->"FeynRule",
- CellID->256890280],
- Cell[38817, 1406, 316, 11, 27, "Input",
- CellTags->"FeynRule",
- CellID->2139802029],
- Cell[39136, 1419, 1432, 58, 45, "Output",
- CellTags->"FeynRule",
- CellID->182487379],
- Cell[40583, 1480, 130, 4, 32, "Text",
- CellTags->"FeynRule",
- CellID->163895632],
- Cell[40738, 1488, 380, 11, 27, "Input",
+ Cell[74761, 2806, 379, 11, 45, "Input",
CellTags->"FeynRule",
CellID->1311336663],
- Cell[41121, 1501, 1465, 60, 45, "Output",
- CellTags->"FeynRule",
- CellID->1828007555],
- Cell[42601, 1564, 98, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->1475726296],
- Cell[42724, 1570, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->940220202],
- Cell[42891, 1577, 746, 27, 42, "Output",
- CellTags->"FeynRule",
- CellID->427583807],
- Cell[43652, 1607, 110, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->624473640],
- Cell[43787, 1613, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->463480668],
- Cell[43954, 1620, 746, 27, 42, "Output",
- CellTags->"FeynRule",
- CellID->596814988],
- Cell[44737, 1652, 716, 22, 62, "Input",
- CellTags->"FeynRule",
- CellID->1181779598],
- Cell[45456, 1676, 1334, 56, 46, "Output",
- CellTags->"FeynRule",
- CellID->1382795551],
- Cell[46827, 1737, 306, 8, 45, "Input",
- CellTags->"FeynRule",
- CellID->920183877],
- Cell[47136, 1747, 7264, 264, 160, "Output",
- CellTags->"FeynRule",
- CellID->1743631695],
- Cell[54437, 2016, 439, 13, 27, "Input",
- CellTags->"FeynRule",
- CellID->155964865],
- Cell[54879, 2031, 6639, 224, 151, "Output",
- CellTags->"FeynRule",
- CellID->1353822811],
- Cell[61555, 2260, 382, 13, 27, "Input",
- CellTags->"FeynRule",
- CellID->1098560652],
- Cell[61940, 2275, 210, 7, 36, "Output",
- CellTags->"FeynRule",
- CellID->310763994],
- Cell[62165, 2285, 230, 6, 71, "Text",
- CellTags->"FeynRule",
- CellID->884578703],
- Cell[62398, 2293, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->1397309872],
- Cell[62565, 2300, 72, 2, 31, "Text",
- CellTags->"FeynRule",
- CellID->1987436758],
- Cell[62662, 2306, 711, 22, 62, "Input",
- CellTags->"FeynRule",
- CellID->32161051],
- Cell[63376, 2330, 1203, 51, 46, "Output",
- CellTags->"FeynRule",
- CellID->2047715594],
- Cell[64616, 2386, 232, 8, 27, "Input",
- CellTags->"FeynRule",
- CellID->1456048555],
- Cell[64851, 2396, 4278, 169, 43, "Output",
- CellTags->"FeynRule",
- CellID->1737819068],
- Cell[69166, 2570, 404, 12, 27, "Input",
- CellTags->"FeynRule",
- CellID->172674222],
- Cell[69573, 2584, 3269, 133, 43, "Output",
- CellTags->"FeynRule",
- CellID->1435680162],
- Cell[72879, 2722, 217, 7, 27, "Input",
- CellTags->"FeynRule",
- CellID->1637338472],
- Cell[73099, 2731, 209, 7, 36, "Output",
- CellTags->"FeynRule",
- CellID->55518269],
- Cell[73345, 2743, 904, 27, 79, "Input",
- CellTags->"FeynRule",
- CellID->2124540082],
- Cell[74252, 2772, 1526, 65, 46, "Output",
- CellTags->"FeynRule",
- CellID->575121014],
- Cell[75815, 2842, 232, 8, 27, "Input",
- CellTags->"FeynRule",
- CellID->1017933843],
- Cell[76050, 2852, 8180, 320, 98, "Output",
- CellTags->"FeynRule",
- CellID->1278708678],
- Cell[84267, 3177, 481, 14, 27, "Input",
- CellTags->"FeynRule",
- CellID->1003097458],
- Cell[84751, 3193, 8341, 310, 104, "Output",
- CellTags->"FeynRule",
- CellID->901215661],
- Cell[93129, 3508, 217, 7, 27, "Input",
- CellTags->"FeynRule",
- CellID->1307092387],
- Cell[93349, 3517, 210, 7, 36, "Output",
- CellTags->"FeynRule",
- CellID->111249247],
- Cell[93574, 3527, 438, 10, 45, "Input",
- CellTags->"FeynRule",
- CellID->2027297687],
- Cell[94368, 3559, 234, 9, 32, "Text",
- CellTags->"FeynRule",
- CellID->1949003728]}
+ Cell[75143, 2819, 1438, 59, 40, "Output",
+ CellTags->"FeynRule"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 96636, 3618},
- {"FeynRule", 96770, 3622}
+ {"PrimaryExamplesSection", 94978, 3519},
+ {"FeynRule", 95113, 3523}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2244, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3006, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2827, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2881, 78, 658, 17, 178, "Usage",
+Cell[3589, 97, 285, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3899, 112, 600, 18, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3564, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4524, 134, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->290293433],
+Cell[5265, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5299, 162, 194, 6, 70, "Notes"],
+Cell[5496, 170, 256, 7, 70, "Notes"],
+Cell[5755, 179, 673, 19, 70, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[6453, 202, 91, 2, 70, "Input"],
+Cell[6547, 206, 808, 20, 75, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7416, 233, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->228290916],
+ CellID->449434060],
Cell[CellGroupData[{
-Cell[3976, 118, 194, 6, 25, "ExampleSection",
- CellID->77448669],
+Cell[7828, 252, 195, 6, 26, "ExampleSection",
+ CellID->152723255],
+Cell[8026, 260, 143, 5, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4195, 128, 134, 4, 27, "Input",
- CellTags->"FeynRule",
- CellID->1110862301],
-Cell[4332, 134, 851, 22, 75, "Output",
- CellTags->"FeynRule",
- CellID->2080342182]
+Cell[8194, 269, 214, 7, 27, "Input"],
+Cell[8411, 278, 312, 11, 59, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5220, 161, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->365740759],
-Cell[5387, 168, 1381, 49, 62, "Output",
- CellTags->"FeynRule",
- CellID->1817291236]
+Cell[8760, 294, 501, 14, 45, "Input"],
+Cell[9264, 310, 231, 8, 35, "Output"]
}, Open ]],
+Cell[9510, 321, 66, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6805, 222, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->231547110],
-Cell[6972, 229, 1979, 70, 62, "Output",
- CellTags->"FeynRule",
- CellID->230270815]
+Cell[9601, 325, 293, 7, 45, "Input"],
+Cell[9897, 334, 602, 23, 39, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8988, 304, 130, 4, 27, "Input",
- CellTags->"FeynRule",
- CellID->2084194058],
-Cell[9121, 310, 5874, 212, 175, "Output",
- CellTags->"FeynRule",
- CellID->1724255356]
+Cell[10536, 362, 529, 15, 45, "Input"],
+Cell[11068, 379, 478, 18, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15032, 527, 160, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->1005254277],
-Cell[15195, 534, 3470, 136, 89, "Output",
- CellTags->"FeynRule",
- CellID->1380033212]
+Cell[11583, 402, 105, 2, 9, "ExampleDelimiter"],
+Cell[11691, 406, 63, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[11779, 410, 313, 9, 52, "Input"],
+Cell[12095, 421, 627, 25, 56, "Output"]
}, Open ]],
-Cell[18680, 673, 95, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->1873597477],
Cell[CellGroupData[{
-Cell[18800, 679, 522, 17, 45, "Input",
- CellTags->"FeynRule",
- CellID->1070076155],
-Cell[19325, 698, 880, 37, 46, "Output",
- CellTags->"FeynRule",
- CellID->1378008374]
+Cell[12759, 451, 919, 26, 79, "Input"],
+Cell[13681, 479, 6257, 246, 93, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20242, 740, 326, 10, 45, "Input",
- CellTags->"FeynRule",
- CellID->1360773115],
-Cell[20571, 752, 8315, 294, 100, "Output",
- CellTags->"FeynRule",
- CellID->587598]
+Cell[19975, 730, 484, 13, 45, "Input"],
+Cell[20462, 745, 6653, 248, 93, "Output"]
}, Open ]],
-Cell[28901, 1049, 93, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->1948485262],
Cell[CellGroupData[{
-Cell[29019, 1055, 522, 17, 45, "Input",
- CellTags->"FeynRule",
- CellID->1064711177],
-Cell[29544, 1074, 879, 37, 46, "Output",
- CellTags->"FeynRule",
- CellID->306238305]
+Cell[27152, 998, 156, 4, 27, "Input"],
+Cell[27311, 1004, 166, 5, 35, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[30460, 1116, 326, 10, 45, "Input",
- CellTags->"FeynRule",
- CellID->1030963620],
-Cell[30789, 1128, 7991, 273, 102, "Output",
- CellTags->"FeynRule",
- CellID->256890280]
+Cell[27526, 1015, 105, 2, 9, "ExampleDelimiter"],
+Cell[27634, 1019, 63, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[27722, 1023, 313, 9, 52, "Input"],
+Cell[28038, 1034, 627, 25, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[38817, 1406, 316, 11, 27, "Input",
- CellTags->"FeynRule",
- CellID->2139802029],
-Cell[39136, 1419, 1432, 58, 45, "Output",
- CellTags->"FeynRule",
- CellID->182487379]
+Cell[28702, 1064, 719, 21, 62, "Input"],
+Cell[29424, 1087, 3146, 126, 43, "Output"]
}, Open ]],
-Cell[40583, 1480, 130, 4, 32, "Text",
- CellTags->"FeynRule",
- CellID->163895632],
Cell[CellGroupData[{
-Cell[40738, 1488, 380, 11, 27, "Input",
- CellTags->"FeynRule",
- CellID->1311336663],
-Cell[41121, 1501, 1465, 60, 45, "Output",
- CellTags->"FeynRule",
- CellID->1828007555]
+Cell[32607, 1218, 408, 11, 45, "Input"],
+Cell[33018, 1231, 2594, 104, 43, "Output"]
}, Open ]],
-Cell[42601, 1564, 98, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->1475726296],
Cell[CellGroupData[{
-Cell[42724, 1570, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->940220202],
-Cell[42891, 1577, 746, 27, 42, "Output",
- CellTags->"FeynRule",
- CellID->427583807]
+Cell[35649, 1340, 149, 4, 27, "Input"],
+Cell[35801, 1346, 166, 5, 35, "Output"]
+}, Open ]]
}, Open ]],
-Cell[43652, 1607, 110, 2, 32, "Text",
- CellTags->"FeynRule",
- CellID->624473640],
Cell[CellGroupData[{
-Cell[43787, 1613, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->463480668],
-Cell[43954, 1620, 746, 27, 42, "Output",
- CellTags->"FeynRule",
- CellID->596814988]
+Cell[36016, 1357, 105, 2, 9, "ExampleDelimiter"],
+Cell[36124, 1361, 60, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[36209, 1365, 379, 11, 45, "Input"],
+Cell[36591, 1378, 663, 27, 56, "Output"]
}, Open ]],
+Cell[37269, 1408, 33, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[44737, 1652, 716, 22, 62, "Input",
- CellTags->"FeynRule",
- CellID->1181779598],
-Cell[45456, 1676, 1334, 56, 46, "Output",
- CellTags->"FeynRule",
- CellID->1382795551]
+Cell[37327, 1412, 604, 18, 45, "Input"],
+Cell[37934, 1432, 1638, 66, 43, "Output"]
}, Open ]],
+Cell[39587, 1501, 34, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[46827, 1737, 306, 8, 45, "Input",
- CellTags->"FeynRule",
- CellID->920183877],
-Cell[47136, 1747, 7264, 264, 160, "Output",
- CellTags->"FeynRule",
- CellID->1743631695]
+Cell[39646, 1505, 866, 25, 79, "Input"],
+Cell[40515, 1532, 3111, 126, 43, "Output"]
}, Open ]],
+Cell[43641, 1661, 35, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[54437, 2016, 439, 13, 27, "Input",
- CellTags->"FeynRule",
- CellID->155964865],
-Cell[54879, 2031, 6639, 224, 151, "Output",
- CellTags->"FeynRule",
- CellID->1353822811]
+Cell[43701, 1665, 1523, 43, 131, "Input"],
+Cell[45227, 1710, 6225, 241, 68, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[61555, 2260, 382, 13, 27, "Input",
- CellTags->"FeynRule",
- CellID->1098560652],
-Cell[61940, 2275, 210, 7, 36, "Output",
- CellTags->"FeynRule",
- CellID->310763994]
+Cell[51501, 1957, 105, 2, 9, "ExampleDelimiter"],
+Cell[51609, 1961, 43, 0, 32, "Notes"],
+Cell[51655, 1963, 53, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[51733, 1967, 96, 2, 27, "Input"],
+Cell[51832, 1971, 1337, 47, 56, "Output"]
}, Open ]],
-Cell[62165, 2285, 230, 6, 71, "Text",
- CellTags->"FeynRule",
- CellID->884578703],
-Cell[62398, 2293, 164, 5, 27, "Input",
- CellTags->"FeynRule",
- CellID->1397309872],
-Cell[62565, 2300, 72, 2, 31, "Text",
- CellTags->"FeynRule",
- CellID->1987436758],
Cell[CellGroupData[{
-Cell[62662, 2306, 711, 22, 62, "Input",
- CellTags->"FeynRule",
- CellID->32161051],
-Cell[63376, 2330, 1203, 51, 46, "Output",
- CellTags->"FeynRule",
- CellID->2047715594]
+Cell[53206, 2023, 632, 18, 62, "Input"],
+Cell[53841, 2043, 7590, 272, 90, "Output"]
}, Open ]],
+Cell[61446, 2318, 51, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[64616, 2386, 232, 8, 27, "Input",
- CellTags->"FeynRule",
- CellID->1456048555],
-Cell[64851, 2396, 4278, 169, 43, "Output",
- CellTags->"FeynRule",
- CellID->1737819068]
+Cell[61522, 2322, 96, 2, 27, "Input"],
+Cell[61621, 2326, 1963, 69, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[69166, 2570, 404, 12, 27, "Input",
- CellTags->"FeynRule",
- CellID->172674222],
-Cell[69573, 2584, 3269, 133, 43, "Output",
- CellTags->"FeynRule",
- CellID->1435680162]
+Cell[63621, 2400, 632, 18, 62, "Input"],
+Cell[64256, 2420, 8655, 304, 114, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[72879, 2722, 217, 7, 27, "Input",
- CellTags->"FeynRule",
- CellID->1637338472],
-Cell[73099, 2731, 209, 7, 36, "Output",
- CellTags->"FeynRule",
- CellID->55518269]
+Cell[72948, 2729, 269, 9, 27, "Input"],
+Cell[73220, 2740, 1413, 57, 43, "Output"]
}, Open ]],
+Cell[74648, 2800, 88, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[73345, 2743, 904, 27, 79, "Input",
- CellTags->"FeynRule",
- CellID->2124540082],
-Cell[74252, 2772, 1526, 65, 46, "Output",
+Cell[74761, 2806, 379, 11, 45, "Input",
CellTags->"FeynRule",
- CellID->575121014]
+ CellID->1311336663],
+Cell[75143, 2819, 1438, 59, 40, "Output",
+ CellTags->"FeynRule"]
}, Open ]],
+Cell[76596, 2881, 69, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[75815, 2842, 232, 8, 27, "Input",
- CellTags->"FeynRule",
- CellID->1017933843],
-Cell[76050, 2852, 8180, 320, 98, "Output",
- CellTags->"FeynRule",
- CellID->1278708678]
+Cell[76690, 2885, 96, 2, 27, "Input"],
+Cell[76789, 2889, 702, 25, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[84267, 3177, 481, 14, 27, "Input",
- CellTags->"FeynRule",
- CellID->1003097458],
-Cell[84751, 3193, 8341, 310, 104, "Output",
- CellTags->"FeynRule",
- CellID->901215661]
+Cell[77528, 2919, 848, 23, 96, "Input"],
+Cell[78379, 2944, 6787, 244, 156, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[93129, 3508, 217, 7, 27, "Input",
- CellTags->"FeynRule",
- CellID->1307092387],
-Cell[93349, 3517, 210, 7, 36, "Output",
- CellTags->"FeynRule",
- CellID->111249247]
+Cell[85203, 3193, 363, 10, 27, "Input"],
+Cell[85569, 3205, 6424, 214, 148, "Output"]
}, Open ]],
-Cell[93574, 3527, 438, 10, 45, "Input",
- CellTags->"FeynRule",
- CellID->2027297687]
+Cell[CellGroupData[{
+Cell[92030, 3424, 337, 11, 27, "Input"],
+Cell[92370, 3437, 167, 5, 35, "Output"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[94027, 3540, 31, 0, 29, "SectionFooterSpacer"]
+Cell[92576, 3447, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[94095, 3545, 270, 12, 31, "SeeAlsoSection",
+Cell[92644, 3452, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[94368, 3559, 234, 9, 32, "Text",
- CellTags->"FeynRule",
- CellID->1949003728]
+Cell[92917, 3466, 178, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[94617, 3571, 23, 0, 42, "FooterCell"]
+Cell[93110, 3473, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanDoIntegrals.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanDoIntegrals.nb
index 3fe055ea9..e7c087de6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanDoIntegrals.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanDoIntegrals.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12072, 336]
-NotebookOptionsPosition[ 7503, 223]
-NotebookOutlinePosition[ 11281, 307]
-CellTagsIndexPosition[ 11159, 301]
+NotebookDataLength[ 12802, 354]
+NotebookOptionsPosition[ 8708, 255]
+NotebookOutlinePosition[ 12164, 331]
+CellTagsIndexPosition[ 12083, 326]
WindowTitle->FeynmanDoIntegrals
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynmanDoIntegrals\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynmanDoIntegrals"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynmanReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynmanReduce"], "\<\"FeynmanParametrize1\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynmanParametrize1"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynmanDoIntegrals\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynmanDoIntegrals"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynmanDoIntegrals.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$68894],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynmanDoIntegrals", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$136106],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynmanDoIntegrals", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ FeynmanDoIntegrals.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynmanDoIntegrals", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynmanDoIntegrals", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,39 +148,40 @@ and are passed on to these."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1576791235],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2049594611],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->51204219],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FeynmanDoIntegrals", "]"}]], "Input",
CellTags->"FeynmanDoIntegrals",
- CellLabel->"In[1]:=",
+ CellLabel->"In[108]:=",
CellID->1175204601],
Cell[BoxData[
@@ -173,16 +210,13 @@ Cell[BoxData[
RowBox[{"Integratedx", "@@", "#1"}], "&"}], ")"}], "/@",
RowBox[{"{", "##2", "}"}]}]}], ",", "#1"}], ")"}], "&"}],
")"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{535, 54},
+ ImageSize->{485, 54},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynmanDoIntegrals",
- CellLabel->"Out[1]=",
- CellID->503306959]
+ CellLabel->"Out[108]="]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -214,9 +248,7 @@ Cell[TextData[{
ButtonNote->"FeynmanParametrize1"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynmanDoIntegrals",
- CellID->1859627924]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -233,10 +265,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 54.252004}",
+ "built" -> "{2020, 1, 5, 18, 57, 41.998169}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -261,11 +293,12 @@ neither analytically nor numerically doable are left unevaluated, but can of \
course be attempted evaluated by a simple sustitution. Beside the explicit \
options of FeynmanDoIntegrals options of the integration functions specified \
(FCIntegrate and FCNIntegrate) may be given and are passed on to these.",
- "synonyms" -> {}, "title" -> "FeynmanDoIntegrals", "titlemodifier" -> "",
- "windowtitle" -> "FeynmanDoIntegrals", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FeynmanDoIntegrals"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FeynmanDoIntegrals",
+ "titlemodifier" -> "", "windowtitle" -> "FeynmanDoIntegrals", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FeynmanDoIntegrals"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -274,7 +307,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -282,62 +315,47 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4786, 114, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1576791235]},
"FeynmanDoIntegrals"->{
- Cell[5418, 143, 154, 4, 27, "Input",
+ Cell[6724, 180, 156, 4, 70, "Input",
CellTags->"FeynmanDoIntegrals",
CellID->1175204601],
- Cell[5575, 149, 1073, 31, 75, "Output",
- CellTags->"FeynmanDoIntegrals",
- CellID->503306959],
- Cell[7016, 203, 445, 15, 32, "Text",
- CellTags->"FeynmanDoIntegrals",
- CellID->1859627924]}
+ Cell[6883, 186, 1055, 30, 75, "Output",
+ CellTags->"FeynmanDoIntegrals"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10693, 284},
- {"FeynmanDoIntegrals", 10839, 288}
+ {"FeynmanDoIntegrals", 11883, 317}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3169, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 1819, 32, 292, "Usage",
- CellID->982511436],
+Cell[3762, 99, 295, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4786, 114, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1576791235],
+Cell[4082, 114, 1819, 32, 291, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[5199, 133, 194, 6, 25, "ExampleSection",
- CellID->51204219],
+Cell[5926, 150, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2049594611],
+Cell[6668, 176, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[5418, 143, 154, 4, 27, "Input",
+Cell[6724, 180, 156, 4, 70, "Input",
CellTags->"FeynmanDoIntegrals",
CellID->1175204601],
-Cell[5575, 149, 1073, 31, 75, "Output",
- CellTags->"FeynmanDoIntegrals",
- CellID->503306959]
+Cell[6883, 186, 1055, 30, 75, "Output",
+ CellTags->"FeynmanDoIntegrals"]
}, Open ]]
-}, Open ]],
-Cell[6675, 184, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[6743, 189, 270, 12, 31, "SeeAlsoSection",
+Cell[7999, 223, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7016, 203, 445, 15, 32, "Text",
- CellTags->"FeynmanDoIntegrals",
- CellID->1859627924]
+Cell[8272, 237, 394, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7476, 221, 23, 0, 42, "FooterCell"]
+Cell[8681, 253, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParameterNames.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParameterNames.nb
index 0444786cd..f5d0cb103 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParameterNames.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParameterNames.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6253, 187]
-NotebookOptionsPosition[ 3949, 121]
-NotebookOutlinePosition[ 5981, 176]
-CellTagsIndexPosition[ 5898, 171]
+NotebookDataLength[ 6971, 208]
+NotebookOptionsPosition[ 4909, 151]
+NotebookOutlinePosition[ 6764, 200]
+CellTagsIndexPosition[ 6721, 197]
WindowTitle->FeynmanParameterNames
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FeynmanParameterNames\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FeynmanParameterNames"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynmanParametrize\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynmanParametrize"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FeynmanParameterNames\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FeynmanParameterNames"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FeynmanParameterNames.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$69228],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FeynmanParameterNames", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$136540],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FeynmanParameterNames", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FeynmanParameterNames.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynmanParameterNames", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynmanParameterNames", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"FeynmanParametrize"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FeynmanParameterNames",
- CellID->29982595]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,21 +161,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 55.752970}",
+ "built" -> "{2020, 1, 5, 18, 57, 43.034892}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FeynmanParameterNames is an option for FeynmanParametrize and other \
-functions.", "synonyms" -> {}, "title" -> "FeynmanParameterNames",
- "titlemodifier" -> "", "windowtitle" -> "FeynmanParameterNames", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FeynmanParameterNames"}},
+functions.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FeynmanParameterNames", "titlemodifier" -> "", "windowtitle" ->
+ "FeynmanParameterNames", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FeynmanParameterNames"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -154,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FeynmanParameterNames"->{
- Cell[3638, 107, 269, 9, 70, "Text",
- CellTags->"FeynmanParameterNames",
- CellID->29982595]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FeynmanParameterNames", 5776, 164}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2297, 52, 70, "AnchorBarGrid",
+Cell[593, 21, 3075, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2893, 75, 64, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2960, 78, 380, 11, 70, "Usage",
+Cell[3671, 97, 298, 11, 70, "ObjectNameGrid"],
+Cell[3972, 110, 380, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3365, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4377, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3638, 107, 269, 9, 70, "Text",
- CellTags->"FeynmanParameterNames",
- CellID->29982595]
+Cell[4650, 139, 217, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3922, 119, 23, 0, 70, "FooterCell"]
+Cell[4882, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize.nb
index 3fc51ea73..e9ebd1a46 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7707, 238]
-NotebookOptionsPosition[ 4785, 153]
-NotebookOutlinePosition[ 7164, 217]
-CellTagsIndexPosition[ 7044, 211]
+NotebookDataLength[ 7860, 242]
+NotebookOptionsPosition[ 5218, 166]
+NotebookOutlinePosition[ 7370, 224]
+CellTagsIndexPosition[ 7290, 219]
WindowTitle->FeynmanParametrize
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FeynmanParametrize.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$69902],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$137408],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FeynmanParametrize", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ FeynmanParametrize.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynmanParametrize", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynmanParametrize", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -94,39 +107,40 @@ integration momentum)."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->399710816],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->587313829],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1051760138],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FeynmanParametrize", "]"}]], "Input",
CellTags->"FeynmanParametrize",
- CellLabel->"In[1]:=",
+ CellLabel->"In[109]:=",
CellID->1392922438],
Cell[BoxData[
@@ -139,14 +153,13 @@ Cell[BoxData[
RowBox[{"FCGV", "(", "\<\"y\"\>", ")"}], ",",
RowBox[{"FCGV", "(", "\<\"z\"\>", ")"}]}], "}"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{408, 15},
+ ImageSize->{383, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynmanParametrize",
- CellLabel->"Out[1]=",
- CellID->600789752]
-}, Open ]]
+ CellLabel->"Out[109]="]
}, Open ]]
+}, Closed]]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -154,7 +167,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"FeynmanParametrize",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -163,10 +176,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 58.377530}",
+ "built" -> "{2020, 1, 5, 18, 57, 44.891956}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -174,11 +187,11 @@ TaggingRules->{
"None", "summary" ->
"FeynmanParametrize[exp, k] introduces feynman parameters for all \
one-loop integrals in exp (k = integration momentum).", "synonyms" -> {},
- "title" -> "FeynmanParametrize", "titlemodifier" -> "", "windowtitle" ->
- "FeynmanParametrize", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "FeynmanParametrize", "titlemodifier" -> "",
+ "windowtitle" -> "FeynmanParametrize", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynmanParametrize"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -187,7 +200,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -195,51 +208,42 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3443, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->399710816]},
"FeynmanParametrize"->{
- Cell[4076, 125, 154, 4, 27, "Input",
+ Cell[4525, 139, 156, 4, 70, "Input",
CellTags->"FeynmanParametrize",
CellID->1392922438],
- Cell[4233, 131, 486, 15, 36, "Output",
- CellTags->"FeynmanParametrize",
- CellID->600789752]}
+ Cell[4684, 145, 468, 14, 37, "Output",
+ CellTags->"FeynmanParametrize"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 6679, 197},
- {"FeynmanParametrize", 6823, 201}
+ {"FeynmanParametrize", 7091, 210}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 476, 14, 83, "Usage",
- CellID->982511436],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3443, 96, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->399710816],
+Cell[3227, 91, 476, 14, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3855, 115, 196, 6, 25, "ExampleSection",
- CellID->1051760138],
+Cell[3728, 109, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->587313829],
+Cell[4469, 135, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4076, 125, 154, 4, 27, "Input",
+Cell[4525, 139, 156, 4, 70, "Input",
CellTags->"FeynmanParametrize",
CellID->1392922438],
-Cell[4233, 131, 486, 15, 36, "Output",
- CellTags->"FeynmanParametrize",
- CellID->600789752]
-}, Open ]]
+Cell[4684, 145, 468, 14, 37, "Output",
+ CellTags->"FeynmanParametrize"]
}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4758, 151, 23, 0, 42, "FooterCell"]
+Cell[5191, 164, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize1.nb
index 930ad465d..f8e520a8d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanParametrize1.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9152, 259]
-NotebookOptionsPosition[ 5691, 167]
-NotebookOutlinePosition[ 8603, 238]
-CellTagsIndexPosition[ 8482, 232]
+NotebookDataLength[ 9359, 264]
+NotebookOptionsPosition[ 6123, 180]
+NotebookOutlinePosition[ 8865, 246]
+CellTagsIndexPosition[ 8784, 241]
WindowTitle->FeynmanParametrize1
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FeynmanParametrize1.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$69571],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$136981],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FeynmanParametrize1", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ FeynmanParametrize1.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynmanParametrize1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynmanParametrize1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -101,39 +114,40 @@ dropped and even factors are replaced according to Itzykson&Zuber (8-117)."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1599038234],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->213672981],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->349673293],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FeynmanParametrize1", "]"}]], "Input",
CellTags->"FeynmanParametrize1",
- CellLabel->"In[1]:=",
+ CellLabel->"In[110]:=",
CellID->1362836429],
Cell[BoxData[
@@ -153,14 +167,13 @@ Cell[BoxData[
RowBox[{"Flatten", "\[Rule]", "True"}], ",",
RowBox[{"CompleteSquare", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{559, 35},
+ ImageSize->{516, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynmanParametrize1",
- CellLabel->"Out[1]=",
- CellID->1384736852]
-}, Open ]]
+ CellLabel->"Out[110]="]
}, Open ]]
+}, Closed]]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -168,7 +181,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FeynmanParametrize1",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -177,10 +190,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 56.958779}",
+ "built" -> "{2020, 1, 5, 18, 57, 43.842434}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -195,11 +208,11 @@ parameters for all one-loop integrals in exp (k = integration momentum) using \
Assumptions->{Arg[A]==0,Arg[eps]==0}]. In this case, when the option \
Integrate is set to True, odd factors of k-tensors are dropped and even \
factors are replaced according to Itzykson&Zuber (8-117).", "synonyms" -> {},
- "title" -> "FeynmanParametrize1", "titlemodifier" -> "", "windowtitle" ->
- "FeynmanParametrize1", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "FeynmanParametrize1", "titlemodifier" ->
+ "", "windowtitle" -> "FeynmanParametrize1", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FeynmanParametrize1"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -207,8 +220,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -216,51 +230,42 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4002, 103, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1599038234]},
"FeynmanParametrize1"->{
- Cell[4635, 132, 156, 4, 27, "Input",
+ Cell[5084, 146, 158, 4, 70, "Input",
CellTags->"FeynmanParametrize1",
CellID->1362836429],
- Cell[4794, 138, 831, 22, 56, "Output",
- CellTags->"FeynmanParametrize1",
- CellID->1384736852]}
+ Cell[5245, 152, 812, 21, 56, "Output",
+ CellTags->"FeynmanParametrize1"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8111, 218},
- {"FeynmanParametrize1", 8258, 222}
+ {"FeynmanParametrize1", 8583, 232}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2289, 52, 51, "AnchorBarGrid",
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2883, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2948, 78, 1029, 21, 163, "Usage",
- CellID->982511436],
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4002, 103, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1599038234],
+Cell[3233, 91, 1029, 21, 171, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4415, 122, 195, 6, 25, "ExampleSection",
- CellID->349673293],
+Cell[4287, 116, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->213672981],
+Cell[5028, 142, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4635, 132, 156, 4, 27, "Input",
+Cell[5084, 146, 158, 4, 70, "Input",
CellTags->"FeynmanParametrize1",
CellID->1362836429],
-Cell[4794, 138, 831, 22, 56, "Output",
- CellTags->"FeynmanParametrize1",
- CellID->1384736852]
-}, Open ]]
+Cell[5245, 152, 812, 21, 56, "Output",
+ CellTags->"FeynmanParametrize1"]
}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[5664, 165, 23, 0, 42, "FooterCell"]
+Cell[6096, 178, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanReduce.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanReduce.nb
index 9082b12fb..8d2a376d4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanReduce.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FeynmanReduce.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8585, 250]
-NotebookOptionsPosition[ 5182, 158]
-NotebookOutlinePosition[ 8051, 229]
-CellTagsIndexPosition[ 7936, 223]
+NotebookDataLength[ 8743, 254]
+NotebookOptionsPosition[ 5616, 171]
+NotebookOutlinePosition[ 8262, 236]
+CellTagsIndexPosition[ 8187, 231]
WindowTitle->FeynmanReduce
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ FeynmanReduce.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$70233],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$137835],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/FeynmanReduce", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ FeynmanReduce.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FeynmanReduce", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FeynmanReduce", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -101,39 +114,40 @@ terms and operate on the terms one by one."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->157295448],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->534488259],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->921617629],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FeynmanReduce", "]"}]], "Input",
CellTags->"FeynmanReduce",
- CellLabel->"In[1]:=",
+ CellLabel->"In[111]:=",
CellID->160646569],
Cell[BoxData[
@@ -144,14 +158,13 @@ Cell[BoxData[
RowBox[{"Flatten", "\[Rule]", "True"}], ",",
RowBox[{"Expand", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{328, 15},
+ ImageSize->{306, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FeynmanReduce",
- CellLabel->"Out[1]=",
- CellID->968892063]
-}, Open ]]
+ CellLabel->"Out[111]="]
}, Open ]]
+}, Closed]]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -168,10 +181,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 19, 59.762944}",
+ "built" -> "{2020, 1, 5, 18, 57, 46.026403}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -185,12 +198,12 @@ exponentials is implemented. This will work on terms of the form \
E^p1[a,b,c,...]*p2[a,b,c,...], where p1 and p2 are fractions of polynomials \
in the Feynman parameters a,b,c,... If the option Expand is set to True, \
FeynmanReduce will attempt to bring the expression exp into a sum of such \
-terms and operate on the terms one by one.", "synonyms" -> {}, "title" ->
- "FeynmanReduce", "titlemodifier" -> "", "windowtitle" -> "FeynmanReduce",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FeynmanReduce"},
- "SearchTextTranslated" -> ""},
+terms and operate on the terms one by one.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FeynmanReduce", "titlemodifier" -> "",
+ "windowtitle" -> "FeynmanReduce", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FeynmanReduce"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -199,7 +212,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -207,51 +220,42 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3945, 103, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->157295448]},
"FeynmanReduce"->{
- Cell[4577, 132, 143, 4, 27, "Input",
+ Cell[5027, 146, 145, 4, 27, "Input",
CellTags->"FeynmanReduce",
CellID->160646569],
- Cell[4723, 138, 393, 13, 36, "Output",
- CellTags->"FeynmanReduce",
- CellID->968892063]}
+ Cell[5175, 152, 375, 12, 37, "Output",
+ CellTags->"FeynmanReduce"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7586, 209},
- {"FeynmanReduce", 7726, 213}
+ {"FeynmanReduce", 7999, 222}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 1008, 21, 176, "Usage",
- CellID->982511436],
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3945, 103, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->157295448],
+Cell[3197, 91, 1008, 21, 171, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4357, 122, 195, 6, 25, "ExampleSection",
- CellID->921617629],
+Cell[4230, 116, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->534488259],
+Cell[4971, 142, 31, 0, 14, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4577, 132, 143, 4, 27, "Input",
+Cell[5027, 146, 145, 4, 27, "Input",
CellTags->"FeynmanReduce",
CellID->160646569],
-Cell[4723, 138, 393, 13, 36, "Output",
- CellTags->"FeynmanReduce",
- CellID->968892063]
-}, Open ]]
+Cell[5175, 152, 375, 12, 37, "Output",
+ CellTags->"FeynmanReduce"]
}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[5155, 156, 23, 0, 42, "FooterCell"]
+Cell[5589, 169, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldDerivative.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldDerivative.nb
index 290449287..b7b6f3282 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldDerivative.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldDerivative.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18813, 653]
-NotebookOptionsPosition[ 14382, 523]
-NotebookOutlinePosition[ 17600, 608]
-CellTagsIndexPosition[ 17481, 602]
+NotebookDataLength[ 18324, 639]
+NotebookOptionsPosition[ 14134, 515]
+NotebookOutlinePosition[ 16926, 590]
+CellTagsIndexPosition[ 16807, 584]
WindowTitle->FieldDerivative
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FieldDerivative\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FieldDerivative"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCPartialD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPartialD"], "\<\"ExpandParitalD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ExpandParitalD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FieldDerivative\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FieldDerivative"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FieldDerivative.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$70939],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FieldDerivative", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$138791],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FieldDerivative", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ FieldDerivative.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FieldDerivative", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FieldDerivative", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -83,14 +118,14 @@ Cell[BoxData[GridBox[{
RowBox[{
RowBox[{"f", "[", "x", "]"}], ",", "x", ",", "li1", ",", "li2", ",",
"..."}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the derivative of f[x] with respect to space-time variables x and \
-with Lorentz indices li1, li2, ..., where li1, li2, ... have head \
-LorentzIndex. FieldDerivative[f[x],x,li1,li2,...] can be given as \
-FieldDerivative[f[x],x,{l1,l2,...}], where l1 is li1 without the head, ... \
-FieldDerivative is defined only for objects with head QuantumField[...]. If \
-the space-time derivative of other objects is wanted, the corresponding rule \
-must be specified."
+ " \[LineSeparator] is the derivative of f[x] with respect to space-time \
+variables x and with Lorentz indices li1, li2, ..., where li1, li2, ... have \
+head ",
+ ButtonBox["LorentzIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
+ ButtonNote->"LorentzIndex"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -101,6 +136,74 @@ must be specified."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->965135585],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FieldDerivative", "[",
+ RowBox[{
+ RowBox[{"f", "[", "x", "]"}], ",", "x", ",", "li1", ",", "li2", ",",
+ "..."}], "]"}]], "InlineFormula"],
+ " can be given as ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"FieldDerivative", "[",
+ RowBox[{
+ RowBox[{"f", "[", "x", "]"}], ",", "x", ",",
+ RowBox[{"{",
+ RowBox[{"l1", ",", "l2", ",", "..."}], "}"}]}], "]"}], ","}]],
+ "InlineFormula"],
+ " where ",
+ Cell[BoxData["l1"], "InlineFormula"],
+ " is ",
+ Cell[BoxData["li1"], "InlineFormula"],
+ " without the head."
+}], "Notes"],
+
+Cell[TextData[{
+ ButtonBox["FieldDerivative",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FieldDerivative",
+ ButtonNote->"FieldDerivative"],
+ " is defined only for objects with head ",
+ ButtonBox["QuantumField",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuantumField",
+ ButtonNote->"QuantumField"],
+ ". If the space-time derivative of other objects is wanted, the \
+corresponding rule must be specified."
+}], "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -116,7 +219,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->777214519],
+ CellID->1665045889],
Cell[CellGroupData[{
@@ -126,7 +229,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1816710333],
+ CellID->1405584882],
Cell[CellGroupData[{
@@ -179,12 +282,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Sigma]",
TraditionalForm]], "(", "y", ")"}]}], TraditionalForm]], "Output",
- ImageSize->{175, 18},
+ ImageSize->{192, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldDerivative",
- CellLabel->"Out[1]=",
- CellID->841917756]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -217,18 +319,19 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["C",
TraditionalForm],
FormBox[
FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
+ TraditionalForm]], ")"}], ")"}], "\[InvisibleApplication]",
RowBox[{"(", "x", ")"}]}], ".",
RowBox[{
SubscriptBox[
@@ -240,18 +343,19 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
+ TraditionalForm]], ")"}], ")"}], "\[InvisibleApplication]",
RowBox[{"(", "x", ")"}]}], ".",
RowBox[{
SubscriptBox[
@@ -271,12 +375,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Sigma]",
TraditionalForm]], "(", "y", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{423, 19},
+ ImageSize->{488, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldDerivative",
- CellLabel->"Out[2]=",
- CellID->1663127681]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -284,7 +387,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"FieldDerivative", "[",
- RowBox[{"%", ",", "y", ",",
+ RowBox[{"%%", ",", "y", ",",
RowBox[{"{", "\[Nu]", "}"}]}], "]"}], "//", "DotExpand"}]], "Input",
CellTags->"FieldDerivative",
CellLabel->"In[3]:=",
@@ -306,106 +409,6 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]], "(", "y", ")"}], ".",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["C",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
- RowBox[{"(", "x", ")"}]}], ".",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["D",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
- RowBox[{"(", "y", ")"}]}]}], "+",
- RowBox[{
- RowBox[{
- SubscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox["\[Mu]",
- TraditionalForm]], "(", "x", ")"}], ".",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["B",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
- RowBox[{"(", "y", ")"}]}], ".",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["C",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
- RowBox[{"(", "x", ")"}]}], ".",
- RowBox[{
- SubscriptBox[
- FormBox["D",
- TraditionalForm],
- FormBox["\[Sigma]",
- TraditionalForm]], "(", "y", ")"}]}], "+",
- RowBox[{
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
- RowBox[{"(", "x", ")"}]}], ".",
- RowBox[{
- SubscriptBox[
- FormBox["B",
- TraditionalForm],
- FormBox["\[Nu]",
- TraditionalForm]], "(", "y", ")"}], ".",
RowBox[{
SubscriptBox[
FormBox["C",
@@ -415,51 +418,43 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["D",
TraditionalForm],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
+ TraditionalForm]], ")"}], ")"}], "\[InvisibleApplication]",
RowBox[{"(", "y", ")"}]}]}], "+",
RowBox[{
RowBox[{
- RowBox[{"(",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
- RowBox[{"(", "x", ")"}]}], ".",
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox["\[Mu]",
+ TraditionalForm]], "(", "x", ")"}], ".",
RowBox[{
RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["B",
TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], ")"}], "\[InvisibleApplication]",
+ TraditionalForm]], ")"}], ")"}], "\[InvisibleApplication]",
RowBox[{"(", "y", ")"}]}], ".",
RowBox[{
SubscriptBox[
@@ -473,12 +468,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Sigma]",
TraditionalForm]], "(", "y", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{496, 42},
+ ImageSize->{484, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldDerivative",
- CellLabel->"Out[3]=",
- CellID->785636748]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -508,15 +502,13 @@ Cell[TextData[{
ButtonNote->"FCPartialD"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["ExpandPartialD",
+ StyleBox[ButtonBox["ExpandParitalD",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ExpandPartialD",
- ButtonNote->"ExpandPartialD"],
+ ButtonData->"paclet:FeynCalc/ref/ExpandParitalD",
+ ButtonNote->"ExpandParitalD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FieldDerivative",
- CellID->1023535536]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -524,7 +516,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"FieldDerivative",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -533,10 +525,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 3.073872}",
+ "built" -> "{2020, 1, 5, 18, 57, 48.791465}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -544,17 +536,12 @@ TaggingRules->{
"None", "summary" ->
"FieldDerivative[f[x], x, li1, li2, ...] is the derivative of f[x] with \
respect to space-time variables x and with Lorentz indices li1, li2, ..., \
-where li1, li2, ... have head LorentzIndex. \
-FieldDerivative[f[x],x,li1,li2,...] can be given as \
-FieldDerivative[f[x],x,{l1,l2,...}], where l1 is li1 without the head, ... \
-FieldDerivative is defined only for objects with head QuantumField[...]. If \
-the space-time derivative of other objects is wanted, the corresponding rule \
-must be specified.", "synonyms" -> {}, "title" -> "FieldDerivative",
- "titlemodifier" -> "", "windowtitle" -> "FieldDerivative", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/FieldDerivative"},
- "SearchTextTranslated" -> ""},
+where li1, li2, ... have head LorentzIndex.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FieldDerivative", "titlemodifier" -> "",
+ "windowtitle" -> "FieldDerivative", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FieldDerivative"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -562,8 +549,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -572,89 +560,87 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3865, 103, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6664, 206, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->777214519]},
+ CellID->1665045889]},
"FieldDerivative"->{
- Cell[4498, 132, 639, 20, 45, "Input",
+ Cell[7298, 235, 639, 20, 45, "Input",
CellTags->"FieldDerivative",
CellID->1922686463],
- Cell[5140, 154, 796, 32, 39, "Output",
- CellTags->"FieldDerivative",
- CellID->841917756],
- Cell[5973, 191, 236, 7, 27, "Input",
+ Cell[7940, 257, 776, 31, 39, "Output",
+ CellTags->"FieldDerivative"],
+ Cell[8753, 293, 236, 7, 27, "Input",
CellTags->"FieldDerivative",
CellID->626008050],
- Cell[6212, 200, 2037, 78, 40, "Output",
- CellTags->"FieldDerivative",
- CellID->1663127681],
- Cell[8286, 283, 237, 7, 27, "Input",
+ Cell[8992, 302, 2042, 79, 40, "Output",
+ CellTags->"FieldDerivative"],
+ Cell[11071, 386, 238, 7, 27, "Input",
CellTags->"FieldDerivative",
CellID->1996069937],
- Cell[8526, 292, 5028, 188, 63, "Output",
- CellTags->"FieldDerivative",
- CellID->785636748],
- Cell[13922, 503, 418, 15, 32, "Text",
- CellTags->"FieldDerivative",
- CellID->1023535536]}
+ Cell[11312, 395, 2042, 79, 39, "Output",
+ CellTags->"FieldDerivative"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16642, 573},
- {"FieldDerivative", 16784, 577}
+ {"PrimaryExamplesSection", 16129, 561},
+ {"FieldDerivative", 16272, 565}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3133, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 916, 21, 146, "Usage",
+Cell[3723, 98, 292, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4040, 113, 744, 21, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3865, 103, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4809, 138, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->965135585],
+Cell[5550, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5584, 166, 582, 20, 70, "Notes"],
+Cell[6169, 188, 446, 12, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6664, 206, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->777214519],
+ CellID->1665045889],
Cell[CellGroupData[{
-Cell[4277, 122, 196, 6, 25, "ExampleSection",
- CellID->1816710333],
+Cell[7077, 225, 196, 6, 26, "ExampleSection",
+ CellID->1405584882],
Cell[CellGroupData[{
-Cell[4498, 132, 639, 20, 45, "Input",
+Cell[7298, 235, 639, 20, 45, "Input",
CellTags->"FieldDerivative",
CellID->1922686463],
-Cell[5140, 154, 796, 32, 39, "Output",
- CellTags->"FieldDerivative",
- CellID->841917756]
+Cell[7940, 257, 776, 31, 39, "Output",
+ CellTags->"FieldDerivative"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5973, 191, 236, 7, 27, "Input",
+Cell[8753, 293, 236, 7, 27, "Input",
CellTags->"FieldDerivative",
CellID->626008050],
-Cell[6212, 200, 2037, 78, 40, "Output",
- CellTags->"FieldDerivative",
- CellID->1663127681]
+Cell[8992, 302, 2042, 79, 40, "Output",
+ CellTags->"FieldDerivative"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8286, 283, 237, 7, 27, "Input",
+Cell[11071, 386, 238, 7, 27, "Input",
CellTags->"FieldDerivative",
CellID->1996069937],
-Cell[8526, 292, 5028, 188, 63, "Output",
- CellTags->"FieldDerivative",
- CellID->785636748]
+Cell[11312, 395, 2042, 79, 39, "Output",
+ CellTags->"FieldDerivative"]
}, Open ]]
}, Open ]],
-Cell[13581, 484, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13381, 478, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13649, 489, 270, 12, 31, "SeeAlsoSection",
+Cell[13449, 483, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13922, 503, 418, 15, 32, "Text",
- CellTags->"FieldDerivative",
- CellID->1023535536]
+Cell[13722, 497, 370, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[14355, 521, 23, 0, 42, "FooterCell"]
+Cell[14107, 513, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldStrength.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldStrength.nb
index 037aad93b..adb78ca56 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldStrength.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FieldStrength.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21414, 764]
-NotebookOptionsPosition[ 14991, 564]
-NotebookOutlinePosition[ 19172, 679]
-CellTagsIndexPosition[ 19055, 673]
+NotebookDataLength[ 20703, 743]
+NotebookOptionsPosition[ 15456, 582]
+NotebookOutlinePosition[ 18755, 673]
+CellTagsIndexPosition[ 18638, 667]
WindowTitle->FieldStrength
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FieldStrength\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FieldStrength"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"QuantumField\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuantumField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FieldStrength\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FieldStrength"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FieldStrength.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$71275],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FieldStrength", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$139240],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FieldStrength", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ FieldStrength.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FieldStrength", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FieldStrength", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -82,85 +116,108 @@ Cell[BoxData[GridBox[{
RowBox[{"FieldStrength", "[",
RowBox[{"\[Mu]", ",", " ", "\[Nu]", ",", " ", "a"}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "is the field strength tensor ",
+ " \[LineSeparator]is the field strength tensor ",
Cell[BoxData[
- FormBox[
+ RowBox[{
+ RowBox[{
+ SubscriptBox["\[PartialD]", "\[Mu]"],
+ SubsuperscriptBox["A", "\[Nu]", "a"]}], " ", "-", " ",
+ RowBox[{
+ SubscriptBox["\[PartialD]", "\[Nu]"],
+ SubsuperscriptBox["A", "\[Mu]", "a"]}], " ", "+", " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]", "\[Mu]"],
- SubsuperscriptBox["A", "\[Nu]", "a"]}], "-",
- RowBox[{
- SubscriptBox["\[PartialD]", "\[Nu]"],
- SubsuperscriptBox["A", "\[Mu]", "a"]}], "+",
- RowBox[{
- SubscriptBox["g", "s"], " ",
- SubsuperscriptBox["A", "\[Mu]", "b1"],
- SubsuperscriptBox["A", "\[Nu]", "c1"]}]}], TraditionalForm]]],
+ SubscriptBox["g", "s"],
+ SubsuperscriptBox["A", "\[Mu]", "b"],
+ SubsuperscriptBox["A", "\[Nu]", "c"], " ",
+ SuperscriptBox["f", "abc"]}]}]], "InlineFormula"],
+ "."
+ }]]},
+ {"", Cell[TextData[{
Cell[BoxData[
- FormBox[
- RowBox[{" ",
- SuperscriptBox["f",
- RowBox[{"a", " ", "b1", " ", "c1"}]]}], TraditionalForm]]],
- ". FieldStrength[\[Mu], \[Nu]] is the field strength tensor ",
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the field strength tensor ",
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]", "\[Mu]"],
- SubsuperscriptBox["A", "\[Nu]", "\[Null]"]}], "-",
- RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]", "\[Nu]"],
- SubsuperscriptBox["A", "\[Mu]", "\[Null]"]}], "."}]}],
- TraditionalForm]]],
- " The name of the field (A) and the coupling constant (g) can be set \
-through the options or by additional arguments. The first two indices are \
-interpreted as type LorentzIndex, except OPEDelta, which is converted to \
-Momentum[OPEDelta]."
+ RowBox[{Cell[TextData[Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SubscriptBox["\[PartialD]", "\[Mu]"],
+ SubscriptBox["A", "\[Nu]"]}], "-",
+ RowBox[{
+ SubscriptBox["\[PartialD]", "\[Nu]"],
+ SubscriptBox["A", "\[Mu]"]}]}], TraditionalForm]],
+ "InlineFormula"]], "InlineFormula"], "."}], TraditionalForm]]]
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->291386470],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1193771266],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1825968503],
+ "The name of the field (",
+ Cell[BoxData["A"], "InlineFormula"],
+ ") and the coupling constant (",
+ Cell[BoxData["g"], "InlineFormula"],
+ ") can be set through the options or by additional arguments. "
+}], "Notes"],
+
+Cell[TextData[{
+ "The first two indices are interpreted as type ",
+ ButtonBox["LorentzIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
+ ButtonNote->"LorentzIndex"],
+ ", except ",
+ ButtonBox["OPEDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/OPEDelta",
+ ButtonNote->"OPEDelta"],
+ ", which is converted to ",
+ Cell[BoxData[
+ RowBox[{"Momentum", "[", "OPEDelta", "]"}]], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "FieldStrength", "]"}]], "Input",
CellTags->"FieldStrength",
- CellLabel->"In[1]:=",
+ CellLabel->"In[196]:=",
CellID->1871937792],
Cell[BoxData[
@@ -176,21 +233,51 @@ Cell[BoxData[
RowBox[{"Symbol", "\[Rule]", "\<\"F\"\>"}], ",",
RowBox[{"QuantumField", "\[Rule]", "A"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{381, 35},
+ ImageSize->{363, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldStrength",
- CellLabel->"Out[1]=",
- CellID->1632479646]
+ CellLabel->"Out[196]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->380314619],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->362136222],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"FieldStrength", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
CellTags->"FieldStrength",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->302696897],
Cell[BoxData[
@@ -201,12 +288,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]}], "\[Null]"], TraditionalForm]], "Output",
- ImageSize->{30, 19},
+ ImageSize->{31, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldStrength",
- CellLabel->"Out[2]=",
- CellID->1654266361]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -215,7 +301,7 @@ Cell[BoxData[
RowBox[{"FieldStrength", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "a"}], "]"}]], "Input",
CellTags->"FieldStrength",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1691553307],
Cell[BoxData[
@@ -228,12 +314,11 @@ Cell[BoxData[
TraditionalForm]}],
FormBox["a",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{30, 19},
+ ImageSize->{31, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldStrength",
- CellLabel->"Out[3]=",
- CellID->1099758759]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,44 +328,45 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"FieldStrength",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->278939746],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}]}], TraditionalForm]], "Output",
- ImageSize->{89, 19},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{126, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldStrength",
- CellLabel->"Out[4]=",
- CellID->1642105709]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -290,7 +376,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "a", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"FieldStrength",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->474892601],
Cell[BoxData[
@@ -302,9 +388,9 @@ Cell[BoxData[
RowBox[{
FormBox["a",
TraditionalForm],
- FormBox["b663",
+ FormBox["b849",
TraditionalForm],
- FormBox["c664",
+ FormBox["c850",
TraditionalForm]}]], " ",
RowBox[{
SubsuperscriptBox[
@@ -315,7 +401,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b663",
+ FormBox["b849",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -326,11 +412,12 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c664",
+ FormBox["c850",
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -345,9 +432,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -362,79 +450,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{274, 23},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FieldStrength",
- CellLabel->"Out[5]=",
- CellID->409660918]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FieldStrength", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}], "]"}]], "Input",
- CellTags->"FieldStrength",
- CellLabel->"In[6]:=",
- CellID->2102395759],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",", "GaugeField",
- ",",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}], "-",
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",", "GaugeField",
- ",",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]}]], "Output",
- ImageSize->{479, 50},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{326, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldStrength",
- CellLabel->"Out[6]//StandardForm=",
- CellID->66342321]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FieldStrength", "[",
- RowBox[{"\[Mu]", ",", "OPEDelta", ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}], "]"}]], "Input",
- CellTags->"FieldStrength",
- CellLabel->"In[7]:=",
- CellID->481183730],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",", "GaugeField",
- ",",
- RowBox[{"Momentum", "[", "OPEDelta", "]"}]}], "]"}], "-",
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"Momentum", "[", "OPEDelta", "]"}], "]"}], ",", "GaugeField",
- ",",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]}]], "Output",
- ImageSize->{504, 50},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FieldStrength",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1631615995]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -443,10 +464,11 @@ Cell[BoxData[
RowBox[{"FieldStrength", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "a", ",",
RowBox[{"CouplingConstant", "\[Rule]",
- RowBox[{"-", "Gstrong"}]}], ",",
+ RowBox[{"-",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}]}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"FieldStrength",
- CellLabel->"In[8]:=",
+ CellLabel->"In[5]:=",
CellID->1847448290],
Cell[BoxData[
@@ -459,9 +481,9 @@ Cell[BoxData[
RowBox[{
FormBox["a",
TraditionalForm],
- FormBox["b665",
+ FormBox["b853",
TraditionalForm],
- FormBox["c666",
+ FormBox["c854",
TraditionalForm]}]], " ",
RowBox[{
SubsuperscriptBox[
@@ -472,7 +494,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b665",
+ FormBox["b853",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -483,11 +505,12 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c666",
+ FormBox["c854",
TraditionalForm],
TraditionalForm]]}]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -502,9 +525,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -519,13 +543,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{282, 23},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{337, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FieldStrength",
- CellLabel->"Out[8]=",
- CellID->865013743]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -548,24 +571,19 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["QuantumField",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/QuantumField",
- ButtonNote->"QuantumField"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"FieldStrength",
- CellID->830418848]
+Cell[TextData[StyleBox[ButtonBox["QuantumField",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuantumField",
+ ButtonNote->"QuantumField"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"FieldStrength",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -574,10 +592,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 4.548584}",
+ "built" -> "{2020, 1, 5, 18, 57, 50.417948}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -585,17 +603,14 @@ TaggingRules->{
"None", "summary" ->
"FieldStrength[\\[Mu], \\[Nu], a] is the field strength tensor \
\\[PartialD]\\[Mu] A_\\[Nu]^a - \\[PartialD]\\[Nu] \\ A_\\[Mu]^a + gs \
-A_\\[Mu]^b1 A_\\[Nu]^c1 f a b1 c1. FieldStrength[\\[Mu], \\[Nu]] is the field \
-strength tensor \\[PartialD]\\[Mu] A_\\[Nu]^\\[Null] - \\ \\[PartialD]\\[Nu] \
-A_\\[Mu]^\\[Null]. The name of the field (A) and the coupling constant (g) \
-can be set through the options or by additional arguments. The first two \
-indices are interpreted as type LorentzIndex, except OPEDelta, which is \
-converted to Momentum[OPEDelta].", "synonyms" -> {}, "title" ->
- "FieldStrength", "titlemodifier" -> "", "windowtitle" -> "FieldStrength",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FieldStrength"},
- "SearchTextTranslated" -> ""},
+A_\\[Mu]^b A_\\[Nu]^c f^abc. FieldStrength[\\[Mu], \\[Nu]] is the field \
+strength tensor \\[PartialD]\\[Mu] A\\[Nu] - \\[PartialD]\\[Nu] A\\[Mu].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FieldStrength",
+ "titlemodifier" -> "", "windowtitle" -> "FieldStrength", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FieldStrength"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -604,7 +619,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -612,160 +627,124 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4667, 130, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->291386470]},
"FieldStrength"->{
- Cell[5300, 159, 144, 4, 27, "Input",
+ Cell[7041, 216, 146, 4, 70, "Input",
CellTags->"FieldStrength",
CellID->1871937792],
- Cell[5447, 165, 591, 18, 56, "Output",
- CellTags->"FieldStrength",
- CellID->1632479646],
- Cell[6075, 188, 168, 5, 27, "Input",
+ Cell[7190, 222, 572, 17, 56, "Output",
+ CellTags->"FieldStrength"],
+ Cell[8455, 275, 168, 5, 27, "Input",
CellTags->"FieldStrength",
CellID->302696897],
- Cell[6246, 195, 352, 13, 40, "Output",
- CellTags->"FieldStrength",
- CellID->1654266361],
- Cell[6635, 213, 179, 5, 27, "Input",
+ Cell[8626, 282, 331, 12, 40, "Output",
+ CellTags->"FieldStrength"],
+ Cell[8994, 299, 179, 5, 27, "Input",
CellTags->"FieldStrength",
CellID->1691553307],
- Cell[6817, 220, 380, 15, 40, "Output",
- CellTags->"FieldStrength",
- CellID->1099758759],
- Cell[7234, 240, 218, 6, 27, "Input",
+ Cell[9176, 306, 359, 14, 40, "Output",
+ CellTags->"FieldStrength"],
+ Cell[9572, 325, 218, 6, 27, "Input",
CellTags->"FieldStrength",
CellID->278939746],
- Cell[7455, 248, 828, 34, 40, "Output",
- CellTags->"FieldStrength",
- CellID->1642105709],
- Cell[8320, 287, 228, 6, 27, "Input",
+ Cell[9793, 333, 828, 35, 40, "Output",
+ CellTags->"FieldStrength"],
+ Cell[10658, 373, 228, 6, 27, "Input",
CellTags->"FieldStrength",
CellID->474892601],
- Cell[8551, 295, 1735, 75, 44, "Output",
- CellTags->"FieldStrength",
- CellID->409660918],
- Cell[10323, 375, 260, 7, 27, "Input",
- CellTags->"FieldStrength",
- CellID->2102395759],
- Cell[10586, 384, 656, 19, 84, "Output",
- CellTags->"FieldStrength",
- CellID->66342321],
- Cell[11279, 408, 262, 7, 27, "Input",
- CellTags->"FieldStrength",
- CellID->481183730],
- Cell[11544, 417, 656, 19, 84, "Output",
- CellTags->"FieldStrength",
- CellID->1631615995],
- Cell[12237, 441, 310, 8, 27, "Input",
+ Cell[10889, 381, 1767, 76, 43, "Output",
+ CellTags->"FieldStrength"],
+ Cell[12693, 462, 347, 9, 29, "Input",
CellTags->"FieldStrength",
CellID->1847448290],
- Cell[12550, 451, 1787, 76, 44, "Output",
- CellTags->"FieldStrength",
- CellID->865013743],
- Cell[14705, 550, 244, 9, 31, "Text",
- CellTags->"FieldStrength",
- CellID->830418848]}
+ Cell[13043, 473, 1819, 77, 43, "Output",
+ CellTags->"FieldStrength"]},
+ "PrimaryExamplesSection"->{
+ Cell[7823, 246, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->380314619]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17295, 614},
- {"FieldStrength", 17435, 618}
+ {"FieldStrength", 17472, 629},
+ {"PrimaryExamplesSection", 18495, 660}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3031, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 1730, 48, 142, "Usage",
- CellID->982511436],
+Cell[3619, 97, 290, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4667, 130, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->291386470],
+Cell[3934, 112, 1594, 45, 156, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[5079, 149, 196, 6, 25, "ExampleSection",
- CellID->1825968503],
+Cell[5553, 161, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1193771266],
+Cell[6295, 187, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6329, 189, 231, 6, 70, "Notes"],
+Cell[6563, 197, 453, 15, 70, "Notes"],
Cell[CellGroupData[{
-Cell[5300, 159, 144, 4, 27, "Input",
+Cell[7041, 216, 146, 4, 70, "Input",
CellTags->"FieldStrength",
CellID->1871937792],
-Cell[5447, 165, 591, 18, 56, "Output",
- CellTags->"FieldStrength",
- CellID->1632479646]
+Cell[7190, 222, 572, 17, 56, "Output",
+ CellTags->"FieldStrength"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[6075, 188, 168, 5, 27, "Input",
+Cell[7823, 246, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->380314619],
+Cell[CellGroupData[{
+Cell[8235, 265, 195, 6, 26, "ExampleSection",
+ CellID->362136222],
+Cell[CellGroupData[{
+Cell[8455, 275, 168, 5, 27, "Input",
CellTags->"FieldStrength",
CellID->302696897],
-Cell[6246, 195, 352, 13, 40, "Output",
- CellTags->"FieldStrength",
- CellID->1654266361]
+Cell[8626, 282, 331, 12, 40, "Output",
+ CellTags->"FieldStrength"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6635, 213, 179, 5, 27, "Input",
+Cell[8994, 299, 179, 5, 27, "Input",
CellTags->"FieldStrength",
CellID->1691553307],
-Cell[6817, 220, 380, 15, 40, "Output",
- CellTags->"FieldStrength",
- CellID->1099758759]
+Cell[9176, 306, 359, 14, 40, "Output",
+ CellTags->"FieldStrength"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7234, 240, 218, 6, 27, "Input",
+Cell[9572, 325, 218, 6, 27, "Input",
CellTags->"FieldStrength",
CellID->278939746],
-Cell[7455, 248, 828, 34, 40, "Output",
- CellTags->"FieldStrength",
- CellID->1642105709]
+Cell[9793, 333, 828, 35, 40, "Output",
+ CellTags->"FieldStrength"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8320, 287, 228, 6, 27, "Input",
+Cell[10658, 373, 228, 6, 27, "Input",
CellTags->"FieldStrength",
CellID->474892601],
-Cell[8551, 295, 1735, 75, 44, "Output",
- CellTags->"FieldStrength",
- CellID->409660918]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10323, 375, 260, 7, 27, "Input",
- CellTags->"FieldStrength",
- CellID->2102395759],
-Cell[10586, 384, 656, 19, 84, "Output",
- CellTags->"FieldStrength",
- CellID->66342321]
+Cell[10889, 381, 1767, 76, 43, "Output",
+ CellTags->"FieldStrength"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11279, 408, 262, 7, 27, "Input",
- CellTags->"FieldStrength",
- CellID->481183730],
-Cell[11544, 417, 656, 19, 84, "Output",
- CellTags->"FieldStrength",
- CellID->1631615995]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[12237, 441, 310, 8, 27, "Input",
+Cell[12693, 462, 347, 9, 29, "Input",
CellTags->"FieldStrength",
CellID->1847448290],
-Cell[12550, 451, 1787, 76, 44, "Output",
- CellTags->"FieldStrength",
- CellID->865013743]
+Cell[13043, 473, 1819, 77, 43, "Output",
+ CellTags->"FieldStrength"]
}, Open ]]
}, Open ]],
-Cell[14364, 531, 31, 0, 29, "SectionFooterSpacer"]
+Cell[14889, 554, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14432, 536, 270, 12, 31, "SeeAlsoSection",
+Cell[14957, 559, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[14705, 550, 244, 9, 31, "Text",
- CellTags->"FieldStrength",
- CellID->830418848]
+Cell[15230, 573, 184, 4, 70, "SeeAlso"]
}, Open ]],
-Cell[14964, 562, 23, 0, 42, "FooterCell"]
+Cell[15429, 580, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalFunction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalFunction.nb
index 6daaad260..cf7c9833d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalFunction.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalFunction.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6040, 186]
-NotebookOptionsPosition[ 3835, 121]
-NotebookOutlinePosition[ 5774, 175]
-CellTagsIndexPosition[ 5699, 170]
+NotebookDataLength[ 6772, 206]
+NotebookOptionsPosition[ 4785, 151]
+NotebookOutlinePosition[ 6565, 198]
+CellTagsIndexPosition[ 6522, 195]
WindowTitle->FinalFunction
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FinalFunction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FinalFunction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoopSum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FinalFunction\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FinalFunction"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FinalFunction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$71615],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FinalFunction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$139680],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FinalFunction", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ FinalFunction.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FinalFunction", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FinalFunction", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FinalFunction",
- CellID->1102033150]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,20 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 6.127471}",
+ "built" -> "{2020, 1, 5, 18, 57, 51.951063}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "FinalFunction is an option for OneLoopSum.",
- "synonyms" -> {}, "title" -> "FinalFunction", "titlemodifier" -> "",
- "windowtitle" -> "FinalFunction", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FinalFunction"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FinalFunction",
+ "titlemodifier" -> "", "windowtitle" -> "FinalFunction", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FinalFunction"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -153,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FinalFunction"->{
- Cell[3554, 107, 239, 9, 70, "Text",
- CellTags->"FinalFunction",
- CellID->1102033150]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FinalFunction", 5583, 163}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3027, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 344, 11, 70, "Usage",
+Cell[3615, 97, 290, 11, 70, "ObjectNameGrid"],
+Cell[3908, 110, 344, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3281, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4277, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3554, 107, 239, 9, 70, "Text",
- CellTags->"FinalFunction",
- CellID->1102033150]
+Cell[4550, 139, 193, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3808, 119, 23, 0, 70, "FooterCell"]
+Cell[4758, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalSubstitutions.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalSubstitutions.nb
index 967599e5e..7b7e70979 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalSubstitutions.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FinalSubstitutions.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6641, 201]
-NotebookOptionsPosition[ 4284, 134]
-NotebookOutlinePosition[ 6369, 190]
-CellTagsIndexPosition[ 6289, 185]
+NotebookDataLength[ 7522, 224]
+NotebookOptionsPosition[ 5403, 167]
+NotebookOutlinePosition[ 7313, 216]
+CellTagsIndexPosition[ 7270, 213]
WindowTitle->FinalSubstitutions
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FinalSubstitutions\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FinalSubstitutions"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSum"], "\<\"Write2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Write2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FinalSubstitutions\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FinalSubstitutions"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FinalSubstitutions.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$71961],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FinalSubstitutions", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$140124],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FinalSubstitutions", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ FinalSubstitutions.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FinalSubstitutions", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FinalSubstitutions", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,9 +160,7 @@ Cell[TextData[{
ButtonNote->"Write2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FinalSubstitutions",
- CellID->1617701707]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -144,10 +177,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 7.405483}",
+ "built" -> "{2020, 1, 5, 18, 57, 52.930054}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -155,11 +188,11 @@ TaggingRules->{
"None", "summary" ->
"FinalSubstitutions is an option for OneLoop and OneLoopSum and Write2. \
All substitutions indicated hereby are done at the end of the calculation.",
- "synonyms" -> {}, "title" -> "FinalSubstitutions", "titlemodifier" -> "",
- "windowtitle" -> "FinalSubstitutions", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/FinalSubstitutions"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "FinalSubstitutions",
+ "titlemodifier" -> "", "windowtitle" -> "FinalSubstitutions", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FinalSubstitutions"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -168,41 +201,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FinalSubstitutions"->{
- Cell[3689, 108, 553, 21, 70, "Text",
- CellTags->"FinalSubstitutions",
- CellID->1617701707]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FinalSubstitutions", 6167, 178}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 70, "AnchorBarGrid",
+Cell[590, 21, 3221, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 449, 12, 70, "Usage",
+Cell[3814, 100, 295, 11, 70, "ObjectNameGrid"],
+Cell[4112, 113, 449, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3416, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4586, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3689, 108, 553, 21, 70, "Text",
- CellTags->"FinalSubstitutions",
- CellID->1617701707]
+Cell[4859, 143, 502, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4257, 132, 23, 0, 70, "FooterCell"]
+Cell[5376, 165, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourDivergence.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourDivergence.nb
index 47d79aac0..79a8f2dea 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourDivergence.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourDivergence.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12784, 456]
-NotebookOptionsPosition[ 8116, 311]
-NotebookOutlinePosition[ 11290, 400]
-CellTagsIndexPosition[ 11172, 394]
+NotebookDataLength[ 16730, 592]
+NotebookOptionsPosition[ 11978, 446]
+NotebookOutlinePosition[ 14898, 526]
+CellTagsIndexPosition[ 14780, 520]
WindowTitle->FourDivergence
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FourDivergence\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FourDivergence"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RussianTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RussianTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FourDivergence\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FourDivergence"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FourDivergence.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$74052],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FourDivergence", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$142831],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FourDivergence", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +95,33 @@ FourDivergence.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FourDivergence", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FourDivergence", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"FourDivergence", "[",
RowBox[{"exp", ",", " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", " ", "mu"}], "]"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "calculates the partial derivative of exp w.r.t. p(mu). \
-FourDivergence[exp, FourVector[p, mu], FourVector[p,nu], ...]gives the \
-multiple derivative."
+ " \[LineSeparator]calculates the partial derivative of exp w.r.t ",
+ Cell[BoxData[
+ SuperscriptBox["p", "\[Mu]"]], "InlineFormula"],
+ ". FourDivergence[exp, FV[p, mu], FV[p,nu], ...] gives the multiple \
+derivative."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,6 +132,65 @@ multiple derivative."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->416092128],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FourDivergence", "]"}]], "Input",
+ CellLabel->"In[298]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Abort", "\[Rule]", "True"}], ",",
+ RowBox[{"ApartFF", "\[Rule]", "False"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{445, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[298]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +206,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->454750702],
+ CellID->1638543689],
Cell[CellGroupData[{
@@ -122,14 +216,13 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->545229495],
+ CellID->545755177],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{"ScalarProduct", "[",
- RowBox[{"p", ",", "q"}], "]"}]}]], "Input",
+ RowBox[{"SP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
CellTags->"FourDivergence",
CellLabel->"In[1]:=",
CellID->1686706616],
@@ -149,20 +242,19 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{43, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourDivergence",
- CellLabel->"Out[1]=",
- CellID->712819199]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FourDivergence", "[",
- RowBox[{"t", ",",
- RowBox[{"FourVector", "[",
+ RowBox[{"%", ",",
+ RowBox[{"FV", "[",
RowBox[{"q", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
CellTags->"FourDivergence",
CellLabel->"In[2]:=",
@@ -177,26 +269,22 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 19},
+ ImageSize->{28, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourDivergence",
- CellLabel->"Out[2]=",
- CellID->1032930238]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{"ScalarProduct", "[",
- RowBox[{
- RowBox[{"p", "-", "k"}], ",", "q"}], "]"}]}]], "Input",
+ RowBox[{"SP", "[",
+ RowBox[{
+ RowBox[{"p", "-", "k"}], ",", "q"}], "]"}]], "Input",
CellTags->"FourDivergence",
CellLabel->"In[3]:=",
CellID->1521326595],
@@ -207,13 +295,15 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -224,22 +314,20 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{78, 21},
+ ImageSize->{91, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourDivergence",
- CellLabel->"Out[3]=",
- CellID->2094801531]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FourDivergence", "[",
- RowBox[{"t", ",",
- RowBox[{"FourVector", "[",
- RowBox[{
- RowBox[{"k", "-", "p"}], ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ RowBox[{"%", ",",
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
CellTags->"FourDivergence",
CellLabel->"In[4]:=",
CellID->822682822],
@@ -247,33 +335,82 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{33, 19},
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourDivergence",
- CellLabel->"Out[4]=",
- CellID->1487482336]
+ CellLabel->"Out[4]="]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[", "t", "]"}]], "Input",
- CellTags->"FourDivergence",
- CellLabel->"In[5]:=",
- CellID->1056090995]
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FourDivergence", "[",
+ RowBox[{"%", ",",
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "\[Nu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]]}], TraditionalForm]], "Output",
+ ImageSize->{122, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -302,9 +439,7 @@ Cell[TextData[{
ButtonNote->"RussianTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FourDivergence",
- CellID->1618281503]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -312,7 +447,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FourDivergence",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -321,23 +456,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 15.433986}",
+ "built" -> "{2020, 1, 5, 18, 57, 59.174858}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FourDivergence[exp, FourVector[p, mu]] calculates the partial derivative \
-of exp w.r.t. p(mu). FourDivergence[exp, FourVector[p, mu], FourVector[p,nu], \
-...]gives the multiple derivative.", "synonyms" -> {}, "title" ->
+ "FourDivergence[exp, FV[p, mu]] calculates the partial derivative of exp \
+w.r.t p^\\[Mu]. FourDivergence[exp, FV[p, mu], FV[p,nu], ...] gives the \
+multiple derivative.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"FourDivergence", "titlemodifier" -> "", "windowtitle" ->
"FourDivergence", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/FourDivergence"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -345,8 +480,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -355,109 +491,109 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3556, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6325, 193, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->454750702]},
+ CellID->1638543689]},
"FourDivergence"->{
- Cell[4188, 128, 186, 6, 27, "Input",
+ Cell[6958, 222, 151, 5, 27, "Input",
CellTags->"FourDivergence",
CellID->1686706616],
- Cell[4377, 136, 485, 20, 38, "Output",
- CellTags->"FourDivergence",
- CellID->712819199],
- Cell[4899, 161, 230, 7, 27, "Input",
+ Cell[7112, 229, 465, 19, 37, "Output",
+ CellTags->"FourDivergence"],
+ Cell[7614, 253, 222, 7, 27, "Input",
CellTags->"FourDivergence",
CellID->1594453358],
- Cell[5132, 170, 449, 19, 40, "Output",
- CellTags->"FourDivergence",
- CellID->1032930238],
- Cell[5618, 194, 211, 7, 27, "Input",
+ Cell[7839, 262, 390, 16, 37, "Output",
+ CellTags->"FourDivergence"],
+ Cell[8266, 283, 175, 6, 27, "Input",
CellTags->"FourDivergence",
CellID->1521326595],
- Cell[5832, 203, 674, 28, 42, "Output",
- CellTags->"FourDivergence",
- CellID->2094801531],
- Cell[6543, 236, 255, 8, 27, "Input",
+ Cell[8444, 291, 696, 29, 37, "Output",
+ CellTags->"FourDivergence"],
+ Cell[9177, 325, 221, 7, 27, "Input",
CellTags->"FourDivergence",
CellID->822682822],
- Cell[6801, 246, 525, 22, 40, "Output",
- CellTags->"FourDivergence",
- CellID->1487482336],
- Cell[7341, 271, 131, 4, 27, "Input",
- CellTags->"FourDivergence",
- CellID->1056090995],
- Cell[7828, 297, 246, 9, 31, "Text",
- CellTags->"FourDivergence",
- CellID->1618281503]}
+ Cell[9401, 334, 418, 17, 37, "Output",
+ CellTags->"FourDivergence"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10063, 356},
- {"FourDivergence", 10203, 360}
+ {"PrimaryExamplesSection", 13947, 492},
+ {"FourDivergence", 14089, 496}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2269, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3035, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2858, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 613, 17, 99, "Usage",
+Cell[3624, 97, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3940, 112, 656, 18, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3556, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4621, 134, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->416092128],
+Cell[5362, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5418, 164, 98, 2, 70, "Input"],
+Cell[5519, 168, 745, 18, 75, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6325, 193, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->454750702],
+ CellID->1638543689],
Cell[CellGroupData[{
-Cell[3968, 118, 195, 6, 25, "ExampleSection",
- CellID->545229495],
+Cell[6738, 212, 195, 6, 26, "ExampleSection",
+ CellID->545755177],
Cell[CellGroupData[{
-Cell[4188, 128, 186, 6, 27, "Input",
+Cell[6958, 222, 151, 5, 27, "Input",
CellTags->"FourDivergence",
CellID->1686706616],
-Cell[4377, 136, 485, 20, 38, "Output",
- CellTags->"FourDivergence",
- CellID->712819199]
+Cell[7112, 229, 465, 19, 37, "Output",
+ CellTags->"FourDivergence"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4899, 161, 230, 7, 27, "Input",
+Cell[7614, 253, 222, 7, 27, "Input",
CellTags->"FourDivergence",
CellID->1594453358],
-Cell[5132, 170, 449, 19, 40, "Output",
- CellTags->"FourDivergence",
- CellID->1032930238]
+Cell[7839, 262, 390, 16, 37, "Output",
+ CellTags->"FourDivergence"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5618, 194, 211, 7, 27, "Input",
+Cell[8266, 283, 175, 6, 27, "Input",
CellTags->"FourDivergence",
CellID->1521326595],
-Cell[5832, 203, 674, 28, 42, "Output",
- CellTags->"FourDivergence",
- CellID->2094801531]
+Cell[8444, 291, 696, 29, 37, "Output",
+ CellTags->"FourDivergence"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6543, 236, 255, 8, 27, "Input",
+Cell[9177, 325, 221, 7, 27, "Input",
CellTags->"FourDivergence",
CellID->822682822],
-Cell[6801, 246, 525, 22, 40, "Output",
- CellTags->"FourDivergence",
- CellID->1487482336]
+Cell[9401, 334, 418, 17, 37, "Output",
+ CellTags->"FourDivergence"]
}, Open ]],
-Cell[7341, 271, 131, 4, 27, "Input",
- CellTags->"FourDivergence",
- CellID->1056090995]
+Cell[CellGroupData[{
+Cell[9856, 356, 152, 5, 27, "Input"],
+Cell[10011, 363, 434, 12, 61, "Output"]
}, Open ]],
-Cell[7487, 278, 31, 0, 29, "SectionFooterSpacer"]
+Cell[CellGroupData[{
+Cell[10482, 380, 173, 5, 27, "Input"],
+Cell[10658, 387, 711, 24, 62, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[11396, 415, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7555, 283, 270, 12, 31, "SeeAlsoSection",
+Cell[11464, 420, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7828, 297, 246, 9, 31, "Text",
- CellTags->"FourDivergence",
- CellID->1618281503]
+Cell[11737, 434, 199, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[8089, 309, 23, 0, 42, "FooterCell"]
+Cell[11951, 444, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourLaplacian.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourLaplacian.nb
index f2b63a0b1..0bf999178 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourLaplacian.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourLaplacian.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 19317, 708]
-NotebookOptionsPosition[ 14541, 556]
-NotebookOutlinePosition[ 17705, 647]
-CellTagsIndexPosition[ 17588, 641]
+NotebookDataLength[ 26212, 920]
+NotebookOptionsPosition[ 21822, 784]
+NotebookOutlinePosition[ 24607, 862]
+CellTagsIndexPosition[ 24490, 856]
WindowTitle->FourLaplacian
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FourLaplacian\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FourLaplacian"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FourDivergence\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FourDivergence"], "\<\"RussianTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RussianTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FourLaplacian\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FourLaplacian"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FourLaplacian.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$74390],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FourLaplacian", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$143271],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FourLaplacian", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ FourLaplacian.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FourLaplacian", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FourLaplacian", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,6 +142,54 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1034393011],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FourLaplacian", "]"}]], "Input",
+ CellLabel->"In[118]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Dimension", "\[Rule]", "D"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{112, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[118]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -121,7 +205,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->583071690],
+ CellID->2132342538],
Cell[CellGroupData[{
@@ -131,27 +215,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1509023846],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "FourLaplacian", "]"}]], "Input",
- CellTags->"FourLaplacian",
- CellLabel->"In[1]:=",
- CellID->244662667],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Dimension", "\[Rule]", "D"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{119, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FourLaplacian",
- CellLabel->"Out[1]=",
- CellID->1107918748]
-}, Open ]],
+ CellID->2050018979],
Cell[CellGroupData[{
@@ -159,7 +223,7 @@ Cell[BoxData[
RowBox[{"SP", "[",
RowBox[{"q", ",", "q"}], "]"}]], "Input",
CellTags->"FourLaplacian",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->678691277],
Cell[BoxData[
@@ -170,12 +234,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{22, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourLaplacian",
- CellLabel->"Out[2]=",
- CellID->614689358]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -184,18 +247,17 @@ Cell[BoxData[
RowBox[{"FourLaplacian", "[",
RowBox[{"%", ",", "q", ",", "q"}], "]"}]], "Input",
CellTags->"FourLaplacian",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1086572094],
Cell[BoxData[
FormBox[
RowBox[{"2", " ", "D"}], TraditionalForm]], "Output",
- ImageSize->{27, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourLaplacian",
- CellLabel->"Out[3]=",
- CellID->1928361141]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -209,7 +271,7 @@ Cell[BoxData[
RowBox[{"q", ",",
RowBox[{"q", "-", "p"}]}], "]"}]}], "//", "FCI"}]], "Input",
CellTags->"FourLaplacian",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1385775268],
Cell[BoxData[
@@ -229,22 +291,44 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}], "m"],
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{84, 48},
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{99, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourLaplacian",
- CellLabel->"Out[4]=",
- CellID->1120525938]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -253,16 +337,87 @@ Cell[BoxData[
RowBox[{"FourLaplacian", "[",
RowBox[{"%", ",", "q", ",", " ", "q"}], "]"}]], "Input",
CellTags->"FourLaplacian",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1428791386],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "+",
+ RowBox[{"2", " ", "m"}]}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}],
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ")"}], "2"], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]]}],
+ TraditionalForm], "+",
+ FormBox[
FractionBox[
- RowBox[{"2", " ", "D", " ",
- SuperscriptBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}]}], "+",
+ RowBox[{"4", " ", "m", " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -272,246 +427,321 @@ Cell[BoxData[
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox["q",
+ FormBox["p",
TraditionalForm],
- TraditionalForm]}], ")"}], "m"]}],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}],
+ RowBox[{"m", "-", "1"}]]}], "-",
+ RowBox[{"4", " ", "m", " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}]}],
RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ SuperscriptBox[
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], "2"]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}],
+ RowBox[{
SuperscriptBox[
RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ")"}], "3"], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]]}], "-",
- FractionBox[
- RowBox[{"2", " ", "D", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], "m"]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{"(",
- RowBox[{"m", "-", "1"}], ")"}], " ", "m", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}],
- RowBox[{"m", "-", "2"}]]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"4", " ", "m", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}],
- RowBox[{"m", "-", "1"}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm]}]}], ")"}]}],
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"8", " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}]}]}], "+",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"8", " ",
SuperscriptBox[
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm], "2"], "+",
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}], "-",
+ RowBox[{"16", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}], "+",
+ RowBox[{"8", " ",
SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}], ")"}], "m"]}],
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"4", " ", "m", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm]}], ")"}], "m"]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"]}]], "+",
- FractionBox[
- RowBox[{"8", " ",
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ SuperscriptBox[
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], "3"]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"8", " ",
+ SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm]}], ")"}], "m"]}],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"]}]]}], TraditionalForm]], "Output",
- ImageSize->{437, 170},
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}], "-",
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], "m"]}]}],
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ")"}], "2"], ".",
+ SuperscriptBox[
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], "2"]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{569, 155},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourLaplacian",
- CellLabel->"Out[5]=",
- CellID->290457260]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -547,9 +777,7 @@ Cell[TextData[{
ButtonNote->"RussianTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FourLaplacian",
- CellID->736385282]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -566,22 +794,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 16.881340}",
+ "built" -> "{2020, 1, 5, 18, 58, 0.569268}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FourLaplacian[exp, p, q] is \\[PartialD]/\\[PartialD]p\\[Mu] \
-\\[PartialD]/\\[PartialD]q\\[Mu] exp.", "synonyms" -> {}, "title" ->
- "FourLaplacian", "titlemodifier" -> "", "windowtitle" -> "FourLaplacian",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FourLaplacian"},
- "SearchTextTranslated" -> ""},
+\\[PartialD]/\\[PartialD]q\\[Mu] exp.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FourLaplacian", "titlemodifier" -> "", "windowtitle" ->
+ "FourLaplacian", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FourLaplacian"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -590,7 +818,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -599,117 +827,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3729, 108, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6046, 192, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->583071690]},
+ CellID->2132342538]},
"FourLaplacian"->{
- Cell[4362, 137, 143, 4, 27, "Input",
- CellTags->"FourLaplacian",
- CellID->244662667],
- Cell[4508, 143, 277, 9, 36, "Output",
- CellTags->"FourLaplacian",
- CellID->1107918748],
- Cell[4822, 157, 149, 5, 27, "Input",
+ Cell[6680, 221, 149, 5, 27, "Input",
CellTags->"FourLaplacian",
CellID->678691277],
- Cell[4974, 164, 335, 13, 41, "Output",
- CellTags->"FourLaplacian",
- CellID->614689358],
- Cell[5346, 182, 171, 5, 27, "Input",
+ Cell[6832, 228, 315, 12, 39, "Output",
+ CellTags->"FourLaplacian"],
+ Cell[7184, 245, 171, 5, 27, "Input",
CellTags->"FourLaplacian",
CellID->1086572094],
- Cell[5520, 189, 238, 8, 36, "Output",
- CellTags->"FourLaplacian",
- CellID->1928361141],
- Cell[5795, 202, 283, 10, 27, "Input",
+ Cell[7358, 252, 217, 7, 35, "Output",
+ CellTags->"FourLaplacian"],
+ Cell[7612, 264, 283, 10, 27, "Input",
CellTags->"FourLaplacian",
CellID->1385775268],
- Cell[6081, 214, 800, 32, 69, "Output",
- CellTags->"FourLaplacian",
- CellID->1120525938],
- Cell[6918, 251, 176, 5, 27, "Input",
+ Cell[7898, 276, 1474, 54, 62, "Output",
+ CellTags->"FourLaplacian"],
+ Cell[9409, 335, 176, 5, 27, "Input",
CellTags->"FourLaplacian",
CellID->1428791386],
- Cell[7097, 258, 6613, 255, 191, "Output",
- CellTags->"FourLaplacian",
- CellID->290457260],
- Cell[14078, 536, 421, 15, 70, "Text",
- CellTags->"FourLaplacian",
- CellID->736385282]}
+ Cell[9588, 342, 11448, 401, 176, "Output",
+ CellTags->"FourLaplacian"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16393, 600},
- {"FourLaplacian", 16533, 604}
+ {"PrimaryExamplesSection", 23661, 828},
+ {"FourLaplacian", 23802, 832}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3137, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 792, 26, 86, "Usage",
- CellID->982511436],
+Cell[3725, 99, 290, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3729, 108, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->583071690],
+Cell[4040, 114, 792, 26, 88, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4141, 127, 196, 6, 25, "ExampleSection",
- CellID->1509023846],
+Cell[4857, 144, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1034393011],
+Cell[5599, 170, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4362, 137, 143, 4, 27, "Input",
- CellTags->"FourLaplacian",
- CellID->244662667],
-Cell[4508, 143, 277, 9, 36, "Output",
- CellTags->"FourLaplacian",
- CellID->1107918748]
+Cell[5655, 174, 97, 2, 70, "Input"],
+Cell[5755, 178, 230, 7, 35, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4822, 157, 149, 5, 27, "Input",
+Cell[6046, 192, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2132342538],
+Cell[CellGroupData[{
+Cell[6459, 211, 196, 6, 26, "ExampleSection",
+ CellID->2050018979],
+Cell[CellGroupData[{
+Cell[6680, 221, 149, 5, 27, "Input",
CellTags->"FourLaplacian",
CellID->678691277],
-Cell[4974, 164, 335, 13, 41, "Output",
- CellTags->"FourLaplacian",
- CellID->614689358]
+Cell[6832, 228, 315, 12, 39, "Output",
+ CellTags->"FourLaplacian"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5346, 182, 171, 5, 27, "Input",
+Cell[7184, 245, 171, 5, 27, "Input",
CellTags->"FourLaplacian",
CellID->1086572094],
-Cell[5520, 189, 238, 8, 36, "Output",
- CellTags->"FourLaplacian",
- CellID->1928361141]
+Cell[7358, 252, 217, 7, 35, "Output",
+ CellTags->"FourLaplacian"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5795, 202, 283, 10, 27, "Input",
+Cell[7612, 264, 283, 10, 27, "Input",
CellTags->"FourLaplacian",
CellID->1385775268],
-Cell[6081, 214, 800, 32, 69, "Output",
- CellTags->"FourLaplacian",
- CellID->1120525938]
+Cell[7898, 276, 1474, 54, 62, "Output",
+ CellTags->"FourLaplacian"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6918, 251, 176, 5, 27, "Input",
+Cell[9409, 335, 176, 5, 27, "Input",
CellTags->"FourLaplacian",
CellID->1428791386],
-Cell[7097, 258, 6613, 255, 191, "Output",
- CellTags->"FourLaplacian",
- CellID->290457260]
+Cell[9588, 342, 11448, 401, 176, "Output",
+ CellTags->"FourLaplacian"]
}, Open ]]
}, Open ]],
-Cell[13737, 517, 31, 0, 70, "SectionFooterSpacer"]
+Cell[21063, 747, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13805, 522, 270, 12, 70, "SeeAlsoSection",
+Cell[21131, 752, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[14078, 536, 421, 15, 70, "Text",
- CellTags->"FourLaplacian",
- CellID->736385282]
+Cell[21404, 766, 376, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[14514, 554, 23, 0, 70, "FooterCell"]
+Cell[21795, 782, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourVector.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourVector.nb
index 7439c28b3..8eed4dbfd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourVector.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FourVector.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14879, 542]
-NotebookOptionsPosition[ 9572, 370]
-NotebookOutlinePosition[ 13020, 470]
-CellTagsIndexPosition[ 12906, 464]
+NotebookDataLength[ 16869, 616]
+NotebookOptionsPosition[ 11891, 459]
+NotebookOutlinePosition[ 14752, 539]
+CellTagsIndexPosition[ 14638, 533]
WindowTitle->FourVector
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FourVector\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FourVector"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FourVector.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$74732],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FourVector", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FV\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FourVector\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FourVector"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FourVector.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$143714],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FourVector", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FourVector", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FourVector", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,6 +132,62 @@ option Dimension \[Rule] D."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->259140023],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The shortcut FourVector is deprecated, please use FV instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "FourVector", "]"}]], "Input",
+ CellLabel->"In[355]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{257, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[355]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +203,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1721573323],
+ CellID->489345380],
Cell[CellGroupData[{
@@ -122,7 +213,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2065892252],
+ CellID->682577464],
Cell[CellGroupData[{
@@ -142,17 +233,14 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 19},
+ ImageSize->{28, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourVector",
- CellLabel->"Out[1]=",
- CellID->1688325660]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -181,17 +269,14 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{62, 20},
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourVector",
- CellLabel->"Out[2]=",
- CellID->1086738867]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -209,12 +294,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Output",
- ImageSize->{281, 15},
+ ImageSize->{283, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourVector",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1875964060]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -235,91 +319,104 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}]}], "]"}]], "Output",
- ImageSize->{327, 15},
+ ImageSize->{329, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FourVector",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1059556719]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
+Cell["\<\
+FourVector is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use FV.\
+\>", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FCE", "[",
- RowBox[{"FourVector", "[",
- RowBox[{"p", ",", "\[Mu]"}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"FourVector",
- CellLabel->"In[5]:=",
- CellID->757794355],
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
Cell[BoxData[
- RowBox[{"FV", "[",
- RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Output",
- ImageSize->{70, 15},
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FourVector",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1053929233]
+ CellLabel->"Out[5]="]
}, Open ]],
-Cell["\<\
-There is no special function to expand momenta in FourVector. Since \
-FourVector is turned into Pair internally ExpandScalarProduct may be used.\
-\>", "Text",
- CellTags->"FourVector",
- CellID->600723667],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ExpandScalarProduct", "[",
- RowBox[{"FourVector", "[",
- RowBox[{
- RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}], "]"}]], "Input",
- CellTags->"FourVector",
- CellLabel->"In[6]:=",
- CellID->1761121824],
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
FormBox[
- RowBox[{
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{58, 19},
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FourVector",
- CellLabel->"Out[6]=",
- CellID->2088241188]
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], "]"}], "===",
+ RowBox[{"FourVector", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], "]"}], "===",
+ RowBox[{"FourVector", "[",
+ RowBox[{"p", ",", "\[Mu]", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
}, Open ]]
}, Open ]],
@@ -349,21 +446,13 @@ Cell[TextData[{
ButtonNote->"FV"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["FVD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FVD",
- ButtonNote->"FVD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Pair",
+ StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Pair",
- ButtonNote->"Pair"],
+ ButtonData->"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FourVector",
- CellID->570089667]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -371,7 +460,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"FourVector",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -380,10 +469,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 18.591698}",
+ "built" -> "{2020, 1, 5, 18, 58, 2.025456}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -391,11 +480,12 @@ TaggingRules->{
"None", "summary" ->
"FourVector[p, mu] is the four-dimensional vector p with Lorentz index \
\\[Mu]. A vector with space-time Dimension D is obtained by supplying the \
-option Dimension -> D.", "synonyms" -> {}, "title" -> "FourVector",
- "titlemodifier" -> "", "windowtitle" -> "FourVector", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FourVector"}, "SearchTextTranslated" -> ""},
+option Dimension -> D.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FourVector", "titlemodifier" -> "", "windowtitle" -> "FourVector",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FourVector"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -403,8 +493,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -413,137 +504,120 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3512, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5963, 190, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1721573323]},
+ CellID->489345380]},
"FourVector"->{
- Cell[4146, 128, 159, 5, 27, "Input",
+ Cell[6595, 219, 159, 5, 27, "Input",
CellTags->"FourVector",
CellID->1607662272],
- Cell[4308, 135, 445, 19, 40, "Output",
- CellTags->"FourVector",
- CellID->1688325660],
- Cell[4790, 159, 183, 6, 27, "Input",
+ Cell[6757, 226, 386, 16, 37, "Output",
+ CellTags->"FourVector"],
+ Cell[7180, 247, 183, 6, 27, "Input",
CellTags->"FourVector",
CellID->1944995744],
- Cell[4976, 167, 617, 26, 41, "Output",
- CellTags->"FourVector",
- CellID->1086738867],
- Cell[5630, 198, 199, 6, 27, "Input",
+ Cell[7366, 255, 558, 23, 37, "Output",
+ CellTags->"FourVector"],
+ Cell[7961, 283, 199, 6, 27, "Input",
CellTags->"FourVector",
CellID->1554251701],
- Cell[5832, 206, 332, 10, 49, "Output",
- CellTags->"FourVector",
- CellID->1875964060],
- Cell[6201, 221, 247, 7, 27, "Input",
+ Cell[8163, 291, 311, 9, 51, "Output",
+ CellTags->"FourVector"],
+ Cell[8511, 305, 247, 7, 27, "Input",
CellTags->"FourVector",
CellID->438982417],
- Cell[6451, 230, 382, 12, 49, "Output",
- CellTags->"FourVector",
- CellID->1059556719],
- Cell[6870, 247, 230, 7, 27, "Input",
- CellTags->"FourVector",
- CellID->757794355],
- Cell[7103, 256, 253, 8, 49, "Output",
- CellTags->"FourVector",
- CellID->1053929233],
- Cell[7371, 267, 213, 5, 52, "Text",
- CellTags->"FourVector",
- CellID->600723667],
- Cell[7609, 276, 231, 7, 27, "Input",
- CellTags->"FourVector",
- CellID->1761121824],
- Cell[7843, 285, 817, 36, 40, "Output",
- CellTags->"FourVector",
- CellID->2088241188],
- Cell[9028, 344, 502, 21, 31, "Text",
- CellTags->"FourVector",
- CellID->570089667]}
+ Cell[8761, 314, 361, 11, 51, "Output",
+ CellTags->"FourVector"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11479, 414},
- {"FourVector", 11616, 418}
+ {"PrimaryExamplesSection", 13843, 505},
+ {"FourVector", 13980, 509}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3075, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 594, 17, 99, "Usage",
+Cell[3660, 98, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3972, 113, 594, 17, 103, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3512, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4591, 134, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->259140023],
+Cell[5332, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5366, 162, 107, 3, 70, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[5498, 169, 94, 2, 70, "Input"],
+Cell[5595, 173, 307, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5963, 190, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1721573323],
+ CellID->489345380],
Cell[CellGroupData[{
-Cell[3925, 118, 196, 6, 25, "ExampleSection",
- CellID->2065892252],
+Cell[6375, 209, 195, 6, 26, "ExampleSection",
+ CellID->682577464],
Cell[CellGroupData[{
-Cell[4146, 128, 159, 5, 27, "Input",
+Cell[6595, 219, 159, 5, 27, "Input",
CellTags->"FourVector",
CellID->1607662272],
-Cell[4308, 135, 445, 19, 40, "Output",
- CellTags->"FourVector",
- CellID->1688325660]
+Cell[6757, 226, 386, 16, 37, "Output",
+ CellTags->"FourVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4790, 159, 183, 6, 27, "Input",
+Cell[7180, 247, 183, 6, 27, "Input",
CellTags->"FourVector",
CellID->1944995744],
-Cell[4976, 167, 617, 26, 41, "Output",
- CellTags->"FourVector",
- CellID->1086738867]
+Cell[7366, 255, 558, 23, 37, "Output",
+ CellTags->"FourVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5630, 198, 199, 6, 27, "Input",
+Cell[7961, 283, 199, 6, 27, "Input",
CellTags->"FourVector",
CellID->1554251701],
-Cell[5832, 206, 332, 10, 49, "Output",
- CellTags->"FourVector",
- CellID->1875964060]
+Cell[8163, 291, 311, 9, 51, "Output",
+ CellTags->"FourVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6201, 221, 247, 7, 27, "Input",
+Cell[8511, 305, 247, 7, 27, "Input",
CellTags->"FourVector",
CellID->438982417],
-Cell[6451, 230, 382, 12, 49, "Output",
- CellTags->"FourVector",
- CellID->1059556719]
+Cell[8761, 314, 361, 11, 51, "Output",
+ CellTags->"FourVector"]
}, Open ]],
+Cell[9137, 328, 133, 3, 48, "Notes"],
Cell[CellGroupData[{
-Cell[6870, 247, 230, 7, 27, "Input",
- CellTags->"FourVector",
- CellID->757794355],
-Cell[7103, 256, 253, 8, 49, "Output",
- CellTags->"FourVector",
- CellID->1053929233]
+Cell[9295, 335, 105, 3, 27, "Input"],
+Cell[9403, 340, 361, 15, 37, "Output"]
}, Open ]],
-Cell[7371, 267, 213, 5, 52, "Text",
- CellTags->"FourVector",
- CellID->600723667],
Cell[CellGroupData[{
-Cell[7609, 276, 231, 7, 27, "Input",
- CellTags->"FourVector",
- CellID->1761121824],
-Cell[7843, 285, 817, 36, 40, "Output",
- CellTags->"FourVector",
- CellID->2088241188]
+Cell[9801, 360, 106, 3, 27, "Input"],
+Cell[9910, 365, 334, 14, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10281, 384, 228, 7, 27, "Input"],
+Cell[10512, 393, 169, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10718, 403, 278, 8, 27, "Input"],
+Cell[10999, 413, 169, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[8687, 325, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11195, 422, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8755, 330, 270, 12, 31, "SeeAlsoSection",
+Cell[11263, 427, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9028, 344, 502, 21, 31, "Text",
- CellTags->"FourVector",
- CellID->570089667]
+Cell[11536, 441, 313, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[9545, 368, 23, 0, 42, "FooterCell"]
+Cell[11864, 457, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndex.nb
index abb11d72e..1a0dc018e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndex.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6256, 194]
-NotebookOptionsPosition[ 4020, 128]
-NotebookOutlinePosition[ 5994, 183]
-CellTagsIndexPosition[ 5923, 178]
+NotebookDataLength[ 7090, 215]
+NotebookOptionsPosition[ 5057, 159]
+NotebookOutlinePosition[ 6882, 207]
+CellTagsIndexPosition[ 6839, 204]
WindowTitle->FreeIndex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FreeIndex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FreeIndex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FreeIndex.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DataType\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DataType"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FreeIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FreeIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FreeIndex.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$75073],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FreeIndex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$144601],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FreeIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FreeIndex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FreeIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +152,7 @@ Cell[TextData[{
ButtonNote->"DataType"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FreeIndex",
- CellID->172932949]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,21 +169,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 20.160338}",
+ "built" -> "{2020, 1, 5, 18, 58, 4.549587}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"FreeIndex is a datatype which is recognized by Contract. Possible use: \
-DataType[mu, FreeIndex] = True.", "synonyms" -> {}, "title" -> "FreeIndex",
- "titlemodifier" -> "", "windowtitle" -> "FreeIndex", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FreeIndex"}},
+DataType[mu, FreeIndex] = True.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FreeIndex", "titlemodifier" -> "", "windowtitle" ->
+ "FreeIndex", "type" -> "Symbol", "uri" -> "FeynCalc/ref/FreeIndex"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +192,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "FreeIndex"->{
- Cell[3591, 108, 387, 15, 70, "Text",
- CellTags->"FreeIndex",
- CellID->172932949]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"FreeIndex", 5811, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2248, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3092, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2832, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2887, 78, 406, 12, 70, "Usage",
+Cell[3676, 98, 286, 11, 70, "ObjectNameGrid"],
+Cell[3965, 111, 406, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3318, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4396, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3591, 108, 387, 15, 70, "Text",
- CellTags->"FreeIndex",
- CellID->172932949]
+Cell[4669, 141, 346, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3993, 126, 23, 0, 70, "FooterCell"]
+Cell[5030, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndexFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndexFreeQ.nb
new file mode 100644
index 000000000..1978a032b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeIndexFreeQ.nb
@@ -0,0 +1,560 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15205, 550]
+NotebookOptionsPosition[ 11094, 423]
+NotebookOutlinePosition[ 13460, 483]
+CellTagsIndexPosition[ 13375, 478]
+WindowTitle->FreeIndexFreeQ
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCRenameDummyIndices\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCRenameDummyIndices"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DummyIndexFreeQ\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DummyIndexFreeQ"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FreeIndexFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FreeIndexFreeQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+FreeIndexFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$144158],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FreeIndexFreeQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["FreeIndexFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FreeIndexFreeQ", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"{",
+ RowBox[{"head1", ",", "head2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] returns True if the expression contains uncontracted \
+indices with heads head1, head2, ... and False otherwise. As always in \
+FeynCalc, Einstein summation convention is implicitly assumed. The function \
+is optimized for large expressions, i.e. it is not so good as a criterion in \
+e.g. Select."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1030659135],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1735968043],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->19911176],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{53, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1940347290]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FreeIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "LorentzIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->261119511],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->580176418]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1157096663],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{55, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1890260352]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FreeIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "LorentzIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2058588956],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1763054535]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->355266556],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{56, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->521798792]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FreeIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "SUNIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->422670148],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ ImageSize->{34, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->474556745]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "[",
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "a"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->194904878],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{55, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->1485053130]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FreeIndexFreeQ", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "SUNIndex", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->2008364696],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->1874919223]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCRenameDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DummyIndexFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DummyIndexFreeQ",
+ ButtonNote->"DummyIndexFreeQ"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1732330916]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"FreeIndexFreeQ",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 3.260748}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "FreeIndexFreeQ[exp, {head1, head2, ...}] returns True if the expression \
+contains uncontracted indices with heads head1, head2, ... and False \
+otherwise. As always in FeynCalc, Einstein summation convention is implicitly \
+assumed. The function is optimized for large expressions, i.e. it is not so \
+good as a criterion in e.g. Select.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FreeIndexFreeQ", "titlemodifier" -> "", "windowtitle" ->
+ "FreeIndexFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FreeIndexFreeQ"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4915, 137, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1030659135]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13231, 471}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3253, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3842, 101, 291, 11, 45, "ObjectNameGrid"],
+Cell[4136, 114, 754, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4915, 137, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1030659135],
+Cell[CellGroupData[{
+Cell[5328, 156, 196, 6, 26, "ExampleSection",
+ CellID->1735968043],
+Cell[CellGroupData[{
+Cell[5549, 166, 239, 8, 27, "Input",
+ CellID->19911176],
+Cell[5791, 176, 620, 27, 37, "Output",
+ CellID->1940347290]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6448, 208, 168, 5, 27, "Input",
+ CellID->261119511],
+Cell[6619, 215, 190, 6, 35, "Output",
+ CellID->580176418]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6846, 226, 241, 8, 27, "Input",
+ CellID->1157096663],
+Cell[7090, 236, 620, 27, 37, "Output",
+ CellID->1890260352]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7747, 268, 169, 5, 27, "Input",
+ CellID->2058588956],
+Cell[7919, 275, 190, 6, 35, "Output",
+ CellID->1763054535]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8146, 286, 154, 5, 27, "Input",
+ CellID->355266556],
+Cell[8303, 293, 407, 17, 38, "Output",
+ CellID->521798792]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8747, 315, 164, 5, 27, "Input",
+ CellID->422670148],
+Cell[8914, 322, 190, 6, 35, "Output",
+ CellID->474556745]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9141, 333, 154, 5, 27, "Input",
+ CellID->194904878],
+Cell[9298, 340, 408, 17, 35, "Output",
+ CellID->1485053130]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9743, 362, 165, 5, 27, "Input",
+ CellID->2008364696],
+Cell[9911, 369, 190, 6, 35, "Output",
+ CellID->1874919223]
+}, Open ]]
+}, Open ]],
+Cell[10128, 379, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10196, 384, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10469, 398, 583, 20, 56, "SeeAlso",
+ CellID->1732330916]
+}, Open ]],
+Cell[11067, 421, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeQ2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeQ2.nb
index bc0c476b3..b5f197a38 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeQ2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FreeQ2.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11050, 389]
-NotebookOptionsPosition[ 6784, 251]
-NotebookOutlinePosition[ 9723, 336]
-CellTagsIndexPosition[ 9615, 330]
+NotebookDataLength[ 11710, 402]
+NotebookOptionsPosition[ 7759, 278]
+NotebookOutlinePosition[ 10512, 356]
+CellTagsIndexPosition[ 10404, 350]
WindowTitle->FreeQ2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FreeQ2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FreeQ2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FreeQ2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SelectFree\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SelectFree"], "\<\"SelectNotFree\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SelectNotFree"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FreeQ2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FreeQ2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FreeQ2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$75419],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/FreeQ2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$145045],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FreeQ2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FreeQ2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FreeQ2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->336130927],
+ CellID->1958716986],
Cell[CellGroupData[{
@@ -122,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1105322286],
+ CellID->1349107249],
Cell[CellGroupData[{
@@ -139,12 +172,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FreeQ2",
- CellLabel->"Out[1]=",
- CellID->319246992]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -162,12 +194,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FreeQ2",
- CellLabel->"Out[2]=",
- CellID->642250650]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -181,12 +212,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FreeQ2",
- CellLabel->"Out[3]=",
- CellID->1761235485]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -201,12 +231,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FreeQ2",
- CellLabel->"Out[4]=",
- CellID->1949452]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -242,9 +271,7 @@ Cell[TextData[{
ButtonNote->"SelectNotFree"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FreeQ2",
- CellID->1855821251]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -261,10 +288,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 21.394512}",
+ "built" -> "{2020, 1, 5, 18, 58, 5.320880}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -272,11 +299,11 @@ TaggingRules->{
"None", "summary" ->
"FreeQ2[expr, {form1, form2, ...}] yields True if expr does not contain \
any occurence of form1, form2, ... and False otherwise. FreeQ2[expr, form] is \
-the same as FreeQ[expr, form].", "synonyms" -> {}, "title" -> "FreeQ2",
- "titlemodifier" -> "", "windowtitle" -> "FreeQ2", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FreeQ2"}, "SearchTextTranslated" -> ""},
+the same as FreeQ[expr, form].", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "FreeQ2", "titlemodifier" -> "", "windowtitle" -> "FreeQ2", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/FreeQ2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -285,7 +312,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -294,103 +321,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3515, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4607, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->336130927]},
+ CellID->1958716986]},
"FreeQ2"->{
- Cell[4148, 128, 265, 9, 27, "Input",
+ Cell[5241, 161, 265, 9, 27, "Input",
CellTags->"FreeQ2",
CellID->1955436628],
- Cell[4416, 139, 211, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->319246992],
- Cell[4664, 151, 259, 9, 27, "Input",
+ Cell[5509, 172, 191, 6, 35, "Output",
+ CellTags->"FreeQ2"],
+ Cell[5737, 183, 259, 9, 27, "Input",
CellTags->"FreeQ2",
CellID->486516925],
- Cell[4926, 162, 210, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->642250650],
- Cell[5173, 174, 152, 5, 27, "Input",
+ Cell[5999, 194, 190, 6, 35, "Output",
+ CellTags->"FreeQ2"],
+ Cell[6226, 205, 152, 5, 27, "Input",
CellTags->"FreeQ2",
CellID->1336030699],
- Cell[5328, 181, 211, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->1761235485],
- Cell[5576, 193, 180, 6, 27, "Input",
+ Cell[6381, 212, 190, 6, 35, "Output",
+ CellTags->"FreeQ2"],
+ Cell[6608, 223, 180, 6, 27, "Input",
CellTags->"FreeQ2",
CellID->544368653],
- Cell[5759, 201, 209, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->1949452],
- Cell[6336, 231, 406, 15, 31, "Text",
- CellTags->"FreeQ2",
- CellID->1855821251]}
+ Cell[6791, 231, 191, 6, 35, "Output",
+ CellTags->"FreeQ2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8688, 295},
- {"FreeQ2", 8820, 299}
+ {"PrimaryExamplesSection", 9648, 322},
+ {"FreeQ2", 9782, 326}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3094, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 621, 17, 99, "Usage",
+Cell[3675, 98, 283, 11, 45, "ObjectNameGrid"],
+Cell[3961, 111, 621, 17, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3515, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4607, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->336130927],
+ CellID->1958716986],
Cell[CellGroupData[{
-Cell[3927, 118, 196, 6, 25, "ExampleSection",
- CellID->1105322286],
+Cell[5020, 151, 196, 6, 26, "ExampleSection",
+ CellID->1349107249],
Cell[CellGroupData[{
-Cell[4148, 128, 265, 9, 27, "Input",
+Cell[5241, 161, 265, 9, 27, "Input",
CellTags->"FreeQ2",
CellID->1955436628],
-Cell[4416, 139, 211, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->319246992]
+Cell[5509, 172, 191, 6, 35, "Output",
+ CellTags->"FreeQ2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4664, 151, 259, 9, 27, "Input",
+Cell[5737, 183, 259, 9, 27, "Input",
CellTags->"FreeQ2",
CellID->486516925],
-Cell[4926, 162, 210, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->642250650]
+Cell[5999, 194, 190, 6, 35, "Output",
+ CellTags->"FreeQ2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5173, 174, 152, 5, 27, "Input",
+Cell[6226, 205, 152, 5, 27, "Input",
CellTags->"FreeQ2",
CellID->1336030699],
-Cell[5328, 181, 211, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->1761235485]
+Cell[6381, 212, 190, 6, 35, "Output",
+ CellTags->"FreeQ2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5576, 193, 180, 6, 27, "Input",
+Cell[6608, 223, 180, 6, 27, "Input",
CellTags->"FreeQ2",
CellID->544368653],
-Cell[5759, 201, 209, 7, 36, "Output",
- CellTags->"FreeQ2",
- CellID->1949452]
+Cell[6791, 231, 191, 6, 35, "Output",
+ CellTags->"FreeQ2"]
}, Open ]]
}, Open ]],
-Cell[5995, 212, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7009, 241, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6063, 217, 270, 12, 31, "SeeAlsoSection",
+Cell[7077, 246, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6336, 231, 406, 15, 31, "Text",
- CellTags->"FreeQ2",
- CellID->1855821251]
+Cell[7350, 260, 367, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[6757, 249, 23, 0, 42, "FooterCell"]
+Cell[7732, 276, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FromTFI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FromTFI.nb
index e40fdb83d..5e9706f86 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FromTFI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FromTFI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14157, 486]
-NotebookOptionsPosition[ 10210, 362]
-NotebookOutlinePosition[ 13003, 441]
-CellTagsIndexPosition[ 12892, 435]
+NotebookDataLength[ 12114, 402]
+NotebookOptionsPosition[ 8741, 300]
+NotebookOutlinePosition[ 11232, 370]
+CellTagsIndexPosition[ 11121, 364]
WindowTitle->FromTFI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FromTFI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FromTFI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/FromTFI.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ToTFI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToTFI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FromTFI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FromTFI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/FromTFI.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$76102],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FromTFI", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$145927],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FromTFI", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FromTFI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FromTFI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1497816809],
+ CellID->1251218212],
Cell[CellGroupData[{
@@ -121,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->56884211],
+ CellID->490846268],
Cell[CellGroupData[{
@@ -171,159 +203,68 @@ Cell[BoxData[
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ")"}],
TraditionalForm]], "Output",
- ImageSize->{138, 87},
+ ImageSize->{145, 87},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FromTFI",
- CellLabel->"Out[1]=",
- CellID->569801456]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell[CellGroupData[{
+Cell["This requires loaded TARCER", "Notes"],
Cell[BoxData[
- RowBox[{"FromTFI", "[",
- RowBox[{
- RowBox[{"TFI", "[",
- RowBox[{"D", ",",
- RowBox[{"SPD", "[",
- RowBox[{"p", ",", "p"}], "]"}], ",",
- RowBox[{"SOD", "[", "p", "]"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"{",
- RowBox[{"1", ",", "0"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "M"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "0"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "m"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "0"}], "}"}]}], "}"}]}], "]"}], ",", "q1", ",",
- "q2", ",", "p"}], "]"}]], "Input",
+ RowBox[{"(*",
+ RowBox[{"FromTFI", "[",
+ RowBox[{
+ RowBox[{"TFI", "[",
+ RowBox[{"D", ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], ",",
+ RowBox[{"SOD", "[", "p", "]"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "M"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "0"}], "}"}]}], "}"}]}], "]"}], ",", "q1", ",",
+ "q2", ",", "p"}], "]"}], "*)"}]], "Input",
CellTags->"FromTFI",
CellLabel->"In[2]:=",
CellID->764654490],
Cell[BoxData[
- FormBox[
- RowBox[{"TFI", "(",
- RowBox[{"D", ",",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- RowBox[{
- FormBox["\<\"\[CapitalDelta]\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["p",
- TraditionalForm]}], ",",
- RowBox[{"(", "\[NoBreak]", GridBox[{
- {"1", "0"},
- {"1", "M"},
- {"1", "0"},
- {"1", "m"},
- {"1", "0"}
- },
- GridBoxAlignment->{
- "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
- "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
- GridBoxSpacings->{"Columns" -> {
- Offset[0.27999999999999997`], {
- Offset[0.7]},
- Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
- Offset[0.2], {
- Offset[0.4]},
- Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{177, 87},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FromTFI",
- CellLabel->"Out[2]=",
- CellID->306530383]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"FromTFI", "[",
- RowBox[{
- RowBox[{"TFI", "[",
- RowBox[{"D", ",",
- RowBox[{"SPD", "[",
- RowBox[{"p", ",", "p"}], "]"}], ",",
- RowBox[{"SOD", "[", "p", "]"}], ",",
- RowBox[{"{",
- RowBox[{"0", ",", "1"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"{",
- RowBox[{"1", ",", "m"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "M"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "0"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "m"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"1", ",", "0"}], "}"}]}], "}"}]}], "]"}], ",", "q1", ",",
- "q2", ",", "p"}], "]"}]], "Input",
+ RowBox[{"(*",
+ RowBox[{"FromTFI", "[",
+ RowBox[{
+ RowBox[{"TFI", "[",
+ RowBox[{"D", ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], ",",
+ RowBox[{"SOD", "[", "p", "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"0", ",", "1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "M"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "0"}], "}"}]}], "}"}]}], "]"}], ",", "q1", ",",
+ "q2", ",", "p"}], "]"}], "*)"}]], "Input",
CellTags->"FromTFI",
CellLabel->"In[3]:=",
- CellID->309007545],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"TFI", "(",
- RowBox[{"D", ",",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- RowBox[{
- FormBox["\<\"\[CapitalDelta]\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["p",
- TraditionalForm]}], ",",
- RowBox[{"{",
- RowBox[{"0", ",", "1"}], "}"}], ",",
- RowBox[{"(", "\[NoBreak]", GridBox[{
- {"1", "m"},
- {"1", "M"},
- {"1", "0"},
- {"1", "m"},
- {"1", "0"}
- },
- GridBoxAlignment->{
- "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
- "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
- GridBoxSpacings->{"Columns" -> {
- Offset[0.27999999999999997`], {
- Offset[0.7]},
- Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
- Offset[0.2], {
- Offset[0.4]},
- Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ")"}],
- TraditionalForm]], "Output",
- ImageSize->{220, 87},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FromTFI",
- CellLabel->"Out[3]=",
- CellID->1419230577]
-}, Open ]]
+ CellID->309007545]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -346,16 +287,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ToTFI",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ToTFI",
ButtonNote->"ToTFI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FromTFI",
- CellID->1628456210]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -372,10 +310,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 24.433197}",
+ "built" -> "{2020, 1, 5, 18, 58, 7.652102}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -383,11 +321,12 @@ TaggingRules->{
"None", "summary" ->
"FromTFI[expr, q1, q2, p] translates the TFI notation from the TARCER \
package to the usual FeynCalc notation. See the TARCER documentation on TFI \
-for details on the conventions.", "synonyms" -> {}, "title" -> "FromTFI",
- "titlemodifier" -> "", "windowtitle" -> "FromTFI", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/FromTFI"}, "SearchTextTranslated" -> ""},
+for details on the conventions.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "FromTFI", "titlemodifier" -> "", "windowtitle" -> "FromTFI",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/FromTFI"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -396,7 +335,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -405,89 +344,66 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3473, 98, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4459, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1497816809]},
+ CellID->1251218212]},
"FromTFI"->{
- Cell[4105, 127, 449, 15, 27, "Input",
+ Cell[5092, 159, 449, 15, 27, "Input",
CellTags->"FromTFI",
CellID->546580717],
- Cell[4557, 144, 1001, 34, 108, "Output",
- CellTags->"FromTFI",
- CellID->569801456],
- Cell[5595, 183, 711, 23, 45, "Input",
+ Cell[5544, 176, 981, 33, 108, "Output",
+ CellTags->"FromTFI"],
+ Cell[6587, 214, 755, 24, 45, "Input",
CellTags->"FromTFI",
CellID->764654490],
- Cell[6309, 208, 1191, 41, 108, "Output",
- CellTags->"FromTFI",
- CellID->306530383],
- Cell[7537, 254, 774, 25, 45, "Input",
+ Cell[7345, 240, 820, 26, 45, "Input",
CellTags->"FromTFI",
- CellID->309007545],
- Cell[8314, 281, 1253, 43, 108, "Output",
- CellTags->"FromTFI",
- CellID->1419230577],
- Cell[9935, 347, 233, 10, 70, "Text",
- CellTags->"FromTFI",
- CellID->1628456210]}
+ CellID->309007545]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12115, 406},
- {"FromTFI", 12249, 410}
+ {"PrimaryExamplesSection", 10634, 345},
+ {"FromTFI", 10769, 349}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2992, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 573, 16, 97, "Usage",
+Cell[3574, 97, 284, 11, 45, "ObjectNameGrid"],
+Cell[3861, 110, 573, 16, 101, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3473, 98, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4459, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1497816809],
+ CellID->1251218212],
Cell[CellGroupData[{
-Cell[3886, 117, 194, 6, 25, "ExampleSection",
- CellID->56884211],
+Cell[4872, 149, 195, 6, 26, "ExampleSection",
+ CellID->490846268],
Cell[CellGroupData[{
-Cell[4105, 127, 449, 15, 27, "Input",
+Cell[5092, 159, 449, 15, 27, "Input",
CellTags->"FromTFI",
CellID->546580717],
-Cell[4557, 144, 1001, 34, 108, "Output",
- CellTags->"FromTFI",
- CellID->569801456]
+Cell[5544, 176, 981, 33, 108, "Output",
+ CellTags->"FromTFI"]
}, Open ]],
-Cell[CellGroupData[{
-Cell[5595, 183, 711, 23, 45, "Input",
+Cell[6540, 212, 44, 0, 32, "Notes"],
+Cell[6587, 214, 755, 24, 45, "Input",
CellTags->"FromTFI",
CellID->764654490],
-Cell[6309, 208, 1191, 41, 108, "Output",
- CellTags->"FromTFI",
- CellID->306530383]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7537, 254, 774, 25, 45, "Input",
- CellTags->"FromTFI",
- CellID->309007545],
-Cell[8314, 281, 1253, 43, 108, "Output",
+Cell[7345, 240, 820, 26, 45, "Input",
CellTags->"FromTFI",
- CellID->1419230577]
-}, Open ]]
+ CellID->309007545]
}, Open ]],
-Cell[9594, 328, 31, 0, 70, "SectionFooterSpacer"]
+Cell[8180, 269, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9662, 333, 270, 12, 70, "SeeAlsoSection",
+Cell[8248, 274, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9935, 347, 233, 10, 70, "Text",
- CellTags->"FromTFI",
- CellID->1628456210]
+Cell[8521, 288, 178, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[10183, 360, 23, 0, 70, "FooterCell"]
+Cell[8714, 298, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FunctionalD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FunctionalD.nb
index 7165b2b3e..89dcf9139 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/FunctionalD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/FunctionalD.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 160822, 5892]
-NotebookOptionsPosition[ 141559, 5254]
-NotebookOutlinePosition[ 152203, 5573]
-CellTagsIndexPosition[ 152047, 5566]
+NotebookDataLength[ 137517, 5544]
+NotebookOptionsPosition[ 124755, 5139]
+NotebookOutlinePosition[ 130807, 5310]
+CellTagsIndexPosition[ 130688, 5304]
WindowTitle->FunctionalD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/FunctionalD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/FunctionalD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynRule\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynRule"], "\<\"QuantumField\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuantumField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/FunctionalD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/FunctionalD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
FunctionalD.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$76450],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/FunctionalD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$146406],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/FunctionalD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,35 +96,114 @@ FunctionalD.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["FunctionalD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["FunctionalD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"FunctionalD", "[",
- RowBox[{"expr", ",", " ",
+ RowBox[{"exp", ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"QuantumField", "[",
- RowBox[{"name", ",", " ",
- RowBox[{"{", "mu", "}"}], ",", " ",
- RowBox[{"{", "a", "}"}]}], "]"}], "[", "p", "]"}], ",", " ",
- "..."}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "calculates the functional derivative of expr with respect to the field \
-list (with incoming momenta p etc.) and does the fourier transform. \
-FunctionalD[expr, {QuantumField[name, {mu},{a}], ...}] calculates the \
-functional derivative and does partial integration but omits the x-space \
-delta functions.\n\nFunctionalD is a low level function used in FeynRule."
+ RowBox[{"name", ",",
+ RowBox[{"LorentzIndex", "[", "mu", "]"}], ",", "...", ",",
+ RowBox[{"SUNIndex", "[", "a", "]"}]}], "]"}], "[", "p", "]"}],
+ ",", "..."}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]calculates the functional derivative of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " with respect to the ",
+ ButtonBox["QuantumField",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuantumField",
+ ButtonNote->"QuantumField"],
+ " list (with incoming momenta ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ", etc.) and does the Fourier transform."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"FunctionalD", "[",
+ RowBox[{"expr", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"name", ",",
+ RowBox[{"LorentzIndex", "[", "mu", "]"}], ",",
+ RowBox[{"...", " ",
+ RowBox[{"SUNIndex", "[", "a", "]"}]}]}], "]"}], ",", "..."}],
+ "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]calculates the functional derivative and does partial \
+integration but omits the ",
+ Cell[BoxData["x"], "InlineFormula"],
+ "-space delta functions."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1314156764],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ ButtonBox["FunctionalD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FunctionalD",
+ ButtonNote->"FunctionalD"],
+ " is a low level function used in ",
+ ButtonBox["FeynRule",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynRule",
+ ButtonNote->"FeynRule"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
Cell[CellGroupData[{
@@ -116,44 +218,45 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1338673316],
+ CellID->1785706472],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->648720929],
+ CellID->781139701],
Cell[TextData[{
"Instead of the usual ",
Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- RowBox[{"\[Delta]\[Phi]", "(", "x", ")"}], "/",
- RowBox[{"\[Delta]\[Phi]", "(", "y", ")"}]}], "=",
+ RowBox[{
+ RowBox[{"\[Delta]\[Phi]",
RowBox[{
- SuperscriptBox["\[Delta]",
- RowBox[{"(", "D", ")"}]], "(",
- RowBox[{"x", "-", "y"}], ")"}]}], TraditionalForm]]],
- " the arguments and the \[Delta] function are omitted, i.e., for the program \
-for simplicity: ",
+ RowBox[{"(", "x", ")"}], "/", "\[Delta]\[Phi]"}],
+ RowBox[{"(", "y", ")"}]}], "=",
+ RowBox[{
+ SuperscriptBox["\[Delta]",
+ RowBox[{"(", "D", ")"}]],
+ RowBox[{"(",
+ RowBox[{"x", "-", "y"}], ")"}]}]}]], "InlineFormula"],
+ " the arguments and the ",
+ Cell[BoxData["\[Delta]"], "InlineFormula"],
+ " function are omitted, i.e., for the program for simplicity: ",
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"\[Delta]\[Phi]", "/", "\[Delta]\[Phi]"}], "=", "1"}],
- TraditionalForm]]]
-}], "Text",
- CellTags->"FunctionalD",
- CellID->2064540691],
+ TraditionalForm]], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
@@ -168,12 +271,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[1]=",
- CellID->149077150]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -193,56 +295,58 @@ Cell[BoxData[
RowBox[{"2", " ",
FormBox["\[Phi]",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{26, 15},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[2]=",
- CellID->85429466]
+ CellLabel->"Out[2]="]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
- "Instead of the usual ",
+ "Instead of the usual ",
Cell[BoxData[
- FormBox[
+ RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"\[Delta]", " ",
RowBox[{
- SubscriptBox["\[PartialD]", "\[Mu]"],
- RowBox[{"\[Phi]", "(", "x", ")"}]}]}], ")"}], "/",
- RowBox[{"\[Delta]\[Phi]", "(", "y", ")"}]}], "=",
+ SubscriptBox["\[PartialD]", "\[Mu]"], "\[Phi]"}],
+ RowBox[{"(", "x", ")"}]}], ")"}], "/", "\[Delta]\[Phi]"}],
+ RowBox[{"(", "y", ")"}]}], "=",
+ RowBox[{
RowBox[{
SubscriptBox["\[PartialD]", "\[Mu]"],
- RowBox[{
- SuperscriptBox["\[Delta]",
- RowBox[{"(", "D", ")"}]], "(",
- RowBox[{"x", "-", "y"}], ")"}]}]}], TraditionalForm]]],
+ SuperscriptBox["\[Delta]",
+ RowBox[{"(", "D", ")"}]]}],
+ RowBox[{"(",
+ RowBox[{"x", "-", "y"}], ")"}]}]}]], "InlineFormula"],
" the arguments are omitted, and the ",
Cell[BoxData[
- FormBox[
- SubscriptBox["\[PartialD]", "\[Mu]"], TraditionalForm]]],
- "operator is specified by default to be an integration by parts operator, \
+ FormBox[Cell[TextData[Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[PartialD]", "\[Mu]"], TraditionalForm]], "Input"]],
+ "InlineFormula"], TraditionalForm]]],
+ " operator is specified by default to be an integration by parts operator, \
i.e., the right hand side will be just ",
+ Cell[BoxData["Null"], "InlineFormula"],
+ " or, more precisely, (by default)",
Cell[BoxData[
- FormBox[
- RowBox[{"Null", ","}], TraditionalForm]]],
- " or, more precisely (by default) ",
- Cell[BoxData[
- FormBox[
- RowBox[{"-",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]]],
+ RowBox[{"-",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]], "InlineFormula"],
"."
-}], "Text",
- ZeroWidthTimes->True,
- CellTags->"FunctionalD",
- CellID->412822781],
+}], "Notes"],
Cell[CellGroupData[{
@@ -254,7 +358,7 @@ Cell[BoxData[
RowBox[{"FCPartialD", "[", "\[Mu]", "]"}], ",", "\[Phi]"}], "]"}], ",",
RowBox[{"QuantumField", "[", "\[Phi]", "]"}]}], "]"}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1655052767],
Cell[BoxData[
@@ -266,12 +370,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{34, 27},
+ ImageSize->{34, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[3]=",
- CellID->1642735326]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[TextData[Cell[BoxData[
@@ -296,36 +399,30 @@ Cell[TextData[Cell[BoxData[
SuperscriptBox["m", "2"],
RowBox[{"\[Phi]", "(", "x", ")"}], " ",
RowBox[{"\[Phi]", "(", "y", ")"}]}]}], "]"}]}]}]}]}],
- TraditionalForm]]]], "Text",
- ZeroWidthTimes->True,
- CellTags->"FunctionalD",
- CellID->726694991],
+ TraditionalForm]], "InlineFormula"]], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"s", "[", "\[Phi]", "]"}], "=",
- RowBox[{
- RowBox[{"(",
+ RowBox[{"(",
+ RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[", "\[Mu]", "]"}], ",", "\[Phi]"}], "]"}],
- ".",
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[", "\[Mu]", "]"}], ",", "\[Phi]"}], "]"}]}],
- "-",
- RowBox[{
- RowBox[{"m", "^", "2"}], " ",
+ RowBox[{"QuantumField", "[",
+ RowBox[{
+ RowBox[{"FCPartialD", "[", "\[Mu]", "]"}], ",", "\[Phi]"}], "]"}], ".",
+ RowBox[{"QuantumField", "[",
RowBox[{
- RowBox[{"QuantumField", "[", "\[Phi]", "]"}], ".",
- RowBox[{"QuantumField", "[", "\[Phi]", "]"}]}]}]}], ")"}], "/",
- "2"}]}]], "Input",
+ RowBox[{"FCPartialD", "[", "\[Mu]", "]"}], ",", "\[Phi]"}], "]"}]}],
+ "-",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], " ",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}], ".",
+ RowBox[{"QuantumField", "[", "\[Phi]", "]"}]}]}]}], ")"}], "/",
+ "2"}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->593299923],
Cell[BoxData[
@@ -335,24 +432,26 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
FormBox["\[Phi]",
- TraditionalForm], "\[Null]", "\[Null]"]}], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
+ TraditionalForm], ")"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
FormBox["\[Phi]",
- TraditionalForm], "\[Null]", "\[Null]"]}]}], "-",
+ TraditionalForm], ")"}], ")"}]}], "-",
RowBox[{
SuperscriptBox["m", "2"], " ",
RowBox[{
@@ -360,23 +459,21 @@ Cell[BoxData[
TraditionalForm], ".",
FormBox["\[Phi]",
TraditionalForm]}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{163, 41},
+ ImageSize->{212, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[4]=",
- CellID->423622231]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FunctionalD", "[",
- RowBox[{
- RowBox[{"s", "[", "\[Phi]", "]"}], ",",
+ RowBox[{"%", ",",
RowBox[{"QuantumField", "[", "\[Phi]", "]"}]}], "]"}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1102630385],
Cell[BoxData[
@@ -388,7 +485,7 @@ Cell[BoxData[
RowBox[{"-",
FormBox["\[Phi]",
TraditionalForm]}], ")"}]}], "-",
- RowBox[{
+ RowBox[{"(",
RowBox[{
FormBox[
SubscriptBox["\[PartialD]",
@@ -404,18 +501,22 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["\[Phi]",
- TraditionalForm], "\[Null]", "\[Null]"]}]}], TraditionalForm]], "Output",\
-
- ImageSize->{127, 21},
+ FormBox["\[Phi]",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{139, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[5]=",
- CellID->264301886]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[Cell[BoxData[
FormBox[
RowBox[{
@@ -429,15 +530,9 @@ Cell[TextData[Cell[BoxData[
SubsuperscriptBox["F", "a", "\[Mu]\[Nu]"], "(", "x", ")"}], " ",
RowBox[{
SubscriptBox["F", "\[Mu]\[Nu]a"], "(", "x", ")"}]}]}]}]}],
- TraditionalForm]]]], "Text",
- ZeroWidthTimes->True,
- CellTags->"FunctionalD",
- CellID->820504742],
+ TraditionalForm]], "InlineFormula"]], "Notes"],
-Cell[TextData[StyleBox["First approach",
- FontWeight->"Bold"]], "Text",
- CellTags->"FunctionalD",
- CellID->883647128],
+Cell["First approach:", "Notes"],
Cell[CellGroupData[{
@@ -449,7 +544,7 @@ Cell[BoxData[
RowBox[{"A", ",", "b", ",", "c"}], "}"}], ",", "1", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[6]:=",
+ CellLabel->"In[1]:=",
CellID->575936469],
Cell[BoxData[
@@ -488,7 +583,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -503,9 +599,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -520,13 +617,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{193, 23},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{255, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[6]=",
- CellID->1550678993]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -539,7 +635,7 @@ Cell[BoxData[
RowBox[{"A", ",", "d", ",", "e"}], "}"}], ",", "1", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[7]:=",
+ CellLabel->"In[2]:=",
CellID->1966798854],
Cell[BoxData[
@@ -578,7 +674,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -593,9 +690,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -610,13 +708,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{191, 23},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{257, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[7]=",
- CellID->1803724780]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -629,7 +726,7 @@ Cell[BoxData[
RowBox[{"1", "/", "4"}]}],
RowBox[{"F1", ".", "F2"}]}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[8]:=",
+ CellLabel->"In[3]:=",
CellID->733226876],
Cell[BoxData[
@@ -673,7 +770,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -688,9 +786,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -705,7 +804,7 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], ")"}], ".",
+ TraditionalForm]], ")"}]}], ")"}], ".",
RowBox[{"(",
RowBox[{
RowBox[{
@@ -741,7 +840,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -756,9 +856,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -773,34 +874,32 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{435, 41},
+ TraditionalForm]], ")"}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{564, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[8]=",
- CellID->1499967078]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[TextData[{
- "In order to derive the equation of motion the functional derivative of ",
- Cell[BoxData[
- FormBox["S", TraditionalForm]]],
+ "In order to derive the equation of motion, the functional derivative of ",
+ Cell[BoxData["S"], "InlineFormula"],
" with respect to ",
Cell[BoxData[
- FormBox[
- SubsuperscriptBox["A", "\[Sigma]", "g"], TraditionalForm]]],
- "has to be set to zero. Bearing in mind that for FeynCalc we have to be \
+ SubsuperscriptBox["A", "\[Sigma]", "g"]], "InlineFormula"],
+ " has to be set to zero. Bearing in mind that for FeynCalc we have to be \
precise as to where which operators (coming from the substitution of the \
-derivative of the \[Delta] function) act:, act with the functional derivative \
-operator on the first field strength:"
-}], "Text",
- CellTags->"FunctionalD",
- CellID->1999439773],
+derivative of the delta function) act."
+}], "Notes"],
-Cell[TextData[{
- Cell[BoxData[
- FormBox[
+Cell["\<\
+Act with the functional derivative operator on the first field strength:\
+\>", "Notes"],
+
+Cell[TextData[Cell[BoxData[
+ FormBox[
+ RowBox[{
RowBox[{
FormBox[
RowBox[{
@@ -835,36 +934,25 @@ Cell[TextData[{
TraditionalForm], " ",
RowBox[{
SubscriptBox["F", "\[Mu]\[Nu]a"], "(", "x", ")"}]}],
- TraditionalForm], ")"}], TraditionalForm]]],
- Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- RowBox[{" ",
- SubsuperscriptBox["F", "a",
- RowBox[{",", "\[Mu]\[Nu]"}]]}],
- TraditionalForm],
- RowBox[{"(", "x", ")"}]}], TraditionalForm]]]
-}], "Text",
- ZeroWidthTimes->True,
- CellTags->"FunctionalD",
- CellID->1758153070],
-
-Cell[TextData[Cell[BoxData[
- FormBox[
- RowBox[{"See", " ", "what", " ", "happens", " ", "with", " ", "just",
+ TraditionalForm], ")"}],
FormBox[
- RowBox[{
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[Delta]",
- RowBox[{"S", "[", "A", "]"}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{"\[Delta]",
- SubsuperscriptBox["A", "\[Sigma]", "g"]}], ")"}]}], "."}],
- TraditionalForm]}], TraditionalForm]]]], "Text",
- CellTags->"FunctionalD",
- CellID->833531771],
+ RowBox[{" ",
+ SubsuperscriptBox["F", "a",
+ RowBox[{",", "\[Mu]\[Nu]"}]]}],
+ TraditionalForm],
+ RowBox[{"(", "x", ")"}]}], TraditionalForm]], "InlineFormula"]], "Notes"],
+
+Cell[TextData[{
+ " See what happens with just ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Delta]S", "[", "A", "]"}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"\[Delta]",
+ SubsuperscriptBox["A", "\[Sigma]", "g"]}], ")"}]}]], "InlineFormula"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
@@ -875,7 +963,7 @@ Cell[BoxData[
RowBox[{"{", "\[Sigma]", "}"}], ",",
RowBox[{"{", "g", "}"}]}], "]"}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[9]:=",
+ CellLabel->"In[4]:=",
CellID->371171043],
Cell[BoxData[
@@ -891,22 +979,20 @@ Cell[BoxData[
FormBox["g",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 20},
+ ImageSize->{30, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[9]=",
- CellID->2026389295]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"FunctionalD", "[",
- RowBox[{"F1", ",", "Ag"}], "]"}]}]], "Input",
+ RowBox[{"FunctionalD", "[",
+ RowBox[{"F1", ",", "Ag"}], "]"}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[10]:=",
+ CellLabel->"In[5]:=",
CellID->2041925168],
Cell[BoxData[
@@ -924,23 +1010,17 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -967,23 +1047,17 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -1017,23 +1091,17 @@ Cell[BoxData[
TraditionalForm]], " ",
RowBox[{"(",
RowBox[{"-",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], ")"}]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["\[Delta]",
RowBox[{
@@ -1051,46 +1119,44 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{445, 28},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[10]=",
- CellID->930168027]
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{475, 25},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FunctionalD",
+ CellLabel->"Out[5]="]
}, Open ]],
-Cell["\<\
-In order to minimize the number of dummy indices, replace b \[Rule] c.\
-\>", "Text",
- CellTags->"FunctionalD",
- CellID->133774632],
+Cell[TextData[{
+ "Use ",
+ ButtonBox["FCCanonicalizeDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCanonicalizeDummyIndices",
+ ButtonNote->"FCCanonicalizeDummyIndices"],
+ " to minimize the number of dummy indices."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
- RowBox[{"t1", " ", "/.", " ",
- RowBox[{"b", "\[Rule]", "c"}]}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[11]:=",
- CellID->1339957551],
+ RowBox[{"t1", "=",
+ RowBox[{
+ RowBox[{"FCCanonicalizeDummyIndices", "[",
+ RowBox[{"%", ",",
+ RowBox[{"SUNIndexNames", "\[Rule]",
+ RowBox[{"{", "c1", "}"}]}]}], "]"}], "/.",
+ RowBox[{"c1", "\[Rule]", "c"}]}]}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
FormBox[
@@ -1107,23 +1173,17 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -1150,23 +1210,17 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -1200,23 +1254,17 @@ Cell[BoxData[
TraditionalForm]], " ",
RowBox[{"(",
RowBox[{"-",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], ")"}]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["\[Delta]",
RowBox[{
@@ -1234,41 +1282,34 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{443, 28},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{473, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[11]=",
- CellID->22832846]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[TextData[{
"Instead of inserting the definition for the second ",
Cell[BoxData[
- FormBox[
- SubsuperscriptBox["F", "a", "\[Mu]\[Nu]"], TraditionalForm]]],
- ", introduce a QuantumField object with antisymmetry built into the Lorentz \
-indices:"
-}], "Text",
- CellTags->"FunctionalD",
- CellID->1685160773],
+ SubsuperscriptBox["F", "a", "\[Mu]\[Nu]"]], "InlineFormula"],
+ ", introduce a ",
+ ButtonBox["QuantumField",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuantumField",
+ ButtonNote->"QuantumField"],
+ " object with antisymmetry built into the Lorentz indices:"
+}], "Notes"],
Cell[BoxData[
RowBox[{"F", "/:", " ",
@@ -1286,7 +1327,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"\[Beta]", ",", "\[Alpha]"}], "}"}], "]"}]}]}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[12]:=",
+ CellLabel->"In[7]:=",
CellID->324247296],
Cell[CellGroupData[{
@@ -1298,7 +1339,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]"}], "}"}], ",",
RowBox[{"{", "a", "}"}]}], "]"}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[13]:=",
+ CellLabel->"In[8]:=",
CellID->659226066],
Cell[BoxData[
@@ -1319,12 +1360,11 @@ Cell[BoxData[
FormBox["a",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{30, 19},
+ ImageSize->{31, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[13]=",
- CellID->1252480273]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1336,7 +1376,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", "\[RuleDelayed]", "\[Nu]"}], ",",
RowBox[{"\[Nu]", "\[RuleDelayed]", "\[Mu]"}]}], "}"}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[14]:=",
+ CellLabel->"In[9]:=",
CellID->2097130638],
Cell[BoxData[
@@ -1358,12 +1398,11 @@ Cell[BoxData[
FormBox["a",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{40, 19},
+ ImageSize->{42, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[14]=",
- CellID->122288557]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1384,7 +1423,7 @@ Cell[BoxData[
RowBox[{"SUNIndex", "[", "a", "]"}]}], "]"}]}]}], "]"}], "]"}], "/.",
RowBox[{"Dot", "\[Rule]", "Times"}]}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[15]:=",
+ CellLabel->"In[10]:=",
CellID->1711609273],
Cell[BoxData[
@@ -1479,95 +1518,85 @@ Cell[BoxData[
TraditionalForm]]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["F",
- TraditionalForm],
- RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["F",
TraditionalForm],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["g",
TraditionalForm],
- TraditionalForm]}],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]], ")"}], ")"}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["F",
- TraditionalForm],
- RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["F",
TraditionalForm],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["g",
TraditionalForm],
- TraditionalForm]}],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}]}]}], TraditionalForm]], "Output",
- ImageSize->{396, 41},
+ TraditionalForm]], ")"}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{479, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[15]=",
- CellID->325352248]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", " ", "=", " ",
- RowBox[{"t2", " ", "/.", " ",
- RowBox[{"\[Nu]", "\[Rule]", "\[Mu]"}]}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[16]:=",
- CellID->1021322617],
+ RowBox[{"t3", "=",
+ RowBox[{
+ RowBox[{"FCCanonicalizeDummyIndices", "[",
+ RowBox[{"t2", ",",
+ RowBox[{"LorentzIndexNames", "\[Rule]",
+ RowBox[{"{", "mu", "}"}]}], ",",
+ RowBox[{"SUNIndexNames", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"aa", ",", "cc"}], "}"}]}]}], "]"}], "/.",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"mu", "\[Rule]", "\[Mu]"}], ",",
+ RowBox[{"aa", "\[Rule]", "a"}], ",",
+ RowBox[{"cc", "\[Rule]", "c"}]}], "}"}]}]}]], "Input",
+ CellLabel->"In[11]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["F",
- TraditionalForm],
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], "-",
RowBox[{
SubsuperscriptBox[
FormBox["A",
@@ -1577,7 +1606,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["a",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
@@ -1607,15 +1636,36 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}],
FormBox[
- FormBox["a",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{158, 22},
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["F",
+ TraditionalForm],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{187, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[16]=",
- CellID->1748319521]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1631,12 +1681,35 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"g", ",", "c", ",", "a"}], "]"}]}]}]}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[17]:=",
+ CellLabel->"In[12]:=",
CellID->2111632726],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["F",
+ TraditionalForm],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "-",
RowBox[{
SubsuperscriptBox[
FormBox["A",
@@ -1646,7 +1719,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["a",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
@@ -1670,69 +1743,45 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}],
FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], "+",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["F",
- TraditionalForm],
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}],
- FormBox[
- FormBox["g",
+ FormBox["c",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{158, 22},
+ ImageSize->{187, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[17]=",
- CellID->1369525226]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[TextData[{
- "Since the variational derivative vanishes t4 implies that 0 = ",
+ "Since the variational derivative vanishes ",
+ Cell[BoxData["t4"], "InlineFormula"],
+ " implies that ",
Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["D", "\[Mu]"],
- SubsuperscriptBox["F", "g", "\[Mu]\[Sigma]"]}], TraditionalForm]]],
- " ."
-}], "Text",
- CellTags->"FunctionalD",
- CellID->1366711149],
+ RowBox[{"0", "=",
+ FormBox[
+ RowBox[{
+ SubscriptBox["D", "\[Mu]"],
+ SubsuperscriptBox["F", "g", "\[Mu]\[Sigma]"]}],
+ TraditionalForm]}]], "InlineFormula"],
+ "."
+}], "Notes"],
-Cell[TextData[StyleBox["Second approach",
- FontWeight->"Bold"]], "Text",
- CellTags->"FunctionalD",
- CellID->1672341951],
+Cell["Second approach:", "Notes"],
-Cell["\<\
-It is of course also possible to do the functional deriviate on the S[A] with \
-both field strength tensors inserted.\
-\>", "Text",
- CellTags->"FunctionalD",
- CellID->680079191],
+Cell[TextData[{
+ "It is of course also possible to do the functional deriviate on the ",
+ Cell[BoxData[
+ RowBox[{"S", "[", "A", "]"}]], "InlineFormula"],
+ " with both field strength tensors inserted."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"S", "[", "A", "]"}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[18]:=",
+ CellLabel->"In[13]:=",
CellID->1996431184],
Cell[BoxData[
@@ -1776,7 +1825,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -1791,9 +1841,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -1808,7 +1859,7 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], ")"}], ".",
+ TraditionalForm]], ")"}]}], ")"}], ".",
RowBox[{"(",
RowBox[{
RowBox[{
@@ -1844,7 +1895,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -1859,9 +1911,10 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -1876,13 +1929,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{435, 41},
+ TraditionalForm]], ")"}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{564, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[18]=",
- CellID->745422332]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1893,7 +1945,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"S", "[", "A", "]"}], ",", "Ag"}], "]"}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[19]:=",
+ CellLabel->"In[14]:=",
CellID->1238326201],
Cell[BoxData[
@@ -1946,22 +1998,22 @@ Cell[BoxData[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["d",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["d",
+ FormBox["c",
TraditionalForm],
TraditionalForm]]}]}]}], "+",
RowBox[{
@@ -1999,11 +2051,11 @@ Cell[BoxData[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["c",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -2014,18 +2066,18 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["e",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e",
+ FormBox["b",
TraditionalForm],
TraditionalForm]]}]}], "-",
RowBox[{
@@ -2120,23 +2172,25 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2165,23 +2219,25 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2228,22 +2284,22 @@ Cell[BoxData[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["d",
+ FormBox["e",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e",
+ FormBox["d",
TraditionalForm],
TraditionalForm]]}]}], "-",
RowBox[{
@@ -2274,23 +2330,25 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2319,23 +2377,25 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}]}]}], "-",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2353,23 +2413,6 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -2380,7 +2423,26 @@ Cell[BoxData[
FormBox[
FormBox["d",
TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2398,23 +2460,6 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -2425,41 +2470,43 @@ Cell[BoxData[
FormBox[
FormBox["d",
TraditionalForm],
- TraditionalForm]]}]}], "-",
- RowBox[{
- FractionBox["1", "4"], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
+ RowBox[{
+ FractionBox["1", "4"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox["g",
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -2470,7 +2517,26 @@ Cell[BoxData[
FormBox[
FormBox["e",
TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2488,23 +2554,6 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -2515,7 +2564,26 @@ Cell[BoxData[
FormBox[
FormBox["e",
TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2544,23 +2612,25 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]]}]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2578,23 +2648,6 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -2605,7 +2658,26 @@ Cell[BoxData[
FormBox[
FormBox["c",
TraditionalForm],
- TraditionalForm]]}]}], "-",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2627,30 +2699,32 @@ Cell[BoxData[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["c",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]]}]}]}], "-",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2668,34 +2742,36 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2724,23 +2800,25 @@ Cell[BoxData[
FormBox["d",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]]}]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2758,23 +2836,6 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -2785,7 +2846,26 @@ Cell[BoxData[
FormBox[
FormBox["e",
TraditionalForm],
- TraditionalForm]]}]}], "-",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2807,30 +2887,32 @@ Cell[BoxData[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["d",
+ FormBox["e",
TraditionalForm],
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]]}]}]}], "-",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
RowBox[{
FractionBox["1", "4"], " ",
SuperscriptBox["f",
@@ -2848,272 +2930,252 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm]]}], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e",
+ FormBox["d",
TraditionalForm],
- TraditionalForm]]}]}], "+",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}], "-",
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], "-",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}], "+",
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}], "-",
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], "-",
RowBox[{
FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{548, 335},
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{560, 371},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[19]=",
- CellID->1475699650]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell["\<\
This is just funcional derivation and partial integration and simple \
-contraction of indices. No attempt is made to rename dummy indices (since \
-this is difficult in general).\
-\>", "Text",
- CellTags->"FunctionalD",
- CellID->1367707502],
+contraction of indices. At first no attempt is made to rename dummy indices \
+(since this is difficult in general).\
+\>", "Notes"],
Cell["\<\
With a general replacement rule only valid for commuting fields the color \
indices can be canonicalized a bit more. The idea is to use the commutative \
properties of the vector fields, and canonicalize the color indices by a \
-trick. This function will work on any commuting product of fields.\
-\>", "Text",
- CellTags->"FunctionalD",
- CellID->1173793345],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[", "symfun", "]"}], ";"}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[20]:=",
- CellID->62943147],
+trick.\
+\>", "Notes"],
Cell[BoxData[
RowBox[{
- RowBox[{"symfun", "[",
- RowBox[{"z_", ",", "fieldname_Symbol"}], "]"}], ":=",
- RowBox[{"Expand", "[",
- RowBox[{"SUNSimplify", "[",
- RowBox[{"FixedPoint", "[",
- RowBox[{
- RowBox[{
- RowBox[{"Collect2", "[",
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"DotSimplify", "[",
- RowBox[{"#1", "/.",
- RowBox[{"Times", "\[Rule]", "Dot"}]}], "]"}], "/.",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- RowBox[{"(", "qi___", ")"}], ".",
- RowBox[{"QuantumField", "[",
- RowBox[{
- "par1___", ",", "fieldname", ",", "li1_", ",", "sui1_"}],
- "]"}], ".",
- RowBox[{"QuantumField", "[",
- RowBox[{
- "par2___", ",", "fieldname", ",", "li2_", ",", "sui2_"}],
- "]"}], ".", "qf___"}], " ", ")"}], "any_"}], ")"}],
- "\[RuleDelayed]",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- RowBox[{"(",
- RowBox[{"qi", ".",
- RowBox[{"QuantumField", "[",
- RowBox[{"par1", ",", "A", ",", "li1", ",", "sui2"}], "]"}],
- ".",
- RowBox[{"QuantumField", "[",
- RowBox[{"par2", ",", "fieldname", ",", "li2", ",", "sui1"}],
- "]"}], ".", "qf"}], " ", ")"}],
- RowBox[{"(",
- RowBox[{"any", "/.",
- RowBox[{"{",
- RowBox[{
- RowBox[{"sui1", "\[RuleDelayed]", "sui2"}], ",",
- RowBox[{"sui2", "\[RuleDelayed]", "sui1"}]}], "}"}]}],
- ")"}]}], ")"}], "/;",
- RowBox[{
- RowBox[{"(",
- RowBox[{"!",
- RowBox[{"(",
- RowBox[{"FreeQ2", "[",
- RowBox[{"any", ",",
- RowBox[{"{",
- RowBox[{"sui1", ",", "su2"}], "}"}]}], "]"}], ")"}]}],
- ")"}], "&&",
- RowBox[{"!",
- RowBox[{"(",
- RowBox[{"OrderedQ", "[",
- RowBox[{"{",
- RowBox[{"sui1", ",", "sui2"}], "}"}], "]"}],
- ")"}]}]}]}]}]}], "/.",
- RowBox[{"Dot", "\[Rule]", "Times"}]}], ",", "QuantumField"}], "]"}],
- "&"}], ",", "z", ",", "42"}], "]"}], "]"}], "]"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[21]:=",
- CellID->915301036],
+ RowBox[{
+ RowBox[{"Commutator", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"aaa___FCPartialD", ",", "A", ",", "bbb__"}], "]"}], ",",
+ RowBox[{"QuantumField", "[",
+ RowBox[{"ccc___FCPartialD", ",", "A", ",", "ddd__"}], "]"}]}], "]"}],
+ "=", "0"}], ";"}]], "Input",
+ CellLabel->"In[15]:="],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"r2", " ", "=", " ",
- RowBox[{"symfun", "[",
- RowBox[{"r1", ",", "A"}], "]"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[22]:=",
- CellID->832685091],
+ RowBox[{"r2", "=",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"r1", "//", "DotSimplify"}], "//",
+ RowBox[{
+ RowBox[{"FCCanonicalizeDummyIndices", "[",
+ RowBox[{"#", ",",
+ RowBox[{"SUNIndexNames", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"a1", ",", "b1", ",", "c1", ",", "d1"}], "}"}]}], ",",
+ RowBox[{"LorentzIndexNames", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"mu", ",", "nu", ",", "rho"}], "}"}]}]}], "]"}], "&"}]}], "//",
+ RowBox[{
+ RowBox[{"ReplaceAll", "[",
+ RowBox[{"#", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"a1", "\[Rule]", "a"}], ",",
+ RowBox[{"b1", "\[Rule]", "b"}], ",",
+ RowBox[{"c1", "\[Rule]", "c"}], ",",
+ RowBox[{"d1", "\[Rule]", "d"}], ",",
+ RowBox[{"mu", "\[Rule]", "\[Mu]"}], ",",
+ RowBox[{"nu", "\[Rule]", "\[Nu]"}], ",",
+ RowBox[{"rho", "\[Rule]", "\[Rho]"}]}], "}"}]}], "]"}], "&"}]}], "//",
+ RowBox[{
+ RowBox[{"Collect2", "[",
+ RowBox[{"#", ",", "SUNF"}], "]"}], "&"}]}]}]], "Input",
+ CellLabel->"In[16]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{
- FractionBox["1", "4"], " ",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3122,9 +3184,9 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["a",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3133,9 +3195,9 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3144,72 +3206,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]]}]}], "-",
+ TraditionalForm]]}]}], "+",
RowBox[{
- FractionBox["1", "4"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]], " ",
+ FractionBox["1", "2"], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -3217,76 +3218,62 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e",
+ FormBox["d",
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["a",
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["g",
TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["a",
TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
FormBox[
FormBox["b",
TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["g",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]}]], " ",
+ TraditionalForm]]}]}], "+",
+ RowBox[{
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -3294,15 +3281,125 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e",
+ FormBox["g",
TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "-",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3311,9 +3408,71 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["a",
+ FormBox["g",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ")"}], "-",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{438, 86},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[16]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Inspection reveals that still terms are the same. Gather the terms with two \
+",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{"f", " "}], TraditionalForm]]],
+ "'s:"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"twof", "=",
+ RowBox[{"Select", "[",
+ RowBox[{
+ RowBox[{"r2", "//", "Expand"}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Count", "[",
+ RowBox[{"#", ",",
+ RowBox[{"SUNF", "[", "__", "]"}]}], "]"}], "===", "2"}], "&"}]}],
+ "]"}]}]], "Input",
+ CellLabel->"In[17]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FractionBox["1", "2"], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -3321,62 +3480,50 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["g",
TraditionalForm],
TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Mu]",
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["d",
TraditionalForm],
- TraditionalForm]]}]}], "+",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
- FormBox["a",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["a",
TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
TraditionalForm],
FormBox[
- FormBox["g",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
+ TraditionalForm],
FormBox[
- FormBox["\[Mu]",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]],
+ TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3385,42 +3532,40 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]]}]}], "-",
+ TraditionalForm]]}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
FormBox["a",
TraditionalForm],
TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
FormBox["b",
TraditionalForm],
TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["g",
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3428,110 +3573,142 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}]}], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
FormBox[
FormBox["a",
TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]],
+ TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]]}]}], "+",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
+ TraditionalForm]]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{420, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[17]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"twofnew", "=",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"twof", "[",
+ RowBox[{"[", "1", "]"}], "]"}], "/.",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"a", "\[Rule]", "b"}], ",",
+ RowBox[{"b", "\[Rule]", "a"}]}], "}"}]}], ")"}], "+",
+ RowBox[{"twof", "[",
+ RowBox[{"[", "2", "]"}], "]"}]}], ")"}], "//",
+ "DotSimplify"}]}]], "Input",
+ CellLabel->"In[18]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["a",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}]}], "-",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{
- FractionBox["1", "2"], " ",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{188, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[18]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"r3", " ", "=", " ",
+ RowBox[{"r2", "-", "twof", "+", "twofnew"}]}]], "Input",
+ CellTags->"FunctionalD",
+ CellLabel->"In[19]:=",
+ CellID->1144637557],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -3539,174 +3716,28 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["g",
+ FormBox["d",
TraditionalForm],
TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- FormBox["\[Sigma]",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["g",
TraditionalForm],
- TraditionalForm]]}]}], "+",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{534, 188},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[22]=",
- CellID->1392722087]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"r3", "=",
- RowBox[{"r2", "/.",
- RowBox[{"\[Nu]", "\[Rule]", "\[Mu]"}]}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[23]:=",
- CellID->706809486],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
+ TraditionalForm]}]], " ",
RowBox[{
- FractionBox["3", "4"], " ",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3715,9 +3746,9 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["b",
+ FormBox["a",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3726,9 +3757,9 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
+ FormBox["b",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ".",
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -3736,199 +3767,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]]}]}], "-",
- RowBox[{
- FractionBox["1", "4"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
FormBox[
FormBox["c",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
TraditionalForm]]}]}], "+",
- RowBox[{"2", " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}]}], "-",
RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -3943,24 +3786,103 @@ Cell[BoxData[
FormBox["g",
TraditionalForm],
TraditionalForm]}]], " ",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}]}], "+",
- RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "-",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"(",
RowBox[{
FormBox[
SubscriptBox["\[PartialD]",
@@ -3986,8 +3908,8 @@ Cell[BoxData[
FormBox[
FormBox["g",
TraditionalForm],
- TraditionalForm]]}], "-",
- RowBox[{
+ TraditionalForm]], ")"}], "-",
+ RowBox[{"(",
RowBox[{
FormBox[
SubscriptBox["\[PartialD]",
@@ -4013,122 +3935,52 @@ Cell[BoxData[
FormBox[
FormBox["g",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{484, 71},
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{438, 70},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[23]=",
- CellID->333585110]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[TextData[{
- "Inspection reveals that still terms are the same. Gather the terms with two \
-",
- Cell[BoxData[
- FormBox[
- RowBox[{"f", " "}], TraditionalForm]]],
- "'s:"
-}], "Text",
- CellTags->"FunctionalD",
- CellID->2140946790],
+ "Check that this is now indeed the same as the ",
+ Cell[BoxData["t4"], "InlineFormula"],
+ " result from the first attempt."
+}], "Notes"],
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"twof", "=",
- RowBox[{"Select", "[",
- RowBox[{"r3", ",",
- RowBox[{
- RowBox[{
- RowBox[{"Count", "[",
- RowBox[{"#", ",",
- RowBox[{"SUNF", "[", "__", "]"}]}], "]"}], "===", "2"}], "&"}]}],
- "]"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[24]:=",
- CellID->1693929986],
+Cell[BoxData["t4"], "Input",
+ CellLabel->"In[20]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{
- FractionBox["3", "4"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["F",
+ TraditionalForm],
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]]}]}], "-",
- RowBox[{
- FractionBox["1", "4"], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}],
FormBox[
- FormBox["b",
+ FormBox["g",
TraditionalForm],
- TraditionalForm]], " ",
+ TraditionalForm]], ")"}], "-",
+ RowBox[{
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -4137,273 +3989,70 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
+ FormBox["a",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
+ FormBox["g",
TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
+ FormBox["c",
TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
+ FormBox["a",
TraditionalForm]}]], " ",
- SuperscriptBox["f",
+ SubsuperscriptBox[
+ FormBox["F",
+ TraditionalForm],
RowBox[{
FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["g",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{354, 41},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[24]=",
- CellID->115691573]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"twofnew", "=",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- RowBox[{"twof", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}],
- "+",
- RowBox[{"(",
- RowBox[{
- RowBox[{"twof", "[",
- RowBox[{"[", "2", "]"}], "]"}], "/.",
- RowBox[{"{",
- RowBox[{
- RowBox[{"b", "\[RuleDelayed]", "c"}], ",",
- RowBox[{"c", "\[RuleDelayed]", "b"}]}], "}"}]}], ")"}]}], ")"}], "/.",
- RowBox[{"{",
- RowBox[{
- RowBox[{"a", "\[RuleDelayed]", "c"}], ",",
- RowBox[{"c", "\[RuleDelayed]", "a"}]}], "}"}]}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[25]:=",
- CellID->1865190780],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], " ",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}],
FormBox[
FormBox["c",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{160, 23},
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{187, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[25]=",
- CellID->602569188]
+ CellLabel->"Out[20]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"r4", " ", "=", " ",
- RowBox[{"r3", "-", "twof", "+", "twofnew"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[26]:=",
- CellID->1416466041],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQlQlOcZx4lpk04znXY6bQ1eiaKCRsMtchlhuLywIFpQM4igk6CAIklQ
-yhHwRCrgkVjFNlUa8KKCqQka8UIQAxpEUa6gnLIcyy4su8te3WUpQdj9zve7
-dt/fjA6M7vs8/+d59v2O/eA/fWOU/+YJJiYmO36l/ss/5DO36OiQnat+of7G
-fWfMpo2vq7+wUf85+JqJieZrFQQCgUBQUIqeZcc4z196madgOhXaMWbtWlhb
-AdYmBqEdWVOWi8OBOinTeTCBMWvXwtoKsDYxCM3wb/hZb/yhj+k0GAGEdqVM
-LFcCyod+MFeAbpnGPJYGgoJfmhERFZ+WFmnzjkc+0XPhgcef2Xuf++G/p9Nj
-ljisPt5I4JA12PbdwdSTxyI912Q2SIhlgahF3l18NPnYqQPrPIJzW2UAQyNp
-Rwiqkvx0Oiow+tCJwzErfXxC4y63j/l3YJBvMcoKiN2nTaYOAIwlhFEGnuz1
-WJRc3qcUP/3c3vUfzQSHR97yL5c5gUm5DQPyjjyXWf4lQrwrSOvTPX1zWnsf
-7rK0TXgqJpIEopbBF1lL3Q/XS1WS1utFL8Sjj+IkQyNoRwiqUvWVBc52zG6V
-y9v+vdDMD3/FsEK+xWgrIHafLpm6ID+WEEZRt23FewHfdSkUXYXrZ1rtJ3yt
-3nvbf4ZdRoP65X33N1l65bTJcS4gqoyaY77pSFbGga/KujG9haSt+Qlhn+z8
-0Ml5/akXUjQt6kOp1cIvng+SDD02qAb92hGCqpF3FsauDIrLTIvyCz1WLaLo
-wgd/i/EVVgNi97HLVAhris6fyfm2EtsAYID0WEJoRSkoDn/3D44XO/5/ii4o
-+bOZ09l2Sde9nKQFlpF3qyp79LybEBZRI66Os7TV3IqUt18IdNpeIkB7t43P
-5K7vTJd8nlLZV1fUiOHNOvji725mSy7x5KL6grOlPXI0LYLiFWauBTylStZ5
-//uWVy7jsIceHxRZO0JQzQuffb5wbkh2ebsE4N5EusV4C6tC6z5GmbK28yGW
-1j5B63xtTd8NyG5FnUM04aiJQdjGQM3J7THz/mgRP3IZI6lLdZu7Mi7zQkXF
-HmerTZnXeahzMX4R9UGyvSAkKix895dZ6QlJZ+sGUOdg/CJy3rdbPTw/3p2a
-ea4Ww/4kqUmZa7o4b/Q0ImtRrx/p4/3R7oOpx693vCoSc2gdQZG1IwRVyfnl
-546mJcZv+9DHwWVdalkvkA/CSbcYd2FRuo9RprLvx33hx6r6Na+V1B7+wO6v
-1fgutYGMJYRJBlvzD35T/yB61hTfOwIuLyLjXTu03fNPb5n6bo9PySzsoOWe
-K+ig/eUb5jh9PXTJIWvKsjcLKAVwe4R9hcUnUznIb21s7hE1frnY+5tOHPsJ
-6bFUCh5k7j7eQOjWJwQEiu6S4wUtUnlbjoOp7akmYrPHmkWEJaunTF17j95b
-nkCDKoQVR8LD4lKPnDxxKCkiNqdeTPr4zsbCYpapED74IsTVYfmGLaHLrKzt
-py/WXBljDUJeuLzta4dp7jd7CbwUAgCl8H6838exiYmJsRvNfzcj4kcRpxeR
-1qfNn+iY207rLU9GgmKHu4VVI6474jHNNqFMqN6UlPwb/pPfCcb87BIQ4XCD
-ogxhWdC0X785mt9YxFQNvPJ/xPVn0sr4Q0ckSe2+eZPcCrvxH69pW0Qh7qor
-u9el/1aJsuea92SLOJx3KUjCSFAszdXC3cKq8+LlLzOdFnynV5txf0XY+16X
-tM9aqTNabhdZKRr+alvluN2H5FiOVPiXE16b8AZShSHEUEp4Tc8bR/O8pXtw
-dI9kzeeijtYMD52iI8/x7flp9ZqPitG7T9ci6mN3y5WUILeFDvZWs377e+vQ
-/XnN+h+YFD/ZZTF15S16D3eMBEVvrhYuF1azSQROnuhTxNd+N/A4wdnv0vBd
-+oEnsXaeQw+GiqvjFniNu+4jPZbDFW4oy7Sa5JT7SG+FIVQh77yyNfjizyft
-wnurp0xdV6Y5gUbrPn2LiB7FOzrG3exW/xu/yPP9sIp+BEXqOXSZbHeK6DOl
-xGAkKEY4XViV5hml9VNNl1/v0VzfDVSney9KqRreThQvL7jb7Xyi3oCUnZe9
-Fow9twMyltqV4CUeEwy+vHJ4i/NEU49d2c+HjpvS1ot7gs3fenPSqr2X2sTI
-3adxEd7tQKugG0Pn6fL2XLTPmPsffjTbYgfNp+GMBMUA5wurQfR47weTZgUk
-ZOzf4uMaeqZx5Byvv2Kz1ZKrmmu2/gfhNsuu9fy8zQAZyxEU3TejN+yqQtq+
-IXSD0H16F5E8S7Z3zhr69EXJvxloGVDER1hF1vxPh5kBd+g92DESlDQcKOxI
-8J5nd78vKqvpGn15JWs6aT9zTYlQJWvP+8sMy321mH9OEshsQxiFePdBLyL9
-KcPWIvR2r1IhKE12sokp79M9TgrBoyulnV3FQbbBt5DeaUBhJCggWF1YDAju
-rjEzd3V29/YN2rzCcjX2vRPIWEKYhXD3gS+iknde/cTNfPZ7ltbuW07X6n3i
-V1yzx3OeU2h47H9a8P4gBHEYCQoKNhcWHWndfgeXLCLPNYEZSwiTEO8+6EUg
-EF0ouwuX2oQ/JPBYExxL7kO8+6AXgUDAAscSAoFAIBAIBAKBQCAQCAQCgUAg
-EAgEAoFAIBAIBMIYrHWpZm1ieGG5EJanBzF6WOtSzdrE8MJyISxPDxDctpA2
-ZqB9NtWwtsJaDKbOY2HSW5l+GNqBoX021fbZxlthDOlxGSa9lemBBcMD7bMp
-ts824gpjSI/T0GMhzSCMDw+0z6baPtuoK4whPbwQS5IiaWAtpFklTQuAHVgh
-rDwR4bd2R1L8tqCg5Fs9iM2H9tlU22cbbYW1UFxnYklSJQ2ohTST0rTo7B3p
-HVhUGWH2tsfQQUnakL7AZrRB9DigfTbV9tlGW2Et1NaZWJKUSQNpIc2oNC06
-egdiB5b3Vlw4/3ToF74qeQUu071v6/0dg9A+m4yrOw2BuFthLfTYlBNLkgJp
-4C2kGZGmRZdAkDuwBmHp5rkOf6vXc48D2meTcXWnKxAnKzy8AvU25cSSZIU0
-apIkL214HZ0Cge7A8s6rn3qtPfq4X/ca0D6bjHDaArG7wkj+xTTYlBMbAzLD
-o4WGEaJSGqrrNA0CFfzivcGf5jXp/YAIiLm5odpnI3QQrEE5KuyrMFb/Yupt
-yomNAanhwS6N3AgBl4bTdRrE6CKgENxP35pyjaf/xBOIublB2Wdj7SBpg3Ku
-VxibfzEdNuXExoDE8KBIAzhCwKXhcZ0GNLp6GWz+atWixIdCmYZBft2Nl2Or
-BMpF2pDss3H5hqNiuBXuxeJfTI9NObExIDw8qNIAjhBoaZi6hioQZ+/0IKrc
-NuMNkxFen/jq054gXaQNyD4bn284IgZdYXT/YhptyomMAdFXoUsDOEKgpWF1
-nQbbOyrA5SJtQPbZ+HzDycDxCmP1L9YHaJtyYmMA2Ht9COAjBFAa2a5pYYHF
-PNYeGZx9NpgOYoDrFcbqX6wHemzKiY0BSYdiekaIYJLkuqaFDRbzWOUbnH02
-kA5igeMVJgstNuXExoC0QzEdI8SkjTILLOY57iLNAZNZjleYLLTIJzYGHBge
-ZpNkwehyokecxsgrbOTyOQ3sHQQCgUAgEAgF/A8M9PTv
- "], {{0, 50}, {395, 0}}, {0,
- 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{395, 50},
- PlotRange->{{0, 395}, {0, 50}}]], "Output",
- ImageSize->{399, 50},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellLabel->"Out[26]=",
- CellID->1902982577]
-}, Open ]],
-
-Cell["\<\
-Check that this is now indeed the same as the t4 result from the first \
-attempt.\
-\>", "Text",
- CellTags->"FunctionalD",
- CellID->1808944377],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["t4"], "Input",
+ RowBox[{"w0", "=",
+ RowBox[{
+ RowBox[{
+ RowBox[{"RightPartialD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Mu]", ",", "\[Sigma]", ",", "g", ",",
+ RowBox[{"{",
+ RowBox[{"A", ",", "a", ",", "b"}], "}"}], ",", "1"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"A", ",",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}], ".",
+ RowBox[{"FieldStrength", "[",
+ RowBox[{"\[Mu]", ",", "\[Sigma]", ",", "a", ",",
+ RowBox[{"{",
+ RowBox[{"A", ",", "b", ",", "d"}], "}"}], ",", "1"}], "]"}]}],
+ RowBox[{"SUNF", "[",
+ RowBox[{"g", ",", "c", ",", "a"}], "]"}]}]}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[27]:=",
- CellID->819260412],
+ CellLabel->"In[21]:=",
+ CellID->611111290],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
FormBox["g",
@@ -4412,116 +4061,33 @@ Cell[BoxData[
TraditionalForm],
FormBox["a",
TraditionalForm]}]], " ",
- SubsuperscriptBox[
- FormBox["F",
- TraditionalForm],
- RowBox[{
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["c",
TraditionalForm],
- TraditionalForm]}],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]]}], "+",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["F",
- TraditionalForm],
- RowBox[{
- FormBox[
+ TraditionalForm]], ".",
+ SubsuperscriptBox["F",
+ RowBox[{
FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}],
- FormBox[
- FormBox["g",
- TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{158, 22},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"FunctionalD",
- CellLabel->"Out[27]=",
- CellID->908387761]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"w0", "=",
- RowBox[{
- RowBox[{
- RowBox[{"RightPartialD", "[", "\[Mu]", "]"}], ".",
- RowBox[{"FieldStrength", "[",
- RowBox[{"\[Mu]", ",", "\[Sigma]", ",", "g", ",",
- RowBox[{"{",
- RowBox[{"A", ",", "a", ",", "b"}], "}"}], ",", "1"}], "]"}]}], "+",
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"A", ",",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}],
- RowBox[{"FieldStrength", "[",
- RowBox[{"\[Mu]", ",", "\[Sigma]", ",", "a", ",",
- RowBox[{"{",
- RowBox[{"A", ",", "b", ",", "d"}], "}"}], ",", "1"}], "]"}],
- RowBox[{"SUNF", "[",
- RowBox[{"g", ",", "c", ",", "a"}], "]"}]}]}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[28]:=",
- CellID->611111290],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox["g",
- TraditionalForm],
- FormBox["c",
- TraditionalForm],
- FormBox["a",
- TraditionalForm]}]], " ",
- SubsuperscriptBox["F",
- RowBox[{
- FormBox["\[Mu]",
- TraditionalForm],
- FormBox["\[Sigma]",
- TraditionalForm]}],
- RowBox[{
- FormBox["a",
- TraditionalForm],
- FormBox[
- RowBox[{"{",
- RowBox[{"A", ",", "b", ",", "d"}], "}"}],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]}]]}], "+",
+ TraditionalForm]}],
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"A", ",", "b", ",", "d"}], "}"}],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]}]]}]}], "+",
RowBox[{
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -4544,12 +4110,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["1",
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{259, 28},
+ ImageSize->{295, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[28]=",
- CellID->849746209]
+ CellLabel->"Out[21]="]
}, Open ]],
Cell[CellGroupData[{
@@ -4558,12 +4123,103 @@ Cell[BoxData[
RowBox[{"w1", "=",
RowBox[{"Explicit", "[", "w0", "]"}]}]], "Input",
CellTags->"FunctionalD",
- CellLabel->"In[29]:=",
+ CellLabel->"In[22]:=",
CellID->1841998165],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox["g",
+ TraditionalForm],
+ FormBox["c",
+ TraditionalForm],
+ FormBox["a",
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm],
+ FormBox["d",
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "-",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], ")"}]}]}], "+",
RowBox[{
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -4576,17 +4232,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["f",
RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
+ FormBox["g",
TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
+ FormBox["a",
TraditionalForm],
- FormBox[
- FormBox["g",
- TraditionalForm],
+ FormBox["b",
TraditionalForm]}]], " ",
RowBox[{
SubsuperscriptBox[
@@ -4612,7 +4262,8 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], "+",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -4627,11 +4278,684 @@ Cell[BoxData[
FormBox[
FormBox["g",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], "-",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{363, 51},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FunctionalD",
+ CellLabel->"Out[22]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"w2", "=",
+ RowBox[{
+ RowBox[{"ExpandPartialD", "[", "w1", "]"}], "//",
+ "DotSimplify"}]}]], "Input",
+ CellTags->"FunctionalD",
+ CellLabel->"In[23]:=",
+ CellID->256131363],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]]}]}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "-",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["\[PartialD]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{544, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FunctionalD",
+ CellLabel->"Out[23]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"dif1", " ", "=", " ",
+ RowBox[{"w2", "-", "r3"}]}]], "Input",
+ CellTags->"FunctionalD",
+ CellLabel->"In[24]:=",
+ CellID->1098654926],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]]}]}]}], "-",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "-",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
SubsuperscriptBox[
@@ -4642,21 +4966,10 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["g",
+ FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], ")"}]}], "-",
+ TraditionalForm]], ")"}], ")"}]}]}], "-",
RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
@@ -4671,48 +4984,22 @@ Cell[BoxData[
FormBox["g",
TraditionalForm],
TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm]]}]}], "+",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
@@ -4727,9 +5014,38 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], "-",
+ TraditionalForm]], ")"}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["g",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
@@ -4744,473 +5060,44 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{519, 30},
+ TraditionalForm]], ")"}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{493, 97},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"FunctionalD",
- CellLabel->"Out[29]=",
- CellID->421326563]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"w2", "=",
- RowBox[{
- RowBox[{"ExpandPartialD", "[", "w1", "]"}], "/.",
- RowBox[{"Dot", "\[Rule]", "Times"}]}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[30]:=",
- CellID->256131363],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQtQVNcZx4l9pNNMp51OWotGk4gP4iOAgMgrEQYF34VgClUHEXQsVohI
-RpSCxncMo+IrNkKbChV8UcVUS4xoFIFVICpCRDAosLxfuzx2YXcvXXapRVju
-45xz77mXPb8ZnUXlO9/3/7579t67F/9vr47wWzvKwsJi08/0v/kFb/aIjAze
-8sGP9V94bolas/pH+hd2+l/HX7Gw6HvdSyAQCGYN1fk4Jcp1xoLLDTrcqejR
-Koqunfvyy6t1PYgDsyqTt9XFgLgajZQRXNpARFsm7sQ0lYluTp+WdWNZfDCU
-4l6EjXuyXIs8Mpsy+VtdDIiq0WgZwaUNRLRl4k2s9Yav3ep77XgWH4ymKsl9
-1p4navSR2ZTJ3+rsoDQqLcVbdFE1Gi2sS+NXYb4RbZlYR6vr0WZH77P3/n3q
-YNR8p2UnKgD2UW1z9tEdx5I+Xe4VlCbXAGXRI8+IWxe58+CuFVaT1xV2AETQ
-teYe2hARGx8fPvNNr0tDzmdpy+R5dTp91D+cigiIPPDF4ailPj4hMZdrwfRj
-AYJGA8LQGvgItKUJprCZlGkCfKOlR1v9D7d3AranPe3S1qe7TfLLUXKN0PM8
-cYHn4fLuXrX8etZzFcDWTynzNrn4HC9XU4qcVba+11u4x+gq3uP13o78dkr1
-/SeO7n+rGtw+mjL5Xp1Wn3ZZwGTnFLlWW/PP2Va+3MVnD3yjAWFqDXwE2tKE
-UthMyjQFttEy0HbLb4LDoaf6XbP97hqbeak1XO8B6fdf29nHn0Hc/NbIkz2n
-rbzVRmnrzi+2cmORQrf8Ulzox1tWuriuSHquT10v3OJp/v9p0umaMldMtN03
-9IJ8+DL5Xp1eH21jZvTSwJiE+AjfkGMlnTye+bNutE5ZmnUuOfXqg2YU7+LM
-rRkMyub2CqWwhMpE21/GxFBCKbLD3nrd+UL9gLNTVUmMjX3fLTht7fkAl405
-CqYODwmiyF5s5Z7RQPVqGu9+U83iFtKQCMocv4mu5+q6m3JOxTg67S24X9xG
-q23P8796WM2/2KDtLM84k9uil0uR83srlzO16qa81O2zbMLvFD1oeXnHoCmT
-79Xp9VE9/mT21OCU/Fo1wkMLotGamnPBNnY+gcuX2Fu+5Z8i5/rGNHQ8mFoz
-CLTN7RVKYamUiby/jIkhpKv05Mao6b+xjv1e9eLPtLUZwRGhYbs+TzwYt/1M
-WRfj2kODaBuuhvt4r9v12f4T1+tZCDI0gro83nPqws3xp2X5u90dwo9lN9Pu
-4erSnVMt56QP1FBdtt9j6tKYhPMFBbtdbdckXG94ORG6MvlenU4fbWv+2aPx
-22I/Wunj5LZ8v6wNyafR4I2m2u/vDTtW1NH3t+onh993+EuJyuQ/ZL80U2sG
-gbi5giksjTJ56C/AHgJIj/zSZ1+VF0ZOemPJbQW+IJARNA3XDmyc+9vXLJds
-jN2ZkFkv4N1KHlbvyF/1jstpwzm3pjLR0co/l+YGAqUoTNh14injxMH3iOpp
-lVdUtXRWfD7H+6tGDgMpvuaKUWHcZWLrLxS65pwTGdXd2ppUJ0v7pEow0eCD
-oEhDmbPsjXF/zBP0ZiFPq+uUBUfCQmP2Hzn5xYHtG6JTy+k+BtHWnHYa73mz
-jSEknMI6ZeHxYHenRavWhyy0tXN8e07f5S/b7xVhc8WnsAFsZeLuLyiU8m6s
-75+it23bFr16yq8mbLjfiSUIkjS6y+NnjHZOq8Xz0CnG1dkcX5AKq8qOeI23
-j5Mp9VNNtd7wG/tmEOtnfEZAcwVQ2AiuMrH31xRKWeD4n786kF9YRxV1vZx4
-eXK8rNWw16qf7J0+xiOzmfu1KnwQNhF0qqYyWV7T8PcQqJZr3mOtYzhevqMC
-y+ovWvyTUa+M+qnpFhuBU1jXcGmh5fig223G7+koCH133kXjM0n6uhc5hD/o
-7H/10YMh44tkxnA1F63CjGAqk/f+0hy8NNsUpW6ofFYxkGfVzT0Dg2uqzkYc
-Le1XS1ef7vy7GfHl3azSRhlk2Aj6t6TqKzsDPWY7OdpO+uWv7UL2pVcN/4mm
-qnir9bil3zKc6fMFltX7W/xUlmA7xiXtoYkWG4FVWCkLGDvaJ6vV+FXXozhX
-34v9t5q7iqMd5hqesFSVxMyaN+TSA8mM4WsutMKSKJOP/rI9eJm3qWHRNl75
-c9CF/5+vKvP0V+DLZe0s0kYZhCZC58NYZ+eYm32fALZmzX03tIDukXi9em5j
-HZIAHhdEAdbVGa5x4BVuv7tinOUiwwO9VFfJQe/3dhb1H4i6uvOeDluK9RNM
-NV6eN2vw2QOSGevF3VwYhSVRJh/95XTwcqen7srh9a6jLb22pjwzbIzd8gu7
-g6a89uqYD/ZcrFHRp40uCH2EhlsBtoE3DOen2to0ps93O75bN9l6k8kTfAHA
-urqu+Wbkqq1FpkYEkcKdj/a8P2aSf9yhfet93EOSK168mXYUrLWd/3XfZUNH
-YdjMhdcG/NQCkhn73zJYmwuhsETKRN9fbgcvamjSFjCI+vEOR9dEwwcbVOvN
-ABv/rFaaEJqqvztN9L+N6RoS7+qgcFJY0/L4zjdZstKmgWf4msqTjhM/zFH2
-amrT/zDBZi/7n3znNB7SlLcP6ZSJtr/cDl7UgI8l0iDdPxyytw651UbpFLk7
-XGZG5beb1kCneHglt7EpO9A+6FshZRLD6nCwVXh4FHc+tJri7urpvSRw7WKb
-ZewPPrbjIWV5e6VfJnB/4UcLBuC0EQfRNn79sceUydNs7DzXn3oy7AO9qtLd
-c6e7hIRF/6saw38/iHd1SFgqPCzdZfuc3BJBnv9hOx6SllfyZYL3F3q0YIBI
-G3EQgrihmjMXzAz7DuDxHzMZD4mXCd5frCBJW6K1E4TBTMbDTMokEAgEAoFA
-IBAIBAKBQCAQCAQCgUAgEAgEAoFAIBAIBDNA2i66BHSQSeAPoi1ScNrLCo8E
-hgfWdFsCjtXcckaIOWprRCiFhQenvawwYB8eTsCabkvBsZpTzggxR22NCKUw
-DoTzKcYE7uHhBkfTbTyO1biNpAExQ237V0etMFiSfJTWi9pFV1SlGRH1Fg1n
-uo3FsRq7kTT4QiNeWyM8KwyWJE+loXXRxVmaEZM23HwYnSMCznQbh2M1fiNp
-8IVGvLZG+FUYLEneSuNmL8tHkohKM2LChpsfo3M0wLjuYnWsxmg0LISVs0S1
-NSKMwmBJ8lAaJxddHpOELM2IqQJRbtGIgXbdxeNYjdloWCArZ+lp2x+Bf4XB
-khRFafwkCV9afxyTBaLfohEB77qLxWsYu9GwMFbOItaWzoZYAIXBBgBmbIzw
-5lINmyR814wIUCBS4O2GcXgNi8JoWAArZ5Fpy9bJFLJwFgqDDQDU2LAvDcyl
-mrfSOJpHo/AfFw4UdsM4vIZFYDQsiJWzyLRl52QKXTgLhcEGAGJsGEpD6FKN
-vDQu/rOI/MeFAondMBavYREYDQth5SwybdvYOJmi8rCmVxhsAIDHhrE0hC7V
-qEtj1TXGAjn2TgCQ2Q3j8RrGbzQshJWzuLRldjJF6WFNqzDYAIB+F3NpSF2q
-0ZbG1n8Wbe+ww95uGJ/XsFSNhiWrLayTKRI7eKYkGQcAsf+4AeTDg7A0NP6z
-qHvHN6waKkqvYfEbDUtXW0gnUyR28IyADQCkR7MwwwOYJAr/WWF6hxBWWonR
-a1gCRsOS1RYWJHbwTIANALQ7rRDDg9NCV5DeIUSydsMSsBmVrLawCFI42ABI
-YGzwJim1oZVEQyWK2WprtoWPAEjvCAQCgUAgEMyA/wKU8anW
- "], {{0, 49}, {406,
- 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{406, 49},
- PlotRange->{{0, 406}, {0, 49}}]], "Output",
- ImageSize->{410, 49},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellLabel->"Out[30]=",
- CellID->1357294281]
+ CellLabel->"Out[24]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"dif1", " ", "=", " ",
- RowBox[{"w2", "-", "r4"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[31]:=",
- CellID->1098654926],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQtUE1f+x7vuf9v/2Z49u2f7oIBYKyiID96EpwqHly9YLFqoehBBj8Uq
-SmmL8gdUFCllVXy0VnG3q1TwRUVdW2rFNxALKCIqL1EhIOEREh5JyGT4J4Qi
-kGRmMnNDZpL7Oac94Qj3/r6/72/uzL0zk/vB6pglaye89tprn/2v7H9LIr70
-io2N2PLh/8h+8N4St2b1H2UfFsn+M5P9jvzzAAQCgUAg9ALtfZId5z5rwUWu
-VNehyED4lVfOfP/9Ty/7ATdMSKbWetcb6FUt44sha1dA2wzQNjADRvIiy4P1
-Va1Y13EMgvJ/i7HxPMFBgLdMRKb2etcbaFUt44wha1dA2wzQNjCDhXct2G71
-b926DkOBpPGYp3NqjQh8y0Rkaq93YqASIYLqqnNi0KpaxhkQ2hlgMQaEMzDe
-Mg25LGlJ38MvnfxP//bf43vj5rOWHm4gccJHOm4f3HHo2FfLfcJzORJSUfRz
-LiSti03Zu3OF+bR15T0kWpDyivdtiEnMyNho/75PvtJsGFOmlnvHyo/o6fGY
-0Ng9R/bHBQUERCZcbCGXP4oREgZAtfQ3//x1+tFDG32XZdaTPIGTzTa1rrG0
-64nFVA6icZOpAgBlCQEJ0vQfj+mh23Lr+5DWPI+pS4oEmrbQ/zxrgff+OvGA
-iHO18LmQxDUKKij5zC3gmzoRyi9aZRt8tVPzNvqqUn3m7CjtRoWPtzt5/qtx
-bEljyNR275j56WaHTnPN5iBI8w8u5sGaJx9IhMShXi3iur2+gTmcrntbbRyS
-HgvJBEE22xS7xtCuJxZTOIjGT6YqqJclBCxdN5dMcdxXLzu9d99dY+OX06zp
-fQXZhYKtyzfPKNzllnBOeM9YebMLRV6eXWzuQSAEMSc/KerzLSvd3Fccey4L
-XVZMi2eE/NwulbYXrLCwTVNeY1UvU9u9Y+cHaSuIDwpLyMyICY489KhXS+sG
-+PkhCOVq6a2ImW655kDWvq++Z3cQGviAZVuTrsd2Kke9dmZaDPIgGtBEplRQ
-XXjmRM5PFcQKgACUyxJCHpR/O3ry267nWkfMbYWPEmwc5Le6kJazoW6bi/h4
-Va/UCP/2YnPPC1x0QNJ299cmAksLSi0IipZYuJ95KW4vOp7gxNpddr+qC7Pe
-+p9/52U+/zwX6a27cKq4U1ZC/KJ/mLudahG1l+Rsc7bZeKeyonP0MY4hU9u9
-Y+dH+GS7i3VEdmmLCOBwo+wRXn6INDIApFruBFp45HNRtLu2sIHAEAsw28S7
-Vu4UWzsTLQZ7EBGXKWk+E2FjFxC2PNDBeHJINkfTy1EgZQkBR1/10c1xM9+x
-Shwx/0daLkTEREXv/DZrb9K2U7V9uH4oN4Jwf9oY4L9u59fph6+2EigS5RZE
-dRne1gu/zDjJLt3l6bjx0O0OzIsNUXWKtfG8vJF1JapN97IOSsg8W1a2y912
-TeZV7uhAsGRqu3es/CC80tMHM5ITN60MYHksT2d3AXk+UkWGcfJDqBFQ1fKp
-j+8nO9MzT9cQOKuAzDbhrlV0iq2dgRYDPoiIykS77++OPlTZI/9bUc3+uY7/
-90izxUggZQkBRj8n/+tLdeWxUycG3uLrrhGKLUi4V/Zs9n33TePAzYkpmQWt
-43hXUAu995Sumu52cnDGLnmR5WQeUoyxJozyyzN3Hq7HPQppYjT1RnTitSFY
-rIXEaiRzAO3ncRoaO3sbvp3nf6lNg7MAkLKEAEPaUXT4QpMYac5hGTsce0Gu
-kKg3AiIMQdHSiWYfl+jophzQ3qWCsgPRUQnpB44e2bNtQ3xOHdbzDkjzSdYk
-7+tdOE3Sw2hAjejEa0OwGHRiCcuUCsq/ifBkLVq1PnKhrZ3TB/Pka4dEOwFR
-lhBgoIK7icGfxCcnJ8evtvzblA33e3XSCJAwxHUZs4xcc1t0c1NOh70TGXNo
-YjSoRnSSbUOwWFcahbUHfCY5JLEFslMJyru2xPT9cMLvmgARDiGGgB026c9v
-jOQvVnGVfaN+R1h3IoPNG7woENXsnmniVdCh+fIj9UaItCAVtteyS9rVLwuj
-nVf8Ta0SNFyRBYVOeh+2+E8T/jDhddUWK6CJ0QQboafXemAxPRMri4ubv9B4
-UvitLkXEPWVRs/3OK96NkUW0yHFjRe/Qp00VSucMimVJZJyEDIOKuC+eNYzk
-WVNH/8iESxpPxxysHqogaWue63uzMurkzw7iWwmyEbUtyK6dmi6nhHm5sJxs
-p/7173aRaXmN6p8nE1ZttTILuoGzTqAtdNL7kMX17ExbE7fcByosVkATo7Ea
-YYDXzLSYAYmVD+2hpkYBhTzFT30Pk9yDzw89M9BXFe/oO/j6pfBRgrOf0soY
-5bLEHychGoC0Xf40/Nyr2a6gZOlEs+Vs+cwTz0qQjWC00Psg0dU14br8+Ste
-oe/sqDKsl9xlFeVh6niM7Nt8FNFp7zgrJDQxGrsR+nvNUIvpn9gB+TslK8yM
-Fw2+boz2PdrrPyelcugkIH151ttxS5XstIG2XfRzHjuPAlKWEED0v7y8f727
-kbHP1uxng5cuYs65XeGWb75h8mHq+WYhtpXgGsFugXsz1Dbs2uDsFmnJxXvi
-sOfeumlWn+lq8qrT3qUd12NXba1UNV7QxGjcRhjgNTMtZkBi5fQ+TJ1rMjUk
-aV/a+gDPyBMNw/OpnrK1tvN/ka9q9ZRH2y+8MuKLLoCUJWTcwLByHBsRPdnh
-5J41+FQHyrseahNSyMNoQtL4b5ZFyC0dLYHptnfS0MPoAUZ4zUyLGZDY4c47
-n9z5tZBd3T5yAUry4qiTxbIiwYCkJe+jKTa7iX/XK5DahoCDvJVAGxE/3edg
-FXmzC5Xyi3e42ceVdqsuDCn/weXitvbbYQ7hN7COGe2g296pQROjB2juNZMt
-pnViCcC/s8zc0tPd2z8wbO1im6XEz3hAyhICENJWAm4Eafvlcy/LaTNs7LzX
-H69R+4assHqX70y3yOj4H5t0sMeWbnunBl2MHqC310y2mNaJxUdcm8byyCLz
-HgqYsoQAg7yVoBuBaBVoNITeoB0FC+yj75F4DQWWJc0gbyXoRiBaBRoN0Vdg
-WUIgEAgEAoFAIBAIBAKBQCAQCAQCgUAgEAgEAoFAIBAIBAKBQCAQCIQoaO+T
-7Dj3WQsucoHs9Q0O2gamKTQXMm7h0TwPVNBjaSOhrUzaBmbASF5kebC+qhXr
-Og4laBuYptBcyLiFR/M8UEGPpY2EtjJpG5jBwrsWbLeayBakqESIjOf35BEO
-jO7QNsMKxi3PemOoMjS3GBS0lanHpaUVpLzifRtiEjMyNtq/75NPZpKH00Lf
-wy+d/E//9t/je+Pms5Yebhh1whc9PR4TGrvnyP64oICAyISLLeP4NUCYgQHE
-cDNMIDxGdqSEgVhsIDJVoLvSYiR9Vak+c3aUdqPCx9udPP9FYl85vBaQpv94
-TA/dllvfh7TmeUxdUiQY8Y/d7NBprtkcBGn+wcU8eNQ/aR3MwMBhwBkmEB4j
-OxqLgVhsIDJVobPSYiSyHC2eEfJzu1TaXrDCwjYNf+lQzMlPivp8y0o39xXH
-nouJtNB1c8kUx331YvnWpGts/HKakRH/iLQVxAeFJWRmxARHHnrUizGrlQqq
-C8+cyPmpogPUNQpmYKAw6AwTCE8nHYFVyiCLqcAgmQwdK2iEVFBxZEPwx59t
-S9wUFrbjRiemXJR/O3ry267nWn+fe/KL/mHudqpF1F6Ss83ZZuOdyopOzO0a
-+p9/52U+/zwX6a27cKpY3hluC8JHCTYO8ltdSMvZULfNRfxR5SB8st3FOiK7
-tEWEeTBIms9E2NgFhC0PdDCeHJLN0XRPCSXhuIGRxGAzrEB3eSbeEfBaYorF
-BiKTMWMFjemt2GD+ns/gyVNcv9fZPvExxpbPfdVHN8fNfMfq1S+JatO9rIMS
-Ms+Wle1yt12TeZWLaYKoOsXaeF7eyITjtYC0XIiIiYre+W3W3qRtp2pH70OE
-8EpPH8xITty0MoDlsTyd3aV6sRbtvr87+lBlj/xvRTX78Tb0JiIcJzCyGGyG
-Fegwz0Q70kItMcNiDWGqTOaMFXQG6So7e+bx4E6kKPeCxwf+N9Vuo9bPyf/6
-Ul157NSJgbf4mvck4V7Zs9n33TeNAzcnpmQWtAKYXvaUrprudnJwPil5keVk
-HlKMtWKJ9vM4DY2dvQ3fzvO/1KaBsxSFy69fyjN3Hq7HLU+DzbACpuR5QHe1
-pGuLYSXjQL209A1B8Vpr1j/r1Kx4SjuKDl9oEiPNOSxjh2Pktl0TFC2daPZx
-CbC7VVJB2YHoqIT0A0eP7Nm2IT6nTqimAKSC8m8iPFmLVq2PXGhr5/TBvAtc
-wqUCQDjSfJI1yfs6zr6nBpvhoRYYkmcd15LuLJYDKxm7EwDC9Qqk7Zcv/D4+
-+LBHzdRfcDcx+JP45OTk+NWWf5uy4T6ZfdfEdRmzjFxzW8b7bpWw9oDPJIck
-tkCmDeVdW2L6fjjh58eBCCdyMBpAhqXC9lp2SbvKpQ+m5FnntaQrixXASsYA
-iHA9Qsq7nRr+Rd4LtY9mCOtOZLB5g2ccUc3umSZeBR2aLw+inVf8Ta0SSC26
-U0DKzV9oPCn8Vpci4p6yqNl+5xXPu8siWuS4saJ36NOmCqU6ICIcY7QUsMMm
-/fkNGX+a8IcJr8s//MUqrrJPxW/qaYZl40PT5ZQwLxeWk+3Uv/7dLjItr1Gk
-ogmK8sHmWb2hWq8lXHRkMazk8RsrhlGXYUYg5d/d+2nKFa76GZuk8XTMweoh
-h6Wtea7vzcoYXCvDT/VIhFVbrcyCbuBMoIEjYIeaGgUU8hQ/9T1Mcg8+P3Qf
-sK8q3tF38JUq4aMEZz+l2a5a4URHS1TEffGsoaGenWlr4pb7oKGh4VlTR7/y
-Uaa3Ge59kOjqmnC9Q3bRySv0nR1V1qOqAcryKeeZoKHaqCVGWAwrebzGihGo
-zjAj6G/8/sM5yfcEEjn9vNprL8dKRtoufxp+7tVsVFCydKLZcrZ8ZoiX6lHI
-Uu1h6niMxDtQ1Oi+u8LMeNHVTvmstu/RXv85KZVDFS19edbbcUuVrBTQtot+
-zmOvjTCEExstX7WEvXSgvxnuuhlqG3Zt8AoOaclV81QNKPlU8kzQUG3UEiMs
-/h2DreRxGyv0gt6KTVNef22YPxqNfvm0/+Xl/evdjYx9tmY/GzzdiDnndoVb
-vvmGyYep55uF2KkeQ8+9ddOsPtPBrK73Yepck6khSfvS1gd4Rp5oGD5v9pSt
-tZ3/i3ym2lMebb/wSuerSscWziUyWo5A2nE9dtXWSlX1pNcZFj3Z4eSeNXjn
-EuVdD7UJKeSNGUxAyqeQZ8KGgq8lhlg8hKFW8viNFRCMVCsjafw3yyLk1rjP
-3hWddz6582shu7p95KRS8uKok8Uy2WlU0pL30RSb3TWqpqaqwB8tQcHwDIuf
-7nOwirzZhUr5xTvc7ONKuzXLk0byKaCRoWBriUEWU4I5Mpk6VugLRFMt5T+4
-XNzWfjvMIfwGnXLKv7PM3NLT3ds/MGztYpulxKuY6mhJGKZnWP584edeltNm
-2Nh5rz9eo+lbYOTHag2hbijpWmK8xcRgukz6jxV6A9FUC6t3+c50i4yO/7GJ
-3Dd6aAdxbRrLI4vc+xGURkviMDzDVCF9LGsMVUPJ15KBWMxwmQwYK/QFCqmm
-A2hHwQL76Ht0frSc4RmmCnPkk68l5mikBMNlMmCs0BdgqrWNgWfYEOQbgsYB
-g5EJgUAgEAgEAoFAIBAIBAKBQCAQCAQCgUAgEAgEAoFAIBAIBAKBQCAQCASi
-a1CJEIFvW+sL0E3mAr3THjC32kf09HhMaOyeI/vjggICIhMutjD1hXOS6FeN
-GZabWvEO6bh9cMehY18t9wnP5ZBIn5RXvG9DTGJGxkb7933yf98zkEDjOvQO
-M2aAGGJuFYDLcP/LX89ew9iDjhZ0s0OnuWZzEKT5Bxfz4b0npILKH/Or1Wzz
-zXh0XmNaQ7Wb+oS2vet/nrXAe3+deEDEuVr4XKjxEdBXleozZ0dpNyp8vN3J
-81+j9+XBbFx33mHGDBBDzK0CcBmWtl36yCHiRhfNh2akrSA+KCwhMyMmOPLQ
-o97foxXVpLnOyXyqdq9vJqPrGtMiatzUH7TtXd/DL21dvnlG9MtExZz8pKjP
-t6x0c19x7LnsYEFa8xbPCPm5XSptL1hhYZtWO+oAwm6cuHdSQXXhmRM5P1V0
-gDgBYMcMEAPM7VDv4DIsfJRsN+uLB6q2eyIXuTb0yhA+2e5iHZFd2iIanWtJ
-0/dzp68opLyPDK3EKgA79tJKoDo3yUEraQoAnzdR/u3oyW+7nmv9fVGCf3ux
-uad8f1BJ291fm3C2u+h//p2X+fzzXKS37sKp4k5E9udF/zB3O9Uiai/J2eZs
-s/FOZUXniIEOu3GC3kmaz0TY2AWELQ90MJ4cks3R9Ou0lSVjxkweA8ytAu1l
-GO26tdJ8ZtJj5e32yEWuJb0DCK/09MGM5MRNKwNYHsvT2V2v1vyQllNzJ889
-QWYFlGLYYMQqUJYMdOxljJuao/feyeirPro5buY7VonDByrC/WljgP+6nV+n
-H77aihO8qDrF2nhe3sjwRLXpXtZBCZlny8p2uduuybzKHdkGVuMEvUO77++O
-PlQ5uDwtqtmv+ZaeypKxYyaNAeZWgfYyjHYWLjGbFqs8VyEXudb09pSumu52
-slm+z7nkRZaTeUjxiFUF2XzF2djpu+ekzys6FatAWTLIsZdJbmqI3nsno5+T
-//WluvLYqRMDb/E1/FsJ98qezb7vvmkcuDkxJbOglerETDPv0H4ep6Gxs7fh
-23n+l9o0OMFSkazomV+eufNwPa6rBphbBZQzjIGgZIWZ6YdqmyUXuRb0SgVl
-B6KjEtIPHD2yZ9uG+Jy6UXe6hI+Trd4d8kN1RERqTCdiFaiSrFGN0Veg5m6S
-gcne4SHtKDp8oUmMNOewjB2OkdhwR1C0dKLZxyVgbu8Q9k4qKP8mwpO1aNX6
-yIW2dk4fzJMv/BDthKpk2Ym9+SRrkvd1nG0LDTC3Qy1Qz7B6RDW7rN+2V3md
-Ty5yHenturHIyCRE/X1RvBrTldihdlRK1mjspatArVYvlSBp5B02qOBuYvAn
-8cnJyfGrLf82ZcN9jXfcEddlzDJyzW1Re9GlDYS1B3wmOSSxBTLhKO/aEtP3
-w3/rJvi31CUPEDut6HVupcL2WnZJu8pVLCAZVg//TpDRu/NvKueeXFVQqSUF
-JPUKHyVMe8tB/daJ2DWmTbFY5ioYh4OIYW5qgh54hx1p3YkMNm/wpCSq2T3T
-xKugQ8MzFNp5xd/UKoHCIp/mSLn5C40nhd8aerq0pyxqtt95xSsQsnAWOW6s
-6B36tKlCKWVEJGNYI2CHTfrzGzL+NOEPE16Xf/iLVVylqieS9C63stNc0+WU
-MC8XlpPt1L/+3S4yLa9R1QMHFIUPZ3iYMRnuvDLnLZOP2WOPKHJVQamWiOtV
-VVHi+n/OemvG7hqlHBKoMeBiiZpLXDIGuhCobTfHSlNXvUz3Dh9J4+mYg9VD
-g5a0Nc/1vVkZdWJsdUpBVm21Mgu6gbMaBBYBO9TUKKCQp/ip72GSe/D5oZva
-fVXxjr6Db9nJrgWd/ZQmiWolE7UGFXFfPGtoqGdn2pq45T5oaGh41tTRr+yL
-Hua290Giq2vC9Q7Z3IlX6Ds7qqxHVQOUhQ9leARjMtx10/8do8A7Y2+tkKsK
-CrWEoxe3okRPtk9/y/ZAg9LoRKDGgIslZi6OZA0tHleB2nZztDT11ct07/BA
-2i5/Gn7u1QKLoGTpRLPlgxeBxCwYCszD1PGY1t4cVEn33RVmxouuyh/6R/se
-7fWfk1I5lAPpy7PejluqZFlD2y76OY+90MeQrIk1A7iLYPqY266bobZh1wYv
-c5CWXDWPoQARjkNfZZzFW87ZnDFLg+SqgnQt4erFrShBUYjxO35XO9XpxKox
-0GIJmYsrWUOLx1Og1t0kjl54p5L+l5f3r3c3MvbZmv1s8Jwr5pzbFW755hsm
-H6aebxYSsUBBz71106w+U7kIpEV6H6bONZkakrQvbX2AZ+SJhuHLhp6ytbbz
-f5FP6nrKo+0XXhnxuhm2ZC5xawaRdlyPXbW1UlVt6WluRU92OLkrbgSgvOuh
-NiGFvDGFB0w4DmhHgb+RmfK6MpmqIPtX+HpxK0pUk2r91uw99WrfCcWoMdBi
-8c0lIllTi8dRoNbd1AR98I4EuBYMI2n8N8si5Na4LtMM9dz55M6vhezq9pET
-TMmLo04Wy4oEA5KWvI+m2KhYtlYDUWuow9jcip/uc7CKvNmFSvnFO9zs40q7
-NcsQceG4IJwf3IxmpKpwl1xVgK0lBbgVJW095/nu1C8ekr9qACiWqrkKAFqs
-PlR6uqkpeu+dMoQskPIfXC5ua78d5hB+Q1tDsMbw7ywzt/R09/YPDFu72GYp
-8SEZjDUEYG5uZRPoXz73spw2w8bOe/3xmj4N46J4XI8JhfPDHFNHoq8SkqsK
-0rWkAK+i0M6rQWZWW6pAz0VJhk3NXAVALVYLLd0Eg357R0idsHqX70y3yOj4
-H5uAvIwOAnFtGstD/QObWICwhgiMzS1VKB7XY5B2FCy1YH1L6HvVyFUFhVpS
-gF1RaOeVJeYuB5Vv11OEctgUAGuxGmjpJhj02ztdqqME2lGwwD76HvjHzMHB
-2NxSBbhwUXWai30SgRVgclWh5VpCWs7Mt4m8DnwqqstDYFxqm5ZugkG/vWOE
-BQzFYHOrBeFoFzv1y+PPGfnd8tLOW9u3nKX0RYG0w2BrWw+A3kEgEAgEAoFA
-IBDG8v//qjde
- "], {{0, 76}, {541, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{541, 76},
- PlotRange->{{0, 541}, {0, 76}}]], "Output",
- ImageSize->{545, 76},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellLabel->"Out[31]=",
- CellID->1419688678]
-}, Open ]],
+Cell["As expected:", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"dif2", "=",
- RowBox[{"symfun", "[",
- RowBox[{"dif1", ",", "A"}], "]"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[32]:=",
- CellID->2122973606],
+ RowBox[{"dif1", "//", "FCCanonicalizeDummyIndices"}]], "Input",
+ CellLabel->"In[25]:="],
Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQlUU1f+x1vnP+3/TM+cmTNdKCDWiijiwk5kU+Eg4AYDhRaqHkTQ08Eq
-SmmL8mdRFBnLqLhUqzjTUSqoSAUdO5SKiArEAooIsooCIRKWkLAkIS/PfwJU
-A0nenuQluZ9zOgdGcu/v+/v+3n3v3vde7ocbowM3T3vttde++F/p/wSGf+0R
-ExO+86P/kf7iuTN208bfSX9YI/1v9PXXXpP9/AIAAAAAgAng4YasWNeFK69y
-JNoORQrEqy269P33Pz0fpbhhTDLV1jsdAEZroHdDgF6FJAdtA6MT4vZMN8bf
-m0XajmMMmPdrtLX7ORZEectYZKqvdzoAjNZA74YArQpJHtoGRh+4NwNsN/46
-qO0wxhF3nHF3Sm0SUt8yFpnq6x0bsFgAwWprHRitgd6xoV6j1Q3mQtK0TFpV
-OC0ZefS1o8/FX/9z9lDsCkbwyTYCJ0ao786xPcfP/H2tV1gOS0woilFWQeJn
-MSmH9q4zn/NZ9RCBFiTc8sNboxPS07fZfeCVrzCZQ5Sp5t6R8iN8cjY6JObg
-qSOx/r6+EfFX2cTyhwFgtGEYjZIf8i0gZlhz9awIBRWu50Cd/3abF5Kc0zoC
-dee5WQSW8fG2MPosc6XnkRbRCyHrRvEzAYFzOcyv+MLF99sWIcwr22ATcKMf
-fxsjdaleS/ZUDsKCx7sd3f/ZMbXGEGSqu3fE/AwyQ+Y4Z7EgqOuHxeYB+JOP
-HWC0QRiNlh/yLSAWkubqWRHyFa73DJQGznI43Co9DQ7e22Ttnd2FdylTekK1
-WfztUxL3u8Ssc57z15cOwNDz3DXmbhhCELHyEyO/3LnexXXdmWfS0KXurpkf
-9N9eiaS3cN1smzTFlTvVMtXdO3J+oJ7COP/Q+Iz06ICI4/XDapz2AqMNwGj0
-/EyFygy/wCNTwm8svnQu+6eaPqqu/klXuF4B8+5EzXzH+XK33NRMUB9vbS+7
-rwGxc0NcdpTx0MpQoRHenTXm7gUc+IW4594vnRhWQhVa4JcFzna99FzUW3Y2
-3pGxv+pB3QBiAYw++87DfMUVDjTcUnChvF/qKa/sr+YuF9jC3orsZCfrbXdr
-a/onH3QIMtXdO3J+BA27F1uFZ1WyhRQe/8BoQzUaNT8kNb5AKySMMsVdl8Kt
-bX1D1/rZG88MymLhvYSgpML1mpHG0ztiF7xrmfBY8PL/g9gF4dGRUXtPZB5K
-TL7QPIKaIMVGIM5P23x9Ptv7zYGTN7oxuKbYgrAl3dNq1dfp55mV+9wdth2/
-04d4UhY2plgZL8uTN1rYfMDDyj8+I7eqap+rzaaMG5zJgSDJVHfvSPmBuJUX
-j6UnJWxf78twW3uAOUDJo2PAaIM1Gi0/ZDWiFBJGmfDgg/1Rx2uHZJ8VNh1Z
-6vB/9QKlf4hdOIEK12dGWfnfXGupjrGY7nebp71GSLYg5hQd3LH8vbeM/XYk
-pGQUdmvwFpAaeh+q3DDP5fzYhFPcnuloHlROwUojMJo8WjUa5lVn7D3Zijr+
-0S/D+OoZHuWy2jr6h9tOLPO51oNjcKakwvUZSV/ZyYJOEdSVzTC2P9NOzFny
-jVARBr8seLrZpxVaugNDae8SftXRqMj4A0dPnzqYvDUuu4XInc8pTQKjqUF7
-RkNd5xkzPEsGUJqkYYYxy5Twq78Nd2es3rAlYpWNreOHy2QLYFg7oaLC9RmY
-fy8h4G9xSUlJcRvn/nnW1gfDWmmEkjBELekLjZxz2Nq5A6Pd3lEBRlOFFnvH
-MtrrdIYFzUe9ZtgnMvnSER7m3gw0/SAM8zPylAjXawQt59KZ3LGTp7Bp/wIT
-j8I+/NeQ5BvB0oJE0NvMrOhVvdgI9xf5mFrG41znowqt9M5nhs74w5vy/NEy
-tnZEyV8Co6lCu0b/ftrr094gazRdMyzh5K8ynhF2e2A84qGqyEXeV8af6ZdG
-tNphW83wxE/baxSGcpLFif1Q0lXEHRejjzVOWCrpznN+f2F6i+yxKvTcUtmI
-yhak1xid11NCPRYzHG0s/vQX24i0vA7VD3wI6nZZmvnfQpnmqgut9A4LOe1P
-2+R52tk3qljkwGjq0KbRrcwMGxOXnIf4jdaJDPOZIaZGvsXc8d9GHiW6BlyZ
-uE08UhfnsHzsbS5BfbyTt8LyDunixHoo6SpQz/XPwy6/mqzxK4Knm61lyiZO
-aLmlshGEFoYfJjg7x5fIHpDgFi9fFFmF9Iaj1GI3U4czBN4ZoQLt9o4MMJpC
-tNo7ykqOrmd48N46M+PVY6+2wSP1h3yWpNROjM2S57meDjvrpKM53HPV22nq
-rIOSCtdfRp9fP7LF1cjYa1fW07FTvIh1eV/Y3LfeNPko9UqXADm31DWC3AKn
-NMQm9ObY5Axi56A9jDV0/7M5ll9oa+6l3d5VA4ymGK32Lukridmwq1bZSK0X
-GR5+lLrUxCIo8XDaFl/3iHNtL2cfQ1WbbVb8LFuaGaqOsltVJPeuMyUVbsgg
-5FaDjQgb9ji6Zo7dWYe5JSHWQcVchCbEHf9izA66raXpvXZ7JwwwGi+6abQO
-ZVjc33D3l2JmY6/8Koq4/bTj7I/L+C/E7LxPZlnvx/6ddZRUuF5DPLeUNiJ6
-ctjeMqJ0AJbwyve42MVWDip3SsJ7eL28p/dOqH3YLaQiVg/a7Z0cwGgc6LLR
-upFh1fDufmw+193V08cvdPMa62DsJyJKKly/IZxbihuBen7+0mPunPnWtp5b
-zjapfANO0Lhv+QKXiKi4Hzu1sAOFdnsnBzAaB7pstG5kWCWi5jSGWyaR5+cp
-qXC9hnhuqW4EoFaA0QBdAO4rXGkXdZ/A4/OgONEgnluqGwGoFWA0QL8BxQkA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADB04OGGrFjXhSuv
-cijZz5M6aBsYXmguhObhYYe2QmgbGOXQViltA9M44vZMN4ZsQ3m6QdvA8EJz
-ITQPDzu0FULbwCiHtkppG5iG4d4MsN2IZT8zWCyANPlVT5gDozu0zfA4IM/q
-Rm8yjAqwgBQSbvnhrdEJ6enb7D7wyicyEUFpYeTR144+F3/9z9lDsSsYwSfb
-Jp39hE/ORofEHDx1JNbf1zci/ipbg1+ZgRgYhRhuhjGERyGGm2dNZRgVYIHW
-LUBipC7Va8meykFY8Hi3o/s/CeyGg9YC1Plvt3khyTmtI1B3nptFYBlf7h8H
-mSFznLNYENT1w2LzgEn/pHYQA6MOA84whvCow4DzrKEMowIs0LoFSEgjWzM/
-6L+9Eklv4brZNmnoq04iVn5i5Jc717u4rjvzTISlhYHSwFkOh1tFsn3ONll7
-Z3dBcv8I9RTG+YfGZ6RHB0Qcrx9GmHlJ+I3Fl85l/1TTR9UJGzEwqjDoDGMI
-jyoMOs8ayTAqwAK1WyDh15zaGvDpF8kJ20ND99zqR+wE5t2JmvmO8+Xu3+ZH
-vLK/mrtcYAt7K7KTnay33a2t6Uf82uzRZ995mK+4woGGWwoulMs6Q21BUB9v
-bS+7eQGxc0NcdpTxJpkgaNi92Co8q5ItRFxiE3ddCre29Q1d62dvPDMoi4X3
-u70VhKMGRhCDzfA4IM86XclgMMGCxopcgeGarebve42dSUSth5zsEh4jbOs4
-0nh6R+yCdy1f/ZGw+YCHlX98Rm5V1T5Xm00ZNziI0oWNKVbGy/LkZaK1ALEL
-wqMjo/aeyDyUmHyhefI2DRC38uKx9KSE7et9GW5rDzAHlK/zwYMP9kcdrx2S
-fVbYdARt004swlECI4rBZngckGedrmQwmGBBY0WuCDRQlXvp8di2ZjCnwO1D
-n1KVm7+MsvK/udZSHWMx3e82D39PYk7RwR3L33vL2G9HQkpGYTcFU6Chyg3z
-XM6PzXnE7ZmO5kHlSItd8CiX1dbRP9x2YpnPtR4c+SQpXHYyr87Ye7IVtSgM
-NsPjkM6zhjrS3TyruZLBYIKOxoocBX75ZivGP1pULJZJ+spOFnSKoK5shrH9
-GWKbxfDLgqebfVpB2f0HCb/qaFRk/IGjp08dTN4al90iUJF2Cb/623B3xuoN
-WyJW2dg6frisgIPZIAqEQ13nGTM8S1A2UTPYDE+0QIF8jXWkk3nWWCW/AIOJ
-qk40VeTIQD0/f+X96bFHQ8oDh/n3EgL+FpeUlBS3ce6fZ219QGS3GFFL+kIj
-5xy2pm8BCZqPes2wT2Typdpg7s1A0w/CMD/WSolwLMeIAWRYIuhtZlb0Kp2e
-UyIfCwaQZ+VorJLBYKIKjRU5IhLundSwr/LaVd4DF7ScS2eOb1EvbNq/wMSj
-sA//yhLcX+RjahlPaEGXBBJO/irjGWG3B8YjHqqKXOR9ZfwxXGlEqx221QxP
-/LS9RiH7WIQjDGJ8ZuiMP7wp5ffTXp/2huyHP1rG1o4o+Us9zbD0qOy8nhLq
-sZjhaGPxp7/YRqTldQiVNEFS/ss8v4RMnpHOSmPQL8/UVDIC2CsZDCbqHkxQ
-ixxJAO/eoc9TijiqZxXijovRxxon8irpznN+f2H62BwNXaA8grpdlmb+tzS9
-KTyfGWJq5FvMHf9t5FGia8CViTs7I3VxDsvHXsAQ1Mc7eSvMyFQKxzqIwUJO
-+9O2tlZmho2JS87Dtra2p519o4q1rbcZHn6Y4OwcX9InvQLjFi9fFFk1pKwB
-0vIn8iwHzjxjNXQc+uWZcCXjzDBaJYPBRO2DCWqRIzDa8f1HS5Lu88UyRrnN
-N59P7Qjquf552OVXMyZ+RfB0s7XMQQwCJyEV6GbqcIbAGxPkGLy3zsx49Y1+
-2cxrpP6Qz5KU2ok6kjzP9XTYWSc1AO656u009UIBQTi2QexVS8jzX/3N8EBp
-iE3ozbHLGYido+LxBarko0KVofTLM/FKxplh5EoGg4kGBhMSDNdsn/XGay/5
-ndHkN8hGn18/ssXVyNhrV9bTMeNErMv7wua+9abJR6lXugTIAqcwdP+zOZZf
-4J15UMDwo9SlJhZBiYfTtvi6R5xre1mBQ1WbbVb8LJtNDVVH2a0q6n9VX8jC
-OVgGMTkkfSUxG3bVKnNRrzMsbNjj6Jo5di8K5paEWAcVc6ccwlTKR4RKQ2mX
-Z+KVjDfDCJUMBhPNDCbaAkGgIuKOfzFmB93W9NRrovP+hru/FDMbe+UnPuL2
-046zP5YWpJid98ks6/1Nqqfuk0EfxKhCxzMsenLY3jKidACW8Mr3uNjFVg7i
-yxMu+STAZyj98ky4kjWWYYoj0SMLNDeYkAOrQAnv4fXynt47ofZht+ikhHf3
-Y/O57q6ePn6hm9dYB2OvHbKDGGZ0PcOyhzO+9Jg7Z761reeWs0143xkhPojh
-BKuhdM0z4UrWWIYpi0TvLNDYYEISrAIFjfuWL3CJiIr7sZPY6/TqQdScxnDL
-JPbUMalBDDs6nmGyED6CcIPRUJrmmXglay7DVEWidxZobDAhBwmBdADuK1xp
-F3VfK0+8YkTHM0wWA5ePGeKVTJ8M0ycSQujAYEIOvReodQw8wwYuXwPQJ8P0
-iQQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgF/BwQ1as
-68KVVznK94HUMjQPDwAAAHQHcXumG0O23zo9oXl46gQWCyCavsoNwA1wE6B9
-uDcDbDdi2e5LO+WKOTy9QPjkbHRIzMFTR2L9fX0j4q+ydfVtdoLo15BoWG7q
-l3daQcItP7w1OiE9fZvdB175RNYzUFoYefS1o8/FX/9z9lDsCkbwybZJF9Ha
-L1fE8PAw+vyX3JsIu/rQgkFmyBznLBYEdf2w2Pzl95NL+LU/5jeq2GZU59F+
-jakL5W7qE/rrnTYYqUv1WrKnchAWPN7t6P5PApvFoLUAdf7bbV5Ick7rCNSd
-52YROKkmtV+uiOHhQNJz7RP78FsDNB8xoZ7COP/Q+Iz06ICI4/XDv0UrbEpz
-XpLxRC9Xs7RfY2pDhZv6gx57p3mkA9ya+UH/7ZVIegvXzbZJQ1+8FrHyEyO/
-3LnexXXdmWciLC0MlAbOcjjcKpJtA7bJ2ju7S34XeezlKuE3Fl86l/1TTR+1
-Z3fE8LAjqE+yXfjVQ6XbNhOKXE16BQ27F1uFZ1WyhZNzLe78fum8dcWkd7ug
-ldhxqB0SaSVQlZvEoJW0cfT+dKZGYN6dqJnvOF/u/m2xhVf2V3OXC2xhb0V2
-spP1tru1Nf2I3yo9+uw7D/MVVzjQcEvBhfJ+CEMLgvp4a3vZPVCInRvisqOM
-N8kxjOUq7roUbm3rG7rWz954ZlAWi9hXXyvIRw0Pc8sDt9ebL0h8rLgHGbHI
-1aUX4lZePJaelLB9vS/Dbe0B5sCrTEDsC0tnLj3HInPIalPsOEotpm5I1Bk3
-8aP33hkaI42nd8QueNcy4eWoJGw+4GHlH5+RW1W1z9VmU8YNDqJdwsYUK+Nl
-efJ2oLUAsQvCoyOj9p7IPJSYfKF58pf5YyxXePDB/qjjtWPLysKmI0S3dlSU
-jxIeZuD+4kCzOTGKV/bEIleb3qHKDfNczo/NXsTtmY7mQeVyU2Pp1b2TseN3
-zwgP91oVO44SiykcEnXJTZzovXeGxigr/5trLdUxFtP9bvPwf1zMKTq4Y/l7
-bxn77UhIySjspmDahq9c4VEuq62jf7jtxDKfaz24h2WS8hHhV6wzM/1IZbPE
-IleDXgm/6mhUZPyBo6dPHUzeGpfdIpBvVvA4yfK9CT+UR8Srzth7shX5gNaK
-2HGUScZVY/QViN9NIuiydwA5JH1lJws6RVBXNsPY/gyxTWT4ZcHTzT6toCzl
-mMtVwq/+NtydsXrDlohVNraOHy4r4OAsKirkq0TYtM/qHTulV8XEIteS3oFb
-q41MglTfCoO6zjNmeJao3O5OW2In2lEqGdeQSFeBaq1eMkHSyDvAS2D+vYSA
-v8UlJSXFbZz751lbHxDZRUbUkr7QyDmHTew2JnEEzUe9ZtgnMvmwbNv2m4Gm
-H4QpeTpeIuhtZlb0Kl2JokS+anh3/Y3eW1GqOEhgi5yaT8lDUK+gPn7O2/aq
-95NDHgzVKRbJ3HEosVh7ApFQc/USD5JW3gF+Q9ByLp05voO7sGn/AhOPwj78
-Z0m4v8jH1DKexMocISSc/FXGM8JuTzzaOFQVucj7ym/P9Is6r6eEeixmONpY
-/OkvthFpeR3KtrInKZ/PDJ3xhzfl+aNlbK3cGn1/0ZK3TT5lTi10hMiluVzt
-sK1meOKn7TXDJD+FW6+yY1DU+o+Fb8/f36SQw5cZ+P2016e9oSQDahCL1Vzs
-khHQhkB1uzlVmqrq1XXvAJMQd1yMPtY4MUhLuvOc31+Y3iJ7UBJrvY0jqNtl
-aeZ/S9Pb1vOZIaZGvsXc8d9GHiW6BlyZuE08/DDB2Tm+pE862eAWL18UWTWk
-rAHS8mEhp/1pmzxPO/tG5QpyoNTnXSO/u1OX7REiH6mLc1g+9h6a9HrayVt+
-/kvsU1j0oh6Dwobd8962OdqmMGhMZKCVmWFj4pLzUDEDahCLzVwUyTgt1qhA
-dbs5WZrq6tV17wByQD3XPw+7/Gr5hV8RPN1s7diFKLZ6m0BqhJupwxkCr1+R
-Y/DeOjPj1TdkD4LDI/WHfJak1E7YPlAaYhN6c+yiAGLnqHgggCr5SIzUxs5+
-2ymLNWWJS3Xkkue5ng4766Thwj1XvZ0mzZeIfQqLXtRjkF8WZPyu941+VTqR
-FjqoFovJXFTJOC3WpEC1u4kdvfAOMPr8+pEtrkbGXruyno6d90Wsy/vC5r71
-pslHqVe6BFjq7SVD9z+bY/lFrbLXh9TL8KPUpSYWQYmH07b4ukeca/vtAkbY
-sMfRdXyRGeaWhFgHFXOn1AOV8pGA+wp9jMwU1yxVRS6d9W62WfGzbL46VB1l
-t6po0jtNxD6FrpeDdgwKm1Kt3l50sFXlG3aSvpKYDbtqlQ8r1IpFNxeLZLwW
-a1Cg2t3Egz54B0AGtd7kEXf8izE76Lam13EmOu9vuPtLMbOxV34GKnpy2N4y
-onQAlvDK97jYxVYO4jv545KPDMT6wcVofqrigrfyyMXtpx1nf1zGfyFm530y
-y1pxoZzYp5BBPQYl3Zfd37P46hHx8zmFYsmaOw6FFqsOlZ5u4kXvvTNwsNab
-hPfwenlP751Q+7BbJEuKWqCen7/0mDtnvrWt55azTXhfjCJ5uE0JhfXDElMH
-rG8m8e5+bD7X3dXTxy908xrrYIynUGKfegnaMQj33/A3s9xZR/XkjWDY5Mwd
-h1KLVUJLN6lB770zHLBaKWjct3yBS0RU3I+dZN6LphskD7cpSPoKg2czTjzF
-kiFRcxrDTfVzjpR+Sg7kYxDuLwo0X3xM8Q4tSUiHTQJqLVYBLd2kBr33znDQ
-ppU0gHL5wsa0xXaJGFYX4b7ClXZR93E+YUDsU5iB2JdWWEeUUD53U3PYiGik
-wmnpJjXovXeGg07Um/pQg3x4gJn69dlnOvmlwZL+27t35pL6TivaYeAVrtMA
-7wAAAAAAAAAAAIA+8v/olO1t
- "], {{0, 77}, {506, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{506, 77},
- PlotRange->{{0, 506}, {0, 77}}]], "Output",
- ImageSize->{510, 77},
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellLabel->"Out[32]=",
- CellID->1594533498]
+ CellLabel->"Out[25]="]
}, Open ]],
-Cell["quod erat demonstrandum.", "Text",
- CellTags->"FunctionalD",
- CellID->927805887],
+Cell["Finally, unset the commutator of the bosonic fields.", "Notes"],
Cell[BoxData[
RowBox[{
- RowBox[{"Unset", "[",
- RowBox[{"s", "[", "\[Phi]", "]"}], "]"}], ";",
- RowBox[{"Unset", "[",
- RowBox[{"S", "[", "A", "]"}], "]"}], ";",
- RowBox[{"Clear", "[",
- RowBox[{
- "Ag", ",", "F1", ",", "F2", ",", "t1", ",", "t2", ",", "t3", ",", "t4",
- ",", "F", ",", "r1", ",", "r2", ",", "r3", ",", "r4", ",", "symfun", ",",
- "twof", ",", "twofnew", ",", "w0", ",", "w1", ",", "w2", ",", "dif1", ",",
- "dif2", ",", "dif3"}], "]"}]}]], "Input",
- CellTags->"FunctionalD",
- CellLabel->"In[33]:=",
- CellID->1348622684]
+ RowBox[{
+ RowBox[{"UnDeclareCommutator", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{"aaa___FCPartialD", ",", "A", ",", "bbb__"}], "]"}], ",",
+ RowBox[{"QuantumField", "[",
+ RowBox[{"ccc___FCPartialD", ",", "A", ",", "ddd__"}], "]"}]}], "]"}],
+ "=", "0"}], ";"}]], "Input",
+ CellLabel->"In[26]:="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -5245,9 +5132,7 @@ Cell[TextData[{
ButtonNote->"QuantumField"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"FunctionalD",
- CellID->2077547280]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -5255,7 +5140,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"FunctionalD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -5264,26 +5149,26 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 26.222823}",
+ "built" -> "{2020, 1, 5, 18, 58, 8.880315}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "FunctionalD[expr, {QuantumField[name, {mu}, {a}][p], ...}] calculates \
-the functional derivative of expr with respect to the field list (with \
-incoming momenta p etc.) and does the fourier transform. FunctionalD[expr, \
-{QuantumField[name, {mu},{a}], ...}] calculates the functional derivative and \
-does partial integration but omits the x-space delta functions. FunctionalD \
-is a low level function used in FeynRule.", "synonyms" -> {}, "title" ->
- "FunctionalD", "titlemodifier" -> "", "windowtitle" -> "FunctionalD",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/FunctionalD"},
- "SearchTextTranslated" -> ""},
+ "FunctionalD[exp, {QuantumField[name, LorentzIndex[mu], ..., \
+SUNIndex[a]][p], ...}] calculates the functional derivative of exp with \
+respect to the QuantumField list (with incoming momenta p, etc.) and does the \
+Fourier transform. FunctionalD[expr, {QuantumField[name, LorentzIndex[mu], \
+... SUNIndex[a]], ...}] calculates the functional derivative and does partial \
+integration but omits the x-space delta functions.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "FunctionalD", "titlemodifier" -> "",
+ "windowtitle" -> "FunctionalD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/FunctionalD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -5291,8 +5176,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -5301,599 +5187,365 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3956, 107, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6889, 209, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1338673316]},
+ CellID->1785706472]},
"FunctionalD"->{
- Cell[4567, 134, 631, 21, 57, "Text",
- CellTags->"FunctionalD",
- CellID->2064540691],
- Cell[5223, 159, 246, 7, 27, "Input",
+ Cell[8185, 262, 246, 7, 27, "Input",
CellTags->"FunctionalD",
CellID->622999086],
- Cell[5472, 168, 212, 7, 36, "Output",
- CellTags->"FunctionalD",
- CellID->149077150],
- Cell[5721, 180, 271, 8, 27, "Input",
+ Cell[8434, 271, 192, 6, 35, "Output",
+ CellTags->"FunctionalD"],
+ Cell[8663, 282, 271, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->272557122],
- Cell[5995, 190, 273, 10, 36, "Output",
- CellTags->"FunctionalD",
- CellID->85429466],
- Cell[6283, 203, 1194, 41, 92, "Text",
- CellTags->"FunctionalD",
- CellID->412822781],
- Cell[7502, 248, 316, 9, 27, "Input",
+ Cell[8937, 292, 254, 9, 37, "Output",
+ CellTags->"FunctionalD"],
+ Cell[10543, 352, 316, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->1655052767],
- Cell[7821, 259, 379, 14, 48, "Output",
- CellTags->"FunctionalD",
- CellID->1642735326],
- Cell[8215, 276, 798, 25, 36, "Text",
- CellTags->"FunctionalD",
- CellID->726694991],
- Cell[9038, 305, 690, 23, 45, "Input",
+ Cell[10862, 363, 358, 13, 45, "Output",
+ CellTags->"FunctionalD"],
+ Cell[12007, 405, 611, 20, 45, "Input",
CellTags->"FunctionalD",
CellID->593299923],
- Cell[9731, 330, 1010, 37, 62, "Output",
- CellTags->"FunctionalD",
- CellID->423622231],
- Cell[10778, 372, 236, 7, 27, "Input",
+ Cell[12621, 427, 1018, 38, 56, "Output",
+ CellTags->"FunctionalD"],
+ Cell[13676, 470, 202, 6, 27, "Input",
CellTags->"FunctionalD",
CellID->1102630385],
- Cell[11017, 381, 835, 34, 42, "Output",
- CellTags->"FunctionalD",
- CellID->264301886],
- Cell[11867, 418, 509, 16, 44, "Text",
- CellTags->"FunctionalD",
- CellID->820504742],
- Cell[12379, 436, 117, 3, 32, "Text",
- CellTags->"FunctionalD",
- CellID->883647128],
- Cell[12521, 443, 333, 9, 27, "Input",
+ Cell[13881, 478, 775, 31, 42, "Output",
+ CellTags->"FunctionalD"],
+ Cell[15331, 538, 333, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->575936469],
- Cell[12857, 454, 1688, 74, 44, "Output",
- CellTags->"FunctionalD",
- CellID->1550678993],
- Cell[14582, 533, 334, 9, 27, "Input",
+ Cell[15667, 549, 1719, 75, 43, "Output",
+ CellTags->"FunctionalD"],
+ Cell[17423, 629, 334, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->1966798854],
- Cell[14919, 544, 1688, 74, 44, "Output",
- CellTags->"FunctionalD",
- CellID->1803724780],
- Cell[16644, 623, 234, 9, 27, "Input",
+ Cell[17760, 640, 1719, 75, 43, "Output",
+ CellTags->"FunctionalD"],
+ Cell[19516, 720, 234, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->733226876],
- Cell[16881, 634, 3703, 147, 62, "Output",
- CellTags->"FunctionalD",
- CellID->1499967078],
- Cell[20599, 784, 581, 14, 96, "Text",
- CellTags->"FunctionalD",
- CellID->1999439773],
- Cell[21183, 800, 1425, 50, 36, "Text",
- CellTags->"FunctionalD",
- CellID->1758153070],
- Cell[22611, 852, 464, 14, 35, "Text",
- CellTags->"FunctionalD",
- CellID->833531771],
- Cell[23100, 870, 249, 8, 27, "Input",
+ Cell[19753, 731, 3798, 150, 56, "Output",
+ CellTags->"FunctionalD"],
+ Cell[25727, 958, 249, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->371171043],
- Cell[23352, 880, 426, 18, 41, "Output",
- CellTags->"FunctionalD",
- CellID->2026389295],
- Cell[23815, 903, 185, 6, 27, "Input",
+ Cell[25979, 968, 405, 17, 38, "Output",
+ CellTags->"FunctionalD"],
+ Cell[26421, 990, 159, 5, 27, "Input",
CellTags->"FunctionalD",
CellID->2041925168],
- Cell[24003, 911, 3825, 164, 49, "Output",
- CellTags->"FunctionalD",
- CellID->930168027],
- Cell[27843, 1078, 140, 4, 32, "Text",
- CellTags->"FunctionalD",
- CellID->133774632],
- Cell[28008, 1086, 196, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1339957551],
- Cell[28207, 1094, 3824, 164, 49, "Output",
- CellTags->"FunctionalD",
- CellID->22832846],
- Cell[32046, 1261, 311, 9, 54, "Text",
- CellTags->"FunctionalD",
- CellID->1685160773],
- Cell[32360, 1272, 542, 17, 46, "Input",
+ Cell[26583, 997, 3236, 139, 46, "Output",
+ CellTags->"FunctionalD"],
+ Cell[33994, 1313, 541, 17, 46, "Input",
CellTags->"FunctionalD",
CellID->324247296],
- Cell[32927, 1293, 249, 8, 27, "Input",
+ Cell[34560, 1334, 248, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->659226066],
- Cell[33179, 1303, 525, 23, 40, "Output",
- CellTags->"FunctionalD",
- CellID->1252480273],
- Cell[33741, 1331, 260, 8, 27, "Input",
+ Cell[34811, 1344, 503, 22, 40, "Output",
+ CellTags->"FunctionalD"],
+ Cell[35351, 1371, 259, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->2097130638],
- Cell[34004, 1341, 558, 24, 40, "Output",
- CellTags->"FunctionalD",
- CellID->122288557],
- Cell[34599, 1370, 599, 17, 45, "Input",
+ Cell[35613, 1381, 537, 23, 40, "Output",
+ CellTags->"FunctionalD"],
+ Cell[36187, 1409, 599, 17, 45, "Input",
CellTags->"FunctionalD",
CellID->1711609273],
- Cell[35201, 1389, 3305, 143, 62, "Output",
- CellTags->"FunctionalD",
- CellID->325352248],
- Cell[38543, 1537, 204, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1021322617],
- Cell[38750, 1545, 1629, 72, 43, "Output",
- CellTags->"FunctionalD",
- CellID->1748319521],
- Cell[40416, 1622, 372, 12, 27, "Input",
+ Cell[36789, 1428, 3435, 146, 56, "Output",
+ CellTags->"FunctionalD"],
+ Cell[42436, 1672, 372, 12, 27, "Input",
CellTags->"FunctionalD",
CellID->2111632726],
- Cell[40791, 1636, 1503, 66, 43, "Output",
- CellTags->"FunctionalD",
- CellID->1369525226],
- Cell[42309, 1705, 290, 10, 36, "Text",
- CellTags->"FunctionalD",
- CellID->1366711149],
- Cell[42602, 1717, 119, 3, 32, "Text",
- CellTags->"FunctionalD",
- CellID->1672341951],
- Cell[42724, 1722, 187, 5, 52, "Text",
- CellTags->"FunctionalD",
- CellID->680079191],
- Cell[42936, 1731, 125, 4, 27, "Input",
+ Cell[42811, 1686, 1508, 66, 40, "Output",
+ CellTags->"FunctionalD"],
+ Cell[44941, 1780, 125, 4, 27, "Input",
CellTags->"FunctionalD",
CellID->1996431184],
- Cell[43064, 1737, 3703, 147, 62, "Output",
- CellTags->"FunctionalD",
- CellID->745422332],
- Cell[46804, 1889, 214, 7, 27, "Input",
+ Cell[45069, 1786, 3799, 150, 56, "Output",
+ CellTags->"FunctionalD"],
+ Cell[48905, 1941, 214, 7, 27, "Input",
CellTags->"FunctionalD",
CellID->1238326201],
- Cell[47021, 1898, 25606, 1105, 356, "Output",
- CellTags->"FunctionalD",
- CellID->1475699650],
- Cell[72642, 3006, 248, 6, 52, "Text",
- CellTags->"FunctionalD",
- CellID->1367707502],
- Cell[72893, 3014, 366, 7, 92, "Text",
- CellTags->"FunctionalD",
- CellID->1173793345],
- Cell[73262, 3023, 150, 5, 27, "Input",
- CellTags->"FunctionalD",
- CellID->62943147],
- Cell[73415, 3030, 2602, 68, 168, "Input",
- CellTags->"FunctionalD",
- CellID->915301036],
- Cell[76042, 3102, 188, 6, 27, "Input",
+ Cell[49122, 1950, 26569, 1132, 392, "Output",
+ CellTags->"FunctionalD"],
+ Cell[90496, 3700, 174, 5, 27, "Input",
CellTags->"FunctionalD",
- CellID->832685091],
- Cell[76233, 3110, 13327, 580, 209, "Output",
- CellTags->"FunctionalD",
- CellID->1392722087],
- Cell[89597, 3695, 183, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->706809486],
- Cell[89783, 3703, 7200, 318, 92, "Output",
- CellTags->"FunctionalD",
- CellID->333585110],
- Cell[96998, 4024, 233, 9, 32, "Text",
- CellTags->"FunctionalD",
- CellID->2140946790],
- Cell[97256, 4037, 335, 12, 29, "Input",
- CellTags->"FunctionalD",
- CellID->1693929986],
- Cell[97594, 4051, 3083, 135, 62, "Output",
- CellTags->"FunctionalD",
- CellID->115691573],
- Cell[100714, 4191, 667, 21, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1865190780],
- Cell[101384, 4214, 1531, 70, 44, "Output",
- CellTags->"FunctionalD",
- CellID->602569188],
- Cell[102952, 4289, 174, 5, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1416466041],
- Cell[103129, 4296, 4247, 78, 71, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1902982577],
- Cell[107391, 4377, 152, 5, 32, "Text",
- CellTags->"FunctionalD",
- CellID->1808944377],
- Cell[107568, 4386, 98, 3, 27, "Input",
- CellTags->"FunctionalD",
- CellID->819260412],
- Cell[107669, 4391, 1502, 66, 43, "Output",
- CellTags->"FunctionalD",
- CellID->908387761],
- Cell[109208, 4462, 817, 22, 62, "Input",
+ CellID->1144637557],
+ Cell[90673, 3707, 5717, 235, 91, "Output",
+ CellTags->"FunctionalD"],
+ Cell[98157, 4026, 845, 23, 62, "Input",
CellTags->"FunctionalD",
CellID->611111290],
- Cell[110028, 4486, 1571, 65, 49, "Output",
- CellTags->"FunctionalD",
- CellID->849746209],
- Cell[111636, 4556, 157, 5, 27, "Input",
+ Cell[99005, 4051, 1592, 65, 46, "Output",
+ CellTags->"FunctionalD"],
+ Cell[100634, 4121, 157, 5, 27, "Input",
CellTags->"FunctionalD",
CellID->1841998165],
- Cell[111796, 4563, 4685, 189, 51, "Output",
- CellTags->"FunctionalD",
- CellID->421326563],
- Cell[116518, 4757, 223, 7, 27, "Input",
+ Cell[100794, 4128, 4463, 175, 72, "Output",
+ CellTags->"FunctionalD"],
+ Cell[105294, 4308, 201, 7, 27, "Input",
CellTags->"FunctionalD",
CellID->256131363],
- Cell[116744, 4766, 4373, 80, 70, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1357294281],
- Cell[121154, 4851, 158, 5, 27, "Input",
+ Cell[105498, 4317, 7234, 309, 66, "Output",
+ CellTags->"FunctionalD"],
+ Cell[112769, 4631, 158, 5, 27, "Input",
CellTags->"FunctionalD",
CellID->1098654926],
- Cell[121315, 4858, 9456, 163, 93, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1419688678],
- Cell[130808, 5026, 183, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->2122973606],
- Cell[130994, 5034, 9102, 157, 98, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1594533498],
- Cell[140111, 5194, 86, 2, 32, "Text",
- CellTags->"FunctionalD",
- CellID->927805887],
- Cell[140200, 5198, 559, 14, 45, "Input",
- CellTags->"FunctionalD",
- CellID->1348622684],
- Cell[141115, 5234, 402, 15, 32, "Text",
- CellTags->"FunctionalD",
- CellID->2077547280]},
- "RasterizedOutput"->{
- Cell[103129, 4296, 4247, 78, 71, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1902982577],
- Cell[116744, 4766, 4373, 80, 70, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1357294281],
- Cell[121315, 4858, 9456, 163, 93, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1419688678],
- Cell[130994, 5034, 9102, 157, 98, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1594533498]}
+ Cell[112930, 4638, 10266, 429, 118, "Output",
+ CellTags->"FunctionalD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 143724, 5302},
- {"FunctionalD", 143863, 5306},
- {"RasterizedOutput", 151545, 5550}
+ {"PrimaryExamplesSection", 126964, 5188},
+ {"FunctionalD", 127103, 5192}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3109, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 1031, 25, 162, "Usage",
- CellID->982511436],
+Cell[3695, 98, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4008, 113, 1696, 46, 165, "Usage",
+ CellID->2010081510],
+Cell[CellGroupData[{
+Cell[5729, 163, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1314156764],
+Cell[6471, 189, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6505, 191, 335, 12, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
Cell[CellGroupData[{
-Cell[3956, 107, 388, 15, 31, "PrimaryExamplesSection",
+Cell[6889, 209, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1338673316],
+ CellID->1785706472],
Cell[CellGroupData[{
-Cell[4369, 126, 195, 6, 25, "ExampleSection",
- CellID->648720929],
-Cell[4567, 134, 631, 21, 57, "Text",
- CellTags->"FunctionalD",
- CellID->2064540691],
+Cell[7302, 228, 195, 6, 26, "ExampleSection",
+ CellID->781139701],
+Cell[7500, 236, 660, 22, 49, "Notes"],
Cell[CellGroupData[{
-Cell[5223, 159, 246, 7, 27, "Input",
+Cell[8185, 262, 246, 7, 27, "Input",
CellTags->"FunctionalD",
CellID->622999086],
-Cell[5472, 168, 212, 7, 36, "Output",
- CellTags->"FunctionalD",
- CellID->149077150]
+Cell[8434, 271, 192, 6, 35, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5721, 180, 271, 8, 27, "Input",
+Cell[8663, 282, 271, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->272557122],
-Cell[5995, 190, 273, 10, 36, "Output",
- CellTags->"FunctionalD",
- CellID->85429466]
+Cell[8937, 292, 254, 9, 37, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
-Cell[6283, 203, 1194, 41, 92, "Text",
- CellTags->"FunctionalD",
- CellID->412822781],
Cell[CellGroupData[{
-Cell[7502, 248, 316, 9, 27, "Input",
+Cell[9228, 306, 105, 2, 9, "ExampleDelimiter"],
+Cell[9336, 310, 1182, 38, 80, "Notes"],
+Cell[CellGroupData[{
+Cell[10543, 352, 316, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->1655052767],
-Cell[7821, 259, 379, 14, 48, "Output",
- CellTags->"FunctionalD",
- CellID->1642735326]
+Cell[10862, 363, 358, 13, 45, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
-Cell[8215, 276, 798, 25, 36, "Text",
- CellTags->"FunctionalD",
- CellID->726694991],
+Cell[11235, 379, 747, 22, 35, "Notes"],
Cell[CellGroupData[{
-Cell[9038, 305, 690, 23, 45, "Input",
+Cell[12007, 405, 611, 20, 45, "Input",
CellTags->"FunctionalD",
CellID->593299923],
-Cell[9731, 330, 1010, 37, 62, "Output",
- CellTags->"FunctionalD",
- CellID->423622231]
+Cell[12621, 427, 1018, 38, 56, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10778, 372, 236, 7, 27, "Input",
+Cell[13676, 470, 202, 6, 27, "Input",
CellTags->"FunctionalD",
CellID->1102630385],
-Cell[11017, 381, 835, 34, 42, "Output",
- CellTags->"FunctionalD",
- CellID->264301886]
+Cell[13881, 478, 775, 31, 42, "Output",
+ CellTags->"FunctionalD"]
+}, Open ]]
}, Open ]],
-Cell[11867, 418, 509, 16, 44, "Text",
- CellTags->"FunctionalD",
- CellID->820504742],
-Cell[12379, 436, 117, 3, 32, "Text",
- CellTags->"FunctionalD",
- CellID->883647128],
Cell[CellGroupData[{
-Cell[12521, 443, 333, 9, 27, "Input",
+Cell[14705, 515, 105, 2, 9, "ExampleDelimiter"],
+Cell[14813, 519, 458, 13, 42, "Notes"],
+Cell[15274, 534, 32, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[15331, 538, 333, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->575936469],
-Cell[12857, 454, 1688, 74, 44, "Output",
- CellTags->"FunctionalD",
- CellID->1550678993]
+Cell[15667, 549, 1719, 75, 43, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14582, 533, 334, 9, 27, "Input",
+Cell[17423, 629, 334, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->1966798854],
-Cell[14919, 544, 1688, 74, 44, "Output",
- CellTags->"FunctionalD",
- CellID->1803724780]
+Cell[17760, 640, 1719, 75, 43, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16644, 623, 234, 9, 27, "Input",
+Cell[19516, 720, 234, 9, 27, "Input",
CellTags->"FunctionalD",
CellID->733226876],
-Cell[16881, 634, 3703, 147, 62, "Output",
- CellTags->"FunctionalD",
- CellID->1499967078]
+Cell[19753, 731, 3798, 150, 56, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
-Cell[20599, 784, 581, 14, 96, "Text",
- CellTags->"FunctionalD",
- CellID->1999439773],
-Cell[21183, 800, 1425, 50, 36, "Text",
- CellTags->"FunctionalD",
- CellID->1758153070],
-Cell[22611, 852, 464, 14, 35, "Text",
- CellTags->"FunctionalD",
- CellID->833531771],
+Cell[23566, 884, 433, 9, 68, "Notes"],
+Cell[24002, 895, 97, 2, 32, "Notes"],
+Cell[24102, 899, 1315, 43, 35, "Notes"],
+Cell[25420, 944, 282, 10, 34, "Notes"],
Cell[CellGroupData[{
-Cell[23100, 870, 249, 8, 27, "Input",
+Cell[25727, 958, 249, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->371171043],
-Cell[23352, 880, 426, 18, 41, "Output",
- CellTags->"FunctionalD",
- CellID->2026389295]
+Cell[25979, 968, 405, 17, 38, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23815, 903, 185, 6, 27, "Input",
+Cell[26421, 990, 159, 5, 27, "Input",
CellTags->"FunctionalD",
CellID->2041925168],
-Cell[24003, 911, 3825, 164, 49, "Output",
- CellTags->"FunctionalD",
- CellID->930168027]
+Cell[26583, 997, 3236, 139, 46, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
-Cell[27843, 1078, 140, 4, 32, "Text",
- CellTags->"FunctionalD",
- CellID->133774632],
+Cell[29834, 1139, 253, 7, 32, "Notes"],
Cell[CellGroupData[{
-Cell[28008, 1086, 196, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1339957551],
-Cell[28207, 1094, 3824, 164, 49, "Output",
- CellTags->"FunctionalD",
- CellID->22832846]
+Cell[30112, 1150, 279, 8, 27, "Input"],
+Cell[30394, 1160, 3210, 138, 46, "Output"]
}, Open ]],
-Cell[32046, 1261, 311, 9, 54, "Text",
- CellTags->"FunctionalD",
- CellID->1685160773],
-Cell[32360, 1272, 542, 17, 46, "Input",
+Cell[33619, 1301, 372, 10, 51, "Notes"],
+Cell[33994, 1313, 541, 17, 46, "Input",
CellTags->"FunctionalD",
CellID->324247296],
Cell[CellGroupData[{
-Cell[32927, 1293, 249, 8, 27, "Input",
+Cell[34560, 1334, 248, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->659226066],
-Cell[33179, 1303, 525, 23, 40, "Output",
- CellTags->"FunctionalD",
- CellID->1252480273]
+Cell[34811, 1344, 503, 22, 40, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[33741, 1331, 260, 8, 27, "Input",
+Cell[35351, 1371, 259, 8, 27, "Input",
CellTags->"FunctionalD",
CellID->2097130638],
-Cell[34004, 1341, 558, 24, 40, "Output",
- CellTags->"FunctionalD",
- CellID->122288557]
+Cell[35613, 1381, 537, 23, 40, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[34599, 1370, 599, 17, 45, "Input",
+Cell[36187, 1409, 599, 17, 45, "Input",
CellTags->"FunctionalD",
CellID->1711609273],
-Cell[35201, 1389, 3305, 143, 62, "Output",
- CellTags->"FunctionalD",
- CellID->325352248]
+Cell[36789, 1428, 3435, 146, 56, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[38543, 1537, 204, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1021322617],
-Cell[38750, 1545, 1629, 72, 43, "Output",
- CellTags->"FunctionalD",
- CellID->1748319521]
+Cell[40261, 1579, 527, 15, 45, "Input"],
+Cell[40791, 1596, 1608, 71, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[40416, 1622, 372, 12, 27, "Input",
+Cell[42436, 1672, 372, 12, 27, "Input",
CellTags->"FunctionalD",
CellID->2111632726],
-Cell[40791, 1636, 1503, 66, 43, "Output",
- CellTags->"FunctionalD",
- CellID->1369525226]
+Cell[42811, 1686, 1508, 66, 40, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
-Cell[42309, 1705, 290, 10, 36, "Text",
- CellTags->"FunctionalD",
- CellID->1366711149],
-Cell[42602, 1717, 119, 3, 32, "Text",
- CellTags->"FunctionalD",
- CellID->1672341951],
-Cell[42724, 1722, 187, 5, 52, "Text",
- CellTags->"FunctionalD",
- CellID->680079191],
+Cell[44334, 1755, 329, 12, 36, "Notes"],
+Cell[44666, 1769, 33, 0, 32, "Notes"],
+Cell[44702, 1771, 214, 5, 48, "Notes"],
Cell[CellGroupData[{
-Cell[42936, 1731, 125, 4, 27, "Input",
+Cell[44941, 1780, 125, 4, 27, "Input",
CellTags->"FunctionalD",
CellID->1996431184],
-Cell[43064, 1737, 3703, 147, 62, "Output",
- CellTags->"FunctionalD",
- CellID->745422332]
+Cell[45069, 1786, 3799, 150, 56, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[46804, 1889, 214, 7, 27, "Input",
+Cell[48905, 1941, 214, 7, 27, "Input",
CellTags->"FunctionalD",
CellID->1238326201],
-Cell[47021, 1898, 25606, 1105, 356, "Output",
- CellTags->"FunctionalD",
- CellID->1475699650]
-}, Open ]],
-Cell[72642, 3006, 248, 6, 52, "Text",
- CellTags->"FunctionalD",
- CellID->1367707502],
-Cell[72893, 3014, 366, 7, 92, "Text",
- CellTags->"FunctionalD",
- CellID->1173793345],
-Cell[73262, 3023, 150, 5, 27, "Input",
- CellTags->"FunctionalD",
- CellID->62943147],
-Cell[73415, 3030, 2602, 68, 168, "Input",
- CellTags->"FunctionalD",
- CellID->915301036],
-Cell[CellGroupData[{
-Cell[76042, 3102, 188, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->832685091],
-Cell[76233, 3110, 13327, 580, 209, "Output",
- CellTags->"FunctionalD",
- CellID->1392722087]
+Cell[49122, 1950, 26569, 1132, 392, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
+Cell[75706, 3085, 211, 4, 49, "Notes"],
+Cell[75920, 3091, 260, 5, 66, "Notes"],
+Cell[76183, 3098, 354, 10, 47, "Input"],
Cell[CellGroupData[{
-Cell[89597, 3695, 183, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->706809486],
-Cell[89783, 3703, 7200, 318, 92, "Output",
- CellTags->"FunctionalD",
- CellID->333585110]
+Cell[76562, 3112, 1113, 30, 96, "Input"],
+Cell[77678, 3144, 7164, 299, 107, "Output"]
}, Open ]],
-Cell[96998, 4024, 233, 9, 32, "Text",
- CellTags->"FunctionalD",
- CellID->2140946790],
+Cell[84857, 3446, 187, 7, 32, "Notes"],
Cell[CellGroupData[{
-Cell[97256, 4037, 335, 12, 29, "Input",
- CellTags->"FunctionalD",
- CellID->1693929986],
-Cell[97594, 4051, 3083, 135, 62, "Output",
- CellTags->"FunctionalD",
- CellID->115691573]
+Cell[85069, 3457, 319, 11, 29, "Input"],
+Cell[85391, 3470, 3051, 134, 56, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[100714, 4191, 667, 21, 27, "Input",
- CellTags->"FunctionalD",
- CellID->1865190780],
-Cell[101384, 4214, 1531, 70, 44, "Output",
- CellTags->"FunctionalD",
- CellID->602569188]
+Cell[88479, 3609, 475, 16, 27, "Input"],
+Cell[88957, 3627, 1502, 68, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[102952, 4289, 174, 5, 27, "Input",
+Cell[90496, 3700, 174, 5, 27, "Input",
CellTags->"FunctionalD",
- CellID->1416466041],
-Cell[103129, 4296, 4247, 78, 71, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1902982577]
+ CellID->1144637557],
+Cell[90673, 3707, 5717, 235, 91, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
-Cell[107391, 4377, 152, 5, 32, "Text",
- CellTags->"FunctionalD",
- CellID->1808944377],
+Cell[96405, 3945, 153, 4, 32, "Notes"],
Cell[CellGroupData[{
-Cell[107568, 4386, 98, 3, 27, "Input",
- CellTags->"FunctionalD",
- CellID->819260412],
-Cell[107669, 4391, 1502, 66, 43, "Output",
- CellTags->"FunctionalD",
- CellID->908387761]
+Cell[96583, 3953, 52, 1, 27, "Input"],
+Cell[96638, 3956, 1482, 65, 40, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[109208, 4462, 817, 22, 62, "Input",
+Cell[98157, 4026, 845, 23, 62, "Input",
CellTags->"FunctionalD",
CellID->611111290],
-Cell[110028, 4486, 1571, 65, 49, "Output",
- CellTags->"FunctionalD",
- CellID->849746209]
+Cell[99005, 4051, 1592, 65, 46, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[111636, 4556, 157, 5, 27, "Input",
+Cell[100634, 4121, 157, 5, 27, "Input",
CellTags->"FunctionalD",
CellID->1841998165],
-Cell[111796, 4563, 4685, 189, 51, "Output",
- CellTags->"FunctionalD",
- CellID->421326563]
+Cell[100794, 4128, 4463, 175, 72, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[116518, 4757, 223, 7, 27, "Input",
+Cell[105294, 4308, 201, 7, 27, "Input",
CellTags->"FunctionalD",
CellID->256131363],
-Cell[116744, 4766, 4373, 80, 70, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1357294281]
+Cell[105498, 4317, 7234, 309, 66, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[121154, 4851, 158, 5, 27, "Input",
+Cell[112769, 4631, 158, 5, 27, "Input",
CellTags->"FunctionalD",
CellID->1098654926],
-Cell[121315, 4858, 9456, 163, 93, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1419688678]
+Cell[112930, 4638, 10266, 429, 118, "Output",
+ CellTags->"FunctionalD"]
}, Open ]],
+Cell[123211, 5070, 29, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[130808, 5026, 183, 6, 27, "Input",
- CellTags->"FunctionalD",
- CellID->2122973606],
-Cell[130994, 5034, 9102, 157, 98, "Output",
- CellTags->{"FunctionalD", "RasterizedOutput"},
- CellID->1594533498]
+Cell[123265, 5074, 102, 2, 27, "Input"],
+Cell[123370, 5078, 167, 5, 35, "Output"]
}, Open ]],
-Cell[140111, 5194, 86, 2, 32, "Text",
- CellTags->"FunctionalD",
- CellID->927805887],
-Cell[140200, 5198, 559, 14, 45, "Input",
- CellTags->"FunctionalD",
- CellID->1348622684]
+Cell[123552, 5086, 69, 0, 32, "Notes"],
+Cell[123624, 5088, 363, 10, 47, "Input"]
+}, Open ]]
}, Open ]],
-Cell[140774, 5215, 31, 0, 29, "SectionFooterSpacer"]
+Cell[124014, 5102, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[140842, 5220, 270, 12, 31, "SeeAlsoSection",
+Cell[124082, 5107, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[141115, 5234, 402, 15, 32, "Text",
- CellTags->"FunctionalD",
- CellID->2077547280]
+Cell[124355, 5121, 358, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[141532, 5252, 23, 0, 42, "FooterCell"]
+Cell[124728, 5137, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA.nb
index 99f14d03b..190c475b2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15537, 583]
-NotebookOptionsPosition[ 10602, 416]
-NotebookOutlinePosition[ 13862, 514]
-CellTagsIndexPosition[ 13756, 508]
+NotebookDataLength[ 16189, 592]
+NotebookOptionsPosition[ 11597, 442]
+NotebookOutlinePosition[ 14686, 532]
+CellTagsIndexPosition[ 14580, 526]
WindowTitle->GA
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GA\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GA"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GA.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$80289],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GA",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"], "\<\"GS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GS"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GA\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GA"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GA.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$152249],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GA",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +97,29 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GA", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GA", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"GA", "[", "mu", "]"}]], "InlineFormula"],
+ RowBox[{"GA", "[", "\[Mu]", "]"}]], "InlineFormula"],
" \[LineSeparator]",
"can be used as input for a 4-dimensional ",
Cell[BoxData[
FormBox[
- SubscriptBox["\[Gamma]",
- RowBox[{"\[Mu]", " "}]], TraditionalForm]]],
+ SubscriptBox[
+ SuperscriptBox["\[Gamma]", "\[Mu]"], " "], TraditionalForm]]],
"and is transformed into DiracGamma[LorentzIndex[",
Cell[BoxData[
FormBox["\[Mu]", TraditionalForm]]],
@@ -125,7 +159,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1937257617],
+ CellID->1166659898],
Cell[CellGroupData[{
@@ -135,7 +169,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1143751957],
+ CellID->731692333],
Cell[CellGroupData[{
@@ -153,12 +187,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{23, 17},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA",
- CellLabel->"Out[1]=",
- CellID->1620727253]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -210,12 +243,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{101, 17},
+ ImageSize->{110, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA",
- CellLabel->"Out[2]=",
- CellID->751580324]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -231,12 +263,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Output",
- ImageSize->{225, 15},
+ ImageSize->{226, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1671355959]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -284,12 +315,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{93, 18},
+ ImageSize->{100, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA",
- CellLabel->"Out[4]=",
- CellID->973003462]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -309,12 +339,11 @@ Cell[BoxData[
RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
RowBox[{"GA", "[", "\[Rho]", "]"}], ".",
RowBox[{"GA", "[", "\[Sigma]", "]"}]}]], "Output",
- ImageSize->{199, 15},
+ ImageSize->{205, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA",
- CellLabel->"Out[5]//StandardForm=",
- CellID->390738149]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -360,12 +389,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{123, 22},
+ ImageSize->{133, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA",
- CellLabel->"Out[6]=",
- CellID->1420363209]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -389,10 +417,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["DiracMatrix",
+ StyleBox[ButtonBox["DiracGamma",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["GAD",
@@ -407,9 +435,7 @@ Cell[TextData[{
ButtonNote->"GS"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GA",
- CellID->1423338362]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -417,7 +443,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"GA",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -426,23 +452,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 43.060317}",
+ "built" -> "{2020, 1, 5, 18, 58, 23.715243}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "GA[mu] can be used as input for a 4-dimensional \\[Gamma] \\[Mu] and is \
-transformed into DiracGamma[LorentzIndex[\\[Mu]]] by FeynCalcInternal \
+ "GA[\\[Mu]] can be used as input for a 4-dimensional \\[Gamma]^\\[Mu]and \
+is transformed into DiracGamma[LorentzIndex[\\[Mu]]] by FeynCalcInternal \
(=FCI).GA[\\[Mu], \\[Nu], ...] is a short form for GA[\\[Mu]].GA[\\[Nu]].",
- "synonyms" -> {}, "title" -> "GA", "titlemodifier" -> "", "windowtitle" ->
- "GA", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GA"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GA", "titlemodifier" ->
+ "", "windowtitle" -> "GA", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GA"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -450,8 +476,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -460,131 +487,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3829, 112, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4985, 146, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1937257617]},
+ CellID->1166659898]},
"GA"->{
- Cell[4463, 141, 119, 4, 27, "Input",
+ Cell[5618, 175, 119, 4, 27, "Input",
CellTags->"GA",
CellID->192317475],
- Cell[4585, 147, 333, 13, 38, "Output",
- CellTags->"GA",
- CellID->1620727253],
- Cell[4955, 165, 231, 8, 27, "Input",
+ Cell[5740, 181, 312, 12, 37, "Output",
+ CellTags->"GA"],
+ Cell[6089, 198, 231, 8, 27, "Input",
CellTags->"GA",
CellID->950175955],
- Cell[5189, 175, 1007, 42, 38, "Output",
- CellTags->"GA",
- CellID->751580324],
- Cell[6233, 222, 189, 6, 27, "Input",
+ Cell[6323, 208, 987, 41, 37, "Output",
+ CellTags->"GA"],
+ Cell[7347, 254, 189, 6, 27, "Input",
CellTags->"GA",
CellID->872281918],
- Cell[6425, 230, 270, 8, 49, "Output",
- CellTags->"GA",
- CellID->1671355959],
- Cell[6732, 243, 182, 6, 27, "Input",
+ Cell[7539, 262, 249, 7, 51, "Output",
+ CellTags->"GA"],
+ Cell[7825, 274, 182, 6, 27, "Input",
CellTags->"GA",
CellID->1064432869],
- Cell[6917, 251, 950, 40, 39, "Output",
- CellTags->"GA",
- CellID->973003462],
- Cell[7904, 296, 222, 7, 27, "Input",
+ Cell[8010, 282, 931, 39, 37, "Output",
+ CellTags->"GA"],
+ Cell[8978, 326, 222, 7, 27, "Input",
CellTags->"GA",
CellID->1945449635],
- Cell[8129, 305, 368, 11, 49, "Output",
- CellTags->"GA",
- CellID->390738149],
- Cell[8534, 321, 269, 9, 27, "Input",
+ Cell[9203, 335, 348, 10, 51, "Output",
+ CellTags->"GA"],
+ Cell[9588, 350, 269, 9, 27, "Input",
CellTags->"GA",
CellID->1527316325],
- Cell[8806, 332, 870, 35, 43, "Output",
- CellTags->"GA",
- CellID->1420363209],
- Cell[10044, 390, 516, 21, 70, "Text",
- CellTags->"GA",
- CellID->1423338362]}
+ Cell[9860, 361, 849, 34, 39, "Output",
+ CellTags->"GA"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12529, 461},
- {"GA", 12659, 465}
+ {"PrimaryExamplesSection", 13572, 488},
+ {"GA", 13702, 492}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3146, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 946, 30, 103, "Usage",
+Cell[3723, 99, 279, 11, 45, "ObjectNameGrid"],
+Cell[4005, 112, 955, 30, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3829, 112, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4985, 146, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1937257617],
+ CellID->1166659898],
Cell[CellGroupData[{
-Cell[4242, 131, 196, 6, 25, "ExampleSection",
- CellID->1143751957],
+Cell[5398, 165, 195, 6, 26, "ExampleSection",
+ CellID->731692333],
Cell[CellGroupData[{
-Cell[4463, 141, 119, 4, 27, "Input",
+Cell[5618, 175, 119, 4, 27, "Input",
CellTags->"GA",
CellID->192317475],
-Cell[4585, 147, 333, 13, 38, "Output",
- CellTags->"GA",
- CellID->1620727253]
+Cell[5740, 181, 312, 12, 37, "Output",
+ CellTags->"GA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4955, 165, 231, 8, 27, "Input",
+Cell[6089, 198, 231, 8, 27, "Input",
CellTags->"GA",
CellID->950175955],
-Cell[5189, 175, 1007, 42, 38, "Output",
- CellTags->"GA",
- CellID->751580324]
+Cell[6323, 208, 987, 41, 37, "Output",
+ CellTags->"GA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6233, 222, 189, 6, 27, "Input",
+Cell[7347, 254, 189, 6, 27, "Input",
CellTags->"GA",
CellID->872281918],
-Cell[6425, 230, 270, 8, 49, "Output",
- CellTags->"GA",
- CellID->1671355959]
+Cell[7539, 262, 249, 7, 51, "Output",
+ CellTags->"GA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6732, 243, 182, 6, 27, "Input",
+Cell[7825, 274, 182, 6, 27, "Input",
CellTags->"GA",
CellID->1064432869],
-Cell[6917, 251, 950, 40, 39, "Output",
- CellTags->"GA",
- CellID->973003462]
+Cell[8010, 282, 931, 39, 37, "Output",
+ CellTags->"GA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7904, 296, 222, 7, 27, "Input",
+Cell[8978, 326, 222, 7, 27, "Input",
CellTags->"GA",
CellID->1945449635],
-Cell[8129, 305, 368, 11, 49, "Output",
- CellTags->"GA",
- CellID->390738149]
+Cell[9203, 335, 348, 10, 51, "Output",
+ CellTags->"GA"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8534, 321, 269, 9, 27, "Input",
+Cell[9588, 350, 269, 9, 27, "Input",
CellTags->"GA",
CellID->1527316325],
-Cell[8806, 332, 870, 35, 43, "Output",
- CellTags->"GA",
- CellID->1420363209]
+Cell[9860, 361, 849, 34, 39, "Output",
+ CellTags->"GA"]
}, Open ]]
}, Open ]],
-Cell[9703, 371, 31, 0, 70, "SectionFooterSpacer"]
+Cell[10736, 399, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9771, 376, 270, 12, 70, "SeeAlsoSection",
+Cell[10804, 404, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[10044, 390, 516, 21, 70, "Text",
- CellTags->"GA",
- CellID->1423338362]
+Cell[11077, 418, 478, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[10575, 414, 23, 0, 70, "FooterCell"]
+Cell[11570, 440, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA5.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA5.nb
index 1d7cd180a..8ea4bf7ae 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA5.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GA5.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8900, 314]
-NotebookOptionsPosition[ 5539, 205]
-NotebookOutlinePosition[ 7975, 277]
-CellTagsIndexPosition[ 7870, 271]
+NotebookDataLength[ 9823, 335]
+NotebookOptionsPosition[ 6629, 235]
+NotebookOutlinePosition[ 8985, 303]
+CellTagsIndexPosition[ 8880, 297]
WindowTitle->GA5
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GA5\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GA5"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GA5.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$77882],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GA5",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GS"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GA5\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GA5"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GA5.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$148690],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GA5",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GA5", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GA5", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1476337232],
+ CellID->1661467686],
Cell[CellGroupData[{
@@ -116,7 +150,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->665831137],
+ CellID->1558667183],
Cell[CellGroupData[{
@@ -131,30 +165,28 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{22, 18},
+ ImageSize->{23, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA5",
- CellLabel->"Out[1]=",
- CellID->26317546]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "Tr"}]], "Input",
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"GA5",
CellLabel->"In[2]:=",
CellID->306400430],
Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ RowBox[{"DiracGamma", "[", "5", "]"}]], "Output",
+ ImageSize->{110, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GA5",
- CellLabel->"Out[2]=",
- CellID->223026079]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -196,9 +228,7 @@ Cell[TextData[{
ButtonNote->"GS"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GA5",
- CellID->1140253619]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -215,21 +245,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 32.721567}",
+ "built" -> "{2020, 1, 5, 18, 58, 15.088315}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"GA5 is equivalent to DiracGamma[5] and denotes gamma5.",
- "synonyms" -> {}, "title" -> "GA5", "titlemodifier" -> "", "windowtitle" ->
- "GA5", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GA5"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GA5", "titlemodifier" ->
+ "", "windowtitle" -> "GA5", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GA5"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -237,8 +267,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -247,75 +278,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3245, 93, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4376, 127, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1476337232]},
+ CellID->1661467686]},
"GA5"->{
- Cell[3878, 122, 89, 3, 27, "Input",
+ Cell[5010, 156, 89, 3, 27, "Input",
CellTags->"GA5",
CellID->51140118],
- Cell[3970, 127, 292, 11, 39, "Output",
- CellTags->"GA5",
- CellID->26317546],
- Cell[4299, 143, 112, 4, 27, "Input",
+ Cell[5102, 161, 273, 10, 40, "Output",
+ CellTags->"GA5"],
+ Cell[5412, 176, 122, 4, 27, "Input",
CellTags->"GA5",
CellID->306400430],
- Cell[4414, 149, 204, 7, 36, "Output",
- CellTags->"GA5",
- CellID->223026079],
- Cell[4986, 179, 511, 21, 31, "Text",
- CellTags->"GA5",
- CellID->1140253619]}
+ Cell[5537, 182, 207, 6, 51, "Output",
+ CellTags->"GA5"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7305, 248},
- {"GA5", 7435, 252}
+ {"PrimaryExamplesSection", 8440, 279},
+ {"GA5", 8571, 283}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3134, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 356, 11, 83, "Usage",
+Cell[3712, 99, 280, 11, 45, "ObjectNameGrid"],
+Cell[3995, 112, 356, 11, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3245, 93, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4376, 127, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1476337232],
+ CellID->1661467686],
Cell[CellGroupData[{
-Cell[3658, 112, 195, 6, 25, "ExampleSection",
- CellID->665831137],
+Cell[4789, 146, 196, 6, 26, "ExampleSection",
+ CellID->1558667183],
Cell[CellGroupData[{
-Cell[3878, 122, 89, 3, 27, "Input",
+Cell[5010, 156, 89, 3, 27, "Input",
CellTags->"GA5",
CellID->51140118],
-Cell[3970, 127, 292, 11, 39, "Output",
- CellTags->"GA5",
- CellID->26317546]
+Cell[5102, 161, 273, 10, 40, "Output",
+ CellTags->"GA5"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4299, 143, 112, 4, 27, "Input",
+Cell[5412, 176, 122, 4, 27, "Input",
CellTags->"GA5",
CellID->306400430],
-Cell[4414, 149, 204, 7, 36, "Output",
- CellTags->"GA5",
- CellID->223026079]
+Cell[5537, 182, 207, 6, 51, "Output",
+ CellTags->"GA5"]
}, Open ]]
}, Open ]],
-Cell[4645, 160, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5771, 192, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4713, 165, 270, 12, 31, "SeeAlsoSection",
+Cell[5839, 197, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4986, 179, 511, 21, 31, "Text",
- CellTags->"GA5",
- CellID->1140253619]
+Cell[6112, 211, 475, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[5512, 203, 23, 0, 42, "FooterCell"]
+Cell[6602, 233, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAD.nb
index 87161edd7..a4ba14340 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAD.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15324, 572]
-NotebookOptionsPosition[ 10352, 405]
-NotebookOutlinePosition[ 13639, 503]
-CellTagsIndexPosition[ 13532, 497]
+NotebookDataLength[ 15908, 580]
+NotebookOptionsPosition[ 11332, 431]
+NotebookOutlinePosition[ 14393, 520]
+CellTagsIndexPosition[ 14286, 514]
WindowTitle->GAD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GAD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GAD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GAD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$78226],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GAD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GS"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GAD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$149134],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +97,29 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GAD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"GAD", "[", "mu", "]"}]], "InlineFormula"],
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]], "InlineFormula"],
" \[LineSeparator]",
"can be used as input for a D-dimensional ",
Cell[BoxData[
FormBox[
- SubscriptBox["\[Gamma]",
- RowBox[{"\[Mu]", " "}]], TraditionalForm]]],
+ SubscriptBox[
+ SuperscriptBox["\[Gamma]", "\[Mu]"], " "], TraditionalForm]]],
"and is transformed into DiracGamma[LorentzIndex[",
Cell[BoxData[
FormBox["\[Mu]", TraditionalForm]]],
@@ -125,7 +159,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->995390804],
+ CellID->1169550819],
Cell[CellGroupData[{
@@ -135,7 +169,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1450127099],
+ CellID->585030036],
Cell[CellGroupData[{
@@ -152,12 +186,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{22, 17},
+ ImageSize->{24, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GAD",
- CellLabel->"Out[1]=",
- CellID->1066808251]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -205,12 +238,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{97, 17},
+ ImageSize->{106, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GAD",
- CellLabel->"Out[2]=",
- CellID->1547742824]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -228,12 +260,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[",
RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}]], "Output",
- ImageSize->{271, 15},
+ ImageSize->{272, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GAD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->129946086]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -277,12 +308,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{89, 18},
+ ImageSize->{96, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GAD",
- CellLabel->"Out[4]=",
- CellID->1706461221]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -302,12 +332,11 @@ Cell[BoxData[
RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
RowBox[{"GAD", "[", "\[Rho]", "]"}], ".",
RowBox[{"GAD", "[", "\[Sigma]", "]"}]}]], "Output",
- ImageSize->{227, 15},
+ ImageSize->{237, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GAD",
- CellLabel->"Out[5]//StandardForm=",
- CellID->20038506]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -349,12 +378,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{118, 21},
+ ImageSize->{128, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GAD",
- CellLabel->"Out[6]=",
- CellID->1687383827]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -378,10 +406,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["DiracMatrix",
+ StyleBox[ButtonBox["DiracGamma",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["GA",
@@ -396,9 +424,7 @@ Cell[TextData[{
ButtonNote->"GS"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GAD",
- CellID->127950767]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -415,23 +441,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 34.482384}",
+ "built" -> "{2020, 1, 5, 18, 58, 16.186326}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "GAD[mu] can be used as input for a D-dimensional \\[Gamma] \\[Mu] and is \
-transformed into DiracGamma[LorentzIndex[\\[Mu],D],D] by FeynCalcInternal \
+ "GAD[\\[Mu]] can be used as input for a D-dimensional \\[Gamma]^\\[Mu]and \
+is transformed into DiracGamma[LorentzIndex[\\[Mu],D],D] by FeynCalcInternal \
(=FCI).GAD[\\[Mu], \\[Nu], ...] is a short form for GAD[\\[Mu]].GAD[\\[Nu]]. \
-... .", "synonyms" -> {}, "title" -> "GAD", "titlemodifier" -> "",
- "windowtitle" -> "GAD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GAD"},
- "SearchTextTranslated" -> ""},
+... .", "synonyms" -> {}, "tabletags" -> {}, "title" -> "GAD",
+ "titlemodifier" -> "", "windowtitle" -> "GAD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GAD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -440,7 +466,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -449,131 +475,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3857, 112, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4997, 146, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->995390804]},
+ CellID->1169550819]},
"GAD"->{
- Cell[4490, 141, 121, 4, 27, "Input",
+ Cell[5630, 175, 121, 4, 27, "Input",
CellTags->"GAD",
CellID->617064291],
- Cell[4614, 147, 310, 12, 38, "Output",
- CellTags->"GAD",
- CellID->1066808251],
- Cell[4961, 164, 235, 8, 27, "Input",
+ Cell[5754, 181, 289, 11, 37, "Output",
+ CellTags->"GAD"],
+ Cell[6080, 197, 235, 8, 27, "Input",
CellTags->"GAD",
CellID->1166403079],
- Cell[5199, 174, 900, 38, 38, "Output",
- CellTags->"GAD",
- CellID->1547742824],
- Cell[6136, 217, 192, 6, 27, "Input",
+ Cell[6318, 207, 880, 37, 37, "Output",
+ CellTags->"GAD"],
+ Cell[7235, 249, 192, 6, 27, "Input",
CellTags->"GAD",
CellID->1483888506],
- Cell[6331, 225, 319, 10, 49, "Output",
- CellTags->"GAD",
- CellID->129946086],
- Cell[6687, 240, 183, 6, 27, "Input",
+ Cell[7430, 257, 299, 9, 51, "Output",
+ CellTags->"GAD"],
+ Cell[7766, 271, 183, 6, 27, "Input",
CellTags->"GAD",
CellID->193869943],
- Cell[6873, 248, 848, 36, 39, "Output",
- CellTags->"GAD",
- CellID->1706461221],
- Cell[7758, 289, 223, 7, 27, "Input",
+ Cell[7952, 279, 827, 35, 37, "Output",
+ CellTags->"GAD"],
+ Cell[8816, 319, 223, 7, 27, "Input",
CellTags->"GAD",
CellID->488289901],
- Cell[7984, 298, 372, 11, 49, "Output",
- CellTags->"GAD",
- CellID->20038506],
- Cell[8393, 314, 273, 9, 27, "Input",
+ Cell[9042, 328, 353, 10, 51, "Output",
+ CellTags->"GAD"],
+ Cell[9432, 343, 273, 9, 27, "Input",
CellTags->"GAD",
CellID->1528585205],
- Cell[8669, 325, 760, 31, 42, "Output",
- CellTags->"GAD",
- CellID->1687383827],
- Cell[9797, 379, 513, 21, 70, "Text",
- CellTags->"GAD",
- CellID->127950767]}
+ Cell[9708, 354, 739, 30, 39, "Output",
+ CellTags->"GAD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12294, 450},
- {"GAD", 12424, 454}
+ {"PrimaryExamplesSection", 13265, 476},
+ {"GAD", 13396, 480}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3134, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 968, 30, 103, "Usage",
+Cell[3712, 99, 280, 11, 45, "ObjectNameGrid"],
+Cell[3995, 112, 977, 30, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3857, 112, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4997, 146, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->995390804],
+ CellID->1169550819],
Cell[CellGroupData[{
-Cell[4269, 131, 196, 6, 25, "ExampleSection",
- CellID->1450127099],
+Cell[5410, 165, 195, 6, 26, "ExampleSection",
+ CellID->585030036],
Cell[CellGroupData[{
-Cell[4490, 141, 121, 4, 27, "Input",
+Cell[5630, 175, 121, 4, 27, "Input",
CellTags->"GAD",
CellID->617064291],
-Cell[4614, 147, 310, 12, 38, "Output",
- CellTags->"GAD",
- CellID->1066808251]
+Cell[5754, 181, 289, 11, 37, "Output",
+ CellTags->"GAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4961, 164, 235, 8, 27, "Input",
+Cell[6080, 197, 235, 8, 27, "Input",
CellTags->"GAD",
CellID->1166403079],
-Cell[5199, 174, 900, 38, 38, "Output",
- CellTags->"GAD",
- CellID->1547742824]
+Cell[6318, 207, 880, 37, 37, "Output",
+ CellTags->"GAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6136, 217, 192, 6, 27, "Input",
+Cell[7235, 249, 192, 6, 27, "Input",
CellTags->"GAD",
CellID->1483888506],
-Cell[6331, 225, 319, 10, 49, "Output",
- CellTags->"GAD",
- CellID->129946086]
+Cell[7430, 257, 299, 9, 51, "Output",
+ CellTags->"GAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6687, 240, 183, 6, 27, "Input",
+Cell[7766, 271, 183, 6, 27, "Input",
CellTags->"GAD",
CellID->193869943],
-Cell[6873, 248, 848, 36, 39, "Output",
- CellTags->"GAD",
- CellID->1706461221]
+Cell[7952, 279, 827, 35, 37, "Output",
+ CellTags->"GAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7758, 289, 223, 7, 27, "Input",
+Cell[8816, 319, 223, 7, 27, "Input",
CellTags->"GAD",
CellID->488289901],
-Cell[7984, 298, 372, 11, 49, "Output",
- CellTags->"GAD",
- CellID->20038506]
+Cell[9042, 328, 353, 10, 51, "Output",
+ CellTags->"GAD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8393, 314, 273, 9, 27, "Input",
+Cell[9432, 343, 273, 9, 27, "Input",
CellTags->"GAD",
CellID->1528585205],
-Cell[8669, 325, 760, 31, 42, "Output",
- CellTags->"GAD",
- CellID->1687383827]
+Cell[9708, 354, 739, 30, 39, "Output",
+ CellTags->"GAD"]
}, Open ]]
}, Open ]],
-Cell[9456, 360, 31, 0, 70, "SectionFooterSpacer"]
+Cell[10474, 388, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9524, 365, 270, 12, 70, "SeeAlsoSection",
+Cell[10542, 393, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9797, 379, 513, 21, 70, "Text",
- CellTags->"GAD",
- CellID->127950767]
+Cell[10815, 407, 475, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[10325, 403, 23, 0, 70, "FooterCell"]
+Cell[11305, 429, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAE.nb
new file mode 100644
index 000000000..7d7316c9b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GAE.nb
@@ -0,0 +1,745 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 20131, 735]
+NotebookOptionsPosition[ 14532, 550]
+NotebookOutlinePosition[ 17804, 646]
+CellTagsIndexPosition[ 17697, 640]
+WindowTitle->GAE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GS"], "\<\"GAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GAE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GAE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GAE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$149585],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GAE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["GAE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"GAE", "[", "\[Mu]", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for a D-4-dimensional ",
+ Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ SuperscriptBox["\[Gamma]", "\[Mu]"], " "], TraditionalForm]]],
+ "and is transformed into DiracGamma[LorentzIndex[",
+ Cell[BoxData[
+ FormBox["\[Mu]", TraditionalForm]]],
+ ",D-4],D-4] by FeynCalcInternal (=FCI).GAE[",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", " ", "..."}], TraditionalForm]]],
+ "] is a short form for GAE[",
+ Cell[BoxData[
+ FormBox["\[Mu]", TraditionalForm]]],
+ "].GAE[",
+ Cell[BoxData[
+ FormBox["\[Nu]", TraditionalForm]]],
+ "]. ... ."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->718369389],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1585642947],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAE", "[", "\[Mu]", "]"}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[1]:=",
+ CellID->617064291],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{24, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GAE", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "-",
+ RowBox[{"GAE", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[2]:=",
+ CellID->1166403079],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{106, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"GAE", "[", "\[Mu]", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[3]:=",
+ CellID->1483888506],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{336, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[3]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAE", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[4]:=",
+ CellID->193869943],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{96, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"GAE", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[5]:=",
+ CellID->488289901],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GAE", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAE", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"GAE", "[", "\[Rho]", "]"}], ".",
+ RowBox[{"GAE", "[", "\[Sigma]", "]"}]}]], "Output",
+ ImageSize->{237, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[5]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAE", "[", "\[Alpha]", "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"p", ",", "\[Alpha]"}], "]"}]}], "//", "Contract"}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[6]:=",
+ CellID->1528585205],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{35, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAE", "[", "\[Alpha]", "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Alpha]"}], "]"}]}], "//", "Contract"}]], "Input",
+ CellTags->"GAD",
+ CellLabel->"In[7]:=",
+ CellID->339703616],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GAD",
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell["\<\
+In order to use Dirac algebra with D-4 dimensional objects you need to \
+activate the t'Hooft-Veltman-Breitenlohner-Maison scheme first\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox["\<\"NDR\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GAE", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"DiracTrick", "::", "failmsg"}], "MessageName"], ":",
+ " ", "\<\"Error! DiracTrick has encountered a fatal problem and must abort \
+the computation. The problem reads: \
+\[NoBreak]\\!\\(\\*FormBox[\\\"\\\\\\\"Incorrect combination of dimensions \
+and g^5 scheme!\\\\\\\"\\\", TraditionalForm]\\)\[NoBreak] \
+\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
+ButtonFrame->None, ButtonData:>\\\"paclet:FeynCalc/ref/DiracTrick\\\", \
+ButtonNote -> \\\"FeynCalc`DiracTrick::failmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[9]:="],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[10]:="],
+
+Cell[BoxData[
+ FormBox["\<\"BMHV\"\>", TraditionalForm]], "Output",
+ ImageSize->{47, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GAE", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[11]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"D", "-", "4"}], TraditionalForm]], "Output",
+ ImageSize->{44, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[12]:="],
+
+Cell[BoxData[
+ FormBox["\<\"NDR\"\>", TraditionalForm]], "Output",
+ ImageSize->{35, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GA",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GS",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GAD",
+ ButtonNote->"GAD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"GAE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 17.316393}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "GAE[\\[Mu]] can be used as input for a D-4-dimensional \
+\\[Gamma]^\\[Mu]and is transformed into \
+DiracGamma[LorentzIndex[\\[Mu],D-4],D-4] by FeynCalcInternal \
+(=FCI).GAE[\\[Mu], \\[Nu], ...] is a short form for GAE[\\[Mu]].GAE[\\[Nu]]. \
+... .", "synonyms" -> {}, "tabletags" -> {}, "title" -> "GAE",
+ "titlemodifier" -> "", "windowtitle" -> "GAE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GAE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5070, 146, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->718369389]},
+ "GAD"->{
+ Cell[5703, 175, 121, 4, 27, "Input",
+ CellTags->"GAD",
+ CellID->617064291],
+ Cell[5827, 181, 313, 12, 37, "Output",
+ CellTags->"GAD"],
+ Cell[6177, 198, 235, 8, 27, "Input",
+ CellTags->"GAD",
+ CellID->1166403079],
+ Cell[6415, 208, 988, 41, 37, "Output",
+ CellTags->"GAD"],
+ Cell[7440, 254, 192, 6, 27, "Input",
+ CellTags->"GAD",
+ CellID->1483888506],
+ Cell[7635, 262, 391, 13, 51, "Output",
+ CellTags->"GAD"],
+ Cell[8063, 280, 183, 6, 27, "Input",
+ CellTags->"GAD",
+ CellID->193869943],
+ Cell[8249, 288, 931, 39, 37, "Output",
+ CellTags->"GAD"],
+ Cell[9217, 332, 223, 7, 27, "Input",
+ CellTags->"GAD",
+ CellID->488289901],
+ Cell[9443, 341, 353, 10, 51, "Output",
+ CellTags->"GAD"],
+ Cell[9833, 356, 243, 8, 27, "Input",
+ CellTags->"GAD",
+ CellID->1528585205],
+ Cell[10079, 366, 346, 13, 37, "Output",
+ CellTags->"GAD"],
+ Cell[10462, 384, 241, 8, 27, "Input",
+ CellTags->"GAD",
+ CellID->339703616],
+ Cell[10706, 394, 184, 6, 35, "Output",
+ CellTags->"GAD"]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16530, 597},
+ {"GAD", 16660, 601}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3210, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3788, 100, 280, 11, 45, "ObjectNameGrid"],
+Cell[4071, 113, 974, 29, 123, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5070, 146, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->718369389],
+Cell[CellGroupData[{
+Cell[5482, 165, 196, 6, 26, "ExampleSection",
+ CellID->1585642947],
+Cell[CellGroupData[{
+Cell[5703, 175, 121, 4, 27, "Input",
+ CellTags->"GAD",
+ CellID->617064291],
+Cell[5827, 181, 313, 12, 37, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6177, 198, 235, 8, 27, "Input",
+ CellTags->"GAD",
+ CellID->1166403079],
+Cell[6415, 208, 988, 41, 37, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7440, 254, 192, 6, 27, "Input",
+ CellTags->"GAD",
+ CellID->1483888506],
+Cell[7635, 262, 391, 13, 51, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8063, 280, 183, 6, 27, "Input",
+ CellTags->"GAD",
+ CellID->193869943],
+Cell[8249, 288, 931, 39, 37, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9217, 332, 223, 7, 27, "Input",
+ CellTags->"GAD",
+ CellID->488289901],
+Cell[9443, 341, 353, 10, 51, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9833, 356, 243, 8, 27, "Input",
+ CellTags->"GAD",
+ CellID->1528585205],
+Cell[10079, 366, 346, 13, 37, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10462, 384, 241, 8, 27, "Input",
+ CellTags->"GAD",
+ CellID->339703616],
+Cell[10706, 394, 184, 6, 35, "Output",
+ CellTags->"GAD"]
+}, Open ]],
+Cell[10905, 403, 160, 3, 48, "Notes"],
+Cell[CellGroupData[{
+Cell[11090, 410, 107, 2, 27, "Input"],
+Cell[11200, 414, 176, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11413, 424, 182, 5, 27, "Input"],
+Cell[11598, 431, 664, 13, 79, "Message"],
+Cell[12265, 446, 173, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12475, 456, 109, 2, 27, "Input"],
+Cell[12587, 460, 178, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12802, 470, 183, 5, 27, "Input"],
+Cell[12988, 477, 190, 6, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13215, 488, 108, 2, 27, "Input"],
+Cell[13326, 492, 177, 5, 35, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[13530, 501, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13598, 506, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[13871, 520, 619, 25, 56, "SeeAlso"]
+}, Open ]],
+Cell[14505, 548, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GFAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GFAD.nb
new file mode 100644
index 000000000..af27132b0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GFAD.nb
@@ -0,0 +1,392 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12028, 382]
+NotebookOptionsPosition[ 8699, 290]
+NotebookOutlinePosition[ 11258, 352]
+CellTagsIndexPosition[ 11173, 347]
+WindowTitle->GFAD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GFAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GFAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GFAD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$154879],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GFAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["GFAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"GFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"x", ",", "s"}], "}"}], ",", "n"}], "}"}], ",",
+ "..."}]}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a generic propagator given by 1/[x + \
+s*I*eta]^n, where x can be an arbitray expression. For brevity one can also \
+use shorter forms such as GFAD[{x, n}, ...], GFAD[{x}, ...] or GFAD[x, ...]. \
+If s is not explicitly specified, then its value is determined by the option \
+EtaSign, which has the default value +1. If n is not explicitly specified, \
+then the default value 1 is assumed. Translation into FeynCalc internal form \
+is performed by FeynCalcInternal, where a GFAD is encoded using the special \
+head GenericPropagatorDenominator."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->415952031],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->239829988],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GFAD", "[",
+ RowBox[{
+ RowBox[{"2", "z", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "q"}], "]"}], " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p2", ",", "q"}], "]"}]}], "+", " ",
+ RowBox[{"x", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1372671718],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ RowBox[{"x", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],
+ TraditionalForm], ")"}]}]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{262, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->150129956]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1951300851],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"x", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}]], TraditionalForm]], "Output",
+ ImageSize->{221, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->369428740]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->813934019],
+
+Cell[BoxData[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"x", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}], "+",
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "q"}], "]"}], " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"p2", ",", "q"}], "]"}]}]}]]], "Output",
+ ImageSize->{315, 36},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->618367511]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"GFAD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 29.904006}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "GFAD[{{{x, s}, n}, ...] denotes a generic propagator given by 1/[x + \
+s*I*eta]^n, where x can be an arbitray expression. For brevity one can also \
+use shorter forms such as GFAD[{x, n}, ...], GFAD[{x}, ...] or GFAD[x, ...]. \
+If s is not explicitly specified, then its value is determined by the option \
+EtaSign, which has the default value +1. If n is not explicitly specified, \
+then the default value 1 is assumed. Translation into FeynCalc internal form \
+is performed by FeynCalcInternal, where a GFAD is encoded using the special \
+head GenericPropagatorDenominator.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "GFAD", "titlemodifier" -> "", "windowtitle" -> "GFAD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/GFAD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4241, 119, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->415952031]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11030, 340}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[3120, 89, 1096, 26, 171, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4241, 119, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->415952031],
+Cell[CellGroupData[{
+Cell[4653, 138, 195, 6, 26, "ExampleSection",
+ CellID->239829988],
+Cell[CellGroupData[{
+Cell[4873, 148, 370, 12, 27, "Input",
+ CellID->1372671718],
+Cell[5246, 162, 1428, 39, 59, "Output",
+ CellID->150129956]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6711, 206, 123, 3, 27, "Input",
+ CellID->1951300851],
+Cell[6837, 211, 1164, 46, 59, "Output",
+ CellID->369428740]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8038, 262, 130, 4, 27, "Input",
+ CellID->813934019],
+Cell[8171, 268, 462, 15, 72, "Output",
+ CellID->618367511]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8672, 288, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GGV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GGV.nb
index 15fb1400b..c620a5b97 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GGV.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GGV.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5905, 185]
-NotebookOptionsPosition[ 3790, 121]
-NotebookOutlinePosition[ 5650, 174]
-CellTagsIndexPosition[ 5585, 169]
+NotebookDataLength[ 6693, 206]
+NotebookOptionsPosition[ 4750, 151]
+NotebookOutlinePosition[ 6486, 198]
+CellTagsIndexPosition[ 6443, 195]
WindowTitle->GGV
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GGV\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GGV"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GGV.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$81663],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GGV",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonGhostVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonGhostVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GGV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GGV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GGV.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$155315],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GGV",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GGV", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GGV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"GluonGhostVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GGV",
- CellID->535760603]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 49.141458}",
+ "built" -> "{2020, 1, 5, 18, 58, 30.938984}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "GGV is equivalent to GluonGhostVertex.",
- "synonyms" -> {}, "title" -> "GGV", "titlemodifier" -> "", "windowtitle" ->
- "GGV", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GGV"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GGV", "titlemodifier" ->
+ "", "windowtitle" -> "GGV", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GGV"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GGV"->{
- Cell[3502, 107, 246, 9, 70, "Text",
- CellTags->"GGV",
- CellID->535760603]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GGV", 5480, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2998, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 340, 11, 70, "Usage",
+Cell[3576, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3859, 110, 340, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3229, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4224, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3502, 107, 246, 9, 70, "Text",
- CellTags->"GGV",
- CellID->535760603]
+Cell[4497, 139, 211, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3763, 119, 23, 0, 70, "FooterCell"]
+Cell[4723, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GHP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GHP.nb
index 9c739679f..7c79e6317 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GHP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GHP.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11585, 417]
-NotebookOptionsPosition[ 7442, 280]
-NotebookOutlinePosition[ 10278, 364]
-CellTagsIndexPosition[ 10173, 358]
+NotebookDataLength[ 12644, 443]
+NotebookOptionsPosition[ 8754, 318]
+NotebookOutlinePosition[ 11466, 397]
+CellTagsIndexPosition[ 11359, 391]
WindowTitle->GHP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GHP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GHP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GHP.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$82354],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GHP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GhostPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GhostPropagator"], "\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"GluonGhostVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonGhostVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GHP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GHP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GHP.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$156223],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GHP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GHP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GHP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,7 +150,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->99090036],
+ CellID->1853416107],
Cell[CellGroupData[{
@@ -124,7 +160,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->261177431],
+ CellID->1687938001],
Cell[CellGroupData[{
@@ -146,12 +182,11 @@ Cell[BoxData[
TraditionalForm]}]], "(",
FormBox["p",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{54, 17},
+ ImageSize->{61, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GHP",
- CellLabel->"Out[1]=",
- CellID->798549713]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -166,22 +201,29 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["\[ImaginaryI]",
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{27, 48},
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{28, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GHP",
- CellLabel->"Out[2]=",
- CellID->1879723497]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"GHP", "[",
- RowBox[{"p", ",", "1", ",", "2"}], "]"}]], "Input",
+ RowBox[{"p", ",", "c1", ",", "c2"}], "]"}]], "Input",
CellTags->"GHP",
CellLabel->"In[3]:=",
CellID->1429235603],
@@ -191,18 +233,17 @@ Cell[BoxData[
RowBox[{
SubscriptBox["\[CapitalPi]",
RowBox[{
- FormBox["ci1",
+ FormBox["c1",
TraditionalForm],
- FormBox["ci2",
+ FormBox["c2",
TraditionalForm]}]], "(",
FormBox["p",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{68, 17},
+ ImageSize->{66, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GHP",
- CellLabel->"Out[3]=",
- CellID->1586595147]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -213,7 +254,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"GHP", "[",
RowBox[{
- RowBox[{"-", "k"}], ",", "3", ",", "4"}], "]"}], "//", "Explicit"}],
+ RowBox[{"-", "k"}], ",", "c3", ",", "c4"}], "]"}], "//", "Explicit"}],
"]"}], "]"}]], "Input",
CellTags->"GHP",
CellLabel->"In[4]:=",
@@ -223,13 +264,12 @@ Cell[BoxData[
RowBox[{"\[ImaginaryI]", " ",
RowBox[{"FAD", "[", "k", "]"}], " ",
RowBox[{"SD", "[",
- RowBox[{"ci3", ",", "ci4"}], "]"}]}]], "Output",
- ImageSize->{164, 15},
+ RowBox[{"c3", ",", "c4"}], "]"}]}]], "Output",
+ ImageSize->{152, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GHP",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1550998879]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -271,9 +311,7 @@ Cell[TextData[{
ButtonNote->"GluonGhostVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GHP",
- CellID->269539325]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -281,7 +319,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"GHP",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -290,21 +328,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 52.119169}",
+ "built" -> "{2020, 1, 5, 18, 58, 33.122946}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"GHP[p, a, b] gives the ghost propagator where \"a\" and \"b\" are the \
-color indices. GHP[p] omits the \\[Delta] ab.", "synonyms" -> {}, "title" ->
- "GHP", "titlemodifier" -> "", "windowtitle" -> "GHP", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/GHP"}, "SearchTextTranslated" -> ""},
+color indices. GHP[p] omits the \\[Delta] ab.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "GHP", "titlemodifier" -> "", "windowtitle" ->
+ "GHP", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GHP"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -312,8 +351,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -322,103 +362,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3521, 101, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[4732, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->99090036]},
+ CellID->1853416107]},
"GHP"->{
- Cell[4152, 130, 151, 5, 27, "Input",
+ Cell[5366, 166, 151, 5, 27, "Input",
CellTags->"GHP",
CellID->1087938540],
- Cell[4306, 137, 396, 16, 38, "Output",
- CellTags->"GHP",
- CellID->798549713],
- Cell[4739, 158, 147, 5, 27, "Input",
+ Cell[5520, 173, 376, 15, 38, "Output",
+ CellTags->"GHP"],
+ Cell[5933, 193, 147, 5, 27, "Input",
CellTags->"GHP",
CellID->16593768],
- Cell[4889, 165, 299, 11, 69, "Output",
- CellTags->"GHP",
- CellID->1879723497],
- Cell[5225, 181, 151, 5, 27, "Input",
+ Cell[6083, 200, 494, 18, 60, "Output",
+ CellTags->"GHP"],
+ Cell[6614, 223, 153, 5, 27, "Input",
CellTags->"GHP",
CellID->1429235603],
- Cell[5379, 188, 401, 16, 38, "Output",
- CellTags->"GHP",
- CellID->1586595147],
- Cell[5817, 209, 283, 10, 27, "Input",
+ Cell[6770, 230, 378, 15, 38, "Output",
+ CellTags->"GHP"],
+ Cell[7185, 250, 285, 10, 27, "Input",
CellTags->"GHP",
CellID->1957617706],
- Cell[6103, 221, 323, 10, 49, "Output",
- CellTags->"GHP",
- CellID->1550998879],
- Cell[6794, 254, 606, 21, 32, "Text",
- CellTags->"GHP",
- CellID->269539325]}
+ Cell[7473, 262, 300, 9, 51, "Output",
+ CellTags->"GHP"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9268, 323},
- {"GHP", 9397, 327}
+ {"PrimaryExamplesSection", 10626, 363},
+ {"GHP", 10757, 367}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3214, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 632, 19, 84, "Usage",
+Cell[3792, 101, 280, 11, 45, "ObjectNameGrid"],
+Cell[4075, 114, 632, 19, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3521, 101, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4732, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->99090036],
+ CellID->1853416107],
Cell[CellGroupData[{
-Cell[3932, 120, 195, 6, 25, "ExampleSection",
- CellID->261177431],
+Cell[5145, 156, 196, 6, 26, "ExampleSection",
+ CellID->1687938001],
Cell[CellGroupData[{
-Cell[4152, 130, 151, 5, 27, "Input",
+Cell[5366, 166, 151, 5, 27, "Input",
CellTags->"GHP",
CellID->1087938540],
-Cell[4306, 137, 396, 16, 38, "Output",
- CellTags->"GHP",
- CellID->798549713]
+Cell[5520, 173, 376, 15, 38, "Output",
+ CellTags->"GHP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4739, 158, 147, 5, 27, "Input",
+Cell[5933, 193, 147, 5, 27, "Input",
CellTags->"GHP",
CellID->16593768],
-Cell[4889, 165, 299, 11, 69, "Output",
- CellTags->"GHP",
- CellID->1879723497]
+Cell[6083, 200, 494, 18, 60, "Output",
+ CellTags->"GHP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5225, 181, 151, 5, 27, "Input",
+Cell[6614, 223, 153, 5, 27, "Input",
CellTags->"GHP",
CellID->1429235603],
-Cell[5379, 188, 401, 16, 38, "Output",
- CellTags->"GHP",
- CellID->1586595147]
+Cell[6770, 230, 378, 15, 38, "Output",
+ CellTags->"GHP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5817, 209, 283, 10, 27, "Input",
+Cell[7185, 250, 285, 10, 27, "Input",
CellTags->"GHP",
CellID->1957617706],
-Cell[6103, 221, 323, 10, 49, "Output",
- CellTags->"GHP",
- CellID->1550998879]
+Cell[7473, 262, 300, 9, 51, "Output",
+ CellTags->"GHP"]
}, Open ]]
}, Open ]],
-Cell[6453, 235, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7800, 275, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6521, 240, 270, 12, 31, "SeeAlsoSection",
+Cell[7868, 280, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6794, 254, 606, 21, 32, "Text",
- CellTags->"GHP",
- CellID->269539325]
+Cell[8141, 294, 571, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[7415, 278, 23, 0, 42, "FooterCell"]
+Cell[8727, 316, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GO.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GO.nb
index 1fa3293bd..71052f123 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GO.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GO.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5905, 185]
-NotebookOptionsPosition[ 3795, 121]
-NotebookOutlinePosition[ 5650, 174]
-CellTagsIndexPosition[ 5586, 169]
+NotebookDataLength[ 6716, 206]
+NotebookOptionsPosition[ 4775, 151]
+NotebookOutlinePosition[ 6509, 198]
+CellTagsIndexPosition[ 6466, 195]
WindowTitle->GO
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GO\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GO"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GO.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$84415],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GO",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2GluonOperator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2GluonOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GO\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GO"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GO.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$158984],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GO",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GO", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GO", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"Twist2GluonOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GO",
- CellID->1926074292]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 2.046434}",
+ "built" -> "{2020, 1, 5, 18, 58, 40.306182}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "GO is equivalent to Twist2GluonOperator.",
- "synonyms" -> {}, "title" -> "GO", "titlemodifier" -> "", "windowtitle" ->
- "GO", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GO"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GO", "titlemodifier" ->
+ "", "windowtitle" -> "GO", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GO"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GO"->{
- Cell[3498, 107, 255, 9, 70, "Text",
- CellTags->"GO",
- CellID->1926074292]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GO", 5481, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3014, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 342, 11, 70, "Usage",
+Cell[3591, 97, 279, 11, 70, "ObjectNameGrid"],
+Cell[3873, 110, 342, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3225, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4240, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3498, 107, 255, 9, 70, "Text",
- CellTags->"GO",
- CellID->1926074292]
+Cell[4513, 139, 220, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3768, 119, 23, 0, 70, "FooterCell"]
+Cell[4748, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GP.nb
index 05619baaf..92c38639d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GP.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5882, 185]
-NotebookOptionsPosition[ 3778, 121]
-NotebookOutlinePosition[ 5628, 174]
-CellTagsIndexPosition[ 5564, 169]
+NotebookDataLength[ 6679, 205]
+NotebookOptionsPosition[ 4742, 150]
+NotebookOutlinePosition[ 6472, 197]
+CellTagsIndexPosition[ 6429, 194]
WindowTitle->GP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GP.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$84765],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GP.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$159432],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,14 +95,23 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["GP"], "InlineFormula"],
- " \[LineSeparator]",
- "is equivalent to GluonPropagator."
+ " \[LineSeparator]is equivalent to GluonPropagator."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,9 +143,7 @@ Cell[TextData[{
ButtonNote->"GluonPropagator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GP",
- CellID->444986205]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +160,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 3.312731}",
+ "built" -> "{2020, 1, 5, 18, 58, 41.255438}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "GP is equivalent to GluonPropagator.",
- "synonyms" -> {}, "title" -> "GP", "titlemodifier" -> "", "windowtitle" ->
- "GP", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GP"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GP", "titlemodifier" ->
+ "", "windowtitle" -> "GP", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GP"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +182,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GP"->{
- Cell[3494, 107, 242, 9, 70, "Text",
- CellTags->"GP",
- CellID->444986205]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GP", 5460, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3006, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 338, 11, 70, "Usage",
+Cell[3583, 97, 279, 11, 70, "ObjectNameGrid"],
+Cell[3865, 110, 329, 10, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3221, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4219, 124, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3494, 107, 242, 9, 70, "Text",
- CellTags->"GP",
- CellID->444986205]
+Cell[4492, 138, 208, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3751, 119, 23, 0, 70, "FooterCell"]
+Cell[4715, 148, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GS.nb
index ba714e45a..995cc6bba 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GS.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GS.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14530, 529]
-NotebookOptionsPosition[ 9845, 375]
-NotebookOutlinePosition[ 13042, 468]
-CellTagsIndexPosition[ 12936, 462]
+NotebookDataLength[ 15017, 534]
+NotebookOptionsPosition[ 10690, 396]
+NotebookOutlinePosition[ 13679, 481]
+CellTagsIndexPosition[ 13573, 475]
WindowTitle->GS
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GS\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GS"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GS.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$85811],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GS",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GS.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$161227],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GS",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GS", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -122,7 +156,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1189847232],
+ CellID->1090110818],
Cell[CellGroupData[{
@@ -132,7 +166,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->232924120],
+ CellID->808016956],
Cell[CellGroupData[{
@@ -151,12 +185,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{33, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GS",
- CellLabel->"Out[1]=",
- CellID->682141754]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -173,12 +206,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"Momentum", "[", "p", "]"}], "]"}]], "Output",
- ImageSize->{195, 15},
+ ImageSize->{194, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GS",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1007084382]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -233,12 +265,11 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{179, 18},
+ ImageSize->{197, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GS",
- CellLabel->"Out[3]=",
- CellID->1827181467]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -258,12 +289,11 @@ Cell[BoxData[
RowBox[{"GS", "[", "q", "]"}], ".",
RowBox[{"GS", "[", "r", "]"}], ".",
RowBox[{"GS", "[", "s", "]"}]}]], "Output",
- ImageSize->{194, 15},
+ ImageSize->{197, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GS",
- CellLabel->"Out[4]//StandardForm=",
- CellID->451922065]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -313,12 +343,11 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{165, 18},
+ ImageSize->{183, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GS",
- CellLabel->"Out[5]=",
- CellID->373152039]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -348,12 +377,6 @@ Cell[TextData[{
ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["GA",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GA",
@@ -366,9 +389,7 @@ Cell[TextData[{
ButtonNote->"GAD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GS",
- CellID->1515784011]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -376,7 +397,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"GS",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -385,10 +406,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 7.553793}",
+ "built" -> "{2020, 1, 5, 18, 58, 45.520183}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -398,11 +419,11 @@ TaggingRules->{
\\[NegativeMediumSpace]\\[NegativeMediumSpace]\\ \\[NegativeMediumSpace]/ (= \
\\[Gamma].p = \\[Gamma]\\[Mu] p^\\[Mu]) and is transformed into \
DiracGamma[Momentum[p]] by FeynCalcInternal (=FCI). GS[p,q, ...] is a short \
-form for GS[p].GS[q]. ... .", "synonyms" -> {}, "title" -> "GS",
- "titlemodifier" -> "", "windowtitle" -> "GS", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GS"}, "SearchTextTranslated" -> ""},
+form for GS[p].GS[q]. ... .", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "GS", "titlemodifier" -> "", "windowtitle" -> "GS", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/GS"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -411,7 +432,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -420,117 +441,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3857, 109, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5004, 143, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1189847232]},
+ CellID->1090110818]},
"GS"->{
- Cell[4490, 138, 116, 4, 27, "Input",
+ Cell[5637, 172, 116, 4, 27, "Input",
CellTags->"GS",
CellID->1176675883],
- Cell[4609, 144, 365, 14, 38, "Output",
- CellTags->"GS",
- CellID->682141754],
- Cell[5011, 163, 181, 7, 27, "Input",
+ Cell[5756, 178, 345, 13, 37, "Output",
+ CellTags->"GS"],
+ Cell[6138, 196, 181, 7, 27, "Input",
CellTags->"GS",
CellID->1027241244],
- Cell[5195, 172, 262, 8, 49, "Output",
- CellTags->"GS",
- CellID->1007084382],
- Cell[5494, 185, 159, 5, 27, "Input",
+ Cell[6322, 205, 241, 7, 51, "Output",
+ CellTags->"GS"],
+ Cell[6600, 217, 159, 5, 27, "Input",
CellTags->"GS",
CellID->1339265647],
- Cell[5656, 192, 1220, 48, 39, "Output",
- CellTags->"GS",
- CellID->1827181467],
- Cell[6913, 245, 197, 7, 27, "Input",
+ Cell[6762, 224, 1199, 47, 37, "Output",
+ CellTags->"GS"],
+ Cell[7998, 276, 197, 7, 27, "Input",
CellTags->"GS",
CellID->837744205],
- Cell[7113, 254, 348, 11, 49, "Output",
- CellTags->"GS",
- CellID->451922065],
- Cell[7498, 270, 256, 9, 27, "Input",
+ Cell[8198, 285, 328, 10, 51, "Output",
+ CellTags->"GS"],
+ Cell[8563, 300, 256, 9, 27, "Input",
CellTags->"GS",
CellID->2143558790],
- Cell[7757, 281, 1000, 39, 39, "Output",
- CellTags->"GS",
- CellID->373152039],
- Cell[9125, 343, 678, 27, 70, "Text",
- CellTags->"GS",
- CellID->1515784011]}
+ Cell[8822, 311, 980, 38, 37, "Output",
+ CellTags->"GS"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11873, 421},
- {"GS", 12003, 425}
+ {"PrimaryExamplesSection", 12705, 442},
+ {"GS", 12835, 446}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3146, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 974, 27, 102, "Usage",
+Cell[3723, 99, 279, 11, 45, "ObjectNameGrid"],
+Cell[4005, 112, 974, 27, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3857, 109, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5004, 143, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1189847232],
+ CellID->1090110818],
Cell[CellGroupData[{
-Cell[4270, 128, 195, 6, 25, "ExampleSection",
- CellID->232924120],
+Cell[5417, 162, 195, 6, 26, "ExampleSection",
+ CellID->808016956],
Cell[CellGroupData[{
-Cell[4490, 138, 116, 4, 27, "Input",
+Cell[5637, 172, 116, 4, 27, "Input",
CellTags->"GS",
CellID->1176675883],
-Cell[4609, 144, 365, 14, 38, "Output",
- CellTags->"GS",
- CellID->682141754]
+Cell[5756, 178, 345, 13, 37, "Output",
+ CellTags->"GS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5011, 163, 181, 7, 27, "Input",
+Cell[6138, 196, 181, 7, 27, "Input",
CellTags->"GS",
CellID->1027241244],
-Cell[5195, 172, 262, 8, 49, "Output",
- CellTags->"GS",
- CellID->1007084382]
+Cell[6322, 205, 241, 7, 51, "Output",
+ CellTags->"GS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5494, 185, 159, 5, 27, "Input",
+Cell[6600, 217, 159, 5, 27, "Input",
CellTags->"GS",
CellID->1339265647],
-Cell[5656, 192, 1220, 48, 39, "Output",
- CellTags->"GS",
- CellID->1827181467]
+Cell[6762, 224, 1199, 47, 37, "Output",
+ CellTags->"GS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6913, 245, 197, 7, 27, "Input",
+Cell[7998, 276, 197, 7, 27, "Input",
CellTags->"GS",
CellID->837744205],
-Cell[7113, 254, 348, 11, 49, "Output",
- CellTags->"GS",
- CellID->451922065]
+Cell[8198, 285, 328, 10, 51, "Output",
+ CellTags->"GS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7498, 270, 256, 9, 27, "Input",
+Cell[8563, 300, 256, 9, 27, "Input",
CellTags->"GS",
CellID->2143558790],
-Cell[7757, 281, 1000, 39, 39, "Output",
- CellTags->"GS",
- CellID->373152039]
+Cell[8822, 311, 980, 38, 37, "Output",
+ CellTags->"GS"]
}, Open ]]
}, Open ]],
-Cell[8784, 324, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9829, 353, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8852, 329, 270, 12, 31, "SeeAlsoSection",
+Cell[9897, 358, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9125, 343, 678, 27, 70, "Text",
- CellTags->"GS",
- CellID->1515784011]
+Cell[10170, 372, 478, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[9818, 373, 23, 0, 70, "FooterCell"]
+Cell[10663, 394, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSD.nb
index 382ef549a..ccd983bab 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSD.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14186, 516]
-NotebookOptionsPosition[ 9476, 362]
-NotebookOutlinePosition[ 12692, 455]
-CellTagsIndexPosition[ 12585, 449]
+NotebookDataLength[ 14716, 523]
+NotebookOptionsPosition[ 10306, 383]
+NotebookOutlinePosition[ 13374, 470]
+CellTagsIndexPosition[ 13267, 464]
WindowTitle->GSD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GSD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GSD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GSD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$85462],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GSD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GSD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GSD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GSD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$160324],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GSD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GSD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GSD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -123,7 +157,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->907754030],
+ CellID->1012071324],
Cell[CellGroupData[{
@@ -133,7 +167,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1497667716],
+ CellID->539816469],
Cell[CellGroupData[{
@@ -150,12 +184,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{31, 17},
+ ImageSize->{35, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GSD",
- CellLabel->"Out[1]=",
- CellID->69860572]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -174,12 +207,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}], ",", "D"}], "]"}]], "Output",
- ImageSize->{241, 15},
+ ImageSize->{240, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GSD",
- CellLabel->"Out[2]//StandardForm=",
- CellID->2038587686]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -226,12 +258,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{167, 17},
+ ImageSize->{185, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GSD",
- CellLabel->"Out[3]=",
- CellID->136445387]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -251,12 +282,11 @@ Cell[BoxData[
RowBox[{"GSD", "[", "q", "]"}], ".",
RowBox[{"GSD", "[", "r", "]"}], ".",
RowBox[{"GSD", "[", "s", "]"}]}]], "Output",
- ImageSize->{226, 15},
+ ImageSize->{233, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GSD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1638135688]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -300,12 +330,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{156, 17},
+ ImageSize->{174, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GSD",
- CellLabel->"Out[5]=",
- CellID->1243501677]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -335,12 +364,6 @@ Cell[TextData[{
ButtonNote->"DiracGamma"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["GA",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GA",
@@ -353,17 +376,15 @@ Cell[TextData[{
ButtonNote->"GAD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GSD",
- CellID->1911106257]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"GSD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -372,10 +393,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 5.925222}",
+ "built" -> "{2020, 1, 5, 18, 58, 43.084491}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -386,10 +407,11 @@ TaggingRules->{
\\[NegativeMediumSpace]/ (= \\[Gamma].p = \\[Gamma]\\[Mu] p^\\[Mu]) and is \
transformed into DiracGamma[Momentum[p,D],D] by FeynCalcInternal (=FCI). \
GSD[p,q, ...] is a short form for GSD[p].GSD[q]. ... .", "synonyms" -> {},
- "title" -> "GSD", "titlemodifier" -> "", "windowtitle" -> "GSD", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/GSD"}, "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "GSD", "titlemodifier" -> "", "windowtitle" ->
+ "GSD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GSD"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -397,8 +419,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -407,117 +430,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3873, 110, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5006, 144, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->907754030]},
+ CellID->1012071324]},
"GSD"->{
- Cell[4506, 139, 115, 4, 27, "Input",
+ Cell[5639, 173, 115, 4, 27, "Input",
CellTags->"GSD",
CellID->4519520],
- Cell[4624, 145, 314, 12, 38, "Output",
- CellTags->"GSD",
- CellID->69860572],
- Cell[4975, 162, 182, 7, 27, "Input",
+ Cell[5757, 179, 295, 11, 37, "Output",
+ CellTags->"GSD"],
+ Cell[6089, 195, 182, 7, 27, "Input",
CellTags->"GSD",
CellID->714510926],
- Cell[5160, 171, 312, 10, 49, "Output",
- CellTags->"GSD",
- CellID->2038587686],
- Cell[5509, 186, 161, 5, 27, "Input",
+ Cell[6274, 204, 291, 9, 51, "Output",
+ CellTags->"GSD"],
+ Cell[6602, 218, 161, 5, 27, "Input",
CellTags->"GSD",
CellID->1291429952],
- Cell[5673, 193, 992, 40, 38, "Output",
- CellTags->"GSD",
- CellID->136445387],
- Cell[6702, 238, 200, 7, 27, "Input",
+ Cell[6766, 225, 972, 39, 37, "Output",
+ CellTags->"GSD"],
+ Cell[7775, 269, 200, 7, 27, "Input",
CellTags->"GSD",
CellID->1183068674],
- Cell[6905, 247, 354, 11, 49, "Output",
- CellTags->"GSD",
- CellID->1638135688],
- Cell[7296, 263, 259, 9, 27, "Input",
+ Cell[7978, 278, 333, 10, 51, "Output",
+ CellTags->"GSD"],
+ Cell[8348, 293, 259, 9, 27, "Input",
CellTags->"GSD",
CellID->957956427],
- Cell[7558, 274, 829, 33, 38, "Output",
- CellTags->"GSD",
- CellID->1243501677],
- Cell[8755, 330, 679, 27, 70, "Text",
- CellTags->"GSD",
- CellID->1911106257]}
+ Cell[8610, 304, 808, 32, 37, "Output",
+ CellTags->"GSD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11516, 408},
- {"GSD", 11646, 412}
+ {"PrimaryExamplesSection", 12393, 431},
+ {"GSD", 12524, 435}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3136, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 984, 28, 117, "Usage",
+Cell[3714, 99, 280, 11, 45, "ObjectNameGrid"],
+Cell[3997, 112, 984, 28, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3873, 110, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5006, 144, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->907754030],
+ CellID->1012071324],
Cell[CellGroupData[{
-Cell[4285, 129, 196, 6, 25, "ExampleSection",
- CellID->1497667716],
+Cell[5419, 163, 195, 6, 26, "ExampleSection",
+ CellID->539816469],
Cell[CellGroupData[{
-Cell[4506, 139, 115, 4, 27, "Input",
+Cell[5639, 173, 115, 4, 27, "Input",
CellTags->"GSD",
CellID->4519520],
-Cell[4624, 145, 314, 12, 38, "Output",
- CellTags->"GSD",
- CellID->69860572]
+Cell[5757, 179, 295, 11, 37, "Output",
+ CellTags->"GSD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4975, 162, 182, 7, 27, "Input",
+Cell[6089, 195, 182, 7, 27, "Input",
CellTags->"GSD",
CellID->714510926],
-Cell[5160, 171, 312, 10, 49, "Output",
- CellTags->"GSD",
- CellID->2038587686]
+Cell[6274, 204, 291, 9, 51, "Output",
+ CellTags->"GSD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5509, 186, 161, 5, 27, "Input",
+Cell[6602, 218, 161, 5, 27, "Input",
CellTags->"GSD",
CellID->1291429952],
-Cell[5673, 193, 992, 40, 38, "Output",
- CellTags->"GSD",
- CellID->136445387]
+Cell[6766, 225, 972, 39, 37, "Output",
+ CellTags->"GSD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6702, 238, 200, 7, 27, "Input",
+Cell[7775, 269, 200, 7, 27, "Input",
CellTags->"GSD",
CellID->1183068674],
-Cell[6905, 247, 354, 11, 49, "Output",
- CellTags->"GSD",
- CellID->1638135688]
+Cell[7978, 278, 333, 10, 51, "Output",
+ CellTags->"GSD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7296, 263, 259, 9, 27, "Input",
+Cell[8348, 293, 259, 9, 27, "Input",
CellTags->"GSD",
CellID->957956427],
-Cell[7558, 274, 829, 33, 38, "Output",
- CellTags->"GSD",
- CellID->1243501677]
+Cell[8610, 304, 808, 32, 37, "Output",
+ CellTags->"GSD"]
}, Open ]]
}, Open ]],
-Cell[8414, 311, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9445, 340, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8482, 316, 270, 12, 31, "SeeAlsoSection",
+Cell[9513, 345, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8755, 330, 679, 27, 70, "Text",
- CellTags->"GSD",
- CellID->1911106257]
+Cell[9786, 359, 478, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[9449, 360, 23, 0, 70, "FooterCell"]
+Cell[10279, 381, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSE.nb
new file mode 100644
index 000000000..74f039d1f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GSE.nb
@@ -0,0 +1,663 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18395, 653]
+NotebookOptionsPosition[ 13547, 500]
+NotebookOutlinePosition[ 16623, 587]
+CellTagsIndexPosition[ 16516, 581]
+WindowTitle->GSE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"GA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GA"], "\<\"GAD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GAD"], "\<\"GSD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GSD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GSE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GSE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GSE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$160774],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GSE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["GSE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"GSE", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for a D-4-dimensional ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ "p", " \[NegativeMediumSpace]",
+ "\[NegativeMediumSpace]\[NegativeMediumSpace]",
+ "\[NegativeMediumSpace]", "/", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"=",
+ RowBox[{"\[Gamma]", ".", "p"}]}], " ", "=", " ",
+ RowBox[{
+ SubscriptBox["\[Gamma]", "\[Mu]"],
+ SuperscriptBox["p", "\[Mu]"]}]}], ")"}]}], TraditionalForm]]],
+ " and is transformed into DiracGamma[Momentum[p,D-4],D-4] by \
+FeynCalcInternal (=FCI). GSE[p,q, ...] is a short form for GSE[p].GSE[q]. ... \
+."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1106263241],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1743763658],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GSE", "[", "p", "]"}]], "Input",
+ CellTags->"GSD",
+ CellLabel->"In[1]:=",
+ CellID->4519520],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{35, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GSD",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"GSE", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GSD",
+ CellLabel->"In[2]:=",
+ CellID->714510926],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{304, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GSD",
+ CellLabel->"Out[2]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GSE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GSD",
+ CellLabel->"In[3]:=",
+ CellID->1291429952],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{187, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GSD",
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GSD",
+ CellLabel->"In[4]:=",
+ CellID->1183068674],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSE", "[", "p", "]"}], ".",
+ RowBox[{"GSE", "[", "q", "]"}], ".",
+ RowBox[{"GSE", "[", "r", "]"}], ".",
+ RowBox[{"GSE", "[", "s", "]"}]}]], "Output",
+ ImageSize->{233, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GSD",
+ CellLabel->"Out[4]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSE", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSE", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GSE", "[", "q", "]"}]}]], "Input",
+ CellTags->"GSD",
+ CellLabel->"In[5]:=",
+ CellID->957956427],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{174, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GSD",
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell["\<\
+In order to use Dirac algebra with D-4 dimensional objects you need to \
+activate the t'Hooft-Veltman-Breitenlohner-Maison scheme first\
+\>", "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[6]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GSE", "[", "q", "]"}], ".",
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"GSE", "[", "q", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"DiracTrick", "::", "failmsg"}], "MessageName"], ":",
+ " ", "\<\"Error! DiracTrick has encountered a fatal problem and must abort \
+the computation. The problem reads: \
+\[NoBreak]\\!\\(\\*FormBox[\\\"\\\\\\\"Incorrect combination of dimensions \
+and g^5 scheme!\\\\\\\"\\\", TraditionalForm]\\)\[NoBreak] \
+\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
+ButtonFrame->None, ButtonData:>\\\"paclet:FeynCalc/ref/DiracTrick\\\", \
+ButtonNote -> \\\"FeynCalc`DiracTrick::failmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[7]:="],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ ImageSize->{58, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[8]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GSE", "[", "q", "]"}], ".",
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"GSE", "[", "q", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{96, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",\
+
+ CellLabel->"In[10]:="]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GA",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GAD",
+ ButtonNote->"GAD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GSD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GSD",
+ ButtonNote->"GSD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"GSE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 44.359254}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "GSE[p] can be used as input for a D-4-dimensional p \
+\\[NegativeMediumSpace]\\[NegativeMediumSpace]\\[NegativeMediumSpace]\\ \
+\\[NegativeMediumSpace]/ (= \\[Gamma].p = \\[Gamma]\\[Mu] p^\\[Mu]) and is \
+transformed into DiracGamma[Momentum[p,D-4],D-4] by FeynCalcInternal (=FCI). \
+GSE[p,q, ...] is a short form for GSE[p].GSE[q]. ... .", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "GSE", "titlemodifier" -> "", "windowtitle" ->
+ "GSE", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GSE"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5079, 144, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1106263241]},
+ "GSD"->{
+ Cell[5713, 173, 115, 4, 27, "Input",
+ CellTags->"GSD",
+ CellID->4519520],
+ Cell[5831, 179, 346, 13, 37, "Output",
+ CellTags->"GSD"],
+ Cell[6214, 197, 182, 7, 27, "Input",
+ CellTags->"GSD",
+ CellID->714510926],
+ Cell[6399, 206, 383, 13, 51, "Output",
+ CellTags->"GSD"],
+ Cell[6819, 224, 161, 5, 27, "Input",
+ CellTags->"GSD",
+ CellID->1291429952],
+ Cell[6983, 231, 1200, 47, 37, "Output",
+ CellTags->"GSD"],
+ Cell[8220, 283, 200, 7, 27, "Input",
+ CellTags->"GSD",
+ CellID->1183068674],
+ Cell[8423, 292, 333, 10, 51, "Output",
+ CellTags->"GSD"],
+ Cell[8793, 307, 259, 9, 27, "Input",
+ CellTags->"GSD",
+ CellID->957956427],
+ Cell[9055, 318, 981, 38, 37, "Output",
+ CellTags->"GSD"]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15640, 548},
+ {"GSD", 15771, 552}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3212, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3790, 100, 280, 11, 45, "ObjectNameGrid"],
+Cell[4073, 113, 981, 27, 122, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5079, 144, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1106263241],
+Cell[CellGroupData[{
+Cell[5492, 163, 196, 6, 26, "ExampleSection",
+ CellID->1743763658],
+Cell[CellGroupData[{
+Cell[5713, 173, 115, 4, 27, "Input",
+ CellTags->"GSD",
+ CellID->4519520],
+Cell[5831, 179, 346, 13, 37, "Output",
+ CellTags->"GSD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6214, 197, 182, 7, 27, "Input",
+ CellTags->"GSD",
+ CellID->714510926],
+Cell[6399, 206, 383, 13, 51, "Output",
+ CellTags->"GSD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6819, 224, 161, 5, 27, "Input",
+ CellTags->"GSD",
+ CellID->1291429952],
+Cell[6983, 231, 1200, 47, 37, "Output",
+ CellTags->"GSD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8220, 283, 200, 7, 27, "Input",
+ CellTags->"GSD",
+ CellID->1183068674],
+Cell[8423, 292, 333, 10, 51, "Output",
+ CellTags->"GSD"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8793, 307, 259, 9, 27, "Input",
+ CellTags->"GSD",
+ CellID->957956427],
+Cell[9055, 318, 981, 38, 37, "Output",
+ CellTags->"GSD"]
+}, Open ]],
+Cell[10051, 359, 160, 3, 48, "Notes"],
+Cell[10214, 364, 127, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[10366, 372, 214, 6, 27, "Input"],
+Cell[10583, 380, 664, 13, 79, "Message"],
+Cell[11250, 395, 173, 5, 35, "Output"]
+}, Open ]],
+Cell[11438, 403, 128, 4, 27, "Input"],
+Cell[CellGroupData[{
+Cell[11591, 411, 214, 6, 27, "Input"],
+Cell[11808, 419, 576, 22, 39, "Output"]
+}, Open ]],
+Cell[12399, 444, 128, 4, 27, "Input"]
+}, Open ]],
+Cell[12542, 451, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12610, 456, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[12883, 470, 622, 25, 56, "SeeAlso"]
+}, Open ]],
+Cell[13520, 498, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GTI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GTI.nb
index 0d866269d..38555f024 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GTI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GTI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5900, 186]
-NotebookOptionsPosition[ 3765, 121]
-NotebookOutlinePosition[ 5644, 175]
-CellTagsIndexPosition[ 5579, 170]
+NotebookDataLength[ 6653, 206]
+NotebookOptionsPosition[ 4697, 151]
+NotebookOutlinePosition[ 6446, 198]
+CellTagsIndexPosition[ 6403, 195]
WindowTitle->GTI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GTI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GTI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GTI.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$86496],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GTI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GTI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GTI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GTI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$162111],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GTI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GTI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GTI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GTI",
- CellID->1799992921]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,20 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 11.120337}",
+ "built" -> "{2020, 1, 5, 18, 58, 47.827378}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"GTI is like RHI, but with no functional properties.", "synonyms" -> {},
- "title" -> "GTI", "titlemodifier" -> "", "windowtitle" -> "GTI", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/GTI"}},
+ "tabletags" -> {}, "title" -> "GTI", "titlemodifier" -> "", "windowtitle" ->
+ "GTI", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GTI"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -153,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GTI"->{
- Cell[3515, 107, 208, 9, 70, "Text",
- CellTags->"GTI",
- CellID->1799992921]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GTI", 5473, 163}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2971, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 353, 11, 70, "Usage",
+Cell[3549, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3832, 110, 353, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3242, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4210, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3515, 107, 208, 9, 70, "Text",
- CellTags->"GTI",
- CellID->1799992921]
+Cell[4483, 139, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3738, 119, 23, 0, 70, "FooterCell"]
+Cell[4670, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GV.nb
index 120efd945..d9894ab3c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GV.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GV.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5866, 185]
-NotebookOptionsPosition[ 3763, 121]
-NotebookOutlinePosition[ 5611, 174]
-CellTagsIndexPosition[ 5547, 169]
+NotebookDataLength[ 6655, 205]
+NotebookOptionsPosition[ 4727, 151]
+NotebookOutlinePosition[ 6448, 197]
+CellTagsIndexPosition[ 6405, 194]
WindowTitle->GV
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GV\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GV"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GV.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$86846],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/GV",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GV.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$162559],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/GV",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GV", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"GluonVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GV",
- CellID->1677627688]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,19 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 12.436577}",
+ "built" -> "{2020, 1, 5, 18, 58, 48.776521}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "GV is equivalent to GluonVertex.", "synonyms" -> {},
- "title" -> "GV", "titlemodifier" -> "", "windowtitle" -> "GV", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/GV"}},
+ "tabletags" -> {}, "title" -> "GV", "titlemodifier" -> "", "windowtitle" ->
+ "GV", "type" -> "Symbol", "uri" -> "FeynCalc/ref/GV"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +182,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GV"->{
- Cell[3490, 107, 231, 9, 70, "Text",
- CellTags->"GV",
- CellID->1677627688]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GV", 5442, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 2998, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 334, 11, 70, "Usage",
+Cell[3575, 97, 279, 11, 70, "ObjectNameGrid"],
+Cell[3857, 110, 334, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3217, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4216, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3490, 107, 231, 9, 70, "Text",
- CellTags->"GV",
- CellID->1677627688]
+Cell[4489, 139, 196, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3736, 119, 23, 0, 70, "FooterCell"]
+Cell[4700, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma1.nb
index 80fc859a4..889e4ecb9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma1.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6263, 197]
-NotebookOptionsPosition[ 4059, 131]
-NotebookOutlinePosition[ 6004, 186]
-CellTagsIndexPosition[ 5936, 181]
+NotebookDataLength[ 7122, 219]
+NotebookOptionsPosition[ 5108, 163]
+NotebookOutlinePosition[ 6914, 211]
+CellTagsIndexPosition[ 6871, 208]
WindowTitle->Gamma1
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Gamma1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Gamma1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Gamma1.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Gamma2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Gamma2"], "\<\"Gamma3\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Gamma3"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Gamma1\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Gamma1"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/Gamma1.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$78567],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Gamma1",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$150033],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Gamma1", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Gamma1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Gamma1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -122,9 +156,7 @@ Cell[TextData[{
ButtonNote->"Gamma3"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Gamma1",
- CellID->257898662]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -141,21 +173,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 36.339476}",
+ "built" -> "{2020, 1, 5, 18, 58, 18.613921}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Gamma1[al, ga, be, de] is a special product of Gamma functions expanded \
-up to order Epsilon^2.", "synonyms" -> {}, "title" -> "Gamma1",
- "titlemodifier" -> "", "windowtitle" -> "Gamma1", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Gamma1"}},
+up to order Epsilon^2.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Gamma1", "titlemodifier" -> "", "windowtitle" -> "Gamma1", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Gamma1"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -164,41 +196,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Gamma1"->{
- Cell[3645, 111, 372, 15, 70, "Text",
- CellTags->"Gamma1",
- CellID->257898662]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Gamma1", 5827, 174}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 3089, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 478, 15, 70, "Usage",
+Cell[3670, 99, 283, 11, 70, "ObjectNameGrid"],
+Cell[3956, 112, 478, 15, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3372, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[4459, 131, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3645, 111, 372, 15, 70, "Text",
- CellTags->"Gamma1",
- CellID->257898662]
+Cell[4732, 145, 334, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4032, 129, 23, 0, 70, "FooterCell"]
+Cell[5081, 161, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma2.nb
index 4dd875438..ac946952e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma2.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6304, 196]
-NotebookOptionsPosition[ 4066, 130]
-NotebookOutlinePosition[ 6044, 185]
-CellTagsIndexPosition[ 5976, 180]
+NotebookDataLength[ 7165, 219]
+NotebookOptionsPosition[ 5114, 162]
+NotebookOutlinePosition[ 6957, 211]
+CellTagsIndexPosition[ 6914, 208]
WindowTitle->Gamma2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Gamma2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Gamma2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Gamma2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Gamma1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Gamma1"], "\<\"Gamma3\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Gamma3"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Gamma2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Gamma2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/Gamma2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$78913],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Gamma2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$150477],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Gamma2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Gamma2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Gamma2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -121,9 +155,7 @@ Cell[TextData[{
ButtonNote->"Gamma3"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Gamma2",
- CellID->1475330785]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -140,10 +172,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 37.615407}",
+ "built" -> "{2020, 1, 5, 18, 58, 19.549158}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -151,10 +183,11 @@ TaggingRules->{
"None", "summary" ->
"Gamma2[x, y] is a special product of Gamma functions expanded up to \
order Epsilon^3 when positive integer arguments are given.", "synonyms" -> {},
- "title" -> "Gamma2", "titlemodifier" -> "", "windowtitle" -> "Gamma2",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/Gamma2"}},
+ "tabletags" -> {}, "title" -> "Gamma2", "titlemodifier" -> "",
+ "windowtitle" -> "Gamma2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Gamma2"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +196,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Gamma2"->{
- Cell[3651, 110, 373, 15, 70, "Text",
- CellTags->"Gamma2",
- CellID->1475330785]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Gamma2", 5866, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 3089, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 484, 14, 70, "Usage",
+Cell[3670, 99, 283, 11, 70, "ObjectNameGrid"],
+Cell[3956, 112, 484, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3378, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4465, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3651, 110, 373, 15, 70, "Text",
- CellTags->"Gamma2",
- CellID->1475330785]
+Cell[4738, 144, 334, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4039, 128, 23, 0, 70, "FooterCell"]
+Cell[5087, 160, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma3.nb
index b0483e5b8..362e0b558 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gamma3.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6459, 199]
-NotebookOptionsPosition[ 4154, 132]
-NotebookOutlinePosition[ 6199, 188]
-CellTagsIndexPosition[ 6131, 183]
+NotebookDataLength[ 7320, 222]
+NotebookOptionsPosition[ 5202, 164]
+NotebookOutlinePosition[ 7112, 214]
+CellTagsIndexPosition[ 7069, 211]
WindowTitle->Gamma3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Gamma3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Gamma3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Gamma3.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Gamma1\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Gamma1"], "\<\"Gamma2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Gamma2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Gamma3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Gamma3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/Gamma3.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$79259],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Gamma3",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$150921],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Gamma3", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Gamma3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Gamma3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -123,9 +157,7 @@ Cell[TextData[{
ButtonNote->"Gamma2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Gamma3",
- CellID->1609021158]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -142,10 +174,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 38.793105}",
+ "built" -> "{2020, 1, 5, 18, 58, 20.517376}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -153,11 +185,12 @@ TaggingRules->{
"None", "summary" ->
"Gamma3[al, be, ga, ep] is a special product of Gamma functions expanded \
up to order Epsilon^n when positive integer arguments are given (the order n \
-is determined by the option EpsilonOrder).", "synonyms" -> {}, "title" ->
- "Gamma3", "titlemodifier" -> "", "windowtitle" -> "Gamma3", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Gamma3"}},
+is determined by the option EpsilonOrder).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Gamma3", "titlemodifier" -> "",
+ "windowtitle" -> "Gamma3", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Gamma3"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -166,41 +199,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Gamma3"->{
- Cell[3739, 112, 373, 15, 70, "Text",
- CellTags->"Gamma3",
- CellID->1609021158]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Gamma3", 6021, 176}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 3089, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 572, 16, 70, "Usage",
+Cell[3670, 99, 283, 11, 70, "ObjectNameGrid"],
+Cell[3956, 112, 572, 16, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3466, 98, 270, 12, 70, "SeeAlsoSection",
+Cell[4553, 132, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3739, 112, 373, 15, 70, "Text",
- CellTags->"Gamma3",
- CellID->1609021158]
+Cell[4826, 146, 334, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4127, 130, 23, 0, 70, "FooterCell"]
+Cell[5175, 162, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaEpsilon.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaEpsilon.nb
index 02fe7b45f..1995dc146 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaEpsilon.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaEpsilon.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15740, 556]
-NotebookOptionsPosition[ 11019, 406]
-NotebookOutlinePosition[ 14177, 497]
-CellTagsIndexPosition[ 14061, 491]
+NotebookDataLength[ 16058, 557]
+NotebookOptionsPosition[ 11887, 430]
+NotebookOutlinePosition[ 14728, 509]
+CellTagsIndexPosition[ 14612, 503]
WindowTitle->GammaEpsilon
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GammaEpsilon\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GammaEpsilon"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GammaExpand\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GammaExpand"], "\<\"Series2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Series2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GammaEpsilon\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GammaEpsilon"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GammaEpsilon.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$79609],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GammaEpsilon", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$151369],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GammaEpsilon", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ GammaEpsilon.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GammaEpsilon", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GammaEpsilon", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1663045079],
+ CellID->76090078],
Cell[CellGroupData[{
@@ -118,14 +152,12 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1035397999],
+ CellID->1264124567],
Cell["\<\
If the argument is of the form (1+a Epsilon) the result is not calculated but \
tabulated.\
-\>", "Text",
- CellTags->"GammaEpsilon",
- CellID->1418061835],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -180,16 +212,15 @@ Cell[BoxData[
SuperscriptBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], "2"]}], "+",
- RowBox[{"C$23297", " ",
+ RowBox[{"C$44993", " ",
SuperscriptBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], "6"]}], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{335, 98},
+ ImageSize->{410, 88},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaEpsilon",
- CellLabel->"Out[1]=",
- CellID->1401166400]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -205,7 +236,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"C$23317", " ",
+ RowBox[{"C$45019", " ",
SuperscriptBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], "6"]}], "+",
@@ -242,17 +273,14 @@ Cell[BoxData[
TraditionalForm], "3"], " ",
TemplateBox[{"3"},
"Zeta"]}], "24"], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{450, 49},
+ ImageSize->{435, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaEpsilon",
- CellLabel->"Out[2]=",
- CellID->924354653]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["For other arguments the expansion is calculated.", "Text",
- CellTags->"GammaEpsilon",
- CellID->185068189],
+Cell["For other arguments the expansion is calculated.", "Notes"],
Cell[CellGroupData[{
@@ -265,7 +293,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"C$24452", " ",
+ RowBox[{"C$46162", " ",
SuperscriptBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], "6"]}], "+",
@@ -336,12 +364,11 @@ Cell[BoxData[
RowBox[{"288", " ",
TemplateBox[{"5"},
"Zeta"]}]}], ")"}]}], "1440"]}], TraditionalForm]], "Output",
- ImageSize->{561, 112},
+ ImageSize->{545, 90},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaEpsilon",
- CellLabel->"Out[3]=",
- CellID->208287808]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -356,12 +383,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"x"},
"Gamma"], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{37, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaEpsilon",
- CellLabel->"Out[4]=",
- CellID->460537482]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -397,9 +423,7 @@ Cell[TextData[{
ButtonNote->"Series2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GammaEpsilon",
- CellID->1891061042]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -416,22 +440,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 40.038799}",
+ "built" -> "{2020, 1, 5, 18, 58, 21.513053}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"GammaEpsilon[exp] gives a series expansion of Gamma[exp] in Epsilon up \
-to order 6 (where EulerGamma is neglected).", "synonyms" -> {}, "title" ->
- "GammaEpsilon", "titlemodifier" -> "", "windowtitle" -> "GammaEpsilon",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/GammaEpsilon"},
- "SearchTextTranslated" -> ""},
+to order 6 (where EulerGamma is neglected).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "GammaEpsilon", "titlemodifier" -> "",
+ "windowtitle" -> "GammaEpsilon", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GammaEpsilon"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -439,8 +463,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -449,115 +474,91 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3378, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4468, 129, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1663045079]},
+ CellID->76090078]},
"GammaEpsilon"->{
- Cell[3990, 122, 162, 5, 32, "Text",
- CellTags->"GammaEpsilon",
- CellID->1418061835],
- Cell[4177, 131, 188, 6, 27, "Input",
+ Cell[5218, 163, 188, 6, 27, "Input",
CellTags->"GammaEpsilon",
CellID->584681345],
- Cell[4368, 139, 1469, 52, 119, "Output",
- CellTags->"GammaEpsilon",
- CellID->1401166400],
- Cell[5874, 196, 188, 6, 27, "Input",
+ Cell[5409, 171, 1448, 51, 109, "Output",
+ CellTags->"GammaEpsilon"],
+ Cell[6894, 227, 188, 6, 27, "Input",
CellTags->"GammaEpsilon",
CellID->862497870],
- Cell[6065, 204, 1216, 45, 70, "Output",
- CellTags->"GammaEpsilon",
- CellID->924354653],
- Cell[7296, 252, 111, 2, 32, "Text",
- CellTags->"GammaEpsilon",
- CellID->185068189],
- Cell[7432, 258, 141, 4, 27, "Input",
+ Cell[7085, 235, 1196, 44, 61, "Output",
+ CellTags->"GammaEpsilon"],
+ Cell[8386, 286, 141, 4, 27, "Input",
CellTags->"GammaEpsilon",
CellID->910709306],
- Cell[7576, 264, 2218, 79, 133, "Output",
- CellTags->"GammaEpsilon",
- CellID->208287808],
- Cell[9831, 348, 135, 4, 27, "Input",
+ Cell[8530, 292, 2197, 78, 111, "Output",
+ CellTags->"GammaEpsilon"],
+ Cell[10764, 375, 135, 4, 27, "Input",
CellTags->"GammaEpsilon",
CellID->766916522],
- Cell[9969, 354, 243, 9, 36, "Output",
- CellTags->"GammaEpsilon",
- CellID->460537482],
- Cell[10580, 386, 397, 15, 32, "Text",
- CellTags->"GammaEpsilon",
- CellID->1891061042]}
+ Cell[10902, 381, 223, 8, 37, "Output",
+ CellTags->"GammaEpsilon"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12883, 450},
- {"GammaEpsilon", 13022, 454}
+ {"PrimaryExamplesSection", 13796, 475},
+ {"GammaEpsilon", 13934, 479}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3117, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 447, 13, 83, "Usage",
+Cell[3704, 99, 289, 11, 45, "ObjectNameGrid"],
+Cell[3996, 112, 447, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3378, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4468, 129, 386, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1663045079],
+ CellID->76090078],
Cell[CellGroupData[{
-Cell[3791, 114, 196, 6, 25, "ExampleSection",
- CellID->1035397999],
-Cell[3990, 122, 162, 5, 32, "Text",
- CellTags->"GammaEpsilon",
- CellID->1418061835],
+Cell[4879, 148, 196, 6, 26, "ExampleSection",
+ CellID->1264124567],
+Cell[5078, 156, 115, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4177, 131, 188, 6, 27, "Input",
+Cell[5218, 163, 188, 6, 27, "Input",
CellTags->"GammaEpsilon",
CellID->584681345],
-Cell[4368, 139, 1469, 52, 119, "Output",
- CellTags->"GammaEpsilon",
- CellID->1401166400]
+Cell[5409, 171, 1448, 51, 109, "Output",
+ CellTags->"GammaEpsilon"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5874, 196, 188, 6, 27, "Input",
+Cell[6894, 227, 188, 6, 27, "Input",
CellTags->"GammaEpsilon",
CellID->862497870],
-Cell[6065, 204, 1216, 45, 70, "Output",
- CellTags->"GammaEpsilon",
- CellID->924354653]
+Cell[7085, 235, 1196, 44, 61, "Output",
+ CellTags->"GammaEpsilon"]
}, Open ]],
-Cell[7296, 252, 111, 2, 32, "Text",
- CellTags->"GammaEpsilon",
- CellID->185068189],
+Cell[8296, 282, 65, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[7432, 258, 141, 4, 27, "Input",
+Cell[8386, 286, 141, 4, 27, "Input",
CellTags->"GammaEpsilon",
CellID->910709306],
-Cell[7576, 264, 2218, 79, 133, "Output",
- CellTags->"GammaEpsilon",
- CellID->208287808]
+Cell[8530, 292, 2197, 78, 111, "Output",
+ CellTags->"GammaEpsilon"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9831, 348, 135, 4, 27, "Input",
+Cell[10764, 375, 135, 4, 27, "Input",
CellTags->"GammaEpsilon",
CellID->766916522],
-Cell[9969, 354, 243, 9, 36, "Output",
- CellTags->"GammaEpsilon",
- CellID->460537482]
+Cell[10902, 381, 223, 8, 37, "Output",
+ CellTags->"GammaEpsilon"]
}, Open ]]
}, Open ]],
-Cell[10239, 367, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11152, 393, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10307, 372, 270, 12, 31, "SeeAlsoSection",
+Cell[11220, 398, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10580, 386, 397, 15, 32, "Text",
- CellTags->"GammaEpsilon",
- CellID->1891061042]
+Cell[11493, 412, 352, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[10992, 404, 23, 0, 42, "FooterCell"]
+Cell[11860, 428, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaExpand.nb
index 7abbeb648..535ec3bf5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaExpand.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GammaExpand.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10701, 369]
-NotebookOptionsPosition[ 6804, 246]
-NotebookOutlinePosition[ 9530, 324]
-CellTagsIndexPosition[ 9417, 318]
+NotebookDataLength[ 11362, 385]
+NotebookOptionsPosition[ 7698, 273]
+NotebookOutlinePosition[ 10311, 346]
+CellTagsIndexPosition[ 10198, 340]
WindowTitle->GammaExpand
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GammaExpand\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GammaExpand"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GammaEpsilon\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GammaEpsilon"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GammaExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GammaExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GammaExpand.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$79946],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GammaExpand", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$151806],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GammaExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ GammaExpand.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GammaExpand", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GammaExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +139,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->389221524],
+ CellID->472552310],
Cell[CellGroupData[{
@@ -117,7 +149,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1871365332],
+ CellID->60948968],
Cell[CellGroupData[{
@@ -139,12 +171,11 @@ Cell[BoxData[
TemplateBox[{RowBox[{
TagBox["\[CurlyEpsilon]", TraditionalForm], "+", "1"}]},
"Gamma"]}], TraditionalForm]], "Output",
- ImageSize->{101, 15},
+ ImageSize->{105, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaExpand",
- CellLabel->"Out[1]=",
- CellID->388026766]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -179,12 +210,11 @@ Cell[BoxData[
TraditionalForm], "-", "1"}], ")"}], " ",
TagBox["\[CurlyEpsilon]",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{158, 45},
+ ImageSize->{161, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaExpand",
- CellLabel->"Out[2]=",
- CellID->842543076]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -202,12 +232,11 @@ Cell[BoxData[
TemplateBox[{RowBox[{
TagBox["\[CurlyEpsilon]", TraditionalForm], "+", "1"}]},
"Gamma"], TraditionalForm]], "Output",
- ImageSize->{55, 15},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GammaExpand",
- CellLabel->"Out[3]=",
- CellID->861147229]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -237,9 +266,7 @@ Cell[TextData[{
ButtonNote->"GammaEpsilon"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GammaExpand",
- CellID->1346477755]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -247,7 +274,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"GammaExpand",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -256,21 +283,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 41.610916}",
+ "built" -> "{2020, 1, 5, 18, 58, 22.606577}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"GammaExpand[exp] rewrites Gamma[n + m] in exp (where n has Head \
-Integer).", "synonyms" -> {}, "title" -> "GammaExpand", "titlemodifier" -> "",
- "windowtitle" -> "GammaExpand", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GammaExpand"}, "SearchTextTranslated" -> ""},
+Integer).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "GammaExpand",
+ "titlemodifier" -> "", "windowtitle" -> "GammaExpand", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/GammaExpand"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -278,8 +305,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -288,89 +316,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3329, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4329, 126, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->389221524]},
+ CellID->472552310]},
"GammaExpand"->{
- Cell[3962, 123, 204, 6, 27, "Input",
+ Cell[4960, 155, 204, 6, 27, "Input",
CellTags->"GammaExpand",
CellID->53996644],
- Cell[4169, 131, 435, 15, 36, "Output",
- CellTags->"GammaExpand",
- CellID->388026766],
- Cell[4641, 151, 216, 7, 27, "Input",
+ Cell[5167, 163, 415, 14, 37, "Output",
+ CellTags->"GammaExpand"],
+ Cell[5619, 182, 216, 7, 27, "Input",
CellTags->"GammaExpand",
CellID->1712828018],
- Cell[4860, 160, 738, 26, 66, "Output",
- CellTags->"GammaExpand",
- CellID->842543076],
- Cell[5635, 191, 205, 6, 27, "Input",
+ Cell[5838, 191, 718, 25, 59, "Output",
+ CellTags->"GammaExpand"],
+ Cell[6593, 221, 205, 6, 27, "Input",
CellTags->"GammaExpand",
CellID->509676592],
- Cell[5843, 199, 308, 10, 36, "Output",
- CellTags->"GammaExpand",
- CellID->861147229],
- Cell[6519, 232, 243, 9, 32, "Text",
- CellTags->"GammaExpand",
- CellID->1346477755]}
+ Cell[6801, 229, 288, 9, 37, "Output",
+ CellTags->"GammaExpand"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8620, 289},
- {"GammaExpand", 8757, 293}
+ {"PrimaryExamplesSection", 9557, 317},
+ {"GammaExpand", 9695, 321}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3023, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 404, 12, 83, "Usage",
+Cell[3609, 97, 288, 11, 45, "ObjectNameGrid"],
+Cell[3900, 110, 404, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3329, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4329, 126, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->389221524],
+ CellID->472552310],
Cell[CellGroupData[{
-Cell[3741, 113, 196, 6, 25, "ExampleSection",
- CellID->1871365332],
+Cell[4741, 145, 194, 6, 26, "ExampleSection",
+ CellID->60948968],
Cell[CellGroupData[{
-Cell[3962, 123, 204, 6, 27, "Input",
+Cell[4960, 155, 204, 6, 27, "Input",
CellTags->"GammaExpand",
CellID->53996644],
-Cell[4169, 131, 435, 15, 36, "Output",
- CellTags->"GammaExpand",
- CellID->388026766]
+Cell[5167, 163, 415, 14, 37, "Output",
+ CellTags->"GammaExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4641, 151, 216, 7, 27, "Input",
+Cell[5619, 182, 216, 7, 27, "Input",
CellTags->"GammaExpand",
CellID->1712828018],
-Cell[4860, 160, 738, 26, 66, "Output",
- CellTags->"GammaExpand",
- CellID->842543076]
+Cell[5838, 191, 718, 25, 59, "Output",
+ CellTags->"GammaExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5635, 191, 205, 6, 27, "Input",
+Cell[6593, 221, 205, 6, 27, "Input",
CellTags->"GammaExpand",
CellID->509676592],
-Cell[5843, 199, 308, 10, 36, "Output",
- CellTags->"GammaExpand",
- CellID->861147229]
+Cell[6801, 229, 288, 9, 37, "Output",
+ CellTags->"GammaExpand"]
}, Open ]]
}, Open ]],
-Cell[6178, 213, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7116, 242, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6246, 218, 270, 12, 31, "SeeAlsoSection",
+Cell[7184, 247, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6519, 232, 243, 9, 32, "Text",
- CellTags->"GammaExpand",
- CellID->1346477755]
+Cell[7457, 261, 199, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6777, 244, 23, 0, 42, "FooterCell"]
+Cell[7671, 271, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gauge.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gauge.nb
index 3dd47f511..1883b4706 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gauge.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gauge.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6184, 194]
-NotebookOptionsPosition[ 3993, 128]
-NotebookOutlinePosition[ 5925, 183]
-CellTagsIndexPosition[ 5858, 178]
+NotebookDataLength[ 7046, 215]
+NotebookOptionsPosition[ 5043, 159]
+NotebookOutlinePosition[ 6838, 207]
+CellTagsIndexPosition[ 6795, 204]
WindowTitle->Gauge
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Gauge\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Gauge"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Gauge.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"$Gauge\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/$Gauge"], "\<\"GluonProgagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonProgagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Gauge\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Gauge"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Gauge.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$80966],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Gauge",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$153126],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Gauge",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Gauge", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Gauge", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +152,7 @@ Cell[TextData[{
ButtonNote->"GluonProgagator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Gauge",
- CellID->1660814530]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,21 +169,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 46.189570}",
+ "built" -> "{2020, 1, 5, 18, 58, 25.792519}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Gauge is an option for GluonProgagator. If set to 1 the 't Hooft Feynman \
-gauge is used.", "synonyms" -> {}, "title" -> "Gauge", "titlemodifier" -> "",
- "windowtitle" -> "Gauge", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Gauge"}},
+gauge is used.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Gauge",
+ "titlemodifier" -> "", "windowtitle" -> "Gauge", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Gauge"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +192,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Gauge"->{
- Cell[3552, 108, 399, 15, 70, "Text",
- CellTags->"Gauge",
- CellID->1660814530]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Gauge", 5749, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[577, 21, 2232, 52, 70, "AnchorBarGrid",
+Cell[577, 21, 3086, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2812, 75, 48, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2863, 78, 391, 12, 70, "Usage",
+Cell[3666, 98, 282, 11, 70, "ObjectNameGrid"],
+Cell[3951, 111, 391, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3279, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4367, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3552, 108, 399, 15, 70, "Text",
- CellTags->"Gauge",
- CellID->1660814530]
+Cell[4640, 141, 361, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3966, 126, 23, 0, 70, "FooterCell"]
+Cell[5016, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeField.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeField.nb
index 741828209..1acc49d58 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeField.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeField.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9467, 321]
-NotebookOptionsPosition[ 5878, 211]
-NotebookOutlinePosition[ 8502, 284]
-CellTagsIndexPosition[ 8390, 278]
+NotebookDataLength[ 10303, 342]
+NotebookOptionsPosition[ 6900, 241]
+NotebookOutlinePosition[ 9433, 310]
+CellTagsIndexPosition[ 9321, 304]
WindowTitle->GaugeField
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GaugeField\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GaugeField"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GaugeField.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$80630],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GaugeField", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FieldStrength\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FieldStrength"], "\<\"QuantumField\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuantumField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GaugeField\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GaugeField"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+GaugeField.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$152690],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GaugeField", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GaugeField", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GaugeField", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1690208121],
+ CellID->550294348],
Cell[CellGroupData[{
@@ -118,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->585064115],
+ CellID->1849237363],
Cell[CellGroupData[{
@@ -129,12 +163,11 @@ Cell[BoxData["GaugeField"], "Input",
Cell[BoxData[
FormBox["A", TraditionalForm]], "Output",
- ImageSize->{15, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GaugeField",
- CellLabel->"Out[1]=",
- CellID->501755105]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -161,12 +194,11 @@ Cell[BoxData[
FormBox["a",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 19},
+ ImageSize->{29, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GaugeField",
- CellLabel->"Out[2]=",
- CellID->511347556]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -202,9 +234,7 @@ Cell[TextData[{
ButtonNote->"QuantumField"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GaugeField",
- CellID->1344551251]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -212,7 +242,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"GaugeField",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -221,10 +251,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 44.703538}",
+ "built" -> "{2020, 1, 5, 18, 58, 24.791362}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -232,11 +262,11 @@ TaggingRules->{
"None", "summary" ->
"GaugeField is just a name. No functional properties are associated with \
it. GaugeField is used as default setting for the option QuantumField of \
-FieldStrength.", "synonyms" -> {}, "title" -> "GaugeField", "titlemodifier" ->
- "", "windowtitle" -> "GaugeField", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GaugeField"}, "SearchTextTranslated" -> ""},
+FieldStrength.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "GaugeField",
+ "titlemodifier" -> "", "windowtitle" -> "GaugeField", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/GaugeField"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -244,8 +274,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -254,75 +285,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3383, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4488, 129, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1690208121]},
+ CellID->550294348]},
"GaugeField"->{
- Cell[4016, 124, 105, 3, 27, "Input",
+ Cell[5121, 158, 105, 3, 27, "Input",
CellTags->"GaugeField",
CellID->1050712800],
- Cell[4124, 129, 211, 7, 36, "Output",
- CellTags->"GaugeField",
- CellID->501755105],
- Cell[4372, 141, 256, 7, 27, "Input",
+ Cell[5229, 163, 191, 6, 35, "Output",
+ CellTags->"GaugeField"],
+ Cell[5457, 174, 256, 7, 27, "Input",
CellTags->"GaugeField",
CellID->1376527682],
- Cell[4631, 150, 421, 18, 40, "Output",
- CellTags->"GaugeField",
- CellID->511347556],
- Cell[5420, 191, 416, 15, 32, "Text",
- CellTags->"GaugeField",
- CellID->1344551251]}
+ Cell[5716, 183, 401, 17, 40, "Output",
+ CellTags->"GaugeField"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7778, 255},
- {"GaugeField", 7915, 259}
+ {"PrimaryExamplesSection", 8843, 286},
+ {"GaugeField", 8980, 290}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3123, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 465, 13, 97, "Usage",
+Cell[3708, 99, 287, 11, 45, "ObjectNameGrid"],
+Cell[3998, 112, 465, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3383, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4488, 129, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1690208121],
+ CellID->550294348],
Cell[CellGroupData[{
-Cell[3796, 114, 195, 6, 25, "ExampleSection",
- CellID->585064115],
+Cell[4900, 148, 196, 6, 26, "ExampleSection",
+ CellID->1849237363],
Cell[CellGroupData[{
-Cell[4016, 124, 105, 3, 27, "Input",
+Cell[5121, 158, 105, 3, 27, "Input",
CellTags->"GaugeField",
CellID->1050712800],
-Cell[4124, 129, 211, 7, 36, "Output",
- CellTags->"GaugeField",
- CellID->501755105]
+Cell[5229, 163, 191, 6, 35, "Output",
+ CellTags->"GaugeField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4372, 141, 256, 7, 27, "Input",
+Cell[5457, 174, 256, 7, 27, "Input",
CellTags->"GaugeField",
CellID->1376527682],
-Cell[4631, 150, 421, 18, 40, "Output",
- CellTags->"GaugeField",
- CellID->511347556]
+Cell[5716, 183, 401, 17, 40, "Output",
+ CellTags->"GaugeField"]
}, Open ]]
}, Open ]],
-Cell[5079, 172, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6144, 204, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5147, 177, 270, 12, 31, "SeeAlsoSection",
+Cell[6212, 209, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5420, 191, 416, 15, 32, "Text",
- CellTags->"GaugeField",
- CellID->1344551251]
+Cell[6485, 223, 373, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5851, 209, 23, 0, 42, "FooterCell"]
+Cell[6873, 239, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeXi.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeXi.nb
index c08de6852..2ac1971d2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeXi.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GaugeXi.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6096, 192]
-NotebookOptionsPosition[ 3939, 127]
-NotebookOutlinePosition[ 5835, 181]
-CellTagsIndexPosition[ 5766, 176]
+NotebookDataLength[ 6953, 214]
+NotebookOptionsPosition[ 4992, 159]
+NotebookOutlinePosition[ 6745, 206]
+CellTagsIndexPosition[ 6702, 203]
WindowTitle->GaugeXi
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GaugeXi\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GaugeXi"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GaugeXi.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Gauge\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Gauge"], "\<\"GaugeField\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GaugeField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GaugeXi\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GaugeXi"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/GaugeXi.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$81312],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GaugeXi", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$153570],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GaugeXi", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GaugeXi", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GaugeXi", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,9 +152,7 @@ Cell[TextData[{
ButtonNote->"GaugeField"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GaugeXi",
- CellID->1877739333]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -137,20 +169,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 47.565743}",
+ "built" -> "{2020, 1, 5, 18, 58, 26.722081}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "GaugeXi is a head for gauge parameters.",
- "synonyms" -> {}, "title" -> "GaugeXi", "titlemodifier" -> "",
- "windowtitle" -> "GaugeXi", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GaugeXi"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GaugeXi",
+ "titlemodifier" -> "", "windowtitle" -> "GaugeXi", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/GaugeXi"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -159,41 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GaugeXi"->{
- Cell[3514, 107, 383, 15, 70, "Text",
- CellTags->"GaugeXi",
- CellID->1877739333]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GaugeXi", 5655, 169}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 70, "AnchorBarGrid",
+Cell[579, 21, 3099, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 341, 11, 70, "Usage",
+Cell[3681, 99, 284, 11, 70, "ObjectNameGrid"],
+Cell[3968, 112, 341, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3241, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4334, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3514, 107, 383, 15, 70, "Text",
- CellTags->"GaugeXi",
- CellID->1877739333]
+Cell[4607, 141, 343, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3912, 125, 23, 0, 70, "FooterCell"]
+Cell[4965, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GenPaVe.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GenPaVe.nb
new file mode 100644
index 000000000..b45240f45
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GenPaVe.nb
@@ -0,0 +1,858 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 24526, 848]
+NotebookOptionsPosition[ 21310, 757]
+NotebookOutlinePosition[ 23744, 818]
+CellTagsIndexPosition[ 23659, 813]
+WindowTitle->GenPaVe
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GenPaVe\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GenPaVe"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/GenPaVe.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$154444],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GenPaVe", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["GenPaVe", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"GenPaVe", "[",
+ RowBox[{"i", ",", "j", ",", "...", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",", "m0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2"}], "}"}], ",",
+ "..."}]}]}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes the invariant (and scalar) Passarino-Veltman \
+integrals, i.e. the coefficient functions of the tensor integral \
+decomposition. In contrast to PaVe which uses the LoopTools convention, \
+masses and external momenta in GenPaVe are written in the same order as they \
+appear in the original tensor integral, i.e. \
+FAD[{q,m0},{q-p1,m1},{q-p2,m2},...]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660470701],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->963975070],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"q", ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p1"}], ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p2"}], ",", "m2"}], "}"}]}], "]"}], "/",
+ RowBox[{"(",
+ RowBox[{"I", "*",
+ RowBox[{"Pi", "^", "2"}]}], ")"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->368433704],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ RowBox[{
+ SuperscriptBox["\[Pi]", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m0", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m0^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p1 + $CellContext`q, D]],
+ "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p2",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p2 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p2 + $CellContext`q, D]],
+ "-", $CellContext`m2^2],
+ Editable->False], ")"}]}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{352, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->309973990]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TID", "[",
+ RowBox[{"%", ",", "q", ",",
+ RowBox[{"UsePaVeBasis", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1936776923],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"00\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["m0", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"]}], ")"}],
+ TraditionalForm]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"11\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["m0", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"]}], ")"}],
+ TraditionalForm]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"12\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["m0", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"]}], ")"}],
+ TraditionalForm]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"22\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["m0", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"]}], ")"}],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{520, 93},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1532602074]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TID", "[",
+ RowBox[{"%%", ",", "q", ",",
+ RowBox[{"UsePaVeBasis", "\[Rule]", "True"}], ",",
+ RowBox[{"GenPaVe", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1745093936],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"GenPaVe", "(",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",", "0"}], "}"}], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"0", "m0"},
+ {"p1", "m1"},
+ {"p2", "m2"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {},
+ "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
+ ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"GenPaVe", "(",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"0", "m0"},
+ {"p1", "m1"},
+ {"p2", "m2"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {},
+ "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
+ ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"GenPaVe", "(",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"2", ",", "2"}], "}"}], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"0", "m0"},
+ {"p1", "m1"},
+ {"p2", "m2"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {},
+ "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
+ ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}], " ",
+ RowBox[{"GenPaVe", "(",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "2"}], "}"}], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"0", "m0"},
+ {"p1", "m1"},
+ {"p2", "m2"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {},
+ "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
+ ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{574, 108},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1743003657]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"GenPaVe",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 28.816045}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "GenPaVe[i, j, ..., {{0, m0}, {Momentum[p1], m1}, {Momentum[p2], m2}, \
+...] denotes the invariant (and scalar) Passarino-Veltman integrals, i.e. the \
+coefficient functions of the tensor integral decomposition. In contrast to \
+PaVe which uses the LoopTools convention, masses and external momenta in \
+GenPaVe are written in the same order as they appear in the original tensor \
+integral, i.e. FAD[{q,m0},{q-p1,m1},{q-p2,m2},...].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "GenPaVe", "titlemodifier" -> "",
+ "windowtitle" -> "GenPaVe", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GenPaVe"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4306, 122, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660470701]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 23515, 806}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[3138, 89, 1143, 29, 136, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4306, 122, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660470701],
+Cell[CellGroupData[{
+Cell[4719, 141, 195, 6, 26, "ExampleSection",
+ CellID->963975070],
+Cell[CellGroupData[{
+Cell[4939, 151, 603, 21, 27, "Input",
+ CellID->368433704],
+Cell[5545, 174, 3032, 101, 66, "Output",
+ CellID->309973990]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8614, 280, 177, 5, 27, "Input",
+ CellID->1936776923],
+Cell[8794, 287, 7063, 269, 114, "Output",
+ CellID->1532602074]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15894, 561, 227, 6, 27, "Input",
+ CellID->1745093936],
+Cell[16124, 569, 5120, 181, 129, "Output",
+ CellID->1743003657]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[21283, 755, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GenericPropagatorDenominator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GenericPropagatorDenominator.nb
new file mode 100644
index 000000000..3b31f20e4
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GenericPropagatorDenominator.nb
@@ -0,0 +1,334 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10843, 324]
+NotebookOptionsPosition[ 7634, 237]
+NotebookOutlinePosition[ 10224, 300]
+CellTagsIndexPosition[ 10140, 295]
+WindowTitle->GenericPropagatorDenominator
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/GenericPropagatorDenominator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GenericPropagatorDenominator"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+GenericPropagatorDenominator.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$154012],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GenericPropagatorDenominator", ".html"]], None}]}]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["GenericPropagatorDenominator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"GenericPropagatorDenominator", "[",
+ RowBox[{"expr", ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "s"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is a generic factor of the denominator of a \
+propagator. Unlike PropagatorDenominator that is supposed to mean \
+1/(q^2-m^2), expr in GenericPropagatorDenominator can be an arbitrary \
+combination of Pair, CartesianPair and TemporalPair objects. Using n one can \
+specify the power of the propagator, while s (+1 or -1) fixes the sign of \
+I*eta. GenericPropagatorDenominator is an internal object. To enter such \
+propagators in FeynCalc you should use GFAD"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1762351469],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->138778744],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"GenericPropagatorDenominator", "[",
+ RowBox[{"x", ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1373353974],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{
+ "\"(\"","x","\"+\"",RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{60, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1721966927]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"GenericPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Q", ",", "D"}], "]"}]}], "]"}],
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p2", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"Q", ",", "D"}], "]"}]}], "]"}]}], "-",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p2", ",", "D"}], "]"}]}], "]"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1129234700],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ RowBox[{"2", " ", "z", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["Q", TraditionalForm], TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["Q", TraditionalForm], TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox["p1", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["p2", TraditionalForm], TraditionalForm]}]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{244, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->430028496]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"GenericPropagatorDenominator",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 58, 27.733186}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "GenericPropagatorDenominator[expr, {n, s}] is a generic factor of the \
+denominator of a propagator. Unlike PropagatorDenominator that is supposed to \
+mean 1/(q^2-m^2), expr in GenericPropagatorDenominator can be an arbitrary \
+combination of Pair, CartesianPair and TemporalPair objects. Using n one can \
+specify the power of the propagator, while s (+1 or -1) fixes the sign of \
+I*eta. GenericPropagatorDenominator is an internal object. To enter such \
+propagators in FeynCalc you should use GFAD", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "GenericPropagatorDenominator",
+ "titlemodifier" -> "", "windowtitle" -> "GenericPropagatorDenominator",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/GenericPropagatorDenominator"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4224, 116, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1762351469]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9996, 288}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[600, 21, 2383, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2986, 79, 305, 11, 45, "ObjectNameGrid"],
+Cell[3294, 92, 905, 20, 154, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4224, 116, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1762351469],
+Cell[CellGroupData[{
+Cell[4637, 135, 195, 6, 26, "ExampleSection",
+ CellID->138778744],
+Cell[CellGroupData[{
+Cell[4857, 145, 245, 7, 27, "Input",
+ CellID->1373353974],
+Cell[5105, 154, 324, 11, 59, "Output",
+ CellID->1721966927]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5466, 170, 924, 27, 79, "Input",
+ CellID->1129234700],
+Cell[6393, 199, 1175, 31, 59, "Output",
+ CellID->430028496]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7607, 235, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GhostPropagator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GhostPropagator.nb
index 439bde79a..85af6659d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GhostPropagator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GhostPropagator.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13466, 473]
-NotebookOptionsPosition[ 8605, 321]
-NotebookOutlinePosition[ 11841, 412]
-CellTagsIndexPosition[ 11722, 406]
+NotebookDataLength[ 14877, 520]
+NotebookOptionsPosition[ 10803, 395]
+NotebookOutlinePosition[ 13308, 464]
+CellTagsIndexPosition[ 13189, 458]
WindowTitle->GhostPropagator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GhostPropagator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GhostPropagator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GhostPropagator"], \
+"\<\"QCDFeynmanRuleConvention\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QCDFeynmanRuleConvention"], "\<\"GluonGhostVertex\
+\"\>":>Documentation`HelpLookup["paclet:FeynCalc/ref/GluonGhostVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GhostPropagator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GhostPropagator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GhostPropagator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$82008],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GhostPropagator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$155776],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GhostPropagator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,29 +99,108 @@ GhostPropagator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GhostPropagator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GhostPropagator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"GhostPropagator", "[",
RowBox[{"p", ",", " ", "a", ",", " ", "b"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "gives the ghost propagator where \"a\" and \"b\" are the color indices. \
-GhostPropagator[p] omits the ",
+ " \[LineSeparator]gives the ghost propagator where ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " are the color indices."
+ }]]},
+ {"", Cell[TextData[{
Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["\[Delta]",
- RowBox[{"a", "\[NoBreak]", "b"}]], "."}], TraditionalForm]]]
+ RowBox[{"GhostPropagator", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]omits the ",
+ Cell[BoxData[
+ SubscriptBox["\[Delta]",
+ RowBox[{"a", "\[NoBreak]", "b"}]]], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->67709635],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData["GHP"], "InlineFormula"],
+ " can be used as an abbreviation of ",
+ ButtonBox["GhostPropagator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
+ ButtonNote->"GhostPropagator"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "GhostPropagator", "]"}]], "Input",
+ CellLabel->"In[408]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{216, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[408]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
Cell[CellGroupData[{
@@ -110,21 +215,21 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->433782665],
+ CellID->906798300],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->813114488],
+ CellID->1553986753],
Cell[CellGroupData[{
@@ -146,23 +251,18 @@ Cell[BoxData[
TraditionalForm]}]], "(",
FormBox["p",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{54, 17},
+ ImageSize->{61, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GhostPropagator",
- CellLabel->"Out[1]=",
- CellID->512151226]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GhostPropagator", "[",
- RowBox[{"p", ",", "a", ",", "b", ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"GhostPropagator",
- CellLabel->"In[2]:=",
- CellID->736877273],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -178,23 +278,35 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{49, 52},
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{49, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GhostPropagator",
- CellLabel->"Out[2]=",
- CellID->1880336114]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GhostPropagator", "[", "p", "]"}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GHP", "[", "p", "]"}]], "Input",
CellTags->"GhostPropagator",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->357152074],
Cell[BoxData[
@@ -203,74 +315,38 @@ Cell[BoxData[
SubscriptBox["\[CapitalPi]", "u"], "(",
FormBox["p",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{44, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GhostPropagator",
- CellLabel->"Out[3]=",
- CellID->1092778903]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GhostPropagator", "[",
- RowBox[{"p", ",", "1", ",", "2"}], "]"}], "//", "Explicit"}]], "Input",
- CellTags->"GhostPropagator",
- CellLabel->"In[4]:=",
- CellID->1361525951],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["ci1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci2",
- TraditionalForm],
- TraditionalForm]}]]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{63, 52},
+ FractionBox["\[ImaginaryI]",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{28, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GhostPropagator",
- CellLabel->"Out[4]=",
- CellID->190043121]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"GhostPropagator", "[",
- RowBox[{
- RowBox[{"-", "k"}], ",", "3", ",", "4"}], "]"}], "//", "Explicit"}], "//",
- " ", "FCE"}], "//", "StandardForm"}]], "Input",
- CellTags->"GhostPropagator",
- CellLabel->"In[5]:=",
- CellID->160188204],
-
-Cell[BoxData[
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{"FAD", "[", "k", "]"}], " ",
- RowBox[{"SD", "[",
- RowBox[{"ci3", ",", "ci4"}], "]"}]}]], "Output",
- ImageSize->{164, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GhostPropagator",
- CellLabel->"Out[5]//StandardForm=",
- CellID->657761817]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -294,16 +370,16 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["GHP",
+ StyleBox[ButtonBox["GluonPropagator",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GHP",
- ButtonNote->"GHP"],
+ ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
+ ButtonNote->"GhostPropagator"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["GluonPropagator",
+ StyleBox[ButtonBox["QCDFeynmanRuleConvention",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GluonPropagator",
- ButtonNote->"GluonPropagator"],
+ ButtonData->"paclet:FeynCalc/ref/QCDFeynmanRuleConvention",
+ ButtonNote->"QCDFeynmanRuleConvention"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["GluonGhostVertex",
@@ -312,9 +388,7 @@ Cell[TextData[{
ButtonNote->"GluonGhostVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GhostPropagator",
- CellID->495663945]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -331,22 +405,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 50.542135}",
+ "built" -> "{2020, 1, 5, 18, 58, 31.985995}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "GhostPropagator[p, a, b] gives the ghost propagator where \"a\" and \
-\"b\" are the color indices. GhostPropagator[p] omits the \\[Delta] ab.",
- "synonyms" -> {}, "title" -> "GhostPropagator", "titlemodifier" -> "",
- "windowtitle" -> "GhostPropagator", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GhostPropagator"}, "SearchTextTranslated" -> ""},
+ "GhostPropagator[p, a, b] gives the ghost propagator where a and b are \
+the color indices. GhostPropagator[p] omits the \\[Delta] ab.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GhostPropagator",
+ "titlemodifier" -> "", "windowtitle" -> "GhostPropagator", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/GhostPropagator"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -355,7 +430,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -364,117 +439,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3605, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6552, 206, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->433782665]},
+ CellID->906798300]},
"GhostPropagator"->{
- Cell[4237, 130, 174, 5, 27, "Input",
+ Cell[7185, 235, 174, 5, 27, "Input",
CellTags->"GhostPropagator",
CellID->785205895],
- Cell[4414, 137, 408, 16, 38, "Output",
- CellTags->"GhostPropagator",
- CellID->512151226],
- Cell[4859, 158, 224, 6, 27, "Input",
- CellTags->"GhostPropagator",
- CellID->736877273],
- Cell[5086, 166, 553, 22, 73, "Output",
- CellTags->"GhostPropagator",
- CellID->1880336114],
- Cell[5676, 193, 141, 4, 27, "Input",
+ Cell[7362, 242, 388, 15, 38, "Output",
+ CellTags->"GhostPropagator"],
+ Cell[8759, 305, 129, 4, 27, "Input",
CellTags->"GhostPropagator",
CellID->357152074],
- Cell[5820, 199, 313, 11, 38, "Output",
- CellTags->"GhostPropagator",
- CellID->1092778903],
- Cell[6170, 215, 207, 6, 27, "Input",
- CellTags->"GhostPropagator",
- CellID->1361525951],
- Cell[6380, 223, 556, 22, 73, "Output",
- CellTags->"GhostPropagator",
- CellID->190043121],
- Cell[6973, 250, 303, 10, 27, "Input",
- CellTags->"GhostPropagator",
- CellID->160188204],
- Cell[7279, 262, 334, 10, 49, "Output",
- CellTags->"GhostPropagator",
- CellID->657761817],
- Cell[7981, 295, 582, 21, 70, "Text",
- CellTags->"GhostPropagator",
- CellID->495663945]}
+ Cell[8891, 311, 292, 10, 37, "Output",
+ CellTags->"GhostPropagator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10508, 365},
- {"GhostPropagator", 10650, 369}
+ {"PrimaryExamplesSection", 12687, 440},
+ {"GhostPropagator", 12829, 444}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3269, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 656, 19, 84, "Usage",
- CellID->982511436],
+Cell[3859, 101, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3605, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4176, 116, 838, 25, 148, "Usage",
+ CellID->2010081510],
+Cell[CellGroupData[{
+Cell[5039, 145, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->67709635],
+Cell[5779, 171, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5813, 173, 251, 8, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[6089, 185, 99, 2, 70, "Input"],
+Cell[6191, 189, 300, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6552, 206, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->433782665],
+ CellID->906798300],
Cell[CellGroupData[{
-Cell[4017, 120, 195, 6, 25, "ExampleSection",
- CellID->813114488],
+Cell[6964, 225, 196, 6, 26, "ExampleSection",
+ CellID->1553986753],
Cell[CellGroupData[{
-Cell[4237, 130, 174, 5, 27, "Input",
+Cell[7185, 235, 174, 5, 27, "Input",
CellTags->"GhostPropagator",
CellID->785205895],
-Cell[4414, 137, 408, 16, 38, "Output",
- CellTags->"GhostPropagator",
- CellID->512151226]
+Cell[7362, 242, 388, 15, 38, "Output",
+ CellTags->"GhostPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4859, 158, 224, 6, 27, "Input",
- CellTags->"GhostPropagator",
- CellID->736877273],
-Cell[5086, 166, 553, 22, 73, "Output",
- CellTags->"GhostPropagator",
- CellID->1880336114]
+Cell[7787, 262, 84, 2, 27, "Input"],
+Cell[7874, 266, 718, 28, 65, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5676, 193, 141, 4, 27, "Input",
- CellTags->"GhostPropagator",
- CellID->357152074],
-Cell[5820, 199, 313, 11, 38, "Output",
- CellTags->"GhostPropagator",
- CellID->1092778903]
-}, Open ]],
+Cell[8629, 299, 105, 2, 9, "ExampleDelimiter"],
Cell[CellGroupData[{
-Cell[6170, 215, 207, 6, 27, "Input",
+Cell[8759, 305, 129, 4, 27, "Input",
CellTags->"GhostPropagator",
- CellID->1361525951],
-Cell[6380, 223, 556, 22, 73, "Output",
- CellTags->"GhostPropagator",
- CellID->190043121]
+ CellID->357152074],
+Cell[8891, 311, 292, 10, 37, "Output",
+ CellTags->"GhostPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6973, 250, 303, 10, 27, "Input",
- CellTags->"GhostPropagator",
- CellID->160188204],
-Cell[7279, 262, 334, 10, 49, "Output",
- CellTags->"GhostPropagator",
- CellID->657761817]
+Cell[9220, 326, 84, 2, 27, "Input"],
+Cell[9307, 330, 476, 17, 60, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[7640, 276, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9822, 352, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7708, 281, 270, 12, 70, "SeeAlsoSection",
+Cell[9890, 357, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7981, 295, 582, 21, 70, "Text",
- CellTags->"GhostPropagator",
- CellID->495663945]
+Cell[10163, 371, 598, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[8578, 319, 23, 0, 70, "FooterCell"]
+Cell[10776, 393, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonField.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonField.nb
index 5636aeea6..ca3c08872 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonField.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonField.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9037, 311]
-NotebookOptionsPosition[ 5574, 203]
-NotebookOutlinePosition[ 8072, 274]
-CellTagsIndexPosition[ 7960, 268]
+NotebookDataLength[ 9763, 330]
+NotebookOptionsPosition[ 6487, 231]
+NotebookOutlinePosition[ 8895, 298]
+CellTagsIndexPosition[ 8783, 292]
WindowTitle->GluonField
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GluonField\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GluonField"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/GluonField.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$82692],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GluonField", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GaugeField\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GaugeField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GluonField\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GluonField"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+GluonField.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$156661],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GluonField", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GluonField", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GluonField", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,7 +138,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->447671091],
+ CellID->1170093930],
Cell[CellGroupData[{
@@ -116,7 +148,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1214008617],
+ CellID->1644362186],
Cell[CellGroupData[{
@@ -127,12 +159,11 @@ Cell[BoxData["GluonField"], "Input",
Cell[BoxData[
FormBox["A", TraditionalForm]], "Output",
- ImageSize->{15, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonField",
- CellLabel->"Out[1]=",
- CellID->1953309416]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -159,12 +190,11 @@ Cell[BoxData[
FormBox["a",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 19},
+ ImageSize->{29, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonField",
- CellLabel->"Out[2]=",
- CellID->1231631318]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -194,17 +224,15 @@ Cell[TextData[{
ButtonNote->"GaugeField"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GluonField",
- CellID->2115683038]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"GluonField",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -213,20 +241,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 53.644230}",
+ "built" -> "{2020, 1, 5, 18, 58, 34.190798}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "GluonField is a name of a gauge field.",
- "synonyms" -> {}, "title" -> "GluonField", "titlemodifier" -> "",
- "windowtitle" -> "GluonField", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GluonField"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "GluonField",
+ "titlemodifier" -> "", "windowtitle" -> "GluonField", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/GluonField"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -234,8 +262,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -244,75 +273,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3258, 93, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4255, 125, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->447671091]},
+ CellID->1170093930]},
"GluonField"->{
- Cell[3891, 122, 104, 3, 27, "Input",
+ Cell[4889, 154, 104, 3, 27, "Input",
CellTags->"GluonField",
CellID->807080920],
- Cell[3998, 127, 212, 7, 36, "Output",
- CellTags->"GluonField",
- CellID->1953309416],
- Cell[4247, 139, 256, 7, 27, "Input",
+ Cell[4996, 159, 191, 6, 35, "Output",
+ CellTags->"GluonField"],
+ Cell[5224, 170, 256, 7, 27, "Input",
CellTags->"GluonField",
CellID->1368218379],
- Cell[4506, 148, 422, 18, 40, "Output",
- CellTags->"GluonField",
- CellID->1231631318],
- Cell[5296, 189, 236, 9, 32, "Text",
- CellTags->"GluonField",
- CellID->2115683038]}
+ Cell[5483, 179, 401, 17, 40, "Output",
+ CellTags->"GluonField"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7349, 245},
- {"GluonField", 7485, 249}
+ {"PrimaryExamplesSection", 8305, 274},
+ {"GluonField", 8443, 278}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3015, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 340, 11, 82, "Usage",
+Cell[3600, 97, 287, 11, 45, "ObjectNameGrid"],
+Cell[3890, 110, 340, 11, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3258, 93, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4255, 125, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->447671091],
+ CellID->1170093930],
Cell[CellGroupData[{
-Cell[3670, 112, 196, 6, 25, "ExampleSection",
- CellID->1214008617],
+Cell[4668, 144, 196, 6, 26, "ExampleSection",
+ CellID->1644362186],
Cell[CellGroupData[{
-Cell[3891, 122, 104, 3, 27, "Input",
+Cell[4889, 154, 104, 3, 27, "Input",
CellTags->"GluonField",
CellID->807080920],
-Cell[3998, 127, 212, 7, 36, "Output",
- CellTags->"GluonField",
- CellID->1953309416]
+Cell[4996, 159, 191, 6, 35, "Output",
+ CellTags->"GluonField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4247, 139, 256, 7, 27, "Input",
+Cell[5224, 170, 256, 7, 27, "Input",
CellTags->"GluonField",
CellID->1368218379],
-Cell[4506, 148, 422, 18, 40, "Output",
- CellTags->"GluonField",
- CellID->1231631318]
+Cell[5483, 179, 401, 17, 40, "Output",
+ CellTags->"GluonField"]
}, Open ]]
}, Open ]],
-Cell[4955, 170, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5911, 200, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5023, 175, 270, 12, 31, "SeeAlsoSection",
+Cell[5979, 205, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5296, 189, 236, 9, 32, "Text",
- CellTags->"GluonField",
- CellID->2115683038]
+Cell[6252, 219, 193, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5547, 201, 23, 0, 42, "FooterCell"]
+Cell[6460, 229, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonGhostVertex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonGhostVertex.nb
index e840397f2..95c74d570 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonGhostVertex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonGhostVertex.nb
@@ -3,69 +3,100 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13929, 473]
-NotebookOptionsPosition[ 9207, 331]
-NotebookOutlinePosition[ 12502, 420]
-CellTagsIndexPosition[ 12382, 414]
+NotebookDataLength[ 15477, 523]
+NotebookOptionsPosition[ 11445, 405]
+NotebookOutlinePosition[ 14140, 476]
+CellTagsIndexPosition[ 14020, 470]
WindowTitle->GluonGhostVertex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GluonGhostVertex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GluonGhostVertex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"GluonSelfEnergy\"\>":>
+ Documentation`HelpLookup[
+ "paclet:ref/GluonSelfEnergy"], "\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonVertex"], "\<\"QCDFeynmanRuleConvention\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/QCDFeynmanRuleConvention"], \
+"\<\"GhostPropagator\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GhostPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GluonGhostVertex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GluonGhostVertex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GluonGhostVertex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$83029],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GluonGhostVertex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$157103],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GluonGhostVertex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +104,20 @@ GluonGhostVertex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GluonGhostVertex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GluonGhostVertex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -88,12 +131,15 @@ Cell[BoxData[GridBox[{
RowBox[{"{",
RowBox[{"k", ",", "rho", ",", "c"}], "}"}]}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "or GluonGhostVertex[ p,mu,a , q,nu,b , k,rho,c ] yields the Gluon-Ghost \
-vertex. The first argument represents the gluon and the third argument the \
-outgoing ghost field (but incoming four-momentum). The dimension and the name \
-of the coupling constant are determined by the options Dimension and \
-CouplingConstant."
+ " \[LineSeparator]or ",
+ Cell[BoxData[
+ RowBox[{"GluonGhostVertex", "[", " ",
+ RowBox[{
+ "p", ",", "mu", ",", "a", " ", ",", " ", "q", ",", "nu", ",", "b", " ",
+ ",", " ", "k", ",", "rho", ",", "c"}], " ", "]"}]], "InlineFormula"],
+
+ " yields the Gluon-Ghost vertex. The first argument represents the gluon \
+and the third argument the outgoing ghost field (but incoming 4-momentum)."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -104,39 +150,66 @@ CouplingConstant."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1825249286],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1286729640],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->273216259],
+ Cell[BoxData["GGV"], "InlineFormula"],
+ " can be used as an abbreviation of ",
+ ButtonBox["GluonGhostVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonGhostVertex",
+ ButtonNote->"GluonGhostVertex"],
+ "."
+}], "Notes"],
+
+Cell[TextData[{
+ "The dimension and the name of the coupling constant are determined by the \
+options ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ " and ",
+ ButtonBox["CouplingConstant",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "GluonGhostVertex", "]"}]], "Input",
CellTags->"GluonGhostVertex",
- CellLabel->"In[1]:=",
+ CellLabel->"In[5]:=",
CellID->607510152],
Cell[BoxData[
@@ -148,27 +221,58 @@ Cell[BoxData[
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
RowBox[{"Explicit", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{385, 15},
+ ImageSize->{365, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonGhostVertex",
- CellLabel->"Out[1]=",
- CellID->1946787782]
+ CellLabel->"Out[5]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->303763348],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->693409499],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"GluonGhostVertex", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"k", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"GluonGhostVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}], " "}]], "Input",
CellTags->"GluonGhostVertex",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1492094433],
Cell[BoxData[
@@ -195,85 +299,52 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{86, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonGhostVertex",
- CellLabel->"Out[2]=",
- CellID->1673363298]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"%", "//", "Explicit"}], "//", "StandardForm"}]], "Input",
- CellTags->"GluonGhostVertex",
- CellLabel->"In[3]:=",
- CellID->566433445],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"-", "Gstrong"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"k", ",", "D"}], "]"}]}], "]"}], " ",
- RowBox[{"SUNF", "[",
- RowBox[{
- RowBox[{"SUNIndex", "[", "a", "]"}], ",",
- RowBox[{"SUNIndex", "[", "b", "]"}], ",",
- RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}]}]], "Output",
- ImageSize->{401, 33},
+ ImageSize->{97, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonGhostVertex",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1977739800]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GluonGhostVertex", "[",
- RowBox[{"p", ",", "1", ",", "q", ",", "2", ",", "k", ",", "3"}],
- "]"}]], "Input",
- CellTags->"GluonGhostVertex",
- CellLabel->"In[4]:=",
- CellID->471934348],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[CapitalLambda]", "~"],
- FormBox["li1",
- TraditionalForm]], "(",
- FormBox["k",
- TraditionalForm], ")"}], " ",
+ SubscriptBox["g", "s"], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}], " ",
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci1",
+ FormBox["a",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci2",
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci3",
+ FormBox["c",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{113, 19},
+ ImageSize->{117, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonGhostVertex",
- CellLabel->"Out[4]=",
- CellID->1348899544]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -297,7 +368,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["GluonPropagator",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GluonPropagator",
@@ -306,25 +376,29 @@ Cell[TextData[{
", ",
StyleBox[ButtonBox["GluonSelfEnergy",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GluonSelfEnergy",
+ ButtonData->"paclet:ref/GluonSelfEnergy",
ButtonNote->"GluonSelfEnergy"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["GhostPropagator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
- ButtonNote->"GhostPropagator"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["GluonVertex",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GluonVertex",
ButtonNote->"GluonVertex"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["QCDFeynmanRuleConvention",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QCDFeynmanRuleConvention",
+ ButtonNote->"QCDFeynmanRuleConvention"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GhostPropagator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
+ ButtonNote->"GhostPropagator"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GluonGhostVertex",
- CellID->508730211]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -332,7 +406,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"GluonGhostVertex",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -341,26 +415,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 55.145290}",
+ "built" -> "{2020, 1, 5, 18, 58, 35.406504}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"GluonGhostVertex[{p, mu, a}, {q, nu, b}, {k, rho, c}] or \
-GluonGhostVertex[p,mu,a , q,nu,b , k,rho,c ] yields the Gluon-Ghost vertex. \
-The first argument represents the gluon and the third argument the outgoing \
-ghost field (but incoming four-momentum). The dimension and the name of the \
-coupling constant are determined by the options Dimension and \
-CouplingConstant.", "synonyms" -> {}, "title" -> "GluonGhostVertex",
- "titlemodifier" -> "", "windowtitle" -> "GluonGhostVertex", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/GluonGhostVertex"},
- "SearchTextTranslated" -> ""},
+GluonGhostVertex[p, mu, a , q, nu, b , k, rho, c ] yields the Gluon-Ghost \
+vertex. The first argument represents the gluon and the third argument the \
+outgoing ghost field (but incoming 4-momentum).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "GluonGhostVertex", "titlemodifier" -> "",
+ "windowtitle" -> "GluonGhostVertex", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GluonGhostVertex"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -368,8 +440,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -377,104 +450,81 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3891, 106, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1825249286]},
"GluonGhostVertex"->{
- Cell[4524, 135, 149, 4, 27, "Input",
+ Cell[6903, 208, 149, 4, 70, "Input",
CellTags->"GluonGhostVertex",
CellID->607510152],
- Cell[4676, 141, 431, 14, 36, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1946787782],
- Cell[5144, 160, 367, 11, 27, "Input",
+ Cell[7055, 214, 410, 13, 37, "Output",
+ CellTags->"GluonGhostVertex"],
+ Cell[8158, 263, 392, 12, 27, "Input",
CellTags->"GluonGhostVertex",
CellID->1492094433],
- Cell[5514, 173, 699, 29, 40, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1673363298],
- Cell[6250, 207, 166, 5, 27, "Input",
- CellTags->"GluonGhostVertex",
- CellID->566433445],
- Cell[6419, 214, 626, 19, 67, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1977739800],
- Cell[7082, 238, 209, 6, 27, "Input",
- CellTags->"GluonGhostVertex",
- CellID->471934348],
- Cell[7294, 246, 704, 29, 40, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1348899544],
- Cell[8366, 298, 799, 28, 32, "Text",
- CellTags->"GluonGhostVertex",
- CellID->508730211]}
+ Cell[8553, 277, 678, 28, 40, "Output",
+ CellTags->"GluonGhostVertex"]},
+ "PrimaryExamplesSection"->{
+ Cell[7526, 234, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->303763348]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11345, 379},
- {"GluonGhostVertex", 11489, 383}
+ {"GluonGhostVertex", 13505, 452},
+ {"PrimaryExamplesSection", 13877, 463}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3484, 83, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 936, 24, 129, "Usage",
- CellID->982511436],
+Cell[4075, 106, 293, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3891, 106, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1825249286],
+Cell[4393, 121, 1012, 27, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4304, 125, 195, 6, 25, "ExampleSection",
- CellID->273216259],
+Cell[5430, 152, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1286729640],
+Cell[6172, 178, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6206, 180, 254, 8, 70, "Notes"],
+Cell[6463, 190, 415, 14, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4524, 135, 149, 4, 27, "Input",
+Cell[6903, 208, 149, 4, 70, "Input",
CellTags->"GluonGhostVertex",
CellID->607510152],
-Cell[4676, 141, 431, 14, 36, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1946787782]
+Cell[7055, 214, 410, 13, 37, "Output",
+ CellTags->"GluonGhostVertex"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5144, 160, 367, 11, 27, "Input",
- CellTags->"GluonGhostVertex",
- CellID->1492094433],
-Cell[5514, 173, 699, 29, 40, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1673363298]
-}, Open ]],
+Cell[7526, 234, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->303763348],
Cell[CellGroupData[{
-Cell[6250, 207, 166, 5, 27, "Input",
- CellTags->"GluonGhostVertex",
- CellID->566433445],
-Cell[6419, 214, 626, 19, 67, "Output",
+Cell[7938, 253, 195, 6, 26, "ExampleSection",
+ CellID->693409499],
+Cell[CellGroupData[{
+Cell[8158, 263, 392, 12, 27, "Input",
CellTags->"GluonGhostVertex",
- CellID->1977739800]
+ CellID->1492094433],
+Cell[8553, 277, 678, 28, 40, "Output",
+ CellTags->"GluonGhostVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7082, 238, 209, 6, 27, "Input",
- CellTags->"GluonGhostVertex",
- CellID->471934348],
-Cell[7294, 246, 704, 29, 40, "Output",
- CellTags->"GluonGhostVertex",
- CellID->1348899544]
+Cell[9268, 310, 84, 2, 27, "Input"],
+Cell[9355, 314, 746, 32, 43, "Output"]
}, Open ]]
}, Open ]],
-Cell[8025, 279, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10128, 350, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8093, 284, 270, 12, 31, "SeeAlsoSection",
+Cell[10196, 355, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8366, 298, 799, 28, 32, "Text",
- CellTags->"GluonGhostVertex",
- CellID->508730211]
+Cell[10469, 369, 934, 31, 71, "SeeAlso"]
}, Open ]],
-Cell[9180, 329, 23, 0, 70, "FooterCell"]
+Cell[11418, 403, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonPropagator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonPropagator.nb
index 1f8c36443..b05afdc04 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonPropagator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonPropagator.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 42567, 1553]
-NotebookOptionsPosition[ 33689, 1272]
-NotebookOutlinePosition[ 39021, 1422]
-CellTagsIndexPosition[ 38900, 1416]
+NotebookDataLength[ 42383, 1550]
+NotebookOptionsPosition[ 35070, 1321]
+NotebookOutlinePosition[ 38951, 1428]
+CellTagsIndexPosition[ 38830, 1422]
WindowTitle->GluonPropagator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GluonPropagator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GluonPropagator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonSelfEnergy\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonSelfEnergy"], "\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonVertex"], "\<\"GhostVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GhostVertex"], "\<\"GhostPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GhostPropagator"], "\<\"GluonGhostVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonGhostVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GluonPropagator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GluonPropagator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GluonPropagator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$83373],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GluonPropagator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$157593],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GluonPropagator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,20 @@ GluonPropagator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GluonPropagator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GluonPropagator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -82,84 +124,116 @@ Cell[BoxData[GridBox[{
RowBox[{"GluonPropagator", "[",
RowBox[{"p", ",", " ",
RowBox[{"{",
- RowBox[{"mu", ",", " ", "a"}], "}"}], ",", " ",
+ RowBox[{"\[Mu]", ",", " ", "a"}], "}"}], ",", " ",
RowBox[{"{",
- RowBox[{"nu", ",", " ", "b"}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "or GluonPropagator[p, mu, a , nu, b ] yields the gluon propagator. \
-GluonPropagator[p, {mu}, {nu}] or GluonPropagator[p, mu, nu] omits the \
-SUNDelta. The gauge and the dimension is determined by the option Gauge and \
-Dimension. The following settings of Gauge are possible: 1 for the Feynman \
-gauge; ",
+ RowBox[{"\[Nu]", ",", " ", "b"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]or ",
+ Cell[BoxData[
+ RowBox[{"GluonPropagator", "[",
+ RowBox[{
+ "p", ",", " ", "\[Mu]", ",", " ", "a", ",", " ", "\[Nu]", ",", " ",
+ "b"}], "]"}]], "InlineFormula"],
+ " yields the gluon propagator."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"GluonPropagator", "[",
+ RowBox[{"p", ",",
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"{", "\[Nu]", "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]or ",
Cell[BoxData[
- FormBox["\[Alpha]", TraditionalForm]]],
- " for the general covariant gauge; {Momentum[n] ,1} for the axial gauge.\
-\n\nGP can be used as an abbreviation of GluonPropagator."
+ RowBox[{"GluonPropagator", "[",
+ RowBox[{"p", ",", " ", "\[Mu]", ",", " ", "\[Nu]"}], "]"}]],
+ "InlineFormula"],
+ " omits the ",
+ ButtonBox["SUNDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNDelta",
+ ButtonNote->"SUNDelta"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1536605323],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellID->1498721966],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2079292544],
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"GluonPropagator",
- CellID->1676340970],
+Cell["", "SectionHeaderSpacer"],
-Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData["GP"], "InlineFormula"],
+ " can be used as an abbreviation of ",
+ ButtonBox["GluonPropagator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonPropagator",
+ ButtonNote->"GluonPropagator"],
+ "."
+}], "Notes"],
-Cell[BoxData["GP"], "Input",
- CellTags->"GluonPropagator",
- CellLabel->"In[1]:=",
- CellID->730734970],
+Cell[TextData[{
+ "The gauge and the dimension are determined by the options ",
+ ButtonBox["Gauge",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Gauge",
+ ButtonNote->"Gauge"],
+ " and ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
-Cell[BoxData[
- FormBox["GluonPropagator", TraditionalForm]], "Output",
- ImageSize->{111, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonPropagator",
- CellLabel->"Out[1]=",
- CellID->9606294]
-}, Open ]],
+Cell[TextData[{
+ "The following settings of Gauge are possible: ",
+ Cell[BoxData["1"], "InlineFormula"],
+ " for the Feynman gauge; ",
+ Cell[BoxData["\[Alpha]"], "InlineFormula"],
+ " for the general covariant gauge; ",
+ Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Momentum", "[", "n", "]"}], " ", ",", "1"}], "}"}]],
+ "InlineFormula"],
+ " for the axial gauge."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "GluonPropagator", "]"}]], "Input",
- CellTags->"GluonPropagator",
- CellLabel->"In[2]:=",
- CellID->1962710719],
+ CellLabel->"In[392]:="],
Cell[BoxData[
FormBox[
@@ -173,22 +247,51 @@ Cell[BoxData[
RowBox[{"Gauge", "\[Rule]", "1"}], ",",
RowBox[{"\[CapitalOmega]", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{383, 35},
+ ImageSize->{364, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonPropagator",
- CellLabel->"Out[2]=",
- CellID->2023427444]
+ CellLabel->"Out[392]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(5)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1965231034],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(5)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->104593034],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"GluonPropagator", "[",
RowBox[{"p", ",", "\[Mu]", ",", "a", ",", "\[Nu]", ",", "b"}],
"]"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1432103581],
Cell[BoxData[
@@ -207,24 +310,75 @@ Cell[BoxData[
TraditionalForm]}]], "(",
FormBox["p",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{54, 21},
+ ImageSize->{61, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[3]=",
- CellID->879390685]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GluonPropagator", "[",
- RowBox[{"p", ",", "\[Mu]", ",", "a", ",", "\[Nu]", ",", "b", ",",
- RowBox[{"Gauge", "\[Rule]", "\[Alpha]"}]}], "]"}], "//",
- "Explicit"}]], "Input",
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]]}], TraditionalForm]], "Output",
+ ImageSize->{94, 44},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GP", "[",
+ RowBox[{"p", ",", "\[Mu]", ",", "a", ",", "\[Nu]", ",", "b", ",",
+ RowBox[{"Gauge", "\[Rule]", "\[Alpha]"}]}], "]"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->922890899],
Cell[BoxData[
@@ -295,27 +449,117 @@ Cell[BoxData[
SuperscriptBox[
FormBox["p",
TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{185, 66},
+ ImageSize->{210, 65},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[4]=",
+ CellLabel->"Out[1]=",
CellID->1278353242]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GluonPropagator", "[",
- RowBox[{"p", ",", "\[Mu]", ",", "a", ",", "\[Nu]", ",", "b", ",",
- RowBox[{"Gauge", "\[Rule]",
- RowBox[{"{",
- RowBox[{
- RowBox[{"Momentum", "[", "n", "]"}], ",", "1"}], "}"}]}]}], "]"}], "//",
- "Explicit"}]], "Input",
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "\[Alpha]"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]],
+ TraditionalForm], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], ")"}]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{210, 65},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GluonPropagator", "[",
+ RowBox[{"p", ",", "\[Mu]", ",", "a", ",", "\[Nu]", ",", "b", ",",
+ RowBox[{"Gauge", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Momentum", "[", "n", "]"}], ",", "1"}], "}"}]}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->617351725],
Cell[BoxData[
@@ -340,67 +584,54 @@ Cell[BoxData[
RowBox[{
SuperscriptBox[
FormBox[
- FormBox["n",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
FormBox["n",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
FormBox["n",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}],
SuperscriptBox[
RowBox[{
FormBox["\<\"(\"\>",
@@ -408,279 +639,181 @@ Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- FormBox["n",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox["p",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
TraditionalForm]}],
TraditionalForm],
FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]]}], "-",
- FormBox[
- SuperscriptBox["g",
+ TraditionalForm]}], "2"]]}], "+",
+ FractionBox[
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], "+",
- FractionBox[
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["n",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
FormBox["n",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}],
RowBox[{
FormBox[
- FormBox["n",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox["p",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]}]]}], ")"}]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{341, 67},
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{411, 66},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[5]=",
- CellID->780926605]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GluonPropagator", "[",
- RowBox[{"p", ",", "\[Mu]", ",", "\[Nu]"}], "]"}], "//",
- "Explicit"}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GP", "[",
+ RowBox[{"p", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[6]:=",
+ CellLabel->"In[1]:=",
CellID->1065132203],
Cell[BoxData[
FormBox[
- RowBox[{"-",
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{59, 50},
+ RowBox[{
+ SubsuperscriptBox["\[CapitalPi]", "g",
+ RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ FormBox["\[Nu]",
+ TraditionalForm]}]], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{59, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[6]=",
- CellID->315989703]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["\<\
-This is a convenient way to enter amplitudes by hand (GP is an abbreviation \
-GluonPropagator).\
-\>", "Text",
- CellTags->"GluonPropagator",
- CellID->688757709],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Explicit", "[",
- RowBox[{
- RowBox[{"GP", "[",
- RowBox[{"p", ",", "1", ",", "2"}], "]"}], ",",
- RowBox[{"Gauge", "\[Rule]", "\[Xi]"}]}], "]"}]], "Input",
- CellTags->"GluonPropagator",
- CellLabel->"In[7]:=",
- CellID->629708898],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["ci1",
- TraditionalForm],
- TraditionalForm],
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}],
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
- FormBox["ci2",
+ FormBox["p",
TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"1", "-", "\[Xi]"}], ")"}], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], "-",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], ")"}]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{220, 68},
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]]}], TraditionalForm]], "Output",
+ ImageSize->{60, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonPropagator",
- CellLabel->"Out[7]=",
- CellID->1689747408]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"GP", "[",
- RowBox[{
- RowBox[{"-", "k"}], ",", "3", ",", "4"}], "]"}], "//", "Explicit"}], "//",
- "FCE"}], "//", "StandardForm"}]], "Input",
- CellTags->"GluonPropagator",
- CellLabel->"In[8]:=",
- CellID->1462464756],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"-", "\[ImaginaryI]"}], " ",
- RowBox[{"FAD", "[", "k", "]"}], " ",
- RowBox[{"MTD", "[",
- RowBox[{"li3", ",", "li4"}], "]"}], " ",
- RowBox[{"SD", "[",
- RowBox[{"ci3", ",", "ci4"}], "]"}]}]], "Output",
- ImageSize->{279, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonPropagator",
- CellLabel->"Out[8]//StandardForm=",
- CellID->1893476356]
-}, Open ]],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
Cell[CellGroupData[{
@@ -691,7 +824,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", "\[Rule]", " ", "1"}]}], "]"}], "//",
"Explicit"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[9]:=",
+ CellLabel->"In[1]:=",
CellID->739433365],
Cell[BoxData[
@@ -716,32 +849,24 @@ Cell[BoxData[
RowBox[{
FractionBox[
RowBox[{"11", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"], "-",
RowBox[{
FractionBox["19", "6"], " ",
SuperscriptBox[
@@ -749,30 +874,23 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{278, 59},
+ ImageSize->{307, 57},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[9]=",
- CellID->417079749]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -784,7 +902,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", "\[Rule]", " ", "2"}]}], "]"}], "//",
"Explicit"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[10]:=",
+ CellLabel->"In[2]:=",
CellID->493368144],
Cell[BoxData[
@@ -815,58 +933,43 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], "-",
- RowBox[{
- FractionBox["1", "3"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}],
+ TraditionalForm]}]]}]}], "-",
+ RowBox[{
+ FractionBox["1", "3"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{282, 54},
+ ImageSize->{306, 56},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[10]=",
- CellID->1754648571]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -878,7 +981,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", "\[Rule]", " ", "3"}]}], "]"}], "//",
"Explicit"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[11]:=",
+ CellLabel->"In[3]:=",
CellID->2062559987],
Cell[BoxData[
@@ -908,58 +1011,43 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
FractionBox[
RowBox[{"4", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"]}], ")"}]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{279, 59},
+ ImageSize->{303, 57},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[11]=",
- CellID->674017829]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -971,7 +1059,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", "\[Rule]", " ", "4"}]}], "]"}], "//",
"Explicit"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[12]:=",
+ CellLabel->"In[4]:=",
CellID->807671915],
Cell[BoxData[
@@ -996,32 +1084,24 @@ Cell[BoxData[
RowBox[{
FractionBox[
RowBox[{"10", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"], "-",
RowBox[{
FractionBox["10", "3"], " ",
SuperscriptBox[
@@ -1029,30 +1109,23 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{278, 59},
+ ImageSize->{308, 57},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[12]=",
- CellID->2094855988]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1064,7 +1137,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", "\[Rule]", " ", "5"}]}], "]"}], "//",
"Explicit"}]], "Input",
CellTags->"GluonPropagator",
- CellLabel->"In[13]:=",
+ CellLabel->"In[5]:=",
CellID->1621125251],
Cell[BoxData[
@@ -1089,32 +1162,24 @@ Cell[BoxData[
RowBox[{
FractionBox[
RowBox[{"10", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"], "-",
RowBox[{
FractionBox["10", "3"], " ",
SuperscriptBox[
@@ -1122,22 +1187,16 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], "+",
FractionBox[
@@ -1164,62 +1223,48 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
FractionBox[
RowBox[{"4", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"]}], ")"}]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{536, 59},
+ ImageSize->{310, 126},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonPropagator",
- CellLabel->"Out[13]=",
- CellID->1304358400]
+ CellLabel->"Out[5]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -1251,6 +1296,12 @@ Cell[TextData[{
ButtonNote->"GluonVertex"],
FontFamily->"Verdana"],
", ",
+ StyleBox[ButtonBox["GhostVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GhostVertex",
+ ButtonNote->"GhostVertex"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["GhostPropagator",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
@@ -1263,9 +1314,7 @@ Cell[TextData[{
ButtonNote->"GluonGhostVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GluonPropagator",
- CellID->1661110705]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1282,27 +1331,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 56.960393}",
+ "built" -> "{2020, 1, 5, 18, 58, 36.674137}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "GluonPropagator[p, {mu, a}, {nu, b}] or GluonPropagator[p, mu, a , nu, b \
-] yields the gluon propagator. GluonPropagator[p, {mu}, {nu}] or \
-GluonPropagator[p, mu, nu] omits the SUNDelta. The gauge and the dimension is \
-determined by the option Gauge and Dimension. The following settings of Gauge \
-are possible: 1 for the Feynman gauge; \\[Alpha] for the general covariant \
-gauge; {Momentum[n] ,1} for the axial gauge. GP can be used as an \
-abbreviation of GluonPropagator.", "synonyms" -> {}, "title" ->
- "GluonPropagator", "titlemodifier" -> "", "windowtitle" ->
- "GluonPropagator", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GluonPropagator"}, "SearchTextTranslated" -> ""},
+ "GluonPropagator[p, {\\[Mu], a}, {\\[Nu], b}] or GluonPropagator[p, \
+\\[Mu], a, \\[Nu], b] yields the gluon propagator. GluonPropagator[p, \
+{\\[Mu]}, {\\[Nu]}] or GluonPropagator[p, \\[Mu], \\[Nu]] omits the \
+SUNDelta.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "GluonPropagator",
+ "titlemodifier" -> "", "windowtitle" -> "GluonPropagator", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/GluonPropagator"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1310,8 +1356,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1320,241 +1367,191 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3985, 107, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[8229, 259, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1536605323]},
+ CellID->1965231034]},
"GluonPropagator"->{
- Cell[4597, 134, 93, 2, 35, "Subsubsection",
- CellTags->"GluonPropagator",
- CellID->1676340970],
- Cell[4715, 140, 101, 3, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->730734970],
- Cell[4819, 145, 229, 7, 36, "Output",
- CellTags->"GluonPropagator",
- CellID->9606294],
- Cell[5085, 157, 148, 4, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->1962710719],
- Cell[5236, 163, 589, 17, 56, "Output",
- CellTags->"GluonPropagator",
- CellID->2023427444],
- Cell[5862, 185, 206, 6, 27, "Input",
+ Cell[8862, 288, 206, 6, 27, "Input",
CellTags->"GluonPropagator",
CellID->1432103581],
- Cell[6071, 193, 522, 21, 42, "Output",
- CellTags->"GluonPropagator",
- CellID->879390685],
- Cell[6630, 219, 289, 8, 27, "Input",
+ Cell[9071, 296, 502, 20, 41, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[10862, 375, 240, 6, 27, "Input",
CellTags->"GluonPropagator",
CellID->922890899],
- Cell[6922, 229, 1860, 73, 87, "Output",
+ Cell[11105, 383, 1860, 73, 86, "Output",
CellTags->"GluonPropagator",
CellID->1278353242],
- Cell[8819, 307, 375, 11, 27, "Input",
+ Cell[15254, 552, 386, 10, 45, "Input",
CellTags->"GluonPropagator",
CellID->617351725],
- Cell[9197, 320, 5127, 193, 88, "Output",
- CellTags->"GluonPropagator",
- CellID->780926605],
- Cell[14361, 518, 218, 7, 27, "Input",
+ Cell[15643, 564, 4594, 171, 87, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[20416, 747, 170, 5, 27, "Input",
CellTags->"GluonPropagator",
CellID->1065132203],
- Cell[14582, 527, 730, 29, 71, "Output",
- CellTags->"GluonPropagator",
- CellID->315989703],
- Cell[15327, 559, 169, 5, 52, "Text",
- CellTags->"GluonPropagator",
- CellID->688757709],
- Cell[15521, 568, 260, 8, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->629708898],
- Cell[15784, 578, 1853, 73, 89, "Output",
- CellTags->"GluonPropagator",
- CellID->1689747408],
- Cell[17674, 656, 286, 10, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->1462464756],
- Cell[17963, 668, 421, 13, 49, "Output",
- CellTags->"GluonPropagator",
- CellID->1893476356],
- Cell[18421, 686, 293, 8, 27, "Input",
+ Cell[20589, 754, 406, 15, 40, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[22058, 819, 293, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->739433365],
- Cell[18717, 696, 2106, 78, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->417079749],
- Cell[20860, 779, 294, 8, 27, "Input",
+ Cell[22354, 829, 1706, 63, 78, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[24097, 897, 293, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->493368144],
- Cell[21157, 789, 2126, 79, 75, "Output",
- CellTags->"GluonPropagator",
- CellID->1754648571],
- Cell[23320, 873, 295, 8, 27, "Input",
+ Cell[24393, 907, 1726, 64, 77, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[26156, 976, 294, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->2062559987],
- Cell[23618, 883, 2115, 78, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->674017829],
- Cell[25770, 966, 294, 8, 27, "Input",
+ Cell[26453, 986, 1714, 63, 78, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[28204, 1054, 293, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->807671915],
- Cell[26067, 976, 2108, 78, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->2094855988],
- Cell[28212, 1059, 295, 8, 27, "Input",
+ Cell[28500, 1064, 1706, 63, 78, "Output",
+ CellTags->"GluonPropagator"],
+ Cell[30243, 1132, 294, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->1621125251],
- Cell[28510, 1069, 3982, 148, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->1304358400],
- Cell[32860, 1240, 787, 27, 32, "Text",
- CellTags->"GluonPropagator",
- CellID->1661110705]}
+ Cell[30540, 1142, 3201, 119, 147, "Output",
+ CellTags->"GluonPropagator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 35930, 1321},
- {"GluonPropagator", 36073, 1325}
+ {"PrimaryExamplesSection", 37093, 1368},
+ {"GluonPropagator", 37236, 1372}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3463, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 1036, 25, 178, "Usage",
- CellID->982511436],
+Cell[4053, 105, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3985, 107, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1536605323],
-Cell[4376, 124, 196, 6, 25, "ExampleSection",
- CellID->1498721966],
+Cell[4370, 120, 1332, 40, 148, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[4597, 134, 93, 2, 35, "Subsubsection",
- CellTags->"GluonPropagator",
- CellID->1676340970],
+Cell[5727, 164, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2079292544],
+Cell[6469, 190, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6503, 192, 250, 8, 70, "Notes"],
+Cell[6756, 202, 356, 13, 70, "Notes",
+ CellID->1067943069],
+Cell[7115, 217, 386, 12, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4715, 140, 101, 3, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->730734970],
-Cell[4819, 145, 229, 7, 36, "Output",
- CellTags->"GluonPropagator",
- CellID->9606294]
+Cell[7526, 233, 99, 2, 70, "Input"],
+Cell[7628, 237, 540, 15, 56, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5085, 157, 148, 4, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->1962710719],
-Cell[5236, 163, 589, 17, 56, "Output",
- CellTags->"GluonPropagator",
- CellID->2023427444]
-}, Open ]],
+Cell[8229, 259, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1965231034],
+Cell[CellGroupData[{
+Cell[8642, 278, 195, 6, 26, "ExampleSection",
+ CellID->104593034],
Cell[CellGroupData[{
-Cell[5862, 185, 206, 6, 27, "Input",
+Cell[8862, 288, 206, 6, 27, "Input",
CellTags->"GluonPropagator",
CellID->1432103581],
-Cell[6071, 193, 522, 21, 42, "Output",
- CellTags->"GluonPropagator",
- CellID->879390685]
+Cell[9071, 296, 502, 20, 41, "Output",
+ CellTags->"GluonPropagator"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9610, 321, 84, 2, 27, "Input"],
+Cell[9697, 325, 998, 39, 65, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6630, 219, 289, 8, 27, "Input",
+Cell[10732, 369, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[10862, 375, 240, 6, 27, "Input",
CellTags->"GluonPropagator",
CellID->922890899],
-Cell[6922, 229, 1860, 73, 87, "Output",
+Cell[11105, 383, 1860, 73, 86, "Output",
CellTags->"GluonPropagator",
CellID->1278353242]
}, Open ]],
Cell[CellGroupData[{
-Cell[8819, 307, 375, 11, 27, "Input",
+Cell[13002, 461, 84, 2, 27, "Input"],
+Cell[13089, 465, 1986, 75, 86, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15124, 546, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[15254, 552, 386, 10, 45, "Input",
CellTags->"GluonPropagator",
CellID->617351725],
-Cell[9197, 320, 5127, 193, 88, "Output",
- CellTags->"GluonPropagator",
- CellID->780926605]
+Cell[15643, 564, 4594, 171, 87, "Output",
+ CellTags->"GluonPropagator"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[14361, 518, 218, 7, 27, "Input",
+Cell[20286, 741, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[20416, 747, 170, 5, 27, "Input",
CellTags->"GluonPropagator",
CellID->1065132203],
-Cell[14582, 527, 730, 29, 71, "Output",
- CellTags->"GluonPropagator",
- CellID->315989703]
+Cell[20589, 754, 406, 15, 40, "Output",
+ CellTags->"GluonPropagator"]
}, Open ]],
-Cell[15327, 559, 169, 5, 52, "Text",
- CellTags->"GluonPropagator",
- CellID->688757709],
Cell[CellGroupData[{
-Cell[15521, 568, 260, 8, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->629708898],
-Cell[15784, 578, 1853, 73, 89, "Output",
- CellTags->"GluonPropagator",
- CellID->1689747408]
+Cell[21032, 774, 84, 2, 27, "Input"],
+Cell[21119, 778, 760, 29, 63, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[17674, 656, 286, 10, 27, "Input",
- CellTags->"GluonPropagator",
- CellID->1462464756],
-Cell[17963, 668, 421, 13, 49, "Output",
- CellTags->"GluonPropagator",
- CellID->1893476356]
-}, Open ]],
+Cell[21928, 813, 105, 2, 9, "ExampleDelimiter"],
Cell[CellGroupData[{
-Cell[18421, 686, 293, 8, 27, "Input",
+Cell[22058, 819, 293, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->739433365],
-Cell[18717, 696, 2106, 78, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->417079749]
+Cell[22354, 829, 1706, 63, 78, "Output",
+ CellTags->"GluonPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20860, 779, 294, 8, 27, "Input",
+Cell[24097, 897, 293, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->493368144],
-Cell[21157, 789, 2126, 79, 75, "Output",
- CellTags->"GluonPropagator",
- CellID->1754648571]
+Cell[24393, 907, 1726, 64, 77, "Output",
+ CellTags->"GluonPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23320, 873, 295, 8, 27, "Input",
+Cell[26156, 976, 294, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->2062559987],
-Cell[23618, 883, 2115, 78, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->674017829]
+Cell[26453, 986, 1714, 63, 78, "Output",
+ CellTags->"GluonPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25770, 966, 294, 8, 27, "Input",
+Cell[28204, 1054, 293, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->807671915],
-Cell[26067, 976, 2108, 78, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->2094855988]
+Cell[28500, 1064, 1706, 63, 78, "Output",
+ CellTags->"GluonPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[28212, 1059, 295, 8, 27, "Input",
+Cell[30243, 1132, 294, 8, 27, "Input",
CellTags->"GluonPropagator",
CellID->1621125251],
-Cell[28510, 1069, 3982, 148, 80, "Output",
- CellTags->"GluonPropagator",
- CellID->1304358400]
-}, Open ]],
-Cell[32507, 1220, 31, 0, 29, "SectionFooterSpacer"]
+Cell[30540, 1142, 3201, 119, 147, "Output",
+ CellTags->"GluonPropagator"]
+}, Open ]]
}, Open ]]
}, Open ]],
+Cell[33780, 1266, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[32587, 1226, 270, 12, 31, "SeeAlsoSection",
+Cell[33848, 1271, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[32860, 1240, 787, 27, 32, "Text",
- CellTags->"GluonPropagator",
- CellID->1661110705]
+Cell[34121, 1285, 907, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[33662, 1270, 23, 0, 42, "FooterCell"]
+Cell[35043, 1319, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonSelfEnergy.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonSelfEnergy.nb
index 4db494236..87a95ec4c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonSelfEnergy.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonSelfEnergy.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 20029, 708]
-NotebookOptionsPosition[ 15828, 579]
-NotebookOutlinePosition[ 18720, 660]
-CellTagsIndexPosition[ 18601, 654]
+NotebookDataLength[ 19555, 685]
+NotebookOptionsPosition[ 15800, 572]
+NotebookOutlinePosition[ 18314, 641]
+CellTagsIndexPosition[ 18195, 635]
WindowTitle->GluonSelfEnergy
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GluonSelfEnergy\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GluonSelfEnergy"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"GluonGhostVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonGhostVertex"], "\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonVertex"], "\<\"GhostPropagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GhostPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GluonSelfEnergy\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GluonSelfEnergy"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GluonSelfEnergy.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$83724],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GluonSelfEnergy", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$158049],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GluonSelfEnergy", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,20 @@ GluonSelfEnergy.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GluonSelfEnergy", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GluonSelfEnergy", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -82,11 +122,10 @@ Cell[BoxData[GridBox[{
RowBox[{"GluonSelfEnergy", "[",
RowBox[{
RowBox[{"{",
- RowBox[{"mu", ",", " ", "a"}], "}"}], ",", " ",
+ RowBox[{"\[Mu]", ",", " ", "a"}], "}"}], ",", " ",
RowBox[{"{",
- RowBox[{"nu", ",", "b"}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "yields the 1-loop Gluon selfenergy."
+ RowBox[{"\[Nu]", ",", "b"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the 1-loop gluon selfenergy."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,44 +136,39 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->2095789182],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellID->1191212838],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1101359715],
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"GluonSelfEnergy",
- CellID->115800890],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "GluonSelfEnergy", "]"}]], "Input",
- CellTags->"GluonSelfEnergy",
- CellLabel->"In[1]:=",
- CellID->1632878111],
+ CellLabel->"In[11]:="],
Cell[BoxData[
FormBox[
@@ -159,25 +193,55 @@ Cell[BoxData[
RowBox[{"Momentum", "\[Rule]",
RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{362, 64},
+ ImageSize->{563, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonSelfEnergy",
- CellLabel->"Out[1]=",
- CellID->22082021]
+ CellLabel->"Out[11]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->402777423],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->822962424],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"GluonSelfEnergy", "[",
RowBox[{
RowBox[{"{",
RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"\[Nu]", ",", "b"}], "}"}]}], "]"}]], "Input",
+ RowBox[{"\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "p"}]}], "]"}]], "Input",
CellTags->"GluonSelfEnergy",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->407959539],
Cell[BoxData[
@@ -207,57 +271,40 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{"\[ImaginaryI]", " ",
RowBox[{"(",
RowBox[{
@@ -281,63 +328,45 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{458, 93},
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{331, 75},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonSelfEnergy",
- CellLabel->"Out[2]=",
- CellID->793043844]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -349,9 +378,10 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"Gauge", "\[Rule]", "\[Xi]"}]}], "]"}]], "Input",
+ RowBox[{"Gauge", "\[Rule]", "\[Xi]"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "q"}]}], "]"}]], "Input",
CellTags->"GluonSelfEnergy",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1914387770],
Cell[BoxData[
@@ -392,57 +422,40 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ FormBox["q",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{"\[ImaginaryI]", " ",
RowBox[{"(",
RowBox[{
@@ -466,67 +479,49 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ FormBox["q",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{443, 144},
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{539, 120},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonSelfEnergy",
- CellLabel->"Out[3]=",
- CellID->722359513]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -552,6 +547,12 @@ Cell[TextData[{
ButtonNote->"GluonPropagator"],
FontFamily->"Verdana"],
", ",
+ StyleBox[ButtonBox["GluonGhostVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonGhostVertex",
+ ButtonNote->"GluonGhostVertex"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["GluonVertex",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GluonVertex",
@@ -563,24 +564,16 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
ButtonNote->"GhostPropagator"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["GluonGhostVertex",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GluonGhostVertex",
- ButtonNote->"GluonGhostVertex"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GluonSelfEnergy",
- CellID->1505167912]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"GluonSelfEnergy",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -589,21 +582,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 20, 58.781887}",
+ "built" -> "{2020, 1, 5, 18, 58, 37.982017}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "GluonSelfEnergy[{mu, a}, {nu, b}] yields the 1-loop Gluon selfenergy.",
- "synonyms" -> {}, "title" -> "GluonSelfEnergy", "titlemodifier" -> "",
- "windowtitle" -> "GluonSelfEnergy", "type" -> "Symbol", "uri" ->
+ "GluonSelfEnergy[{\\[Mu], a}, {\\[Nu], b}] yields the 1-loop gluon \
+selfenergy.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "GluonSelfEnergy", "titlemodifier" -> "", "windowtitle" ->
+ "GluonSelfEnergy", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/GluonSelfEnergy"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -611,8 +605,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -621,95 +616,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3492, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6689, 205, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2095789182]},
+ CellID->402777423]},
"GluonSelfEnergy"->{
- Cell[4104, 126, 92, 2, 35, "Subsubsection",
- CellTags->"GluonSelfEnergy",
- CellID->115800890],
- Cell[4221, 132, 148, 4, 27, "Input",
- CellTags->"GluonSelfEnergy",
- CellID->1632878111],
- Cell[4372, 138, 942, 28, 85, "Output",
- CellTags->"GluonSelfEnergy",
- CellID->22082021],
- Cell[5351, 171, 270, 9, 27, "Input",
+ Cell[7321, 234, 317, 10, 27, "Input",
CellTags->"GluonSelfEnergy",
CellID->407959539],
- Cell[5624, 182, 4152, 157, 114, "Output",
- CellTags->"GluonSelfEnergy",
- CellID->793043844],
- Cell[9813, 344, 319, 10, 27, "Input",
+ Cell[7641, 246, 3130, 122, 96, "Output",
+ CellTags->"GluonSelfEnergy"],
+ Cell[10808, 373, 366, 11, 27, "Input",
CellTags->"GluonSelfEnergy",
CellID->1914387770],
- Cell[10135, 356, 4496, 168, 165, "Output",
- CellTags->"GluonSelfEnergy",
- CellID->722359513],
- Cell[14999, 547, 787, 27, 70, "Text",
- CellTags->"GluonSelfEnergy",
- CellID->1505167912]}
+ Cell[11177, 386, 3474, 133, 141, "Output",
+ CellTags->"GluonSelfEnergy"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17659, 622},
- {"GluonSelfEnergy", 17801, 626}
+ {"PrimaryExamplesSection", 17683, 617},
+ {"GluonSelfEnergy", 17825, 621}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3363, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 543, 17, 82, "Usage",
- CellID->982511436],
+Cell[3953, 103, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3492, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2095789182],
-Cell[3883, 116, 196, 6, 25, "ExampleSection",
- CellID->1191212838],
+Cell[4270, 118, 540, 16, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4104, 126, 92, 2, 35, "Subsubsection",
- CellTags->"GluonSelfEnergy",
- CellID->115800890],
+Cell[4835, 138, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1101359715],
+Cell[5577, 164, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4221, 132, 148, 4, 27, "Input",
- CellTags->"GluonSelfEnergy",
- CellID->1632878111],
-Cell[4372, 138, 942, 28, 85, "Output",
- CellTags->"GluonSelfEnergy",
- CellID->22082021]
+Cell[5633, 168, 98, 2, 70, "Input"],
+Cell[5734, 172, 894, 26, 64, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5351, 171, 270, 9, 27, "Input",
+Cell[6689, 205, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->402777423],
+Cell[CellGroupData[{
+Cell[7101, 224, 195, 6, 26, "ExampleSection",
+ CellID->822962424],
+Cell[CellGroupData[{
+Cell[7321, 234, 317, 10, 27, "Input",
CellTags->"GluonSelfEnergy",
CellID->407959539],
-Cell[5624, 182, 4152, 157, 114, "Output",
- CellTags->"GluonSelfEnergy",
- CellID->793043844]
+Cell[7641, 246, 3130, 122, 96, "Output",
+ CellTags->"GluonSelfEnergy"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9813, 344, 319, 10, 27, "Input",
+Cell[10808, 373, 366, 11, 27, "Input",
CellTags->"GluonSelfEnergy",
CellID->1914387770],
-Cell[10135, 356, 4496, 168, 165, "Output",
- CellTags->"GluonSelfEnergy",
- CellID->722359513]
-}, Open ]],
-Cell[14646, 527, 31, 0, 70, "SectionFooterSpacer"]
+Cell[11177, 386, 3474, 133, 141, "Output",
+ CellTags->"GluonSelfEnergy"]
}, Open ]]
}, Open ]],
+Cell[14678, 523, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[14726, 533, 270, 12, 70, "SeeAlsoSection",
+Cell[14746, 528, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[14999, 547, 787, 27, 70, "Text",
- CellTags->"GluonSelfEnergy",
- CellID->1505167912]
+Cell[15019, 542, 739, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[15801, 577, 23, 0, 70, "FooterCell"]
+Cell[15773, 570, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonVertex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonVertex.nb
index b65f4db6f..efef8660f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonVertex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GluonVertex.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 46866, 1754]
-NotebookOptionsPosition[ 39002, 1505]
-NotebookOutlinePosition[ 43929, 1642]
-CellTagsIndexPosition[ 43812, 1636]
+NotebookDataLength[ 39718, 1476]
+NotebookOptionsPosition[ 34054, 1304]
+NotebookOutlinePosition[ 37259, 1388]
+CellTagsIndexPosition[ 37142, 1382]
WindowTitle->GluonVertex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GluonVertex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GluonVertex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GhostPropagator"], "\<\"GluonGhostVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonGhostVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GluonVertex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GluonVertex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$84065],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GluonVertex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$158533],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GluonVertex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ GluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GluonVertex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GluonVertex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -87,77 +123,138 @@ Cell[BoxData[GridBox[{
RowBox[{"q", ",", "nu", ",", "b"}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"k", ",", "la", ",", "c"}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "or GluonVertex[p,mu,a , q,nu,b , k,la,c ] yields the 3-gluon vertex. \
-GluonVertex[{p,mu}, {q,nu}, {k,la}] yields the 3-gluon vertex without color \
-structure and the coupling constant. GluonVertex[{p,mu,a}, {q,nu,b}, \
-{k,la,c}, {s,si,d}] or GluonVertex[{mu,a}, {nu,b}, {la,c}, {si,d}] or \
-GluonVertex[p,mu,a , q,nu,b , k,la,c , s,si,d] or GluonVertex[ mu,a , nu,b , \
-la,c , si,d ] yields the 4-gluon vertex. The dimension and the name of the \
-coupling constant are determined by the options Dimension and \
-CouplingConstant.\n\nNote: All momenta are flowing into the vertex.\n\nGV can \
-be used as an abbreviation of GluonVertex."
+ " \[LineSeparator]or ",
+ Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ "p", ",", " ", "mu", ",", " ", "a", ",", " ", "q", ",", " ", "nu", ",",
+ " ", "b", ",", " ", "k", ",", " ", "la", ",", " ", "c"}], "]"}]],
+ "InlineFormula"],
+ " yields the 3-gluon vertex. "
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "mu"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "nu"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "la"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the 3-gluon vertex without color structure and \
+the coupling constant."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "mu", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "nu", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "la", ",", "c"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"s", ",", "si", ",", "d"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]or ",
+ Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"mu", ",", "a"}], "}"}], ",", " ",
+ RowBox[{"{",
+ RowBox[{"nu", ",", "b"}], "}"}], ",", " ",
+ RowBox[{"{",
+ RowBox[{"la", ",", "c"}], "}"}], ",", " ",
+ RowBox[{"{",
+ RowBox[{"si", ",", "d"}], "}"}]}], "]"}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ "p", ",", "mu", ",", "a", ",", " ", "q", ",", "nu", ",", "b", ",", " ",
+ "k", ",", "la", ",", "c", " ", ",", " ", "s", ",", "si", ",", "d"}],
+ "]"}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"GluonVertex", "[",
+ RowBox[{
+ "mu", ",", "a", ",", "nu", ",", "b", ",", "la", ",", "c", ",", " ",
+ "si", ",", "d"}], " ", "]"}]], "InlineFormula"],
+ " yields the 4-gluon vertex."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {},
+ "Rows" -> {None, None, {None}}, "RowsIndexed" -> {}}},
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1395484410],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->539519014],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1382221071],
-
-Cell[CellGroupData[{
+ Cell[BoxData["GV"], "InlineFormula"],
+ " can be used as an abbreviation of ",
+ ButtonBox["GluonVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonVertex",
+ ButtonNote->"GluonVertex"],
+ "."
+}], "Notes"],
-Cell[BoxData["GV"], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[1]:=",
- CellID->1626723090],
+Cell[TextData[{
+ "The dimension and the name of the coupling constant are determined by the \
+options ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ " and ",
+ ButtonBox["CouplingConstant",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ ". "
+}], "Notes",
+ CellID->14058075],
-Cell[BoxData[
- FormBox["GluonVertex", TraditionalForm]], "Output",
- ImageSize->{82, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[1]=",
- CellID->204661031]
-}, Open ]],
+Cell["All momenta are flowing into the vertex.", "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "GluonVertex", "]"}]], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[2]:=",
- CellID->970529707],
+ CellLabel->"In[16]:="],
Cell[BoxData[
FormBox[
@@ -169,16 +266,45 @@ Cell[BoxData[
RowBox[{"Explicit", "\[Rule]", "False"}], ",",
RowBox[{"\[CapitalOmega]", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{459, 15},
+ ImageSize->{435, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[2]=",
- CellID->1089057632]
+ CellLabel->"Out[16]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->478867501],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2087086991],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"GluonVertex", "[",
RowBox[{
@@ -189,7 +315,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}]], "Input",
CellTags->"GluonVertex",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->824487557],
Cell[BoxData[
@@ -241,30 +367,18 @@ Cell[BoxData[
FormBox["r",
TraditionalForm],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{152, 21},
+ ImageSize->{170, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonVertex",
- CellLabel->"Out[3]=",
- CellID->860313562]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GluonVertex", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}], "//",
- "Explicit"}]], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[4]:=",
- CellID->1236447463],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -287,152 +401,115 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["p",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ TraditionalForm]], "-",
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["q",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["r",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{394, 22},
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{422, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[4]=",
- CellID->1768691263]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GluonVertex", "[",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GV", "[",
RowBox[{
RowBox[{"{",
RowBox[{"p", ",", "\[Mu]"}], "}"}], ",",
@@ -441,7 +518,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"r", ",", "\[Rho]"}], "}"}]}], "]"}]], "Input",
CellTags->"GluonVertex",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->1094321460],
Cell[BoxData[
@@ -466,30 +543,18 @@ Cell[BoxData[
TraditionalForm],
FormBox["r",
TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{111, 19},
+ ImageSize->{123, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonVertex",
- CellLabel->"Out[5]=",
- CellID->1420820569]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GluonVertex", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"p", ",", "\[Mu]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"q", ",", "\[Nu]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"r", ",", "\[Rho]"}], "}"}]}], "]"}], "//",
- "Explicit"}]], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[6]:=",
- CellID->238279967],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -498,150 +563,114 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["p",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ TraditionalForm]], "-",
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["q",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["r",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
RowBox[{
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{353, 20},
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{375, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[6]=",
- CellID->1476342627]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"GluonVertex", "[",
RowBox[{
@@ -654,7 +683,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}]}], "]"}]], "Input",
CellTags->"GluonVertex",
- CellLabel->"In[7]:=",
+ CellLabel->"In[1]:=",
CellID->410547695],
Cell[BoxData[
@@ -694,62 +723,18 @@ Cell[BoxData[
TraditionalForm],
FormBox["s",
TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{145, 22},
+ ImageSize->{160, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonVertex",
- CellLabel->"Out[7]=",
- CellID->1497069485]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GluonVertex", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\[Rho]", ",", "c"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\[Sigma]", ",", "d"}], "}"}]}], "]"}]], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[8]:=",
- CellID->1809122983],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox["W",
- RowBox[{
- FormBox["a",
- TraditionalForm],
- FormBox["b",
- TraditionalForm],
- FormBox["c",
- TraditionalForm],
- FormBox["d",
- TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{58, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[8]=",
- CellID->1287848128]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"GluonVertex", "[",
- RowBox[{
- "\[Mu]", ",", "a", ",", "\[Nu]", ",", "b", ",", "\[Rho]", ",", "c", ",",
- "\[Sigma]", ",", "d"}], "]"}], "//", "Explicit"}]], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[9]:=",
- CellID->581429220],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -792,71 +777,47 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -891,71 +852,47 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -990,165 +927,102 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{406, 83},
+ ImageSize->{418, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[9]=",
- CellID->442974793]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
-Cell["\<\
-A very convenient way to enter diagrams by hand is to label each line hitting \
-a vertex by a number and put this number after the inflowing momentum.\
-\>", "Text",
- CellTags->"GluonVertex",
- CellID->606211454],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"GV", "[",
- RowBox[{"p", ",", "1", ",", "q", ",", "2", ",", "r", ",", "3"}],
- "]"}]], "Input",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Rho]", ",", "c"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Sigma]", ",", "d"}], "}"}]}], "]"}]], "Input",
CellTags->"GluonVertex",
- CellLabel->"In[10]:=",
- CellID->1320893353],
+ CellLabel->"In[1]:=",
+ CellID->1809122983],
Cell[BoxData[
FormBox[
- RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci3",
- TraditionalForm],
- TraditionalForm]}]], " ",
+ SuperscriptBox["W",
RowBox[{
- SuperscriptBox["V",
- RowBox[{
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm]}]], "(",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\", \"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\", \"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{190, 21},
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm],
+ FormBox["c",
+ TraditionalForm],
+ FormBox["d",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{68, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"GluonVertex",
- CellLabel->"Out[10]=",
- CellID->47203245]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"GV", "[",
- RowBox[{
- "p", ",", "1", ",", "q", ",", "2", ",", "r", ",", "3", ",", "s", ",",
- "4"}], "]"}], "//", "Explicit"}]], "Input",
- CellTags->"GluonVertex",
- CellLabel->"In[11]:=",
- CellID->997671247],
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -1161,11 +1035,11 @@ Cell[BoxData[
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci1",
+ FormBox["a",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci4",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1176,11 +1050,11 @@ Cell[BoxData[
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci2",
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci3",
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1191,80 +1065,56 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci1",
+ FormBox["a",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci3",
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1275,11 +1125,11 @@ Cell[BoxData[
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci2",
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci4",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1290,80 +1140,56 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci1",
+ FormBox["a",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci2",
+ FormBox["b",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1374,11 +1200,11 @@ Cell[BoxData[
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["ci3",
+ FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["ci4",
+ FormBox["d",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1389,78 +1215,53 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{473, 86},
+ ImageSize->{418, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"GluonVertex",
- CellLabel->"Out[11]=",
- CellID->1675322303]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -1484,29 +1285,27 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["GluonGhostVertex",
+ StyleBox[ButtonBox["GluonPropagator",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GluonGhostVertex",
- ButtonNote->"GluonGhostVertex"],
+ ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
+ ButtonNote->"GhostPropagator"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["GluonPropagator",
+ StyleBox[ButtonBox["GluonGhostVertex",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/GluonPropagator",
- ButtonNote->"GluonPropagator"],
+ ButtonData->"paclet:FeynCalc/ref/GluonGhostVertex",
+ ButtonNote->"GluonGhostVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GluonVertex",
- CellID->731094773]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"GluonVertex",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1515,29 +1314,27 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 0.437492}",
+ "built" -> "{2020, 1, 5, 18, 58, 39.174541}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "GluonVertex[{p, mu, a}, {q, nu, b}, {k, la, c}] or GluonVertex[p,mu,a , \
-q,nu,b , k,la,c ] yields the 3-gluon vertex. GluonVertex[{p,mu}, {q,nu}, \
-{k,la}] yields the 3-gluon vertex without color structure and the coupling \
-constant. GluonVertex[{p,mu,a}, {q,nu,b}, {k,la,c}, {s,si,d}] or \
-GluonVertex[{mu,a}, {nu,b}, {la,c}, {si,d}] or GluonVertex[p,mu,a , q,nu,b , \
-k,la,c , s,si,d] or GluonVertex[mu,a , nu,b , la,c , si,d ] yields the \
-4-gluon vertex. The dimension and the name of the coupling constant are \
-determined by the options Dimension and CouplingConstant. Note: All momenta \
-are flowing into the vertex. GV can be used as an abbreviation of \
-GluonVertex.", "synonyms" -> {}, "title" -> "GluonVertex", "titlemodifier" ->
- "", "windowtitle" -> "GluonVertex", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/GluonVertex"}, "SearchTextTranslated" -> ""},
+ "GluonVertex[{p, mu, a}, {q, nu, b}, {k, la, c}] or GluonVertex[p, mu, a, \
+q, nu, b, k, la, c] yields the 3-gluon vertex. GluonVertex[{p, mu}, {q, nu}, \
+{k, la}] yields the 3-gluon vertex without color structure and the coupling \
+constant. GluonVertex[{p, mu, a}, {q, nu, b}, {k, la, c}, {s, si, d}] or \
+GluonVertex[{mu, a}, {nu, b}, {la, c}, {si, d}] or GluonVertex[p, mu, a, q, \
+nu, b, k, la, c , s, si, d] or GluonVertex[mu, a, nu, b, la, c, si, d ] \
+yields the 4-gluon vertex.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "GluonVertex", "titlemodifier" -> "", "windowtitle" -> "GluonVertex",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/GluonVertex"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1545,8 +1342,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1555,207 +1353,131 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4163, 109, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[8918, 278, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1395484410]},
+ CellID->478867501]},
"GluonVertex"->{
- Cell[4797, 138, 98, 3, 27, "Input",
- CellTags->"GluonVertex",
- CellID->1626723090],
- Cell[4898, 143, 222, 7, 36, "Output",
- CellTags->"GluonVertex",
- CellID->204661031],
- Cell[5157, 155, 139, 4, 27, "Input",
- CellTags->"GluonVertex",
- CellID->970529707],
- Cell[5299, 161, 485, 15, 36, "Output",
- CellTags->"GluonVertex",
- CellID->1089057632],
- Cell[5821, 181, 356, 11, 27, "Input",
+ Cell[9551, 307, 356, 11, 27, "Input",
CellTags->"GluonVertex",
CellID->824487557],
- Cell[6180, 194, 1223, 54, 42, "Output",
- CellTags->"GluonVertex",
- CellID->860313562],
- Cell[7440, 253, 398, 13, 27, "Input",
- CellTags->"GluonVertex",
- CellID->1236447463],
- Cell[7841, 268, 3989, 160, 43, "Output",
- CellTags->"GluonVertex",
- CellID->1768691263],
- Cell[11867, 433, 327, 11, 27, "Input",
+ Cell[9910, 320, 1203, 53, 40, "Output",
+ CellTags->"GluonVertex"],
+ Cell[14268, 510, 318, 11, 27, "Input",
CellTags->"GluonVertex",
CellID->1094321460],
- Cell[12197, 446, 651, 27, 40, "Output",
- CellTags->"GluonVertex",
- CellID->1420820569],
- Cell[12885, 478, 367, 13, 27, "Input",
- CellTags->"GluonVertex",
- CellID->238279967],
- Cell[13255, 493, 3695, 146, 41, "Output",
- CellTags->"GluonVertex",
- CellID->1476342627],
- Cell[16987, 644, 432, 13, 27, "Input",
+ Cell[14589, 523, 630, 26, 37, "Output",
+ CellTags->"GluonVertex"],
+ Cell[18092, 673, 432, 13, 27, "Input",
CellTags->"GluonVertex",
CellID->410547695],
- Cell[17422, 659, 982, 42, 43, "Output",
- CellTags->"GluonVertex",
- CellID->1497069485],
- Cell[18441, 706, 393, 13, 27, "Input",
+ Cell[18527, 688, 961, 41, 41, "Output",
+ CellTags->"GluonVertex"],
+ Cell[26066, 986, 384, 13, 27, "Input",
CellTags->"GluonVertex",
CellID->1809122983],
- Cell[18837, 721, 410, 17, 40, "Output",
- CellTags->"GluonVertex",
- CellID->1287848128],
- Cell[19284, 743, 277, 8, 27, "Input",
- CellTags->"GluonVertex",
- CellID->581429220],
- Cell[19564, 753, 8337, 310, 104, "Output",
- CellTags->"GluonVertex",
- CellID->442974793],
- Cell[27916, 1066, 220, 5, 52, "Text",
- CellTags->"GluonVertex",
- CellID->606211454],
- Cell[28161, 1075, 192, 6, 27, "Input",
- CellTags->"GluonVertex",
- CellID->1320893353],
- Cell[28356, 1083, 1222, 54, 42, "Output",
- CellTags->"GluonVertex",
- CellID->47203245],
- Cell[29615, 1142, 249, 8, 27, "Input",
- CellTags->"GluonVertex",
- CellID->997671247],
- Cell[29867, 1152, 8291, 310, 107, "Output",
- CellTags->"GluonVertex",
- CellID->1675322303],
- Cell[38526, 1485, 434, 15, 32, "Text",
- CellTags->"GluonVertex",
- CellID->731094773]}
+ Cell[26453, 1001, 389, 16, 38, "Output",
+ CellTags->"GluonVertex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 41419, 1556},
- {"GluonVertex", 41558, 1560}
+ {"PrimaryExamplesSection", 36326, 1354},
+ {"GluonVertex", 36464, 1358}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3139, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 1238, 27, 243, "Usage",
- CellID->982511436],
+Cell[3725, 99, 288, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4163, 109, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1395484410],
+Cell[4038, 114, 2723, 77, 245, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[4576, 128, 196, 6, 25, "ExampleSection",
- CellID->1382221071],
+Cell[6786, 195, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->539519014],
+Cell[7527, 221, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[7561, 223, 238, 8, 70, "Notes"],
+Cell[7802, 233, 413, 14, 70, "Notes",
+ CellID->14058075],
+Cell[8218, 249, 78, 1, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4797, 138, 98, 3, 27, "Input",
- CellTags->"GluonVertex",
- CellID->1626723090],
-Cell[4898, 143, 222, 7, 36, "Output",
- CellTags->"GluonVertex",
- CellID->204661031]
+Cell[8321, 254, 94, 2, 70, "Input"],
+Cell[8418, 258, 439, 13, 37, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5157, 155, 139, 4, 27, "Input",
- CellTags->"GluonVertex",
- CellID->970529707],
-Cell[5299, 161, 485, 15, 36, "Output",
- CellTags->"GluonVertex",
- CellID->1089057632]
-}, Open ]],
+Cell[8918, 278, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->478867501],
+Cell[CellGroupData[{
+Cell[9330, 297, 196, 6, 26, "ExampleSection",
+ CellID->2087086991],
Cell[CellGroupData[{
-Cell[5821, 181, 356, 11, 27, "Input",
+Cell[9551, 307, 356, 11, 27, "Input",
CellTags->"GluonVertex",
CellID->824487557],
-Cell[6180, 194, 1223, 54, 42, "Output",
- CellTags->"GluonVertex",
- CellID->860313562]
+Cell[9910, 320, 1203, 53, 40, "Output",
+ CellTags->"GluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7440, 253, 398, 13, 27, "Input",
- CellTags->"GluonVertex",
- CellID->1236447463],
-Cell[7841, 268, 3989, 160, 43, "Output",
- CellTags->"GluonVertex",
- CellID->1768691263]
+Cell[11150, 378, 84, 2, 27, "Input"],
+Cell[11237, 382, 2864, 117, 43, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11867, 433, 327, 11, 27, "Input",
+Cell[14138, 504, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[14268, 510, 318, 11, 27, "Input",
CellTags->"GluonVertex",
CellID->1094321460],
-Cell[12197, 446, 651, 27, 40, "Output",
- CellTags->"GluonVertex",
- CellID->1420820569]
+Cell[14589, 523, 630, 26, 37, "Output",
+ CellTags->"GluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12885, 478, 367, 13, 27, "Input",
- CellTags->"GluonVertex",
- CellID->238279967],
-Cell[13255, 493, 3695, 146, 41, "Output",
- CellTags->"GluonVertex",
- CellID->1476342627]
+Cell[15256, 554, 84, 2, 27, "Input"],
+Cell[15343, 558, 2570, 103, 40, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[16987, 644, 432, 13, 27, "Input",
+Cell[17962, 667, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[18092, 673, 432, 13, 27, "Input",
CellTags->"GluonVertex",
CellID->410547695],
-Cell[17422, 659, 982, 42, 43, "Output",
- CellTags->"GluonVertex",
- CellID->1497069485]
+Cell[18527, 688, 961, 41, 41, "Output",
+ CellTags->"GluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18441, 706, 393, 13, 27, "Input",
- CellTags->"GluonVertex",
- CellID->1809122983],
-Cell[18837, 721, 410, 17, 40, "Output",
- CellTags->"GluonVertex",
- CellID->1287848128]
+Cell[19525, 734, 84, 2, 27, "Input"],
+Cell[19612, 738, 6275, 236, 93, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[19284, 743, 277, 8, 27, "Input",
- CellTags->"GluonVertex",
- CellID->581429220],
-Cell[19564, 753, 8337, 310, 104, "Output",
- CellTags->"GluonVertex",
- CellID->442974793]
-}, Open ]],
-Cell[27916, 1066, 220, 5, 52, "Text",
- CellTags->"GluonVertex",
- CellID->606211454],
+Cell[25936, 980, 105, 2, 9, "ExampleDelimiter"],
Cell[CellGroupData[{
-Cell[28161, 1075, 192, 6, 27, "Input",
+Cell[26066, 986, 384, 13, 27, "Input",
CellTags->"GluonVertex",
- CellID->1320893353],
-Cell[28356, 1083, 1222, 54, 42, "Output",
- CellTags->"GluonVertex",
- CellID->47203245]
+ CellID->1809122983],
+Cell[26453, 1001, 389, 16, 38, "Output",
+ CellTags->"GluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[29615, 1142, 249, 8, 27, "Input",
- CellTags->"GluonVertex",
- CellID->997671247],
-Cell[29867, 1152, 8291, 310, 107, "Output",
- CellTags->"GluonVertex",
- CellID->1675322303]
+Cell[26879, 1022, 84, 2, 27, "Input"],
+Cell[26966, 1026, 6275, 236, 93, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[38185, 1466, 31, 0, 29, "SectionFooterSpacer"]
+Cell[33280, 1267, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[38253, 1471, 270, 12, 31, "SeeAlsoSection",
+Cell[33348, 1272, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[38526, 1485, 434, 15, 32, "Text",
- CellTags->"GluonVertex",
- CellID->731094773]
+Cell[33621, 1286, 391, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[38975, 1503, 23, 0, 42, "FooterCell"]
+Cell[34027, 1302, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GrassmannParity.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GrassmannParity.nb
index a1c6b5a82..d85ea2b79 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/GrassmannParity.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/GrassmannParity.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6302, 189]
-NotebookOptionsPosition[ 3961, 122]
-NotebookOutlinePosition[ 6034, 178]
-CellTagsIndexPosition[ 5957, 173]
+NotebookDataLength[ 7025, 210]
+NotebookOptionsPosition[ 4905, 152]
+NotebookOutlinePosition[ 6818, 202]
+CellTagsIndexPosition[ 6775, 199]
WindowTitle->GrassmannParity
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/GrassmannParity\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/GrassmannParity"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/GrassmannParity\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/GrassmannParity"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
GrassmannParity.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$85109],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/GrassmannParity", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$159874],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/GrassmannParity", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ GrassmannParity.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["GrassmannParity", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["GrassmannParity", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"DataType"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"GrassmannParity",
- CellID->1069561356]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 4.579876}",
+ "built" -> "{2020, 1, 5, 18, 58, 42.133310}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -143,11 +173,12 @@ TaggingRules->{
"None", "summary" ->
"GrassmannParity is a data type. E.g. DataType[F, GrassmannParity] = 1 \
declares F to be of bosonic type and DataType[F, GrassmannParity] = -1 of \
-fermionic one.", "synonyms" -> {}, "title" -> "GrassmannParity",
- "titlemodifier" -> "", "windowtitle" -> "GrassmannParity", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/GrassmannParity"}},
+fermionic one.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "GrassmannParity", "titlemodifier" -> "", "windowtitle" ->
+ "GrassmannParity", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/GrassmannParity"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -156,41 +187,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "GrassmannParity"->{
- Cell[3684, 108, 235, 9, 70, "Text",
- CellTags->"GrassmannParity",
- CellID->1069561356]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"GrassmannParity", 5839, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3031, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 462, 12, 70, "Usage",
+Cell[3621, 97, 292, 11, 70, "ObjectNameGrid"],
+Cell[3916, 110, 462, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3411, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4403, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3684, 108, 235, 9, 70, "Text",
- CellTags->"GrassmannParity",
- CellID->1069561356]
+Cell[4676, 140, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3934, 120, 23, 0, 70, "FooterCell"]
+Cell[4878, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gstrong.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gstrong.nb
index 667147f6c..b425772be 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gstrong.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Gstrong.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8478, 288]
-NotebookOptionsPosition[ 5266, 188]
-NotebookOutlinePosition[ 7646, 256]
-CellTagsIndexPosition[ 7537, 250]
+NotebookDataLength[ 11065, 374]
+NotebookOptionsPosition[ 7710, 271]
+NotebookOutlinePosition[ 9987, 335]
+CellTagsIndexPosition[ 9878, 329]
WindowTitle->Gstrong
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Gstrong\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Gstrong"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Gstrong.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CovariantD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CovariantD"], "\<\"FieldStrength\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FieldStrength"], "\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Gstrong\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Gstrong"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Gstrong.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$86155],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Gstrong", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$161668],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Gstrong", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,14 +98,28 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Gstrong", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Gstrong", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["Gstrong"], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the strong coupling constant."
+ " \[LineSeparator] is a shortcut for ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " which represents the strong coupling constant."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -91,6 +130,46 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1358631479],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The shortcut Gstrong is deprecated, please use ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " instead!"
+}], "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -106,7 +185,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1919399898],
+ CellID->1228889562],
Cell[CellGroupData[{
@@ -116,13 +195,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1193391299],
-
-Cell["\<\
-Gstrong has no functional properties. Only a typesetting rule is defined.\
-\>", "Text",
- CellTags->"Gstrong",
- CellID->1604993747],
+ CellID->321004010],
Cell[CellGroupData[{
@@ -134,12 +207,25 @@ Cell[BoxData["Gstrong"], "Input",
Cell[BoxData[
FormBox[
SubscriptBox["g", "s"], TraditionalForm]], "Output",
- ImageSize->{20, 15},
+ ImageSize->{22, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Gstrong",
- CellLabel->"Out[1]=",
- CellID->50548467]
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ RowBox[{"SMP", "[", "\<\"g_s\"\>", "]"}]], "Output",
+ ImageSize->{70, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -163,7 +249,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["CovariantD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/CovariantD"],
@@ -179,9 +264,7 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/GluonVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Gstrong",
- CellID->317682057]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -198,20 +281,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 9.382200}",
+ "built" -> "{2020, 1, 5, 18, 58, 46.780473}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "Gstrong denotes the strong coupling constant.",
- "synonyms" -> {}, "title" -> "Gstrong", "titlemodifier" -> "",
- "windowtitle" -> "Gstrong", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Gstrong"}, "SearchTextTranslated" -> ""},
+ "None", "summary" ->
+ "Gstrong is a shortcut for SMP[\"g_s\"] which represents the strong \
+coupling constant.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Gstrong", "titlemodifier" -> "", "windowtitle" -> "Gstrong", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Gstrong"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -219,8 +304,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -229,67 +315,67 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3247, 93, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5593, 172, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1919399898]},
+ CellID->1228889562]},
"Gstrong"->{
- Cell[3859, 120, 140, 4, 32, "Text",
- CellTags->"Gstrong",
- CellID->1604993747],
- Cell[4024, 128, 99, 3, 27, "Input",
+ Cell[6226, 201, 99, 3, 27, "Input",
CellTags->"Gstrong",
CellID->1539112275],
- Cell[4126, 133, 229, 8, 36, "Output",
- CellTags->"Gstrong",
- CellID->50548467],
- Cell[4723, 164, 501, 19, 32, "Text",
- CellTags->"Gstrong",
- CellID->317682057]}
+ Cell[6328, 206, 210, 7, 37, "Output",
+ CellTags->"Gstrong"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7035, 230},
- {"Gstrong", 7169, 234}
+ {"PrimaryExamplesSection", 9568, 316},
+ {"Gstrong", 9703, 320}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3198, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 347, 11, 82, "Usage",
+Cell[3780, 100, 284, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4089, 115, 462, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3247, 93, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4576, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1358631479],
+Cell[5318, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5352, 160, 192, 6, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5593, 172, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1919399898],
+ CellID->1228889562],
Cell[CellGroupData[{
-Cell[3660, 112, 196, 6, 25, "ExampleSection",
- CellID->1193391299],
-Cell[3859, 120, 140, 4, 32, "Text",
- CellTags->"Gstrong",
- CellID->1604993747],
+Cell[6006, 191, 195, 6, 26, "ExampleSection",
+ CellID->321004010],
Cell[CellGroupData[{
-Cell[4024, 128, 99, 3, 27, "Input",
+Cell[6226, 201, 99, 3, 27, "Input",
CellTags->"Gstrong",
CellID->1539112275],
-Cell[4126, 133, 229, 8, 36, "Output",
- CellTags->"Gstrong",
- CellID->50548467]
+Cell[6328, 206, 210, 7, 37, "Output",
+ CellTags->"Gstrong"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6575, 218, 84, 2, 27, "Input"],
+Cell[6662, 222, 191, 5, 51, "Output"]
}, Open ]]
}, Open ]],
-Cell[4382, 145, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6880, 231, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4450, 150, 270, 12, 31, "SeeAlsoSection",
+Cell[6948, 236, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4723, 164, 501, 19, 32, "Text",
- CellTags->"Gstrong",
- CellID->317682057]
+Cell[7221, 250, 447, 16, 56, "SeeAlso"]
}, Open ]],
-Cell[5239, 186, 23, 0, 42, "FooterCell"]
+Cell[7683, 269, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Hill.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Hill.nb
index f7e75df93..88815eb8d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Hill.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Hill.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13631, 483]
-NotebookOptionsPosition[ 9495, 346]
-NotebookOutlinePosition[ 12316, 430]
-CellTagsIndexPosition[ 12208, 424]
+NotebookDataLength[ 14207, 495]
+NotebookOptionsPosition[ 10384, 372]
+NotebookOutlinePosition[ 13020, 449]
+CellTagsIndexPosition[ 12912, 443]
WindowTitle->Hill
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Hill\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Hill"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Hill.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$87190],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Hill",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SimplifyPolyLog\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SimplifyPolyLog"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Hill\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Hill"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Hill.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$163001],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Hill",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Hill", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Hill", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->117962261],
+ CellID->175122901],
Cell[CellGroupData[{
@@ -119,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->157906619],
+ CellID->1644841593],
Cell[CellGroupData[{
@@ -202,12 +234,11 @@ Cell[BoxData[
"PolyLog"], "-",
FractionBox[
SuperscriptBox["\[Pi]", "2"], "6"]}], TraditionalForm]], "Output",
- ImageSize->{557, 153},
+ ImageSize->{571, 129},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Hill",
- CellLabel->"Out[1]=",
- CellID->263318949]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -225,12 +256,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Hill",
- CellLabel->"Out[2]=",
- CellID->1038506621]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -278,12 +308,11 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"1", "-", "y"}], ")"}], " ",
RowBox[{"log", "(", "y", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{424, 68},
+ ImageSize->{439, 61},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Hill",
- CellLabel->"Out[3]=",
- CellID->336046460]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -302,12 +331,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Hill",
- CellLabel->"Out[4]=",
- CellID->1646571531]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -337,17 +365,15 @@ Cell[TextData[{
ButtonNote->"SimplifyPolyLog"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Hill",
- CellID->227965464]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Hill",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -356,21 +382,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 13.952851}",
+ "built" -> "{2020, 1, 5, 18, 58, 49.786257}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Hill[x, y] gives the Hill identity with arguments x and y. The returned \
-object is 0.", "synonyms" -> {}, "title" -> "Hill", "titlemodifier" -> "",
- "windowtitle" -> "Hill", "type" -> "Symbol", "uri" ->
+object is 0.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Hill",
+ "titlemodifier" -> "", "windowtitle" -> "Hill", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Hill"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -379,7 +405,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -388,103 +414,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3329, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4335, 128, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->117962261]},
+ CellID->175122901]},
"Hill"->{
- Cell[3961, 125, 142, 5, 27, "Input",
+ Cell[4968, 157, 142, 5, 27, "Input",
CellTags->"Hill",
CellID->921040788],
- Cell[4106, 132, 2252, 77, 174, "Output",
- CellTags->"Hill",
- CellID->263318949],
- Cell[6395, 214, 288, 9, 27, "Input",
+ Cell[5113, 164, 2232, 76, 150, "Output",
+ CellTags->"Hill"],
+ Cell[7382, 245, 288, 9, 27, "Input",
CellTags->"Hill",
CellID->814240014],
- Cell[6686, 225, 206, 7, 36, "Output",
- CellTags->"Hill",
- CellID->1038506621],
- Cell[6929, 237, 280, 10, 27, "Input",
+ Cell[7673, 256, 185, 6, 35, "Output",
+ CellTags->"Hill"],
+ Cell[7895, 267, 280, 10, 27, "Input",
CellTags->"Hill",
CellID->209270855],
- Cell[7212, 249, 1091, 36, 89, "Output",
- CellTags->"Hill",
- CellID->336046460],
- Cell[8340, 290, 292, 10, 27, "Input",
+ Cell[8178, 279, 1071, 35, 82, "Output",
+ CellTags->"Hill"],
+ Cell[9286, 319, 292, 10, 27, "Input",
CellTags->"Hill",
CellID->1494969413],
- Cell[8635, 302, 206, 7, 36, "Output",
- CellTags->"Hill",
- CellID->1646571531],
- Cell[9209, 332, 244, 9, 70, "Text",
- CellTags->"Hill",
- CellID->227965464]}
+ Cell[9581, 331, 185, 6, 35, "Output",
+ CellTags->"Hill"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11294, 389},
- {"Hill", 11424, 393}
+ {"PrimaryExamplesSection", 12169, 415},
+ {"Hill", 12300, 419}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2228, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3000, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2807, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2857, 78, 447, 14, 82, "Usage",
+Cell[3579, 97, 281, 11, 45, "ObjectNameGrid"],
+Cell[3863, 110, 447, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3329, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4335, 128, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->117962261],
+ CellID->175122901],
Cell[CellGroupData[{
-Cell[3741, 115, 195, 6, 25, "ExampleSection",
- CellID->157906619],
+Cell[4747, 147, 196, 6, 26, "ExampleSection",
+ CellID->1644841593],
Cell[CellGroupData[{
-Cell[3961, 125, 142, 5, 27, "Input",
+Cell[4968, 157, 142, 5, 27, "Input",
CellTags->"Hill",
CellID->921040788],
-Cell[4106, 132, 2252, 77, 174, "Output",
- CellTags->"Hill",
- CellID->263318949]
+Cell[5113, 164, 2232, 76, 150, "Output",
+ CellTags->"Hill"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6395, 214, 288, 9, 27, "Input",
+Cell[7382, 245, 288, 9, 27, "Input",
CellTags->"Hill",
CellID->814240014],
-Cell[6686, 225, 206, 7, 36, "Output",
- CellTags->"Hill",
- CellID->1038506621]
+Cell[7673, 256, 185, 6, 35, "Output",
+ CellTags->"Hill"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6929, 237, 280, 10, 27, "Input",
+Cell[7895, 267, 280, 10, 27, "Input",
CellTags->"Hill",
CellID->209270855],
-Cell[7212, 249, 1091, 36, 89, "Output",
- CellTags->"Hill",
- CellID->336046460]
+Cell[8178, 279, 1071, 35, 82, "Output",
+ CellTags->"Hill"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8340, 290, 292, 10, 27, "Input",
+Cell[9286, 319, 292, 10, 27, "Input",
CellTags->"Hill",
CellID->1494969413],
-Cell[8635, 302, 206, 7, 36, "Output",
- CellTags->"Hill",
- CellID->1646571531]
+Cell[9581, 331, 185, 6, 35, "Output",
+ CellTags->"Hill"]
}, Open ]]
}, Open ]],
-Cell[8868, 313, 31, 0, 70, "SectionFooterSpacer"]
+Cell[9793, 341, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8936, 318, 270, 12, 70, "SeeAlsoSection",
+Cell[9861, 346, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9209, 332, 244, 9, 70, "Text",
- CellTags->"Hill",
- CellID->227965464]
+Cell[10134, 360, 208, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[9468, 344, 23, 0, 70, "FooterCell"]
+Cell[10357, 370, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypExplicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypExplicit.nb
index df0e44d43..ac8b00254 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypExplicit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypExplicit.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13485, 473]
-NotebookOptionsPosition[ 9111, 335]
-NotebookOutlinePosition[ 12107, 420]
-CellTagsIndexPosition[ 11992, 414]
+NotebookDataLength[ 14036, 485]
+NotebookOptionsPosition[ 9993, 361]
+NotebookOutlinePosition[ 12796, 439]
+CellTagsIndexPosition[ 12681, 433]
WindowTitle->HypExplicit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/HypExplicit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/HypExplicit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"HypergeometricIR\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/HypergeometricIR"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/HypExplicit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/HypExplicit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
HypExplicit.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$88548],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/HypExplicit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$164759],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/HypExplicit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ HypExplicit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["HypExplicit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["HypExplicit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->528227567],
+ CellID->1441194382],
Cell[CellGroupData[{
@@ -119,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->683044433],
+ CellID->139053032],
Cell[CellGroupData[{
@@ -134,12 +166,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"a","b","c","z"},
"Hypergeometric2F1"], TraditionalForm]], "Output",
- ImageSize->{101, 15},
+ ImageSize->{104, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypExplicit",
- CellLabel->"Out[1]=",
- CellID->2050064924]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -171,12 +202,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "+", "\[Nu]"}]},
"Gamma"]}]], TraditionalForm]], "Output",
- ImageSize->{179, 47},
+ ImageSize->{194, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypExplicit",
- CellLabel->"Out[2]=",
- CellID->1212116493]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -246,12 +276,11 @@ Cell[BoxData[
Editable->False,
Selectable->False],
HypergeometricPFQ], TraditionalForm]], "Output",
- ImageSize->{135, 15},
+ ImageSize->{145, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypExplicit",
- CellLabel->"Out[3]=",
- CellID->1891206830]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -291,12 +320,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"e", "+", "\[Nu]"}]},
"Gamma"]}]], TraditionalForm]], "Output",
- ImageSize->{267, 47},
+ ImageSize->{291, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypExplicit",
- CellLabel->"Out[4]=",
- CellID->1089581291]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -326,9 +354,7 @@ Cell[TextData[{
ButtonNote->"HypergeometricIR"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"HypExplicit",
- CellID->762625741]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -345,10 +371,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 20.711072}",
+ "built" -> "{2020, 1, 5, 18, 58, 54.343384}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -356,11 +382,11 @@ TaggingRules->{
"None", "summary" ->
"HypExplicit[exp, nu] expresses Hypergeometric functions in exp by their \
definition in terms of a sum (the Sum is omitted and nu is the summation \
-index).", "synonyms" -> {}, "title" -> "HypExplicit", "titlemodifier" -> "",
- "windowtitle" -> "HypExplicit", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/HypExplicit"}, "SearchTextTranslated" -> ""},
+index).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "HypExplicit",
+ "titlemodifier" -> "", "windowtitle" -> "HypExplicit", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/HypExplicit"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -369,7 +395,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -378,103 +404,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3440, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4448, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->528227567]},
+ CellID->1441194382]},
"HypExplicit"->{
- Cell[4072, 125, 182, 5, 27, "Input",
+ Cell[5081, 157, 182, 5, 27, "Input",
CellTags->"HypExplicit",
CellID->713088732],
- Cell[4257, 132, 268, 9, 36, "Output",
- CellTags->"HypExplicit",
- CellID->2050064924],
- Cell[4562, 146, 160, 5, 27, "Input",
+ Cell[5266, 164, 247, 8, 38, "Output",
+ CellTags->"HypExplicit"],
+ Cell[5550, 177, 160, 5, 27, "Input",
CellTags->"HypExplicit",
CellID->335460950],
- Cell[4725, 153, 687, 25, 68, "Output",
- CellTags->"HypExplicit",
- CellID->1212116493],
- Cell[5449, 183, 281, 9, 27, "Input",
+ Cell[5713, 184, 666, 24, 60, "Output",
+ CellTags->"HypExplicit"],
+ Cell[6416, 213, 281, 9, 27, "Input",
CellTags->"HypExplicit",
CellID->1980165795],
- Cell[5733, 194, 1602, 59, 36, "Output",
- CellTags->"HypExplicit",
- CellID->1891206830],
- Cell[7372, 258, 161, 5, 27, "Input",
+ Cell[6700, 224, 1581, 58, 37, "Output",
+ CellTags->"HypExplicit"],
+ Cell[8318, 287, 161, 5, 27, "Input",
CellTags->"HypExplicit",
CellID->1855078663],
- Cell[7536, 265, 911, 33, 68, "Output",
- CellTags->"HypExplicit",
- CellID->1089581291],
- Cell[8815, 321, 254, 9, 32, "Text",
- CellTags->"HypExplicit",
- CellID->762625741]}
+ Cell[8482, 294, 890, 32, 60, "Output",
+ CellTags->"HypExplicit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11008, 379},
- {"HypExplicit", 11145, 383}
+ {"PrimaryExamplesSection", 11876, 405},
+ {"HypExplicit", 12015, 409}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3031, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 515, 14, 99, "Usage",
+Cell[3617, 97, 288, 11, 45, "ObjectNameGrid"],
+Cell[3908, 110, 515, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3440, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4448, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->528227567],
+ CellID->1441194382],
Cell[CellGroupData[{
-Cell[3852, 115, 195, 6, 25, "ExampleSection",
- CellID->683044433],
+Cell[4861, 147, 195, 6, 26, "ExampleSection",
+ CellID->139053032],
Cell[CellGroupData[{
-Cell[4072, 125, 182, 5, 27, "Input",
+Cell[5081, 157, 182, 5, 27, "Input",
CellTags->"HypExplicit",
CellID->713088732],
-Cell[4257, 132, 268, 9, 36, "Output",
- CellTags->"HypExplicit",
- CellID->2050064924]
+Cell[5266, 164, 247, 8, 38, "Output",
+ CellTags->"HypExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4562, 146, 160, 5, 27, "Input",
+Cell[5550, 177, 160, 5, 27, "Input",
CellTags->"HypExplicit",
CellID->335460950],
-Cell[4725, 153, 687, 25, 68, "Output",
- CellTags->"HypExplicit",
- CellID->1212116493]
+Cell[5713, 184, 666, 24, 60, "Output",
+ CellTags->"HypExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5449, 183, 281, 9, 27, "Input",
+Cell[6416, 213, 281, 9, 27, "Input",
CellTags->"HypExplicit",
CellID->1980165795],
-Cell[5733, 194, 1602, 59, 36, "Output",
- CellTags->"HypExplicit",
- CellID->1891206830]
+Cell[6700, 224, 1581, 58, 37, "Output",
+ CellTags->"HypExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7372, 258, 161, 5, 27, "Input",
+Cell[8318, 287, 161, 5, 27, "Input",
CellTags->"HypExplicit",
CellID->1855078663],
-Cell[7536, 265, 911, 33, 68, "Output",
- CellTags->"HypExplicit",
- CellID->1089581291]
+Cell[8482, 294, 890, 32, 60, "Output",
+ CellTags->"HypExplicit"]
}, Open ]]
}, Open ]],
-Cell[8474, 302, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9399, 330, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8542, 307, 270, 12, 31, "SeeAlsoSection",
+Cell[9467, 335, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8815, 321, 254, 9, 32, "Text",
- CellTags->"HypExplicit",
- CellID->762625741]
+Cell[9740, 349, 211, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[9084, 333, 23, 0, 42, "FooterCell"]
+Cell[9966, 359, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypInt.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypInt.nb
index 8e4d157af..bdd48e9c4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypInt.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypInt.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9004, 300]
-NotebookOptionsPosition[ 5798, 201]
-NotebookOutlinePosition[ 8289, 271]
-CellTagsIndexPosition[ 8181, 265]
+NotebookDataLength[ 9168, 305]
+NotebookOptionsPosition[ 6019, 210]
+NotebookOutlinePosition[ 8508, 279]
+CellTagsIndexPosition[ 8400, 273]
WindowTitle->HypInt
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$88883],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$165194],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/HypInt",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["HypInt", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["HypInt", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +121,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1638895535],
+ CellID->1163149135],
Cell[CellGroupData[{
@@ -120,7 +131,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1480924129],
+ CellID->1258941768],
Cell[CellGroupData[{
@@ -135,12 +146,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"a","b","c","z"},
"Hypergeometric2F1"], TraditionalForm]], "Output",
- ImageSize->{101, 15},
+ ImageSize->{104, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypInt",
- CellLabel->"Out[1]=",
- CellID->1455067917]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -187,12 +197,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "-", "b"}]},
"Gamma"]}]], TraditionalForm]], "Output",
- ImageSize->{280, 52},
+ ImageSize->{300, 56},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypInt",
- CellLabel->"Out[2]=",
- CellID->1838289676]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -202,7 +211,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"HypInt",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -211,10 +220,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 22.202783}",
+ "built" -> "{2020, 1, 5, 18, 58, 55.428625}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -222,11 +231,11 @@ TaggingRules->{
"None", "summary" ->
"HypInt[exp, t] substitutes for all Hypergeometric2F1[a,b,c,z] in exp \
Gamma[c]/(Gamma[b] Gamma[c-b]) Integratedx[t,0,1] t^(b-1) (1-t)^(c-b-1) (1-t \
-z)^(-a).", "synonyms" -> {}, "title" -> "HypInt", "titlemodifier" -> "",
- "windowtitle" -> "HypInt", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/HypInt"}, "SearchTextTranslated" -> ""},
+z)^(-a).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "HypInt",
+ "titlemodifier" -> "", "windowtitle" -> "HypInt", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/HypInt"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -234,8 +243,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -244,64 +254,59 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3416, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3679, 108, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1638895535]},
+ CellID->1163149135]},
"HypInt"->{
- Cell[4050, 126, 177, 5, 27, "Input",
+ Cell[4313, 137, 177, 5, 27, "Input",
CellTags->"HypInt",
CellID->204607872],
- Cell[4230, 133, 263, 9, 36, "Output",
- CellTags->"HypInt",
- CellID->1455067917],
- Cell[4530, 147, 147, 5, 27, "Input",
+ Cell[4493, 144, 242, 8, 38, "Output",
+ CellTags->"HypInt"],
+ Cell[4772, 157, 147, 5, 27, "Input",
CellTags->"HypInt",
CellID->1185900959],
- Cell[4680, 154, 1052, 40, 73, "Output",
- CellTags->"HypInt",
- CellID->1838289676]}
+ Cell[4922, 164, 1031, 39, 77, "Output",
+ CellTags->"HypInt"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7677, 245},
- {"HypInt", 7810, 249}
+ {"PrimaryExamplesSection", 7941, 255},
+ {"HypInt", 8075, 259}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 522, 15, 99, "Usage",
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[3132, 89, 522, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3416, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3679, 108, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1638895535],
+ CellID->1163149135],
Cell[CellGroupData[{
-Cell[3829, 116, 196, 6, 25, "ExampleSection",
- CellID->1480924129],
+Cell[4092, 127, 196, 6, 26, "ExampleSection",
+ CellID->1258941768],
Cell[CellGroupData[{
-Cell[4050, 126, 177, 5, 27, "Input",
+Cell[4313, 137, 177, 5, 27, "Input",
CellTags->"HypInt",
CellID->204607872],
-Cell[4230, 133, 263, 9, 36, "Output",
- CellTags->"HypInt",
- CellID->1455067917]
+Cell[4493, 144, 242, 8, 38, "Output",
+ CellTags->"HypInt"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4530, 147, 147, 5, 27, "Input",
+Cell[4772, 157, 147, 5, 27, "Input",
CellTags->"HypInt",
CellID->1185900959],
-Cell[4680, 154, 1052, 40, 73, "Output",
- CellTags->"HypInt",
- CellID->1838289676]
+Cell[4922, 164, 1031, 39, 77, "Output",
+ CellTags->"HypInt"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5771, 199, 23, 0, 42, "FooterCell"]
+Cell[5992, 208, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricAC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricAC.nb
index 0c4114162..84865099f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricAC.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricAC.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21801, 718]
-NotebookOptionsPosition[ 15523, 527]
-NotebookOutlinePosition[ 19629, 638]
-CellTagsIndexPosition[ 19509, 632]
+NotebookDataLength[ 23393, 763]
+NotebookOptionsPosition[ 17446, 588]
+NotebookOutlinePosition[ 21248, 687]
+CellTagsIndexPosition[ 21128, 681]
WindowTitle->HypergeometricAC
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/HypergeometricAC\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/HypergeometricAC"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"HypExplicit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypExplicit"], "\<\"HypergeometricIR\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricIR"], "\<\"HypergeometricSE\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricSE"], "\<\"ToHypergeometric\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToHypergeometric"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/HypergeometricAC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/HypergeometricAC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
HypergeometricAC.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$87531],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/HypergeometricAC", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$163442],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/HypergeometricAC", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,20 @@ HypergeometricAC.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["HypergeometricAC", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["HypergeometricAC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -100,6 +140,58 @@ Functions & their Applications\" by N.N.Lebedev)."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->560833998],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "HypergeometricAC", "]"}]], "Input",
+ CellTags->"HypergeometricAC",
+ CellLabel->"In[220]:=",
+ CellID->860770759],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Collect2", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{111, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"HypergeometricAC",
+ CellLabel->"Out[220]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -115,7 +207,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->204231412],
+ CellID->242832536],
Cell[CellGroupData[{
@@ -125,32 +217,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->321730981],
+ CellID->404156245],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "HypergeometricAC", "]"}]], "Input",
- CellTags->"HypergeometricAC",
- CellLabel->"In[1]:=",
- CellID->860770759],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Collect2", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{118, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"HypergeometricAC",
- CellLabel->"Out[1]=",
- CellID->655565009]
-}, Open ]],
-
-Cell["These are all transformation rules currently built in.", "Text",
- CellTags->"HypergeometricAC",
- CellID->1364071537],
+Cell["These are all transformation rules currently built in.", "Notes"],
Cell[CellGroupData[{
@@ -161,7 +230,7 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "z"}], "]"}],
"]"}]], "Input",
CellTags->"HypergeometricAC",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1062959179],
Cell[BoxData[
@@ -206,12 +275,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"\[Gamma]", "-", "\[Beta]"}]},
"Gamma"]}]]}], TraditionalForm]], "Output",
- ImageSize->{483, 103},
+ ImageSize->{504, 88},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricAC",
- CellLabel->"Out[2]=",
- CellID->1804175924]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -223,7 +291,7 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "z"}], "]"}],
"]"}]], "Input",
CellTags->"HypergeometricAC",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1497393441],
Cell[BoxData[
@@ -268,12 +336,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"\[Gamma]", "-", "\[Beta]"}]},
"Gamma"]}]]}], TraditionalForm]], "Output",
- ImageSize->{371, 125},
+ ImageSize->{386, 128},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricAC",
- CellLabel->"Out[3]=",
- CellID->615954992]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -285,7 +352,7 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "z"}], "]"}],
"]"}]], "Input",
CellTags->"HypergeometricAC",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1365244505],
Cell[BoxData[
@@ -331,12 +398,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"\[Gamma]", "-", "\[Beta]"}]},
"Gamma"]}]]}], TraditionalForm]], "Output",
- ImageSize->{376, 125},
+ ImageSize->{397, 128},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricAC",
- CellLabel->"Out[4]=",
- CellID->291107136]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -348,7 +414,7 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "z"}], "]"}],
"]"}]], "Input",
CellTags->"HypergeometricAC",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->411308116],
Cell[BoxData[
@@ -375,38 +441,37 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"\[Gamma]", "-", "\[Beta]"}]},
"Gamma"]}]], "+",
- FractionBox[
- RowBox[{
- TemplateBox[{"\[Gamma]"},
- "Gamma"], " ",
- SuperscriptBox["z",
- RowBox[{"\[Alpha]", "-", "\[Gamma]"}]], " ",
- TemplateBox[{RowBox[{"\[Alpha]", "+", "\[Beta]", "-", "\[Gamma]"}]},
- "Gamma"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"1", "-", "z"}], ")"}],
+ RowBox[{
+ FractionBox["1",
+ RowBox[{
+ TemplateBox[{"\[Alpha]"},
+ "Gamma"], " ",
+ TemplateBox[{"\[Beta]"},
+ "Gamma"]}]],
+ TemplateBox[{"\[Gamma]"},
+ "Gamma"], " ",
+ SuperscriptBox["z",
+ RowBox[{"\[Alpha]", "-", "\[Gamma]"}]], " ",
+ TemplateBox[{RowBox[{"\[Alpha]", "+", "\[Beta]", "-", "\[Gamma]"}]},
+ "Gamma"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"1", "-", "z"}], ")"}],
+ RowBox[{
+ RowBox[{"-", "\[Alpha]"}], "-", "\[Beta]", "+", "\[Gamma]"}]], " ",
+ TemplateBox[{
+ RowBox[{"1", "-", "\[Alpha]"}],RowBox[{"\[Gamma]", "-", "\[Alpha]"}],
RowBox[{
- RowBox[{"-", "\[Alpha]"}], "-", "\[Beta]", "+", "\[Gamma]"}]], " ",
- TemplateBox[{
- RowBox[{"1", "-", "\[Alpha]"}],RowBox[{"\[Gamma]", "-", "\[Alpha]"}],
- RowBox[{
- RowBox[{"-", "\[Alpha]"}], "-", "\[Beta]", "+", "\[Gamma]", "+",
- "1"}],RowBox[{"-",
- FractionBox[
- RowBox[{"1", "-", "z"}], "z"]}]},
- "Hypergeometric2F1"]}],
- RowBox[{
- TemplateBox[{"\[Alpha]"},
- "Gamma"], " ",
- TemplateBox[{"\[Beta]"},
- "Gamma"]}]]}], TraditionalForm]], "Output",
- ImageSize->{525, 125},
+ RowBox[{"-", "\[Alpha]"}], "-", "\[Beta]", "+", "\[Gamma]", "+",
+ "1"}],RowBox[{"-",
+ FractionBox[
+ RowBox[{"1", "-", "z"}], "z"]}]},
+ "Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
+ ImageSize->{562, 103},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricAC",
- CellLabel->"Out[5]=",
- CellID->1895074645]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -418,7 +483,7 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "z"}], "]"}],
"]"}]], "Input",
CellTags->"HypergeometricAC",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->436366778],
Cell[BoxData[
@@ -433,12 +498,11 @@ Cell[BoxData[
FractionBox["z",
RowBox[{"1", "-", "z"}]]}]},
"Hypergeometric2F1"]}], TraditionalForm]], "Output",
- ImageSize->{231, 39},
+ ImageSize->{235, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricAC",
- CellLabel->"Out[6]=",
- CellID->789329283]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -450,7 +514,7 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "z"}], "]"}],
"]"}]], "Input",
CellTags->"HypergeometricAC",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->417226545],
Cell[BoxData[
@@ -465,12 +529,11 @@ Cell[BoxData[
FractionBox["z",
RowBox[{"1", "-", "z"}]]}]},
"Hypergeometric2F1"]}], TraditionalForm]], "Output",
- ImageSize->{231, 39},
+ ImageSize->{235, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricAC",
- CellLabel->"Out[7]=",
- CellID->1946106454]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -518,9 +581,7 @@ Cell[TextData[{
ButtonNote->"ToHypergeometric"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"HypergeometricAC",
- CellID->329204732]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -537,10 +598,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 15.921727}",
+ "built" -> "{2020, 1, 5, 18, 58, 50.996089}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -552,12 +613,12 @@ chapter 2.10 of \"Higher Transcendental Functions\" by Ergelyi, Magnus, \
Oberhettinger, Tricomi. In case of eq. (6) (p.109) the last line is returned \
for HypergeometricAC[6][exp], while the first equality is given by \
HypergeometricAC[61][exp]. ((2.10.1) is identical to eq. (9.5.7) of \"Special \
-Functions & their Applications\" by N.N.Lebedev).", "synonyms" -> {}, "title" ->
- "HypergeometricAC", "titlemodifier" -> "", "windowtitle" ->
- "HypergeometricAC", "type" -> "Symbol", "uri" ->
+Functions & their Applications\" by N.N.Lebedev).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "HypergeometricAC", "titlemodifier" -> "",
+ "windowtitle" -> "HypergeometricAC", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/HypergeometricAC"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -565,8 +626,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -574,152 +636,135 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3821, 102, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->204231412]},
"HypergeometricAC"->{
- Cell[4453, 131, 149, 4, 27, "Input",
+ Cell[5968, 172, 151, 4, 70, "Input",
CellTags->"HypergeometricAC",
CellID->860770759],
- Cell[4605, 137, 283, 10, 36, "Output",
- CellTags->"HypergeometricAC",
- CellID->655565009],
- Cell[4903, 150, 122, 2, 32, "Text",
- CellTags->"HypergeometricAC",
- CellID->1364071537],
- Cell[5050, 156, 283, 8, 27, "Input",
+ Cell[6122, 178, 265, 9, 35, "Output",
+ CellTags->"HypergeometricAC"],
+ Cell[7154, 225, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->1062959179],
- Cell[5336, 166, 1519, 47, 124, "Output",
- CellTags->"HypergeometricAC",
- CellID->1804175924],
- Cell[6892, 218, 283, 8, 27, "Input",
+ Cell[7440, 235, 1497, 46, 109, "Output",
+ CellTags->"HypergeometricAC"],
+ Cell[8974, 286, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->1497393441],
- Cell[7178, 228, 1482, 47, 146, "Output",
- CellTags->"HypergeometricAC",
- CellID->615954992],
- Cell[8697, 280, 283, 8, 27, "Input",
+ Cell[9260, 296, 1462, 46, 149, "Output",
+ CellTags->"HypergeometricAC"],
+ Cell[10759, 347, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->1365244505],
- Cell[8983, 290, 1523, 48, 146, "Output",
- CellTags->"HypergeometricAC",
- CellID->291107136],
- Cell[10543, 343, 282, 8, 27, "Input",
+ Cell[11045, 357, 1503, 47, 149, "Output",
+ CellTags->"HypergeometricAC"],
+ Cell[12585, 409, 282, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->411308116],
- Cell[10828, 353, 1803, 55, 146, "Output",
- CellTags->"HypergeometricAC",
- CellID->1895074645],
- Cell[12668, 413, 282, 8, 27, "Input",
+ Cell[12870, 419, 1773, 54, 124, "Output",
+ CellTags->"HypergeometricAC"],
+ Cell[14680, 478, 282, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->436366778],
- Cell[12953, 423, 521, 17, 60, "Output",
- CellTags->"HypergeometricAC",
- CellID->789329283],
- Cell[13511, 445, 283, 8, 27, "Input",
+ Cell[14965, 488, 501, 16, 54, "Output",
+ CellTags->"HypergeometricAC"],
+ Cell[15503, 509, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->417226545],
- Cell[13797, 455, 523, 17, 60, "Output",
- CellTags->"HypergeometricAC",
- CellID->1946106454],
- Cell[14688, 495, 793, 27, 32, "Text",
- CellTags->"HypergeometricAC",
- CellID->329204732]}
+ Cell[15789, 519, 502, 16, 54, "Output",
+ CellTags->"HypergeometricAC"]},
+ "PrimaryExamplesSection"->{
+ Cell[6448, 194, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->242832536]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17787, 576},
- {"HypergeometricAC", 17930, 580}
+ {"HypergeometricAC", 19747, 638},
+ {"PrimaryExamplesSection", 20985, 674}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3371, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 866, 20, 147, "Usage",
- CellID->982511436],
+Cell[3962, 103, 293, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3821, 102, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->204231412],
+Cell[4280, 118, 866, 20, 154, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4233, 121, 195, 6, 25, "ExampleSection",
- CellID->321730981],
+Cell[5171, 142, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->560833998],
+Cell[5912, 168, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4453, 131, 149, 4, 27, "Input",
+Cell[5968, 172, 151, 4, 70, "Input",
CellTags->"HypergeometricAC",
CellID->860770759],
-Cell[4605, 137, 283, 10, 36, "Output",
- CellTags->"HypergeometricAC",
- CellID->655565009]
+Cell[6122, 178, 265, 9, 35, "Output",
+ CellTags->"HypergeometricAC"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4903, 150, 122, 2, 32, "Text",
- CellTags->"HypergeometricAC",
- CellID->1364071537],
Cell[CellGroupData[{
-Cell[5050, 156, 283, 8, 27, "Input",
+Cell[6448, 194, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->242832536],
+Cell[CellGroupData[{
+Cell[6860, 213, 195, 6, 26, "ExampleSection",
+ CellID->404156245],
+Cell[7058, 221, 71, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[7154, 225, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->1062959179],
-Cell[5336, 166, 1519, 47, 124, "Output",
- CellTags->"HypergeometricAC",
- CellID->1804175924]
+Cell[7440, 235, 1497, 46, 109, "Output",
+ CellTags->"HypergeometricAC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6892, 218, 283, 8, 27, "Input",
+Cell[8974, 286, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->1497393441],
-Cell[7178, 228, 1482, 47, 146, "Output",
- CellTags->"HypergeometricAC",
- CellID->615954992]
+Cell[9260, 296, 1462, 46, 149, "Output",
+ CellTags->"HypergeometricAC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8697, 280, 283, 8, 27, "Input",
+Cell[10759, 347, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->1365244505],
-Cell[8983, 290, 1523, 48, 146, "Output",
- CellTags->"HypergeometricAC",
- CellID->291107136]
+Cell[11045, 357, 1503, 47, 149, "Output",
+ CellTags->"HypergeometricAC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10543, 343, 282, 8, 27, "Input",
+Cell[12585, 409, 282, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->411308116],
-Cell[10828, 353, 1803, 55, 146, "Output",
- CellTags->"HypergeometricAC",
- CellID->1895074645]
+Cell[12870, 419, 1773, 54, 124, "Output",
+ CellTags->"HypergeometricAC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12668, 413, 282, 8, 27, "Input",
+Cell[14680, 478, 282, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->436366778],
-Cell[12953, 423, 521, 17, 60, "Output",
- CellTags->"HypergeometricAC",
- CellID->789329283]
+Cell[14965, 488, 501, 16, 54, "Output",
+ CellTags->"HypergeometricAC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13511, 445, 283, 8, 27, "Input",
+Cell[15503, 509, 283, 8, 27, "Input",
CellTags->"HypergeometricAC",
CellID->417226545],
-Cell[13797, 455, 523, 17, 60, "Output",
- CellTags->"HypergeometricAC",
- CellID->1946106454]
+Cell[15789, 519, 502, 16, 54, "Output",
+ CellTags->"HypergeometricAC"]
}, Open ]]
}, Open ]],
-Cell[14347, 476, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16318, 539, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14415, 481, 270, 12, 31, "SeeAlsoSection",
+Cell[16386, 544, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[14688, 495, 793, 27, 32, "Text",
- CellTags->"HypergeometricAC",
- CellID->329204732]
+Cell[16659, 558, 745, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[15496, 525, 23, 0, 42, "FooterCell"]
+Cell[17419, 586, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricIR.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricIR.nb
index 01c9c37d1..54e9f76e6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricIR.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricIR.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12956, 443]
-NotebookOptionsPosition[ 8399, 304]
-NotebookOutlinePosition[ 11530, 390]
-CellTagsIndexPosition[ 11410, 384]
+NotebookDataLength[ 14788, 501]
+NotebookOptionsPosition[ 10344, 368]
+NotebookOutlinePosition[ 13275, 447]
+CellTagsIndexPosition[ 13155, 441]
WindowTitle->HypergeometricIR
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/HypergeometricIR\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/HypergeometricIR"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"HypergeometricAC\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricAC"], "\<\"HypergeometricSE\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricSE"], "\<\"ToHypergeometric\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToHypergeometric"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/HypergeometricIR\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/HypergeometricIR"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
HypergeometricIR.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$87875],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/HypergeometricIR", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$163886],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/HypergeometricIR", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,20 @@ HypergeometricIR.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["HypergeometricIR", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["HypergeometricIR", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -95,6 +133,58 @@ setting the option Integratedx \[Rule] False."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2114820751],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "HypergeometricIR", "]"}]], "Input",
+ CellTags->"HypergeometricIR",
+ CellLabel->"In[227]:=",
+ CellID->384078315],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Integratedx", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{129, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"HypergeometricIR",
+ CellLabel->"Out[227]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -110,7 +200,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1734307077],
+ CellID->2096248643],
Cell[CellGroupData[{
@@ -120,28 +210,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1702937418],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "HypergeometricIR", "]"}]], "Input",
- CellTags->"HypergeometricIR",
- CellLabel->"In[1]:=",
- CellID->384078315],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Integratedx", "\[Rule]", "False"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{144, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"HypergeometricIR",
- CellLabel->"Out[1]=",
- CellID->43106065]
-}, Open ]],
+ CellID->2092094247],
Cell[CellGroupData[{
@@ -152,7 +221,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c", ",", "z"}], "]"}], ",", "t"}],
"]"}]], "Input",
CellTags->"HypergeometricIR",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1374832181],
Cell[BoxData[
@@ -178,12 +247,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "-", "b"}]},
"Gamma"]}]], TraditionalForm]], "Output",
- ImageSize->{238, 49},
+ ImageSize->{252, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricIR",
- CellLabel->"Out[2]=",
- CellID->1433332384]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -202,7 +270,7 @@ Cell[BoxData[
RowBox[{"t", " ", "z"}]}], ")"}], "^", "a"}]}], ",", "t"}],
"]"}]], "Input",
CellTags->"HypergeometricIR",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->907804769],
Cell[BoxData[
@@ -219,12 +287,11 @@ Cell[BoxData[
"Hypergeometric2F1"]}],
TemplateBox[{RowBox[{"b", "+", "c", "+", "2"}]},
"Gamma"]], TraditionalForm]], "Output",
- ImageSize->{302, 45},
+ ImageSize->{324, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricIR",
- CellLabel->"Out[3]=",
- CellID->1119784034]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -233,7 +300,7 @@ Cell[BoxData[
RowBox[{"HypergeometricIR", "[",
RowBox[{"%", ",", "t"}], "]"}]], "Input",
CellTags->"HypergeometricIR",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1094444131],
Cell[BoxData[
@@ -248,12 +315,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"t", " ", "z"}], "+", "1"}], ")"}], "a"]}],
TraditionalForm]], "Output",
- ImageSize->{140, 19},
+ ImageSize->{151, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricIR",
- CellLabel->"Out[4]=",
- CellID->1637166476]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -295,9 +361,7 @@ Cell[TextData[{
ButtonNote->"ToHypergeometric"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"HypergeometricIR",
- CellID->1403310516]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -314,10 +378,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 17.650450}",
+ "built" -> "{2020, 1, 5, 18, 58, 52.179907}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -326,11 +390,11 @@ TaggingRules->{
"HypergeometricIR[exp, t] substitutes for all Hypergeometric2F1[a,b,c,z] \
in exp by its Euler integral reprentation. The factor Integratedx[t, 0, 1] \
can be omitted by setting the option Integratedx -> False.", "synonyms" -> {},
- "title" -> "HypergeometricIR", "titlemodifier" -> "", "windowtitle" ->
- "HypergeometricIR", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "HypergeometricIR", "titlemodifier" -> "",
+ "windowtitle" -> "HypergeometricIR", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/HypergeometricIR"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -339,7 +403,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -347,104 +411,98 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3530, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1734307077]},
"HypergeometricIR"->{
- Cell[4164, 126, 149, 4, 27, "Input",
+ Cell[5578, 165, 151, 4, 70, "Input",
CellTags->"HypergeometricIR",
CellID->384078315],
- Cell[4316, 132, 287, 10, 36, "Output",
- CellTags->"HypergeometricIR",
- CellID->43106065],
- Cell[4640, 147, 260, 8, 27, "Input",
+ Cell[5732, 171, 270, 9, 37, "Output",
+ CellTags->"HypergeometricIR"],
+ Cell[6697, 216, 260, 8, 27, "Input",
CellTags->"HypergeometricIR",
CellID->1374832181],
- Cell[4903, 157, 747, 28, 70, "Output",
- CellTags->"HypergeometricIR",
- CellID->1433332384],
- Cell[5687, 190, 412, 15, 27, "Input",
+ Cell[6960, 226, 726, 27, 63, "Output",
+ CellTags->"HypergeometricIR"],
+ Cell[7723, 258, 412, 15, 27, "Input",
CellTags->"HypergeometricIR",
CellID->907804769],
- Cell[6102, 207, 595, 19, 66, "Output",
- CellTags->"HypergeometricIR",
- CellID->1119784034],
- Cell[6734, 231, 167, 5, 27, "Input",
+ Cell[8138, 275, 574, 18, 60, "Output",
+ CellTags->"HypergeometricIR"],
+ Cell[8749, 298, 167, 5, 27, "Input",
CellTags->"HypergeometricIR",
CellID->1094444131],
- Cell[6904, 238, 459, 17, 40, "Output",
- CellTags->"HypergeometricIR",
- CellID->1637166476],
- Cell[7731, 278, 626, 21, 32, "Text",
- CellTags->"HypergeometricIR",
- CellID->1403310516]}
+ Cell[8919, 305, 438, 16, 40, "Output",
+ CellTags->"HypergeometricIR"]},
+ "PrimaryExamplesSection"->{
+ Cell[6063, 187, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2096248643]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10374, 349},
- {"HypergeometricIR", 10517, 353}
+ {"HypergeometricIR", 12299, 413},
+ {"PrimaryExamplesSection", 13011, 434}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3271, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 575, 15, 99, "Usage",
- CellID->982511436],
+Cell[3862, 101, 293, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3530, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1734307077],
+Cell[4180, 116, 575, 15, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3943, 116, 196, 6, 25, "ExampleSection",
- CellID->1702937418],
+Cell[4780, 135, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2114820751],
+Cell[5522, 161, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4164, 126, 149, 4, 27, "Input",
+Cell[5578, 165, 151, 4, 70, "Input",
CellTags->"HypergeometricIR",
CellID->384078315],
-Cell[4316, 132, 287, 10, 36, "Output",
- CellTags->"HypergeometricIR",
- CellID->43106065]
+Cell[5732, 171, 270, 9, 37, "Output",
+ CellTags->"HypergeometricIR"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4640, 147, 260, 8, 27, "Input",
+Cell[6063, 187, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2096248643],
+Cell[CellGroupData[{
+Cell[6476, 206, 196, 6, 26, "ExampleSection",
+ CellID->2092094247],
+Cell[CellGroupData[{
+Cell[6697, 216, 260, 8, 27, "Input",
CellTags->"HypergeometricIR",
CellID->1374832181],
-Cell[4903, 157, 747, 28, 70, "Output",
- CellTags->"HypergeometricIR",
- CellID->1433332384]
+Cell[6960, 226, 726, 27, 63, "Output",
+ CellTags->"HypergeometricIR"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5687, 190, 412, 15, 27, "Input",
+Cell[7723, 258, 412, 15, 27, "Input",
CellTags->"HypergeometricIR",
CellID->907804769],
-Cell[6102, 207, 595, 19, 66, "Output",
- CellTags->"HypergeometricIR",
- CellID->1119784034]
+Cell[8138, 275, 574, 18, 60, "Output",
+ CellTags->"HypergeometricIR"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6734, 231, 167, 5, 27, "Input",
+Cell[8749, 298, 167, 5, 27, "Input",
CellTags->"HypergeometricIR",
CellID->1094444131],
-Cell[6904, 238, 459, 17, 40, "Output",
- CellTags->"HypergeometricIR",
- CellID->1637166476]
+Cell[8919, 305, 438, 16, 40, "Output",
+ CellTags->"HypergeometricIR"]
}, Open ]]
}, Open ]],
-Cell[7390, 259, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9384, 325, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7458, 264, 270, 12, 31, "SeeAlsoSection",
+Cell[9452, 330, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7731, 278, 626, 21, 32, "Text",
- CellTags->"HypergeometricIR",
- CellID->1403310516]
+Cell[9725, 344, 577, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[8372, 302, 23, 0, 42, "FooterCell"]
+Cell[10317, 366, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricSE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricSE.nb
index e4427761a..cbc2df455 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricSE.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/HypergeometricSE.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11771, 398]
-NotebookOptionsPosition[ 7641, 273]
-NotebookOutlinePosition[ 10560, 353]
-CellTagsIndexPosition[ 10442, 347]
+NotebookDataLength[ 13503, 456]
+NotebookOptionsPosition[ 9386, 334]
+NotebookOutlinePosition[ 12187, 409]
+CellTagsIndexPosition[ 12067, 403]
WindowTitle->HypergeometricSE
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/HypergeometricSE\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/HypergeometricSE"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"HypergeometricIR\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/HypergeometricIR"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/HypergeometricSE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/HypergeometricSE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
HypergeometricSE.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$88213],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/HypergeometricSE", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$164324],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/HypergeometricSE", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ HypergeometricSE.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["HypergeometricSE", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["HypergeometricSE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,6 +131,58 @@ of a sum (the Sum is omitted and nu, running from 0 to ",
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1137431033],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "HypergeometricSE", "]"}]], "Input",
+ CellTags->"HypergeometricSE",
+ CellLabel->"In[231]:=",
+ CellID->1143734993],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Simplify", "\[Rule]", "FullSimplify"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{155, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"HypergeometricSE",
+ CellLabel->"Out[231]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +198,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1449729838],
+ CellID->1593127181],
Cell[CellGroupData[{
@@ -122,28 +208,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1175903162],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "HypergeometricSE", "]"}]], "Input",
- CellTags->"HypergeometricSE",
- CellLabel->"In[1]:=",
- CellID->1143734993],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Simplify", "\[Rule]", "FullSimplify"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{165, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"HypergeometricSE",
- CellLabel->"Out[1]=",
- CellID->2099172215]
-}, Open ]],
+ CellID->1231340239],
Cell[CellGroupData[{
@@ -154,7 +219,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c", ",", "z"}], "]"}], ",", "\[Nu]"}],
"]"}]], "Input",
CellTags->"HypergeometricSE",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->388138933],
Cell[BoxData[
@@ -177,12 +242,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "+", "\[Nu]"}]},
"Gamma"]}]], TraditionalForm]], "Output",
- ImageSize->{179, 47},
+ ImageSize->{194, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricSE",
- CellLabel->"Out[2]=",
- CellID->1318858464]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,7 +262,7 @@ Cell[BoxData[
RowBox[{"d", ",", "e"}], "}"}], ",", "z"}], "]"}], ",", "\[Nu]"}],
"]"}]], "Input",
CellTags->"HypergeometricSE",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->998113844],
Cell[BoxData[
@@ -229,12 +293,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"e", "+", "\[Nu]"}]},
"Gamma"]}]], TraditionalForm]], "Output",
- ImageSize->{267, 47},
+ ImageSize->{291, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"HypergeometricSE",
- CellLabel->"Out[3]=",
- CellID->1095324364]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -264,9 +327,7 @@ Cell[TextData[{
ButtonNote->"HypergeometricIR"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"HypergeometricSE",
- CellID->715881200]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -283,10 +344,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 19.209123}",
+ "built" -> "{2020, 1, 5, 18, 58, 53.261201}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -294,12 +355,12 @@ TaggingRules->{
"None", "summary" ->
"HypergeometricSE[exp, nu] expresses Hypergeometric functions by their \
series expansion in terms of a sum (the Sum is omitted and nu, running from 0 \
-to \\[Infinity], is the summation index).", "synonyms" -> {}, "title" ->
- "HypergeometricSE", "titlemodifier" -> "", "windowtitle" ->
- "HypergeometricSE", "type" -> "Symbol", "uri" ->
+to \\[Infinity], is the summation index).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "HypergeometricSE", "titlemodifier" -> "",
+ "windowtitle" -> "HypergeometricSE", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/HypergeometricSE"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -307,8 +368,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -316,90 +378,86 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3572, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1449729838]},
"HypergeometricSE"->{
- Cell[4206, 128, 150, 4, 27, "Input",
+ Cell[5400, 163, 152, 4, 70, "Input",
CellTags->"HypergeometricSE",
CellID->1143734993],
- Cell[4359, 134, 293, 10, 36, "Output",
- CellTags->"HypergeometricSE",
- CellID->2099172215],
- Cell[4689, 149, 263, 8, 27, "Input",
+ Cell[5555, 169, 274, 9, 37, "Output",
+ CellTags->"HypergeometricSE"],
+ Cell[6524, 214, 263, 8, 27, "Input",
CellTags->"HypergeometricSE",
CellID->388138933],
- Cell[4955, 159, 692, 25, 68, "Output",
- CellTags->"HypergeometricSE",
- CellID->1318858464],
- Cell[5684, 189, 369, 12, 27, "Input",
+ Cell[6790, 224, 671, 24, 60, "Output",
+ CellTags->"HypergeometricSE"],
+ Cell[7498, 253, 369, 12, 27, "Input",
CellTags->"HypergeometricSE",
CellID->998113844],
- Cell[6056, 203, 916, 33, 68, "Output",
- CellTags->"HypergeometricSE",
- CellID->1095324364],
- Cell[7340, 259, 259, 9, 32, "Text",
- CellTags->"HypergeometricSE",
- CellID->715881200]}
+ Cell[7870, 267, 895, 32, 60, "Output",
+ CellTags->"HypergeometricSE"]},
+ "PrimaryExamplesSection"->{
+ Cell[5890, 185, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1593127181]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9600, 318},
- {"HypergeometricSE", 9743, 322}
+ {"HypergeometricSE", 11382, 380},
+ {"PrimaryExamplesSection", 11923, 396}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3051, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 617, 17, 99, "Usage",
- CellID->982511436],
+Cell[3642, 97, 293, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3572, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1449729838],
+Cell[3960, 112, 617, 17, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3985, 118, 196, 6, 25, "ExampleSection",
- CellID->1175903162],
+Cell[4602, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1137431033],
+Cell[5344, 159, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4206, 128, 150, 4, 27, "Input",
+Cell[5400, 163, 152, 4, 70, "Input",
CellTags->"HypergeometricSE",
CellID->1143734993],
-Cell[4359, 134, 293, 10, 36, "Output",
- CellTags->"HypergeometricSE",
- CellID->2099172215]
+Cell[5555, 169, 274, 9, 37, "Output",
+ CellTags->"HypergeometricSE"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4689, 149, 263, 8, 27, "Input",
+Cell[5890, 185, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1593127181],
+Cell[CellGroupData[{
+Cell[6303, 204, 196, 6, 26, "ExampleSection",
+ CellID->1231340239],
+Cell[CellGroupData[{
+Cell[6524, 214, 263, 8, 27, "Input",
CellTags->"HypergeometricSE",
CellID->388138933],
-Cell[4955, 159, 692, 25, 68, "Output",
- CellTags->"HypergeometricSE",
- CellID->1318858464]
+Cell[6790, 224, 671, 24, 60, "Output",
+ CellTags->"HypergeometricSE"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5684, 189, 369, 12, 27, "Input",
+Cell[7498, 253, 369, 12, 27, "Input",
CellTags->"HypergeometricSE",
CellID->998113844],
-Cell[6056, 203, 916, 33, 68, "Output",
- CellTags->"HypergeometricSE",
- CellID->1095324364]
+Cell[7870, 267, 895, 32, 60, "Output",
+ CellTags->"HypergeometricSE"]
}, Open ]]
}, Open ]],
-Cell[6999, 240, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8792, 303, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7067, 245, 270, 12, 31, "SeeAlsoSection",
+Cell[8860, 308, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7340, 259, 259, 9, 32, "Text",
- CellTags->"HypergeometricSE",
- CellID->715881200]
+Cell[9133, 322, 211, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[7614, 271, 23, 0, 42, "FooterCell"]
+Cell[9359, 332, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPD.nb
index 80323694d..ee7bef8c0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPD.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5964, 187]
-NotebookOptionsPosition[ 3850, 123]
-NotebookOutlinePosition[ 5709, 176]
-CellTagsIndexPosition[ 5643, 171]
+NotebookDataLength[ 6781, 209]
+NotebookOptionsPosition[ 4841, 154]
+NotebookOutlinePosition[ 6574, 201]
+CellTagsIndexPosition[ 6531, 198]
WindowTitle->IFPD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IFPD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IFPD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/IFPD.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$89222],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/IFPD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PropagatorDenominator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PropagatorDenominator"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IFPD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IFPD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/IFPD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$165629],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/IFPD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IFPD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IFPD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +147,7 @@ Cell[TextData[{
ButtonNote->"PropagatorDenominator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IFPD",
- CellID->14313583]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,19 +164,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 23.769272}",
+ "built" -> "{2020, 1, 5, 18, 58, 56.452443}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "IFPD[p, m] denotes (p^2 - m^2).", "synonyms" -> {},
- "title" -> "IFPD", "titlemodifier" -> "", "windowtitle" -> "IFPD", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/IFPD"}},
+ "tabletags" -> {}, "title" -> "IFPD", "titlemodifier" -> "",
+ "windowtitle" -> "IFPD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/IFPD"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -154,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IFPD"->{
- Cell[3547, 109, 261, 9, 70, "Text",
- CellTags->"IFPD",
- CellID->14313583]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IFPD", 5538, 164}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2228, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 3020, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2807, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2857, 78, 392, 13, 70, "Usage",
+Cell[3599, 98, 281, 11, 70, "ObjectNameGrid"],
+Cell[3883, 111, 392, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3274, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4300, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3547, 109, 261, 9, 70, "Text",
- CellTags->"IFPD",
- CellID->14313583]
+Cell[4573, 142, 226, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3823, 121, 23, 0, 70, "FooterCell"]
+Cell[4814, 152, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOff.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOff.nb
index 5b47d6714..23595bedf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOff.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOff.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11412, 409]
-NotebookOptionsPosition[ 7153, 271]
-NotebookOutlinePosition[ 10071, 356]
-CellTagsIndexPosition[ 9962, 350]
+NotebookDataLength[ 12031, 422]
+NotebookOptionsPosition[ 8096, 298]
+NotebookOutlinePosition[ 10825, 376]
+CellTagsIndexPosition[ 10715, 370]
WindowTitle->IFPDOff
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IFPDOff\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IFPDOff"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/IFPDOff.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"IFPD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/IFPD"], "\<\"IFPDOn\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/IFPDOn"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IFPDOff\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IFPDOff"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/IFPDOff.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$89567],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IFPDOff", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$166072],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IFPDOff", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IFPDOff", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IFPDOff", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2145771835],
+ CellID->243646067],
Cell[CellGroupData[{
@@ -120,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1904573923],
+ CellID->117025203],
Cell[CellGroupData[{
@@ -150,12 +183,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{86, 20},
+ ImageSize->{91, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"IFPDOff",
- CellLabel->"Out[1]=",
- CellID->784861447]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -170,12 +202,11 @@ Cell[BoxData[
RowBox[{"IFPD", "[",
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}]], "Output",
- ImageSize->{167, 15},
+ ImageSize->{168, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"IFPDOff",
- CellLabel->"Out[2]//StandardForm=",
- CellID->690906879]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -197,12 +228,11 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm], "2"], "-",
SuperscriptBox["m", "2"]}], TraditionalForm]], "Output",
- ImageSize->{60, 20},
+ ImageSize->{65, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"IFPDOff",
- CellLabel->"Out[3]=",
- CellID->2145155528]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -221,12 +251,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}]], "Output",
- ImageSize->{291, 15},
+ ImageSize->{292, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"IFPDOff",
- CellLabel->"Out[4]//StandardForm=",
- CellID->128477436]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -262,9 +291,7 @@ Cell[TextData[{
ButtonNote->"IFPDOn"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IFPDOff",
- CellID->1144166368]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -281,10 +308,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 25.194704}",
+ "built" -> "{2020, 1, 5, 18, 58, 57.265956}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -292,11 +319,11 @@ TaggingRules->{
"None", "summary" ->
"IFPDOff[exp_, q1_, q2_, ...] changes from IFPD representation to \
FeynAmpDenominator[ ...]. The q1, q2, ... are the integration momenta.",
- "synonyms" -> {}, "title" -> "IFPDOff", "titlemodifier" -> "",
- "windowtitle" -> "IFPDOff", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/IFPDOff"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "IFPDOff",
+ "titlemodifier" -> "", "windowtitle" -> "IFPDOff", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/IFPDOff"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -305,7 +332,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -314,103 +341,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3424, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4490, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2145771835]},
+ CellID->243646067]},
"IFPDOff"->{
- Cell[4058, 126, 181, 6, 27, "Input",
+ Cell[5122, 159, 181, 6, 27, "Input",
CellTags->"IFPDOff",
CellID->826601079],
- Cell[4242, 134, 555, 23, 41, "Output",
- CellTags->"IFPDOff",
- CellID->784861447],
- Cell[4834, 162, 127, 4, 27, "Input",
+ Cell[5306, 167, 535, 22, 39, "Output",
+ CellTags->"IFPDOff"],
+ Cell[5878, 194, 127, 4, 27, "Input",
CellTags->"IFPDOff",
CellID->1054150874],
- Cell[4964, 168, 284, 9, 49, "Output",
- CellTags->"IFPDOff",
- CellID->690906879],
- Cell[5285, 182, 148, 5, 27, "Input",
+ Cell[6008, 200, 264, 8, 51, "Output",
+ CellTags->"IFPDOff"],
+ Cell[6309, 213, 148, 5, 27, "Input",
CellTags->"IFPDOff",
CellID->480977190],
- Cell[5436, 189, 384, 15, 41, "Output",
- CellTags->"IFPDOff",
- CellID->2145155528],
- Cell[5857, 209, 126, 4, 27, "Input",
+ Cell[6460, 220, 363, 14, 39, "Output",
+ CellTags->"IFPDOff"],
+ Cell[6860, 239, 126, 4, 27, "Input",
CellTags->"IFPDOff",
CellID->426656521],
- Cell[5986, 215, 389, 13, 49, "Output",
- CellTags->"IFPDOff",
- CellID->128477436],
- Cell[6743, 251, 368, 15, 31, "Text",
- CellTags->"IFPDOff",
- CellID->1144166368]}
+ Cell[6989, 245, 369, 12, 53, "Output",
+ CellTags->"IFPDOff"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9020, 315},
- {"IFPDOff", 9154, 319}
+ {"PrimaryExamplesSection", 9949, 342},
+ {"IFPDOff", 10083, 346}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3072, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 524, 15, 98, "Usage",
+Cell[3654, 98, 284, 11, 45, "ObjectNameGrid"],
+Cell[3941, 111, 524, 15, 101, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3424, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4490, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2145771835],
+ CellID->243646067],
Cell[CellGroupData[{
-Cell[3837, 116, 196, 6, 25, "ExampleSection",
- CellID->1904573923],
+Cell[4902, 149, 195, 6, 26, "ExampleSection",
+ CellID->117025203],
Cell[CellGroupData[{
-Cell[4058, 126, 181, 6, 27, "Input",
+Cell[5122, 159, 181, 6, 27, "Input",
CellTags->"IFPDOff",
CellID->826601079],
-Cell[4242, 134, 555, 23, 41, "Output",
- CellTags->"IFPDOff",
- CellID->784861447]
+Cell[5306, 167, 535, 22, 39, "Output",
+ CellTags->"IFPDOff"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4834, 162, 127, 4, 27, "Input",
+Cell[5878, 194, 127, 4, 27, "Input",
CellTags->"IFPDOff",
CellID->1054150874],
-Cell[4964, 168, 284, 9, 49, "Output",
- CellTags->"IFPDOff",
- CellID->690906879]
+Cell[6008, 200, 264, 8, 51, "Output",
+ CellTags->"IFPDOff"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5285, 182, 148, 5, 27, "Input",
+Cell[6309, 213, 148, 5, 27, "Input",
CellTags->"IFPDOff",
CellID->480977190],
-Cell[5436, 189, 384, 15, 41, "Output",
- CellTags->"IFPDOff",
- CellID->2145155528]
+Cell[6460, 220, 363, 14, 39, "Output",
+ CellTags->"IFPDOff"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5857, 209, 126, 4, 27, "Input",
+Cell[6860, 239, 126, 4, 27, "Input",
CellTags->"IFPDOff",
CellID->426656521],
-Cell[5986, 215, 389, 13, 49, "Output",
- CellTags->"IFPDOff",
- CellID->128477436]
+Cell[6989, 245, 369, 12, 53, "Output",
+ CellTags->"IFPDOff"]
}, Open ]]
}, Open ]],
-Cell[6402, 232, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7385, 261, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6470, 237, 270, 12, 31, "SeeAlsoSection",
+Cell[7453, 266, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6743, 251, 368, 15, 31, "Text",
- CellTags->"IFPDOff",
- CellID->1144166368]
+Cell[7726, 280, 328, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7126, 269, 23, 0, 42, "FooterCell"]
+Cell[8069, 296, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOn.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOn.nb
index d52eec7e6..3159cc0b4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOn.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IFPDOn.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6624, 202]
-NotebookOptionsPosition[ 4238, 133]
-NotebookOutlinePosition[ 6365, 191]
-CellTagsIndexPosition[ 6297, 186]
+NotebookDataLength[ 7464, 223]
+NotebookOptionsPosition[ 5268, 164]
+NotebookOutlinePosition[ 7256, 215]
+CellTagsIndexPosition[ 7213, 212]
WindowTitle->IFPDOn
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IFPDOn\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IFPDOn"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/IFPDOn.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"IFPD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/IFPD"], "\<\"IFPDOff\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/IFPDOff"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IFPDOn\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IFPDOn"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/IFPDOn.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$89905],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/IFPDOn",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$166510],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IFPDOn", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IFPDOn", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IFPDOn", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -124,9 +157,7 @@ Cell[TextData[{
ButtonNote->"IFPDOff"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IFPDOn",
- CellID->168214064]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -143,10 +174,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 26.848069}",
+ "built" -> "{2020, 1, 5, 18, 58, 58.342273}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -156,11 +187,11 @@ TaggingRules->{
representation to the IFPD one (Inverse Feynman Propagator Denominator). \
I.e., FeynAmpDenominator[PropagatorDenominator[a,b]] is replaced by \
1/IFPD[a,b] and The q1, q2, ... are the integration momenta.",
- "synonyms" -> {}, "title" -> "IFPDOn", "titlemodifier" -> "",
- "windowtitle" -> "IFPDOn", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "IFPDOn", "titlemodifier" ->
+ "", "windowtitle" -> "IFPDOn", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/IFPDOn"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -169,41 +200,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IFPDOn"->{
- Cell[3827, 113, 369, 15, 70, "Text",
- CellTags->"IFPDOn",
- CellID->168214064]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IFPDOn", 6188, 179}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 3070, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 660, 17, 70, "Usage",
+Cell[3651, 98, 283, 11, 70, "ObjectNameGrid"],
+Cell[3937, 111, 660, 17, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3554, 99, 270, 12, 70, "SeeAlsoSection",
+Cell[4622, 132, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3827, 113, 369, 15, 70, "Text",
- CellTags->"IFPDOn",
- CellID->168214064]
+Cell[4895, 146, 331, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4211, 131, 23, 0, 70, "FooterCell"]
+Cell[5241, 162, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IncludePair.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IncludePair.nb
index d3c898dfb..d26e6bd14 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IncludePair.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IncludePair.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6515, 201]
-NotebookOptionsPosition[ 4247, 134]
-NotebookOutlinePosition[ 6251, 190]
-CellTagsIndexPosition[ 6178, 185]
+NotebookDataLength[ 7471, 225]
+NotebookOptionsPosition[ 5412, 168]
+NotebookOutlinePosition[ 7262, 217]
+CellTagsIndexPosition[ 7219, 214]
WindowTitle->IncludePair
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IncludePair\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IncludePair"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FC2RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FC2RHI"], "\<\"FC2TLI\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FC2TLI"], "\<\"FeynAmpDenominatorSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IncludePair\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IncludePair"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IncludePair.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$90252],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IncludePair", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$166955],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IncludePair", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ IncludePair.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IncludePair", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IncludePair", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,9 +161,7 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominatorSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IncludePair",
- CellID->419229587]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -144,10 +178,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 28.279098}",
+ "built" -> "{2020, 1, 5, 18, 58, 59.292807}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -155,11 +189,11 @@ TaggingRules->{
"None", "summary" ->
"IncludePair is an option for FC2RHI, FC2TLI and \
FeynAmpDenominatorSimplify. Possible settings are True and False.",
- "synonyms" -> {}, "title" -> "IncludePair", "titlemodifier" -> "",
- "windowtitle" -> "IncludePair", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/IncludePair"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "IncludePair",
+ "titlemodifier" -> "", "windowtitle" -> "IncludePair", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/IncludePair"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -168,41 +202,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IncludePair"->{
- Cell[3615, 108, 590, 21, 70, "Text",
- CellTags->"IncludePair",
- CellID->419229587]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IncludePair", 6064, 178}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3231, 78, 70, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 417, 12, 70, "Usage",
+Cell[3817, 101, 288, 11, 70, "ObjectNameGrid"],
+Cell[4108, 114, 417, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3342, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4550, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3615, 108, 590, 21, 70, "Text",
- CellTags->"IncludePair",
- CellID->419229587]
+Cell[4823, 144, 547, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4220, 132, 23, 0, 70, "FooterCell"]
+Cell[5385, 166, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IndexPosition.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IndexPosition.nb
index 503602c65..df97be5ca 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IndexPosition.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IndexPosition.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6053, 186]
-NotebookOptionsPosition[ 3846, 121]
-NotebookOutlinePosition[ 5788, 175]
-CellTagsIndexPosition[ 5713, 170]
+NotebookDataLength[ 6792, 206]
+NotebookOptionsPosition[ 4803, 151]
+NotebookOutlinePosition[ 6585, 198]
+CellTagsIndexPosition[ 6542, 195]
WindowTitle->IndexPosition
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IndexPosition\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IndexPosition"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FieldStrength\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FieldStrength"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IndexPosition\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IndexPosition"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IndexPosition.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$90598],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IndexPosition", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$167399],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IndexPosition", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ IndexPosition.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IndexPosition", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IndexPosition", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"FieldStrength"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IndexPosition",
- CellID->976822558]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,20 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 29.541064}",
+ "built" -> "{2020, 1, 5, 18, 59, 0.291510}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "IndexPosition is an option for FieldStrength.",
- "synonyms" -> {}, "title" -> "IndexPosition", "titlemodifier" -> "",
- "windowtitle" -> "IndexPosition", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/IndexPosition"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "IndexPosition",
+ "titlemodifier" -> "", "windowtitle" -> "IndexPosition", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/IndexPosition"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -153,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IndexPosition"->{
- Cell[3557, 107, 247, 9, 70, "Text",
- CellTags->"IndexPosition",
- CellID->976822558]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IndexPosition", 5598, 163}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3033, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 347, 11, 70, "Usage",
+Cell[3621, 97, 290, 11, 70, "ObjectNameGrid"],
+Cell[3914, 110, 347, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3284, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4286, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3557, 107, 247, 9, 70, "Text",
- CellTags->"IndexPosition",
- CellID->976822558]
+Cell[4559, 139, 202, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3819, 119, 23, 0, 70, "FooterCell"]
+Cell[4776, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialFunction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialFunction.nb
index cf92719bf..6542500ce 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialFunction.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialFunction.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6244, 189]
-NotebookOptionsPosition[ 3930, 122]
-NotebookOutlinePosition[ 5976, 178]
-CellTagsIndexPosition[ 5899, 173]
+NotebookDataLength[ 6960, 209]
+NotebookOptionsPosition[ 4874, 152]
+NotebookOutlinePosition[ 6753, 201]
+CellTagsIndexPosition[ 6710, 198]
WindowTitle->InitialFunction
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/InitialFunction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/InitialFunction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynRule\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynRule"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/InitialFunction\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/InitialFunction"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
InitialFunction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$90942],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/InitialFunction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$167841],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/InitialFunction", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ InitialFunction.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["InitialFunction", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["InitialFunction", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"FeynRule"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"InitialFunction",
- CellID->1858355403]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 30.911262}",
+ "built" -> "{2020, 1, 5, 18, 59, 1.298241}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -143,11 +173,11 @@ TaggingRules->{
"None", "summary" ->
"InitialFunction is an option of FeynRule the setting of which is applied \
to the first argument of FeynRule before anything else", "synonyms" -> {},
- "title" -> "InitialFunction", "titlemodifier" -> "", "windowtitle" ->
- "InitialFunction", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "InitialFunction", "titlemodifier" -> "",
+ "windowtitle" -> "InitialFunction", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/InitialFunction"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -156,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "InitialFunction"->{
- Cell[3653, 108, 235, 9, 70, "Text",
- CellTags->"InitialFunction",
- CellID->1858355403]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"InitialFunction", 5781, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2273, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3031, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2863, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2924, 78, 431, 12, 70, "Usage",
+Cell[3621, 97, 292, 11, 70, "ObjectNameGrid"],
+Cell[3916, 110, 431, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3380, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4372, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3653, 108, 235, 9, 70, "Text",
- CellTags->"InitialFunction",
- CellID->1858355403]
+Cell[4645, 140, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3903, 120, 23, 0, 70, "FooterCell"]
+Cell[4847, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialSubstitutions.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialSubstitutions.nb
index e6a9f7035..180cd796a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialSubstitutions.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InitialSubstitutions.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6673, 201]
-NotebookOptionsPosition[ 4299, 134]
-NotebookOutlinePosition[ 6400, 190]
-CellTagsIndexPosition[ 6318, 185]
+NotebookDataLength[ 7545, 224]
+NotebookOptionsPosition[ 5417, 167]
+NotebookOutlinePosition[ 7336, 216]
+CellTagsIndexPosition[ 7293, 213]
WindowTitle->InitialSubstitutions
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/InitialSubstitutions\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/InitialSubstitutions"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSum"], "\<\"Write2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Write2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/InitialSubstitutions\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/InitialSubstitutions"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
InitialSubstitutions.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$91288],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/InitialSubstitutions", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$168285],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/InitialSubstitutions", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ InitialSubstitutions.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["InitialSubstitutions", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["InitialSubstitutions", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,9 +160,7 @@ Cell[TextData[{
ButtonNote->"Write2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"InitialSubstitutions",
- CellID->643150740]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -144,10 +177,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 32.199134}",
+ "built" -> "{2020, 1, 5, 18, 59, 2.305622}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -155,11 +188,11 @@ TaggingRules->{
"None", "summary" ->
"InitialSubstitutions is an option for OneLoop and OneLoopSum and Write2. \
All substitutions indicated hereby are done at the end of the calculation.",
- "synonyms" -> {}, "title" -> "InitialSubstitutions", "titlemodifier" ->
- "", "windowtitle" -> "InitialSubstitutions", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/InitialSubstitutions"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "InitialSubstitutions",
+ "titlemodifier" -> "", "windowtitle" -> "InitialSubstitutions", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/InitialSubstitutions"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -168,41 +201,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "InitialSubstitutions"->{
- Cell[3703, 108, 554, 21, 70, "Text",
- CellTags->"InitialSubstitutions",
- CellID->643150740]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"InitialSubstitutions", 6195, 178}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[592, 21, 2293, 52, 70, "AnchorBarGrid",
+Cell[592, 21, 3229, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2888, 75, 63, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2954, 78, 451, 12, 70, "Usage",
+Cell[3824, 100, 297, 11, 70, "ObjectNameGrid"],
+Cell[4124, 113, 451, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3430, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4600, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3703, 108, 554, 21, 70, "Text",
- CellTags->"InitialSubstitutions",
- CellID->643150740]
+Cell[4873, 143, 502, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4272, 132, 23, 0, 70, "FooterCell"]
+Cell[5390, 165, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InsideDiracTrace.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InsideDiracTrace.nb
index 2a2f15cda..cc3510263 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InsideDiracTrace.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InsideDiracTrace.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7058, 203]
-NotebookOptionsPosition[ 4429, 132]
-NotebookOutlinePosition[ 6788, 192]
-CellTagsIndexPosition[ 6710, 187]
+NotebookDataLength[ 8668, 263]
+NotebookOptionsPosition[ 6221, 196]
+NotebookOutlinePosition[ 8215, 247]
+CellTagsIndexPosition[ 8172, 244]
WindowTitle->InsideDiracTrace
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/InsideDiracTrace\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/InsideDiracTrace"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/InsideDiracTrace\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/InsideDiracTrace"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
InsideDiracTrace.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$91635],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/InsideDiracTrace", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$168731],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/InsideDiracTrace", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +95,31 @@ InsideDiracTrace.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["InsideDiracTrace", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["InsideDiracTrace", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["InsideDiracTrace"], "InlineFormula"],
- " \[LineSeparator]",
- "is and option of DiracSimplify. If set to True, DiracSimplify assumes \
-to operate inside a DiracTrace, i.e., products of an odd number of Dirac \
-matrices are discarded. Furthermore simple traces are calculated (but divided \
-by a factor 4, i.e. : DiracSimplify[DiracMatrix[a,b], \
-InsideDiracTrace\[Rule]True] yields ScalarProduct[a,b]) Traces involving \
-more than four DiracGamma's and DiracGamma[5] are not performed."
+ " \[LineSeparator]is an option of ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " and some other functions dealing with Dirac algebra. If set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ", the function assumes to operate inside a Dirac trace, i.e., products \
+of an odd number of Dirac matrices are discarded."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -96,6 +130,47 @@ more than four DiracGamma's and DiracGamma[5] are not performed."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -110,22 +185,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["DiracTrace",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracTrace",
- ButtonNote->"DiracTrace"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"InsideDiracTrace",
- CellID->1537569404]
+Cell[TextData[StyleBox[ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -142,26 +206,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 33.462754}",
+ "built" -> "{2020, 1, 5, 18, 59, 3.316695}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "InsideDiracTrace is and option of DiracSimplify. If set to True, \
-DiracSimplify assumes to operate inside a DiracTrace, i.e., products of an \
-odd number of Dirac matrices are discarded. Furthermore simple traces are \
-calculated (but divided by a factor 4, i.e. : DiracSimplify[DiracMatrix[a,b], \
-InsideDiracTrace->True] yields ScalarProduct[a,b]) Traces involving more than \
-four DiracGamma's and DiracGamma[5] are not performed.", "synonyms" -> {},
- "title" -> "InsideDiracTrace", "titlemodifier" -> "", "windowtitle" ->
+ "InsideDiracTrace is an option of DiracSimplify and some other functions \
+dealing with Dirac algebra. If set to True, the function assumes to operate \
+inside a Dirac trace, i.e., products of an odd number of Dirac matrices are \
+discarded.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "InsideDiracTrace", "titlemodifier" -> "", "windowtitle" ->
"InsideDiracTrace", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/InsideDiracTrace"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -170,41 +232,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "InsideDiracTrace"->{
- Cell[3971, 112, 416, 15, 70, "Text",
- CellTags->"InsideDiracTrace",
- CellID->1537569404]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"InsideDiracTrace", 6590, 180}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 70, "AnchorBarGrid",
+Cell[588, 21, 3045, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 743, 16, 70, "Usage",
+Cell[3636, 97, 293, 11, 70, "ObjectNameGrid"],
+Cell[3932, 110, 723, 18, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3698, 98, 270, 12, 70, "SeeAlsoSection",
+Cell[4680, 132, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5413, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5447, 160, 235, 8, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5719, 173, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3971, 112, 416, 15, 70, "Text",
- CellTags->"InsideDiracTrace",
- CellID->1537569404]
+Cell[5992, 187, 187, 4, 70, "SeeAlso"]
}, Open ]],
-Cell[4402, 130, 23, 0, 70, "FooterCell"]
+Cell[6194, 194, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegralTable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegralTable.nb
index bbc262f65..1e970e633 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegralTable.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegralTable.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6714, 202]
-NotebookOptionsPosition[ 4381, 135]
-NotebookOutlinePosition[ 6448, 191]
-CellTagsIndexPosition[ 6373, 186]
+NotebookDataLength[ 7702, 228]
+NotebookOptionsPosition[ 5582, 170]
+NotebookOutlinePosition[ 7493, 220]
+CellTagsIndexPosition[ 7450, 217]
WindowTitle->IntegralTable
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IntegralTable\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IntegralTable"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoopSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSimplify"], "\<\"TwoLoopSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TwoLoopSimplify"], \
+"\<\"FeynAmpDenominatorSimplify\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IntegralTable\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IntegralTable"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IntegralTable.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$91982],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IntegralTable", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$169178],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IntegralTable", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ IntegralTable.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IntegralTable", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IntegralTable", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -126,9 +163,7 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominatorSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IntegralTable",
- CellID->498155720]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -145,10 +180,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 34.777477}",
+ "built" -> "{2020, 1, 5, 18, 59, 4.305410}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -156,11 +191,12 @@ TaggingRules->{
"None", "summary" ->
"IntegralTable is an option of OneLoopSimplify, TwoLoopSimplify and \
FeynAmpDenominatorSimplify. It may be set to a list of the form : \
-{FCIntegral[ ... ] :> bla, ...}.", "synonyms" -> {}, "title" ->
- "IntegralTable", "titlemodifier" -> "", "windowtitle" -> "IntegralTable",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/IntegralTable"}},
+{FCIntegral[ ... ] :> bla, ...}.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "IntegralTable", "titlemodifier" -> "", "windowtitle" ->
+ "IntegralTable", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/IntegralTable"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -169,41 +205,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IntegralTable"->{
- Cell[3693, 109, 646, 21, 70, "Text",
- CellTags->"IntegralTable",
- CellID->498155720]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IntegralTable", 6257, 179}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3277, 79, 70, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 483, 13, 70, "Usage",
+Cell[3865, 102, 290, 11, 70, "ObjectNameGrid"],
+Cell[4158, 115, 483, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3420, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4666, 132, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3693, 109, 646, 21, 70, "Text",
- CellTags->"IntegralTable",
- CellID->498155720]
+Cell[4939, 146, 601, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4354, 133, 23, 0, 70, "FooterCell"]
+Cell[5555, 168, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate2.nb
index d90886ab6..8c7bd1e12 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate2.nb
@@ -3,69 +3,100 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 120460, 3982]
-NotebookOptionsPosition[ 103951, 3432]
-NotebookOutlinePosition[ 113194, 3703]
-CellTagsIndexPosition[ 113076, 3697]
+NotebookDataLength[ 82809, 2951]
+NotebookOptionsPosition[ 68414, 2482]
+NotebookOutlinePosition[ 76050, 2701]
+CellTagsIndexPosition[ 75934, 2695]
WindowTitle->Integrate2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Integrate2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Integrate2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Integrate2.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$92337],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Integrate2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DeltaFunction\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeltaFunction"], "\<\"Integrate3\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate3"], "\<\"Integrate4\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate4"], "\<\"Integrate5\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate5"], "\<\"SumS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SumS"], "\<\"SumT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SumT"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Integrate2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Integrate2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Integrate2.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$169633],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Integrate2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,32 +104,39 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Integrate2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Integrate2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["Integrate2"], "InlineFormula"],
- " \[LineSeparator]",
- "is like Integrate, but : Integrate2[a_Plus, b__] := Map[Integrate2[#, \
-b]&, a] ( more linear algebra and partial fraction decomposition is done) \
-Integrate2[f[x] DeltaFunction[x], x] \[Rule] f[0] Integrate2[f[x] \
-DeltaFunction[x0-x], x] \[Rule] f[x0]. Integrate2[f[x] DeltaFunction[a + b \
-x], x] \[Rule] Integrate[f[x] (1/Abs[b]) DeltaFunction[a/b + x], x], where \
-abs[b] \[Rule] b, if b is a Symbol, and if b = -c, then abs[-c] \[Rule] c, \
-i.e., the variable contained in b is supposed to be positive. ",
+ " \[LineSeparator]is like Integrate, but : Integrate2[a_Plus, b__] := \
+Map[Integrate2[#, b]&, a] ( more linear algebra and partial fraction \
+decomposition is done) Integrate2[f[x] DeltaFunction[x], x] \[Rule] f[0] \
+Integrate2[f[x] DeltaFunction[x0-x], x] \[Rule] f[x0]. Integrate2[f[x] \
+DeltaFunction[a + b x], x] \[Rule] Integrate[f[x] (1/Abs[b]) \
+DeltaFunction[a/b + x], x], where abs[b] \[Rule] b, if b is a Symbol, and if \
+b = -c, then abs[-c] \[Rule] c, i.e., the variable contained in b is supposed \
+to be positive. ",
Cell[BoxData[
FormBox[
RowBox[{" ",
SuperscriptBox["\[Pi]", "2"]}], TraditionalForm]]],
" is replaced by 6 Zeta2. Integrate2[1/(1-y),{y,x,1}] is intepreted as \
distribution, i.e. as Integrate2[-1/(1-y)],{y, 0, x}] \[Rule] Log[1-y]. \
-Integrate2[1/(1-x),{x,0,1}] \[Rule] 0.\n\nNOTE: Since Integrate2 does do a \
-reordering and partial fraction decomposition before calling the integral \
-table of Integrate3 it will in general be slower compared to Integrate3 for \
-sums of integrals. I.e., if the integrand has already an expanded form and if \
-partial fraction decomposition is not necessary it is more effective to use \
-Integrate3."
+Integrate2[1/(1-x),{x,0,1}] \[Rule] 0."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,6 +147,47 @@ Integrate3."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1661719191],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+Since Integrate2 does do a reordering and partial fraction decomposition \
+before calling the integral table of Integrate3 it will in general be slower \
+compared to Integrate3 for sums of integrals. I.e., if the integrand has \
+already an expanded form and if partial fraction decomposition is not \
+necessary it is more effective to use Integrate3.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -124,7 +203,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1621069730],
+ CellID->1066608491],
Cell[CellGroupData[{
@@ -134,7 +213,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->756384805],
+ CellID->656544217],
Cell[CellGroupData[{
@@ -159,7 +238,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"{",
- RowBox[{"0.006734`", ",",
+ RowBox[{"0.028933`", ",",
RowBox[{
TemplateBox[{"3"},
"Zeta"], "-",
@@ -168,12 +247,11 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"log", "(", "2", ")"}]}]}]}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{222, 41},
+ ImageSize->{217, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[1]=",
- CellID->1871676459]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[TextData[{
@@ -181,9 +259,7 @@ Cell[TextData[{
StyleBox["Mathematica",
FontSlant->"Italic"],
"'s Integrate."
-}], "Text",
- CellTags->"Integrate2",
- CellID->1563728584],
+}], "Notes"],
Cell[CellGroupData[{
@@ -205,12 +281,11 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}], "-", "4", "+",
RowBox[{"4", " ",
RowBox[{"log", "(", "2", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{128, 15},
+ ImageSize->{128, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[2]=",
- CellID->1681597308]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -238,12 +313,11 @@ Cell[BoxData[
"Zeta"]}], "4"], "+", "1", "-",
RowBox[{"2", " ",
RowBox[{"log", "(", "2", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{191, 42},
+ ImageSize->{190, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[3]=",
- CellID->133418904]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -281,12 +355,11 @@ Cell[BoxData[
SuperscriptBox["log", "2"], "(", "2", ")"}], "+",
RowBox[{"2", " ",
RowBox[{"log", "(", "2", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{362, 45},
+ ImageSize->{362, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[4]=",
- CellID->1994437751]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -307,12 +380,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[5]=",
- CellID->809684251]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[TextData[{
@@ -366,10 +438,7 @@ Cell[TextData[{
RowBox[{"log", "(", "\[Delta]", ")"}]}], "+",
RowBox[{"log", "(", "1", ")"}]}], "\[Implies]", "0."}]}], " "}],
TraditionalForm]]]
-}], "Text",
- ZeroWidthTimes->False,
- CellTags->"Integrate2",
- CellID->1657711161],
+}], "Notes"],
Cell[CellGroupData[{
@@ -387,12 +456,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[6]=",
- CellID->1845418056]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[TextData[{
@@ -418,9 +486,7 @@ the ",
RowBox[{
RowBox[{"(",
RowBox[{"1", "-", "x"}], ")"}], " ", "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"Integrate2",
- CellID->1551126642],
+}], "Notes"],
Cell[CellGroupData[{
@@ -439,12 +505,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[7]=",
- CellID->1834494178]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -469,12 +534,11 @@ Cell[BoxData[
FormBox[
RowBox[{"2", "-",
RowBox[{"\[Zeta]", "(", "2", ")"}]}], TraditionalForm]], "Output",
- ImageSize->{58, 15},
+ ImageSize->{59, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[8]=",
- CellID->1270782167]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -502,12 +566,11 @@ Cell[BoxData[
FractionBox[
TemplateBox[{"3"},
"Zeta"], "8"]}], TraditionalForm]], "Output",
- ImageSize->{50, 42},
+ ImageSize->{48, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[9]=",
- CellID->710630625]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -531,12 +594,11 @@ Cell[BoxData[
RowBox[{"2", " ",
TemplateBox[{"3"},
"Zeta"]}], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{45, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[10]=",
- CellID->826875645]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -566,12 +628,11 @@ Cell[BoxData[
FractionBox["1", "2"], " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"log", "(", "2", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{146, 42},
+ ImageSize->{143, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[11]=",
- CellID->1360635255]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -594,12 +655,11 @@ Cell[BoxData[
RowBox[{"3", "-",
RowBox[{"2", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{69, 15},
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[12]=",
- CellID->1951902872]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -626,12 +686,11 @@ Cell[BoxData[
TemplateBox[{"3"},
"Zeta"], "2"], "+",
FractionBox["3", "16"]}], TraditionalForm]], "Output",
- ImageSize->{133, 42},
+ ImageSize->{133, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[13]=",
- CellID->2097277253]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -657,25 +716,23 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"\[Zeta]", "(", "4", ")"}], "+",
RowBox[{
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}]}], "-",
RowBox[{"4", " ",
TemplateBox[{"4",FractionBox["1", "2"]},
- "PolyLog"]}], "+",
- FractionBox[
- SuperscriptBox["\[Pi]", "4"], "90"], "-",
+ "PolyLog"]}], "-",
FractionBox[
RowBox[{
SuperscriptBox["log", "4"], "(", "2", ")"}], "6"]}],
TraditionalForm]], "Output",
- ImageSize->{271, 47},
+ ImageSize->{275, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[14]=",
- CellID->442263874]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
@@ -714,6 +771,12 @@ Cell[BoxData[
RowBox[{"2", " ", "\[ImaginaryI]", " ", "\[Pi]", " ",
TemplateBox[{"2",RowBox[{"-", "z"}]},
"PolyLog"]}],
+ RowBox[{"1", "-", "z"}]], "-",
+ FractionBox[
+ RowBox[{"4", " ",
+ TemplateBox[{"3",FractionBox[
+ RowBox[{"1", "-", "z"}], "2"]},
+ "PolyLog"]}],
RowBox[{"1", "-", "z"}]], "+",
FractionBox[
RowBox[{"4", " ",
@@ -730,20 +793,18 @@ Cell[BoxData[
TemplateBox[{"3",FractionBox["1",
RowBox[{"z", "+", "1"}]]},
"PolyLog"]}],
- RowBox[{"1", "-", "z"}]], "+",
+ RowBox[{"1", "-", "z"}]], "-",
FractionBox[
RowBox[{"4", " ",
- TemplateBox[{"3",RowBox[{"-",
- FractionBox[
- RowBox[{"1", "-", "z"}],
- RowBox[{"z", "+", "1"}]]}]},
+ TemplateBox[{"3",FractionBox[
+ RowBox[{"1", "-", "z"}],
+ RowBox[{"z", "+", "1"}]]},
"PolyLog"]}],
RowBox[{"1", "-", "z"}]], "-",
FractionBox[
RowBox[{"4", " ",
TemplateBox[{"3",FractionBox[
- RowBox[{"1", "-", "z"}],
- RowBox[{"z", "+", "1"}]]},
+ RowBox[{"z", "+", "1"}], "2"]},
"PolyLog"]}],
RowBox[{"1", "-", "z"}]], "-",
FractionBox[
@@ -794,11 +855,16 @@ Cell[BoxData[
RowBox[{"1", "-", "z"}], ")"}]}],
RowBox[{"1", "-", "z"}]], "+",
FractionBox[
- RowBox[{"2", " ",
+ RowBox[{"6", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"log", "(",
RowBox[{"z", "+", "1"}], ")"}]}],
RowBox[{"1", "-", "z"}]], "-",
+ FractionBox[
+ RowBox[{"4", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ RowBox[{"log", "(", "2", ")"}]}],
+ RowBox[{"1", "-", "z"}]], "+",
FractionBox[
RowBox[{"2", " ",
TemplateBox[{"3"},
@@ -809,12 +875,11 @@ Cell[BoxData[
SuperscriptBox["log", "3"], "(", "z", ")"}],
RowBox[{"6", " ",
RowBox[{"(",
- RowBox[{"1", "-", "z"}], ")"}]}]], "-",
+ RowBox[{"1", "-", "z"}], ")"}]}]], "+",
FractionBox[
- RowBox[{"2", " ",
+ RowBox[{"4", " ",
RowBox[{
- SuperscriptBox["log", "3"], "(",
- RowBox[{"z", "+", "1"}], ")"}]}],
+ SuperscriptBox["log", "3"], "(", "2", ")"}]}],
RowBox[{"3", " ",
RowBox[{"(",
RowBox[{"1", "-", "z"}], ")"}]}]], "-",
@@ -838,7 +903,29 @@ Cell[BoxData[
SuperscriptBox["log", "2"], "(", "z", ")"}]}],
RowBox[{"2", " ",
RowBox[{"(",
- RowBox[{"1", "-", "z"}], ")"}]}]], "+",
+ RowBox[{"1", "-", "z"}], ")"}]}]], "-",
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "z"}], ")"}], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(",
+ RowBox[{"z", "+", "1"}], ")"}]}],
+ RowBox[{"1", "-", "z"}]], "-",
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "2", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "z"}], ")"}]}],
+ RowBox[{"1", "-", "z"}]], "-",
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "2", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"z", "+", "1"}], ")"}]}],
+ RowBox[{"1", "-", "z"}]], "+",
FractionBox[
RowBox[{"4", " ",
RowBox[{"log", "(",
@@ -852,13 +939,20 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"z", "+", "1"}], ")"}], " ",
RowBox[{"log", "(", "z", ")"}]}],
+ RowBox[{"1", "-", "z"}]], "+",
+ FractionBox[
+ RowBox[{"4", " ",
+ RowBox[{"log", "(", "2", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "z"}], ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"z", "+", "1"}], ")"}]}],
RowBox[{"1", "-", "z"}]]}], TraditionalForm]], "Output",
- ImageSize->{544, 283},
+ ImageSize->{564, 351},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[15]=",
- CellID->747999287]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
@@ -885,34 +979,36 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FractionBox["1", "m"],
- RowBox[{"(",
- RowBox[{
- RowBox[{
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"(",
- RowBox[{"-",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"1", ",",
- RowBox[{"m", "-", "2"}]}], ")"}]}], ")"}]}], "+",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"1", ",", "2", ",", "m"}], ")"}], "+",
- RowBox[{"\[Zeta]", "(", "2", ")"}], "+",
- TemplateBox[{"3"},
- "Zeta"]}], ")"}]}], "-",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[Zeta]", "(", "2", ")"}],
+ SuperscriptBox["m", "2"]]}], "-",
FractionBox[
RowBox[{"\[Zeta]", "(", "2", ")"}],
- SuperscriptBox["m", "2"]], "-",
+ RowBox[{"m", "-", "1"}]], "+",
FractionBox[
- RowBox[{"\[Zeta]", "(", "2", ")"}],
- RowBox[{"m", "-", "1"}]]}], TraditionalForm]], "Output",
- ImageSize->{501, 93},
+ RowBox[{
+ RowBox[{"\[Zeta]", "(", "2", ")"}], "+",
+ RowBox[{
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{
+ SubscriptBox["S", "1"], "(",
+ FormBox[
+ RowBox[{"m", "-", "2"}],
+ TraditionalForm], ")"}]}], ")"}]}], "+",
+ RowBox[{
+ SubscriptBox["S", "12"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}], "+",
+ TemplateBox[{"3"},
+ "Zeta"]}], "m"]}], TraditionalForm]], "Output",
+ ImageSize->{404, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[16]=",
- CellID->112611139]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
@@ -942,17 +1038,19 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "360"], " ",
+ FractionBox["1", "24"], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "m"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"450", " ",
+ RowBox[{"48", " ",
+ RowBox[{"\[Zeta]", "(", "4", ")"}]}], "+",
+ RowBox[{"30", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}]}], "+",
- RowBox[{"90", " ",
+ RowBox[{"6", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{
SubsuperscriptBox["S",
@@ -960,14 +1058,14 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"270", " ",
+ RowBox[{"18", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{
SubscriptBox["S", "2"], "(",
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{
SubscriptBox["S",
@@ -975,7 +1073,7 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"180", " ",
+ RowBox[{"12", " ",
RowBox[{
SubscriptBox["S",
RowBox[{"-", "2"}]], "(",
@@ -995,7 +1093,7 @@ Cell[BoxData[
TraditionalForm], ")"}]}], "-",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}]}], ")"}]}], "-",
- RowBox[{"540", " ",
+ RowBox[{"36", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"log", "(", "2", ")"}], " ",
RowBox[{
@@ -1003,7 +1101,7 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"180", " ",
+ RowBox[{"12", " ",
RowBox[{
SubscriptBox["S",
RowBox[{"-", "1"}]], "(",
@@ -1018,7 +1116,7 @@ Cell[BoxData[
RowBox[{"2", " ",
TemplateBox[{"3"},
"Zeta"]}]}], ")"}]}], "+",
- RowBox[{"585", " ",
+ RowBox[{"39", " ",
TemplateBox[{"3"},
"Zeta"], " ",
RowBox[{
@@ -1026,7 +1124,7 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{
SubscriptBox["S",
RowBox[{
@@ -1034,7 +1132,7 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{
SubscriptBox["S",
RowBox[{
@@ -1042,7 +1140,7 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{
SubscriptBox["S",
RowBox[{
@@ -1050,28 +1148,28 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{
SubscriptBox["S",
RowBox[{"1", "-", "21"}]], "(",
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{
SubscriptBox["S",
RowBox[{"1", "-", "12"}]], "(",
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{
SubscriptBox["S",
RowBox[{"2", "-", "11"}]], "(",
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"180", " ",
+ RowBox[{"12", " ",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}], " ",
RowBox[{
@@ -1079,14 +1177,14 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{"log", "(", "2", ")"}], " ",
RowBox[{
SubscriptBox["S", "3"], "(",
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{"log", "(", "2", ")"}], " ",
RowBox[{
SubscriptBox["S",
@@ -1094,7 +1192,7 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"360", " ",
+ RowBox[{"24", " ",
RowBox[{"log", "(", "2", ")"}], " ",
RowBox[{
SubscriptBox["S",
@@ -1102,25 +1200,22 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"720", " ",
+ RowBox[{"48", " ",
TemplateBox[{"4",FractionBox["1", "2"]},
"PolyLog"]}], "-",
- RowBox[{"945", " ",
+ RowBox[{"63", " ",
TemplateBox[{"3"},
"Zeta"], " ",
- RowBox[{"log", "(", "2", ")"}]}], "+",
- RowBox[{"8", " ",
- SuperscriptBox["\[Pi]", "4"]}], "-",
- RowBox[{"30", " ",
+ RowBox[{"log", "(", "2", ")"}]}], "-",
+ RowBox[{"2", " ",
RowBox[{
SuperscriptBox["log", "4"], "(", "2", ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{573, 243},
+ ImageSize->{530, 185},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[17]=",
- CellID->1666831938]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1135,29 +1230,31 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "360"], " ",
+ FractionBox["1", "24"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"720", " ",
+ RowBox[{"48", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}]}], "+",
- RowBox[{"450", " ",
+ RowBox[{"48", " ",
+ RowBox[{"\[Zeta]", "(", "4", ")"}]}], "+",
+ RowBox[{"30", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}]}], "+",
- RowBox[{"180", " ",
+ RowBox[{"12", " ",
RowBox[{"(",
RowBox[{
RowBox[{"\[Zeta]", "(", "2", ")"}], "-",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}], "+",
RowBox[{"log", "(", "4", ")"}]}], ")"}]}], "-",
- RowBox[{"540", " ",
+ RowBox[{"36", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"log", "(", "2", ")"}]}], "-",
- RowBox[{"720", " ",
+ RowBox[{"48", " ",
TemplateBox[{"4",FractionBox["1", "2"]},
"PolyLog"]}], "-",
- RowBox[{"180", " ",
+ RowBox[{"12", " ",
RowBox[{"(",
RowBox[{
RowBox[{
@@ -1166,30 +1263,27 @@ Cell[BoxData[
RowBox[{"2", " ",
TemplateBox[{"3"},
"Zeta"]}]}], ")"}]}], "+",
- RowBox[{"585", " ",
+ RowBox[{"39", " ",
TemplateBox[{"3"},
"Zeta"]}], "-",
- RowBox[{"945", " ",
+ RowBox[{"63", " ",
TemplateBox[{"3"},
"Zeta"], " ",
- RowBox[{"log", "(", "2", ")"}]}], "+",
- RowBox[{"8", " ",
- SuperscriptBox["\[Pi]", "4"]}], "-", "2160", "-",
- RowBox[{"30", " ",
+ RowBox[{"log", "(", "2", ")"}]}], "-", "144", "-",
+ RowBox[{"2", " ",
RowBox[{
SuperscriptBox["log", "4"], "(", "2", ")"}]}], "-",
- RowBox[{"180", " ",
+ RowBox[{"12", " ",
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}]}], "+",
- RowBox[{"1080", " ",
+ RowBox[{"72", " ",
RowBox[{"log", "(", "2", ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
- ImageSize->{497, 142},
+ ImageSize->{472, 118},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[18]=",
- CellID->1607309345]
+ CellLabel->"Out[18]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1201,13 +1295,12 @@ Cell[BoxData[
CellID->1653791497],
Cell[BoxData[
- FormBox["0.05051383540274483`", TraditionalForm]], "Output",
- ImageSize->{64, 15},
+ FormBox["0.050513835402744935`", TraditionalForm]], "Output",
+ ImageSize->{64, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[19]=",
- CellID->1825975069]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1378,12 +1471,11 @@ Cell[BoxData[
TemplateBox[{"3"},
"Zeta"]}],
RowBox[{"8", " ", "m"}]]}], TraditionalForm]], "Output",
- ImageSize->{469, 201},
+ ImageSize->{481, 173},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[20]=",
- CellID->1776776365]
+ CellLabel->"Out[20]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1397,12 +1489,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[21]=",
- CellID->536196094]
+ CellLabel->"Out[21]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1424,26 +1515,27 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[22]=",
- CellID->1332564146]
+ CellLabel->"Out[22]="]
}, Open ]],
Cell["\<\
This is the polarized non-singlet spin splitting function whose first moment \
vanishes.\
-\>", "Text",
- CellTags->"Integrate2",
- CellID->1160689999],
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"t", "=",
- RowBox[{"SplittingFunction", "[", "PQQNS", "]"}]}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[", "PQQNS", "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]}]], "Input",
CellTags->"Integrate2",
CellLabel->"In[23]:=",
CellID->18981591],
@@ -1461,53 +1553,50 @@ Cell[BoxData[
SubscriptBox["C", "A"], "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FractionBox["1",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]],
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- RowBox[{"2", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], "-",
- RowBox[{"4", " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}], "+",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], "-",
- RowBox[{"4", " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], "-",
+ RowBox[{"4", " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
+ "PolyLog"]}], "+",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"log", "(",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}],
+ RowBox[{"x", "+", "1"}]], "+",
RowBox[{"4", " ",
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{"2", " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}], "+",
RowBox[{
SubscriptBox["C", "A"], " ",
SubscriptBox["C", "F"], " ",
RowBox[{"(",
RowBox[{
+ FractionBox[
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "+",
RowBox[{"8", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}], "+",
+ RowBox[{"x", "+", "1"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -1517,9 +1606,12 @@ Cell[BoxData[
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
RowBox[{
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}], " ",
RowBox[{"(",
RowBox[{
FractionBox[
@@ -1528,46 +1620,35 @@ Cell[BoxData[
RowBox[{"24", " ",
TemplateBox[{"3"},
"Zeta"]}], "+",
- FractionBox["17", "3"]}], ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
+ FractionBox["17", "3"]}], ")"}]}], "+",
RowBox[{
FractionBox["4", "9"], " ",
RowBox[{"(",
RowBox[{"53", "-",
- RowBox[{"187", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}]}], "+",
- FractionBox[
- RowBox[{"4", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "-",
+ RowBox[{"187", " ", "x"}]}], ")"}]}], "-",
RowBox[{
FractionBox["4", "3"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"5", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
+ RowBox[{"5", " ", "x"}], "-",
FractionBox["22",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+", "5"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}]], "+", "5"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}], "+",
RowBox[{
SubscriptBox["C", "F"], " ",
SubscriptBox["N", "f"], " ",
RowBox[{"(",
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"3", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "x"}], ")"}]}]]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -1578,38 +1659,36 @@ Cell[BoxData[
FractionBox["2", "3"]}], ")"}], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
FractionBox[
- RowBox[{"88", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "9"], "-",
+ RowBox[{"88", " ", "x"}], "9"], "-",
RowBox[{
FractionBox["80", "9"], " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- FractionBox[
- RowBox[{"8", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}]], "-",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "-",
FractionBox["8", "9"]}], ")"}]}], "+",
RowBox[{
SubsuperscriptBox["C", "F", "2"], " ",
RowBox[{"(",
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"16", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "x"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]]}], "+",
RowBox[{
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"-",
@@ -1617,1007 +1696,385 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], "+",
RowBox[{"48", " ",
TemplateBox[{"3"},
- "Zeta"]}], "+", "3"}], ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "-",
+ "Zeta"]}], "+", "3"}], ")"}]}], "-",
RowBox[{"40", " ",
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}]}], "-",
RowBox[{"4", " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "-",
RowBox[{"8", " ",
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"2", " ", "x"}], "+",
FractionBox["3",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
- FractionBox[
- RowBox[{"16", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]]}], ")"}]}]}],
+ RowBox[{"1", "-", "x"}]]}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{579, 682},
+ ImageSize->{575, 373},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[23]=",
- CellID->1090179756]
+ CellLabel->"Out[23]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"Integrate2", "[",
- RowBox[{"t", ",",
- RowBox[{"{",
- RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}], "//",
- "Timing"}]], "Input",
- CellTags->"Integrate2",
- CellLabel->"In[24]:=",
- CellID->182134904],
+ RowBox[{"t", "//", "Expand"}]], "Input",
+ CellLabel->"In[24]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
- RowBox[{"0.311061`", ",",
- RowBox[{
- FractionBox[
- RowBox[{"12", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"4", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"72", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"892", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"88", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "3"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"4", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"4", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"536", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"80", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"72", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"356", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"3", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"17", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"2", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"24", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"88", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"48", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- TemplateBox[{"3"},
- "Zeta"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"24", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- TemplateBox[{"3"},
- "Zeta"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"4", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"56", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"92", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"72", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"892", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"88", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"12", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"40", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"92", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"536", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"80", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"72", " ",
- SubsuperscriptBox["C", "F", "2"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"356", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"]}],
- RowBox[{"9", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"3", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"17", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"2", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"24", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "+",
- FractionBox[
- RowBox[{"88", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], ")"}]}]], "+",
- FractionBox[
- RowBox[{"48", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- TemplateBox[{"3"},
- "Zeta"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{"24", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}], " ",
- TemplateBox[{"3"},
- "Zeta"]}],
- RowBox[{"1", "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}]]}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{574, 2664},
+ RowBox[{
+ RowBox[{"8", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}], "-",
+ FractionBox[
+ RowBox[{"16", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
+ "PolyLog"]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ FractionBox[
+ RowBox[{"16", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
+ "PolyLog"]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SuperscriptBox["x", "2"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ FractionBox[
+ RowBox[{"4", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "+",
+ FractionBox[
+ RowBox[{"4", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ FractionBox[
+ RowBox[{"16", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"x", "+", "1"}], ")"}]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ RowBox[{
+ FractionBox["88", "3"], " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{
+ FractionBox["17", "3"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"8", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ", "x", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ RowBox[{"16", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}], "-",
+ RowBox[{"24", " ",
+ TemplateBox[{"3"},
+ "Zeta"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FractionBox["892", "9"], " ", "x", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}], "+",
+ RowBox[{
+ FractionBox["536", "9"], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}], "+",
+ FractionBox[
+ RowBox[{"4", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "+",
+ FractionBox[
+ RowBox[{"4", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ RowBox[{
+ FractionBox["4", "3"], " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
+ RowBox[{
+ FractionBox["4", "3"], " ", "x", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
+ FractionBox[
+ RowBox[{"88", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"3", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "x"}], ")"}]}]], "-",
+ FractionBox[
+ RowBox[{"16", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"x", "+", "1"}], ")"}]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ FractionBox[
+ RowBox[{"356", " ",
+ SubscriptBox["C", "A"], " ",
+ SubscriptBox["C", "F"]}], "9"], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"3", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "x"}], ")"}]}]], "-",
+ RowBox[{
+ FractionBox["16", "3"], " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FractionBox["2", "3"], " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{
+ FractionBox["88", "9"], " ", "x", " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"]}], "-",
+ RowBox[{
+ FractionBox["80", "9"], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"], " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"]}], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"3", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "x"}], ")"}]}]], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ SubscriptBox["C", "F"], " ",
+ SubscriptBox["N", "f"]}], "9"], "+",
+ FractionBox[
+ RowBox[{"32", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
+ "PolyLog"]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ FractionBox[
+ RowBox[{"32", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
+ "PolyLog"]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ FractionBox[
+ RowBox[{"16", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SuperscriptBox["x", "2"], " ",
+ SubsuperscriptBox["C", "F", "2"]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ FractionBox[
+ RowBox[{"16", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "x"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "+",
+ FractionBox[
+ RowBox[{"32", " ",
+ SuperscriptBox["x", "2"], " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"x", "+", "1"}], ")"}]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ RowBox[{"24", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"3", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+",
+ FractionBox[
+ RowBox[{"16", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
+ SubsuperscriptBox["C", "F", "2"]}],
+ RowBox[{"x", "+", "1"}]], "+",
+ RowBox[{"48", " ",
+ TemplateBox[{"3"},
+ "Zeta"], " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"72", " ", "x", " ",
+ SubsuperscriptBox["C", "F", "2"]}], "-",
+ RowBox[{"4", " ", "x", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "-",
+ FractionBox[
+ RowBox[{"8", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ RowBox[{"4", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "-",
+ RowBox[{"32", " ", "x", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "-",
+ FractionBox[
+ RowBox[{"16", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "x"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "-",
+ FractionBox[
+ RowBox[{"24", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "-",
+ RowBox[{"16", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
+ FractionBox[
+ RowBox[{"32", " ",
+ SubsuperscriptBox["C", "F", "2"], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"x", "+", "1"}], ")"}]}],
+ RowBox[{"x", "+", "1"}]], "-",
+ RowBox[{"72", " ",
+ SubsuperscriptBox["C", "F", "2"]}]}], TraditionalForm]], "Output",
+ ImageSize->{570, 584},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[24]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Integrate2", "[",
+ RowBox[{"t", ",",
+ RowBox[{"{",
+ RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}], "//",
+ "Timing"}]], "Input",
+ CellTags->"Integrate2",
+ CellLabel->"In[25]:=",
+ CellID->182134904],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"0.047429`", ",", "0"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{88, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[24]=",
- CellID->1275810940]
+ CellLabel->"Out[25]="]
}, Open ]],
Cell["\<\
Expanding t with respect to x yields a form already suitable for Integrate3 \
and therefore the following is faster:\
-\>", "Text",
- CellTags->"Integrate2",
- CellID->1779842562],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -2632,425 +2089,25 @@ Cell[BoxData[
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}], "//", "Expand"}], "//",
"Timing"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[25]:=",
+ CellLabel->"In[26]:=",
CellID->237838384],
Cell[BoxData[
FormBox[
RowBox[{"{",
- RowBox[{"0.000832`", ",",
- RowBox[{
- RowBox[{"8", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"]}], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- RowBox[{
- FractionBox["88", "3"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
- RowBox[{
- FractionBox["17", "3"], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
- RowBox[{"8", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
- RowBox[{"16", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- FractionBox[
- RowBox[{"8", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- RowBox[{"24", " ",
- TemplateBox[{"3"},
- "Zeta"], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "-",
- RowBox[{
- FractionBox["892", "9"], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
- RowBox[{
- FractionBox["536", "9"], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
- FractionBox[
- RowBox[{"4", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+",
- FractionBox[
- RowBox[{"4", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+",
- FractionBox[
- RowBox[{"4", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- FractionBox[
- RowBox[{"4", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- RowBox[{
- FractionBox["4", "3"], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
- RowBox[{
- FractionBox["4", "3"], " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
- FractionBox[
- RowBox[{"88", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- FractionBox[
- RowBox[{"356", " ",
- SubscriptBox["C", "A"], " ",
- SubscriptBox["C", "F"]}], "9"], "-",
- RowBox[{
- FractionBox["16", "3"], " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "-",
- RowBox[{
- FractionBox["2", "3"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
- RowBox[{
- FractionBox["88", "9"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
- RowBox[{
- FractionBox["80", "9"], " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["N", "f"]}], "9"], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- RowBox[{"24", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
- RowBox[{"3", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
- FractionBox[
- RowBox[{"16", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- FractionBox[
- RowBox[{"16", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- SubsuperscriptBox["C", "F", "2"]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- RowBox[{"48", " ",
- TemplateBox[{"3"},
- "Zeta"], " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
- RowBox[{"72", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
- RowBox[{"4", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- FractionBox[
- RowBox[{"8", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- RowBox[{"4", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "-",
- FractionBox[
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "-",
- FractionBox[
- RowBox[{"24", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "-",
- RowBox[{"16", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+",
- FractionBox[
- RowBox[{"32", " ",
- SubsuperscriptBox["C", "F", "2"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}],
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "-",
- RowBox[{"72", " ",
- SubsuperscriptBox["C", "F", "2"]}]}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{573, 1200},
+ RowBox[{"0.028382`", ",", "0"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{88, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[25]=",
- CellID->115302396]
+ CellLabel->"Out[26]="]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"Clear", "[", "t", "]"}], ";"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[26]:=",
+ CellLabel->"In[27]:=",
CellID->1890146765],
Cell[CellGroupData[{
@@ -3065,18 +2122,17 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[27]:=",
+ CellLabel->"In[28]:=",
CellID->593727658],
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[27]=",
- CellID->592730520]
+ CellLabel->"Out[28]="]
}, Open ]],
Cell[CellGroupData[{
@@ -3092,7 +2148,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[28]:=",
+ CellLabel->"In[29]:=",
CellID->1759046432],
Cell[BoxData[
@@ -3102,12 +2158,11 @@ Cell[BoxData[
RowBox[{"46", " ",
RowBox[{"log", "(", "2", ")"}]}], "45"], "-",
FractionBox["6959", "10800"]}], TraditionalForm]], "Output",
- ImageSize->{125, 42},
+ ImageSize->{126, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[28]=",
- CellID->396258688]
+ CellLabel->"Out[29]="]
}, Open ]],
Cell[CellGroupData[{
@@ -3115,17 +2170,16 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "@", "%"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[29]:=",
+ CellLabel->"In[30]:=",
CellID->1795528063],
Cell[BoxData[
FormBox["0.06419859938720329`", TraditionalForm]], "Output",
- ImageSize->{64, 15},
+ ImageSize->{65, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[29]=",
- CellID->958489189]
+ CellLabel->"Out[30]="]
}, Open ]],
Cell[CellGroupData[{
@@ -3141,17 +2195,16 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[30]:=",
+ CellLabel->"In[31]:=",
CellID->190638847],
Cell[BoxData[
FormBox["0.06419859938720252`", TraditionalForm]], "Output",
- ImageSize->{64, 15},
+ ImageSize->{65, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[30]=",
- CellID->1001542201]
+ CellLabel->"Out[31]="]
}, Open ]],
Cell[CellGroupData[{
@@ -3169,7 +2222,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"Integrate2",
- CellLabel->"In[31]:=",
+ CellLabel->"In[32]:=",
CellID->1701338238],
Cell[BoxData[
@@ -3358,12 +2411,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(", "2", ")"}], "m"]}],
TraditionalForm]], "Output",
- ImageSize->{482, 310},
+ ImageSize->{514, 311},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate2",
- CellLabel->"Out[31]=",
- CellID->164627498]
+ CellLabel->"Out[32]="]
}, Open ]]
}, Open ]],
@@ -3423,17 +2475,15 @@ Cell[TextData[{
ButtonNote->"SumT"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Integrate2",
- CellID->1134437741]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Integrate2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -3442,10 +2492,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 36.247350}",
+ "built" -> "{2020, 1, 5, 18, 59, 5.463432}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -3460,16 +2510,12 @@ x], x], where abs[b] -> b, if b is a Symbol, and if b = -c, then abs[-c] -> \
c, i.e., the variable contained in b is supposed to be positive. \\[Pi]^2 is \
replaced by 6 Zeta2. Integrate2[1/(1-y),{y,x,1}] is intepreted as \
distribution, i.e. as Integrate2[-1/(1-y)],{y, 0, x}] -> Log[1-y]. \
-Integrate2[1/(1-x),{x,0,1}] -> 0. NOTE: Since Integrate2 does do a reordering \
-and partial fraction decomposition before calling the integral table of \
-Integrate3 it will in general be slower compared to Integrate3 for sums of \
-integrals. I.e., if the integrand has already an expanded form and if partial \
-fraction decomposition is not necessary it is more effective to use \
-Integrate3.", "synonyms" -> {}, "title" -> "Integrate2", "titlemodifier" ->
- "", "windowtitle" -> "Integrate2", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Integrate2"}, "SearchTextTranslated" -> ""},
+Integrate2[1/(1-x),{x,0,1}] -> 0.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Integrate2", "titlemodifier" -> "", "windowtitle" ->
+ "Integrate2", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Integrate2"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -3478,7 +2524,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -3487,503 +2533,426 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4410, 111, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6745, 190, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1621069730]},
+ CellID->1066608491]},
"Integrate2"->{
- Cell[5043, 140, 443, 16, 27, "Input",
+ Cell[7378, 219, 443, 16, 27, "Input",
CellTags->"Integrate2",
CellID->524907050],
- Cell[5489, 158, 463, 17, 62, "Output",
- CellTags->"Integrate2",
- CellID->1871676459],
- Cell[5967, 178, 211, 7, 52, "Text",
- CellTags->"Integrate2",
- CellID->1563728584],
- Cell[6203, 189, 299, 10, 27, "Input",
+ Cell[7824, 237, 442, 16, 55, "Output",
+ CellTags->"Integrate2"],
+ Cell[8472, 265, 299, 10, 27, "Input",
CellTags->"Integrate2",
CellID->546710902],
- Cell[6505, 201, 337, 11, 36, "Output",
- CellTags->"Integrate2",
- CellID->1681597308],
- Cell[6879, 217, 293, 10, 27, "Input",
+ Cell[8774, 277, 316, 10, 37, "Output",
+ CellTags->"Integrate2"],
+ Cell[9127, 292, 293, 10, 27, "Input",
CellTags->"Integrate2",
CellID->89878903],
- Cell[7175, 229, 451, 16, 63, "Output",
- CellTags->"Integrate2",
- CellID->133418904],
- Cell[7663, 250, 355, 12, 27, "Input",
+ Cell[9423, 304, 431, 15, 55, "Output",
+ CellTags->"Integrate2"],
+ Cell[9891, 324, 355, 12, 27, "Input",
CellTags->"Integrate2",
CellID->1742557754],
- Cell[8021, 264, 682, 24, 66, "Output",
- CellTags->"Integrate2",
- CellID->1994437751],
- Cell[8740, 293, 336, 11, 27, "Input",
+ Cell[10249, 338, 661, 23, 59, "Output",
+ CellTags->"Integrate2"],
+ Cell[10947, 366, 336, 11, 27, "Input",
CellTags->"Integrate2",
CellID->1356840886],
- Cell[9079, 306, 239, 8, 36, "Output",
- CellTags->"Integrate2",
- CellID->809684251],
- Cell[9333, 317, 1610, 54, 91, "Text",
- CellTags->"Integrate2",
- CellID->1657711161],
- Cell[10968, 375, 289, 10, 27, "Input",
+ Cell[11286, 379, 219, 7, 37, "Output",
+ CellTags->"Integrate2"],
+ Cell[13086, 444, 289, 10, 27, "Input",
CellTags->"Integrate2",
CellID->1084770727],
- Cell[11260, 387, 212, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1845418056],
- Cell[11487, 397, 670, 25, 65, "Text",
- CellTags->"Integrate2",
- CellID->1551126642],
- Cell[12182, 426, 336, 11, 27, "Input",
+ Cell[13378, 456, 191, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[14234, 492, 336, 11, 27, "Input",
CellTags->"Integrate2",
CellID->1725124689],
- Cell[12521, 439, 212, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1834494178],
- Cell[12770, 451, 405, 14, 27, "Input",
+ Cell[14573, 505, 191, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[14801, 516, 405, 14, 27, "Input",
CellTags->"Integrate2",
CellID->1940746510],
- Cell[13178, 467, 270, 9, 36, "Output",
- CellTags->"Integrate2",
- CellID->1270782167],
- Cell[13485, 481, 435, 15, 27, "Input",
+ Cell[15209, 532, 249, 8, 37, "Output",
+ CellTags->"Integrate2"],
+ Cell[15495, 545, 435, 15, 27, "Input",
CellTags->"Integrate2",
CellID->582396558],
- Cell[13923, 498, 284, 11, 63, "Output",
- CellTags->"Integrate2",
- CellID->710630625],
- Cell[14244, 514, 347, 12, 27, "Input",
+ Cell[15933, 562, 264, 10, 55, "Output",
+ CellTags->"Integrate2"],
+ Cell[16234, 577, 347, 12, 27, "Input",
CellTags->"Integrate2",
CellID->845490247],
- Cell[14594, 528, 266, 10, 36, "Output",
- CellTags->"Integrate2",
- CellID->826875645],
- Cell[14897, 543, 374, 13, 27, "Input",
+ Cell[16584, 591, 246, 9, 37, "Output",
+ CellTags->"Integrate2"],
+ Cell[16867, 605, 374, 13, 27, "Input",
CellTags->"Integrate2",
CellID->1121674397],
- Cell[15274, 558, 417, 15, 63, "Output",
- CellTags->"Integrate2",
- CellID->1360635255],
- Cell[15728, 578, 333, 11, 27, "Input",
+ Cell[17244, 620, 396, 14, 56, "Output",
+ CellTags->"Integrate2"],
+ Cell[17677, 639, 333, 11, 27, "Input",
CellTags->"Integrate2",
CellID->1584122311],
- Cell[16064, 591, 296, 10, 36, "Output",
- CellTags->"Integrate2",
- CellID->1951902872],
- Cell[16397, 606, 301, 10, 27, "Input",
+ Cell[18013, 652, 275, 9, 37, "Output",
+ CellTags->"Integrate2"],
+ Cell[18325, 666, 301, 10, 27, "Input",
CellTags->"Integrate2",
CellID->1907301251],
- Cell[16701, 618, 404, 15, 63, "Output",
- CellTags->"Integrate2",
- CellID->2097277253],
- Cell[17142, 638, 465, 16, 27, "Input",
+ Cell[18629, 678, 383, 14, 55, "Output",
+ CellTags->"Integrate2"],
+ Cell[19049, 697, 465, 16, 27, "Input",
CellTags->"Integrate2",
CellID->1237143526],
- Cell[17610, 656, 594, 21, 68, "Output",
- CellTags->"Integrate2",
- CellID->442263874],
- Cell[18241, 682, 741, 25, 45, "Input",
+ Cell[19517, 715, 556, 19, 60, "Output",
+ CellTags->"Integrate2"],
+ Cell[20110, 739, 741, 25, 45, "Input",
CellTags->"Integrate2",
CellID->2080558124],
- Cell[18985, 709, 4459, 151, 304, "Output",
- CellTags->"Integrate2",
- CellID->747999287],
- Cell[23481, 865, 490, 17, 27, "Input",
+ Cell[20854, 766, 5608, 188, 372, "Output",
+ CellTags->"Integrate2"],
+ Cell[26499, 959, 490, 17, 27, "Input",
CellTags->"Integrate2",
CellID->204763000],
- Cell[23974, 884, 943, 30, 114, "Output",
- CellTags->"Integrate2",
- CellID->112611139],
- Cell[24954, 919, 587, 20, 69, "Input",
+ Cell[26992, 978, 906, 32, 56, "Output",
+ CellTags->"Integrate2"],
+ Cell[27935, 1015, 587, 20, 70, "Input",
CellTags->"Integrate2",
CellID->1234589200],
- Cell[25544, 941, 5361, 181, 264, "Output",
- CellTags->"Integrate2",
- CellID->1666831938],
- Cell[30942, 1127, 162, 5, 27, "Input",
+ Cell[28525, 1037, 5325, 180, 206, "Output",
+ CellTags->"Integrate2"],
+ Cell[33887, 1222, 162, 5, 27, "Input",
CellTags->"Integrate2",
CellID->1839623139],
- Cell[31107, 1134, 1805, 57, 163, "Output",
- CellTags->"Integrate2",
- CellID->1607309345],
- Cell[32949, 1196, 124, 4, 27, "Input",
+ Cell[34052, 1229, 1777, 56, 139, "Output",
+ CellTags->"Integrate2"],
+ Cell[35866, 1290, 124, 4, 27, "Input",
CellTags->"Integrate2",
CellID->1653791497],
- Cell[33076, 1202, 232, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1825975069],
- Cell[33345, 1214, 704, 24, 77, "Input",
+ Cell[35993, 1296, 212, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[36242, 1307, 704, 24, 78, "Input",
CellTags->"Integrate2",
CellID->1526670238],
- Cell[34052, 1240, 3841, 145, 222, "Output",
- CellTags->"Integrate2",
- CellID->1776776365],
- Cell[37930, 1390, 169, 5, 27, "Input",
+ Cell[36949, 1333, 3820, 144, 194, "Output",
+ CellTags->"Integrate2"],
+ Cell[40806, 1482, 169, 5, 27, "Input",
CellTags->"Integrate2",
CellID->20428829],
- Cell[38102, 1397, 215, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->536196094],
- Cell[38354, 1409, 387, 13, 27, "Input",
+ Cell[40978, 1489, 195, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[41210, 1500, 387, 13, 27, "Input",
CellTags->"Integrate2",
CellID->512808203],
- Cell[38744, 1424, 213, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1332564146],
- Cell[38972, 1434, 158, 5, 32, "Text",
- CellTags->"Integrate2",
- CellID->1160689999],
- Cell[39155, 1443, 165, 5, 27, "Input",
+ Cell[41600, 1515, 192, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[41945, 1531, 302, 9, 29, "Input",
CellTags->"Integrate2",
CellID->18981591],
- Cell[39323, 1450, 7127, 216, 703, "Output",
- CellTags->"Integrate2",
- CellID->1090179756],
- Cell[46487, 1671, 249, 9, 27, "Input",
+ Cell[42250, 1542, 5465, 177, 394, "Output",
+ CellTags->"Integrate2"],
+ Cell[57844, 2051, 249, 9, 27, "Input",
CellTags->"Integrate2",
CellID->182134904],
- Cell[46739, 1682, 32693, 929, 2685, "Output",
- CellTags->"Integrate2",
- CellID->1275810940],
- Cell[79447, 2614, 186, 5, 52, "Text",
- CellTags->"Integrate2",
- CellID->1779842562],
- Cell[79658, 2623, 345, 12, 27, "Input",
+ Cell[58096, 2062, 247, 8, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[58524, 2080, 345, 12, 27, "Input",
CellTags->"Integrate2",
CellID->237838384],
- Cell[80006, 2637, 14506, 408, 1221, "Output",
- CellTags->"Integrate2",
- CellID->115302396],
- Cell[94527, 3048, 146, 5, 27, "Input",
+ Cell[58872, 2094, 247, 8, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[59134, 2105, 146, 5, 27, "Input",
CellTags->"Integrate2",
CellID->1890146765],
- Cell[94698, 3057, 336, 11, 27, "Input",
+ Cell[59305, 2114, 336, 11, 27, "Input",
CellTags->"Integrate2",
CellID->593727658],
- Cell[95037, 3070, 240, 8, 36, "Output",
- CellTags->"Integrate2",
- CellID->592730520],
- Cell[95314, 3083, 345, 12, 31, "Input",
+ Cell[59644, 2127, 220, 7, 37, "Output",
+ CellTags->"Integrate2"],
+ Cell[59901, 2139, 345, 12, 33, "Input",
CellTags->"Integrate2",
CellID->1759046432],
- Cell[95662, 3097, 347, 12, 63, "Output",
- CellTags->"Integrate2",
- CellID->396258688],
- Cell[96046, 3114, 119, 4, 27, "Input",
+ Cell[60249, 2153, 327, 11, 56, "Output",
+ CellTags->"Integrate2"],
+ Cell[60613, 2169, 119, 4, 27, "Input",
CellTags->"Integrate2",
CellID->1795528063],
- Cell[96168, 3120, 231, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->958489189],
- Cell[96436, 3132, 344, 12, 31, "Input",
+ Cell[60735, 2175, 211, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[60983, 2186, 344, 12, 33, "Input",
CellTags->"Integrate2",
CellID->190638847],
- Cell[96783, 3146, 232, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1001542201],
- Cell[97052, 3158, 401, 14, 31, "Input",
+ Cell[61330, 2200, 211, 6, 35, "Output",
+ CellTags->"Integrate2"],
+ Cell[61578, 2211, 401, 14, 33, "Input",
CellTags->"Integrate2",
CellID->1701338238],
- Cell[97456, 3174, 5051, 191, 331, "Output",
- CellTags->"Integrate2",
- CellID->164627498],
- Cell[102875, 3388, 1034, 39, 32, "Text",
- CellTags->"Integrate2",
- CellID->1134437741]}
+ Cell[61982, 2227, 5031, 190, 332, "Output",
+ CellTags->"Integrate2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 106726, 3488},
- {"Integrate2", 106864, 3492}
+ {"PrimaryExamplesSection", 70818, 2534},
+ {"Integrate2", 70956, 2538}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3479, 83, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 1492, 29, 274, "Usage",
+Cell[4064, 106, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4376, 121, 1123, 24, 173, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4410, 111, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5524, 149, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1661719191],
+Cell[6266, 175, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6300, 177, 396, 7, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6745, 190, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1621069730],
+ CellID->1066608491],
Cell[CellGroupData[{
-Cell[4823, 130, 195, 6, 25, "ExampleSection",
- CellID->756384805],
+Cell[7158, 209, 195, 6, 26, "ExampleSection",
+ CellID->656544217],
Cell[CellGroupData[{
-Cell[5043, 140, 443, 16, 27, "Input",
+Cell[7378, 219, 443, 16, 27, "Input",
CellTags->"Integrate2",
CellID->524907050],
-Cell[5489, 158, 463, 17, 62, "Output",
- CellTags->"Integrate2",
- CellID->1871676459]
+Cell[7824, 237, 442, 16, 55, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
-Cell[5967, 178, 211, 7, 52, "Text",
- CellTags->"Integrate2",
- CellID->1563728584],
+Cell[8281, 256, 166, 5, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6203, 189, 299, 10, 27, "Input",
+Cell[8472, 265, 299, 10, 27, "Input",
CellTags->"Integrate2",
CellID->546710902],
-Cell[6505, 201, 337, 11, 36, "Output",
- CellTags->"Integrate2",
- CellID->1681597308]
+Cell[8774, 277, 316, 10, 37, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6879, 217, 293, 10, 27, "Input",
+Cell[9127, 292, 293, 10, 27, "Input",
CellTags->"Integrate2",
CellID->89878903],
-Cell[7175, 229, 451, 16, 63, "Output",
- CellTags->"Integrate2",
- CellID->133418904]
+Cell[9423, 304, 431, 15, 55, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7663, 250, 355, 12, 27, "Input",
+Cell[9891, 324, 355, 12, 27, "Input",
CellTags->"Integrate2",
CellID->1742557754],
-Cell[8021, 264, 682, 24, 66, "Output",
- CellTags->"Integrate2",
- CellID->1994437751]
+Cell[10249, 338, 661, 23, 59, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8740, 293, 336, 11, 27, "Input",
+Cell[10947, 366, 336, 11, 27, "Input",
CellTags->"Integrate2",
CellID->1356840886],
-Cell[9079, 306, 239, 8, 36, "Output",
- CellTags->"Integrate2",
- CellID->809684251]
+Cell[11286, 379, 219, 7, 37, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
-Cell[9333, 317, 1610, 54, 91, "Text",
- CellTags->"Integrate2",
- CellID->1657711161],
+Cell[11520, 389, 1541, 51, 86, "Notes"],
Cell[CellGroupData[{
-Cell[10968, 375, 289, 10, 27, "Input",
+Cell[13086, 444, 289, 10, 27, "Input",
CellTags->"Integrate2",
CellID->1084770727],
-Cell[11260, 387, 212, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1845418056]
+Cell[13378, 456, 191, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
-Cell[11487, 397, 670, 25, 65, "Text",
- CellTags->"Integrate2",
- CellID->1551126642],
+Cell[13584, 465, 625, 23, 67, "Notes"],
Cell[CellGroupData[{
-Cell[12182, 426, 336, 11, 27, "Input",
+Cell[14234, 492, 336, 11, 27, "Input",
CellTags->"Integrate2",
CellID->1725124689],
-Cell[12521, 439, 212, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1834494178]
+Cell[14573, 505, 191, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12770, 451, 405, 14, 27, "Input",
+Cell[14801, 516, 405, 14, 27, "Input",
CellTags->"Integrate2",
CellID->1940746510],
-Cell[13178, 467, 270, 9, 36, "Output",
- CellTags->"Integrate2",
- CellID->1270782167]
+Cell[15209, 532, 249, 8, 37, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13485, 481, 435, 15, 27, "Input",
+Cell[15495, 545, 435, 15, 27, "Input",
CellTags->"Integrate2",
CellID->582396558],
-Cell[13923, 498, 284, 11, 63, "Output",
- CellTags->"Integrate2",
- CellID->710630625]
+Cell[15933, 562, 264, 10, 55, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14244, 514, 347, 12, 27, "Input",
+Cell[16234, 577, 347, 12, 27, "Input",
CellTags->"Integrate2",
CellID->845490247],
-Cell[14594, 528, 266, 10, 36, "Output",
- CellTags->"Integrate2",
- CellID->826875645]
+Cell[16584, 591, 246, 9, 37, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14897, 543, 374, 13, 27, "Input",
+Cell[16867, 605, 374, 13, 27, "Input",
CellTags->"Integrate2",
CellID->1121674397],
-Cell[15274, 558, 417, 15, 63, "Output",
- CellTags->"Integrate2",
- CellID->1360635255]
+Cell[17244, 620, 396, 14, 56, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15728, 578, 333, 11, 27, "Input",
+Cell[17677, 639, 333, 11, 27, "Input",
CellTags->"Integrate2",
CellID->1584122311],
-Cell[16064, 591, 296, 10, 36, "Output",
- CellTags->"Integrate2",
- CellID->1951902872]
+Cell[18013, 652, 275, 9, 37, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16397, 606, 301, 10, 27, "Input",
+Cell[18325, 666, 301, 10, 27, "Input",
CellTags->"Integrate2",
CellID->1907301251],
-Cell[16701, 618, 404, 15, 63, "Output",
- CellTags->"Integrate2",
- CellID->2097277253]
+Cell[18629, 678, 383, 14, 55, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17142, 638, 465, 16, 27, "Input",
+Cell[19049, 697, 465, 16, 27, "Input",
CellTags->"Integrate2",
CellID->1237143526],
-Cell[17610, 656, 594, 21, 68, "Output",
- CellTags->"Integrate2",
- CellID->442263874]
+Cell[19517, 715, 556, 19, 60, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18241, 682, 741, 25, 45, "Input",
+Cell[20110, 739, 741, 25, 45, "Input",
CellTags->"Integrate2",
CellID->2080558124],
-Cell[18985, 709, 4459, 151, 304, "Output",
- CellTags->"Integrate2",
- CellID->747999287]
+Cell[20854, 766, 5608, 188, 372, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23481, 865, 490, 17, 27, "Input",
+Cell[26499, 959, 490, 17, 27, "Input",
CellTags->"Integrate2",
CellID->204763000],
-Cell[23974, 884, 943, 30, 114, "Output",
- CellTags->"Integrate2",
- CellID->112611139]
+Cell[26992, 978, 906, 32, 56, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24954, 919, 587, 20, 69, "Input",
+Cell[27935, 1015, 587, 20, 70, "Input",
CellTags->"Integrate2",
CellID->1234589200],
-Cell[25544, 941, 5361, 181, 264, "Output",
- CellTags->"Integrate2",
- CellID->1666831938]
+Cell[28525, 1037, 5325, 180, 206, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[30942, 1127, 162, 5, 27, "Input",
+Cell[33887, 1222, 162, 5, 27, "Input",
CellTags->"Integrate2",
CellID->1839623139],
-Cell[31107, 1134, 1805, 57, 163, "Output",
- CellTags->"Integrate2",
- CellID->1607309345]
+Cell[34052, 1229, 1777, 56, 139, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[32949, 1196, 124, 4, 27, "Input",
+Cell[35866, 1290, 124, 4, 27, "Input",
CellTags->"Integrate2",
CellID->1653791497],
-Cell[33076, 1202, 232, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1825975069]
+Cell[35993, 1296, 212, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[33345, 1214, 704, 24, 77, "Input",
+Cell[36242, 1307, 704, 24, 78, "Input",
CellTags->"Integrate2",
CellID->1526670238],
-Cell[34052, 1240, 3841, 145, 222, "Output",
- CellTags->"Integrate2",
- CellID->1776776365]
+Cell[36949, 1333, 3820, 144, 194, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[37930, 1390, 169, 5, 27, "Input",
+Cell[40806, 1482, 169, 5, 27, "Input",
CellTags->"Integrate2",
CellID->20428829],
-Cell[38102, 1397, 215, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->536196094]
+Cell[40978, 1489, 195, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[38354, 1409, 387, 13, 27, "Input",
+Cell[41210, 1500, 387, 13, 27, "Input",
CellTags->"Integrate2",
CellID->512808203],
-Cell[38744, 1424, 213, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1332564146]
+Cell[41600, 1515, 192, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
-Cell[38972, 1434, 158, 5, 32, "Text",
- CellTags->"Integrate2",
- CellID->1160689999],
+Cell[41807, 1524, 113, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[39155, 1443, 165, 5, 27, "Input",
+Cell[41945, 1531, 302, 9, 29, "Input",
CellTags->"Integrate2",
CellID->18981591],
-Cell[39323, 1450, 7127, 216, 703, "Output",
- CellTags->"Integrate2",
- CellID->1090179756]
+Cell[42250, 1542, 5465, 177, 394, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[46487, 1671, 249, 9, 27, "Input",
+Cell[47752, 1724, 79, 2, 27, "Input"],
+Cell[47834, 1728, 9973, 318, 605, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[57844, 2051, 249, 9, 27, "Input",
CellTags->"Integrate2",
CellID->182134904],
-Cell[46739, 1682, 32693, 929, 2685, "Output",
- CellTags->"Integrate2",
- CellID->1275810940]
+Cell[58096, 2062, 247, 8, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
-Cell[79447, 2614, 186, 5, 52, "Text",
- CellTags->"Integrate2",
- CellID->1779842562],
+Cell[58358, 2073, 141, 3, 49, "Notes"],
Cell[CellGroupData[{
-Cell[79658, 2623, 345, 12, 27, "Input",
+Cell[58524, 2080, 345, 12, 27, "Input",
CellTags->"Integrate2",
CellID->237838384],
-Cell[80006, 2637, 14506, 408, 1221, "Output",
- CellTags->"Integrate2",
- CellID->115302396]
+Cell[58872, 2094, 247, 8, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
-Cell[94527, 3048, 146, 5, 27, "Input",
+Cell[59134, 2105, 146, 5, 27, "Input",
CellTags->"Integrate2",
CellID->1890146765],
Cell[CellGroupData[{
-Cell[94698, 3057, 336, 11, 27, "Input",
+Cell[59305, 2114, 336, 11, 27, "Input",
CellTags->"Integrate2",
CellID->593727658],
-Cell[95037, 3070, 240, 8, 36, "Output",
- CellTags->"Integrate2",
- CellID->592730520]
+Cell[59644, 2127, 220, 7, 37, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[95314, 3083, 345, 12, 31, "Input",
+Cell[59901, 2139, 345, 12, 33, "Input",
CellTags->"Integrate2",
CellID->1759046432],
-Cell[95662, 3097, 347, 12, 63, "Output",
- CellTags->"Integrate2",
- CellID->396258688]
+Cell[60249, 2153, 327, 11, 56, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[96046, 3114, 119, 4, 27, "Input",
+Cell[60613, 2169, 119, 4, 27, "Input",
CellTags->"Integrate2",
CellID->1795528063],
-Cell[96168, 3120, 231, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->958489189]
+Cell[60735, 2175, 211, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[96436, 3132, 344, 12, 31, "Input",
+Cell[60983, 2186, 344, 12, 33, "Input",
CellTags->"Integrate2",
CellID->190638847],
-Cell[96783, 3146, 232, 7, 36, "Output",
- CellTags->"Integrate2",
- CellID->1001542201]
+Cell[61330, 2200, 211, 6, 35, "Output",
+ CellTags->"Integrate2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[97052, 3158, 401, 14, 31, "Input",
+Cell[61578, 2211, 401, 14, 33, "Input",
CellTags->"Integrate2",
CellID->1701338238],
-Cell[97456, 3174, 5051, 191, 331, "Output",
- CellTags->"Integrate2",
- CellID->164627498]
+Cell[61982, 2227, 5031, 190, 332, "Output",
+ CellTags->"Integrate2"]
}, Open ]]
}, Open ]],
-Cell[102534, 3369, 31, 0, 29, "SectionFooterSpacer"]
+Cell[67040, 2421, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[102602, 3374, 270, 12, 31, "SeeAlsoSection",
+Cell[67108, 2426, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[102875, 3388, 1034, 39, 32, "Text",
- CellTags->"Integrate2",
- CellID->1134437741]
+Cell[67381, 2440, 991, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[103924, 3430, 23, 0, 42, "FooterCell"]
+Cell[68387, 2480, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate3.nb
index 3abdf2bd3..4af11e70b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate3.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16341, 570]
-NotebookOptionsPosition[ 11091, 402]
-NotebookOutlinePosition[ 14563, 501]
-CellTagsIndexPosition[ 14449, 495]
+NotebookDataLength[ 16809, 588]
+NotebookOptionsPosition[ 11957, 438]
+NotebookOutlinePosition[ 15201, 528]
+CellTagsIndexPosition[ 15087, 522]
WindowTitle->Integrate3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Integrate3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Integrate3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Integrate3.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$92705],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Integrate3", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Integrate2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Integrate3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Integrate3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Integrate3.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$170103],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Integrate3", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Integrate3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Integrate3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->6353955],
+ CellID->2140586692],
Cell[CellGroupData[{
@@ -119,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1881561257],
+ CellID->1006211834],
Cell[CellGroupData[{
@@ -142,12 +174,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"m", "+", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{75, 46},
+ ImageSize->{77, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate3",
- CellLabel->"Out[1]=",
- CellID->559999213]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -173,20 +204,25 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"1", ",", "m"}], ")"}]}], "-",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"1", ",", "2", ",", "m"}], ")"}], "-",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"2", ",", "1", ",", "m"}], ")"}], "+",
+ RowBox[{
+ SubscriptBox["S", "1"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ SubscriptBox["S", "12"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}], "-",
+ RowBox[{
+ SubscriptBox["S", "21"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}], "+",
TemplateBox[{"3"},
"Zeta"]}], TraditionalForm]], "Output",
- ImageSize->{564, 35},
+ ImageSize->{251, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate3",
- CellLabel->"Out[2]=",
- CellID->279018012]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -225,12 +261,18 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"1", ",", "m"}], ")"}]}], "-",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"1", ",", "2", ",", "m"}], ")"}], "-",
- RowBox[{"FeynCalc`Integrate3`Private`S", "(",
- RowBox[{"2", ",", "1", ",", "m"}], ")"}], "+",
+ RowBox[{
+ SubscriptBox["S", "1"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ SubscriptBox["S", "12"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}], "-",
+ RowBox[{
+ SubscriptBox["S", "21"], "(",
+ FormBox["m",
+ TraditionalForm], ")"}], "+",
TemplateBox[{"3"},
"Zeta"]}], ")"}]}], "+",
RowBox[{"b", " ",
@@ -283,12 +325,11 @@ Cell[BoxData[
"Zeta"], " ",
RowBox[{"log", "(", "2", ")"}]}]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{553, 145},
+ ImageSize->{397, 106},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate3",
- CellLabel->"Out[3]=",
- CellID->243111463]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -306,12 +347,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate3",
- CellLabel->"Out[4]=",
- CellID->1705014554]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -334,12 +374,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["f", "\[Prime]",
MultilineFunction->None], "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{39, 15},
+ ImageSize->{41, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate3",
- CellLabel->"Out[5]=",
- CellID->929710671]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -358,12 +397,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Integrate3",
- CellLabel->"Out[6]=",
- CellID->64714700]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -393,9 +431,7 @@ Cell[TextData[{
ButtonNote->"Integrate2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Integrate3",
- CellID->622342761]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -412,10 +448,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 38.901293}",
+ "built" -> "{2020, 1, 5, 18, 59, 6.978679}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -425,11 +461,11 @@ TaggingRules->{
is performed in a distributional sense. Integrate3 works more effectively on \
a sum of expressions if they are expanded or collected with respect to the \
integration variable. See the examples in Integrate2.", "synonyms" -> {},
- "title" -> "Integrate3", "titlemodifier" -> "", "windowtitle" ->
- "Integrate3", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Integrate3"},
- "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "Integrate3", "titlemodifier" -> "",
+ "windowtitle" -> "Integrate3", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Integrate3"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -438,7 +474,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -447,131 +483,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3502, 96, 385, 15, 31, "PrimaryExamplesSection",
+ Cell[4499, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->6353955]},
+ CellID->2140586692]},
"Integrate3"->{
- Cell[4133, 125, 298, 10, 31, "Input",
+ Cell[5133, 157, 298, 10, 31, "Input",
CellTags->"Integrate3",
CellID->425224867],
- Cell[4434, 137, 330, 12, 67, "Output",
- CellTags->"Integrate3",
- CellID->559999213],
- Cell[4801, 154, 419, 14, 54, "Input",
+ Cell[5434, 169, 310, 11, 61, "Output",
+ CellTags->"Integrate3"],
+ Cell[5781, 185, 419, 14, 56, "Input",
CellTags->"Integrate3",
CellID->1726046539],
- Cell[5223, 170, 614, 18, 56, "Output",
- CellTags->"Integrate3",
- CellID->279018012],
- Cell[5874, 193, 695, 24, 54, "Input",
+ Cell[6203, 201, 599, 23, 38, "Output",
+ CellTags->"Integrate3"],
+ Cell[6839, 229, 695, 24, 56, "Input",
CellTags->"Integrate3",
CellID->1210488286],
- Cell[6572, 219, 2119, 71, 166, "Output",
- CellTags->"Integrate3",
- CellID->243111463],
- Cell[8728, 295, 284, 9, 27, "Input",
+ Cell[7537, 255, 2122, 76, 127, "Output",
+ CellTags->"Integrate3"],
+ Cell[9696, 336, 284, 9, 27, "Input",
CellTags->"Integrate3",
CellID->757263318],
- Cell[9015, 306, 212, 7, 36, "Output",
- CellTags->"Integrate3",
- CellID->1705014554],
- Cell[9264, 318, 340, 11, 27, "Input",
+ Cell[9983, 347, 191, 6, 35, "Output",
+ CellTags->"Integrate3"],
+ Cell[10211, 358, 340, 11, 27, "Input",
CellTags->"Integrate3",
CellID->818446262],
- Cell[9607, 331, 300, 10, 36, "Output",
- CellTags->"Integrate3",
- CellID->929710671],
- Cell[9944, 346, 289, 10, 27, "Input",
+ Cell[10554, 371, 280, 9, 37, "Output",
+ CellTags->"Integrate3"],
+ Cell[10871, 385, 289, 10, 27, "Input",
CellTags->"Integrate3",
CellID->1567611943],
- Cell[10236, 358, 210, 7, 36, "Output",
- CellTags->"Integrate3",
- CellID->64714700],
- Cell[10814, 388, 235, 9, 32, "Text",
- CellTags->"Integrate3",
- CellID->622342761]}
+ Cell[11163, 397, 191, 6, 35, "Output",
+ CellTags->"Integrate3"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13113, 448},
- {"Integrate3", 13247, 452}
+ {"PrimaryExamplesSection", 13966, 484},
+ {"Integrate3", 14104, 488}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3015, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 584, 14, 112, "Usage",
+Cell[3600, 97, 287, 11, 45, "ObjectNameGrid"],
+Cell[3890, 110, 584, 14, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3502, 96, 385, 15, 31, "PrimaryExamplesSection",
+Cell[4499, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->6353955],
+ CellID->2140586692],
Cell[CellGroupData[{
-Cell[3912, 115, 196, 6, 25, "ExampleSection",
- CellID->1881561257],
+Cell[4912, 147, 196, 6, 26, "ExampleSection",
+ CellID->1006211834],
Cell[CellGroupData[{
-Cell[4133, 125, 298, 10, 31, "Input",
+Cell[5133, 157, 298, 10, 31, "Input",
CellTags->"Integrate3",
CellID->425224867],
-Cell[4434, 137, 330, 12, 67, "Output",
- CellTags->"Integrate3",
- CellID->559999213]
+Cell[5434, 169, 310, 11, 61, "Output",
+ CellTags->"Integrate3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4801, 154, 419, 14, 54, "Input",
+Cell[5781, 185, 419, 14, 56, "Input",
CellTags->"Integrate3",
CellID->1726046539],
-Cell[5223, 170, 614, 18, 56, "Output",
- CellTags->"Integrate3",
- CellID->279018012]
+Cell[6203, 201, 599, 23, 38, "Output",
+ CellTags->"Integrate3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5874, 193, 695, 24, 54, "Input",
+Cell[6839, 229, 695, 24, 56, "Input",
CellTags->"Integrate3",
CellID->1210488286],
-Cell[6572, 219, 2119, 71, 166, "Output",
- CellTags->"Integrate3",
- CellID->243111463]
+Cell[7537, 255, 2122, 76, 127, "Output",
+ CellTags->"Integrate3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8728, 295, 284, 9, 27, "Input",
+Cell[9696, 336, 284, 9, 27, "Input",
CellTags->"Integrate3",
CellID->757263318],
-Cell[9015, 306, 212, 7, 36, "Output",
- CellTags->"Integrate3",
- CellID->1705014554]
+Cell[9983, 347, 191, 6, 35, "Output",
+ CellTags->"Integrate3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9264, 318, 340, 11, 27, "Input",
+Cell[10211, 358, 340, 11, 27, "Input",
CellTags->"Integrate3",
CellID->818446262],
-Cell[9607, 331, 300, 10, 36, "Output",
- CellTags->"Integrate3",
- CellID->929710671]
+Cell[10554, 371, 280, 9, 37, "Output",
+ CellTags->"Integrate3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9944, 346, 289, 10, 27, "Input",
+Cell[10871, 385, 289, 10, 27, "Input",
CellTags->"Integrate3",
CellID->1567611943],
-Cell[10236, 358, 210, 7, 36, "Output",
- CellTags->"Integrate3",
- CellID->64714700]
+Cell[11163, 397, 191, 6, 35, "Output",
+ CellTags->"Integrate3"]
}, Open ]]
}, Open ]],
-Cell[10473, 369, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11381, 407, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10541, 374, 270, 12, 31, "SeeAlsoSection",
+Cell[11449, 412, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10814, 388, 235, 9, 32, "Text",
- CellTags->"Integrate3",
- CellID->622342761]
+Cell[11722, 426, 193, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[11064, 400, 23, 0, 42, "FooterCell"]
+Cell[11930, 436, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate4.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate4.nb
index c142986e0..585c37baf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate4.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate4.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6218, 193]
-NotebookOptionsPosition[ 4004, 127]
-NotebookOutlinePosition[ 5955, 182]
-CellTagsIndexPosition[ 5883, 177]
+NotebookDataLength[ 7056, 214]
+NotebookOptionsPosition[ 5049, 158]
+NotebookOutlinePosition[ 6848, 206]
+CellTagsIndexPosition[ 6805, 203]
WindowTitle->Integrate4
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Integrate4\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Integrate4"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Integrate4.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$93044],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Integrate4", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Integrate2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"], "\<\"Integrate5\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Integrate5"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Integrate4\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Integrate4"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Integrate4.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$170542],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Integrate4", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Integrate4", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Integrate4", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,9 +151,7 @@ Cell[TextData[{
ButtonNote->"Integrate5"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Integrate4",
- CellID->356211384]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -137,21 +168,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 40.544560}",
+ "built" -> "{2020, 1, 5, 18, 59, 8.204284}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Integrate4 is like Integrate5, but interruptable if $VeryVerbose > 2.",
- "synonyms" -> {}, "title" -> "Integrate4", "titlemodifier" -> "",
- "windowtitle" -> "Integrate4", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Integrate4"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Integrate4",
+ "titlemodifier" -> "", "windowtitle" -> "Integrate4", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Integrate4"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -160,41 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Integrate4"->{
- Cell[3562, 107, 400, 15, 70, "Text",
- CellTags->"Integrate4",
- CellID->356211384]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Integrate4", 5770, 170}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3105, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 371, 11, 70, "Usage",
+Cell[3690, 98, 287, 11, 70, "ObjectNameGrid"],
+Cell[3980, 111, 371, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3289, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4376, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3562, 107, 400, 15, 70, "Text",
- CellTags->"Integrate4",
- CellID->356211384]
+Cell[4649, 140, 358, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3977, 125, 23, 0, 70, "FooterCell"]
+Cell[5022, 156, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate5.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate5.nb
index 3dc555484..6ddd4a5d7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate5.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integrate5.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6225, 193]
-NotebookOptionsPosition[ 4009, 127]
-NotebookOutlinePosition[ 5962, 182]
-CellTagsIndexPosition[ 5890, 177]
+NotebookDataLength[ 7063, 214]
+NotebookOptionsPosition[ 5054, 158]
+NotebookOutlinePosition[ 6855, 206]
+CellTagsIndexPosition[ 6812, 203]
WindowTitle->Integrate5
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Integrate5\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Integrate5"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Integrate5.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$93390],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Integrate5", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Integrate2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"], "\<\"Integrate4\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Integrate4"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Integrate5\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Integrate5"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Integrate5.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$170986],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Integrate5", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Integrate5", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Integrate5", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,9 +151,7 @@ Cell[TextData[{
ButtonNote->"Integrate4"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Integrate5",
- CellID->458183738]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -137,21 +168,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 41.854023}",
+ "built" -> "{2020, 1, 5, 18, 59, 9.107369}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Integrate5 is an alternative implementation along the lines of \
-Integrate2.", "synonyms" -> {}, "title" -> "Integrate5", "titlemodifier" ->
- "", "windowtitle" -> "Integrate5", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Integrate5"}},
+Integrate2.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Integrate5",
+ "titlemodifier" -> "", "windowtitle" -> "Integrate5", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Integrate5"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -160,41 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Integrate5"->{
- Cell[3567, 107, 400, 15, 70, "Text",
- CellTags->"Integrate5",
- CellID->458183738]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Integrate5", 5777, 170}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3105, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 376, 11, 70, "Usage",
+Cell[3690, 98, 287, 11, 70, "ObjectNameGrid"],
+Cell[3980, 111, 376, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3294, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4381, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3567, 107, 400, 15, 70, "Text",
- CellTags->"Integrate5",
- CellID->458183738]
+Cell[4654, 140, 358, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3982, 125, 23, 0, 70, "FooterCell"]
+Cell[5027, 156, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegrateByParts.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegrateByParts.nb
index 7946374cc..279ab0dd0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegrateByParts.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntegrateByParts.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9316, 303]
-NotebookOptionsPosition[ 5996, 204]
-NotebookOutlinePosition[ 8563, 274]
-CellTagsIndexPosition[ 8445, 268]
+NotebookDataLength[ 9648, 315]
+NotebookOptionsPosition[ 6332, 217]
+NotebookOutlinePosition[ 8825, 285]
+CellTagsIndexPosition[ 8707, 279]
WindowTitle->IntegrateByParts
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ IntegrateByParts.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$93734],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$171428],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/IntegrateByParts", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ IntegrateByParts.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IntegrateByParts", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IntegrateByParts", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,6 +110,57 @@ integral over t from 0 to 1."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1668615542],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "IntegrateByParts", "]"}]], "Input",
+ CellTags->"IntegrateByParts",
+ CellLabel->"In[89]:=",
+ CellID->1168038147],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Hold", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{95, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"IntegrateByParts",
+ CellLabel->"Out[89]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +176,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1996315664],
+ CellID->532919514],
Cell[CellGroupData[{
@@ -122,81 +186,30 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->584307735],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "IntegrateByParts", "]"}]], "Input",
- CellTags->"IntegrateByParts",
- CellLabel->"In[1]:=",
- CellID->1168038147],
+ CellID->2112475075],
Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Hold", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{104, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"IntegrateByParts",
- CellLabel->"Out[1]=",
- CellID->247717548]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"IntegrateByParts", "[",
- RowBox[{
+ RowBox[{"(*",
+ RowBox[{"IntegrateByParts", "[",
RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "t"}], ")"}], "^",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"a", " ", "Epsilon"}], "-", "1"}], ")"}]}], " ",
+ RowBox[{"g", "[", "t", "]"}]}], ",",
RowBox[{
RowBox[{"(",
RowBox[{"1", "-", "t"}], ")"}], "^",
RowBox[{"(",
RowBox[{
- RowBox[{"a", " ", "Epsilon"}], "-", "1"}], ")"}]}], " ",
- RowBox[{"g", "[", "t", "]"}]}], ",",
- RowBox[{
- RowBox[{"(",
- RowBox[{"1", "-", "t"}], ")"}], "^",
- RowBox[{"(",
- RowBox[{
- RowBox[{"a", " ", "Epsilon"}], "-", "1"}], ")"}]}], ",", "t"}],
- "]"}]], "Input",
+ RowBox[{"a", " ", "Epsilon"}], "-", "1"}], ")"}]}], ",", "t"}], "]"}],
+ "*)"}]], "Input",
CellTags->"IntegrateByParts",
- CellLabel->"In[2]:=",
- CellID->328713984],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"1", "-", "t"}], ")"}],
- RowBox[{"a", " ",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm]}]], " ",
- RowBox[{
- SuperscriptBox["g", "\[Prime]",
- MultilineFunction->None], "(", "t", ")"}]}],
- RowBox[{"a", " ",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm]}]], "+",
- FractionBox[
- RowBox[{"g", "(", "0", ")"}],
- RowBox[{"a", " ",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{158, 44},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"IntegrateByParts",
- CellLabel->"Out[2]=",
- CellID->2082695933]
-}, Open ]]
+ CellLabel->"In[1]:=",
+ CellID->328713984]
}, Open ]]
}, Open ]],
@@ -214,10 +227,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 43.164251}",
+ "built" -> "{2020, 1, 5, 18, 59, 10.136089}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -225,11 +238,12 @@ TaggingRules->{
"None", "summary" ->
"IntegrateByParts[(1 - t)^(a Epsilon -1)g[t], deriv, t] does an \
integration by parts of the definite integral over t from 0 to 1.",
- "synonyms" -> {}, "title" -> "IntegrateByParts", "titlemodifier" -> "",
- "windowtitle" -> "IntegrateByParts", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/IntegrateByParts"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "IntegrateByParts",
+ "titlemodifier" -> "", "windowtitle" -> "IntegrateByParts", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/IntegrateByParts"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -237,8 +251,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -246,65 +261,62 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3514, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1996315664]},
"IntegrateByParts"->{
- Cell[4147, 128, 150, 4, 27, "Input",
+ Cell[4597, 142, 151, 4, 70, "Input",
CellTags->"IntegrateByParts",
CellID->1168038147],
- Cell[4300, 134, 278, 9, 36, "Output",
- CellTags->"IntegrateByParts",
- CellID->247717548],
- Cell[4615, 148, 557, 20, 27, "Input",
+ Cell[4751, 148, 258, 8, 35, "Output",
+ CellTags->"IntegrateByParts"],
+ Cell[5681, 190, 597, 21, 27, "Input",
CellTags->"IntegrateByParts",
- CellID->328713984],
- Cell[5175, 170, 755, 27, 65, "Output",
- CellTags->"IntegrateByParts",
- CellID->2082695933]}
+ CellID->328713984]},
+ "PrimaryExamplesSection"->{
+ Cell[5070, 163, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->532919514]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7892, 248},
- {"IntegrateByParts", 8035, 252}
+ {"IntegrateByParts", 8268, 263},
+ {"PrimaryExamplesSection", 8564, 272}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2277, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2868, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2930, 78, 559, 17, 83, "Usage",
- CellID->982511436],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3514, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1996315664],
+Cell[3215, 91, 559, 17, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3927, 118, 195, 6, 25, "ExampleSection",
- CellID->584307735],
+Cell[3799, 112, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1668615542],
+Cell[4541, 138, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4147, 128, 150, 4, 27, "Input",
+Cell[4597, 142, 151, 4, 70, "Input",
CellTags->"IntegrateByParts",
CellID->1168038147],
-Cell[4300, 134, 278, 9, 36, "Output",
- CellTags->"IntegrateByParts",
- CellID->247717548]
+Cell[4751, 148, 258, 8, 35, "Output",
+ CellTags->"IntegrateByParts"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4615, 148, 557, 20, 27, "Input",
- CellTags->"IntegrateByParts",
- CellID->328713984],
-Cell[5175, 170, 755, 27, 65, "Output",
+Cell[5070, 163, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->532919514],
+Cell[CellGroupData[{
+Cell[5482, 182, 196, 6, 26, "ExampleSection",
+ CellID->2112475075],
+Cell[5681, 190, 597, 21, 27, "Input",
CellTags->"IntegrateByParts",
- CellID->2082695933]
-}, Open ]]
+ CellID->328713984]
}, Open ]]
}, Open ]],
-Cell[5969, 202, 23, 0, 42, "FooterCell"]
+Cell[6305, 215, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integratedx.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integratedx.nb
index 7ba698161..b81662452 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integratedx.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Integratedx.nb
@@ -3,69 +3,101 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7126, 221]
-NotebookOptionsPosition[ 4870, 155]
-NotebookOutlinePosition[ 6860, 210]
-CellTagsIndexPosition[ 6787, 205]
+NotebookDataLength[ 8406, 251]
+NotebookOptionsPosition[ 6362, 195]
+NotebookOutlinePosition[ 8196, 243]
+CellTagsIndexPosition[ 8153, 240]
WindowTitle->Integratedx
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Integratedx\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Integratedx"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynmanParametrize\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynmanParametrize"], "\<\"CalculateCounterTerm\"\
+\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CalculateCounterTerm"], "\<\"TimedIntegrate\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TimedIntegrate"], "\<\"HypergeometricIR\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricIR"], "\<\"HypInt\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypInt"], "\<\"TimedIntegrate\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/TimedIntegrate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Integratedx\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Integratedx"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Integratedx.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$94072],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Integratedx", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$171862],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Integratedx", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +105,18 @@ Integratedx.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Integratedx", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Integratedx", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -146,9 +188,7 @@ Cell[TextData[{
ButtonNote->"TimedIntegrate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Integratedx",
- CellID->2008789767]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -165,21 +205,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 44.634223}",
+ "built" -> "{2020, 1, 5, 18, 59, 11.334975}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Integratedx[x, low, up] is a variable representing the integration \
-operator Integrate[#, {x,low,up}]&.", "synonyms" -> {}, "title" ->
- "Integratedx", "titlemodifier" -> "", "windowtitle" -> "Integratedx",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/Integratedx"}},
+operator Integrate[#, {x,low,up}]&.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Integratedx", "titlemodifier" -> "", "windowtitle" ->
+ "Integratedx", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Integratedx"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -188,41 +228,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Integratedx"->{
- Cell[3682, 111, 1146, 39, 70, "Text",
- CellTags->"Integratedx",
- CellID->2008789767]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Integratedx", 6671, 198}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2257, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3559, 84, 70, "AnchorBarGrid",
CellID->1],
-Cell[2843, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2900, 78, 484, 15, 70, "Usage",
+Cell[4145, 107, 288, 11, 70, "ObjectNameGrid"],
+Cell[4436, 120, 484, 15, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3409, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[4945, 139, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3682, 111, 1146, 39, 70, "Text",
- CellTags->"Integratedx",
- CellID->2008789767]
+Cell[5218, 153, 1102, 37, 70, "SeeAlso"]
}, Open ]],
-Cell[4843, 153, 23, 0, 70, "FooterCell"]
+Cell[6335, 193, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntermediateSubstitutions.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntermediateSubstitutions.nb
index 0ea1be5b2..1eebb8bca 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntermediateSubstitutions.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IntermediateSubstitutions.nb
@@ -3,71 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6436, 191]
-NotebookOptionsPosition[ 4031, 124]
-NotebookOutlinePosition[ 6159, 180]
-CellTagsIndexPosition[ 6072, 175]
+NotebookDataLength[ 7137, 212]
+NotebookOptionsPosition[ 4977, 154]
+NotebookOutlinePosition[ 6930, 204]
+CellTagsIndexPosition[ 6887, 201]
WindowTitle->IntermediateSubstitutions
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/IntermediateSubstitutions\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IntermediateSubstitutions"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/IntermediateSubstitutions\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IntermediateSubstitutions"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IntermediateSubstitutions.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$94421],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IntermediateSubstitutions", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$172309],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IntermediateSubstitutions", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -75,15 +97,25 @@ IntermediateSubstitutions.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IntermediateSubstitutions", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IntermediateSubstitutions", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["IntermediateSubstitutions"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for OneLoop. All substitutions indicated hereby are done \
-at an intermediate stage of the calculation."
+ " \[LineSeparator]is an option of various FeynCalc functions. All \
+substitutions indicated hereby are done at an intermediate stage of the \
+calculation."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -115,9 +147,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IntermediateSubstitutions",
- CellID->294086386]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -134,22 +164,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 45.965093}",
+ "built" -> "{2020, 1, 5, 18, 59, 12.203439}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "IntermediateSubstitutions is an option for OneLoop. All substitutions \
-indicated hereby are done at an intermediate stage of the calculation.",
- "synonyms" -> {}, "title" -> "IntermediateSubstitutions", "titlemodifier" ->
- "", "windowtitle" -> "IntermediateSubstitutions", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/IntermediateSubstitutions"}},
+ "IntermediateSubstitutions is an option of various FeynCalc functions. \
+All substitutions indicated hereby are done at an intermediate stage of the \
+calculation.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "IntermediateSubstitutions", "titlemodifier" -> "", "windowtitle" ->
+ "IntermediateSubstitutions", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/IntermediateSubstitutions"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -158,41 +189,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IntermediateSubstitutions"->{
- Cell[3748, 110, 241, 9, 70, "Text",
- CellTags->"IntermediateSubstitutions",
- CellID->294086386]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IntermediateSubstitutions", 5945, 168}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[597, 21, 2335, 54, 70, "AnchorBarGrid",
+Cell[597, 21, 3093, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2935, 77, 68, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[3006, 80, 444, 12, 70, "Usage",
+Cell[3693, 99, 302, 11, 70, "ObjectNameGrid"],
+Cell[3998, 112, 455, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3475, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4478, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3748, 110, 241, 9, 70, "Text",
- CellTags->"IntermediateSubstitutions",
- CellID->294086386]
+Cell[4751, 142, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4004, 122, 23, 0, 70, "FooterCell"]
+Cell[4950, 152, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InverseMellin.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InverseMellin.nb
index 239459dd0..81bd6d62c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/InverseMellin.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/InverseMellin.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 43930, 1644]
-NotebookOptionsPosition[ 30662, 1201]
-NotebookOutlinePosition[ 38007, 1421]
-CellTagsIndexPosition[ 37888, 1415]
+NotebookDataLength[ 43021, 1581]
+NotebookOptionsPosition[ 31296, 1205]
+NotebookOutlinePosition[ 37803, 1391]
+CellTagsIndexPosition[ 37684, 1385]
WindowTitle->InverseMellin
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/InverseMellin\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/InverseMellin"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DeltaFunction\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeltaFunction"], "\<\"Integrate2\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"], "\<\"OPEm\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPEi"], "\<\"SumS\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SumS"], "\<\"SumT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SumT"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/InverseMellin\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/InverseMellin"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
InverseMellin.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$94772],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/InverseMellin", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$172758],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/InverseMellin", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ InverseMellin.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["InverseMellin", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["InverseMellin", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,7 +157,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->52251695],
+ CellID->1264895552],
Cell[CellGroupData[{
@@ -129,7 +167,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->504434841],
+ CellID->1623030332],
Cell[CellGroupData[{
@@ -145,12 +183,11 @@ Cell[BoxData[
FormBox[
SuperscriptBox["y",
RowBox[{"m", "-", "1"}]], TraditionalForm]], "Output",
- ImageSize->{41, 18},
+ ImageSize->{43, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[1]=",
- CellID->883502595]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -169,12 +206,11 @@ Cell[BoxData[
FormBox[
SuperscriptBox["y",
RowBox[{"m", "+", "2"}]], TraditionalForm]], "Output",
- ImageSize->{41, 18},
+ ImageSize->{44, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[2]=",
- CellID->886851930]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -195,12 +231,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "y"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{97, 18},
+ ImageSize->{102, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[3]=",
- CellID->933445894]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -224,12 +259,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "3"], "(", "y", ")"}]}], TraditionalForm]], "Output",\
- ImageSize->{118, 41},
+ ImageSize->{124, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[4]=",
- CellID->321524707]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -255,12 +289,11 @@ Cell[BoxData[
TraditionalForm], ")"}]}], "+",
SuperscriptBox["y",
RowBox[{"m", "-", "1"}]]}], TraditionalForm]], "Output",
- ImageSize->{149, 18},
+ ImageSize->{157, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[5]=",
- CellID->306464887]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -287,19 +320,16 @@ Cell[BoxData[
TraditionalForm], ")"}]}], "+",
SuperscriptBox["y",
RowBox[{"i", "-", "1"}]]}], TraditionalForm]], "Output",
- ImageSize->{133, 19},
+ ImageSize->{149, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[6]=",
- CellID->908783993]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell["\<\
The inverse operation to InverseMellin is done by Integrate2.\
-\>", "Text",
- CellTags->"InverseMellin",
- CellID->823482436],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -318,19 +348,16 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["1", "m"], TraditionalForm]], "Output",
- ImageSize->{23, 41},
+ ImageSize->{23, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[7]=",
- CellID->575593932]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell["\<\
Below is a list of all built-in basic inverse Mellin transforms .\
-\>", "Text",
- CellTags->"InverseMellin",
- CellID->1975947579],
+\>", "Notes"],
Cell[BoxData[
RowBox[{
@@ -469,12 +496,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(", "y", ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{171, 43},
+ ImageSize->{176, 37},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[10]=",
- CellID->808010767]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -499,12 +525,11 @@ Cell[BoxData[
SuperscriptBox["y",
RowBox[{"m", "-", "1"}]]}], " ",
RowBox[{"log", "(", "y", ")"}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{159, 43},
+ ImageSize->{162, 37},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[11]=",
- CellID->1524372587]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -541,19 +566,13 @@ Cell[BoxData[
RowBox[{"1", "-", "y"}]], ")"}], "+"], " ",
SuperscriptBox["y",
RowBox[{"m", "-", "1"}]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{327, 44},
+ ImageSize->{338, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[12]=",
- CellID->1429383971]
+ CellLabel->"Out[12]="]
}, Open ]],
-Cell[BoxData[" "], "Input",
- CellTags->"InverseMellin",
- CellLabel->"In[13]:=",
- CellID->558376463],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -562,7 +581,7 @@ Cell[BoxData[
RowBox[{"1", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[14]:=",
+ CellLabel->"In[13]:=",
CellID->209318413],
Cell[BoxData[
@@ -584,12 +603,11 @@ Cell[BoxData[
SuperscriptBox["y",
RowBox[{"m", "-", "1"}]]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{224, 44},
+ ImageSize->{232, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[14]=",
- CellID->412047871]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -603,7 +621,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"OPEm", "-", "1"}], ")"}]}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[15]:=",
+ CellLabel->"In[14]:=",
CellID->108977754],
Cell[BoxData[
@@ -623,12 +641,11 @@ Cell[BoxData[
RowBox[{"m", "-", "2"}]]}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "y"}], ")"}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{222, 42},
+ ImageSize->{228, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[15]=",
- CellID->416733591]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
@@ -642,7 +659,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"OPEm", "+", "1"}], ")"}]}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[16]:=",
+ CellLabel->"In[15]:=",
CellID->1588128285],
Cell[BoxData[
@@ -669,12 +686,11 @@ Cell[BoxData[
SuperscriptBox["y", "m"], " ",
RowBox[{"log", "(", "y", ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
- ImageSize->{379, 42},
+ ImageSize->{397, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[16]=",
- CellID->1157098436]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
@@ -688,7 +704,7 @@ Cell[BoxData[
RowBox[{"-", "1"}], "+", "OPEm"}]}], "]"}], "/",
RowBox[{"OPEm", "^", "2"}]}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[17]:=",
+ CellLabel->"In[16]:=",
CellID->1038982726],
Cell[BoxData[
@@ -715,12 +731,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(", "y", ")"}]}]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{329, 44},
+ ImageSize->{339, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[17]=",
- CellID->408982504]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
@@ -734,7 +749,7 @@ Cell[BoxData[
RowBox[{"-", "1"}], "+", "OPEm"}]}], "]"}], "/", "OPEm"}],
"]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[18]:=",
+ CellLabel->"In[17]:=",
CellID->1975519554],
Cell[BoxData[
@@ -756,12 +771,11 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"1", "-", "y"}], ")"}]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{282, 42},
+ ImageSize->{288, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[18]=",
- CellID->2023526209]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
@@ -776,7 +790,7 @@ Cell[BoxData[
RowBox[{"-", "1"}], "+", "OPEm"}]}], "]"}], "^", "2"}], "/", "OPEm"}],
"]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[19]:=",
+ CellLabel->"In[18]:=",
CellID->1312317430],
Cell[BoxData[
@@ -809,12 +823,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(", "y", ")"}], "2"]}], ")"}]}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{517, 48},
+ ImageSize->{540, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[19]=",
- CellID->1387073931]
+ CellLabel->"Out[18]="]
}, Open ]],
Cell[CellGroupData[{
@@ -825,7 +838,7 @@ Cell[BoxData[
RowBox[{"2", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[20]:=",
+ CellLabel->"In[19]:=",
CellID->1086751012],
Cell[BoxData[
@@ -852,12 +865,11 @@ Cell[BoxData[
RowBox[{"log", "(", "y", ")"}],
RowBox[{"1", "-", "y"}]]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{307, 45},
+ ImageSize->{315, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[20]=",
- CellID->229974260]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[CellGroupData[{
@@ -869,7 +881,7 @@ Cell[BoxData[
RowBox[{"2", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "/", "OPEm"}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[21]:=",
+ CellLabel->"In[20]:=",
CellID->410476681],
Cell[BoxData[
@@ -895,12 +907,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(", "y", ")"}]}]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{351, 44},
+ ImageSize->{363, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[21]=",
- CellID->1435522619]
+ CellLabel->"Out[20]="]
}, Open ]],
Cell[CellGroupData[{
@@ -911,7 +922,7 @@ Cell[BoxData[
RowBox[{"3", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[22]:=",
+ CellLabel->"In[21]:=",
CellID->1961481381],
Cell[BoxData[
@@ -942,12 +953,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"1", "-", "y"}], ")"}]}]]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{318, 49},
+ ImageSize->{329, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[22]=",
- CellID->1258335869]
+ CellLabel->"Out[21]="]
}, Open ]],
Cell[CellGroupData[{
@@ -958,7 +968,7 @@ Cell[BoxData[
RowBox[{"1", ",", "1", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[23]:=",
+ CellLabel->"In[22]:=",
CellID->617286063],
Cell[BoxData[
@@ -980,12 +990,11 @@ Cell[BoxData[
RowBox[{"1", "-", "y"}], ")"}],
RowBox[{"1", "-", "y"}]], ")"}], "+"]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{240, 45},
+ ImageSize->{246, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[23]=",
- CellID->1509334069]
+ CellLabel->"Out[22]="]
}, Open ]],
Cell[CellGroupData[{
@@ -997,7 +1006,7 @@ Cell[BoxData[
RowBox[{"1", ",", "2", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[24]:=",
+ CellLabel->"In[23]:=",
CellID->1098001734],
Cell[BoxData[
@@ -1032,12 +1041,11 @@ Cell[BoxData[
RowBox[{"1", "-", "y"}],
TraditionalForm], ")"}]}]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{440, 46},
+ ImageSize->{453, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[24]=",
- CellID->1548339288]
+ CellLabel->"Out[23]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1049,7 +1057,7 @@ Cell[BoxData[
RowBox[{"2", ",", "1", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[25]:=",
+ CellLabel->"In[24]:=",
CellID->1981996384],
Cell[BoxData[
@@ -1084,12 +1092,11 @@ Cell[BoxData[
RowBox[{"1", "-", "y"}],
TraditionalForm], ")"}]}]}], ")"}]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{429, 46},
+ ImageSize->{443, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[25]=",
- CellID->422280001]
+ CellLabel->"Out[24]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1100,7 +1107,7 @@ Cell[BoxData[
RowBox[{"1", ",", "1", ",", "1", ",",
RowBox[{"OPEm", "-", "1"}]}], "]"}], "]"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[26]:=",
+ CellLabel->"In[25]:=",
CellID->371125491],
Cell[BoxData[
@@ -1125,12 +1132,11 @@ Cell[BoxData[
RowBox[{"1", "-", "y"}], ")"}],
RowBox[{"1", "-", "y"}]], ")"}], "+"]}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{277, 49},
+ ImageSize->{285, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"InverseMellin",
- CellLabel->"Out[26]=",
- CellID->1490949014]
+ CellLabel->"Out[25]="]
}, Open ]],
Cell[BoxData[
@@ -1138,7 +1144,7 @@ Cell[BoxData[
RowBox[{"Clear", "[",
RowBox[{"im", ",", "list"}], "]"}], ";"}]], "Input",
CellTags->"InverseMellin",
- CellLabel->"In[27]:=",
+ CellLabel->"In[26]:=",
CellID->941829466]
}, Open ]],
@@ -1192,9 +1198,7 @@ Cell[TextData[{
ButtonNote->"SumT"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"InverseMellin",
- CellID->344948900]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1202,7 +1206,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"InverseMellin",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1211,10 +1215,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 47.413513}",
+ "built" -> "{2020, 1, 5, 18, 59, 13.376294}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1224,12 +1228,12 @@ TaggingRules->{
polynomials in OPEm. The inverse transforms are not calculated but a \
table-lookup is done. WARNING: do not \"trust\" the results for the inverse \
Mellin transform involving SumT's; there is an unresolved inconsistency here \
-(related to (-1)^m).", "synonyms" -> {}, "title" -> "InverseMellin",
- "titlemodifier" -> "", "windowtitle" -> "InverseMellin", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/InverseMellin"}, "SearchTextTranslated" ->
- ""},
+(related to (-1)^m).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "InverseMellin", "titlemodifier" -> "", "windowtitle" -> "InverseMellin",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/InverseMellin"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1237,8 +1241,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1247,405 +1252,337 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3802, 106, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[5144, 144, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->52251695]},
+ CellID->1264895552]},
"InverseMellin"->{
- Cell[4433, 135, 188, 6, 27, "Input",
+ Cell[5778, 173, 188, 6, 27, "Input",
CellTags->"InverseMellin",
CellID->1487905241],
- Cell[4624, 143, 262, 9, 39, "Output",
- CellTags->"InverseMellin",
- CellID->883502595],
- Cell[4923, 157, 239, 8, 27, "Input",
+ Cell[5969, 181, 242, 8, 40, "Output",
+ CellTags->"InverseMellin"],
+ Cell[6248, 194, 239, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->1769575859],
- Cell[5165, 167, 262, 9, 39, "Output",
- CellTags->"InverseMellin",
- CellID->886851930],
- Cell[5464, 181, 160, 5, 27, "Input",
+ Cell[6490, 204, 242, 8, 39, "Output",
+ CellTags->"InverseMellin"],
+ Cell[6769, 217, 160, 5, 27, "Input",
CellTags->"InverseMellin",
CellID->795107064],
- Cell[5627, 188, 385, 14, 39, "Output",
- CellTags->"InverseMellin",
- CellID->933445894],
- Cell[6049, 207, 213, 7, 27, "Input",
+ Cell[6932, 224, 366, 13, 40, "Output",
+ CellTags->"InverseMellin"],
+ Cell[7335, 242, 213, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1138973234],
- Cell[6265, 216, 399, 15, 62, "Output",
- CellTags->"InverseMellin",
- CellID->321524707],
- Cell[6701, 236, 212, 7, 27, "Input",
+ Cell[7551, 251, 379, 14, 56, "Output",
+ CellTags->"InverseMellin"],
+ Cell[7967, 270, 212, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->634260831],
- Cell[6916, 245, 466, 17, 39, "Output",
- CellTags->"InverseMellin",
- CellID->306464887],
- Cell[7419, 267, 221, 8, 27, "Input",
+ Cell[8182, 279, 446, 16, 40, "Output",
+ CellTags->"InverseMellin"],
+ Cell[8665, 300, 221, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->323775439],
- Cell[7643, 277, 466, 17, 40, "Output",
- CellTags->"InverseMellin",
- CellID->908783993],
- Cell[8124, 297, 133, 4, 32, "Text",
- CellTags->"InverseMellin",
- CellID->823482436],
- Cell[8282, 305, 312, 10, 27, "Input",
+ Cell[8889, 310, 446, 16, 40, "Output",
+ CellTags->"InverseMellin"],
+ Cell[9461, 335, 312, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1105681850],
- Cell[8597, 317, 235, 8, 62, "Output",
- CellTags->"InverseMellin",
- CellID->575593932],
- Cell[8847, 328, 138, 4, 31, "Text",
- CellTags->"InverseMellin",
- CellID->1975947579],
- Cell[8988, 334, 3149, 101, 233, "Input",
+ Cell[9776, 347, 215, 7, 56, "Output",
+ CellTags->"InverseMellin"],
+ Cell[10099, 361, 3149, 101, 243, "Input",
CellTags->"InverseMellin",
CellID->988000997],
- Cell[12140, 437, 261, 8, 29, "Input",
+ Cell[13251, 464, 261, 8, 29, "Input",
CellTags->"InverseMellin",
CellID->478330132],
- Cell[12426, 449, 198, 7, 27, "Input",
+ Cell[13537, 476, 198, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1863843750],
- Cell[12627, 458, 504, 18, 64, "Output",
- CellTags->"InverseMellin",
- CellID->808010767],
- Cell[13168, 481, 198, 7, 27, "Input",
+ Cell[13738, 485, 484, 17, 58, "Output",
+ CellTags->"InverseMellin"],
+ Cell[14259, 507, 198, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1662530554],
- Cell[13369, 490, 463, 16, 64, "Output",
- CellTags->"InverseMellin",
- CellID->1524372587],
- Cell[13869, 511, 191, 6, 27, "Input",
+ Cell[14460, 516, 442, 15, 58, "Output",
+ CellTags->"InverseMellin"],
+ Cell[14939, 536, 191, 6, 27, "Input",
CellTags->"InverseMellin",
CellID->1349819643],
- Cell[14063, 519, 833, 29, 65, "Output",
- CellTags->"InverseMellin",
- CellID->1429383971],
- Cell[14911, 551, 99, 3, 27, "Input",
- CellTags->"InverseMellin",
- CellID->558376463],
- Cell[15035, 558, 210, 7, 27, "Input",
+ Cell[15133, 544, 812, 28, 61, "Output",
+ CellTags->"InverseMellin"],
+ Cell[15982, 577, 210, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->209318413],
- Cell[15248, 567, 635, 24, 65, "Output",
- CellTags->"InverseMellin",
- CellID->412047871],
- Cell[15920, 596, 288, 10, 27, "Input",
+ Cell[16195, 586, 615, 23, 61, "Output",
+ CellTags->"InverseMellin"],
+ Cell[16847, 614, 288, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->108977754],
- Cell[16211, 608, 608, 22, 63, "Output",
- CellTags->"InverseMellin",
- CellID->416733591],
- Cell[16856, 635, 289, 10, 27, "Input",
+ Cell[17138, 626, 588, 21, 57, "Output",
+ CellTags->"InverseMellin"],
+ Cell[17763, 652, 289, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1588128285],
- Cell[17148, 647, 802, 29, 63, "Output",
- CellTags->"InverseMellin",
- CellID->1157098436],
- Cell[17987, 681, 286, 10, 27, "Input",
+ Cell[18055, 664, 781, 28, 57, "Output",
+ CellTags->"InverseMellin"],
+ Cell[18873, 697, 286, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1038982726],
- Cell[18276, 693, 799, 29, 65, "Output",
- CellTags->"InverseMellin",
- CellID->408982504],
- Cell[19112, 727, 265, 10, 27, "Input",
+ Cell[19162, 709, 779, 28, 57, "Output",
+ CellTags->"InverseMellin"],
+ Cell[19978, 742, 265, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1975519554],
- Cell[19380, 739, 656, 24, 63, "Output",
- CellTags->"InverseMellin",
- CellID->2023526209],
- Cell[20073, 768, 293, 11, 27, "Input",
+ Cell[20246, 754, 635, 23, 57, "Output",
+ CellTags->"InverseMellin"],
+ Cell[20918, 782, 293, 11, 27, "Input",
CellTags->"InverseMellin",
CellID->1312317430],
- Cell[20369, 781, 1021, 35, 69, "Output",
- CellTags->"InverseMellin",
- CellID->1387073931],
- Cell[21427, 821, 211, 7, 27, "Input",
+ Cell[21214, 795, 1000, 34, 61, "Output",
+ CellTags->"InverseMellin"],
+ Cell[22251, 834, 211, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1086751012],
- Cell[21641, 830, 806, 29, 66, "Output",
- CellTags->"InverseMellin",
- CellID->229974260],
- Cell[22484, 864, 239, 8, 27, "Input",
+ Cell[22465, 843, 786, 28, 59, "Output",
+ CellTags->"InverseMellin"],
+ Cell[23288, 876, 239, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->410476681],
- Cell[22726, 874, 794, 28, 65, "Output",
- CellTags->"InverseMellin",
- CellID->1435522619],
- Cell[23557, 907, 211, 7, 27, "Input",
+ Cell[23530, 886, 773, 27, 57, "Output",
+ CellTags->"InverseMellin"],
+ Cell[24340, 918, 211, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1961481381],
- Cell[23771, 916, 900, 33, 70, "Output",
- CellTags->"InverseMellin",
- CellID->1258335869],
- Cell[24708, 954, 220, 7, 27, "Input",
+ Cell[24554, 927, 879, 32, 62, "Output",
+ CellTags->"InverseMellin"],
+ Cell[25470, 964, 220, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->617286063],
- Cell[24931, 963, 651, 24, 66, "Output",
- CellTags->"InverseMellin",
- CellID->1509334069],
- Cell[25619, 992, 242, 8, 27, "Input",
+ Cell[25693, 973, 630, 23, 61, "Output",
+ CellTags->"InverseMellin"],
+ Cell[26360, 1001, 242, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->1098001734],
- Cell[25864, 1002, 1038, 37, 67, "Output",
- CellTags->"InverseMellin",
- CellID->1548339288],
- Cell[26939, 1044, 242, 8, 27, "Input",
+ Cell[26605, 1011, 1017, 36, 61, "Output",
+ CellTags->"InverseMellin"],
+ Cell[27659, 1052, 242, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->1981996384],
- Cell[27184, 1054, 1027, 37, 67, "Output",
- CellTags->"InverseMellin",
- CellID->422280001],
- Cell[28248, 1096, 230, 7, 27, "Input",
+ Cell[27904, 1062, 1007, 36, 61, "Output",
+ CellTags->"InverseMellin"],
+ Cell[28948, 1103, 230, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->371125491],
- Cell[28481, 1105, 739, 27, 70, "Output",
- CellTags->"InverseMellin",
- CellID->1490949014],
- Cell[29235, 1135, 176, 6, 27, "Input",
- CellTags->"InverseMellin",
- CellID->941829466],
- Cell[29767, 1163, 853, 33, 32, "Text",
+ Cell[29181, 1112, 718, 26, 65, "Output",
+ CellTags->"InverseMellin"],
+ Cell[29914, 1141, 176, 6, 27, "Input",
CellTags->"InverseMellin",
- CellID->344948900]}
+ CellID->941829466]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 32727, 1248},
- {"InverseMellin", 32866, 1252}
+ {"PrimaryExamplesSection", 33404, 1253},
+ {"InverseMellin", 33545, 1257}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2265, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3373, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2853, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2912, 78, 865, 24, 116, "Usage",
+Cell[3961, 103, 290, 11, 45, "ObjectNameGrid"],
+Cell[4254, 116, 865, 24, 120, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3802, 106, 386, 15, 31, "PrimaryExamplesSection",
+Cell[5144, 144, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->52251695],
+ CellID->1264895552],
Cell[CellGroupData[{
-Cell[4213, 125, 195, 6, 25, "ExampleSection",
- CellID->504434841],
+Cell[5557, 163, 196, 6, 26, "ExampleSection",
+ CellID->1623030332],
Cell[CellGroupData[{
-Cell[4433, 135, 188, 6, 27, "Input",
+Cell[5778, 173, 188, 6, 27, "Input",
CellTags->"InverseMellin",
CellID->1487905241],
-Cell[4624, 143, 262, 9, 39, "Output",
- CellTags->"InverseMellin",
- CellID->883502595]
+Cell[5969, 181, 242, 8, 40, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4923, 157, 239, 8, 27, "Input",
+Cell[6248, 194, 239, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->1769575859],
-Cell[5165, 167, 262, 9, 39, "Output",
- CellTags->"InverseMellin",
- CellID->886851930]
+Cell[6490, 204, 242, 8, 39, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5464, 181, 160, 5, 27, "Input",
+Cell[6769, 217, 160, 5, 27, "Input",
CellTags->"InverseMellin",
CellID->795107064],
-Cell[5627, 188, 385, 14, 39, "Output",
- CellTags->"InverseMellin",
- CellID->933445894]
+Cell[6932, 224, 366, 13, 40, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6049, 207, 213, 7, 27, "Input",
+Cell[7335, 242, 213, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1138973234],
-Cell[6265, 216, 399, 15, 62, "Output",
- CellTags->"InverseMellin",
- CellID->321524707]
+Cell[7551, 251, 379, 14, 56, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6701, 236, 212, 7, 27, "Input",
+Cell[7967, 270, 212, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->634260831],
-Cell[6916, 245, 466, 17, 39, "Output",
- CellTags->"InverseMellin",
- CellID->306464887]
+Cell[8182, 279, 446, 16, 40, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7419, 267, 221, 8, 27, "Input",
+Cell[8665, 300, 221, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->323775439],
-Cell[7643, 277, 466, 17, 40, "Output",
- CellTags->"InverseMellin",
- CellID->908783993]
+Cell[8889, 310, 446, 16, 40, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
-Cell[8124, 297, 133, 4, 32, "Text",
- CellTags->"InverseMellin",
- CellID->823482436],
+Cell[9350, 329, 86, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[8282, 305, 312, 10, 27, "Input",
+Cell[9461, 335, 312, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1105681850],
-Cell[8597, 317, 235, 8, 62, "Output",
- CellTags->"InverseMellin",
- CellID->575593932]
+Cell[9776, 347, 215, 7, 56, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
-Cell[8847, 328, 138, 4, 31, "Text",
- CellTags->"InverseMellin",
- CellID->1975947579],
-Cell[8988, 334, 3149, 101, 233, "Input",
+Cell[10006, 357, 90, 2, 32, "Notes"],
+Cell[10099, 361, 3149, 101, 243, "Input",
CellTags->"InverseMellin",
CellID->988000997],
-Cell[12140, 437, 261, 8, 29, "Input",
+Cell[13251, 464, 261, 8, 29, "Input",
CellTags->"InverseMellin",
CellID->478330132],
Cell[CellGroupData[{
-Cell[12426, 449, 198, 7, 27, "Input",
+Cell[13537, 476, 198, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1863843750],
-Cell[12627, 458, 504, 18, 64, "Output",
- CellTags->"InverseMellin",
- CellID->808010767]
+Cell[13738, 485, 484, 17, 58, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13168, 481, 198, 7, 27, "Input",
+Cell[14259, 507, 198, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1662530554],
-Cell[13369, 490, 463, 16, 64, "Output",
- CellTags->"InverseMellin",
- CellID->1524372587]
+Cell[14460, 516, 442, 15, 58, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13869, 511, 191, 6, 27, "Input",
+Cell[14939, 536, 191, 6, 27, "Input",
CellTags->"InverseMellin",
CellID->1349819643],
-Cell[14063, 519, 833, 29, 65, "Output",
- CellTags->"InverseMellin",
- CellID->1429383971]
+Cell[15133, 544, 812, 28, 61, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
-Cell[14911, 551, 99, 3, 27, "Input",
- CellTags->"InverseMellin",
- CellID->558376463],
Cell[CellGroupData[{
-Cell[15035, 558, 210, 7, 27, "Input",
+Cell[15982, 577, 210, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->209318413],
-Cell[15248, 567, 635, 24, 65, "Output",
- CellTags->"InverseMellin",
- CellID->412047871]
+Cell[16195, 586, 615, 23, 61, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15920, 596, 288, 10, 27, "Input",
+Cell[16847, 614, 288, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->108977754],
-Cell[16211, 608, 608, 22, 63, "Output",
- CellTags->"InverseMellin",
- CellID->416733591]
+Cell[17138, 626, 588, 21, 57, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16856, 635, 289, 10, 27, "Input",
+Cell[17763, 652, 289, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1588128285],
-Cell[17148, 647, 802, 29, 63, "Output",
- CellTags->"InverseMellin",
- CellID->1157098436]
+Cell[18055, 664, 781, 28, 57, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17987, 681, 286, 10, 27, "Input",
+Cell[18873, 697, 286, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1038982726],
-Cell[18276, 693, 799, 29, 65, "Output",
- CellTags->"InverseMellin",
- CellID->408982504]
+Cell[19162, 709, 779, 28, 57, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19112, 727, 265, 10, 27, "Input",
+Cell[19978, 742, 265, 10, 27, "Input",
CellTags->"InverseMellin",
CellID->1975519554],
-Cell[19380, 739, 656, 24, 63, "Output",
- CellTags->"InverseMellin",
- CellID->2023526209]
+Cell[20246, 754, 635, 23, 57, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20073, 768, 293, 11, 27, "Input",
+Cell[20918, 782, 293, 11, 27, "Input",
CellTags->"InverseMellin",
CellID->1312317430],
-Cell[20369, 781, 1021, 35, 69, "Output",
- CellTags->"InverseMellin",
- CellID->1387073931]
+Cell[21214, 795, 1000, 34, 61, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21427, 821, 211, 7, 27, "Input",
+Cell[22251, 834, 211, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1086751012],
-Cell[21641, 830, 806, 29, 66, "Output",
- CellTags->"InverseMellin",
- CellID->229974260]
+Cell[22465, 843, 786, 28, 59, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[22484, 864, 239, 8, 27, "Input",
+Cell[23288, 876, 239, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->410476681],
-Cell[22726, 874, 794, 28, 65, "Output",
- CellTags->"InverseMellin",
- CellID->1435522619]
+Cell[23530, 886, 773, 27, 57, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23557, 907, 211, 7, 27, "Input",
+Cell[24340, 918, 211, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->1961481381],
-Cell[23771, 916, 900, 33, 70, "Output",
- CellTags->"InverseMellin",
- CellID->1258335869]
+Cell[24554, 927, 879, 32, 62, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24708, 954, 220, 7, 27, "Input",
+Cell[25470, 964, 220, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->617286063],
-Cell[24931, 963, 651, 24, 66, "Output",
- CellTags->"InverseMellin",
- CellID->1509334069]
+Cell[25693, 973, 630, 23, 61, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25619, 992, 242, 8, 27, "Input",
+Cell[26360, 1001, 242, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->1098001734],
-Cell[25864, 1002, 1038, 37, 67, "Output",
- CellTags->"InverseMellin",
- CellID->1548339288]
+Cell[26605, 1011, 1017, 36, 61, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[26939, 1044, 242, 8, 27, "Input",
+Cell[27659, 1052, 242, 8, 27, "Input",
CellTags->"InverseMellin",
CellID->1981996384],
-Cell[27184, 1054, 1027, 37, 67, "Output",
- CellTags->"InverseMellin",
- CellID->422280001]
+Cell[27904, 1062, 1007, 36, 61, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[28248, 1096, 230, 7, 27, "Input",
+Cell[28948, 1103, 230, 7, 27, "Input",
CellTags->"InverseMellin",
CellID->371125491],
-Cell[28481, 1105, 739, 27, 70, "Output",
- CellTags->"InverseMellin",
- CellID->1490949014]
+Cell[29181, 1112, 718, 26, 65, "Output",
+ CellTags->"InverseMellin"]
}, Open ]],
-Cell[29235, 1135, 176, 6, 27, "Input",
+Cell[29914, 1141, 176, 6, 27, "Input",
CellTags->"InverseMellin",
CellID->941829466]
}, Open ]],
-Cell[29426, 1144, 31, 0, 29, "SectionFooterSpacer"]
+Cell[30105, 1150, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[29494, 1149, 270, 12, 31, "SeeAlsoSection",
+Cell[30173, 1155, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[29767, 1163, 853, 33, 32, "Text",
- CellTags->"InverseMellin",
- CellID->344948900]
+Cell[30446, 1169, 808, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[30635, 1199, 23, 0, 42, "FooterCell"]
+Cell[31269, 1203, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Isolate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Isolate.nb
index 06b2970ac..05fff5b07 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Isolate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Isolate.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18632, 656]
-NotebookOptionsPosition[ 11642, 434]
-NotebookOutlinePosition[ 16243, 563]
-CellTagsIndexPosition[ 16072, 556]
+NotebookDataLength[ 18488, 642]
+NotebookOptionsPosition[ 12051, 446]
+NotebookOutlinePosition[ 16271, 559]
+CellTagsIndexPosition[ 16100, 552]
WindowTitle->Isolate
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$95484],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$173667],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Isolate", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Isolate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Isolate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,39 +109,40 @@ abbreviations may be specified with the option IsolateNames."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1728614717],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->773008384],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1400364295],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Isolate", "]"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[1]:=",
+ CellLabel->"In[79]:=",
CellID->2088060696],
Cell[BoxData[
@@ -137,39 +151,69 @@ Cell[BoxData[
RowBox[{
RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
RowBox[{"IsolatePrint", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
RowBox[{"IsolateSplit", "\[Rule]", "\[Infinity]"}], ",",
RowBox[{"IsolateTimes", "\[Rule]", "False"}], ",",
RowBox[{"IsolatePlus", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{402, 35},
+ ImageSize->{371, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[1]=",
- CellID->2033547322]
+ CellLabel->"Out[79]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->476043383],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->704436246],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"t0", "=",
RowBox[{"Isolate", "[",
RowBox[{"a", "+", "b"}], "]"}]}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1761911845],
Cell[BoxData[
FormBox[
TagBox[
- RowBox[{"KK", "(", "682", ")"}],
+ RowBox[{"KK", "(", "24", ")"}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{57, 15},
+ ImageSize->{54, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[2]=",
- CellID->2009964510]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -187,7 +231,7 @@ Cell[BoxData[
RowBox[{"c", "+", "d"}], ")"}], " ", "f"}], " ", "+", " ", "e"}], ",",
"f"}], "]"}]}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1164516818],
Cell[BoxData[
@@ -195,18 +239,17 @@ Cell[BoxData[
RowBox[{"e", "+",
RowBox[{"f", " ",
TagBox[
- RowBox[{"KK", "(", "682", ")"}],
+ RowBox[{"KK", "(", "24", ")"}],
HoldForm]}], "+",
RowBox[{"f", " ",
TagBox[
- RowBox[{"KK", "(", "683", ")"}],
+ RowBox[{"KK", "(", "25", ")"}],
HoldForm]}]}], TraditionalForm]], "Output",
- ImageSize->{174, 15},
+ ImageSize->{173, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[3]=",
- CellID->416280036]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -214,25 +257,24 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StandardForm", "[", "t1", "]"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->810104736],
Cell[BoxData[
RowBox[{"e", "+",
RowBox[{"f", " ",
TagBox[
- RowBox[{"KK", "[", "682", "]"}],
+ RowBox[{"KK", "[", "24", "]"}],
HoldForm]}], "+",
RowBox[{"f", " ",
TagBox[
- RowBox[{"KK", "[", "683", "]"}],
+ RowBox[{"KK", "[", "25", "]"}],
HoldForm]}]}]], "Output",
- ImageSize->{183, 15},
+ ImageSize->{166, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1069603345]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -242,7 +284,7 @@ Cell[BoxData[
RowBox[{"t0", ",", " ", "t1", ",", " ",
RowBox[{"ReleaseHold", "[", "t1", "]"}]}], "}"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->113729976],
Cell[BoxData[
@@ -250,16 +292,16 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
TagBox[
- RowBox[{"KK", "(", "682", ")"}],
+ RowBox[{"KK", "(", "24", ")"}],
HoldForm], ",",
RowBox[{"e", "+",
RowBox[{"f", " ",
TagBox[
- RowBox[{"KK", "(", "682", ")"}],
+ RowBox[{"KK", "(", "24", ")"}],
HoldForm]}], "+",
RowBox[{"f", " ",
TagBox[
- RowBox[{"KK", "(", "683", ")"}],
+ RowBox[{"KK", "(", "25", ")"}],
HoldForm]}]}], ",",
RowBox[{
RowBox[{"f", " ",
@@ -269,12 +311,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "+", "d"}], ")"}]}], "+", "e"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{410, 15},
+ ImageSize->{423, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[5]=",
- CellID->743594287]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -298,7 +339,7 @@ Cell[BoxData[
RowBox[{"a", ",", "d"}], "}"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "fF"}]}], "]"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->689489417],
Cell[BoxData[
@@ -306,20 +347,19 @@ Cell[BoxData[
RowBox[{
RowBox[{
TagBox[
- RowBox[{"fF", "(", "685", ")"}],
+ RowBox[{"fF", "(", "27", ")"}],
HoldForm], " ",
RowBox[{"a", "(", "z", ")"}]}], "+",
RowBox[{
TagBox[
- RowBox[{"fF", "(", "684", ")"}],
+ RowBox[{"fF", "(", "26", ")"}],
HoldForm], " ",
RowBox[{"d", "(", "z", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{183, 15},
+ ImageSize->{175, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[6]=",
- CellID->2124185985]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -327,30 +367,29 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"??", "fF"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1089652184],
Cell[CellGroupData[{
Cell["Global`fF", "Print", "PrintUsage",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->811343181],
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{
RowBox[{
- RowBox[{"fF", "[", "684", "]"}], "=",
+ RowBox[{"fF", "[", "26", "]"}], "=",
RowBox[{"y", "+", "z"}]}]},
{" "},
{
RowBox[{
- RowBox[{"fF", "[", "685", "]"}], "=",
+ RowBox[{"fF", "[", "27", "]"}], "=",
RowBox[{"b", "+",
RowBox[{"c", " ",
RowBox[{"\<\"HoldForm\"\>", "[",
- RowBox[{"fF", "[", "684", "]"}], "]"}]}]}]}]}
+ RowBox[{"fF", "[", "26", "]"}], "]"}]}]}]}]}
},
BaselinePosition->{Baseline, {1, 1}},
GridBoxAlignment->{
@@ -366,8 +405,7 @@ Cell[BoxData[
"RowsIndexed" -> {}}],
Definition[$CellContext`fF],
Editable->False]], "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->1424099393]
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}]
}, Open ]]
}, Open ]],
@@ -380,52 +418,26 @@ Cell[BoxData[
RowBox[{"IsolateNames", "\[Rule]", "l"}], ",",
RowBox[{"IsolateSplit", "\[Rule]", "15"}]}], "]"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->2019918870],
Cell[BoxData[
FormBox[
TagBox[
- RowBox[{"l", "(", "687", ")"}],
+ RowBox[{"l", "(", "29", ")"}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{45, 15},
+ ImageSize->{41, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Isolate",
- CellLabel->"Out[8]=",
- CellID->1344566773]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"{",
- RowBox[{
- RowBox[{"l", "[", "2", "]"}], ",",
- RowBox[{"l", "[", "1", "]"}]}], "}"}]], "Input",
- CellTags->"Isolate",
- CellLabel->"In[9]:=",
- CellID->727095247],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"l", "(", "2", ")"}], ",",
- RowBox[{"l", "(", "1", ")"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{78, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Isolate",
- CellLabel->"Out[9]=",
- CellID->1999836335]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[BoxData[
RowBox[{"Clear", "[",
RowBox[{"t0", ",", "t1", ",", "l", ",", "fF"}], "]"}]], "Input",
CellTags->"Isolate",
- CellLabel->"In[10]:=",
+ CellLabel->"In[8]:=",
CellID->808271947]
}, Open ]]
}, Open ]],
@@ -444,10 +456,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 50.343751}",
+ "built" -> "{2020, 1, 5, 18, 59, 15.670179}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -458,11 +470,11 @@ TaggingRules->{
varlist] substitutes KK[i] for all subsums in expr which are free of any \
occurence of a member of the list varlist. Instead of KK any other head or a \
list of names of the abbreviations may be specified with the option \
-IsolateNames.", "synonyms" -> {}, "title" -> "Isolate", "titlemodifier" -> "",
- "windowtitle" -> "Isolate", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Isolate"}, "SearchTextTranslated" -> ""},
+IsolateNames.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Isolate",
+ "titlemodifier" -> "", "windowtitle" -> "Isolate", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Isolate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -470,8 +482,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -479,185 +492,158 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3607, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1728614717]},
"Isolate"->{
- Cell[4241, 127, 132, 4, 27, "Input",
+ Cell[4689, 141, 133, 4, 70, "Input",
CellTags->"Isolate",
CellID->2088060696],
- Cell[4376, 133, 522, 15, 56, "Output",
- CellTags->"Isolate",
- CellID->2033547322],
- Cell[4935, 153, 174, 6, 27, "Input",
+ Cell[4825, 147, 557, 15, 55, "Output",
+ CellTags->"Isolate"],
+ Cell[6075, 198, 174, 6, 27, "Input",
CellTags->"Isolate",
CellID->1761911845],
- Cell[5112, 161, 265, 10, 36, "Output",
- CellTags->"Isolate",
- CellID->2009964510],
- Cell[5414, 176, 396, 14, 27, "Input",
+ Cell[6252, 206, 243, 9, 37, "Output",
+ CellTags->"Isolate"],
+ Cell[6532, 220, 396, 14, 27, "Input",
CellTags->"Isolate",
CellID->1164516818],
- Cell[5813, 192, 414, 16, 36, "Output",
- CellTags->"Isolate",
- CellID->416280036],
- Cell[6264, 213, 131, 4, 27, "Input",
+ Cell[6931, 236, 392, 15, 37, "Output",
+ CellTags->"Isolate"],
+ Cell[7360, 256, 131, 4, 27, "Input",
CellTags->"Isolate",
CellID->810104736],
- Cell[6398, 219, 392, 15, 49, "Output",
- CellTags->"Isolate",
- CellID->1069603345],
- Cell[6827, 239, 199, 6, 27, "Input",
+ Cell[7494, 262, 369, 14, 51, "Output",
+ CellTags->"Isolate"],
+ Cell[7900, 281, 199, 6, 27, "Input",
CellTags->"Isolate",
CellID->113729976],
- Cell[7029, 247, 751, 29, 36, "Output",
- CellTags->"Isolate",
- CellID->743594287],
- Cell[7817, 281, 578, 20, 27, "Input",
+ Cell[8102, 289, 728, 28, 37, "Output",
+ CellTags->"Isolate"],
+ Cell[8867, 322, 578, 20, 27, "Input",
CellTags->"Isolate",
CellID->689489417],
- Cell[8398, 303, 465, 18, 36, "Output",
- CellTags->"Isolate",
- CellID->2124185985],
- Cell[8900, 326, 112, 4, 27, "Input",
+ Cell[9448, 344, 442, 17, 37, "Output",
+ CellTags->"Isolate"],
+ Cell[9927, 366, 112, 4, 27, "Input",
CellTags->"Isolate",
CellID->1089652184],
- Cell[9037, 334, 129, 2, 42, "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->811343181],
- Cell[9169, 338, 1071, 31, 56, "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->1424099393],
- Cell[10289, 375, 296, 8, 27, "Input",
+ Cell[10064, 374, 109, 1, 42, "Print",
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}],
+ Cell[10176, 377, 1047, 30, 57, "Print",
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}],
+ Cell[11272, 413, 296, 8, 27, "Input",
CellTags->"Isolate",
CellID->2019918870],
- Cell[10588, 385, 264, 10, 36, "Output",
- CellTags->"Isolate",
- CellID->1344566773],
- Cell[10889, 400, 195, 7, 27, "Input",
- CellTags->"Isolate",
- CellID->727095247],
- Cell[11087, 409, 316, 11, 36, "Output",
- CellTags->"Isolate",
- CellID->1999836335],
- Cell[11418, 423, 170, 5, 27, "Input",
+ Cell[11571, 423, 242, 9, 37, "Output",
+ CellTags->"Isolate"],
+ Cell[11828, 435, 169, 5, 27, "Input",
CellTags->"Isolate",
CellID->808271947]},
- "Info-5c3dc742-bd47-47d4-be3e-c64284c792e1"->{
- Cell[9037, 334, 129, 2, 42, "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->811343181],
- Cell[9169, 338, 1071, 31, 56, "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->1424099393]}
+ "PrimaryExamplesSection"->{
+ Cell[5443, 169, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->476043383]},
+ "Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5"->{
+ Cell[10064, 374, 109, 1, 42, "Print",
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}],
+ Cell[10176, 377, 1047, 30, 57, "Print",
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13745, 481},
- {"Isolate", 13879, 485},
- {"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", 15779, 546}
+ {"Isolate", 14182, 494},
+ {"PrimaryExamplesSection", 15682, 540},
+ {"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", 15850, 544}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2240, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2822, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2875, 78, 707, 16, 129, "Usage",
- CellID->982511436],
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3607, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1728614717],
+Cell[3160, 91, 707, 16, 136, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4020, 117, 196, 6, 25, "ExampleSection",
- CellID->1400364295],
+Cell[3892, 111, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->773008384],
+Cell[4633, 137, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4241, 127, 132, 4, 27, "Input",
+Cell[4689, 141, 133, 4, 70, "Input",
CellTags->"Isolate",
CellID->2088060696],
-Cell[4376, 133, 522, 15, 56, "Output",
- CellTags->"Isolate",
- CellID->2033547322]
+Cell[4825, 147, 557, 15, 55, "Output",
+ CellTags->"Isolate"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4935, 153, 174, 6, 27, "Input",
+Cell[5443, 169, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->476043383],
+Cell[CellGroupData[{
+Cell[5855, 188, 195, 6, 26, "ExampleSection",
+ CellID->704436246],
+Cell[CellGroupData[{
+Cell[6075, 198, 174, 6, 27, "Input",
CellTags->"Isolate",
CellID->1761911845],
-Cell[5112, 161, 265, 10, 36, "Output",
- CellTags->"Isolate",
- CellID->2009964510]
+Cell[6252, 206, 243, 9, 37, "Output",
+ CellTags->"Isolate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5414, 176, 396, 14, 27, "Input",
+Cell[6532, 220, 396, 14, 27, "Input",
CellTags->"Isolate",
CellID->1164516818],
-Cell[5813, 192, 414, 16, 36, "Output",
- CellTags->"Isolate",
- CellID->416280036]
+Cell[6931, 236, 392, 15, 37, "Output",
+ CellTags->"Isolate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6264, 213, 131, 4, 27, "Input",
+Cell[7360, 256, 131, 4, 27, "Input",
CellTags->"Isolate",
CellID->810104736],
-Cell[6398, 219, 392, 15, 49, "Output",
- CellTags->"Isolate",
- CellID->1069603345]
+Cell[7494, 262, 369, 14, 51, "Output",
+ CellTags->"Isolate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6827, 239, 199, 6, 27, "Input",
+Cell[7900, 281, 199, 6, 27, "Input",
CellTags->"Isolate",
CellID->113729976],
-Cell[7029, 247, 751, 29, 36, "Output",
- CellTags->"Isolate",
- CellID->743594287]
+Cell[8102, 289, 728, 28, 37, "Output",
+ CellTags->"Isolate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7817, 281, 578, 20, 27, "Input",
+Cell[8867, 322, 578, 20, 27, "Input",
CellTags->"Isolate",
CellID->689489417],
-Cell[8398, 303, 465, 18, 36, "Output",
- CellTags->"Isolate",
- CellID->2124185985]
+Cell[9448, 344, 442, 17, 37, "Output",
+ CellTags->"Isolate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8900, 326, 112, 4, 27, "Input",
+Cell[9927, 366, 112, 4, 27, "Input",
CellTags->"Isolate",
CellID->1089652184],
Cell[CellGroupData[{
-Cell[9037, 334, 129, 2, 42, "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->811343181],
-Cell[9169, 338, 1071, 31, 56, "Print",
- CellTags->{"Info-5c3dc742-bd47-47d4-be3e-c64284c792e1", "Isolate"},
- CellID->1424099393]
+Cell[10064, 374, 109, 1, 42, "Print",
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}],
+Cell[10176, 377, 1047, 30, 57, "Print",
+ CellTags->{"Info-e2b39ee4-0424-4b02-a1ac-880dc8e10ae5", "Isolate"}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[10289, 375, 296, 8, 27, "Input",
+Cell[11272, 413, 296, 8, 27, "Input",
CellTags->"Isolate",
CellID->2019918870],
-Cell[10588, 385, 264, 10, 36, "Output",
- CellTags->"Isolate",
- CellID->1344566773]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10889, 400, 195, 7, 27, "Input",
- CellTags->"Isolate",
- CellID->727095247],
-Cell[11087, 409, 316, 11, 36, "Output",
- CellTags->"Isolate",
- CellID->1999836335]
+Cell[11571, 423, 242, 9, 37, "Output",
+ CellTags->"Isolate"]
}, Open ]],
-Cell[11418, 423, 170, 5, 27, "Input",
+Cell[11828, 435, 169, 5, 27, "Input",
CellTags->"Isolate",
CellID->808271947]
}, Open ]]
}, Open ]],
-Cell[11615, 432, 23, 0, 42, "FooterCell"]
+Cell[12024, 444, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateNames.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateNames.nb
index b8774a7ff..4e143b32b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateNames.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateNames.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6429, 196]
-NotebookOptionsPosition[ 4104, 129]
-NotebookOutlinePosition[ 6164, 185]
-CellTagsIndexPosition[ 6090, 180]
+NotebookDataLength[ 7247, 217]
+NotebookOptionsPosition[ 5136, 160]
+NotebookOutlinePosition[ 7039, 209]
+CellTagsIndexPosition[ 6996, 206]
WindowTitle->IsolateNames
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IsolateNames\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IsolateNames"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"], "\<\"Collect2\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Collect2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IsolateNames\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IsolateNames"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IsolateNames.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$95136],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IsolateNames", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$173221],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IsolateNames", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ IsolateNames.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IsolateNames", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IsolateNames", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,9 +153,7 @@ Cell[TextData[{
ButtonNote->"Collect2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IsolateNames",
- CellID->641552758]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,10 +170,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 49.124161}",
+ "built" -> "{2020, 1, 5, 18, 59, 14.676198}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -150,11 +181,11 @@ TaggingRules->{
"None", "summary" ->
"IsolateNames is an option for Isolate and Collect2. Its default setting \
is KK. Instead of a symbol the setting may also be a list with the names of \
-the abbrevations.", "synonyms" -> {}, "title" -> "IsolateNames",
- "titlemodifier" -> "", "windowtitle" -> "IsolateNames", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/IsolateNames"}},
+the abbrevations.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "IsolateNames", "titlemodifier" -> "", "windowtitle" -> "IsolateNames",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/IsolateNames"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IsolateNames"->{
- Cell[3675, 109, 387, 15, 70, "Text",
- CellTags->"IsolateNames",
- CellID->641552758]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IsolateNames", 5975, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3103, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 471, 13, 70, "Usage",
+Cell[3690, 98, 289, 11, 70, "ObjectNameGrid"],
+Cell[3982, 111, 471, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3402, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4478, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3675, 109, 387, 15, 70, "Text",
- CellTags->"IsolateNames",
- CellID->641552758]
+Cell[4751, 142, 343, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4077, 127, 23, 0, 70, "FooterCell"]
+Cell[5109, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolatePrint.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolatePrint.nb
index 7450e66a7..231a6feac 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolatePrint.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolatePrint.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6395, 191]
-NotebookOptionsPosition[ 4008, 123]
-NotebookOutlinePosition[ 6130, 180]
-CellTagsIndexPosition[ 6056, 175]
+NotebookDataLength[ 7125, 211]
+NotebookOptionsPosition[ 4953, 153]
+NotebookOutlinePosition[ 6918, 203]
+CellTagsIndexPosition[ 6875, 200]
WindowTitle->IsolatePrint
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IsolatePrint\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IsolatePrint"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IsolatePrint\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IsolatePrint"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IsolatePrint.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$95825],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IsolatePrint", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$174103],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IsolatePrint", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ IsolatePrint.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IsolatePrint", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IsolatePrint", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"Isolate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IsolatePrint",
- CellID->1589107046]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 51.943620}",
+ "built" -> "{2020, 1, 5, 18, 59, 16.772533}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -145,11 +175,11 @@ TaggingRules->{
"IsolatePrint is an option of Isolate. If it is set to OutputForm (or any \
other *Form) the definitions of the abbreviations are printed during the \
operation of Isolate. The setting IsolatePrint -> False suppresses printing.",
- "synonyms" -> {}, "title" -> "IsolatePrint", "titlemodifier" -> "",
- "windowtitle" -> "IsolatePrint", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/IsolatePrint"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "IsolatePrint",
+ "titlemodifier" -> "", "windowtitle" -> "IsolatePrint", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/IsolatePrint"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -158,41 +188,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IsolatePrint"->{
- Cell[3737, 109, 229, 9, 70, "Text",
- CellTags->"IsolatePrint",
- CellID->1589107046]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IsolatePrint", 5941, 168}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3017, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 533, 13, 70, "Usage",
+Cell[3604, 97, 289, 11, 70, "ObjectNameGrid"],
+Cell[3896, 110, 533, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3464, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4454, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3737, 109, 229, 9, 70, "Text",
- CellTags->"IsolatePrint",
- CellID->1589107046]
+Cell[4727, 141, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3981, 121, 23, 0, 70, "FooterCell"]
+Cell[4926, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateSplit.nb
index 18bd41556..ce270e0fb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateSplit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/IsolateSplit.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6652, 194]
-NotebookOptionsPosition[ 4139, 125]
-NotebookOutlinePosition[ 6387, 183]
-CellTagsIndexPosition[ 6313, 178]
+NotebookDataLength[ 7387, 215]
+NotebookOptionsPosition[ 5084, 155]
+NotebookOutlinePosition[ 7180, 207]
+CellTagsIndexPosition[ 7137, 204]
WindowTitle->IsolateSplit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/IsolateSplit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/IsolateSplit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/IsolateSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/IsolateSplit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
IsolateSplit.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$96169],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/IsolateSplit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$174545],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/IsolateSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ IsolateSplit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["IsolateSplit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["IsolateSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,9 +148,7 @@ Cell[TextData[{
ButtonNote->"Isolate"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"IsolateSplit",
- CellID->1638104774]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -135,10 +165,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 53.138397}",
+ "built" -> "{2020, 1, 5, 18, 59, 17.568794}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -149,10 +179,11 @@ maximum number of characters of FortranForm[expr] which are abbreviated by \
Isolate. If the expression is larger than the indicated number, it is split \
into smaller pieces and onto each subsum Isolate is applied. With the default \
setting IsolateSplit -> Infinity no splitting is done.", "synonyms" -> {},
- "title" -> "IsolateSplit", "titlemodifier" -> "", "windowtitle" ->
- "IsolateSplit", "type" -> "Symbol", "uri" -> "FeynCalc/ref/IsolateSplit"}},
+ "tabletags" -> {}, "title" -> "IsolateSplit", "titlemodifier" -> "",
+ "windowtitle" -> "IsolateSplit", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/IsolateSplit"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +192,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "IsolateSplit"->{
- Cell[3868, 111, 229, 9, 70, "Text",
- CellTags->"IsolateSplit",
- CellID->1638104774]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"IsolateSplit", 6198, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3017, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 664, 15, 70, "Usage",
+Cell[3604, 97, 289, 11, 70, "ObjectNameGrid"],
+Cell[3896, 110, 664, 15, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3595, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[4585, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3868, 111, 229, 9, 70, "Text",
- CellTags->"IsolateSplit",
- CellID->1638104774]
+Cell[4858, 143, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4112, 123, 23, 0, 70, "FooterCell"]
+Cell[5057, 153, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/KD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KD.nb
new file mode 100644
index 000000000..2c1b4bc7c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KD.nb
@@ -0,0 +1,413 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11064, 403]
+NotebookOptionsPosition[ 7013, 265]
+NotebookOutlinePosition[ 9829, 351]
+CellTagsIndexPosition[ 9725, 345]
+WindowTitle->KD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/KD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/KD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/KD.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$175868],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/KD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["KD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ " is the Kronecker delta in 3 dimensions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->893998821],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->605950437],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[1]:=",
+ CellID->2071184026],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{34, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[1]=",
+ CellID->52901115]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], " ",
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], "]"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[2]:=",
+ CellID->828510540],
+
+Cell[BoxData[
+ FormBox["3", TraditionalForm]], "Output",
+ ImageSize->{12, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[2]=",
+ CellID->1251562506]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[3]:=",
+ CellID->493237874],
+
+Cell[BoxData[
+ RowBox[{"KD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{71, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->368769417]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"KD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[4]:=",
+ CellID->2090805972],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "a", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "b", "]"}]}], "]"}]], "Output",
+ ImageSize->{419, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1408413043]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"KD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[5]:=",
+ CellID->921483723],
+
+Cell[BoxData[
+ RowBox[{"KD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{71, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->117264146]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"KD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 59, 20.768248}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "KD[i, j] is the Kronecker delta in 3 dimensions.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "KD", "titlemodifier" ->
+ "", "windowtitle" -> "KD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/KD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3551, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->893998821]},
+ "MT"->{
+ Cell[4183, 135, 139, 5, 27, "Input",
+ CellTags->"MT",
+ CellID->2071184026],
+ Cell[4325, 142, 564, 24, 38, "Output",
+ CellTags->"MT",
+ CellID->52901115],
+ Cell[4926, 171, 254, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->828510540],
+ Cell[5183, 182, 204, 7, 35, "Output",
+ CellTags->"MT",
+ CellID->1251562506],
+ Cell[5424, 194, 174, 6, 27, "Input",
+ CellTags->"MT",
+ CellID->493237874],
+ Cell[5601, 202, 240, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->368769417],
+ Cell[5878, 215, 207, 7, 27, "Input",
+ CellTags->"MT",
+ CellID->2090805972],
+ Cell[6088, 224, 337, 10, 51, "Output",
+ CellTags->"MT",
+ CellID->1408413043],
+ Cell[6462, 239, 242, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->921483723],
+ Cell[6707, 250, 240, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->117264146]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8752, 307},
+ {"MT", 8881, 311}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[574, 21, 2262, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2839, 76, 279, 11, 45, "ObjectNameGrid"],
+Cell[3121, 89, 405, 13, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3551, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->893998821],
+Cell[CellGroupData[{
+Cell[3963, 125, 195, 6, 26, "ExampleSection",
+ CellID->605950437],
+Cell[CellGroupData[{
+Cell[4183, 135, 139, 5, 27, "Input",
+ CellTags->"MT",
+ CellID->2071184026],
+Cell[4325, 142, 564, 24, 38, "Output",
+ CellTags->"MT",
+ CellID->52901115]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4926, 171, 254, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->828510540],
+Cell[5183, 182, 204, 7, 35, "Output",
+ CellTags->"MT",
+ CellID->1251562506]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5424, 194, 174, 6, 27, "Input",
+ CellTags->"MT",
+ CellID->493237874],
+Cell[5601, 202, 240, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->368769417]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5878, 215, 207, 7, 27, "Input",
+ CellTags->"MT",
+ CellID->2090805972],
+Cell[6088, 224, 337, 10, 51, "Output",
+ CellTags->"MT",
+ CellID->1408413043]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6462, 239, 242, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->921483723],
+Cell[6707, 250, 240, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->117264146]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6986, 263, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/KDD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KDD.nb
new file mode 100644
index 000000000..1889c0452
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KDD.nb
@@ -0,0 +1,420 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11296, 410]
+NotebookOptionsPosition[ 7176, 271]
+NotebookOutlinePosition[ 10058, 358]
+CellTagsIndexPosition[ 9954, 352]
+WindowTitle->KDD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/KDD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/KDD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/KDD.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$174992],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/KDD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["KDD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ "is the Kronecker delta in D-1 dimensions"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1094012394],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->651166284],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[1]:=",
+ CellID->2071184026],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[1]=",
+ CellID->430083837]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], " ",
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], "]"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[2]:=",
+ CellID->828510540],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"D", "-", "1"}], TraditionalForm]], "Output",
+ ImageSize->{42, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[2]=",
+ CellID->987753983]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KDD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[3]:=",
+ CellID->493237874],
+
+Cell[BoxData[
+ RowBox[{"KDD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{79, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1173992407]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"KDD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[4]:=",
+ CellID->2090805972],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"a", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{527, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1936092407]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"KDD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"MT",
+ CellLabel->"In[5]:=",
+ CellID->921483723],
+
+Cell[BoxData[
+ RowBox[{"KDD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{79, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MT",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1522323640]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"KDD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 59, 18.538316}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "KDD[i, j] is the Kronecker delta in D-1 dimensions",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "KDD", "titlemodifier" ->
+ "", "windowtitle" -> "KDD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/KDD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3558, 106, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1094012394]},
+ "MT"->{
+ Cell[4191, 135, 140, 5, 27, "Input",
+ CellTags->"MT",
+ CellID->2071184026],
+ Cell[4334, 142, 541, 23, 38, "Output",
+ CellTags->"MT",
+ CellID->430083837],
+ Cell[4912, 170, 256, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->828510540],
+ Cell[5171, 181, 226, 8, 35, "Output",
+ CellTags->"MT",
+ CellID->987753983],
+ Cell[5434, 194, 175, 6, 27, "Input",
+ CellTags->"MT",
+ CellID->493237874],
+ Cell[5612, 202, 242, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->1173992407],
+ Cell[5891, 215, 208, 7, 27, "Input",
+ CellTags->"MT",
+ CellID->2090805972],
+ Cell[6102, 224, 483, 16, 51, "Output",
+ CellTags->"MT",
+ CellID->1936092407],
+ Cell[6622, 245, 243, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->921483723],
+ Cell[6868, 256, 242, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->1522323640]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8978, 314},
+ {"MT", 9108, 318}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 406, 13, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3558, 106, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1094012394],
+Cell[CellGroupData[{
+Cell[3971, 125, 195, 6, 26, "ExampleSection",
+ CellID->651166284],
+Cell[CellGroupData[{
+Cell[4191, 135, 140, 5, 27, "Input",
+ CellTags->"MT",
+ CellID->2071184026],
+Cell[4334, 142, 541, 23, 38, "Output",
+ CellTags->"MT",
+ CellID->430083837]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4912, 170, 256, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->828510540],
+Cell[5171, 181, 226, 8, 35, "Output",
+ CellTags->"MT",
+ CellID->987753983]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5434, 194, 175, 6, 27, "Input",
+ CellTags->"MT",
+ CellID->493237874],
+Cell[5612, 202, 242, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->1173992407]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5891, 215, 208, 7, 27, "Input",
+ CellTags->"MT",
+ CellID->2090805972],
+Cell[6102, 224, 483, 16, 51, "Output",
+ CellTags->"MT",
+ CellID->1936092407]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6622, 245, 243, 9, 27, "Input",
+ CellTags->"MT",
+ CellID->921483723],
+Cell[6868, 256, 242, 8, 51, "Output",
+ CellTags->"MT",
+ CellID->1522323640]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7149, 269, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/KDE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KDE.nb
new file mode 100644
index 000000000..d22ff99ad
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KDE.nb
@@ -0,0 +1,477 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12607, 467]
+NotebookOptionsPosition[ 8154, 315]
+NotebookOutlinePosition[ 11054, 403]
+CellTagsIndexPosition[ 10948, 397]
+WindowTitle->KDE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/KDE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/KDE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/KDE.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$175429],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/KDE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["KDE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ " is the Kronecker delta in D-4 dimensions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->201794191],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1654846392],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Input",
+ CellTags->"MTD",
+ CellLabel->"In[1]:=",
+ CellID->1680977301],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "^"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MTD",
+ CellLabel->"Out[1]=",
+ CellID->2008652801]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], "]"}]], "Input",
+ CellTags->"MTD",
+ CellLabel->"In[2]:=",
+ CellID->2085004373],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"D", "-", "4"}], TraditionalForm]], "Output",
+ ImageSize->{44, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MTD",
+ CellLabel->"Out[2]=",
+ CellID->1261470169]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1799001225],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2094228019]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"KDD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1071300852],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"D", "-", "4"}], TraditionalForm]], "Output",
+ ImageSize->{44, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->873532203]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"MTD",
+ CellLabel->"In[5]:=",
+ CellID->964321899],
+
+Cell[BoxData[
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Output",
+ ImageSize->{76, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MTD",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->1000250313]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"MTD",
+ CellLabel->"In[6]:=",
+ CellID->1887554420],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{526, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MTD",
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->1264465576]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"MTD",
+ CellLabel->"In[7]:=",
+ CellID->623099946],
+
+Cell[BoxData[
+ RowBox[{"KDE", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Output",
+ ImageSize->{76, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MTD",
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->221320876]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"KDE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 59, 19.672449}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "KDE[i, j] is the Kronecker delta in D-4 dimensions.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "KDE", "titlemodifier" -> "", "windowtitle" ->
+ "KDE", "type" -> "Symbol", "uri" -> "FeynCalc/ref/KDE"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3560, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->201794191]},
+ "MTD"->{
+ Cell[4193, 135, 141, 5, 27, "Input",
+ CellTags->"MTD",
+ CellID->1680977301],
+ Cell[4337, 142, 567, 24, 39, "Output",
+ CellTags->"MTD",
+ CellID->2008652801],
+ Cell[4941, 171, 253, 9, 27, "Input",
+ CellTags->"MTD",
+ CellID->2085004373],
+ Cell[5197, 182, 228, 8, 35, "Output",
+ CellTags->"MTD",
+ CellID->1261470169],
+ Cell[6407, 238, 176, 6, 27, "Input",
+ CellTags->"MTD",
+ CellID->964321899],
+ Cell[6586, 246, 243, 8, 51, "Output",
+ CellTags->"MTD",
+ CellID->1000250313],
+ Cell[6866, 259, 209, 7, 27, "Input",
+ CellTags->"MTD",
+ CellID->1887554420],
+ Cell[7078, 268, 484, 16, 51, "Output",
+ CellTags->"MTD",
+ CellID->1264465576],
+ Cell[7599, 289, 244, 9, 27, "Input",
+ CellTags->"MTD",
+ CellID->623099946],
+ Cell[7846, 300, 242, 8, 51, "Output",
+ CellTags->"MTD",
+ CellID->221320876]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9960, 359},
+ {"MTD", 10090, 363}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 408, 13, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3560, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->201794191],
+Cell[CellGroupData[{
+Cell[3972, 125, 196, 6, 26, "ExampleSection",
+ CellID->1654846392],
+Cell[CellGroupData[{
+Cell[4193, 135, 141, 5, 27, "Input",
+ CellTags->"MTD",
+ CellID->1680977301],
+Cell[4337, 142, 567, 24, 39, "Output",
+ CellTags->"MTD",
+ CellID->2008652801]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4941, 171, 253, 9, 27, "Input",
+ CellTags->"MTD",
+ CellID->2085004373],
+Cell[5197, 182, 228, 8, 35, "Output",
+ CellTags->"MTD",
+ CellID->1261470169]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5462, 195, 234, 8, 27, "Input",
+ CellID->1799001225],
+Cell[5699, 205, 187, 6, 35, "Output",
+ CellID->2094228019]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5923, 216, 235, 8, 27, "Input",
+ CellID->1071300852],
+Cell[6161, 226, 209, 7, 35, "Output",
+ CellID->873532203]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6407, 238, 176, 6, 27, "Input",
+ CellTags->"MTD",
+ CellID->964321899],
+Cell[6586, 246, 243, 8, 51, "Output",
+ CellTags->"MTD",
+ CellID->1000250313]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6866, 259, 209, 7, 27, "Input",
+ CellTags->"MTD",
+ CellID->1887554420],
+Cell[7078, 268, 484, 16, 51, "Output",
+ CellTags->"MTD",
+ CellID->1264465576]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7599, 289, 244, 9, 27, "Input",
+ CellTags->"MTD",
+ CellID->623099946],
+Cell[7846, 300, 242, 8, 51, "Output",
+ CellTags->"MTD",
+ CellID->221320876]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8127, 313, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/KK.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KK.nb
index 4ae7fc9dd..1abadc541 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/KK.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/KK.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6385, 197]
-NotebookOptionsPosition[ 4113, 130]
-NotebookOutlinePosition[ 6129, 186]
-CellTagsIndexPosition[ 6065, 181]
+NotebookDataLength[ 7259, 218]
+NotebookOptionsPosition[ 5163, 161]
+NotebookOutlinePosition[ 7051, 210]
+CellTagsIndexPosition[ 7008, 207]
WindowTitle->KK
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/KK\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/KK"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/KK.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$96520],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/KK",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"], "\<\"IsolateNames\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/IsolateNames"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/KK\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/KK"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/KK.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$176307],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/KK",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["KK", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["KK", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -121,9 +154,7 @@ Cell[TextData[{
ButtonNote->"IsolateNames"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"KK",
- CellID->1553777100]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -140,10 +171,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 54.342962}",
+ "built" -> "{2020, 1, 5, 18, 59, 21.904841}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -152,10 +183,10 @@ TaggingRules->{
"KK[i] is the default setting of IsolateNames, which is the head of \
abbreviations used by Isolate. A KK[i] returned by Isolate is given in \
HoldForm and can be recovered by ReleaseHold[KK[i]].", "synonyms" -> {},
- "title" -> "KK", "titlemodifier" -> "", "windowtitle" -> "KK", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/KK"}},
+ "tabletags" -> {}, "title" -> "KK", "titlemodifier" -> "", "windowtitle" ->
+ "KK", "type" -> "Symbol", "uri" -> "FeynCalc/ref/KK"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -164,41 +195,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "KK"->{
- Cell[3681, 110, 390, 15, 70, "Text",
- CellTags->"KK",
- CellID->1553777100]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"KK", 5959, 174}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3084, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 525, 14, 70, "Usage",
+Cell[3661, 98, 279, 11, 70, "ObjectNameGrid"],
+Cell[3943, 111, 525, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3408, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4493, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3681, 110, 390, 15, 70, "Text",
- CellTags->"KK",
- CellID->1553777100]
+Cell[4766, 143, 355, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4086, 128, 23, 0, 70, "FooterCell"]
+Cell[5136, 159, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Kummer.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Kummer.nb
index 06802f2cf..297feef73 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Kummer.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Kummer.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 66705, 2366]
-NotebookOptionsPosition[ 50362, 1779]
-NotebookOutlinePosition[ 59022, 2057]
-CellTagsIndexPosition[ 58910, 2051]
+NotebookDataLength[ 65232, 2282]
+NotebookOptionsPosition[ 50593, 1773]
+NotebookOutlinePosition[ 58340, 2012]
+CellTagsIndexPosition[ 58228, 2006]
WindowTitle->Kummer
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Kummer\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Kummer"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Kummer.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"HypergeometricAC\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/HypergeometricAC"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Kummer\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Kummer"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Kummer.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$96865],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Kummer",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$176750],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Kummer", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Kummer", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Kummer", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->451429310],
+ CellID->1622183496],
Cell[CellGroupData[{
@@ -120,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->22536900],
+ CellID->842763816],
Cell[CellGroupData[{
@@ -149,12 +181,11 @@ Cell[BoxData[
RowBox[{"-", "a"}], "-", "b", "+", "c"}]], " ",
TemplateBox[{RowBox[{"c", "-", "a"}],RowBox[{"c", "-", "b"}],"c","z"},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{357, 19},
+ ImageSize->{375, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[1]=",
- CellID->780995976]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -185,12 +216,11 @@ Cell[BoxData[
FractionBox["z",
RowBox[{"1", "-", "z"}]]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{342, 39},
+ ImageSize->{354, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[2]=",
- CellID->334128730]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -221,12 +251,11 @@ Cell[BoxData[
FractionBox["z",
RowBox[{"1", "-", "z"}]]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{342, 39},
+ ImageSize->{355, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[3]=",
- CellID->1379521301]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -258,12 +287,11 @@ Cell[BoxData[
RowBox[{"c", "-", "a"}],RowBox[{"c", "-", "b"}],"c",
RowBox[{"1", "-", "z"}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{367, 19},
+ ImageSize->{386, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[4]=",
- CellID->1681078809]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -298,12 +326,11 @@ Cell[BoxData[
RowBox[{"a", "-", "c", "+", "1"}],RowBox[{"b", "-", "c", "+", "1"}],
RowBox[{"a", "+", "b", "-", "c", "+", "1"}],RowBox[{"1", "-", "z"}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{526, 18},
+ ImageSize->{557, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[5]=",
- CellID->583730114]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -334,12 +361,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"1", "-", "z"}], "z"]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{330, 43},
+ ImageSize->{342, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[6]=",
- CellID->282378053]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -376,12 +402,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"1", "-", "z"}], "z"]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{492, 43},
+ ImageSize->{517, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[7]=",
- CellID->593894309]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -412,12 +437,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"1", "-", "z"}], "z"]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{330, 43},
+ ImageSize->{343, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[8]=",
- CellID->658206917]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -454,12 +478,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"1", "-", "z"}], "z"]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{492, 43},
+ ImageSize->{522, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[9]=",
- CellID->884891760]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -501,12 +524,11 @@ Cell[BoxData[
RowBox[{"c", "-", "a"}],RowBox[{"c", "-", "b"}],"c",FractionBox[
"1", "z"]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{444, 43},
+ ImageSize->{468, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[10]=",
- CellID->1201929686]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -554,12 +576,11 @@ Cell[BoxData[
RowBox[{"1", "-", "b"}],RowBox[{"c", "-", "b"}],
RowBox[{"a", "-", "b", "+", "1"}],FractionBox["1", "z"]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{380, 93},
+ ImageSize->{405, 78},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[11]=",
- CellID->1407407771]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -600,12 +621,11 @@ Cell[BoxData[
TemplateBox[{"a",RowBox[{"c", "-", "b"}],"c",FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{397, 42},
+ ImageSize->{412, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[12]=",
- CellID->171828604]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -654,12 +674,11 @@ Cell[BoxData[
FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{536, 42},
+ ImageSize->{561, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[13]=",
- CellID->1340266483]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -699,12 +718,11 @@ Cell[BoxData[
TemplateBox[{"b",RowBox[{"c", "-", "a"}],"c",FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{397, 43},
+ ImageSize->{414, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[14]=",
- CellID->1878402139]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
@@ -753,12 +771,11 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "+", "1"}],FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{406, 93},
+ ImageSize->{424, 78},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[15]=",
- CellID->1646537872]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
@@ -800,12 +817,11 @@ Cell[BoxData[
RowBox[{"c", "-", "a"}],RowBox[{"c", "-", "b"}],"c",FractionBox[
"1", "z"]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{444, 43},
+ ImageSize->{468, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[16]=",
- CellID->976219709]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
@@ -852,12 +868,11 @@ Cell[BoxData[
TemplateBox[{RowBox[{"1", "-", "a"}],RowBox[{"c", "-", "a"}],RowBox[{
RowBox[{"-", "a"}], "+", "b", "+", "1"}],FractionBox["1", "z"]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{390, 93},
+ ImageSize->{412, 78},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[17]=",
- CellID->922572585]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
@@ -896,12 +911,11 @@ Cell[BoxData[
TemplateBox[{"b",RowBox[{"c", "-", "a"}],"c",FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{381, 43},
+ ImageSize->{397, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[18]=",
- CellID->1393980026]
+ CellLabel->"Out[18]="]
}, Open ]],
Cell[CellGroupData[{
@@ -950,12 +964,11 @@ Cell[BoxData[
RowBox[{"-", "a"}], "+", "b", "+", "1"}],FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{432, 93},
+ ImageSize->{454, 78},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[19]=",
- CellID->1288498782]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[CellGroupData[{
@@ -994,12 +1007,11 @@ Cell[BoxData[
TemplateBox[{"a",RowBox[{"c", "-", "b"}],"c",FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{381, 43},
+ ImageSize->{395, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[20]=",
- CellID->2121590638]
+ CellLabel->"Out[20]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1045,12 +1057,11 @@ Cell[BoxData[
RowBox[{"-", "a"}], "+", "b", "+", "1"}],FractionBox["1",
RowBox[{"1", "-", "z"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{540, 43},
+ ImageSize->{572, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[21]=",
- CellID->1992183596]
+ CellLabel->"Out[21]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1090,12 +1101,11 @@ Cell[BoxData[
RowBox[{"1", "-", "a"}],RowBox[{"1", "-", "b"}],RowBox[{"2", "-", "c"}],
"z"},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{491, 19},
+ ImageSize->{517, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[22]=",
- CellID->652936361]
+ CellLabel->"Out[22]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1125,12 +1135,11 @@ Cell[BoxData[
RowBox[{"-", "a"}], "-", "b", "+", "c"}]], " ",
TemplateBox[{RowBox[{"c", "-", "a"}],RowBox[{"c", "-", "b"}],"c","z"},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{357, 19},
+ ImageSize->{375, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[23]=",
- CellID->1706021647]
+ CellLabel->"Out[23]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1171,12 +1180,11 @@ Cell[BoxData[
RowBox[{"2", "-", "c"}],FractionBox["z",
RowBox[{"z", "-", "1"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{542, 39},
+ ImageSize->{568, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[24]=",
- CellID->378032271]
+ CellLabel->"Out[24]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1206,12 +1214,11 @@ Cell[BoxData[
TemplateBox[{"a",RowBox[{"c", "-", "b"}],"c",FractionBox["z",
RowBox[{"z", "-", "1"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{332, 39},
+ ImageSize->{343, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[25]=",
- CellID->2057626251]
+ CellLabel->"Out[25]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1252,12 +1259,11 @@ Cell[BoxData[
RowBox[{"2", "-", "c"}],FractionBox["z",
RowBox[{"z", "-", "1"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{542, 39},
+ ImageSize->{569, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[26]=",
- CellID->129109138]
+ CellLabel->"Out[26]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1287,12 +1293,11 @@ Cell[BoxData[
TemplateBox[{"b",RowBox[{"c", "-", "a"}],"c",FractionBox["z",
RowBox[{"z", "-", "1"}]]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{332, 39},
+ ImageSize->{344, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[27]=",
- CellID->149180370]
+ CellLabel->"Out[27]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1332,12 +1337,11 @@ Cell[BoxData[
RowBox[{"-", "a"}], "-", "b", "+", "c", "+", "1"}],
RowBox[{"1", "-", "z"}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{546, 18},
+ ImageSize->{579, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[28]=",
- CellID->1291617006]
+ CellLabel->"Out[28]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1369,12 +1373,11 @@ Cell[BoxData[
RowBox[{"c", "-", "a"}],RowBox[{"c", "-", "b"}],"c",
RowBox[{"1", "-", "z"}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{367, 19},
+ ImageSize->{386, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[29]=",
- CellID->467825582]
+ CellLabel->"Out[29]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1417,12 +1420,11 @@ Cell[BoxData[
FractionBox["1",
RowBox[{"1", "-", "z"}]]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{359, 63},
+ ImageSize->{377, 57},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[30]=",
- CellID->1418885380]
+ CellLabel->"Out[30]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1455,12 +1457,11 @@ Cell[BoxData[
FractionBox["1",
RowBox[{"1", "-", "z"}]]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{376, 43},
+ ImageSize->{389, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[31]=",
- CellID->1820473911]
+ CellLabel->"Out[31]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1501,12 +1502,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"1", "-", "z"}], "z"]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{565, 43},
+ ImageSize->{335, 57},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[32]=",
- CellID->1271802490]
+ CellLabel->"Out[32]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1537,12 +1537,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"1", "-", "z"}], "z"]}]},
"Hypergeometric2F1"]}]}], TraditionalForm]], "Output",
- ImageSize->{330, 43},
+ ImageSize->{343, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[33]=",
- CellID->1670296832]
+ CellLabel->"Out[33]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1601,12 +1600,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "-", "b"}]},
"Gamma"]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{482, 125},
+ ImageSize->{520, 112},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[34]=",
- CellID->1552242027]
+ CellLabel->"Out[34]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1668,12 +1666,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "-", "b"}]},
"Gamma"]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{472, 125},
+ ImageSize->{509, 128},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[35]=",
- CellID->449279839]
+ CellLabel->"Out[35]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1735,12 +1732,11 @@ Cell[BoxData[
"Gamma"], " ",
TemplateBox[{RowBox[{"c", "-", "b"}]},
"Gamma"]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{486, 125},
+ ImageSize->{515, 128},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Kummer",
- CellLabel->"Out[36]=",
- CellID->1951010163]
+ CellLabel->"Out[36]="]
}, Open ]]
}, Open ]],
@@ -1770,17 +1766,15 @@ Cell[TextData[{
ButtonNote->"HypergeometricAC"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Kummer",
- CellID->1248445733]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Kummer",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1789,10 +1783,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 55.649152}",
+ "built" -> "{2020, 1, 5, 18, 59, 23.123162}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1801,11 +1795,11 @@ TaggingRules->{
"Kummer[i][exp] applies Kummer relation number i (i =1, ... 24, 94,95,96) \
to all Hypergeometric2F1 in exp. i = 94 corresponds to eq. 9.131.2, i = 95 to \
eq. 9.132.1 and i = 96 to eq. 9.132.2 in Gradsteyn & Ryzhik.",
- "synonyms" -> {}, "title" -> "Kummer", "titlemodifier" -> "",
- "windowtitle" -> "Kummer", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Kummer", "titlemodifier" ->
+ "", "windowtitle" -> "Kummer", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Kummer"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1814,7 +1808,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1823,551 +1817,473 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3470, 97, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4478, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->451429310]},
+ CellID->1622183496]},
"Kummer"->{
- Cell[4101, 126, 354, 10, 45, "Input",
+ Cell[5111, 158, 354, 10, 27, "Input",
CellTags->"Kummer",
CellID->318247247],
- Cell[4458, 138, 557, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->780995976],
- Cell[5052, 161, 355, 10, 45, "Input",
+ Cell[5468, 170, 537, 17, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[6042, 192, 355, 10, 27, "Input",
CellTags->"Kummer",
CellID->1547382498],
- Cell[5410, 173, 572, 19, 60, "Output",
- CellTags->"Kummer",
- CellID->334128730],
- Cell[6019, 197, 353, 10, 45, "Input",
+ Cell[6400, 204, 552, 18, 54, "Output",
+ CellTags->"Kummer"],
+ Cell[6989, 227, 353, 10, 27, "Input",
CellTags->"Kummer",
CellID->87779889],
- Cell[6375, 209, 573, 19, 60, "Output",
- CellTags->"Kummer",
- CellID->1379521301],
- Cell[6985, 233, 405, 12, 45, "Input",
+ Cell[7345, 239, 552, 18, 54, "Output",
+ CellTags->"Kummer"],
+ Cell[7934, 262, 405, 12, 45, "Input",
CellTags->"Kummer",
CellID->196494184],
- Cell[7393, 247, 558, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->1681078809],
- Cell[7988, 270, 496, 14, 45, "Input",
+ Cell[8342, 276, 537, 17, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[8916, 298, 496, 14, 45, "Input",
CellTags->"Kummer",
CellID->793293677],
- Cell[8487, 286, 636, 19, 39, "Output",
- CellTags->"Kummer",
- CellID->583730114],
- Cell[9160, 310, 404, 12, 45, "Input",
+ Cell[9415, 314, 616, 18, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[10068, 337, 404, 12, 45, "Input",
CellTags->"Kummer",
CellID->39664086],
- Cell[9567, 324, 539, 17, 64, "Output",
- CellTags->"Kummer",
- CellID->282378053],
- Cell[10143, 346, 496, 14, 45, "Input",
+ Cell[10475, 351, 519, 16, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[11031, 372, 496, 14, 45, "Input",
CellTags->"Kummer",
CellID->326626360],
- Cell[10642, 362, 653, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->593894309],
- Cell[11332, 388, 406, 12, 45, "Input",
+ Cell[11530, 388, 633, 20, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[12200, 413, 406, 12, 45, "Input",
CellTags->"Kummer",
CellID->2096680953],
- Cell[11741, 402, 539, 17, 64, "Output",
- CellTags->"Kummer",
- CellID->658206917],
- Cell[12317, 424, 497, 14, 45, "Input",
+ Cell[12609, 427, 519, 16, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[13165, 448, 497, 14, 45, "Input",
CellTags->"Kummer",
CellID->1606284055],
- Cell[12817, 440, 653, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->884891760],
- Cell[13507, 466, 506, 16, 45, "Input",
+ Cell[13665, 464, 633, 20, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[14335, 489, 506, 16, 45, "Input",
CellTags->"Kummer",
CellID->1495083835],
- Cell[14016, 484, 728, 24, 64, "Output",
- CellTags->"Kummer",
- CellID->1201929686],
- Cell[14781, 513, 648, 20, 45, "Input",
+ Cell[14844, 507, 707, 23, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[15588, 535, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->2086065203],
- Cell[15432, 535, 829, 26, 114, "Output",
- CellTags->"Kummer",
- CellID->1407407771],
- Cell[16298, 566, 505, 16, 45, "Input",
+ Cell[16239, 557, 808, 25, 99, "Output",
+ CellTags->"Kummer"],
+ Cell[17084, 587, 505, 16, 45, "Input",
CellTags->"Kummer",
CellID->764355789],
- Cell[16806, 584, 699, 23, 63, "Output",
- CellTags->"Kummer",
- CellID->171828604],
- Cell[17542, 612, 648, 20, 45, "Input",
+ Cell[17592, 605, 679, 22, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[18308, 632, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1556461178],
- Cell[18193, 634, 814, 27, 63, "Output",
- CellTags->"Kummer",
- CellID->1340266483],
- Cell[19044, 666, 505, 16, 45, "Input",
+ Cell[18959, 654, 793, 26, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[19789, 685, 505, 16, 45, "Input",
CellTags->"Kummer",
CellID->487619941],
- Cell[19552, 684, 676, 22, 64, "Output",
- CellTags->"Kummer",
- CellID->1878402139],
- Cell[20265, 711, 648, 20, 45, "Input",
+ Cell[20297, 703, 655, 21, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[20989, 729, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1099088563],
- Cell[20916, 733, 857, 27, 114, "Output",
- CellTags->"Kummer",
- CellID->1646537872],
- Cell[21810, 765, 505, 16, 45, "Input",
+ Cell[21640, 751, 836, 26, 99, "Output",
+ CellTags->"Kummer"],
+ Cell[22513, 782, 505, 16, 45, "Input",
CellTags->"Kummer",
CellID->598392912],
- Cell[22318, 783, 727, 24, 64, "Output",
- CellTags->"Kummer",
- CellID->976219709],
- Cell[23082, 812, 648, 20, 45, "Input",
+ Cell[23021, 800, 707, 23, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[23765, 828, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1367394877],
- Cell[23733, 834, 871, 25, 114, "Output",
- CellTags->"Kummer",
- CellID->922572585],
- Cell[24641, 864, 506, 16, 45, "Input",
+ Cell[24416, 850, 851, 24, 99, "Output",
+ CellTags->"Kummer"],
+ Cell[25304, 879, 506, 16, 45, "Input",
CellTags->"Kummer",
CellID->2076771032],
- Cell[25150, 882, 650, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->1393980026],
- Cell[25837, 908, 647, 20, 45, "Input",
+ Cell[25813, 897, 629, 20, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[26479, 922, 647, 20, 45, "Input",
CellTags->"Kummer",
CellID->860912097],
- Cell[26487, 930, 916, 27, 114, "Output",
- CellTags->"Kummer",
- CellID->1288498782],
- Cell[27440, 962, 506, 16, 45, "Input",
+ Cell[27129, 944, 895, 26, 99, "Output",
+ CellTags->"Kummer"],
+ Cell[28061, 975, 506, 16, 45, "Input",
CellTags->"Kummer",
CellID->1768264658],
- Cell[27949, 980, 650, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->2121590638],
- Cell[28636, 1006, 648, 20, 45, "Input",
+ Cell[28570, 993, 629, 20, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[29236, 1018, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1824141612],
- Cell[29287, 1028, 807, 24, 64, "Output",
- CellTags->"Kummer",
- CellID->1992183596],
- Cell[30131, 1057, 549, 16, 45, "Input",
+ Cell[29887, 1040, 786, 23, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[30710, 1068, 549, 16, 45, "Input",
CellTags->"Kummer",
CellID->748421164],
- Cell[30683, 1075, 682, 22, 40, "Output",
- CellTags->"Kummer",
- CellID->652936361],
- Cell[31402, 1102, 357, 10, 45, "Input",
+ Cell[31262, 1086, 662, 21, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[31961, 1112, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1906183256],
- Cell[31762, 1114, 559, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->1706021647],
- Cell[32358, 1137, 549, 16, 45, "Input",
+ Cell[32321, 1124, 538, 17, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[32896, 1146, 549, 16, 45, "Input",
CellTags->"Kummer",
CellID->151044707],
- Cell[32910, 1155, 738, 23, 60, "Output",
- CellTags->"Kummer",
- CellID->378032271],
- Cell[33685, 1183, 357, 10, 45, "Input",
+ Cell[33448, 1164, 718, 22, 54, "Output",
+ CellTags->"Kummer"],
+ Cell[34203, 1191, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1217870653],
- Cell[34045, 1195, 548, 18, 60, "Output",
- CellTags->"Kummer",
- CellID->2057626251],
- Cell[34630, 1218, 550, 16, 45, "Input",
+ Cell[34563, 1203, 527, 17, 54, "Output",
+ CellTags->"Kummer"],
+ Cell[35127, 1225, 550, 16, 45, "Input",
CellTags->"Kummer",
CellID->1953071601],
- Cell[35183, 1236, 738, 23, 60, "Output",
- CellTags->"Kummer",
- CellID->129109138],
- Cell[35958, 1264, 357, 10, 45, "Input",
+ Cell[35680, 1243, 718, 22, 54, "Output",
+ CellTags->"Kummer"],
+ Cell[36435, 1270, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1999495516],
- Cell[36318, 1276, 547, 18, 60, "Output",
- CellTags->"Kummer",
- CellID->149180370],
- Cell[36902, 1299, 600, 18, 45, "Input",
+ Cell[36795, 1282, 527, 17, 54, "Output",
+ CellTags->"Kummer"],
+ Cell[37359, 1304, 600, 18, 45, "Input",
CellTags->"Kummer",
CellID->834381322],
- Cell[37505, 1319, 714, 20, 39, "Output",
- CellTags->"Kummer",
- CellID->1291617006],
- Cell[38256, 1344, 408, 12, 45, "Input",
+ Cell[37962, 1324, 693, 19, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[38692, 1348, 408, 12, 45, "Input",
CellTags->"Kummer",
CellID->2015364677],
- Cell[38667, 1358, 558, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->467825582],
- Cell[39262, 1381, 599, 18, 45, "Input",
+ Cell[39103, 1362, 538, 17, 41, "Output",
+ CellTags->"Kummer"],
+ Cell[39678, 1384, 599, 18, 45, "Input",
CellTags->"Kummer",
CellID->71156327],
- Cell[39864, 1401, 817, 23, 84, "Output",
- CellTags->"Kummer",
- CellID->1418885380],
- Cell[40718, 1429, 407, 12, 45, "Input",
+ Cell[40280, 1404, 796, 22, 78, "Output",
+ CellTags->"Kummer"],
+ Cell[41113, 1431, 407, 12, 45, "Input",
CellTags->"Kummer",
CellID->899498003],
- Cell[41128, 1443, 599, 19, 64, "Output",
- CellTags->"Kummer",
- CellID->1820473911],
- Cell[41764, 1467, 600, 18, 45, "Input",
+ Cell[41523, 1445, 578, 18, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[42138, 1468, 600, 18, 45, "Input",
CellTags->"Kummer",
CellID->735406262],
- Cell[42367, 1487, 759, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->1271802490],
- Cell[43163, 1513, 407, 12, 45, "Input",
+ Cell[42741, 1488, 738, 20, 78, "Output",
+ CellTags->"Kummer"],
+ Cell[43516, 1513, 407, 12, 45, "Input",
CellTags->"Kummer",
CellID->812767727],
- Cell[43573, 1527, 541, 17, 64, "Output",
- CellTags->"Kummer",
- CellID->1670296832],
- Cell[44151, 1549, 357, 10, 45, "Input",
+ Cell[43926, 1527, 520, 16, 57, "Output",
+ CellTags->"Kummer"],
+ Cell[44483, 1548, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1807092891],
- Cell[44511, 1561, 1418, 47, 146, "Output",
- CellTags->"Kummer",
- CellID->1552242027],
- Cell[45966, 1613, 356, 10, 45, "Input",
+ Cell[44843, 1560, 1397, 46, 133, "Output",
+ CellTags->"Kummer"],
+ Cell[46277, 1611, 356, 10, 45, "Input",
CellTags->"Kummer",
CellID->434139577],
- Cell[46325, 1625, 1477, 50, 146, "Output",
- CellTags->"Kummer",
- CellID->449279839],
- Cell[47839, 1680, 356, 10, 45, "Input",
+ Cell[46636, 1623, 1457, 49, 149, "Output",
+ CellTags->"Kummer"],
+ Cell[48130, 1677, 356, 10, 45, "Input",
CellTags->"Kummer",
CellID->467969472],
- Cell[48198, 1692, 1504, 50, 146, "Output",
- CellTags->"Kummer",
- CellID->1951010163],
- Cell[50070, 1765, 250, 9, 32, "Text",
- CellTags->"Kummer",
- CellID->1248445733]}
+ Cell[48489, 1689, 1483, 49, 149, "Output",
+ CellTags->"Kummer"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 52303, 1824},
- {"Kummer", 52435, 1828}
+ {"PrimaryExamplesSection", 52520, 1818},
+ {"Kummer", 52654, 1822}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2236, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3010, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2817, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2869, 78, 576, 15, 98, "Usage",
+Cell[3591, 97, 283, 11, 45, "ObjectNameGrid"],
+Cell[3877, 110, 576, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3470, 97, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4478, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->451429310],
+ CellID->1622183496],
Cell[CellGroupData[{
-Cell[3882, 116, 194, 6, 25, "ExampleSection",
- CellID->22536900],
+Cell[4891, 148, 195, 6, 26, "ExampleSection",
+ CellID->842763816],
Cell[CellGroupData[{
-Cell[4101, 126, 354, 10, 45, "Input",
+Cell[5111, 158, 354, 10, 27, "Input",
CellTags->"Kummer",
CellID->318247247],
-Cell[4458, 138, 557, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->780995976]
+Cell[5468, 170, 537, 17, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5052, 161, 355, 10, 45, "Input",
+Cell[6042, 192, 355, 10, 27, "Input",
CellTags->"Kummer",
CellID->1547382498],
-Cell[5410, 173, 572, 19, 60, "Output",
- CellTags->"Kummer",
- CellID->334128730]
+Cell[6400, 204, 552, 18, 54, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6019, 197, 353, 10, 45, "Input",
+Cell[6989, 227, 353, 10, 27, "Input",
CellTags->"Kummer",
CellID->87779889],
-Cell[6375, 209, 573, 19, 60, "Output",
- CellTags->"Kummer",
- CellID->1379521301]
+Cell[7345, 239, 552, 18, 54, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6985, 233, 405, 12, 45, "Input",
+Cell[7934, 262, 405, 12, 45, "Input",
CellTags->"Kummer",
CellID->196494184],
-Cell[7393, 247, 558, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->1681078809]
+Cell[8342, 276, 537, 17, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7988, 270, 496, 14, 45, "Input",
+Cell[8916, 298, 496, 14, 45, "Input",
CellTags->"Kummer",
CellID->793293677],
-Cell[8487, 286, 636, 19, 39, "Output",
- CellTags->"Kummer",
- CellID->583730114]
+Cell[9415, 314, 616, 18, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9160, 310, 404, 12, 45, "Input",
+Cell[10068, 337, 404, 12, 45, "Input",
CellTags->"Kummer",
CellID->39664086],
-Cell[9567, 324, 539, 17, 64, "Output",
- CellTags->"Kummer",
- CellID->282378053]
+Cell[10475, 351, 519, 16, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10143, 346, 496, 14, 45, "Input",
+Cell[11031, 372, 496, 14, 45, "Input",
CellTags->"Kummer",
CellID->326626360],
-Cell[10642, 362, 653, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->593894309]
+Cell[11530, 388, 633, 20, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11332, 388, 406, 12, 45, "Input",
+Cell[12200, 413, 406, 12, 45, "Input",
CellTags->"Kummer",
CellID->2096680953],
-Cell[11741, 402, 539, 17, 64, "Output",
- CellTags->"Kummer",
- CellID->658206917]
+Cell[12609, 427, 519, 16, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12317, 424, 497, 14, 45, "Input",
+Cell[13165, 448, 497, 14, 45, "Input",
CellTags->"Kummer",
CellID->1606284055],
-Cell[12817, 440, 653, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->884891760]
+Cell[13665, 464, 633, 20, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13507, 466, 506, 16, 45, "Input",
+Cell[14335, 489, 506, 16, 45, "Input",
CellTags->"Kummer",
CellID->1495083835],
-Cell[14016, 484, 728, 24, 64, "Output",
- CellTags->"Kummer",
- CellID->1201929686]
+Cell[14844, 507, 707, 23, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14781, 513, 648, 20, 45, "Input",
+Cell[15588, 535, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->2086065203],
-Cell[15432, 535, 829, 26, 114, "Output",
- CellTags->"Kummer",
- CellID->1407407771]
+Cell[16239, 557, 808, 25, 99, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16298, 566, 505, 16, 45, "Input",
+Cell[17084, 587, 505, 16, 45, "Input",
CellTags->"Kummer",
CellID->764355789],
-Cell[16806, 584, 699, 23, 63, "Output",
- CellTags->"Kummer",
- CellID->171828604]
+Cell[17592, 605, 679, 22, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17542, 612, 648, 20, 45, "Input",
+Cell[18308, 632, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1556461178],
-Cell[18193, 634, 814, 27, 63, "Output",
- CellTags->"Kummer",
- CellID->1340266483]
+Cell[18959, 654, 793, 26, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19044, 666, 505, 16, 45, "Input",
+Cell[19789, 685, 505, 16, 45, "Input",
CellTags->"Kummer",
CellID->487619941],
-Cell[19552, 684, 676, 22, 64, "Output",
- CellTags->"Kummer",
- CellID->1878402139]
+Cell[20297, 703, 655, 21, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20265, 711, 648, 20, 45, "Input",
+Cell[20989, 729, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1099088563],
-Cell[20916, 733, 857, 27, 114, "Output",
- CellTags->"Kummer",
- CellID->1646537872]
+Cell[21640, 751, 836, 26, 99, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21810, 765, 505, 16, 45, "Input",
+Cell[22513, 782, 505, 16, 45, "Input",
CellTags->"Kummer",
CellID->598392912],
-Cell[22318, 783, 727, 24, 64, "Output",
- CellTags->"Kummer",
- CellID->976219709]
+Cell[23021, 800, 707, 23, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23082, 812, 648, 20, 45, "Input",
+Cell[23765, 828, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1367394877],
-Cell[23733, 834, 871, 25, 114, "Output",
- CellTags->"Kummer",
- CellID->922572585]
+Cell[24416, 850, 851, 24, 99, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24641, 864, 506, 16, 45, "Input",
+Cell[25304, 879, 506, 16, 45, "Input",
CellTags->"Kummer",
CellID->2076771032],
-Cell[25150, 882, 650, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->1393980026]
+Cell[25813, 897, 629, 20, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25837, 908, 647, 20, 45, "Input",
+Cell[26479, 922, 647, 20, 45, "Input",
CellTags->"Kummer",
CellID->860912097],
-Cell[26487, 930, 916, 27, 114, "Output",
- CellTags->"Kummer",
- CellID->1288498782]
+Cell[27129, 944, 895, 26, 99, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[27440, 962, 506, 16, 45, "Input",
+Cell[28061, 975, 506, 16, 45, "Input",
CellTags->"Kummer",
CellID->1768264658],
-Cell[27949, 980, 650, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->2121590638]
+Cell[28570, 993, 629, 20, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[28636, 1006, 648, 20, 45, "Input",
+Cell[29236, 1018, 648, 20, 45, "Input",
CellTags->"Kummer",
CellID->1824141612],
-Cell[29287, 1028, 807, 24, 64, "Output",
- CellTags->"Kummer",
- CellID->1992183596]
+Cell[29887, 1040, 786, 23, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[30131, 1057, 549, 16, 45, "Input",
+Cell[30710, 1068, 549, 16, 45, "Input",
CellTags->"Kummer",
CellID->748421164],
-Cell[30683, 1075, 682, 22, 40, "Output",
- CellTags->"Kummer",
- CellID->652936361]
+Cell[31262, 1086, 662, 21, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[31402, 1102, 357, 10, 45, "Input",
+Cell[31961, 1112, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1906183256],
-Cell[31762, 1114, 559, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->1706021647]
+Cell[32321, 1124, 538, 17, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[32358, 1137, 549, 16, 45, "Input",
+Cell[32896, 1146, 549, 16, 45, "Input",
CellTags->"Kummer",
CellID->151044707],
-Cell[32910, 1155, 738, 23, 60, "Output",
- CellTags->"Kummer",
- CellID->378032271]
+Cell[33448, 1164, 718, 22, 54, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[33685, 1183, 357, 10, 45, "Input",
+Cell[34203, 1191, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1217870653],
-Cell[34045, 1195, 548, 18, 60, "Output",
- CellTags->"Kummer",
- CellID->2057626251]
+Cell[34563, 1203, 527, 17, 54, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[34630, 1218, 550, 16, 45, "Input",
+Cell[35127, 1225, 550, 16, 45, "Input",
CellTags->"Kummer",
CellID->1953071601],
-Cell[35183, 1236, 738, 23, 60, "Output",
- CellTags->"Kummer",
- CellID->129109138]
+Cell[35680, 1243, 718, 22, 54, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[35958, 1264, 357, 10, 45, "Input",
+Cell[36435, 1270, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1999495516],
-Cell[36318, 1276, 547, 18, 60, "Output",
- CellTags->"Kummer",
- CellID->149180370]
+Cell[36795, 1282, 527, 17, 54, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[36902, 1299, 600, 18, 45, "Input",
+Cell[37359, 1304, 600, 18, 45, "Input",
CellTags->"Kummer",
CellID->834381322],
-Cell[37505, 1319, 714, 20, 39, "Output",
- CellTags->"Kummer",
- CellID->1291617006]
+Cell[37962, 1324, 693, 19, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[38256, 1344, 408, 12, 45, "Input",
+Cell[38692, 1348, 408, 12, 45, "Input",
CellTags->"Kummer",
CellID->2015364677],
-Cell[38667, 1358, 558, 18, 40, "Output",
- CellTags->"Kummer",
- CellID->467825582]
+Cell[39103, 1362, 538, 17, 41, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[39262, 1381, 599, 18, 45, "Input",
+Cell[39678, 1384, 599, 18, 45, "Input",
CellTags->"Kummer",
CellID->71156327],
-Cell[39864, 1401, 817, 23, 84, "Output",
- CellTags->"Kummer",
- CellID->1418885380]
+Cell[40280, 1404, 796, 22, 78, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[40718, 1429, 407, 12, 45, "Input",
+Cell[41113, 1431, 407, 12, 45, "Input",
CellTags->"Kummer",
CellID->899498003],
-Cell[41128, 1443, 599, 19, 64, "Output",
- CellTags->"Kummer",
- CellID->1820473911]
+Cell[41523, 1445, 578, 18, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[41764, 1467, 600, 18, 45, "Input",
+Cell[42138, 1468, 600, 18, 45, "Input",
CellTags->"Kummer",
CellID->735406262],
-Cell[42367, 1487, 759, 21, 64, "Output",
- CellTags->"Kummer",
- CellID->1271802490]
+Cell[42741, 1488, 738, 20, 78, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[43163, 1513, 407, 12, 45, "Input",
+Cell[43516, 1513, 407, 12, 45, "Input",
CellTags->"Kummer",
CellID->812767727],
-Cell[43573, 1527, 541, 17, 64, "Output",
- CellTags->"Kummer",
- CellID->1670296832]
+Cell[43926, 1527, 520, 16, 57, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[44151, 1549, 357, 10, 45, "Input",
+Cell[44483, 1548, 357, 10, 45, "Input",
CellTags->"Kummer",
CellID->1807092891],
-Cell[44511, 1561, 1418, 47, 146, "Output",
- CellTags->"Kummer",
- CellID->1552242027]
+Cell[44843, 1560, 1397, 46, 133, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[45966, 1613, 356, 10, 45, "Input",
+Cell[46277, 1611, 356, 10, 45, "Input",
CellTags->"Kummer",
CellID->434139577],
-Cell[46325, 1625, 1477, 50, 146, "Output",
- CellTags->"Kummer",
- CellID->449279839]
+Cell[46636, 1623, 1457, 49, 149, "Output",
+ CellTags->"Kummer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[47839, 1680, 356, 10, 45, "Input",
+Cell[48130, 1677, 356, 10, 45, "Input",
CellTags->"Kummer",
CellID->467969472],
-Cell[48198, 1692, 1504, 50, 146, "Output",
- CellTags->"Kummer",
- CellID->1951010163]
+Cell[48489, 1689, 1483, 49, 149, "Output",
+ CellTags->"Kummer"]
}, Open ]]
}, Open ]],
-Cell[49729, 1746, 31, 0, 29, "SectionFooterSpacer"]
+Cell[49999, 1742, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[49797, 1751, 270, 12, 31, "SeeAlsoSection",
+Cell[50067, 1747, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[50070, 1765, 250, 9, 32, "Text",
- CellTags->"Kummer",
- CellID->1248445733]
+Cell[50340, 1761, 211, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[50335, 1777, 23, 0, 42, "FooterCell"]
+Cell[50566, 1771, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LC.nb
index a28a84c50..b2a28c0f4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LC.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LC.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14354, 536]
-NotebookOptionsPosition[ 9450, 370]
-NotebookOutlinePosition[ 12685, 467]
-CellTagsIndexPosition[ 12579, 461]
+NotebookDataLength[ 15341, 559]
+NotebookOptionsPosition[ 10753, 409]
+NotebookOutlinePosition[ 13837, 499]
+CellTagsIndexPosition[ 13731, 493]
WindowTitle->LC
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LC\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LC"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/LC.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97927],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/LC",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Eps\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"], "\<\"LCD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LCD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/LC.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$178109],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/LC",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,18 +96,39 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LC", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"LC", "[",
RowBox[{"m", ",", "n", ",", "r", ",", "s"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "evaluates to 4-dimensional LeviCivita[m,n,r,s] by virtue of applying \
-FeynCalcInternal. LC[m,...][p, ...] evaluates to 4-dimensional \
-LeviCivita[m,...][p,...] applying FeynCalcInternal."
+ " \[LineSeparator]evaluates to 4-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Epsilon]",
+ RowBox[{"m", " ", "n", " ", "r", " ", "s"}]]], "InlineFormula"],
+ " by virtue of applying FeynCalcInternal. LC[m,...][p, ...] evaluates to \
+4-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Epsilon]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"m", " ", ".."}], " ", "\[Mu]"}], " ", ".."}]],
+ SubscriptBox["p",
+ RowBox[{"\[Mu]", " ", ".."}]]}]], "InlineFormula"],
+ " applying FeynCalcInternal."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -110,7 +154,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->151617198],
+ CellID->2053325263],
Cell[CellGroupData[{
@@ -120,7 +164,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1072283782],
+ CellID->427460382],
Cell[CellGroupData[{
@@ -134,7 +178,8 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -152,12 +197,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{53, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LC",
- CellLabel->"Out[1]=",
- CellID->1184653612]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -170,7 +214,8 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -188,12 +233,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{53, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LC",
- CellLabel->"Out[2]=",
- CellID->513333789]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -211,12 +255,11 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Rho]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Sigma]", "]"}]}], "]"}]], "Output",
- ImageSize->{575, 15},
+ ImageSize->{306, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LC",
- CellLabel->"Out[3]//StandardForm=",
- CellID->979116929]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -232,7 +275,8 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -252,12 +296,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 21},
+ ImageSize->{61, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LC",
- CellLabel->"Out[4]=",
- CellID->1590586499]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -276,12 +319,11 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}], ",",
RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]], "Output",
- ImageSize->{513, 15},
+ ImageSize->{516, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LC",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1014807484]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -320,12 +362,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{68, 18},
+ ImageSize->{78, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LC",
- CellLabel->"Out[6]=",
- CellID->218829035]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -349,10 +390,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["LeviCivita",
+ StyleBox[ButtonBox["Eps",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeviCivita",
- ButtonNote->"LeviCivita"],
+ ButtonData->"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["LCD",
@@ -361,9 +402,7 @@ Cell[TextData[{
ButtonNote->"LCD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LC",
- CellID->283409041]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -380,22 +419,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 0.751151}",
+ "built" -> "{2020, 1, 5, 18, 59, 26.975298}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "LC[m, n, r, s] evaluates to 4-dimensional LeviCivita[m,n,r,s] by virtue \
+ "LC[m, n, r, s] evaluates to 4-dimensional \\[Epsilon] m n r s by virtue \
of applying FeynCalcInternal. LC[m,...][p, ...] evaluates to 4-dimensional \
-LeviCivita[m,...][p,...] applying FeynCalcInternal.", "synonyms" -> {},
- "title" -> "LC", "titlemodifier" -> "", "windowtitle" -> "LC", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/LC"}, "SearchTextTranslated" -> ""},
+\\[Epsilon] m .. \\[Mu] .. p \\[Mu] .. applying FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "LC", "titlemodifier" ->
+ "", "windowtitle" -> "LC", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/LC"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -403,8 +443,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -413,131 +454,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3455, 97, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4864, 141, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->151617198]},
+ CellID->2053325263]},
"LC"->{
- Cell[4088, 126, 181, 6, 27, "Input",
+ Cell[5497, 170, 181, 6, 27, "Input",
CellTags->"LC",
CellID->230950391],
- Cell[4272, 134, 582, 25, 39, "Output",
- CellTags->"LC",
- CellID->1184653612],
- Cell[4891, 164, 111, 4, 27, "Input",
+ Cell[5681, 178, 585, 25, 35, "Output",
+ CellTags->"LC"],
+ Cell[6303, 208, 111, 4, 27, "Input",
CellTags->"LC",
CellID->92802358],
- Cell[5005, 170, 581, 25, 39, "Output",
- CellTags->"LC",
- CellID->513333789],
- Cell[5623, 200, 122, 4, 27, "Input",
+ Cell[6417, 214, 585, 25, 35, "Output",
+ CellTags->"LC"],
+ Cell[7039, 244, 122, 4, 27, "Input",
CellTags->"LC",
CellID->1961193735],
- Cell[5748, 206, 442, 12, 49, "Output",
- CellTags->"LC",
- CellID->979116929],
- Cell[6227, 223, 199, 7, 27, "Input",
+ Cell[7164, 250, 422, 11, 69, "Output",
+ CellTags->"LC"],
+ Cell[7623, 266, 199, 7, 27, "Input",
CellTags->"LC",
CellID->1694017561],
- Cell[6429, 232, 626, 27, 42, "Output",
- CellTags->"LC",
- CellID->1590586499],
- Cell[7092, 264, 147, 5, 27, "Input",
+ Cell[7825, 275, 629, 27, 38, "Output",
+ CellTags->"LC"],
+ Cell[8491, 307, 147, 5, 27, "Input",
CellTags->"LC",
CellID->918021002],
- Cell[7242, 271, 423, 12, 49, "Output",
- CellTags->"LC",
- CellID->1014807484],
- Cell[7702, 288, 399, 14, 27, "Input",
+ Cell[8641, 314, 402, 11, 51, "Output",
+ CellTags->"LC"],
+ Cell[9080, 330, 399, 14, 27, "Input",
CellTags->"LC",
CellID->1267409184],
- Cell[8104, 304, 565, 23, 39, "Output",
- CellTags->"LC",
- CellID->218829035],
- Cell[9037, 350, 371, 15, 70, "Text",
- CellTags->"LC",
- CellID->283409041]}
+ Cell[9482, 346, 545, 22, 37, "Output",
+ CellTags->"LC"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11356, 414},
- {"LC", 11484, 418}
+ {"PrimaryExamplesSection", 12722, 455},
+ {"LC", 12852, 459}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3058, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2810, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 572, 15, 99, "Usage",
+Cell[3635, 98, 279, 11, 45, "ObjectNameGrid"],
+Cell[3917, 111, 922, 26, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3455, 97, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4864, 141, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->151617198],
+ CellID->2053325263],
Cell[CellGroupData[{
-Cell[3867, 116, 196, 6, 25, "ExampleSection",
- CellID->1072283782],
+Cell[5277, 160, 195, 6, 26, "ExampleSection",
+ CellID->427460382],
Cell[CellGroupData[{
-Cell[4088, 126, 181, 6, 27, "Input",
+Cell[5497, 170, 181, 6, 27, "Input",
CellTags->"LC",
CellID->230950391],
-Cell[4272, 134, 582, 25, 39, "Output",
- CellTags->"LC",
- CellID->1184653612]
+Cell[5681, 178, 585, 25, 35, "Output",
+ CellTags->"LC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4891, 164, 111, 4, 27, "Input",
+Cell[6303, 208, 111, 4, 27, "Input",
CellTags->"LC",
CellID->92802358],
-Cell[5005, 170, 581, 25, 39, "Output",
- CellTags->"LC",
- CellID->513333789]
+Cell[6417, 214, 585, 25, 35, "Output",
+ CellTags->"LC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5623, 200, 122, 4, 27, "Input",
+Cell[7039, 244, 122, 4, 27, "Input",
CellTags->"LC",
CellID->1961193735],
-Cell[5748, 206, 442, 12, 49, "Output",
- CellTags->"LC",
- CellID->979116929]
+Cell[7164, 250, 422, 11, 69, "Output",
+ CellTags->"LC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6227, 223, 199, 7, 27, "Input",
+Cell[7623, 266, 199, 7, 27, "Input",
CellTags->"LC",
CellID->1694017561],
-Cell[6429, 232, 626, 27, 42, "Output",
- CellTags->"LC",
- CellID->1590586499]
+Cell[7825, 275, 629, 27, 38, "Output",
+ CellTags->"LC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7092, 264, 147, 5, 27, "Input",
+Cell[8491, 307, 147, 5, 27, "Input",
CellTags->"LC",
CellID->918021002],
-Cell[7242, 271, 423, 12, 49, "Output",
- CellTags->"LC",
- CellID->1014807484]
+Cell[8641, 314, 402, 11, 51, "Output",
+ CellTags->"LC"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7702, 288, 399, 14, 27, "Input",
+Cell[9080, 330, 399, 14, 27, "Input",
CellTags->"LC",
CellID->1267409184],
-Cell[8104, 304, 565, 23, 39, "Output",
- CellTags->"LC",
- CellID->218829035]
+Cell[9482, 346, 545, 22, 37, "Output",
+ CellTags->"LC"]
}, Open ]]
}, Open ]],
-Cell[8696, 331, 31, 0, 70, "SectionFooterSpacer"]
+Cell[10054, 372, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8764, 336, 270, 12, 70, "SeeAlsoSection",
+Cell[10122, 377, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9037, 350, 371, 15, 70, "Text",
- CellTags->"LC",
- CellID->283409041]
+Cell[10395, 391, 316, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[9423, 368, 23, 0, 70, "FooterCell"]
+Cell[10726, 407, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LCD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LCD.nb
index f95058054..5ba193ba0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LCD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LCD.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16207, 602]
-NotebookOptionsPosition[ 10641, 414]
-NotebookOutlinePosition[ 14257, 522]
-CellTagsIndexPosition[ 14150, 516]
+NotebookDataLength[ 14578, 521]
+NotebookOptionsPosition[ 10284, 383]
+NotebookOutlinePosition[ 13233, 468]
+CellTagsIndexPosition[ 13126, 462]
WindowTitle->LCD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LCD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LCD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/LCD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97579],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/LCD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Eps\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"], "\<\"LC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LC"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LCD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LCD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/LCD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$177664],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/LCD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +96,39 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LCD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LCD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"LCD", "[",
RowBox[{"m", ",", "n", ",", "r", ",", "s"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "evaluates to D-dimensional LeviCivita[m,n,r,s] by virtue of \
-FeynCalcInternal. LCD[m,...][p, ...] evaluates to D-dimensional \
-LeviCivita[m,...][p,...] applying FeynCalcInternal.\n\nYou need to do \
-SetOptions[Eps, Dimension\[Rule]D] before LCD can be used as D-dimensional \
-Levi-Civita input function."
+ " \[LineSeparator]evaluates to D-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Epsilon]",
+ RowBox[{"m", " ", "n", " ", "r", " ", "s"}]]], "InlineFormula"],
+ " by virtue of FeynCalcInternal. LCD[m,...][p, ...] evaluates to \
+D-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Epsilon]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"m", " ", ".."}], " ", "\[Mu]"}], " ", ".."}]],
+ SubscriptBox["p",
+ RowBox[{"\[Mu]", " ", ".."}]]}]], "InlineFormula"],
+ " applying FeynCalcInternal."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,7 +154,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1729963782],
+ CellID->288407350],
Cell[CellGroupData[{
@@ -122,16 +164,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1361724083],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"LCD",
- CellLabel->"In[1]:=",
- CellID->246917287],
+ CellID->1781901275],
Cell[CellGroupData[{
@@ -140,12 +173,13 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
"]"}]], "Input",
CellTags->"LCD",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->163498575],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -163,58 +197,22 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
+ ImageSize->{52, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LCD",
- CellLabel->"Out[2]=",
- CellID->1669873163]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"%", "//", "FCI"}]], "Input",
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
CellTags->"LCD",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->950730684],
-Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LCD",
- CellLabel->"Out[3]=",
- CellID->774559606]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"LCD",
- CellLabel->"In[4]:=",
- CellID->1738716456],
-
Cell[BoxData[
RowBox[{"Eps", "[",
RowBox[{
@@ -225,14 +223,12 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[",
RowBox[{"\[Rho]", ",", "D"}], "]"}], ",",
RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Sigma]", ",", "D"}], "]"}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]], "Output",
- ImageSize->{444, 33},
+ RowBox[{"\[Sigma]", ",", "D"}], "]"}]}], "]"}]], "Output",
+ ImageSize->{352, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LCD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1281931789]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,12 +239,13 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
RowBox[{"p", ",", "q"}], "]"}]], "Input",
CellTags->"LCD",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1568724284],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -266,12 +263,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{52, 17},
+ ImageSize->{56, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LCD",
- CellLabel->"Out[5]=",
- CellID->474988897]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -280,7 +276,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
CellTags->"LCD",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->531209658],
Cell[BoxData[
@@ -293,14 +289,12 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}], ",",
RowBox[{"Momentum", "[",
- RowBox[{"q", ",", "D"}], "]"}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]], "Output",
- ImageSize->{382, 33},
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}]], "Output",
+ ImageSize->{608, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LCD",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1647742492]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -318,7 +312,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], "[", "q",
"]"}]}], "]"}], "]"}]], "Input",
CellTags->"LCD",
- CellLabel->"In[7]:=",
+ CellLabel->"In[5]:=",
CellID->173575058],
Cell[BoxData[
@@ -342,34 +336,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{194, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LCD",
- CellLabel->"Out[7]=",
- CellID->932361259]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}]], "Input",
- CellTags->"LCD",
- CellLabel->"In[8]:=",
- CellID->1229900885],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Dimension", "\[Rule]", "4"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{116, 15},
+ ImageSize->{213, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LCD",
- CellLabel->"Out[8]=",
- CellID->1904977628]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -393,10 +364,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["LeviCivita",
+ StyleBox[ButtonBox["Eps",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeviCivita",
- ButtonNote->"LeviCivita"],
+ ButtonData->"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["LC",
@@ -405,17 +376,15 @@ Cell[TextData[{
ButtonNote->"LC"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LCD",
- CellID->552899823]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"LCD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -424,24 +393,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 59.254051}",
+ "built" -> "{2020, 1, 5, 18, 59, 25.757254}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "LCD[m, n, r, s] evaluates to D-dimensional LeviCivita[m,n,r,s] by virtue \
+ "LCD[m, n, r, s] evaluates to D-dimensional \\[Epsilon] m n r s by virtue \
of FeynCalcInternal. LCD[m,...][p, ...] evaluates to D-dimensional \
-LeviCivita[m,...][p,...] applying FeynCalcInternal. You need to do \
-SetOptions[Eps, Dimension->D] before LCD can be used as D-dimensional \
-Levi-Civita input function.", "synonyms" -> {}, "title" -> "LCD",
- "titlemodifier" -> "", "windowtitle" -> "LCD", "type" -> "Symbol", "uri" ->
+\\[Epsilon] m .. \\[Mu] .. p \\[Mu] .. applying FeynCalcInternal.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "LCD", "titlemodifier" ->
+ "", "windowtitle" -> "LCD", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/LCD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -449,8 +417,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -459,151 +428,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3579, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4847, 141, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1729963782]},
+ CellID->288407350]},
"LCD"->{
- Cell[4191, 126, 207, 7, 27, "Input",
- CellTags->"LCD",
- CellID->246917287],
- Cell[4423, 137, 183, 6, 27, "Input",
+ Cell[5480, 170, 183, 6, 27, "Input",
CellTags->"LCD",
CellID->163498575],
- Cell[4609, 145, 583, 25, 39, "Output",
- CellTags->"LCD",
- CellID->1669873163],
- Cell[5229, 175, 113, 4, 27, "Input",
+ Cell[5666, 178, 585, 25, 35, "Output",
+ CellTags->"LCD"],
+ Cell[6288, 208, 148, 5, 27, "Input",
CellTags->"LCD",
CellID->950730684],
- Cell[5345, 181, 582, 25, 39, "Output",
- CellTags->"LCD",
- CellID->774559606],
- Cell[5964, 211, 123, 4, 27, "Input",
- CellTags->"LCD",
- CellID->1738716456],
- Cell[6090, 217, 592, 17, 67, "Output",
- CellTags->"LCD",
- CellID->1281931789],
- Cell[6719, 239, 201, 7, 27, "Input",
+ Cell[6439, 215, 523, 15, 69, "Output",
+ CellTags->"LCD"],
+ Cell[6999, 235, 201, 7, 27, "Input",
CellTags->"LCD",
CellID->1568724284],
- Cell[6923, 248, 570, 25, 38, "Output",
- CellTags->"LCD",
- CellID->474988897],
- Cell[7530, 278, 148, 5, 27, "Input",
+ Cell[7203, 244, 573, 25, 35, "Output",
+ CellTags->"LCD"],
+ Cell[7813, 274, 148, 5, 27, "Input",
CellTags->"LCD",
CellID->531209658],
- Cell[7681, 285, 572, 17, 67, "Output",
- CellTags->"LCD",
- CellID->1647742492],
- Cell[8290, 307, 417, 14, 27, "Input",
+ Cell[7964, 281, 503, 15, 51, "Output",
+ CellTags->"LCD"],
+ Cell[8504, 301, 417, 14, 27, "Input",
CellTags->"LCD",
CellID->173575058],
- Cell[8710, 323, 657, 26, 38, "Output",
- CellTags->"LCD",
- CellID->932361259],
- Cell[9404, 354, 188, 6, 27, "Input",
- CellTags->"LCD",
- CellID->1229900885],
- Cell[9595, 362, 267, 9, 36, "Output",
- CellTags->"LCD",
- CellID->1904977628],
- Cell[10230, 394, 369, 15, 31, "Text",
- CellTags->"LCD",
- CellID->552899823]}
+ Cell[8924, 317, 637, 25, 37, "Output",
+ CellTags->"LCD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12662, 460},
- {"LCD", 12792, 464}
+ {"PrimaryExamplesSection", 12250, 429},
+ {"LCD", 12380, 433}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3046, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 690, 17, 163, "Usage",
+Cell[3624, 98, 280, 11, 45, "ObjectNameGrid"],
+Cell[3907, 111, 915, 26, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3579, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4847, 141, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1729963782],
+ CellID->288407350],
Cell[CellGroupData[{
-Cell[3992, 118, 196, 6, 25, "ExampleSection",
- CellID->1361724083],
-Cell[4191, 126, 207, 7, 27, "Input",
- CellTags->"LCD",
- CellID->246917287],
+Cell[5259, 160, 196, 6, 26, "ExampleSection",
+ CellID->1781901275],
Cell[CellGroupData[{
-Cell[4423, 137, 183, 6, 27, "Input",
+Cell[5480, 170, 183, 6, 27, "Input",
CellTags->"LCD",
CellID->163498575],
-Cell[4609, 145, 583, 25, 39, "Output",
- CellTags->"LCD",
- CellID->1669873163]
+Cell[5666, 178, 585, 25, 35, "Output",
+ CellTags->"LCD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5229, 175, 113, 4, 27, "Input",
+Cell[6288, 208, 148, 5, 27, "Input",
CellTags->"LCD",
CellID->950730684],
-Cell[5345, 181, 582, 25, 39, "Output",
- CellTags->"LCD",
- CellID->774559606]
+Cell[6439, 215, 523, 15, 69, "Output",
+ CellTags->"LCD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5964, 211, 123, 4, 27, "Input",
- CellTags->"LCD",
- CellID->1738716456],
-Cell[6090, 217, 592, 17, 67, "Output",
- CellTags->"LCD",
- CellID->1281931789]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6719, 239, 201, 7, 27, "Input",
+Cell[6999, 235, 201, 7, 27, "Input",
CellTags->"LCD",
CellID->1568724284],
-Cell[6923, 248, 570, 25, 38, "Output",
- CellTags->"LCD",
- CellID->474988897]
+Cell[7203, 244, 573, 25, 35, "Output",
+ CellTags->"LCD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7530, 278, 148, 5, 27, "Input",
+Cell[7813, 274, 148, 5, 27, "Input",
CellTags->"LCD",
CellID->531209658],
-Cell[7681, 285, 572, 17, 67, "Output",
- CellTags->"LCD",
- CellID->1647742492]
+Cell[7964, 281, 503, 15, 51, "Output",
+ CellTags->"LCD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8290, 307, 417, 14, 27, "Input",
+Cell[8504, 301, 417, 14, 27, "Input",
CellTags->"LCD",
CellID->173575058],
-Cell[8710, 323, 657, 26, 38, "Output",
- CellTags->"LCD",
- CellID->932361259]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[9404, 354, 188, 6, 27, "Input",
- CellTags->"LCD",
- CellID->1229900885],
-Cell[9595, 362, 267, 9, 36, "Output",
- CellTags->"LCD",
- CellID->1904977628]
+Cell[8924, 317, 637, 25, 37, "Output",
+ CellTags->"LCD"]
}, Open ]]
}, Open ]],
-Cell[9889, 375, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9588, 346, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9957, 380, 270, 12, 31, "SeeAlsoSection",
+Cell[9656, 351, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10230, 394, 369, 15, 31, "Text",
- CellTags->"LCD",
- CellID->552899823]
+Cell[9929, 365, 313, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[10614, 412, 23, 0, 42, "FooterCell"]
+Cell[10257, 381, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lagrangian.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lagrangian.nb
index a47f69e53..765ef2a31 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lagrangian.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lagrangian.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16976, 591]
-NotebookOptionsPosition[ 11809, 429]
-NotebookOutlinePosition[ 15314, 527]
-CellTagsIndexPosition[ 15200, 521]
+NotebookDataLength[ 17358, 595]
+NotebookOptionsPosition[ 12639, 453]
+NotebookOutlinePosition[ 15898, 541]
+CellTagsIndexPosition[ 15784, 535]
WindowTitle->Lagrangian
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Lagrangian\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Lagrangian"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Lagrangian.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97235],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Lagrangian", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynRule\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynRule"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Lagrangian\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Lagrangian"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Lagrangian.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$177220],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Lagrangian", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Lagrangian", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Lagrangian", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->169144531],
+ CellID->550561036],
Cell[CellGroupData[{
@@ -122,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->74171254],
+ CellID->612130881],
Cell[CellGroupData[{
@@ -160,17 +192,14 @@ Cell[BoxData[
FormBox[
RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{253, 41},
+ ImageSize->{254, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Lagrangian",
- CellLabel->"Out[1]=",
- CellID->2119348269]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["Twist-2 operator product expansion operators", "Text",
- CellTags->"Lagrangian",
- CellID->1898296666],
+Cell["Twist-2 operator product expansion operators", "Notes"],
Cell[CellGroupData[{
@@ -224,12 +253,11 @@ Cell[BoxData[
FormBox[
RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{355, 41},
+ ImageSize->{358, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Lagrangian",
- CellLabel->"Out[2]=",
- CellID->105197133]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -247,7 +275,8 @@ Cell[BoxData[
SuperscriptBox["\[ImaginaryI]", "m"], " ",
RowBox[{
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox[
@@ -305,12 +334,11 @@ Cell[BoxData[
FormBox[
RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{553, 41},
+ ImageSize->{559, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Lagrangian",
- CellLabel->"Out[3]=",
- CellID->658984245]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -343,12 +371,11 @@ Cell[BoxData[
RowBox[{"m", "-", "1"}]], ".",
FormBox["\[Psi]",
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{156, 21},
+ ImageSize->{156, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Lagrangian",
- CellLabel->"Out[4]=",
- CellID->2085030261]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -385,12 +412,11 @@ Cell[BoxData[
RowBox[{"m", "-", "1"}]], ".",
FormBox["\[Psi]",
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{178, 21},
+ ImageSize->{180, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Lagrangian",
- CellLabel->"Out[5]=",
- CellID->1018219384]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]],
@@ -420,9 +446,7 @@ Cell[TextData[{
ButtonNote->"FeynRule"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Lagrangian",
- CellID->1051170443]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -430,7 +454,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Lagrangian",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -439,10 +463,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 21, 57.699556}",
+ "built" -> "{2020, 1, 5, 18, 59, 24.593071}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -454,11 +478,11 @@ Lagrangian[\"ogu\"] gives the unpolarized gluon OPE operator. \
Lagrangian[\"ogp\"] gives the polarized gluon OPE operator. \
Lagrangian[\"ogd\"] gives the sigma-term part of the QCD lagrangian. \
Lagrangian[\"QCD\"] gives the gluon self interaction part of the QCD \
-lagrangian.", "synonyms" -> {}, "title" -> "Lagrangian", "titlemodifier" ->
- "", "windowtitle" -> "Lagrangian", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Lagrangian"}, "SearchTextTranslated" -> ""},
+lagrangian.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Lagrangian",
+ "titlemodifier" -> "", "windowtitle" -> "Lagrangian", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Lagrangian"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -466,8 +490,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -476,123 +501,102 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3656, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4649, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->169144531]},
+ CellID->550561036]},
"Lagrangian"->{
- Cell[4287, 128, 141, 4, 27, "Input",
+ Cell[5281, 160, 141, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->345064330],
- Cell[4431, 134, 936, 33, 62, "Output",
- CellTags->"Lagrangian",
- CellID->2119348269],
- Cell[5382, 170, 106, 2, 32, "Text",
- CellTags->"Lagrangian",
- CellID->1898296666],
- Cell[5513, 176, 142, 4, 27, "Input",
+ Cell[5425, 166, 915, 32, 56, "Output",
+ CellTags->"Lagrangian"],
+ Cell[6441, 205, 142, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->1741218479],
- Cell[5658, 182, 1382, 49, 62, "Output",
- CellTags->"Lagrangian",
- CellID->105197133],
- Cell[7077, 236, 142, 4, 27, "Input",
+ Cell[6586, 211, 1362, 48, 56, "Output",
+ CellTags->"Lagrangian"],
+ Cell[7985, 264, 142, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->1557246101],
- Cell[7222, 242, 1981, 70, 62, "Output",
- CellTags->"Lagrangian",
- CellID->658984245],
- Cell[9240, 317, 141, 4, 27, "Input",
+ Cell[8130, 270, 1988, 70, 56, "Output",
+ CellTags->"Lagrangian"],
+ Cell[10155, 345, 141, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->249786913],
- Cell[9384, 323, 748, 27, 42, "Output",
- CellTags->"Lagrangian",
- CellID->2085030261],
- Cell[10169, 355, 142, 4, 27, "Input",
+ Cell[10299, 351, 727, 26, 40, "Output",
+ CellTags->"Lagrangian"],
+ Cell[11063, 382, 142, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->1220998815],
- Cell[10314, 361, 855, 31, 42, "Output",
- CellTags->"Lagrangian",
- CellID->1018219384],
- Cell[11537, 415, 230, 9, 32, "Text",
- CellTags->"Lagrangian",
- CellID->1051170443]}
+ Cell[11208, 388, 834, 30, 40, "Output",
+ CellTags->"Lagrangian"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13951, 477},
- {"Lagrangian", 14087, 481}
+ {"PrimaryExamplesSection", 14824, 502},
+ {"Lagrangian", 14961, 506}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3011, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 738, 17, 131, "Usage",
+Cell[3596, 97, 287, 11, 45, "ObjectNameGrid"],
+Cell[3886, 110, 738, 17, 136, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3656, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4649, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->169144531],
+ CellID->550561036],
Cell[CellGroupData[{
-Cell[4068, 118, 194, 6, 25, "ExampleSection",
- CellID->74171254],
+Cell[5061, 150, 195, 6, 26, "ExampleSection",
+ CellID->612130881],
Cell[CellGroupData[{
-Cell[4287, 128, 141, 4, 27, "Input",
+Cell[5281, 160, 141, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->345064330],
-Cell[4431, 134, 936, 33, 62, "Output",
- CellTags->"Lagrangian",
- CellID->2119348269]
+Cell[5425, 166, 915, 32, 56, "Output",
+ CellTags->"Lagrangian"]
}, Open ]],
-Cell[5382, 170, 106, 2, 32, "Text",
- CellTags->"Lagrangian",
- CellID->1898296666],
+Cell[6355, 201, 61, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5513, 176, 142, 4, 27, "Input",
+Cell[6441, 205, 142, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->1741218479],
-Cell[5658, 182, 1382, 49, 62, "Output",
- CellTags->"Lagrangian",
- CellID->105197133]
+Cell[6586, 211, 1362, 48, 56, "Output",
+ CellTags->"Lagrangian"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7077, 236, 142, 4, 27, "Input",
+Cell[7985, 264, 142, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->1557246101],
-Cell[7222, 242, 1981, 70, 62, "Output",
- CellTags->"Lagrangian",
- CellID->658984245]
+Cell[8130, 270, 1988, 70, 56, "Output",
+ CellTags->"Lagrangian"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9240, 317, 141, 4, 27, "Input",
+Cell[10155, 345, 141, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->249786913],
-Cell[9384, 323, 748, 27, 42, "Output",
- CellTags->"Lagrangian",
- CellID->2085030261]
+Cell[10299, 351, 727, 26, 40, "Output",
+ CellTags->"Lagrangian"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10169, 355, 142, 4, 27, "Input",
+Cell[11063, 382, 142, 4, 27, "Input",
CellTags->"Lagrangian",
CellID->1220998815],
-Cell[10314, 361, 855, 31, 42, "Output",
- CellTags->"Lagrangian",
- CellID->1018219384]
+Cell[11208, 388, 834, 30, 40, "Output",
+ CellTags->"Lagrangian"]
}, Open ]]
}, Open ]],
-Cell[11196, 396, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12069, 422, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11264, 401, 270, 12, 31, "SeeAlsoSection",
+Cell[12137, 427, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[11537, 415, 230, 9, 32, "Text",
- CellTags->"Lagrangian",
- CellID->1051170443]
+Cell[12410, 441, 187, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[11782, 427, 23, 0, 42, "FooterCell"]
+Cell[12612, 451, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftPartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftPartialD.nb
index 8655603bd..aed5ec426 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftPartialD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftPartialD.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17119, 614]
-NotebookOptionsPosition[ 11357, 428]
-NotebookOutlinePosition[ 15012, 534]
-CellTagsIndexPosition[ 14896, 528]
+NotebookDataLength[ 17673, 620]
+NotebookOptionsPosition[ 12503, 458]
+NotebookOutlinePosition[ 15858, 553]
+CellTagsIndexPosition[ 15742, 547]
WindowTitle->LeftPartialD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LeftPartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LeftPartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"FCPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPartialD"], "\<\"LeftRightPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftRightPartialD"], "\<\"RightPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RightPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LeftPartialD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LeftPartialD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
LeftPartialD.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$98269],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/LeftPartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$178551],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/LeftPartialD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ LeftPartialD.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LeftPartialD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LeftPartialD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,7 +154,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->635621775],
+ CellID->797566762],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -124,13 +164,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1554178979],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"LeftPartialD",
- CellID->112576831],
+ CellID->1164783384],
Cell[CellGroupData[{
@@ -158,12 +192,11 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 27},
+ ImageSize->{47, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[1]=",
- CellID->830365091]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -177,24 +210,24 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], TraditionalForm]], "Output",
- ImageSize->{39, 19},
+ TraditionalForm]], ")"}], TraditionalForm]], "Output",
+ ImageSize->{57, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[2]=",
- CellID->1758698798]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -211,12 +244,11 @@ Cell[BoxData[
RowBox[{"FCPartialD", "[",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",", "A", ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]], "Output",
- ImageSize->{497, 15},
+ ImageSize->{500, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1222822570]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -231,12 +263,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"LeftPartialD", "[",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Output",
- ImageSize->{239, 15},
+ ImageSize->{242, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->2010768027]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -273,12 +304,11 @@ Cell[BoxData[
FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 27},
+ ImageSize->{72, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[5]=",
- CellID->1721340260]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -298,44 +328,47 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "+",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}], ".",
SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{133, 19},
+ ImageSize->{200, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[6]=",
- CellID->1229859500]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -366,16 +399,15 @@ Cell[BoxData[
RowBox[{"QuantumField", "[",
RowBox[{"A", ",",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}]}]}]], "Output",
- ImageSize->{525, 67},
+ ImageSize->{528, 67},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftPartialD",
- CellLabel->"Out[7]//StandardForm=",
- CellID->296675662]
+ CellLabel->"Out[7]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -419,9 +451,7 @@ Cell[TextData[{
ButtonNote->"RightPartialD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LeftPartialD",
- CellID->333878293]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -429,7 +459,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"LeftPartialD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -438,10 +468,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 2.268600}",
+ "built" -> "{2020, 1, 5, 18, 59, 28.174638}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -449,11 +479,12 @@ TaggingRules->{
"None", "summary" ->
"LeftPartialD[\\[Mu]] denotes OverscriptBox[\\[PartialD], \\ \
\\[LeftArrow]]TraditionalForm\\`TraditionalForm\\`\\[Mu]acting to the left.",
- "synonyms" -> {}, "title" -> "LeftPartialD", "titlemodifier" -> "",
- "windowtitle" -> "LeftPartialD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/LeftPartialD"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "LeftPartialD",
+ "titlemodifier" -> "", "windowtitle" -> "LeftPartialD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/LeftPartialD"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -461,8 +492,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -471,151 +503,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3547, 103, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4865, 141, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->635621775]},
+ CellID->797566762]},
"LeftPartialD"->{
- Cell[4158, 130, 89, 2, 35, "Subsubsection",
- CellTags->"LeftPartialD",
- CellID->112576831],
- Cell[4272, 136, 271, 8, 27, "Input",
+ Cell[5498, 170, 271, 8, 27, "Input",
CellTags->"LeftPartialD",
CellID->1505949422],
- Cell[4546, 146, 482, 19, 48, "Output",
- CellTags->"LeftPartialD",
- CellID->830365091],
- Cell[5065, 170, 138, 4, 27, "Input",
+ Cell[5772, 180, 462, 18, 45, "Output",
+ CellTags->"LeftPartialD"],
+ Cell[6271, 203, 138, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->1429866239],
- Cell[5206, 176, 496, 20, 40, "Output",
- CellTags->"LeftPartialD",
- CellID->1758698798],
- Cell[5739, 201, 135, 4, 27, "Input",
+ Cell[6412, 209, 484, 20, 40, "Output",
+ CellTags->"LeftPartialD"],
+ Cell[6933, 234, 135, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->145865999],
- Cell[5877, 207, 399, 11, 49, "Output",
- CellTags->"LeftPartialD",
- CellID->1222822570],
- Cell[6313, 223, 179, 5, 27, "Input",
+ Cell[7071, 240, 378, 10, 51, "Output",
+ CellTags->"LeftPartialD"],
+ Cell[7486, 255, 179, 5, 27, "Input",
CellTags->"LeftPartialD",
CellID->1674572572],
- Cell[6495, 230, 282, 8, 49, "Output",
- CellTags->"LeftPartialD",
- CellID->2010768027],
- Cell[6814, 243, 390, 11, 45, "Input",
+ Cell[7668, 262, 261, 7, 51, "Output",
+ CellTags->"LeftPartialD"],
+ Cell[7966, 274, 390, 11, 45, "Input",
CellTags->"LeftPartialD",
CellID->1935363723],
- Cell[7207, 256, 593, 24, 48, "Output",
- CellTags->"LeftPartialD",
- CellID->1721340260],
- Cell[7837, 285, 138, 4, 27, "Input",
+ Cell[8359, 287, 572, 23, 45, "Output",
+ CellTags->"LeftPartialD"],
+ Cell[8968, 315, 138, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->1467469251],
- Cell[7978, 291, 1112, 46, 40, "Output",
- CellTags->"LeftPartialD",
- CellID->1229859500],
- Cell[9127, 342, 135, 4, 27, "Input",
+ Cell[9109, 321, 1191, 49, 40, "Output",
+ CellTags->"LeftPartialD"],
+ Cell[10337, 375, 135, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->692947033],
- Cell[9265, 348, 908, 25, 101, "Output",
- CellTags->"LeftPartialD",
- CellID->296675662],
- Cell[10541, 396, 774, 27, 32, "Text",
- CellTags->"LeftPartialD",
- CellID->333878293]}
+ Cell[10475, 381, 888, 24, 103, "Output",
+ CellTags->"LeftPartialD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13243, 472},
- {"LeftPartialD", 13382, 476}
+ {"PrimaryExamplesSection", 14436, 504},
+ {"LeftPartialD", 14575, 508}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2261, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3345, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2848, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2906, 78, 616, 21, 95, "Usage",
+Cell[3932, 103, 289, 11, 45, "ObjectNameGrid"],
+Cell[4224, 116, 616, 21, 95, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3547, 103, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4865, 141, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->635621775],
-Cell[3937, 120, 196, 6, 25, "ExampleSection",
- CellID->1554178979],
+ CellID->797566762],
Cell[CellGroupData[{
-Cell[4158, 130, 89, 2, 35, "Subsubsection",
- CellTags->"LeftPartialD",
- CellID->112576831],
+Cell[5277, 160, 196, 6, 26, "ExampleSection",
+ CellID->1164783384],
Cell[CellGroupData[{
-Cell[4272, 136, 271, 8, 27, "Input",
+Cell[5498, 170, 271, 8, 27, "Input",
CellTags->"LeftPartialD",
CellID->1505949422],
-Cell[4546, 146, 482, 19, 48, "Output",
- CellTags->"LeftPartialD",
- CellID->830365091]
+Cell[5772, 180, 462, 18, 45, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5065, 170, 138, 4, 27, "Input",
+Cell[6271, 203, 138, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->1429866239],
-Cell[5206, 176, 496, 20, 40, "Output",
- CellTags->"LeftPartialD",
- CellID->1758698798]
+Cell[6412, 209, 484, 20, 40, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5739, 201, 135, 4, 27, "Input",
+Cell[6933, 234, 135, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->145865999],
-Cell[5877, 207, 399, 11, 49, "Output",
- CellTags->"LeftPartialD",
- CellID->1222822570]
+Cell[7071, 240, 378, 10, 51, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6313, 223, 179, 5, 27, "Input",
+Cell[7486, 255, 179, 5, 27, "Input",
CellTags->"LeftPartialD",
CellID->1674572572],
-Cell[6495, 230, 282, 8, 49, "Output",
- CellTags->"LeftPartialD",
- CellID->2010768027]
+Cell[7668, 262, 261, 7, 51, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6814, 243, 390, 11, 45, "Input",
+Cell[7966, 274, 390, 11, 45, "Input",
CellTags->"LeftPartialD",
CellID->1935363723],
-Cell[7207, 256, 593, 24, 48, "Output",
- CellTags->"LeftPartialD",
- CellID->1721340260]
+Cell[8359, 287, 572, 23, 45, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7837, 285, 138, 4, 27, "Input",
+Cell[8968, 315, 138, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->1467469251],
-Cell[7978, 291, 1112, 46, 40, "Output",
- CellTags->"LeftPartialD",
- CellID->1229859500]
+Cell[9109, 321, 1191, 49, 40, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9127, 342, 135, 4, 27, "Input",
+Cell[10337, 375, 135, 4, 27, "Input",
CellTags->"LeftPartialD",
CellID->692947033],
-Cell[9265, 348, 908, 25, 101, "Output",
- CellTags->"LeftPartialD",
- CellID->296675662]
-}, Open ]],
-Cell[10188, 376, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10475, 381, 888, 24, 103, "Output",
+ CellTags->"LeftPartialD"]
}, Open ]]
}, Open ]],
+Cell[11390, 409, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[10268, 382, 270, 12, 31, "SeeAlsoSection",
+Cell[11458, 414, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10541, 396, 774, 27, 32, "Text",
- CellTags->"LeftPartialD",
- CellID->333878293]
+Cell[11731, 428, 730, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[11330, 426, 23, 0, 42, "FooterCell"]
+Cell[12476, 456, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD.nb
index 9c66e90ac..37de2886b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD.nb
@@ -3,69 +3,101 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17314, 613]
-NotebookOptionsPosition[ 11845, 445]
-NotebookOutlinePosition[ 15439, 544]
-CellTagsIndexPosition[ 15318, 538]
+NotebookDataLength[ 18343, 633]
+NotebookOptionsPosition[ 13307, 483]
+NotebookOutlinePosition[ 16654, 573]
+CellTagsIndexPosition[ 16533, 567]
WindowTitle->LeftRightPartialD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LeftRightPartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LeftRightPartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExplicitPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitPartialD"], "\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"FCPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPartialD"], "\<\"LeftPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftPartialD"], "\<\"LeftRightPartialD2\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftRightPartialD2"], "\<\"RightPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RightPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LeftRightPartialD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LeftRightPartialD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
LeftRightPartialD.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$98962],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/LeftRightPartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$179444],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/LeftRightPartialD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +105,18 @@ LeftRightPartialD.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LeftRightPartialD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LeftRightPartialD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,7 +167,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1628042135],
+ CellID->679018927],
Cell[CellGroupData[{
@@ -135,7 +177,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1062363671],
+ CellID->1737714940],
Cell[CellGroupData[{
@@ -153,12 +195,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{25, 27},
+ ImageSize->{24, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD",
- CellLabel->"Out[1]=",
- CellID->1132769852]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -187,12 +228,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{85, 41},
+ ImageSize->{83, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD",
- CellLabel->"Out[2]=",
- CellID->215900493]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -221,12 +261,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{47, 27},
+ ImageSize->{49, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD",
- CellLabel->"Out[3]=",
- CellID->1398421327]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -244,18 +283,19 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], "-",
+ TraditionalForm]], ")"}], "-",
RowBox[{
SubscriptBox[
OverscriptBox["\[PartialD]", "\[LeftArrow]"],
@@ -268,12 +308,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{126, 41},
+ ImageSize->{146, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD",
- CellLabel->"Out[4]=",
- CellID->1245680526]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -310,12 +349,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Rho]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{69, 27},
+ ImageSize->{74, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD",
- CellLabel->"Out[5]=",
- CellID->488945383]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -338,44 +376,47 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}]}], "-",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "-",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}], ".",
SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox["\[Rho]",
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{162, 41},
+ ImageSize->{228, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD",
- CellLabel->"Out[6]=",
- CellID->1968825715]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -399,7 +440,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ExplicitPartialD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ExplicitPartialD",
@@ -436,9 +476,7 @@ Cell[TextData[{
ButtonNote->"RightPartialD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LeftRightPartialD",
- CellID->2130291841]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -455,10 +493,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 5.391576}",
+ "built" -> "{2020, 1, 5, 18, 59, 30.726278}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -467,12 +505,12 @@ TaggingRules->{
"LeftRightPartialD[mu] denotes OverscriptBox[\\[PartialD], \\ \
\\[LeftRightArrow]]TraditionalForm\\`TraditionalForm\\`\\[Mu]\\ , acting to \
the left and right. ExplicitPartialD[LeftRightPartialD[\\[Mu]]] gives 1/2 \
-(RightPartialD[\\[Mu]] - LeftPartialD[\\[Mu]]).", "synonyms" -> {}, "title" ->
- "LeftRightPartialD", "titlemodifier" -> "", "windowtitle" ->
- "LeftRightPartialD", "type" -> "Symbol", "uri" ->
+(RightPartialD[\\[Mu]] - LeftPartialD[\\[Mu]]).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "LeftRightPartialD", "titlemodifier" -> "",
+ "windowtitle" -> "LeftRightPartialD", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/LeftRightPartialD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -481,7 +519,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -490,131 +528,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3893, 112, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5425, 154, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1628042135]},
+ CellID->679018927]},
"LeftRightPartialD"->{
- Cell[4527, 141, 149, 4, 27, "Input",
+ Cell[6058, 183, 149, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->538126232],
- Cell[4679, 147, 365, 13, 48, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1132769852],
- Cell[5081, 165, 144, 4, 27, "Input",
+ Cell[6210, 189, 344, 12, 45, "Output",
+ CellTags->"LeftRightPartialD"],
+ Cell[6591, 206, 144, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->438418910],
- Cell[5228, 171, 631, 23, 62, "Output",
- CellTags->"LeftRightPartialD",
- CellID->215900493],
- Cell[5896, 199, 281, 8, 27, "Input",
+ Cell[6738, 212, 611, 22, 56, "Output",
+ CellTags->"LeftRightPartialD"],
+ Cell[7386, 239, 281, 8, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->1906170176],
- Cell[6180, 209, 493, 19, 48, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1398421327],
- Cell[6710, 233, 142, 4, 27, "Input",
+ Cell[7670, 249, 472, 18, 45, "Output",
+ CellTags->"LeftRightPartialD"],
+ Cell[8179, 272, 142, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->521183313],
- Cell[6855, 239, 940, 36, 62, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1245680526],
- Cell[7832, 280, 399, 11, 45, "Input",
+ Cell[8324, 278, 931, 36, 56, "Output",
+ CellTags->"LeftRightPartialD"],
+ Cell[9292, 319, 399, 11, 45, "Input",
CellTags->"LeftRightPartialD",
CellID->146402203],
- Cell[8234, 293, 602, 24, 48, "Output",
- CellTags->"LeftRightPartialD",
- CellID->488945383],
- Cell[8873, 322, 143, 4, 27, "Input",
+ Cell[9694, 332, 582, 23, 45, "Output",
+ CellTags->"LeftRightPartialD"],
+ Cell[10313, 360, 143, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->1596263636],
- Cell[9019, 328, 1264, 49, 62, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1968825715],
- Cell[10651, 400, 1152, 40, 52, "Text",
- CellTags->"LeftRightPartialD",
- CellID->2130291841]}
+ Cell[10459, 366, 1351, 52, 56, "Output",
+ CellTags->"LeftRightPartialD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13878, 491},
- {"LeftRightPartialD", 14023, 495}
+ {"PrimaryExamplesSection", 15327, 529},
+ {"LeftRightPartialD", 15471, 533}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2281, 52, 51, "AnchorBarGrid",
+Cell[589, 21, 3579, 84, 53, "AnchorBarGrid",
CellID->1],
-Cell[2873, 75, 60, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2936, 78, 932, 30, 112, "Usage",
+Cell[4171, 107, 294, 11, 45, "ObjectNameGrid"],
+Cell[4468, 120, 932, 30, 113, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3893, 112, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5425, 154, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1628042135],
+ CellID->679018927],
Cell[CellGroupData[{
-Cell[4306, 131, 196, 6, 25, "ExampleSection",
- CellID->1062363671],
+Cell[5837, 173, 196, 6, 26, "ExampleSection",
+ CellID->1737714940],
Cell[CellGroupData[{
-Cell[4527, 141, 149, 4, 27, "Input",
+Cell[6058, 183, 149, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->538126232],
-Cell[4679, 147, 365, 13, 48, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1132769852]
+Cell[6210, 189, 344, 12, 45, "Output",
+ CellTags->"LeftRightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5081, 165, 144, 4, 27, "Input",
+Cell[6591, 206, 144, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->438418910],
-Cell[5228, 171, 631, 23, 62, "Output",
- CellTags->"LeftRightPartialD",
- CellID->215900493]
+Cell[6738, 212, 611, 22, 56, "Output",
+ CellTags->"LeftRightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5896, 199, 281, 8, 27, "Input",
+Cell[7386, 239, 281, 8, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->1906170176],
-Cell[6180, 209, 493, 19, 48, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1398421327]
+Cell[7670, 249, 472, 18, 45, "Output",
+ CellTags->"LeftRightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6710, 233, 142, 4, 27, "Input",
+Cell[8179, 272, 142, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->521183313],
-Cell[6855, 239, 940, 36, 62, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1245680526]
+Cell[8324, 278, 931, 36, 56, "Output",
+ CellTags->"LeftRightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7832, 280, 399, 11, 45, "Input",
+Cell[9292, 319, 399, 11, 45, "Input",
CellTags->"LeftRightPartialD",
CellID->146402203],
-Cell[8234, 293, 602, 24, 48, "Output",
- CellTags->"LeftRightPartialD",
- CellID->488945383]
+Cell[9694, 332, 582, 23, 45, "Output",
+ CellTags->"LeftRightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8873, 322, 143, 4, 27, "Input",
+Cell[10313, 360, 143, 4, 27, "Input",
CellTags->"LeftRightPartialD",
CellID->1596263636],
-Cell[9019, 328, 1264, 49, 62, "Output",
- CellTags->"LeftRightPartialD",
- CellID->1968825715]
+Cell[10459, 366, 1351, 52, 56, "Output",
+ CellTags->"LeftRightPartialD"]
}, Open ]]
}, Open ]],
-Cell[10310, 381, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11837, 422, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10378, 386, 270, 12, 31, "SeeAlsoSection",
+Cell[11905, 427, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10651, 400, 1152, 40, 52, "Text",
- CellTags->"LeftRightPartialD",
- CellID->2130291841]
+Cell[12178, 441, 1087, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[11818, 443, 23, 0, 42, "FooterCell"]
+Cell[13280, 481, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD2.nb
index ee732e161..f1cb4cd38 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeftRightPartialD2.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16871, 601]
-NotebookOptionsPosition[ 11376, 433]
-NotebookOutlinePosition[ 14985, 532]
-CellTagsIndexPosition[ 14863, 526]
+NotebookDataLength[ 17853, 621]
+NotebookOptionsPosition[ 12731, 470]
+NotebookOutlinePosition[ 16153, 561]
+CellTagsIndexPosition[ 16031, 555]
WindowTitle->LeftRightPartialD2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LeftRightPartialD2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LeftRightPartialD2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExplicitPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitPartialD"], "\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"FCPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPartialD"], "\<\"LeftPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftPartialD"], "\<\"RightPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RightPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LeftRightPartialD2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LeftRightPartialD2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
LeftRightPartialD2.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$98615],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/LeftRightPartialD2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$178997],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/LeftRightPartialD2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,18 @@ LeftRightPartialD2.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LeftRightPartialD2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LeftRightPartialD2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,7 +165,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->901029322],
+ CellID->671106449],
Cell[CellGroupData[{
@@ -135,7 +175,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1111334635],
+ CellID->914591965],
Cell[CellGroupData[{
@@ -153,12 +193,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{25, 27},
+ ImageSize->{24, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD2",
- CellLabel->"Out[1]=",
- CellID->1370534562]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -184,12 +223,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{55, 27},
+ ImageSize->{54, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD2",
- CellLabel->"Out[2]=",
- CellID->1797023804]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -220,12 +258,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{47, 27},
+ ImageSize->{49, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD2",
- CellLabel->"Out[3]=",
- CellID->334849476]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -240,18 +277,19 @@ Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], "+",
+ TraditionalForm]], ")"}], "+",
RowBox[{
SubscriptBox[
OverscriptBox["\[PartialD]", "\[LeftArrow]"],
@@ -264,12 +302,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Nu]",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{96, 27},
+ ImageSize->{117, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD2",
- CellLabel->"Out[4]=",
- CellID->412944908]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -308,12 +345,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Rho]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{69, 27},
+ ImageSize->{74, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD2",
- CellLabel->"Out[5]=",
- CellID->637341112]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -333,44 +369,47 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "+",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}], ".",
SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox["\[Rho]",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{133, 19},
+ ImageSize->{200, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeftRightPartialD2",
- CellLabel->"Out[6]=",
- CellID->545682027]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -424,17 +463,15 @@ Cell[TextData[{
ButtonNote->"RightPartialD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LeftRightPartialD2",
- CellID->1097237675]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"LeftRightPartialD2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -443,10 +480,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 3.777881}",
+ "built" -> "{2020, 1, 5, 18, 59, 29.444730}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -455,12 +492,12 @@ TaggingRules->{
"LeftRightPartialD2[mu] denotes OverscriptBox[\\[PartialD], \\ \
\\[LeftRightArrow]]TraditionalForm\\`TraditionalForm\\`\\[Mu]\\ , acting to \
the left and right. ExplicitPartialD[LeftRightPartialD2[\\[Mu]]] gives \
-(RightPartialD[\\[Mu]] + LeftPartialD[\\[Mu]]).", "synonyms" -> {}, "title" ->
- "LeftRightPartialD2", "titlemodifier" -> "", "windowtitle" ->
- "LeftRightPartialD2", "type" -> "Symbol", "uri" ->
+(RightPartialD[\\[Mu]] + LeftPartialD[\\[Mu]]).", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "LeftRightPartialD2", "titlemodifier" -> "",
+ "windowtitle" -> "LeftRightPartialD2", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/LeftRightPartialD2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -468,8 +505,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -478,131 +516,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3897, 112, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5315, 152, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->901029322]},
+ CellID->671106449]},
"LeftRightPartialD2"->{
- Cell[4530, 141, 152, 4, 27, "Input",
+ Cell[5947, 181, 152, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->1441499680],
- Cell[4685, 147, 366, 13, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->1370534562],
- Cell[5088, 165, 145, 4, 27, "Input",
+ Cell[6102, 187, 345, 12, 45, "Output",
+ CellTags->"LeftRightPartialD2"],
+ Cell[6484, 204, 145, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->245328226],
- Cell[5236, 171, 538, 20, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->1797023804],
- Cell[5811, 196, 283, 8, 27, "Input",
+ Cell[6632, 210, 517, 19, 45, "Output",
+ CellTags->"LeftRightPartialD2"],
+ Cell[7186, 234, 283, 8, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->2023605728],
- Cell[6097, 206, 533, 21, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->334849476],
- Cell[6667, 232, 144, 4, 27, "Input",
+ Cell[7472, 244, 513, 20, 45, "Output",
+ CellTags->"LeftRightPartialD2"],
+ Cell[8022, 269, 144, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->1740047024],
- Cell[6814, 238, 818, 33, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->412944908],
- Cell[7669, 276, 402, 11, 45, "Input",
+ Cell[8169, 275, 809, 33, 46, "Output",
+ CellTags->"LeftRightPartialD2"],
+ Cell[9015, 313, 402, 11, 45, "Input",
CellTags->"LeftRightPartialD2",
CellID->1526795536],
- Cell[8074, 289, 643, 26, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->637341112],
- Cell[8754, 320, 143, 4, 27, "Input",
+ Cell[9420, 326, 623, 25, 45, "Output",
+ CellTags->"LeftRightPartialD2"],
+ Cell[10080, 356, 143, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->959639857],
- Cell[8900, 326, 1117, 46, 40, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->545682027],
- Cell[10385, 395, 949, 33, 32, "Text",
- CellTags->"LeftRightPartialD2",
- CellID->1097237675]}
+ Cell[10226, 362, 1197, 49, 40, "Output",
+ CellTags->"LeftRightPartialD2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13411, 479},
- {"LeftRightPartialD2", 13556, 483}
+ {"PrimaryExamplesSection", 14810, 517},
+ {"LeftRightPartialD2", 14955, 521}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2285, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3469, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2878, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2942, 78, 930, 30, 112, "Usage",
+Cell[4062, 105, 295, 11, 45, "ObjectNameGrid"],
+Cell[4360, 118, 930, 30, 95, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3897, 112, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5315, 152, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->901029322],
+ CellID->671106449],
Cell[CellGroupData[{
-Cell[4309, 131, 196, 6, 25, "ExampleSection",
- CellID->1111334635],
+Cell[5727, 171, 195, 6, 26, "ExampleSection",
+ CellID->914591965],
Cell[CellGroupData[{
-Cell[4530, 141, 152, 4, 27, "Input",
+Cell[5947, 181, 152, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->1441499680],
-Cell[4685, 147, 366, 13, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->1370534562]
+Cell[6102, 187, 345, 12, 45, "Output",
+ CellTags->"LeftRightPartialD2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5088, 165, 145, 4, 27, "Input",
+Cell[6484, 204, 145, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->245328226],
-Cell[5236, 171, 538, 20, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->1797023804]
+Cell[6632, 210, 517, 19, 45, "Output",
+ CellTags->"LeftRightPartialD2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5811, 196, 283, 8, 27, "Input",
+Cell[7186, 234, 283, 8, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->2023605728],
-Cell[6097, 206, 533, 21, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->334849476]
+Cell[7472, 244, 513, 20, 45, "Output",
+ CellTags->"LeftRightPartialD2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6667, 232, 144, 4, 27, "Input",
+Cell[8022, 269, 144, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->1740047024],
-Cell[6814, 238, 818, 33, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->412944908]
+Cell[8169, 275, 809, 33, 46, "Output",
+ CellTags->"LeftRightPartialD2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7669, 276, 402, 11, 45, "Input",
+Cell[9015, 313, 402, 11, 45, "Input",
CellTags->"LeftRightPartialD2",
CellID->1526795536],
-Cell[8074, 289, 643, 26, 48, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->637341112]
+Cell[9420, 326, 623, 25, 45, "Output",
+ CellTags->"LeftRightPartialD2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8754, 320, 143, 4, 27, "Input",
+Cell[10080, 356, 143, 4, 27, "Input",
CellTags->"LeftRightPartialD2",
CellID->959639857],
-Cell[8900, 326, 1117, 46, 40, "Output",
- CellTags->"LeftRightPartialD2",
- CellID->545682027]
+Cell[10226, 362, 1197, 49, 40, "Output",
+ CellTags->"LeftRightPartialD2"]
}, Open ]]
}, Open ]],
-Cell[10044, 376, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11450, 415, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10112, 381, 270, 12, 31, "SeeAlsoSection",
+Cell[11518, 420, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10385, 395, 949, 33, 32, "Text",
- CellTags->"LeftRightPartialD2",
- CellID->1097237675]
+Cell[11791, 434, 898, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[11349, 431, 23, 0, 42, "FooterCell"]
+Cell[12704, 468, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivita.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivita.nb
index aa43cd11b..beb31b7d4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivita.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivita.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 22699, 839]
-NotebookOptionsPosition[ 15166, 594]
-NotebookOutlinePosition[ 19846, 729]
-CellTagsIndexPosition[ 19732, 723]
+NotebookDataLength[ 23521, 882]
+NotebookOptionsPosition[ 17307, 689]
+NotebookOutlinePosition[ 20806, 783]
+CellTagsIndexPosition[ 20692, 777]
WindowTitle->LeviCivita
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LeviCivita\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LeviCivita"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/LeviCivita.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$99308],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/LeviCivita", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"LC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LeviCivita\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LeviCivita"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+LeviCivita.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$179892],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/LeviCivita", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LeviCivita", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LeviCivita", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,6 +151,62 @@ Dimension of LeviCivita is changed). LeviCivita[",
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1571136183],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The shortcut LeviCivita is deprecated, please use LC instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "LeviCivita", "]"}]], "Input",
+ CellLabel->"In[356]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{257, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[356]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -131,7 +222,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->646864681],
+ CellID->672121972],
Cell[CellGroupData[{
@@ -141,30 +232,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->440823594],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "LeviCivita", "]"}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[1]:=",
- CellID->2141079579],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{284, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LeviCivita",
- CellLabel->"Out[1]=",
- CellID->1665927785]
-}, Open ]],
+ CellID->596443126],
Cell[CellGroupData[{
@@ -173,12 +241,13 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
"]"}]], "Input",
CellTags->"LeviCivita",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->970809287],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Alpha]",
@@ -196,104 +265,131 @@ Cell[BoxData[
FormBox["\[Delta]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{55, 19},
+ ImageSize->{53, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeviCivita",
- CellLabel->"Out[2]=",
- CellID->1096309803]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
- RowBox[{"OPEDelta", ",", "p"}], "]"}]], "Input",
+ RowBox[{"LeviCivita", "[", "]"}], "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
CellTags->"LeviCivita",
- CellLabel->"In[3]:=",
- CellID->972968542],
+ CellLabel->"In[2]:=",
+ CellID->1735126440],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["p",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{53, 19},
+ ImageSize->{65, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeviCivita",
- CellLabel->"Out[3]=",
- CellID->657040186]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[", "]"}], "[",
- RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[4]:=",
- CellID->1735126440],
+ RowBox[{"LeviCivita", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["p",
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["q",
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["r",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["s",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{51, 15},
+ ImageSize->{63, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LeviCivita",
- CellLabel->"Out[4]=",
- CellID->986206459]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Beta]", ",", "\[Delta]"}],
+ RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "\[Alpha]", "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Beta]", "]"}], ",",
+ RowBox[{"Momentum", "[", "p", "]"}], ",",
+ RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]], "Output",
+ ImageSize->{516, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm="]
+}, Open ]],
+
+Cell["\<\
+LeviCivita is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use LC.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"LC", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
"]"}]], "Input",
CellTags->"LeviCivita",
CellLabel->"In[5]:=",
- CellID->1409243674],
+ CellID->2075117917],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Alpha]",
@@ -304,211 +400,189 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Beta]",
+ FormBox["\[Gamma]",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["\[Delta]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{57, 19},
+ ImageSize->{53, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeviCivita",
- CellLabel->"Out[5]=",
- CellID->1898302846]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
- RowBox[{"OPEDelta", ",", "p"}], "]"}], "//", "StandardForm"}]], "Input",
+ RowBox[{"LC", "[", "]"}], "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
CellTags->"LeviCivita",
CellLabel->"In[6]:=",
- CellID->851260878],
+ CellID->528234025],
Cell[BoxData[
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"OPEDelta", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "D"}], "]"}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]], "Output",
- ImageSize->{438, 33},
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{65, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeviCivita",
- CellLabel->"Out[6]//StandardForm=",
- CellID->2076139317]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
- RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Rho]"}],
- "]"}], ".",
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Rho]"}],
- "]"}]}], " "}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[7]:=",
- CellID->1953796449],
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Gamma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]}]], ".",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Gamma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{108, 19},
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{63, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LeviCivita",
- CellLabel->"Out[7]=",
- CellID->1617820485]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Contract", "[", "t1", "]"}]], "Input",
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
+ "]"}]], "Input",
CellTags->"LeviCivita",
CellLabel->"In[8]:=",
- CellID->1087595628],
+ CellID->293666632],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"-",
- SuperscriptBox["D", "4"]}], "+",
- RowBox[{"6", " ",
- SuperscriptBox["D", "3"]}], "-",
- RowBox[{"11", " ",
- SuperscriptBox["D", "2"]}], "+",
- RowBox[{"6", " ", "D"}]}], TraditionalForm]], "Output",
- ImageSize->{169, 18},
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Gamma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{52, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeviCivita",
- CellLabel->"Out[8]=",
- CellID->168636471]
+ CellLabel->"Out[8]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"LeviCivita", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";",
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[9]:=",
- CellID->391796206],
-
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"Contract", "[", " ",
- RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Rho]"}],
- "]"}], ".",
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Rho]"}],
- "]"}]}], "]"}], "//", "Factor2"}]], "Input",
+ RowBox[{"LCD", "[", "]"}], "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
CellTags->"LeviCivita",
- CellLabel->"In[10]:=",
- CellID->132983157],
+ CellLabel->"In[9]:=",
+ CellID->19954627],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"1", "-", "D"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"2", "-", "D"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"3", "-", "D"}], ")"}], " ", "D"}], TraditionalForm]], "Output",
- ImageSize->{165, 15},
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["s",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{56, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LeviCivita",
- CellLabel->"Out[10]=",
- CellID->1319312223]
+ CellLabel->"Out[9]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"LeviCivita", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";",
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";"}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[11]:=",
- CellID->506638236],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"LC", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
- "]"}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[12]:=",
- CellID->1005970568],
+ RowBox[{
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[10]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Alpha]",
@@ -519,26 +593,61 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Gamma]",
+ FormBox["p",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Delta]",
+ FormBox["q",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{55, 19},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LeviCivita",
- CellLabel->"Out[12]=",
- CellID->1506614030]
+ CellLabel->"Out[10]="]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[", "t1", "]"}]], "Input",
- CellTags->"LeviCivita",
- CellLabel->"In[13]:=",
- CellID->839583368]
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"LC", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
+ "]"}], "]"}], "===",
+ RowBox[{"LeviCivita", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
+ "]"}]}]], "Input",
+ CellLabel->"In[11]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
+ "]"}], "]"}], "===",
+ RowBox[{"LeviCivita", "[",
+ RowBox[{
+ "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[12]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -561,33 +670,19 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Eps",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Eps",
- ButtonNote->"Eps"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Contract",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Contract",
- ButtonNote->"Contract"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["LC",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LC",
- ButtonNote->"LC"],
+ ButtonData->"paclet:FeynCalc/ref/FV",
+ ButtonNote->"FV"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["LCD",
+ StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LCD",
- ButtonNote->"LCD"],
+ ButtonData->"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LeviCivita",
- CellID->236168083]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -604,10 +699,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 7.114321}",
+ "built" -> "{2020, 1, 5, 18, 59, 31.978952}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -619,12 +714,12 @@ representation Eps[LorentzIndex[mu], LorentzIndex[nu], LorentzIndex[rho], \
LorentzIndex[si]] (or with a second argument in LorentzIndex for the \
Dimension, if the option Dimension of LeviCivita is changed). \
LeviCivita[\\[Mu], \\[Nu] ...][p, ...] evaluates to Eps[LorentzIndex[\\[Mu]], \
-LorentzIndex[\\[Nu]], ..., Momentum[p], ...].", "synonyms" -> {}, "title" ->
- "LeviCivita", "titlemodifier" -> "", "windowtitle" -> "LeviCivita",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/LeviCivita"},
- "SearchTextTranslated" -> ""},
+LorentzIndex[\\[Nu]], ..., Momentum[p], ...].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "LeviCivita", "titlemodifier" -> "",
+ "windowtitle" -> "LeviCivita", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/LeviCivita"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -632,8 +727,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -642,205 +738,152 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4187, 118, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[6639, 209, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->646864681]},
+ CellID->672121972]},
"LeviCivita"->{
- Cell[4819, 147, 138, 4, 27, "Input",
- CellTags->"LeviCivita",
- CellID->2141079579],
- Cell[4960, 153, 351, 12, 36, "Output",
- CellTags->"LeviCivita",
- CellID->1665927785],
- Cell[5348, 170, 204, 6, 27, "Input",
+ Cell[7271, 238, 204, 6, 27, "Input",
CellTags->"LeviCivita",
CellID->970809287],
- Cell[5555, 178, 597, 25, 40, "Output",
- CellTags->"LeviCivita",
- CellID->1096309803],
- Cell[6189, 208, 221, 7, 27, "Input",
- CellTags->"LeviCivita",
- CellID->972968542],
- Cell[6413, 217, 591, 25, 40, "Output",
- CellTags->"LeviCivita",
- CellID->657040186],
- Cell[7041, 247, 198, 6, 27, "Input",
+ Cell[7478, 246, 600, 25, 37, "Output",
+ CellTags->"LeviCivita"],
+ Cell[8115, 276, 198, 6, 27, "Input",
CellTags->"LeviCivita",
CellID->1735126440],
- Cell[7242, 255, 569, 25, 36, "Output",
- CellTags->"LeviCivita",
- CellID->986206459],
- Cell[7848, 285, 204, 6, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1409243674],
- Cell[8055, 293, 596, 25, 40, "Output",
- CellTags->"LeviCivita",
- CellID->1898302846],
- Cell[8688, 323, 259, 8, 27, "Input",
- CellTags->"LeviCivita",
- CellID->851260878],
- Cell[8950, 333, 586, 17, 67, "Output",
- CellTags->"LeviCivita",
- CellID->2076139317],
- Cell[9573, 355, 383, 11, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1953796449],
- Cell[9959, 368, 1038, 44, 40, "Output",
- CellTags->"LeviCivita",
- CellID->1617820485],
- Cell[11034, 417, 131, 4, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1087595628],
- Cell[11168, 423, 425, 15, 39, "Output",
- CellTags->"LeviCivita",
- CellID->168636471],
- Cell[11608, 441, 333, 10, 27, "Input",
- CellTags->"LeviCivita",
- CellID->391796206],
- Cell[11966, 455, 421, 12, 27, "Input",
+ Cell[8316, 284, 685, 29, 38, "Output",
+ CellTags->"LeviCivita"],
+ Cell[10523, 380, 197, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->132983157],
- Cell[12390, 469, 404, 14, 36, "Output",
+ CellID->2075117917],
+ Cell[10723, 388, 600, 25, 37, "Output",
+ CellTags->"LeviCivita"],
+ Cell[11360, 418, 189, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->1319312223],
- Cell[12809, 486, 334, 10, 27, "Input",
+ CellID->528234025],
+ Cell[11552, 426, 685, 29, 38, "Output",
+ CellTags->"LeviCivita"],
+ Cell[13097, 498, 197, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->506638236],
- Cell[13168, 500, 198, 6, 27, "Input",
+ CellID->293666632],
+ Cell[13297, 506, 599, 25, 37, "Output",
+ CellTags->"LeviCivita"],
+ Cell[13933, 536, 189, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->1005970568],
- Cell[13369, 508, 598, 25, 40, "Output",
- CellTags->"LeviCivita",
- CellID->1506614030],
- Cell[13982, 536, 128, 4, 27, "Input",
- CellTags->"LeviCivita",
- CellID->839583368],
- Cell[14466, 562, 658, 27, 32, "Text",
- CellTags->"LeviCivita",
- CellID->236168083]}
+ CellID->19954627],
+ Cell[14125, 544, 572, 25, 35, "Output",
+ CellTags->"LeviCivita"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17387, 643},
- {"LeviCivita", 17524, 647}
+ {"PrimaryExamplesSection", 19574, 739},
+ {"LeviCivita", 19711, 743}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2252, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3075, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2837, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2893, 78, 1269, 36, 148, "Usage",
+Cell[3660, 98, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3972, 113, 1269, 36, 154, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4187, 118, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5266, 153, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1571136183],
+Cell[6008, 179, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[6042, 181, 107, 3, 70, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[6174, 188, 94, 2, 70, "Input"],
+Cell[6271, 192, 307, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6639, 209, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->646864681],
+ CellID->672121972],
Cell[CellGroupData[{
-Cell[4599, 137, 195, 6, 25, "ExampleSection",
- CellID->440823594],
+Cell[7051, 228, 195, 6, 26, "ExampleSection",
+ CellID->596443126],
Cell[CellGroupData[{
-Cell[4819, 147, 138, 4, 27, "Input",
- CellTags->"LeviCivita",
- CellID->2141079579],
-Cell[4960, 153, 351, 12, 36, "Output",
+Cell[7271, 238, 204, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->1665927785]
+ CellID->970809287],
+Cell[7478, 246, 600, 25, 37, "Output",
+ CellTags->"LeviCivita"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5348, 170, 204, 6, 27, "Input",
- CellTags->"LeviCivita",
- CellID->970809287],
-Cell[5555, 178, 597, 25, 40, "Output",
+Cell[8115, 276, 198, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->1096309803]
+ CellID->1735126440],
+Cell[8316, 284, 685, 29, 38, "Output",
+ CellTags->"LeviCivita"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6189, 208, 221, 7, 27, "Input",
- CellTags->"LeviCivita",
- CellID->972968542],
-Cell[6413, 217, 591, 25, 40, "Output",
- CellTags->"LeviCivita",
- CellID->657040186]
+Cell[9038, 318, 174, 5, 27, "Input"],
+Cell[9215, 325, 617, 26, 38, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7041, 247, 198, 6, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1735126440],
-Cell[7242, 255, 569, 25, 36, "Output",
- CellTags->"LeviCivita",
- CellID->986206459]
+Cell[9869, 356, 88, 2, 27, "Input"],
+Cell[9960, 360, 390, 10, 51, "Output"]
}, Open ]],
+Cell[10365, 373, 133, 3, 48, "Notes"],
Cell[CellGroupData[{
-Cell[7848, 285, 204, 6, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1409243674],
-Cell[8055, 293, 596, 25, 40, "Output",
+Cell[10523, 380, 197, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->1898302846]
+ CellID->2075117917],
+Cell[10723, 388, 600, 25, 37, "Output",
+ CellTags->"LeviCivita"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8688, 323, 259, 8, 27, "Input",
+Cell[11360, 418, 189, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->851260878],
-Cell[8950, 333, 586, 17, 67, "Output",
- CellTags->"LeviCivita",
- CellID->2076139317]
+ CellID->528234025],
+Cell[11552, 426, 685, 29, 38, "Output",
+ CellTags->"LeviCivita"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9573, 355, 383, 11, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1953796449],
-Cell[9959, 368, 1038, 44, 40, "Output",
- CellTags->"LeviCivita",
- CellID->1617820485]
+Cell[12274, 460, 166, 5, 27, "Input"],
+Cell[12443, 467, 617, 26, 38, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11034, 417, 131, 4, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1087595628],
-Cell[11168, 423, 425, 15, 39, "Output",
+Cell[13097, 498, 197, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->168636471]
+ CellID->293666632],
+Cell[13297, 506, 599, 25, 37, "Output",
+ CellTags->"LeviCivita"]
}, Open ]],
-Cell[11608, 441, 333, 10, 27, "Input",
- CellTags->"LeviCivita",
- CellID->391796206],
Cell[CellGroupData[{
-Cell[11966, 455, 421, 12, 27, "Input",
- CellTags->"LeviCivita",
- CellID->132983157],
-Cell[12390, 469, 404, 14, 36, "Output",
+Cell[13933, 536, 189, 6, 27, "Input",
CellTags->"LeviCivita",
- CellID->1319312223]
+ CellID->19954627],
+Cell[14125, 544, 572, 25, 35, "Output",
+ CellTags->"LeviCivita"]
}, Open ]],
-Cell[12809, 486, 334, 10, 27, "Input",
- CellTags->"LeviCivita",
- CellID->506638236],
Cell[CellGroupData[{
-Cell[13168, 500, 198, 6, 27, "Input",
- CellTags->"LeviCivita",
- CellID->1005970568],
-Cell[13369, 508, 598, 25, 40, "Output",
- CellTags->"LeviCivita",
- CellID->1506614030]
+Cell[14734, 574, 168, 5, 27, "Input"],
+Cell[14905, 581, 561, 24, 37, "Output"]
}, Open ]],
-Cell[13982, 536, 128, 4, 27, "Input",
- CellTags->"LeviCivita",
- CellID->839583368]
+Cell[CellGroupData[{
+Cell[15503, 610, 324, 9, 27, "Input"],
+Cell[15830, 621, 170, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16037, 631, 374, 10, 27, "Input"],
+Cell[16414, 643, 170, 5, 35, "Output"]
+}, Open ]]
}, Open ]],
-Cell[14125, 543, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16611, 652, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14193, 548, 270, 12, 31, "SeeAlsoSection",
+Cell[16679, 657, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[14466, 562, 658, 27, 32, "Text",
- CellTags->"LeviCivita",
- CellID->236168083]
+Cell[16952, 671, 313, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[15139, 592, 23, 0, 42, "FooterCell"]
+Cell[17280, 687, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivitaSign.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivitaSign.nb
deleted file mode 100644
index 5377b677a..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LeviCivitaSign.nb
+++ /dev/null
@@ -1,204 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6440, 195]
-NotebookOptionsPosition[ 4117, 128]
-NotebookOutlinePosition[ 6173, 184]
-CellTagsIndexPosition[ 6097, 179]
-WindowTitle->LeviCivitaSign
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LeviCivitaSign\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LeviCivitaSign"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-LeviCivitaSign.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$97965],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/LeviCivitaSign", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["LeviCivitaSign", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["LeviCivitaSign"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracTrace and EpsChisholm. It determines the sign in \
-the result of a Dirac trace of four gamma matrices and gamma5."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["DiracTrace",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracTrace",
- ButtonNote->"DiracTrace"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["EpsChisholm",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/EpsChisholm",
- ButtonNote->"EpsChisholm"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"LeviCivitaSign",
- CellID->793036286]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"LeviCivitaSign",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 1, 2, 15, 13, 53.698199}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "LeviCivitaSign is an option for DiracTrace and EpsChisholm. It \
-determines the sign in the result of a Dirac trace of four gamma matrices and \
-gamma5.", "synonyms" -> {}, "title" -> "LeviCivitaSign", "titlemodifier" ->
- "", "windowtitle" -> "LeviCivitaSign", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/LeviCivitaSign"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "LeviCivitaSign"->{
- Cell[3668, 108, 407, 15, 70, "Text",
- CellTags->"LeviCivitaSign",
- CellID->793036286]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"LeviCivitaSign", 5980, 172}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[586, 21, 2269, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2858, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2918, 78, 452, 12, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3395, 94, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3668, 108, 407, 15, 70, "Text",
- CellTags->"LeviCivitaSign",
- CellID->793036286]
-}, Open ]],
-Cell[4090, 126, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li2.nb
index f1eb9b066..31683b33b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9600, 344]
-NotebookOptionsPosition[ 5870, 221]
-NotebookOutlinePosition[ 8488, 299]
-CellTagsIndexPosition[ 8383, 293]
+NotebookDataLength[ 10253, 359]
+NotebookOptionsPosition[ 6730, 247]
+NotebookOutlinePosition[ 9248, 320]
+CellTagsIndexPosition[ 9143, 314]
WindowTitle->Li2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Li2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Li2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Li2.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$99656],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Li2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Li3\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Li3"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Li2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Li2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Li2.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$180338],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Li2",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Li2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Li2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,7 +138,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1612740453],
+ CellID->1092268077],
Cell[CellGroupData[{
@@ -116,7 +148,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->294357097],
+ CellID->1205041486],
Cell[CellGroupData[{
@@ -130,12 +162,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"2","x"},
"PolyLog"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li2",
- CellLabel->"Out[1]=",
- CellID->118594315]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -150,12 +181,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"PolyLog", "[",
RowBox[{"2", ",", "#1"}], "]"}], "&"}]], "Output",
- ImageSize->{130, 15},
+ ImageSize->{129, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li2",
- CellLabel->"Out[2]//StandardForm=",
- CellID->798709898]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -176,12 +206,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"2","x"},
"PolyLog"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li2",
- CellLabel->"Out[3]=",
- CellID->788521289]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -205,16 +234,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Li3",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Li3",
ButtonNote->"Li3"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Li2",
- CellID->75864768]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -231,21 +257,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 8.711151}",
+ "built" -> "{2020, 1, 5, 18, 59, 33.140678}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Li2 is an abbreviation for the dilog function, i.e., Li2 = PolyLog[2, \
-#]&.", "synonyms" -> {}, "title" -> "Li2", "titlemodifier" -> "",
- "windowtitle" -> "Li2", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Li2"},
- "SearchTextTranslated" -> ""},
+#]&.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Li2", "titlemodifier" ->
+ "", "windowtitle" -> "Li2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Li2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -253,8 +279,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -263,89 +290,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3265, 93, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4233, 125, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1612740453]},
+ CellID->1092268077]},
"Li2"->{
- Cell[3898, 122, 117, 4, 27, "Input",
+ Cell[4867, 154, 117, 4, 27, "Input",
CellTags->"Li2",
CellID->870020060],
- Cell[4018, 128, 240, 9, 36, "Output",
- CellTags->"Li2",
- CellID->118594315],
- Cell[4295, 142, 125, 4, 27, "Input",
+ Cell[4987, 160, 220, 8, 37, "Output",
+ CellTags->"Li2"],
+ Cell[5244, 173, 125, 4, 27, "Input",
CellTags->"Li2",
CellID->1201153887],
- Cell[4423, 148, 267, 9, 49, "Output",
- CellTags->"Li2",
- CellID->798709898],
- Cell[4727, 162, 269, 10, 52, "Input",
+ Cell[5372, 179, 247, 8, 51, "Output",
+ CellTags->"Li2"],
+ Cell[5656, 192, 269, 10, 53, "Input",
CellTags->"Li2",
CellID->80483927],
- Cell[4999, 174, 240, 9, 36, "Output",
- CellTags->"Li2",
- CellID->788521289],
- Cell[5607, 206, 221, 10, 31, "Text",
- CellTags->"Li2",
- CellID->75864768]}
+ Cell[5928, 204, 220, 8, 37, "Output",
+ CellTags->"Li2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7652, 264},
- {"Li2", 7782, 268}
+ {"PrimaryExamplesSection", 8558, 291},
+ {"Li2", 8689, 295}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2971, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 376, 11, 83, "Usage",
+Cell[3549, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[3832, 110, 376, 11, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3265, 93, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4233, 125, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1612740453],
+ CellID->1092268077],
Cell[CellGroupData[{
-Cell[3678, 112, 195, 6, 25, "ExampleSection",
- CellID->294357097],
+Cell[4646, 144, 196, 6, 26, "ExampleSection",
+ CellID->1205041486],
Cell[CellGroupData[{
-Cell[3898, 122, 117, 4, 27, "Input",
+Cell[4867, 154, 117, 4, 27, "Input",
CellTags->"Li2",
CellID->870020060],
-Cell[4018, 128, 240, 9, 36, "Output",
- CellTags->"Li2",
- CellID->118594315]
+Cell[4987, 160, 220, 8, 37, "Output",
+ CellTags->"Li2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4295, 142, 125, 4, 27, "Input",
+Cell[5244, 173, 125, 4, 27, "Input",
CellTags->"Li2",
CellID->1201153887],
-Cell[4423, 148, 267, 9, 49, "Output",
- CellTags->"Li2",
- CellID->798709898]
+Cell[5372, 179, 247, 8, 51, "Output",
+ CellTags->"Li2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4727, 162, 269, 10, 52, "Input",
+Cell[5656, 192, 269, 10, 53, "Input",
CellTags->"Li2",
CellID->80483927],
-Cell[4999, 174, 240, 9, 36, "Output",
- CellTags->"Li2",
- CellID->788521289]
+Cell[5928, 204, 220, 8, 37, "Output",
+ CellTags->"Li2"]
}, Open ]]
}, Open ]],
-Cell[5266, 187, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6175, 216, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5334, 192, 270, 12, 31, "SeeAlsoSection",
+Cell[6243, 221, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5607, 206, 221, 10, 31, "Text",
- CellTags->"Li2",
- CellID->75864768]
+Cell[6516, 235, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5843, 219, 23, 0, 42, "FooterCell"]
+Cell[6703, 245, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li3.nb
index f08e9fddd..5465752ec 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li3.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10388, 380]
-NotebookOptionsPosition[ 6299, 243]
-NotebookOutlinePosition[ 9087, 327]
-CellTagsIndexPosition[ 8982, 321]
+NotebookDataLength[ 10962, 392]
+NotebookOptionsPosition[ 7134, 268]
+NotebookOutlinePosition[ 9794, 346]
+CellTagsIndexPosition[ 9689, 340]
WindowTitle->Li3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Li3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Li3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Li3.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$99991],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Li3",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Li2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Li2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Li3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Li3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Li3.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$180773],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Li3",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Li3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Li3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +139,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1458614860],
+ CellID->561434554],
Cell[CellGroupData[{
@@ -117,7 +149,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->367768766],
+ CellID->209679981],
Cell[CellGroupData[{
@@ -131,12 +163,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"3","x"},
"PolyLog"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li3",
- CellLabel->"Out[1]=",
- CellID->955211084]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -151,12 +182,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"PolyLog", "[",
RowBox[{"3", ",", "#1"}], "]"}], "&"}]], "Output",
- ImageSize->{130, 15},
+ ImageSize->{129, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li3",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1455650217]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -174,12 +204,11 @@ Cell[BoxData[
FractionBox[
TemplateBox[{"2","x"},
"PolyLog"], "x"], TraditionalForm]], "Output",
- ImageSize->{51, 42},
+ ImageSize->{52, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li3",
- CellLabel->"Out[3]=",
- CellID->749318248]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,12 +227,11 @@ Cell[BoxData[
FormBox[
TemplateBox[{"3","x"},
"PolyLog"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Li3",
- CellLabel->"Out[4]=",
- CellID->460713684]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -227,16 +255,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Li2",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Li2",
ButtonNote->"Li2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Li3",
- CellID->1253879809]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -253,21 +278,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 10.250047}",
+ "built" -> "{2020, 1, 5, 18, 59, 34.211482}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Li3 is an abbreviation for the trilog function, i.e., Li3 = PolyLog[3, \
-#]&.", "synonyms" -> {}, "title" -> "Li3", "titlemodifier" -> "",
- "windowtitle" -> "Li3", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Li3"},
- "SearchTextTranslated" -> ""},
+#]&.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Li3", "titlemodifier" ->
+ "", "windowtitle" -> "Li3", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Li3"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -275,8 +300,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -285,103 +311,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3268, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4236, 126, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1458614860]},
+ CellID->561434554]},
"Li3"->{
- Cell[3901, 123, 117, 4, 27, "Input",
+ Cell[4868, 155, 117, 4, 27, "Input",
CellTags->"Li3",
CellID->750513892],
- Cell[4021, 129, 240, 9, 36, "Output",
- CellTags->"Li3",
- CellID->955211084],
- Cell[4298, 143, 125, 4, 27, "Input",
+ Cell[4988, 161, 220, 8, 37, "Output",
+ CellTags->"Li3"],
+ Cell[5245, 174, 125, 4, 27, "Input",
CellTags->"Li3",
CellID->1277219612],
- Cell[4426, 149, 268, 9, 49, "Output",
- CellTags->"Li3",
- CellID->1455650217],
- Cell[4731, 163, 169, 6, 27, "Input",
+ Cell[5373, 180, 247, 8, 51, "Output",
+ CellTags->"Li3"],
+ Cell[5657, 193, 169, 6, 27, "Input",
CellTags->"Li3",
CellID->918353048],
- Cell[4903, 171, 263, 10, 63, "Output",
- CellTags->"Li3",
- CellID->749318248],
- Cell[5203, 186, 220, 8, 52, "Input",
+ Cell[5829, 201, 243, 9, 55, "Output",
+ CellTags->"Li3"],
+ Cell[6109, 215, 220, 8, 53, "Input",
CellTags->"Li3",
CellID->85803135],
- Cell[5426, 196, 240, 9, 36, "Output",
- CellTags->"Li3",
- CellID->460713684],
- Cell[6034, 228, 223, 10, 31, "Text",
- CellTags->"Li3",
- CellID->1253879809]}
+ Cell[6332, 225, 220, 8, 37, "Output",
+ CellTags->"Li3"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8083, 286},
- {"Li3", 8213, 290}
+ {"PrimaryExamplesSection", 8963, 312},
+ {"Li3", 9093, 316}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2971, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2815, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 379, 12, 83, "Usage",
+Cell[3549, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[3832, 110, 379, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3268, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4236, 126, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1458614860],
+ CellID->561434554],
Cell[CellGroupData[{
-Cell[3681, 113, 195, 6, 25, "ExampleSection",
- CellID->367768766],
+Cell[4648, 145, 195, 6, 26, "ExampleSection",
+ CellID->209679981],
Cell[CellGroupData[{
-Cell[3901, 123, 117, 4, 27, "Input",
+Cell[4868, 155, 117, 4, 27, "Input",
CellTags->"Li3",
CellID->750513892],
-Cell[4021, 129, 240, 9, 36, "Output",
- CellTags->"Li3",
- CellID->955211084]
+Cell[4988, 161, 220, 8, 37, "Output",
+ CellTags->"Li3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4298, 143, 125, 4, 27, "Input",
+Cell[5245, 174, 125, 4, 27, "Input",
CellTags->"Li3",
CellID->1277219612],
-Cell[4426, 149, 268, 9, 49, "Output",
- CellTags->"Li3",
- CellID->1455650217]
+Cell[5373, 180, 247, 8, 51, "Output",
+ CellTags->"Li3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4731, 163, 169, 6, 27, "Input",
+Cell[5657, 193, 169, 6, 27, "Input",
CellTags->"Li3",
CellID->918353048],
-Cell[4903, 171, 263, 10, 63, "Output",
- CellTags->"Li3",
- CellID->749318248]
+Cell[5829, 201, 243, 9, 55, "Output",
+ CellTags->"Li3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5203, 186, 220, 8, 52, "Input",
+Cell[6109, 215, 220, 8, 53, "Input",
CellTags->"Li3",
CellID->85803135],
-Cell[5426, 196, 240, 9, 36, "Output",
- CellTags->"Li3",
- CellID->460713684]
+Cell[6332, 225, 220, 8, 37, "Output",
+ CellTags->"Li3"]
}, Open ]]
}, Open ]],
-Cell[5693, 209, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6579, 237, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5761, 214, 270, 12, 31, "SeeAlsoSection",
+Cell[6647, 242, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6034, 228, 223, 10, 31, "Text",
- CellTags->"Li3",
- CellID->1253879809]
+Cell[6920, 256, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6272, 241, 23, 0, 42, "FooterCell"]
+Cell[7107, 266, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li4.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li4.nb
new file mode 100644
index 000000000..3d44b3e20
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Li4.nb
@@ -0,0 +1,314 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8767, 304]
+NotebookOptionsPosition[ 5840, 213]
+NotebookOutlinePosition[ 7855, 268]
+CellTagsIndexPosition[ 7771, 263]
+WindowTitle->Li4
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Li4\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Li4"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Li4.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$181208],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Li4",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["Li4", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["Li4"], "InlineFormula"],
+ " \[LineSeparator]is an abbreviation for the weight 4 polylogarithm \
+function, i.e., Li4 = PolyLog[4, #]&."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->680588170],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1334442938],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Li4", "[", "x", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->992630456],
+
+Cell[BoxData[
+ FormBox[
+ TemplateBox[{"4","x"},
+ "PolyLog"], TraditionalForm]], "Output",
+ ImageSize->{48, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->457429502]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Li4", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->391133913],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PolyLog", "[",
+ RowBox[{"4", ",", "#1"}], "]"}], "&"}]], "Output",
+ ImageSize->{130, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->273760835]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"D", "[",
+ RowBox[{
+ RowBox[{"Li4", "[", "x", "]"}], ",", "x"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->841018092],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ TemplateBox[{"3","x"},
+ "PolyLog"], "x"], TraditionalForm]], "Output",
+ ImageSize->{52, 34},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1963138404]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Integrate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Li3", "[", "x", "]"}], "/", "x"}], ",", "x"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->492560377],
+
+Cell[BoxData[
+ FormBox[
+ TemplateBox[{"4","x"},
+ "PolyLog"], TraditionalForm]], "Output",
+ ImageSize->{48, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1636998240]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"Li4",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 59, 35.310056}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "Li4 is an abbreviation for the weight 4 polylogarithm function, i.e., \
+Li4 = PolyLog[4, #]&.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Li4",
+ "titlemodifier" -> "", "windowtitle" -> "Li4", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Li4"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3538, 104, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->680588170]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7628, 256}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 386, 11, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3538, 104, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->680588170],
+Cell[CellGroupData[{
+Cell[3950, 123, 196, 6, 26, "ExampleSection",
+ CellID->1334442938],
+Cell[CellGroupData[{
+Cell[4171, 133, 99, 3, 27, "Input",
+ CellID->992630456],
+Cell[4273, 138, 222, 8, 37, "Output",
+ CellID->457429502]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4532, 151, 106, 3, 27, "Input",
+ CellID->391133913],
+Cell[4641, 156, 249, 8, 51, "Output",
+ CellID->273760835]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4927, 169, 151, 5, 27, "Input",
+ CellID->841018092],
+Cell[5081, 176, 246, 9, 55, "Output",
+ CellID->1963138404]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5364, 190, 184, 6, 27, "Input",
+ CellID->492560377],
+Cell[5551, 198, 223, 8, 37, "Output",
+ CellID->1636998240]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5813, 211, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Loop.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Loop.nb
index 024c3d02b..bdcfb709c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Loop.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Loop.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5200, 146]
-NotebookOptionsPosition[ 3298, 94]
-NotebookOutlinePosition[ 5122, 142]
-CellTagsIndexPosition[ 5079, 139]
+NotebookDataLength[ 5439, 157]
+NotebookOptionsPosition[ 3560, 105]
+NotebookOutlinePosition[ 5375, 154]
+CellTagsIndexPosition[ 5332, 151]
WindowTitle->Loop
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$100326],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$181638],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/Loop",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Loop", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Loop", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -104,21 +115,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 11.773323}",
+ "built" -> "{2020, 1, 5, 18, 59, 36.406598}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Loop is an option for functions related to FeynArts integration, \
-indicating the number of (virtual) loops.", "synonyms" -> {}, "title" ->
- "Loop", "titlemodifier" -> "", "windowtitle" -> "Loop", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Loop"}},
+indicating the number of (virtual) loops.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Loop", "titlemodifier" -> "",
+ "windowtitle" -> "Loop", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Loop"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -127,7 +139,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -141,13 +153,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 2257, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 410, 12, 70, "Usage",
+Cell[2836, 76, 281, 11, 70, "ObjectNameGrid"],
+Cell[3120, 89, 410, 12, 70, "Usage",
CellID->982511436],
-Cell[3271, 92, 23, 0, 70, "FooterCell"]
+Cell[3533, 103, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzIndex.nb
index 892daa49b..61793611b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzIndex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzIndex.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13196, 461]
-NotebookOptionsPosition[ 7885, 292]
-NotebookOutlinePosition[ 11385, 393]
-CellTagsIndexPosition[ 11271, 387]
+NotebookDataLength[ 10359, 339]
+NotebookOptionsPosition[ 6880, 236]
+NotebookOutlinePosition[ 9408, 305]
+CellTagsIndexPosition[ 9294, 299]
WindowTitle->LorentzIndex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/LorentzIndex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/LorentzIndex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ChangeDimension\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ChangeDimension"], "\<\"Momentum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Momentum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LorentzIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LorentzIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
LorentzIndex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$100676],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/LorentzIndex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$182080],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/LorentzIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ LorentzIndex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["LorentzIndex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["LorentzIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1824288497],
+ CellID->685723364],
Cell[CellGroupData[{
@@ -119,11 +153,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1154410146],
+ CellID->1385024416],
-Cell["This denotes a four-dimensional Lorentz index.", "Text",
- CellTags->"LorentzIndex",
- CellID->2141033081],
+Cell["This denotes a 4-dimensional Lorentz index.", "Notes"],
Cell[CellGroupData[{
@@ -135,19 +167,16 @@ Cell[BoxData[
Cell[BoxData[
FormBox["\[Alpha]", TraditionalForm]], "Output",
- ImageSize->{14, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LorentzIndex",
- CellLabel->"Out[1]=",
- CellID->1100231322]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
An optional second argument can be given for a dimension different from 4.\
-\>", "Text",
- CellTags->"LorentzIndex",
- CellID->1672095293],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -160,95 +189,12 @@ Cell[BoxData[
Cell[BoxData[
FormBox["\[Alpha]", TraditionalForm]], "Output",
- ImageSize->{14, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"LorentzIndex",
- CellLabel->"Out[2]=",
- CellID->361522335]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Input",
- CellTags->"LorentzIndex",
- CellLabel->"In[3]:=",
- CellID->1542722880],
-
-Cell[BoxData[
- FormBox["\[Mu]", TraditionalForm]], "Output",
- ImageSize->{14, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LorentzIndex",
- CellLabel->"Out[3]=",
- CellID->225253784]
-}, Open ]],
-
-Cell["\<\
-Setting $LorentzIndices=True displays the dimension (if different from 4) as \
-a subindex.\
-\>", "Text",
- CellTags->"LorentzIndex",
- CellID->745501605],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "True"}], ";"}]], "Input",
- CellTags->"LorentzIndex",
- CellLabel->"In[4]:=",
- CellID->209941583],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"{",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Nu]", ",", "n"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "4"}], "]"}]}], "}"}]], "Input",
- CellTags->"LorentzIndex",
- CellLabel->"In[5]:=",
- CellID->490327018],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]], ",",
- SubscriptBox[
- FormBox["\[Nu]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]], ",",
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["4",
- TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{87, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"LorentzIndex",
- CellLabel->"Out[5]=",
- CellID->648573594]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", " ", "=", " ", "False"}], ";"}]], "Input",
- CellTags->"LorentzIndex",
- CellLabel->"In[6]:=",
- CellID->1095442238]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -283,9 +229,7 @@ Cell[TextData[{
ButtonNote->"Momentum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"LorentzIndex",
- CellID->261845122]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -302,10 +246,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 12.963766}",
+ "built" -> "{2020, 1, 5, 18, 59, 37.363695}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -314,11 +258,11 @@ TaggingRules->{
"LorentzIndex[mu] denotes a four dimensional Lorentz index. For other \
than four dimensions: LorentzIndex[mu, D] or LorentzIndex[mu] etc. \
LorentzIndex[mu, 4] simplifies to LorentzIndex[mu].", "synonyms" -> {},
- "title" -> "LorentzIndex", "titlemodifier" -> "", "windowtitle" ->
- "LorentzIndex", "type" -> "Symbol", "uri" -> "FeynCalc/ref/LorentzIndex"},
- "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "LorentzIndex", "titlemodifier" -> "",
+ "windowtitle" -> "LorentzIndex", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/LorentzIndex"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -327,7 +271,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -336,133 +280,67 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3454, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4553, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1824288497]},
+ CellID->685723364]},
"LorentzIndex"->{
- Cell[4066, 123, 110, 2, 31, "Text",
- CellTags->"LorentzIndex",
- CellID->2141033081],
- Cell[4201, 129, 143, 4, 27, "Input",
+ Cell[5249, 161, 143, 4, 27, "Input",
CellTags->"LorentzIndex",
CellID->1526768444],
- Cell[4347, 135, 221, 7, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->1100231322],
- Cell[4583, 145, 146, 4, 32, "Text",
- CellTags->"LorentzIndex",
- CellID->1672095293],
- Cell[4754, 153, 166, 5, 27, "Input",
+ Cell[5395, 167, 200, 6, 35, "Output",
+ CellTags->"LorentzIndex"],
+ Cell[5734, 182, 166, 5, 27, "Input",
CellTags->"LorentzIndex",
CellID->1273197083],
- Cell[4923, 160, 220, 7, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->361522335],
- Cell[5180, 172, 183, 5, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->1542722880],
- Cell[5366, 179, 217, 7, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->225253784],
- Cell[5598, 189, 161, 5, 32, "Text",
- CellTags->"LorentzIndex",
- CellID->745501605],
- Cell[5762, 196, 154, 5, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->209941583],
- Cell[5941, 205, 364, 11, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->490327018],
- Cell[6308, 218, 587, 24, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->648573594],
- Cell[6910, 245, 166, 5, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->1095442238],
- Cell[7432, 272, 411, 15, 70, "Text",
- CellTags->"LorentzIndex",
- CellID->261845122]}
+ Cell[5903, 189, 200, 6, 35, "Output",
+ CellTags->"LorentzIndex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9824, 337},
- {"LorentzIndex", 9963, 341}
+ {"PrimaryExamplesSection", 8807, 281},
+ {"LorentzIndex", 8946, 285}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3127, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 522, 14, 99, "Usage",
+Cell[3714, 99, 289, 11, 45, "ObjectNameGrid"],
+Cell[4006, 112, 522, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3454, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4553, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1824288497],
+ CellID->685723364],
Cell[CellGroupData[{
-Cell[3867, 115, 196, 6, 25, "ExampleSection",
- CellID->1154410146],
-Cell[4066, 123, 110, 2, 31, "Text",
- CellTags->"LorentzIndex",
- CellID->2141033081],
+Cell[4965, 149, 196, 6, 26, "ExampleSection",
+ CellID->1385024416],
+Cell[5164, 157, 60, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4201, 129, 143, 4, 27, "Input",
+Cell[5249, 161, 143, 4, 27, "Input",
CellTags->"LorentzIndex",
CellID->1526768444],
-Cell[4347, 135, 221, 7, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->1100231322]
+Cell[5395, 167, 200, 6, 35, "Output",
+ CellTags->"LorentzIndex"]
}, Open ]],
-Cell[4583, 145, 146, 4, 32, "Text",
- CellTags->"LorentzIndex",
- CellID->1672095293],
+Cell[5610, 176, 99, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4754, 153, 166, 5, 27, "Input",
+Cell[5734, 182, 166, 5, 27, "Input",
CellTags->"LorentzIndex",
CellID->1273197083],
-Cell[4923, 160, 220, 7, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->361522335]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5180, 172, 183, 5, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->1542722880],
-Cell[5366, 179, 217, 7, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->225253784]
+Cell[5903, 189, 200, 6, 35, "Output",
+ CellTags->"LorentzIndex"]
+}, Open ]]
}, Open ]],
-Cell[5598, 189, 161, 5, 32, "Text",
- CellTags->"LorentzIndex",
- CellID->745501605],
-Cell[5762, 196, 154, 5, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->209941583],
-Cell[CellGroupData[{
-Cell[5941, 205, 364, 11, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->490327018],
-Cell[6308, 218, 587, 24, 36, "Output",
- CellTags->"LorentzIndex",
- CellID->648573594]
-}, Open ]],
-Cell[6910, 245, 166, 5, 27, "Input",
- CellTags->"LorentzIndex",
- CellID->1095442238]
-}, Open ]],
-Cell[7091, 253, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6130, 199, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7159, 258, 270, 12, 70, "SeeAlsoSection",
+Cell[6198, 204, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7432, 272, 411, 15, 70, "Text",
- CellTags->"LorentzIndex",
- CellID->261845122]
+Cell[6471, 218, 367, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7858, 290, 23, 0, 70, "FooterCell"]
+Cell[6853, 234, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzToCartesian.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzToCartesian.nb
new file mode 100644
index 000000000..50b6b011d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/LorentzToCartesian.nb
@@ -0,0 +1,670 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18796, 660]
+NotebookOptionsPosition[ 15275, 552]
+NotebookOutlinePosition[ 17493, 610]
+CellTagsIndexPosition[ 17408, 605]
+WindowTitle->LorentzToCartesian
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/LorentzToCartesian\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/LorentzToCartesian"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+LorentzToCartesian.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$182514],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/LorentzToCartesian", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["LorentzToCartesian", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"LorentzToCartesian", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] rewrites Lorentz tensors in form of Cartesian tensors \
+(when possible). Using options one can specify which types of tensors should \
+be converted."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->280971684],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "LorentzToCartesian", "]"}]], "Input",
+ CellLabel->"In[381]:=",
+ CellID->446069166],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"PauliSigmaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCTensor", "\[Rule]", "True"}], ",",
+ RowBox[{"FV", "\[Rule]", "True"}], ",",
+ RowBox[{"GA", "\[Rule]", "True"}], ",",
+ RowBox[{"GS", "\[Rule]", "True"}], ",",
+ RowBox[{"LC", "\[Rule]", "True"}], ",",
+ RowBox[{"SI", "\[Rule]", "True"}], ",",
+ RowBox[{"SIS", "\[Rule]", "True"}], ",",
+ RowBox[{"LorentzIndex", "\[Rule]", "True"}], ",",
+ RowBox[{"SP", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{501, 72},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[381]=",
+ CellID->61602561]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1336889648],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1586818607],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->2133361503],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1369736194]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "LorentzToCartesian"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->151214086],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{100, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->263079240]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"mu", ",", "nu"}], "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2100534216],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{72, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1423936308]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "LorentzToCartesian"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->507274850],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{540, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->354058269]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"LorentzToCartesian",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 59, 38.566304}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "LorentzToCartesian[exp] rewrites Lorentz tensors in form of Cartesian \
+tensors (when possible). Using options one can specify which types of tensors \
+should be converted.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "LorentzToCartesian", "titlemodifier" -> "", "windowtitle" ->
+ "LorentzToCartesian", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/LorentzToCartesian"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5775, 174, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1336889648]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 17264, 598}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[590, 21, 2314, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2907, 76, 295, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3227, 91, 495, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3747, 108, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->280971684],
+Cell[4488, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4544, 138, 122, 3, 70, "Input",
+ CellID->446069166],
+Cell[4669, 143, 1045, 24, 93, "Output",
+ CellID->61602561]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5775, 174, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1336889648],
+Cell[CellGroupData[{
+Cell[6188, 193, 196, 6, 26, "ExampleSection",
+ CellID->1586818607],
+Cell[CellGroupData[{
+Cell[6409, 203, 123, 4, 27, "Input",
+ CellID->2133361503],
+Cell[6535, 209, 403, 17, 37, "Output",
+ CellID->1369736194]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6975, 231, 110, 3, 27, "Input",
+ CellID->151214086],
+Cell[7088, 236, 893, 39, 39, "Output",
+ CellID->263079240]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8018, 280, 176, 6, 27, "Input",
+ CellID->2100534216],
+Cell[8197, 288, 627, 27, 38, "Output",
+ CellID->1423936308]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8861, 320, 110, 3, 27, "Input",
+ CellID->507274850],
+Cell[8974, 325, 6235, 220, 75, "Output",
+ CellID->354058269]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[15248, 550, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lower.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lower.nb
deleted file mode 100644
index 16e007190..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Lower.nb
+++ /dev/null
@@ -1,208 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6306, 199]
-NotebookOptionsPosition[ 4129, 133]
-NotebookOutlinePosition[ 6048, 188]
-CellTagsIndexPosition[ 5981, 183]
-WindowTitle->Lower
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Lower\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Lower"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Lower.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$101017],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Lower",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Lower", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["Lower"], "InlineFormula"],
- " \[LineSeparator]",
- "may be used inside LorentzIndex to indicate a covariant LorentzIndex."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["LorentzIndex",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
- ButtonNote->"LorentzIndex"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Upper",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Upper",
- ButtonNote->"Upper"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Contract1",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Contract1",
- ButtonNote->"Contract1"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Lower",
- CellID->381475007]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"Lower",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 14.494215}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Lower may be used inside LorentzIndex to indicate a covariant \
-LorentzIndex.", "synonyms" -> {}, "title" -> "Lower", "titlemodifier" -> "",
- "windowtitle" -> "Lower", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Lower"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "Lower"->{
- Cell[3539, 107, 548, 21, 70, "Text",
- CellTags->"Lower",
- CellID->381475007]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"Lower", 5873, 176}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[577, 21, 2233, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2813, 75, 48, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 377, 11, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3266, 93, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3539, 107, 548, 21, 70, "Text",
- CellTags->"Lower",
- CellID->381475007]
-}, Open ]],
-Cell[4102, 131, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MLimit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MLimit.nb
index b166267a2..b64956853 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MLimit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MLimit.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7498, 242]
-NotebookOptionsPosition[ 4741, 158]
-NotebookOutlinePosition[ 6977, 221]
-CellTagsIndexPosition[ 6869, 215]
+NotebookDataLength[ 7720, 250]
+NotebookOptionsPosition[ 4981, 168]
+NotebookOutlinePosition[ 7235, 231]
+CellTagsIndexPosition[ 7127, 225]
WindowTitle->MLimit
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$103090],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$184725],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/MLimit",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MLimit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MLimit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +119,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1438737782],
+ CellID->595846432],
Cell[CellGroupData[{
@@ -118,7 +129,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2067882180],
+ CellID->2022648806],
Cell[CellGroupData[{
@@ -144,12 +155,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MLimit",
- CellLabel->"Out[1]=",
- CellID->1414668006]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -159,7 +169,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"MLimit",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -168,21 +178,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 22.985520}",
+ "built" -> "{2020, 1, 5, 18, 59, 43.815787}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"MLimit[expr, lims] takes multiple limits of expr using the limits lims.",
- "synonyms" -> {}, "title" -> "MLimit", "titlemodifier" -> "",
- "windowtitle" -> "MLimit", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/MLimit"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "MLimit",
+ "titlemodifier" -> "", "windowtitle" -> "MLimit", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/MLimit"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -190,8 +200,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -200,50 +211,47 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3327, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3589, 106, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1438737782]},
+ CellID->595846432]},
"MLimit"->{
- Cell[3961, 124, 503, 18, 27, "Input",
+ Cell[4222, 135, 503, 18, 27, "Input",
CellTags->"MLimit",
CellID->1100919712],
- Cell[4467, 144, 208, 7, 36, "Output",
- CellTags->"MLimit",
- CellID->1414668006]}
+ Cell[4728, 155, 187, 6, 35, "Output",
+ CellTags->"MLimit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 6538, 201},
- {"MLimit", 6671, 205}
+ {"PrimaryExamplesSection", 6819, 212},
+ {"MLimit", 6952, 216}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 432, 13, 82, "Usage",
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[3132, 89, 432, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3327, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3589, 106, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1438737782],
+ CellID->595846432],
Cell[CellGroupData[{
-Cell[3740, 114, 196, 6, 25, "ExampleSection",
- CellID->2067882180],
+Cell[4001, 125, 196, 6, 26, "ExampleSection",
+ CellID->2022648806],
Cell[CellGroupData[{
-Cell[3961, 124, 503, 18, 27, "Input",
+Cell[4222, 135, 503, 18, 27, "Input",
CellTags->"MLimit",
CellID->1100919712],
-Cell[4467, 144, 208, 7, 36, "Output",
- CellTags->"MLimit",
- CellID->1414668006]
+Cell[4728, 155, 187, 6, 35, "Output",
+ CellTags->"MLimit"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[4714, 156, 23, 0, 42, "FooterCell"]
+Cell[4954, 166, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MT.nb
index e58bfbab1..8e60cdc30 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MT.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12493, 464]
-NotebookOptionsPosition[ 8106, 314]
-NotebookOutlinePosition[ 11015, 403]
-CellTagsIndexPosition[ 10911, 397]
+NotebookDataLength[ 13084, 467]
+NotebookOptionsPosition[ 8992, 332]
+NotebookOutlinePosition[ 11755, 414]
+CellTagsIndexPosition[ 11649, 408]
WindowTitle->MT
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MT\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MT"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/MT.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$105514],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/MT",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FCE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCI"], "\<\"MTD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MTD"], "\<\"MTE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MTE"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MT\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MT"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/MT.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$187409],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/MT",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->132005641],
+ CellID->149447409],
Cell[CellGroupData[{
@@ -118,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->435885382],
+ CellID->352333591],
Cell[CellGroupData[{
@@ -131,29 +168,22 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{38, 19},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{39, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MT",
- CellLabel->"Out[1]=",
- CellID->839261192]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -171,12 +201,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["4", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MT",
- CellLabel->"Out[2]=",
- CellID->1733599790]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -192,12 +221,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"MT", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{70, 15},
+ ImageSize->{71, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MT",
- CellLabel->"Out[3]//StandardForm=",
- CellID->2108634469]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -216,12 +244,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "a", "]"}], ",",
RowBox[{"LorentzIndex", "[", "b", "]"}]}], "]"}]], "Output",
- ImageSize->{312, 15},
+ ImageSize->{315, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MT",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1337434264]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -240,12 +267,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"MT", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{70, 15},
+ ImageSize->{71, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MT",
- CellLabel->"Out[5]//StandardForm=",
- CellID->62630223]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -287,12 +313,6 @@ Cell[TextData[{
ButtonNote->"FCI"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["MetricTensor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MetricTensor",
- ButtonNote->"MetricTensor"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["MTD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/MTD",
@@ -305,17 +325,15 @@ Cell[TextData[{
ButtonNote->"MTE"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"MT",
- CellID->897903284]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"MT",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -324,20 +342,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 33.927055}",
+ "built" -> "{2020, 1, 5, 18, 59, 50.971172}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "MT[mu, nu] is the metric tensor in 4 dimensions.",
- "synonyms" -> {}, "title" -> "MT", "titlemodifier" -> "", "windowtitle" ->
- "MT", "type" -> "Symbol", "uri" -> "FeynCalc/ref/MT"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "MT", "titlemodifier" ->
+ "", "windowtitle" -> "MT", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/MT"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -345,8 +363,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -355,117 +374,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3288, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4608, 132, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->132005641]},
+ CellID->149447409]},
"MT"->{
- Cell[3920, 124, 152, 5, 27, "Input",
+ Cell[5240, 161, 152, 5, 27, "Input",
CellTags->"MT",
CellID->2071184026],
- Cell[4075, 131, 558, 24, 40, "Output",
- CellTags->"MT",
- CellID->839261192],
- Cell[4670, 160, 280, 9, 27, "Input",
+ Cell[5395, 168, 411, 17, 39, "Output",
+ CellTags->"MT"],
+ Cell[5843, 190, 280, 9, 27, "Input",
CellTags->"MT",
CellID->828510540],
- Cell[4953, 171, 204, 7, 36, "Output",
- CellTags->"MT",
- CellID->1733599790],
- Cell[5194, 183, 174, 6, 27, "Input",
+ Cell[6126, 201, 183, 6, 35, "Output",
+ CellTags->"MT"],
+ Cell[6346, 212, 174, 6, 27, "Input",
CellTags->"MT",
CellID->493237874],
- Cell[5371, 191, 241, 8, 49, "Output",
- CellTags->"MT",
- CellID->2108634469],
- Cell[5649, 204, 207, 7, 27, "Input",
+ Cell[6523, 220, 220, 7, 51, "Output",
+ CellTags->"MT"],
+ Cell[6780, 232, 207, 7, 27, "Input",
CellTags->"MT",
CellID->2090805972],
- Cell[5859, 213, 324, 10, 49, "Output",
- CellTags->"MT",
- CellID->1337434264],
- Cell[6220, 228, 242, 9, 27, "Input",
+ Cell[6990, 241, 303, 9, 51, "Output",
+ CellTags->"MT"],
+ Cell[7330, 255, 242, 9, 27, "Input",
CellTags->"MT",
CellID->921483723],
- Cell[6465, 239, 239, 8, 49, "Output",
- CellTags->"MT",
- CellID->62630223],
- Cell[7072, 270, 992, 39, 28, "Text",
- CellTags->"MT",
- CellID->897903284]}
+ Cell[7575, 266, 220, 7, 51, "Output",
+ CellTags->"MT"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9857, 356},
- {"MT", 9985, 360}
+ {"PrimaryExamplesSection", 10788, 375},
+ {"MT", 10917, 379}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3320, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 404, 13, 82, "Usage",
+Cell[3897, 102, 279, 11, 45, "ObjectNameGrid"],
+Cell[4179, 115, 404, 13, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3288, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4608, 132, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->132005641],
+ CellID->149447409],
Cell[CellGroupData[{
-Cell[3700, 114, 195, 6, 25, "ExampleSection",
- CellID->435885382],
+Cell[5020, 151, 195, 6, 26, "ExampleSection",
+ CellID->352333591],
Cell[CellGroupData[{
-Cell[3920, 124, 152, 5, 27, "Input",
+Cell[5240, 161, 152, 5, 27, "Input",
CellTags->"MT",
CellID->2071184026],
-Cell[4075, 131, 558, 24, 40, "Output",
- CellTags->"MT",
- CellID->839261192]
+Cell[5395, 168, 411, 17, 39, "Output",
+ CellTags->"MT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4670, 160, 280, 9, 27, "Input",
+Cell[5843, 190, 280, 9, 27, "Input",
CellTags->"MT",
CellID->828510540],
-Cell[4953, 171, 204, 7, 36, "Output",
- CellTags->"MT",
- CellID->1733599790]
+Cell[6126, 201, 183, 6, 35, "Output",
+ CellTags->"MT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5194, 183, 174, 6, 27, "Input",
+Cell[6346, 212, 174, 6, 27, "Input",
CellTags->"MT",
CellID->493237874],
-Cell[5371, 191, 241, 8, 49, "Output",
- CellTags->"MT",
- CellID->2108634469]
+Cell[6523, 220, 220, 7, 51, "Output",
+ CellTags->"MT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5649, 204, 207, 7, 27, "Input",
+Cell[6780, 232, 207, 7, 27, "Input",
CellTags->"MT",
CellID->2090805972],
-Cell[5859, 213, 324, 10, 49, "Output",
- CellTags->"MT",
- CellID->1337434264]
+Cell[6990, 241, 303, 9, 51, "Output",
+ CellTags->"MT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6220, 228, 242, 9, 27, "Input",
+Cell[7330, 255, 242, 9, 27, "Input",
CellTags->"MT",
CellID->921483723],
-Cell[6465, 239, 239, 8, 49, "Output",
- CellTags->"MT",
- CellID->62630223]
+Cell[7575, 266, 220, 7, 51, "Output",
+ CellTags->"MT"]
}, Open ]]
}, Open ]],
-Cell[6731, 251, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7822, 277, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6799, 256, 270, 12, 31, "SeeAlsoSection",
+Cell[7890, 282, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7072, 270, 992, 39, 28, "Text",
- CellTags->"MT",
- CellID->897903284]
+Cell[8163, 296, 787, 31, 70, "SeeAlso"]
}, Open ]],
-Cell[8079, 312, 23, 0, 70, "FooterCell"]
+Cell[8965, 330, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTD.nb
index dacd17f59..eee88be16 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTD.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12571, 465]
-NotebookOptionsPosition[ 8153, 315]
-NotebookOutlinePosition[ 11081, 404]
-CellTagsIndexPosition[ 10975, 398]
+NotebookDataLength[ 13227, 470]
+NotebookOptionsPosition[ 9101, 335]
+NotebookOutlinePosition[ 11884, 417]
+CellTagsIndexPosition[ 11777, 411]
WindowTitle->MTD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MTD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MTD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/MTD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104810],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/MTD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FCE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCI"], "\<\"MT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MT"], "\<\"MTE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MTE"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MTD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MTD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/MTD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$186503],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/MTD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MTD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MTD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->61949600],
+ CellID->1942422787],
Cell[CellGroupData[{
@@ -118,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1930410875],
+ CellID->1624809085],
Cell[CellGroupData[{
@@ -131,28 +168,21 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{36, 19},
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{37, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[1]=",
- CellID->1640321247]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -170,12 +200,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["D", TraditionalForm]], "Output",
- ImageSize->{16, 15},
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[2]=",
- CellID->366701652]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -192,12 +221,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"MTD", "[",
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}]], "Output",
- ImageSize->{78, 15},
+ ImageSize->{79, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->842419980]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -219,12 +247,11 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "D"}], "]"}], ",",
RowBox[{"LorentzIndex", "[",
RowBox[{"\[Beta]", ",", "D"}], "]"}]}], "]"}]], "Output",
- ImageSize->{359, 15},
+ ImageSize->{361, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->255141216]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,12 +270,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"MTD", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{79, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[5]//StandardForm=",
- CellID->141115701]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -271,44 +297,38 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[RawData["\<\
Cell[TextData[{
- ButtonBox[\"FeynCalcExternal\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/FeynCalcExternal\",
- ButtonNote->\"FeynCalcExternal\"],
- \", \",
- ButtonBox[\"FCE\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/FCE\",
- ButtonNote->\"FCE\"],
- \", \",
- ButtonBox[\"FCI\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/FCI\",
- ButtonNote->\"FCI\"],
- \", \",
- ButtonBox[\"MetricTensor\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/MetricTensor\",
- ButtonNote->\"MetricTensor\"],
- \", \",
- ButtonBox[\"MT\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/MT\",
- ButtonNote->\"MT\"],
- \", \",
- ButtonBox[\"MTE\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/MTE\",
- ButtonNote->\"MTE\"],
- \".\"
-}], \"Text\",
- CellTags->\"MTD\",
- CellID->310039993]\
-\>"], "Text",
- CellTags->"MTD",
- CellID->310039993]
+ StyleBox[ButtonBox["FeynCalcExternal",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynCalcExternal",
+ ButtonNote->"FeynCalcExternal"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCE",
+ ButtonNote->"FCE"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCI",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["MT",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/MT",
+ ButtonNote->"MT"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["MTE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/MTE",
+ ButtonNote->"MTE"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -316,7 +336,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"MTD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -325,20 +345,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 30.820672}",
+ "built" -> "{2020, 1, 5, 18, 59, 48.745138}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "MTD[mu, nu] is the metric tensor in D dimensions.",
- "synonyms" -> {}, "title" -> "MTD", "titlemodifier" -> "", "windowtitle" ->
- "MTD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/MTD"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "MTD", "titlemodifier" ->
+ "", "windowtitle" -> "MTD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/MTD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -346,8 +366,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -356,117 +377,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3295, 95, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[4599, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->61949600]},
+ CellID->1942422787]},
"MTD"->{
- Cell[3927, 124, 154, 5, 27, "Input",
+ Cell[5233, 161, 154, 5, 27, "Input",
CellTags->"MTD",
CellID->1680977301],
- Cell[4084, 131, 535, 23, 40, "Output",
- CellTags->"MTD",
- CellID->1640321247],
- Cell[4656, 159, 284, 9, 27, "Input",
+ Cell[5390, 168, 388, 16, 39, "Output",
+ CellTags->"MTD"],
+ Cell[5815, 189, 284, 9, 27, "Input",
CellTags->"MTD",
CellID->2085004373],
- Cell[4943, 170, 204, 7, 36, "Output",
- CellTags->"MTD",
- CellID->366701652],
- Cell[5184, 182, 192, 7, 27, "Input",
+ Cell[6102, 200, 184, 6, 35, "Output",
+ CellTags->"MTD"],
+ Cell[6323, 211, 192, 7, 27, "Input",
CellTags->"MTD",
CellID->964321899],
- Cell[5379, 191, 255, 8, 49, "Output",
- CellTags->"MTD",
- CellID->842419980],
- Cell[5671, 204, 225, 8, 27, "Input",
+ Cell[6518, 220, 235, 7, 51, "Output",
+ CellTags->"MTD"],
+ Cell[6790, 232, 225, 8, 27, "Input",
CellTags->"MTD",
CellID->1887554420],
- Cell[5899, 214, 387, 12, 49, "Output",
- CellTags->"MTD",
- CellID->255141216],
- Cell[6323, 231, 252, 9, 27, "Input",
+ Cell[7018, 242, 367, 11, 51, "Output",
+ CellTags->"MTD"],
+ Cell[7422, 258, 252, 9, 27, "Input",
CellTags->"MTD",
CellID->623099946],
- Cell[6578, 242, 250, 8, 49, "Output",
- CellTags->"MTD",
- CellID->141115701],
- Cell[7196, 273, 915, 37, 551, "Text",
- CellTags->"MTD",
- CellID->310039993]}
+ Cell[7677, 269, 230, 7, 51, "Output",
+ CellTags->"MTD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9909, 357},
- {"MTD", 10037, 361}
+ {"PrimaryExamplesSection", 10902, 378},
+ {"MTD", 11033, 382}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3308, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 405, 13, 82, "Usage",
+Cell[3886, 102, 280, 11, 45, "ObjectNameGrid"],
+Cell[4169, 115, 405, 13, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3295, 95, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4599, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->61949600],
+ CellID->1942422787],
Cell[CellGroupData[{
-Cell[3706, 114, 196, 6, 25, "ExampleSection",
- CellID->1930410875],
+Cell[5012, 151, 196, 6, 26, "ExampleSection",
+ CellID->1624809085],
Cell[CellGroupData[{
-Cell[3927, 124, 154, 5, 27, "Input",
+Cell[5233, 161, 154, 5, 27, "Input",
CellTags->"MTD",
CellID->1680977301],
-Cell[4084, 131, 535, 23, 40, "Output",
- CellTags->"MTD",
- CellID->1640321247]
+Cell[5390, 168, 388, 16, 39, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4656, 159, 284, 9, 27, "Input",
+Cell[5815, 189, 284, 9, 27, "Input",
CellTags->"MTD",
CellID->2085004373],
-Cell[4943, 170, 204, 7, 36, "Output",
- CellTags->"MTD",
- CellID->366701652]
+Cell[6102, 200, 184, 6, 35, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5184, 182, 192, 7, 27, "Input",
+Cell[6323, 211, 192, 7, 27, "Input",
CellTags->"MTD",
CellID->964321899],
-Cell[5379, 191, 255, 8, 49, "Output",
- CellTags->"MTD",
- CellID->842419980]
+Cell[6518, 220, 235, 7, 51, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5671, 204, 225, 8, 27, "Input",
+Cell[6790, 232, 225, 8, 27, "Input",
CellTags->"MTD",
CellID->1887554420],
-Cell[5899, 214, 387, 12, 49, "Output",
- CellTags->"MTD",
- CellID->255141216]
+Cell[7018, 242, 367, 11, 51, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6323, 231, 252, 9, 27, "Input",
+Cell[7422, 258, 252, 9, 27, "Input",
CellTags->"MTD",
CellID->623099946],
-Cell[6578, 242, 250, 8, 49, "Output",
- CellTags->"MTD",
- CellID->141115701]
+Cell[7677, 269, 230, 7, 51, "Output",
+ CellTags->"MTD"]
}, Open ]]
}, Open ]],
-Cell[6855, 254, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7934, 280, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6923, 259, 270, 12, 31, "SeeAlsoSection",
+Cell[8002, 285, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7196, 273, 915, 37, 551, "Text",
- CellTags->"MTD",
- CellID->310039993]
+Cell[8275, 299, 784, 31, 70, "SeeAlso"]
}, Open ]],
-Cell[8126, 313, 23, 0, 70, "FooterCell"]
+Cell[9074, 333, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTE.nb
index b785f9c35..ffb4a13f9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTE.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MTE.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16317, 628]
-NotebookOptionsPosition[ 10878, 438]
-NotebookOutlinePosition[ 14147, 539]
-CellTagsIndexPosition[ 14040, 533]
+NotebookDataLength[ 16431, 610]
+NotebookOptionsPosition[ 11412, 440]
+NotebookOutlinePosition[ 14488, 533]
+CellTagsIndexPosition[ 14381, 527]
WindowTitle->MTE
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MTE\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MTE"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/MTE.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$105157],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/MTE",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalcExternal\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynCalcExternal"], "\<\"FCE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCE"], "\<\"FCI\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCI"], "\<\"MT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MT"], "\<\"MTD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MTD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MTE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MTE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/MTE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$186954],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/MTE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MTE", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MTE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1554798484],
+ CellID->1903374112],
Cell[CellGroupData[{
@@ -118,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1048770762],
+ CellID->1366075322],
Cell[CellGroupData[{
@@ -131,29 +168,22 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "^"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{36, 20},
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{37, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[1]=",
- CellID->1958039632]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -172,12 +202,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"D", "-", "4"}], TraditionalForm]], "Output",
- ImageSize->{40, 15},
+ ImageSize->{44, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[2]=",
- CellID->558766132]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -194,11 +223,10 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->40801765]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -216,11 +244,10 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"D", "-", "4"}], TraditionalForm]], "Output",
- ImageSize->{40, 15},
+ ImageSize->{44, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
- CellID->509955041]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -237,12 +264,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"MTE", "[",
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}]], "Output",
- ImageSize->{78, 15},
+ ImageSize->{79, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1333611151]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -256,29 +282,22 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "^"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{36, 20},
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{37, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[6]=",
- CellID->869554807]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -304,12 +323,11 @@ Cell[BoxData[
RowBox[{"\[Beta]", ",",
RowBox[{
RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
- ImageSize->{421, 15},
+ ImageSize->{425, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[7]//StandardForm=",
- CellID->369801037]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -328,12 +346,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"MTE", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{79, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[8]//StandardForm=",
- CellID->1143698797]
+ CellLabel->"Out[8]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -347,29 +364,22 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "^"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{33, 19},
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{35, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MTD",
- CellLabel->"Out[9]=",
- CellID->1588832862]
+ CellLabel->"Out[9]="]
}, Open ]]
}, Open ]],
@@ -411,12 +421,6 @@ Cell[TextData[{
ButtonNote->"FCI"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["MetricTensor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MetricTensor",
- ButtonNote->"MetricTensor"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["MT",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/MT",
@@ -429,9 +433,7 @@ Cell[TextData[{
ButtonNote->"MTD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"MTD",
- CellID->310039993]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -448,20 +450,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 32.366168}",
+ "built" -> "{2020, 1, 5, 18, 59, 49.855256}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"MTE[mu, nu] is the metric tensor in D-4 dimensions.", "synonyms" -> {},
- "title" -> "MTE", "titlemodifier" -> "", "windowtitle" -> "MTE", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/MTE"}, "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "MTE", "titlemodifier" -> "", "windowtitle" ->
+ "MTE", "type" -> "Symbol", "uri" -> "FeynCalc/ref/MTE"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -469,8 +472,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -479,157 +483,135 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3297, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4601, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1554798484]},
+ CellID->1903374112]},
"MTD"->{
- Cell[3931, 124, 154, 5, 27, "Input",
+ Cell[5235, 161, 154, 5, 27, "Input",
CellTags->"MTD",
CellID->1680977301],
- Cell[4088, 131, 560, 24, 41, "Output",
- CellTags->"MTD",
- CellID->1958039632],
- Cell[4685, 160, 284, 9, 27, "Input",
+ Cell[5392, 168, 412, 17, 39, "Output",
+ CellTags->"MTD"],
+ Cell[5841, 190, 284, 9, 27, "Input",
CellTags->"MTD",
CellID->2085004373],
- Cell[4972, 171, 227, 8, 36, "Output",
- CellTags->"MTD",
- CellID->558766132],
- Cell[6241, 227, 192, 7, 27, "Input",
+ Cell[6128, 201, 207, 7, 35, "Output",
+ CellTags->"MTD"],
+ Cell[7338, 254, 192, 7, 27, "Input",
CellTags->"MTD",
CellID->964321899],
- Cell[6436, 236, 256, 8, 49, "Output",
- CellTags->"MTD",
- CellID->1333611151],
- Cell[6729, 249, 153, 5, 27, "Input",
+ Cell[7533, 263, 235, 7, 51, "Output",
+ CellTags->"MTD"],
+ Cell[7805, 275, 153, 5, 27, "Input",
CellTags->"MTD",
CellID->842419980],
- Cell[6885, 256, 559, 24, 41, "Output",
- CellTags->"MTD",
- CellID->869554807],
- Cell[7481, 285, 225, 8, 27, "Input",
+ Cell[7961, 282, 412, 17, 39, "Output",
+ CellTags->"MTD"],
+ Cell[8410, 304, 225, 8, 27, "Input",
CellTags->"MTD",
CellID->1887554420],
- Cell[7709, 295, 483, 16, 49, "Output",
- CellTags->"MTD",
- CellID->369801037],
- Cell[8229, 316, 252, 9, 27, "Input",
+ Cell[8638, 314, 463, 15, 51, "Output",
+ CellTags->"MTD"],
+ Cell[9138, 334, 252, 9, 27, "Input",
CellTags->"MTD",
CellID->623099946],
- Cell[8484, 327, 251, 8, 49, "Output",
- CellTags->"MTD",
- CellID->1143698797],
- Cell[8772, 340, 148, 5, 27, "Input",
+ Cell[9393, 345, 230, 7, 51, "Output",
+ CellTags->"MTD"],
+ Cell[9660, 357, 148, 5, 27, "Input",
CellTags->"MTD",
CellID->141115701],
- Cell[8923, 347, 555, 24, 40, "Output",
- CellTags->"MTD",
- CellID->1588832862],
- Cell[9846, 394, 990, 39, 32, "Text",
- CellTags->"MTD",
- CellID->310039993]}
+ Cell[9811, 364, 407, 17, 37, "Output",
+ CellTags->"MTD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12638, 480},
- {"MTD", 12768, 484}
+ {"PrimaryExamplesSection", 13218, 484},
+ {"MTD", 13349, 488}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3308, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 407, 13, 82, "Usage",
+Cell[3886, 102, 280, 11, 45, "ObjectNameGrid"],
+Cell[4169, 115, 407, 13, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3297, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4601, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1554798484],
+ CellID->1903374112],
Cell[CellGroupData[{
-Cell[3710, 114, 196, 6, 25, "ExampleSection",
- CellID->1048770762],
+Cell[5014, 151, 196, 6, 26, "ExampleSection",
+ CellID->1366075322],
Cell[CellGroupData[{
-Cell[3931, 124, 154, 5, 27, "Input",
+Cell[5235, 161, 154, 5, 27, "Input",
CellTags->"MTD",
CellID->1680977301],
-Cell[4088, 131, 560, 24, 41, "Output",
- CellTags->"MTD",
- CellID->1958039632]
+Cell[5392, 168, 412, 17, 39, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4685, 160, 284, 9, 27, "Input",
+Cell[5841, 190, 284, 9, 27, "Input",
CellTags->"MTD",
CellID->2085004373],
-Cell[4972, 171, 227, 8, 36, "Output",
- CellTags->"MTD",
- CellID->558766132]
+Cell[6128, 201, 207, 7, 35, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5236, 184, 265, 8, 27, "Input",
+Cell[6372, 213, 265, 8, 27, "Input",
CellID->1799001225],
-Cell[5504, 194, 185, 6, 36, "Output",
- CellID->40801765]
+Cell[6640, 223, 166, 5, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5726, 205, 266, 8, 27, "Input",
+Cell[6843, 233, 266, 8, 27, "Input",
CellID->1071300852],
-Cell[5995, 215, 209, 7, 36, "Output",
- CellID->509955041]
+Cell[7112, 243, 189, 6, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6241, 227, 192, 7, 27, "Input",
+Cell[7338, 254, 192, 7, 27, "Input",
CellTags->"MTD",
CellID->964321899],
-Cell[6436, 236, 256, 8, 49, "Output",
- CellTags->"MTD",
- CellID->1333611151]
+Cell[7533, 263, 235, 7, 51, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6729, 249, 153, 5, 27, "Input",
+Cell[7805, 275, 153, 5, 27, "Input",
CellTags->"MTD",
CellID->842419980],
-Cell[6885, 256, 559, 24, 41, "Output",
- CellTags->"MTD",
- CellID->869554807]
+Cell[7961, 282, 412, 17, 39, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7481, 285, 225, 8, 27, "Input",
+Cell[8410, 304, 225, 8, 27, "Input",
CellTags->"MTD",
CellID->1887554420],
-Cell[7709, 295, 483, 16, 49, "Output",
- CellTags->"MTD",
- CellID->369801037]
+Cell[8638, 314, 463, 15, 51, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8229, 316, 252, 9, 27, "Input",
+Cell[9138, 334, 252, 9, 27, "Input",
CellTags->"MTD",
CellID->623099946],
-Cell[8484, 327, 251, 8, 49, "Output",
- CellTags->"MTD",
- CellID->1143698797]
+Cell[9393, 345, 230, 7, 51, "Output",
+ CellTags->"MTD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8772, 340, 148, 5, 27, "Input",
+Cell[9660, 357, 148, 5, 27, "Input",
CellTags->"MTD",
CellID->141115701],
-Cell[8923, 347, 555, 24, 40, "Output",
- CellTags->"MTD",
- CellID->1588832862]
+Cell[9811, 364, 407, 17, 37, "Output",
+ CellTags->"MTD"]
}, Open ]]
}, Open ]],
-Cell[9505, 375, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10245, 385, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9573, 380, 270, 12, 31, "SeeAlsoSection",
+Cell[10313, 390, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9846, 394, 990, 39, 32, "Text",
- CellTags->"MTD",
- CellID->310039993]
+Cell[10586, 404, 784, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[10851, 436, 23, 0, 42, "FooterCell"]
+Cell[11385, 438, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Mandelstam.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Mandelstam.nb
index fe5c9ca67..5a60c3cbd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Mandelstam.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Mandelstam.nb
@@ -3,69 +3,100 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7343, 224]
-NotebookOptionsPosition[ 4900, 155]
-NotebookOutlinePosition[ 7079, 213]
-CellTagsIndexPosition[ 7007, 208]
+NotebookDataLength[ 8567, 253]
+NotebookOptionsPosition[ 6330, 194]
+NotebookOutlinePosition[ 8357, 245]
+CellTagsIndexPosition[ 8314, 242]
WindowTitle->Mandelstam
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Mandelstam\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Mandelstam"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Mandelstam.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$101368],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Mandelstam", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracTrace\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"OneLoop\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSum"], "\<\"Tr\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Tr"], "\<\"TrickMandelstam\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TrickMandelstam"], "\<\"SetMandelstam\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SetMandelstam"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Mandelstam\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Mandelstam"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Mandelstam.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$182951],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Mandelstam", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +104,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Mandelstam", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Mandelstam", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -146,9 +187,7 @@ Cell[TextData[{
ButtonNote->"SetMandelstam"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Mandelstam",
- CellID->817062959]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -165,10 +204,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 15.798194}",
+ "built" -> "{2020, 1, 5, 18, 59, 39.625434}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -178,11 +217,11 @@ TaggingRules->{
TrickMandelstam. A typical setting is Mandelstam -> {s, t, u, \
m1^2+m2^2+m3^2+m4^2}, which implies s + t + u = m1^2+m2^2+m3^2+m4^2. If other \
than four-particle processes are calculated, the setting should be: \
-Mandelstam -> {}.", "synonyms" -> {}, "title" -> "Mandelstam",
- "titlemodifier" -> "", "windowtitle" -> "Mandelstam", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Mandelstam"}},
+Mandelstam -> {}.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Mandelstam", "titlemodifier" -> "", "windowtitle" -> "Mandelstam",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Mandelstam"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -191,41 +230,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Mandelstam"->{
- Cell[3807, 111, 1051, 39, 70, "Text",
- CellTags->"Mandelstam",
- CellID->817062959]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Mandelstam", 6893, 201}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3491, 83, 70, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 615, 15, 70, "Usage",
+Cell[4076, 106, 287, 11, 70, "ObjectNameGrid"],
+Cell[4366, 119, 615, 15, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3534, 97, 270, 12, 70, "SeeAlsoSection",
+Cell[5006, 138, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3807, 111, 1051, 39, 70, "Text",
- CellTags->"Mandelstam",
- CellID->817062959]
+Cell[5279, 152, 1009, 37, 70, "SeeAlso"]
}, Open ]],
-Cell[4873, 153, 23, 0, 70, "FooterCell"]
+Cell[6303, 192, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Map2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Map2.nb
index ad20db4bb..cb9198aa9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Map2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Map2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10578, 383]
-NotebookOptionsPosition[ 6442, 246]
-NotebookOutlinePosition[ 9265, 330]
-CellTagsIndexPosition[ 9159, 324]
+NotebookDataLength[ 11182, 396]
+NotebookOptionsPosition[ 7308, 272]
+NotebookOutlinePosition[ 10002, 350]
+CellTagsIndexPosition[ 9896, 344]
WindowTitle->Map2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Map2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Map2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Map2.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$101717],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Map2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"NTerms\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/NTerms"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Map2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Map2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Map2.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$183398],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Map2",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Map2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Map2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1245800203],
+ CellID->1935818076],
Cell[CellGroupData[{
@@ -119,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->211987111],
+ CellID->83404821],
Cell[CellGroupData[{
@@ -137,12 +169,11 @@ Cell[BoxData[
RowBox[{"f", "(", "a", ")"}], "+",
RowBox[{"f", "(",
RowBox[{"-", "b"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{91, 15},
+ ImageSize->{99, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Map2",
- CellLabel->"Out[1]=",
- CellID->979511779]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -157,12 +188,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "x", ")"}], TraditionalForm]], "Output",
- ImageSize->{35, 15},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Map2",
- CellLabel->"Out[2]=",
- CellID->1491769424]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -182,12 +212,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"a", ",", "b", ",", "c"}], "}"}], ")"}],
TraditionalForm]], "Output",
- ImageSize->{81, 15},
+ ImageSize->{89, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Map2",
- CellLabel->"Out[3]=",
- CellID->1614084211]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -202,12 +231,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Map2",
- CellLabel->"Out[4]=",
- CellID->1998194589]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -237,9 +265,7 @@ Cell[TextData[{
ButtonNote->"NTerms"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Map2",
- CellID->435233862]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -256,21 +282,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 17.128632}",
+ "built" -> "{2020, 1, 5, 18, 59, 40.661048}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Map2[f, exp] is equivalent to Map if Nterms[exp] > 0, otherwise Map2[f, \
-exp] gives f[exp].", "synonyms" -> {}, "title" -> "Map2", "titlemodifier" ->
- "", "windowtitle" -> "Map2", "type" -> "Symbol", "uri" ->
+exp] gives f[exp].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Map2",
+ "titlemodifier" -> "", "windowtitle" -> "Map2", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Map2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -278,8 +304,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -288,103 +315,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3336, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4322, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1245800203]},
+ CellID->1935818076]},
"Map2"->{
- Cell[3969, 125, 166, 6, 27, "Input",
+ Cell[4954, 157, 166, 6, 27, "Input",
CellTags->"Map2",
CellID->194230717],
- Cell[4138, 133, 306, 11, 36, "Output",
- CellTags->"Map2",
- CellID->979511779],
- Cell[4481, 149, 143, 5, 27, "Input",
+ Cell[5123, 165, 286, 10, 37, "Output",
+ CellTags->"Map2"],
+ Cell[5446, 180, 143, 5, 27, "Input",
CellTags->"Map2",
CellID->1407522381],
- Cell[4627, 156, 234, 8, 36, "Output",
- CellTags->"Map2",
- CellID->1491769424],
- Cell[4898, 169, 202, 7, 27, "Input",
+ Cell[5592, 187, 213, 7, 37, "Output",
+ CellTags->"Map2"],
+ Cell[5842, 199, 202, 7, 27, "Input",
CellTags->"Map2",
CellID->1867340703],
- Cell[5103, 178, 296, 11, 36, "Output",
- CellTags->"Map2",
- CellID->1614084211],
- Cell[5436, 194, 142, 5, 27, "Input",
+ Cell[6047, 208, 275, 10, 37, "Output",
+ CellTags->"Map2"],
+ Cell[6359, 223, 142, 5, 27, "Input",
CellTags->"Map2",
CellID->722460655],
- Cell[5581, 201, 234, 8, 36, "Output",
- CellTags->"Map2",
- CellID->1998194589],
- Cell[6183, 232, 217, 9, 31, "Text",
- CellTags->"Map2",
- CellID->435233862]}
+ Cell[6504, 230, 213, 7, 37, "Output",
+ CellTags->"Map2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8247, 289},
- {"Map2", 8378, 293}
+ {"PrimaryExamplesSection", 9156, 316},
+ {"Map2", 9288, 320}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 2981, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 453, 14, 83, "Usage",
+Cell[3560, 97, 281, 11, 45, "ObjectNameGrid"],
+Cell[3844, 110, 453, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3336, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4322, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1245800203],
+ CellID->1935818076],
Cell[CellGroupData[{
-Cell[3749, 115, 195, 6, 25, "ExampleSection",
- CellID->211987111],
+Cell[4735, 147, 194, 6, 26, "ExampleSection",
+ CellID->83404821],
Cell[CellGroupData[{
-Cell[3969, 125, 166, 6, 27, "Input",
+Cell[4954, 157, 166, 6, 27, "Input",
CellTags->"Map2",
CellID->194230717],
-Cell[4138, 133, 306, 11, 36, "Output",
- CellTags->"Map2",
- CellID->979511779]
+Cell[5123, 165, 286, 10, 37, "Output",
+ CellTags->"Map2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4481, 149, 143, 5, 27, "Input",
+Cell[5446, 180, 143, 5, 27, "Input",
CellTags->"Map2",
CellID->1407522381],
-Cell[4627, 156, 234, 8, 36, "Output",
- CellTags->"Map2",
- CellID->1491769424]
+Cell[5592, 187, 213, 7, 37, "Output",
+ CellTags->"Map2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4898, 169, 202, 7, 27, "Input",
+Cell[5842, 199, 202, 7, 27, "Input",
CellTags->"Map2",
CellID->1867340703],
-Cell[5103, 178, 296, 11, 36, "Output",
- CellTags->"Map2",
- CellID->1614084211]
+Cell[6047, 208, 275, 10, 37, "Output",
+ CellTags->"Map2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5436, 194, 142, 5, 27, "Input",
+Cell[6359, 223, 142, 5, 27, "Input",
CellTags->"Map2",
CellID->722460655],
-Cell[5581, 201, 234, 8, 36, "Output",
- CellTags->"Map2",
- CellID->1998194589]
+Cell[6504, 230, 213, 7, 37, "Output",
+ CellTags->"Map2"]
}, Open ]]
}, Open ]],
-Cell[5842, 213, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6744, 241, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5910, 218, 270, 12, 31, "SeeAlsoSection",
+Cell[6812, 246, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6183, 232, 217, 9, 31, "Text",
- CellTags->"Map2",
- CellID->435233862]
+Cell[7085, 260, 181, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6415, 244, 23, 0, 42, "FooterCell"]
+Cell[7281, 270, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemSet.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemSet.nb
index 730b3b0a9..5e334d8a5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemSet.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemSet.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6485, 198]
-NotebookOptionsPosition[ 4162, 130]
-NotebookOutlinePosition[ 6226, 187]
-CellTagsIndexPosition[ 6158, 182]
+NotebookDataLength[ 7276, 218]
+NotebookOptionsPosition[ 5141, 160]
+NotebookOutlinePosition[ 7069, 210]
+CellTagsIndexPosition[ 7026, 207]
WindowTitle->MemSet
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MemSet\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MemSet"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/MemSet.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCMemoryAvailable\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCMemoryAvailable"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MemSet\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MemSet"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/MemSet.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$102399],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/MemSet",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$183834],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/MemSet", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MemSet", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MemSet", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -85,7 +117,7 @@ Cell[BoxData[GridBox[{
"InlineFormula"],
" \[LineSeparator]",
"is like f[x_] := f[x] = body, but dependend on the value of the setting \
-of MemoryAvailable \[Rule] memorycut (memorycut - MemoryInUse[]/",
+of FCMemoryAvailable \[Rule] memorycut (memorycut - MemoryInUse[]/",
Cell[BoxData[
FormBox[
SuperscriptBox["10", "6"], TraditionalForm]]],
@@ -115,15 +147,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["MemoryAvailable",
+ StyleBox[ButtonBox["FCMemoryAvailable",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MemoryAvailable",
- ButtonNote->"MemoryAvailable"],
+ ButtonData->"paclet:FeynCalc/ref/FCMemoryAvailable",
+ ButtonNote->"FCMemoryAvailable"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"MemSet",
- CellID->295395423]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -140,23 +170,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 20.068732}",
+ "built" -> "{2020, 1, 5, 18, 59, 41.715423}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"MemSet[f[x_], body] is like f[x_] := f[x] = body, but dependend on the \
-value of the setting of MemoryAvailable -> memorycut (memorycut - \
+value of the setting of FCMemoryAvailable -> memorycut (memorycut - \
MemoryInUse[]/10^6) MemSet[f[x_], body] may evaluate as f[x_] := body.",
- "synonyms" -> {}, "title" -> "MemSet", "titlemodifier" -> "",
- "windowtitle" -> "MemSet", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "MemSet", "titlemodifier" ->
+ "", "windowtitle" -> "MemSet", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/MemSet"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -165,41 +195,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "MemSet"->{
- Cell[3874, 116, 246, 9, 70, "Text",
- CellTags->"MemSet",
- CellID->295395423]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"MemSet", 6050, 175}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 3012, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 706, 20, 70, "Usage",
+Cell[3593, 97, 283, 11, 70, "ObjectNameGrid"],
+Cell[3879, 110, 708, 20, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3601, 102, 270, 12, 70, "SeeAlsoSection",
+Cell[4612, 134, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3874, 116, 246, 9, 70, "Text",
- CellTags->"MemSet",
- CellID->295395423]
+Cell[4885, 148, 214, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4135, 128, 23, 0, 70, "FooterCell"]
+Cell[5114, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemoryAvailable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemoryAvailable.nb
deleted file mode 100644
index 8159f4e7d..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MemoryAvailable.nb
+++ /dev/null
@@ -1,205 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6510, 196]
-NotebookOptionsPosition[ 4154, 129]
-NotebookOutlinePosition[ 6242, 185]
-CellTagsIndexPosition[ 6165, 180]
-WindowTitle->MemoryAvailable
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MemoryAvailable\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MemoryAvailable"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-MemoryAvailable.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$102054],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/MemoryAvailable", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["MemoryAvailable", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["MemoryAvailable"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option of MemSet. It can be set to an integer n, where n is the \
-available amount of main memory in Mega Byte. The default setting is \
-$MemoryAvailable."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["MemSet",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MemSet",
- ButtonNote->"MemSet"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["$MemoryAvailable",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/$MemoryAvailable",
- ButtonNote->"$MemoryAvailable"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"MemoryAvailable",
- CellID->134961378]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"MemoryAvailable",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 18.720150}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "MemoryAvailable is an option of MemSet. It can be set to an integer n, \
-where n is the available amount of main memory in Mega Byte. The default \
-setting is $MemoryAvailable.", "synonyms" -> {}, "title" -> "MemoryAvailable",
- "titlemodifier" -> "", "windowtitle" -> "MemoryAvailable", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/MemoryAvailable"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "MemoryAvailable"->{
- Cell[3701, 109, 411, 15, 70, "Text",
- CellTags->"MemoryAvailable",
- CellID->134961378]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"MemoryAvailable", 6047, 173}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 478, 13, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3428, 95, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3701, 109, 411, 15, 70, "Text",
- CellTags->"MemoryAvailable",
- CellID->134961378]
-}, Open ]],
-Cell[4127, 127, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MetricTensor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MetricTensor.nb
index e4dff09d9..0eee126df 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MetricTensor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MetricTensor.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15710, 573]
-NotebookOptionsPosition[ 9835, 380]
-NotebookOutlinePosition[ 13502, 488]
-CellTagsIndexPosition[ 13386, 482]
+NotebookDataLength[ 17097, 628]
+NotebookOptionsPosition[ 12043, 467]
+NotebookOutlinePosition[ 14836, 546]
+CellTagsIndexPosition[ 14720, 540]
WindowTitle->MetricTensor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MetricTensor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MetricTensor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"MT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/MT"], "\<\"MTD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/MTD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MetricTensor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MetricTensor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
MetricTensor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$102747],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/MetricTensor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$184282],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/MetricTensor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ MetricTensor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MetricTensor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MetricTensor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +129,63 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->45285396],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+The shortcut MetricTensor is deprecated, please use MT instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "MetricTensor", "]"}]], "Input",
+ CellLabel->"In[25]:=",
+ CellID->1215792887],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{257, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[25]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +201,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1369115102],
+ CellID->1410517924],
Cell[CellGroupData[{
@@ -118,7 +211,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->343685928],
+ CellID->926168638],
Cell[CellGroupData[{
@@ -135,23 +228,18 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{38, 19},
+ ImageSize->{39, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MetricTensor",
- CellLabel->"Out[1]=",
- CellID->1323519245]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -159,18 +247,14 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[",
RowBox[{"%", " ", "%"}], "]"}]], "Input",
- CellTags->"MetricTensor",
- CellLabel->"In[2]:=",
- CellID->888467606],
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox["4", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MetricTensor",
- CellLabel->"Out[2]=",
- CellID->116818789]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -178,7 +262,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"MetricTensor", "[",
RowBox[{"\[Alpha]", ",", "\[Beta]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}]], "Input",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]], "Input",
CellTags->"MetricTensor",
CellLabel->"In[3]:=",
CellID->524835668],
@@ -188,23 +272,18 @@ Cell[BoxData[
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{36, 19},
+ ImageSize->{37, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MetricTensor",
- CellLabel->"Out[3]=",
- CellID->1803847759]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -217,13 +296,12 @@ Cell[BoxData[
CellID->125271051],
Cell[BoxData[
- FormBox["n", TraditionalForm]], "Output",
- ImageSize->{14, 15},
+ FormBox["D", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MetricTensor",
- CellLabel->"Out[4]=",
- CellID->1132028331]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -241,83 +319,106 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "a", "]"}], ",",
RowBox[{"LorentzIndex", "[", "b", "]"}]}], "]"}]], "Output",
- ImageSize->{312, 15},
+ ImageSize->{315, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MetricTensor",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1708064740]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
+Cell["\<\
+MetricTensor is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use MT.\
+\>", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"a", ",", "b", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], "]"}]], "Input",
- CellTags->"MetricTensor",
- CellLabel->"In[6]:=",
- CellID->1544242781],
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
Cell[BoxData[
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"a", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"b", ",", "D"}], "]"}]}], "]"}]], "Output",
- ImageSize->{358, 15},
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{37, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MetricTensor",
- CellLabel->"Out[6]//StandardForm=",
- CellID->2135349923]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FCE", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"a", ",", "b"}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"MetricTensor",
- CellLabel->"In[7]:=",
- CellID->912797684],
+ RowBox[{"MTD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[7]:="],
Cell[BoxData[
- RowBox[{"MT", "[",
- RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{70, 15},
+ FormBox[
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{35, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MetricTensor",
- CellLabel->"Out[7]//StandardForm=",
- CellID->489293900]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FCE", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"a", ",", "b", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"MetricTensor",
- CellLabel->"In[8]:=",
- CellID->1275057625],
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}], "===",
+ RowBox[{"MetricTensor", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
+ CellLabel->"In[8]:="],
Cell[BoxData[
- RowBox[{"MTD", "[",
- RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{77, 15},
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MetricTensor",
- CellLabel->"Out[8]//StandardForm=",
- CellID->1657208619]
+ CellLabel->"Out[8]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"MTD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}], "===",
+ RowBox[{"MetricTensor", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[9]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ ImageSize->{31, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]="]
}, Open ]]
}, Open ]],
@@ -341,18 +442,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["FeynCalcExternal",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynCalcExternal",
- ButtonNote->"FeynCalcExternal"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["FCE",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FCE",
- ButtonNote->"FCE"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FCI",
@@ -371,9 +460,7 @@ Cell[TextData[{
ButtonNote->"MTD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"MetricTensor",
- CellID->309904132]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -381,7 +468,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"MetricTensor",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -390,21 +477,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 21.487948}",
+ "built" -> "{2020, 1, 5, 18, 59, 42.681959}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"MetricTensor[mu, nu] is the metric tensor. The default dimension is 4.",
- "synonyms" -> {}, "title" -> "MetricTensor", "titlemodifier" -> "",
- "windowtitle" -> "MetricTensor", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/MetricTensor"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "MetricTensor",
+ "titlemodifier" -> "", "windowtitle" -> "MetricTensor", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/MetricTensor"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -412,8 +500,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -422,159 +511,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3358, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5905, 188, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1369115102]},
+ CellID->1410517924]},
"MetricTensor"->{
- Cell[3991, 124, 171, 5, 27, "Input",
+ Cell[6538, 217, 171, 5, 27, "Input",
CellTags->"MetricTensor",
CellID->187143262],
- Cell[4165, 131, 522, 22, 40, "Output",
- CellTags->"MetricTensor",
- CellID->1323519245],
- Cell[4724, 158, 154, 5, 27, "Input",
- CellTags->"MetricTensor",
- CellID->888467606],
- Cell[4881, 165, 213, 7, 36, "Output",
- CellTags->"MetricTensor",
- CellID->116818789],
- Cell[5131, 177, 219, 6, 27, "Input",
+ Cell[6712, 224, 421, 17, 39, "Output",
+ CellTags->"MetricTensor"],
+ Cell[7483, 261, 219, 6, 27, "Input",
CellTags->"MetricTensor",
CellID->524835668],
- Cell[5353, 185, 498, 21, 40, "Output",
- CellTags->"MetricTensor",
- CellID->1803847759],
- Cell[5888, 211, 154, 5, 27, "Input",
+ Cell[7705, 269, 397, 16, 39, "Output",
+ CellTags->"MetricTensor"],
+ Cell[8139, 290, 154, 5, 27, "Input",
CellTags->"MetricTensor",
CellID->125271051],
- Cell[6045, 218, 214, 7, 36, "Output",
- CellTags->"MetricTensor",
- CellID->1132028331],
- Cell[6296, 230, 199, 6, 27, "Input",
+ Cell[8296, 297, 193, 6, 35, "Output",
+ CellTags->"MetricTensor"],
+ Cell[8526, 308, 199, 6, 27, "Input",
CellTags->"MetricTensor",
CellID->1318549517],
- Cell[6498, 238, 334, 10, 49, "Output",
- CellTags->"MetricTensor",
- CellID->1708064740],
- Cell[6869, 253, 248, 7, 27, "Input",
- CellTags->"MetricTensor",
- CellID->1544242781],
- Cell[7120, 262, 384, 12, 49, "Output",
- CellTags->"MetricTensor",
- CellID->2135349923],
- Cell[7541, 279, 230, 7, 27, "Input",
- CellTags->"MetricTensor",
- CellID->912797684],
- Cell[7774, 288, 250, 8, 49, "Output",
- CellTags->"MetricTensor",
- CellID->489293900],
- Cell[8061, 301, 281, 8, 27, "Input",
- CellTags->"MetricTensor",
- CellID->1275057625],
- Cell[8345, 311, 252, 8, 49, "Output",
- CellTags->"MetricTensor",
- CellID->1657208619],
- Cell[8965, 342, 828, 33, 32, "Text",
- CellTags->"MetricTensor",
- CellID->309904132]}
+ Cell[8728, 316, 313, 9, 51, "Output",
+ CellTags->"MetricTensor"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11655, 423},
- {"MetricTensor", 11794, 427}
+ {"PrimaryExamplesSection", 13909, 512},
+ {"MetricTensor", 14049, 516}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3159, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 426, 13, 82, "Usage",
+Cell[3746, 99, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4060, 114, 426, 13, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3358, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4511, 131, 737, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->45285396],
+Cell[5251, 157, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5285, 159, 109, 3, 70, "Notes",
+ CellID->1067943069],
+Cell[CellGroupData[{
+Cell[5419, 166, 116, 3, 70, "Input",
+ CellID->1215792887],
+Cell[5538, 171, 306, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5905, 188, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1369115102],
+ CellID->1410517924],
Cell[CellGroupData[{
-Cell[3771, 114, 195, 6, 25, "ExampleSection",
- CellID->343685928],
+Cell[6318, 207, 195, 6, 26, "ExampleSection",
+ CellID->926168638],
Cell[CellGroupData[{
-Cell[3991, 124, 171, 5, 27, "Input",
+Cell[6538, 217, 171, 5, 27, "Input",
CellTags->"MetricTensor",
CellID->187143262],
-Cell[4165, 131, 522, 22, 40, "Output",
- CellTags->"MetricTensor",
- CellID->1323519245]
+Cell[6712, 224, 421, 17, 39, "Output",
+ CellTags->"MetricTensor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4724, 158, 154, 5, 27, "Input",
- CellTags->"MetricTensor",
- CellID->888467606],
-Cell[4881, 165, 213, 7, 36, "Output",
- CellTags->"MetricTensor",
- CellID->116818789]
+Cell[7170, 246, 107, 3, 27, "Input"],
+Cell[7280, 251, 166, 5, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5131, 177, 219, 6, 27, "Input",
+Cell[7483, 261, 219, 6, 27, "Input",
CellTags->"MetricTensor",
CellID->524835668],
-Cell[5353, 185, 498, 21, 40, "Output",
- CellTags->"MetricTensor",
- CellID->1803847759]
+Cell[7705, 269, 397, 16, 39, "Output",
+ CellTags->"MetricTensor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5888, 211, 154, 5, 27, "Input",
+Cell[8139, 290, 154, 5, 27, "Input",
CellTags->"MetricTensor",
CellID->125271051],
-Cell[6045, 218, 214, 7, 36, "Output",
- CellTags->"MetricTensor",
- CellID->1132028331]
+Cell[8296, 297, 193, 6, 35, "Output",
+ CellTags->"MetricTensor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6296, 230, 199, 6, 27, "Input",
+Cell[8526, 308, 199, 6, 27, "Input",
CellTags->"MetricTensor",
CellID->1318549517],
-Cell[6498, 238, 334, 10, 49, "Output",
- CellTags->"MetricTensor",
- CellID->1708064740]
+Cell[8728, 316, 313, 9, 51, "Output",
+ CellTags->"MetricTensor"]
}, Open ]],
+Cell[9056, 328, 135, 3, 48, "Notes"],
Cell[CellGroupData[{
-Cell[6869, 253, 248, 7, 27, "Input",
- CellTags->"MetricTensor",
- CellID->1544242781],
-Cell[7120, 262, 384, 12, 49, "Output",
- CellTags->"MetricTensor",
- CellID->2135349923]
+Cell[9216, 335, 109, 3, 27, "Input"],
+Cell[9328, 340, 389, 16, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7541, 279, 230, 7, 27, "Input",
- CellTags->"MetricTensor",
- CellID->912797684],
-Cell[7774, 288, 250, 8, 49, "Output",
- CellTags->"MetricTensor",
- CellID->489293900]
+Cell[9754, 361, 110, 3, 27, "Input"],
+Cell[9867, 366, 365, 15, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8061, 301, 281, 8, 27, "Input",
- CellTags->"MetricTensor",
- CellID->1275057625],
-Cell[8345, 311, 252, 8, 49, "Output",
- CellTags->"MetricTensor",
- CellID->1657208619]
+Cell[10269, 386, 238, 7, 27, "Input"],
+Cell[10510, 395, 169, 5, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10716, 405, 288, 8, 27, "Input"],
+Cell[11007, 415, 169, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[8624, 323, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11203, 424, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8692, 328, 270, 12, 31, "SeeAlsoSection",
+Cell[11271, 429, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8965, 342, 828, 33, 32, "Text",
- CellTags->"MetricTensor",
- CellID->309904132]
+Cell[11544, 443, 457, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[9808, 378, 23, 0, 42, "FooterCell"]
+Cell[12016, 465, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Momentum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Momentum.nb
index 5aceffcd4..c3659b320 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Momentum.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Momentum.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18036, 672]
-NotebookOptionsPosition[ 10775, 425]
-NotebookOutlinePosition[ 15183, 559]
-CellTagsIndexPosition[ 15071, 553]
+NotebookDataLength[ 17592, 635]
+NotebookOptionsPosition[ 11406, 434]
+NotebookOutlinePosition[ 15202, 544]
+CellTagsIndexPosition[ 15090, 538]
WindowTitle->Momentum
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Momentum\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Momentum"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Momentum.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Eps\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"], "\<\"LorentzIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LorentzIndex"], "\<\"MomentumExpand\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MomentumExpand"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Momentum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Momentum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Momentum.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104459],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Momentum", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$186048],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Momentum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Momentum", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Momentum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +146,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->756169536],
+ CellID->945790157],
Cell[CellGroupData[{
@@ -119,11 +156,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1078647688],
+ CellID->165659172],
-Cell["This is a four dimensional momentum.", "Text",
- CellTags->"Momentum",
- CellID->44749889],
+Cell["This is a 4-dimensional momentum.", "Notes"],
Cell[CellGroupData[{
@@ -138,20 +173,17 @@ Cell[BoxData[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"], TraditionalForm]], "Output",
- ImageSize->{15, 17},
+ ImageSize->{18, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[1]=",
- CellID->798967831]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
As an optional second argument the dimension must be specified if it is \
different from 4.\
-\>", "Text",
- CellTags->"Momentum",
- CellID->799788808],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -164,45 +196,38 @@ Cell[BoxData[
Cell[BoxData[
FormBox["p", TraditionalForm]], "Output",
- ImageSize->{14, 17},
+ ImageSize->{16, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[2]=",
- CellID->1920158684]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["The dimension index is supressed in the output.", "Text",
- CellTags->"Momentum",
- CellID->179507545],
+Cell["The dimension index is supressed in the output.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "d"}], "]"}], "//", "StandardForm"}]], "Input",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "d"}], "]"}]], "Input",
CellTags->"Momentum",
CellLabel->"In[3]:=",
CellID->22007276],
Cell[BoxData[
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "d"}], "]"}]], "Output",
- ImageSize->{119, 15},
+ FormBox["p", TraditionalForm]], "Output",
+ ImageSize->{16, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[3]//StandardForm=",
- CellID->60455233]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", "=",
- RowBox[{"Momentum", "[",
- RowBox[{"-", "q"}], "]"}]}]], "Input",
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "q"}], "]"}]], "Input",
CellTags->"Momentum",
CellLabel->"In[4]:=",
CellID->1076166182],
@@ -213,18 +238,17 @@ Cell[BoxData[
OverscriptBox[
FormBox["q",
TraditionalForm], "_"]}], TraditionalForm]], "Output",
- ImageSize->{24, 17},
+ ImageSize->{29, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[4]=",
- CellID->1153531189]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", "//", "StandardForm"}]], "Input",
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"Momentum",
CellLabel->"In[5]:=",
CellID->1156784400],
@@ -236,14 +260,13 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[5]//StandardForm=",
- CellID->129102697]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{
RowBox[{"Momentum", "[",
RowBox[{"p", "-", "q"}], "]"}], " ", "+", " ",
@@ -270,18 +293,17 @@ Cell[BoxData[
OverscriptBox[
FormBox["q",
TraditionalForm], "_"]}]}], TraditionalForm]], "Output",
- ImageSize->{89, 18},
+ ImageSize->{102, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[6]=",
- CellID->1815470309]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", "//", "StandardForm"}]], "Input",
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"Momentum",
CellLabel->"In[7]:=",
CellID->856207433],
@@ -296,15 +318,14 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1334247030]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"a2", "//", "MomentumExpand"}], "//", "StandardForm"}]], "Input",
+ RowBox[{"%%", "//", "MomentumExpand"}], "//", "StandardForm"}]], "Input",
CellTags->"Momentum",
CellLabel->"In[8]:=",
CellID->265634009],
@@ -317,15 +338,14 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[8]//StandardForm=",
- CellID->748631793]
+ CellLabel->"Out[8]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"a2", "//", "MomentumCombine"}], "//", "StandardForm"}]], "Input",
+ RowBox[{"%%%", "//", "MomentumCombine"}], "//", "StandardForm"}]], "Input",
CellTags->"Momentum",
CellLabel->"In[9]:=",
CellID->168866988],
@@ -337,8 +357,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[9]//StandardForm=",
- CellID->2082587543]
+ CellLabel->"Out[9]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -360,16 +379,8 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Momentum",
- CellLabel->"Out[10]//StandardForm=",
- CellID->932042446]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2"}], "]"}]], "Input",
- CellTags->"Momentum",
- CellLabel->"In[11]:=",
- CellID->919568834]
+ CellLabel->"Out[10]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -416,17 +427,15 @@ Cell[TextData[{
ButtonNote->"MomentumExpand"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Momentum",
- CellID->1626096776]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Momentum",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -435,10 +444,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 29.230173}",
+ "built" -> "{2020, 1, 5, 18, 59, 47.557806}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -447,11 +456,11 @@ TaggingRules->{
"Momentum[p] is the head of a four momentum (p). The internal \
representation of a four-dimensional p is Momentum[p]. For other than four \
dimensions: Momentum[p, dim]. Momentum[p, 4] simplifies to Momentum[p].",
- "synonyms" -> {}, "title" -> "Momentum", "titlemodifier" -> "",
- "windowtitle" -> "Momentum", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Momentum"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Momentum",
+ "titlemodifier" -> "", "windowtitle" -> "Momentum", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Momentum"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -459,8 +468,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -469,211 +479,164 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3449, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4728, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->756169536]},
+ CellID->945790157]},
"Momentum"->{
- Cell[4060, 123, 94, 2, 31, "Text",
- CellTags->"Momentum",
- CellID->44749889],
- Cell[4179, 129, 127, 4, 27, "Input",
+ Cell[5413, 164, 127, 4, 27, "Input",
CellTags->"Momentum",
CellID->600679238],
- Cell[4309, 135, 266, 10, 38, "Output",
- CellTags->"Momentum",
- CellID->798967831],
- Cell[4590, 148, 158, 5, 32, "Text",
- CellTags->"Momentum",
- CellID->799788808],
- Cell[4773, 157, 150, 5, 27, "Input",
+ Cell[5543, 170, 246, 9, 37, "Output",
+ CellTags->"Momentum"],
+ Cell[5945, 189, 150, 5, 27, "Input",
CellTags->"Momentum",
CellID->298033535],
- Cell[4926, 164, 210, 7, 38, "Output",
- CellTags->"Momentum",
- CellID->1920158684],
- Cell[5151, 174, 106, 2, 32, "Text",
- CellTags->"Momentum",
- CellID->179507545],
- Cell[5282, 180, 185, 6, 27, "Input",
+ Cell[6098, 196, 189, 6, 37, "Output",
+ CellTags->"Momentum"],
+ Cell[6391, 209, 149, 5, 27, "Input",
CellTags->"Momentum",
CellID->22007276],
- Cell[5470, 188, 252, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->60455233],
- Cell[5759, 201, 171, 6, 27, "Input",
+ Cell[6543, 216, 189, 6, 37, "Output",
+ CellTags->"Momentum"],
+ Cell[6769, 227, 146, 5, 27, "Input",
CellTags->"Momentum",
CellID->1076166182],
- Cell[5933, 209, 288, 11, 38, "Output",
- CellTags->"Momentum",
- CellID->1153531189],
- Cell[6258, 225, 129, 4, 27, "Input",
+ Cell[6918, 234, 267, 10, 37, "Output",
+ CellTags->"Momentum"],
+ Cell[7222, 249, 128, 4, 27, "Input",
CellTags->"Momentum",
CellID->1156784400],
- Cell[6390, 231, 248, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->129102697],
- Cell[6675, 244, 277, 9, 27, "Input",
+ Cell[7353, 255, 228, 7, 51, "Output",
+ CellTags->"Momentum"],
+ Cell[7618, 267, 261, 9, 27, "Input",
CellTags->"Momentum",
CellID->1010535805],
- Cell[6955, 255, 544, 22, 39, "Output",
- CellTags->"Momentum",
- CellID->1815470309],
- Cell[7536, 282, 128, 4, 27, "Input",
+ Cell[7882, 278, 524, 21, 37, "Output",
+ CellTags->"Momentum"],
+ Cell[8443, 304, 127, 4, 27, "Input",
CellTags->"Momentum",
CellID->856207433],
- Cell[7667, 288, 337, 11, 49, "Output",
- CellTags->"Momentum",
- CellID->1334247030],
- Cell[8041, 304, 165, 5, 27, "Input",
+ Cell[8573, 310, 316, 10, 51, "Output",
+ CellTags->"Momentum"],
+ Cell[8926, 325, 165, 5, 27, "Input",
CellTags->"Momentum",
CellID->265634009],
- Cell[8209, 311, 288, 9, 49, "Output",
- CellTags->"Momentum",
- CellID->748631793],
- Cell[8534, 325, 166, 5, 27, "Input",
+ Cell[9094, 332, 268, 8, 51, "Output",
+ CellTags->"Momentum"],
+ Cell[9399, 345, 167, 5, 27, "Input",
CellTags->"Momentum",
CellID->168866988],
- Cell[8703, 332, 254, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->2082587543],
- Cell[8994, 345, 235, 8, 27, "Input",
+ Cell[9569, 352, 233, 7, 51, "Output",
+ CellTags->"Momentum"],
+ Cell[9839, 364, 235, 8, 27, "Input",
CellTags->"Momentum",
CellID->1679956191],
- Cell[9232, 355, 254, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->932042446],
- Cell[9501, 366, 150, 5, 27, "Input",
- CellTags->"Momentum",
- CellID->919568834],
- Cell[10007, 393, 726, 27, 32, "Text",
- CellTags->"Momentum",
- CellID->1626096776]}
+ Cell[10077, 374, 234, 7, 51, "Output",
+ CellTags->"Momentum"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12720, 470},
- {"Momentum", 12854, 474}
+ {"PrimaryExamplesSection", 13394, 480},
+ {"Momentum", 13529, 484}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3290, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 542, 14, 115, "Usage",
+Cell[3873, 102, 285, 11, 45, "ObjectNameGrid"],
+Cell[4161, 115, 542, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3449, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4728, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->756169536],
+ CellID->945790157],
Cell[CellGroupData[{
-Cell[3861, 115, 196, 6, 25, "ExampleSection",
- CellID->1078647688],
-Cell[4060, 123, 94, 2, 31, "Text",
- CellTags->"Momentum",
- CellID->44749889],
+Cell[5140, 152, 195, 6, 26, "ExampleSection",
+ CellID->165659172],
+Cell[5338, 160, 50, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4179, 129, 127, 4, 27, "Input",
+Cell[5413, 164, 127, 4, 27, "Input",
CellTags->"Momentum",
CellID->600679238],
-Cell[4309, 135, 266, 10, 38, "Output",
- CellTags->"Momentum",
- CellID->798967831]
+Cell[5543, 170, 246, 9, 37, "Output",
+ CellTags->"Momentum"]
}, Open ]],
-Cell[4590, 148, 158, 5, 32, "Text",
- CellTags->"Momentum",
- CellID->799788808],
+Cell[5804, 182, 116, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4773, 157, 150, 5, 27, "Input",
+Cell[5945, 189, 150, 5, 27, "Input",
CellTags->"Momentum",
CellID->298033535],
-Cell[4926, 164, 210, 7, 38, "Output",
- CellTags->"Momentum",
- CellID->1920158684]
+Cell[6098, 196, 189, 6, 37, "Output",
+ CellTags->"Momentum"]
}, Open ]],
-Cell[5151, 174, 106, 2, 32, "Text",
- CellTags->"Momentum",
- CellID->179507545],
+Cell[6302, 205, 64, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5282, 180, 185, 6, 27, "Input",
+Cell[6391, 209, 149, 5, 27, "Input",
CellTags->"Momentum",
CellID->22007276],
-Cell[5470, 188, 252, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->60455233]
+Cell[6543, 216, 189, 6, 37, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5759, 201, 171, 6, 27, "Input",
+Cell[6769, 227, 146, 5, 27, "Input",
CellTags->"Momentum",
CellID->1076166182],
-Cell[5933, 209, 288, 11, 38, "Output",
- CellTags->"Momentum",
- CellID->1153531189]
+Cell[6918, 234, 267, 10, 37, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6258, 225, 129, 4, 27, "Input",
+Cell[7222, 249, 128, 4, 27, "Input",
CellTags->"Momentum",
CellID->1156784400],
-Cell[6390, 231, 248, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->129102697]
+Cell[7353, 255, 228, 7, 51, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6675, 244, 277, 9, 27, "Input",
+Cell[7618, 267, 261, 9, 27, "Input",
CellTags->"Momentum",
CellID->1010535805],
-Cell[6955, 255, 544, 22, 39, "Output",
- CellTags->"Momentum",
- CellID->1815470309]
+Cell[7882, 278, 524, 21, 37, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7536, 282, 128, 4, 27, "Input",
+Cell[8443, 304, 127, 4, 27, "Input",
CellTags->"Momentum",
CellID->856207433],
-Cell[7667, 288, 337, 11, 49, "Output",
- CellTags->"Momentum",
- CellID->1334247030]
+Cell[8573, 310, 316, 10, 51, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8041, 304, 165, 5, 27, "Input",
+Cell[8926, 325, 165, 5, 27, "Input",
CellTags->"Momentum",
CellID->265634009],
-Cell[8209, 311, 288, 9, 49, "Output",
- CellTags->"Momentum",
- CellID->748631793]
+Cell[9094, 332, 268, 8, 51, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8534, 325, 166, 5, 27, "Input",
+Cell[9399, 345, 167, 5, 27, "Input",
CellTags->"Momentum",
CellID->168866988],
-Cell[8703, 332, 254, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->2082587543]
+Cell[9569, 352, 233, 7, 51, "Output",
+ CellTags->"Momentum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8994, 345, 235, 8, 27, "Input",
+Cell[9839, 364, 235, 8, 27, "Input",
CellTags->"Momentum",
CellID->1679956191],
-Cell[9232, 355, 254, 8, 49, "Output",
- CellTags->"Momentum",
- CellID->932042446]
+Cell[10077, 374, 234, 7, 51, "Output",
+ CellTags->"Momentum"]
+}, Open ]]
}, Open ]],
-Cell[9501, 366, 150, 5, 27, "Input",
- CellTags->"Momentum",
- CellID->919568834]
-}, Open ]],
-Cell[9666, 374, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10338, 385, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9734, 379, 270, 12, 31, "SeeAlsoSection",
+Cell[10406, 390, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10007, 393, 726, 27, 32, "Text",
- CellTags->"Momentum",
- CellID->1626096776]
+Cell[10679, 404, 685, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[10748, 423, 23, 0, 42, "FooterCell"]
+Cell[11379, 432, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine.nb
index bdf1359a6..df7ba2c3e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16854, 611]
-NotebookOptionsPosition[ 11005, 425]
-NotebookOutlinePosition[ 14710, 531]
-CellTagsIndexPosition[ 14591, 525]
+NotebookDataLength[ 19890, 719]
+NotebookOptionsPosition[ 14094, 538]
+NotebookOutlinePosition[ 17518, 633]
+CellTagsIndexPosition[ 17399, 627]
WindowTitle->MomentumCombine
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MomentumCombine\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MomentumCombine"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"Momentum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Momentum"], "\<\"MomentumExpand\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MomentumExpand"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MomentumCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MomentumCombine"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
MomentumCombine.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$103765],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/MomentumCombine", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$185155],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/MomentumCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,20 @@ MomentumCombine.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MomentumCombine", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MomentumCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +131,63 @@ MomentumCombine combines also Pair`s."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1214575988],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "MomentumCombine", "]"}]], "Input",
+ CellTags->"MomentumCombine",
+ CellLabel->"In[2]:=",
+ CellID->1545747738],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"LeafCount", "\[Rule]", "1"}], ",",
+ RowBox[{"Pair", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{493, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"MomentumCombine",
+ CellLabel->"Out[2]=",
+ CellID->1656307801]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +203,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1319816598],
+ CellID->230264059],
Cell[CellGroupData[{
@@ -118,27 +213,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1488672644],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "MomentumCombine", "]"}]], "Input",
- CellTags->"MomentumCombine",
- CellLabel->"In[1]:=",
- CellID->1545747738],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"LeafCount", "\[Rule]", "1"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{110, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MomentumCombine",
- CellLabel->"Out[1]=",
- CellID->1201680776]
-}, Open ]],
+ CellID->1928490421],
Cell[CellGroupData[{
@@ -151,7 +226,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "q", "]"}]}]}], " ", "//", " ",
"MomentumCombine"}], " ", "//", " ", "StandardForm"}]], "Input",
CellTags->"MomentumCombine",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->607844623],
Cell[BoxData[
@@ -162,74 +237,63 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumCombine",
- CellLabel->"Out[2]//StandardForm=",
- CellID->683220670]
+ CellLabel->"Out[1]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}], " ", "+", " ",
+ RowBox[{"2", " ",
RowBox[{"FV", "[",
- RowBox[{"p", ",", "\[Mu]"}], "]"}], " ", "+", " ",
- RowBox[{"2", " ",
- RowBox[{"FV", "[",
- RowBox[{"q", ",", "\[Mu]"}], "]"}]}], " "}]}]], "Input",
+ RowBox[{"q", ",", "\[Mu]"}], "]"}]}], " "}]], "Input",
CellTags->"MomentumCombine",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->199069763],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], "+",
+ RowBox[{"2", " ",
FormBox[
SuperscriptBox[
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["q",
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- TraditionalForm],
- TraditionalForm], "+",
- RowBox[{"2", " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{69, 19},
+ ImageSize->{80, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumCombine",
- CellLabel->"Out[3]=",
- CellID->1701893288]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"MomentumCombine", "[", "t1", "]"}]], "Input",
+ RowBox[{"MomentumCombine", "[", "%", "]"}]], "Input",
CellTags->"MomentumCombine",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->316549312],
Cell[BoxData[
@@ -249,27 +313,22 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{73, 20},
+ ImageSize->{82, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumCombine",
- CellLabel->"Out[4]=",
- CellID->1410863957]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"MomentumCombine", "[", "t1", "]"}], "//",
- "StandardForm"}]], "Input",
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"MomentumCombine",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1834428785],
Cell[BoxData[
@@ -279,62 +338,50 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"p", "+",
RowBox[{"2", " ", "q"}]}], "]"}]}], "]"}]], "Output",
- ImageSize->{317, 15},
+ ImageSize->{319, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumCombine",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1690546936]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"MomentumCombine", "[", "t1", "]"}], "//",
- "ExpandScalarProduct"}]], "Input",
+ RowBox[{"%%", "//", "ExpandScalarProduct"}]], "Input",
CellTags->"MomentumCombine",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->1175875424],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "+",
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["q",
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{69, 19},
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{80, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumCombine",
- CellLabel->"Out[6]=",
- CellID->130248016]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -342,7 +389,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
CellTags->"MomentumCombine",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1928655829],
Cell[BoxData[
@@ -356,19 +403,94 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]}]}]], "Output",
- ImageSize->{302, 33},
+ ImageSize->{304, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumCombine",
- CellLabel->"Out[7]//StandardForm=",
- CellID->547997503]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[", "t1", "]"}]], "Input",
- CellTags->"MomentumCombine",
+ RowBox[{
+ RowBox[{"3", " ",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]}]}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->986758311],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"3", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{91, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MomentumCombine", "[", "%", "]"}]], "Input",
CellLabel->"In[8]:=",
- CellID->1041568760]
+ CellID->160099516],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"3", " ",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}], "+",
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{93, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -391,7 +513,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ExpandScalarProduct",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ExpandScalarProduct",
@@ -409,16 +530,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/MomentumExpand",
ButtonNote->"MomentumExpand"],
FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["MomentumCombine2",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumCombine2",
- ButtonNote->"MomentumCombine2"],
- FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"MomentumCombine",
- CellID->2131461260]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -435,10 +548,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 25.966449}",
+ "built" -> "{2020, 1, 5, 18, 59, 45.029284}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -446,11 +559,11 @@ TaggingRules->{
"None", "summary" ->
"MomentumCombine[expr] is the inverse operation to MomentumExpand and \
ExpandScalarProduct. MomentumCombine combines also Pair`s.", "synonyms" -> {},
- "title" -> "MomentumCombine", "titlemodifier" -> "", "windowtitle" ->
- "MomentumCombine", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "MomentumCombine", "titlemodifier" -> "",
+ "windowtitle" -> "MomentumCombine", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/MomentumCombine"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -458,8 +571,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -467,152 +581,146 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3410, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1319816598]},
"MomentumCombine"->{
- Cell[4044, 124, 148, 4, 27, "Input",
+ Cell[5443, 163, 148, 4, 70, "Input",
CellTags->"MomentumCombine",
CellID->1545747738],
- Cell[4195, 130, 279, 9, 36, "Output",
+ Cell[5594, 169, 463, 14, 37, "Output",
CellTags->"MomentumCombine",
- CellID->1201680776],
- Cell[4511, 144, 320, 10, 27, "Input",
+ CellID->1656307801],
+ Cell[6751, 219, 320, 10, 27, "Input",
CellTags->"MomentumCombine",
CellID->607844623],
- Cell[4834, 156, 284, 9, 49, "Output",
- CellTags->"MomentumCombine",
- CellID->683220670],
- Cell[5155, 170, 305, 10, 27, "Input",
+ Cell[7074, 231, 264, 8, 51, "Output",
+ CellTags->"MomentumCombine"],
+ Cell[7375, 244, 276, 9, 27, "Input",
CellTags->"MomentumCombine",
CellID->199069763],
- Cell[5463, 182, 958, 41, 40, "Output",
- CellTags->"MomentumCombine",
- CellID->1701893288],
- Cell[6458, 228, 142, 4, 27, "Input",
+ Cell[7654, 255, 753, 32, 37, "Output",
+ CellTags->"MomentumCombine"],
+ Cell[8444, 292, 141, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->316549312],
- Cell[6603, 234, 653, 27, 41, "Output",
- CellTags->"MomentumCombine",
- CellID->1410863957],
- Cell[7293, 266, 181, 6, 27, "Input",
+ Cell[8588, 298, 594, 24, 37, "Output",
+ CellTags->"MomentumCombine"],
+ Cell[9219, 327, 135, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->1834428785],
- Cell[7477, 274, 388, 12, 49, "Output",
- CellTags->"MomentumCombine",
- CellID->1690546936],
- Cell[7902, 291, 188, 6, 27, "Input",
+ Cell[9357, 333, 367, 11, 51, "Output",
+ CellTags->"MomentumCombine"],
+ Cell[9761, 349, 143, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->1175875424],
- Cell[8093, 299, 859, 37, 40, "Output",
- CellTags->"MomentumCombine",
- CellID->130248016],
- Cell[8989, 341, 139, 4, 27, "Input",
+ Cell[9907, 355, 663, 28, 37, "Output",
+ CellTags->"MomentumCombine"],
+ Cell[10607, 388, 139, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->1928655829],
- Cell[9131, 347, 526, 16, 67, "Output",
- CellTags->"MomentumCombine",
- CellID->547997503],
- Cell[9672, 366, 133, 4, 27, "Input",
- CellTags->"MomentumCombine",
- CellID->1041568760],
- Cell[10161, 392, 802, 28, 32, "Text",
- CellTags->"MomentumCombine",
- CellID->2131461260]}
+ Cell[10749, 394, 506, 15, 69, "Output",
+ CellTags->"MomentumCombine"]},
+ "PrimaryExamplesSection"->{
+ Cell[6118, 190, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->230264059]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12896, 469},
- {"MomentumCombine", 13038, 473}
+ {"MomentumCombine", 16021, 583},
+ {"PrimaryExamplesSection", 17256, 620}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3253, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 460, 13, 97, "Usage",
- CellID->982511436],
+Cell[3843, 101, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3410, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1319816598],
+Cell[4160, 116, 460, 13, 101, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3823, 114, 196, 6, 25, "ExampleSection",
- CellID->1488672644],
+Cell[4645, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1214575988],
+Cell[5387, 159, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4044, 124, 148, 4, 27, "Input",
+Cell[5443, 163, 148, 4, 70, "Input",
CellTags->"MomentumCombine",
CellID->1545747738],
-Cell[4195, 130, 279, 9, 36, "Output",
+Cell[5594, 169, 463, 14, 37, "Output",
CellTags->"MomentumCombine",
- CellID->1201680776]
+ CellID->1656307801]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4511, 144, 320, 10, 27, "Input",
+Cell[6118, 190, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->230264059],
+Cell[CellGroupData[{
+Cell[6530, 209, 196, 6, 26, "ExampleSection",
+ CellID->1928490421],
+Cell[CellGroupData[{
+Cell[6751, 219, 320, 10, 27, "Input",
CellTags->"MomentumCombine",
CellID->607844623],
-Cell[4834, 156, 284, 9, 49, "Output",
- CellTags->"MomentumCombine",
- CellID->683220670]
+Cell[7074, 231, 264, 8, 51, "Output",
+ CellTags->"MomentumCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5155, 170, 305, 10, 27, "Input",
+Cell[7375, 244, 276, 9, 27, "Input",
CellTags->"MomentumCombine",
CellID->199069763],
-Cell[5463, 182, 958, 41, 40, "Output",
- CellTags->"MomentumCombine",
- CellID->1701893288]
+Cell[7654, 255, 753, 32, 37, "Output",
+ CellTags->"MomentumCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6458, 228, 142, 4, 27, "Input",
+Cell[8444, 292, 141, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->316549312],
-Cell[6603, 234, 653, 27, 41, "Output",
- CellTags->"MomentumCombine",
- CellID->1410863957]
+Cell[8588, 298, 594, 24, 37, "Output",
+ CellTags->"MomentumCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7293, 266, 181, 6, 27, "Input",
+Cell[9219, 327, 135, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->1834428785],
-Cell[7477, 274, 388, 12, 49, "Output",
- CellTags->"MomentumCombine",
- CellID->1690546936]
+Cell[9357, 333, 367, 11, 51, "Output",
+ CellTags->"MomentumCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7902, 291, 188, 6, 27, "Input",
+Cell[9761, 349, 143, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->1175875424],
-Cell[8093, 299, 859, 37, 40, "Output",
- CellTags->"MomentumCombine",
- CellID->130248016]
+Cell[9907, 355, 663, 28, 37, "Output",
+ CellTags->"MomentumCombine"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8989, 341, 139, 4, 27, "Input",
+Cell[10607, 388, 139, 4, 27, "Input",
CellTags->"MomentumCombine",
CellID->1928655829],
-Cell[9131, 347, 526, 16, 67, "Output",
- CellTags->"MomentumCombine",
- CellID->547997503]
+Cell[10749, 394, 506, 15, 69, "Output",
+ CellTags->"MomentumCombine"]
}, Open ]],
-Cell[9672, 366, 133, 4, 27, "Input",
- CellTags->"MomentumCombine",
- CellID->1041568760]
+Cell[CellGroupData[{
+Cell[11292, 414, 420, 13, 45, "Input",
+ CellID->986758311],
+Cell[11715, 429, 667, 28, 37, "Output"]
}, Open ]],
-Cell[9820, 373, 31, 0, 29, "SectionFooterSpacer"]
+Cell[CellGroupData[{
+Cell[12419, 462, 111, 3, 27, "Input",
+ CellID->160099516],
+Cell[12533, 467, 595, 24, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[13155, 495, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9888, 378, 270, 12, 31, "SeeAlsoSection",
+Cell[13223, 500, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10161, 392, 802, 28, 32, "Text",
- CellTags->"MomentumCombine",
- CellID->2131461260]
+Cell[13496, 514, 556, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[10978, 423, 23, 0, 42, "FooterCell"]
+Cell[14067, 536, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine2.nb
deleted file mode 100644
index f0d59ad5f..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumCombine2.nb
+++ /dev/null
@@ -1,380 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10926, 370]
-NotebookOptionsPosition[ 7261, 260]
-NotebookOutlinePosition[ 9930, 333]
-CellTagsIndexPosition[ 9812, 327]
-WindowTitle->MomentumCombine2
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MomentumCombine2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MomentumCombine2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-MomentumCombine2.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$103425],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/MomentumCombine2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["MomentumCombine2", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"MomentumCombine2", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- " is the inverse operation to MomentumExpand and ExpandScalarProduct. \
-MomentumCombine2 combines also FourVectors."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->592230614],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->351765075],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"3", " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}], "+",
- RowBox[{"2", " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]}]}]], "Input",
- CellTags->"MomentumCombine2",
- CellLabel->"In[1]:=",
- CellID->1495417826],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"3", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{80, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MomentumCombine2",
- CellLabel->"Out[1]=",
- CellID->625977405]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MomentumCombine2", "[", "%", "]"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"MomentumCombine2",
- CellLabel->"In[2]:=",
- CellID->1280124853],
-
-Cell[BoxData[
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{
- RowBox[{"3", " ", "p"}], "+",
- RowBox[{"2", " ", "q"}]}], "]"}]}], "]"}]], "Output",
- ImageSize->{329, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MomentumCombine2",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1646133388]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["MomentumCombine",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumCombine",
- ButtonNote->"MomentumCombine"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["MomentumExpand",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumExpand",
- ButtonNote->"MomentumExpand"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["ExpandScalarProduct",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ExpandScalarProduct",
- ButtonNote->"ExpandScalarProduct"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["FourVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector",
- ButtonNote->"FourVector"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"MomentumCombine2",
- CellID->815593520]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"MomentumCombine2",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 24.398231}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "MomentumCombine2[expr] is the inverse operation to MomentumExpand and \
-ExpandScalarProduct. MomentumCombine2 combines also FourVectors.",
- "synonyms" -> {}, "title" -> "MomentumCombine2", "titlemodifier" -> "",
- "windowtitle" -> "MomentumCombine2", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/MomentumCombine2"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3424, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->592230614]},
- "MomentumCombine2"->{
- Cell[4056, 124, 452, 14, 45, "Input",
- CellTags->"MomentumCombine2",
- CellID->1495417826],
- Cell[4511, 140, 898, 38, 40, "Output",
- CellTags->"MomentumCombine2",
- CellID->625977405],
- Cell[5446, 183, 182, 6, 27, "Input",
- CellTags->"MomentumCombine2",
- CellID->1280124853],
- Cell[5631, 191, 415, 13, 49, "Output",
- CellTags->"MomentumCombine2",
- CellID->1646133388],
- Cell[6414, 227, 805, 28, 32, "Text",
- CellTags->"MomentumCombine2",
- CellID->815593520]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 9163, 304},
- {"MomentumCombine2", 9305, 308}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 468, 13, 97, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3424, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->592230614],
-Cell[CellGroupData[{
-Cell[3836, 114, 195, 6, 25, "ExampleSection",
- CellID->351765075],
-Cell[CellGroupData[{
-Cell[4056, 124, 452, 14, 45, "Input",
- CellTags->"MomentumCombine2",
- CellID->1495417826],
-Cell[4511, 140, 898, 38, 40, "Output",
- CellTags->"MomentumCombine2",
- CellID->625977405]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5446, 183, 182, 6, 27, "Input",
- CellTags->"MomentumCombine2",
- CellID->1280124853],
-Cell[5631, 191, 415, 13, 49, "Output",
- CellTags->"MomentumCombine2",
- CellID->1646133388]
-}, Open ]]
-}, Open ]],
-Cell[6073, 208, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6141, 213, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[6414, 227, 805, 28, 32, "Text",
- CellTags->"MomentumCombine2",
- CellID->815593520]
-}, Open ]],
-Cell[7234, 258, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumExpand.nb
index 0475fecd4..b3d31f1f2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumExpand.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/MomentumExpand.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17543, 649]
-NotebookOptionsPosition[ 11559, 455]
-NotebookOutlinePosition[ 15297, 564]
-CellTagsIndexPosition[ 15179, 558]
+NotebookDataLength[ 16410, 584]
+NotebookOptionsPosition[ 11229, 423]
+NotebookOutlinePosition[ 14574, 517]
+CellTagsIndexPosition[ 14456, 511]
WindowTitle->MomentumExpand
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/MomentumExpand\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/MomentumExpand"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"MomentumCombine\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/MomentumCombine"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/MomentumExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/MomentumExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
MomentumExpand.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104109],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/MomentumExpand", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$185599],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/MomentumExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ MomentumExpand.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["MomentumExpand", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["MomentumExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1826585113],
+ CellID->1642036370],
Cell[CellGroupData[{
@@ -118,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->269887304],
+ CellID->1027830822],
Cell[CellGroupData[{
@@ -139,8 +173,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[1]//StandardForm=",
- CellID->1133313171]
+ CellLabel->"Out[1]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -159,13 +192,15 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -176,12 +211,11 @@ Cell[BoxData[
FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{77, 17},
+ ImageSize->{88, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[2]=",
- CellID->27880999]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,12 +232,11 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"p", "+", "q"}], "]"}], ",",
RowBox[{"Momentum", "[", "r", "]"}]}], "]"}]], "Output",
- ImageSize->{275, 15},
+ ImageSize->{274, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[3]//StandardForm=",
- CellID->581832414]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -223,13 +256,15 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -240,12 +275,11 @@ Cell[BoxData[
FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{77, 17},
+ ImageSize->{88, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[4]=",
- CellID->872056569]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -263,12 +297,11 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "p", "]"}], "+",
RowBox[{"Momentum", "[", "q", "]"}]}], ",",
RowBox[{"Momentum", "[", "r", "]"}]}], "]"}]], "Output",
- ImageSize->{357, 15},
+ ImageSize->{356, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1334904373]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -289,13 +322,15 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -304,22 +339,23 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{121, 17},
+ ImageSize->{136, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[6]=",
- CellID->549274117]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -340,77 +376,11 @@ Cell[BoxData[
RowBox[{"-",
RowBox[{"Momentum", "[", "p", "]"}]}], "+",
RowBox[{"Momentum", "[", "r", "]"}]}]}], "]"}]], "Output",
- ImageSize->{472, 15},
+ ImageSize->{471, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"MomentumExpand",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1535384153]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"MomentumExpand",
- CellLabel->"In[8]:=",
- CellID->924306475],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], "-",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{168, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"MomentumExpand",
- CellLabel->"Out[8]=",
- CellID->857785691]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -446,17 +416,15 @@ Cell[TextData[{
ButtonNote->"MomentumCombine"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"MomentumExpand",
- CellID->669888532]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"MomentumExpand",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -465,22 +433,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 27.582443}",
+ "built" -> "{2020, 1, 5, 18, 59, 46.307170}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"MomentumExpand[expr] expands Momentum[a+b+ ...] in expr into Momentum[a] \
-+ Momentum[b] + ... .", "synonyms" -> {}, "title" -> "MomentumExpand",
- "titlemodifier" -> "", "windowtitle" -> "MomentumExpand", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/MomentumExpand"}, "SearchTextTranslated" ->
- ""},
++ Momentum[b] + ... .", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "MomentumExpand", "titlemodifier" -> "", "windowtitle" ->
+ "MomentumExpand", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/MomentumExpand"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -488,8 +456,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -498,159 +467,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3371, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4492, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1826585113]},
+ CellID->1642036370]},
"MomentumExpand"->{
- Cell[4004, 124, 236, 7, 27, "Input",
+ Cell[5126, 158, 236, 7, 27, "Input",
CellTags->"MomentumExpand",
CellID->2119019213],
- Cell[4243, 133, 295, 9, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->1133313171],
- Cell[4575, 147, 185, 6, 27, "Input",
+ Cell[5365, 167, 274, 8, 51, "Output",
+ CellTags->"MomentumExpand"],
+ Cell[5676, 180, 185, 6, 27, "Input",
CellTags->"MomentumExpand",
CellID->840853851],
- Cell[4763, 155, 672, 28, 38, "Output",
- CellTags->"MomentumExpand",
- CellID->27880999],
- Cell[5472, 188, 133, 4, 27, "Input",
+ Cell[5864, 188, 696, 29, 37, "Output",
+ CellTags->"MomentumExpand"],
+ Cell[6597, 222, 133, 4, 27, "Input",
CellTags->"MomentumExpand",
CellID->422127778],
- Cell[5608, 194, 352, 11, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->581832414],
- Cell[5997, 210, 229, 7, 27, "Input",
+ Cell[6733, 228, 332, 10, 51, "Output",
+ CellTags->"MomentumExpand"],
+ Cell[7102, 243, 229, 7, 27, "Input",
CellTags->"MomentumExpand",
CellID->1994358378],
- Cell[6229, 219, 673, 28, 38, "Output",
- CellTags->"MomentumExpand",
- CellID->872056569],
- Cell[6939, 252, 134, 4, 27, "Input",
+ Cell[7334, 252, 696, 29, 37, "Output",
+ CellTags->"MomentumExpand"],
+ Cell[8067, 286, 134, 4, 27, "Input",
CellTags->"MomentumExpand",
CellID->1059717092],
- Cell[7076, 258, 390, 12, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->1334904373],
- Cell[7503, 275, 253, 8, 27, "Input",
+ Cell[8204, 292, 369, 11, 51, "Output",
+ CellTags->"MomentumExpand"],
+ Cell[8610, 308, 253, 8, 27, "Input",
CellTags->"MomentumExpand",
CellID->242711247],
- Cell[7759, 285, 862, 36, 38, "Output",
- CellTags->"MomentumExpand",
- CellID->549274117],
- Cell[8658, 326, 133, 4, 27, "Input",
+ Cell[8866, 318, 928, 39, 37, "Output",
+ CellTags->"MomentumExpand"],
+ Cell[9831, 362, 133, 4, 27, "Input",
CellTags->"MomentumExpand",
CellID->277317176],
- Cell[8794, 332, 473, 15, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->1535384153],
- Cell[9304, 352, 129, 4, 27, "Input",
- CellTags->"MomentumExpand",
- CellID->924306475],
- Cell[9436, 358, 1267, 54, 41, "Output",
- CellTags->"MomentumExpand",
- CellID->857785691],
- Cell[11071, 435, 446, 15, 32, "Text",
- CellTags->"MomentumExpand",
- CellID->669888532]}
+ Cell[9967, 368, 452, 14, 51, "Output",
+ CellTags->"MomentumExpand"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13411, 499},
- {"MomentumExpand", 13552, 503}
+ {"PrimaryExamplesSection", 13126, 468},
+ {"MomentumExpand", 13268, 472}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3157, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 427, 13, 83, "Usage",
+Cell[3746, 99, 291, 11, 45, "ObjectNameGrid"],
+Cell[4040, 112, 427, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3371, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4492, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1826585113],
+ CellID->1642036370],
Cell[CellGroupData[{
-Cell[3784, 114, 195, 6, 25, "ExampleSection",
- CellID->269887304],
+Cell[4905, 148, 196, 6, 26, "ExampleSection",
+ CellID->1027830822],
Cell[CellGroupData[{
-Cell[4004, 124, 236, 7, 27, "Input",
+Cell[5126, 158, 236, 7, 27, "Input",
CellTags->"MomentumExpand",
CellID->2119019213],
-Cell[4243, 133, 295, 9, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->1133313171]
+Cell[5365, 167, 274, 8, 51, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4575, 147, 185, 6, 27, "Input",
+Cell[5676, 180, 185, 6, 27, "Input",
CellTags->"MomentumExpand",
CellID->840853851],
-Cell[4763, 155, 672, 28, 38, "Output",
- CellTags->"MomentumExpand",
- CellID->27880999]
+Cell[5864, 188, 696, 29, 37, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5472, 188, 133, 4, 27, "Input",
+Cell[6597, 222, 133, 4, 27, "Input",
CellTags->"MomentumExpand",
CellID->422127778],
-Cell[5608, 194, 352, 11, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->581832414]
+Cell[6733, 228, 332, 10, 51, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5997, 210, 229, 7, 27, "Input",
+Cell[7102, 243, 229, 7, 27, "Input",
CellTags->"MomentumExpand",
CellID->1994358378],
-Cell[6229, 219, 673, 28, 38, "Output",
- CellTags->"MomentumExpand",
- CellID->872056569]
+Cell[7334, 252, 696, 29, 37, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6939, 252, 134, 4, 27, "Input",
+Cell[8067, 286, 134, 4, 27, "Input",
CellTags->"MomentumExpand",
CellID->1059717092],
-Cell[7076, 258, 390, 12, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->1334904373]
+Cell[8204, 292, 369, 11, 51, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7503, 275, 253, 8, 27, "Input",
+Cell[8610, 308, 253, 8, 27, "Input",
CellTags->"MomentumExpand",
CellID->242711247],
-Cell[7759, 285, 862, 36, 38, "Output",
- CellTags->"MomentumExpand",
- CellID->549274117]
+Cell[8866, 318, 928, 39, 37, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8658, 326, 133, 4, 27, "Input",
+Cell[9831, 362, 133, 4, 27, "Input",
CellTags->"MomentumExpand",
CellID->277317176],
-Cell[8794, 332, 473, 15, 49, "Output",
- CellTags->"MomentumExpand",
- CellID->1535384153]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[9304, 352, 129, 4, 27, "Input",
- CellTags->"MomentumExpand",
- CellID->924306475],
-Cell[9436, 358, 1267, 54, 41, "Output",
- CellTags->"MomentumExpand",
- CellID->857785691]
+Cell[9967, 368, 452, 14, 51, "Output",
+ CellTags->"MomentumExpand"]
}, Open ]]
}, Open ]],
-Cell[10730, 416, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10446, 386, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10798, 421, 270, 12, 31, "SeeAlsoSection",
+Cell[10514, 391, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[11071, 435, 446, 15, 32, "Text",
- CellTags->"MomentumExpand",
- CellID->669888532]
+Cell[10787, 405, 400, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[11532, 453, 23, 0, 42, "FooterCell"]
+Cell[11202, 421, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NPointTo4Point.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NPointTo4Point.nb
new file mode 100644
index 000000000..8cebfa16c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NPointTo4Point.nb
@@ -0,0 +1,6561 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 380362, 6551]
+NotebookOptionsPosition[ 376857, 6444]
+NotebookOutlinePosition[ 379140, 6506]
+CellTagsIndexPosition[ 379016, 6500]
+WindowTitle->NPointTo4Point
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/NPointTo4Point\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/NPointTo4Point"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+NPointTo4Point.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$190524],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/NPointTo4Point", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["NPointTo4Point", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"NPointTo4Point", "[",
+ RowBox[{"expr", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]reduces scalar IR finite 5-point functions to scalar \
+4-point functions according to Eq. 4.52 in arXiv:0709.1075."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->520539732],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "NPointTo4Point", "]"}]], "Input",
+ CellLabel->"In[235]:=",
+ CellID->971530134],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor2"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateNames", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{384, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[235]=",
+ CellID->1936532499]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2035077065],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->100727435],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->102456380],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[", "p1", "]"}], "=", "0"}], ";"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1800694022],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FCI", "@",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p1"}], ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p2"}], ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p3"}], ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p4"}], ",", "0"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1464883166],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m0", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m0^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p2",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p3",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p3, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p3, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p4",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p4, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p4, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{374, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1733350505]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"NPointTo4Point", "[",
+ RowBox[{"%", ",", "q", ",",
+ RowBox[{"FCE", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]",
+ RowBox[{"-", "1"}]}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->453605134],
+
+Cell[BoxData[
+ FormBox[
+ InterpretationBox[
+ RowBox[{"\<\"NPointTo4Point: The reduction of the scalar 5-point function \
+\"\>", "\[InvisibleSpace]",
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m0", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m0^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p2",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p3",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p3, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p3, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p4",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p4, D] +
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p4, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm],
+ "\[InvisibleSpace]", "\<\"is valid only if all the IR divergences were \
+explicitly regularized with fictitious masses!\"\>"}],
+ SequenceForm[
+ "NPointTo4Point: The reduction of the scalar 5-point function ",
+ FeynCalc`FeynAmpDenominator[
+ FeynCalc`PropagatorDenominator[
+ FeynCalc`Momentum[$CellContext`q, D], $CellContext`m0],
+ FeynCalc`PropagatorDenominator[
+ FeynCalc`Momentum[$CellContext`p1, D] +
+ FeynCalc`Momentum[$CellContext`q, D], 0],
+ FeynCalc`PropagatorDenominator[
+ FeynCalc`Momentum[$CellContext`p2, D] +
+ FeynCalc`Momentum[$CellContext`q, D], 0],
+ FeynCalc`PropagatorDenominator[
+ FeynCalc`Momentum[$CellContext`p3, D] +
+ FeynCalc`Momentum[$CellContext`q, D], 0],
+ FeynCalc`PropagatorDenominator[
+ FeynCalc`Momentum[$CellContext`p4, D] +
+ FeynCalc`Momentum[$CellContext`q, D], 0]],
+ "is valid only if all the IR divergences were explicitly regularized with \
+fictitious masses!"],
+ Editable->False], TraditionalForm]], "Print",
+ CellLabel->"During evaluation of In[234]:=",
+ CellID->996693103],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJzsvXtcFOX7/5+/3x/90nqXGanYViAICoJKvsU4pVaS2Inymwfo96A8RAJq
+ngqtdx99+/WAnAqzL3hIRVLEfiYPUcrQEETQUBEVJUAQFpDDsgvL7uzuzP7Y
+ZXfZw8zszOwss0PX848etste87qv67rvueeemfty+WRV+PL/67HHHlv7//T9
+Jzxq46wvvoj66oNn+v5nQdza6BVxy5a+Fbdu2YplX/h/8n/3fXj/yccee6Xv
+7zX/VgMAAAAAANgBtKs0cfn8gIkuUxbvuS3FHNyso8FuMyEWAAmQHvSQN/x2
+slKCkX7CwAgwSMjqMg/8JUbVSF1G8PiwApFjm3U02G0mxAIgAdKDDlj3jeQv
+jjcqyD5hYAQYPDBVr0o7KZBejwtYWtbt2GYdDXabCbEASID0oIGi/uDH/62Q
+kn7CwAj7YEq4JrOC9NauZek1cp6YJYGTWLPbTIjFIMMXnf0MmfSwI7Kq7e/8
+z20Z6SeaD+tObvsmMX3/D9tXR3150vz6CPcn1kGaCo78cqfHWkphiLAoY03o
+K+8VddE9AiHK5pyFUyNKJf3/h4qv52QVtyltlIr1Vh+Jmz3B6cmRLoErD93v
+tb2vyGqPbYwMC5r0gmD60sx6hFQq1l2Zta+wXcXoQKioOHHl+uSDB5LXrUy6
+LEJZMjsAF7G2s/dIwg2xMIdOLLjUqYPu+IAni6/p4SjIq3cGv2eyPGn5iVqt
+ajo6x2/9rd6+f2Kd59/2/X+vdpMboYCy5dfVH2dQOMVj8keNwqtr3Ma+WchW
+7imFJ5cGOgkW6nOvj97bKRFfne/AjStFqb13klbtudKKKDqu7XlnzNO+u6oR
+22TK6499f66xz4iq9fTCF10//auHUComq88/+Wdr35wB7amvltBMT7T97BLv
+t3Ja+n6maj4x1zviXDvKglkDnMTa3t4jDDfEwgIaseBUp/7Y9MYHXHiaHo4D
++ujUnKmrbkrJPulD2ZAxfdyr31f3JYqy8afX/v31HRmpEQoHbj8b4b/SKPbk
+yO/9d9I4tnJP0ZizKeVMwjQ349zrO+kWRMyILhZbzNKoSlW0XDjfrMs/6Y0Y
+13FvF4ltE4oqpLp1CnnVlhlz9j5QEEhVNGZFerh6ePUxyTtoc2UvveOomjID
+xk0/+FA7L+yLtd+4oJ+FKlpmVa25K2LL8H3EUazt7D2icHMfCzIcPRYc69RC
+c3wgMMLL9HAkZLe/8pm2/b6c7BMNaOeFNb6jXnr3P3u3rdl46I7pM4r4PyFF
+Jfw5xHNRiXHqod2Vx+LDA0O+TFwX8eYUgYt/dNYDg0nauUdsTdFwPD69Slz3
+g59p7vUl3+9hnvPzO8ySj65ULd1XoybO/LGe6qMh5AZR8bW0JeEpVQPzAQKp
+xCDCgrTI4FeXHdyXuCEyxN0n4qfS3L1bYhf4u726tlDUVbLAeYzhTNp1KfT5
+cYtK6d1OVTUefmM+/qUzh7HWfmuz91gOt91jQQJfYsGj8WEopYdDIbny0fhp
+39cpyD7R0Vu5I8jzmeFOwfHnWk0XXgl/Qkx36UK3ad/Vmv4E6zgX9LxLrGZq
+omzK/mCs0+zjzbpLU7Lck9XmpKYXWVxt41tDHmTG76+WqRUPLHJPLbv7tY/X
+FxVmUw66UjXfigo/n7O2qAtv8KOltg9VV/nxbStCPZ4a7hKV16b/Gb5UMqQV
+q92cQ0+1omqsLTfESRD1RyeqVtan+730VkHd+ZBRzoYUl5QsGDNq9kV6c1CS
+cxNnsVaz5j3m4cbFzrEggS+x4NH4QC5Mzav0cCjERWEv+f2feiXZJxqQhp8+
+fue7u91tf25/a8zIqV+bLODh/kQpPPHJ3BAz5sUU94dIdHGWYPqRJrN86br4
+mrNPSq32SlhS8pHgZf26NFnuKZuOzhV4Rpf3mH+BY62j5lD8oVrNpAYv95Ca
+pKlui81nIXSlqlHR5e1r9lfhPwlBR63R32CS0vXuo0Ny2zAyqWT0Vm7wdOn/
+haTkw5cmbtYsy2KPTgeM+/fR+8Ufjh09Xz8ZE1+aN5rqZGwgyjM9R47yDTCN
+cj8cxZpV7zENNz72jgVej+uHL7Hg0fhgpcm8Sg+HQlLygaufYfUX/xO1xlsb
+facn1Wh8j3X9+cl49+jrUis/sXLcy+Gufj+Y/8Q4xD3lyyd4f3NXd/XPZD3Z
+0trNWwmv+U721TJJMPzxZ9x9Zq26YUhaedUWn4kxN8zum9GTivVWZ+3cf5P+
+K8jEbe+n59qnPm+cacfIpJJBkvCZDfWH/Z0Ni9gPD04fF3BUSO9mKsl1Ezex
+Ztd77IbbzrEggS+x4NH4QCaMb+nhUPRWrPF+pf+kQ/iJWjNjSP73pBX9swjk
+790z/BP+tvYTcpCaRD+vWPMwa0I8ebfWtKIuLTBw+z39uq383lZGuYdvTa25
+jbjv3+5m8yLJlUUeAVnmkaYjFXl4Ojm9rEv74AzaVXnqrJCyU/AMYrLmB22I
+NrGR2h/f/WxgJQRfKhnmCb/JKOGbkEe5H3mHaVYR1GjrqfmTF+e1oVYtmkBy
+buIq1mx6j91w2zkWJPAlFjwaH4hN8S89HAqV8Giw3ybjp+4sP9GA9dzO+Px/
+rfif7zL27vpy44HbJu8c4P+EHPn9bf4B5rcH+0LsNGbehh2pacnfrtp8Qn9H
+UdF28+zO4GdHuK/NvlIjpRwJAmv94OSe/N42/zn7GixeYqAqVdWWF+3xxLDH
+dAwb7mNyBqevFhNdWjHF2SM0NuHA0czD+XUyg9OJpBKBIc2XUoOffcZvxx91
+HTX5//F6amTA7gsN7beyo13+9VJU1nUx0lmY8Pn6lIM/pW6MSSzqpD0TIzk3
+cRRr9ryHb59puO0fCzL4EgsejQ/4pviZHg5Fb+WXQZFXJKSfMDBiHVRUuPH9
+nabPOhpfGtsOPWuYpGxT+NbybpzLb/tLpWeQRKpj4lCxZuQ91sPNGXyJhUPp
+VFtJm6GTHg5Fz19r5iWYPP9t+QkDI1SQN+SmpF9oGZgbaUNMb3GQBDrW5A15
+aam/NRPeMrOzVDoGrUl1TBwl1gy9x3q4uYQvsXAUnWqrUodUejgQvbf/d3hC
+lZz0EwZGqIEh7R39y9BqlaQiO278iOde351XIbb5QpWeNVTWKkKsTKTtJpWe
+QSpSHRNHiDUj77Eebu7hSywcQac1qUMwPRwGVVv+hi9+N76jZvkJAyMAAAAA
+YANo19UDP90wftLR8hMGRgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAIY2aFdp4vL5ARNdpizec1sKr1UAgwqkHwAAeMjqMg/8JUbVSF1G
+8Pgwgh1wAcA+QPoBAIALpupVaWer0utxAUvLhmbJbMBRgfQDCMCUvLmK5pFU
+PiK9tWtZeg39XSaZw6OA8kgqTxn89ANYBOutPhI3e4LTkyNdAlceuk9QORlp
+Kjjyy50ea30JQ4RFGWtCX3mviFaNMxrCUPH1nKziNpLKQxxIVctqj22MDAua
+9IJg+tLMeoQ9ndSiY2+ppKCi4sSV65MPHkhetzLpsshoP0msuzJrX2G7rZt/
+Qu5RQdmcs3BqhL7cEqQfa+kHcEXvnaRVe660IoqOa3veGfO0765qy23ulS2/
+rv44g8L0A5M/ahReXeM2lmb9TXrCem+nRHx1vgM35ziRKq8/9v25xj55qtbT
+C190/fSvHrZ0UomOvaWSg7afXeL9Vk5L309VzSfmekeca+8fHjBZff7JP1sV
+fX/SU18tYTpCQO5RQik8uTTQSWBcChDSj4X0A7hD0XLhfLMu4aQ3YlzHvV0k
+NvuTvvBH+K8spVo3UX7vv7RrQ9MUhnUWRMyILhZbzOK4kapGFVLd6oy8asuM
+OXsfKFjSSSE69pZqBVVTZsC46Qcfame9yoYMv3FBP2tKdisasyI9XD28+pjk
+HbTZtECemYnW3BWxZfi+gNyjJrgxZ1PKmYRpbiZlaiH9bE0/wFHovho1caZ5
+EWi1SvhziOeiEuPgod2Vx+LDA0O+TFwX8eYUgYt/dNZAOWfanY7UGr4wrPP3
+MM/5+R1mqcyxVFR8LW1JeEqVjG2d+E4YFKlqNSIsSIsMfnXZwX2JGyJD3H0i
+firN3bsldoG/26trC0VdJQucxxiGrK5Loc+PW1RK79YzSS17yD0q1hQNx+PT
+q8R1P/iZnpsg/ahAkn6Ag4CJCj+fs7aoyzw7uksXuk37rtY0KbGOc0HPu8Rq
+JjrKpuwPxjrNPt6su2wm63Sy2pzU9CKLa3cSawTCZHe/9vH6osJsOsSlVFVX
++fFtK0I9nhruEpXXpv8ZOzoJnDAYUjVIK1a7OYeeakXVWFtuiJMg6o9OVK2s
+T/d76a2CuvMho5wNw4GkZMGYUbMv0rsYIBkcIPesW0MeZMbvr5apFQ8szk2Q
+fhSAc5Ojg4oub1+zvwrnZqfo4izB9CNNZqmnLcGcUqu94JeUfCR4Wb90TNbp
+lE1H5wo8o8t7zL8gtkYgDKlJmuq22HyGxLHUPjBJ6Xr30SG5bRibOkmiY2+p
+GnorN3i69H8jKfnwpYmb7/TNd7FHpwPG/fvo/eIPx46er5+4ii/NG0114qoU
+nvhkboiGmZ4jR/kGaP85L6bYePyD3LNmraPmUPyhWs0VCd65CdKPECrpB3AP
+1ludtXP/TfyiiJLL4a5+Pzwwu5g3Trye8uUTvL+5q7tAZ7KQTmSNUJi8aovP
+xJgbUseRqqfn2qc+b5xpx9jTSRode0vVQDI4ZDbUH/Z3Niz4Pzw4fVzAUSG9
+G88kE1fIPSvWbt5KeM13sq+WSYLhjz/j7jNr1Q3DKQDSzzpw3eTAIA9PJ6eX
+dWkfb0G7Kk+dFZo8jIPUJPp5xZonjSbxJu/+W/OXirq0wMDt9/SryfJ7Wxl1
+OktrJMIkVxZ5BGSZZyFXUjFZ84M2RNvJkNof3/1sYKXCdp1WomNvqRrMB4dN
+RoNDE/Io9yPvMM2KixptPTV/8uK8NtTSBBkkgwPkHkVras2TAPv+7W523QTp
+Zx04Nzkqqra8aI8nhj2mY9hwn4S/zbJPfn+bf4D5XdC+xHMaM2/DjtS05G9X
+bT6hv8+paLt5dmfwsyPc12ZfqZFSzhIca6TC5Pe2+c/Z12DxSgQ3UjHRpRVT
+nD1CYxMOHM08nF8nM0wxbdVJITr2loohzZdSg599xm/HH3UdNfn/8XpqZMDu
+Cw3tt7KjXf71UlTWdTHSWZjw+fqUgz+lboxJLOqk/bQu2eAAuUfBWj845yZI
+PwrAuYnPoKLCje/vNH0O0/iC3XboWcMkZZvCt5Z346wyOJRUTnXSM0gilVsc
+KqBq/uSeGtIP+Gcgb8hNSb/QMjDT0iZeUg2bnY6iNXlDXlrqb82ED7M6ilSO
+ddIxaE0qtzhKQNWcx5RHUukYdOz0AxwfDGnv6F8pVqskFdlx40c89/ruvAqx
+zW9c07OGylpFiJX5lSNI5VQn+1K5xRECquZP7nEtlZ5Bx08/AAAAAAAAAAAA
+AAAAAAAAAAAAAAAAYOiDdpUmLp8fMNFlyuI9t6VD9jb2P6SZ5IATAADgCbK6
+zAN/iVE1UpcRPD5syL62+A9pJjngBAAA+AKm6lVpJ9DS63EBS8volSTgD/+Q
+ZpIDTgD4A6bkx4U9X3TyF+mtXcvSKZR5ZQ9OYjr4zXRAwAkAFyBNBUd+udNj
+rdtjiLAoY03oK+8VsVCsU1Z7bGNkWNCkFwTTl2bWa94dR8XXc7KK2yx21OJW
+pw5lc87CqRH6zcpYkor1Vh+Jmz3B6cmRLoErD93HL0FACyZeJQUVFSeuXJ98
+8EDyupVJl0VGO79h3ZVZ+wrbbX1P09Fzz1ozOQq0DrppSYrdYw0AtFC2/Lr6
+4wwKMyJM/qhReHWN21gWCknL6499f64R0RREPr3wRVd9YZfe2ykRX523qFLG
+nU79sYUnlwY6CYw30mRBau+dpFV7rrQiio5re94Z87Tvrmob94th4FVy0Paz
+S7zfymnp+6mq+cRc74hz7f0jFiarzz/5Z6ui70966qslTActR889a83kKtD6
+w9NLS3LsHWsAoEdfRkb4rzTdWJ8EJkVncA+rkOpWZ+RVW2bM2auvJYN1FkTM
+iNaUynQMnVoUjTmbUs4kTDMt3GazVEXLhfPNukFKeiPGdZyhtDRTaHvVCqqm
+zIBxhuI4DRl+44J+1hQxUDRmRXq4enj1Mck7aHMlTq1SSnIdPPesNZO7QOvk
+0UpLK7AQa1Vr7orYMqrhBABSVMKfQzwXlRjnE9pdeSw+PDDky8R1EW9OEbj4
+R2cN7MVPe3wgtaZGxdfSloSnVA2UHMM6fw/znJ/fYda1ONSpaDgen14lrrMo
+KsqSVC3dV6MmzjQvWsBErfZbql5VqxFhQVpk8KvLDu5L3BAZ4u4T8VNp7t4t
+sQv83V5dWyjqKlngPMYwkHZdCn2ealFRKvAl99jSr4W1QNNNy0GINRSbAFik
+u3Sh27Tvak27CtZxLuh5l1jN3EvZlP3BWKfZx5t1V/Jk44OsNic1vchiOYHQ
+mqqr/Pi2FaEeTw13iRooMSa7+7WP1xcVZtMzznQiDzLj91fLcAtesyNV862o
+8PM5a4twq0Hb06sapBWr3ZxDNbXZsLbcECdB1B+dqFpZn+730lsFdedDRjkb
+RihJyYIxo2ZfZO0eHl9yjy39ahYDTT8tNdg51nBuAlhEdHGWYPqRJrMOYVx4
+RVLykeBl/Zo82figbDo6V+AZXd5j/gWxNQ2YpHS9++iQ3DZdf0Vqkqa6LTaf
+sXGks6PmUPyhWs1EFW8QYEeqGhVd3r5mfxX+DXK7elUDScHro/eLPxw7er5+
+Li2+NG801bm0Unjik7khZsyLKTYelfmSe0RwF2gmaanB3rGe6TlylG8AXqwB
+gC6Sy+Gufj88MFtiMO4OPeXLJ3h/c1e38sFkzZ/YWj891z71eeNMuy6T5VVb
+fCbGmNeL5kbnzVsJr/lO9tUySTD88WfcfWatumEYPdiQivVWZ+3cf1NCux+z
+4VUNJONVZkP9YX9nwz2Ihwenjws4ilc0mxl8yT129LMYaEZpqcHOsYbrJoBF
+kJpEP69Y8zzWdIfJu7XVlxV1aYGB2+/pF83l97YyGh/MrWGy5gdt/TVbkNof
+3/1sYF1FcmWRR0CWea/gSqcBnILXLEhFHp5OTi/r0j4PhXZVnjorpPwAFxte
+1WA+Xm0yGq+akEe5H3mHaRaB1GjrqfmTF+e1Ua4fbhW+5B4b+lkOtAHqaanB
+zrGGcxPAJvL72/wDzO/N9nUHpzHzNuxITUv+dtXmE/rbuYq2m2d3Bj87wn1t
+9pUaKeXExbGGiS6tmOLsERqbcOBo5uH8OplhNim/t81/zr4Gi1c0uNE5AM4g
+YKtUVVtetMcTwx7TMWy4T8Lf1J8tZsWrGNJ8KTX42Wf8dvxR11GT/x+vp0YG
+7L7Q0H4rO9rlXy9FZV0XI52FCZ+vTzn4U+rGmMSiTlYfIOZL7tmqn/VAD0Aj
+Le0fazg3AayCigo3vr/T9NFQ42UE26FhDZOUbQrfWt6Ns/DhUDrVHEulZ5BE
+Krc4VEwZeMnRAq124FgDAAPkDbkp6RdaBuZ/2u6QVMPm+EDFmrwhLy31t2bC
+52sdRaeac6l0DFqTyi2OElOmXnKgQKsdPdYAwAAMae/oX4JXqyQV2XHjRzz3
++u68CrHNazg0rKGyVhFiZb7nCDq5lkrPIBWp3OIIMbXFSw4SaDUfYg0AAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAjgvaVZq4fH7ARJcpi/fclsINeGBQgfQDAAAP
+WV3mgb/EqBqpywgeHwYvXAKDCqQfAAC4YKpelXa2Kr0eF7C0jLXCGQBAAUg/
+AA9MyZtLaB5J5SnSW7uWpVMoXMseEFPAwOCnHzC4IE0FR36502Otz2OIsChj
+Tegr7xXZXsMH660+Ejd7gtOTI10CVx66r6sbgIqv52QVt5HsaMaBVLWs9tjG
+yLCgSS8Ipi/NrEfY04nvBBZQNucsnBqh32bNulpSUFFx4sr1yQcPJK9bmXRZ
+ZLSXHdZdmbWvsN3Wl0whpkNFqg5+pR/gsChbfl39cQaFuQcmf9QovLrGbSwL
+dbF77ySt2nOlFVF0XNvzzpinfXdV6/dk6b2dEvHVeYsSa9xJldcf+/5cI6Ip
+OX164Yuu+nI8LOgkdoJtKIUnlwY6CYy3ACVTSw7afnaJ91s5LX0/VTWfmOsd
+ca69f3jAZPX5J/9sVfT9SU99tYTpCAExHTJS9YfnU/oBjktf7CP8V5pusk8C
+kxo6OChaLpxv1vUE6Y0Y13GGYtCamtIFETOiNXU+HUKqGlVIdatI8qotM+bs
+1RfssVknmRNsQNGYsynlTMI005JzhGqtoGrKDBhnKOvTkOE3LuhnTfkFRWNW
+pIerh1cfk7yDNleS1IpVteauiC3DdwfEdAhJ7TfLp/QDHBiV8OcQz0UlxpFD
+uyuPxYcHhnyZuC7izSkCF//orIF9+WkPDqTWtHRfjZo407jSANb5e5jn/PwO
+szzmWCoqvpa2JDylaqA0HUs68Z3AVKqi4Xh8epW4zqIcKoFatRoRFqRFBr+6
+7OC+xA2RIe4+ET+V5u7dErvA3+3VtYWirpIFzmMMo1bXpdDnqZZDNUBSOgFi
+OsSk8iv9AEemu3Sh27Tvak2TEus4F/S8S6xmlqNsyv5grNPs4826a2aywUFW
+m5OaXmRx4U5iTfOtqPDzOWuLTOo3y+5+7eP1RYXZXIhLqaqu8uPbVoR6PDXc
+JWqgFB07OgmcwEgq8iAzfn+1DLdUN75aDdKK1W7OoZqqclhbboiTIOqPTlSt
+rE/3e+mtgrrzIaOcDcOBpGTBmFGzL9K7biEZHCCmQ0oq39IPcGREF2cJph9p
+Mks945IxkpKPBC/rV7nJBgdl09G5As/o8h7zL4itqVHR5e1r9leZ3YVFapKm
+ui02nx5xLFWtqY1Tut59dEhuG8amTgInMJDaUXMo/lCtZgKLNzjgq9VAUqr7
+6P3iD8eOnq+fuIovzRtNdeKqFJ74ZG6IhpmeI0f5Bmj/OS+m2HgIhJgOIan8
+Sz/AkZFcDnf1++GB2cW8ceL1lC+f4P3NXd1aApMFfyJrWG911s79NyUWySKv
+2uIzMca82DWXUvX0XPvU540z7Rh7OgmdQF/qzVsJr/lO9tUySTD88WfcfWat
+umEYVfDVaiAZHDIb6g/7OxsW/B8enD4u4CjVouU6SCauENOhI5WH6Qc4MkhN
+op9XrHnGaBJv8m5t3WhFXVpg4PZ7+uVp+b2tjAYHS2vIw9PJ6WVd2odu0K7K
+U2eFhqeEJFcWeQRkmacgV1IxWfODtv6qOEjtj+9+NrCoYrtOEicwkWoAp1Q3
+gVoN5oPDJqPBoQl5lPuRd5hmxUWNtp6aP3lxXhvliuj9kAwOENOhJNUAX9IP
+cGjk97f5B5jfBe1LPKcx8zbsSE1L/nbV5hP6G6eKtptndwY/O8J9bfaVGinl
+FMGxpmrLi/Z4YthjOoYN90n429At5Pe2+c/Z12DxPgQ3UjHRpRVTnD1CYxMO
+HM08nF8nM0wxbdVJ6gQmUgfAGRyI1GJI86XU4Gef8dvxR11HTf5/vJ4aGbD7
+QkP7rexol3+9FJV1XYx0FiZ8vj7l4E+pG2MSizppP61LNjhATIeO1AF4k36A
+Q4OKCje+v9P0IUzjC3bboWcNk5RtCt9a3o2zyuBQUjnVSdsgiVpugZgyM8gj
+qWoHTj/AwZE35KakX2gZmGlpEy+phs3BgaI1eUNeWupvzYQPszqKVI510jRo
+TS23QExpG+SRVLWjpx/g4GBIe0f/orZaJanIjhs/4rnXd+dViG1+3ZqeNVTW
+KkKsTK4cQSqnOmkbpKKWWyCmQ1UqRbUAAAAAAAAAAAAAAAAAAAAAAAAAAAD/
+ONCu0sTl8wMmukxZvOe21Na7quxas7dZYPCBDOEE6OYA35DVZR74S4yqkbqM
+4PFhtr5Fx641e5sFBh/IEE6Abg7wDkzVq9JOUKTX4wKWltHbId/O1uxtFhh8
+IEM4Abo5YDOYkptLWemtXcvSKRRI5cKavc2SwFU4GMAjqWrIEI6Abg4YgTQV
+HPnlTo+1DMYQYVHGmtBX3iuyufCoZgPkI3GzJzg9OdIlcOWh+7od+lHx9Zys
+4jaLXbf6/r67MmtfYTutNwdltcc2RoYFTXpBMH1pZr3xK+xMrBlARcWJK9cn
+HzyQvG5l0mWR0cZuNpkdgAfh4FCqHmVzzsKpEfpN26xLxQMyhDYsuB0/2fq/
++gd1c8AqypZfV3+cQWEOgMkfNQqvrnEby0JR7N47Sav2XGlFFB3X9rwz5mnf
+XdX6nOq9nRLx1XnTYmaYrD7/5J+tir6E6amvllBLCnn9se/PNSKaosynF77o
+OlCwhpE1A2j72SXeb+W09P1M1XxirnfEuXaUBbMGeBAOTqXqjy08uTTQSWC8
+oSiZVFwgQ+gfmwW3EybbP6mbA9bpi0GE/0rT7exJYFJABwdFy4XzzbqMlN6I
+cR1nKLusqd5cEDEjWlNRU//HjVmRHq4eXn1M8g7aXIlTOhMPVCHVrWXIq7bM
+mLNXV9KGoTU9qqbMgHGGgjINGX7jgn7WbPxvo1mDaMcPB7dSdYIbczalnEmY
+ZlrAjlAqAQ6bIarW3BWxZfie5b3biZLtn9TNAQqohD+HeC4qMc50tLvyWHx4
+YMiXiesi3pwicPGPzhrYAZ92qpNa09J9NWriTOM9/bHO38M85+d3UB5iSA+B
+iq+lLQlPqZKRWDABERakRQa/uuzgvsQNkSHuPhE/lebu3RK7wN/t1bWFoq6S
+Bc5jDEN316XQ56kW4qQCj8LBoVRFw/H49CpxnUVxVaLM4VuGkJR1GDpu12CR
+bIyEab91uCACNtJdutBt2ne1psmBdZwLet4lVjMTUjZlfzDWafbxZt21K1mq
+y2pzUtOLLC7uSaxpvhUVfj5nbZFJpWTZ3a99vL6ooD4nITyEqqv8+LYVoR5P
+DXeJGijKZg1pxWo351BNPTOsLTfESRD1RyeqVtan+730VkHd+ZBRzoY0lZQs
+GDNq9kXWVvN5FA7OpCIPMuP3V8twC38TZg6/MoTk3DRE3N7/LU6ykcGvIAI2
+Iro4SzD9SJNZOI2Ls0hKPhK8bFjFJUl1ZdPRuQLP6PIe8y+IralR0eXta/ZX
+9ZpmJ1KTNNVtMZ1pCskh1JrqMaXr3UeH5LZR7AQkRaKP3i/+cOzo+foJlfjS
+vNFUJ1RK4YlP5oaYMS+m2Lhr8igcHEntqDkUf6hWM1/GGySJM4dfGTLTc+Qo
+3wAHyhA7uB0/2UjhVxCJuzlABcnlcFe/Hx6YXVQb50BP+fIJ3t/c1V0rM1m+
+JrKG9VZn7dx/U2IRNHnVFp+JMeZlpZkcQk/PtU993jjTbnvSZjbUH/Z3NixE
+Pzw4fVzAUbxC08zgUTi4kXrzVsJrvpN9tUwSDH/8GXefWatuGAYo4szhVYaQ
+XDcNEbcTJhtNYQ4cRMBGkJpEP69Y86zS5MDk3doKzYq6tMDA7ff0C7vye1sZ
+pbqlNeTh6eT0si7twy9oV+Wps0LD05+SK4s8ArLopALeITBZ84O2/roxSO2P
+735G/WLfPGk3GSVtE/Io9yPvMM1KgBptPTV/8uK8Nsrlwa3Co3BwJ1UHTuFv
+kszhVYaQnJuGgNtJk422MIcNImAr8vvb/APM70b25YDTmHkbdqSmJX+7avMJ
+/S1HRdvNszuDnx3hvjb7So2UcqhwrKna8qI9nhj2mI5hw30S/jakp/zeNv85
++xrovDOBcwhMdGnFFGeP0NiEA0czD+fXySjOpjCk+VJq8LPP+O34o66jJv8/
+Xk+NDNh9oaH9Vna0y79eisq6LkY6CxM+X59y8KfUjTGJRZ2szqZ4FA5upA6A
+M0iSZA6vMoTk3MR/t5MmG21hjhtEwGZQUeHG93eaPgxpfO1sO/SsYZKyTeFb
+y7tpXe2zK5hLeBQOHkmFDKGDw7p96AQRoIi8ITcl/ULLwFRMmwNJNWxmFEVr
+8oa8tNTfmik9VMrwEA4Pj8LBH6mQIdRxWLcPqSACFMGQ9o7+RVu1SlKRHTd+
+xHOv786rENt8JUvPGiprFSF0H2hhV7BDwKNw8EEqZAh1HNbtQzCIAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAQxy0qzRx+fyAiS5TFu+5LWVtfxM7mXVA/jktJQI8
+AAAA28jqMg/8JUbVSF1G8PgwgtcuHcasA/LPaSkR4AEAAFgHU/WqtDNd6fW4
+gKVlbO3GbyezDsg/p6VEgAeAfzyYEtYL7IX01q5l6RRKmjqGWRK4SpLBb6mj
+AR4AhhBIU8GRX+70WBtNMERYlLEm9JX3imyvZIL1Vh+Jmz3B6cmRLoErD93X
+7ZSPiq/nZBW3kWylR0kqvnEWUDbnLJwaod9MzLpaPGS1xzZGhgVNekEwfWlm
+vfE77lh3Zda+wnZm7xWiouLEleuTDx5IXrcy6bLIaPM0m8wOwIMksdZSak0g
+DpANsJE5BuweawBwBJQtv67+OIPCRAuTP2oUXl3jNpaFEs+9d5JW7bnSiig6
+ru15Z8zTvruq9WNA7+2UiK/OWxQ8oyOV2LhtKIUnlwY6CYw3uiRTi4u8/tj3
+5xoRTd3t0wtfdB0oQIPJ6vNP/tmq6Bt5euqrJTRHF7T97BLvt3Ja+n6maj4x
+1zviXDvKglkDPEgSay2l2ATCANkCG5ljwN6xBgCHoC/RI/xXmm55TwKTcjA4
+KFounG/WDTTSGzGu4wzljzUVngsiZkRrilsylEpm3BbNjTmbUs4kTDMtrEao
+lgBUIdWtdsmrtsyYs1dXiUfRmBXp4erh1cck76DNldRr/mpRNWUGjDOUm2nI
+8BsX9LOmZIGNZg2iHT9JrLWUchMIAmRTQ1jJHD0sxFrVmrsitoxqOAGAC1TC
+n0M8F5UYpynaXXksPjww5MvEdRFvThG4+EdnDeyST3vYIbWmpftq1MSZxpv+
+Y52/h3nOz+8w67R0peIbZ6pW0XA8Pr1KXGdR9JNArRVtqPha2pLwlCqZmiKI
+sCAtMvjVZQf3JW6IDHH3ifipNHfvltgF/m6vri0UdZUscB5jGLq7LoU+T7VM
+JxV4lCRsNYF2gFjMHPvHmqwGBwA4Bt2lC92mfVdrOnZjHeeCnneJ1UzplE3Z
+H4x1mn28WbdAQDbsyGpzUtOLLFYpSKxpvhUVfj5nbZFJxWLZ3a99vL6oMJv4
+0ZVKYJyRWuRBZvz+ahluQWp8tWTaVF3lx7etCPV4arhLFPVSaNKK1W7OoZpq
+Z1hbboiTIOqPTlStrE/3e+mtgrrzIaOcDSOUpGTBmFGzL9p+v0cHj5KEnSaQ
+B8j+mWPvWMO5CXB8RBdnCaYfaTLrZ8Z1UiQlHwleNqy6kww7yqajcwWe0eUW
+6/PE1tSo6PL2NfurzB5WQGqSprotNp8L0pVKYJyB2o6aQ/GHajWzYLwRBl+t
+FW1qTd2b0vXuo0Ny22wvIX30fvGHY0fP18+lxZfmjaY6l1YKT3wyN8SMeTHF
+xucBHiUJEbSTR00YoMHIHHvHeqbnyFG+AXixBgAHQXI53NXvB/M1deNe1lO+
+fIL3N3d1axtMbiUQWcN6q7N27r8psegZ8qotPhNjzOtO05NKaJy+2pu3El7z
+neyrZZJg+OPPuPvMWnXDMDThqyXTpqfn2qc+b5xpt/3clNlQf9jf2XAP4uHB
+6eMCjtKpaU8Oj5KErSb0Qy9ALGaOnWMN102A44PUJPp5xZp3D00vm7xbWylZ
+UZcWGLj9nn4hXn5vK6Nhx9Ia8vB0cnpZl/YJI7Sr8tRZoeFhOsmVRR4BWeb9
+jY5UEuPM1OrAKUhNoJbIFCZrftDWX/EGqf3x3c+or+mZj1ebjMarJuRR7kfe
+YZpFIDXaemr+5MV5bZRLcFuFR0liexOYB4jFzLFzrOHcBPAA+f1t/gHmDwv0
+9TKnMfM27EhNS/521eYT+lvEirabZ3cGPzvCfW32lRop5f6AY03Vlhft8cSw
+x3QMG+6T8Ldh1JHf2+Y/Z1+DxcsfVKWSGmeidgCcEYZILb4pTHRpxRRnj9DY
+hANHMw/n18kozskxpPlSavCzz/jt+KOuoyb/P15PjQzYfaGh/VZ2tMu/XorK
+ui5GOgsTPl+fcvCn1I0xiUWdrD5AzKMksbUJTAOEb20AGplj/1jDuQngA6io
+cOP7O02fODVenbAdetYwSdmm8K3l3Thjgv2l0jZIotYO2jiDR0lCxBBoAgD8
+05A35KakX2gZmFNqe1lSDZt9lqI1eUNeWupvzYTPfNtZKk2DVtSyro1LeJQk
+xL/jfRMA4J8GhrR39C+yq1WSiuy48SOee313XoXY5qUhetZQWasIsTKTtJtU
+dtWyro17eJQkRAyBJgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwD5oV2ni8vkB
+E12mLN5zWwo39U0A54AHAADgAlld5oG/xKgaqcsIHh8GL3GaAM4BDwAAwAmY
+qlelnQ1Lr8cFLC1jrRjHkACcAx4AOAJT8uYqnUdS+Yj01q5l6RSK4bIHjwI6
++M5xNMADgM0gTQVHfrnTY63bY4iwKGNN6CvvFdleGgjrrT4SN3uC05MjXQJX
+HrqvK4CAiq/nZBW3keySxoFUtaz22MbIsKBJLwimL82sR1jUaWmZBZTNOQun
+Rui3brMulRRUVJy4cn3ywQPJ61YmXRYZ7Y+HdVdm7Stst/WtVb4EFE8Tbg73
+f2XFOZAeAGAVZcuvqz/OoDC9weSPGoVX17iNtb3ctrr3TtKqPVdaEUXHtT3v
+jHnad1e1vuf13k6J+Oq8ReU27qTK6499f64R0VSyPr3wRVd9iR8WdBJYtg2l
+8OTSQCeB8baiZFLJQdvPLvF+K6el76eq5hNzvSPOtfcPP5isPv/kn62Kvj/p
+qa+WMB2B+BJQXAhz2JpzID0AwDp96RXhv9J0734SmJTmwUHRcuF8s64nS2/E
+uI4z1JjWlKouiJgRrSkf6hBS1ahCqltIkldtmTFnr74IkO06iSzbgKIxZ1PK
+mYRppmXsCKVaQdWUGTDOUCqoIcNvXNDPmpIOisasSA9XD68+JnkHba6kWHzW
+HL4EFB+iHLbmHEgPYxOtuStiy6hmAPBPQiX8OcRzUYlxcqDdlcfiwwNDvkxc
+F/HmFIGLf3TWwHb/tMcHUmtauq9GTZxpXL0A6/w9zHN+fodZV+FYKiq+lrYk
+PKVqoPgcSzpxLDPVqWg4Hp9eJa6zKLFKIFWtRoQFaZHBry47uC9xQ2SIu0/E
+T6W5e7fELvB3e3VtoairZIHzGMO0oetS6PNUS6xSgS8BZZLD7LV6aKcHVOsA
+iOguXeg27bta006FdZwLet4lVjORUjZlfzDWafbxZt1lOdn4IKvNSU0vslgb
+ILGm+VZU+PmctUUmZaFld7/28fqiwmy6xaVUVVf58W0rQj2eGu4SNVBsjg2d
++JYZ6UQeZMbvr5bhlv/Gl6pBWrHazTlUU6kOa8sNcRJE/dGJqpX16X4vvVVQ
+dz5klLNhuJGULBgzavZFFu739MOXgJKrUuPnMEutHurpAecmgAjRxVmC6Uea
+zLLbuBKNpOQjwcuGtW6S8UHZdHSuwDO63GJVnNiaGhVd3r5mf1Wvaa9GapKm
+ui02n4FxLFWtKblTut59dEhuG8amTjzLDHR21ByKP1SrmSDjDT74UjWQlP8+
+er/4w7Gj5+snxuJL80ZTnRgrhSc+mRtixryYYuPxmy8BtWIHP4cJgfRQG6fH
+TM+Ro3wD8NID+IcjuRzu6veD+Uq2cW73lC+f4P3NXd2KApM1fyJrWG911s79
+NyUW+Siv2uIzMca8gDaXUvX0XPvU540z7RibOvEs09d581bCa76TfbVMEgx/
+/Bl3n1mrbhhGLXypGkgGn8yG+sP+zoYbCg8PTh8XcJRqFXTr8CWgZHYIc5gQ
+SA9j4LoJIAKpSfTzijVPSk1uT96tLYCtqEsLDNx+T7/8Lb+3ldH4YGkNeXg6
+Ob2sS/tcD9pVeeqs0PCMrOTKIo+ALPMs50oqJmt+0NZfbAep/fHdzwaWVmzV
+SWyZiU4DOOW/CaRqMB98NhkNPk3Io9yPvMM0KzpqtPXU/MmL89ooV1m3Cl8C
+SqyKJIdZaPU/IT3g3AQQIr+/zT/A/C5uX247jZm3YUdqWvK3qzaf0N+YVbTd
+PLsz+NkR7muzr9RIKWchjjVVW160xxPDHtMxbLhPwt+Gbi2/t81/zr4Gi1cu
+uJGKiS6tmOLsERqbcOBo5uH8Oplh7mqrTmLLTHQOgDP4EEnFkOZLqcHPPuO3
+44+6jpr8/3g9NTJg94WG9lvZ0S7/eikq67oY6SxM+Hx9ysGfUjfGJBZ1svo0
+MF8Cim+HNIdZaPU/Ij3g3AQQg4oKN76/0/Q5T+M1AduhZw2TlG0K31rejdMT
+HUoqX3SqSaVyi0M5itRLbKpyqFarHTg9AEDekJuSfqFlYCanze2kGjZ7CkVr
+8oa8tNTfmgkfxnUUqXzRqbYulVscxVFWvMSuKodptdrR0wMAMKS9o39pW62S
+VGTHjR/x3Ou78yrENq/h0LOGylpFiJX5myNI5YtOilK5xREcReoldlXpcIRW
+q/mQHgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwSKBdpYnL5wdMdJmyeM9tKdxN
+5ysQRwAAhhCyuswDf4lRNVKXETw+DN6e5CsQRwAAhhKYqlelnWRLr8cFLC1j
+rXAGMLhAHIEhBKaEK39Ah/TWrmXpFArXsgdf0o8vOvsZ/DgCAAWQpoIjv9zp
+sdaXMERYlLEm9JX3imyv4YP1Vh+Jmz3B6cmRLoErD93XVRhAxddzsorb8HY0
+oyMV37gtyGqPbYwMC5r0gmD60sx6hD2pOJZZQNmcs3BqhH7PNOtSSUFFxYkr
+1ycfPJC8bmXSZZHRXnZYd2XWvsJ2W18X5SD97BhQdnXqYCGgJJ3CWhx51OmA
+oYSy5dfVH2dQmDJh8keNwqtr3MayUBe7907Sqj1XWhFFx7U974x52ndXtX5U
+7r2dEvHVeYt6aXSkEhtniLz+2PfnGhFNCenTC1901dfWYUEqgWXbUApPLg10
+Ehjv50kmlRy0/ewS77dyWvp+qmo+Mdc74lx7/9kJk9Xnn/yzVdH3Jz311RKm
+JyhO0s9+AWVXp/7YLASUsFNYiyOPOh0wpOgbeiL8V5rumE8Ckxo6OChaLpxv
+1uWu9EaM6zhDZWdNgeiCiBnRmqKdDKWSGWcGqpDqFmjkVVtmzNmrr75js1RC
+yzagaMzZlHImYZpp/ThCqVZQNWUGjDPU6GnI8BsX9LOmloKiMSvSw9XDq49J
+3kGbK3FKphpMtOauiC3D9wU36WfHgLKrUwsrASXqFNbiyKNOBwwtVMKfQzwX
+lRinHtpdeSw+PDDky8R1EW9OEbj4R2cNbLJPu9ORWtPSfTVq4kzjmgFY5+9h
+nvPzO8ySj65UfOO2qEXF19KWhKdUDVR9Y0uqpWWmOhUNx+PTq8R1FrVNCaSq
+1YiwIC0y+NVlB/clbogMcfeJ+Kk0d++W2AX+bq+uLRR1lSxwHmMYZ7ouhT5P
+tbbpgDeI6yBwnH52CyiLOmkHlNVOwaNOBwwxuksXuk37rtY0jbCOc0HPu8Rq
+pibKpuwPxjrNPt6su4Ym63Sy2pzU9CKLq20Sa5pvRYWfz1lbZFKMWXb3ax+v
+LyrMpnB0pRIYZ6pW1VV+fNuKUI+nhrtEDVR5Y0MqvmVGOpEHmfH7q2W4dbfx
+pWqQVqx2cw7VlIjD2nJDnARRf3SiamV9ut9LbxXUnQ8Z5Ww4G0lKFowZNfsi
+vesBknMTl+lnv4CyqJNRQJl3Cgt41OmAIYbo4izB9CNNZsliXP9FUvKR4GXD
+fRCSTqdsOjpX4BldbnHHhNiaGhVd3r5mf5XZfVOkJmmq22Lz2TldqQTGbVCr
+1tS6KV3vPjoktw1jVSqOZQY6O2oOxR+q1Uw58YYyfKkaSOpuH71f/OHY0fP1
+103iS/NGU71uUgpPfDI3RMNMz5GjfAO0/5wXU2w8aHGcfmp7BZQlnUwDyrRT
+WMKjTqc2TjkjzFIO4AuSy+Gufj+Y3+UwTpWe8uUTvL+5q7ukZrKQTmQN663O
+2rn/psQiceRVW3wmxpiXraYnldA4U7V6eq596vPGmXaMPan4lunrvHkr4TXf
+yb5aJgmGP/6Mu8+sVTcMfRxfqgaSc1NmQ/1hf2fD/aaHB6ePCziKV7ubBJLr
+Ji7TT489AsqOTsYBZa9T8KjTAUMMpCbRzyvWPMyaVJm8W1thWlGXFhi4/Z5+
+/Vd+byujTmdpDXl4Ojm9rEv7zBfaVXnqrNDwXI/kyiKPgCzzEZCOVBLjTNRi
+suYHbf1VbpDaH9/9bGB5wVapxJaZ6DSAU3ebQKoG83PTJqNzUxPyKPcj7zDN
+gp8abT01f/LivDbKFdH7ITk3cZV+9gsouzoN0Asoe52CR50OGGrI72/zDzC/
+b9mXKk5j5m3YkZqW/O2qzSf0dyYVbTfP7gx+doT72uwrNVLKIxSONVVbXrTH
+E8Me0zFsuE/C34ZElt/b5j9nX4PFSwxUpZIaZ6IWE11aMcXZIzQ24cDRzMP5
+dTLDvNBWqcSWmegcAGcoI5KKIc2XUoOffcZvxx91HTX5//F6amTA7gsN7bey
+o13+9VJU1nUx0lmY8Pn6lIM/pW6MSSzqpD0kkJybOEo/+wWUXZ0D0Agovimm
+nYJHnQ4YaqCiwo3v7zR9dtT4Ett26FnDJGWbwreWd+OM0vaXSs8gp1JZ8yq3
+OJSjhkpA2RTGo04HDD3kDbkp6RdaBuZG2lRJqmGz01G0Jm/IS0v9rZnw8VM7
+S6VjkGOpbHqVWxzFUUMnoCx3Ch51OmDogSHtHf1ru2qVpCI7bvyI517fnVch
+tnlNl541VNYqQqzMiOwmlZ5BTqWy71VucQRHDZWAst4pNPCo0wEAAAAAAAAA
+AAAAAAAAAAAAAAAAAPAAtKs0cfn8gIkuUxbvuS219T4ou9YAgCKQxgAwtJDV
+ZR74S4yqkbqM4PFhBG9wcmQNACgCaQwAQwxM1avSzgul1+MClpbRq85gZ2sA
+QBFIYwCwP5iSg0UE6a1dy9IpVB3lwtrQg5MQM4NHUtWQxgBAD6Sp4Mgvd3qs
+dXIMERZlrAl95b0iFgp6ymqPbYwMC5r0gmD60sx6zRvhqPh6TlZxG84+WVh3
+Zda+wnY6L/phvdVH4mZPcHpypEvgykP3jffst2aNkjdI7NuGsjln4dQI/c5p
+xD6hCQchxneR9RZxkY06WHC+DYmHh2U3scUaAPAJZcuvqz/OoDD7wuSPGoVX
+17iNZaHYtLz+2PfnGhFNwe7TC1901Zdr6b2dEvHVedPaY5isPv/kn62KvrGi
+p75aQq0v9t5JWrXnSiui6Li2550xT/vuqkaoWaPoDUL7NqIUnlwa6CQw3tUT
+zyd0rXIRYmIXkbWIE6n6Y7PgfMaJhwtBN2FoDQD4BNp+NsJ/penm+yQwKUyD
+e1iFVLcWI6/aMmPOXn2FGKyzIGJGtKYApg5FY1akh6uHVx+TvIM2V1Irdqlo
+uXC+WTcoSG/EuI7TVRW3Zo2qN4js24iiMWdTypmEaaZV5Cx8QhNuQkzmIsIW
+cZSN/YLZcD7TxCOAoJswtAYAPEIl/DnEc1GJ8WCAdlceiw8PDPkycV3Em1ME
+Lv7RWQP79dMeDUitqVHxtbQl4SlVA4XEsM7fwzzn53dQHYjJ7Wvovho1cab5
+Lv/40PUGXfvkBhUNx+PTq8R1FhVO6frEtkaxHGINFi4iaBGHUmk7n93EoNtN
+AGCo01260G3ad7Wm/QfrOBf0vEusZrKobMr+YKzT7OPNulUDstFAVpuTml5k
+sf5BaE3VVX5824pQj6eGu0QNFA6T3f3ax+uLCupTQRK1mm9FhZ/PWVtErSoz
+XW9YsU/LIciDzPj91TLc6tu0fWJLo9gMcf+3OC7CbxFnUhk5n8XEI7OG300A
+YIgjujhLMP1Ik1nGG5dTkZR8JHjZsNBNMhoom47OFXhGl/eYf0FsTQMmKV3v
+Pjokt03XiZGapKlu/UVYKUJiHxVd3r5mfxXVJxXoeoPcPh2HdNQcij9Uq5kp
+4w2PhD5RCk98MjfEjHkxxcYjIschxncRfos4ksrQ+SwmnhVrastuYgUqiQEA
+jozkcrir3w8PzNYdjLtJT/nyCd7f3NUtJzBZ4Se21k/PtU993jjTrus18qot
+PhNjzKtAM7GP9VZn7dx/U0K9O9LzBn37hAZv3kp4zXeyr5ZJguGPP+PuM2vV
+DcPQRN8njBvFbogJXYTfIm6kMnY+u4lBr5sAwBAHqUn084o173iabjJ5t7am
+sqIuLTBw+z392rf83lZGo4G5NUzW/KCtvxILUvvju58NLFZIrizyCMgS0li7
+wFeLPDydnF7WpS2JjXZVnjortP4kHR1vMLFPalAHTvVtBj5h2CgNbIWY1EX4
+LeJOqg56zmc3Meh1EwAY6sjvb/MPML9h29dNnMbM27AjNS3521WbT+jvyira
+bp7dGfzsCPe12VdqpCjVQ+BYw0SXVkxx9giNTThwNPNwfp3MMBuU39vmP2df
+A513SnDsq9ryoj2eGPaYjmHDfRL+pjJCUPUGU/uEBgfAGR4Z+IRJozSwF2JS
+FxG1iBupA9BzPruJQaubAMDQBxUVbnx/p+ljqMbLC7ZDwxomKdsUvrW8m1Yf
+ZFOt/b1B2yAjn5jgUCFWk7aIR1K5FQYA/wTkDbkp6RdaBmar2m6SVMNmp6Ni
+Td6Ql5b6WzPVp7Fp26eGnb1B0yBDn1iacYwQq623iD9SuRMGAP8YMKS9o39d
+W62SVGTHjR/x3Ou78yrENi9v07CGylpFCN2rA3bV6rCbN2gbZOQTfBwhxGpq
+LeKDVC6FAQAAAAAAAAAAAAAAAAAAAAAAAAAAAIBDg3aVJi6fHzDRZcriPbel
+tj73wK41AKACZB0ADDlkdZkH/hKjaqQuI3h8WIHIkawBABUg6wBg6IGpelXa
+iab0elzA0jIae9za3xoAUAGyDnAMMCU/Ltr5orMf6a1dy9Ip1HvlwhoVeORt
+HknlF4OfdcBQB2kqOPLLnR5rPRZDhEUZa0Jfea+IhUqjstpjGyPDgia9IJi+
+NLNe8zY8Kr6ek1XcRrJtHBc6dSibcxZOjdDvtGZdKp6s3uojcbMnOD050iVw
+5aH7xvUTsO7KrH2F7bReurR0oC3WcODA2/guGlKJQUkqSaowhEl3o2bHoJmd
+rAMAA8qWX1d/nEFhtoPJHzUKr65xG8tCFWx5/bHvzzX2pbaq9fTCF131pWp6
+b6dEfHXeoiAcdzr1xxaeXBroJDDeBZRMKi69d5JW7bnSiig6ru15Z8zTvruq
+dT0bk9Xnn/yzVdE3XPTUV0uoWSRwIENrlnDibUIXDZXEoCiV2A8MYdDd6Nhh
+LesAYAC0/WyE/0rTqgAkMKmYg3tYhVS3sCKv2jJjzl59zR6ssyBiRrSm+Kdj
+6NSiaMzZlHImYZpp1TlCqQRGWi6cb9YNMdIbMa7j3i4S9xvPivRw9fDqY5J3
+0OZKisVtCRxIw5qqNXdFbBm+Q7nxNpGLNAyFxKAqlcwPzKDd3ejZYSnrAMAI
+lfDnEM9FJca5gnZXHosPDwz5MnFdxJtTBC7+0VkDhQRod21Sa2pUfC1tSXhK
+1UARNazz9zDP+fkdZr2FQ52KhuPx6VXiOouKqARSrTRZQ/fVqIkzzUtB0Bam
+/dbCgZRRNR5+Yz7+M1UcZ4UGCxfxPzHoSsX3A1O12m+pdjdOsg4AjOkuXeg2
+7bta09THOs4FPe8Sq5lOKZuyPxjrNPt4s+4qnaxry2pzUtOLLFYICK2pusqP
+b1sR6vHUcJeogaJpsrtf+3h9UWE29eJMJ/IgM35/tQy3Wje+VHJhmm9FhZ/P
+WVtEuTw2TQdShWSU4DIr+r/FcRHvE4OuVAI/MFKrptfd6NuhCpybAIqILs4S
+TD/SZJZhxqVkJCUfCV42LCyTdG1l09G5As/o8h7zL4itacAkpevdR4fktun6
+H1KTNNVtcanZc6gc6eyoORR/qFYzYcQbgvClWmkyKrq8fc3+Kjq3t+k50ApK
+4YlP5oZomOk5cpRvgPaf82KKjcc/jrMC30W8Twy6UslTxa7djb4dK1DJOgAw
+RnI53NXvhwdmSwbGadlTvnyC9zd3dZfvTJbria3103PtU583zrTrslRetcVn
+Yox5XW5udN68lfCa72RfLZMEwx9/xt1n1qobhh6KL5VMGNZbnbVz/00JvR5J
+z4FUIZnBcpkVhC7ifWLQk8osVUgM6qHS3ejboQpcNwEUQWoS/bxizVNTk5aT
+d2uLSSvq0gIDt9/TrzXL721l1LXNrWGy5gdt/bVxkNof3/1sYHFAcmWRR0CW
+0Gx2yZVOAzjVugmkEptCHp5OTi/r0pYPR7sqT50VUnv8ip4DqUIySnDnbRIX
+8T4x6EhlmioEBul2N/p2qALnJoAq8vvb/APM77X2paXTmHkbdqSmJX+7avMJ
+/V1QRdvNszuDnx3hvjb7So0UpXoIHGuY6NKKKc4eobEJB45mHs6vkxlmX/J7
+2/zn7GuweOuCG50D4AxBRFLxTana8qI9nhj2mI5hw30S/qY43tByIGXIRglu
+vE3qoiGQGFSl2pAq+Abpdze6digD5yaAMqiocOP7O00f+zS+nLcdGtYwSdmm
+8K3l3Tg571A61aRSuRXGCjzyNkg1hZ3uxknWAYAZ8obclPQLLQPzOW1aJtWw
+2bWpWJM35KWl/tZM+Lyso+hUW5XKnTD24I+3QaoxbHU3brIOAMzAkPaO/nVk
+tUpSkR03fsRzr+/OqxDb/II3DWuorFWEWFklcASd1qRyKYxd+OBtkMpQ7SDm
+MAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4MGhXaeLy+QETXaYs3nNbCjvO8BWI
+IwAAQwhZXeaBv8SoGqnLCB4fBu9Q8hWIIwAAQwlM1avSTrKl1+MClpbhbBEK
+8AGIIzAUwZS8WQLgkVR+Ib21a1k6hVKz7MGjUPJI6uDHEQDogDQVHPnlTo+1
+HoUhwqKMNaGvvFdke9lQrLf6SNzsCU5PjnQJXHnovq4OACq+npNV3Ia3vRd3
+UtWy2mMbI8OCJr0gmL40sx5hTye+E1hA2ZyzcGqEfpM362rxsGy1QXZ3Zda+
+wnZbX8mErCOFSdbhaSLOMWtxpNZq4jyxATYSGOA9ypZfV3+cQWHuhMkfNQqv
+rnEby0JJ6947Sav2XGlFFB3X9rwz5mnfXdX6pO69nRLx1XmLkmncSZXXH/v+
+XCOiKSd9euGLrvoqNizoJHaCbSiFJ5cGOgmMNyAlU4sLQav7XCurzz/5Z6ui
+b8Toqa+WMD1BQdaRwyDrcCFssrU4Umw1YZ7YAhsJDPAetP1shP9K0y3+SWBS
+/gYHRcuF8826TiK9EeM67u0isf47rLMgYka0pt6mQ0hVowqpbo1GXrVlxpy9
++gI8Nuskc4INKBpzNqWcSZhmWvCOUC0BBK1WNGZFerh6ePUxyTtoc6VlvVQD
+qtbcFbFl+F6ArLMG7azDh6jJ1uJIudVEOm2AnQQG+I5K+HOI56IS4xxEuyuP
+xYcHhnyZuC7izSkCF//orIGqALS7Hqk1Ld1XoybONK4cgHX+HuY5P7/DLAs5
+loqKr6UtCU+pGqivxpJOfCcwlapoOB6fXiWusyjGSqCWdqspQ1INAbKOqlTK
+WcdujtHOYbp5wmICA0OU7tKFbtO+qzXNV6zjXNDzLrGaOYqyKfuDsU6zjzfr
+LqbJup6sNic1vcjispvEmuZbUeHnc9YWmdRmlt392sfriwqzuRyXUlVd5ce3
+rQj1eGq4S9RAPTV2dBI4gZFU5EFm/P5qGW6hcHy19FtNFZJzE2QdJWt0so5R
+kwmh12ryPLF/AgNDEtHFWYLpR5rMEse4dIuk5CPBy4ZlZJKup2w6OlfgGV1u
+seBMbE2Nii5vX7O/yuwhAKQmaarb4lKzB1s5lqrWlLspXe8+OiS3DWNTJ4ET
+GEjtqDkUf6hWM/3E69r4aum32gpK4YlP5oZomOk5cpRvgPaf82KKjQdFyDqq
+UtVUs45RkwmhncM4Ohm0mmECD6ScEWYpB/AOyeVwV78fzBeJjdOmp3z5BO9v
+7uou1pkspxNZw3qrs3buvymxyCB51RafiTHmxau5lKqn59qnPm+cacfY00no
+BPpSb95KeM13sq+WSYLhjz/j7jNr1Q3DmICvln6rqUJy3QRZR9FaP1SyjlGT
+CaHbajyd1mAxgYGhCFKT6OcVax5vTdpM3q2tA62oSwsM3H5Pv7Isv7eVUdez
+tIY8PJ2cXtalLYyNdlWeOis0PKQmubLIIyBLaDZr40oqJmt+0NZf6Aap/fHd
+zwZWLWzXSeIEJlIN4BQKJ1BLv9VUITk3QdZZtUY36xg1mRDqrWaeJywmMDAk
+kd/f5h9gfoO0L22cxszbsCM1LfnbVZtP6O95Ktpunt0Z/OwI97XZV2qkKNVD
+4FhTteVFezwx7DEdw4b7JPxt6DHye9v85+xrsHibgRupmOjSiinOHqGxCQeO
+Zh7Or5MZpoW26iR1AhOpA+B0bSK1dFtNGZJzE2SdNWv0s45Bk0mg2mob8oTF
+BAaGJqiocOP7O00fIjW+3LYdetYwSdmm8K3l3ThJ7lBSOdVJ2yCJWjtos45D
+hVI9JLKOXVUO1Wq1lYYDQxZ5Q25K+oWWgUmSNm2SathMQorW5A15aam/NRM+
+5+ooUjnWSdOgFbWsa6OEo4RSzXk02co6luPoKK1WWw8QMITBkPaO/lVjtUpS
+kR03fsRzr+/OqxDbvLhLzxoqaxUhVqZGjiCVU520DZKqZV0bDRwhlOohknV2
+iaMjtFpNLUAAAAAAAAAAAAAAAAAAAAAAAAAAAAA8A+0qTVw+P2Ciy5TFe25L
+bb0nyq41wHYcOb6QLQAAECCryzzwlxhVI3UZwePDCN7m5MgaYDuOHF/IFgAA
+iMBUvSrthFV6PS5gaRnOJpfcWQNsx5HjC9kCAPwBU3KztCG9tWtZOoXyo1xY
+G2JwEmJHji9kCwBwAdJUcOSXOz3WxiMMERZlrAl95b0im8t6avZGPhI3e4LT
+kyNdAlceuq/bvB8VX8/JKm7D2TML667M2lfYTuulP1ntsY2RYUGTXhBMX5pZ
+b/wCujVr1BxCbN8GlM05C6dG6HcSI3YITTgIMY5/WI0vfgoxtabH1P+2WgMA
+gDHKll9Xf5xBYU6IyR81Cq+ucRvLQsnp3jtJq/ZcaUUUHdf2vDPmad9d1fqh
+vfd2SsRX501LkWGy+vyTf7Yq+ga3nvpqCbVBQl5/7PtzjYimOPjphS+6DtSa
+sWaNokMI7duCUnhyaaCTwHiXSzyH0LXKRYgJ/MNafAlTiJE1HZb+t8UaAACM
+QdvPRvivNN2MngQm5WlwULRcON+sG0qkN2Jcx71dJNZ/h3UWRMyI1tTD1P9x
+Y1akh6uHVx+TvIM2V1IsfIkqpLqVKXnVlhlz9uqq0VizRtkhBPZtQdGYsynl
+TMI006pqFg7BQdWauyK2DF80NyEm9A9L8SVKIYbZolNi7n9brAEAwByV8OcQ
+z0UlxuMW2l15LD48MOTLxHURb04RuPhHZw3sX0974CK1pqX7atTEmcbb8WOd
+v4d5zs/voHrLg/wQqPha2pLwlCoZiQUj6DqErn0Sa4qG4/HpVeI6i4qfFBxC
+UpCC4xBb+ofd+GqwSCFG1gj9DwDAoNNdutBt2ne1pr0a6zgX9LxLrGZqq2zK
+/mCs0+zjzbq1DLKBS1abk5peZLH4RGJN862o8PM5a4tMyifL7n7t4/VFBfU5
+KuEhVF3lx7etCPV4arhLFLWqZ/QcQm6flkOQB5nx+6tluNWorTuE5NzEZYjx
+/cNefPu/xUkh+tbI/A8AwGAjujhLMP1Ik9lgY1xaRVLykeBlw80UkoFL2XR0
+rsAzutzitguxNTUqurx9zf6qXtNhBalJmuq2uJTGA7skh1Brar+UrncfHZLb
+RmH0ousQEvt0HNJRcyj+UK1m/o43NhI6RCk88cncEA0zPUeO8g3Q/nNeTLHx
+OM1xiHH8w2p88VOIrjVy/5MxEAIjzEIAAABdJJfDXf1+ML9VYtx5e8qXT/D+
+5q5uSYbJzQgia1hvddbO/TclFp1YXrXFZ2KMeUVoJofQ03PtU583zrRTGC7o
+OoSufXxrN28lvOY72VfLJMHwx59x95m16oZheLfuEJLrJi5DrMfUP+zFlzCF
+aFqz4n8AAAYbpCbRzyvWfJjQdN7Ju7XFmxV1aYGB2+/p1/fl97YyGrgsrSEP
+Tyenl3VpC1ejXZWnzgoND2FLrizyCMgS0ngkCu8QmKz5QVt/1Rek9sd3P6O2
+pkfdIczsE1kzgFONmoJDSM5NXIWY2D/sxJc0hRhY04HnfwAABh35/W3+Aea3
+kfs6r9OYeRt2pKYlf7tq8wn9nWdF282zO4OfHeG+NvtKjRSleggca6q2vGiP
+J4Y9pmPYcJ+Evw3jivzeNv85+xrovNODcwhMdGnFFGeP0NiEA0czD+fXySjO
+rak6hKl9fGsD4IyNFBxCcm7iKMTE/mEnvqQpRNvaAHBuAgDHABUVbnx/p+nD
+scaLHrZDzxomKdsUvrW8m9YyDZuCh4RDTHCoFnEeX7atAQBgL+QNuSnpF1oG
+JtbazptUw+ZQQNGavCEvLfW3ZrqvCrEreAg4xNKMY7TIIeLLcrYAAGA/MKS9
+o//egFolqciOGz/iudd351WIbX4Nnp41VNYqQuheILArWAefHYKPI7TIAeJr
+l2wBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgEEC7SpNXD4/YKLLlMV7
+bkuH8qZy7LbUka0BAADwHFld5oG/xKgaqcsIHh9GsFPFkIDdltrfGiapPPlb
+g/EeGJaf4KJ4sP/jLVC5CgAAPoOpelXaabr0elzA0jIae43zDXZbOhjWFI3Z
+XyTfMN6Rw/ITSxQP9r0bS2fTeABwZDAlb9YReCSVR0hv7VqWTqEKPHtwFUd2
+W2pfa9KK/3580GRnRctPzFA2HHov+rKY+A8AwG5gvdVH4mZPcHpypEvgykP3
+CSrhIE0FR36502Ot/2OIsChjTegr7xXZXNSbQBgqvp6TVdxGslUoB1LVstpj
+GyPDgia9IJi+NLMeYU8ntejYWyoJyuachVMjTAv1dldm7Stst3XXBR6kHJOW
+WvrfFms6KEZBdvt/3t5uUqPZ8hMTVI1Z4csusdBBAIA2vXeSVu250oooOq7t
+eWfM0767qi03GlO2/Lr64wwK0zlM/qhReHWN21iaRRboCeu9nRLx1XmL8qvc
+SZXXH/v+XGOfPFXr6YUvuuor37Ggk0p07C2VDKXw5NJAJ4HRxt2YrD7/5J+t
+fVNxtKe+WsL0BMWDlGPUUgL/2+Y36lEQFbwbbJpDlp8YoRJmfxB1QQQrCwAH
+KFounG/WZab0RozruLeLzC/g0fazEf4rKZcNYFKcjqYwrLMgYka0pqq2Q0hV
+owqpbkVJXrVlxpy9+kp+NuukEB17SyWV15izKeVMwrSBQrGKxqxID1cPrz4m
+eQdtJruFrmrNXRFbhu8CHqQcjZYaQ+B/htZ0v6UeBenNuKlvmFRotvzESGzL
+/7fg4/MdcGoCuKb7atTEmeaVfvrmTj+HeC4qMR4n0O7KY/HhgSFfJq6LeHOK
+wMU/OmugCg7tgYLUGr4wrPP3MM/5+ea9hmOpqPha2pLwFKMVEpZ04jthUKSS
+2FE0HI9PrxLX0StiboCk5hSPUo7hISz9z9QavSjI7//vaVNMqhJbfjJw0Ee5
+C5eco1rOGQDsBSYq/HzO2qIu81TsLl3oNu27WtMxEes4F/S8S6xmHqlsyv5g
+rNPs4826hQOygUJWm5OaXmSxdERijUCY7O7XPl5fVJhNL7mUquoqP75tRajH
+U8NdogZqvLKjk8AJgyGV0A7yIDN+f7VMrXjA/rmJRylHAk3/M7JGNwqKuu/9
+3CONnwO0/MRwxLazSxblPqJcYRIA7AIqurx9zf4qnHvtoouzBNOPNJl1IeMC
+bZKSjwQvG1bOSQYKZdPRuQLP6PIe8y+IrREIQ2qSprotNn+0lWOpas07I6Xr
+3UeHGNZI2NFJEh17SyWw01FzKP5QrWbmTvfcpBSe+GRuiIaZniNH+QZo/zkv
+ptj4PMCjlCODnv8ZWKMfBWX9j6+4vn9ZQvaJXl/H7x//r/+vBU5NAJdgvdVZ
+O/fflOD2EsnlcFe/Hx6YrSUZ95Se8uUTvA3LAkwW/4msEQqTV23xmRhzQ+o4
+UvX0XPvU540z+oUQNnSSRsfeUvHt3LyV8JrvZF8tkwTDH3/G3WfWqhsW4z8p
+JNdNPEo5JofQY+p/+tYYREFRl+bntqi0m+yTfrDOgqgPTzTb+rAlANgA8vB0
+cnpZl3aChHZVnjorNHlqB6lJ9POKNe+Tmp4yefffmr/sy+7AwO339Ivp8ntb
+GQ0UltZIhEmuLPIIyBKa9RyupGKy5gdt/UXzkNof3/1sYKHGdp1WomNvqcTC
+dCgb9v3bneU1PR6lHN1DEPufmWAdVKOAVO/y89lg/KiF5Se6wxUuDc8yv3QF
+gMFD1ZYX7fHEsMd0DBvuk/C32eAnv7/NP8D8JnxfT3EaM2/DjtS05G9XbT6h
+v82raLt5dmfwsyPc12ZfqZFSXg/AsUYqTH5vm/+cfQ0Wb5xwIxUTXVoxxdkj
+NDbhwNHMw/l1MsNM2FadFKJjb6n4dgawx7mJTylH7xDE/mdibQCqUei9tW5q
+yPFmlOwTLeLLn71/+CGzV94AYLBARYUb399pOrUyXmGwHXrWMEnZpvCt5Xh7
+rTiUVE510jNIItUOwqzjUHFUW/EPO4cYFGviog9f/dLErZafaJCUxry7n/Iz
+oQDAHfKG3JT0Cy0DyartKUk1bPY7itbkDXlpqb81E/YbR5HKsU46Bq1IZV0Y
+JRwljmrroWThEINjDalOCvvC+IEMnE809Fxb887eOjg1AfwAQ9o7+hfK1SpJ
+RXbc+BHPvb47r0Js85I0PWuorFWEWJm+OoJUTnWyKJV1YTRwhDiqqYXSxkMM
+jjWkZu/CHbd7ST/RIL2+/u3vB3suAgAAAPwDQTv+3Bz/m/GzF5afaJFWxL+d
+eH8wN+oFAAAA/pFg3beOHrrWhZJ90o/s7vYFCffg1AQAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAOB4oF2licvnB0x0mbJ4z22pfet/DeaxHIEh396h
+3cCh3ToAGFTkDb+drKRTBUFWl3ngLzGqRuoygseHEWyZyRJ4x8IklSd/axia
+L0EMpm85YWg3cGi3DgAGEaz7RvIXxxtpbV+FqXpV2lOZ9HpcwFK8spXsgX8s
+RWP2F8k36O1+yQ8G07ecMLQbOLRbBwCDh6L+4Mf/raBRs8wY6a1dy9JrBuf6
+xfxY0or/fnzQTpsVY0ruT3qD6VtOGNoNHNqtAwC7I6va/s7/3JZZ/0NLsO7K
+rH2F7SzuwImKihNXrk8+eCB53cqkyyKTHU4sjyW7/T9vb68il440FRz55U4P
+5TMNhgiLMtaEvvJeEa1ScQxBxddzsorbcOrUUPMtvdZhvdVH4mZPcHpypEvg
+ykP38Uuss8vgNlAtqz22MTIsaNILgulLM+vtvluora0DAIAQefXO4PeYLIpj
+svr8k3+29l22oD311RI2eiHafnaJ91s5LX22VM0n5npHnGtHSY8lKng3eFc1
+8RCkbPl19ccZdOaumPxRo/DqGrexNMuYMqf3dkrEV+c7TPxHzbd0W9d7J2nV
+niutiKLj2p53xjztS+Y5Fhm8Bsrrj31/rrGvUarW0wtfdP3UovaCHWDeOgAA
+SEAfnZozddVN2it6isasSA9XD68+JnkHbbasqcwAVVNmwLjpB/urXSobMvzG
+Bf2sqUFNfCzpzbipb+S2Ecyq+051Ef4r6ZdEld/7r9US26rW3BWxZfSrreKA
+dRZEzIguFhtaQc23tFunaLlwvll3NpLeiHEd93aRmPivedhANaqQ6pZi5VVb
+ZszZ+4BwvZf71gEAQIrs9lc+07YTbUiPdt/KSU7cdzRr/66V/2vhh3HFItuW
+gRBhQVpk8KvLDu5L3BAZ4u4T8VNp7t4tsQv83V5dWyjqKlngPMYwYHZdCn1+
+3KJS0lvJ8vv/e9qUb+7ir+qphD+HeC4qwR2A0O7KY/HhgSFfJq6LeHOKwMU/
+OmugyDSlcxNJRW+T41BwINb5e5jn/PwOWr5l3Dot3VejJs40Lzpuap+/DUTF
+19KWhKeQLfZy3joAAMiRXPlo/LTvcUtMop0XN8x+Z+/fmk6vqE2d8sLrpx9Z
+bGhPF2nFajfn0FOtqBpryw1xEkT90YmqlfXpfi+9VVB3PmSUs+FsJClZMGbU
+7IukZwhF3fd+7pEEj0J1ly50m/ZdLcH4i3WcC3reJVYz31U2ZX8w1mn28Wbd
+4gtb5ybKDpTd/drH64sKWhNsxq3TfCsq/HzO2qIustGUrw1UdZUf37Yi1OOp
+4S5ReRalgfRw3joAAMgRF4W95Pd/6nHu5nZfi/P0iOlfslc1HXlVEHSsmcLK
+uVL4/7P35mFNnN3/f/2rV7V96lKqYlMLgqAgqNRHbFiqtpUK3Wj9ukF/F63V
+oqBStxZtn3708eOCbC3WfsGlKqSK2K+VS5TWYosgghYVUVEKCEIAWUICIZkk
+M/mRkISQzExmkoHJ4Hn95UXMmfe5zzn33HPPZM6pTxYEmrAwqlA3EXaXb3Z3
+WqY9/0iKPpo4ZdvdntUt9vgsf8K/Mx4UfjR+bIj+ukl8eeFYS9dNytofX3X+
+4Ar+3ozoz7m8WccbiDRre0wnVWs3uSRFi3mvGG5PkJyb+ryb4z5qjDffxLt+
+UB9ApCphhssyclcZ806Niq7sijlUgf8kxFBwUK35+VvxJtexgabbvXbinYUa
+AQBAU9YfOvvgbcx3XY+YOCG0UHuiQJt/mcv796FHOGcwupCcm9Lrao/5Ohru
+Nz06MmsCP0NIejpU1KT4uBCdvyRXQp19fiC852A8uXWVrpzsadgbZOa6icYA
+yiu2e02Juknrpp+V3mHdlYI9h25Z/pk1Vx3sU/ep15vnWgn8ZN07AADI6S6L
+8Xw1ocr8ga223MBRI/0zNOtW+YP/6z9hRjLR9gq945mcm7YanZsakMfZiz2D
+NRt+PdPBmZBpy3JayDcRkcq9Pl6bje82q0TXsv7fjQ7NGQ2pivfxiCacMjST
+27R9/2g87znF+fntMrTalN/fwcC5icYASq4udeMLyE/DvUe10Tvk0dnE1JLe
+VqNoR/mZ80LCJ/W46CAma3zYgmhPR0j1j+99bsue3kB4BwAAZVTCjAAf7QnC
+BGXTmU+njXp+0psrv927bfZ4z50MdEnGkMbLyQGjR/rs/qOmrSr3Px7PjeLv
+u1TXejsz0ulfEyMEN8RIe37c6k1JR35K3hIVX9Buqdy7b2+cEXiy0egE1lEQ
+7uYWnq/dHZE/2OnLJ7zh3zO5OYxbuHl3ckrit+u2ndLfS1e03Dq/J2D0CNcN
+mVerpISnRsuTG/UBlN/f6Tv/YB2Fq1KbvFO15ES6PTPsKR3DhnvF/UP8EDkH
+HcREl1dNd3QLio47nJF+LLdGRnxxyI53AABQp7v8S//wq2RP04qvhDlP2WKX
+j8KKCz567UtiZagof8sHewg+N94UGljIBxCTlGwN3VFK/+VLduKdeqg7OEDe
+AQBATtffMQvjiB4iV2seN17p4rrmhj3upiOVCcFfkP/AUl6XnZR6qQln8a2d
+3PB2M5mGdADldTkpyb81WrldagfeqYe6gwPoHQAAZHTf+d/QuAq8kxPWXVuU
+uY0/6ln3b/4U2d92OlJ1YMnuOxav5zCktQ0xWdaqJGWZayeNeOGNfTll4oHz
+zOIAorJmkak2modgzzv1UHdwELwDAIAYVUvu5i9+t/DYgd2Btv21LfY3wrvd
+AAAAAMdBO64d/ukmnf5NbIN13s44er2DY+dTAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAA4EkD7SiOXxnCn+I0fdn+O1LGHtwfILN2CLOeQjgA
+EiA9BhZ53W+ny+n9fMmKrwCUkNWkH/5bjKqRmrSAScGWm6+ya9YOYdZTCAdA
+AqTHQIJ13kz84mQ9nXd+WfEVgCqYqlulPedLb6zlryBo2ms3Zu0QZj2FcAAk
+QHoMIIraIx//t4zWq1qt+IopmBIuuSwgvb33s9Qq2zuPDI5ZEtiKNbOeQjgG
+Ga7o7GXIpIcdIavY9e7/3DHpzySrOb3zm/jUQz/sWh/x5WnT6yPcr6iRhrzj
+v9ztspRPGCIsSIsJevX9AtLefNSQVZ/YEh7sP/Ul3qwV6bWad06j4htZgsIW
+kmY5lHRi3ZXH186b7PDsKCe/NUcf4PcntwZlY9aSGWHFup4jxGqxznLBwfxW
+694GiIoK49dsSjxyOHHjmoQrIqMXN9lktg82Yq1jAAeQJOgQDlMGrPTYTRsy
+WVxND64ir9wT8L7JdqaqIWO+z6bbmhd4Y+0X3/H+/651WvqKsunX9R+nUTi/
+Y/LH9cJrMS7jLfSNpaS99sT3F+p7ykLVfHbJy86f6rphdN9JCvvqYhtuRCnq
+7L6bsG7/1WZE0XZ9/7vjnvfeW8lMrwWl8PQKPwfekuK+flh4ajFZbe7pv5p7
+lgRoV22lhGZuoq3nl3u+ndXU8zVV46kFnmEXWlEGzPY5wUas9ccewAEkDDqE
+w4yBKz0204YUjqYHd0Efn5k/Y92t/ttzyrq0WRNe+76yJ42U9T+9/u+v+7W9
+xflKz/iG+a4pJmtAaIz8/n8t9jSnJF4h1V32yyu2z55/4KHu+g5rzwubHVko
+NlufUdWpaLp0sVGXedKbUc4T3ikQ2ypWY7Y+a2vSubiZLsY1Yq5WUS8Id3N2
+8+hhqqf/NrpNG1UN6fwJs4480i4Ke0LpM8H/Z00/cBvN6mEp1loGdACJgs5+
+OFTN2auiS/BHfKiVHsM6tVBMGwtGOJkeXEZ25yuvmbtMOwei7ZdivMdMfO8/
+B3bGbDl6t/8TjOZfUQl/DnRfWmQ8Omhn+YnYUL/AL+M3hr01nefkGyl4aPgG
+7cQjtdZzgX49ZXloUkXfCRRr/z3YPSS3zbSrD02dWjqvRUyZQ9j5m4ZURd3J
+2NQKcc0PPv1rhEgtMYgwLyU84LXPjhyM3xwe6OoV9lNx9oHt0Yt8XV7bkC/q
+KFrkOM5wMu24HPTihKXFjN1LZTHWjA0gw0Ef8HCQNIgfqqXHZtoMofTgNJKr
+iyfN/L7GfJS7y3f7u48c7hAQe6FZaeErncVLXGZ+V93fCNZ2wf9Fp2jNukTZ
+kPnheId5Jxt116VkiSerzkpOLTC71Ca0puooPblzVZDbc8OdInIMzZpk9772
+8viizGSxQVen5lNR/ur5Gwo68KY9WlKRh+mxhyplasVDsxohUEuGtGy9i2PQ
+mWZUjbVkBzrwIv5oR9XK2lSfiW/n1VwMHONoyG9J0aJxY+b9ydjGPWuxZnQA
+rQ86LgMcDpLJZ6iWHrtpM2TSg9OIC4In+vzfWpObgkjdTx+/+929zpa/dr09
+btSMr/tt4Jl/RfTnXN6s4w0myaJtip1Urb0MlhQt5r2i35QmSzxlQ8YCnntk
+qVkfdWJrGjBJ8SbXsYHZLbp8QaoSZrgsM11/0NWpRkVXdsUcqsB/EoKO1Laq
+o7FHqzWLL7wawVdLRnf5Znen3m9Iij6aOGWbZtcVe3yWP+HfGQ8KPxo/NkS/
+EhNfXjiW6kpMKTz1yYJAExZGFRpXIUuxZnoArQ06PgMdjjnuo8Z48+0oHANe
+eiynzVBJD04jKfrQ2cewW6yju3yL96yEKk1ksI6/PpnkGnlDSvYVyZVQZ58f
+TIz0i29X6crJnt/c0136W7OZTGytl67rn3q9ea5VFxd5xXavKVE3TZ5yp6cT
+664U7Dl0i/7Pi80N3rod97r3NG8tU3nDnx7p6jV33U1DceGrJYMk29Prao/5
+Ohp2sB8dmTWBnyFk7E4qO7FmfACZDfoAh4NkYTw0S4/1tBkq6cFpustiPF/t
+PQ31gVQl/nvqqt41BvLPvtm+cf8gZF9BquJ9PKJNY6yJ77R92m8qalL8/Hbd
+12/ayu/vsCrxTK1hssaHLYg2T5DqH9/7vG9jQXJ1qRtfYBpjOjqRR2cTU0t6
+++aiHeVnzgspP6lH7Lhac7vz4L9dTdZv+GrJMM32rUbZ3oA8zl7sGazZQlCj
+zWdCpi3LaWGu/S9bsTbAzAAyG/QBDgfJ5DMUS49JnQbopc1QSQ9OoxJmBPhs
+vWvyWyWs607a6v+z6n++Szuw98sth+/0+0UCzlfkD3b68k3vDfbE12Hcws27
+k1MSv1237ZT+dqKi5db5PQGjR7huyLxaJaUcBhxrmOjyqumObkHRcYcz0o/l
+1sgMKuX3d/rOP1hn9vMFqjpVLTmRbs8Me0rHsOFe/c7O9KX2gVMjRGqJwJDG
+y8kBo0f67P6jpq0q9z8ez43i77tU13o7M9LpXxMjBDfESHt+3OpNSUd+St4S
+FV/Qzujjp+zEug8GBhD/ENYGfeDDQTb5DLXSY1ZnH/TSZsikB6fpLv/SP/wq
+rQcQcb6CivK3fLCn/4OOxtfFtkPDGiYp2Rq6o7QT58J74HXSNkii1j6xq1ir
+rRxAxoPOGnYVDlZLj8G0GTrpwWm6/o5ZGGf6ELkVX5HXZSelXmrqWxhp42u6
+XWg1lK3J63JSkn9rJHy+c4B10jRoSa19Yi+xVls9gIwHnU3sJRwslx6DaTOk
+0oPDdN/539C4ClonJ4KvYEhrW+8etFolKctcO2nEC2/syykT27ynRMMaKmsW
+IRaW0AOmk7ZBKmrtE3uItdrKAWQ86OxjD+FgtfQYTJshmB6cRdWSu/mL32nd
+gbPiKwAAAABAB7Tj2uGfbtJ6MtKKrwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAA10E7iuNXhvCnOE1ftv+O9El8qh5GAGARSD8AwENWk374
+bzGqRmrSAiYFD8V3LloCRgBgEUg/AMAFU3WrtGs16Y21/BUljHU/5w4wAgCL
+QPoBHAFTsnNVL72997PUKlrvJRxiDP4IsBVrK+CQVI4CBQgMOkhD3vFf7nZZ
+qm0MERakxQS9+n4BrZZkpCgbs5bMCNO3fUHFN7IEhS04HV+wznLBwfxWwjdD
+UnIB6648vnbeZIdnRzn5rTn6gE7bZwJk1Se2hAf7T32JN2tFeq3mtcrELlAC
+FRXGr9mUeORw4sY1CVdERi9UtDQCFGEh1vjDbnmgOJCWtKRC+gEAHZRNv67/
+OI3CcgiTP64XXotxGU+zXSbZsYWnV/g58IxbknXfSQr76mJbvxrAZLW5p/9q
+VvTUTldtpcSsPii60H03Yd3+q82Iou36/nfHPe+9t9LGd/TLa098f6G+x4iq
++eySl50//buL0AVqoK3nl3u+ndXU81VV46kFnmEXWnunB0sjQBFWYk087GQD
+xYG0pCkV0g8AaNCTjmG+a4qp9j6U3/8v7VbOhCjqs7YmnYub6dKvXSbWnhc2
+O7JQjPX9N0G4m7ObRw9TPf239e+epqbugqLp0sVG3XQgvRnlPOGdArFtDqAK
+qW4jSV6xffb8Aw8VBC5QRNWQzp8w68gj7apXWZfmM8H/Z01Ha0sjQFUuK7Em
+G3bCgeJAWtKV+sSnHwDQQSX8OdB9aZFxYaGd5SdiQ/0Cv4zfGPbWdJ6Tb6Sg
+r/sy7UmA2Jqi7mRsaoW45gef/pNAT2n9HuwekttGsbTouqCl81rElDmmHayt
+8UL7qfh6yvLQpAqZZRcQYV5KeMBrnx05GL85PNDVK+yn4uwD26MX+bq8tiFf
+1FG0yHGcYcrquBz04oSlxYzdemYx1nrMhp1goDiUlpB+ADAQdBYvcZn5XXX/
+IsHaLvi/6BStWXgpGzI/HO8w72Sj7jKebBKQVWclpxaY7SXgW0MepsceqpSp
+FQ/NJgG17N7XXh5flFFcntF1QfOpKH/1/A0FHXhnP1pe9KDqKD25c1WQ23PD
+nSJyWvRfI3ZBWrbexTHoTDOqxlqyAx14EX+0o2plbarPxLfzai4GjnE0TAeS
+okXjxsz7k7GbKKzF2vApzrDjDxSH0hLSDwAGAtGfc3mzjjeYlIK2Y3JStXYD
+QlK0mPeKfiubbBJQNmQs4LlHlnaZfoBjra3qaOzRas3SD28SQKoSZrgso7pi
+o+uCGhVd2RVzqAL/VjQdL4z+DyYp3uQ6NjC7BbPkQnf5Znen3k8kRR9NnLLt
+bs96F3t8lj/h3xkPCj8aPzZEv3AVX144lurCVSk89cmCQBMWRhUaz38sxZp8
+2PEHikNpCemnppZ+AEALyZVQZ58fHppsLhgXQlfpysme39zTbRhYs7Fvbu3W
+7bjXvad5a5nKG/70SFevuetuGmpNXrHda0rUTelAuIB1Vwr2HLpFv2cj8Zj0
+0nX9U683z7VillwgmRzS62qP+ToaNvwfHZk1gZ8hZOzGMzuxtjDs+APFobSE
+9AOAgQCpivfxiDZNYk0hTNv3j6YQFDUpfn677ut3t+X3d1g1CeBbU2tuuR78
+t6vJAlVydakbX0C1Kui4gDw6m5ha0qF9+AjtKD9zXkj5USk8g5is8WELop0P
+kOof3/u8b1OF2AXTyWGr0eTQgDzOXuwZrNlxUaPNZ0KmLctpQc1NWAl7sSYZ
+dvyB4lBaQvoBwIAgf7DTl296V7anEBzGLdy8Ozkl8dt1207p77sqWm6d3xMw
+eoTrhsyrVVLKWUtgrRecSUB+f6fv/IN1lH+iQdUFVUtOpNszw57SMWy4V9w/
+1J/ixTGIiS6vmu7oFhQddzgj/VhujcywGiZyAUMaLycHjB7ps/uPmraq3P94
+PDeKv+9SXevtzEinf02MENwQI+35cas3JR35KXlLVHxBO6OrVnZiTTrsRAPF
+obSE9AOAAQEV5W/5YE//50KNNxBsh541TFKyNXRHaSeNXY+Bd4GeQStcGBw4
+FGuQ2p+hkH4AQBd5XXZS6qWmvpWfthASqpicBChak9flpCT/1kj14Vqj7w2o
+C3QMWuvC4MChWINUI4ZI+gEAXTCkta1351qtkpRlrp004oU39uWUiW2+qKdn
+DZU1ixAr13sD5gI9g7a4MDhwKNYgla5B+08/AAAAAAAAAAAAAAAAAAAAAAAA
+AAAAALBT0I7i+JUh/ClO05ftvyOFu++APQJZCgBPGLKa9MN/i1E1UpMWMCk4
+T8S2HgAwB7IUAJ40MFW3SrsMld5Yy19RAp0UADsEsvQJA1Ny5tqYQ1I5ivT2
+3s9SKXSnHVw4FHcOSeUu9pmlAAWQhrzjv9ztslQkGCIsSIsJevX9AtubumDd
+lcfXzpvs8OwoJ781Rx/oOgag4htZgsIWklfpsSBVLas+sSU82H/qS7xZK9Jr
+EeZ04g8CAygbs5bMCNO/Ds6yWlJQUWH8mk2JRw4nblyTcEVk9MI6rLNccDC/
+1bafl1IbBEhRKtCNO2QpYM8om35d/3EahUUFJn9cL7wW4zKegebX3XcT1u2/
+2owo2q7vf3fc8957K/VvY+m+kxT21UWz5mrsSZXXnvj+Qn2PPFXz2SUvO+v7
+5jCgk3gQbEMpPL3Cz4Fn/KpSMrXkoK3nl3u+ndXU81VV46kFnmEXWnvrHpPV
+5p7+q1nR81+6aisl1pY+lUGAFKUEzbhDlgJ2TU9Qw3zX9G8GQII1jXJwUDRd
+utioS3HpzSjnCYZO0JqG0nlhsyM1HT7tQqoaVUh12y7yiu2z5x/Qt+qxWSfZ
+INiAoj5ra9K5uJn9W+MRqrWAqiGdP8HQ06cuzWeC/8+a3guKekG4m7ObRw9T
+Pf23lZM0KVY1Z6+KLiEYDgqDAClKTTC9uEOWAvaNSvhzoPvSIuMMRTvLT8SG
++gV+Gb8x7K3pPCffSEFf/wDa1URqTUvntYgpc4x7DGDtvwe7h+S2mSQoy1JR
+8fWU5aFJFX0d3RjSiT8I1kpV1J2MTa0Q15i1bSVQq1YjwryU8IDXPjtyMH5z
+eKCrV9hPxdkHtkcv8nV5bUO+qKNokeM4w3TUcTnoRaq9UA2o6o+9GULlGSn8
+QYAUpWKNbtwhSwE7p7N4icvM76r7ZxvWdsH/RadozfJF2ZD54XiHeScbdRfD
+ZNUkq85KTi0wuyInsab5VJS/ev6Ggn7Nm2X3vvby+KLMZJHDplRVR+nJnauC
+3J4b7hTR18GNGZ0Eg2CVVORheuyhShluS3F8tRqkZetdHIM0LeWwluxAB17E
+H+2oWlmb6jPx7byai4FjHA11LilaNG7MvD/pLfQpnpuIBgFS1LI1+nGHLAXs
+HNGfc3mzjjeY5JRxsxhJ0WLeK/qbLGTVpGzIWMBzjyztMv2A2JoaFV3ZFXOo
+wuT2KlKVMMNlmem6h2Wpak1jnOJNrmMDs1swJnUSDIIVUtuqjsYerdasTPGq
+Hl+tBpI+3RkPCj8aPzZEvyIVX144luqKVCk89cmCQA1z3EeN8eZr/7kwqhB3
+biMZBEhRS9asiTtkqU65IUuNIMxSYBCRXAl19vnhoclVunFGdZWunOz5zT3d
+VpY1O+RE1rDuSsGeQ7ckZlkgr9juNSXKtM01m1L1dF3/1OvNc60YczoJB4G+
+1Fu34173nuatZSpv+NMjXb3mrrtpmC7w1Wogqfr0utpjvo6GnfxHR2ZN4Gfg
+9fomwfJ1E+kgQIpasGZV3CFLATsHqYr38Yg2TQVNRk3bp+0YrahJ8fPbdV+/
+7yy/v8OqajK3hjw6m5ha0qF9mgbtKD9zXmh4/EdydakbX2CaW2xJxWSND1t6
+W+Ig1T++93nfnp7tOkkGwRqpBnBaihOo1WBa9VuNqr4BeZy92DNYs5WiRpvP
+hExbltNCue15L5bOTRYGAVKUojU1nbhDlgL2jvzBTl++6e3NnoxyGLdw8+7k
+lMRv1207pb8jqmi5dX5PwOgRrhsyr1ZJKccex5qqJSfS7ZlhT+kYNtwr7h9D
+vsvv7/Sdf7DO7IcO7EjFRJdXTXd0C4qOO5yRfiy3RmZYO9qqk3QQrJHaB07V
+E6nFkMbLyQGjR/rs/qOmrSr3Px7PjeLvu1TXejsz0ulfEyMEN8RIe37c6k1J
+R35K3hIVX9BOezlKem6iMAiQohSs9UIj7pClgL2DivK3fLCn/9OVxlfitkPP
+GiYp2Rq6o7QTZ/vArqSyqpO2QRK19o9dxV3NnRRVQ5YCHEdel52Ueqmpbwml
+zaiEKiariaI1eV1OSvJvjYRPqdqLVJZ10jRoSa39Yy9xV7Meeg5JpWmQ+1kK
+DAQY0trWe09FrZKUZa6dNOKFN/bllIltvjSmZw2VNYsQC6sme5DKqk7aBqmo
+tX/sIe5q7qQo21IHRC0AAAAAAAAAAAAAAAAAAAAAAAAAAAAADCBoR3H8yhD+
+FKfpy/bfkcI9bGCwgQwEAMAMWU364b/FqBqpSQuYFEzlLeMAwCSQgQAAmIOp
+ulXapar0xlr+ihLoRwAMMpCBgBmYkhvXz1zRyWmkt/d+lkqhzStzQFgBYwY/
+A4FBBGnIO/7L3S5LNY8hwoK0mKBX3y9goDWKrPrElvBg/6kv8WatSK/V/HAc
+Fd/IEhS2mL1Li12dOpSNWUtmhOnf/cWQVKy78vjaeZMdnh3l5Lfm6AP8/gOD
+oZYUVFQYv2ZT4pHDiRvXJFwRGb35DessFxzMb7X1d5oQVksMWLFABgJ2jLLp
+1/Ufp1FYeGDyx/XCazEu4xnoIi2vPfH9hXpE07D77JKXnfVtYrrvJIV9ddGs
+RRl7OvXHFp5e4efAM34vJQNSu+8mrNt/tRlRtF3f/+645733VjLzshiaaslB
+W88v93w7q6nnq6rGUws8wy609s4NmKw29/RfzYqe/9JVWymxdnqAsFpk4IoF
+MhCwX3oCH+a7pv976kmwpuMM7mEVUt3WjLxi++z5B/SNZLD2vLDZkZo+mfah
+U4uiPmtr0rm4mf37oNksVdF06WKjbi6Q3oxynmBoKj2Yai2gakjnTzB0xqlL
+85ng/7Omg4GiXhDu5uzm0cNUT/9t5TiNSqkAYaXAgBXLk5KBqubsVdElVJMM
+sA9Uwp8D3ZcWGYcN7Sw/ERvqF/hl/Mawt6bznHwjBX2vtqc9OZBa67nWv56y
+PDSpoq+BH9b+e7B7SG6bSQazqFNRdzI2tUJcY9ajkyGpWjqvRUyZY9qxYDDU
+qtWIMC8lPOC1z44cjN8cHujqFfZTcfaB7dGLfF1e25Av6iha5DjOMGV1XA56
+kWpHUSpAWCmq1X46UMXCrFQ7zEDL3S0B+6OzeInLzO+q+2ck1nbB/0WnaM0S
+R9mQ+eF4h3knG3UXzGSTg6w6Kzm1wOyqndCaqqP05M5VQW7PDXeK6GvYJ7v3
+tZfHF2UmqyDWdCIP02MPVcpw+0czI1XzqSh/9fwNBbh9oAdYrQZp2XoXxyBN
+YzasJTvQgRfxRzuqVtam+kx8O6/mYuAYR8NcIClaNG7MvD8Zu98DYaWkVj2w
+xcKkVLvMQDg3cRHRn3N5s443mOSdcdcVSdFi3iv6LW6yyUHZkLGA5x5Z2mX6
+AbE1DZikeJPr2MDsFl1ZIFUJM1yWmS6MWNLZVnU09mi1Zj2IV2vMSFWjoiu7
+Yg5V4N+HHmi1Gki6XWc8KPxo/NgQ/apVfHnhWKqrVqXw1CcLAk1YGFVoPP9B
+WCmoHfBiGfoZOMd91BhvPl4GAnaL5Eqos88PD02u5I2zrqt05WTPb+7pNhKs
+2fAnttZL1/VPvd4816pLGHnFdq8pUabNotnReet23Ove07y1TOUNf3qkq9fc
+dTcNRcqEVKy7UrDn0C0J7XJhSK0Gkpkhva72mK+jYbf/0ZFZE/gZeB2zrQPC
+alntQBfLE5CBcN3ERZCqeB+PaNN00WTdtH3a1suKmhQ/v1339XvT8vs7rJoc
+TK1hssaHLb3dWpDqH9/7vG+bQnJ1qRtfYJp8bOk0gNM/mgGpyKOziaklHdrH
+jtCO8jPnhZSfk2JIrQbTmWGr0czQgDzOXuwZrNluUaPNZ0KmLctpodw/3CIQ
+VipqB7JYnogMhHMTJ5E/2OnLN70F2pN1DuMWbt6dnJL47bptp/R3TRUtt87v
+CRg9wnVD5tUqKeX8wLGGiS6vmu7oFhQddzgj/VhujcywaJPf3+k7/2Cd2S8h
+2NHZB06t2SpV1ZIT6fbMsKd0DBvuFfcP9Ud4mVKLIY2XkwNGj/TZ/UdNW1Xu
+fzyeG8Xfd6mu9XZmpNO/JkYIboiR9vy41ZuSjvyUvCUqvqCd0Ud1IayW1Q5c
+sTwpGQjnJm6CivK3fLCn/xOYxlfrtkPDGiYp2Rq6o7QTZ3/BrnSqWZZK2yCJ
+WnaBsPaHK8VC26DdZiBgz8jrspNSLzX1LbO0WZdQxeTkQMWavC4nJfm3RsLH
+WO1Fp5p1qTQNWlLLLhBWI7hSLDQN2ncGAvYMhrS29e5oq1WSssy1k0a88Ma+
+nDKxzRs4NKyhsmYRYmFZZQ862ZY6IGrZBcJK1yCHpFJUCwAAAAAAAAAAAAAA
+AAAAAAAAAAAA8GSBdhTHrwzhT3Gavmz/HemTeEsVRgBgEUg/AMBDVpN++G8x
+qkZq0gImBT+JP6GDEQBYBNIPAHDBVN0q7VpNemMtf0UJYw0auAOMAMAikH4A
+R8CU7FzVS2/v/SyVQoPUocvgjwBbsbYCDknlKFCAwKCDNOQd/+Vul6XaxhBh
+QVpM0KvvF9jewAfrrjy+dt5kh2dHOfmtOfpA93p+VHwjS1DYYvbKrZ7/31ku
+OJjfSvgrP2ouyKpPbAkP9p/6Em/WivRahn4ir2zMWjIjTP/qMGIXKIGKCuPX
+bEo8cjhx45qEKyKjt8ZZGgGKcCDWLErVQzemkH4AwDjKpl/Xf5xGYTmEyR/X
+C6/FuIxnoCl2992EdfuvNiOKtuv73x33vPfeSn2ldt9JCvvqYv9OZpisNvf0
+X82Kntrpqq2UmNUHRRfktSe+v1CPaHo0n13ysnO/zjhWoxSeXuHnwDN+rSWe
+C9RAW88v93w7q6nnq6rGUws8wy609k4PlkaAqlj7jzWrUvXHphdTSD8AYJ6e
+dAzzXdP/XfYkWNNABwdF06WLjboZSnozynmCoeeypnVzXtjsSE07Tf1/rheE
+uzm7efQw1dN/W7lp30zKLqAKqW7fR16xffb8A6YdbqxxpD5ra9K5uJn926iZ
+uUARVUM6f4KhVU1dms8E/581LQUsjQBFOBBrdqXqBNOLKaSfsYnm7FXRJVTD
+BgDEqIQ/B7ovLTJOJrSz/ERsqF/gl/Ebw96aznPyjRT0vf6e9iRAak1L57WI
+KXOMX+iPtf8e7B6S20axtOi6oEbF11OWhyZVyMxt0XRBUXcyNrVCXGPW4pPQ
+BUSYlxIe8NpnRw7Gbw4PdPUK+6k4+8D26EW+Lq9tyBd1FC1yHGeYujsuB71I
+tcUnFTgUaxal0o0ppF+/0YBuFABDdBYvcZn5XXX/FRzWdsH/RadozcJL2ZD5
+4XiHeScbdZfxZJOArDorObXAbC+BxJrmU1H+6vkbCvq1SZbd+9rL44syilcH
+9FxQdZSe3LkqyO254U4RfT3arHIBeZgee6hShtt+mtgFadl6F8cgTac0rCU7
+0IEX8Uc7qlbWpvpMfDuv5mLgGEfDdCApWjRuzLw/GbuJwqFYsyaVfkwh/YyB
+cxPAFKI/5/JmHW8wqQbjziySosW8Vwx74ySTgLIhYwHPPbLUbBed2JoaFV3Z
+FXOoorv/Ag+pSpjhsozqio2uCxowSfEm17GB2S39D0zHhbaqo7FHqzULWLzJ
+gdgFkvbTGQ8KPxo/NkS/cBVfXjiW6sJVKTz1yYJAExZGFRqfBzgUa5akWhNT
+SD+1cfrNcR81xpuPl34AQAvJlVBnnx9Md76Na6GrdOVkz2/u6XYgrNnYJ7KG
+dVcK9hy6JTHLX3nFdq8pUaY9pZlyoZeu6596vXmulWLtmFu7dTvude9p3lqm
+8oY/PdLVa+66m4ZZhdgFkskhva72mK+jYcP/0ZFZE/gZeC2srYNDsWZHqlUx
+hfQzBq6bAKZAquJ9PKJNk1hTC9P2adszK2pS/Px23ddvl8vv77BqEjC3hjw6
+m5ha0qF9DgjtKD9zXmh4plZydakbX0C1Kqi7gMkaH7b0tpFBqn9873PzTRV6
+LujAaT9N4oLp5LDVaHJoQB5nL/YM1uy4qNHmMyHTluW0UO49bhEOxZo9qTqo
+xxTSzxg4NwGMIX+w05dvfHdaQ08tOIxbuHl3ckrit+u2ndLfyFW03Dq/J2D0
+CNcNmVerpJSzFseaqiUn0u2ZYU/pGDbcK+4fw3Qlv7/Td/7BOso/0aDqAia6
+vGq6o1tQdNzhjPRjuTUy6hsOBAPSC87kQOQChjReTg4YPdJn9x81bVW5//F4
+bhR/36W61tuZkU7/mhghuCFG2vPjVm9KOvJT8pao+IJ2Rp/W5VCs2ZHaB42Y
+QvoZAecmgDlQUf6WD/b0fy7UeA/BduhZwyQlW0N3lHbS2KkeAi4MDhwaKJBq
+tTW7TT8AoIu8Ljsp9VJT38pPWwsJVUxWFkVr8rqclOTfGmn/8mMIuDA4cGig
+QKo11uw7/QCALhjS2ta7Fa5WScoy104a8cIb+3LKxDbvKdGzhsqaRYiV670h
+4MLgwKGBAqlDL/0AAAAAAAAAAAAAAAAAAAAAAAAAAAAA60E7iuNXhvCnOE1f
+tv+O9Em8PQwjALALZCAAmCGrST/8txhVIzVpAZOCn8SfA8IIAOwCGQgA5mCq
+bpV2oSa9sZa/ooSxThPcAUYAYBfIQGBwwZRcujiX3t77WSqF9qlDl8EfAW5l
+CDDQQA0C1oI05B3/5W6XpQkFQ4QFaTFBr75fwFhPIbWyMWvJjDD928BQ8Y0s
+QWEL5Vfp9crqrjy+dt5kh2dHOfmtOfrAuAkD1lkuOJjfSviLRWqOy6pPbAkP
+9p/6Em/WivRahn7rz4DjfaCiwvg1mxKPHE7cuCbhisjonXKWRoAiLGQIflgt
+DxQlqSQ5Yxt0wwoZCABEKJt+Xf9xGoVVDSZ/XC+8FuMynqnm15q+L6dX+Dnw
+jN9U2X0nKeyri2b91Yjpvpuwbv/VZkTRdn3/u+Oe995bqatdTFabe/qvZkVP
+4XTVVkrMLFJ0XF574vsL9Yim3/TZJS8792vEYzVMOG4AbT2/3PPtrKaer6oa
+Ty3wDLvQ2js3WBoBqmLZyBDCsJIOFEWpxMZtg2ZYIQMBgJCerArzXdP/Dfsk
+WNMohxBFfdbWpHNxM/t3RsPa88JmR2qafFIz0nTpYqNuZpHejHKeoGsqragX
+hLs5u3n0MNXTf1u5aQ9Qyo6jCqlui0pesX32/AOmrXqsgBHHDaga0vkTDG13
+6tJ8Jvj/rGmPYGkEKMJOhhCFVQPhQFGVSmbcFs30wgoZCADEqIQ/B7ovLTKu
+D7Sz/ERsqF/gl/Ebw96aznPyjRT0vZSf9sxDbE1RdzI2tUJcY9a1E2v/Pdg9
+JLfNtEJIhWnpvBYxZY5puwJmHFej4uspy0OTKmTmtgbacTUizEsJD3jtsyMH
+4zeHB7p6hf1UnH1ge/QiX5fXNuSLOooWOY4zzK4dl4NepNqulAosZoges7AS
+DBTtmOIat1Yt3bBCBgIACZ3FS1xmflfdvzKxtgv+LzpFa9ZPyobMD8c7zDvZ
+qLsaJ5t5ZNVZyakFZlsC+NaQh+mxhypluB2lZfe+9vL4osx8lUUiTPOpKH/1
+/A0F1PpA03Nc1VF6cueqILfnhjtFmLeEG3jH1dKy9S6OQZqub1hLdqADL+KP
+dlStrE31mfh2Xs3FwDGOhrlAUrRo3Jh5fzJ2R5C1DDF8ihNW/IGiK5XAuFVq
+6YcVMhAASBD9OZc363iDSVIb94uRFC3mvWLY4iaZeZQNGQt47pGlZpvhONba
+qo7GHq3WLOLwCgSpSpjhsgxv4UUsTI2KruyKOVRB9a42Xcc1YJLiTa5jA7Nb
++h9jMBwnaaWd8aDwo/FjQ/SrVvHlhWOprlqVwlOfLAg0YWFUofFUzVKGkIcV
+f6Box5Q0ZwY6rJCBamoZCDyZSK6EOvv8YLqBbZzSXaUrJ3t+c0+3kWDN3QRz
+a7dux73uPc1by1Te8KdHunrNXXfTUFnyiu1eU6JM21yTCcO6KwV7Dt2SUM9o
+uo730nX9U683z7VSPAyDjpPMDOl1tcd8HQ27/Y+OzJrAz6Da0N4y7GSIhbDi
+DxQ9qfRzhtCgVWGFDAQAEpCqeB+PaNNc1KT0tH3aztmKmhQ/v1339bve8vs7
+rJp58K2pcTtKqyVXl7rxBXjJjW8KeXQ2MbWkQ/tkENpRfua80PJTV9Qdx2SN
+D1t6W+Ig1T++97n5jsogOG46M2w1mhkakMfZiz2DNdstarT5TMi0ZTktlDuT
+W4S9DCEJK/5A0ZFqTc5Y9F1NJ6yQgQBAhvzBTl++6a3gnpR2GLdw8+7klMRv
+1207pb8fq2i5dX5PwOgRrhsyr1ZJKScfgbVecApEfn+n7/yDdXi/tMAxpWrJ
+iXR7ZthTOoYN94r7h8o0Q9VxTHR51XRHt6DouMMZ6cdya2TU19lMOY4hjZeT
+A0aP9Nn9R01bVe5/PJ4bxd93qa71dmak078mRghuiJH2/LjVm5KO/JS8JSq+
+oJ3RJSs7GUIaVqKBoirV2pwh9b0XGmGFDAQAMlBR/pYP9vR/vNN4K8B26FnD
+JCVbQ3eUduIWIJPCOOU4m3BooAZeKm2DrKodIhkIPLHI67KTUi819S3gtCmd
+UMVkgVC0Jq/LSUn+rZHoiV5mhXHIcZbh0EANsFSaBllWO3QyEHhiwZDWtt4d
+bbVKUpa5dtKIF97Yl1MmtvnanJ41VNYsQoiWbcwK08EFx+0CDg3UgEnlltqh
+loEAAAAAAAAAAAAAAAAAAAAAAAAAAABDCrSjOH5lCH+K0/Rl++9Ibb1fy6y1
+gTYLDDKQHoMPFDjATWQ16Yf/FqNqpCYtYFJwnsierA20WWCQgfQYfKDAAY6C
+qbpV2mWK9MZa/ooSG9+9z6y1gTYLDDKQHoMPFDjAEJiSnQta6e29n6VS6L7K
+hrWBNksCW+GwAg5JhfQYfKDAATOQhrzjv9ztspTEGCIsSIsJevX9Att7s2Dd
+lcfXzpvs8OwoJ781Rx/o2hSg4htZgsIWnFfpYZ3lgoP5rdb8IFHZmLVkRlj/
+HmrWW9O8aqYwfs2mxCOHEzeuSbgiMnprnE1m++BAOFiUqpZVn9gSHuw/9SXe
+rBXptQglnSRAelCAoTHHT7Pej56gAgcoomz6df3HaRRWApj8cb3wWozLeAZ6
+snffTVi3/2ozomi7vv/dcc97763Uv1el+05S2FcX+7dJw2S1uaf/alb0pE1X
+baWEVmoohadX+DnwjN5paYs1bSft5Z5vZzX1fE3VeGqBZ9iFVpQBs3167T8c
+rEqV1574/kJ9jzxV89klLzvr2xuR6SQD0oMCTI05YZo9SQUOUKUnEmG+a/q/
+KJ8Ea7rz4KBounSxUZeX0ptRzhMMDZ01faHzwmZHanp16v9zvSDczdnNo4ep
+nv7bynGachIfqD5ra9K5uJl9PdRssdaDqiGdP8HQqqYuzWeC/8+algI0zKqa
+s1dFl+CPOAfCwa5UNaqQ6nap5BXbZ88/oG+ARKiTDHtMDzK4PeZEafYkFThA
+GZXw50D3pUXG44h2lp+IDfUL/DJ+Y9hb03lOvpGCvnfr0852UmtaOq9FTJlj
+3CoAa/892D0kt43qLEN8CEXdydjUCnGNeX9PEhBhXkp4wGufHTkYvzk80NUr
+7Kfi7APboxf5ury2IV/UUbTIcZxh6u64HPQi1RafBlT1x94MwX/Qh0PhYFkq
+Kr6esjw0qaKv8R5R2nAtPUgYAmOuxyzNrFJlnxEkKXCAOp3FS1xmflfdP0Ww
+tgv+LzpFa9ZDyobMD8c7zDvZqLuCJct2WXVWcmqB2SU+iTXNp6L81fM3FPTr
+wSy797WXxxdl1Bc8+IdAHqbHHqqU4faeJkVatt7FMUjTKQ1ryQ504EX80Y6q
+lbWpPhPfzqu5GDjG0ZCskqJF48bM+5PewpQkdTkUDjalqjpKT+5cFeT23HCn
+iL5Ge4Rpw630IIHzY274FCfNyOBWBOHcxAiiP+fyZh1vMMlQ47YvkqLFvFf0
+O8xk2a5syFjAc48s7TL9gNiaGhVd2RVzqKK7f44iVQkzXJbRWazgHKKt6mjs
+0WrN8op26pK0n854UPjR+LEh+mWV+PLCsVSXVUrhqU8WBGqY4z5qjDdf+8+F
+UYXGBcqhcLAsVa1pN1S8yXVsYHYLRqaTwI4dp4cR9pUeahvHnDzNSOFWBIkL
+HKCO5Eqos88PD00urY0zoat05WTPb+7pruOt2cEmsoZ1Vwr2HLolMQudvGK7
+15Qo027V9A5x63bc697TvLVM5Q1/eqSr19x1N80qEReS1E2vqz3m62jYjn50
+ZNYEfgZeC2sSSJZVHAoHm1L1dF3/1OvNc60YmU58O3acHiRwe8wtpBlNVXYc
+QbhuYgSkKt7HI9o0tzSZMG2ftk21oibFz2/Xff1msfz+Dquy3dwa8uhsYmpJ
+h/YRGLSj/Mx5oaEDmuTqUje+gE5CEAtW4/aeJsc0dbcapW4D8jh7sWewZj9A
+jTafCZm2LKeFcu/xXkhSl0PhYEsqJmt82NLbaAip/vG9z/v2l4jThlPpQQL3
+x5wkzWirMmBvEYRzEzPIH+z05Zvek+zJBIdxCzfvTk5J/HbdtlP625iKllvn
+9wSMHuG6IfNqlZRywHCsqVpyIt2eGfaUjmHDveL+MSSp/P5O3/kH6+j8coJA
+cC/0UhdDGi8nB4we6bP7j5q2qtz/eDw3ir/vUl3r7cxIp39NjBDcECPt+XGr
+NyUd+Sl5S1R8QTvtVTFZ6nIoHOxIxUSXV013dAuKjjuckX4st0ZmWH+TpA2n
+0oMMbo85aZrRVtWHvUUQzk0MgYryt3ywp/8jkcZX0LZDzxomKdkauqO0k9Y1
+P7OC2YRD4bArqaRpA+lBHfsc86ETQYAW8rrspNRLTX2rMW0mJFQxmVcUrcnr
+clKSf2uk9GiplYewezgUDnuRakEnpAd17HPMh1QEAVpgSGtb74ayWiUpy1w7
+acQLb+zLKRPbvCNBzxoqaxYhdB9rYVawXcChcNiDVFKdkB7Usc8xH4IRBAAA
+AAAAAAAAAAAAAAAAAAAAAAAAGPqgHcXxK0P4U5ymL9t/R8rYK04GyKwdwqyn
+T864AQAAECOrST/8txhVIzVpAZOCGfvR3gCZtUOY9fTJGTcAAAASMFW3Srs6
+l95Yy19RwlRLhQEya4cw6+mTM24AMLTAlLDNMSBIb+/9LJVCS1P7MEsCWxnC
+rKeDP24AAPQHacg7/svdLksTCoYIC9Jigl59v8D2jjRYd+XxtfMmOzw7yslv
+zdEHuvflo+IbWYLCFpJX6VGSim/cFmTVJ7aEB/tPfYk3a0V6LUJJKgnKxqwl
+M8L6vQEM6ywXHMxvte6nhaioMH7NpsQjhxM3rkm4IjJ6eZpNZvtgIUP09B8r
+4mG3wlOSPLFkbWjkIQDYM8qmX9d/nEZhfYjJH9cLr8W4jGegy3P33YR1+682
+I4q26/vfHfe8995K/etIuu8khX110aznGR2pxMatRF574vsL9Yim2/LZJS87
+6zvRkEklQyk8vcLPgWf0dkpMVpt7+q9mRc9U01VbKaFpEW09v9zz7aymnq+p
+Gk8t8Ay70IoyYLZPLxsZoj+22VjhDrtVnhLmiSVrQyQPAcCe6ZnXwnzXUH6/
+vDUdYXBQNF262KgrVOnNKOcJhibImj7PeWGzIzUtLq2USmbcOlCFVLdLJa/Y
+Pnv+AX0HHUKppPLqs7YmnYub2dcNTVEvCHdzdvPoYaqn/7Zy6g1/taga0vkT
+DB1n6tJ8Jvj/rOlaQMOsqjl7VXQJ/siykyG9mI+VBrNht24AifLEkrUhkocA
+YNeohD8Hui8tMq4ztLP8RGyoX+CX8RvD3prOc/KNFPS9kp72zENqTUvntYgp
+c4zf+4+1/x7sHpLbZlJpdKXiG7dFLSq+nrI8NKmir9cagVQSO4q6k7GpFeIa
+Wp06EWFeSnjAa58dORi/OTzQ1Svsp+LsA9ujF/m6vLYhX9RRtMhxnGHe67gc
+9CLVTp0GSN7qz2KGEI4V0bDTP4QeGnnCpTwEAM7SWbzEZeZ31f1rBmu74P+i
+U7RmHaZsyPxwvMO8k426DQOymUdWnZWcWmC2tUBiTfOpKH/1/A0F/foWy+59
+7eXxRZnJepWuVALj1qpVdZSe3LkqyO254U4Rfb3V8KUS2kEepsceqpTR7yIt
+LVvv4hikaXiGtWQHOvAi/mhH1craVJ+Jb+fVXAwc42g4G0mKFo0bM+9Petct
+JOcm1jKEbKwIh50I6/PEDG7lIQBwFNGfc3mzjjeYVIZxtxRJ0WLeK/qdbbKZ
+R9mQsYDnHllq1haZ2JoaFV3ZFXOowuQmMVKVMMNlmenSn65UAuM2qFVrWtYU
+b3IdG5jdgpFJJbDTVnU09mi1Zv1L+9xE0kU640HhR+PHhuivm8SXF46let2k
+FJ76ZEGghjnuo8Z487X/XBhVaDyJspQh5GNFPOxEWJsn5nArD/tCbIRJiAHA
+DpFcCXX2+eGhyV6DcV10la6c7PnNPd3+gTV3E4isYd2Vgj2HbknMqkResd1r
+SpRp62l6UgmNW6tWT9f1T73ePNeKkUnFt3Prdtzr3tO8tUzlDX96pKvX3HU3
+zSYlXEjOTel1tcd8HQ33mx4dmTWBn0Gnob2a9LqJnQyxMFbEw079ENbmCcfy
+EAC4CVIV7+MRbZrTmrqYtk/bL1lRk+Lnt+u+frNbfn+HVTOPuTXk0dnE1JIO
+7QNlaEf5mfNCw0NMkqtL3fgC0+mVjlQS49aoxWSND1t6m9Ug1T++93nfXgq+
+VGJhOuh1kVabn5u2Gp2bGpDH2Ys9gzUbfmq0+UzItGU5LZRbcPdCcm5iL0N0
+4I0V8bDTO4Q1ecKxPAQAjiJ/sNOXb3qTtqcuHMYt3Lw7OSXx23XbTulvwypa
+bp3fEzB6hOuGzKtVUsrTH441VUtOpNszw57SMWy4V9w/hqqV39/pO/9gndkv
+NqhKJTVujVpMdHnVdEe3oOi4wxnpx3JrZIZFMJFUfDt90Ds3YUjj5eSA0SN9
+dv9R01aV+x+P50bx912qa72dGen0r4kRghtipD0/bvWmpCM/JW+Jii9opz1F
+kZybWMqQPnDGimTYaRzC2jzhVh4CAFdBRflbPtjT/0FZ4/0E26FnDZOUbA3d
+UdqJswky8FLpGSSROgDCWINDGcLUIcjhVB4CAIeR12UnpV5q6lsIausioYrJ
+mYeiNXldTkryb42Ez9oOsFQ6Bi1IZVwYm3AoQxg4BCUVXMlDAOA2GNLa1ruR
+rVZJyjLXThrxwhv7csrENm9g07OGyppFiIXl34BJpWeQVCrjwtiHQxli4yEo
+woU8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2QDuK41eG8Kc4TV+2/44U7mrb
+C8zGxZ6tAQAAmCGrST/8txhVIzVpAZOCCX7/Cgw6zMbFnq0BAACYg6m6VdqF
+r/TGWv6KEnq9LYABg9m42LM1ABgqYEpubCJwRWcv0tt7P0ul0Fv2SYWtaDIb
+F3u2BgD2B9KQd/yXu12Wih9DhAVpMUGvvl/AQFdTWfWJLeHB/lNf4s1akV6r
++fk7Kr6RJShsIXkpGBs6dSgbs5bMCNO/1c2yVDxZ3ZXH186b7PDsKCe/NUcf
+GPdMwDrLBQfzWwl/ZUnJcRL7tsGA73hwIJqW4oKDDVHGw7xMbLEGAFxC2fTr
++o/TKKy+MPnjeuG1GJfxDHTcltee+P5CPaLpBn52ycvO+t403XeSwr66aNZo
+jT2d+mMLT6/wc+AZv3GUTCou3XcT1u2/2owo2q7vf3fc8957K3UzDSarzT39
+V7OiZ5Lsqq2UmFmk6DihfRthwnccq/YfTUtxwcXqKONCUCZWWgMALoG2ng/z
+XUO5W4M13XlwD6uQ6vZo5BXbZ88/oG+Hg7Xnhc2O1HT7tA+dWhT1WVuTzsXN
+7N/hjlAqgZGmSxcbdfOU9GaU8wRdF3VFvSDczdnNo4epnv7byk1bl1J1nMi+
+jTDiuxkciKaluBAYtzLKBBCUCQ1rqubsVdEl1JuxAICdoBL+HOi+tMg4d9HO
+8hOxoX6BX8ZvDHtrOs/JN1LQ17SA9ixBak2Niq+nLA9Nqujrmoa1/x7sHpLb
+ZjLrsahTUXcyNrVCXGPWfZVAqgWXNXRei5gyx7TLAj50Hadrn2HfqcGlaNI/
+hB46UaBbJpQh634CAHZMZ/ESl5nfVfevH6ztgv+LTtGaRaSyIfPD8Q7zTjbq
+dg3IZglZdVZyaoHZTg+hNVVH6cmdq4LcnhvuFNHXJU1272svjy/KTJaCrOlE
+HqbHHqqU4XYGx5dKLkzzqSh/9fwNBdS6YtN13IL9gfd9IJxiN5pEMBhlMmv4
+ZUIVODcBHEX051zerOMNJhlv3DtGUrSY94pho5tkllA2ZCzguUeWmjUZJ7am
+AZMUb3IdG5jdoitipCphhktvh1f2dbZVHY09Wq1ZwOLNZvhSLbiMiq7sijlU
+QfVJBbqOk9sfBN+VwlOfLAg0YWFUofEkzbFoEsFclC1YU5uXiQX6ojDHfdQY
+bz5eFADAnpFcCXX2+eGhyb6DcZl0la6c7PnNPd12gjU7/8TWeum6/qnXm+da
+dVUjr9juNSXKtOU1Ozpv3Y573Xuat5apvOFPj3T1mrvupmHGwJdKJgzrrhTs
+OXRLQn2GoOc4ffuEBq32nXGnWI8m9UPYEgV6ZUIVuG4COApSFe/jEW1akJoy
+mbZP20BaUZPi57frvn7vW35/h1WzhKk1TNb4sKW37QxS/eN7n/dtVkiuLnXj
+C4Qma2q2dBrA66KOL5XYFPLobGJqSYe2VTnaUX7mvNDyk3R0HLfGPvO+U4Bj
+0aR3CGujQK9MqALnJoCryB/s9OWb3rDtKROHcQs3705OSfx23bZT+ruyipZb
+5/cEjB7huiHzapUUpXoIHGuY6PKq6Y5uQdFxhzPSj+XWyAyrQfn9nb7zD9aZ
+/daEHZ194MxmRFLxTalaciLdnhn2lI5hw73i/qEyaVF13Fr7jPtOBW5Fk8Yh
+bIgCrTKhDJybAM6CivK3fLCn/2OoxtsLtkPDGiYp2Rq6o7QTpwbtSqeaVCqz
+wgbecdoGSX2nBKeiycwhBtcaAAwF5HXZSamXmvpWsdoySahisuioWJPX5aQk
+/9ZI+NCtvehUW5TKrLCBdpymQUthogh3osnEIQbbGgAMETCkta13X1utkpRl
+rp004oU39uWUiW3+wTkNa6isWYRYWLjag05LUpkVpmPAHKdtkEqYKMKFaDJz
+iMG1BgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA06AdxfErQ/hTnKYv239HCi/K
+4TAQSgAAhgqymvTDf4tRNVKTFjApGH76yWEglAAADBkwVbdKu8KW3ljLX1FC
+4/2pgJ0BoQSGFpiSMxf/HJLKOaS3936WSqG5LXNwKJockqpmI5QAgHVXHl87
+b7LDs6Oc/NYcfUDwXn+kIe/4L3e7LJUThggL0mKCXn2/wPYupfjCUPGNLEFh
+C8mLz1iQqkfZmLVkRpj+RW0MSaUWoEFQi4es+sSW8GD/qS/xZq1IrzV+qwHW
+WS44mN9q6y9JIfGowEAoSdLMUiipOU6cKjbARA4Ddkr33YR1+682I4q26/vf
+Hfe8995K86xRNv26/uM0CqsmTP64XngtxmU8Ax20iYV130kK++qiWT859qTq
+jy08vcLPgWf8ElEGpFIJ0CCoxUVee+L7C/WIpvf32SUvO/e1HMJktbmn/2pW
+9EwXXbWVEmtPUJB4lGAilIReWwolRccJU8UWmHAcsFcUTZcuNuqyUHozynnC
+OwVik/+Ctp4P813Tv6MACdZ026EpDGvPC5sdqekRahdSdYLrs7YmnYub2b9p
+nc1SKQRoENQSgCqkup0pecX22fMP6HoyKeoF4W7Obh49TPX031ZuXXtcSDyK
+gpkIJZHXlkJJ2XGCVLEF6x1XNWevii6hGi2AfTqvRUyZY9q6QK0S/hzovrTI
+OJBoZ/mJ2FC/wC/jN4a9NZ3n5Bsp6GtCQLvuSK3hC8Pafw92D8ltM8k/FqUq
+6k7GplaIa8waqjIkFX8cBkutBW2o+HrK8tCkCpmaSSDxqFhjOJS4XhNDO43p
+pgqDjhvLhtYhnAIT5a+ev6HArG1zZ/ESl5nfVffPVKztgv+LTtGa1YmyIfPD
+8Q7zTjbqLqPJ6k5WnZWcWmB2wU1ijUCY7N7XXh5flJms4liTijxMjz1UKcNt
+9s2MVIJxGCS1ZNpUHaUnd64KcntuuFME/eZ3JEDiWbbGbCgJvSaEnuPkqTLw
+jhuAcxOXQEVXdsUcqsC50S76cy5v1vEGk5QxbjcjKVrMe8WwgUxSd8qGjAU8
+98hSs61mYmsEwpCqhBkuy4pNHmllSWpb1dHYo9Wa1RxepTAjlSRAg6DWgja1
+pgNS8SbXsYHZLdT2kJTCU58sCDRhYVSh8YwIiWfJ2gCEkjTNzKGdxmrCVBkE
+x/uybo77qDHefLysA+wLrLtSsOfQLQluiCRXQp19fjDdHjZOmK7SlZM9v7mn
+u0y3Zi+dyBqhMHnFdq8pUaZtvdmReut23Ove07y1TOUNf3qkq9fcdTcNJcaE
+VNIADYJaMm16uq5/6vXmuVbmyhwSz4I1xkNJP83oOt4LvVRh0HE9cN3EEZBH
+ZxNTSzq07a7RjvIz54X9HgRDquJ9PKJNI61JmGn7tA2nFTUpfn677uv3lOX3
+d1hVd+bWSIRJri514wuEJus19qTqwGn2zYBUCwEaBLVEpjBZ48OW3t5HSPWP
+733O6J4eJB5Fa2omQmldmlF33PpUYdBxPXBu4gKqlpxIt2eGPaVj2HCvuH9M
+UlL+YKcv3/TWaE/COIxbuHl3ckrit+u2ndLf7VS03Dq/J2D0CNcNmVerpChV
+FTjWSIXJ7+/0nX+wzux3DOxI7QOnUmyVSiFAg6AW3xQmurxquqNbUHTc4Yz0
+Y7k1Mmb3RiDxKFjrxeZQWptmVB23IVUYdFwPnJuGCqgof8sHe/o/Pmp8oW07
+9KxhkpKtoTtKO3HSG6T2hzG1A6DNMhBNq60NWig55TgwBJHXZSelXmrqWx5p
+Eyahisn0o2hNXpeTkvxbI+ETriDVCAbVMq6NEhBNa6wNbii54zgwNMGQ1rbe
+/WK1SlKWuXbSiBfe2JdTJrb5DgM9a6isWYRYWBSBVKbVMq6NBhBN+w8lFxwH
+AAAAAAAAAAAAAAAAAAAAAAAAAAAABgu0ozh+ZQh/itP0ZfvvSG29j8usNYAt
+ICsAAGAVWU364b/FqBqpSQuYFGzrzwGZtQawBWQFAADsgqm6VdqFrPTGWv6K
+EpwXc7JnDWALyAoAoA+m5MymAIekSm/v/SyVQtdUNqxRgStDzRWdvXA9KwDA
+NpCGvOO/3O2yVLQYIixIiwl69f0C2/t1Yt2Vx9fOm+zw7CgnvzVHH+heyY+K
+b2QJCltI3oTFglS1rPrElvBg/6kv8WatSK9FKOnE04Trcu9HneWCg/mt1vxQ
+UdmYtWRGWP/eatZbM4YrQ82GTh39B/+JyAoAGDSUTb+u/ziNwmoKkz+uF16L
+cRnPQC/p7rsJ6/ZfbUYUbdf3vzvuee+9lfo3knTfSQr76qJZgzH2pMprT3x/
+oR7R9HE+u+RlZ30nGjKduBC6jMlqc0//1azomdy6aisltCYPpfD0Cj8HntG7
+Lm2xZmyYI0PNik79sc0Gf6hnBQAMHmjr+TDfNf1fMU+CNX1ncFA0XbrYqCtC
+6c0o5wnvFIj1n2HteWGzIzVdLu1CqhpVSHXbQPKK7bPnH9D3qiHUiQ+Ry4p6
+Qbibs5tHD1M9/beVkzTrNLdZn7U16VzczL7eajSsqZqzV0WX4I8mV4aaJZ1a
+zAefVCqBEXvLCgCwE1TCnwPdlxYZFzfaWX4iNtQv8Mv4jWFvTec5+UYK+t5K
+T7u6Sa1p6bwWMWWO8Uv2sfbfg91DcttMyptlqaj4esry0KSKvh5pBDqtcdkq
+VYq6k7GpFeIa876flCBpE8CVoWZRJ+HgczwrAMBO6Cxe4jLzu+r+9YC1XfB/
+0Slas/hTNmR+ON5h3slG3S4AWXXLqrOSUwvM9jNIrGk+FeWvnr+hoF9TZNm9
+r708vigzWd2xKVXVUXpy56ogt+eGO0X09UTD12mVy2TgW0MepsceqpTh9qSm
+BMm5iStDzZpOssHndlYAgJ0g+nMub9bxBpOKNG6YIilazHtFv/NPVt3KhowF
+PPfI0i7TD4itqVHRlV0xhyq6+xckUpUww2VZscmjrixLVWs6wxRvch0bmN2C
+kem0ymVScKy1VR2NPVqtWSnTnYWUwlOfLAjUMMd91BhvvvafC6MKjSdFrgw1
+SzrJB5/jWWGESVYAwGAiuRLq7PPDQ5N9BOO07ypdOdnzm3u6/RVrduyJrGHd
+lYI9h25JzNJfXrHda0qUaZ9nNqXq6br+qdeb51oxMp1WuUxT1a3bca97T/PW
+MpU3/OmRrl5z1900m1dJIblu4spQs6PTwuBzOysAwE5AquJ9PKJNC0mT9tP2
+aVsyK2pS/Px23dfvjMvv77Cqus2tIY/OJqaWdGg7UqMd5WfOCw29wyRXl7rx
+BUKT5TBbUjFZ48OW3p4wSPWP733et9GEr9Mql2mrMoDTk5oaJOcmrgw1e9mr
+A2/wuZ0VAGAvyB/s9OWb3oDtSXuHcQs3705OSfx23bZT+nu2ipZb5/cEjB7h
+uiHzapUUpXoIHGuqlpxIt2eGPaVj2HCvuH8MFSm/v9N3/sE6s5+JsCMVE11e
+Nd3RLSg67nBG+rHcGplhdUuk0wqXaavqYyDOTZwZanZ09oEz+BzPCgCwG1BR
+/pYP9vR/rNR4u8B26FnDJCVbQ3eUduJscNiVVBKd7A4gI3BlqO1Kp3qoZwUA
+DDLyuuyk1EtNfatPbdonVDFZRBStyetyUpJ/ayR8jtZepFrQyd4AMgdHhtpu
+dKqfiKwAgEEGQ1rbejf61SpJWebaSSNeeGNfTpnY5h+Q07OGyppFiIVbwvYg
+lVQnmwPILHY/1Hak05LUoZMVAAAAAAAAAAAAAAAAAAAAAAAAAAAAADCkQDuK
+41eG8Kc4TV+2/44U3mgDDAaQdQAAkCKrST/8txhVIzVpAZOCCX65CwCMAlkH
+AAA5mKpbpV22Sm+s5a8owXmhKQAwDWQdQA1MyZmLag5J5RbS23s/S6XQbZY5
+OBRKDknlFoOfdQDbIA15x3+522WpojBEWJAWE/Tq+wW2dw7FuiuPr5032eHZ
+UU5+a44+0DUHQMU3sgSFLXgvI2NPqh5lY9aSGWH6d5QxJBV/HGxBVn1iS3iw
+/9SXeLNWpNcilKSS0N/rXs2d5YKD+a22/uQTso4Ua+LIUsrpoFsglE1pYSjr
+AA6hbPp1/cdpFFYjmPxxvfBajMt4Brpad99NWLf/ajOiaLu+/91xz3vvrdS/
+e6X7TlLYVxfNeryxJ1V/bOHpFX4OPOP3ZzIglXgcrERee+L7C/WIpuX62SUv
+O+s7BJFJJcPca0xWm3v6r2ZFz+TTVVspsXaqgKwjx4o4spVy+sPTKxB6phjK
+OoBLoK3nw3zXUH5hsTUdcHBQNF262KgrCenNKOcJ7xSI9Z9h7XlhsyM1/Tzt
+QqpOcH3W1qRzcTP792uzWSrZOFgHqpDqdpTkFdtnzz+gb25EKJVUnpnXinpB
+uJuzm0cPUz39t5Wbd3elphKyzgK048heyvWapVcg9EwxlHUAp1AJfw50X1pk
+nNFoZ/mJ2FC/wC/jN4a9NZ3n5Bsp6Hv/Pu3SI7WmpfNaxJQ5xn0OsPbfg91D
+cttMEppFqYq6k7GpFeIas16iDEnFHwdr1Wo/FV9PWR6aVNHXro9AqjVe2wxk
+HVWplOPIbsrRLRBWsg7gFp3FS1xmflfdPzuxtgv+LzpFa5Y7yobMD8c7zDvZ
+qLuKJis9WXVWcmqB2RU8iTXNp6L81fM3FPTr/Sy797WXxxdlJqsj1qQiD9Nj
+D1XKcPtcMyOVYBysUtuDqqP05M5VQW7PDXeK6GvPhy/VKq9tBbKOkjU6cWQz
+5egXiFWmgCcL0Z9zebOON5jkoHFrGEnRYt4r+u1ustJTNmQs4LlHlpr1gCa2
+pkZFV3bFHKowuR2LVCXMcFlWbPKoKEtS26qOxh6t1qzp8OqFGakE42CFWqP/
+g0mKN7mODcxuwcikWuU1GUrhqU8WBJqwMKrQeAqErKMqVU01juylnDUFYpUp
+MqhkHcAtJFdCnX1+eGhyVW+cNl2lKyd7fnNPt6lgzXY6kTWsu1Kw59AtiVn6
+yCu2e02JMm21zY7UW7fjXvee5q1lKm/40yNdveauu2moWSakEo4DfbX3ZMaf
+d13/1OvNc60YmVSrvLYVyDqK1nqhEkfWUs6qArHKFPBkgVTF+3hEm6aOJm2m
+7dM2h1bUpPj57bqv36eW399hVemZW0MenU1MLenQ9sZGO8rPnBcaHheSXF3q
+xhcITdaA7EnVgdfn2napJONgjVpM1viwpbeJEFL943uf9+0F4Uu1ymtbgayz
+aI1uHFlMOQPUC8QqU8AThvzBTl++6e3QnrRxGLdw8+7klMRv1207pb+Dqmi5
+dX5PwOgRrhsyr1ZJUaqHwLGmasmJdHtm2FM6hg33ivvHUB/y+zt95x+sM/th
+BDtS+8CpF1ulko6DNWox0eVV0x3dgqLjDmekH8utkRlWxkRSrfDadiDrLFij
+H0fWUq4PGgVihSngiQMV5W/5YE//xzKNL7dth541TFKyNXRHaSfOdgNI7Q8N
+gyRSB0CYZSCU1lnjUMqp7S/rAM4hr8tOSr3U1Lfk0qZNQhWTpUfRmrwuJyX5
+t0bCp1pBqhGUDVqQyrgwSkAoaVvjUMqp7TTrAM6BIa1tvbvbapWkLHPtpBEv
+vLEvp0xs8w+w6VlDZc0ixMINWpBK1yCpVMaF0QBCyVwcB1onbYN2m3UAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAOCAdhTHrwzhT3Gavmz/Hamtb8iyZ2v2
+zJPjqQlPrOMAAJAiq0k//LcYVSM1aQGTgvNEQ9eaPfPkeGoCnuOYpPz0b3XG
+bzIw/wsuioeHPt4O/YcAYEiAqbpV2tWq9MZa/ooSnFcaDxVr9syT46kJ+I4r
+6jO/SLxp/MYD87+Yo3h48L1ovJdyAwBgO5iSnX0N6e29n6VSaI3NfWtUGBpR
+4BCmjkvL/vvxkX7vrzP/iwnKuqPvR15hos0sADwZIA15x3+522VpssMQYUFa
+TNCr7xfY3ugc6648vnbeZIdnRzn5rTn6QNdGBhXfyBIUtuC8GhLrLBcczG+l
+9RNyWfWJLeHB/lNf4s1akV5r/HIUa6zpUDZmLZkR1r+5p/XWjBkCUaDmAnFc
+bKB/XIhdoG1KC57jsjv/886uChnpX/qhqheEfnbZ9qgBwJOBsunX9R+nUVgJ
+Y/LH9cJrMS7jabYAwKP7bsK6/VebEUXb9f3vjnvee2+lforqvpMU9tXF/h03
+MVlt7um/mntWpGhXbaWE2klAXnvi+wv1PWZVzWeXvOzc11XNKms6lMLTK/wc
+eEZvSLbFmrFh7keBoguEcbEF87jgumCdKSLHRXnvBfQNGf5fjFAJMz+MuCSC
+hykAgApo6/kw3zWUX0ZvTes0HBRNly426kpYejPKecI7BYadDqw9L2x2pKZX
+s/4/1wvC3ZzdPHqY6um/jeqdZFQh1W17ySu2z55/QNd3zUpruu9mbU06Fzez
+ryMnDWuq5uxV0SX4Az0EokDZBYK42OSIWVxwXbDOFLHj0ltrZ7xp6EeL/5c+
+0Kb/t+jji21wagIAKqiEPwe6Ly0ynlHQzvITsaF+gV/Gbwx7azrPyTdS0Ndb
+hfasSGpNS+e1iClzjBvPYO2/B7uH5FKuYvJDoOLrKctDk4h3WihbU9SdjE2t
+ENfQ6xZtQFV/7M0Q/OfbhkAU6LowGHEhcoGpEMsf/O/M6f161Jr/pe+gj7OX
+LL/QCqcmAKBEZ/ESl5nfVfdfumJtF/xfdIrWrDiVDZkfjneYd7JRt5FBNivK
+qrOSUwvMNlFIrGk+FeWvnr+hoMO4ZmX3vvby+KKM+hUN4SFUHaUnd64Kcntu
+uFNEX+dQq6whD9NjD1XK1IqHzJ+bhkAU6LlAHhdaLpDFhdAFZkKsqPnexzXc
++JFF878YjthyfvnS7MeU+w0CwBOO6M+5vFnHG0ymAeO2X5KixbxXDDcFSGZF
+ZUPGAp57ZKnZ7QNia2pUdGVXzKGK7v6rSaQqYYbLMjqP2pIcQq357UnxJtex
+gQR7LZSstVUdjT1arVlc0z03KYWnPlkQqGGO+6gx3nztPxdGFRqfB4ZAFOi6
+oIEgLnRcII8LsQuMhFhZ++Orzh9ckZD9Re9q2+8f/5//1wSnJgCgiORKqLPP
+D6Zb/saV21W6crKnYZvCmjsdRNaw7krBnkO3JGZnDHnFdq8pUTelth9CT9f1
+T73ePEd1Q8Xc2q3bca97T/PWMpU3/OmRrl5z192kdxOf5LppCESBrgu9DHBc
+iF1gJMSKmhQfl6XFnWR/6QVrz4v46FQjNCoCAKogVfE+HtGm1aup3Gn7/tFU
+bk+1+fntuq+/TyC/v8OqWdHcGvLobGJqSYd2JYl2lJ85LzQ83iS5utSNLxDS
+qGS8Q2Cyxoctvc3NkOof3/uc8p4eiftqzW9UDv7bleE9vSEQBeouDGJciF1g
+JMRI5V4fr83GT4WY/0V3uPwVoQLTi0oAAEiQP9jpy//R5AeDPZXrMG7h5t3J
+KYnfrtt2Sn8HW9Fy6/yegNEjXDdkXq2SUt6fwLGmasmJdHtm2FM6hg33ivvH
+MCnK7+/0nX+wjs5vU3AOgYkur5ru6BYUHXc4I/1Ybo2M+l1oAvd7GYhz01CI
+AlUXBjEuJC4wEuLu2xtnBJ5sRMn+okV85fMPjj2y7sdWAPCkgoryt3ywp/9S
+z3jHw3boWcMkJVtDd5SSv/vFtkMMrjVKDIEocMoFRoSJCz567ct+Dpv/RYOk
+OOq9Q2TviwAAABd5XXZS6qWmvuLRVm5CFZNTCkVr8rqclOTfGunWMXuCmYP7
+UeCQC0wIQyoTgr/o98th879o6Loe8+6BGjg1AYA1YEhrW+89ALVKUpa5dtKI
+F97Yl1MmtnmLnJ41VNYsQuj+BIRNwczC5Sjo4IILzAhDqg4s2X2nm/QvGqQ3
+Nr3z/WAvdAAAAIAnELTtr22xvxk/xmH+Fy3Ssth34h88ge/GBQAAAAYXrPN2
+xtHrHSjZX3qR3du1KO4+nJoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAJkA7iuNXhvCnOE1ftv+OdGB7lg3mseyBIe8vOAgAACXkdb+dLjdvVECM
+rCb98N9iVI3UpAVMCiZ4hyhD4B0Lk5Sf/q1uaP5wYzDHlhXAQQAAKIB13kz8
+4mQ9rVduYapulfZUJr2xlr8Cr9Umc+AfS1Gf+UXiTXovZeUGgzm2rAAOAgBg
+GUXtkY//W0ajlZ4x0tt7P0utGpzrF9NjScv++/GRAXrBMqZk/6Q3mGPLCuAg
+AACEyCp2vfs/d2SW/6M5WGe54GB+K4OvJEVFhfFrNiUeOZy4cU3CFVG/t7KY
+H0t253/e2VVBLh1pyDv+y90uymcaDBEWpMUEvfp+Aa3eeVaCim9kCQpbcHrr
+UBtbet5h3ZXH186b7PDsKCe/NUcfdA/C6XdwHdSjbMxaMiPMii5X9LHVQQAA
+8JFX7gl435odcUxWm3v6r+aeyxa0q7ZSwkQJoq3nl3u+ndXUY0vVeGqBZ9iF
+VpT0WKK89wL2VhK/ZFnZ9Ov6j9PoLFwx+eN64bUYl/E0+7paT/edpLCvLrb1
+Gz9qY0vXu+67Cev2X21GFG3X97877nlvspFjkMFzUP814ekVfg48azowWoX1
+DgL/P3tvHtbE9fb/1796VeunWosiNLUgCAqCSv2IDUvVtlLh04XWxw36u2hd
+ioBL3Vq0y1cfHxdka7H2AdcKqIh9rFyitBYtgghaVERFKSAIAWQJCYRkskx+
+JCQhJDOTmWTCZPB+/eVFzJ33Ofd9zpw5s7wBAA/F07Pzpq+9Q3lHT9qQGe7m
+7ObRyxRP/23GPtBmIG9M5zrOPNLn0CmrT/Nx9D+hcrTG/y3RnTXT38lpxVlV
+9x7qwnyjqM9Qkof/bdJzXN6SsyqmlJbJD+3ID5sVWSTQtYJc31JunbT58qUm
+zdFIdDva2fE/hQL8/83CBmqDZ29NOh83w8XEsYn5BtItAwCGEuJ7X3vN2IX3
+En1F193sxPiDGZmH9kb91+JP1hTxLdsGQnj5KeEBb644cjB+c3igq1fY0ZKc
+A9tjFvq6vLmhgN9ZvNDBXjdhdl4NGuu4pITwOrLk0f/MmPbtA+xdPTnvRKD7
+kmLMYa/oqjgZG+oX+FX8xrB3p3GcfCMz+42xSR2bCCzOB/wOiQ5EO/4Idg/J
+a6fUt2a3Tk3XjYjJsw0tzAfGZ2cDpfWnYlMrBbU/+Zg8NjHdQEoyAOBZQ3h9
+0cQZP2LaYio6rmye+/6Bf1SDXlqTPO3Vt889NXoJP1VE5etcHILOtiiUaGtO
+oB0n4s8OhVJWl+oz4b382kuBYxx0RyNh8UL7MXOvEB4hpLU/+riG49wH1VWy
+2GXGDzU48y/aftF/rFOMarEra8z6eLzd3FNNmp0Xuo5NpDtQ/OAbL48vyymd
+e5rdOtWn/ILV8zYUdhJNpaxsIPI4PfZQlVgpfUzPscmqDSQvAwCeQQSFwRN8
+/rcO41Ju18017m7RfRbP8sbjb3L8TzaR2DaX8U5/Nj/QgAXRRZqJsKdis7vT
+UvXxR1j8yYTJ2+73nvSgT89xHf+d8ajok/HjQrTnTYKrC8aZOm+S1f38hvNH
+17DnIP6VOZyZxxvxNKt9sZNq1JtcwuJFnNc/19pZExyb+ls32330GG+uQesG
+QL4DkeqE6S5LiZtKW+uUCv61XesPVWLfCcHmBrZXH4s9VqM+juAfm2ykgVRk
+AMCziLD4Y2efA4+NV6fdNyMmOIYWqQ8UipZf53D+fegJxhGMKgTHpvT6ul98
+HXTXm54cmenIzeARHg6ltSk+LnjHL+G1UGefnzCa1of+5NZdtnKSp25vkJ7z
+JgodKKnc7jU5+jali35mtg7tqcrcc+iO6ces2dfAO3fj3vKe6q1mCmf486Nc
+veasvd2N833mG0hWBgA8k/SUr/d8I6Ha+Iat9rzA0aP8M1TrVsmj//V3nJ6M
+t71C7fcMjk1b9Y5NjcjTnEWewaoNv9654GzI1KW5rcSbiEjVXh+vzfqXmuX8
+G9n/d6tTdURDquN9PGJw5wvV5DZ13z+qlvce4vz8dunsQSUPd9BwbKLQgcLr
+S9y4mcSH4b5ftbB1yJNziamlffaois6Ksxd4uHfqsbOBGmT1B//tavGenjUa
+aIYMAHgmkfMyAnzUBwgDZM1nP586+qWJ76z8fu+2WeM9d9Lg7IwiTVeTA14e
+5bP7z9r26rzvPEaO5u67XN92NyvS6V8TIjJvCZCOgrjVm5KOHE3eEh1f2GFq
+rPfc3Tg98FST3gGsszDczS28QL01Inm005eLe8G/d3Kzs1+weXdySuL3a7ed
+1t4sIG29c2FPwMsjXDdkXa8W4R4aTU8p5DtQ8nCn77yD9STOSi1qnbw1N9Lt
+hWHPaRg23CvuH/ybyFnYQD1ptBybrNFAM2QAwLNJT8VX/uHXiUax4FqY8+Qt
+tNwlTjeCwk/e/ApfmYJfsOWjPTif628KWRfiDkSFpVtDd5RRf/mSjbROCQ00
+t4EAABDQ/ff6BXF4N5ErVbcbr3Rxjbpl5juNrApSlRD85d+4VxRUSOpzklIv
+N2MsvtWTG9ZuJt0QdqCkPjcl+fcmM7dLbaB1SmigJQ0EAACXnnv/ExpXiXVw
+QnvqirO2cUe/6P7tFb7tPdqOVB9YvPueyfM5FGlrRwzWtHJhedaaiSNeeXtf
+brnAei0z2YEKcQvfUBvFn2CudUpoIB0NBAAAB3lr3uYv/zBx24HNoWj/a1vs
+7622d8gEAAAAaEHReePw0dtU/JuYBu26m3HsZifLjqcAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAYICisyR+ZQh3stO0pfvviWi7s99KYW2Q
+Z6eleEAPAOxAUv/7mQpqjy+Z8RWAHsS16Yf/FiiUSG1awMRg2t4DaqWwNsiz
+01I8oAcANoB23U788lQDlRd+mfEVgDZQeY9cvSgQ3VrDXY7j6mszYW2QZ6el
+eEAPACxAWnfk0/8up/SqVjO+QhlUBudkJhDd3bsitdpya5LBCUsAU7ke/Jba
+GtADgO0irtz1/v+7Z+DPJK49s/Pb+NRDP+1aF/HVGcPzI8yvmAZpzD/+6/1u
+U9MQivAK09YHvfFhIaF5HynQnqrja+ZOsntxtJNf1LFHGptxheBWdmZRK4Gb
+Djmp4pqTW8KD/ae8ypm5PL2Opjdey5qyF08P01oL4UtFuyoyDxa0mfe6QAW/
+KD5qU+KRw4kboxKu8fXe7GRR2H4YyLUWujqQVBOwC8wSjIvKdLkSYvVcA4BV
+kFTtCfjQYL9Z3pgxz2fTXdULvNGOS//x/v9udJn6iklkzb+t+zSNxAoNlTxt
+4N1Y7zLehLEsGXruJ6zdf70Fkbbf3P++/Uvee6u0B5Cee0lhX19qxxyWJKVK
+6k7+eLGhN6C85dzi15w/J/biIImMd2a5nx1H3/YOSyoqrss781dL75pB0V1X
+JaQ4uyjaLizzfC+7ufdr8qbT8z3DLrYpaAjb3wgmcq39bXo6kGQT8AvMTHCK
+iqhcibF2rgHASiienp03fe2dgdtzsvq0mY5v/ljVOzJlDUff+vc3A2xvMb9i
+6mfaLoT5RhH7jOohefjfJk3PSSBtvnypSTNZiG5HOzv+p1Cg/QztyA+bFVkk
+MFrokpaqkIo0W1GSyu2z5h14bPnVN2lD9tak83EzXAZYshpJlTZkhrs5u3n0
+MsXTfxtVV0d5YzrXceaRJ+qFeG+ufRz9T6jcwi0Mq4WZXPdBUweSbQJRgZkH
+XlHhlqsJaMi1vCVnVUwp2XQCAE2I733tNWOXoXOgouPyeu8xEz747sDO9VuO
+3R94iyn2VwiR804Eui8p1q9vRVfFydhQv8Cv4jeGvTuN4+Qbmdlvm015viKM
+pqbrRsTk2foG3mjHH8HuIXnths4/FKUqFYKbKctCkyrJbnHiR5PWn4pNrRTU
+/uQzcGrFk4oPwstPCQ94c8WRg/GbwwNdvcKOluQc2B6z0NflzQ0F/M7ihQ72
+ulm082rQWMclJbRdDWcw13R1IOUaUGFUYOa2Qv2pUVHhNsHquQZTeIARhNcX
+TZzxY63xiOqp2O3vPmq4XUDsxRYZua/g01Wy2GXGDzUDv4K2X/Qf6xSjWgvK
+GrM+Hm8391STZmeBaL4S12QnpxYabW8QRFN9yi9YPW9DYaf+yBY/+MbL48ty
+gxUjNanyzrJTO1cFuY0c7hSRa2QVRUkq8jg99lCVWCl9bDS14kglQlS+zsUh
+6GyLQom25gTacSL+7FAoZXWpPhPey6+9FDjGQTdDCYsX2o+Ze4W26z2M5Zq+
+DqTaBCV2gZnVCiVeUeE3wcq5hmMTwAiCwuAJPv9bZ3CdFak/+un7Pzzoav1r
+13v2o6d/M2ADD/MrMt7pz+YHGrAguqhvsPKvzOHMPN5oMDrVrtlJNeo9EWHx
+Is7ruks2BPOVrDFjPsc9sszo4g5+NKWCf23X+kOVBheqkeqE6S5LDReRVKWq
+QIUlm1zHBea0DvwBKlLbq4/FHqtRLZyxplZsqUT0VGx2d+r7hrD4kwmTt6m2
+ZdGn57iO/854VPTJ+HEh2rW04OqCcWTX0sRZ7oOhXNPZgZRrALvAzGgFQVHh
+N8HauZ7tPnqMNxcr1wBgPYTFHzv7GF4q6anY4j0zoVo1aNDOvz6b6Bp5S2Ti
+KyZ+5Vqos89Phl/RH5vdZSsneX77QLOHYc41CLxoaE9V5p5Dd4yfEpZUbvea
+HH3b4LoZVal9dN/83Oud820kh61xtDt3497ynuqtZgpn+POjXL3mrL2tm6mw
+pRJBMF+l19f94uuguwbx5MhMR24Gj7Zr4czkmtYOpNYE3AKj3gqiosJvgpVz
+DedNACP0lK/3fKPvMNQPUp347ymr+laeyD/7ZvnG/YOY+AoxSHW8j0eM4bhS
+jc2p+9ShpbUpfn67Hmo33CUPd5g1XxlHQ56cS0wt7bO/VXRWnL3A0+kWXl/i
+xs00HKjkpaLipsetiHrmQGp+/uAL4z09alI1yOoP/tvVYNmPLZUIw/lqq958
+1Yg8zVnkGazaBFIqWs6GTF2a20qfPzBzudZgeQdSaQJBgZnTCvyiwm+ClXMN
+xyaAEeS8jACfrfcNLuSj3ffSVv/Xqv/3Q9qBvV9tOXxvwEMe2F8hRvJopy/X
+8EJx79i0s1+weXdySuL3a7ed1l4KlrbeubAn4OURrhuyrleLSA8kjGjy1txI
+txeGPadh2HAvvYOs5OFO33kH642eGiErFeVfXTXNwS0oJu5wRvovebVi8utm
+nIb3gTG14knFA0WariYHvDzKZ/efte3Ved95jBzN3Xe5vu1uVqTTvyZEZN4S
+IB0Fcas3JR05mrwlOr6wg9YbiJnJdT80dCDZJhAWmDmtwC8qvCZYP9dwbAKY
+oafiK//w65TuEDXjK0oFv2DLR3sG3qqqv6dhOdSiocLSraE7yrowDigskmqb
+DIEOtH4TqAVkXQ0AgOV0/71+QRylO8LN+YpS9XLYnKTUy839i1H12KS2OUgA
+lWiS+tyU5N+bcC+ZsUiqbTIEOtDKTaASkJ01AACW0nPvf0LjKikdacz4ihoU
+aWvv20xXyoXlWWsmjnjl7X255QKL95SoRVOIW/iIiSUoi6TaJkOgA63WBGoB
+2VsDAGAZ8ta8zV/+QekSqRlfAQAAAAAqKDpvHD56m9JdsGZ8BQAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgF4UnSXxK0O4k52mLd1/TzRk
+n3N4RppJDHQCAAAsQVybfvhvgUKJ1KYFTAwesq8pfUaaSQx0AgAAbAGV98jV
+C2jRrTXc5aW02c3bGM9IM4mBTgDYAypjx4k9W3SyF9HdvStSq6m/9tF8GMnp
+4DfTBoFOAJgAacw//uv9blPDHkV4hWnrg974sJCSUR024pqTW8KD/ae8ypm5
+PL1O9a5oheBWdmZRK4EJEBM6NciashdPD9OaFtEkFe2pOr5m7iS7F0c7+UUd
+e4RtOU4Jc3qVEAW/KD5qU+KRw4kboxKu8fVe8Ih2VWQeLGiz9L2stl57pprJ
+UKI1UC1LQqyeawCghKz5t3WfppFYEaGSpw28G+tdxlM0UcVCUnfyx4sNvbOC
+vOXc4tecP/+7z927515S2NeX2jHHACM6tb/NO7Pcz46jb6hHg9Se+wlr919v
+QaTtN/e/b/+S994qC/0hzOhVYhRtF5Z5vpfd3PtVedPp+Z5hF9v6ZixUXJd3
+5q8Wae9/6a6rEpo7adl67ZlqJlOJ1v48tbIkxtq5BgBq9FZkmG9UCVkjQ8nD
+/6Zs8I35s1KRZndGUrl91rwDjzXeOWhHftisyCKB0cKSIZ1qpA3ZW5POx81w
+GWD2arFUafPlS02aSUp0O9rZ8T+FAsuEUu5VE8gb07mOM488US/EZfVpPo7+
+J1Sm5dKGzHA3ZzePXqZ4+m8baBFIQa6N156pZjKXaI08SmVpAhpyLW/JWRVT
+Ss0TFQBwkPNOBLovKdavJ0VXxcnYUL/Ar+I3hr07jePkG5nZ78lNeX4gjKZU
+CG6mLAtNquz3n0c7/gh2D8lrNxhaDOqU1p+KTa0U1P7kM3ASoEuqmq4bEZNn
+G5qUm6NW/SnZXlUqEV5+SnjAmyuOHIzfHB7o6hV2tCTnwPaYhb4ub24o4HcW
+L3Sw102knVeDxjouKaHtajhbao8u/WpoSzTVshyEXIO5PEAjXSWLXWb8UDNw
+qKDtF/3HOsWo1l6yxqyPx9vNPdWkOZMnmh/ENdnJqYVG2wm40eSdZad2rgpy
+GzncKSK3Vfs18YNvvDy+LDdYnjGmE3mcHnuoSqyUPjaaBGiSqvqUX7B63obC
+TqxJ0Zq9qkJUvs7FIehsi0KJtuYE2nEi/uxQKGV1qT4T3suvvRQ4xkE3QwmL
+F9qPmXuFtmt4bKk9uvQraUw09bJUYeVcw7EJoBH+lTmcmccbDQaE2sw6qUa9
+DSEsXsR5XbsnTzQ/yBoz5nPcI8u6DT/Aj6YCFZZsch0XmNOqGa9IdcJ0l6WG
+KzaGdLZXH4s9VqNaqGJNAvRIVSr413atP1SJfYHcqr2qoqdis7tT3yfC4k8m
+TN52v/dEAn16juv474xHRZ+MHxeiXUsLri4YR3YtLeOd/mx+oAELoov0Z2W2
+1B4ezCXanLJUYe1cz3YfPcabi5VrAKCK8Fqos89Pjw22GPSHQ3fZykme3z7Q
+7HyYs+ePH62P7pufe71zvk1TyZLK7V6To2+LbEHnnbtxb3lP9VYzhTP8+VGu
+XnPW3tbNHnRIRXuqMvccukPdQ5KOXlVBMF+l19f94uuguwbx5MhMR24Gj7Zr
+4WypPXr005hos8pShZVzDedNAI0g1fE+HjGGdawaDlP3/aMaDtLaFD+/XQ+1
+m+aShzvMmh8Mo6HipsetiHqcIjU/f/BF/76K8PoSN26m4ahgSqcOWf3Bf7sa
+LFAtl4o8OZeYWtqpvh9K0Vlx9gKP9A1cdPSqCsP5aqvefNWIPM1Z5Bms2gRS
+KlrOhkxdmtuqMA5hJmypPTr005xoHeTLUoWVcw3HJoBOJI92+nINr832Dgc7
++wWbdyenJH6/dttp7eVcaeudC3sCXh7huiHrerWIdOFiREP5V1dNc3ALiok7
+nJH+S16tWLealDzc6TvvYL3RIxrM6OwHYxKwVKq8NTfS7YVhz2kYNtwr7h/y
+9xbT0qso0nQ1OeDlUT67/6xtr877zmPkaO6+y/Vtd7Minf41ISLzlgDpKIhb
+vSnpyNHkLdHxhR203kDMltqzVD/tie6HQllaP9dwbAJoRcEv2PLRnoG3hupv
+I1gOhWiosHRr6I6yLoyND5vSqWRYKrWABFKZxaZyakYv2VqilTacawAwA0l9
+TlLq5eb+9Z96OCRU0zk/kIkmqc9NSf69Cff+WlvRqWRcKpWApqQyi63k1Nxe
+sqFEK2091wBgBijS1t63Ba+UC8uz1kwc8crb+3LLBRbv4VCIphC38BET6z1b
+0Mm0VGoByUhlFlvIqSW9ZCOJVrIh1wAAAAAAAAAAAAAAAAAAAAAAAAAAAABg
+uyg6S+JXhnAnO01buv+eaChfgKe3pVbqt2cnHQAAAPiIa9MP/y1QKJHatICJ
+wUP5gUt6W2qlfnt20gEAAEAAKu+Rq1fnoltruMtLaTPOsD3obamV+u3ZSQcA
+4IPK2LFlwBadrEZ0d++KVBLGtfTBVFrpbamV+m3w0wEA1gRpzD/+6/1uU2Me
+RXiFaeuD3viwkAYPH3HNyS3hwf5TXuXMXJ5ep3rqXSG4lZ1Z1ErwOjMmdGqQ
+NWUvnh6mfXEZTVLRnqrja+ZOsntxtJNf1LFH2OYJg6GWEAW/KD5qU+KRw4kb
+oxKu8fXeZYd2VWQeLGiz9CFTFqTVnJYaV7gl0XRYPR0AYCPImn9b92kaibUW
+KnnawLux3mU8Db7YkrqTP15sQFQ+zucWv+as9bjpuZcU9vUlI3815nRqf5t3
+ZrmfHUf/pZo0SO25n7B2//UWRNp+c//79i95762i5003FNUSo2i7sMzzvezm
+3q/Km07P9wy72NY3HaLiurwzf7VIe/9Ld12V0NwZkQVpNaulOBVuab9ZOx0A
+YCv01nqYb9TAl+wTYI6HDubPSkWarRlJ5fZZ8w5oXXDQjvywWZEqk0/b0KlG
+2pC9Nel83IyBJm4WS5U2X77UpDkaiW5HOzvqHLEHU60J5I3pXEedrU99mo+j
+/wmV/YK0ITPczdnNo5cpnv7bKgi8YuUtOatiSrG7gwVppdBSfXAq3MxoWmhI
+BwCwAjnvRKD7kmL9uUHRVXEyNtQv8Kv4jWHvTuM4+UZm9r+Xn/LkQBhNqRDc
+TFkWmlTZ7/eGdvwR7B6S124whzKoU1p/Kja1UlBrZDBKk1Q1XTciJs82tFsY
+DLVKJcLLTwkPeHPFkYPxm8MDXb3CjpbkHNges9DX5c0NBfzO4oUO9rqDZufV
+oLFk7VB1EFgnsCitZvyE+lOjCjeB1dMBAKygq2Sxy4wfagbOiWj7Rf+xTjGq
+taOsMevj8XZzTzVp9giIJgdxTXZyaqHRvhFuNHln2amdq4LcRg53iuj3dxM/
++MbL48tyg4UfYzqRx+mxh6rEmObX9EhVfcovWD1vQyGmibWV1aoQla9zcQhS
+ucqhrTmBdpyIPzsUSlldqs+E9/JrLwWOcdBNf8LihfZj5l6hdt5CcGxiUVoJ
+oFjhprByOgCAFfCvzOHMPN5oMGz0LWOExYs4r+t2ywkmB1ljxnyOe2RZt+EH
++NFUoMKSTa7jAnNaNRMzUp0w3WWp4VqQIZ3t1cdij9WoVsFYkxg9UpUK/rVd
+6w9VYt8JYW21KgisujMeFX0yflyIdqEuuLpgHNmFuox3+rP5gSpmu48e481V
+/3NBdJH+EZhFaSWCWoWbwtrp0MMgHQBgOwivhTr7/PTYYC9Jf6x1l62c5Pnt
+A82ehDkb/vjR+ui++bnXO+fbNGNEUrnda3K0odM1Mzrv3I17y3uqt5opnOHP
+j3L1mrP2tm7aoUMq2lOVuefQHSHlGYImtSoIJsP0+rpffB10FzieHJnpyM0g
+a1qugeC8iUVppfYTRBVuCiunAwBYAVId7+MRYzgOVWNt6j61b7S0NsXPb9dD
+7Qa65OEOsyYHw2iouOlxa5/VDFLz8wdf9O94CK8vceNmGo43pnTqwDC/pkEq
+8uRcYmppp/pOK0VnxdkLPNJ36tGkVoXhZLhVbzJsRJ7mLPIMVu0wKRUtZ0Om
+Ls1tJe2I3gfBsYlFaaX6E/gVbgorpwMA2IHk0U5fruFF+N6xZme/YPPu5JTE
+79duO629tCttvXNhT8DLI1w3ZF2vFpEeEhjRUP7VVdMc3IJi4g5npP+SVyvW
+LSklD3f6zjtYb/SICTM6+8GYxCyVKm/NjXR7YdhzGoYN94r7h/xN5HSpRZGm
+q8kBL4/y2f1nbXt13nceI0dz912ub7ubFen0rwkRmbcESEdB3OpNSUeOJm+J
+ji/soLxKJzg2sSmt1H4Cv8KJsX46AIAlKPgFWz7aM/CmU/09CsuhEA0Vlm4N
+3VHWhTGQbUqnkmGplAMSqGUWFqWVrp8AAIAkkvqcpNTLzf2LV/VYS6imc3Ig
+E01Sn5uS/HsT7o3UtqJTybhUigFNqWUWFqWVhp8AAIAKKNLW3rc5rpQLy7PW
+TBzxytv7cssFFu8YUIimELfwERPrVVvQybRUq6hlFhal1cKfAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAIBnAkVnSfzKEO5kp2lL998T0XbXgpXCAowARQIAwOAi
+rk0//LdAoURq0wImBuM8pWozYQFGgCIBAGCQQeU9cvWCVXRrDXd5KV2WB1YK
+CzACFAkAmAKVsebMn0VSexHd3bsilYQDrG2EJYBd3c4uhkyRAAAJkMb847/e
+7zY1oaAIrzBtfdAbHxZa7hiD9lQdXzN3kt2Lo538oo490hhEKAS3sjOLWgne
+ZcaAVC2ypuzF08O0714zLRULcc3JLeHB/lNe5cxcnl6n/yIBtKsi82BBm3kP
+byr4RfFRmxKPHE7cGJVwja/3rjmLwvbDom4nJRW7/BhQiwVbiwQA6EXW/Nu6
+T9NILJlQydMG3o31LuNpMMXuuZ+wdv/1FkTafnP/+/Yvee+t0g7BnntJYV9f
+MrKIY06q9rd5Z5b72XH03wtKJBUTSd3JHy82ICqb8nOLX3Pud/lBxXV5Z/5q
+kfZOIN11VUKKk4Si7cIyz/eym3u/Jm86Pd8z7GKbgoawOljU7SSl4pffoKrF
+hKVFAgA001uyYb5RA00CCDDHQAcDafPlS02a6UB0O9rZUWczrfLEzg+bFaky
+EbUJqRrBDdlbk87HzRjoQ4crFQeFVKTZ7ZJUbp8174DGuEjakBnu5uzm0csU
+T/9tFeQdV9XIG9O5jjpPn/o0H0f/EyqHBwvD6kSzp9vJSiUqv8FTi4PNFom8
+JWdVTCnZOgAAy5DzTgS6LynWLzhFV8XJ2FC/wK/iN4a9O43j5BuZ2e8rQHnm
+IYymputGxOTZ+jYJaMcfwe4hee0Gg5lBqdL6U7GplYJaI49UHKkmWq0Q3ExZ
+FppUKVaSBOHlp4QHvLniyMH4zeGBrl5hR0tyDmyPWejr8uaGAn5n8UIHe93s
+2nk1aCxZL1QysKjbqUpVY1R+g6WWdUVC5HUCAHTTVbLYZcYPNQNHJtp+0X+s
+U4xqqSdrzPp4vN3cU02aU32imUdck52cWmi0e0EQTfUpv2D1vA2FA5yhxQ++
+8fL4stxgCceYVORxeuyhKjGmfze2VCJh8s6yUztXBbmNHO4UQd5vTlS+zsUh
+SGUph7bmBNpxIv7sUChldak+E97Lr70UOMZBN9EIixfaj5l7hbbrPSzqdqpS
+ldjlN0hqibTZZJHAsQkYTPhX5nBmHm80qH59Pxph8SLO67pNb4KZR9aYMZ/j
+HlnWbfgBfjSlgn9t1/pDlQaXopHqhOkuSw1XdQxJba8+FnusRrWexZp2sKWa
+aLVSZRNUssl1XGBOq+U+3RmPij4ZPy5EuyQWXF0wjuySWMY7/dn8QAMWRBfp
+T9Us6naqUnHKb5DUmtCmtL0ime0+eow3F6tIAIB2hNdCnX1+emywo6E/ZLrL
+Vk7y/PaBZmvBnKsJeNHQnqrMPYfuCI1qXFK53WtytKFTNzNS79yNe8t7qrea
+KZzhz49y9Zqz9rZuAsGWSiysj+6bn3u9c77N8mknvb7uF18H3aWEJ0dmOnIz
+qDiKE8OibqcmFbf8BkktkTYtNlUkcN4EDCZIdbyPR4zhsFENman71Abh0toU
+P79dD7X74JKHO8yaeYyjIU/OJaaWdqrvFVJ0Vpy9wNPdKiW8vsSNm2k4cpiT
+qgHDvxtHKl4oVNz0uLXPIAip+fmDL8hv1xhOO1v1pp1G5GnOIs9g1V6OUtFy
+NmTq0txW0o7lJmFRt1ORSlB+g6QWL5TNFgkcm4BBRfJopy/X8FJw75Cxs1+w
+eXdySuL3a7ed1l6hlbbeubAn4OURrhuyrleLSFc2RjR5a26k2wvDntMwbLhX
+3D+6uUHycKfvvIP1Rg+FMCO1H4xpB08qdiiUf3XVNAe3oJi4wxnpv+TVikmu
+h1Gk6WpywMujfHb/Wdtenfedx8jR3H2X69vuZkU6/WtCROYtAdJRELd6U9KR
+o8lbouMLO2i9D5hF3U5WKmH5DZpa7FC2WyRwbAIGFwW/YMtHewbeO6q/1WA5
+1KKhwtKtoTvKujCGJIuk0i2MSVjU7daXSjngM1IkAGANJPU5SamXm/uXm+oh
+k1BN58xDMpqkPjcl+fcm3Dt62SOVXmEMw55ut7ZUigGfpSIBAGuAIm3tfXvc
+SrmwPGvNxBGvvL0vt1xg8e4QtWgKcQsfMbGJwQap9AqzCdjQ7daWSq/aIVgk
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAMBWFJ0l8StDuJOdpi3df08EL68BBhUo
+PwAAsBDXph/+W6BQIrVpAROD4XFMYFCB8gMAABNU3iNXr1ZFt9Zwl5fS5scB
+ACSA8gNwQGWsOYtmkVQ2Irq7d0UqCT9c+mBRQlkklaUMfvkBgw7SmH/81/vd
+psYSivAK09YHvfFhoeXuQGhP1fE1cyfZvTjayS/q2CONTYFCcCs7s6gV69Vj
+zElVimtObgkP9p/yKmfm8vQ6hEadxpFpQNaUvXh6mPaVbqalEqLgF8VHbUo8
+cjhxY1TCNb7eK/LQrorMgwVtlj40CrVHBqo5hfIDhgCy5t/WfZpGYvmBSp42
+8G6sdxlPg+N2z/2EtfuvtyDS9pv737d/yXtvlXZk9NxLCvv6kpGjG3NSJXUn
+f7zYgKg8qc8tfs1Z67BDg06cyJYh451Z7mfH0X/dKJFUYhRtF5Z5vpfd3PtV
+edPp+Z5hF9v6pgdUXJd35q8Wae9/6a6rEpo7Q0DtkYJiTqH8gKFAb/rDfKMG
+vtOfAHPceTCQNl++1KSZEUS3o50ddW7RKgvr/LBZkSovUJuQqlRIRZrdGUnl
+9lnzDmj9gSzXiRfZAqQN2VuTzsfNGGhvhyvVBPLGdK6jzvSnPs3H0f+EyupB
+2pAZ7ubs5tHLFE//bRXGjq79IVpyVsWUYvcF1B45wdRyCuUHDAnkvBOB7kuK
+9QtZ0VVxMjbUL/Cr+I1h707jOPlGZvbbAFAedITR1HTdiJg8W9/YAO34I9g9
+JK/doJQZlqoQ3ExZFppU2e/9RpNOjMjm6pTWn4pNrRTUGlmv4khVKhFefkp4
+wJsrjhyM3xwe6OoVdrQk58D2mIW+Lm9uKOB3Fi90sNdN3Z1Xg8aSNUvt7w18
+YwWoPTLRqOYUyg8YGnSVLHaZ8UPNwBUT2n7Rf6xTjGqhI2vM+ni83dxTTZrT
+ZqJBJ67JTk4tNDp3J4im+pRfsHrehsIBBs/iB994eXxZbrAcYlKqvLPs1M5V
+QW4jhztF9Hu90aETO7JZOpHH6bGHqsSYtuDYUlWIyte5OASpPOfQ1pxAO07E
+nx0Kpawu1WfCe/m1lwLHOOimA2HxQvsxc69QOxkgODZB7ZmORj2nUH7A0IB/
+ZQ5n5vFGg+rTt5URFi/ivK7biyYYdLLGjPkc98gyo11r/GhKBf/arvWHKnsG
+LqiQ6oTpLksNV0gMS1WqrHhKNrmOC8xpRenUiRXZDJ3t1cdij9WoFrBYkwO2
+VBUERt4Zj4o+GT8uRLtwFVxdMI7swlXGO/3Z/EAVs91Hj/Hmqv+5ILpI/zgA
+tWcqmjk5hfJT6pefHgblB9g4wmuhzj4/Ge4069ded9nKSZ7fPtCc8ZuzkY4X
+De2pytxz6I7QqF4kldu9JkcbemszKVVL983Pvd4534bSqRMrMnWdd+7GveU9
+1VvNFM7w50e5es1Ze1s3q2BLVUEwOaTX1/3i66Db8H9yZKYjNwPLWpwAgvMm
+qD0T0czKKZQfMDRAquN9PGIMi0ZVe1P3qW2qpbUpfn67Hmq3pyUPd5g16Iyj
+IU/OJaaWdqrvu1F0Vpy9wNPdwyq8vsSNm2lYhUxJRcVNj1v7THiQmp8/+KJ/
+68NSnfiRzdGpA8MWHEeqCsPJYave5NCIPM1Z5Bms2nFRKlrOhkxdmttK2mi9
+D4JjE9QeyWhKKjmF8gOGCJJHO325+leDVfTWnp39gs27k1MSv1+77bT2wqm0
+9c6FPQEvj3DdkHW9WkS6SjCiyVtzI91eGPachmHDveL+0U0Pkoc7fecdrDd6
+JIIZqSj/6qppDm5BMXGHM9J/yasV69aWlurEj2yOzn4wJgc8qSjSdDU54OVR
+Prv/rG2vzvvOY+Ro7r7L9W13syKd/jUhIvOWAOkoiFu9KenI0eQt0fGFHZRX
+rQTHJqg9MtH6oJBTKD9giKDgF2z5aM/A+zD1z9kth1o0VFi6NXRHWRfGSLEp
+qWzRqSSUyiws6iiQanY0my0/wPaR1OckpV5u7l9pqWsvoZrOSiYZTVKfm5L8
+exPukxa2IpUtOpWmpTILizoKpJoTzbbLD7B9UKStvW/rWSkXlmetmTjilbf3
+5ZYLLD6JphZNIW7hIybWV7YglS06SUplFhZ1FEgdeuUHAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAGRRdJbErwzhTnaatnT/PRFcDgcGFSg/AACwENemH/5boFAi
+tWkBE4Nxnr4FAOsA5QcAACaovEeuXq2Kbq3hLi8FawNgMIHyA3BAZew4i2aL
+TvYiurt3RSoJu1j6gJwCOga//AAaQXuqjq+ZO8nuxdFOflHHHvVgj2ykMf/4
+r/e7TQ17FOEVpq0PeuPDQhqMVsQ1J7eEB/tPeZUzc3l6neoxdIXgVnZmUavR
+m7mY1alB1pS9eHqY9k1idEk17gQGpBKi4BfFR21KPHI4cWNUwjW+3hvk0K6K
+zIMFbZY+7znUckpuxFHBeiMFyg9gjJ77CWv3X29BpO03979v/5L33irjApQ1
+/7bu0zQSyw9U8rSBd2O9y3gaDKkldSd/vNiAqHy9zy1+zVnrONNzLyns60tG
+hmfM6dT+Nu/Mcj87jv5bLmmQitMJgyqVGEXbhWWe72U3935V3nR6vmfYxba+
+6QEV1+Wd+atF2vtfuuuqhObOEEMvp2RGHCWsN1Kg/ADmkDZfvtSkGRui29HO
+jjoTZB296Q/zjRr41nsCzDGvwUIhFWl2ZySV22fNO6D1pEE78sNmRapcN21D
+pxppQ/bWpPNxMwa6qlkuFa8TBk+qCeSN6VxHnclOfZqPo/8JlRmCtCEz3M3Z
+zaOXKZ7+2yowPE91IVpyVsWUYvfFEMwpiRFHEeuNlGe9/ABboetGxOTZhq/X
+V8p5JwLdlxTrJ0/RVXEyNtQv8Kv4jWHvTuM4+UZm9r8on/L8QBit94z/Zsqy
+0KTKfi80tOOPYPeQvHaDOmZQp7T+VGxqpaDWyPGTJqkYnTBYUpVKhJefEh7w
+5oojB+M3hwe6eoUdLck5sD1moa/LmxsK+J3FCx3sdbNr59WgsWTNSft7A99H
+YyjnVAX2iDNDrfpTa42UZ7b8ABsB5Resnreh0Mi3uKtkscuMH2oGjh+0/aL/
+WKcY1UJH1pj18Xi7uaeaNKfNRPODuCY7ObXQ6NwdN5q8s+zUzlVBbiOHO0X0
+e5+JH3zj5fFlucFaiDGdyOP02ENVYkw3ajqkYnfCIElVISpf5+IQpPJ4Q1tz
+Au04EX92KJSyulSfCe/l114KHOOgmw6ExQvtx8y9Qu28hWByGLI57fsUZ8RR
+Vqu05kh5hssPsAkU/Gu71h+qxLguy78yhzPzeKNB9el7uAiLF3Fe1+1FE8wP
+ssaM+Rz3yDKjXWv8aCpQYckm13GBOa0acUh1wnSXpYbLI4Z0tlcfiz1Wo1oV
+Yo04eqRidcIgSVVBYJyd8ajok/HjQrQLV8HVBePILlxlvNOfzQ9UMdt99Bhv
+rvqfC6KL9KfqoZxT/BFHUa3VRwpWZDN0sq/8AOZBe6oy9xy6I8RMi/BaqLPP
+T4Y7zfq11122cpLntw80Z/zm7PnjR+uj++bnXu+cb9Pok1Ru95ocbeg7zYzO
+O3fj3vKe6q1mCmf486Ncveasva0bqvRIxeqEQZKqgmBySK+v+8XXQbfh/+TI
+TEduBpb5NgEEC9chm1PCEUdNrfVHClZk6jpZWH4A0yBPziWmlnaqb29RdFac
+vcAbcN8QUh3v4xFjWDSq2pu6T+1mLa1N8fPb9VC7PS15uMOs+cEwGipuetza
+5/2C1Pz8wRf9+wnC60vcuJmGJciUTh0YbtQWS8XvhEGSqsJwctiqNzk0Ik9z
+FnkGq3ZclIqWsyFTl+a2kvYh74NgchiSOTU54qiqtd5IecbLD2AUeWtupNsL
+w57TMGy4V9w/BgNF8minL9fwgm1v7dnZL9i8Ozkl8fu1205rL5xKW+9c2BPw
+8gjXDVnXq0WkqwQjGsq/umqag1tQTNzhjPRf8mrFugWb5OFO33kH642eh2BG
+Zz8YI85SqfidMGhSUaTpanLAy6N8dv9Z216d953HyNHcfZfr2+5mRTr9a0JE
+5i0B0lEQt3pT0pGjyVui4ws7KN+tSzQ5DMGckhhx1NRab6Q88+UH2DoKfsGW
+j/YMvA9T/5zdcihEQ4WlW0N3lHVhDBOb0qkcKlKZhUUdZX2p1AJC+QHPApL6
+nKTUy839Ky117SVU01nJZKJJ6nNTkn9vwr3p1lZ0KoeUVGZhUUdZWSqVgFB+
+wDMDirS19209K+XC8qw1E0e88va+3HKBxU9cU4imELfwEROLK1vQOfSkMguL
+OspqUqkFhPIDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGooOkviV4ZwJztNW7r/
+nmjIXsmmt5lW6rRnJBcAAACmENemH/5boFAitWkBE4OH7JOL9DbTSp32jOQC
+AADAJKi8R65eoItureEuL6XmSsAe6G2mlTrtGckFAJgClcGuAaBBdHfvilQS
+prT0wUj50dtMK3Xa4OcCAKwM0ph//Nf73abGPIrwCtPWB73xYSENvqLimpNb
+woP9p7zKmbk8vU71+LhCcCs7s6jV6I1aFHWiPVXH18ydZPfiaCe/qGOPsC0I
+zEHWlL14epj2JWA0qcXoBwakEqLgF8VHbUo8cjhxY1TCNb7ee+rQrorMgwVt
+lj6qaevlZ0EzBybC0miDkAsAsB1kzb+t+zSNxHILlTxt4N1Y7zKeBs9rSd3J
+Hy82ICpD5HOLX3PWOsX03EsK+/qSkVEZFZ099xPW7r/egkjbb+5/3/4l771V
+9Mz3Mt6Z5X52HP0XVNKgFqcfBlUqMYq2C8s838tu7v2qvOn0fM+wi219MyIq
+rss781eLtPe/dNdVCc2dFG29/CxppnEiLOs0a+cCAGyI3nIP840a+LZ6Aszx
+x8H8WalIszUjqdw+a94BrZcM2pEfNitS5ZZppk5p8+VLTZqjkeh2tLOjzq/Z
+IqQN2VuTzsfNGGiIZrFa3H4YPKkmkDemcx11/jj1aT6O/idUPgbShsxwN2c3
+j16mePpvq8CwK9WFaMlZFVOK3Re2Xn4UmmmEcSIsiaakJRcAwBbkvBOB7kuK
+9ecGRVfFydhQv8Cv4jeGvTuN4+Qbmdn/gnvKkwNhNKVCcDNlWWhSZb+HGdrx
+R7B7SF67wRxKVaearhsRk2cbOgGYI1Vafyo2tVJQa2TWSZda434YLKlKJcLL
+TwkPeHPFkYPxm8MDXb3CjpbkHNges9DX5c0NBfzO4oUO9rrje+fVoLFkfUX7
+ewPfg4At5WdGfNxEEGH1XAAAW+gqWewy44eagdM32n7Rf6xTjGr5KGvM+ni8
+3dxTTZptAqLJQVyTnZxaaLRvhBtN3ll2aueqILeRw50i+j3LxA++8fL4stxg
+7UdVp+pTfsHqeRsKMS2WKUlFHqfHHqoSYxpJ06EWux8GSaoKUfk6F4cglT0b
+2poTaMeJ+LNDoZTVpfpMeC+/9lLgGAfdDCgsXmg/Zu4VauctBMcmtpQfAdQT
+QYiVcwEAbIF/ZQ5n5vFGgwGt770iLF7EeV13HYRgcpA1ZsznuEeWGV0xwY+m
+AhWWbHIdF5jTqjmGINUJ012WGi4HqepUKvjXdq0/VIl9JwQVqe3Vx2KP1ajW
+wljzDE1qMfphkKSqIPC8znhU9Mn4cSHatbrg6oJxZNfqMt7pz+YHqpjtPnqM
+N1f9zwXRRfqLBbaUHxGUE0GItXOhh0EuAMCmEF4Ldfb5yfAqh/5w6y5bOcnz
+2weabQ9zNvzxo/XRffNzr3fOt2mGiaRyu9fkaEO/aGo60Z6qzD2H7ggpjzzj
+gHfuxr3lPdVbzRTO8OdHuXrNWXtbN7nRoRa7HwZJqgqC+TC9vu4XXwfdNY4n
+R2Y6cjOwfLMJIDhvYkv5UYtvIhGEWDkXAMAWkOp4H48Yw6GoGm5T96mNoqW1
+KX5+ux5q9+glD3eYNTkYRkPFTY9b+zxbkJqfP/iif1NFeH2JGzfTcMhR0Yk8
+OZeYWtqpvoNJ0Vlx9gKP9J16+A1XYhpJW6wWvx8GSaoKw/lwq9582Ig8zVnk
+GazaZFIqWs6GTF2a20ra7bwPgmMTW8qPanwdWIkgxMq5AADWIHm005dreL9A
+73Czs1+weXdySuL3a7ed1l49lrbeubAn4OURrhuyrleLSI8KjGgo/+qqaQ5u
+QTFxhzPSf8mrFetOFiQPd/rOO1hv9JQJWZ3y1txItxeGPadh2HCvuH/I30SO
+0/A+MOYZS9Xi98OgSUWRpqvJAS+P8tn9Z217dd53HiNHc/ddrm+7mxXp9K8J
+EZm3BEhHQdzqTUlHjiZviY4v7KC8UCc4NrGm/KjF74fascn6uQAA9qDgF2z5
+aM/A+071tyksh0I0VFi6NXRHWRfGFG19nZQDMqqWNqnMYlMdZVYv0V6EAABo
+kNTnJKVebu5fvKqHW0I1nZMDmWiS+tyU5N+bcO/5trJOigEZVkunVGaxlY4y
+s5doL0IAAPpBkbb2vv13pVxYnrVm4ohX3t6XWy6weNOAQjSFuIWPmFiyWk0n
+5YCMqqVfKrPYQkeZ1Uu0FyEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAsB9FZ0n8
+yhDuZKdpS/ffE9F2y4KVwgKDDJQHAABMIK5NP/y3QKFEatMCJgbjPKJqM2GB
+QQbKAwAARkDlPXL1slV0aw13eSldlgdWCgsMMlAeAEAaVMaaLQAWSRXd3bsi
+lYT9q22EJYBFfc4ihkx5AAAVkMb847/e7zY1p6AIrzBtfdAbHxZabhqD9lQd
+XzN3kt2Lo538oo490nhZKAS3sjOLWgleZ8aAVKW45uSW8GD/Ka9yZi5Pr0NI
+6SRA1pS9eHrYQOO/rorMgwVt5j28qeAXxUdtSjxyOHFjVMI1vt6L5iwK2w9b
++pyUTuzCG2ypBLCuPADASsiaf1v3aRqJtRMqedrAu7HeZTwNptg99xPW7r/e
+gkjbb+5/3/4l771V2ne+9NxLCvv6kpFFHHNSJXUnf7zYgKi8xc8tfs1Z6/5D
+pJMIGe/Mcj87jt77P1FxXd6Zv1qkvdNId12VkGJERduFZZ7vZTf3fk3edHq+
+Z9jFNgUNYfv1sqTPSerEL7zBk0oE28oDAKxFb+2G+UaRfom/OQY6GEibL19q
+0kwKotvRzo46p2mVLXZ+2KxIlY+oTUhVKqQizS6VpHL7rHkHtG5DuDqJkDZk
+b006Hzej329O2pAZ7ubs5tHLFE//bRXkHVfVyBvTuY46T5/6NB9H/xMqhwcL
+w2phS5+T1UlUeIMklVCeDZaHvCVnVUwpeZcPAKAFOe9EoPuSYv3KU3RVnIwN
+9Qv8Kn5j2LvTOE6+kZn97/2nPPkQRlPTdSNi8mx9mwS0449g95C8doNRzbBU
+heBmyrLQpMp+XzocnQRxpPWnYlMrBbWUvFARXn5KeMCbK44cjN8cHujqFXa0
+JOfA9piFvi5vbijgdxYvdLDXTbCdV4PGkvVCJQNb+pyqTjVGhTcoUllXHkQW
+JwBgNbpKFrvM+KFm4PhE2y/6j3WKUa35ZI1ZH4+3m3uqSXPOTzT5iGuyk1ML
+jbYxCKKpPuUXrJ63oXCAObT4wTdeHl+WG6zlmJQq7yw7tXNVkNvI4U4R/T50
+2Dpx4yCP02MPVYmp+3SLyte5OASpLOXQ1pxAO07Enx0Kpawu1WfCe/m1lwLH
+OOimG2HxQvsxc6/QcL2nD7b0OVWdSuzCGwypuHFstTzg2AQwAv/KHM7M440G
+o1DfkkZYvIjzunYXnWjykTVmzOe4R5YZeU/jR1Mq+Nd2rT9UaXBBGqlOmO6y
+1HB5x7BUpcrep2ST67jAnFaUSCdOnPbqY7HHalQLZMqTD4FPd8ajok/GjwvR
+LowFVxeMI7swlvFOfzY/0IAF0UX6szVb+pyqTpzCGwypOHFsuDxmu48e483F
+Kg8AsB7Ca6HOPj89NtjX0B873WUrJ3l++0CzV2HOBQW8aGhPVeaeQ3eERsUu
+qdzuNTna0KmbSalaum9+7vXO+TaUSCd2nDt3497ynuqtZgpn+POjXL3mrL1t
+NPthQjD5pNfX/eLroLug8OTITEduBhVHcWLY0ufUdOIW3mBIxY5jw+UB500A
+IyDV8T4eMYbjRzV2pu5Te5lLa1P8/HY91G6sSx7uMGvyMY6GPDmXmFraqb5p
+SNFZcfYCT3fDlPD6EjdupuEQYkoqKm563Npn7IPU/PzBF/2bNtg6iVUpqfp0
+K40nn616k08j8jRnkWewakdHqWg5GzJ1aW4rabtyk7Clz6noJCi8wZCKL0yD
+rZUHHJsAZpA82unLNbwg3Dt27OwXbN6dnJL4/dptp7WXfKWtdy7sCXh5hOuG
+rOvVItIljhFN3pob6fbCsOc0DBvuFfePboaQPNzpO+9gvdHTIcxIRflXV01z
+cAuKiTuckf5LXq1Yt9rG04mvqg9qkw+KNF1NDnh5lM/uP2vbq/O+8xg5mrvv
+cn3b3axIp39NiMi8JUA6CuJWb0o6cjR5S3R8YQetdwOzpc/J6iQsvMGRih2n
+H1srDzg2AQyh4Bds+WjPwJtI9fccLIdaNFRYujV0R1kXxoaLTUkl0Em3KiZh
+S59bXye1gM9IeQCAVZHU5ySlXm7uX3Sqx05CNZ2TD8lokvrclOTfm3Dv67UV
+qSZ00quKYVjS59bWSSXgs1QeAGBVUKStvW/TXCkXlmetmTjilbf35ZYLLN4g
+ohZNIW7hIyYuUduCVEKd9KqyCWy+z62tk0apQ7A8AAAAAAAAAAAAAAAAAAAA
+AAAAAAAAgEFC0VkSvzKEO9lp2tL990SWvmmF3mjWDmuD2HI6IAtDnme24YDt
+Ia5NP/y3QKFEatMCJgZb+uwgvdGsHdYGseV0QBaGPM9swwEbBJX3yNXLI9Gt
+NdzlpRbaRtAbzdphbRBbTgdkYcjzzDb8GQOVsemUWHR374pUEratTESzdlgC
+mEqiLacDsjDkeWYbzlqQxvzjv97vNjVOUIRXmLY+6I0PCy03CEJ7qo6vmTvJ
+7sXRTn5Rxx5pzAoUglvZmUWtWO8gI0Bcc3JLeLD/lFc5M5en1+k/bY92VWQe
+LGgz5wlHWVP24ulhA15rZkE01Ut1iuKjNiUeOZy4MSrhGl/vdXMWhe2HgSRq
+GdhX+Ek0o6XYdWJuNOuUij5DIAukmkCQFzMxTo0NzQYAI8iaf1v3aRqJtQQq
+edrAu7HeZTwNpts99xPW7r/egkjbb+5/3/4l771V2iLquZcU9vUlI183fCR1
+J3+82ICozKPPLX7Nud9SBxXX5Z35q0XaW+TddVVCSiUp451Z7mfH0XvlpiXR
+1J7hyzzfy27u/Zq86fR8z7CLbQoawvbrZSKJ2t826ivMJJrVUtw6MSuaVUpF
+jyGQBZJNwB+/ZoKTGtuYDQBG6J00w3yjSL+R3xyDHgykzZcvNWmqWXQ72tlR
+Zxut8rLOD5sVqTIFJYdCKtLsjEgqt8+ad0Dj4iNtyAx3c3bz6GWKp/+2CmP7
+UQJ5Ddlbk87Hzei3eLMkWi/yxnSuo85Gpz7Nx9H/hMo8gUJYeUvOqphS7Dwx
+k8Q+jPtKhVESzetAvDoxMx1WKBX96OzPAtkmEI1f88BJDQOzAdFAAwYROe9E
+oPuSYv1MKLoqTsaG+gV+Fb8x7N1pHCffyMz+l/hTHlCE0dR03YiYPFvf3gDt
++CPYPSSv3bAciUMpBDdTloUmVYqV5MCPJq0/FZtaKailZD+K8PJTwgPeXHHk
+YPzm8EBXr7CjJTkHtscs9HV5c0MBv7N4oYO9bvx2Xg0aS9Z+VAeBVQGDScTt
+K7wkUv8JLUZ1YnY0qqVCjiGQBapNUEMlLyYDGqdmcGYDPcATxEboKlnsMuOH
+moGFhbZf9B/rFKNarMgasz4ebzf3VJPmHJhoQIlrspNTC43OvwmiqT7lF6ye
+t6FwgNOz+ME3Xh5flhuvbXBDyTvLTu1cFeQ2crhTRL+5mwmwoyGP02MPVYmp
+W2OLyte5OASpXNzQ1pxAO07Enx0Kpawu1WfCe/m1lwLHOOiORsLihfZj5l6h
+tmImGDKMJZGor3CTiAf1OjErmlmlQoYhkAWqTVAS54XqhICdmkGaDXTAsclG
+4F+Zw5l5vNEgf/r+MsLiRZzXddu2BANK1pgxn+MeWWZkJI0fTangX9u1/lCl
+wZVUpDphustSrPMKglBKlWdOySbXcYE5rSQnMIxo7dXHYo/VqNZflI9NBNbY
+GY+KPhk/LkR73iS4umAc2fMmGe/0Z/MDVcx2Hz3Gm6v+54LoIv3JgKEkEvcV
+fhLxoFwn5kZTUi6V/izoMfSyQLUJxHkxZ0JQGqdmkGYDMgMNGEyE10KdfX56
+bHBCrp/07rKVkzy/faA5OTZnkxwvGtpTlbnn0B2hUfIlldu9JkcbOmwTC+uj
+++bnXu+cbzPj2NQX7c7duLe8p3qrmcIZ/vwoV685a28bDS5MCI5N6fV1v/g6
+6K43PTky05GbgWXWTQDBco6ZJJroK/wkkv8JE3ViVjQt1EqFBEMgC9SaYF5e
+CAJqGZiawZoNtMB5k42AVMf7eMQYJl6V9Kn71GbV0toUP79dD7U7uZKHO8wa
+UMbRkCfnElNLO9V3qyk6K85e4Onu9BFeX+LGzcSau7FCoeKmx619bjlIzc8f
+fEH+LB6/mUqq1thK42PTVr1jUyPyNGeRZ7Bqw0+paDkbMnVpbitp0/I+CIYM
+c0nUgNVX+Emk9hMEdUI5mvmlQoIhkAUqTTA3LzgB8VMzWLOBFjg22QqSRzt9
+uYZXMnuTbme/YPPu5JTE79duO629xihtvXNhT8DLI1w3ZF2vFpGeWzGiyVtz
+I91eGPachmHDveL+0ZW25OFO33kH67Eea8AIhfKvrprm4BYUE3c4I/2XvFox
++WUSTjP7oHZsQpGmq8kBL4/y2f1nbXt13nceI0dz912ub7ubFen0rwkRmbcE
+SEdB3OpNSUeOJm+Jji/soDwpEg0ZZpLYD0ZfESSRwk8Q1gnlaBaUChmGQBbI
+NsGCvGAHxE/NoM0GWuDYZDMo+AVbPtoz8KZK/ZNly6EWDRWWbg3dUdaFWVRM
+CrNlWJVEen5icKORYghkwfpNoBZwEGcDwBaR1OckpV5u7l8tqZOeUE3ngCIZ
+TVKfm5L8exPeDanMCbN52JNEOn5isKORhf1ZsHYTqAQc1NkAsFFQpK29b5dW
+KReWZ62ZOOKVt/fllgss3o+nFk0hbuEjeMs8JoWxAjYkkZ6fGNxo1GBzFjRY
+rQnUAg7ibAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA8wyg6S+JXhnAnO01buv+e
+CN7nMpSBXAMAwBLEtemH/xYolEhtWsDEYHhCcSgDuQYAgC2g8h65egEturWG
+u7yUms0HwCog1wDbQGXsOL1ni042Irq7d0UqCYPXwYUtGWeLzj5sM9fAswHS
+mH/81/vdpgYMivAK09YHvfFhIQ1mneKak1vCg/2nvMqZuTy9TvVst0JwKzuz
+qJXg5V9M6NQga8pePD1M+7IymqSiPVXH18ydZPfiaCe/qGOPqFhA0KsWC+ME
+6WR3VWQeLGiz7IFHcm2HyjQJDbkmyIWpXJNrOH4tWQAdRQ7YNLLm39Z9mkZi
+XYRKnjbwbqx3GU+DkbSk7uSPFxsQlQPyucWvOWuNV3ruJYV9fcnIjYw5ndrf
+5p1Z7mfH0X+RJg1Se+4nrN1/vQWRtt/c/779S957q+gZtRTVYoKToN7eFdfl
+nfmrRdo7G3TXVQnNPUCRaTtUpmnoyDVuLkzlmmTDcWvJEuhoOGDTKNouhPlG
+kbaCMMd0BvNnpSLNvoakcvuseQe0njFoR37YrEiVlaVt6FQjbcjemnQ+bsZA
+4zaLpUqbL19q0swCotvRzo460/bBVIsDToKkDZnhbs5uHr1M8fTfVkHe1tZA
+pOm2Q2WahpZc4+XCVK5JNxyvSy3A/IbLW3JWxZSSt74BmELOOxHovqRYP1WK
+roqTsaF+gV/Fbwx7dxrHyTcys/9d/JRHFmG03hPxmynLQpMq+y3B0I4/gt1D
+8toNyotBndL6U7GplYJaI1NRmqSq6boRMXm2oTnBYKilnCD6wW47VKbJaDTn
+WgWFOqRc51RricaG68sGCwyW0FWy2GXGDzUDaxFtv+g/1ilGtf6QNWZ9PN5u
+7qkmzYky0cgS12QnpxYanVLjRpN3lp3auSrIbeRwp4h+CzDxg2+8PL4sN1ik
+MaYTeZwee6hKjGl4TY9U1af8gtXzNhRi2j9bWS2RNuwE0Qxe26EyTUSjN9d9
+nxLUoRHUGk5cS9ZvuA44NrEF/pU5nJnHGw2KQt8YRVi8iPO6bouYYGTJGjPm
+c9wjy4w2k/GjqUCFJZtcxwXmtGoGBFKdMN2lzz6WeZ3t1cdij9WoFmtYA4Ee
+qUoF/9qu9Ycqse8GsLZaE9qUxgkygYx3+rP5gQYsiC7CnvDw2w6VSRjNCrkm
+rENjKNe5EreWBqHh/WU52330GG8ucVkCNoDwWqizz0+GG8D6JdFdtnKS57cP
+NCfi5uyW40fro/vm517vnG/TFImkcrvX5GhDX2hmdN65G/eW91RvNVM4w58f
+5eo1Z+1t3QiiQyraU5W559AdIeUhQpNaIm1aBiaIPgjbDpVJFI32XFOvQ6oN
+74NaLdHYcC1w3sQWkOp4H48Yw1yqSmLqPrXLsrQ2xc9v10PtrrHk4Q6zRpZh
+NFTc9Li1z5sFqfn5gy/6T/OF15e4cTN5BssxpnTqwLJot1wq8uRcYmppp9qT
+W9FZcfYCj/SdejSpxQuFnyC6MNF2qEwy0ZR05Nq8OiTfcPNricaGa4FjE2uQ
+PNrpyzW8+NlbEnb2CzbvTk5J/H7tttPa65nS1jsX9gS8PMJ1Q9b1apGC7E9g
+REP5V1dNc3ALiok7nJH+S16tWLeOkjzc6TvvYL3RYwrM6OwHYyBYKlXemhvp
+9sKw5zQMG+4V9w/5m8jpUosdCj9B9ECi7VCZpqL1YXGuza1Dsg23oJZobLgW
+ODaxBwW/YMtHewbeIKp/Km05FKKhwtKtoTvKujCq16Z0KhmWSjkggVoraKMH
+m8r40KhMeoWxquEAK5HU5ySlXm7uXwCpSyKhms4CIxNNUp+bkvx7E+4NrLai
+U8m4VIoBTailXRtt2ErGh05l0pxr9jQcYCso0tbetyOslAvLs9ZMHPHK2/ty
+ywUWX2SgEE0hbuEjJtY8tqCTaan0qqVdG83YQsaHSmVaJddsaDgAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAw6Cg6S+JXhnAnO01buv+eCC7oMg+9GbHlaAAAADiI
+a9MP/y1QKJHatICJwfBcIPPQmxFbjgYAAIAHKu+Rq5e/oltruMtLMd7QCQwu
+9GbElqMBwBAClbFmH4FFUnsR3d27IpWEfeozCSOppDcjthyNDGwZTWzRCZAA
+acw//uv9blMZRRFeYdr6oDc+LLTctRPtqTq+Zu4kuxdHO/lFHXukeTG/QnAr
+O7OoleB9WAxI1SJryl48PUz7/i7TUrEQ15zcEh7sP+VVzszl6XX6z7ujXRWZ
+BwvacJ8xJNdw/PgWQEfDMWAilcb9g98cUxnB0opZ1eZG0zKw/y2Npo+tp4BJ
+nRqsVPwAGWTNv637NI3EAgyVPG3g3VjvMp4GR+me+wlr919vQaTtN/e/b/+S
+994q7Tzacy8p7OtLRjZjzEnV/jbvzHI/O47+uyWJpGIiqTv548UGRGUMfW7x
+a8791jaouC7vzF8t0t7i766rEhpFJNlw3PiWQEfDMaIykUqc/sFqjqmMYIJb
+1WZF02Dc/5ZE0w9s4ylgVKf2t61S/AApFG0XwnyjBr5ongBz3GcwkDZfvtSk
+Gbei29HOjv8pFGg/Qzvyw2ZFqrwubUKqRnBD9tak83EzBnqZ4UrFQSEVabYb
+JJXbZ807oDG/kTZkhrs5u3n0MsXTf1uFoWsn6YbjxLcE8xsub8lZFVOKLZqh
+VOL1j1FzTGUEG7yqNi+aVolh/1OIxuYUMKxTDT2jHjAPOe9EoPuSYv3MK7oq
+TsaG+gV+Fb8x7N1pHCffyMz+d9NTTj1hNDVdNyImz9Z/1T7a8Uewe0heu0Hu
+GZQqrT8Vm1opqDXy2cSRaqLVCsHNlGWhSZViJSmoNpxqfDobri8b34yA4aoz
+7h8SzaEQX4VRVZsVDbf/yTEEUsCmUQ/QSlfJYpcZP9QMHEJo+0X/sU4xqpWB
+rDHr4/F2c081aU5hiVIvrslOTi00OtkliKb6lF+wet6GwgHWyOIH33h5fFlu
+sCBkTCryOD32UJUY0wMaWyqRMHln2amdq4LcRg53iiBnskat4cTxrd9wHQQT
+I5NVh90/pptDNn7fpxhVTT0aUf+TYgikgF2jHqAR/pU5nJnHGw3SpW+bIixe
+xHldd+WCIPWyxoz5HPfIMqNrHPjRlAr+tV3rD1X2DBzDSHXCdJelJQZ3xzIk
+tb36WOyxGtVKCqtKsaWaaLVSZTVTssl1XGBOK4nZi2rDCeIPQsNlvNOfzQ9U
+Mdt99BhvrvqfC6KL9OdphqsOo3/w84gH5aqmGo24/4kYSilg2agH6EN4LdTZ
+5yfD6xL6yeouWznJ89sHmpNvc7Zz8aKhPVWZew7dERoNYUnldq/J0YZuz8xI
+vXM37i3vqd5qpnCGPz/K1WvO2tu68saWSiysj+6bn3u9c76NxPxFteFU49Pc
+cC0Ei3Ymq07LwP4x3Ryy8XGrmmI0E/1PiiGQApaNeoA+kOp4H48Yw15WJWvq
+PrUxs7Q2xc9v10Ptfq7k4Q6zUm8cDXlyLjG1tFPtS63orDh7gae741l4fYkb
+N5NnsFZiTqoGDA9oHKl4oVBx0+PWPpMZpObnD74gt6dHvuHmxae54VoIJkam
+UonfP6abQyY+YVWbEU0DVv+TYgikgGWjHqARyaOdvlzDa7a9ybKzX7B5d3JK
+4vdrt53WXmmUtt65sCfg5RGuG7KuV4sUZH8CI5q8NTfS7YVhz2kYNtwr7h/d
+IJY83Ok772C90TMEzEjtB6NK8aRih0L5V1dNc3ALiok7nJH+S16tmOTammzD
+zY1Pb8O1EEyMDKUSv39INIdEfMKqphytH2scm1iTAnaNeoBOFPyCLR/tGXgn
+qv5JruVQi4YKS7eG7ijrwphXWSSVXmGsajgpbKpFZjWHyf6nBbakwKZ0Kuko
+foA8kvqcpNTLzf1LE3WyEqrpTD3JaJL63JTk35twb71lj1R6hbGo4WSxlRaZ
+2Rzm+p8+2JICW9GppK34AfKgSFt73y6wUi4sz1ozccQrb+/LLRdYvKVKLZpC
+3MJHTCxI2CCVXmEa2NBwathCi8xqDpP9Ty9sSYEt6CQpFQAAAAAAAAAAAAAA
+AAAAAAAAAAAAgDEUnSXxK0O4k52mLd1/TzRkr24+I83E5Flu+1CC3jxCVQC2
+jbg2/fDfAoUSqU0LmBiM83gi+3lGmonJs9z2oQS9eYSqAGwcVN4jV6+ZRLfW
+cJeXDtW3Nj4jzcTkWW77UILePEJVACxBdHfvilQSlpr0gcoY2EcY/GbaDs9I
+is2DRVLpzeOzPCKGEEhj/vFf73cTFzHaU3V8zdxJdi+OdvKLOvaIij8ADuKa
+k1vCg/2nvMqZuTy9TvXQtkJwKzuzqNW891jJmrIXTw8b6BHWVZF5sKDN0sf3
+SPWP6ulBXmHa+qA3PiykwZSTSueYaiZD+dUwMC+QYl0szA433T+2Xo3U4ujk
+mp9H61UFwCyy5t/WfZpmcoHRcz9h7f7rLYi0/eb+9+1f8t5bZeH7RCR1J3+8
+2ICofKXPLX7NWevP0nMvKezrS0b2YCaR8c4s97Pj6L2zERXX5Z35q0XaO466
+66qE5tYpyf7p/T3J0wbejfUu42kwjKbQOaaayVR+tT9vlBdIsRr8DifqH1uv
+RnPiWJZHq1UFwDCKtgthvlGm34Asbb58qUkzeES3o50d/1MosPCXpSLNdoOk
+cvuseQe0Di5oR37YrEiVRyUFpA3ZW5POx83o9wiTNmSGuzm7efQyxdN/W4WZ
+FpZk+0eDOeYymD9LtnNMNZO5/GrkGeYFsxXmhWJ1iok6HLd/bL0azYtjSR6t
+VhUA08h5JwLdlxTrF7uiq+JkbKhf4FfxG8PencZx8o3MHPhOeWXXjYjJsw1f
+ao8PcUCF4GbKstCkyn5PMrTjj2D3kLx2w4rHjyOtPxWbWimoNdPYmgCq/UN5
+NqCrc2jSr4a2/OLmBVI84H8YdThO/7CmGqnGMVeV9aoCYJyuksUuM36oGTgN
+oe0X/cc6xajWQ7LGrI/H28091dR/YozyC1bP21DYiTU7imuyk1MLjc7ycQPK
+O8tO7VwV5DZyuFNEvweZ+ME3Xh5flhsveLDjII/TYw9ViSkbW5OBav8QzQZW
+7hxa9CtpzC9RXiDFxB2O3T8sqkaKcUww+FUBMA7/yhzOzOONBiWib3ciLF7E
+eb1/Z1jBv7Zr/aFK7CvlssaM+Rz3yDIjX2mCgEqVX0rJJtdxgTmtmqBIdcJ0
+l6UlGHd/YsRprz4We6xGtYyiWqIy3unP5gcasCC6SH+SoNo/BLOB1TsHC+by
+S5wXSDFxh2P3D5uqkVocUwx6VQCMI7wW6uzz02OD7Rv9SuguWznJ89sH6vNv
+tKcqc8+hO0LKOcQLqKX75ude75xv08SVVG73mhxt6NKMHefO3bi3vKd6q5nC
+Gf78KFevOWtvG404c6HWP+bt8NPVOZbrpzG/JvICKSbucOz+YVM1UotDXZWV
+qwJgHKQ63scjxrC2VJUwdZ/abVpam+Lnt+uhanmCPDmXmFraqTZCVnRWnL3A
+I30nF1ZAVNz0uLXPKQWp+fmDL/pP8IXXl7hxM3kY5/vYwjSYbWxNAJX+USF5
+uMOs2YCOzrFUP8351YGVF0ixkrDDsfuHTdVILY45qnRYoyoA5pE82unLNbzu
+3VsJdvYLNu9OTkn8fu2206oLj/LW3Ei3F4Y9p2HYcK+4f8jfZIwREOVfXTXN
+wS0oJu5wRvovebVi3QpK8nCn77yD9VhPTmDE6ccqJUq2f1RIW+9c2BPw8gjX
+DVnXq0UKsj9BV+dYpJ/2/PaDkRdIMXGH4/UPi6qRUhxzVPUDx6YhioJfsOWj
+PQPvtNQ/g6YFCgFRYenW0B1lXZh1S7sw01i/f+jqHGxsLb9KSLEpCPrHpqQO
+Yh4ZqArAFpDU5ySlXm7uX42pKyGhmua5i0xASX1uSvLvTXi3L9MujBRW7h+6
+OofgezaTXyWk2LQU4izbitRBzSMzVQHYAijS1t63EayUC8uz1kwc8crb+3LL
+BXQ8U00hoELcwkfwTgpoF0YBq/UPXZ1jAhvJrxJSbOp/k8myLUgdxDwyWRUA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALAGRWdJ/MoQ7mSnaUv33xNZ+t4u
+eqMBgEmg5ABgKCKuTT/8t0ChRGrTAiYG5/NtKRoAmASr5FBhxZnf6/Xf0GD8
+F0ykjw99uh18lQDABkDlPXL1WlN0aw13eSnJl4gPTjQAMAl2yUkbsr5MvK3/
+XgjjvxgjfXzwgxiyL9IHgAGgMtactLNIai+iu3tXpJIw1GYiGhlY1Nssksoi
+DEtOVP7fnx4Z8H4/478YIKs/9mHkNTpMlYEhAdKYf/zX+92mhiuK8ArT1ge9
+8WGhxT7Oqvf/H18zd5Ldi6Od/KKOPdIY1CgEt7Izi1oJ3lXKgFQtsqbsxdPD
+tC+NNC0VC3HNyS3hwf5TXuXMXJ5ep/+SFbSrIvNgQZs5D7YPFGZpNH2gMAgx
+ziZdOvHrxALoKGDMUGqwSk587//9Z9cAB1vjvwxA3pAZuuIqfWMWYDWy5t/W
+fZpGYoGNSp428G6sdxlP8b36WPTcT1i7/3oLIm2/uf99+5e891Zpx1/PvaSw
+ry8ZOW4yJ1X727wzy/3sOPovNCaSiomk7uSPFxt6WypvObf4Ned+PzVUXJd3
+5q+W3vWkoruuSkjpkGIszJJo+oGhMAjBySYNOnHrxBLoKGDcUHglx8//IKA/
+hdh/0UPOy/o44jIfzmmBXhRtF8J8o0i/Qd4cPzIMpM2XLzVp6lN0O9rZ8T+F
+utN4tCM/bFakymDZJqRqBDdkb006HzdjoIEmrlQcFFKRZi9JUrl91rwDGh84
+aUNmuJuzm0cvUzz9t1G6DmwsjEI0eUvOqphS7A6FwjAFTjZp0IkX2QLoKWCc
+UPglJ7qzZvo7A/xrjf/Sj6L5/xZ+eqkdDk2AUrVQORHovqRYf7gouipOxob6
+BX4VvzHs3WkcJ9/IzH5DFMrjmjCamq4bEZNn67vOoB1/BLuH5BmWKINSpfWn
+YlMrBbVG5s44Uk20WiG4mbIsNAl/Z8NyYeSQN/zyTgj2nXxQGGSlGmeTJp2D
+USfUC5hayUke/c+MaQM8bY3/0v+jT3MWL7tI1uwWGOJ0lSx2mfFDzcB1Gdp+
+0X+sU4xqOSVrzPp4vN3cU02as3SicS2uyU5OLTTaISCIpvqUX7B63obCTv2C
+FD/4xsvjy3KDBT9jUpHH6bGHqsRK6WPj8YgtlUiYvLPs1M5VQW4jhztFkHb2
+pC6MFATHJigMUtGws0mHTuI6YaqAqZactPZHH9dw/ZtFjf+i+8XWC8uW5Dwl
+7XMIDG34V+ZwZh5vNKhxfa8uYfEizuu6HW+CcS1rzJjPcY8sM9obx4+mVPCv
+7Vp/qLJn4FIJqU6Y7rLU8D5ShqS2Vx+LPVajWjNijUdsqSZarVQ961GyyXVc
+IM7eBqloxMKIkPFOfzY/UMVs99FjvLnqfy6ILtI/DkBhkJWqNM4mPTqxIpuh
+k8YCpl5ysrqf33D+6JqQ6C/aprb/8el//V8zHJqAPoTXQp19fjLcz9Yvy+6y
+lZM8defg5uzV40VDe6oy9xy6IzSaniWV270m///svXlYE1f7/1//6lWtT12K
+IjS1IAgKgkp9pIalalup8HSh9esG/V20LkXApW4t2uWjjx8XZGux9gsqLoCK
+2K+VS5TWokUQUYuKqCiFSGSVJSQQkkkykx8JIYRkZjKTTMjC/frLy5A797nv
+9zlz5pyZc0ffFVqCq/fux73tPc1byVTW8BdHuXrNXXdXPSbgu0ruWC9dt7/w
+evcC1QUM2o5RguS+CYRB0VovA7PJjJ94lun7yaCADZCchJPi47K0tJPsf3rB
+2gsiPj3TaOyTpYDNgFTH+3jEaEtTIctp+/9RyLJHSn5+ux/3LYKLH+80qF/r
+WkOenU9MvdmhnCahHRXnLjaon90R3Fjqxs5q0JKp+VxVIeUe+rer1lwR31Ui
+U5io8WlLb8k1pOaXD7+kvKZH3zFKkFybQBh6rRFn01g/B1En9ARMagoPpGqf
+j9cWzedxdP9H9XOFK0KztG8qgaGM+MkuX/YvWm/D9cjSzn7hlj3JKYk/rNt+
+pm97VtJy7+LegDEjXDdm36gWUr75xrEma8mLdHtp2Asqhg33ivtHPQKJH+/y
+nX+Iq/PihXlc7QenPxK5im8K411bPd3BLSgm7khmxvF8joj6ri9dx6hBcm0C
+YeizRpxNY/0cRJ3QEzCpKVy672+aEXi6ESX7HyX8619+fPyZYS9bATYKyivc
++vHegfMYzdt546FnDRPc3Ba6swzvYBMrctW8jjGCFUXboly1Fj/lgyFgftGn
+c74e0GDd/1EgKI3+8DDZeRHA0ETMzU1KvdLUrwylLBOqmewvFK2JuXkpyb83
+EorUelw1n2PMYT3RthhXrcVP+aAIGKlKCP5qwJvDuv+joOv2hg8OcuDSBOCA
+Ia1tvQvccpmgPHvtpBGvvrM/r5xv9PovPWuoqJmH6FnBsAZXzekYs1hDtC3I
+VWvxU5+rzDiGVB9csudBN+n/KBDe2fyfnwZ74gUAAAAMQdC2v7bH/q75GIfu
+/ygRlsf+J/7JYJ5KDAAAAAxJsM77mcdud6Bk/9OL6NHuRXGP4dIEAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAbSjNH5VCHuK0/RlBx4ITVuQazB/
+yxKw7fbaduvkQ6CBADB4iLm/n63QrQpAjIiTceRvPipHOGkBk4IJDuxkCLzf
+wgQVZ3/n2uZbCYMZ28HHtlsnHwINBIDBAuu8m/jV6Tpa50lhsm6Z8lImvLOW
+vQKvjiRz4P+WpC77q8S7+AdFWjeDGdvBx7ZbJx8CDQSAQUJSm/7Zf8txyntR
+QXh/38rU6sG5f9H+LWH5fz9LN9HpwZjU/Be9wYzt4GPbrZMPgQYCgGkRVe7+
+4H8eiPT/oS5YZ0XWocJWBs//RHnF8VGbE9OPJG6KSrjOG3DkiO5viR78z392
+V5K7jtQXnPj1YRflKw2GNBSlbQh686MiWtXfDATl38nJKm7BKRxDLbY0Wyeq
+ObU1PNh/6musWSsyak1+uuUgt06FtDFnyYwwA+pJ0cfYBgIAQIi4am/AR4Ys
+imOi2vyzfzX33LagXbVVAiZ6Idp6cbnn+zlNPbZkjWcWeIZdakVJf4tX8GHA
+viriMVba9Nv6z9LozF0x8fO6hlsbXCbQrExqON0PksK+udw2IH7UYku3deLa
+Uz9dquuJlqz5/JLXnb/QqRVgAgavdX1fazi7ws+OZUitQ4MwvIEAAJCAPj83
+f8a6e7RX9CR1WeFuzm4ePUz19N+uW+TYAGT1GWzHWem95Sel3DQfR/+TinLN
+xL8lvLd2xru5LQQT655LXZhvFP1BSvz4v3qrZsuac1fH3GRk/MPaC8JmRxbz
+1a2gFlv6rUMlQtVKpbhyx+z5B58SLodaY+tUxnO2JV2Im+mi59pk/gYCAECK
+6ME3XjN3E50Qj3bez0mMP5SZdXhf1P9Z8unaYp5xuzBIQ0FKeMCclemH4reE
+B7p6hR0tzT24I2aRr8ucjYW8jpJFDvb/KeL3/m3HtaBxjktLSbeSxU/+d+b0
+7x7hr+rJGk4Gui8twR2A0M6KU7GhfoFfx28Ke286y8k3Mqu/6jOlaxNJPfEB
+v0MhgFj7H8HuIflttGJrcOvkKP92yvLQJLK1UCttnYR7Oja1ks/52Ufvtcnc
+DQQAgBzBjcWTZv6EW/MRbb+6Zd4HB/9R9HtJTfL01945/1znhHm6CMvXuzgE
+nWtG5VhLbqAdK+LPdlQurU31mfh+Aedy4FgH9dVIULLIfuy8q6RXCAnnJx/X
+cIJHoTpLl7jM/LGG4OYAa7vkP84pRjHfldZnfzLBbt7pRtXiC1PXJsoBFD36
+1svjq3JaE2wDWyfrKDu9a3WQ28jhThF5OqVs+rDK1iFPM2IPV4nkkqfMXJtM
+2kAAAMjhFwVP9Pm/tTi7uZ2317q7RffuScjqT8xh+Z9qpLByLm048/mCQC0W
+Rhd39E4ruyu2uDstU15/BCWfTpyy/WHP9B17fp7t+O/MJ8WfThgf0nffxL+2
+cLy++yZp7S9vOn98HX8Y4l2dy5p1op7IZ2XR56Qa5WaVoGQx6w31/gvJtam/
+dW+5jx7rzdZq3QCoBxCpTpjhsoy8qYy1TgEmKN3sOj5QezXUmlvXVn0s9liN
+8jpCfG2ykAbq6SMAACh69ifOPng7D123IyY6hhYrLxRo869zWf8+/AznCkYX
+kmtTBrf2uK+Der/pWfosR3ZmA+nlUMJJ8XEhun4Jroc6+/xMuKmiOb51la2a
+7KleG2TmvolGAMWVO7ymRN+ltelncOv6vPvC690LrQSDofW17t79uLe9p3kr
+mcoa/uIoV6+56+4SPuxh9gYCAEBOd/kGzzcTqnUfdWvLDxw9yj9TMXUVP/m/
+/o4zkolWWOj9nta1aZvGtakeeZ672DNYseDXMxycC5m2LK+FfBERqdrn47VF
+c7dZxruV8//udCiuaEh1vI9HDOGQoRjfpu3/R9Hynkucn99ude1L8eOdDFyb
+aARQcGOpGzuL/DLc+6tGtQ4TNT5tQZSXI6Tmlw+/NGZNz/Jap0bKPfRvV6PX
+9EzRQAAAKCNryAzwUV4gtJA2nfti2uhXJr276od922dP8NzFQNliDGm8lhww
+ZpTPnj85bdX533uMHM3ef4Xbej870ulfEyOy7vCR9sK4NZuT0o8mb42OL2rX
+192772+aEXi6UeMC1lEU7uYWXqhcHRE/2eXL/oXo5dye8c3OfuGWPckpiT+s
+236m72EBScu9i3sDxoxw3Zh9o1pIeGnUP7hRD6D48S7f+Ye4FO5KjWodxru2
+erqDW1BM3JHMjOP5HBHxCpIVtk7DNUauTaZoIAAA1Omu+No//AZZR+ZfD3Oe
+stUiH4XlF30652tiz1Be4daP9xJ8rrkuZFrIA4gJbm4L3VlG//AlaN0gtE5u
+sgYCAEBO198bFsYRPUTeQ+etVS6uUXcscTUdqUoI/or8DVIxNzcp9UoTzvxb
+Ob7hrWYyDWkAxdy8lOTfGw1cLoXWmR4TNhAAADK6H/xvaFwl3sUJ664tyd7O
+Hv2y+3dXeZa3nI5UH1yy54He+zkMaW1DtKa1MkF59tpJI159Z39eOd90LdMb
+QFTUzNP2jeZPQOtMxiA0EAAAYmQt+Vu++kPPYwcWB9r21/bY3wm38wEAAAAr
+B+24deToXTr1m8wN1nk/89jtDiu7ngIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAABDDbSjNH5VCHuK0/RlBx4IGXtw30RmAWOAXA8dINeGIOb+
+fraC3utLBnwFoISIk3Hkbz4qRzhpAZOC9RdfNa9ZwBgg10MHyDV9sM67iV+d
+rqNz5pcBXwGogsm6ZcprvvDOWvYKgqK9FmMWMAbI9dABck0bSW36Z/8tp3VU
+qwFf0QaTwi2XHoT3961MrTa+8sjgmCUBcq0XyPXQwWZybXJElbs/+J8HWvWZ
+RJyzu76LTz388+71EV+f1b4/wv2KHKkvOPHrwy590sSQhqK0DUFvflREWpuP
+FtLGnCUzwvoq8qD8OzlZxS0k9XIouYp1V51YO2+y3cujnfyijj3pNr7PiWpO
+bQ0P9p/6GmvWioxahNRVrLMi61Bhq2GnAaK84viozYnpRxI3RSVc52kc3GSU
+2X7MkWs60aPlJ/OJVkFVlpBrbVu4GWEo3ThCYgDbyLVlIa7aG/CR1iKlrD5z
+vs/m+4oDvLH2y//x/v9uder7irTpt/WfpVG4amPi53UNtza4TNBTN5YG0oaz
+K/zsWJrV4rofJIV9c7kNN1UUXe1+mLDuwI1mRNJ2+8AH9q9476syUsXi2lM/
+XarrMSJrPr/kdecvVLU78FzFRLX5Z/9q7pkSoF21VQKaikNbLy73fD+nqedr
+ssYzCzzDLrWiDJhVY5Zc04geTT8ZT3Tfz1OTJeRaB+KMMJBuAiEZh03k2tJA
+n5+bP2PdvYHLc1Ju2izHOT9V9aRZWnf07X9/O6DsLc5XeqIW5htFXklUA/Hj
+/+qtaU4ZSV3OtqQLcTNdBlQyxdoLwmZHFvN1plBUXZU0XbncqOoSwrvRzo7/
+KeIb5ygqEarWO8SVO2bPP/hUQuCqpC4r3M3ZzaOHqZ7+2+kWbZTVZ7AdZ6U/
+U07aelLp4+h/UlEPnIZZWXPu6pib+DEyU64pR4+un8wnutcsNVlCrnUhy4jR
+6SYUkjEOW0uurQvRg2+8Zu7WrhyItl/Z4D124offH9y1YeuxhwOfS9T9iqzh
+ZKD70hJNXaCdFadiQ/0Cv47fFPbedJaTb2RWf2Fs2homtibhno5NreRzfvYZ
+KIweZfwR7B6S36Zd24emq0o6b0VMeYuw/jcNb5Wf8m+nLA9Nquy/3BO4SgzS
+UJASHjBnZfqh+C3hga5eYUdLcw/uiFnk6zJnYyGvo2SRg726O3dcCxrnuLSU
+3g4pSUVyM+Za+SnV6Jk30XRlScwQzrUCnYwwlW5dIRnqqhXl2roQ3Fg8aeZP
+HN3e2F2xx9991HC7gNhLzVI9X+ksXeIy88eagUawtkv+45xiFPMGaX32JxPs
+5p1uVN1tkmlYVJOTnFqkc9eObw15mhF7uEoklzzVEYZc9OhbL4+vyrVmEXRd
+VXzKK1wzf2NRB57EaHnbg6yj7PSu1UFuI4c7ReSpS0vhu0qGsHy9i0PQuWZU
+jrXkBtqxIv5sR+XS2lSfie8XcC4HjnVQq1ZQssh+7Lyr9OayJOOV2XItpxc9
+cyaavizJGJq57v0UJyNMpBtfSAa5alW5ti74RcETff5vrdamHcI9+tkHPz7q
+bPlr9/v2o2d8O2ABT/crvKtzWbNO1GslU1kXO6lGeXMuKFnMekO9tEuiYWl9
+5gKWe2SZziIwjrW26mOxx2oUkxc8YSDVCTNclmlPLOi6Kkd513dvOFyJv0FO
+x1uNv8EEpZtdxwfmtmBkrpLRXbHF3an3G4KSTydO2a5YdcWen2c7/jvzSfGn
+E8aH9M2v+NcWjqc6v5I2nPl8QaCCt9xHj/VmK/+5MLpYc2wwU65pR898iTZE
+lmQM2VzjZ4ShdMt1hWSAq9aWaw20cm2BCEo+cfbRXnPtrtjqPSuhWpEErOOv
+zye5Rt4Rkn1FcD3U2edn7YVbzVR2la2a7PndI9UNtCHr0rrW7t2Pe9t7mreS
+qazhL45y9Zq77q5aUeLKHV5Tou9qPehOz1Wsuypr7+F79N8wJm57L123v/B6
+90IrRuYqGSQazuDWHvd1UK9LP0uf5cjObKC3P0oylzZPrulHz2yJNkiWZAzN
+XBNmhIl09zFQSPRdtbZcWxfd5Rs83+y9DPWDVCf+e+rq3jkA8s/+2b5x/yBk
+X0Gq4308YrRzoEjltP3Kb0o4KX5+ux/3rfaKH+80SMP41uSKncFD/3bVmrQI
+bix1Y2dpJ4+Oq8iz84mpN3tL56IdFecuNlB+gAvPICZqfNqCKPsBUvPLh1/2
+Lybgu0qGtoa3aWi4Hnmeu9gzWLEwIEebz4VMW5bXQrP8L8l4Za5c042eGROt
+hrosyRh6uSbNiLHpJhaSYa6qsIpcWxeyhswAn20PtXYEsa4HaWv+z+r/+THt
+4L6vtx55MOCNAZyviJ/s8mVr7yH3pNLOfuGWPckpiT+s236mbx9S0nLv4t6A
+MSNcN2bfqBZSDi6BtV5whCF+vMt3/iGuzhsGVF2VteRFur007AUVw4Z7DbhA
+0/cW411bPd3BLSgm7khmxvF8jkgdUyJXicCQxmvJAWNG+ez5k9NWnf+9x8jR
+7P1XuK33syOd/jUxIusOH2kvjFuzOSn9aPLW6PiidtqTK5Lxyky5ph89syW6
+HxqyJGIo5po0I8amm1hIhrjaj1Xk2srorvjaP/wG1adEib6C8gq3frx34OOL
+mrfAxkPPGia4uS10Z1knjvBM7yo9gySuWiYWlWsrSrQcco2DFfVrG8+1BdL1
+94aFcdoPkRvwFTE3Nyn1SlP/xEWZSu3lQoOhY03MzUtJ/r2R8FFgE7tKx6A+
+Vy0TS8m1FSVaDrnGxYr6te3n2uLofvC/oXGVtC5OBF/BkNa23pVcuUxQnr12
+0ohX39mfV843+t6TnjVU1MxD9ExXTOYqPYNUXLVMLCHXVpRoit5aJpaQa7mZ
+0z1Ucm1hyFryt3z1B619NQO+AgAAAAB0QDtuHTl6l9YTtAZ8BQAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAYBO0ojV8Vwp7iNH3ZgQdCq3zA
+3URNsIHIANYLyA8Y2og4GUf+5qNyhJMWMCmY4ABLy8ZETbCByADWC8gPGOJg
+sm6Zck4mvLOWveKmNRYsNlETbCAygPUC8gMAJcL7+1amVtM6ItDSMFETBj8y
+mBRWcAAVNtAxAYAcrLvqxNp5k+1eHu3kF3XsiWbdZqyzIutQYSvheYxIfcGJ
+Xx926RkxRTWntoYH+099jTVrRUYtQycZSxtzlswI6yvygvLv5GQVt+DUd9HX
+BFJQXnF81ObE9COJm6ISrvM0zjw0ymw/1AIox5CGorQNQW9+VESr2Bw+uukg
+jh4tP0mEZPuuqqAqS0qYXH4AYMl0P0xYd+BGMyJpu33gA/tXvPdVqa4emKg2
+/+xfzZKePtJVWyXQ6QfSpt/Wf5amd+Ymrj3106W6Hpuy5vNLXnf+4u8uPV+g
+grTh7Ao/O5ZmAbLuB0lh31xuG+CmviaQg7ZeXO75fk5Tz9dkjWcWeIZdakUZ
+MNvfCGoB7Pk98fO6hlsbXCbQLISKB0E68KJH009CIQ0BV/t+nposqWFq+QGA
+ZSNpunK5UdUzhXejnR3/U8RX/n9dVribs5tHD1M9/bcPLDQmV/acMN+oUv2V
+FFGJULUUJa7cMXv+wafGF2KR1OVsS7oQN9NlQHFMrL0gbHZkMR/r/zPyJuhB
+Vp/BdpyV/kw565Vy03wc/U8qikIbabYPygHsRfz4v7SLdOP+LEE6dKJH108i
+IQ0JV3vNUpMlRUwsPwCwHNDOilOxoX6BX8dvCntvOsvJNzJrYC1keeetiClv
+aRdjxkfWcDLQfWmJ5jBAbh/l305ZHppUKdK1RdNbCfd0bGoln/Ozz8BBoGcU
++CPYPSS/jfIogDQUpIQHzFmZfih+S3igq1fY0dLcgztiFvm6zNlYyOsoWeRg
+rx61Oq4FjXNcWsrY1jPdANK+NtFNB0H0aCdaAQ0h2Yyr9GVpTvkBgEWBtV3y
+H+cUo5jDSeuzP5lgN+90Y/+KAMYrXDN/Y1EHpaG9s3SJy8wfawZ2aUL7so6y
+07tWB7mNHO4UkdeivQghqslJTi3SWfbAt4Y8zYg9XCWSS57qDAJy0aNvvTy+
+KqcxkxSWr3dxCDrXjMqxltxAO1bEn+2oXFqb6jPx/QLO5cCxDurhQFCyyH7s
+vKsM7Pf0Qi+A5NcmWgGUE6UDP3p0/ZSTC8lWXTVMluaTHwBYFspSyEk1yuUM
+Qcli1hv9uz8o7/ruDYcrqe4K867OZc06Ua/VcUns94AJSje7jg/MbRn4G9L6
+zAUs98gynX0oHGtt1cdij9UoJqp4gwBSnTDDZRmdyWV3xRZ3p95vCEo+nThl
++8Oe2Tn2/Dzb8d+ZT4o/nTA+pG/iyr+2cDzViau04cznCwK1WBhdrDkE0g0g
+ybWJTgBJ0oEfPdqJJhWSjbpqqCzNJz8AsCw0u1VX2arJnt89Uq6UYN1VWXsP
+36NR3lBwPdTZ52ftvSMi+3103f7C690LrRR/Rtfavftxb3tP81YylTX8xVGu
+XnPX3VWPHuLKHV5Tou8KKbeCbHDI4NYe93VQL/g/S5/lyM5sYGzjmW4ADdlv
+opcO/OjR85O+kGzBVYNlaT75AYBloehW0/b/o+hWEk6Kn9/ux4q5HvLsfGLq
+zQ7lQ0BoR8W5iw36n1pCquN9PGK0+xuefUzU+LQFUY4ASM0vH36pu6ZHz1sV
+Uu6hf7tqTVAFN5a6sbPodGDtwWGbxuBQjzzPXewZrFhxkaPN50KmLctrQfVa
+pAr1APYifrzToGsT9XTgR4+On4YIyTZcVUNPluaTHwBYFj3dys5+4ZY9ySmJ
+P6zbfkaxiytryYt0e2nYCyqGDfeK+4dKNxU/2eXL1t5DxrGP8a6tnu7gFhQT
+dyQz43g+R0R9nopjrR+cQUD8eJfv/ENcym+TYEjjteSAMaN89vzJaavO/95j
+5Gj2/ivc1vvZkU7/mhiRdYePtBfGrdmclH40eWt0fFE7o7NWqgFUIGm5d3Fv
+wJgRrhuzb1QLKY9QtNJBFD2qfhoqJFtwtR8asjSv/ADAotBcjjAWlFe49eO9
+Ax9hZdI+XWuY4Oa20J1lnVazqG5RASSJnun9pGfQilyVW6EsAcAcKLtVQjVT
+/VTMzU1KvdLUP09l1j4da2JuXkry743Gvzs1qFhKAPVFz8R+0jFoRa7KrVWW
+ADC4yATl2WsnjXj1nf155Xym1gcwpLWtd0uAYfv0rKGiZh5ilVNTSwggleiZ
+zE+bdZWitwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAmAG0ozR+VQh7itP0ZQce
+CG18d5/ZxpoodEMqIwAAAHiIOBlH/uajcoSTFjApuIBnbn9MCrONNVHohlRG
+AAAAcMFk3TLl1Fx4Zy17xU3brtTAbGNNFLohlREA0AGTwmIB0I/w/r6VqRQK
+9doEzDbWRKEbUhkBbBqkvuDErw+79F1yMKShKG1D0JsfFTFXMUbamLNkRljf
+UWMo/05OVnELyeF3lFzFuqtOrJ032e7l0U5+UceeUC3xQYKo5tTW8GD/qa+x
+Zq3IqEUs2VUVdANLCsorjo/anJh+JHFTVMJ1nsbZfVhnRdahwlZj32C1jlgZ
+0lhd5RhjTY3JMwIAZkfa9Nv6z9IozLIw8fO6hlsbXCYwUAS877cbzq7ws2Np
+HoPZ/SAp7JvLOsXb6Lja/TBh3YEbzYik7faBD+xf8d5XZeTZNOLaUz9dqusx
+Ims+v+R1575aP5boat/P0wssOWjrxeWe7+c09XxV1nhmgWfYpdbesRAT1eaf
+/atZ0vMnXbVVAkOHQ+uIlUGNJVCOsaEzdUYAwPz0qDzMN2rg8f0kGFIwiBBJ
+Xc62pAtxMweWXcPaC8JmRyoqiBroqqTpyuVG1bAlvBvt7KiuYW0oqESoWscU
+V+6YPf9gXzUgC3S11yy9wOpBVp/BdlTXDOKm+Tj6n1TUdpDUZYW7Obt59DDV
+0397BY3KwppYR6wMbCyBcowMnYkzAgAWgKzhZKD70hLNgQHtrDgVG+oX+HX8
+prD3prOcfCOz+k/8p31tIrYm4Z6OTa3kc3RKgmLtfwS7h+S3aY2hdF1V0nkr
+Yspb2gUSDPFW+Sn/dsry0KTK/vp2Fukq3cDK5UhDQUp4wJyV6Yfit4QHunqF
+HS3NPbgjZpGvy5yNhbyOkkUO9uoLQce1oHFUa61SwdpiRfsnlJ/qKEcP5swI
+AFgCnaVLXGb+WDOwk2Ntl/zHOcUoZo3S+uxPJtjNO92oWh0guzaJanKSU4t0
+Fo3wrSFPM2IPV4lwy1WLHn3r5fFVudasj66rik95hWvmbyzCLTtNy9seZB1l
+p3etDnIbOdwpor+eneW5Sj+wCoTl610cghQl67CW3EA7VsSf7ahcWpvqM/H9
+As7lwLEO6rFPULLIfuy8q4ztOFpfrAigqRx9mC8jAGAJ8K7OZc06Ua/VYTSL
+0QhKFrPeUK+Tk1ybpPWZC1jukWVd2h/gWGurPhZ7rEYxr8QbFpDqhBkuy7Qn
+gnRdlaO867s3HK7E3zKn463G32CC0s2u4wNzWzDLdNWQwCogqQOe+aT40wnj
+Q/pm6fxrC8dTnaVLG858viBQi4XRxZpXFeuLFRH0lKMP82UEACwBwfVQZ5+f
+n2otjmj2sq6yVZM9v3ukWo0wZL9J19q9+3Fve0/zVjKVNfzFUa5ec9fdVXdk
+ceUOrynR2mW06bmKdVdl7T18T0C7zxG3vZeu2194vXuhFbNIVw0KrAKSkTCD
+W3vc10G9u/EsfZYjO5NOiXtyrC9W1H+CTDn6MF9GAMASQKrjfTxitHugopdN
+26+sSC3hpPj57X7ct3QufrzToGsTvjU5brlqueDGUjd2lnZno+Mq8ux8YurN
+DuWzS2hHxbmLDZQf6cIziIkan7b0ltxBan758Mv+lRmLc1UN9cAq0B4Jt2mM
+hPXI89zFnsGK5SU52nwuZNqyvBbKFeD1Yn2xovMTxMrRh/kyAgAWgfjJLl+2
+9q5yTy+zs1+4ZU9ySuIP67af6dvUlbTcu7g3YMwI143ZN6qFlDsDgbVecIYF
+8eNdvvMPcXXeL6HqqqwlL9LtpWEvqBg23CvuH+pPG+MYxHjXVk93cAuKiTuS
+mXE8nyNST30tztV+aAQWQxqvJQeMGeWz509OW3X+9x4jR7P3X+G23s+OdPrX
+xIisO3ykvTBuzeak9KPJW6Pji9oZnaJbV6zo/QSxcsgxb0YAwCJAeYVbP947
+8HFTzdUJ46FnDRPc3Ba6s6wTpxeb3lV6Bq3IVTmpt+bFVmLFuM8AMNQRc3OT
+Uq809c9clb0soZrJaxNFa2JuXkry742EDweb2FU6Bq3IVbl+b82LTcSKcZ8B
+AJBjSGtb77K4XCYoz147acSr7+zPK+cbvVZAzxoqauYheiarJnOVnkErcpWi
+t+bFymPFuM8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAPaURq/KoQ9xWn6sgMP
+hMY+B8CsNVObBcwCiAQAAH2IOBlH/uajcoSTFjApuIBnSdZMbRYwCyASAAD0
+gsm6ZcoppvDOWvaKm0ZWEGDWmqnNAmYBRAIAZgWTWtOygvD+vpWpFKr6msOa
+qc2SYF1JtC5sRiQAYG6Q+oITvz7s0jdaYUhDUdqGoDc/KmKuVoy0MWfJjLC+
+o8xQ/p2crOIWOqeYKc+mPrF23mS7l0c7+UUde6JZPAHrrMg6VNhK611IUc2p
+reHB/lNfY81akVGr+Za/IdbUoLzi+KjNielHEjdFJVznaZxGaJTZfsyQRPzI
+608iJVdJ0mocDEjOakUCAFaEtOm39Z+lUZiPYeLndQ23NrhMYKomu6KczNkV
+fnYszWM2ux8khX1zWac4HDHdDxPWHbjRjEjabh/4wP4V731VqqECE9Xmn/2r
+WdLT5btqqwTULIprT/10qa7Hgqz5/JLXnftL8BhkTQ3aenG55/s5TT1fkzWe
+WeAZdqkVZcCsGrMkkTDypEmk6CqxceNgQnJWKhIAsCZ6+kOYb9TA8gAkGFK/
+iRBJXc62pAtxMweWdcPaC8JmRyrKh1Iz0nTlcqNq2BLejXZ2VNWqltRlhbs5
+u3n0MNXTf3sFxQKmqESoWu0SV+6YPf+gqrCQgdb6kNVnsB3VBXe4aT6O/icV
+5RdomJU1566OuYmfJ/MkkSjyCgiTSNVVMuPG+MyE5KxTJABgVcgaTga6Ly3R
+VDPaWXEqNtQv8Ov4TWHvTWc5+UZm9VcUoD2sEVuTcE/HplbyOTolR7H2P4Ld
+Q/LbtEcKUseUdN6KmPKWdrkF2o4pP+XfTlkemlQpIrEwAKShICU8YM7K9EPx
+W8IDXb3CjpbmHtwRs8jXZc7GQl5HySIHe/Xo2nEtaBzVQqVqZHXH3w3Bf0jL
+jEnsQyfyBEmk6yq+cUO9ZVhyViUSALAuOkuXuMz8sWZgt8faLvmPc4pRzCOl
+9dmfTLCbd7pRtY5ANqyJanKSU4t0lkbwrSFPM2IPV4lwy2GLHn3r5fFVue78
+kMQxxae8wjXzNxZRLi9NaE3WUXZ61+ogt5HDnSKoF4MTlq93cQhS1HvDWnID
+7VgRf7ajcmltqs/E9ws4lwPHOqgHGkHJIvux867Su28hGXbMlkT1pziRx08i
+XVcJjBvkLbOSszaRAIB1wbs6lzXrRL1W19KsRCMoWcx6Q72iTjKsSeszF7Dc
+I8u6tD/AsdZWfSz2WI1iBoo3UCDVCTNcluFNGYkdk6O867s3HK6ks2VOYk2u
+qOFTutl1fGBui/FFtDOfFH86YXxI35SYf23heKpTYmnDmc8XBCp4y330WG+2
+8p8Lo4s1h2ozJZE88vhJpOsqeVrNLDm5NYkEAKwLwfVQZ5+fn2otl2j2x66y
+VZM9v3ukWrcwZKtC19q9+3Fve0/zVjKVNfzFUa5ec9fdVXd5ceUOrynR2mW6
+yRzDuquy9h6+J6DXF4mb2UvX7S+83r3Qavywk8GtPe7roN5KeJY+y5GdSafc
+t5x0SmyeJOqJPH4S6blqWFpxDTIuuT6sRSQAYF0g1fE+HjHafVLRH6ftV1a8
+lnBS/Px2P+5bZBc/3mnQsIZvTY5bDlsuuLHUjZ2F1y3xTSHPziem3uxQPtOE
+dlScu9hA7ZEuPGuYqPFpS2/1HqTmlw+/pL5coz3sbNMYduqR57mLPYMVazly
+tPlcyLRleS2Ua9r3QjLsmC+JJJHHTyIdVw1NK2nb5UxIzhpFAgBWhvjJLl+2
+9j5zT3+0s1+4ZU9ySuIP67af6dv+lbTcu7g3YMwI143ZN6qFlLsNgbVecAYK
+8eNdvvMPcfHeOMExJWvJi3R7adgLKoYN94r7h+IYhmMN411bPd3BLSgm7khm
+xvF8jojifBhDGq8lB4wZ5bPnT05bdf73HiNHs/df4bbez450+tfEiKw7fKS9
+MG7N5qT0o8lbo+OL2mk/B0w27JgniaSRJ0oiVVeNSCtx23sxWnLWKRIAsDJQ
+XuHWj/cOfDBVcx3DeOhZwwQ3t4XuLOvE7e/mdMySsaIkmt5V2gYHUXIAANBA
+zM1NSr3S1D+XVfbHhGomhzWK1sTcvJTk3xuJHhc2n2MWj/Uk0dSu0jQ4qJID
+AIAeGNLa1ruALpcJyrPXThrx6jv788r5Rr+CTs8aKmrmIUQrJOZ0zCqwhiSa
+2lVmvbVBkQAAAAAAAAAAAAAAAAAAAAAAAAAAAADAIIF2lMavCmFPcZq+7MAD
+IWNnzZjIrG0AwYEIAABAioiTceRvPipHOGkBk4IZe3vSRGZtAwgORAAAAHIw
+WbdMOW0V3lnLXnGTXmWEQTdrG0BwIAKAbYFJ4ebfVAjv71uZSqF8rWWYJcGK
+RDL4wbE0IAKApYLUF5z49WGXvtEEQxqK0jYEvflREVM12eVyaWPOkhlhfYeb
+ofw7OVnFLXjnmtFxFeuuOrF23mS7l0c7+UUde0Knbgaz3uIhqjm1NTzYf+pr
+rFkrMmo1zxvAOiuyDhW2GvaOJ8orjo/anJh+JHFTVMJ1nsZBeUaZ7cccItGN
+lUExJ9GDvuBQazVxTo2ACbGpMbk8AIBxpE2/rf8sjcKsCRM/r2u4tcFlAlM1
+2RWFZ86u8LNjaR682f0gKeybyzrl4ui42v0wYd2BG82IpO32gQ/sX/HeV8XM
+aEHTW1zEtad+ulSHKMpnn1/yunN/MSBMVJt/9q9mSc8w0lVbJaA5VKCtF5d7
+vp/T1PM1WeOZBZ5hl1pRBsyqMYtICGJFO+aEetAXHIqtJsypMTAhNjWmlgcA
+ME+PasN8owYWDCDBkNI/hEjqcrYlXYibObDQG9ZeEDY7UlFo1EBXJU1XLjeq
+Rh/h3WhnR3Wd68H0lgBUIlStdokrd8yef1BVykhSlxXu5uzm0cNUT//tFboF
+WEmR1WewHdWlf7hpPo7+JxUFH2iYlTXnro65iR9cM4mEIFZ0Y06kB33Bodxq
+Ij+NgBmx9WFieQCACZA1nAx0X1qiqTm0s+JUbKhf4Nfxm8Lem85y8o3M6q8x
+QHvYIbYm4Z6OTa3kc3SKkGLtfwS7h+S3afVAuq4q6bwVMeUt7ZIMg+GtHt9Q
+/u2U5aFJlSI5RZCGgpTwgDkr0w/FbwkPdPUKO1qae3BHzCJflzkbC3kdJYsc
+7NWX4I5rQeOolkxVQ1JewYwiUX6qEyvDYq6Ahh5o641uThkUm1nlAQCmoLN0
+icvMH2sG9lWs7ZL/OKcYxfxMWp/9yQS7eacbVXf7ZMOOqCYnObVIZ8kB3xry
+NCP2cJUIt0C26NG3Xh5flWvN4ui6qviUV7hm/sYi3NLUJvaWzDdZR9npXauD
+3EYOd4qgXpZOWL7exSFIUXkOa8kNtGNF/NmOyqW1qT4T3y/gXA4c66AebgQl
+i+zHzrtK776FZPAxm0jkRLGiH/PeT0n0YGSryXNqerGZUR4AYAp4V+eyZp2o
+1+o0mjVrBCWLWW+ol9BJhh1pfeYClntkmc5iO461tupjscdqFJNEvA6IVCfM
+cFmmPbGj66oc5V3fveFwJf6TEKb2Vo9vckXVoNLNruMDc1uML+ed+aT40wnj
+Q/omxvxrC8dTnRhLG858viBQwVvuo8d6s5X/XBhdrDl+m0kkJLEyKOaketCF
+tt5w/DSg1YaKzXzyAABTILge6uzzs/YCuWaX6SpbNdnzu0eqhQpDthJ0rd27
+H/e29zRvJVNZw18c5eo1d91ddc8VV+7wmhKtXbibnqtYd1XW3sP3BLT7EEPe
+kvnWR9ftL7zevdBq/LUpg1t73NdBvaHwLH2WIzsTr8A4CSQTY/OIhCxW9GNO
+Xw90W43npz4YFJv55AEApgCpjvfxiNHWuqLLTNuvrIEt4aT4+e1+3LeqLn68
+06BhB9+aHLdAtlxwY6kbO0u789BxFXl2PjH1ZofyWSS0o+LcxQbKT+ox5C2R
+KUzU+LSlt14QUvPLh19SX9PTHny2aQw+9cjz3MWewYoVHTnafC5k2rK8Fsrl
+1nshGXzMJRLiWNGLuWF6oN5qw3PKoNjMJw8AMAniJ7t82dqbwz1dxs5+4ZY9
+ySmJP6zbfqZvv1fScu/i3oAxI1w3Zt+oFlIWN4G1XnA6oPjxLt/5h7g6b3JQ
+dVXWkhfp9tKwF1QMG+4V9w/1h8iZ8hbfFMa7tnq6g1tQTNyRzIzj+RwRxQk2
+hjReSw4YM8pnz5+ctur87z1Gjmbvv8JtvZ8d6fSviRFZd/hIe2Hcms1J6UeT
+t0bHF7XTfhqYbPAxj0iIY0Uv5obqgWqrDc0pvrV+aIjNvPIAAJOA8gq3frx3
+4OOjmksNxkPPGia4uS10Z1knTgc3vau0DZJ4awLfzIZFiWTQYm5RrZbraTgA
+2CBibm5S6pWm/gmissskVDPZASlaE3PzUpJ/byR8xtfErtI0qMdbxn0zJ5Yi
+ksGNuaW0Wq6/awCATYIhrW29K+ZymaA8e+2kEa++sz+vnG/0i+L0rKGiZh6i
+Z1poMleZ9ZZx38yPJYhk8GNuCa2WU+saAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+gI2DdpTGrwphT3GavuzAA+FQ3EWGCABmBOQHAHiIOBlH/uajcoSTFjApeCi+
+NQgRAMwIyA8AcMFk3TLlXE14Zy17xU16FQFsAogAYEZAfsCgg0mt6f5ceH/f
+ylQKBVttl8GPgHUpBDAp0AEBI0DqC078+rBL34CCIQ1FaRuC3vyoiKma7HK5
+tDFnyYywvkPDUP6dnKziFryD0kjc6q46sXbeZLuXRzv5RR17olkDAeusyDpU
+2Er4YiO1hotqTm0ND/af+hpr1oqMWoaOBGCg4f2gvOL4qM2J6UcSN0UlXOdp
+nGKnLwIUMYNC8NOqP1CUXCXRjIHoioQhV0F+wFBF2vTb+s/SKExsMPHzuoZb
+G1wmMFWTXVEe5uwKPzuW5oGW3Q+Swr65rFOGjZjuhwnrDtxoRiRttw98YP+K
+974qVffFRLX5Z/9qlvT0na7aKoGORYoNF9ee+ulSHaIoS31+yevOA+r1GAwT
+DVeDtl5c7vl+TlPPV2WNZxZ4hl1q7R0e9EWAqrPmUAhhWkkDRdFVYuMGQiAS
+BlwF+QFDlB5hhflGDTyInwRDSvMQIqnL2ZZ0IW7mwAJqWHtB2OxIRS1Qakaa
+rlxuVI0swrvRzo6q2tOSuqxwN2c3jx6mevpvr9AuFUq54ahEqFqiElfumD3/
+oHZFHwNgpOFqZPUZbEd1dR5umo+j/0lFFQV9EaCIeRRClFYFhIGi6iqZccMg
+EonRrg55+QFDFVnDyUD3pSWaXQTtrDgVG+oX+HX8prD3prOcfCOz+s/upz3y
+EFuTcE/HplbyOTrFPbH2P4LdQ/LbtDsJqWNKOm9FTHlLu6oBMw2Xo/zbKctD
+kypFurZM3XA50lCQEh4wZ2X6ofgt4YGuXmFHS3MP7ohZ5OsyZ2Mhr6NkkYO9
+enTtuBY0jmpVUyqYUSF96KSVIFC0c4pr3BhvdUXClKtDVX7AkKWzdInLzB9r
+BvZMrO2S/zinGMUUSlqf/ckEu3mnG1U35GQjj6gmJzm1SGdVAN8a8jQj9nCV
+CLfwtOjRt14eX5XrTrRIHFN8yitcM39jEbVy0fQaLusoO71rdZDbyOFOEbqV
+40zfcLmwfL2LQ5CiOBzWkhtox4r4sx2VS2tTfSa+X8C5HDjWQT0cCEoW2Y+d
+d5WxHUGzKUT9KU5a8QNF11UC44Z6iy8SJlwdwvIDhiy8q3NZs07Ua+las6yM
+oGQx6w31KjfJyCOtz1zAco8s01kPx7HWVn0s9liNYh6H10eQ6oQZLsvw5l7E
+jslR3vXdGw5XUt3VpttwBZigdLPr+MDcloG/MRgNJ6m4nfmk+NMJ40P6Jq78
+awvHU524ShvOfL4gUIuF0cWaQ7WZFEKeVvxA0c4pqWYM8VauKxKGXMWxbICf
+1ic/YMgiuB7q7POz9hq2pqq7ylZN9vzukWotwZDdBF1r9+7Hve09zVvJVNbw
+F0e5es1dd1fducSVO7ymRGtXwyZzDOuuytp7+J6AuqjpNryXrttfeL17oZXi
+zzDYcJLBIYNbe9zXQb3g/yx9liM7E69qt2GYRyF60oofKHqu0teMHoN9DBQJ
+E67iW6bvpxXKDxiyINXxPh4x2nJUqHrafmXhagknxc9v9+O+hW/x450GjTz4
+1uS4haflghtL3dhZePrGN4U8O5+YerND+XAQ2lFx7mKD/qeuqDccEzU+bemt
+nIPU/PLhl7qLKoPQcO3BYZvG4FCPPM9d7BmsWHGRo83nQqYty2uhXAtdL+ZT
+CEla8QNFx1VDNENikFgkxro6xOUHDF3ET3b5srW3gntUbWe/cMue5JTEH9Zt
+P9O3JStpuXdxb8CYEa4bs29UCynrj8BaLzh9RPx4l+/8Q1y8ly1wTMla8iLd
+Xhr2gophw73i/qEyzFBtOMa7tnq6g1tQTNyRzIzj+RwR9Xk2Uw3HkMZryQFj
+Rvns+ZPTVp3/vcfI0ez9V7it97Mjnf41MSLrDh9pL4xbszkp/Wjy1uj4onZG
+Z63mUQhpWokCRdVVQzVDaJBYJMa6OuTlBwxdUF7h1o/3DnzCU3M1wHjoWcME
+N7eF7izrxO2DTDpmVQ03J1YUKNO7Ss+gWV21EfkBQxkxNzcp9UpT/xxOqeqE
+aib7CEVrYm5eSvLvjURP9DLrmBU13MxYUaBM7Codg2Z21XbkBwxlMKS1rXdR
+Wy4TlGevnTTi1Xf255Xzjb49p2cNFTXzEKKZG7OOqbCGhlsEVhQok7lKz6BZ
+XbU1+QEAAAAAAAAAAAAAAAAAAAAAAAAAAACAyUE7SuNXhbCnOE1fduCBEPbR
+gcEGFAgAgA4iTsaRv/moHOGkBUwKLuCZ2x9gqAEKBABAF0zWLVNOVYV31rJX
+3ISaCMAgAwoEdMCkcP8MqBDe37cylUJJXOYA+QGaDL4CgUEEqS848evDLn19
+HkMaitI2BL35URFz5VmkjTlLZoT1neuF8u/kZBW34B2lR8dVrLvqxNp5k+1e
+Hu3kF3XsCdW6GSSIak5tDQ/2n/oaa9aKjFqEOVdxLDMA3aiSgvKK46M2J6Yf
+SdwUlXCdp3FKHtZZkXWosNXYF0XNID98hVis/FSYpLOAAgFLRdr02/rP0ihM
+PDDx87qGWxtcJjBVk11RweXsCj87luaZk90PksK+uaxTKY2Oq90PE9YduNGM
+SNpuH/jA/hXvfVVGdjhx7amfLtX1GJE1n1/yunNfVR0GXCWwbBw0o0oO2npx
+uef7OU09X5U1nlngGXaptXdswES1+Wf/apb0/ElXbZXA0OHBLPIjVoglyq/v
+503SWUCBgIXSk/gw36iBZ+WTYEh1HkIkdTnbki7EzRxY4wxrLwibHako12mg
+q5KmK5cbVcOB8G60s6O6YLShoBKhaiFJXLlj9vyDfXV3jHaV0LIR0IyqHmT1
+GWxHdXUebpqPo/9JRRUFSV1WuJuzm0cPUz39t1fgFEulgnnkR6YQC5Rfr1nT
+dJYhr0DAUpE1nAx0X1qiKWG0s+JUbKhf4Nfxm8Lem85y8o3M6j9en/bgQGxN
+wj0dm1rJ5+jU38Ta/wh2D8lv0xIxXVeVdN6KmPKWdikCQ7xVfsq/nbI8NKmy
+v94bU67qWjbUT7pRlcuRhoKU8IA5K9MPxW8JD3T1CjtamntwR8wiX5c5Gwt5
+HSWLHOzVo2vHtaBxVKuaUsGM8utDRyEWKT+Td5ahqkDAYuksXeIy88eagZ0H
+a7vkP84pRjHFkdZnfzLBbt7pRtUNM9ngIKrJSU4t0rlrx7eGPM2IPVwlwq0N
+LXr0rZfHV+VaEyG6rio+5RWumb+xCLfGMy1ve5B1lJ3etTrIbeRwp4j++m5M
+uIpveZCiqkBYvt7FIUhRHA5ryQ20Y0X82Y7KpbWpPhPfL+BcDhzroB4LBCWL
+7MfOu8rYdqPZ5Kf+FEchlic/U3eWIaxAwGLhXZ3LmnWiXkt3mpVfBCWLWW+o
+V6FJBgdpfeYClntkmc56NY61tupjscdqFPMsPA0j1QkzXJZpz43ouipHedd3
+bzhcib8VTcdbjb/BBKWbXccH5rZgjLqKY9kAPw2JqgKSituZT4o/nTA+pG/W
+yr+2cDzVWau04cznCwK1WBhdrDlUm0l+5AqxNPkNSmeRD1EFAhaL4Hqos8/P
+2mvMmqrrKls12fO7R6p7fUMW/HWt3bsf97b3NG8lU1nDXxzl6jV33V21+MWV
+O7ymRGsXrKbnKtZdlbX38D0BbRkSt72XrttfeL17oRVjzlV8y/T9NCiqCkhG
+hgxu7XFfB/Vq/7P0WY7sTLyq3YZhHvnpUYiFyW8QOksfQ1CBgMWCVMf7eMRo
+y0Whumn7lWWqJZwUP7/dj/sWpsWPdxo0OOBbk+PWhpYLbix1Y2dp64+Oq8iz
+84mpNzuUj/OgHRXnLjZQflQKzyAmanza0lvfBqn55cMv+9c9jHWV2LIhfqqh
+HlUF2iPDNo2RoR55nrvYM1ix3CJHm8+FTFuW10K51rpezCc/EoVYnPzUmKKz
+DHEFApaL+MkuX7b2bm2P6uzsF27Zk5yS+MO67Wf6tkwlLfcu7g0YM8J1Y/aN
+aiFlfRBY6wVHw+LHu3znH+LqvAxB1VVZS16k20vDXlAxbLhX3D/Un+LFMYjx
+rq2e7uAWFBN3JDPjeD5HpJ5YGusqsWVD/OyHRlQxpPFacsCYUT57/uS0Ved/
+7zFyNHv/FW7r/exIp39NjMi6w0faC+PWbE5KP5q8NTq+qJ3RKat55EeqEIuT
+Xz8m6CxDXoGA5YLyCrd+vHfgE5iad+vGQ88aJri5LXRnWSdOHzG9q/QMmtVV
+xqJqXqwoUJYmPzkoELB1xNzcpNQrTf1zLKXqEqqZ1DBFa2JuXkry742ED92a
+2FU6Bs3sKpNRNS9WFCgLkp/c7N7ajgIBSwZDWtt6F53lMkF59tpJI159Z39e
+Od/o22d61lBRMw/RM7Mymav0DJrVVeajal6sKFAWIj9ze2trCgQAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAOdpRGr8qhD3FafqyAw+EsM8NWCKgUgAYYog4GUf+
+5qNyhJMWMCm4gGdufwBAF1ApAAw1MFm3TDkNFd5Zy15xE2oWABYIqHSIgUnh
+3hhQIby/b2Uqhaq1AGA+QKVWC1JfcOLXh136LjkY0lCUtiHozY+KGCifIqo5
+tTU82H/qa6xZKzJqFS+Xo/w7OVnFLTrnbdH0E+uuOrF23mS7l0c7+UUde4Jf
+o8AQpI05S2aE9R0RxpC3OHEwg6ukoLzi+KjNielHEjdFJVznaRxkh3VWZB0q
+bDXuRU5q+TJT6kGlvQx5lQLmQNr02/rP0ihMKjDx87qGWxtcJjBQk11ce+qn
+S3U9Gpc1n1/yunNfHZnuB0lh31zWKWNGx8/uhwnrDtxoRiRttw98YP+K974q
+ZnqStOHsCj87lubxlQx4SxCHQXWVHLT14nLP93Oaer4qazyzwDPsUmtvv8dE
+tfln/2qW9PxJV22VwNCuTyVf5ko9qLQXUClgBnqSGuYbNfAsexIMKaCD+7MS
+oWplUFy5Y/b8g32VZrD2grDZkYpamgb6KWm6crlR1c+Fd6OdHdXVnI1CUpez
+LelC3MyB5dKM9pYwDoPnqh5k9RlsR3X1HG6aj6P/SUWVA0ldVribs5tHD1M9
+/bdX4BQzVZtozl0dc5MgFhTyZb7Ug0pVfzgEVApYGrKGk4HuS0s05Yl2VpyK
+DfUL/Dp+U9h701lOvpFZ/cff0742kVrruY+/nbI8NKmyv8IZ1v5HsHtIfpuW
+Oun6qaTzVsSUt7TrBBjiqoR7Oja1ks/RKeXJlLe6cRgsV+VypKEgJTxgzsr0
+Q/FbwgNdvcKOluYe3BGzyNdlzsZCXkfJIgd79cjZcS1oHNWqo/3RqDv+bgiV
+Z6Tw82Xe1Cs/BZUSxGGwXB0ElQKWRmfpEpeZP9YM7BhY2yX/cU4xiumLtD77
+kwl28043qm6Gya5Nopqc5NQinTtyQmuyjrLTu1YHuY0c7hTRX9FM9OhbL4+v
+yrVmOHT9VHzKK1wzf2MRbgFmWq4iTzNiD1eJcMtMM+EtfhwGyVUFwvL1Lg5B
+iuJtWEtuoB0r4s92VC6tTfWZ+H4B53LgWAd1PxeULLIfO+8qvdtmitcmonyZ
+M/VyUOlQUSlgafCuzmXNOlGvpSnNyiyCksWsN9QrzCTXJml95gKWe2SZzlo0
+sTUFmKB0s+v4wNwWVe9EqhNmuCzTnvTQ9VOO8q7v3nC4En+PmY6rbdXHYo/V
+KKZ7eF2JIW9x4jBIriogqYid+aT40wnjQ/pmpPxrC8dTnZFKG858viBQwVvu
+o8d6s5X/XBhdjDsMk+TLfKkHlQ4llWpAqFJgEBFcD3X2+Vl7/VhTUV1lqyZ7
+fvdIdR9vyH4TsbVeum5/4fXuhVaVGMSVO7ymRGtXk6bnJ9ZdlbX38D0BbX3p
+Grx3P+5t72neSqayhr84ytVr7rq76j7IhLf4cRgkVxWQ9PoMbu1xXwf1Sv6z
+9FmO7Ey8qtok6L9vIs2X2VIPKh1KKgUsDaQ63scjRlsKCkVN26+sJC3hpPj5
+7X7ct+gsfrzToGuTtjVM1Pi0pbeiC1Lzy4df9q8SCG4sdWNnaQuLjp/Is/OJ
+qTc7lM/poB0V5y42UH4Girjhctwy00Z7SxyHQXJVgXav36bR6+uR57mLPYMV
+SylytPlcyLRleS2Uy6H3ou/apCdfZkw9qHToqBSwOMRPdvmytXdiexRlZ79w
+y57klMQf1m0/07cdKmm5d3FvwJgRrhuzb1QLKecexxrGu7Z6uoNbUEzckcyM
+4/kckXoaJn68y3f+Ia7OWw5U/ZS15EW6vTTsBRXDhnvF/UP98VyChveC05WM
+9ZY4DoPmKoY0XksOGDPKZ8+fnLbq/O89Ro5m77/Cbb2fHen0r4kRWXf4SHth
+3JrNSelHk7dGxxe1056Okl6bKOTLbKkHlQ4hlQKWB8or3Prx3oFPV2reiRsP
+DWuY4Oa20J1lnTjiN72ftA2a1VvGXLV8LC31oFLKDCGVAqZAzM1NSr3S1D9/
+UioqoZpJfVKxJubmpST/3kj4NK2J/aRp0MzeMumq5WNBqQeV0mBoqRQwBRjS
+2ta7oCyXCcqz104a8eo7+/PK+UbfGtOwhoqaeYieKZPJ/KRt0KzeMu+q5WMh
+qQeVmtFVAAAAAAAAAAAAAAAAAAAAAAAAAAAA2wHtKI1fFcKe4jR92YEHQmO3
+S5m1ZmqztgFkEBhMQCHAoCDiZBz5m4/KEU5awKRgKgdaD541U5u1DSCDwGAC
+CgEGB0zWLVPOUYR31rJX3DTy6HtmrZnarG0AGQQGE1AIMLgI7+9bmUqhPq85
+rJnaLAmY1GoWFyCDuFhRBq0Lm1HIEAapLzjx68Mu8h6CdVedWDtvst3Lo538
+oo49wT/XnxaimlNbw4P9p77GmrUio1bx7jjKv5OTVdyic5xWz693VmQdKmw1
+5H1AaWPOkhlhA0uYGW5NcdJLcXzU5sT0I4mbohKu8zTOFTTKbD+U0qF4Z7Kh
+KG1D0JsfFTFQqYZOLsh8IhYJZFAHJjOIH3n9SbSCvk8Bq1MIQAVp02/rP0vT
+Ow3ofpiw7sCNZkTSdvvAB/aveO+rMvJYE3HtqZ8u1SGKmt3nl7zu3FcmpvtB
+Utg3lwdWKcNEtfln/2qW9Gimq7ZKQEsX0oazK/zsWBpHShpjTVnIernn+zlN
+PV+TNZ5Z4Bl2qRVlwGy/v9TS0fN74ud1Dbc2uEygeSw8HjRyQQqhSCCDODCZ
+QeLuSZZEK+j7VLA2hQCU6ElDmG/UwHPq8ZA0XbncqFKk8G60s6O6ArLBvywR
+qtYyxJU7Zs8/2FdIBmsvCJsdqSiV2ffTdVnhbs5uHj1M9fTfXoFTE5PY7bqc
+bUkX4mb2lzAzxloPsvoMtqO6Ugw3zcfR/6TiRH8jzfZBNR0qDCmnhfuzVHNB
+DpFIbC2Dsubc1TE38ZNkngySdU/CJFpB36eCtSkEoIas4WSg+9ISzSCinRWn
+YkP9Ar+O3xT23nSWk29k1sCj7eWdtyKmvKV9tj4x5AZR/u2U5aFJlf0FzLD2
+P4LdQ/LbqAqU2L6Eezo2tZLP0S2vSQLSUJASHjBnZfqh+C3hga5eYUdLcw/u
+iFnk6zJnYyGvo2SRg726b3ZcCxpHtcImFeimg/bIxlQumBWJtWWQpOqHmTOo
+QCfyBEm0pr5vQwoBKNJZusRl5o81A6WGtV3yH+cUo5i+SOuzP5lgN+90Y//t
+K8YrXDN/YxFu0WJRTU5yapHOTTmhQVlH2eldq4PcRg53iugvWCZ69K2Xx1fl
+1Gc7+PaRpxmxh6tEuKWfSRGWr3dxCFIUKsNacgPtWBF/tqNyaW2qz8T3CziX
+A8c6qJUqKFlkP3beVQb2e3qhmw6ykc3EuTBcJHhYVwZJRh5zZrD3U5zI4yfR
+uvq+zSgEoAjv6lzWrBP1WoLSrLoiKFnMeqNvQVixSXh994bDlfi7odL6zAUs
+98iyLu0PSAzKFWVbSje7jg/MbVEZRaoTZrgsozNTwbHfVn0s9liNYm5FW7ck
+1Z8znxR/OmF8SN+cin9t4Xiqcyppw5nPFwRqsTC6WLOj000Hychm8lwYKhJ8
+rCuDb7mPHuvNtsAM4kceP4lW1vdtRSEARQTXQ519fn6qdYuuKYOuslWTPb97
+pLztxrqrsvYeviegHWkig3103f7C690LrSq74sodXlOitYtF07N/737c297T
+vJVMZQ1/cZSr19x1d3U6Di4kus3g1h73dVCvRT9Ln+XIzsSrIG0Y9NJh2G4F
+U7lgViRWlUGSWbE5M0gYefwkWlnftxWFABRBquN9PGK0paCQwbT9yirREk6K
+n9/ux4q5CfLsfGLqzQ7lEytoR8W5iw2Un9bBM4iJGp+29BZsQWp++fDL/vt6
+wY2lbuwsOmrAd1gFTulncrR1u01Dt/XI89zFnsGKxQA52nwuZNqyvBbK1en1
+QicdCsSPdxo0sjGRC2ZFYlUZJBl5zJVB0sjjJ9HK+r6tKASgivjJLl+29t5m
+jwzs7Bdu2ZOckvjDuu1nFLuOspa8SLeXhr2gYthwr7h/qD9IimMQ411bPd3B
+LSgm7khmxvF8jkg9IRM/3uU7/xCXzosOOPb7oadbDGm8lhwwZpTPnj85bdX5
+33uMHM3ef4Xbej870ulfEyOy7vCR9sK4NZuT0o8mb42OL2pn9EFSqulQIGm5
+d3FvwJgRrhuzb1QLKXcepnLBrEisKoNkI495MkgaeaIkWlfftxmFAFRBeYVb
+P9478HlIzdtnRqBhEBPc3Ba6s6yT1toB4w6bDdOng6lcmM0rC8eiMignTaJV
+9X3bUQhAHTE3Nyn1SlP//Ekpg4RqhvVJxaCYm5eS/Hsj1UdUadu3BkycDqZy
+YSavrAFLyaBcf4eynr5vUwoBqIMhrW29679ymaA8e+2kEa++sz+vnM/EghUN
+g6iomYfQ3W1l3GHzY7J0MJULs3llLVhCBuXUOpQ19H0bVAgAAAAAAAAAAAAA
+AAAAAAAAAAAAAIAtg3aUxq8KYU9xmr7swAMhY4ebmMiszcBsfGwpiZYcGVuK
+MwBYNiJOxpG/+agc4aQFTApm7HU9E5m1GZiNjy0l0ZIjY0txBgALB5N1y5QT
+NeGdtewVN5kqt2EiszYDs/GxpSRacmRsKc6ACcCkcNPLPML7+1amUiiWahlm
+SbAueTAbH5tJIuM/asnWTG0WMAKkvuDErw+79I0pGNJQlLYh6M2PihgoWCSq
+ObU1PNh/6musWSsyahVve6P8OzlZxS0k5+hR8hPrrjqxdt5ku5dHO/lFHXtC
+p1ADg66SIG3MWTIjbMDZX1hnRdahwlbDXipEecXxUZsT048kbopKuM7TOJbN
+KLP9mEEe+Ek0LOy66VP/iuHxsbok4kDSUwz5UYgzwDDSpt/Wf5ZGYbaAiZ/X
+Ndza4DKBgSLg4tpTP12qQxTFi88ved25r6RL94OksG8u69Qno+Nn98OEdQdu
+NCOSttsHPrB/xXtflZGnnBjgKhnShrMr/OxYGudSYqLa/LN/NUt6Ok5XbZWA
+pkW09eJyz/dzmnq+Jms8s8Az7FIryoDZfn/NIQ/iJNIOO0H6jIuPtSURF8Ig
+G/SjEGeAYXqyFeYbRflweUPKzeD+rESoWvoRV+6YPf9gXxUZrL0gbHakoril
+gX5Kmq5cblT1MeHdaGdHdW3lQXOV1L26nG1JF+Jm9tdBk9Rlhbs5u3n0MNXT
+f3sF9Wq/SmT1GWxHda0ZbpqPo/9JRYUBI832YR55kCWRbtgJ0mdMfCwxibLm
+3NUxN6nXiCAOsoFtgTgDzCJrOBnovrREM9ZoZ8Wp2FC/wK/jN4W9N53l5BuZ
+1X8ePe3Bh9SaHOXfTlkemlTZX2wMa/8j2D0kv01r6KHrp5LOWxFT3tKuAWBy
+V0nsSLinY1Mr+RxaNTqRhoKU8IA5K9MPxW8JD3T1CjtamntwR8wiX5c5Gwt5
+HSWLHOzVQ3fHtaBxVGt0UsHM8lCgk0T6YVd+qpM+Qx2zzCSSFWVgtqdAnKH4
+xaDQWbrEZeaPNQNFibVd8h/nFKOYm0rrsz+ZYDfvdKPqLpds8BHV5CSnFuks
+txBak3WUnd61Osht5HCniP7iYqJH33p5fFWuNXWh66fiU17hmvkbi3DLIZvS
+VUI7yNOM2MNVIvr1o4Xl610cghSlzrCW3EA7VsSf7ahcWpvqM/H9As7lwLEO
+6g4mKFlkP3beVQa2A3sxpzx6P8VJIs2wy4nSpwfrSiL5mGl4T6FlbcjHGWAQ
+3tW5rFkn6rVkpFkqRVCymPWGevWYZPCR1mcuYLlHlunURCa2pgATlG52HR+Y
+26LqGUh1wgyXZdqzGbp+ylHe9d0bDlfiPwlhUlcJ7LRVH4s9VqOYEtLubiT1
+ozOfFH86YXxI31SQf23heKpTQWnDmc8XBGqxMLpYc4gyszzwk0gr7CTp04d1
+JfEt99Fjvdl4SSRoC6Wegg/EmSjOAHMIroc6+/z8VOtmXlMtXWWrJnt+90h1
+j27IhgKxtV66bn/h9e6FVlWWxZU7vKZEa1eKpucn1l2VtffwPQFt4TDhKr6d
+e/fj3vae5q1kKmv4i6Ncveauu6szUONC0t0yuLXHfR3US+jP0mc5sjPpVLMn
+x5zyIEwinbCTpY++YxacRD3zeWZ7CsSZ1ncAg0Cq4308YrT7uUIt0/Yr6y5L
+OCl+frsf9y0oix/vNGjw0baGiRqftvRWa0Fqfvnwy/4VAMGNpW7sLG3F0PET
+eXY+MfVmh/IBHLSj4tzFBspP6jHhKrFjKujVj5brdrdtGt2tHnmeu9gzWLGG
+IUebz4VMW5bXQrm4t17MJQ/SJNILO3H6DHNMhaUlkcK1ibmeAnGm9yXAIMRP
+dvmytXdBe9RiZ79wy57klMQf1m0/07fVKWm5d3FvwJgRrhuzb1QLKScVxxrG
+u7Z6uoNbUEzckcyM4/kckXqKJX68y3f+Ia7OKyxU/ZS15EW6vTTsBRXDhnvF
+/UP9IXJGXMW30w+97oYhjdeSA8aM8tnzJ6etOv97j5Gj2fuvcFvvZ0c6/Wti
+RNYdPtJeGLdmc1L60eSt0fFF7Yw+/2oeeZAmkV7YidNniGP9WFoS9V+bGOwp
+EGe6XwMMAeUVbv1478DHJjXvso2HhjVMcHNb6M6yThxhm95PegZJXDWBY2bD
+ouQhH9Sw204SLTsythRngGHE3Nyk1CtN/ZNjpVoSqpnUHhVrYm5eSvLvjYRP
+sprYTzoG9bjKuGPmxFLkIR/ksNtSEi05MrYUZ4B5MKS1rXexWC4TlGevnTTi
+1Xf255XzjV4gomENFTXzED1LASbzk0FXGXfM/FiCPOSDGnZbSqIlR8aW4gwA
+AAAAAAAAAAAAAAAAAAAAAAAAAGB60I7S+FUh7ClO05cdeCC0yrNFbKAJtgez
+SYEUkwPxAWwOESfjyN98VI5w0gImBVvl23I20ATbg9mkQIrJgfgAtgcm65Yp
+p1nCO2vZK24yVjZiELGBJtgezCYFUkwOxAegAya1pltr4f19K1MplG21YAa/
+CdaVYrPAbFIgxeTYQC8GDAKpLzjx68MufWLFkIaitA1Bb35UZHyBIKy76sTa
+eZPtXh7t5Bd17InqhH6Ufycnq7gF76w0uqZ6P+qsyDpU2Er4Th+1hotqTm0N
+D/af+hpr1oqMWobeX5c25iyZEdZ3UBhxw/U1gSJmSDFO3PTnl5KfJBk3DlMm
+hVhFVpxiFVTjRuaWiXux2TUD0Efa9Nv6z9IozEkw8fO6hlsbXCYwUJO9+2HC
+ugM3mhFJ2+0DH9i/4r2vqq+zdj9ICvvmsk4JOgNMYaLa/LN/NUt6BNNVWyXQ
+sUix4eLaUz9dqkMU5ZjPL3ndeUCpGoORNpxd4WfH0jzEEq/h+ppA9dfMkWKC
+uJHll6KfxOIxDlMmhVBF1pzivt+mFjdSTN2LzawZwADQ1othvlGUz6A3pEAP
+DpKmK5cbVeIQ3o12dlQXSlbU3C4Imx2pKINplClJXVa4m7ObRw9TPf23V2iX
+SaXccFQiVC1/iCt3zJ5/ULuakQFI6nK2JV2ImzmwaJpOw/U1QQNZc+7qmJv4
+jTFPignjRphfqn6SiccImE+KJgTRsO4UK6EYNz1GTNyLzasZwBBkDScD3ZeW
+aOYW7aw4FRvqF/h1/Kaw96aznHwjs/qPraetalJrSjpvRUx5S7MMA9b+R7B7
+SH6bdmoNMEUM3Yb33KzfTlkemlQp0rVFs+ES7unY1Eo+R6egJ1HDqTSH+Oh+
+M6dYN24EzaSdEQU0Mk5ukLGkMKsiDSwzxbTjZt5eTNM+w20H6NBZusRl5o81
+A/OEtV3yH+cUo7jwS+uzP5lgN+90o+oOlUzVopqc5NQinXtZEmuKT3mFa+Zv
+LBpQ21j06Fsvj6/KdeeQ9E0x1HBZR9npXauD3EYOd4rQLZpGq+HI04zYw1Ui
+3GLThA3XC8nAZc4U48cNv5l0/ZSTZ9x8STFQRfqwxBQbFDez9WK99i2gIwNq
+eFfnsmadqNfKhmZFFUHJYtYb6uVxElVL6zMXsNwjy3S2Y4ityVHe9d0bDldq
+bUwi1QkzXHpLVxprirGGK8AEpZtdxwfmtgz8DToNb6s+FnusRjHtwpM0ccMJ
+kDac+XxBoIK33EeP9WYr/7kwuliz55k5xXLduOE3k3ZGSDNuxqQYpiIiLDjF
+hsbNjL3YYjUD6CC4Hurs87P2FopmLrrKVk32/O6RahHCkJVqImtYd1XW3sP3
+BDo6EVfu8JoSrV0J3CBThNBteC9dt7/wevdCK8Wf0bV2737c297TvJVMZQ1/
+cZSr19x1d9V9gbjh+iCZVJszxX0MjBt+M+n5ST/jhAYZTwqzKurD4lJscNzM
+1YstWTOADkh1vI9HjHYQFbmYtl9ZoVnCSfHz2/24b8VW/HinQarWtYY8O5+Y
+erNDWbob7ag4d7FB/eCM4MZSN3ZWA86iB21TDDQcEzU+bemtGoTU/PLhl9RX
+Y4jDKMcvNk3ccH2QDFzmSjFx3PCbScdPQzKut+FyppLCrIr6sMAUq6EXN3P0
+YkvXDKCL+MkuX7b2xmBPLuzsF27Zk5yS+MO67Wf69hIlLfcu7g0YM8J1Y/aN
+aiFK9SdwrMla8iLdXhr2gophw73i/lErRfx4l+/8Q1y8VwTommKg4Rjv2urp
+Dm5BMXFHMjOO53NE1GddBGHsBUfSJA3XB8nAZaYUE8eNqJlU/TQ046QN74WZ
+pDCroj4sL8X90IubGXqxxWsGwAHlFW79eO/AhzM172GNh541THBzW+jOsk7c
+zsukY1bVcKOwqJaSNNP0ftI2aFBSGPdZPxaVYrlN9WLaBk3XkYcgYm5uUuqV
+pv7JhzIXCdVMqpqiNTE3LyX590ai5zuZdcyKGm4sltJSfc00sZ80DRqYFMZ9
+poSlpFhuY72YpkETd+QhCIa0tvWuhstlgvLstZNGvPrO/rxyvtErpvSsoaJm
+HkI032DWMRXW0HBmsISWUmmmyfykbdCgpJhEpRSxhBTLbaoX0zY4CB0ZAAAA
+AAAAAAAAAAAAAAAAAAAAAIDBBu0ojV8Vwp7iNH3ZgQdC2BEEBgkQHjkQH2Bo
+I+JkHPmbj8oRTlrApGCC1wQBgGlAeORAfIAhDibrlinnZMI7a9krbsJJh8Dg
+AMIjB+IDAEqE9/etTKVQgpM5MCmsUwAgPD0MfnwAYLAR1ZzaGh7sP/U11qwV
+GbWaL0xjnRVZhwpbjX3rDakvOPHrwy59PR9DGorSNgS9+VERUwWm5XJpY86S
+GWF9B2Sh/Ds5WcUtJGdjUXIV6646sXbeZLuXRzv5RR17QrUIAAm6KbBYV1XQ
+DSweIDxyt4hzpy8+tiZjEqkYARMaBkyIuPbUT5fqEEWd6PNLXnfuL4+CiWrz
+z/7VLOnJWldtlcDQcULa9Nv6z9IoTPAw8fO6hlsbXCYwVWBaUS/n7Ao/O5bm
+4Y3dD5LCvrmsU3KMjqvdDxPWHbjRjEjabh/4wP4V731VRvYVghRYoqt9P08v
+sLiA8MghzJ2++NiejAmlYgxM5AgwKahEqFrLEFfumD3/oKqAiqQuK9zN2c2j
+h6me/tsrDCz7iLZeDPONGnjoPAmGFKMhRFKXsy3pQtzMgcXCsPaCsNmRirqX
+BroqabpyuVHVjYV3o50d/1PEN85RghRYoqu9ZukFlgAQHrkRgtzpi48NypjQ
+shEwo2GAGdDOilOxoX6BX8dvCntvOsvJNzJL44B4lH87ZXloUqWIxAJ9ZA0n
+A92Xlmiqj9QN2kMEsTUJ93RsaiWfo1PIEmv/I9g9JL9NS390XVXSeStiylva
+x/ob4q3yU50UWKSrdAMLwlNhWHwU0MidLcuYrlQYzBFgYrC2S/7jnGIU0wJp
+ffYnE+zmnW5U3r/KOspO71od5DZyuFME/UJpJHSWLnGZ+WPNQNETukE+RIhq
+cpJTi3RuuPGtIU8zYg9XiXCLLIsefevl8VW51oSTrquKT3mFa+ZvLOrAEzIt
+b+VEKbA8V+kHln6rGcCKhEfumJw8d0Y3XI99y5ExuVRMnyPAtGjWLhGULGa9
+MWDlFhOUbnYdH5jbQm3SIG048/mCQC0WRhdrapx3dS5r1ol6LckQu0EyREjr
+Mxew3CPLdJaacay1VR+LPVajmCLhyQ+pTpjhsqxU6+lbuq7KUd713RsOV+Jv
+IdPxliQFluaqIYGl32o92JjwyB0jz50utixjHMsG+GlgjqioDjAczUx1la2a
+7PndowH3x123v/B690Irc9EWXA919vlZe3mY2A1Dlv11rd27H/e29zRvJVNZ
+w18c5eo1d91dtW7FlTu8pkRrF3+m5yrWXZW19/A9Ae1Q0UuBhblqUGDpt5oB
+rEh4ZI7Rz53NyhjfMn0/Dc4RYFIUmZq2X1nAWMJJ8fPb/Vgsx0SNT1t6q5Qg
+Nb98+CWjSytIdbyPR4x2pvHc6EX8eKdBQwS+NTlukWW54MZSN3ZWg1Yz6biK
+/P/svXtcFPXb/59/9UjrU2bkgbYCQUAQVPIjxim1koROlHeo0O9heYg4GHkq
+tD7dent7QE6F2Q0eUmFVxL4mD1HKsBBE0FARFSVAEBaQw7ILy+7s7sz+2GV3
+2cPM7MwemFm4nn/5ALn2db2v13vmPe+ZnevhmdTMih5VD2y0p/r0OR7lR5zo
+lYB1UrVQH1j6WVsBOzIecShzajcibWy+VaxYI8CmDFTKYdLijTvTM1K/W7vl
+pPLGIMa/tGbmFLeQuKSDOdlHChvE1r1Eldzf7udveJcVR4YSacfNc7uCnh3n
+ui73Sp0ItSCpIXDsJ7m33W/h/iaj7zFQlSrvKIh2e2LMY2rGjPVO+of607e0
+SsA6qUPQGFi6WVsFOzIefihzazcCbWyBVaxYI8Cm6F7hDhMov3jT+7v0n3S1
+rgx60TBhxebwbZW9OPa2vVR6Ae1IqoJULRhPMYzjwzZvMGpjK9YIsCmqSqXU
+DechYgBJU35a5sW2oeWRdWXQiSZpKshI/62V8GFZG0ulE9COpCpMqgXjDev4
+sMgbDNvYmgcHwGbIhVW58VPHPff6noIqwTDvp2JIZ9fgfrGVZdCLhorb+YiJ
+RZHNpNILaEdSTakF4zEwPizxBqM2tv7BAQAAAAAAAAAAAAAAAAAAAAAAAAAA
+wGqgPeXJq8P8PZxmLtt7WwR3K4FhwrrGAxsDwMhC3JB98G8BqkAasoKmhhbx
+mdYDjBKsazywMQCMMDB5v1y1yhRdj/dfWYHzpkwAsAHWNR7YGADogMnsZnNB
+dGv3qkwKbUwB1mNHrlNY23hgY2C0grQUHf3lTp+pyY8hvJKshJBX3iuxQq9P
+cf3xTVGhgdNf4MxZmd2o/BI2Kriexy3toPdeKqy/9mj8gmkOT453Cog5fF/3
+tf1YbzV3f3En4RfoKGVNEt8yZK15EbMiNS/mMp07tRoZjyoDUinChOvUWCEj
+C4yHB3HhrGJjuzIGAAwia/v1i4+zKKzKMMmjZt7VBJfJVuhDLWk8/sP55oEp
+Im8/E/Gis6bfSv/ttMivLxi1+yKm/07K2r1X2hFp17W970x62md3rXraYeLG
+wlN/tUsHpkxfY63QKCLFrAnjW4iMd2plgANH96WRZLlTVEswqsMqlWpUJlyn
++WwrZGS28XAhLJyVbGxHxgAANWjnuUi/GP13vpNgTs8a3I+VitR7NJKarXMX
+7tN0ZMG6iyLnRit7TlJC2nbxQqv6oCC6Eevs+HaJQPXzZm6Um7Ob5wDTvQK3
+VBu2pKSaNVF8C5E2521OO5s0W79JGWHulGtENKrDJ1UHeXv+mrgKfNEMuU6F
++RnpBjHTeAQQFM5aNmaXMQCACnLesWD3pWW67kZ7q48nhgcEf5W8PvLNmRwn
+v2ju0GviaR8lSKMpUMG1jOXhaTVDncCw7t9D3cMKuwzNTR5HSe/VFR7zDN+e
+b52s6cYnDyhtOpGYWSNoMGqgSZA7bbXGozpcUvVkNx95Iwz/2TIGXUc7I+sa
+w6qFs1NjAAAVessjXGZ/X68/r7Cu84HPO8UpVz+yltwPJjssONGqvkwnO0qI
+6/PSM0uMLugJo8l7Kk9sXxPi9tRYpxVDnb/Ed7/x9vyyynjBSaJK+Vt+8ecL
+15VQ63ZMN2sT8WkljjzITjxQK8Zt7oyfOz21+KM6TFJ1ITk3MeY6szKyovHI
+opEXDg87NQYAUIH/53zOnKMtBpbU7WAiLPuI87J2g5rkKCFryVnEcY+uNNrK
+Jo6mBBOWb3CdGJzfoZ7cSF3KLJdl5TjPy5LEQfmXdyQcqKH6pALdrMnj00m8
+q+5w4uF65doTb17j505brcJ4VIdJqvIjeCc/WRSsZJ77+Ak+/qp/Lo4t1T14
+M+Q6MzOyovFMRFMQFg4XezWGDgbGAAAtwsvhzr4/Gm4/6xqyr3L1NK9v76q3
+AczZ+SeONkjftU+93zjbqbaopGart0esYddlsjhYfy1314GbQuoep5c1/fiE
+AW/eSnrNZ4aPiumcsY8/4+o9f+0N7QEBP3e6NRpEf1SHSaouJNdNzLjO7Iys
+awzrFc5OjQEAVEDqkn094wydpDTkjD2qdsvShoyAgB33NHvWknvbzDpKGEbD
+xK0POgY7nyD1P7372dAmg/DKUjd/Lg9nTwNfFfLwTGpmRY+qKzbaU336HM/0
+k3R0sjYnPmlANTjNnQlyp66WeFSHSaouJOcmplxnZkbWNYb1CmenxgAASkju
+b/fzN7yRO2BIh0mLN+5Mz0j9bu2Wk5q7qdKOm+d2BT07znVd7pU6EUr1I3Ci
+YfxLa2ZOcQuJSzqYk32ksEGsXcVJ7m33W7i/Ce9LEjhx5B0F0W5PjHlMzZix
+3kn/UDlCUM3a3PiEAYfAmddEuVNVSzyqwyZVB5JzE0OuMzcj6xrDioWzT2MA
+ADVQfvGm93fpP56qeyFvOTSiYcKKzeHbKntx5441Vdk+a9oBSXJnVY0UJspE
+CbvKiElh5NjVMAIAbSRN+WmZF9uGll8qQ6bUWdPeVKJJmgoy0n9rJXoY17qq
+bJ01zYAmcmdNjRSmpVLEfjJiThgF7GcYAcAcMKSzS934Xi6syo2fOu651/cU
+VAks3jamEQ0Vt/MRohWXdVWpsVnWtAOS5m5rtdaXShF7yIhJYRSxh2EEAAAA
+AAAAAAAAAAAAAAAAAAAAAAAARh9oT3ny6jB/D6eZy/beFsEdZYAe1vUPuBEA
+ABXihuyDfwtQBdKQFTQ1lOAbqwBAgHX9A24EAGAQTN4vVy1PRdfj/VdW4Lxw
+FACIsa5/wI2AfYLJ4CLfVohu7V6VSaEb7KgEjGcS6/oH3AgwDdJSdPSXO32m
+Zj6G8EqyEkJeea/E8g6kWH/t0fgF0xyeHO8UEHP4vrrJACq4nsct7SB5Gxcl
+qfjBrYCsNS9iVqTmBWKm1eIhrj++KSo0cPoLnDkrsxt1v3CP9VZz9xd3En7J
+kVqZiONbgDUSx4EB42mgmxFDxjOuJrFUU/4hQX80LI0GAFZB1vbrFx9nUVgd
+YZJHzbyrCS6TrdAdu/9Oytq9V9oRade1ve9Metpnd63mINp/Oy3y6wtGTc7o
+SCUObhky3qmVAQ4c3ZdbkqnFRdJ4/IfzzYiyZfmZiBedh3rrYOLGwlN/tUsH
+Dj59jbVCo4gUcyeMbwnWSBwnKhPG03w2vYyYMh5BNfGkmvIPGcajYUk0ALAK
+aOe5SL8Y/dfck2BOJx0cpG0XL7Sq563oRqyz49slAs3vsO6iyLnRyk6bZkol
+C26J5ua8zWlnk2brN1MjVEsAKhWpd6YkNVvnLtyn7r4jbeZGuTm7eQ4w3Stw
+S7Vh21DKZSKIbwnmJy5vz18TV4EvmhnjDUIzI+aMR1RNI6mm/EMq22g0aEQj
+KzEAWICcdyzYfWmZrrfQ3urjieEBwV8lr498cybHyS+aO/RmfNqHCNJoKnqv
+rvCYp/uif6z791D3sMIug2MEXan4wc1VK206kZhZI2gwavRJoNaENlRwLWN5
+eFqNWEEJ2rnTjG/NxHVlE7fJYNB4dDNi1niq3xpVk8LgU4xPOBrUIOuEAgAW
+0Fse4TL7+3r9KYR1nQ983ilOuSyTteR+MNlhwYlW9VU92SFCXJ+XnllitClC
+Ek35W37x5wvXleg1Zhbf/cbb88sqg9UaXakEwc1SizzITjxQK8ZtQo2vlkyb
+vKfyxPY1IW5PjXVaQa3LG73cyePbPnEtJAcuxoxHPyMmjacgqqbpwbd4NCgB
+5ybARvD/nM+Zc7TFYKLoNm0Rln3EeVl724LkECFryVnEcY+uNLrBQRxNgfIv
+70g4UGNwzxipS5nlsqzc4NFVulIJgpuhtqvucOLheuUyE28K46s1oU2h7HVT
+vsF1YnB+B4W1L+3cieMPQ+Iy3slPFgUrmec+foKPv+qfi2NLdQ/VDBnPnIyY
+Mx5JNYldRwTt0SCDSokBwBKEl8OdfX80vCmha+O+ytXTvL69q95OMGfbnyga
+1l/L3XXgptDIzpKard4esYa9pulJJQxOX+3NW0mv+czwUTGdM/bxZ1y956+9
+oT1u4Ksl06ah79qn3m+c7aQgkW6Z6Ma3cuIaSBbVzBjPrIwYMx5ZNU0Pvun4
+JkaDEnDdBNgIpC7Z1zPO0OJKG8/Yo2oyLW3ICAjYcU+z9y25t82sQ4RxNOTh
+mdTMih5Vj220p/r0OZ72mSbhlaVu/lyewUKVjlSS4OapVYPThJpALVEoTNz6
+oGOwyw1S/9O7n1Hb06Oeu3nxrZy4BpIDF3PGo50Rg8YjrqbpwacSXwveaFAC
+zk2ArZDc3+7nb3jPdsDGDpMWb9yZnpH63dotJzV3ZaUdN8/tCnp2nOu63Ct1
+IpTqR+BEk3cURLs9MeYxNWPGeif9o53Eknvb/RbubzL6AgdVqaTBzVE7BM4U
+JlKLHwrjX1ozc4pbSFzSwZzsI4UNYorLa6q5mxvfuolrIDtwMWM8szJizHjE
+1aQw+BTiDwHnJoB9oPziTe/v0n9MVPfy33LoRcOEFZvDt1X24hxUbS+VdkAS
+tdbVZkdloogdZcQ245k1+FYXDAA2R9KUn5Z5sW1oXaiycUqdNQ8RFKNJmgoy
+0n9rJXz01sZSaQY0odbK2uyoTBSxo4xYZDwzB9/qggFgOMCQzq7BfW2FXFiV
+Gz913HOv7ymoElj8hXB60VBxOx8xsRq0mVTrqrW6NiV2VCaK2FFGLDGeWYNv
+EzcCAAAAAAAAAAAAAAAAAAAAAAAAAAAAwwraU568Oszfw2nmsr23RaPoRSqj
+NnGAQcB1AEANcUP2wb8FqAJpyAqaGjqKvho4ahMHGARcBwAUweT9ctXqTXQ9
+3n9lBY03Yto5ozZxgEHAdQA7wGR2c9EuurV7VSaFzqojjuFP3I5cAdiIUTvd
+AJuBtBQd/eVOn6mDC4bwSrISQl55r8QK7UfF9cc3RYUGTn+BM2dldqPy2+qo
+4Hoet7SDzjvCVK99Phq/YJrDk+OdAmIO39ftS4D1VnP3F3cSftOQUtYk8c3E
+SolrkLXmRcyK1O+RZyJxitiLK+yojgxJVaNvFZa6DgC0yNp+/eLjLAqrHUzy
+qJl3NcFlshVaY0saj/9wvhlR9nQ+E/Gis6ZVTf/ttMivLxj1XSOm/07K2r1X
+2hFp17W970x62md3rfqdLJi4sfDUX+3SgTnY11grNIpIMWvC+OZircTVyHin
+VgY4cHTe0mkqcaqB7cQVdlRHpqRqPt7IKuxzHQAMgXaei/SLofwCYnPa6OB+
+rFSk3gOS1Gydu3CfpjsO1l0UOTda2ZyTEtK2ixda1VNXdCPW2fHtEoHq583c
+KDdnN88BpnsFbqk2bA9KNWui+OZjpcTV8przNqedTZo91BXOVOJUVdqJK+yo
+jsxJHQxrZBVStfRCWcl1AKCDnHcs2H1pme6MQXurjyeGBwR/lbw+8s2ZHCe/
+aO7Q+/RpH4VIoylQwbWM5eFpNUNN1LDu30Pdwwq7DGcLeRwlvVdXeMwz7GRg
+nazpxh+exKVNJxIzawQNZnbTJsFeXGFHdWRWKqFV2OQ6ANCltzzCZfb39fru
+x7rOBz7vFKdcTslacj+Y7LDgRKv6Kp3sKCSuz0vPLDHaISCMJu+pPLF9TYjb
+U2OdVgw1TRPf/cbb88sq46UXiSrlb/nFny9cV0KtJzTdrE3EZyRx5EF24oFa
+Me1u2lSwF1fYUR2ZlEpmFRa5DgB04f85nzPnaIuBx3VbvQjLPuK8rNlOJzsK
+yVpyFnHcoyuNejoTR1OCCcs3uE4Mzu9QT0GkLmWWy7JynOdQSeKg/Ms7Eg7U
+UL1tTDdr8vhMJN5VdzjxcL1yJUv3KCHjnfxkUbABi2NLdQ+B9uIKO6ojc1LJ
+rcIi1wGALsLL4c6+Pz4w2DXQtWVf5eppXt/eVW9amHNngTjaIH3XPvV+42yn
+2qWSmq3eHrGGHbDJ4mD9tdxdB24KqducXtb045sIqMH8xG/eSnrNZ4aPiumc
+sY8/4+o9f+0NoyOVudiLK+yojoxJNWEVFrkOAHRB6pJ9PeMMram05Yw9qn7S
+0oaMgIAd9zT74JJ728w6ChlGw8StDzoGu9Ag9T+9+9nQlojwylI3fy4P50kf
+fFXIwzOpmRU9qkbdaE/16XM804810cnanPjDkrgas7tpk2AvrrCjOjIoVQue
+VVjkOgDQQ3J/u5+/4e3WAVs6TFq8cWd6Rup3a7ec1NyhlXbcPLcr6Nlxruty
+r9SJUKofgRMN419aM3OKW0hc0sGc7COFDWLtAlFyb7vfwv1NeN+6wIkj7yiI
+dntizGNqxoz1TvqHyjymmrW58W2e+BA2OUrYiyvsqI6MSR0Cxyqsch0A6IHy
+ize9v0v/sU/dy3nLoRENE1ZsDt9W2Yu7l2FNVbbPml7AYUucIvbiCjuqI9uk
+KtjnOgAwQNKUn5Z5sW1oSaeyZUqdNY9CVKJJmgoy0n9rJXpk1rqqbJ01nYDD
+mzhF7MQVdlRHNklVsNR1AGAAhnR2De6eK+TCqtz4qeOee31PQZXA4i9404iG
+itv5CNHdX+uqUmOzrOkFHP7EKcJ6V9ha54iVakotk64DAAAAAAAAAAAAAAAA
+AAAAAAAAAAAACEF7ypNXh/l7OM1ctve2yNJ3o7A52giDzUMNhSOHzaMNtQPY
+gbgh++DfAlSBNGQFTQ0t4o/caCMMNg81FI4cNo821A5gCZi8X65aG4mux/uv
+rMB5meVIiTbCYPNQQ+HIYfNoQ+1GAZjMnq6HRbd2r8qk0L/V/qNRwY5qx+ah
+hsKRw+bRHv7aARaAtBQd/eVOnyn3YwivJCsh5JX3SizucKp80/LR+AXTHJ4c
+7xQQc/i+uhUAKriexy3twHu9F91Qg7/qrebuL+6k9eVBcf3xTVGhgdNf4MxZ
+md2o+7V4c6KpkbXmRcyK1G/rZn40XRioHc4QQeFow0Th1OgnBbUDWIqs7dcv
+Ps6isJDAJI+aeVcTXCZboft2/52UtXuvtCPSrmt735n0tM/uWo0f+2+nRX59
+wahrmhmhMHFj4am/2qUDs6+vsVZILaKk8fgP55sHIsjbz0S86DzUT8esaGpk
+vFMrAxw4Ou/GtCSabmAmakcwRFA4OoGZKJzms42SgtoBLATtPBfpF0P5hcLm
+dOrBQdp28UKr2s2iG7HOjm+XCDS/w7qLIudGK/ttWhRK2syNcnN28xxgulfg
+lmrjzp64oFKRevdEUrN17sJ96o47ZkZT/23e5rSzSbOHerFZEk1XKyO1Ixoi
+KBxlGCqcCuOklEDtdJG356+Jq4CXrDOLnHcs2H1pmW4Z0N7q44nhAcFfJa+P
+fHMmx8kvmjv0fnza04Q0moreqys85uk2D8C6fw91DyvsMpwnZoQyWxgquJax
+PDytRkwSgVo0adOJxMwaQYP1e1gzXDvjIYLCUYPBwhEmBbXTQd585I0weJKP
+YXrLI1xmf1+vbyys63zg805xylWUrCX3g8kOC060qi+AyaaJuD4vPbPEaGOA
+JJryt/zizxeuK9HrzSy++42355dVxgsb+qHIIIwm76k8sX1NiNtTY51WDPWM
+Mysa8iA78UCtmHYPayowWTv8IYLCUYKxwpElBbUbAs5NbID/53zOnKMtBlbQ
+bd0iLPuI87J2B5hkmshachZx3KMrjXo0E0dToPzLOxIO1PTrOxupS5nlsqwc
+5ylP2qFIIYmmUDa3Kd/gOjE4v4NiRJxoXXWHEw/XK5dydKeJjHfyk0XBBiyO
+LdU9BjBcO4XxEEHh2Fw48qSgdjq1m+c+foKPP17tgGFDeDnc2ffHBwYX5LoV
+76tcPc3r27vq62xztr6JomH9tdxdB24KjSovqdnq7RFr2L/arFBmCdPQd+1T
+7zfOdpoxTQaj3byV9JrPDB8V0zljH3/G1Xv+2htGhxFzYbJ2GvSHCApHCWYK
+ZyIpqN0QcN3EBpC6ZF/POENHKis+Y4+qFbS0ISMgYMc9zaaw5N42s6aJcTTk
+4ZnUzIoeVQ9vtKf69Dme9slR4ZWlbv5cHs51Pe1QtIVh4tYHHYNtbZD6n979
+jPL2AsmgKWzTw5qp2hEPERSOEsxNOjV4SUHthoBzEyuQ3N/u5294J3Og4g6T
+Fm/cmZ6R+t3aLSc1tyulHTfP7Qp6dpzrutwrdSKU6kfgRJN3FES7PTHmMTVj
+xnon/aO1tuTedr+F+5vwvm9BNxRtYRj/0pqZU9xC4pIO5mQfKWwQU18UEgza
+ILY4xDFUO+IhgsJRhJnCDYGTFNROBzg3sQOUX7zp/V36T1TqXilbDr1omLBi
+c/i2yl5cfzIpbHijUYJVtYPCUYdVhVNA7QC2ImnKT8u82Da0jFNVPKXOmv6h
+GE3SVJCR/lsr0QOpzAkb7mhUYUvtoHA0YUvhFFA7gNVgSGfX4IavQi6syo2f
+Ou651/cUVAks/u40vWiouJ2PEF3RMylseKPRgw21g8KZARsKp4DaAQAAAAAA
+AAAAAAAAAAAAAAAAAAAAALYA7SlPXh3m7+E0c9ne2yJL35Bi3WgAs4A3AABg
+CHFD9sG/BagCacgKmhpq6Xf+rBsNYBbwBgAATIHJ++WqJazoerz/ygqc120y
+Fw1gFvAGAFAGk8FegE0Q3dq9KpNCL1QmolEBjGE77N0bAGAWSEvR0V/u9Jk6
+smAIryQrIeSV90osb8GJ9dcejV8wzeHJ8U4BMYfvq9+yjwqu53FLO/De6kVH
+Kn5wSxDXH98UFRo4/QXOnJXZjQglqdTiaDX3VnP3F3ea8xVCWWtexKxI/VZx
+5kfTBYxBEf0SjApvAICtkbX9+sXHWRQWUZjkUTPvaoLLZCu0h+6/k7J275V2
+RNp1be87k5722V2rmYv9t9Miv75g1CyNjlTi4GYiaTz+w/lmRNms+UzEi86a
+jjNkUunEGRhacWPhqb/apQOHtb7GWiGtw4aMd2plgANH552WlkTTDQzGoIhx
+CUa6NwDA5qCd5yL9Yii/q9ecVjI4SNsuXmhVHxdEN2KdHd8uEWh+h3UXRc6N
+VrayNFMqWXDzQKUi9XaVpGbr3IX7NK13CKXSiyNt5ka5Obt5DjDdK3BLtXHv
+UWKkzXmb084mzR7qoUYjmrw9f01cBf6AgjEoazYqAalaAuzJGwBge+S8Y8Hu
+S8t0LYj2Vh9PDA8I/ip5feSbMzlOftHcoVfP0z4EkUZT0Xt1hcc83YYBWPfv
+oe5hhV0Gs5quVPzglqhFBdcyloen1Qz1QiOQSjuOuaqkTScSM2sEDdbvPQ3G
+oKiWsAQj1xsAMAz0lke4zP6+Xn+KYl3nA593ilOu+WQtuR9MdlhwolV98U92
+CBLX56VnlhhtY5BEU/6WX/z5wnUlem2PxXe/8fb8sspgUUdXKkFwc9XKeypP
+bF8T4vbUWKcVQ73P8KXSj2MC/GjIg+zEA7Vi2r2ntZAcf8AYlNSSlWDEegMA
+hgH+n/M5c462GEwD3a4owrKPOC9rd79JDkGylpxFHPfoSqP2x8TRFCj/8o6E
+AzUG96SRupRZLsvKDZ5wpSuVILgFahXKRjflG1wnBud3YGRS6ccxBU60rrrD
+iYfrlWtkuscfGe/kJ4uClcxzHz/Bx1/1z8WxpbqHajAGBbXkJRix3gCAYUB4
+OdzZ98cHBlsbum7vq1w9zevbu+o9BnNuKxBFw/prubsO3BQauV5Ss9XbI9aw
+ZzU9qYTBzVWroe/ap95vnO3EyKTSj0Nf1c1bSa/5zPBRMZ0z9vFnXL3nr71h
+dEQlhWRtDMYwrdZECUasNwBgGEDqkn094wznj9LtM/aouixLGzICAnbc02yI
+S+5tM+sQZBwNeXgmNbOiR9VkGu2pPn2Op31mSnhlqZs/l2ewEKYjlSS4OWox
+ceuDjsEWN0j9T+9+NrTfgi+VfhxzVGmxRe9pMAY1tWrwSjBivQEAw4Hk/nY/
+f8N7wgNud5i0eOPO9IzU79ZuOam5VSvtuHluV9Cz41zX5V6pE6FUPwInmryj
+INrtiTGPqRkz1jvpH+1BQnJvu9/C/U1G3w6hKpU0uDlqMf6lNTOnuIXEJR3M
+yT5S2CDWLmiJpNKNY46qIWxy/AFjmFY7BE4JRrA3AGA4QPnFm97fpf80qe4u
+geXQi4YJKzaHb6vsxZmbtpdKLyCJVGbH0CqAMfSxmtoR4A0AGB4kTflpmRfb
+htadKren1Flz7lCMJmkqyEj/rZXw0V4bS6UT0IRU5sbQeoAxdLCi2pHgDQAY
+HjCks2tws1shF1blxk8d99zrewqqBBZ/b5xeNFTczkdM7GbYTCq9gKRSmRxD
+6wLGsLbakeMNAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABGNWhPefLqMH8P
+p5nL9t4WjaJ3gY3axAEGAdcBADXEDdkH/xagCqQhK2hq6Cj6dvuoTRxgEDzX
+YcLqU7816b6jwvgnuEgfHPh4K60+VQBgP2Dyfrlq9Sa6Hu+/sgLnVdAjlFGb
+OMAg+K6TNud+mXpD980Yxj8xRvpg/7txeC9vBwCTYDK7uWgX3dq9KpNCV/ER
+x/AnbkeuAGyEoetEVf/z8SG99xwa/8QAWdPh96IvW6MdMTAiQFqKjv5yp8/U
+wQVDeCVZCSGvvFdiaetthbKF2/FNUaGB01/gzFmZ3ah84QoquJ7HLe3Aezkm
+iab+2qPxC6Y5PDneKSDm8H3dnjxYbzV3f3En4ZflqWVtrNMKyFrzImZFat7A
+aVbi+KFUmEqcIgy4Ar+apseHklQSq5iJOR4eVa4T3/7vt3fo9fA1/oke8mZu
++KpLVji8ACMBWduvX3ycRWGNjUkeNfOuJrhMptkKAQ9J4/EfzjcPzDl5+5mI
+F501vdX6b6dFfn3BqOcoMf13UtbuvdKOSLuu7X1n0tM+u2vV8xgTNxae+qt9
+YIWG9jXWCo0iUsyaQKdlyHinVgY4cHTfDk07ccJQphKnGpgJVxBWk3R8KEol
+Dm4mZnh41LmOX/RukP5AG/9EBzkv94MVF/lwBQ4MgHaei/SLofwOfXNayOF+
+rFSk3gOS1Gydu3CfpjMc1l0UOTda2V+aEtK2ixda1T4X3Yh1dny7RLUdIG3m
+Rrk5u3kOMN0rcIvRnVXKWRPptABpc97mtLNJs/W7kdJMnCiUqcQpwowriKqp
+hHB8qEolC24etD08Cl0nuhk/6w29Dr7GPxkCbft/Sz6+0AWnJkChXKgcC3Zf
+WqY7XdDe6uOJ4QHBXyWvj3xzJsfJL5o71BKG9lGINJoCFVzLWB6epnONj3X/
+HuoeVmjkT/I4SnqvrvCYZ9jFxzpZ4+g0N2tp04nEzBpBg1GnbPqJE4ayGIZd
+ocSomgTjQ7uUuMEtUUvZw6PRdZL7/zt7pl5XX+OfDH3oo/yI5eeptvsFRji9
+5REus7+v15+lWNf5wOed4pTLKVlL7geTHRacaFVfpZMdhcT1eemZJUY7BITR
+5D2VJ7avCXF7aqzTiqEun+K733h7flllvOAnUaX8Lb/484XrSnooGZte1vg6
+zcoaeZCdeKBWrJA+MJ7aNBMnC2UpTLpi8Lc41cQfH7pSCYKbq5aOh0ej66QN
+P/i6Ruk+L2r8E+0ndpxbvjT/EeXWlMDIhv/nfM6coy0GHtftViYs+4jzsnbH
+m+QoJGvJWcRxj6402hsnjqYEE5ZvcJ0YrL3KR+pSZrksw3uIlCQOyr+8I+FA
+DdXb23SzxtNpRtZddYcTD9crl594U5tW4uShyJDxTn6yKNiAxbGluodqhl2B
+X0388aFdSlKr2NTDo9F1ssafXnF+/7KQ7CeaVLt+//i//l8bnJqAQYSXw519
+fzTcz9a1ZV/l6mle2mtwc+4sEEcbpO/ap95vnNVcyktqtnp7xN4QUY+D9ddy
+dx24KaS+F0A3azydpjCOdvNW0ms+M3xUTOeMffwZV+/5a29oDy90EjcRylKY
+dAVhNfHHh55U+lYxEVADFQ+PRtdJGzJ8XZaW95L9ZBCsu2jFhydbzX12Bxhx
+IHXJvp5xhtZU2nLGnn+UthywUkDAjnuaTXDJvW1mHYUMo2Hi1gcdg+3XkPqf
+3v1saNdCeGWpmz+Xh+NRfFXIwzOpmRU9quUW2lN9+hzP9ONX1LMm1mlO1lpk
+Tfv/7Wqw7KSbOEkoS2HKFaTVxB8fOlLNsQpJQLoeHo2uQ2p3+3pv1H0kx/gn
+6o8rXhnONbyoBEYzkvvb/fwNbwsP2NJh0uKNO9MzUr9bu+Wk5vastOPmuV1B
+z45zXZd7pU5E+eIbJxrGv7Rm5hS3kLikgznZRwobxNploeTedr+F+5vwvnWB
+E0feURDt9sSYx9SMGeud9A+V4w3VrIl1mpP1EDhTm17ipKEshxlXkFaTaHyo
+SjXXKoQB6Xt4FLqu/9b6WcEnWlGyn6gQXP7s/SMPzfuyFTBCQfnFm97fpb+O
+0b2ctxwa0TBhxebwbZX4bzWxpipWZa0YxsQpYkfjY3up9AIyKpVtrhOUfPjq
+V3oJG/9EibA89t0DlB+cBEYNkqb8tMyLbUPOUNkypc6a84VKNElTQUb6b61E
+DrWuKtZkrRjuxCliP+Nja6l0AjIslWWuQ2pTQr/U++aw8U+U9F1LeGdfA5ya
+ABwwpLNrcINbIRdW5cZPHffc63sKqgQW7//SiIaK2/kI0faFdVWpYUPWCiYS
+p4g9jI+tpdILyKhU1rkOqdsXsfN2P+lPlIiub3j7h+FeewEAAACjELTrry2J
+v+k+xmH8ExWiqsS3k++PwjcyAwAAAMML1nsr5/C1HpTsJ4OI7+5YknQPTk0A
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUQHvKk1eH+Xs4zVy297bI
+tg25hvOzWMLITnlkZ6cYBQkCwDAhafrtVDWdd/eLG7IP/i1AFUhDVtDU0CK+
+7aThfxYmrD71W9OI/VbCcA7v8DOys1OMggQBYFjAem+kfnmimdb7pDB5v1x1
+KhNdj/dfiddH0nrgf5a0OffL1Bv4L4q0e4ZzeIefkZ2dYhQkCADDgbTx0Mf/
+U4XT3osKolu7V2XWDc/1i+Fniar+5+NDI/vtwcM5vMPPyM5OMQoSBAAbIq7Z
+8c5/3xab/o/GYL3V3P3FnVZ8BSjKL02O2ZB66GDq+piUy3y9V44Yf5b49n+/
+vaOGXDrSUnT0lzt9FC+vsP7ao/ELpjk8Od4pIObwfapd1i0BFVzP45Z24PSO
+oTa89BJUiOuPb4oKDZz+AmfOyuxGm7/gcpizUyNrzYuYFWnlrlL4WJogAAD4
+SGp3Bb1nzo44Jm4sPPVX+8BlC9rXWCu0xhREO88t93orr20glrz15CKvyPOd
+KOln8YveDdpdS3yAlbX9+sXHWdQXrv13UtbuvdKOSLuu7X1n0tM+ZLGtSP/t
+tMivL3TpDSG14aWboKTx+A/nmweSkrefiXjR+VOjdgE2YPiy0/wZ79TKAAeO
+tTseEmJ+ggAAEIE+Or1w1tqbtHf0pM3cKDdnN88BpnsFbjFucmwG8pZsf8c5
+hwbbT8qasnwdA48p2zUTf5boZvysN/I7CFbVA6e6SL8YGkcoadvFC63qs5Ho
+Rqyz49slAhK57flr4iqscvzDuosi50aXCrSJUBte2gkqUKlINvghkpqtcxfu
+e0C4I2qP2amD521OO5s028XEuYn5BAEAIEZ8+2vv2TuI3hCP9t7KS03en8M9
+sDvmvyI+jC/lW7bJhfCKMqKCXl11aH/yxqhgV+/In8vz922NW+Ln8uq6Yn5P
+2ZIpk7Sng55LIc87Li0nvY8suf+/s2d+exd/V0/OOxbsvrQM9+iD9lYfTwwP
+CP4qeX3kmzM5Tn7RXP2uz4reqys85hl2sNaP33zkjTDTV5yUxhDr/j3UPayw
+i9bwmp8gKriWsTw8jWw71E6zkzadSMysETT86Gvy3MR0ggAAkCC88tHU2T/g
+9nxEu//cuOCdff8oJ720Pn3mC6+feWT0hnm6iKq+cJkScrodVWAd+cEOnBV/
+dKMKWWOm70tvFTVcCJ4wRXs2EpYtmTRhwZ89ZNGkDT/4ukYRPAfVWx7hMvv7
+eoKzC9Z1PvB5pzjlYlfWkvvBZIcFJ1qHdl4wfvHnC9eV9JAdbKgc3CiPofju
+N96eX1bRWmCbmaC8p/LE9jUhbk+NdVpRYNTNRoNdZoc8yE48UCtWSB9Y59xk
+0wQBACBBUBL6ku//NeLcyu29Fu/uFjt4Q0LecvRVTuDxVgrb5jLeyU8WBRuw
+OLZUfZjvr97o7rRMdf4Rln34kseWOwNrd+zRGX/Hf+fcL/1w8sQwzXWT4NLi
+iaaum2SNP73i/P5l/GMQ/8/5nDlHW4g0q5o+p9WrtvCEZR9xXh66+YLyL+9I
+OFCD/yTEUILz3MdP8PE3SFAP6mOI1KXMcllGnq31ElQovyBWvsF1YrDhhqg9
+Z9dVdzjxcL3qPEJ8bmJJgiamCQCMeoRlHzj74t126Lu24iXH8FLViQJt/2U+
+598HHuKcwehCcm7Kbmo84jdFe7/p4aE5jv45PNLTobQhw9eF6PwlvBzu7Psj
+4R0V3YNbX+XqaV7qvUGsv5a768BN019ENr3wpjGGkpqt3h6xN2jd9zMzwSF1
+n3q/cbaTIE/7y+7mraTXfGb4qJjOGfv4M67e89feIHzYg/EEAQAgob8qweuV
+lDrjx9G6CoPHPxOYo1y3Su7/X6DjrHSi7RV6n2dwbtqsc25qQR7lf+QVqtzw
+GzgWnA6bsaygg3wTEand7eu9UfdWs5x/Ne//Xe9RntGQumRfzzjC44Xy4DZj
+zz/KzAdOcQEBO1S9L5GHZ1IzKwa7Y6I91afP8Qif1DN9cKMxhsIrS938ueRn
+YiskiIlbH3QgqtMRUv/Tu59ZsqfHvuy0yJr2/9vV4j09WyQIAAA15LycIF/V
+CcIAWdvpT2eMf3rqG6u/271l7mSv7VZoW4whrZfSg559xnfnHw1ddYX/8Xxq
+vP+ei02dt3Kjnf710grudQHSXZz0+Ya0Qz+nb4pNLuk2Ndf7b62fFXyiVecE
+1lMS5eYWVazaGpHc3+7nT/g4w8DBzWHS4o070zNSv1u75aTyXrq8oyDa7Ykx
+j6kZM9Y76R/ih8hNH9yoj6Hk3na/hfubKFyYWpQgxr+0ZuYUt5C4pIM52UcK
+G8TEF4d2mJ2ONKucm2yRIAAAFOmv/iow6grZLBZcjnT22MTK52AFJR+++hWx
+MpRfvOn9XQS/190UsjnkY4gJKzaHb6uk//4lliQ4srNT2CxBAABI6Ps7YXES
+0UPkCuXD1KtdXGOus3ErHalNCf2S/Oujkqb8tMyLbTiLb9XBDW830waQjqGk
+qSAj/bdWM3dMWZDgyM5OYdMEAQAgpP/2/4Yn1eCdnLD+xrLcLf7jn3T/9k8+
++/bSkbp9ETtvm7yew5DOLsRgTSsXVuXGTx333Ot7CqoENs3M5Bii4na+oTya
+H8FcgiM7O8WwJAgAAAHyjsKNX/5u4rED1oF2/bUl8TfCe/kAAACAnYP2XD34
+8w06/ZuYBuu9lXP4Wo+dnU8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAwAzQnvLk1WH+Hk4zl+29LbLa0/82CgvYGvADYJdImn47VU3v60tm
+/AkwfIgbsg/+LUAVSENW0NRQ0+1bmQ0L2BrwA2CHYL03Ur880UznhV9m/Akw
+rGDyfrlq4SC6Hu+/kqDzL2vCArYG/ADYH9LGQx//TxWtV7Wa8Sc2AZPBdZsJ
+RLd2r8qss7x9yfCEtRDwg0lGlR8A+0Zcs+Od/75t0J9J3HBq+7fJmQd+3PHF
+iq9OGV4f4f6JKbD+2qPxC6Y5PDneKSDm8H38fuYKpKXo6C93+kwdYjCEV5KV
+EPLKeyU99FSQIGvNi5gVqenpgwqu53FLO0g67lCSSi1rOojrj2+KCg2c/gJn
+zsrsRoRUKtZbzd1f3GneKwVRfmlyzIbUQwdT18ekXObrvP3JorDaIKz1A50R
+pqXT+mZQQ9W6bPYDABggqd0V9J7BPrG8JWeh74Zbyhd4Y90X3vb5/672mvoT
+k/TfSVm790o7Iu26tvedSU/77K417l4ga/v1i4+zKKy+MMmjZt7VBJfJbxZb
+69wk451aGeDA0e031387LfLrC124U46iVCpZ00LSePyH880DQeTtZyJedP5U
+3QAETyombiw89Vf7wLoC7WusFdI8cqCd55Z7vZXXNvBn8taTi7wiz3eiVgir
+hbV+oDHCNHVa3Qyaj6dmXXb7AQAMQB+dXjhr7U397TlZU9Ycx1d/qB2YbLLm
+n1/79zd6bW9x/8QU0raLF1rVU1F0I9bZ8e0SgaGUznORfjHkvUh1kNz7n+mO
+1jo3SZvzNqedTZrtotcLFesuipwbXSowWt9SlUoha5qgUpF630pSs3Xuwn0P
+pARSpc3cKDdnN88BpnsFbqHb+VHeku3vOOfQQ9Xie8APvo6Bx5QdxS0Mq4W9
+fqA8wnR1Wt8Mg2GpWZflfgAAQ8S3v/aevcOwcyDafTHBZ8JL7/5n3/aETYfv
+6D8aiv8nNOi9usJjnlEvbTnvWLD70jLdKY72Vh9PDA8I/ip5feSbMzlOftHc
+odbatI9FxNGkTScSM2sEDT/66k/wgRn+e6h7WGGXYXcgmlJJsjZDreq3gmsZ
+y8PTaobWDARSiUF4RRlRQa+uOrQ/eWNUsKt35M/l+fu2xi3xc3l1XTG/p2zJ
+lEnag2fPpZDnHZeW2+hON+v8oPot1RFm1gx0rUsMe/wAAEqEVz6aOvuHBuNJ
+0l+9M9D9mbEOQYnn22XU/oQaGL/484XrSnoMJ01veYTL7O/r9cNiXecDn3eK
+U67/ZC25H0x2WHCiVb1rQHYsEtfnpWeWGG3A4EdDHmQnHqgVK6QPjCa4Qnz3
+G2/PL6sMVoN0pZJkTVvtAPKeyhPb14S4PTXWaUWBtj8VvlQyRFVfuEwJOd2O
+KrCO/GAHzoo/ulGFrDHT96W3ihouBE+Yoj36CMuWTJqw4E/r3dvTgXV+UNAb
+YSbNQN+6ZLDDDwAwiKAk9CXf/2s0uG+KNP388Tvf3+3t+GvHW5PGz/pGbwMP
+909kvJOfLAo2YHFsqeH8Q/mXdyQcqMG5Dcz/cz5nztEWg0mp6qydVq/aChGW
+fcR5WbP/T3YskrXkLOK4R1caNWPHidZVdzjxcL1yEYo3wZG6lFkuywwXiHSl
+kmRNU63O/8GE5RtcJwbnd2BkUsnor97o7jT4F8KyD1/y2KLcusUenfF3/HfO
+/dIPJ08M06yTBZcWT6S6TqbqhEFY5wfaI8ycGcyxLhls8AMAaBCWfeDsq91T
+V9NfvclnTkqdch5gPX99MtU1+rrIxJ9QAuuv5e46cBP/C7vCy+HOvj8ahtWd
+kn2Vq6d5fXtXvctizv0F42g3byW95jPDR8V0ztjHn3H1nr/2hvbIIKnZ6u0R
+e8Pg3ho9qaRZ01N7V+/ZyL5rn3q/cbYTI5NKBsmxKLup8YjfFO39hYeH5jj6
+5/CsfZ+bhX6gP8KMmcEs65LBuB8AQIf+qgSvVwZPQ0Mgdan/nr5mcBmG/LNn
+rl/SP4iJP6EA8vBMambFYCdatKf69DmeXgikLtnXM85wLimn5Iw9qo+XNmQE
+BOy4p9m4l9zbZtaxCD+aQnmHd/+/XQ0Wn8IrS938uYaTkI5UE1nTVYuJWx90
+IKojG1L/07ufDe044Uslw/BYtFnnWNSCPMr/yCtUucGjQNtPh81YVtBh5R7C
+LPUD3RFm0AxaqFuXDIb9AAB6yHk5Qb6b7xh8Vwnru531+X+t+e/vs/bt/mrT
+wdt639vA/xNTn9NREO32xJjH1IwZ6613vlMiub/dz9/w/vDAlHSYtHjjzvSM
+1O/WbjmpuaUs7bh5blfQs+Nc1+VeqRNRniQE0QbBmeCSe9v9Fu5vMvqmCFWp
+FLKmpxbjX1ozc4pbSFzSwZzsI4UNYm1hiKQSgSGtl9KDnn3Gd+cfDV11hf/x
+fGq8/56LTZ23cqOd/vXSCu51AdJdnPT5hrRDP6dvik0u6bbuIpm1fqA/woyZ
+YQga1iWCYT8AgBH91V8FRl2h+qCuuX9CCZRfvOn9XfqPoepuZVgOvWiYsGJz
++LbKXpz9F9tLpReQRKr9wio/2JEZFCPUD8Boo+/vhMVJ9J4IN+NPKCJpyk/L
+vNg2tAZVTUkzNhDxoRNN0lSQkf5bK+FtNRtLpRPQlFT7hS1+sCMzKEayH4DR
+Rf/t/w1PqqF1pjHjTyiDIZ1dg9v9CrmwKjd+6rjnXt9TUCWweA+BXjRU3M5H
+TCw7bSaVXkAqUu0XNvjBjsxAUS0A2APyjsKNX/5O69amGX8CAAAAAHRAe64e
+/PkGrQdbzfgTAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABY
+BdpTnrw6zN/DaeayvbdFVvuSgI3CsvBDrctIKsfwY900oRYAwBzihuyDfwtQ
+BdKQFTQ1tIjP7rAs/FDrMpLKMfxYN02oBQAwCCbvl6uWbqLr8f4rK6zVd9tG
+YVn4odZlJJVj+LFumlALwPZgMrhyNoHo1u5VmXVWf2eijcKy8EOty4gpByNT
+z7ppjphaABaC9dcejV8wzeHJ8U4BMYfv4/eyViAtRUd/udNnyvcYwivJSgh5
+5b0SWk3oaAhDBdfzuKUdJI1zqEkV1x/fFBUaOP0FzpyV2Y1WeqG1rDUvYlak
+ptEPsVSst5q7v7jTvPeUovzS5JgNqYcOpq6PSbnM13npokVhSSExiakPhXKY
+FXYIBqYeTjmsOnoW2IkUJqYGYDP676Ss3XulHZF2Xdv7zqSnfXbXGh8YZG2/
+fvFxFoUlByZ51My7muAymWaDVHrC+m+nRX59oQvXZxSlShqP/3C+eSCgvP1M
+xIvOn/7dZ+IPqCDjnVoZ4MDRbUKHJxUTNxae+qtdOjCV+hprhTSnC9p5brnX
+W3ltA38mbz25yCvyfCdqhbDkENbC1IdCOSwsByNTj6AcVhs9s+1EDiNTA7AZ
+0raLF1rVzhDdiHV2fLtEYPBfBkoe6RdTTrXZoeTe/9Bu3k1TGNZdFDk3ulRg
+tJSkLBWVitR7H5KarXMX7ntgeTMeaXPe5rSzSbNd9BqkGkmVNnOj3JzdPAeY
+7hW4Rb9lnmnkLdn+jnMOPVStX2VNWb6OgceUjcFphJW356+Jq6DTu5KoFqY+
+FMphYTmYmXqE5bDS6JlrJxMwMjWA4aH36gqPeYbdrxVy3rFg96VlugVDe6uP
+J4YHBH+VvD7yzZkcJ79o7lATa9oThDQavjCs+/dQ97DCLoOTE12pClRwLWN5
+eFqN2GKp0qYTiZk1goYfffUPhkRSiUF4RRlRQa+uOrQ/eWNUsKt35M/l+fu2
+xi3xc3l1XTG/p2zJlEna03TPpZDnHZeW07u9K28+8kYYweNKZtSC5IOgHBQg
+KQfDU8+4HHRHz6p2YnhqAMyB8Ys/X7iupMfQd73lES6zv6/Xdw/WdT7weac4
+5RJK1pL7wWSHBSda1ZfKZBNEXJ+XnllitBtHEo1AmPjuN96eX1YZLIHoSZX3
+VJ7YvibE7amxTisKOgw10ZKKPMhOPFArVkgfGB0MCaSSIar6wmVKyOl2VIF1
+5Ac7cFb80Y0qZI2Zvi+9VdRwIXjCFO2UE5YtmTRhwZ/0FsrkE5B+LQiBclCB
+pBxMTj38ctAePSvaSQmjUwNgBpR/eUfCgRqcJyH4f87nzDnaYmBqVQ/rtHrV
+lbmw7CPOy9p7BCQTRNaSs4jjHl1pdDeBOBqBMKQuZZbLMsNVEV2pSjBh+QbX
+icH5HfofQEdqV93hxMP1yvUg3sEQXyoZ/dUb3Z0G/0JY9uFLHlvuDKxcsUdn
+/B3/nXO/9MPJE8M0i0PBpcUTqS4OZbyTnywKVjLPffwEH3/VPxfHlhoeGGjX
+ghAoBwlUysHw1FMYl4P+6FnPTkqYnRrA8IP113J3HbiJ38lQeDnc2fdHwzsA
+upbrq1w9zevbu+pLf3M2vYmiEQqT1Gz19oi9IbJM6iB91z71fuNsJ0UfGke7
+eSvpNZ8ZPiqmc8Y+/oyr9/y1N7QTHF8qGSQTMLup8YjfFO2m+sNDcxz9c3j0
+bu6aWBzSrgUhUA4qkJSDyamnQb8c9EfPenZSwuzUAIYb5OGZ1MyKHtUjLWhP
+9elzPL0n9ZC6ZF/POEM7Ki03Y88/yv8pbcgICNhxT7OPLLm3zawJYhyNRJjw
+ylI3f66h86hLxcStDzoQ1bxA6n969zPjTSR6UtXImvb/29VgoY4vlQzDCbhZ
+ZwK2II/yP/IKVe5qKND202EzlhV0oCYj6kHh3ESrFoRAOahAUg6mph5xOeiP
+nvXspITZqQEMK/KOgmi3J8Y8pmbMWO+kfwxsIrm/3c/f8HblgOUcJi3euDM9
+I/W7tVtOau5wSjtuntsV9Ow413W5V+pElJ2BE41UmOTedr+F+5uMvmxBVSrG
+v7Rm5hS3kLikgznZRwobxNRXbwSJD4JzMCSSSgSGtF5KD3r2Gd+dfzR01RX+
+x/Op8f57LjZ13sqNdvrXSyu41wVId3HS5xvSDv2cvik2uaSb9hOxps9NtGpB
+ApSDAmTlYGbqEZeD7ujhxzfXToxPDYB1oPziTe/v0n/2UvdS3XLoRcOEFZvD
+t1X24hzB7EgqW7HmcEE5LIRVA2jW6FlXLQAYImnKT8u82Da0gFNZLqXOmhOE
+YjRJU0FG+m+thE+d2pFUVmLd4YJyWApbBtDM0bOynQDAGAzp7Brcg1bIhVW5
+8VPHPff6noIqgcXfsqYXDRW38xETKzc7ksoyrDtcaqAcFsKGATRr9GxiJwAA
+AAAAAAAAAAAAAAAAAAAAAAAAgJEA2lOevDrM38Np5rK9t0WW3sy2bjRbhwVY
+CFgIAACFQtyQffBvAapAGrKCpoZa+sU460azdViAhYCFAAAYAJP3y1WLSNH1
+eP+VFfReem/jaLYOC7AQsBAAsBJMxsx2g+jW7lWZFBqAMhHN1mEthKmS0cVe
+dA4yqiwEAEyAtBQd/eVOn6njAobwSrISQl55r8TixppaZK15EbMiNW88QwXX
+87ilHTiv68J6q7n7izvpfH0P6689Gr9gmsOT450CYg7f130TvxnRhkD5pckx
+G1IPHUxdH5Nyma/z4jKLwlKQrQMTJRPXH98UFRo4/QXOnJXZjcov+hPXi0md
+aqhai0yWfVoIAEYEsrZfv/g4i8I6DZM8auZdTXCZbIWmz5rP5p1aGeDA0X0b
+Z//ttMivL+i3QMPEjYWn/mqXDkzqvsZaIbWJ238nZe3eK+2ItOva3ncmPe2z
+uxaxIJoWtPPccq+38toG/kzeenKRV+T5TtQKYU3L1oGRkkkaj/9wvhlR9q0+
+E/Gis6YLD169GNWp+Wxq1iLFTi0EACOBgXkS6Rej30WABHMaxBAibc7bnHY2
+abZ+9zesuyhybrSyT6b2v3Gj3JzdPAeY7hW4pZpaz01p28ULrepDiehGrLOj
+ulmzedG0yFuy/R21PWKasnwdA48pOwZYGNakbB0YKhkqFal33CQ1W+cu3Kfp
+KmRUL4Z1qqBoLRNB7NNCADASkPOOBbsvLdM9fqC91ccTwwOCv0peH/nmTI6T
+XzR3qPEA7QMIcTRp04nEzBpBg1FnUqz791D3sMIuqrceSAWr6L26wmOeYacB
+IhBeUUZU0KurDu1P3hgV7Ood+XN5/r6tcUv8XF5dV8zvKVsyZZL2fNFzKeR5
+qr016YMvm8GSqX4ruJaxPDytZqj/HEG97MlaI9ZCAGCv9JZHuMz+vl5/ymFd
+5wOfd4pTri9lLbkfTHZYcKJVvb9AdgAR1+elZ5YYbZngR0MeZCceqBXjds0W
+3/3G2/PLKurrRhLByt/yiz9fuK6Een9lUdUXLlNClC3KsI78YAfOij+6UYWs
+MdP3pbeKGi4ET5iiPZQIy5ZMmrDgT+vdI9GBSDZjJRtA3lN5YvuaELenxjqt
+GOo3h18v+7LWiLQQANgv/D/nc+YcbTGY9LotV4RlH3Fe1txcIDuAyFpyFnHc
+oyv7DH+BE62r7nDi4XrlyhTvAILUpcxyWUZnKUksWIHyL+9IOFBD8EgBLiR9
+n3Pul344eWKYZtEruLR4ItVFr4x38pNFwQYsji3FP+ARy2aoZDr/BxOWb3Cd
+GJzfoRaHXy87s9bIsxAA2DPCy+HOvj8+MNiq0J2nfZWrp3l9e1e9hWPOTQHj
+aDdvJb3mM8NHxXTO2MefcfWev/aG9sgjqdnq7RFr2Ima3kcMCsb6a7m7DtwU
+0pu7JAeW7KbGI35TtDcLHh6a4+ifQ6dDNSVIZTNTsrti3d/3XfvU+42znWp9
++PWyM2uNMAsBgJ2D1CX7esYZzlXlPJ2xR9UmWdqQERCw455m811yb5tZBxD8
+aArcrtkK4ZWlbv5cOtMV/yOQh2dSMyt6VM9AoT3Vp8/xqDU4MzywbNY5sLQg
+j/I/8gpV7tYo0PbTYTOWFXRQbn9NDROymSoZJm590DHYwAep/+ndz4b29PDr
+ZWfWGlEWAgD7R3J/u5+/4T3egXnqMGnxxp3pGanfrd1yUnNbWNpx89yuoGfH
+ua7LvVInojydCKINgnMAkdzb7rdwfxOdb6LgfIS8oyDa7Ykxj6kZM9Y76R9K
+faeR1kvpQc8+47vzj4auusL/eD413n/PxabOW7nRTv96aQX3ugDpLk76fEPa
+oZ/TN8Uml3Rbd8VLQTYzJcP4l9bMnOIWEpd0MCf7SGGDWHshQVQv+7LWyLEQ
+AIwMUH7xpvd36T+wqru/YTn0omHCis3h2yp7ae2hWFcw22FVyUjqxSqdChPW
+Gl0WAgC7QNKUn5Z5sW1ogauapyl11jyAUIwmaSrISP+tldqjuuZ9xIiALSUz
+VS+26FSYlDrqLAQAdgGGdHYN3ktQyIVVufFTxz33+p6CKoHFuw30oqHidj5C
+96Ej6wq2G9hQMir1YoNOU1JHqYUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAVoP2
+lCevDvP3cJq5bO9t0Wh8hwuMAMBmwJ/AqETckH3wbwGqQBqygqaGFvGZ1jP8
+wAgAbAb8CYxOMHm/XLUUE12P919ZMQo7DsAIAGwG/AmwA0zGzEW76NbuVZkU
+Gq2OXNg5Akz5wQzsSKo9wk5/AuwE6689Gr9gmsOT450CYg7fJ2gFgLQUHf3l
+Tp+peYshvJKshJBX3iuxXkcaWWtexKxIzYvRUMH1PG5pB8470bDeau7+4k7C
+705SSoHaaNBBXH98U1Ro4PQXOHNWZjcqXzxAnAIlUH5pcsyG1EMHU9fHpFzm
+67x9ztQIUIK1fsAXZnowmbCuOUUHfwKALv13UtbuvdKOSLuu7X1n0tM+u2uN
+39sia/v1i4+zKKx2MMmjZt7VBJfJ1mqurWxac2plgANH96Wd/bfTIr++oN9q
+DhM3Fp76q106MDX6GmuFRvanmAKV0aCFpPH4D+ebB4LI289EvOis6QqElwI1
+0M5zy73eymsb+FN568lFXpHnOwdnv6kRoAhr/UAsjGwwGZFqRtHBnwCgj7Tt
+4oVWtb9FN2KdHbXdorUMuC3SL0a/2QAJ5jTiIZbXnLc57WzSbP0mcVh3UeTc
+aGWTUu1/40a5Obt5DjDdK3BLtWFjU6opUBgNmqBSkXqTSFKzde7CfZqGRkYp
+UETeku3vqO3+05Tl6xh4TNnzwdQIUIW1fiATRjiYDFmXdtHBn7oh2vPXxFVQ
+rRkwKui9usJjnmFXA4WcdyzYfWmZrlfQ3urjieEBwV8lr498cybHyS+aO9Sf
+gPYEJ44mbTqRmFkjaDBqYIp1/x7qHlbYRXHm0E1BBf5omJGF6reCaxnLw9Nq
+hlr0EaaA8IoyooJeXXVof/LGqGBX78ify/P3bY1b4ufy6rpifk/ZkimTtEek
+nkshz1Ptmkof1vmBUBjBYDIslXLRwZ+6yJuPvBEGT/IBQ2D84s8XrisxavDc
+Wx7hMvv7ev05gHWdD3zeKU65rpK15H4w2WHBiVb1VTrZBBfX56VnlhhtFeBH
+Qx5kJx6oFeM21xbf/cbb88sqilcHdFMgGQ3aWQwg76k8sX1NiNtTY51WDLXk
+I05BVPWFy5QQZfM5rCM/2IGz4o9uVCFrzPR96a2ihgvBE6ZoZ7uwbMmkCQv+
+tN69Pd102OYHMmH4g8mkVDpFB3/qAucmQA+Uf3lHwoEanHur/D/nc+YcbTFw
+um6/G2HZR5yXNTvVZBNc1pKziOMeXdln+AucaF11hxMP1ytXdnjnJqQuZZbL
+MqoLMropkIwGzSx0/g8mLN/gOjE4vwMzlQJJR++c+6UfTp4YplmXCi4tnkh1
+XSrjnfxkUbABi2NLcQ9v7PMDeWnwB5NhqQqqRQd/KnT9Oc99/AQff3J/AqME
+rL+Wu+vATSGuC4SXw519f3xgsHeg6/O+ytXTvL69q94PMGfT3jjazVtJr/nM
+8FExnTP28WdcveevvaGdSpKard4esYYdv4mglwLpaNDL4q5Y9/d91z71fuNs
+J2YqBZK5n93UeMRvinY//+GhOY7+OXTa11OChX4wURr8wWRSqgYqRQd/6gLX
+TYAG5OGZ1MyKHtXTNGhP9elzPL1nf5C6ZF/POEOPKn0+Y4+qR7W0ISMgYMc9
+zea15N42syY4fjQFbnNthfDKUjd/LlXT00nBxGjQzQITtz7oGGwchNT/9O5n
+Q3smxCkYzv3NOnO/BXmU/5FXqHJDRYG2nw6bsaygg3IPc2qw1g8kwvAHkymp
+dIsO/tQFzk2ACnlHQbTbE2MeUzNmrHfSPwZml9zf7udveNN1wOcOkxZv3Jme
+kfrd2i0nNbdVpR03z+0Kenac67rcK3UiyqYkiDYIzrlJcm+738L9TZS/gUE1
+BQqjQS8LjH9pzcwpbiFxSQdzso8UNoi1i12iFDCk9VJ60LPP+O78o6GrrvA/
+nk+N999zsanzVm60079eWsG9LkC6i5M+35B26Of0TbHJJd3WvWhirR9IhREN
+JjNS6Rcd/KkDnJsAyqD84k3v79J/7FN3f8By6EXDhBWbw7dV9tLY1LB9CvQC
+mpECe7AjP7BKKqM66QW0a38CowpJU35a5sW2oYWdyucpddac4BSjSZoKMtJ/
+a6X67KzO39k0BToBzU2BPdiRH9gilWGddALavz+BUQWGdHYNbkwr5MKq3Pip
+4557fU9BlcDiPSV60VBxOx8xczlnsxToBbQkBfZgR35gg1RGdVpfKgAAAAAA
+AAAAAAAAAAAAAAAAAAAAAACMRtCe8uTVYf4eTjOX7b0tgpvrALsAfwLAqETc
+kH3wbwGqQBqygqaGwpcpAXYB/gSA0Qkm75erFqOi6/H+Kyts1MgDAMwD/Dkq
+wWR2c4VsR1LtFNGt3asyKXSeHV7spe72otN+Yac/AYXqtcZH4xdMc3hyvFNA
+zOH7+O/dVyAtRUd/udNnap5gCK8kKyHklfdKLO8phC8MFVzP45Z2kLxKjwGp
+GmSteRGzIjWv/rOSVGoFooO4/vimqNDA6S9w5qzMbkQoSSUF5Zcmx2xIPXQw
+dX1MymW+zsvosN5q7v7iTsu+Pcpai5o1kuBPU9ibPwHb0H8nZe3eK+2ItOva
+3ncmPe2zu9b4nSaytl+/+DiLwtICkzxq5l1NcJlshcbWxML6b6dFfn3BqHca
+c1I1n807tTLAgaP7WlorSKVSIFpIGo//cL4ZUTa/PhPxorOmiQ+ZVHLQznPL
+vd7Kaxv4U3nryUVekec7B2c/Jm4sPPVXu3Tgv/Q11grNPQCw1qJmjCT40yR2
+50/ANkjbLl5oVZtJdCPW2VHbT1nLQGkj/WL0e1SQYE4THJrCsO6iyLnRygae
+rJCqFtyctzntbNJs/TaIFkulUCCaoFKRep9IUrN17sJ9mr5BhFJNIG/J9nfU
+tuxpyvJ1DDymbK0gbeZGuTm7eQ4w3StwSzVJk2J5e/6auAqCsWCtRemPJPiT
+Aiz0J8A0vVdXeMwzfFO/Qs47Fuy+tEzXpGhv9fHE8IDgr5LXR745k+PkF80d
+amtBe0KRRsMXhnX/HuoeVthlYFMGpUqbTiRm1ggajFr0Wkkq/jiYq1b1W8G1
+jOXhaTVD7eUIpCoUCK8oIyro1VWH9idvjAp29Y78uTx/39a4JX4ur64r5veU
+LZkySXtE6rkU8jzVVqdaKLdFYKVFKY8k+JOiWtVvWeRPgFkwfvHnC9eVGLVA
+7i2PcJn9fb2+4bCu84HPO8UpFzGyltwPJjssONGqviQmm1Di+rz0zBKj63KS
+aATCxHe/8fb8sspgqcOYVORBduKBWjFu+3jrSCUYB7PUDiDvqTyxfU2I21Nj
+nVYMtZPDl6pEVPWFy5QQZcc4rCM/2IGz4o9uVCFrzPR96a2ihgvBE6ZoZ7uw
+bMmkCQv+pLfWp3huYqNF6Ywk+JOSWgXr/AkwCcq/vCPhQA3OjUz+n/M5c462
+GNhKtxeMsOwjzsuabWGyCSVryVnEcY+u7DP8BXE0AmFIXcosl2WGqx+GpHbV
+HU48XK9c8eHNfetIJSkQTbU6/wcTlm9wnRic34GRSVVC0oY7537ph5MnhmnW
+pYJLiydSXZfKeCc/WRSsZJ77+Ak+/qp/Lo4txT28sdeiCqojCf6koJaV/tSB
+0J+ALcD6a7m7DtwU4g658HK4s++PDwwu1HVN1Ve5eprXt3fVF9/mbJITRSMU
+JqnZ6u0Ra9jFmhmpN28lveYzw0fFdM7Yx59x9Z6/9oZ2illDKmmB6Km9K9b9
+fd+1T73fONuJkUlVQjL3s5saj/hN0e7nPzw0x9E/B6+VNwmmr5tYa1ENVEYS
+/GlaLSv9CTAE8vBMamZFj+rRFbSn+vQ5nt6DNkhdsq9nnKEhlKaasUfVEFra
+kBEQsOOeZqdYcm+bWRPKOBqJMOGVpW7+XEOHMSdVDU77eCtINVEgumoxceuD
+jsH+PEj9T+9+NrRngi9VieHc36wz91uQR/kfeYUqN1QUaPvpsBnLCjootzQf
+xNS5iaUWpTuS4E8qalnoT4AJ5B0F0W5PjHlMzZix3kn/GDhLcn+7n7/hHc4B
+UzlMWrxxZ3pG6ndrt5zU3MOUdtw8tyvo2XGu63Kv1IkoOwAnGqkwyb3tfgv3
+Nxl93YEZqUPgzH1LpVIoED21GP/SmplT3ELikg7mZB8pbBBrF7tEUjGk9VJ6
+0LPP+O78o6GrrvA/nk+N999zsanzVm60079eWsG9LkC6i5M+35B26Of0TbHJ
+Jd20F6Wk5ybWWpT+SII/Tatloz8BtoLyize9v0v/GUvdi3HLoRcNE1ZsDt9W
+2YuzgwBS9aERkEQq+2FV3cGflBkt/gRsh6QpPy3zYtvQKkplqpQ6a04oitEk
+TQUZ6b+1Ej6oClJ1oBzQlFT2w5a6gz9pMIr8CdgODOnsGtwFVsiFVbnxU8c9
+9/qegiqBxRfI9KKh4nY+YmLtBFLpBqQilf2woe7gT1uoHRn+BAAAAAAAAAAA
+AAAAAAAAAAAAAAAAoAHaU568Oszfw2nmsr23RaP0jikMAsBywKLAKEPckH3w
+bwGqQBqygqaGUnmb9QgEBgFgOWBRYLSByfvlqkWY6Hq8/8qK0fn2exgEgOWA
+RQEWgMkYuGIX3dq9KpNCR9ERDTsHgRE/mIcdSbVT2GlRgIVg/bVH4xdMc3hy
+vFNAzOH7+C+5VyAtRUd/udNnat5iCK8kKyHklfdKrNAgRVx/fFNUaOD0Fzhz
+VmY3Kr87jgqu53FLO4zeqDXwwb3V3P3FnYTf4KOkn9pQmIGsNS9iVqTmPWbE
+WVAC5Zcmx2xIPXQwdX1MymW+zpvWTA0CJVjrB3xhpgeT7dalpRMsCowa+u+k
+rN17pR2Rdl3b+86kp3121xq/QETW9usXH2dRWOpgkkfNvKsJLpOt0Eha0nj8
+h/PNiLJh95mIF501jV36b6dFfn1Bv0sZJm4sPPVXu3RgUvQ11gqNjE9RP5Wh
+MAcZ79TKAAeO7js28bKgBtp5brnXW3ltA38qbz25yCvyfOfg1Dc1CBRhrR+I
+hZENJtutS1MnWBQYNUjbLl5oVftbdCPW2VHbvFjLgNUi/WL0X6xPgjlNZ/BA
+pSL19oqkZuvchfs0vWSw7qLIudHKVplqpM3cKDdnN88BpnsFbqk2bItJVT+F
+oTAHaXPe5rSzSbP1e7oZZUEReUu2v6O2GU1Tlq9j4DFl0wBTg6Aboj1/TVwF
+wXCw1g9kwggHk+3WpatztFgUAPTpvbrCY57ha/EVct6xYPelZbrzBu2tPp4Y
+HhD8VfL6yDdncpz8orlD7+KnPcFJoylQwbWM5eFpNUMtx7Du30Pdwwq7KM4Z
+uvpV4A+FGSlIm04kZtYIGoz6jRJmgfCKMqKCXl11aH/yxqhgV+/In8vz922N
+W+Ln8uq6Yn5P2ZIpk7RHpJ5LIc9TbeKphWIDdJb6AVcYwWDai3XBogBAAsYv
+/nzhuhKjfsO95REus7+v158DWNf5wOed4pSLKllL7geTHRacaFVfopNNcHF9
+XnpmidE+AWE0eU/lie1rQtyeGuu0YqjFmPjuN96eX1ZRXHfR1U8yFLRTQB5k
+Jx6oFeP2wibOQlT1hcuUEGUvNKwjP9iBs+KPblQha8z0femtooYLwROmaKe6
+sGzJpAkL/qS30Kd4bmKjHwiF4Q+mvVgXLAoAhKD8yzsSDtTg3Fvl/zmfM+do
+i4HTdRuvCMs+4rys2VQnm+CylpxFHPfoyj7DXxBHU4IJyze4TgzO71CLQ+pS
+Zrkso7oUo6ufZChoptBVdzjxcL1ycYo38YmzIGkwnXO/9MPJE8M0i1LBpcUT
+qS5KZbyTnywKVjLPffwEH3/VPxfHluIe3tjrB3xh+INpL9YFi6qVay2qA6FF
+gdEA1l/L3XXgphDXAsLL4c6+Pz4w2DvQ9Xlf5eppXt/eVW9dmLNpTxxtkL5r
+n3q/cbZTrU9Ss9XbI9awXzQR9PSTDgW9FG7eSnrNZ4aPiumcsY8/4+o9f+0N
+7RGDOAuSiZ/d1HjEb4p2M//hoTmO/jl4TapJMH3dxFo/EArDH0x7sS5YFADw
+QB6eSc2s6FE9SoP2VJ8+x9N79gepS/b1jDM0qNLnM/aoui9LGzICAnbc0+yG
+S+5tM2uCG0bDxK0POgZ7tiD1P7372dDGiPDKUjd/LlW709FvYijopqAFpxc2
+SRaGE3+zzsRvQR7lf+QVqtxNUaDtp8NmLCvooNyvexBT5yaW+oFUGP5g2ot1
+waIAYIS8oyDa7Ykxj6kZM9Y76R8Ds0vub/fzN7zpOuBzh0mLN+5Mz0j9bu2W
+k5r7tNKOm+d2BT07znVd7pU6EWVH4kTD+JfWzJziFhKXdDAn+0hhg1i7TJTc
+2+63cH8T5e9eUNVPYSjopTAEzsQnygJDWi+lBz37jO/OPxq66gr/4/nUeP89
+F5s6b+VGO/3rpRXc6wKkuzjp8w1ph35O3xSbXNJNe0VKem5irR9IhRENpr1Y
+FywKAOaA8os3vb9L/5lP3f0By6ERDRNWbA7fVtlLY0fD9vppBzQjC/bAKj8o
+SAeTVVIZ1Uk7oF1bFBg9SJry0zIvtg0t7FQ+T6mz5gSnEk3SVJCR/lsr1Qdn
+df7OpvppBjQ3C/bAFj8oTA8mW6QyrJNmQPu3KDB6wJDOrsE9dIVcWJUbP3Xc
+c6/vKagSWHzBTiMaKm7nI2Yu5Gymn3ZAS7JgD2zwg4LaYLJBKqM6aQccGRYF
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAOuD9pQnrw7z93CauWzvbRHcXAdYB1gU
+AEYf4obsg38LUAXSkBU0NZTKu88BYFgBiwLAKAST98tVK1HR9Xj/lRXQKAFg
+G2DRUQYms5trYzuSar+Ibu1elUmh+ezwYi+ltxeddg07LTrKwfprj8YvmObw
+5HingJjD9/Hfu69AWoqO/nKnz9QkwRBeSVZCyCvvlVjesAVfGCq4nsct7SB5
+mx4DUjXIWvMiZkVqXkpmJanUCjQMaklB+aXJMRtSDx1MXR+Tcpmv8z46rLea
+u7+407IvkLLWpQpx/fFNUaGB01/gzFmZ3ah86QJYdFRaFLA2/XdS1u690o5I
+u67tfWfS0z67a43faSJr+/WLj7MoLCowyaNm3tUEl8lWaGxNLKz/dlrk1xeM
+eqcxJ1Xz2bxTKwMcOLovzLSCVCoFGga15KCd55Z7vZXXNvCn8taTi7wiz3cO
+Tn1M3Fh46q926cB/6WusFZo7+1nrUknj8R/ONyPKTvdnIl501rRYAosyoJYc
+W1sUsDbStosXWtVOEt2IdXbUNlPWMlDUSL8Y/bfnk2BOExyawrDuosi50coG
+nqyQqhbcnLc57WzSbP0GbRZLpVCgYVBrAnlLtr+jtmVPU5avY+AxZWsFaTM3
+ys3ZzXOA6V6BW6pJWhXL2/PXxFUQDAdrXapApSL1jpukZuvchfs0TZjAosOt
+1gS2tihgU3qvrvCYZ/imfoWcdyzYfWmZbknQ3urjieEBwV8lr498cybHyS+a
+O/TCfdqziTQavjCs+/dQ97DCLgODMihV2nQiMbNG0GDUPNRKUvHHYbjUKhQI
+rygjKujVVYf2J2+MCnb1jvy5PH/f1rglfi6vrivm95QtmTJJe0TquRTyPNVW
+p1oodopnqUtRwbWM5eFpNUNtBcGiw6uWTRYFrAzGL/584boSo/7HveURLrO/
+r9d3G/b/s3fmQU2cbxyvf3WqP1uPoghNLQiCgqBSR2o4qrYVhelB63hBZ2g9
+ioBHvVq0x+g4HsjVYu2AigegInasjCitouUQUYuKqCiFSOQ0QCAcyebY/FhI
+Qkh2N7vJhmzk+fzFDPDk+77P933z7ru779Ny2XecQxS2fJHVZX4+wWbemQbV
+xTDZaBJXZyUmF+pdkZNEIxAmfvyDh9u3ZTqLHItJRZ6lRR+pFOMWtmZGKkE/
+DJJajK6yDU52AVjFOFSQ7W/DCbvaqlDKapK9Ji7M413xH2unGeqi4sW2Y+dd
+p7fWpzjw2ehSeVvpmd1rAlxGDncI6y8jCBYdVLUY7LAowDAK4Y09G49U4NzF
+FF6fy5l1sk7HU9q1YETFSzjvqHfayUaTrC59Acc1vLRT9xfE0QiEIVVxM5yW
+6657LCS1pep49PFqbLmHN5SYkUqSoEFQi0FShjv9adEXE8YHqRel7QWLxlNd
+lMrqz361wB/jPdfRYz25vT8uiizCnd7Y61IlVu+oZIvzeP9sgUocWHRQ1WKw
+waIAs6DdlRn7jtwX4Xa26Eawo9dvz3Su0rUd1Vm6erL7j49V+xnG7JATRSMU
+JqnY6TElUreKtWWk3n8Q877nNM9epnKGvzrK2WPu+nuaMciEVNIEDYJaDJKB
+n8avOeFtp9nMf546y56bjlfKmwTDi1LWulRN552vPT682KzSBxYdVLUYFrco
+wDDI8wvxybfaeh9aUbSVn79UP+ApG6Qq1sstStcKmKOmHegtCC3lJfn47Hmi
+3neWPNll1GjSj0YiTHRzmQs3Q9dblpOqAqewNQNSDSRoENRi6A787VoDvw55
+kb3EPRDbTVEqms4HTVueI6Bc1bwPQwOfpS5FxQ3PBH2VjpDq3z/5pn9PDyw6
+qGoxLGxRgFnkgpxwl9eGvaJi2HCPmP90bCV5utubq3t7s8dRNraLtu5NTIr/
+ef2Os+o7olLB/Uv7/MaMcN6UebOqi3LucaKRCpM82e09/zBf70UHy0jtB2co
+mSqVQoIGQS2KNBQk+o0Z5bX3Kq+lKvcnt5GjuQeu8ZsfZIY7vD4xLONuO9Ka
+H7N2S0LqscRtkbGFrbSfxCUd+Kx1KSosWDPdziUgKuZoetqJXJ5Yc9kAFh1k
+tRa2KGARFML8bZ/tG/h0pfaVuOnQi4aKbm0P3lXagbN9AFIHwpha9sOq1INF
+KTOELAqYAwk/OyH5WmP/EqrXUXFVTI4mitEk/JykxL8aCJ9SBalaMKmW/bAl
+9WBRGgwtiwLmAEWaW/o21pVyUVnmukkj3vzgQE5Zu8nvUdOLphA3CREDqyaQ
+aia17IcNqQeLWlAtAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgRRVtJ7Oog7hSH
+6csPPuyCe9gAGwGXAsAQQ8xLO/pvu0KJ8FL8JgXCO4sAGwGXAsBQA5V3y3uX
+oV1313FX3qJXjwAABgVw6RADlcG1MaCi68H+VckUyrwOLmBRQBt2unSIg3ZX
+nlw3b7LN/0Y7+EQcf4p/wr0Sqcs7+cejTkPjGUXqC1M2Brz7aSEDlTrF1ae3
+hQb6Tn2LM2tlWg324rii/W5WRpFA7ywtmjqpNfkllapC1pC1dEaI+qQyw2pJ
+UQiLYiO2xKcejd8cEXdDqHXyG9pRnnE4v9m09zTZa1EVdDsTXEoRa3IpwDTd
+j+LWH7zZhEhb7hz82PYNz/2V+qeHyBr/3PBlCoVFBSp5UVt/e6PTBAaqSEtq
+Tv96uRbBSiFfWPq2o7pMTPfDhJDvr+iVKKOjk0qTX1ap6o+vP7fSx4ajfYom
+mVpyFM2XVrgvzGrs+Vd5w9kF7iGXm/vGPSquyT33T5O05086aypFxg591lpU
+/dn0OhNcShWrcinANNLGa1caVE7quhfpaK8pW6yhJ6kh3hEDz6knwZiKM3go
+pF2qbRdJxc7Z8w+pC8mgrXkhs8OxOplG6qTQ5JdXal/Y2qztCRdjZg6s2kao
+1gDyujSuvaYyDj/Fy973FFbBQFqbEeri6OLWw1R33x3lOIVKNSGastdE3SLo
+DvZatE8evc4El1LFulwKmJWO22FT3tM9E18prz/l77qsWDslio7y09HBPv7f
+xW4O+Wg6x8E7PKP/aHvaA580Ws91/J2kFcEJFf1V3NDWvwNdg3JbdNxJVydJ
+k19uqVL+mejkinaeXkVRArVKJVKflxTqN2dV6uHYraH+zh4hx0qyD+2MWuzt
+NGdTvrCteLGdrWY6aisIGEe1oqgGytUHWGdRup0JLqUo1ZpdCjAMKsxfO39T
+oV6l4Y6SpU4zf6ke6Da05bLvOIcobPkiq8v8fILNvDMNqothsoEvrs5KTC7U
+uyInjCZvKz2ze02Ay8jhDmH9VdvEj3/wcPu2TGeFQ1cnSZNfZqnIs7ToI5Vi
+3GrX+Goxuso2ONkFYIXZUEG2vw0n7GqrQimrSfaauDCPd8V/rJ1mnIuKF9uO
+nXed3jUJxVHPOovS70xwKSWp1uxSgGEUwht7Nh6pwLmLKbw+lzPrZJ2Op7Sr
+roiKl3DeUW9fkw18WV36Ao5reGmn7i+Io2GgopItzuP9swUqcUhV3Ayn5bqL
+Hro6SZr88kptqToefbwaW5nijXp8tRgk1a7TnxZ9MWF8kHpF2l6waDzVFams
+/uxXC/wx3nMdPdaT2/vjosgi3LmNfRY1pjPBpRSkWrNLAWZBuysz9h25L8Lt
+bNGNYEev357pXKVrO6qzdPVk9x8fqzYJjNnMJ47WR+edrz0+vNis0iep2Okx
+JVK3WDQ9naRNfmml3n8Q877nNM9epnKGvzrK2WPu+nua6QJfLQbJqE/j15zw
+ttPs5D9PnWXPTcermE2C4RUpCy1qVGeCSw1LtV6XAgyDPL8Qn3yrrfehFUVb
++flL9QOeskGqYr3conStgDlq2oHe0stSXpKPz54n6n1nyZNdRg183WiouOGZ
+oK9aC1L9+yff9G9BiG4uc+Fm6BqLjk4DTX6JpWrAqXZNoBZDd9Rv1xr1dciL
+7CXugdhWilLRdD5o2vIcAeX64X0YGvUstagG6p0JLqUiVYNVuRRgFrkgJ9zl
+tWGvqBg23CPmPx1bSZ7u9ubq3t7scZSN7aKtexOT4n9ev+Os+o6oVHD/0j6/
+MSOcN2XerOqinHucaKiwYM10O5eAqJij6WkncnlizYJM8mS39/zDfL23HKjq
+pNDkl1ZqPzijnkgtijQUJPqNGeW19yqvpSr3J7eRo7kHrvGbH2SGO7w+MSzj
+bjvSmh+zdktC6rHEbZGxha20H8MlHfWstWg/NDoTXGpYaj/W41LAIiiE+ds+
+2zfw6UrtK3HToRENFd3aHryrtANn78D8OukFtCKpSlK17IdVFlVaVeqtSKrS
+yl0KmAMJPzsh+Vpj/xKq11FxVUwOfCrRJPycpMS/GggfUTWzTjoBrUiq0rBa
+9sMWiyqtKvVWJFX5MrgUMAco0tzSt1utlIvKMtdNGvHmBwdyytpNfo+aRjSF
+uEmIGFgymU3nSyuVolr2wwaLKq0q9VYklaJaAAAAAAAAAAAAAAAAAAAAAAAA
+AAAA60DRVhK7Oog7xWH68oMPu0y9FcpsNHOHZSGQDrYBGQEASyDmpR39t12h
+RHgpfpMCTX31jdlo5g7LQiAdbAMyAgAWAZV3y3uXWV1313FX3qJ3rL2Zo5k7
+LAuBdLANyAgA9ILKLHNB3vVg/6pkCoVNLRHN3GFJgHQMflh2AhkBXjqQuryT
+fzzqNDTHoUh9YcrGgHc/LTS9YCjaXXly3bzJNv8b7eATcfyp6lh9RfvdrIwi
+gd5RWT1/31GecTi/mdbrfuLq09tCA32nvsWZtTKtRvu9c2OiaVAIi2IjtsSn
+Ho3fHBF3Q6h1IJtJYfuxQDrUyBqyls4IUR9fBunAoJQOfD8zAGQEGLLIGv/c
+8GUKhZUMKnlRW397o9MEBopZdz+KW3/wZhMibblz8GPbNzz3V6pHRvfDhJDv
+rwysQIaKa3LP/dMk7bF9Z02liJq1JTWnf71ci2CVlC8sfduxv8qMUdE0KJov
+rXBfmNXY82/yhrML3EMuNysYCKvBIulQf3b9uZU+NhztozUhHZTSQexn04CM
+AEOWHieFeEcMPIOeBGMK3+Agbbx2pUE1ervuRTraa2olYyWX80Jmh2NlMNV/
+XJsR6uLo4tbDVHffHeU49S7xUEi7VLtdkoqds+cfUtWhMTKaGnldGtdeUwWG
+n+Jl73sKO62fRlh5U/aaqFv4PW6ZdPQhrc3annAxZubAUm6QDgrpIPOzCQzR
+jABAD/L6U/6uy4q1B5+io/x0dLCP/3exm0M+ms5x8A7P6D+2nvZkSBqtl47b
+YVPe0z6IH239O9A1KLeF6rYI+Uco2u8krQhOqBCTRBgAUp+XFOo3Z1Xq4dit
+of7OHiHHSrIP7Yxa7O00Z1O+sK14sZ2tZuZpKwgYR7V6pgaSk/YtmA4p/0x0
+ckU7T6/MKKSDcjp60fMzOZARAMCjo2Sp08xfqgcOJLTlsu84hyhsZSary/x8
+gs28Mw2qK3CyyVBcnZWYXNiie61OEg37rTB/7fxNhQPKG4sf/+Dh9m0Z9ZUV
+4UfI20rP7F4T4DJyuENYfyU1Q3SVbXCyC8CKkKGCbH8bTtjVVoVSVpPsNXFh
+Hu+K/1g7zWATFS+2HTvvOr3rFpLJ0GLpQJ6lRR+pFOOWwIZ0UGtd329x/KwG
+MgIAlBFen8uZdbJOx5TaFVVExUs472j2okkmQ1ld+gKOa3hpp+4viKMpFcIb
+ezYeqdC5c4xUxc1wWk5nsUXyEUqs5EvJFufx/tkCigtNksrO6U+LvpgwPki9
+LGwvWDSe6rJQVn/2qwX+GO+5jh7rye39cVFkkfY0ZqF0tFQdjz5ejS2l8WZC
+SAfl1uH7Wf2JkBFS+jOihU5GgKGD6Eawo9dvz3Q2ILSd3Fm6erL7j49VV/zG
+3OAgioZ2V2bsO3JfpGc9ScVOjymRurWgjfkINZ13vvb48GKz6UMvjV9zwttO
+s53+PHWWPTcdrzo0CSQLdcuk4/6DmPc9p3n2MpUz/NVRzh5z19/TzF2QDmqt
+I/SzISAjAKAHUhXr5Ral63LMydMO9JZVlvKSfHz2PFFvT0ue7DJqMtSPhjy/
+EJ98q633ER5FW/n5S/WaJ5tEN5e5cDPoGBrvI1BxwzNBX7EXpPr3T76hvmWh
+O/S2aw29OuRF9hL3QGw/Q6loOh80bXmOgHJZ7z5IJkPLpUMFTglsSAeldJD4
+2RCQEQDQR/J0tzdX985tj5NtbBdt3ZuYFP/z+h1n1TdOpYL7l/b5jRnhvCnz
+ZlUXZcPhRJMLcsJdXhv2iophwz1i/tMMZcmT3d7zD/Nx3uGg8xGosGDNdDuX
+gKiYo+lpJ3J5YoprQhRpKEj0GzPKa+9VXktV7k9uI0dzD1zjNz/IDHd4fWJY
+xt12pDU/Zu2WhNRjidsiYwtbaa8JSSZDC6WjH5yZENJhOB2kfjYIZAQAcFAI
+87d9tm/gI53aOwCmQy8aKrq1PXhXaQetnRFmBVsSSAerMH86aAcc4hkBhhQS
+fnZC8rXG/tVhr5PjqpicDClGk/BzkhL/aqD6AK4xH8F6IB2swszpoBkQMgIM
+MVCkuaVv61kpF5Vlrps04s0PDuSUtZt8PU4vmkLcJETo3ktmVjArgHSwCrOl
+g3ZAyAgAAAAAAAAAAAAAAAAAAAAAAAAAAADw8qBoK4ldHcSd4jB9+cGHXYwd
+42KmsEMKZvsQEg0AgPUg5qUd/bddoUR4KX6TAgleFWVN2CEFs30IiQYAwIpA
+5d3y3sVu19113JW3mCo6YKawQwpm+xASDQDmBJVZza6BFUntoevB/lXJFKri
+siOsiQzl1AypRAMALmh35cl18ybb/G+0g0/E8af4B/wrkbq8k3886jQ0WaBI
+fWHKxoB3Py00vWYLvjBF+92sjCIByWliFpCqRtaQtXRGiPr0M8NS8RBXn94W
+Gug79S3OrJVpNdqv8qMd5RmH85uNe31SISyKjdgSn3o0fnNE3A2h1vl7JoXV
+BGGri9QwkBqSNhrTh9aZaAAYLLofxa0/eLMJkbbcOfix7Rue+yv1TzaRNf65
+4csUCsstVPKitv72RqcJDBQKJxbW/TAh5PsrekXaLCdV/dn151b62HC0T+Yk
+k4qLpOb0r5drEaxW+IWlbzv219lBxTW55/5pkvZMPp01lSKaE4yi+dIK94VZ
+jT3/Jm84u8A95HKzgoGwGljrIvVnM5AawjYa1YdWmmgAGCykjdeuNKjGWNe9
+SEd7TT1lDT12D/GOGHhMPwnGFBWiKQxtzQuZHY6V8WSFVJXg2qztCRdjZg6s
+BEcolQCFtEu1kyWp2Dl7/iFV9SBpbUaoi6OLWw9T3X13lFOvedqLvC6Na6+p
+qsNP8bL3PYXVWKARVt6UvSbqFkHPstZFKnlMpIaojUamhrWJBgD20XE7bMp7
+uiUBlPL6U/6uy4q1JxVFR/np6GAf/+9iN4d8NJ3j4B2e0X+yP+1ZhTQavjC0
+9e9A16DcFp1pxYJSpfwz0ckV7Ty9KqUEUg20WtF+J2lFcEKFWEkRpD4vKdRv
+zqrUw7FbQ/2dPUKOlWQf2hm12NtpzqZ8YVvxYjtbzfdFW0HAOKrVSDWQ1ZIY
+AOtcxHBqiNtIV1jvb1mXaABgG6gwf+38TYV6JZA7SpY6zfyleuA4RFsu+45z
+iMIWnbK6zM8n2Mw706DaJiCbVcTVWYnJhXr7KCTRCISJH//g4fZtmc7yz2JS
+kWdp0UcqxbgVtPGlkgmTt5We2b0mwGXkcIcw6hXfuso2ONkFYEXdUEG2vw0n
+7GqrQimrSfaauDCPd8V/rJ1mkhIVL7YdO+86vWsSit9NrHMRs6khbSNhn1hV
+ogGAXSiEN/ZsPFKBcw9beH0uZ9bJOp2Ro10RRlS8hPOOZsOcZFaR1aUv4LiG
+l3bq/oI4GoEwpCpuhtNy3RWhhaS2VB2PPl6NrYXxJkB8qQZarcQK9ZRscR7v
+ny0wvVJ2+tOiLyaMD1Ivp9sLFo2nupyW1Z/9aoE/xnuuo8d6cnt/XBRZhD8x
+s85FZkgNcRsJsa5Ea0GYaAAYHNDuyox9R+6LcG0ouhHs6PXbM539C+3h1lm6
+erL7j49V2xLG3CkgikYoTFKx02NKpG65bMtIvf8g5n3PaZ69TOUMf3WUs8fc
+9fc0kw++VHJhfXTe+drjw4vNpk9ZafyaE952mtsQz1Nn2XPT6dT0VlK5bmKh
+ixhPDWkbaQhjcaIBgDUgzy/EJ99q632cR9FWfv5S/YBnrJCqWC+3KN0BjA23
+aQd6K09LeUk+PnueqPfQJU92GTWr6EcjESa6ucyFm6E76iwnVQVOBW0CqUSh
+UHHDM0FfiR6k+vdPvqG+1aM7ZW3XmrLqkBfZS9wDsX0gpaLpfNC05TkCylXc
++zD03cRaF6kwPTUG20hLGGsTDQDsQC7ICXd5bdgrKoYN94j5T2fASZ7u9ubq
+3vjtGW42tou27k1Miv95/Y6z6ru7UsH9S/v8xoxw3pR5s6qL8qjAiUYqTPJk
+t/f8w3y911MsI7UfnAmQSCp+KFRYsGa6nUtAVMzR9LQTuTwxxbU0ijQUJPqN
+GeW19yqvpSr3J7eRo7kHrvGbH2SGO7w+MSzjbjvSmh+zdktC6rHEbZGxha20
+19Kk302sdVE/JqeGQhtpCGNvogHAelAI87d9tm/gc6fa2xSmQy8aKrq1PXhX
+aQfOcLYiqUwLYztDODVDK9EAMJhI+NkJydca+1e9vcMtrorJwUsxmoSfk5T4
+VwPh87vWI5VZYVbAUE3NkEs0AAwmKNLc0rc/rpSLyjLXTRrx5gcHcsraTd40
+oBdNIW4SIgY2QKxBKrPCrIahl5ohmmgAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+MIyirSR2dRB3isP05QcfdjF2lIyZwgKsBYwEAABziHlpR/9tVygRXorfpEAq
+J4JbMizAWsBIAAAwCCrvlvcuRrvuruOuvMVU4QMzhQVYCxgJGMKgMrikNxdd
+D/avSqZQPZYdYU0EjGQ+hpSRAGsE7a48uW7eZJv/jXbwiTj+lODsf6Qu7+Qf
+jzoNzRQoUl+YsjHg3U8LTS8agy9M0X43K6NIgHcIGh2p1FptBLKGrKUzQtTn
+thlWi4e4+vS20EDfqW9xZq1Mq9E+TgDtKM84nN9s3CucCmFRbMSW+NSj8Zsj
+4m4Itc6pMymsJghbjaSGbmrASASY2UgA0Ev3o7j1B282IdKWOwc/tn3Dc3+l
+/tEqssY/N3yZQmEthEpe1Nbf3ug0gYFq2sTCuh8mhHx/Ra+2HB2pVFptDLL6
+cyt9bDjaZ4qSqcVFUnP618u1CFYG/cLStx37a/2g4prcc/80SXsmh86aShHN
+CUDRfGmF+8Ksxp5/kzecXeAecrlZwUBYDaw1kvqz6aUGjESEuY0EAL1IG69d
+aVANp657kY72moLOGnq8GOIdMbC6AAnGVN6hKQxtzQuZHY7VETVSKoVWG6W5
+Nmt7wsWYmQNr2BGqJUAh7VLtZEkqds6ef0hV9EhamxHq4uji1sNUd98d5frV
+WkmR16Vx7TWVffgpXva+p7DqECaG1cBaI6nk0UsNGIkQcxsJAPTpuB025T3d
+MgZKef0pf9dlxdrDVNFRfjo62Mf/u9jNIR9N5zh4h2f0FySgPaWQRsMXhrb+
+HegalNuiM0rpSiVptRFqpfwz0ckV7Ty9+qoEag1oU7TfSVoRnFAhVlIEqc9L
+CvWbsyr1cOzWUH9nj5BjJdmHdkYt9naasylf2Fa82M5WM3O2FQSMo1oRlT6s
+MxLd1ICR2GEkAMBAhflr528q1KvB3FGy1GnmL9UDhxzactl3nEMUtoaT1WV+
+PsFm3pkG1TU82ZQirs5KTC7U25YgiUYgTPz4Bw+3b8t01mZ0pZK0mrZa5Fla
+9JFKMW7tb3y1ZNrkbaVndq8JcBk53CGMetW5rrINTnYBWGE5VJDtb8MJu9qq
+UMpqkr0mLszjXfEfa6eZRETFi23HzrvO3L0c7UaxzUj0UwNGYoORAABDIbyx
+Z+ORCpxbucLrczmzTtbp2Fq7JI2oeAnnHc1uNsmUIqtLX8BxDS/t1P0FcTQC
+YUhV3Ayn5brLNbpSSVpNU21L1fHo49XYWhVvSsFXa0CbEisxVLLFebx/tsD0
+at3pT4u+mDA+SL3cbS9YNJ7qcldWf/arBf46LIoswp2G2WckY1IDRrK8kQBA
+2fusUca+I/dFuB4R3Qh29Prtmc5WhfZY6CxdPdn9x8eqPQNjbhMQRSMUJqnY
+6TElUrfENz2ppK2mp/b+g5j3Pad59jKVM/zVUc4ec9ff00wO+GrJtKnpvPO1
+x4cXm02fUtL4NSe87TS3CZ6nzrLnpuNVIzcJFhrJqNSAkSxsJADAQJ5fiE++
+1db7rI2irfz8pfoBjxohVbFeblG64wEbC9MO9BallvKSfHz2PFFvcEue7DJq
+StGPRiJMdHOZCzdDd0jQkWqg1fTVqsCp/U2gligUKm54JugrLoRU//7JN9S3
+YnSnlO1aU0od8iJ7iXsgtk+jVDSdD5q2PEdAudo5NVhrJBXUUwNGsqiRAKAH
+uSAn3OW1Ya+oGDbcI+Y/nbElebrbm6t7j7dnLNjYLtq6NzEp/uf1O86qb71K
+Bfcv7fMbM8J5U+bNqi7KlsWJRipM8mS39/zDfL23PahKpdBqemr7wZlSiNTi
+h0KFBWum27kERMUcTU87kcsTU1zrokhDQaLfmFFee6/yWqpyf3IbOZp74Bq/
++UFmuMPrE8My7rYjrfkxa7ckpB5L3BYZW9jK7FqXtUbqh0ZqwEgWMxIAUEch
+zN/22b6BD4Vq7yGYDr1oqOjW9uBdpR04Y838UmkHJFFrBm2sBow0EDASAJiK
+hJ+dkHytsX8d2TsW4qqYnFIoRpPwc5IS/2ogfFTXzFJpBjSglnFtbAeMpAUY
+CQAYAEWaW/o2r5VyUVnmukkj3vzgQE5Zu8lX9PSiKcRNQsTA7oTZpDKrlnFt
+1gEYiWm1Q9RIAAAAAAAAAAAAAAAAAAAAAAAAAAAALzmKtpLY1UHcKQ7Tlx98
+2DUUz0CBHgDYDPgTGJKIeWlH/21XKBFeit+kwDyhpfUMPtADAJsBfwJDE1Te
+Le9dinXdXcddeWsIntgPPQCwGfAnwA5QmWUu2rse7F+VTKGs6ssLO3vAUn4w
+AiuSao2w058AO0G7K0+umzfZ5n+jHXwijj/FP+ZfidTlnfzjUaehcYsi9YUp
+GwPe/bTQ9Iou+MIU7XezMooEOGeKoR3lGYfzmwnfPaTWBHH16W2hgb5T3+LM
+WplWw9B79rKGrKUzQtRnoxE3gRIKYVFsxJb41KPxmyPibgi1zpoz1AOUeGn8
+YEGpOC5iSueQ9ycwZOh+FLf+4M0mRNpy5+DHtm947q/U97us8c8NX6ZQWO2g
+khe19bc3Ok1goJQ2sbDuhwkh318ZWKoNFdfknvunSdozNDprKkV69qfYBEnN
+6V8v1/Z8kLzpwtK3HQcUwTEaWf25lT42HO1zO/GaQA1F86UV7guzGnv+Vd5w
+doF7yOXmvtFvqAco8pL4waJSCVzEgE7wJzBkkDZeu9KgGuRd9yId7TXVljX0
+uC3EO2LgYf0kGFN2h6YwtDUvZHY4VuRT/ce1GaEuji5uPUx1991RrlsYlHIT
+FNIu1Z6OpGLn7PmHdEv4GNOQ2qztCRdjZg6sE6fXBIrI69K49prqOfwUL3vf
+U1jNBEM9oB2iKXtN1C2Cvng5/GBZqYQuMl3nkPcnMDTpuB025T3dwgBKef0p
+f9dlxdpeUXSUn44O9vH/LnZzyEfTOQ7e4Rn95/vTHuCk0fCFoa1/B7oG5bZQ
+HDl0m6BUtN9JWhGcUCHWj0WzCVL+mejkinaeXg1TwiYg9XlJoX5zVqUejt0a
+6u/sEXKsJPvQzqjF3k5zNuUL24oX29lqpuW2goBxVKuO9vdG7YkPg6g8KWX1
+frCwVH0XMaQT/AkMKVBh/tr5mwr1CiR3lCx1mvlL9cAZCm257DvOIQpbV8nq
+Mj+fYDPvTIPqKp1sgIursxKTC/W2CkiiEQgTP/7Bw+3bMpLVl/FNkLeVntm9
+JsBl5HCHMP1ybLSagDxLiz5SKcatr03chK6yDU52AVjxNlSQ7W/DCbvaqlDK
+apK9Ji7M413xH2unGe2i4sW2Y+ddp7fQpzj2XwI/WFIqvouY0An+BIYUCuGN
+PRuPVODc+RZen8uZdbJOx+za9WJExUs472i2vkkGuKwufQHHNbxUb5OcOBqB
+MKQqbobTcqoLMrpNwEBFJVucx/tnCwZ+MJ0mtFQdjz5eja1P8cY+cRNIKmKn
+Py36YsL4IPW6tL1g0Xiq61JZ/dmvFvhjvOc6eqwnt/fHRZFFel8+vbwUfrCw
+VKW+i5jRiRfZCJ3W7E9giIB2V2bsO3JfhOsC0Y1gR6/fdDe2ta3eWbp6svuP
+j1UbDMZs2hNFIxQmqdjpMSVSt2g2EXSb0Efnna89PrzYTHFo6Ee7/yDmfc9p
+nr1M5Qx/dZSzx9z19zSTBnETSMZ+Gr/mhLedZj//eeose246Xo1uEgyvS18W
+P1hSqpqBLmJGJ15k+jqt15/AUAF5fiE++VZb79M0irby85fqBzyZhVTFerlF
+6XoUs/q0A731p6W8JB+fPU/Uu+GSJ7uMGuD60UiEiW4uc+FmUDU99Sag4oZn
+gr46OUj17598o79nQq8JKnDqa5M0QXfsb9ca+3XIi+wl7oHYhopS0XQ+aNry
+HAHliuV9GBr7L48fLCWV2EWm6gR/AkMGuSAn3OW1Ya+oGDbcI+Y/nYeGJU93
+e3N1b4n3WN3GdtHWvYlJ8T+v33FWfZ9WKrh/aZ/fmBHOmzJvVnVRNiVONFJh
+kie7vecf5lN+A4NqE1BhwZrpdi4BUTFH09NO5PLE1PcTCDqkD5yxT9QEFGko
+SPQbM8pr71VeS1XuT24jR3MPXOM3P8gMd3h9YljG3XakNT9m7ZaE1GOJ2yJj
+C1tpP4xLOvZfLj9YRiqxi0zVCf4EAG0Uwvxtn+0b+Nin9haB6dCLhopubQ/e
+VdpBYyP6JWgCe7CizmSVVGvRqbRyfwJDCgk/OyH5WmP/wq7X6nFVTA4citEk
+/JykxL8aaL/Y8RI0gT1YUWeyRaq16FS+DP4EhhQo0tzSt9OtlIvKMtdNGvHm
+BwdyytpNfsGbXjSFuEmIGLmcewmawB6sqDPZINVadFKUCgAAAAAAAAAAAAAA
+AAAAAAAAAAAAAABDEUVbSezqIO4Uh+nLDz7sgpvrALsAfwLAkETMSzv6b7tC
+ifBS/CYFwsuUALsAfwLA0ASVd8t7F6Ndd9dxV96iVygBAMwM+HNIgsqs5grZ
+iqRaKV0P9q9KplB5dnCxlrxbi07rhZ3+BJS9ZzufXDdvss3/Rjv4RBx/ilMV
+AQOpyzv5x6NOQ+MEReoLUzYGvPtpocnFQwmEKdrvZmUUCUiO0rOAVDWyhqyl
+M0LU55IxJVVcfXpbaKDv1Lc4s1am1TB0TgBdqaQohEWxEVviU4/Gb46IuyHU
+OowO7SjPOJzfbNrbo6y1KE5qwJ+WkUqKmf0JmIfuR3HrD95sQqQtdw5+bPuG
+5/5KfXPJGv/c8GUKhaUFKnlRW397o9MEBgpbEwvrfpgQ8v0VvfJplpOq/uz6
+cyt9bDjaZ2YyIFVSc/rXy7UIVqv6wtK3HQcU8RksqeQomi+tcF+Y1djzr/KG
+swvcQy43941+VFyTe+6fJmnPn3TWVIqMnQBYa1GC1IA/B1sqOeb2J2AepI3X
+rjSohnrXvUhHe009ZQ09qQ3xjhh4gD4JxhTBoSkMbc0LmR2O1fBkhVSV4Nqs
+7QkXY2YOrNFmulSFtEu1rSOp2Dl7/iHdMj/ml2oAeV0a115Tsoef4mXvewor
+rSCtzQh1cXRx62Gqu++OcopFivXVstWihKkBfw6qVAOY25/AINBxO2zKe7on
+9Svl9af8XZcVa5tU0VF+OjrYx/+72M0hH03nOHiHZ/SfuU97QJFGwxeGtv4d
+6BqU26JjUwtKlfLPRCdXtPP06ocyJFWpaL+TtCI4oUKspAZzUpVKpD4vKdRv
+zqrUw7FbQ/2dPUKOlWQf2hm12NtpzqZ8YVvxYjtbzfdFW0HAOKqlTunDSovq
+pwb8OYhS2eRPwCygwvy18zcV6pVA7ihZ6jTzl+qB0wHactl3nEMUtoiR1WV+
+PsFm3pkG1SUx2YASV2clJhfqXZeTRCMQJn78g4fbt2U6Sx2LSUWepUUfqRTj
+1rZmQqq8rfTM7jUBLiOHO4Tpl5Mzs1SMrrINTnYBWMU4VJDtb8MJu9qqUMpq
+kr0mLszjXfEfa6cZ7aLixbZj511n7h6JdotYaFH81IA/B08qBjv8CZgFhfDG
+no1HKnBuMwuvz+XMOlmn4yztcjCi4iWcdzT7zCQDSlaXvoDjGl6qtyNNHI1A
+GFIVN8Npue7qx0JSW6qORx+vxhZ9eAOKGakYqKhki/N4/2zBwL4wt1QMkjLc
+6U+LvpgwPki9Lm0vWDSe6rpUVn/2qwX+OiyKLNL78umFtRZV6qcG/Dl4UjHY
+4E/AHKDdlRn7jtwX4Xa56Eawo9dvurvI2r7qLF092f3Hx6qreWM2yYmiEQqT
+VOz0mBKpW8XaMlLvP4h533OaZy9TOcNfHeXsMXf9Pc1IZEZqH513vvb48GIz
+xaHBkFQMkrGfxq854W2n2c9/njrLnpuOV8rbJFhrUTUDUwP+HDypGBb3J2AW
+kOcX4pNvtfU+uqJoKz9/qX7AY1BIVayXW5SuITBfTTvQWxVbykvy8dnzRL31
+LHmyy6gBpR+NRJjo5jIXboauwywnVQVObWuTpaLihmeCvnI6SPXvn3yjv2di
+ZqkYumN/u9bYr0NeZC9xD8Q2VJSKpvNB05bnCCiXNKcGSy1KnBrw5+BJxbCw
+PwFzIBfkhLu8NuwVFcOGe8T8p/OEruTpbm+u7v3nHl/Z2C7aujcxKf7n9TvO
+qm+KSgX3L+3zGzPCeVPmzaouyg7AiUYqTPJkt/f8w3y91x0sI7UfnAFlqlRU
+WLBmup1LQFTM0fS0E7k8MfX9BKakokhDQaLfmFFee6/yWqpyf3IbOZp74Bq/
++UFmuMPrE8My7rYjrfkxa7ckpB5L3BYZW9jK7KKUtRYlTg34czClWtifgAVR
+CPO3fbZv4DOW2tfjpkMvGiq6tT14V2kHzigAqUZHI5HKfljVmS9H0q1IKjCU
+kfCzE5KvNfavonp9FVfFpEspRpPwc5IS/2ogfIsCpBoTzZBU9sOWznyJkm5F
+UoGhDIo0t/RtKyvlorLMdZNGvPnBgZyydpMvkOlFU4ibhIiBtRNINYdU9sOG
+znzJkm5FUgEAAAAAAAAAAAAAAAAAAAAAAAAAAACloq0kdnUQd4rD9OUHH3YN
+xfus0AOmA30IPQAAjCLmpR39t12hRHgpfpMC84SW1jP4QA+YDvQh9AAAMAsq
+75b3LvK67q7jrrw1BM/Mhx4wHehD6AHAqkBlVnNt3/Vg/6pkCnVIX17Y2QNW
+ZCElW/twMIEeABgH7a48uW7eZJv/jXbwiTj+FKcEAQZSl3fyj0edhuYLFKkv
+TNkY8O6nhQwUSBFXn94WGug79S3OrJVpNdjr44r2u1kZRQK9E7XINRE3EO0o
+zzic30z46h+1VuvrZABZQ9bSGSHq88SMang/CmFRbMSW+NSj8Zsj4m4ItQ5n
+M9QDlGCvhVQw0JngInO7CAAG0v0obv3Bm02ItOXOwY9t3/DcX6k/LGSNf274
+MoXCogiVvKitv73RaQIDhaQlNad/vVzbI0bedGHp247qSjHdDxNCvr+iV6iM
+GMIGouKa3HP/NEl7Bl1nTaVILyLFVhPoNA1Z/bmVPjYc7bMuaTdcg6L50gr3
+hVmNPf8qbzi7wD3kcnPfvGKoByjCWgupP5uBzgQXmdtFADAQaeO1Kw2qYdZ1
+L9LRXlO8WEOPKUO8IwaeVk+CMUVn8FBIu1TbOpKKnbPnH1LXkkFb80Jmh2PV
+MilB1EBpbUaoi6OLWw9T3X13lOsW06TcaiKdJiCtzdqecDFm5sDaajQbrkFe
+l8a119Sv4ad42fuewuoMGOoBympZa6E+eUx0JriIARfJm7LXRN2iagIA6Kfj
+dtiU93SPxVfK60/5uy4r1raUoqP8dHSwj/93sZtDPprOcfAOz+g/4J72xEIa
+Talov5O0Ijihor+GGdr6d6BrUG6L7ugij0PcQFzothpHp7GtlvLPRCdXtPP0
+6n4SNVyJ1OclhfrNWZV6OHZrqL+zR8ixkuxDO6MWezvN2ZQvbCtebGer+b5o
+KwgYR7XuJ31YZyHanQkuMpuL5LUnPgyCJ/kA2qDC/LXzNxXq1RvuKFnqNPOX
+6oFDEW257DvOIQpbfsnqMj+fYDPvTIPqYp5sYhFXZyUmF+rtKBBGk7eVntm9
+JsBl5HCHsP6aZeLHP3i4fVumv0IjUUXSQFzotRpfp1GtRp6lRR+pFOPWpCZs
+uLKrbIOTXQBWPg0VZPvbcMKutiqUsppkr4kL83hX/MfaaeYRUfFi27HzrjN3
+L0e7RWyzkFGdCS4yk4vguwkwBoXwxp6NRypwbmMLr8/lzDpZpzMmtGuviIqX
+cN7R7JCTTCyyuvQFHNfwUr29dOJoGKioZIvzeP9sgUocUhU3w2k53qKNJA5x
+A3Gh22o8nUa0uqXqePTxamzlizerEDecpCZ1+tOiLyaMD1KveNsLFo2nuuKV
+1Z/9aoG/Dosii/AnZtZZyNjOBBeZyUXvuY4e68kldxEAaIN2V2bsO3JfhGsW
+0Y1gR6/fdPe/tUdEZ+nqye4/PlbtQxhzs4A4Wh+dd772+PBis0qfpGKnx5RI
+3XrRZHFIG4gL3Vbj6TSEfrT7D2Le95zm2ctUzvBXRzl7zF1/TzMdETecZFZJ
+49ec8LbT3Cl4njrLnpuOV9faJFhoIaM7E1xkHhfBdRNAE+T5hfjkW229D90o
+2srPX6of8JgVUhXr5Rala2VsREw70FsbW8pL8vHZ80S9aS55ssuoiUU3Gipu
+eCboq9mCVP/+yTf9uxyim8tcuBl4AwNflYEG4kK91cQ6jWm1Bpya1CQN151V
+tmvNKnXIi+wl7oHYVo1S0XQ+aNryHAHlEt/UYKmFNNDrTHCReVwE300AHeSC
+nHCX14a9omLYcI+Y/3TGnOTpbm+u7r3fnhFhY7to697EpPif1+84q76dKxXc
+v7TPb8wI502ZN6u6KHsXJxoqLFgz3c4lICrmaHraiVyeWLOMlDzZ7T3/MB/v
+LQ2cOBQaiAvVVhPrNKbV/eDMKkQNR5GGgkS/MaO89l7ltVTl/uQ2cjT3wDV+
+84PMcIfXJ4Zl3G1HWvNj1m5JSD2WuC0ytrCV2Ysm1lqoHxqdiR8KXMSAi+C7
+CWAahTB/22f7Bj4dqr2TYDo0oqGiW9uDd5V24A5eJlWxqtVKAw1nO1bVmeAi
+ALAaJPzshORrjf3rv94REVfF5PiiEk3Cz0lK/KuB6PldZlWxptVKgw23Aqyn
+M8FFAGBNoEhzS9+GuFIuKstcN2nEmx8cyClrN3mDiEY0hbhJiBAt+ZhVpYIN
+rVYaaLjVYA2dCS4CAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAARVtJ7Oog7hSH
+6csPPuyCe/AA6wCLAsDQQ8xLO/pvu0KJ8FL8JgXCO5cA6wCLAsAQBJV3y3tX
+ol1313FX3jJTVQ4AMBqw6NADlcHlMaCi68H+VckUKt4OLmBRQAM7LQqg3ZUn
+182bbPO/0Q4+EcefEhz/j9TlnfzjUaeh8Ywi9YUpGwPe/bTQ9AJB+MIU7Xez
+MooEeOeg0ZFKrdV0EFef3hYa6Dv1Lc6slWk1CHNScSIzgKwha+mMEPVJa4al
+kqIQFsVGbIlPPRq/OSLuhlDrEDy0ozzjcH6zaS+Zstaiauh2JliUCtZkUcAM
+dD+KW3/wZhMibblz8GPbNzz3V+o7S9b454YvUyisK1DJi9r62xudJjBQUJtY
+WPfDhJDvr+hVWaMjlUqraSGpOf3r5VoEKzx9YenbjuqKPAxIJYhsGrL6cyt9
+bDjap4CSSSVH0XxphfvCrMaef5U3nF3gHnK5uW/oo+Ka3HP/NEl7/qSzplJk
+7OhnrUXVn02vM8GilLAqiwJmQNp47UqDyvRd9yId7TVllzX05DXEO2LgOfsk
+GFN8h6YwtDUvZHY4VurTSKkUWk0ThbRLtUkkqdg5e/4hdc0ek6USRjYBaW3W
+9oSLMTMHVp0jlGoAeV0a115T2Yef4mXvewqrwCCtzQh1cXRx62Gqu++OcpxC
+q5oQTdlrom4R9AVrLaqSR68zwaKUsC6LAuam43bYlPd0D/RXyutP+bsuK9bO
+iqKj/HR0sI//d7GbQz6aznHwDs/oP5qf9sAnjYYvDG39O9A1KLdFx6N0pZK0
+2ki1ivY7SSuCEyr6a8UxJVU/srE6pfwz0ckV7Ty9iqgEUpVKpD4vKdRvzqrU
+w7FbQ/2dPUKOlWQf2hm12NtpzqZ8YVvxYjtbzczZVhAwjmpF1P7eoFo9gXUW
+pduZYFEq0azZogDzoML8tfM3FepVSu4oWeo085fqgQMDbbnsO84hClvByOoy
+P59gM+9Mg+p6mGzgi6uzEpML9S7KSaIRCBM//sHD7dsynXUOXakkrTZGrbyt
+9MzuNQEuI4c7hPXXhmNCKn5ko3Qiz9Kij1SKcat140vF6Crb4GQXgBWWQwXZ
+/jacsKutCqWsJtlr4sI83hX/sXaaoS4qXmw7dt51etckFAc+6yxKvzPBoubo
+VQx2WBRgHoXwxp6NRypwbrgKr8/lzDpZp2Mr7aoxouIlnHc0m8wkA19Wl76A
+4xpeqrcdTRyNQBhSFTfDabnu0oeuVJJWG6lWiVXIKdniPN4/W4AyKhUnshE6
+W6qORx+vxhaneAMfXyoGSbXu9KdFX0wYH6RelLYXLBpPdVEqqz/71QJ/jPdc
+R4/15Pb+uCiyCHcaZp9FjelMsKihaNZsUYBx0O7KjH1H7otw+1t0I9jR6zfd
+LWRtU3WWrp7s/uNj1aW8MZv5RNEIhUkqdnpMidQtdk1PKmmrjVGrpvPO1x4f
+XmxGmZOKH5m+zvsPYt73nObZy1TO8FdHOXvMXX9PM2PgS8UgGfhp/JoT3naa
+zfznqbPsuel4Fb9JMLwoZaFFjepMsKiBaNZrUYB5kOcX4pNvtfU+t6JoKz9/
+qX7AA0FIVayXW5SuGzBTTTvQW5daykvy8dnzRL3vLHmyy6iBrx+NRJjo5jIX
+boauvehINdBqumpRccMzQV9tHKT690++6d/WMFUqcWRjdGrAqdZNIBVDd+Bv
+1xr4dciL7CXugdhuilLRdD5o2vIcAeVS6n0YGvistagK6p0JFqXQcBVWZVGA
+ceSCnHCX14a9omLYcI+Y/3RGgOTpbm+u7p3YHlPZ2C7aujcxKf7n9TvOqu+I
+SgX3L+3zGzPCeVPmzaouyunHiUYqTPJkt/f8w3y9dx2oSqXQanpqUWHBmul2
+LgFRMUfT007k8sSadaOpUokjG6OzH5yBTyQVRRoKEv3GjPLae5XXUpX7k9vI
+0dwD1/jNDzLDHV6fGJZxtx1pzY9ZuyUh9VjitsjYwlbaT+KSDnzWWrQfGp0J
+FjUQrR/rsShgKRTC/G2f7Rv4gKX2xbjp0IuGim5tD95V2oEzBMwvlV5Ai0pl
+rFfZjxV1JljU6GhWbVHATEj42QnJ1xr7l1C9poqrYtKiFKNJ+DlJiX81ED5Q
+a2apdAJaWCqTvcp+rKgzwaLGRLN+iwJmAkWaW/r2lJVyUVnmukkj3vzgQE5Z
+u8mvUtOLphA3CREDCyezSaUX0KJSme9V9mNFnQkWHZoWBQAAAAAAAAAAAAAA
+AAAAAAAAAAAAAKweRVtJ7Oog7hSH6csPPuyCO9kA6wCLAsDQQ8xLO/pvu0KJ
+8FL8JgXCm4sA6wCLAsAQBJV3y3tXol1313FX3qJXlQAAzA9YdIiByuDaGOin
+68H+VckUitIOLuBSQAM7LTrEQbsrT66bN9nmf6MdfCKOP8U/jF+J1OWd/ONR
+p6HBjCL1hSkbA979tND0oqL4whTtd7MyigR6J2rRlEqt1UYga8haOiNEfQgY
+Q2qV4urT20IDfae+xZm1Mq2GoZfy6UolRSEsio3YEp96NH5zRNwNodY5dWhH
+ecbh/GbTXtVkrUtxUgMWHZIWBZim+1Hc+oM3mxBpy52DH9u+4bm/Ut9WssY/
+N3yZQmFRgUpe1Nbf3ug0gYGC18TCuh8mhHx/Ra9QGR2pVFptDLL6cyt9bDja
+B1QyoFZSc/rXy7UIVhj6wtK3HQdUzBksqeQomi+tcF+Y1djzr/KGswvcQy43
+9w19VFyTe+6fJmnPn3TWVIqMHf2sdSlBasCiQ86iANNIG69daVCZvutepKO9
+pnKxhp6khnhHDDyqngRjiuPQFIa25oXMDseqZRoplUKrjdJcm7U94WLMzIEF
+0UxWq1RIu1TbT5KKnbPnH9KtqWN+qQaQ16Vx7TX1cfgpXva+p7A6BtLajFAX
+Rxe3Hqa6++4oxylXqgnRlL0m6hZBX7DWpYSpAYsOtlQDMGBRwHJ03A6b8p7u
+mfhKef0pf9dlxdr2VHSUn44O9vH/LnZzyEfTOQ7e4Rn9p9vTHvWk0fCFoa1/
+B7oG5bboGJSuVJJWG6FWyj8TnVzRztMr1smUWkX7naQVwQkVYiU1mJOqVCL1
+eUmhfnNWpR6O3Rrq7+wRcqwk+9DOqMXeTnM25Qvbihfb2Womz7aCgHFU64r2
+9wbVGgSsdKl+asCigyt1ECwKWApUmL92/qZCvWLDHSVLnWb+Uj1wYKAtl33H
+OURhyxdZXebnE2zmnWlQXQyTjXpxdVZicqHeFTlJNAJh4sc/eLh9W6azyKEr
+laTVtNUiz9Kij1SKcQtJM6FW3lZ6ZveaAJeRwx3C9Gu3mVkqRlfZBie7AKw8
+GyrI9rfhhF1tVShlNcleExfm8a74j7XTDHVR8WLbsfOu07smofjdxEaX4qcG
+LDqoUjHMbFHAMiiEN/ZsPFKBc8NVeH0uZ9bJOh1PaRdeERUv4byj2WEmGfWy
+uvQFHNfwUr29aOJoBMKQqrgZTst11z10pZK0mqbalqrj0cersRUf3mhiSK0S
+q2BTssV5vH+2YKBic0vFIKl5nf606IsJ44PUi9L2gkXjqS5KZfVnv1rgj/Ge
+6+ixntzeHxdFFuHOxOx1qVI/NWDRQZWKYW6LakFoUYBZ0O7KjH1H7otwO1t0
+I9jR6zfd/WNtR3WWrp7s/uNj1XW8MTv5RNEIhUkqdnpMidStF01PKmmr6am9
+/yDmfc9pnr1M5Qx/dZSzx9z19zTDkAm1ajrvfO3x4cVmiqIZkopBMvDT+DUn
+vO00m/nPU2fZc9Px6maTYPi6ibUuVTMwNWDRQZWKYWaLAoMO8vxCfPKttt6H
+VhRt5ecv1Q94IAipivVyi9K1AuaoaQd6q0RLeUk+PnueqDedJU92GTXq9aOR
+CBPdXObCzdD1Fh2pBlpNX60KnELSJqtFxQ3PBH21a5Dq3z/5Rn/DxMxSMXQH
+/natgV+HvMhe4h6I7aYoFU3ng6YtzxFQrnbeh6HvJpa6lDg1YNFBlYphZosC
+g4tckBPu8tqwV1QMG+4R85/OCJA83e3N1b0T2+MoG9tFW/cmJsX/vH7HWfXt
+UKng/qV9fmNGOG/KvFnVRTn3ONFIhUme7Paef5iv96IDVakUWk1PbT84o8lU
+taiwYM10O5eAqJij6Wkncnli6stopqSiSENBot+YUV57r/JaqnJ/chs5mnvg
+Gr/5QWa4w+sTwzLutiOt+TFrtySkHkvcFhlb2Ep7RUr63cRalxKnBiw6yFLN
+b1GAfSiE+ds+2zfw6UrtK3HToRcNFd3aHryrtAPH/+aXSjugRdUyJpX9sKoz
+waKUGUIWBcyBhJ+dkHytsX/91OuouCom/UkxmoSfk5T4VwPhA7VmlkozoIXV
+MimV/bClM8GiNBhaFgXMAYo0t/RtKCvlorLMdZNGvPnBgZyydpMvjelFU4ib
+hIiBVZPZpFqXWualsh82dCZY1IJSAQAAAAAAAAAAAAAAAAAAAAAAAAAAAMC8
+KNpKYlcHcac4TF9+8GHXy3wbm9mWmqnfhk46AAAAiBHz0o7+265QIrwUv0mB
+VE4Zt1aYbamZ+m3opAMAAIAEVN4t712dd91dx1156yUuScBsS83Ub0MnHQAA
+ABToerB/VTKFirTMgcoss2PFbEvN1G+Dnw4AMAK0u/LkunmTbf432sEn4vhT
+/MP4lUhd3sk/HnWSD3hqoeggrj69LTTQd+pbnFkr02qwd8cV7XezMooEesdp
+WVyqCllD1tIZIeoTwBhSi9MPFpBKikJYFBuxJT71aPzmiLgbQq1D6tCO8ozD
++c2mvqdJraOUKFJfmLIx4N1PC00vzoNvEuKOMqGlA3NharRBSAcAmJvuR3Hr
+D95sQqQtdw5+bPuG5/5K/ZlP1vjnhi9TDC60qISihaTm9K+XaxGsYPeFpW87
+qsvEdD9MCPn+il6VMotKVX98/bmVPjYc7dMpGVBL0A+DKpUcRfOlFe4Lsxp7
+/lXecHaBe8jl5r7pEBXX5J77p0na8yedNZUiY2dEih3V83mSF7X1tzc6TWCg
+3jqxSfA6ypSW6ufCtH4zdzoAwPxIG69daVANua57kY72mrLFGnqMHuIdMfCc
+eiND0UQh7VJtzUgqds6ef0hdSAZtzQuZHY6VymSN1L6wtVnbEy7GzBxYDc1k
+tYT9MHhSDSCvS+Paa4rj8FO87H1PYUUMpLUZoS6OLm49THX33VGOU6tUE6Ip
+e03ULfy+oNxRfRhTmwkHMpPodRSNlup/kF4uTImmNHs6AGCw6bgdNuU93QPx
+lfL6U/6uy4q1baroKD8dHezj/13s5pCPpnMcvMMzBh5tTxCKEPKAivY7SSuC
+Eyr6C5ihrX8HugbltujMoZaVKuWfiU6uaOfpVepkSq1+PwyWVKUSqc9LCvWb
+syr1cOzWUH9nj5BjJdmHdkYt9naasylf2Fa82M5WM3W3FQSMo1pUtL83iGtk
+0O0o2t9NRpiEsKNofwRhLsiwZDoAYJBBhflr528q1Ks03FGy1GnmL9UD5260
+5bLvOIcobOEoq8v8fILNvDMNcoOhMMTVWYnJhXr7RoQB5W2lZ3avCXAZOdwh
+rL9gmfjxDx5u35bpLPwsKRV5lhZ9pFKMW0WaCbX4/TBIUjG6yjY42QVgtdlQ
+Qba/DSfsaqtCKatJ9pq4MI93xX+snWb6ExUvth077zq96xaSyZBuWsm+m+ja
+r++3OCYh7igC6OeCFMulAwAGFYXwxp6NRypwngkQXp/LmXWyTmc0a1ddERUv
+4bzTfxOEOFQPsrr0BRzX8FK9OyYkAZVY2ZaSLc7j/bMFqqBIVdwMp+W6a0HL
+SW2pOh59vBpbCONNMgypxemHQZKKQVLwOv1p0RcTxgepF+rtBYvGU12oy+rP
+frXAH+M919FjPbm9Py6KLNL+HqDbUSTfTcbYD98kxB1FBO1ckGK5dADA4IF2
+V2bsO3JfhGtA0Y1gR6/fdG9xaA+0ztLVk91/fCw2GIoMooBqOu987fHhxWZV
+XEnFTo8pkbrFoi0m9f6DmPc9p3n2MpUz/NVRzh5z19/TTIBMqMXvh0GSikEy
+Gabxa05422lucDxPnWXPTccrmk0CyUKdbkcZc7+JtkmIO4r6RxjIBSmWSwcA
+DBbI8wvxybfaeh/kUbSVn79UP+CZNaQq1sstSncQYgNt2oHeKtFSXpKPz54n
+EsOhyMALiIobngn6CrYg1b9/8k3/Xpbo5jIXbobueLOgVA04VaRNVkvcD4Mk
+FUN3MtyuNRnWIS+yl7gHYjtMSkXT+aBpy3MElEud90EyGdJJK4bkyS6jvpto
+mYS4o+h9hAq8XJBiuXQAwKAgF+SEu7w27BUVw4Z7xPynM0lLnu725uo+LNAz
+0GxsF23dm5gU//P6HWex+7oUQpGAExAVFqyZbucSEBVzND3tRC5PrFm8Sp7s
+9p5/mK/3ionFpPaDM8mYqpa4HwZNKoo0FCT6jRnltfcqr6Uq9ye3kaO5B67x
+mx9khju8PjEs42470pofs3ZLQuqxxG2RsYWttJ9OJpsMqXYUhlRw/9I+vzEj
+nDdl3qzqojwj0zUJUUfR+4h+6H03WTYdAMAWFML8bZ/tG/jEqfYGBSPQCIiK
+bm0P3lXagTNFs02q0sJqGZNqWV6KjmLchwAAKCX87ITka439K9fegRZXxfCE
+TyWghJ+TlPhXA+Ez3yySqrS4WialWhbr7yjGfQgAAAaKNLf03fNQykVlmesm
+jXjzgwM5Ze1MvFtOI6BC3CREDKxXWSLV0mqZl2pZrLmjGPchAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAYLUo2kpiVwdxpzhMX37wYZept+qZjWbusCwE0gGwCrAQ
+YCHEvLSj/7YrlAgvxW9SoKnvAjIbzdxhWQikA2AVYCHAUqDybnnvqqXr7jru
+ylv0zvk3czRzh2UhkA6AVYCFAC1QmQUucbse7F+VTKHsqSWimTssC4F0GI1F
+ho9xWJHUIWWhoQRSl3fyj0edhoyIIvWFKRsD3v200ORq11gdndPbQgN9p77F
+mbUyrQZ7V17Rfjcro0iAc0IZ2lGecTi/2Zg3FmUNWUtnhAwsn2d8NOzwnKLY
+iC3xqUfjN0fE3RBqHddmUth+KOUC7a48uW7eZJv/jXbwiTj+FL/EBy0gHXhQ
+62cLDB98YcQps6BUWtaigJVZCDABWeOfG75MobA2QCUvautvb3SaYHq1a6Wk
+5vSvl2sRrPTzhaVvO6pr5XQ/TAj5/srAwm+ouCb33D9N0h4XddZUimg5RVZ/
+bqWPDUfrCE1TovXWBl/hvjCrseff5A1nF7iHXG5WMBC2Xy+1XHQ/ilt/8GYT
+Im25c/Bj2zc891eaeA4OpAMXKv1skeFDLAwvZRaVSsNaVLA2CwHG05ObEO8I
+ykfzG1MZB/djpV2q/QJJxc7Z8w+pa/OgrXkhs8Ox0qAqpLUZoS6OLm49THX3
+3VFOvcwo9r9Z2xMuxszsL9lmSrQe5HVpXHtNWRx+ipe97ymsSAKNsPKm7DVR
+t/C7m2oupI3XrjSoJqOue5GO9prq28YyZNNBLthwP1tm+JAJ00uZZaVStxYV
+2GghshENmIC8/pS/67Ji7Z5VdJSfjg728f8udnPIR9M5Dt7hGf2n+dN2LGm0
+nov7O0krghMq+ovnoa1/B7oG5bZQtSxxfCn/THRyRTuPVjlRpD4vKdRvzqrU
+w7FbQ/2dPUKOlWQf2hm12NtpzqZ8YVvxYjtbzTzQVhAwjmo5UQ0kpQfo5qKX
+jtthU97TrR5BDKTDSPD72cLDB1cYQcqsZqRbm4WgmIiZ6ChZ6jTzl+qBQw5t
+uew7ziEKW9PI6jI/n2Az70yD6pqWzLHi6qzE5EK9y3TCaPK20jO71wS4jBzu
+ENZfLE/8+AcPt2/LqK9/8OMjz9Kij1SK6Ze67irb4GQXgFVlQwXZ/jacsKut
+CqWsJtlr4sI83hX/sXYa74qKF9uOnXed3sqSxMl0c4H9Vpi/dv6mQtyC2ZAO
+5iDqZ0sOH0Jh+CmzopFuXRaC7yYzIbw+lzPrZJ2Oy7QLzYiKl3DeUe8SkzlW
+Vpe+gOMaXqpXUZo4GgYqKtniPN4/W6AaXkhV3Ayn5XTWLjjxW6qORx+vxlZb
+tJ1MUuo6/WnRFxPGB6lXWe0Fi8ZTXWXJ6s9+tcAf4z3X0WM9ub0/Loos0p5U
+6OZCqRDe2LPxSAX+HXpIBwn96dBCJx39EPezhYcPvjD8lFnTSLcuCxGPaMAU
+RDeCHb1+e6azVaHtjc7S1ZPdf3ysuhY3ZheaOFofnXe+9vjwYrMqp5KKnR5T
+InXrb9OLf/9BzPue0zx7mcoZ/uooZ4+56+/pDSVcSJycxq854W2n2Z1+njrL
+nptOpyi3knSVRS8XaHdlxr4j90W0hwKkgxak/WzJ4UMoDD9l1jTSrcpCcN1k
+JpCqWC+3KF1/YN6YdqC3/rSUl+Tjs+eJeuNY8mSXUY7VjYaKG54J+mrgINW/
+f/JN/5W+6OYyF24GHX8Qq1XSLXWt1Hfydi0n1yEvspe4B2LbA0pF0/mgactz
+BJSLfvdB4mQ6uUCeX4hPvtXW++GKtvLzl+opP6kH6aCBgX621PAhFYafMmsa
+6VZlIfhuMheSp7u9ubr3eHu8YWO7aOvexKT4n9fvOKu+pSkV3L+0z2/MCOdN
+mTeruiinECcaKixYM93OJSAq5mh62olcnliz+JM82e09/zCfzqsPBGr7oOdk
+FGkoSPQbM8pr71VeS1XuT24jR3MPXOM3P8gMd3h9YljG3XakNT9m7ZaE1GOJ
+2yJjC1tpr9LJnEw1F3JBTrjLa8NeUTFsuEfMf9QfIod0UIVCP1tm+JAKI0qZ
+FY10q7IQfDeZDYUwf9tn+wY+JKl9TW06NKKholvbg3eVdtDaqGJWrSUxfy7o
+BRzi6aACq4aPkjRlrJJKaq2hZSGABAk/OyH5WmP/iqrXG3FVTDqWSjQJPycp
+8a8Gqs9D045vDZg5F3QCQjqowZbhozScMrZINaBzyFkIIAFFmlv6NoWVclFZ
+5rpJI9784EBOWbvJmyQ0oinETUKE7q19ZtWyArPlgl5ASAd12DB8lNRSxgap
+pDqHqIUAAAAAAAAAAAAAAAAAAAAAAAAAAACYQdFWErs6iDvFYfrygw+7TD1q
+hNlo5g4LsBNwEQAMecS8tKP/tiuUCC/Fb1KgqS/PMRvN3GEBdgIuAgAAlXfL
+e1eQXXfXcVfeMrG2ArPRzB0WYCfgIgAwM6jMajYOuh7sX5VMoRioJaKZO6yJ
+WFGWrYsh5SIAIALtrjy5bt5km/+NdvCJOP4Uv+SCEqnLO/nHo05DkxGK1Bem
+bAx499NCBgrpiKtPbwsN9J36FmfWyrQa7DVxRfvdrIwiAZ3z3UgbiHaUZxzO
+bzbmFT9ZQ9bSGSEDzvUyIRp2pExRbMSW+NSj8Zsj4m4ItQ4xMymsJghbs4wv
+zHCiKUml1mo6MORJNVbmIgAYRLofxa0/eLMJkbbcOfix7Rue+yv1zwqRNf65
+4csUCisuVPKitv72RqcJDFRzltSc/vVyLYJVPb6w9G1HdS2Y7ocJId9f0Sts
+RgxhA1FxTe65f5qkPSO6s6ZSRGvUyurPrfSx4WidOWlKtN6K2SvcF2Y19vyb
+vOHsAveQy80KBsJqYG2WiYWRJZqiVCqtpgVTnlRhbS4CgEFE2njtSoNqxHbd
+i3S011Qo1tDj+BDvCMqn0htT+QUPhbRLtWckqdg5e/4hde0ZtDUvZHY4VhWT
+EkQNlNZmhLo4urj1MNXdd0c59dKu2P9mbU+4GDOzv8aZKdF6kNelce01dWT4
+KV72vqew6gEmhu0XzNYskwkjTDRVqRRaTROGPKmSZ20uAgBL0XE7bMp7usfo
+K+X1p/xdlxVrzwSKjvLT0cE+/t/Fbg75aDrHwTs8o/8ge9qzFmk0paL9TtKK
+4ISK/iplaOvfga5BuS26EwF5HOIG0lUl5Z+JTq5o59Gqv4nU5yWF+s1ZlXo4
+dmuov7NHyLGS7EM7oxZ7O83ZlC9sK15sZ6uZOdsKAsZRrb9JH1ZmGVcYQaLp
+SiVptZFqmfCklbsIAAYPVJi/dv6mQr2iwh0lS51m/lI9cFSjLZd9xzlEYStF
+WV3m5xNs5p1pUO0UkM1a4uqsxORCvc0PwmjyttIzu9cEuIwc7hDWX5VM/PgH
+D7dvy/SXfySqSBpI2CG40ZBnadFHKsX0a0N3lW1wsgvAypihgmx/G07Y1VaF
+UlaT7DVxYR7viv9YO808IipebDt23nUG7tjhNIqFWSYUhp9oulJJWm2MWkY8
+aeUuAoDBQyG8sWfjkQqcu8XC63M5s07W6Yxd7RorouIlnHfUe+9ks5asLn0B
+xzW8VK+YMnE0DFRUssV5vH+2QCUOqYqb4bQcb0VIEoe4gYTgRGupOh59vBpb
++dKeVUhqQ6c/Lfpiwvgg9Yq3vWDReKorXln92a8W+OuwKLII/xuYtVnGF4af
+aLpSyVNvCU9auYsAYNBAuysz9h25L8J1ouhGsKPXb890dkO0R1xn6erJ7j8+
+Vu1wGHMngjhaH513vvb48GKzSp+kYqfHlEjd+tJkcUgbSEPV/Qcx73tO8+xl
+Kmf4q6OcPeauv6c3reFCMquk8WtOeNtp7hQ8T51lz02nUwidEqzNMqEw/ETT
+k2pc6kkCqjHek1btIgAYPJDnF+KTb7X1PtGjaCs/f6l+wNNMSFWsl1uU7qjD
+Rty0A72loKW8JB+fPU/U2/GSJ7uMmrV0o6HihmeCvjIvSPXvn3zTv38iurnM
+hZuBN+rwVRloIC1VGujVhlbqzyrbtWaVOuRF9hL3QGyrRqloOh80bXmOgHIp
+bGqwNMukwvATTUeqsaknCMicJ1VYm4sAYNCQC3LCXV4b9oqKYcM9Yv7TGb6S
+p7u9ubq3kXtGnI3toq17E5Pif16/46z6RrFUcP/SPr8xI5w3Zd6s6qI8MHCi
+ocKCNdPtXAKiYo6mp53I5Yk1C1/Jk93e8w/z8V4owYlDoYE0VPVDb1ZBkYaC
+RL8xo7z2XuW1VOX+5DZyNPfANX7zg8xwh9cnhmXcbUda82PWbklIPZa4LTK2
+sJXZ5S5rs0wqjCjRVKWakHr8gEx5sh+rchEAsA2FMH/bZ/sGPnqqvVNhOjSi
+oaJb24N3lXbg7tFYTNVLAKuyrCRNtPml0gs4iJ4EAGAAEn52QvK1xv6lau+I
+i6tictaiEk3Cz0lK/KuB6FFgC6l6WWBLlpUGE21uqXQCDqonAQDQBUWaW/q2
+2pVyUVnmukkj3vzgQE5Zu8n7BjSiKcRNQoTorrbFVL1MsCHLSgOJNrdUegEH
+0ZMAAAAAAAAAAAAAAAAAAAAAAAAAAAAA8LKgaCuJXR3EneIwffnBh12MnSNj
+prBDCmb7EBINAID1IOalHf23XaFEeCl+kwLzhOwOO6Rgtg8h0QAAWBGovFve
+u9jturuOu/IWU1UPzBR2SMFsH0KiAcDMoDLYOGCergf7VyVTqEvLjrAmYl0W
+YrYPh1SiAYAItLvy5Lp5k23+N9rBJ+L4U4IiEkhd3sk/HnUami9QpL4wZWPA
+u58WMlA3Rlx9eltooO/UtzizVqbVYC/WK9rvZmUUCfCOLaOjk1qTzS2VBFlD
+1tIZIQOOWUM7yjMO5zcb9/6mQlgUG7ElPvVo/OaIuBtCrRPwTAqrCcJWC+EL
+My41+inWfIrxfWhliQaAQaT7Udz6gzebEGnLnYMf277hub9S/3QVWeOfG75M
+obDiQiUvautvb3SawEBNdknN6V8v1/aIkTddWPq2o7p6TvfDhJDvr+iVgqOj
+k0qTzS2VDFn9uZU+NhytI0BRcU3uuX+apD2TT2dNpYhmREXzpRXuC7Mae/5N
+3nB2gXvI5WYFA2E1sNZCxMJop4Ygxab1obUlGgAGEWnjtSsNqhHbdS/S0V5T
+01lDj+NDvCMon+NvTGUfPBTSLtW2jqRi5+z5h9QFe9DWvJDZ4VgdUSN1Umiy
+uaWSyqvN2p5wMWZmf8k5aW1GqIuji1sPU919d5TrF1clRV6XxrXXlPXhp3jZ
++57CijnQCCtvyl4TdYugZ1lrITJhdFNDkGJTUsPGRAMAK+m4HTblPd3aA0p5
+/Sl/12XF2vOKoqP8dHSwj/93sZtDPprOcfAOz+g/+p/2xEIaTalov5O0Ijih
+or+uG9r6d6BrUG6LzrRCVydJk80tlSSOlH8mOrminUerHCpSn5cU6jdnVerh
+2K2h/s4eIcdKsg/tjFrs7TRnU76wrXixna1mWm4rCBhHtRyqBnntiQ+DqDzg
+xUoL4Qqjn5re3+ql2Fhh7Ew0ALAQVJi/dv6mQr0yzB0lS51m/lI9cLpBWy77
+jnOIwtadsrrMzyfYzDvToNopIJtYxNVZicmFelsphNHkbaVndq8JcBk53CGs
+v46b+PEPHm7fluks/+jqJGmyuaUSxkGepUUfqRTTL9XdVbbByS4AqyqHCrL9
+bThhV1sVSllNstfEhXm8K/5j7TSTlKh4se3YedfpXZNQ/G5io4UIhdFMjZIo
+xYb6xKoSDQCsQyG8sWfjkQqc29jC63M5s07W6QxF7ao0ouIlnHc0O/AkE4us
+Ln0BxzW8VK/8NHE0DFRUssV5vH+2QCUOqYqb4bRcd0VIVydJk80tlSBOS9Xx
+6OPV2LKa9pRFUqo7/WnRFxPGB6mX0+0Fi8ZTXU7L6s9+tcAf4z3X0WM9ub0/
+Looswv0yZ6+F8IXRSg1Jig1hXYnWgjDRADBooN2VGfuO3BfhOlF0I9jR67dn
+Ots02iOus3T1ZPcfH6v2OYy5WUAcrY/OO197fHixWaVPUrHTY0qkblFuejpJ
+m2xuqfhx7j+Ied9zmmcvUznDXx3l7DF3/T29SRgXkikrjV9zwttOcxvieeos
+e246XvFwEgxfN7HWQoTC6KSGLMX0hbE40QDAJpDnF+KTb7X1PtGjaCs/f6l+
+wGNWSFWsl1uU7hjGRty0A70lrqW8JB+fPU/Um/KSJ7uMmlh0o6HihmeCvsI4
+SPXvn3zTv4siurnMhZuhO+ro6DTQZHNLJRamgl6pbqX+lLVda8qqQ15kL3EP
+xPaBlIqm80HTlucIKNdR78PQdxNLLUQqjF5qiFNsnDAVbEs0ALAGuSAn3OW1
+Ya+oGDbcI+Y/nXla8nS3N1f3/nbPiLOxXbR1b2JS/M/rd5xV3y6WCu5f2uc3
+ZoTzpsybVV2UBwZONFRYsGa6nUtAVMzR9LQTuTyxZpkqebLbe/5hvt7rKVR1
+UmiyuaXix+mH3pSFIg0FiX5jRnntvcprqcr9yW3kaO6Ba/zmB5nhDq9PDMu4
+24605ses3ZKQeixxW2RsYSvttTTpdxNrLUQqjF5qiFNsjLB+2JZoALAqFML8
+bZ/tG/joqfZOhenQiIaKbm0P3lXagTM5mF8nvYAkUs0gjNWwykLKQU3N0Eo0
+AAwyEn52QvK1xv6Fb++Ii6ticvxSiSbh5yQl/tVA+My3mXXSCWhAKuPC2A5b
+LKQc5NQMuUQDwCCDIs0tfRvuSrmoLHPdpBFvfnAgp6zd5H0DGtEU4iYhYmA7
+xWw6GZTKuDDrgA0WUg5qaoZoogEAAAAAAAAAAAAAAAAAAAAAAAAAAKwJRVtJ
+7Oog7hSH6csPPuwy9UATNkczd1gr5SXojZegCUzxcnTFy9EKwDTEvLT/s3f2
+UVHUYd/PvzphPWVFabXdgeDyooCaR7wBSankFnuj5z6hYedYpJG8RFYWWk9H
+D8cQQSioDoj3Q+AGiJ2SI0j5aBEqIKEgKkiAECwQ4LILy+7s7sw+7LIL+zIz
+OzM7y+zA9fmL09q13+u6vr/Zmd/OznX8LymqRbry1i+NoPJcar5Gc3RYnjIH
+qjEHUmCLuVGKuZEFYCeYZkKjPy+RX00Iiqm38/H7zhzN0WF5yhyoxhxIgS3m
+RinmRhYAS8ivH343l8IMU/5Hc3RYO8HU3GxhOGc1aOGcKXDSUOcsBV3mRhaA
+TbCJ9sKEjctc71/kFry74LbpeAFsrEV0rHqY1g8JFZ3Fe7dHhPg8JVgTU9Rt
++hN5JtEMqPvLolZGmz2LzI5ouufqXEzf/fHR/zl+9KPdGZckJk9ysyvsdBDi
+kpqA9J0v/OnmuK0jFIaIa/KSwp99tYa9+Tzm9USlV8tEF4dwnjdnqxqUUqBW
+DTpYe4x5CpRw3oayWQqOummALU8Cc4aJmxmJObWDiGqkIeflxQ/6H243fJ5g
+iu6qU38MqiZ9Mt7dLqPmBWV38TdnexHdaO/TUU+7z0zDYRTNgFp8KibYVWDy
+nEx7ounHhr+5/L/KBib/N03/yU3Lo88OoyyEnYawpKY5DfzywVt5FM79MOW/
+veIrSR5L7B9cPv3eVvXUTtzIjP7snPkYP1vVoJgClWrQgsBjTFKgiNM2lMVS
+cNVN49uz40lgDqEauHCu32Av+bU49ycNg55VvaLtQneh7yQ+y0P2t1jPDMUF
+VckNWxXK1gNrw74zDPJhGM3w/5btyzyTtmpmLps90SbR9BUFPTk9+6Ynb/WT
+IT/q5ifQCKsZLN8VX0/wSGmikpow+ekYHbib8rwEJkOOCLGupw7s7vnotbG6
+ka3T/4y8GlRToFANmhB4jH4KJvC0oayVgrtuGuSx4kkTSBsKOBnoWEtxcmRw
+6KfpH0W/GCBwC4wVmT/EXzt2ZYf3OsvxBoyiodKG7DcjM1sVJBGoRVP1lCTn
+tkq7aM0MRcTns7ev/893/+dY+ifbQz39ov9vXfl3B+L/O9DjP/dUS0Yv//cT
+i6fX1Oif4Y9RnRk6DcXB5UQl1Yh/DPXaetk0HdJ60j6UMagndve3CK8tVSMU
+92jopqCHjsFsBrT2GM0UzNLhbUP1r9pbCm67yZYnzTKi2lDAKcBGzoY85hav
+OxFR95W+vsR1Y0n/zFUxJql+P2xPDeXZzITRNKONJSm7woUPuLjtoDyXDT8a
+cqcoOb9dQX+etbz5A48nwnWj17Ch8lBXwY7/dxfVqrtzV//Hf53vOhf6yBPT
+n0ayy/+9+JGNv9M7haXofKKSjtVFeaz6utN8VZN0h+xQpugsy8qtGbEsM/16
+Km597uf7YTPFi1C6KZBUg3YWWiKP0UvBFL42VMtOKbjsJnueNAU+m3iG6XwZ
+2eU3BM/MfB+ESi4dSspvpfPVJkk0rW5sTt3Hno+Hlg8xmGdtiDbSUZBc0Kk7
+t6L92UQyz/rE7Yv/e8njW4zXTdI/Nz9O9bpJLT759qZQHeu8Fj3iH6T/c3Pc
+RfzPc+KSSn7fIFhT2GexdonrSXIoU/ed2CTwim20GvNNu55IR8ZKj21ULyDp
+pkBuMDpZkHiMXgpa3jeUtVJw1002Paml21DAeTD1xnjjzmXLv7il3wbAJtpF
+qflNMnoNJIpmZLzhHb8Xzgwz+GyaitZ0Pe05/xX+enwELvc+5Om3IfGaleFx
+IflsKurp/iHwienvm/75nzVPBp3Am9dNgu2zMtKSyi5Fuq/+9o7FbghxPZl8
+PUG7nsrWA37ecZbT1ImglwIzg5EENGLuMXopmMLLhrJXCs66yaonTYHrJp6h
+88aKI/ph1aqu7ODgQ226Exbkn9NHc+tH9beqoaMtP1eKqd16gxcNU/TfGZoa
+mIN0fv/Ke5T39Ai0GaA3z1pr/dm0z+SzqQ/5t/yN5RG6DT8tOvjzlhXbKoYo
+zwOfwpbzbZQU6Uhf7RtvueSIK6BsO8joUEarnrLarcIgEdUPaTopMDUYQUBi
+j9FLwRSeNpStUnDYzWns96Qp8NnEMya94bp48ydfZWUf/TJx/0ndV5GaoYpY
+4X0L7jGwwMUv7W+KXsOJhkn+3BXwhDA8Pu34iaIfqroU1E+tcKLNQO+zCUP6
+/8xa//BDq7/6f10jHVX/x/eBRUFHLvQMXy+Ndftf/7FDdFWK3K1Oe//jzP/5
+v1l749Jr7tL2PqnzKZRUeTslMMjya2SCCqiGmipT1z+80HNPaW2HnPKHKN16
+KttSAsOO9eD8oAQfqinYYTD8gMQeo5uCCfxsKHul4KybM7DgSRPgs4lnmF5T
+z+1ozg4qqd77Wqr5TbBc1hOT1e+LPNg4RmObxvEp0AvIIAUWcaqGzoFuarlu
+KDC76L2R0cHmYnHSaDxA2VOemXthYOZUlbt6KnsqsrN+7ad6N7DJ/+fQFOgE
+ZJoCizhLQ+dAN7VO0VBgttDImksTli589PkjFc1Su39Q7czReAOGDI9MfVvA
+aT1RxaAEYXh26rAU6AW0JwUWcYaGzoFuap2moQAAAAAAAAAAAAAAAAAAAAAA
+AAAAALMEOlqXvnNLkLdbwLacG3Jefl06B1JwKHOgPnMgBQAA6KDoKjr+lxTV
+Il1565dG8PLXdXMgBYcyB+ozB1IAAIAWmGZCoz8NlV9NCIqppzfbwjmYAyk4
+lDlQnzmQAgDwHEzNzYaF/Prhd3MpjBl1YmY/Ba6axQxoMQDME7CJ9sKEjctc
+71/kFry74DbBQAyk73zhTzfHbR3FMERck5cU/uyrNfbPY8UXhkqvlokuDuE8
+TgsbaxEdqx4m/AUftRQUncV7t0eE+DwlWBNT1M3Sz9/V/WVRK6ONjwVjngJF
+eNAs2qGmXoIWA8B8YeJmRmJO7SCiGmnIeXnxg/6H260Xq3rglw/eyqNwpocp
+/+0VX0nyWMLCaGliYRM3MqM/O2c+pQxTdFed+mNQNXlYGO9ul1ktfYopKLuL
+vznbi+jGN5+OetrdbBoOY9TiUzHBrgLTR1YySYHquzl/s5iFghYDwDxCNXDh
+XL9h8cuvxbk/OT2XfBp0uDI6cDflWRRMxtDQFIbdPR+9NlY3KtP4j3tF24Xu
+Qt9JfJaH7G+xnIlJOQVUJTfscClbD6wN+85yeg2TRHrL9mWeSVtlPiKNdgoU
+4UGzmIWCFgPAvGXsyg7vdZbPxNdqxD+Gem29bLro0bGW4uTI4NBP0z+KfjFA
+4BYYK5p5tD3twx1pNHxh2N3fIry2VI1QPN7RTUGLShuy34zMbFVYx6KZgqqn
+JDm3VdplNb6TZgoU4VOzGIQiZv60GADmG5ik+v2wPTVWg4rH6qI8Vn3daX6A
+wEbOhjzmFq87KVT3lb6+xHVjSb9hh4LscKfoLMvKrbHa4CGJRiBMcetzP98P
+mymeedJLQTPaWJKyK1z4gIvbDusxiLRSQO4UJee3K3BHS9NLgSL8ahb9UCwl
+zucWA8D8ApVcOpSU34pzJ4Tk9w2CNYV9FivVdOqK7PIbgmem9+1JDnfqvhOb
+BF6xjVY7/MTRCIQhHRkrPaZG2FKAbgo6MFndx56Ph5YPmb8xnRRGOgqSCzp1
+J9d4By56KejeWnzy7U2hFmyOu2h68OZZs2iHImT+tBgA5hHYRLsoNb9JhrsC
+ZJci3Vd/a7krb7pOxxt3Llv+xS3D7giTrzCIohEKU7Ye8POOs5wXTQTdFKYY
+b3jH74UzwxQPC9bRmq6nPee/wl+Pj8Dl3oc8/TYkXps+4tFLgSI8axbtUITM
+nxYDwLwB+ef00dz6Uf0caHS05edKsdmdekhH+mrfeMsFplunK47oRy+rurKD
+gw+1GbfylW0HGR3urKORCJPVbhUGicQUb3SingKm6L8zNDUiBun8/pX3rDd8
+6KVgAG98PL0UKMKzZtEOxULifG8xAMwPNEMVscL7FtxjYIGLX9rfFkcC5e2U
+wCDLb6Qn16nr4s2ffJWVffTLxP0njV8yq4aaKlPXP7zQc09pbYccpaoCJxqp
+MGVbSmDYsR7Kv5uhmgIm+XNXwBPC8Pi04yeKfqjqUlA/cScoyBQ4By66KVCE
+X82iG4qFxPnfYgAADKCS6r2vpZrf8mq6v2E/9KJhsvp9kQcbx2hsws+BFCjC
+q0zZFMarxAEAYAdlT3lm7oWBmbNS/TrN6GBz1VOMpuypyM76tZ/2r1LmQAoU
+4U+m7ArjUeIAALAGhgyPTG3TazWy5tKEpQsfff5IRbPU7t10etFQxaAEYXgu
+OgdSoAgfMmVXmAE+JA4AAAAAAAAAAAAAAAAAAAAAAAAAAADMe9DRuvSdW4K8
+3QK25dyQ2/sFM7vRAMAmYDkAmIsouoqO/yVFtUhX3vqlEeclzhQNAGwClgOA
+OQmmmdDozzXlVxOCYuqpPzhzFqIBgE3AcgAwK2BqbnYl5NcPv5tLYZwrF9Hm
+GFy1mC580TkFWA4AaIL0nS/86ea4rXWOIeKavKTwZ1+tsXuE9zTq/rKoldHG
+p5Ch0qtlootDOA8gw8ZaRMeqh+n8ghKbaC9M2LjM9f5FbsG7C26bDluwFY1S
+QUjiM0TRWbx3e0SIz1OCNTFF3brHDxAXhCZctJhJOjywIpkssBwAsIZ64JcP
+3sqjcDqHKf/tFV9J8lhi/wjv6fcWn4oJdhWYPiFz4kZm9GfnzOe6YYruqlN/
+DKomF854d7uM2gfUxM2MxJzaQUQ10pDz8uIH/Q+3I9SiUSwIYXymKLuLvznb
+OxlEM3g66ml346QhvILQhJMWM0iHB1YkBSwHAKyBDldGB+42f7I/CUzG/RCi
+6i3bl3kmbZX5RDbs7vnotbG64aLT/0y0Xegu9J3EZ3nI/hZqU0RVAxfO9RuW
+rvxanPuTL9VIqUSjWhCi+MxBVXLDFpWy9cDasO+Ms4isCoKDZrB8V3w9vmiO
+Wkw7HR5Y0UaQeWU5AHAoGvGPoV5bL5suC3SspTg5Mjj00/SPol8MELgFxopm
+hgHQPiAQR1P1lCTntkq7rKaFYnd/i/DaUjVCdWGQCtYzdmWH9zrL8Qn40C0I
+3fi2A6LShuw3IzNbZ2bgUSiIpveHF7bg3wHGYYtppcMnK4LlAMDBjNVFeaz6
+utPc4tjI2ZDH3OJ1p03qvtLXl7huLOk3XN+THRAUnWVZuTVWOwH40ZA7Rcn5
+7QrcSdaKW5/7+X7YTO36yIZg3auS6vfD9tRQG2tNtyA24tOqySSa0caSlF3h
+wgdc3HbMzLyzXRCSzybOWkwzHX5ZESwHAA5F8vsGwZrCPgsjm86pkV1+Q/CM
+cSOa7ICg7juxSeAV2zhu+QJOtJGOguSCTt2JG94BAenIWOmxrY7GvbbEgrWo
+5NKhpPxWql8b0y0IeXw6NTH5N5is7mPPx0PLhwxBCQuiFp98e1OojnVeix7x
+D9L/uTnuoulBi6MW006HZ1YEy5lgYTkAsB/ZpUj31d/esdgaMLXxeOPOZcu/
+uGW43GeyyW8drel62nP+K/z1+Ahc7n3I029D4rXplaJsPeDnHWc5XpveW0wJ
+xibaRan5TTLq64ZeQejHtxHQyHjDO34vnBk2xLVdEJLrJm5aTD8dnllx3lsO
+ABwK0pG+2jfe0oI6G684op+ErerKDg4+1Gbcm1a2HWR0QMCPpsWdZK2V1W4V
+BonENG4Twn8L5J/TR3PrR/WzxtHRlp8rxbZva6JTECbxSQJiiv47Q1Mzf5DO
+7195b2aDxXZBSD6buGox3XR4ZsV5bzkAcCzK2ymBQZbfqU7a2HXx5k++yso+
++mXi/pPGb01VQ02VqesfXui5p7S2Q45SfQuCaFPgHBCUbSmBYcd66PzAAuct
+NEMVscL7FtxjYIGLX9rfVNYx1YIwjU8YEJP8uSvgCWF4fNrxE0U/VHUpps+M
+KRSE5LOJoxbTT4dfVpz3lgMAB4NKqve+lmp+X6vp5b/90IuGyer3RR5sHKO1
+Z8GmYMcXhF5ARgUxw6laTJKOU+nU2qg8WA4AHI6ypzwz98LAzHmb3sYZHWwe
+EChGU/ZUZGf92k/11lgmb0FJhUMLQicgw4JYh3GOFttKx1l0am1KBcsBwGyA
+IcMjU/vOWo2suTRh6cJHnz9S0Sy1e7+ZXjRUMShB6J6tsSvYgMMKQi8go4Lg
+4wwtppKOM+i0JRUsBwAAAAAAAAAAAAAAAAAAAAAAAAAAANgBOlqXvnNLkLdb
+wLacG3J7v6NlNxoAUAFcBwBzDkVX0fG/pKgW6cpbvzSC4NelHEUDACqA6wBg
+7oFpJjT6E0351YSgmHoaz391fDQAoAK4DgBmBUzNwa6E/Prhd3MpTETlItrc
+g5MWM4AvOqcA1wEATZC+84U/3Ry3tc4xRFyTlxT+7Ks1LAwbVXQW790eEeLz
+lGBNTFG37tfqqPRqmejiEM4zvLCxFtGx6mE6P0LEJtoLEzYuc71/kVvw7oLb
+pvMEbEWjVA2S+Pah7i+LWhltfKobcU1o4uwt5lKnARYqD64DAPZQD/zywVt5
+FE7nMOW/veIrSR5LWBiErewu/uZsL6IbJn466ml34yiZiRuZ0Z+dM5+Lhim6
+q079MaiaXDLj3e0yah9QEzczEnNqBxHVSEPOy4sf9D/cjlCLRrEahPHtRC0+
+FRPsKjB94iheTehGdfIWc6rT+N4sVB5cBwCsgQ5XRgfuNh8MQAKToTm4b6uS
+G7ZjlK0H1oZ9Z5xeg909H702Vjec04CqV7Rd6C70ncRnecj+FmqDOFUDF871
+G9at/Fqc+5Mv1UipRKNaDaL4dqLqLduXeSZtlfmEO6ua4KAZLN8VX4+v29lb
+zLFOPcwrbxpkvrkOAByHRvxjqNfWy6bLAh1rKU6ODA79NP2j6BcDBG6BsaKZ
+WQK0Dwik0bSotCH7zcjM1pkhZ9jd3yK8tlSNUF0S5PF1jF3Z4b3OcgIBPnSr
+QTc+eUBVT0lybqu0y2r6KoWakMzI4EuLOdRJu/LgOgBwMGN1UR6rvu40tzg2
+cjbkMbd43TmTuq/09SWuG0v6DRf3ZAcERWdZVm6N1TYAYTTNaGNJyq5w4QMu
+bjtmhpopbn3u5/thM7XrIxtqda9Kqt8P21NDbWI03WrYiE+rIMidouT8dgXu
+ZHDbNSH5bOJLiznTyajy4DoAcCiS3zcI1hT2WRjZdNSL7PIbgmeMXxaQHRDU
+fSc2CbxiG8ctXyCOpgOT1X3s+Xho+ZBhnSEdGSs9ttXRuNGWJD4quXQoKb+V
+6nfGdKtBHp9OQUY6CpILOnVnsnhHCcKaqMUn394UqmOd16JH/IP0f26Ou2h6
+0OJLiznSybDy4DoLLFwHAHYiuxTpvvrbOxZbA6Y2Hm/cuWz5F7cMWzJMNvmJ
+o00x3vCO3wtnhg3GVrYe8POOs5xQzSQ+NtEuSs1vklFfMfSqQT8+YcCm62nP
++a/w1+MjcLn3IU+/DYnXpg8vtmtCct3ElxZzo5Nx5cF1AOBIkI701b7xlv7T
+2XjFEf28Z1VXdnDwoTbjZrey7SCjA4JlNEzRf2doakoM0vn9K+/NbPjIarcK
+g0RiGjcI4atF/jl9NLd+VD+uGx1t+blSbPueJjrVYBKfNKABnMngFGpC8tnE
+lxZzpXMaepUH1wGAQ1HeTgkMsvxOddLGros3f/JVVvbRLxP3nzR+DasaaqpM
+Xf/wQs89pbUdcpTqW+BEwyR/7gp4Qhgen3b8RNEPVV2K6bNAZVtKYNixHjo/
+rcCJrxmqiBXet+AeAwtc/NL+prKIqVaDaXzCgDPgHCUo1ITks4k3LeZG5wz0
+Kg+uAwDHgkqq976Wan5fq+nlv/3QiIbJ6vdFHmwco7VhwaZax1eDdkBGNTGD
+Ly12Kp1aG5UH1wGAw1H2lGfmXhiYOW/T2zijg80DApVoyp6K7Kxf+6neF0s7
+PjUcXA2aARnWxDoMP1rsLDq1NqWC6wBgNsCQ4ZGp7wa0GllzacLShY8+f6Si
+WWr3ZjONaKhiUILQPU9jV60Bh1WDdkBGNcGHLy12Bp22pILrAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAA5i7oaF36zi1B3m4B23JuyO29i4LdaAAAAMC8RNFV
+dPwvKapFuvLWL40g+Ak4R9EAAACA+QmmmdDoL2/kVxOCYuppPKfZ8dEAwBxM
+zY9Lcb7oBDgHrGIT+fXD7+ZSGFvMRTSAz6j7y6JWRhON30T6zhf+dHPc1vrE
+EHFNXlL4s6/WsDCQVNFZvHd7RIjPU4I1MUXdul+0o9KrZaKLQyQP+eJCpwHz
+ArIkFZtoL0zYuMz1/kVuwbsLblMdvECCw6rKvlQDdAtLkTllac6Lj421iI5V
+D9P6pbB1NeyJBsxR1OJTMcGugijczyb1wC8fvJVH4RwGU/7bK76S5LGEhWHZ
+yu7ib872IrqB46ejnnY3zq+ZuJEZ/dk5q9lp3Ok0vrd1AVmQOnEzIzGndhBR
+jTTkvLz4Qf/D7XY+xcZxVWVdqvHt6RWWatS5ZWmOi48puqtO/TGomvzwGu9u
+l1FrDEE1GEYD5iiq3rJ9mWfSVlnOF9ODDldGB+4muqCygslgHTxQldywjaJs
+PbA27DvjhBvs7vnotbG6AZ7OoVMPfgHtlqoauHCu33CUkV+Lc3/ypRqpfUId
+VlX2pU6FpVdYisw1S3NbfFWvaLvQXeg7ic/ykP0tFEflElSDYTRgTqLqKUnO
+bZV2Wc++1KER/xjqtfWy6X9Hx1qKkyODQz9N/yj6xQCBW2CsaOaZ+7QXMmk0
+LSptyH4zMrN1Zlgddve3CK8tVSMWK5lDnYQFZEmqnrErO7zXWY5SYKJW/6qj
+qsquVLqFpchctbQe5ys+3WoAwBTInaLk/HYF7lxmHWN1UR6rvu409zo2cjbk
+Mbd43cmTuq/09SWuG0v6DdfeZAtZ0VmWlVtjtXtBGE0z2liSsitc+ICL246Z
+4XSKW5/7+X7YbHFCxZlOsgKyI1X3qqT6/bA9Nbhzr52pqmxKpV9YisxVS2ud
+tfg0qwEAkyg7CpILOnVnMUSfTZLfNwjWFPZZ+MZ0HIzs8huCZ6a3i0kWsrrv
+xCaBV2zjuOULxNF0YLK6jz0fDy0fMiw4pCNjpce2Oou7SznSOUJaQHakalHJ
+pUNJ+a3433A7VVXZk8qksLq3EJ98e1OoBZvjLpoereeqpTkvPiH0qmEDKi0G
+eI/ydtpz/iv89fgIXO59yNNvQ+I1M/fKLkW6r/72jsUeganZxht3Llv+xS3D
+RTmTzXniaFOMN7zj98KZYYP3lK0H/LzjLKdYc6Oz6TppAdmQik20i1Lzm2S0
+V97sV5VFqYwKS5G5aWlnLj69agCAGThzmfUgHemrfeMtjagz24oj+pnQqq7s
+4OBDbcYdZGXbQUYL2TIapui/MzQ1Rgbp/P6V92Yu+WW1W4VBIrHF6SRXOqfB
+K6D9UpF/Th/NrR/Vzx1HR1t+rhRTvgNrtqvKstRpqBeWInPR0s5dfHrVAAAz
+iD6bJq+tUgKDLL9cnTSb6+LNn3yVlX30y8T9J43fbaqGmipT1z+80HNPaW2H
+HKX63jjRMMmfuwKeEIbHpx0/UfRDVZdi+pxK2ZYSGHasx+o3FtzonAGngPZK
+1QxVxArvW3CPgQUufml/U785eFaryrrUGWgUliJzzdJOX3xa1QAAqqCS6r2v
+pZrfzGl6kW4/NKJhsvp9kQcbx3Cc7FQ6tRxLpReQR1K1pGop4lRWmQfFZ10z
+ABhQ9pRn5l4YmDmB05sto4PNhUwlmrKnIjvr137CG2SdRaeWc6l0AvJIqta2
+Woo4i1XmRfFZ1wwAM2DI8MjU7rBWI2suTVi68NHnj1Q0S+3eJKYRDVUMShAb
+J2zOoJNrqfQC8kgqRbUUcQarzIPis64ZAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+cHrQ0br0nVuCvN0CtuXckNv7NT+70QCuAFcAAMApiq6i439JUS3Slbd+acR5
+iTNFA7gCXAEAALdgmgmN/kRWfjUhKKaexhM0HR8N4ApwBQDQBFPzZkeAR1In
+kV8//G4uhUmsXESjAl+qzRedU/DdFQBgB0jf+cKfbo7bWrEYIq7JSwp/9tUa
++2fFYhPthQkbl7nev8gteHfBbcND/VHp1TLRxSGSB3VxINWIur8samW08cFi
+tqXiycLNeuqlsRbRsephWr9MVHQW790eEeLzlGBNTFG36W/umUTDgYtqWycF
+rnAuVwDA7KAe+OWDt/IonEphyn97xVeSPJawMJx64mZGYk7tIKIaach5efGD
+/ofbjWto4kZm9GfnrOafcSfV+N7iUzHBrgLTh16SScWFMGtM0V116o9B1eTB
+bby7XUYtorK7+JuzvZMRNIOno552nxmIwyiaNZxUmyApcIWzuAIAZgl0uDI6
+cDfOw8fxYTLIBgfVwIVz/YYVKL8W5/7kSzVS42vY3fPRa2N1EzKdQqpBcG/Z
+vswzaavMh6wRSiUIQpC1qle0Xegu9J3EZ3nI/haK40RRldywOaVsPbA27DvD
+mB+G0ayic1NtgqTAFc7hCgCYLTTiH0O9tl42XdnoWEtxcmRw6KfpH0W/GCBw
+C4wVzTw0n/bSJo2mZ+zKDu91pmMAsLu/RXhtqRqxWNscSlX1lCTntkq7rAaA
+EkhlkjUjYfpXpQ3Zb0ZmtipIItCHY2NYJwWuoBXNMa4AgFljrC7KY9XXneaL
+ARs5G/KYW7zuzE/dV/r6EteNJf2GLQCypa3oLMvKrbHazCCJpntVUv1+2J4a
+s2nKiluf+/l+2GxxaseZVOROUXJ+uwJ3ODW+VEZZk0EYTTPaWJKyK1z4gIvb
+DlZHs3FpDPykwBWUoznMFQAwa0h+3yBYU9hnYV/TYSuyy28InpnetSZZ2uq+
+E5sEXrGN45YvEEfTopJLh5LyWyfMVyPSkbHSY1udxX2uHEkd6ShILujUnZDi
+HYXwpTLKmhSSaFrdRJ26jz0fDy0fohZRLT759qZQCzbHXTQ9KHJsDJykwBV0
+omkd4goAmDVklyLdV397x2ITwdTz4407ly3/4pZhb4DJdj1RNGyiXZSa3ySz
+8r6y9YCfd5zlJGpupDZdT3vOf4W/Hh+By70PefptSLw2fQTAl8ooa5rCbpnt
+1ow3vOP3wplh9g4jXBrDiHlS4ArK0Yyw7goAmDWQjvTVvvGWq0jn+RVH9EOd
+VV3ZwcGH2owb2cq2g4yWtnU05J/TR3PrR/UjrtHRlp8rxdN3u8pqtwqDRGKL
+c2HupBrAm1mPL5VR1rSFYYr+O0NTs3SQzu9feY/V3Ruuqk2cFLiCUjSHugIA
+Zg/l7ZTAIMtvXyc977p48ydfZWUf/TJx/0njV6yqoabK1PUPL/TcU1rbIUep
+vgVONM1QRazwvgX3GFjg4pf29/RyVLalBIYd67H6jQg3UmfAOQoRSWWQNW1h
+mOTPXQFPCMPj046fKPqhqkvB7ukxN9UmTgpcQSmag10BALMHKqne+1qq+T2l
+pnsF9kMvGiar3xd5sHEMZ03xSCq3wljBqaoNrnB8NABwOpQ95Zm5FwZmTj31
+ns/oYHMFUYym7KnIzvq1n/AmWv5I5U4YezhLtcEVsxENAJwRDBkemdqk1mpk
+zaUJSxc++vyRimap3XvV9KKhikEJYmMXgg9SuRTGLs5QbXCF46MBAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAsws6Wpe+c0uQt1vAtpwb8nn0g415mzjAIeA6AKCG
+oqvo+F9SVIt05a1fGnFewrWeWWPeJg5wCLgOACiCaSY0+rM3+dWEoJh6nCdo
+zlHmbeIAh4DrAN6Cqbm5zpdfP/xuLoXxpnOO2U+cqxYzgEdS+cW8XW6AM4H0
+nS/86ea4rUWOIeKavKTwZ1+tYWuktVar7i+LWhltfBwZKr1aJro4hPMkMmys
+RXSsepjwN4aUUsAm2gsTNi5zvX+RW/Dugtt0xhEQoOgs3rs9IsTnKcGamKJu
+3Q/0iVOgF2das43EKcJBi/Grbbs+PHAjLanz2HUAYA/qgV8+eCuPwgkSpvy3
+V3wlyWMJWyOtdTNjTsUEuwpMH5U5cSMz+rNz5gPeMEV31ak/BlWTa3C8u11m
+tWIopjBxMyMxp3YQUY005Ly8+EH/w+12Pu1F2V38zdneySCawdNRT7sbp+fg
+pcAkju3EKcJJi4mrTVYfHriRptR56zoAsAt0uDI6cLf5I/5JYDL+hhBVb9m+
+zDNpq8xHs2F3z0evjdUN85z+Z6LtQneh7yQ+y0P2t1iOE6Wagmrgwrl+w3FB
+fi3O/cmXaqT2JYCq5IYdJWXrgbVh3xnHCFmlwCyOrcRN0AyW74qvxy8BNy0m
+qzZhfXjgRrpS56vrAMA+NOIfQ722Xja1FzrWUpwcGRz6afpH0S8GCNwCY0Uz
+UwFoHw2Io6l6SpJzW6VdVmNDsbu/RXhtqRqhuMbopqBn7MoO73WWkxWYZKF/
+VdqQ/WZkZuvMXDeiFOjGoYym94cXtuDfU8Vhi41YVZugPjxyI7hOS+o6ALCT
+sbooj1Vfd5qvFmzkbMhjbvG6MzB1X+nrS1w3lvQbLuzJjgaKzrKs3BqrTQX8
+aMidouT8dgXuSGvFrc/9fD9sJjlhsycF3auS6vfD9tTgTpumlcUkmtHGkpRd
+4cIHXNx2zMxxI0yBZhyqkBwlOGvx9Ks41cavD4/cCK7TwmcT4Egkv28QrCns
+szCl6VwY2eU3BM9M70WTHA3UfSc2CbxiG8ctX8CJNtJRkFzQqTt3wzsaIB0Z
+Kz221VG8e5VuClpUculQUn4r/nfSdLIw+TeYrO5jz8dDy4cwWynQi2MDtfjk
+25tCdazzWvSIf5D+z81xF02Pfxy1mLza+PXhkRvBdeSuAwA7kV2KdF/97R2L
+XQZTJ4837ly2/Itbhit+Jjv81tGarqc957/CX4+PwOXehzz9NiRem14sytYD
+ft5xlnO22UkBm2gXpeY3yWgvI+KaTDHe8I7fC2eGMVsp0ItDFZIzWG5abKPa
++PXhkRvBdVq4bgIcCdKRvto33tLNOievOKKfDK3qyg4OPtRm3J5Wth1kdDTA
+j6bFHWmtldVuFQaJxBR3GOikgPxz+mhu/ah+Gjc62vJzpZjyPVN4ATFF/52h
+qXE9SOf3r7w3sytCnAK9OFQhOUpw12KSauPXh0duBNdp4bMJcCjK2ymBQZZf
+z0462XXx5k++yso++mXi/pPGL05VQ02VqesfXui5p7S2Q45SfQuCaFPgHA2U
+bSmBYcd6KP9Wg2oKmqGKWOF9C+4xsMDFL+1v6rfz4gTEJH/uCnhCGB6fdvxE
+0Q9VXYrp006SFGjFoQzZUYKbFpNWm6g+PHIjuA4+mwDHgkqq976Wan6nqOkO
+gP3Qi4bJ6vdFHmwco7FSHJ8CvYCkKbAuzDY8ajFINYfHrgMA+1H2lGfmXhiY
+OQXUOzmjg82jAcVoyp6K7Kxf+6neZWvy/zk0BToBbaTAujBK8KjFINUEfrsO
+AOwHQ4ZHpraetRpZc2nC0oWPPn+kollq92/C6UVDFYMShOHdPg5LgV5A0hRY
+F0YDHrUYpNIN6LSuAwAAAAAAAAAAAAAAAAAAAAAAAAAAAABnBx2tS9+5Jcjb
+LWBbzg05PKQGcCLAnAAwX1F0FR3/S4pqka689Usj4GeXgBMB5gSAeQummdDo
+z0flVxOCYuopPo4XAGYBMOe8B1Pz5mqZR1L5hfz64XdzKUynnV141G4eSeUd
+zmlOgBFI3/nCn26O21otGCKuyUsKf/bVGvsnjWIT7YUJG5e53r/ILXh3wW3D
+6ABUerVMdHGI5FF6HEjVKjqL926PCPF5SrAmpqgbYU8nfhFYQN1fFrUy2vhc
+ONtq8bDOelr2WIvoWPWwfb/ipJY7OJMKdNsN5gR4gXrglw/eyqNwmoEp/+0V
+X0nyWMLCFOyJmxmJObWDiGqkIeflxQ/6H243+mviRmb0Z+espqxxJ1XZXfzN
+2V5EN4H6dNTT7sbBNyzoJC6CfajFp2KCXQWmzywlU4sLQdaTpVV0V536Y1A1
+eVQZ726XMT0GUMkdnEkJmu0GcwL8AB2ujA7cbT4VgAQmE3NwUA1cONdv8Lr8
+Wpz7ky/VSI2vYXfPR6+N1Y3odAqpWlQlN+y/KFsPrA37zjizx26dZEWwA1Vv
+2b7MM2mrzGfkEaolgCBrVa9ou9Bd6DuJz/KQ/S0ks4k1g+W74usJqkAhd3Am
+NcH02g3m1ENqTsAp0Ih/DPXaetm0SehYS3FyZHDop+kfRb8YIHALjBXNDBKg
+vaxIo+kZu7LDe53psAHs7m8RXluqRiycyrFUVNqQ/WZkZuvMSDaWdOIXgalU
+VU9Jcm6rtMtqfiuBWtpZU4byAAX83MGZVKLRbTeYcwqY7uH8jNVFeaz6utPc
+dtjI2ZDH3OJ15zHqvtLXl7huLOk3XB6TLStFZ1lWbo3VpTlJNN2rkur3w/bU
+mI1zVtz63M/3w2aL0x4upWpGG0tSdoULH3Bx2zEzgo0dnQRFYCQVuVOUnN+u
+wJ0tjq+WftZUobj8iXIHZ9qORr/dYM4p4LPJ+ZH8vkGwprDPorWm015kl98Q
+PDO9o0uyrNR9JzYJvGIbxy1fII6mRSWXDiXlt1p8z4p0ZKz02FZncQ8ox1K1
+ugk5dR97Ph5aPoSxqZOgCAykjnQUJBd06s4r8ZY/vlr6WdtALT759qZQHeu8
+Fj3iH6T/c3PcRdxjG0nu4Exb0Zi0G8xJw5wAp8guRbqv/vaOxeW6qR/GG3cu
+W/7FLcN1M5OtcqJo2ES7KDW/SWblC2XrAT/vOMt511xKNTLe8I7fC2eGMfZ0
+EhaBvtSm62nP+a/w1+MjcLn3IU+/DYnXphcyvlr6WVPF9qkpae7gTBvRGLUb
+zDkFXDc5P0hH+mrfeEtP6Pyw4oh+dLSqKzs4+FCbcZNX2XaQ0bKyjob8c/po
+bv2ofpY2Otryc6V4+j4gWe1WYZBIbHFyx5VUTNF/Z2hqNg7S+f0r781sINiv
+k6QITKROgzNbnEAt/aypYmv528gdnEkxmpZOu8GcU8BnEw9Q3k4JDLL8nnPS
+D66LN3/yVVb20S8T9580fv2oGmqqTF3/8ELPPaW1HXKU6lvgRNMMVcQK71tw
+j4EFLn5pf08bX9mWEhh2rMfqFw/cSMUkf+4KeEIYHp92/ETRD1VdiukzNHt1
+khaBidQZcJY/kVq6WVOGdPlTyB2cSSHaFDTaDebUA59NfACVVO99LdX8fkvT
+62j7oRcNk9XvizzYOIbjN6eSyqlO2gFJ1DpAGzs4Vbu1/HGmFswJzBWUPeWZ
+uRcGZs6l9H7I6GBzWVGMpuypyM76tZ/wdlVnkcqxTpoBbahlXRtrOEu7tZx3
+nEdSaQbkrTmB2QFDhkemNnC1GllzacLShY8+f6SiWWr3L6vpRUMVgxLExhW6
+M0jlVCftgKRqWdfGMs7Qbi1/nMm1VHbVOrs5AQAAAAAAAAAAAAAAAAAAAAAA
+AAAAgLkAOlqXvnNLkLdbwLacG3J41Isl87k+8zl3AAA4RdFVdPwvKapFuvLW
+L42AHy9aMp/rM59zBwCAWzDNhEZ/Qiy/mhAUU4/zbM75zXyuz3zOHXAOMDU/
+Ltf5opOPyK8ffjeXwphX9uBXN2e/Ps7DfM4dYBuk73zhTzfHbS1+DBHX5CWF
+P/tqDQsjOxWdxXu3R4T4PCVYE1PUrfvZNyq9Wia6OIT3UC0OdRpQ95dFrYw2
+PgSMJanYRHthwsZlrvcvcgveXXAbfxDBbKjFw7pB07LHWkTHqoft/S0kj7qJ
+J4u4d7bqA94AACqoB3754K08Cuc5mPLfXvGVJI8lLIyTVnYXf3O2F9ENRz4d
+9bS7cSbLxI3M6M/OWc0q406n8b3Fp2KCXQWmD6hkQerEzYzEnNpBRDXSkPPy
+4gf9D7ez82QWmmpxIWjQZHUV3VWn/hhUTR7WxrvbZUwPQjzqJi6EvbNVH/AG
+AFACHa6MDtxt/sB6EpiMnsF9W5XcsEejbD2wNuw740QZ7O756LWxuimXzqFT
+j6q3bF/mmbRV5gPR7JaqGrhwrt9wxJFfi3N/8qUa6eyrJYCgQape0Xahu9B3
+Ep/lIftbrAeVUovOn24SBCHona36gDf0aAbLd8XXU20/MC/RiH8M9dp62dQl
+6FhLcXJkcOin6R9FvxggcAuMFc084572UYI0mhaVNmS/GZnZOjMtDLv7W4TX
+lqoRi3XCoU5VT0lybqu0y2pYJ0tS9Yxd2eG9znJ0wWyopd0gNuBRN9ntHXhj
+ChhRAdhkrC7KY9XXnea+x0bOhjzmFq87kVL3lb6+xHVjSb/h+pzsKKHoLMvK
+rbHaGyCMphltLEnZFS58wMVtx8x0MMWtz/18P2y2OOniTCdypyg5v12BO0ia
+Ham6VyXV74ftqcGdDO1gtWTa8BvEAjzqJrkwLXnv7E7cRnzeegM+mwCbSH7f
+IFhT2GfhLdOZKbLLbwiemd5SJjlKqPtObBJ4xTaOW75AHE0HJqv72PPx0PIh
+w+JDOjJWemyrs7gDlSOdIx0FyQWdulNFvBXNjlQtKrl0KCm/Ff/bbkertaFN
+a90gG6jFJ9/eFGrB5riLpgdXHnWTXBh576wBbxi8sc5r0SP+QXjeAIApZJci
+3Vd/e8div8DUkOONO5ct/+KW4cKdyc4/cbQpxhve8XvhzLDBn8rWA37ecZZT
+o7nR2XQ97Tn/Ff56fAQu9z7k6bch8dr02mRDKjbRLkrNb5LRXp0sqSXTZsS8
+QSzAo26SCaPfO/DGFHDdBNgE6Uhf7RtvaUqdIVcc0c9gVnVlBwcfajPuMivb
+DjI6SlhGwxT9d4amxrYgnd+/8t7MtoCsdqswSCS2OLXkSuc0OIOkWZCK/HP6
+aG79qH4yNzra8nOlmPLdWCypJQpF3CAW4FE3iUMx6R14Ywr4bAJso7ydEhhk
++UXrpCFdF2/+5Kus7KNfJu4/afz+UzXUVJm6/uGFnntKazvkKNW3wImGSf7c
+FfCEMDw+7fiJoh+quhTT513KtpTAsGM9Vr+34EbnDDgr2l6pmqGKWOF9C+4x
+sMDFL+1v6jcKs6UWPxRxg1iBR93ED8W0d+ANPfDZBFAAlVTvfS3V/IZP0wt5
++6ERDZPV74s82DiG43an0qnlWCrtgCRqHaDNNjzqJrvCwBsAQB1lT3lm7oWB
+mZM5vSEzOtg8SlCJpuypyM76tZ/wZlln0anlXCrNgDbUsq6NEvzpJsv1AW8A
+AHUwZHhkagdZq5E1lyYsXfjo80cqmqV2f8lAIxqqGJQgNvYHnEEn11LZVcu6
+NhrwoZsOqQ94AwAAAAAAAAAAAAAAAAAAAAAAAAAAAACcCHS0Ln3nliBvt4Bt
+OTfk8LgZvgJ9BABgDqHoKjr+lxTVIl1565dGwA8o+Qr0EQCAuQSmmdDoT7Ll
+VxOCYupxng8K8AHoIzDnwNRw/Q9o5dcPv5tLYXAte/DIeDySOvt9BADKIH3n
+C3+6OW5rOWGIuCYvKfzZV2vYmo6t1ar7y6JWRhuf7oVKr5aJLg7hPdiLjlRs
+or0wYeMy1/sXuQXvLrhNdYIBCYrO4r3bI0J8nhKsiSnqRpxZqgG6hcXDOutp
+2WMtomPVw/b+HpMD4+EXnKVusrxGmLgOTxOxx2z1kVrWxD6xAzYMDPAb9cAv
+H7yVR+HECVP+2yu+kuSxhK3p2LqBLqdigl0Fpk+enLiRGf3ZOat5aXSkTtzM
+SMypHURUIw05Ly9+0P9wu53LRdld/M3ZXkQ3S/p01NPuxhE2zijV+Pb0CosL
+QdaTRlB0V536Y1A1ecQY726XMf2A4sR4xAVnoZvsSmXgOlwIU7bVR4pZE/rE
+HtgwMMBv0OHK6MDd5k/MJ4HJJB1CVL1l+zLPpK0yn3SG3T0fvTZWN2mToVTV
+wIVz/YblJ78W5/7kSzVS+4SiKrlhj0bZemBt2HfGATxOKHUqLL3CEkCQtapX
+tF3oLvSdxGd5yP4W62Gp02gGy3fF1+NXgRvjkRXc7m6yK5W+6/AhStlWHyln
+TaTTDpgbmMxyAK/QiH8M9dp62bSX6FhLcXJkcOin6R9FvxggcAuMFc08ZJ/2
+uiOOpuopSc5tlXZZTeHE7v4W4bWlasTCgnSl6hm7ssN7neVMAiZq9a9KG7Lf
+jMxsnRmu5pRS6RaWdtaUIRmFwKHxjFgVnKVusiyVsuvY9RhtD9P1CYsGNpUN
+0zfmCmN1UR6rvu40Nys2cjbkMbd43QmKuq/09SWuG0v6DVfSZOtO0VmWlVtj
+dc2NHw25U5Sc367AnRCtuPW5n++HzRYncnSl6l6VVL8ftqcGd+QzLbWTaEYb
+S1J2hQsfcHHbMTNMzfmk0i8s/aypQnKg4Mx406/iFJydbrIplY7rGKVMCL2s
+yX3ieANPA59NcwbJ7xsEawr7LFxjOrRFdvkNwTPTe8gk607dd2KTwCu20Wq3
+GSfaSEdBckGn7iwJz4FIR8ZKj211Fne10pWqRSWXDiXlt+LfXkBHrcm/wWR1
+H3s+Hlo+hDmnVCaFpZ+1DdTik29vCtWxzmvRI/5B+j83x100PShyZDzygrPT
+TZalaqm6jlHKhND2MI5OBlkzNDAVywH8QnYp0n31t5Y7xKaeGW/cuWz5F7cM
+V+pM9tKtozVdT3vOf4W/Hh+By70PefptSLw2bV1l6wE/7zjLydX0pGIT7aLU
+/CYZbW8S5z7FeMM7fi+cGcacUiqjwtLPmiokJ7HcGM9GwdnoJrtSjVBxHaOU
+CaGbNZ5OW7BoYCNw3TRnQDrSV/vGWzZb55kVR/RDoFVd2cHBh9qM28rKtoOM
+1h1+NC3uhGitrHarMEgktjhloyMV+ef00dz6Uf0Ab3S05edKMeXb3/ACYor+
+O0NTU26Qzu9feW9m18LppE5DvbD0s6YKyYGCO+ORFNz+brIpla7rGKVMCPWs
+mfuERQMbgc+muYPydkpgkOW3o5OecV28+ZOvsrKPfpm4/6TxC0/VUFNl6vqH
+F3ruKa3tkKNU34Ig2hQ4DlS2pQSGHeux+ikDVamaoYpY4X0L7jGwwMUv7W/q
+d2bjBMQkf+4KeEIYHp92/ETRD1VdiunTQqeTOgONwtLNmjJkBwpujEdacHu7
+ya5U+q5jkDIJVLO2wycsGtgIfDbNIVBJ9d7XUs3vIDW91rYfetEwWf2+yION
+YzgOd7xUegF5JFVLqtYB2mwDxmMWbdb66FRZa20kDsxNlD3lmbkXBmbOkPSe
+yehg04EUoyl7KrKzfu0nvMnVwVLpBOSRVK1NtaxrowQYj3a02e2js2Sttd0g
+YK6CIcMjU1vGWo2suTRh6cJHnz9S0Sy1+0fY9KKhikEJYuO8yGFS6QXkkVRb
+alnXRgMwHnuuc0gfnSFrLbUGAQAAAAAAAAAAAAAAAAAAAAAAAAAAAE4EOlqX
+vnNLkLdbwLacG3L4xhdwCsCWADC/UXQVHf9LimqRrrz1SyPgh4OAUwC2BIB5
+DqaZ0OjPSuVXE4Ji6nEe4QkAsw7YEuAbmJo3l/c8kjqJ/Prhd3MpDFcFCOBL
+u/micwqwJcAdSN/5wp9ujttaMBgirslLCn/21Rr7595iE+2FCRuXud6/yC14
+d8Ftw5P7UenVMtHFIZIHZnEg1Yi6vyxqZbTxAV+2peLJws166qWxFtGx6mHC
+HyFSS1zRWbx3e0SIz1OCNTFF3Sz9fJ+FxK0hKYUJXLTbuoZgy3ljS8CZUA/8
+8sFbeRTOizDlv73iK0keS1iYNz1xMyMxp3YQUY005Ly8+EH/w+1Gw07cyIz+
+7JzVHDLupBrfW3wqJthVYPrwSTKpuBBmjSm6q079MaiaXGLj3e0yq4gUE1d2
+F39zthfRTaY+HfW0u9lsHcawkbg1xAYweWcu2k1QQ7DlvLAl4ESgw5XRgbvN
+n0RPApPZNDioBi6c6zcsAPm1OPcnX6qRGl/D7p6PXhurG4bpFFINgnvL9mWe
+SVtlPuyMUCpBEIKsVb2i7UJ3oe8kPstD9rdYjvWknDiqkht2i5StB9aGfWc5
+fYcBzBPXDJbviq8nEE1mAAMctZuohmDLuWFLgC9oxD+Gem29bOovdKylODky
+OPTT9I+iXwwQuAXGimYeXk97ZZFG0zN2ZYf3OtNn8WN3f4vw2lI1YuEwDqWq
+ekqSc1ulXVaDOAmkMsmaGLqJa1FpQ/abkZmtCutYjk7cVDbVaQX4peDYmdY1
+BFval7iT2BLgC2N1UR6rvu409yI2cjbkMbd43fmHuq/09SWuG0v6DRfKZCtL
+0VmWlVtjdUlNEk33qqT6/bA9NWazkxW3Pvfz/bDZ4jyNM6nInaLk/HYF7pBo
+fKmMsiaEXuKa0caSlF3hwgdc3HZYT3lzfOLTUPxsIioFl87EryHY0o7EncaW
+AF+Q/L5BsKawz8IUpnNVZJffEDwzvUVMsrLUfSc2CbxiG602k4mjaVHJpUNJ
++a0WX4QjHRkrPbbVWdy0ypHUkY6C5IJO3fka3lrAl8ooa0LoJq4Dk9V97Pl4
+aPmQ+XvMQuJq8cm3N4XqWOe16BH/IP2fm+Mu4h/wiEvBsTO11jUEW9qVuA5n
+sKUJhLYEnADZpUj31d9abgCbWmK8ceey5V/cMlyIM9ktJ4qGTbSLUvObZFbu
+ULYe8POOsxwHzY3Uputpz/mv8NfjI3C59yFPvw2J16YXEb5URlkTQjfxKcYb
+3vF74cwwxbdhMXEjtq+bSEvBpTONmNcQbGlX4lNwbkuALyAd6at94y17qbPE
+iiP6yc2qruzg4ENtxl1jZdtBRivLOhryz+mjufWj+qnV6GjLz5Xi6Ru1ZLVb
+hUEiscUZGXdSDeAMiSaQyihrQqgnjin67wxNTblBOr9/5T3rzZNZSNyIrc8m
+G6Xgqt3ENQRbmsFTWwK8QXk7JTDI8svPSUu4Lt78yVdZ2Ue/TNx/0vh9pmqo
+qTJ1/cMLPfeU1nbIUapvgRNNM1QRK7xvwT0GFrj4pf09vRqUbSmBYcd6rH6p
+wI3UGXDWApFUBlmTQDVxTPLnroAnhOHxacdPFP1Q1aWgfhLMYuJGSD+bKJSC
+m3YT1xBsyTBx57IlwB9QSfXe11LNbxA1vZS2H3rRMFn9vsiDjWM4BuaRVHaF
+8Spx1nCqrMGW1vAqcYCXKHvKM3MvDMycAOktkdHBpsEoRlP2VGRn/dpPeA8r
+f6SyK4xHibOJs2QNtiR8N74kDvAVDBkemdoR1mpkzaUJSxc++vyRimap3Ru3
+9KKhikEJYuO0hw9S2RVmgA+Js48zZA22JIEPiQMAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAwFvQ0br0nVuCvN0CtuXckMPNAQAAAADnKLqKjv8lRbVIV976pRFU
+HgMPAAAAAI4F00xo9BdL8qsJQTH1OE97BYB5DabmzW4Cj6QCHMIvn8ivH343
+l8IoXgDgAer+sqiV0URzLJG+84U/3Ry3tT4xRFyTlxT+7Ks19k/2xCbaCxM2
+LnO9f5Fb8O6C24aH96PSq2Wii0Mkz8ziQKoR8xqyJBW/Dvag6Czeuz0ixOcp
+wZqYom6EPak4kVmAblUpwiOf4MkidgU21iI6Vj1M+HtVcB0VHOQ6gDZq8amY
+YFdBFO5nk3rglw/eyqNwGoYp/+0VX0nyWMLC1OmJmxmJObWDiGqkIeflxQ/6
+H243mm7iRmb0Z+esRpFxJ9X43tY1ZEEqcR0Youwu/uZsL6Ibm3466ml344Qd
+FqQSRLYPmlWlGpU/PsGF0BWYorvq1B+DqsnD6Xh3u8wqIriOEo5xHUAfVW/Z
+vswzaassZ3XpQYcrowN3E11QWcFkQg2epIEL5/oN60F+Lc79yZdqpMbXsLvn
+o9fG6uZhOoVUg2DcGtotlawOzEBVcsP+lLL1wNqw74wzeOyvKlFkO6BZVRM0
+g+W74uvxRfPIJwRBCFyh6hVtF7oLfSfxWR6yv8VyAiy4jhKs9AhgAVVPSXJu
+q7TLeo6kDo34x1CvrZdN/zs61lKcHBkc+mn6R9EvBgjcAmNFM8+vp72QSaPp
+Gbuyw3ud6eP4sbu/RXhtqRqxcAmHUglryJJU/DowVat/VdqQ/WZkZuvM7De2
+pFpHZqqTblXNZBMP6eCRT9h1BbiOSjR7XAewCXKnKDm/XYE741jHWF2Ux6qv
+O82tiY2cDXnMLV53DqHuK319ievGkn7DxS7ZQlZ0lmXl1lhdFpNE070qqX4/
+bE+N2fhkxa3P/Xw/bLY4LeRMKlkN2ZFKUAdGaifRjDaWpOwKFz7g4rZjZtYb
+G1LxI89SVU0h+WzikU/IhWnJXWF34jbig+sAB6LsKEgu6NSdLxB9Nkl+3yBY
+U9hn0VjT0Sqyy28Inpne5iVZyOq+E5sEXrGNVhvCxNG0qOTSoaT8VovvYpGO
+jJUe2+os7pHlSOoIaQ3ZkUpQBwZqTf4NJqv72PPx0PIhjFWpOJEZ6GRSVd1b
+iE++vSlUxzqvRY/4B+n/3Bx30fTgyiOfkAsjd4U14Dpb0ex2nQkWrgPoobyd
+9pz/Cn89PgKXex/y9NuQeM2sibJLke6rv7XcxDVt63jjzmXLv7hluJhmsjlP
+FA2baBel5jfJrDqsbD3g5x1nORGaG6lN10lryIZUwjrQV3vLbM9jvOEdvxfO
+DGPsScWPTF8no6qaQnLdxCOfkAmj7wpwnY1odrsOcAQ4M471IB3pq33jLfuh
+a+uKI/rhzaqu7ODgQ23GnV9l20FGC9k6GvLP6aO59aP62dXoaMvPleLpe4Vk
+tVuFQSKxxVkVd1IN4NXQfqkkdWCiFlP03xmamnWDdH7/ynszeyD2SiWOzETn
+NNSragrJZxOPfEIciokrwHUUEjfAzHWAIyD6bJq8tkoJDLL8LnSyra6LN3/y
+VVb20S8T9580fiepGmqqTF3/8ELPPaW1HXKU6nvjRNMMVcQK71twj4EFLn5p
+f08vDmVbSmDYsR6rXxtwI3UGnBraK5W0DkzUYpI/dwU8IQyPTzt+ouiHqi7F
+9EmmvVKJIzPROQONqppA8tnEJ5/gh2LqCnCdjWgzMHMdMLugkuq9r6Wa349q
+ejlsP/SiYbL6fZEHG8dwTAhSzaERcG5UlSK8yohNYeA6xtHsdx3gCJQ95Zm5
+FwZmTmL0bc3oYNMkFKMpeyqys37tJ7ylFaSaQDngHKoqRfiTEcuuANcxicaS
+6wBHgCHDI1O7ulqNrLk0YenCR58/UtEstXvzlV40VDEoQWycuoBUugHnWFUp
+woeMWHeFDnAdh64DAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAq6Ghd+s4tQd5u
+Adtybsjhm3sAAACAcxRdRcf/kqJapCtv/dIIgp8dAwAAAMAsgmkmNPqLJfnV
+hKCYepynxgLAfAdT82ZDgUdSAQ7hkU/k1w+/m0thpC8A8AN1f1nUymiiOZNI
+3/nCn26O21qfGCKuyUsKf/bVGvuHhGIT7YUJG5e53r/ILXh3wW3Dc/pR6dUy
+0cUhkmdacSBVq+gs3rs9IsTnKcGamKJuhD2d+EVgAfN2s1VV6zpwIJUifPEJ
+niZiV2BjLaJj1cOEPyYF1zlIKuAo1OJTMcGuArxnvU6+OPDLB2/lUTgTw5T/
+9oqvJHksYWGA9cTNjMSc2kFENdKQ8/LiB/0PtxtNN3EjM/qzc1ajwriTquwu
+/uZsL6KbA3466ml340wZFnQSF8E+cNrNglqCOsyqVKpReeITXAhdgSm6q079
+MaiaPJaOd7fLrCKC6xwkFXAYqt6yfZln0lbhzRbUosOV0YG7iS6orGAy7AZP
+0sCFc/2GJSG/Fuf+5Es1UuNr2N3z0WtjdfMqnUKqFlXJDTs+ytYDa8O+M06d
+sVsnWRHsAL/d9leVqA6zJ9UEzWD5rvh6fNF88Qk+RK5Q9Yq2C92FvpP4LA/Z
+32I5nhVc5yCpgMNQ9ZQk57ZKu/Dn3mrEP4Z6bb1s+t/RsZbi5Mjg0E/TP4p+
+MUDgFhgrmnm+PO2FTBpNz9iVHd7rTB+Xj939LcJrS9WIhUs4lopKG7LfjMxs
+nZl2xpJO/CIwlUrYbrbUWtdhtqSaySaekcEXn7DrCnCdg6QCjgK5U5Sc364g
+nMk+VhflserrTnN3YiNnQx5zi9edQ6j7Sl9f4rqxpN9wsUu2kBWdZVm5NVaX
+xSTRdK9Kqt8P21NjNt5YcetzP98Pmy3ODLmUqhltLEnZFS58wMVtx8x0M3Z0
+EhSBkVSydrOhFr8OsyTVFJLPJr74hFyVltwVdmdtIz64DnAsyo6C5IJO3fkC
+0WeT5PcNgjWFfRaNNR19Irv8huCZ6W1ekoWs7juxSeAV22i1IUwcTYtKLh1K
+ym+1+DoW6chY6bGtzuI2WY6lanUzXuo+9nw8tHwIY1MnQREYSB0hbTdLanHq
+MEtSdW8hPvn2plAd67wWPeIfpP9zc9xF0+MrX3xiIw6pK6wB1zlIqtbUdSZY
+uA6gh/J22nP+K/z1+Ahc7n3I029D4jWzJsouRbqv/tZyE9e0reONO5ct/+KW
+4WKayeY8UTRsol2Umt8ks+qwsvWAn3ec5cRmLqUaGW94x++FM8MYezoJi0Bf
+atN10nazU1W8OsySVFNIrpv44hOyOPRdAa5zkFTA0RDNZEc60lf7xlv2Q9fW
+FUf0c5pVXdnBwYfajDu/yraDjBaydTTkn9NHc+tH9WOw0dGWnyvF07cLyWq3
+CoNEYouzKq6kYor+O0NT012Qzu9feW9mV8F+nSRFYCJ1Grx226uWuA6zJNUU
+ks8mvviEWBUTV4DrHCQVcDREn02T11YpgUGWX4dOttV18eZPvsrKPvpl4v6T
+xu8kVUNNlanrH17ouae0tkOOUn1vnGiaoYpY4X0L7jGwwMUv7e/p9aFsSwkM
+O9Zj9WsDbqRikj93BTwhDI9PO36i6IeqLsX0aZu9OkmLwETqDDjttlctcR1m
+TaoJJJ9NvPEJfhymrgDXOUgqwBmopHrva6nmt6SaXg7bD71omKx+X+TBxjEc
+EzqVVE510g7Il6pqSaVSxKkyIk2HTVXgOnNm23WAI1D2lGfmXhiYOYnRtzWj
+g02TUIym7KnIzvq1n/CuVmeRyrFOmgH5UlWtbakUcZaMbKTDsivAdSZw4DrA
+EWDI8MjUrq5WI2suTVi68NHnj1Q0S+3efKUXDVUMShAbpy7OIJVTnbQD8qWq
+FKVSxBkyIk2HdVfoANc5SCoAAAAAAAAAAAAAAAAAAAAAAAAAAAAN0NG69J1b
+grzdArbl3JDb+30ku9EAgArgOgCYcyi6io7/JUW1SFfe+qURBD+m5CgaAFAB
+XAcAcw9MM6HRn2jKryYExdTjPA6Tu2gAQAVwHQA4HkzNzZaE/Prhd3MpDCrl
+Itocg6sWM4BHUrXgOgCgB9J3vvCnm+O2FjmGiGvyksKffbXG7gGguqccFyZs
+XOZ6/yK34N0Ftw2P4UelV8tEF4dwnleFjbWIjlUP0/rBnaKzeO/2iBCfpwRr
+Yoq6TX/8bSsatYIQx7cDdX9Z1Mpo41O8iAtCEx60mEOpRtgoPrgOANhBPfDL
+B2/lUTiXw5T/9oqvJHksYWE49cTNjMSc2kFENdKQ8/LiB/0PtxsX2cSNzOjP
+zpmPAcMU3VWn/hhUTa6a8e52GbUPKGV38TdnexHdbO7TUU+7z8x5sRWNYkEI
+49uDWnwqJthVYPqESbyC0I3q/C3mVKrxvVkoPrgOANgBHa6MDtyN8/BxfJgM
+ssFBNXDhXL/hUCW/Fuf+5Es1UuNr2N3z0WtjdbMojf+4V7Rd6C70ncRnecj+
+FopDJ1GV3LDdo2w9sDbsO8MkGFvRKBeEIL49qHrL9mWeSVtlPtHMqiA4aAbL
+d8XX44vmQYu5lWoQzLj4pswr1wGA49CIfwz12nrZdE2gYy3FyZHBoZ+mfxT9
+YoDALTBWNPPseNpHA9Joesau7PBeZ/oofOzubxFeW6pGKB8OSN8ClTZkvxmZ
+2aogiWAC3YLQjU8STdVTkpzbKu2ymrZJoSAk8yB41GIOpdIuPrgOABzJWF2U
+x6qvO81PvrCRsyGPucXrzpnUfaWvL3HdWNJvuLgnOxooOsuycmustgFIoule
+lVS/H7anxmx0seLW536+HzZTvD4iewvNaGNJyq5w4QMubjuoTRyjVxDy+LQK
+gtwpSs5vV+BOgrZdEJLPJh61mDOpjIoPrgMAxyH5fYNgTWGfhZFNx5rILr8h
+eGZ6W5vkaKDuO7FJ4BXbaLUBThxNi0ouHUrKb50wPzdDOjJWemyro3GjLclb
+aHVzV+o+9nw8tHyIwikg3YKQxKdTkJGOguSCTt2ZLN5RgrAgavHJtzeF6ljn
+tegR/yD9n5vjLpp+DvCoxRxJZVh8cJ0pFq4DADuRXYp0X/2t5aa1qY3HG3cu
+W/7FLcPmAZMdfqJo2ES7KDW/SWblaGXrAT/vOMtpzEzewsh4wzt+L5wZprB2
+6BaEbnz8aE3X057zX+Gvx0fgcu9Dnn4bEq9NH15sF4TkuolHLeZGKuPiz3vX
+AYDjQDrSV/vGW/pPZ+MVR/RjmFVd2cHBh9qMO93KtoOMjgbW0ZB/Th/NrR/V
+j7hGR1t+rhRP3w4rq90qDBKJadwjhPcWmKL/ztDUxBWk8/tX3qO2u0K9IMzi
+E0WbBmcSNIWCkHw28ajF3Ek1QK/48951AOBAlLdTAoNMv6bWMWlj18WbP/kq
+K/vol4n7Txq/g1UNNVWmrn94oeee0toOOUr1LXCiaYYqYoX3LbjHwAIXv7S/
+p49byraUwLBjPXR+XYHzFpjkz10BTwjD49OOnyj6oapLQfH0kmpBmMbHjzYD
+zlGCQkFIPpv41GJupM5Ar/jz3nUA4EhQSfXe11LNb2o1vfy3H3rRMFn9vsiD
+jWO09q7ZFDwnCmIGjzLikVRwHQA4GmVPeWbuhYGZkza9jTM62FwUFKMpeyqy
+s37tp/ujDXYFz4GCWIfhTUb8kQquAwCHgyHDI1O72FqNrLk0YenCR58/UtEs
+tXuzmV40VDEoQeieqrEr2ACfC4IPjzLig1RwHQAAAAAAAAAAAAAAAAAAAAAA
+AAAAADDroKN16Tu3BHm7BWzLuSG395tddqMBAEXAeAAwt1B0FR3/S4pqka68
+9UsjCH6WylE0AKAIGA8A5hiYZkKjP8uUX00Iiqmn8eBYx0cDAIqA8QCAMpia
+TzsL8uuH382lMEeVi2hzDH4Zg1+A8YB5CdJ3vvCnm+O2jiwYIq7JSwp/9tUa
+tqZga7Xq/rKoldHGB3mh0qtlootD9J7hhU20FyZsXOZ6/yK34N0Ft02nMWBj
+LaJj1cO0frqo6Czeuz0ixOcpwZqYom7Tn9HbikatjMTx7YCFMuLBgTHwu2k7
+I0pSSaxiH2zUH4wHAGaoB3754K08CqdkmPLfXvGVJI8lbE3B1k2CORUT7Cow
+fcjkxI3M6M/OWY1GI2biZkZiTu0gohppyHl58YP+h9sNyw5TdFed+mNQNblk
+xrvbZdQiKruLvznbi+imnJ+Oetp9ZmKOrWgUy0gY3x7YKCNOVC6MQdhN0owo
+SiUObh9s1B+MBwBmoMOV0YG7zR+OTwKTiTmEqHrL9mWeSVtlPtQMu3s+em2s
+bj4ntSADF871Gw4x8mtx7k++VCOdCi7aLnQX+k7iszxkfwvF8Z2oSm7YmVK2
+Hlgb9p1hpo6taJTLSBDfHpiXUTNYviu+Hl80N8Yg6qYOwoyoSiULbo9mNmw8
+v4wHADbRiH8M9dp62dTa6FhLcXJkcOin6R9FvxggcAuMFc08T5/2IYg4mqqn
+JDm3VdplNXATu/tbhNeWqhFLc5MK0zN2ZYf3OstJA7SF6V+VNmS/GZnZqiCJ
+YALdMtKNz2YZTWUTT9bg0BhGrLpJkBHt4uMGZ6qWZRvPD+MBgE3G6qI8Vn3d
+ab5EsZGzIY+5xetOfdR9pa8vcd1Y0m+4Ric7BCk6y7Jya6yu5vGjIXeKkvPb
+FbjDoBW3Pvfz/bDZ+kqHRJjuVUn1+2F7aihPhiaMphltLEnZFS58wMVtB7XZ
+bfTKSB7f8WWchuSziTNjTL+K0038jOhKJQjOSC27Np43xgMAm0h+3yBYU9hn
+4UfTUS+yy28InpnenSY5BKn7TmwSeMU2Wu1j40Qb6ShILujUnX/heRvpyFjp
+sa0O535ZYmFaVHLpUFJ+K52vt0miaXUTbOo+9nw8tHyIQkS6ZSSJPwtlVItP
+vr0pVMc6r0WP+Afp/9wcd9H0UM2RMci7iZ8R7eKTWoVjG2vnh/FMsDAeAEwh
+uxTpvvpby71nUzeON+5ctvyLW4Y9ACZfK1hHa7qe9pz/Cn89PgKXex/y9NuQ
+eG16UShbD/h5x1lOqCYThk20i1Lzm2T0PE6c5hTjDe/4vXBmmEJQumWkGx8/
+GuMyGiG5buLGGDa6iZ8RPanMrIIbkHUbG5nzxgMAmyAd6at94y1tpHPjiiP6
+Edqqruzg4ENtxg1rZdtBRocg/Gha3GHQWlntVmGQSIyzp4EfCvnn9NHc+lH9
+WG50tOXnSjG126/womGK/jtDU7NrkM7vX3mP2tYK9TIyi0+cuwF6ZTRC8tnE
+nTFIuomfER2pTK1CmruWDRvPK+MBgG2Ut1MCgyy/E550o+vizZ98lZV99MvE
+/SeNX6WqhpoqU9c/vNBzT2lthxyl+hYE0abA8bayLSUw7FgP3o8kcEJphipi
+hfctuMfAAhe/tL8pHm9womGSP3cFPCEMj087fqLoh6ouBcVzS6plZBofP9oM
+9MpohOSziSNjkHaTKCOqUu2wCnHuU9ht4/llPACgACqp3vtaqvm9qaZX8fZD
+Lxomq98XebBxDHftcCmMHF6VkRI8ysjxUmkHnDUb86hNAEAXZU95Zu6FgZlz
+L70bMzrY9DbFaMqeiuysX/uJbu3lThgF+FNGqvAoIwdLpRlwVm3MpzYBAF0w
+ZHhkajNaq5E1lyYsXfjo80cqmqV27xnTi4YqBiUI0RkXl8Iowocy0oNHGTlM
+KrtqwXgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAr0BH69J3bgnydgvYlnNDbu+3
+wuxGA7gCXAEAAKcouoqO/yVFtUhX3vqlEQS/auUoGsAV4AoAALgF00xo9Cey
+8qsJQTH1OI/55C4awBXgCgCYFTA17CPYQH798Lu5FCbGchGNCjxqMY+k8t0V
+ADDrIH3nC3+6OW5rkWOIuCYvKfzZV2vYmsmu1ar7y6JWRhufx4VKr5aJLg6R
+PIqLklRsor0wYeMy1/sXuQXvLrhNZ24GAYrO4r3bI0J8nhKsiSnqRkilYmMt
+omPVw0x+9mheDXujmcJBi/G7wFKLWXYjnf6SaSI2nlO6AgCcGfXALx+8lUfh
+BAxT/tsrvpLksYStmey6gS6nYoJdBabPipy4kRn92TmrCWd0pE7czEjMqR1E
+VCMNOS8vftD/cLudT29Rdhd/c7YX0Q0xPx31tLtxGg6eVEzRXXXqj0HV5MFt
+vLtdRuvgYV0Ne6KZBuaixcRdYKHF7Eql0V9SCFN2SlcAgFODDldGB+42f8Y9
+CUzG9BCi6i3bl3kmbZX5bDLs7vnotbG6MZsMpaoGLpzrNxwU5Nfi3J98qUZq
+n1BUJTfsHClbD6wN+844L8dKqqpXtF3oLvSdxGd5yP4WOqM/rathTzRT9Zy0
+mKwLdreYXanU+0sOUcpO6QoAcG404h9DvbZeNj0YoGMtxcmRwaGfpn8U/WKA
+wC0wVjTzWHzaRwPiaKqekuTcVmmX1dxM7O5vEV5bqkYsjgh0peoZu7LDe53l
+CAEmavWvShuy34zMbJ2Z00YglUF8wmrYDYctNmLVBZZazLJU6v1l13hcuAIA
+nJyxuiiPVV93mi8hbORsyGNu8brzRXVf6etLXDeW9Bs2DsiOBorOsqzcGqst
+EPxoyJ2i5Px2Be5MZ8Wtz/18P2y2OCGkK1X3qqT6/bA9Nbgjn2mpnUQz2liS
+sitc+ICL246ZuWz4UkmgXw174azF06/idIGdFrMplWZ/mRsPj9l3BQA4OZLf
+NwjWFPZZrGDTiS2yy28InjHuwJMdDdR9JzYJvGIbxy1fwIk20lGQXNCpOzfE
+W3dIR8ZKj211FnfH0pWqRSWXDiXlt+LfCUFHrcm/wWR1H3s+Hlo+hJFJJYN2
+NchQi0++vSnUgs1xF00Pihy1mLwL7LSYZalaOv1lajx8Zt0VAODkyC5Fuq/+
+9o7F1oPpShlv3Lls+Re3DPscTHb4raM1XU97zn+Fvx4fgcu9D3n6bUi8Nn2I
+ULYe8POOsxw0TU8qNtEuSs1vktFejsS5TzHe8I7fC2eGMTKp9OLbqIa9cNNi
+G11go8XsSjVCtb/sGm/WXQEATg7Skb7aN95y7elWyooj+nnVqq7s4OBDbcbN
+dGXbQUZHA/xoWtyZzlpZ7VZhkEhscfpMRyryz+mjufWj+ung6GjLz5Viynfq
+4QXEFP13hqbm0iCd37/y3syeD75UuvGnwauGvXDXYpIu2N9iNqUy6S+7xpt1
+VwCAs6O8nRIYZPmd7eRKcV28+ZOvsrKPfpm4/6Txa17VUFNl6vqHF3ruKa3t
+kKNU34Ig2hQ4607ZlhIYdqzH6pclVKVqhipihfctuMfAAhe/tL+p30SOExCT
+/Lkr4AlheHza8RNFP1R1KabPiYmk0os/g0OOQty0mLQL9raYXamM+suu8Wbf
+FQDg7KCS6r2vpZrfiWq6w2A/9KJhsvp9kQcbx3D2RBwvlV5AEqmsxGcLaDGz
+aKT95bKAADBPUPaUZ+ZeGJg5W9WvlIwONtcdxWjKnorsrF/7CW+9dbBUOgFt
+SbU3PqtAi2lHs6GTuwICwHwCQ4ZHpjbctRpZc2nC0oWPPn+kollq92/O6UVD
+FYMSxMZliMOk0gtIRao98VkHWsxef7ksIAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAA4O+hoXfrOLUHebgHbcm7I7X2sDLvRAIAVwJYAwDcUXUXH/5KiWqQrb/3S
+iPMSZ4oGAKwAtgQA3oFpJjT680j51YSgmHoaT411fDQAYAWwJTArYGp+XJPz
+RecU8uuH382lMO+Vi2hswaOO8Egqj3BOWwJODNJ3vvCnm+O2ViOGiGvyksKf
+fbWGhbm3is7ivdsjQnyeEqyJKerW/SAelV4tE10cInk4HRc6Daj7y6JWRhuf
+aWZbKp6sifbChI3LXO9f5Ba8u+C26QgFbKxFdKx6mMnvLs2F2RuNkloTOOgI
+vjDnNI/DTE6tO46WSoKjbAnMJ9QD/5+9s4+Lomz7fv7VJ627zChf2goEAVFA
+yUsMkJRKLvGlqO7Q0OdjmUYChqYWWneXXly+IAiJ2QOil4qbIHabPIKYlxbi
+C0goiAoSr8ICAi67sOzO7s7swy67sC8zszOzs+wsHN+//LDusb/j5Zw555yZ
+8/j1y5VpFCYzmOxRk+BmjPMEFrpgyxpO7j/f1DcClG1nw15x0vW+6b2bFP7N
+RZOGcLbTqfttwenV/g48/f02yaTi0nsvcf2BG22IvLPkwJLxz3rtqdbuUINJ
+G/JP/9Em7zsa9DRUi2mNXVNhllijolb/x22REWJhnCse6xU5lexYWyoZVitL
+YASBduSF+66jvMcxk445uD8rl2gXTWSV22cHHdT17MEeXwqfHaHu/8kNnRrk
+Tdlbk87FzzTs70YolcBI6+WLLdojiOR2pNOkxYWifuP8Fa5Orh59TJ0WsK2C
+egtdPGE0rCnbctZGFRMElEitHrbJCJkwrhWP1YqcQnasLZVUntXKEhhBKAU/
+B7otu65fCmh3xcnYUP/ArxO+Cn/Hm+foG8Ef3LKf9rAltaZCRSUpH4cmVQ52
+d8Me/xbitii/02gw2FCnvDEzNrVSVGfSe5RAqhmX1XTfXOU+x7gVBHvCqKFs
+Ovb2IiqPTOGrtXHl4ArjXvFoPrVWkeMHYUikcqAsgWFOd1GY88wfag0rG+s8
+H/CiY5R6tqRoznp/gsP8zBbtRTjZsJXWZienFposABBaU3aVZsatDXZ9ZrTj
+qsFubtL733p6bCg3mlnZTCdSnxGbXi3F7YuNL5VcmPpTYcEXQRsLKXfIpi+M
+EhQPAkRqbVk5hMI4Vjwq6xY5QRCGQiqhnaEqS2DYI/x9Hm/W8Waj+tXvJiO+
+/hHvNd36M9mwVTSfWMBziyg1aRtNbE0NJi7a5PJSYE67dnghNYkznJcXGT1m
+aiOdnTVHY4/WqueDeGMNX6oZl1HhtZ0x6ZV07l7TFkaGQnDqkwWBaua4jR3n
+5af558LIq/inSmK1Nq4cfGGcKh6rFzl5LVlVKoGdoSpLYAQgvhbq5PNjvdGK
+gH7V9ZSumTLtu/vaq3wmS/HE1vrpKfnU8+1zHdoilFVu93SPNO7LbRudZXfi
+3/Sa7qVhKm/0k8+5eM5bf3tgIONLJROG9Vbzd6eXiekNONrCKGF+gkqq1paV
+QyiMS8Vj7SJnVkssScW3MzRlCYwMkJoEH48o48pTV930vZp+0vK6FH//nVW6
+JWlZ1Q5Gw9bYGiZtqW/vb4+D1P609PPBNQTxjWWufnyB0eTRVjoHwOuLjS+V
+2BTy8Oy+1OIuTftwtKviTJ6A2tNVtIVRwtxBwIxa22WERBi3iseaRc60lliS
+SixMi9XKEhgxyB7E+foZ30rtqzqH8Qs370pO2ff9+m2ndDdL5e1lebvnPj/G
+ZWPWjRoJSvUncKxhwitrvSe6BkfFHz6RcSy/Tjow+ZNVxfkGHWo0eanCNjoH
+wRlrRFLxTSnbcyNcnxr1hJZRoz3j/6J4OKErjBqkBwEKam2TEVJh3Coe6xW5
+BbXEllR8O4PAuQmwGFRYsOW93YZPdepfrVsODWuYuHhr6I7Sbpx1Ck7pVJFK
+ta2wIcOOMsIpqTbVSc/gEBY5AOAga8xJSr3cOjhd01RdYg2bw5aKNVljbkry
+hRbCx2G5olNlVqrthA0t9pMRzki1sU46Boe0yAEAHwzp6OxfblYpxeVZ0ZPH
+vPDW3txykcXvb9OwhkrbhIiZO7tc0GlOqi2FDT32kBEOSbWpThalcr0sAQAA
+AAAAAAAAAAAAAAAAAAAAAAAAAIAqaFdRwppFfu6O3ssP3JXAhjKA1YGSAwDA
+HNK6jMN/ilAVUpc2d3IIvCIJWB0oOQAAzIIpe5WamavkVrTf6mKcHUABgFWg
+5ADKYAq7ua62I6n2heTOns9SKbSRZQ97SaW96LQ7hr7kAA6ANF86/su9HnOD
+CkMEhWkxwa+/W2h5P1mst/p49PwpDk+PdfRfd/SBdpt/VHQrm3+1HW/3LttJ
+1aFoyQ6bEa7bIowlqfhxsARp7cktK0ICpr7Mm7U6owGhJJUEQ6/7NXdX8A8V
+dFj6xqUtUskkOFBy5rCbkgPsC0Xrr1+uTKMwIcFkj5oEN2OcJ7DQrrr3XuL6
+AzfaEHlnyYEl45/12lOt2/qk925S+DcXTTqi2U6q7rcFp1f7O/D0t69kQSpx
+HBgiazi5/3wTou5tfTbsFSddax4yqWSYeo1JG/JP/9Em7zv+9DRUi5keLWyS
+SgbBgZIzi72UHGBnoB154b7rKO8XzKS1DQ7y1ssXW7RDQnI70mnS4kKR7jPs
+8aXw2RHqdpqckKoV3JS9Nelc/EzDdmkWSyWLAzNQuUS7qCSr3D476KCuGxCh
+VFJ5Jl7Lm/grXJ1cPfqYOi1gW4VpO9QBlG05a6OK8UNgo1TSDg6UHAW4U3LA
+cEIp+DnQbdl1/YpGuytOxob6B36d8FX4O948R98I/uD297RHH6k1Dd03V7nP
+0W8MgD3+LcRtUX6nUU3bUKq8MTM2tVJUZ9LKkyWp+HFgqlbzqagk5ePQpMrB
+pnEEUpl4TQ2SZgc2rjrKwYGSo6hW86ntSw4YTnQXhTnP/KHWsDqxzvMBLzpG
+qWc8iuas9yc4zM9s0V5Ik40+aW12cmqhyUU8iTX1p8KCL4I2Fhq0Xpbe/9bT
+Y0O50QTJZlKR+ozY9GopbptpdqQSxIGR2j6UXaWZcWuDXZ8Z7bhqsEkcvlRG
+XlOC5Nxky6qjExwoOUpqVVwpOWA4Ifx9Hm/W8WajGtTvzCK+/hHvNd0aMtno
+UzSfWMBziyg1acFMbE2FCq/tjEmvNLodi9QkznBeXmT0tKiNpHbWHI09Wque
+1uENGXakEsSBgVq9/4OJiza5vBSY046RSWXkNRkKwalPFgSqmeM2dpyXn+af
+CyOv6h8CbVx1lIMDJUdBLZdKTg+jkgPsDvG1UCefH+uNrur1K6endM2Uad/d
+116pM1lRJ7KG9Vbzd6eXiU0qSFa53dM90rg3tW2klt2Jf9NrupeGqbzRTz7n
+4jlv/e2B8ciGVMI40Fd7X6r/eU/Jp55vn+vAyKQy8poSJNdNtqw6HVSCAyVn
+Xi2XSg4YTiA1CT4eUcbVo66c6Xs1bZ7ldSn+/jurdMvKsqodjEafqTXk4dl9
+qcVdmqbXaFfFmTzBwONC4hvLXP34AqM5oO2kasFrM225VJI4MFGLSVvq2/u7
+7iC1Py39fHCBBV8qI68pQXJuslUq6QYHSo6KWu6UHDCskD2I8/Uzvh3aVzkO
+4xdu3pWcsu/79dtO6W54ytvL8nbPfX6My8asGzUSlOpP4FhTtudGuD416gkt
+o0Z7xv81MD5kVXG+QYcaTd6NsI3UQXCGjKVSSePARC0mvLLWe6JrcFT84RMZ
+x/LrpAMzYyKpDLymBsm5yUappB8cKDnzajlUcsDwAhUWbHlvt+GTmfpX3JZD
+zxomLt4auqO0G2e5AaQaQsMgiVQrCDMPp1IJJUcZOy45wB6RNeYkpV5uHZxy
+aSonsYbN0UfRmqwxNyX5QgvhU60gVQ/KBs1IZV0YJbiSSig5Gth3yQH2CIZ0
+dPYvGauU4vKs6MljXnhrb265yOJ3sOlZQ6VtQsTMDVqQStcgqVTWhdGAC6mE
+krOGWs6WHAAAAAAAAAAAAAAAAAAAAAAAAAAAgB2DdhUlrFnk5+7ovfzAXckI
+2rtkhDg+QtzEZST7DgB2jrQu4/CfIlSF1KXNnRxC8ALocGSEOD5C3MRlJPsO
+APYOpuxVaiaUklvRfquLcTabHKaMEMdHiJu4jGTfAYAUTGE36wiSO3s+S6XQ
+tHTYMfSO26QqRmx+VSPbd2DEgDRfOv7LvR5zBxcMERSmxQS//m4hC509pbUn
+t6wICZj6Mm/W6owG9QviqOhWNv9qO972WySaequPR8+f4vD0WEf/dUcf6G/5
+j3VX8A8VdBC+3EfJaxL7DGHJcR2KluywGeGG7efMOE4RrlcFR/OrxTAvHE0x
+AHAZReuvX65MozABw2SPmgQ3Y5wnsNB1WtZwcv/5JkTdufts2CtOui4wvXeT
+wr+5aNLSjJjee4nrD9xoQ+SdJQeWjH/Wa0+1dhsUTNqQf/qPNnnfYaGnoVps
+YpGi14T2mcKW41oUgtOr/R14ehtjmnOcqmGOVwVX86v7eZO8cC/FAMBp0I68
+cN91lPf8ZdKhBvdn5RLtGpCscvvsoIO6xjPY40vhsyPU/TApIW+9fLFFezSR
+3I50mrS4UKT5exN/hauTq0cfU6cFbKsw7rxJ1Wsi+8xhyXGtvKbsrUnn4mcO
+NmIz5zhVlRyvCu7mVyvPOC+4XjAzRSPFyractVHFsJ83YI8oBT8Hui27rl++
+aHfFydhQ/8CvE74Kf8eb5+gbwR/cwp72UYjUmgoVlaR8HJpUOdifDHv8W4jb
+ovxO4wFMbkdN981V7nOMmwSw4zVd+0PjuLwxMza1UlTHfgNru6kKlvRrYC2/
+hHkZ8hSTtSkBAG7TXRTmPPOHWsMBiXWeD3jRMUo9w1M0Z70/wWF+Zot24YDs
+KCStzU5OLTRZtCC0puwqzYxbG+z6zGjHVYP9yKT3v/X02FBuOhskUaX+VFjw
+RdDGQmptmOl6bca+TRxH6jNi06ultBtYU8GOqoIV/SoW80uWl6FOMZybAPtF
++Ps83qzjzUbDTr+7ivj6R7zXdCv/ZEchRfOJBTy3iFKTNsrE1tRg4qJNLi8F
+5rRrjwpITeIM5+VFOI/GkthBhdd2xqRXUr2TTddrcvu2cLyz5mjs0Vr15Jru
+gUshOPXJgkAjFkZe1T8q21NV4GG7/JLnZchTPMdt7DgvP7wUAwDHEV8LdfL5
+sd5oIUN/pPSUrpky7bv72vUVJncWiK3101Pyqefb5zq0A0dWud3TPdK4uTSZ
+Hay3mr87vUxMfeTR85q+fTMGdTB3vOxO/Jte0700TOWNfvI5F89562+bHDyZ
+Yk9VYbl+FvNrJi9DnWK4bgLsF6Qmwccjyni0qEfK9L2aVs3yuhR//51VuqV5
+WdUORkchY2uYtKW+vb/BC1L709LPB1dvxDeWufrxBTgPH+GrQh6e3Zda3KXp
+gY12VZzJE5h/0oqO10zsD4njWqzRwNqeqsJS/SzndwC8vAx1iuHcBNgxsgdx
+vn7Gd4D7RorD+IWbdyWn7Pt+/bZTupvG8vayvN1znx/jsjHrRo0EpfoTONYw
+4ZW13hNdg6PiD5/IOJZfJx2Ys8qq4nyDDjXivQiCY0fZnhvh+tSoJ7SMGu0Z
+/xeVQwtVr5nat7rjg1jj3GRPVWGRftbzOwhOXoY8xXBuAuwZVFiw5b3dhk+i
+6q8wWA4Na5i4eGvojtJu3OUVNlVZ32t6BofMcYrYT1Xgw7X8qriXYgDgPrLG
+nKTUy62Ds0zNSEmsYfMoRMWarDE3JflCC9FTvOyqsrbXdAwOreMUsZOqIPke
+Z/Kr4miKAYD7YEhHZ/9Cv0opLs+Knjzmhbf25paLLH7nnIY1VNomRIjmxuyq
+0mI1r+kZHHrHKcL5qjADR/Kr4nCKAQAAAAAAAAAAAAAAAAAAAAAAAAAAAGCk
+g3YVJaxZ5Ofu6L38wF0JbIIDDAVQdQAAkCKtyzj8pwhVIXVpcyeHwGudwFAA
+VQcAADmYslepmbZKbkX7rS6muPcqAFgCVB1ADUxhNxfVdiTVvpDc2fNZKoWu
+uOwBqQSGvuoAW4M0Xzr+y70ec4MfQwSFaTHBr79baHGHU/Xmz8ej509xeHqs
+o/+6ow+03QlQ0a1s/tV2kn3TbCBVJa09uWVFSMDUl3mzVmc0IOzpxA8CCyha
+ssNmhOt2YDOvlrIpDVh3Bf9QQYelb4lCKoeLVC12UXWAHaFo/fXLlWkUZiOY
+7FGT4GaM8wQWum/33ktcf+BGGyLvLDmwZPyzXnuqddu19N5NCv/mokkjN9tJ
+lTWc3H++CVF3uD4b9oqTrukPCzqJg2AZCsHp1f4OPP3dQcnU0jOFSRvyT//R
+Ju87+PQ0VIuZHioglcNGqu7n7aDqAHsC7cgL911HeY9jJp16cJC3Xr7Yoh0S
+ktuRTpMWF4p0n2GPL4XPjlC3AOWEVBUql2iXk2SV22cHHdS1BbJYJ1kQLEDe
+lL016Vz8TMNudIRq6ZmSN/FXuDq5evQxdVrAtgqSRrTKtpy1UcX4UYBUDiOp
+/WY5UnXAsEEp+DnQbdl1/YpGuytOxob6B36d8FX4O948R98I/uCW/bSPEqTW
+NHTfXOU+R7+fAfb4txC3RfmdRgVtY6moqCTl49CkysEGeCzpxA8CU6nyxszY
+1EpRnUmnVAK1TExRg6RBA6RymEnlTtUBw4buojDnmT/UGlYn1nk+4EXHKPV0
+R9Gc9f4Eh/mZLdqraLKjhLQ2Ozm10OQKnsSa+lNhwRdBGwsN2kVL73/r6bGh
+3Gh2ZEupyq7SzLi1wa7PjHZcNdjwjh2dBEFgJBWpz4hNr5bidvHGV8vIFCVI
+zk2QymEllUtVBwwbhL/P48063mxUg/rdZMTXP+K9plvuJjtKKJpPLOC5RZSa
+tI0mtqZChdd2xqRXGt2ORWoSZzgvLzJ6VNTGUlXqDjxFm1xeCsxpx9jUSRAE
+BlI7a47GHq1VTz/xhja+WkamyFAITn2yIFDNHLex47z8NP9cGHlV/xAIqRxG
+UjlWdXoYVR1gX4ivhTr5/FhvdFWvXzY9pWumTPvuvnZRgcnKP5E1rLeavzu9
+TGxSPrLK7Z7ukcYttW0pVUdPyaeeb5/rwNjTSRgE+lLL7sS/6TXdS8NU3ugn
+n3PxnLf+9sDhBV8tI1OUILluglQOH6kcqzpg2IDUJPh4RBmXjrpspu/VdKeW
+16X4+++s0q1Ty6p2MDpKmFpDHp7dl1rcpenhjXZVnMkTDDwuJL6xzNWPLzCa
+A9pKKiZtqW/v772D1P609PPB1RXLdZIEgYnUAfC6eOOrZWSKEiTnJkjlcJI6
+ABeqDhg+yB7E+foZ3w7tKxuH8Qs370pO2ff9+m2ndHdQ5e1lebvnPj/GZWPW
+jRoJSvUncKwp23MjXJ8a9YSWUaM94/8aGB+yqjjfoEONJi9G2EYqJryy1nui
+a3BU/OETGcfy66QDc01LdZIGgYnUQXCGNpFaBqaoQXJuglQOI6mDcKHqgGEE
+KizY8t5uw8cy9S+3LYeeNUxcvDV0R2k3znIDp6TaVCdtgyRqraDNPJBKZgbt
+SKqKe1UH2B2yxpyk1Mutg1MuTdkk1rB5lKBoTdaYm5J8oYXwqVauSLWxTpoG
+zahlXRslIJW0DdqRVBVHqw6wOzCko7N/dVulFJdnRU8e88Jbe3PLRRa/gE3P
+GiptEyJmbtByQapNddI2SKqWdW00gFQOV6nm1Nqy6gAAAAAAAAAAAAAAAAAA
+AAAAAAAAAACrg3YVJaxZ5Ofu6L38wF2JpXussGsNsCFQGAAA2A5pXcbhP0Wo
+CqlLmzs5hOBdVRtZA2wIFAYAADYEU/YqNbNYya1ov9XFOJti2s4aYEOgMACA
+JpjCblYE7Eiq5M6ez1Ip9IG1hTUq2FGo7Uiqyv4LAwAsAGm+dPyXez3mRiyG
+CArTYoJff7fQ4g6k6p2Qj0fPn+Lw9FhH/3VHH2i36kdFt7L5V9vxtt+ynVSV
+tPbklhUhAVNf5s1andGAUNJJzc6A3O4K/qGCDiYvISpassNmhBs2dGNuTR+o
+CioYxn9EFAYADA2K1l+/XJlGYSqFyR41CW7GOE9goTt2773E9QdutCHyzpID
+S8Y/67WnWjcie+8mhX9z0aSrme2kyhpO7j/fhKibjJ8Ne8VJ1wGHTCcdO31i
+pQ35p/9ok/cd2XoaqsW0jhwKwenV/g48vV0xLbGmbxiqggqm8R/uhQEAQwTa
+kRfuu47yhr9MOungIG+9fLFFe9yR3I50mrS4UKT7DHt8KXx2hLofJiekqlC5
+RLsGJKvcPjvooK5HDqFOenbkTfwVrk6uHn1MnRawrcK0Qygx8qbsrUnn4mcO
+dmGzxJq+VqgKSoJN4k8qlQCuFYayLWdtVDFsAQ7YFqXg50C3Zdf1CxHtrjgZ
+G+of+HXCV+HvePMcfSP4g/vX0x7apNY0dN9c5T5Hf3N/7PFvIW6L8juNxraN
+paKikpSPQ5MqB7u+EeikbYepKnljZmxqpaiO/e7VUBVUrBHG384Lg6y5CQAM
+Fd1FYc4zf6g13CsY6zwf8KJjlHrmp2jOen+Cw/zMFu0SANnQltZmJ6cWmixm
+kFhTfyos+CJoY6FB72Tp/W89PTaUG03tbClV2VWaGbc22PWZ0Y6rBru84euk
+b8cM+NaQ+ozY9Gop7e7VVICqMG+NLP72XRhwbgK4gPD3ebxZx5uNBoN+axXx
+9Y94rw2sgZMMbUXziQU8t4hSkx7KxNZUqPDazpj0yl7DGSZSkzjDeXmR0XOu
+NpaqUrejKdrk8lJgTjtGppO+HXPgWOusORp7tFY9TaZ7CFIITn2yINCIhZFX
+9c8DUBXmrJHH384LY47b2HFefniFAQBDhvhaqJPPj/VGPVb0a76ndM2Uad/d
+1640MFmuJ7KG9Vbzd6eXiU1qX1a53dM90ri/tC2l6ugp+dTz7XMdGJlO+nbo
+qyq7E/+m13QvDVN5o598zsVz3vrbJgdVpkBVmLFmJv72XRhw3QRwAaQmwccj
+yngUqWt++l5Nq2Z5XYq//84q3bK4rGoHo6Ftag15eHZfanGXpsc22lVxJk8w
+8Oys+MYyVz++wGgubCupmLSlvr2/EQ1S+9PSzweXXPB10rfDRNUA1uheDVVB
+0ZoKP/72XRhwbgI4gexBnK+f/j1nNX017zB+4eZdySn7vl+/7ZTuhq28vSxv
+99znx7hszLpRI0Gp/gSONWV7boTrU6Oe0DJqtGf8XwMHIVlVnG/QoUaTd0Rs
+IxUTXlnrPdE1OCr+8ImMY/l10oE5LZFOunaYqBrEGucmqAoq1vrBib+dFwac
+mwBugAoLtry32/CZUv21AsuhZw0TF28N3VHajTNCOSWVRKdtA8gKnAq1yn6q
+QjXcCwMAhhJZY05S6uXWwamnpuYTa9gcQRStyRpzU5IvtMiJP+eGVDM6bRdA
+9uBKqFX2UxWqEVEYADCUYEhHZ/+St0opLs+Knjzmhbf25paLLH57nJ41VNom
+RMysaXBBKqlOWwaQXbgQapX9VIU5qcOnMAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AADbgHYVJaxZ5Ofu6L38wF2JpRuvcNnaMIPLoYbEkcPlaEPuAG4grcs4/KcI
+VSF1aXMnh1j6KiGXrQ0zuBxqSBw5XI425A7gCJiyV6mZG0luRfutLsbZd3O4
+WBtmcDnUkDhyuBxtyN0IAFPY0/Ww5M6ez1IpNEW1f2tUsKPccTnUkDhyuBzt
+oc8dYAFI86Xjv9zrMVf9GCIoTIsJfv3dQsvbhmK91cej509xeHqso/+6ow+0
+/RBQ0a1s/tV2vJ3I6Jrq/6i7gn+ooIPWm4nS2pNbVoQETH2ZN2t1RoP+O/dM
+rGlRtGSHzQg37EDH3Jo+NsgdToggcbSxReK0GDoFuQM4iqL11y9XplGYSGCy
+R02CmzHOE1hoad17L3H9gRttiLyz5MCS8c967anW1WPv3aTwby6aNHhjYAqT
+NuSf/qNN3jf6ehqqxdQsyhpO7j/fhKg7U58Ne8VpsL0OI2taFILTq/0deHob
+b1piTd+wLXJHECJIHB3Dtkic7rdNnILcARwE7cgL911HebdiJu1vcJC3Xr7Y
+oq1mye1Ip0mLC0W6z7DHl8JnR6ibeVpkSt7EX+Hq5OrRx9RpAdsqTJuQ4oLK
+JdrVE1nl9tlBB7WdgRha0343e2vSufiZg43eaFhTtuWsjSrGT49tckcUIkic
+ARxMnAZTp9RA7gCuoRT8HOi27Lr+KEG7K07GhvoHfp3wVfg73jxH3wj+4Ob7
+tIcJqTUN3TdXuc/Rb3KAPf4txG1RfqfxOGFgirEwVFSS8nFoUqWUxAI1a/LG
+zNjUSlEd+w2ybZw70xBB4vTgZuIInYLcARyjuyjMeeYPtYaFhXWeD3jRMUo9
+i1I0Z70/wWF+Zov2AphsmEhrs5NTC00WBkisqT8VFnwRtLHQoPGz9P63nh4b
+yk0nNvRNkUFoTdlVmhm3Ntj1mdGOqyg3esO3htRnxKZXS2k3yB6A5BBny9zh
+hwgSNwgXE0fmFOQO4BbC3+fxZh1vNioF/b4w4usf8V4bWAEmGSaK5hMLeG4R
+pSYNoImtqVDhtZ0x6ZW9hpWN1CTOcF5ehPOUJ21TpJBYU6n78BRtcnkpMKed
+QYNsrbXOmqOxR2vVUzm6w0QhOPXJgkA1c9zGjvPy0/xzYeRV/WOAjXOnMg0R
+JI7LiSN3CnKnlzs9jHIHDBnia6FOPj/WG12Q62e8p3TNlGnf3ddeZzNZ+iay
+hvVW83enl4lNMi+r3O7pHmncZ5uRKUbCdPSUfOr59rkOBsOk31rZnfg3vaZ7
+aZjKG/3kcy6e89bfNjmMkEIy/bZl7nQYhggSNwjnEmfGKcgdwC2QmgQfjyjj
+ilRnfPpeTT9seV2Kv//OKt2isKxqB6NhYmoNeXh2X2pxl6YxNtpVcSZPMPDk
+qPjGMlc/vgDnup62KdrCMGlLfXt/Bx6k9qeln1NeXiAJmso6DbJtlTviEEHi
+BuFg4gbAcwpyB3AM2YM4Xz/jO5l9GXcYv3DzruSUfd+v33ZKd7tS3l6Wt3vu
+82NcNmbdqJGgVH8Cx5qyPTfC9alRT2gZNdoz/q+B0pZVxfkGHWrEe9+Crina
+wjDhlbXeE12Do+IPn8g4ll8npT4pJAhaP9Y4xNkod8QhgsTpwb3EDYLjFOQO
+4ByosGDLe7sNn6jUv1K2HHrWMHHx1tAdpd249WlLYUNrjRKcyh0kjjqcSpwK
+cgdwFVljTlLq5dbBaZwm44k1bNYPRWuyxtyU5AstRA+k2k7YUFujCldyB4mj
+CVcSp4LcAZwGQzo6+xd8VUpxeVb05DEvvLU3t1xk8bvT9Kyh0jYhQnRFb0th
+Q2uNHlzIHSSOAVxInApyBwAAAAAAAAAAAAAAAAAAAAAAAAAAAFgDtKsoYc0i
+P3dH7+UH7kos3SGFXWuAbYHaAADARkjrMg7/KUJVSF3a3MkhBO9r2sgaYFug
+NgAAsBWYslepmcJKbkX7rS7G2W7TdtYA2wK1AQCUwRSwFmAVJHf2fJZKoReq
+LaxRAQrDeth7bQAAI5DmS8d/uddj7siCIYLCtJjg198ttLwFJ9ZbfTx6/hSH
+p8c6+q87+kC7yz4qupXNv9qOt6sXHan4xi1BWntyy4qQgKkv82atzmhAKEml
+ZmdAc3cF/1BBB5NXCBUt2WEzwg1bxTG3pg8UBkUMUzAiagMArI2i9dcvV6ZR
+mERhskdNgpsxzhNYaA/dey9x/YEbbYi8s+TAkvHPeu2p1o3F3rtJ4d9cNGmW
+RkcqsXGGyBpO7j/fhKgbbZ8Ne8VJ13GGTCodO32hlTbkn/6jTd53WOtpqBbT
+OmwoBKdX+zvw9Pa0tMSavmEoDIqYpmC41wYAWB20Iy/cdx3lvXqZtJLBQd56
++WKL9rgguR3pNGlxoUj3Gfb4UvjsCHUrS4ZSyYwzA5VLtMtVssrts4MO6lrv
+EEqlZ0fexF/h6uTq0cfUaQHbKkx7jxIjb8remnQufuZgDzVLrOlrhcKgqtkk
+BaRqCbCn2gAA66MU/Bzotuy6/rBGuytOxob6B36d8FX4O948R98I/uDW87QP
+QaTWNHTfXOU+R79hAPb4txC3RfmdRqOarlR845aoRUUlKR+HJlUO9kIjkErb
+DlNV8sbM2NRKUR37vaehMCiqJUzB8K0NABgCuovCnGf+UGs4RLHO8wEvOkap
+53yK5qz3JzjMz2zRXvyTHYKktdnJqYUmyxgk1tSfCgu+CNpYaND2WHr/W0+P
+DeVGkzq6UgmMM1Wr7CrNjFsb7PrMaMdVg73P8KXSt2MGfGtIfUZserWUdu9p
+KkBhUFJLloJhWxsAMAQIf5/Hm3W82WgY6HdFEV//iPfawOo3ySFI0XxiAc8t
+otSk/TGxNRUqvLYzJr3S6J40UpM4w3l5kdETrnSlEhi3QK1K3eimaJPLS4E5
+7RiZVPp2zIFjrbPmaOzRWvUcme7xRyE49cmCQCMWRl7VP1RDYVBQS56CYVsb
+ADAEiK+FOvn8WG+0tKFf7T2la6ZM++6+do2ByW0FImtYbzV/d3qZ2KTqZZXb
+Pd0jjXtW05NKaJypWh09JZ96vn2uAyOTSt8OfVVld+Lf9JrupWEqb/STz7l4
+zlt/2+SIyhQoDPNqzaRg2NYGAAwBSE2Cj0eU8fhRV/v0vZouy/K6FH//nVW6
+BXFZ1Q5GhyBTa8jDs/tSi7s0TabRroozeYKBZ6bEN5a5+vEFRhNhOlJJjDNR
+i0lb6tv7W9wgtT8t/XxwvQVfKn07TFQNYI3e01AY1NRqwUvBsK0NABgKZA/i
+fP2M7wn3VbvD+IWbdyWn7Pt+/bZTulu18vayvN1znx/jsjHrRo0EpfoTONaU
+7bkRrk+NekLLqNGe8X8NHCRkVXG+QYcaTd4OoSqV1DgTtZjwylrvia7BUfGH
+T2Qcy6+TDkxoiaTStcNE1SBWOf5AYZhXOwhOCoZxbQDAUIAKC7a8t9vwaVL9
+VQLLoWcNExdvDd1R2o0zNq0vlZ5BEqm2jSErQGEYwpraYVAbADA0yBpzklIv
+tw7OOzXVnljD5tihaE3WmJuSfKGF8NFeK0ulY9CMVNvFkD2gMPRgUe1wqA0A
+GBowpKOzf7FbpRSXZ0VPHvPCW3tzy0UWvzdOzxoqbRMiZlYzrCaVnkFSqbaM
+IbtAYbCtdvjUBgAAAAAAAAAAAAAAAAAAAAAAAAAAAMActKsoYc0iP3dH7+UH
+7kpG0OYpI9ZxwFZAyQEAZaR1GYf/FKEqpC5t7uSQS0Jb6xkyRqzjgK2AkgMA
+6mDKXqVmAie5Fe23uhhn78xhyoh1HLAVUHKAPYMpbHOpL7mz57NUCm1Yhx1D
+77itUswAO5JqR4zYsQZwDKT50vFf7vWYG+QYIihMiwl+/d1Ci1tvq7eDPh49
+f4rD02Md/dcdfaDtV4CKbmXzr7bj7EGGdVfwDxV0EL5dSM0Fae3JLStCAqa+
+zJu1OqOBpTfpFS3ZYTPCdVuWEbtA25QGc45TxA5SbEOpOIXBls6RW3IAYCGK
+1l+/XJlGYY6EyR41CW7GOE+wvPW2qvde4voDN9oQeWfJgSXjn/XaU60btb13
+k8K/uWjY2g2TNuSf/qNN3jcMexqqxSaDhqILsoaT+8839f2Qsu1s2CtOBk1z
+GKMQnF7t78DT304TzwVmpsw5TtUw91NsU6kEhcGCzhFbcgBgKWhHXrjvOsr7
+FDNp04ODvPXyxRbtoUpyO9Jp0uJCke4z7PGl8NkR6jaeuv/cxF/h6uTq0cfU
+aQHbKowbiVJ2AZVLtAtAssrts4MOGrf8YeJIU/bWpHPxMw3bt5m4wMyUOcf1
+ULblrI0qxg+BHaTYtlIJC8NyncO45ADAqigFPwe6LbuuP8jQ7oqTsaH+gV8n
+fBX+jjfP0TeCP7jtPu2jAak1Dd03V7nP0e9wgD3+LcRtUX4nxWFG1wUVKipJ
++Tg0qVJqaoumC/LGzNjUSlGdSWtRIhcYmKIYhKZjby/Cf6zKjlJsY6mmhcGS
+zmFZcgBgVbqLwpxn/lBrOJvDOs8HvOgYpZ6EKZqz3p/gMD+zRXttT3Y0kNZm
+J6cWmqwrkFhTfyos+CJoY6FBy2fp/W89PTaUU5yz0XNB2VWaGbc22PWZ0Y6r
+TNu30XIBqc+ITa+W4ra9JnSBvilKkJyb7CjFtpSKXxhs6BymJQcAVkX4+zze
+rOPNRiNDvyOM+PpHvNcG1slJjgaK5hMLeG4RpSYr6sTWVKjw2s6Y9Mpew8ke
+UpM4w3l5EcUHWOm6oAYTF21yeSkwp93wh+m40FlzNPZorXoGije6iV2gbYoM
+heDUJwsC1cxxGzvOy0/zz4WRV/XPA3aUYhtLVZkWBjs68Swz0MmxktPDqOQA
+wHLE10KdfH40XgXXL+ae0jVTpn13X7sawWSFn8ga1lvN351eJjYpalnldk/3
+SOMm22y50E9Pyaeeb5/roDigTK2V3Yl/02u6l4apvNFPPufiOW/97YEjDLEL
+tE1RguS6yY5SbEupOgwLgx2deJbp6+RYyQGAVUFqEnw8oowLWl3M0/dq+lXL
+61L8/XdW6ZbOZVU7GB0NTK0hD8/uSy3u0jTwRrsqzuQJBp6vFd9Y5urHF1B8
+RIi6C5i0pb69v68OUvvT0s9NF1jouaAFr+01sQu0TVGC5NxkRym2lVTiwrBU
+5zAuOQCwLrIHcb5++rep1fQVs8P4hZt3Jafs+379tlO6m7ry9rK83XOfH+Oy
+MetGjQSl+hM41pTtuRGuT416Qsuo0Z7xfw0ct2RVcb5Bhxopv65B1QVMeGWt
+90TX4Kj4wycyjuXXSamvQhAEpB+c0U3iAl1T1CA5N9lTim0jlbgwLNU5nEsO
+AKwMKizY8t5uw4dF9RcBLIeeNUxcvDV0R2k3jeVru3KBXWGUsKP4cEqqvehU
+ca/kAIAVZI05SamXWwdngZpiTqxhc5RRtCZrzE1JvtBC+y0Q+3GBXWFUsZ/4
+cEaqvehUcbTkAIAVMKSjs39ZXKUUl2dFTx7zwlt7c8tFFr8WTs8aKm0TIgwf
++LEHF9gVRg97iA+HpNqLTnNSbVlyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAMZ9CuooQ1i/zcHb2XH7grGUFbfY1YxwEbAlUHANSQ1mUc/lOEqpC6tLmT
+Qwj2SxiOjFjHARuCV3WYuOL0hUb9LShM/4KLvD595XZoHAUMUzBlr1Ize5Pc
+ivZbXUxxR/NhwIh1HLAh+FUnb8rasO+2/lYVpn8xRV5/aGkU1R4EAGAAprCb
+i3bJnT2fpVJo8D3sGHrH7agqACthXHWS8n+uPGKw66DpX4xQNB59N+KaiPg/
+ACMLpPnS8V/u9Zg7uGCIoDAtJvj1dwst7oKt7ql2csuKkICpL/Nmrc5oUO+n
+gopuZfOvtlPe47VfU2/18ej5UxyeHuvov+7oA/02QVh3Bf9QQQfhu/DUvDbV
+yQKKluywGeG6DTYZOY5vSoM5xylig6rAz6b5+FCSSlIqDGFSwyOq6qR3/7F4
+p0G3X9O/GKBs4od+doWFwwswHFC0/vrlyjQKc2xM9qhJcDPGeQLNrgR4yBpO
+7j/f1DfmlG1nw15x0nVh672bFP7NRZMmoMT03ktcf+BGGyLvLDmwZPyzXnuq
+teMYkzbkn/6jrW+GhvY0VItNLFL0mkCnZSgEp1f7O/D0N3+m7TihKXOOUzVs
+i6ogzCZpfChKJTbOEAY1POKqTnhp6VzDQJv+RQ+lIOv9VZeFcAUO9IF25IX7
+rqO8RT6Tbm64PyuXaNeAZJXbZwcd1PVpwx5fCp8doW4fTQl56+WLLdo6l9yO
+dJq0uFCzHCBv4q9wdXL16GPqtIBtJndWKXtNpNMC5E3ZW5POxc80bDZK03Ei
+U+Yc10PZlrM2qhg/BLapCqJsqiGMD1WpZMaZQbuGR2DVScqiZ7xt0OvX9C+D
+oK3/++HKi51wagJU6onKz4Fuy67rDxe0u+JkbKh/4NcJX4W/481z9I3gD3Z8
+oX0UIrWmQkUlKR+HJuld42OPfwtxW5RvUp/kdtR031zlPse4pw47XuPoZOq1
+vDEzNrVSVGfSCJu+44SmqEHS8snGVaHGJJsE8aGdSlzjlqilXMMjsepkD/41
+09ug/6/pXwZ/9FFO2MfnqTYGBoY53UVhzjN/qDUcpVjn+YAXHaPU0ylFc9b7
+ExzmZ7Zor9LJjkLS2uzk1EKTFQJCa8qu0sy4tcGuz4x2XDXYD1R6/1tPjw3l
+phN+ElXqT4UFXwRtLOyiVNj0vMbXychrpD4jNr1aqpLXmw5tmo6TmaIEybnJ
+llXR/ylONvHjQ1cqgXGmaunU8EisOnndfh+XFfrPi5r+ZeAX2/M+XpbziHKX
+SGB4I/x9Hm/W8WajGtdvRia+/hHvtYEVb5KjkKL5xAKeW0Spydo4sTU1mLho
+k8tLgQNX+UhN4gzn5XgPkZLYQYXXdsakV1K9vU3XazydDLzurDkae7RWPf3E
+G9q0HCc3RYZCcOqTBYFq5riNHeflp/nnwsir+odqG1cFfjbx40M7laSlYtUa
+HolVp2j46XWn966Jyf6ic7Xzt5X//b+tcGoC+hFfC3Xy+dF4PVu/LHtK10yZ
+NnANzuTOArG1fnpKPvV8+5zuUl5Wud3TPfK2hLodrLeavzu9TEx9LYCu13g6
+zWFqrexO/Jte0700TOWNfvI5F895628PHF7oOG7GFCVIrptsWRWE2cSPDz2p
+9EvFjEEdVGp4JFadvC7Fx3lZUTfZX/rBHl9a9cGpFqbP7gDDDqQmwccjyrg0
+1WU5fe9f6rLsKyV//51VukVwWdUORkchY2uYtKW+vb8fGlL709LPB1ctxDeW
+ufrxBTg1iq8KeXh2X2pxl2a6hXZVnMkTmH/8irrXxDqZeD2AovHQ31yMpp10
+HScxRQmSc5OtqoI0m/jxoSOVSamQGKRbwyOx6pDqPT6em/UfyTH9i/bnClaH
+8o0vKoGRjOxBnK+f8W3hvrJ0GL9w867klH3fr992Snd7Vt5elrd77vNjXDZm
+3aiRUL74xrGGCa+s9Z7oGhwVf/hExrH8OunAtFBWFecbdKgR760LHDvK9twI
+16dGPaFl1GjP+L+oHG+oek2sk4nXg+AMbXqOk5qiBsm5yUZVQZpNovhQlcq0
+VAgN0q/hEVh1vXe+mhGY2YKS/UWD6Nrn7x17yOxlK2CYggoLtry323Aeo385
+bzk0rGHi4q2hO0rxdzVhUxWnvFYNoeMUsaP4WF8qPYM2lcq1qhMVfvDG1wYO
+m/5Fjbgocmk65QcngRGDrDEnKfVy62BlaMoysYbN8ULFmqwxNyX5QgtRhbKr
+ijNeq4bacYrYT3ysLZWOQRtL5VjVIdWJIRsM3hw2/YuanpKYJQfr4NQE4IAh
+HZ39C9wqpbg8K3rymBfe2ptbLrJ4/ZeGNVTaJkSIli/YVaWFC16rbOE4Rewh
+PtaWSs+gTaVyruqQmoNhu+72kv5FjeTWpsX7h3ruBQAAAIxA0M4/tsVe0H+M
+w/QvGiTlsYsTHozAHZkBAACAoQXrvnPiaEkXSvaXfqT3d34YXwWnJgAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHsA7SpKWLPIz93Re/mBu5Jh2BFs
+eDs4vL1TjQAHAQDAQ1qXcfhPEapC6tLmTg4h2DTUnhneDg5v71T4DmLiitMX
+Gs2+SiOvT1+5nayfPQAA3AVT9io1k1HJrWi/1XiNLO2c4e3g8PZOReSgvClr
+w77b+Lub6pDXH1oahdduDwAAimAK2y9VSO7s+Sy1Zhi/1j28HRze3qlMHZSU
+/3PlEbItrxWNR9+NuCYaAmkAwH2Q5kvHf7nXQ/lMgyGCwrSY4NffLaTV0I0h
+qOhWNv9qO053Fay7gn+ooMPMbpD0vMN6q49Hz5/i8PRYR/91Rx9QbbRuCUPr
+oEpae3LLipCAqS/zZq3OaLD6HpdD7J0WRUt22IxwBo2l6EPPQendfyzeWSk1
+/c/9KJv4oZ9dGYphBQBcR9H665cr0+jMXTHZoybBzRjnCTSbjTKn925S+DcX
+Ow0GOSZtyD/9R1vfFBTtaagWExzh6HrXey9x/YEbbYi8s+TAkvHPeu2pHpIN
+iofOQVnDyf3nm/qcUradDXvF6VOTjgFWYOi8031NcHq1vwOPSdNDRtBxUHhp
+6VzCqlIKst5fdVlo+/UIALA1aEdeuO86+mNYVvVPs42wlW05a6OKWTk8YI8v
+hc+OuCoaGLTyJv4KVydXjz6mTgvYRnDrmLZ38tbLF1u0xw3J7UinSYsLSZZX
+7NBBFSqXaJdiZZXbZwcdrCdcX7JH77TGs7cmnYuf6Wzm3GQbByVl0TPezmnH
+Pf2grf/74cqLnXBqAgCl4OdAt2XXcccn2l1xMjbUP/DrhK/C3/HmOfpG8Adb
+I1M6N5H03Tb4nTvZ+xIOneCn71n332EfRF/FmzZij38LcVuUT2/YMvZOQ/fN
+Ve5zjJtYG9q3XwdRUUnKx6FJxItLduudvDEzNrVSVPejj9lzk00clD3410zv
+7+7jBR59lBP28fkOODUBgKq7KMx55g+1BMdfrPN8wIuOUerpoKI56/0JDvMz
+W7RrE2ydm9DHv2+ev+TgX+rjirw22fvlt84+MtnHXo30/reeHhvKaT1ay9g7
+9afCgi+CNhZ2kR0o7NVBZVdpZtzaYNdnRjuuyjVpaKPDLr1D6jNi06ulKnk9
+O+cm9h2U1+33cVmB92gi1p738bIcfPMAMMIQ/j6PN+t4M9HhSdMZOalWs8gl
+vv4R77WB2xMk5yaF4NQnCwLVzHEbO87LT/PPhZFX8Q7z3SXRbq6R/UaVzcff
+4AWcbMEXg9QkznBeTu/ZWsbeqVDhtZ0x6ZX4T0IMBwdV6tdtija5vBRovLxk
+z9511hyNPVqrOY8Qn5ts7KCi4afXnd67ZqoM6/xt5X//byucmgCgD/G1UCef
+HwnvOegP/57SNVOmDaxFsHPd1FOy6tVJoVc1t3TQtl/m8f6W/hDneSfND1Zu
+93SPvC0h98cQht5hvdX83ellYrNrK/bq4KC6Tz3fPke0hmR/3pXdiX/Ta7qX
+hqm80U8+5+I5b/1twoc9bOOgvC7Fx3mZ6UkMe3xp1QenCM58ADDSQGoSfDyi
+CEeUevhP3/uXevj3DSl//50DDSJlVTtYODd15geOfS7ghHpqLHvwfwMmzUgm
+WsFRiW8sc/XjC8wPXaXwZvb/3upS/0dG3iEPz+5LLe5vkIl2VZzJExA+qWeP
+DmLSlvp2RHM6Qmp/Wvq5JWt63PNuAEXjob+5WLymZw0Hkeo9Pp6bTZ/+6CpY
+HconvEgEgJGG7EGcrx/hDf++4e8wfuHmXckp+75fv+2U7l66vL0sb/fc58e4
+bMy6USMhXIQwP/YVrWc+nT722clvr/l+z7bZE6bFETZHllXF+QYdaiSYtBpo
+Llzh6rqiQLNCQ9s7ZXtuhOtTo57QMmq0Z/xfxA+R26GDmPDKWu+JrsFR8YdP
+ZBzLr5MSXxzaoXd60lg5N1nDwd47X80IzGwxHjWia5+/d4zoogwARiCosGDL
+e7sJHuLVXzaxLqJr4U7uW4h2EcPExVtDd5SSb/aCB0e8Uw13B4e3dyo2HRQV
+fvDG1yaGxEWRS9PJngkFgBGIrDEnKfVyK87A0Az/xBrrD//um2ucXdbdwl++
+kTXmpiRfaGE4cDngnWq4Ozi8vVOx6SBSnRiyweSF556SmCUH6+DUBADGYEhH
+J2I061OKy7OiJ4954a29ueUi662DY70N17O2+Y192u2734V4P4NK24TG2mj+
+hO28Uw13B4e3dyq2HURqDobtumt81SS5tWnx/qE5ywIAAACAAWjnH9tiL5g8
+fSIpj12c8GAY73gLAAAAcBWs+86JoyVdJs8OSe/v/DCe8CkLAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAACsA9pVlLBmkZ+7o/fyA3cl0N/NBsgf
+Hlv25r8q4Wlqi+FgJK06vjjo70hB1njhdIX5ng0WfmVEI63LOPynCFUhdWlz
+J4f07wCKiStOX2gkL3jTOEPkGYFJqn7eG+c3ezscYSyEk5HEG18swUl/RwZY
+9+19GzKb6Gy2xeArIx1M2avUnE8kt6L9Vuvaksqbsjbsu024h6dpnCHyzECF
+RYdP3Gv+fYkfHGEsg6ORxB9fLMBRf0cE8oYjK/9ZTqspG4OvMAFTDMOLA8md
+PZ+l1gwWuaT8nyuPEGwQbRrnIYq8WewsNXJB3qH/14Sougq4eISxp2ByO5Iq
+0/FlIZz3dzgjrdy55B93peb/I/lXsN7q49Hzpzg8PdbRf93RB/jNxlVI86Xj
+v9zrMTcUMURQmBYT/Pq7haS9BWmhaMkOmxGua7iDim5l86+2W7WdjeEvasC6
+K/iHCjoM9juT3v3H4p2VeAkwjTODZHE4NfjCLEwNKryasG7TviOH9321LvGa
+ULOBj6w68YPFS5YuXRoSMGGce/DqQ/WMtz3lbDBV0tqTW1aEBEx9mTdrdUaD
+2sHhEEl6X8QbX5Sxsr8AXWTVu+e+S291Fu8rvfcS1x+40YbIO0sOLBn/rNee
+atMcKlp//XJlGoUpDSZ71CS4GeM8wUzfWxooBKdX+zvw9JvB9d5NCv/mYqe1
+9pg2/UVM2pB/+o+2vksktKehWjzww8JLS+fixcs0zgySxeHUEAtjnhq0I+/j
+aX/Pbu37qrLl1IJp4ec79LeXExV+ELDDktkvZ4Mpazi5/3zf/F6lbDsb9orT
+p9ouGfYdSXpfJBpf1LC2vwBd0EdngmasL6OzSIT3FXnr5Yst2hKR3I50mrS4
+UGT8tY68cN915I1C9ZBV/dNsT3bKyJuytyadi5/pbNCoFHt8KXx2xFWRNRZU
+TH9R3sRf4erk6tHH1GkB2/Sav0nKome8ndNuLMM0zgySxeHUkAljmhplc4bf
+pFlH+tu7KhrTfCYF/KzfxpzCEUbZlrM2qpggFpwNpgqVS7Qrg7LK7bODDtZr
+V4ntOJL0vkg8vijBgr8Au0jvfuM5cyet7fPNfaX75ir3OSaNrpWCnwPdll3X
+r1S0u+JkbKh/4NcJX4W/481z9I3gD/a9pj1mia3JGzNjUytFdT/6GJ6b+sbt
+byFui/I7GZ6cGPwiLrIH/5rp/d1945U60zgzSJYhnEsNoTDC1CCCSykr5r7x
+2ZFDCZtXBLp4hv+7KOfg9qgPfZ3f2Fgg7Lr+4cTxA0e5rivBL05aVkTvtrj5
+RupEmvu/bttgoqKSlI9Dk/SWiO02kkzKhgyr+wuwi/jGR5Nn7qfVEJP8K5iw
+4IugjYVdxkOhuyjMeeYPtYbfwjrPB7zoGKWe1Smas96f4DA/s0U7VyEbs9La
+7OTUQpOFCnxrSH1GbHq1VCWvNz1TSO9/6+mxoZzmFMuSX8RDXrffx2WFyZNF
+pnFmkCwDtVxLDZkw4tRIyr90nhh8pg1VYe05gQ68Vf95jKoUDak+r/79Ut3F
+wHETB44p4usfjh83/3d61yQUj6hcDKayqzQzbm2w6zOjHVflDjRxstdIknlq
+7ov4WNlfgF1EhSGv+vzfBsPbpQrBqU8WBBqxMPJqfxXgfkULKry2Mya9Eue+
+pvD3ebxZx5uNxpmm7XVSreYSXXz9I95runVysjGraD6xgOcWUWrcdxrPWmfN
+0dijterZFt6ZAqlJnOG8HGd6RB4BC34RD0XDT687vXfN+P+ZxplBsgbhXGp0
+/wdfGGFqVL0Vm90c+z8RX//gVfdt9/ouErBHZ/0m/e3Eg6sfTHhpkW72K7qy
+8CWqs9/BMM5xGzvOy48ojGSa1dg4mCr1S3NFm1xeChxYJLbXSJrxlPyLuFjb
+X/IBCNBEfP19J5+BxWnLvoL1VvN3p5fhvxUqvhbq5POj8bf0a6+ndM2UaQNL
+W0zW4U2tld2Jf9NrupeGqbzRTz7n4jlv/e2BgSyr3O7pHnmb+SPZtH8RD3ld
+io+z6UAwjTODZGnhYGr6rREKI04NyREmo7HhmO/EgbsGD4/MmuR3QkDvprj5
+2T5ng6mjp+RTz7fPdWj12WskyTw1+0VcrOwvwC695THTXk+sofNgJMFXkIdn
+96UW9zfdRLsqzuQJDP4HUpPg4xFlPELUtTd971/q/9l3hPb33znQnVNWtYPR
+mMW3plLf3zz0NxejqxjxjWWufnwLSpD2L+KBVO/x8dxscvPWNM4MktX/A1xN
+DYkw4tQYH2G26h1hmpFHOR9NC1Ev26jQtjOLpi/PbTdpA0uOuSMqR4OJSVvq
+2xHNsRqp/Wnp54NrevYaSSJPKX0RFyv7C7CLUnBiro8mRxZ9RdmeG+H61Kgn
+tIwa7Rn/l1G9yB7E+foZ37fsqz2H8Qs370pO2ff9+m2ndLc65e1lebvnPj/G
+ZWPWjRoJ5RIhsNYPzplCVhXnG3So0YKXnOj+Ii69d76aEZjZYuymaZwZJIvD
+qSEVRpQaDGm5kjz3+ed8dv2nrrMm/388nhnrt/dyY8edrAjH/3p1Ff+WCHlc
+EP/FpqQj/07eEplQ+Jj2vIP0iMrZYGLCK2u9J7oGR8UfPpFxLL9OOnBFYb+R
+xPeU2hdNsb6/AMv0VnwdsOIG1SdemX5FDSos2PLebsPLA/1rdsuhZw0TF28N
+3VFKuF8Q+79IgKjwgze+xnnm1TTODCNvluGYGpvBqWDadSTZjhtgZ/T8GbMw
+nt5zyQy+0o+sMScp9XLr4JxSU3sMVqnwoWNN1pibknyhxcJ96djQj1Qnhmz4
+E++OlGmcGUfeLMMuNbaEK8G0+0iyGzfA3ui9+6/QeHpvlTH4ig4M6ejsXxZX
+KcXlWdGTx7zw1t7ccpHFV9D0rKHSNiFi4WSSHf1IzcGwXXfxH2M3jbMFkTfL
+MEqN7eFCMO08kuzGDbBHlO35mzf8RuvOH4OvAHignX9si73QTjTyTOMMkQcA
+YMSAdt08/O/btJ7IZPAVwBis+86JoyVdZCca0zhD5AEAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAALkT88tuzNf0FnT2agXUUJaxb5uTt6Lz9w
+V8La8/1WMjtygLwAgF2DSap+3hvnN3s7nJsYIa3LOPynCFUhdWlzJ4dQ6fVq
+S7MjB8gLANgzqLDo8Il7zb8v8YNzEzMwZa9SM3uW3Ir2W23SwphjZkcOkBcA
+sF/kgrxD/68JUXUVcPHchCnsacVEcmfPZ6k1rMfQSmYtxI5SM6LyAgwPsN7q
+49Hzpzg8PdbRf93RBwQdnpHmS8d/uddDPhSpmaKDtPbklhUhAVNf5s1andGg
+3owZFd3K5l9tZ9pxChVeTVi3ad+Rw/u+Wpd4TajZK0lWnfjB4iVLly4NCZgw
+zj149aF6xrs+sxhM9WapgsK0mODX3y2k1XePhjBGwSTxEeuu4B8q6GC2Kyle
+algwa4yiJTtsRjhRTzEbpIatIrfzvACAEb33EtcfuNGGyDtLDiwZ/6zXnmrT
+A7Oi9dcvV6aZnR1RMUULWcPJ/ef7rmdUyrazYa84fapto9F7Nyn8m4udDIYE
+2pH38bS/Z7f2fVXZcmrBtPDzHfo7+YkKPwjYYcl1E4vB7Bv5skdNgpsxzhNo
+9oSlJ4x2MAlNYdKG/NN/tMn7wtzTUC2mmR7C1Fhm1hiF4PRqfwcefr9Lm6SG
+rSK377wAgDHy1ssXW7RFLLkd6TRpcaHI6L/0VWe47zrzzWspmKIJKpdoF01k
+ldtnBx2s17bhwR5fCp8dcVVE97pM2ZzhN2nWkYea+aiiMc1nUsDP+p26LT03
+sRhMLbKqf9LuV05TGM1gEpmSN/FXuDq5evQxdVrANpxGkaQQpcZCs8bim7K3
+Jp2Ln+mMd26yTWrYKnLu5kXZlrM2qpj9dqDACKL75ir3Oca9tFVKwc+Bbsuu
+69cW2l1xMjbUP/DrhK/C3/HmOfpG8A17sROYIoTcICoqSfk4NKlysBM79vi3
+ELdF+Z0m4xYRXEpZMfeNz44cSti8ItDFM/zfRTkHt0d96Ov8xsYCYdf1DyeO
+Hzgsd10JfnHSsiIr3cZlJ5i0D4AMUkMUTJazbPvUyBszY1MrRXU/+uCdm2yc
+GupFbm95IW1MDwDmwYQFXwRtLOwyHgrdRWHOM3+oNSx0rPN8wIuOUepZnaI5
+6/0JDvMzW5RmTamR1mYnpxaarFUQGlR2lWbGrQ12fWa046rcgS5P0vvfenps
+KMeZrUnKv3SeGHymDVVh7TmBDrxV/3mMqhQNqT6v/v1S3cXAcRMHhpb4+ofj
+x83/nYUbBqawFUyyAyDdSBIKIwwm8yzjYtvUIPUZsenVUpW8Hv/cZMvU0Cxy
++8oLnJsAi0CF13bGpFfi3LwX/j6PN+t4s9E407SKTqrVLCKIr3/Ee+3TgZ7q
+xKb6UDSfWMBziyg1acBOYrAPTFy0yeWlwJx2rVGkJnGG83K8CVxvxWY3x/5P
+xNc/eNV9272+mSj26KzfpL+deHD1gwkvLdJNAkVXFr5EdRKoEJz6ZEGgEQsj
+r+IfANgLJskBkEkk8YURB5NplvGxZWpkNUdjj9aqLy+Izk02To2KTpHbV17m
+uI0d5+VHPmQAABest5q/O70Mv1mf+Fqok8+P9UYLBPqjo6d0zZRp392XmjVF
+BpFBHT0ln3q+fa5Da1dWud3TPfK2xNQOyUDLaGw45jtxYPH84ZFZk/xOCNi+
+ictiMJnd1KCdGuJgsptlG6ZG9iD+Ta/pXhqm8kY/+ZyL57z1tw3OHbZMjQ6q
+RW5XeYHrJoApyMOz+1KL+1vPol0VZ/IEBg+XITUJPh5RxiNEPTqm7/1L/T/l
+dSn+/jurZOZNkYFnEJO21LcjmoGG1P609PPB5Q7xjWWufny8QWI80LbqDbRm
+5FHOR9NC1KsXKrTtzKLpy3PZbu3OYjDVyKp2MDoA0koNcTDZzbKNU6NF0Xjo
+by441022Sg2TIrervMC5CWCEsj03wvWpUU9oGTXaM/4vo4qWPYjz9TO+s9o3
+OhzGL9y8Kzll3/frt51S34ylYIoEHIOY8Mpa74muwVHxh09kHMuvkw5MB2VV
+cb5BhxpN3v/AkJYryXOff85n13/qOmvy/8fjmbF+ey83dtzJinD8r1dX8W+J
+kMcF8V9sSjry7+QtkQmFj9m9aGIxmGrk7WV5u+c+P8ZlY9aNGgnlIwLd1BAF
+k4EpEmycmkGIzk02Sg39Ise3w928wLkJsBqosGDLe7sNHxPVX1VgBRoGMXHx
+1tAdpd12uXBt/WDSs0YaTNazzGk4lRrICwBQQdaYk5R6uXVwTqkZHYk1LJ+b
+qBiUNeamJF9oofp4OgexcjDpWDMTTNazzHW4khrICwBQBkM6OvuXxVVKcXlW
+9OQxL7y1N7dcxMbaCw2DqLRNiNjlFZM+VgsmPWukwWQ9y/YBF1IDeQEAAAAA
+AAAAAAAAAAAAAAAAAAAAAABGCmhXUcKaRX7ujt7LD9yVcOiJEM4KGzIgApZj
+pRhCagDAykjrMg7/KUJVSF3a3MkhHHqdkbPChgyIgOVYKYaQGgCwNpiyV6mZ
+9kluRfutLrZSdw8GcFbYkAERsBwrxRBSA+jAFHDZbF0kd/Z8lkqhPeuQw1lh
+QwY3I2BfQ9JKMeRmagAypHWn475LSE3/ceeXq74+3YTzLjrSfOn4L/d6zNU3
+hggK02KCX3+30PLGO1hv9fHo+VMcnh7r6L/u6APtlv+o6FY2/2o73hZjdKTi
+G7cEae3JLStCAqa+zJu1OqMBoSSVFFR4NWHdpn1HDu/7al3iNaHejm1YdwX/
+UEGHZS9dMo4AyRfNCYPUUIJaBOxoSOJhmpSBX7EkhlZODTC0KJtPBPlsuqPe
+RAx7fHGx1/+5aXTRq2j99cuVaRTmG5jsUZPgZozzBBYaVffeS1x/4EYbIu8s
+ObBk/LNee6p19dt7Nyn8m4smbdvoSCU2zhBZw8n955sQdfvps2GvOOma6ZBJ
+JQftyPt42t+zW/u+qmw5tWBa+PmO/nGGSRvyT//R1jd/QHsaqsVMhxrjCBB+
+0ZwwSA1FqETAjoYkLgRJsTSG1k4NMMQoGtNmTXpjf3VfoSua/v3m3769Z9BR
+pi/f4b7rcHZtxodJUxsc5K2XL7ZoS19yO9Jp0kBXaPUZ9FL47Ah1z08jqEol
+M84MVC7RLprIKrfPDjqoawJEKNUMyuYMv0kDTXMa03wmBfysbpUgb+KvcHVy
+9ehj6rSAbRU4bX8pwTgCRF80JwxSQxUKEbCjIUkAQVIsjCELqVG25ayNKqYa
+WcDaoI8vx3iNe3Xp/xyMi9ly9J7hM5ZKwc+Bbsuu62cL7a44GRvqH/h1wlfh
+73jzHH0j+PUDMzjaA4HUmobum6vc5+i3LsAe/xbitii/02gk0JWKb9wStaio
+JOXj0KTKwZM7gVSVChFcSlkx943PjhxK2Lwi0MUz/N9FOQe3R33o6/zGxgJh
+1/UPJ44fGPtdV4JfpNpslD4EEWA1dJAaRuBHwI6GJO2kmMHqqYF2Hpyjt2JX
+gNtzox3mxp5vM1w47i4Kc575Q63h8MA6zwe86BilnicpmrPen+AwP7NFe51M
+NhCktdnJqYUml/4k1tSfCgu+CNpYaNDIWXr/W0+PDeVG8x+6UgmMM1Wr7CrN
+jFsb7PrMaMdVg+3h8KWqkZR/6TwxWN2zDWvPCXTgrfrPY1SlaEj1efXvl+ou
+Bo6bODCuxNc/HD9u/u+W3zDAgSQCzENnAqSGAUQRsKMhSWYKPynmsHJq4NzE
+LZDGf69c8sP97vY/dv59/NgZ35bpd/4U/j6PN+t4s1Hp6LePEV//iPfawIox
+yUBQNJ9YwHOLKO0x/oDYmgoVXtsZk15pdD8YqUmc4bzceEpEVyqBcQvUqtRd
+d4o2ubwUmNOOkUlVQ9II+8SDqx9MeGmRbgYourLwJaozQIXg1CcLAo1YGHkV
+/xxCGgHGoTMFUqNiLzV2NCTNmFKZJsUc1k7NHLex47z8yFMDDBW9FVu8ZvW3
+gsG6/vhkskvELb2Tk/haqJPPj/VGywr69dZTumbKtO/ua6/LmSxuE1nDeqv5
+u9PLxCYFIqvc7ukeadw9m55UQuNM1eroKfnU8+1zHRiZVDUkoyyjseGY78SB
+lfOHR2ZN8juB15rbIsxGgL3QQWroQRoBOxqS5ML6MUyKOaycGrhu4hRIzb6/
+TV3bf2cV+WvvbF+DVs5ITYKPR5Rxzanrbfpezf+T16X4+++s0i0iy6p2MBoI
+ptaQh2f3pRZ3aR60QbsqzuQJBmSJbyxz9eMblx0dqSTGmajFpC317f39dpDa
+n5Z+PrhGgS9VjfEo26o3ypqRRzkfTQtRL12o0LYzi6Yvz22n3PebGhQiwF7o
+IDV0MBMBOxqSRKaIk2IOK6cGzk3cAuu5m/bFf6/9xw9pB/d8veXwXcN3JmQP
+4nz9jO/H9tWbw/iFm3clp+z7fv22U7rbm/L2srzdc58f47Ix60aNhHJZ4FhT
+tudGuD416gkto0Z76p0xZVVxvkGHGk3eqKAqldQ4E7WY8Mpa74muwVHxh09k
+HMuvkw5EkEgqhrRcSZ77/HM+u/5T11mT/z8ez4z123u5seNOVoTjf726in9L
+hDwuiP9iU9KRfydviUwofMzuzJxaBFgMHaSGKhQiYEdDEt8UcVLIsX5q4Nxk
+V6DCgi3v7TZ88FL/Ot1y6FnDxMVbQ3eUduPUs/Wl0jNIItUeYDN0kBoWsaMh
+aYUsA8AgssacpNTLrYMTNU299d+jYgE61mSNuSnJF1oIHyy2slQ6Bs1J5Tws
+hw5SwyL2MyRZzzIAGIAhHZ39C8Qqpbg8K3rymBfe2ptbLrJ4QYOeNVTaJkTM
+zHWtJpWeQSpSOQzroVMDqWERexiSVqkiAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAABUaFdRwppFfu6O3ssP3JVY+jgUu9asbXbkQBRACKzl2MUIAgB7Q1qX
+cfhPEapC6tLmTg6x9B1rdq1Z2+zIgSiAEFjLsf4IwsQVpy80QndyYGSBKXuV
+msmZ5Fa03+piC1vbsGvN2mZHDkQBhMBazlCMIHlT1oZ9t+1zWwwAsAzJnT2f
+pVJoG20La9Y2ayGYwm6OGUQBhMBajnVHkKT8nyuPUO7cCAA2AOutPh49f4rD
+02Md/dcdfUC1Jw/pF7HuCv6hgg5ab4JLa09uWRESMPVl3qzVGQ36e5wwsTYA
+KryasG7TviOH9321LvGaUG+7S4vMDhihFD2k+dLxX+71mAsthggK02KCX3+3
+kIVudabxREW3svlX2/F25CTRRD/Lwzuw+MKGKrZk0BtB0rv/WLyTes9ZABhq
+eu8lrj9wow2Rd5YcWDL+Wa891RS3viL8IiZtyD/9R1vflAztaagWUxtesoaT
++8839VlQtp0Ne8VpsAEZI2sDoB15H0/7e3Zr39eULacWTAs/34GyYHYAKtFT
+tP765co0ChNgTPaoSXAzxnkCzY4GeBDEs/duUvg3F00anRJDO8vDPbDEwqwf
+W1JojyDhpaVzKY92ABhq5K2XL7Zo61NyO9Jp0mJd40iGX5Q38Ve4Orl69DF1
+WsC2Cpye13igcol2wUVWuX120EFt7zSG1nQomzP8Jg20G2tM85kU8LO6yQwN
+s8q2nLVRxWL8DylEr+/sGO67rojAgAlMOsHhQRBPFfb4UvjsCHWLbErQzbKF
++TL7u/oe2iSwZMKsHFsz0B5BkrLoGW9T7jgLADak++Yq9znGjWH6ir674mRs
+qH/g1wlfhb/jzXP0jeDXy6h8ERdya6ioJOXj0CTqSw2I4FLKirlvfHbkUMLm
+FYEunuH/Lso5uD3qQ1/nNzYWCLuufzhx/MDRo+tK8ItU2zQPQLmlC34QlIKf
+A92WXdc/gpJGgPYhlG48sce/hbgtyu80PiSxm2U24WRgcYUNTWzZGkGyB/+a
+6W3UhRYAOAgmLPgiaGNhF848Cus8H/CiY5R6Rqhoznp/gsP8zBYllS/i/xCR
+NWVXaWbc2mDXZ0Y7rqLeClNS/qXzxGB1t0usPSfQgbfqP49RlaIh1efVv1+q
+uxg4buLA2Uh8/cPx4+b/Tm/qTPHcRBSE7qIw55k/1BoedEjiSXYIldZmJ6cW
+miwa0Yyn9P63nh4byk1n4+xmmS24GFhCYUMUW3ZGkLxuv4/LCniWEuA4qPDa
+zpj0SoJbzvoNwsTXP+K9NriaTf5FutZU6pcvija5vBRIebHBuE3ztsE2zSce
+XP1gwkuLdNdNoisLX6J63aQQnPpkQaCaOW5jx3n5af65MPIq/vGDOAjC3+fx
+Zh1vNjpMEEeA5BCqaD6xgOcWUdpj/AG9eCI1iTOcl+NFgd0sEzAYWD3sL7D4
+woYqtqyMIEXDT687vXeN6qIoANgArLeavzu9TExYy/pjoad0zZRp2qUAs1+k
+ZU1HT8mnnm+f67D83JTR2HDMd+LA/aaHR2ZN8jshoHd73vx1E2kQxNdCnXx+
+rDdarCGOAJPbIvTiKavc7ukeeVtC3Q6zLFsOZwNLKGyoYsvKCJLXpfg4013i
+BoAhBHl4dl9qcZfm+TW0q+JMnsDk2R31WJi+9y/13/sq2t9/Z5WM2hdxwbOG
+SVvq2/t7lCG1Py39nPqanvG5aaveuakZeZTz0bQQ9YKfCm07s2j68tx21KxF
+A8ydm8wEAalJ8PGIMj5a4cdTjaxqB6NDKPV4im8sc/Xj452h2c2ypXA0sKTC
+hiq2rIwgpHqPj+dmxo+rAIB1UbbnRrg+NeoJLaNGe8b/ZTo++saCw/iFm3cl
+p+z7fv22U+pbr9S+iAuONUx4Za33RNfgqPjDJzKO5ddJKc4jMaTlSvLc55/z
+2fWfus6a/P/xeGas397LjR13siIc/+vVVfxbIuRxQfwXm5KO/Dt5S2RC4WPa
+zzSTnpsoBEH2IM7Xz/guN04E1Mjby/J2z31+jMvGrBs1EsonUVrxlFXF+QYd
+asR7EYfdLFsEZwNLKmzIYsvKCOq989WMwMwWmnM1AOAU+msIXLPGdVBhwZb3
+dhtOT20WT0xcvDV0Ryn+ZjV2lhdOBVY1pLFlxZqo8IM3vobLJsC+0YyFxBo2
+RxZr1uwAWWNOUurl1sEpvo3iKWvMTUm+0EL0pLL95YUrgVUNcWzZsIZUJ4Zs
++NPk+Q8AsB+U4vKs6MljXnhrb265yLKNaFi3ZjdgSEdn/80A28UTlbYJEaKl
+HnvNCxcCqxrS2LJjDak5GLbrLlw1AQAAAFwB7fxjW+wFys8bAQAAAICVwbrv
+nDha0gVPQQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD4oF1FCWsW
++bk7ei8/cFcCXTKtiP2G2n6V2x0QasCekDVeOF1hnR4G0rqMw3+KUBVSlzZ3
+cgiVBrAAQ/BCjYkrTl9olJn7KhWgSIYDVi4SAGARrPv2vg2ZTVbqlY0pe5Wa
+45nkVrTfauiSaUXwQy1vytqw7zb+DqI0bEORDA+sWSQAwCryhiMr/1mO086M
+XSR39nyWWgNzsyHAONSS8n+uPNJg0WkFimS4YYUiAQBWkVbuXPKPu1Lz/5GC
+qdqTW1aEBEx9mTdrdUaD/ibHWHcF/1BBh2Xbb2G91cej509xeHqso/+6ow8I
+elAjzZeO/3Kvx8wMkFiqBShassNmhBdpm1SjolvZ/KvteM14WMPwFzXghVp6
+9x+Ld1ZakGP2ioQkiVwrEmqm6GBadVYtEnrj0eIiAQBWkVXvnvsuKwv8soaT
++8839Y0AZdvZsFecPh3YPh+TNuSf/qOtb0qG9jRUi5kee3rvJa4/cKMNkXeW
+HFgy/lmvPdWmpxRF669frkwzO/EmlGoJCsHp1f4OvDC9M0Xv3aTwby52WmtH
+TNNfJAq18NLSuXjxogh7RUKYRO4VCRVTtCCoOmsVCe3xaGGRAACroI/OBM1Y
+X8bGYg0qlyj6p5ayyu2zgw7W968PyJv4K1ydXD36mDotYBtZLzJlW87aqGIx
+/ofy1ssXW7QDR3I70mnS4kKRsYKOvHDfdUUEBsxLtQR5U/bWpHPxM531z00q
+7PGl8NkRV0XWWMc3/UXiUEvKome8ndNOJoMk+OwVCVESOVgkFEzRhKjqrFQk
+tMcjhSIBgCFDevcbz5k7H9Ba4Ue7K07GhvoHfp3wVfg73jzH/8/emcc1ca1x
+//rX/dTe3ltrqQqXa0EoqAhqtKJhabWtVKy2VF+Xgu/H1taLihb3ot201gXZ
+KtZeUHEBVMT78cpbFGvRIoi4IouilC2yiCwhgZBMkpm8JIQQkpnJnDCBCTzf
+v/wAPvOc5/ecM2fOmTmPZ3ByZbcBXHQn9pOAaHMWB2jLl+vTenv52OmG5bRV
+ytpTvq5LcvVHHXZdpbYmF5wJiysRVfzM63lv6hh3fvN3nZvRZGaHN+OKpMie
+/Dh54jeP6BpKE3z2k0QNuYgm6eskMcNV1KyzWJKQX44KBkkCAH2G+OaiMZMP
+VCAOEETTJe/XHELUUz1FTcrHo2xmnqnTLA0oW+6d2bXSz+WloQ7L05GruzAc
+dghh1qpZG7JbDLtya95ip8k/lfdsi5muSstTY+KyjRZayK1hlYlhR0qlKnml
+8Z1C+uhr9/HrC8yuwYZ+RTLkFQd4zkG077/RBJ/lJOn8LYWIJunTJDHpKlKe
+qKiyzjJJQnk5ChgkCQD0GaJs/9G8/1T13ItV1J79dLavAXPW5HT3Tk1N5+hy
+zZKHOHeR/es9tmwIcd4m5xG+TJcHui833XXYcA++8eX0wYU3doceKSHZmRZe
+e9t+6skagx5olquKmqTZ9q7B94z2oUisNZUdDzterp6okt0psLLISU5L84w7
+vOkgm3lFMhRVv0xx/OgGyd8xCT77SUItImUL+itJaF1FyROarLNEkqD3R+ok
+AYC+R5z7sSMPfb9Fvy+03fviDTeDpYC2O5+5v/trI+Kk2PSUmGgvTd575AH5
+B6DiGwGOvJ8N28Kuq8bWHhSGv+UxwUPDOPuhf33Z2f3tdfm6kUFWssN97Jp8
+8/dqkK9Ihrwilue0hGTw64buuYndJKEV0SR9miRmu4qWdRZIEjOSnEGSAECf
+0V4Q6jYlsgz15Rx1X5iw/0/1f+vIaC+v3Y9lKkJaV9mAadIfK/9l/r/ZX9PD
+nl6IirvVWW4Tbyk6f7G2h99YWQRvfIhhD2fXVTJrOhSCw286GzzFiG8uceEn
+15r/FhbyFcnASvfx3DfTvWJAF3wWk8SkiCbpsyTplatoWWeRJEFOcgZJAgB9
+hrI2yYe37SHq/mdHX7AZOWfznpjYqO/WbT+r3nolhNdXTrR18QsJP5qUeCKj
+Qoo+LaYddpQN6cEuLwz5i5YhQ93D/zQYKmRPdnnyDbes2XWVxFo3JHcK2eNd
+nrMOC3rx/QrqFUlpL9w4yfdMHV0RbZrgs5ckDEQ0RV8lSe9cRco6iyQJepIz
+SBIA6Dvai7Z6B91EXWPWX0PgELgwa8tHe3vO/Nh1Fc0aIb61LWDnvV4dBcOK
+/6LsBTO2mj8jhiRBBcHgQEkSAGCZtruhc8LR3g/W9gX0VZ4+QCZIi467+qx7
+WsyuqyjWZIL02JjLdb38dooN/7HSSP/1vfnAGJIEEcYGB1CSAADLtBf/GBBe
+gjDuKMUFKWvHvPjqO/vTC0SWOvOgFxBYY1PnOjvLrqJZw6X1QqyXHzKy4z9W
+dmjxnuJeTYghSRBAMDigkgQAWEbZkLF5/W8NsM48MMGb/tgedhn5xRQDIEkG
+NOwkCQCwDd5y++ixfMuU5gH6FaK1MOn4nRYW7imQJAMW9pIEAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAY28qcnlrz1I8onqQAlEEwWgWACAwSZ
+4PK5Ivh0BQlC8vjU/l38aTtgBOg9EEwWgWACAwSiNT9q/ZnqXh7pNcjAhXlH
+kx7WXJvHhxGg10AwWQSCCQwU5FUJy34oML+uGVsQCut5bpPXXjz8/6oxVUsW
+F0cAa4qkiuvBtDIgmMCAQVqye973xYi1eYj20pNrZ75h87dhDl6rjz+hqK2N
+1WSe/O/DNlMDJYHVZseH+k35MLsFzQsypOWntwT5e4/7p/3UFYlV6oOZcdH9
+1OScBnOr4+DCnIjVm6ISjkZtXB15Q6g510VWGrngg3nz58/39x41fKzfisOV
+Zp8Azd1IalHUpS6eFNhVImrQBJOZKRSsLTMBoH+Rle71+ZC2xDUJ7Q8j1x28
+WY/Jm+4cnDfyHx77So17gOLZ/75cFl9meuZGyJ5X194OdRr1XlavR1RZ1ekD
+lzpmjSpl/YXF/3L8THvkf3txdOBXV5rMOMkSb7z4idv7qc86/quy7uxst8BL
+jfqnjomyF3jv7M3slLOR7Lp27bkVXjb2+uULB0UwmZhCwuoyEwD6F/z5+VmT
+1j1AW9GTP7t6pU7bVyX5axztPsgWGdptvBjoudp0QVYtssc/jLNjYUTF5RLt
+epasZMe0WYcqtZtoRHNm4LTgHBHq7FdZk8i3m5rwVDO1VQjieXbep/RLZzMY
+AZT1aStDblEEgruR7HSvOnVb9K/hk516lNYdBMFkYAoRDmYmAHAZafFX7pN3
+o1aN06P19vKx0w1LXKuUtad8XZfk6o8BeGvR6bAAL9+tERsD35to7+AZnNxd
+Xxx5RKW1psJFd2I/CYgu6V6pJJp/83edm9FkNARgtZmxQT4zPk84HLE5yNfZ
+PfBYXtqhHSELPZ1mbMgStuQutB2pG5darvu9Zrckr5Wxl2poa4jrw7lIygVn
+wuJKRBU/83remwZPMGlMUWI9mQkAXEZ8c9GYyQcqzH1HjxBmrZq1IbvFsGO1
+5i12mvxTeU+zRNMl79ccQtRzREVNysejbGaeqdPO9OhGVGl5akxcttGyB6U1
+Zcu9M7tW+rm8NNRhebquIo300dfu49cXkNROkxR86WTrd74eVxENab429st/
+b8ZViqo43uj3Myuu+A631fV5ce7CkcNnXkN7JmE4nHIuklhlYtiRUqlKXml0
+bxo0waQxpcbKMxMAuIwo23807z9VPbdjFbVnP53ta8CcNTmGHRQX3tgdeqSE
+ZJ9YeO1t+6knawx6raZydHS5Zq1EnLvI/vWuVXe6EVVRkzTb3jX4nlGxaGpr
+aghx3ibnEb5pDVrnsLLISU5LyWaW7UWbXR06fyPOXTB67PaHHZNa4vkFvt2b
+SU9yFowaMbdrdiq6PmcE09lpdwynuw4b7sGnimEnnItkU9nxsOPl6vk+2b1p
+sASTxpRqAGQmfe8GgH5FnPuxI0+3+I0C0V6avPfIA/IPdsU3Ahx5Pxua1e+z
+bfe+eMPtm0fatQ1zdkmorXXSducz93d/bdT6JyvZ4T52TT7JxhrNCJAoqDrh
+aatb1X+aMNWOn1SLtnFteqrPwUg+KAx/y2OCh4Zx9kP/+rKz+9vr8nUD7OAI
+Jq0pOqwkMwGAy7QXhLpNiSxDfgkJe3ohKu5WZ6VMvKXo/MXaHiawsgje+BDD
+/qbusxP2/6n+S3lFrJfX7sddC/GyxzvNGlENrRHSusoGTNPpsfJf5v+7e+VE
+fHOJCz+ZrPcajgDb9EaAGux52iI3f/WyigqvPz93wtJ01LLkpoZTjkZSh0Jw
++E1ng+emwRBME6bosJLMBAAuo6xN8uFpch7lPzWkB7u8MOQvWoYMdQ//06Dj
+yp7s8uQbbiB39FmbkXM274mJjfpu3fazXVvE8oYHF/f6vPKi84aUm2USxh2M
+xBohvL5yoq2LX0j40aTEExkVUt2UV/Z4l+eswwKjT0kIrO56jM8rL/P2/F7R
+VJbx7fiXhvH3XxU0FqYEO/x99PLk+yKsOSt81abohGMxW9ZEZDcjT01ph1PO
+RrIbknvTwA8mA1M0WElmAgCnaS/a6h10k+kbyszBhVlbPtpb1GOHV3+to/cg
+WCPEt7YF7LzXapUr6pyKpAqCaZrBkpkAYFHa7obOCe/FS+TUyARp0XFXn3VP
+UjV91owFRHIYW5MJ0mNjLtdZ8XmBXImkCoLJhEGUmQBgQdqLfwwIt9BXegTW
+2NS5yK5SigtS1o558dV39qcXiHq9/oBgDZfWCzGrn5dyIZIqCKZpBl1mAoDF
+UDZkbF7/G+ykAgAAAFwCb7l99Fg+1G8CAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAObIn55Y8taPUG/UDPCWvIgv5vLHOkxcerBYwtr3DBYy
+O6gAaQDAqiEkj0/t38WftgPuTehIKxKP3hXhKqwi3meMP5Patv1pdlAB0gCA
+NYML844mPay5No8P9yYzIJTtSs3UWXJ/LX/FLbbKi1vI7KACpAEA60Vee/Hw
+/6vGVC1ZXLw3EQqrWTGRFO77PK6M9QBayGwvsSJdVINMGmAAQLSXnlw78w2b
+vw1z8Fp9/Al5/WoVVpN58r8P2+i7IjNTZqCoS108KbCrCBEuup+anNNgVDKH
+IbgwJ2L1pqiEo1EbV0feEGrOIZSVRi74YN78+fP9vUcNH+u34nCl2cdasxhP
+9ammtdnxoX5TPsxGqjZIjrT89JYgf+9x/7SfuiKxSt1AsyJJ00CitSj5cFaj
+eWeukunCglkGbuvRH7poYSHJrVQaACCj/WHkuoM36zF5052D80b+w2NfqfGo
+rHj2vy+XxZucGjExZQ6K2nMrvGzs9QvktRdHB351pcmMLoE3XvzE7f3UZx3/
+VVl3drZb4KVG/VNyRdkLvHf25rmJxXh29HzZ8+ra26FOoxAr4ZIhqzp94FLH
+k6FKWX9h8b8cP7vbWaIdOZKUDSSkVRnn/qiXd8S4rapUjKgNpS69M2vabT36
+RZeua7OQ5FYqDQCQIX929UqdNoMl+Wsc7T7IFhn8SUdqBnquzjNZv5CBKbM8
+rE7dFv1r+GSnHsVbiebMwGnBOSLURzNlTSLfbmrCU818VCGI59l5n9Kvp93b
+exOL8dQie/wDcpV2MnC5RLsCJSvZMW3WoUpt2SHESFI1UF6dHOTi6DK+g3Fu
+3tt7lv8zDZUuCGaV9WkrQ25RhJW7unS6x0aSc1caAOgdrbeXj51uWPFapaw9
+5eu6JFe/y+KtRafDArx8t0ZsDHxvor2DZ3Byz0LgFKYooTYoF5wJiysRVfzM
+69ltO/rtb/6uczOajPotVpsZG+Qz4/OEwxGbg3yd3QOP5aUd2hGy0NNpxoYs
+YUvuQtuRunGp5brfa3ZL8iy0jctOPJHHQHp1cNGd2E8Cokukup9QRZJllS2u
+C23Bd9Nu96MuyElubdIAQG8ghFmrZm3IbjHsB615i50m/1TeM8uJpkverzmE
+qKd0ipqUj0fZzDxTpzRpSo20PDUmLttooYLcIFaZGHakVKqSVxp1W5X00dfu
+49cXkMzWJAVfOtn6na/HVURDmq+N/fLfm3GVoiqON/r9zIorvsNtdV1LnLtw
+5PCZ19jbM9BvEUvxpBsDkYLZgbLl3pldK/1cXhrqsDy9oeu/UUbSfJVJsbAu
+DO9NnNPFrCS3LmkAwHxw4Y3doUdKSHaIhdfetp96ssagn2nqVkeXa1YQxLmL
+7F/v2r+gM9WBoiZptr1r8L02w1+QGGwqOx52vFw9HyTrtlhZ5CSnpWQTuPai
+za4Onb8R5y4YPXb7w46HBOL5Bb7dm0lPchaMGjG3axIouj5nBNNJoKL27Kez
+fQ2YsyaHfABgL540YyBKMPX+hhDnbXIe4ZvWoHWOOpLmqkyOpXWZ7jpsuAff
+ynQxN8mtSxomXQYAjCHaS5P3HnlAXpxQfCPAkfdzpcHqgH7XaLv3xRtu3zyS
+mjRFh7HBB4Xhb3lM8NAwzn7oX192dn97Xb6uv8tKdriPXZMvMTZF09ESBVUn
+PG11i+dPE6ba8ZNq2d7EZTGe5u1rUFvrpO3OZ+7v/tqo9Y86kuyqbGFdTD83
+cVAXs5PcqqQBALPAnl6IirvVonn1Bm8pOn+xtscbTFhZBG98iGH3UHeNCfv/
+VP+lvCLWy2v3Y5lpU3SQG9SiEBx+09lgSim+ucSFn0zWSQw72ja9jlaDPU9b
+5OavXr1Q4fXn505Yms52NXsW46lG9ninWWOgoTVCWlfZgGmGLKz8l/n/7l7T
+o44kuypbWBdT9yaO6qIDLcmtShoAQEfZkB7s8sKQv2gZMtQ9/E+DdJY92eXJ
+N9xW7egaNiPnbN4TExv13brtZ9U7sQxM0UBisBuSbit7vMtz1mGB0fcfBFZ3
+PcbnlZd5e36vaCrL+Hb8S8P4+68KGgtTgh3+Pnp58n0R1pwVvmpTdMKxmC1r
+IrKb2Z0BshhPNfKGBxf3+rzyovOGlJtlEsYjAok1Qnh95URbF7+Q8KNJiScy
+KqS6iTVVJMntmKuy5XWhvTdxVpduEJKc3BR3pQEAy4ALs7Z8tLfnO6L6Swqs
+gGaQEN/aFrDzXqtVLlxbPp4I1mgjybrKnIZTuqhAGgBggEyQFh139Vn3nFLT
+NSLLWL43MTQoE6THxlyuY/qGOgexcDwZWzMRSdZV5jpc0UUF0gAAUwissalz
+u0KlFBekrB3z4qvv7E8vELHxgI9mEJfWCzGrfGLSx2LxRLBGG0nWVbYOuKCL
+CqQBAAAAAAAAAAAAAAAAAAAAAAAAAAAABgl4S17EF3P5Yx0mLj1YLLH610EA
+JoDoAABwG2lF4tG7IlyFVcT7jPFncuQ2YPWA6AAAcBxC2a7UzJsl99fyV9yC
+OgWDARAdAFiCUMC6g2WRFO77PI5BedY+BES3NBwUHQAsi7Ti3K5vIuKO/Lz7
+y+Vbz1WTfIiO1WSe/O/DNlOjD4HVZseH+k35MJu96i6KutTFkwK7DhnDRfdT
+k3MayM4XQ3GVaC89uXbmGzZ/G+bgtfr4E5RiAhRIy09vCfL3HvdP+6krEqsw
+Rq7SggtzIlZviko4GrVxdeQNod6JbURrUfLhrMZefnHJTdHNCWM/Ka4FNT9p
+sbToAGBNKGuSZvE2FaoPESOar3zg8X9vG6waKJ7978tl8QwmbITseXXt7VCn
+UWwVqlYXgDm3wsvGXv8AzPbi6MCvrhiVbUNxtf1h5LqDN+sxedOdg/NG/sNj
+X2kvT36RVZ0+cKkaU5cFv7D4X45dlXToXKUHb7z4idv7qc86/quy7uxst8BL
+jZ0DFSGtyjj3R33HrQRvqyoVmztWcVN0M8LYX4p3XR4tP+mxtOgAYF0oBPFT
+7WYcKO3o3orqY2+9+fXDHpV+OjpMoOfqngf302BOURtK5NWp26J/DZ/cs+Aa
+0ZwZOC1YXfDTAKauyp9dvVKnHZsk+Wsc7XT1ps0Fl0u0S1qykh3TZh3qKgJE
+6aoJlDWJfDtdxRxBPM/O+5S6ToK8OjnIxdFlfAfj3Ly3F5HU/NWZqE9bGXKL
+KhbcFB05jP2neKdZtPw0gcVFBwArA2++GuoxfPT8bw/tCt1y/GHPl1SVtad8
+XZfk6qc73lp0OizAy3drxMbA9ybaO3gGJ3ef9Y88TFFbkwvOhMWViCqMioES
+zb/5u87NaDLo/Kiuami9vXzsdMO6COZ4q/mt6E7sJwHRJd3jPIWrKhVWmxkb
+5DPj84TDEZuDfJ3dA4/lpR3aEbLQ02nGhixhS+5C25G68bPlut9rTCuN6jBR
+zIiromt+yzSM/as4an72v+gAYHW0F+3xdn15qI1P2KX6nmvlrXmLnSb/VN6z
+JxNNl7xfcwhRTw0VNSkfj7KZeaZOu9BAN0xJy1Nj4rKNVjvIrWGViWFHSqWk
+haqlj752H7++wGACieqq+rfCrFWzNmSTlohG8rYDZcu9M7tW+rm8NNRheXfZ
+PnJX1UgKvnSy9VMXbCMa0nxt7Jf/3oyrFFVxvNHvZ1Zc8R1uqxuYxLkLRw6f
+eQ3tscT0MMVB0VVoYexPxdHzU02/iw4AVgQmOLZs3k+PWhv+2P3+yGGTvn6g
+X/lTeO1t+6knawz6q37tGHHuIvvXu7YG6IYpRU3SbHvX4Htthr8gsdZUdjzs
+eLl6fkrW97GyyElOSw3nlKiuqnDhjd2hR0rI98VRvNX7G0Kct8l5hG9aA0Hn
+qhqaKthJT3IWjBoxt2sKLbo+ZwTTKbSi9uyns33VTHcdNtyDr/nnnDU5hoMx
+F0VHDmP/KW5OfqrpX9EBwKpoL9riMbWzDgzR8senY5yD7+uNU+IbAY68nysN
+VkD0e2vbvS/ecPvmkXYBxpytB2NrDwrD3/KY4KFhnP3Qv77s7P72unzdoCEr
+2eE+do1h9Ww0V4n20uS9Rx6Ikbsvdds7abvzmfu7vzYSdK6qoRmmEgVVJzxt
+dVsPTxOm2vGTyOpy00A/heai6Ohh7DfFzcpPNf0qOgBYF1hZ1JvjVnZO/LA/
+90/z7FHHGSuL4I0PMexm6t46Yb/m7+QVsV5eux93renLHu80a5git6YiLVSt
+Et9c4sJPNuy3KK5iTy9Exd1q0bwGhbcUnb9Yy/i9LTKDhLSusqGz2A5W/sv8
+f3cvRpG7qsZwmNqmN0zVYM/TFrn5q9d+VHj9+bkTlqY3MK773Qn9MMVN0VHD
+2I+K62Cen2r6VXQAsDKItuL4Vf9n5fc/xR/at3XL0eKeX4rInuzy5BtuHXf0
+VpuRczbviYmN+m7d9rNdu83yhgcX9/q88qLzhpSbZRLG/YrCWickfV/2eJfn
+rMMCo49ImLqqbEgPdnlhyF+0DBnq3mNkRveWEF5fOdHWxS8k/GhS4omMCqku
+glSuEljd9RifV17m7fm9oqks49vxLw3j778qaCxMCXb4++jlyfdFWHNW+KpN
+0QnHYrasichuRn5v2MQwxUXR0cPYb4p3g5Cf/S46AAwocGHWlo/29nxzVX+V
+o/egWSPEt7YF7LzXSrI0Y3lX0QzSuMpxOCW6FSmusmbRAcDqkAnSouOuPuue
+nmp6a+d2BQugWJMJ0mNjLtdRvgFsYVdRDJpyleNwRXQrUlxl9aIDgNVBYI1N
+nTsBKqW4IGXtmBdffWd/eoGo19+oo1nDpfVCzMSM1GKuohlk4irH4YLoVqQ4
+Q28BAAAAAAAAAAAAAAAAAAAAAAAAAAAAwILgLXkRX8zlj3WYuPRgsYS1PWwL
+mR1sgDrcBHQBAAsjrUg8eleEq7CKeJ8x/qx9s2ghs4MNUIebgC4AYGkIZbtS
+Mz+T3F/LX3ELrR5Bn5sdbIA63AR0AawZQmFNz+SSwn2fxzGo8coNs4ONQaWO
+FXWcQaUL0C8Q7aUn1858w+Zvwxy8Vh9/Ql5AQIXVZJ7878M2Uz2HwGqz40P9
+pnyYzVZZdpVKUZe6eFJg15FluOh+anJOg9FpZfRIy09vCfL3HvdP+6krEqv0
+P/EnWouSD2c1mvedJi7MiVi9KSrhaNTG1ZE3hHqnyfXKrM4Ie9IwM2UGoA73
+Oo5xPM3TRUtPiTvd5bAuwECh/WHkuoM36zF5052D80b+w2NfqfHhLIpn//ty
+WTyDyQwhe15dezvUaRRbZdnVxWnOrfCysdc/TrO9ODrwqytGReCokVWdPnCp
+GlMXrb6w+F+O3QV9CGlVxrk/6uUd/aWtqlSM2CfwxoufuL2f+qzjvynrzs52
+C7zUiLNgVgeL0jAxZQ6gDvc6DkU8kXXRYiwxt3UBBgryZ1ev1Gk7lSR/jaOd
+riq0jo5kCvRc3bMMAA3mVPOhdq86dVv0r+GTe5ZvI5ozA6cFqyuRMgOXS7Rr
+JbKSHdNmHdKW/JFXJwe5OLqM72Ccm/f2IpJCpXQoaxL5drqCO4J4np33KXVh
+hF6a1cGiNAxMmeUhqKOBWx2HIp7Iumgwlrj/dVHWp60MucU0rMBAoPX28rHT
+DUsOqJS1p3xdl+TqpwLeWnQ6LMDLd2vExsD3Jto7eAYnd1cOQO5i1NbkgjNh
+cSWiCqPSokTzb/6uczOaDLsZrWMqXHQn9pOA6BKpiiFYbWZskM+MzxMOR2wO
+8nV2DzyWl3ZoR8hCT6cZG7KELbkLbUfqRqSW636vMS1Uig470tCYogTUMQ3n
+Oo7mt0bxRNeFUmI6LK4LlAIZbBDCrFWzNmQbFXJuzVvsNPmn8p4dj2i65P2a
+Q4h6EqaoSfl4lM3MM3Xah3C6LiYtT42JyzZaVyC3hlUmhh0plZKWvZY++tp9
+/PoC48kVpWPKlntndq30c3lpqMPy7qJ1ppAUfOlk66eu90Y0pPna2C//vRlX
+KarieKPfz6y44jvcVtevxLkLRw6feY29bTb9RrEkDY0pNaCOWXCu46io4omo
+C53EtFhYF7g3DS5w4Y3doUdKSDZ0hdfetp96ssagW+gXtRHnLrJ/XbdNQNPF
+FDVJs+1dg++1Gf6CxFpT2fGw4+Xq6RtZ18DKIic5LSWbb1E7poYQ521yHuGb
+1sBwYYOmiHbSk5wFo0bM7ZoBiq7PGcF0BqioPfvpbF8D5qzJIb1jsCgNjSkV
+qKOLQz+pw1LHoYknki70EtNiaV2muw4b7sGn1wUYGBDtpcl7jzwQk4osvhHg
+yPu50mDBQj+Z2+598YbbN4+0iwfmLJsbW3tQGP6WxwQPDePsh/71ZWf3t9fl
+6/qdrGSH+9g1huW46R3rpO3OZ+7v/trY+9EvUVB1wtNWt3L+NGGqHT+JrBB3
+r2BRGlpTdIA6VHCw49DFE0UXExLTYmFd4Llp0IA9vRAVd6tF87IM3lJ0/mJt
+jxeOsLII3vgQw4RWJ/OE/ZrK1vKKWC+v3Y+7Vrplj3ea1cXIralIy16rxDeX
+uPCTyXKazBQhrats6Kyrg5X/Mv/fzFeNDHvZNr1eVoM9T1vk5q9eulDh9efn
+Tlia3sC4JjkzWJTGhCk6QB1yONpxqOOJposOMolpsbAucG8aHCgb0oNdXhjy
+Fy1DhrqH/2kwaMme7PLkG+70diSzzcg5m/fExEZ9t2772a49WHnDg4t7fV55
+0XlDys0yCeOco7DWCUnXkD3e5TnrsIDscw0SU4Tw+sqJti5+IeFHkxJPZFRI
+GU7LCazueozPKy/z9vxe0VSW8e34l4bx918VNBamBDv8ffTy5PsirDkrfNWm
+6IRjMVvWRGQ3szstZ1EaBqZoAHVI4GzHoY4nmi7doN2bLK8L3JuALnBh1paP
+9vZ8q1N/EaD3oFkjxLe2Bey810o6iLHrGNexvDTIBkEdHZzqOKALMCCRCdKi
+464+654CapI5sozNLsbQmkyQHhtzuY7qHWh2HbMCLCwNokFQpydc6TigCzBw
+IbDGps5VbJVSXJCydsyLr76zP71A1OulEjRruLReiFEt+7DrmNVgMWmQDYI6
+xnCh44AuAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD0D3hLXsQXc/ljHSYu
+PVgsYe1YLguZHVSwG0NQpJeAHADQh0grEo/eFeEqrCLeZ4w/ax+aW8jsoILd
+GIIivcTychDionOXBVCKHQDUEMp2pWbSJrm/lr/iFlvFfSxkdlDBbgxBkV7S
+F3LIq1PWR+WTH1sBAIMTSeG+z+MYFM7mhtleQiisqfezG0NQpJdYVg5JwQ/L
+EhgXvQQGPkR76cm1M9+w+dswB6/Vx5+Q1/ZRYTWZJ//7sI2+FzEzhYK0/PSW
+IH/vcf+0n7oisUp9pAouup+anNNAdmClaRR1qYsnBfYs0tpalHw4q9G8z+Fx
+YU7E6k1RCUejNq6OvCHUO6KzV2Z1RtiTRn08QW12fKjflA+z2auw1zOeZklD
+00ZzYmicML2xhuKtHv2hCEs9hWU5tDDsd9Li7z/YzbzwMTDAaX8Yue7gzXpM
+3nTn4LyR//DYV2p8qJbi2f++XBZvcr7ExBQSsqrTBy5VdxhR1l9Y/C/Hrrpp
+7cXRgV9dMSoCahJF7bkVXjb2eicqE9KqjHN/1HdM1fC2qlIxokW88eInbu+n
+Puv4b8q6s7PdAi814iyY1cGiNB0+yZ5X194OdRqFWIWBBuN4oktD2UazYkiR
+MANfEbZ6CrtyaGHe74SZ8316PWoAAwT5s6tX6rTJIMlf42j3QVdJSh0dQ3Cg
+52rTR+QzMIUILpdo1ztkJTumzTrUVaeNaM4MnBasriCNgLw6dVv0r+GTuyt4
+yquTg1wcXcZ3MM7Ne3uRca1qWpQ1iXw7XZU0QTzPzvuUujYOglllfdrKkFsU
+kWVRGi3mVK+jxDieahCloWqjmdJQJEwvhTbprb4H/aMISz2FZTk6bSL0O8mD
+tZPeZVz2GBg8tN5ePna6Yb0ZlbL2lK/rklz93oa3Fp0OC/Dy3RqxMfC9ifYO
+nsHJPSu+UJiihN4gLroT+0lAtN7DPtH8m7/r3IwmwySmtiMXnAmLKxFVIFWX
+xmozY4N8ZnyecDhic5Cvs3vgsby0QztCFno6zdiQJWzJXWg7Ujc6tVz3e41p
+dWkdjCvRsCMN8khoRjzRpaFvI6pjmt8aJQz7cE4RzW9Z6Cn0DUT1Cq3fyZ78
+OHmiQeleACCEWatmbchuMczi1rzFTpN/Ku+Zo0TTJe/XHELUEzJFTcrHo2xm
+nqlTmjSlRlqeGhOXbbTMQGlQ2XLvzK6Vfi4vDXVY3l3BU/roa/fx6wuM52/k
+drDKxLAjpVKVvBLp3qTenv3SydZPXaSTaEjztbFf/nszrlJUxfFGv59ZccV3
+uK3ubiTOXThy+MxraDNghvcmtqShGwmRdKGLJ6I0ptpIGRO0hGEZzimiYqmn
+mGogZUBY6XfyigM85yB4kRLQBxfe2B16pIRkc1d47W37qSdrDLqIfjEyce4i
++9e71/apTXWgqEmabe8afK/N8Bc0BlXqzx/yNjmP8NU97mNlkZOclpI9pZDY
+aSo7Hna8XD2PQ743GVaX3t5dXTrpSc6CUSPmdj03ia7PGcH0uUlRe/bT2b5q
+prsOG+7B1/xzzpoc8pGAPWloRkIUXejjiSQNo5whBy1hTNCtiB7WowhbPYVd
+OdD7naLqlymOH90g+Ts0gYABA9Femrz3yAMxqc7iGwGOvJ8rDZ7t9VOx7d4X
+b7hpn8RpTdFBZbCLtjufub/7a6PWrqxkh/vYNfkSJnYeFIa/5THBQ8M4+6F/
+fdnZ/e11+UZdnhSae1OioOqEp61uv+lpwlQ7flIt2jzd9HMTi9KYt7uBHE8U
+aXqTM2gJwx4cVIStnsKuHGb0O3lFLM8JdWEcGLhgTy9Exd1q0bxihrcUnb9Y
+2+NFGawsgjc+xDC51ak4Yf+f6r/sSCgvr92PZaZN0UFmkJDWVTZ0lkTDyn+Z
+/+/ulQrxzSUu/GSyOwG5Y1oUgsNvOvfmuWmb3r2pBnuetsjNX73gp8Lrz8+d
+sDS9ATdpsQem7k0sSqNG9ninWSMhUjxRpTE3Z9AShi04qgh7PYVNOXQw7XdY
+6T6e+2az31UBBhTKhvRglxeG/EXLkKHu4X8aJKPsyS5PvuGmaEcq2oycs3lP
+TGzUd+u2n1XvfDIwRQOJQUJ4feVEWxe/kPCjSYknMiqkupmc7PEuz1mHBWSf
+bpDY6Qbt3kRgdddjfF55mbfn94qmsoxvx780jL//qqCxMCXY4e+jlyffF2HN
+WeGrNkUnHIvZsiYiuxl5IKS9N7EojRp5w4OLe31eedF5Q8rNMgnjmyhqPNGk
+6UXOICUMO3BWEbZ6CrtydMO037UXbpzke6YOcYYHDF5wYdaWj/b2nM3oP8Kz
+AoJBQnxrW8DOe+THm7DuGKexvDRo1vpQGo4KzSlFrE0OUfaCGVvhsQlAQSZI
+i467+qx7OqhJxcgylu9NTAzKBOmxMZfrqN5tZd0xrmNhaVCs9ak03BWaK4pY
+nRxYaaT/+rvMdoIBQAeBNTZ1rmirlOKClLVjXnz1nf3pBSI2VvQRDOLSeiFG
+tVbDumPWgcWkQbPWh9JwXWguKGJ1cmBlhxbvKYanJgAAAIAr4E1/bA+7bKkP
+0gAAAAAAFaK1MOn4nRZ4CwIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AIBl8Ja8iC/m8sc6TFx6sFjSR4fL98tFgU4g+GwxkPoOtAVgE5ng8rki9MoT
++kgrEo/eFeEqrCLeZ4w/k2qrLEB2UUJcdO6yQEb7/4zby0IEBhv9oviAhDN9
+h7tm++WikOH9DdGaH7X+TDXTCudUVpTtSs3QLrm/lr+ij4pLkl9UXp2yPiqf
+/AhKFVl72YnAYKNfFB+QcKjvcNVsv1wUMryfkVclLPuhgKQ6mHlICvd9HldG
+/9jCOoYXlRT8sCyhivxeY9xeliNgNoTCKp/b+kVxk1hjMDnRd7httl8uys0M
+H/hIS3bP+75YavoPu8GFORGrN0UlHI3auDryhlDvJBCitSj5cFajJU6tkpaf
+3hLk7z3un/ZTVyRW6R9ITHZRafH3H+wuIWuVcXvNiICmfOfJtTPfsPnbMAev
+1cefUNSXxmoyT/73YZupUZLAarPjQ/2mfJiNVAYOwTFcdD81OaeBrNAOEyys
+OGeDSZJ13I4kKTTh7dVFrWAcYEy/tAWgRVa61+dDpJVUvPHiJ27vpz7rEEtZ
+d3a2W+Clxk4lCWlVxrk/6jueVvC2qlIxq2LKqk4fuFTdkYnK+guL/+X4me6o
+e6qLCjPn++wrNT5T37i96BHooP1h5LqDN+sxedOdg/NG/sOD7FKKZ//7clk8
+g+kWIXteXXs71GkUYolSNMfai6MDv7rSZIYsllacs8GkyDruRpIUyvD27qLW
+MQ5wuC0APfjz87MmrXuAsJ6lrEnk201NeKqZOCoE8Tw771Pqmszy6uQgF0eX
+8R2Mc/PeznIJL1wu0a7RyEp2TJt1qLJzvY76opIHaye9m9ZgOMk2bi96BNTX
+fXb1Sp22h0vy1zjafZAtMrxS48VAz9WMC7TLHv+AXD4b0TGiOTNwWnCOCHWt
+iwXFlfVpK0NuUcSCs8GkyjrORpIUqvD2ssNayTjA4bYA9EiLv3KfvPtJj+ko
+VpsZG+Qz4/OEwxGbg3yd3QOP5aUd2hGy0NNpxoYsYUvuQtuRutGj5brfa3ZL
+8tjbJcRbi06HBXj5bo3YGPjeRHsHz+BkvQLMuOhO7CcB0aSLdT2RPflx8sRv
+Hhn+oXF7ySKAROvt5WOnG9bJVilrT/m6LsnVH0Rom4Y8nNIHitQxovk3f9e5
+GU1GQ6rFFaetDk/rc+d/799gGmcdNyNpRkrQMSDGAS60BTAL8c1FYyYfqDBI
+VknBl062fufrcRXRkOZrY7/892ZcpaiK441+P7Piiu9wW51y4tyFI4fPvMbC
+yr4OoumS92sOIepZqaIm5eNRNjPP1GmepZUt987sWunn8tJQh+XppiqxyCsO
+8JyDjF6tMW4veQSYeyvMWjVrQ3aL4SjVmrfYafJP5T3NUjaNfjiVlqfGxGUb
+rSHRWKNwTProa/fx6wtIpn8WVpzhvYmLwSTPOo5GEj0laBkA4wA32gKYgSjb
+fzTvP1UGO7vtRZtdHZZqtBLnLhg9dvvDjgkK8fwC3+7NpCc5C0aNmNs1xxBd
+nzOC6RxDUXv209m+BsxZk2PYVzT1l6PLNcsQ4txF9q9/pl9ImRDnbXIe4Wu8
+XGdwsapfpjh+dMNw8cO4vaQRYOoqLryxO/RICcnmvfDa2/ZTT9YY9BzqptEM
+p4qapNn2rsH3jKpJ0wSK3DGsLHKS01IytSyt+HTXYcM9+FRhpPNZTT8HU2Wc
+dVyNJHJK0DIAxgGOtAVAR5z7sSNPt47eBY2OiYKqE562urXZpwlT7fhJtazu
+EernZNu9L95wM1iaa7vzmfu7vzbSqy+viOU5GSeYcXvJI8AEor00ee+RB+Qf
+7IpvBDjyfjY0S900c7ZIqKxROiYr2eE+dk0+yd6ahRU3/dzE2WB20TPruBpJ
+5JSgZQCMAxxpC4BOe0Go25TIMoP3ogx13KanYw32PG2Rm7/64ViF15+fO2Fp
+egO79STVOTlh/59qnzruMF5eux/LVIS0rrIB06QhVv7L/H+bfJbHSvfx3Dcb
+7V4at5c8AqbBnl6IirvVWUoTbyk6f7G2hwmsLII3PsRw8CJrWieyxzvNGk6N
+rdE4Jr65xIWfTNbrLKy4qXsTR4NJnXVcjSRyStAyAMYBjrQFQEdZm+TD08ik
+g8Dqrsf4vPIyb8/vFU1lGd+Of2kYf/9VQWNhSrDD30cvT74vwpqzwldtik44
+FrNlTUR2M9sTjI6ctBk5Z/OemNio79ZtP6veAiWE11dOtHXxCwk/mpR4IqNC
+anKy1F64cZLvmTrDDDNuL0kETKNsSA92eWHIX7QMGeoe/qdBd5c92eXJN9x2
+JmmaGnnDg4t7fV550XlDys0yCeNeQWKN1jHZ412esw4LjD7NsbzitCMqZ4NJ
+nXUcjSR6StAwMMYBjrQFMIP2oq3eQTdR3km1OPrP8mYjyl4wYyvJS5/G7bVU
+BHBh1paP9vZ0gZWmmWmNEN/aFrDzHuVRTpyGU8HkcCTZjUn/MpDaAphD293Q
+OeG9eIWafTQ5acYqmz5YaaT/+rtGG94qsvZaLgIyQVp03NVn3dN9NprWDYo1
+mSA9NuZynRUfGciVYHI6kuzGpH8ZSG0BzKK9+MeA8BKu3JyU4oKUtWNefPWd
+/ekFIrOfrLGyQ4v3FJN/KmfcXktGgMAamzrXx1lqWhdo1nBpvRDj4DwfDS4E
+k8ORZDcm/ctAagtgNsqGjM3rfxtAm3940x/bwy5T7pIat3fARQAAAGAAgLfc
+Pnosf4BULyJaC5OO32mhu9EYt3dARQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAYWOAteRFfzOWPdZi49GCxBN59NwcOxpCDLg1gINoAwDbS
+isSjd0W4CquI9xnjz6SiLGAIWQwJcdG5ywL6I0JkgsvniizzKRzI2peYmwAA
+AFBCKNuVmtFRcn8tf4VReV+AAeQxlFenrI/KpzzHlWjNj1p/ptpCp+mBrH2J
+WQkAAP0IobCaxJQU7vs8roxr0zwrCqDKOIaSgh+WJVSR333kVQnLfiggKSlo
+WZcAS4KSAADAFKK99OTamW/Y/G2Yg9fq408oKk5jNZkn//uwzdSISWC12fGh
+flM+zEYqS0eOtPz0liB/73H/tJ+6IrFKfZoyLrqfmpzTYFT1h94n6gYSrUXJ
+h7Mae3cSJmcDSO6YWTEk0UJ3FZIYSou//2B3CVlFL2nJ7nnfF6PV+iLHimRl
+ZsoMFHWpiycF5mnL05inbG+uqAEtAQCAKe0PI9cdvFmPyZvuHJw38h8e+0qN
+j9RXPPvfl8viGcxCCdnz6trboU6jEEumkiGrOn3gUnWHM8r6C4v/5fiZtl5H
+e3F04FdXmpiPO5QNJKRVGef+qO+Y3eFtVaVic0cyzgaQ2jHkGFJoQR1DYeZ8
+H7JAyEr3+nzIyi6QFcnKxJQ5KGrPrfCysV+sd6dAVra3V0RNAABgivzZ1St1
+2hSS5K9xtPsgW2TwJ3jjxUDP1XlMawfKHv+AXM6bDFwu0S5syUp2TJt1qFK7
+REA0ZwZOC84RMZx8UjVQXp0c5OLoMr6DcW7e20mKKOpQ1qetDLlF0X7OBpDO
+McQYUmlBHUPJg7WT3k1rMLSPPz8/a9K6Byys6FmRrAxMmYO8OnVb9K/hk530
+703IyvbuisgJAABm0Xp7+djphnW7VcraU76uS3L1uyDeWnQ6LMDLd2vExsD3
+Jto7eAYnV+omj8hDK601FS66E/tJQLTe+gDR/Ju/69yMJqOBj9YOdQNNYqKK
+tyn7/RxAUsfMi6GxFlTInvw4eeI3jwz/UFr8lfvk3WhVKAeKrOa4Sm1QLjgT
+FlciqviZ1/PeRKms5a5ICkUCAIAZEMKsVbM2ZLcYJnVr3mKnyT+V9+xORNMl
+79ccQtTzM0VNysejbGaeqdM+z9MNrdLy1Ji4bKMlB0prypZ7Z3at9HN5aajD
+8nRdOSnpo6/dx68vMJ4S03hF00CTMBzEuBhASsfQY0iuBQXyigM85yCj1+TE
+NxeNmXygAvEuMjBkNeEqkrJYZWLYkVKpSl5pfKegVJYh6FckgyIBAAAZXHhj
+d+iREpJtWuG1t+2nnqwx6DSacs/R5ZqlCnHuIvvXdXsQNEOroiZptr1r8D2j
+Su/U1tQQ4rxNziN8dSsEWFnkJKeleSR5T2OHuoFUKGrPfjrbV81012HDPfia
+f85Zk0M+CnI2gOSOmRVDlbEWFCiqfpni+NENwyFMlO0/mvefqp679d1x1qNH
+nAeErPSuoijbVHY87Hi5+mmG7E5BqazpOJt5RdL2kCcAghsAoNK8R5S898gD
+8q8hxTcCHHk/VxrMdfUTuO3eF2+46Z7fzdkuobbWSdudz9zf/bVR65+sZIf7
+2DX5JLsWVHZoG2gS0xNszgaQ0jH0GHbRUwsK5BWxPKclRgOkOPdjR94hw1CY
+ZADIararxgYfFIa/5THBQ8M4+6F/fdnZ/e11+bqbGrWylroiGRQJAAAoYE8v
+RMXd6ixzi7cUnb9Y2+P1Gqwsgjc+xDDX1Qk8Yf+f6r/sSEMvr92PuxbWZY93
+mjW0GlojpHWVDZimL2Plv8z/d/c6kvjmEhd+ci3JshK5VyYaaBJTgxhHA0jr
+GFoMqbWgACvdx3PfbPQmQntBqNuUyDLU17esXtZeuEqdJx0oBIffdDZ4iqFW
+1lJXJIMiAQCAMcqG9GCXF4b8RcuQoe7hfxr0G9mTXZ58w/3bjgS2GTln856Y
+2Kjv1m0/27XlK294cHGvzysvOm9IuVkmoavqbsoaIby+cqKti19I+NGkxBMZ
+FVLdjFP2eJfnrMMCss84SOwwaKApaAcxzgaQ1jG0GFJrQUV74cZJvmfqDP1X
+1ib58LY9RN0ht25Ze+cqRZ50QnKnoFHWQlckhSIBAIBVcGHWlo/29pwD6T/4
+9x4Ea4T41raAnffIT0Rh1yvW4FQAVX0RQ1H2ghlbSWbN7UVbvYNuMn2bnlWX
+2MfysiIbpFXWIlekgCoBAIBlZIK06Lirz7rniJoERl+doYCxNZkgPTbmch3V
+hgW7XrEJVwKo6pMYYqWR/uvvkm1ItN0NnROO9hL5IJYV0aAJZS1wRSqoEwAA
+WIfAGps6txxUSnFBytoxL776zv70AlGvv0FHsIZL64UY1ZyQXa/YhwsBVPVJ
+DLGyQ4v3FJNPmtuLfwwIL0G4OQ1aWZEN0iprkStSQZcAAAAA/QLe9Mf2sMuU
+b0soGzI2r/+tAXYiBiwmEgAAAKDvIVoLk47faaG79eAtt48ey7dM/Sagv2GQ
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAED/grfkRXwxlz/WYeLS
+g8USeK/XgkCo+wwINYtAMAFKZILL54os8z2ItCLx6F0RrsIq4n3G+DOpAgqY
+CVmoCXHRucsC+lMSLKj+QAWymkUgmAAFRGt+1Poz1b08JIvSurJdqRn2JPfX
+8ldAnUoLQh5qeXXK+qh8ysM5Lav+QAWymkUgmAA58qqEZT8UmF8pjCGSwn2f
+x5UhnsEJmINhqCUFPyxLqCK/+/SR+iYhFFb53MbNrIZgAgMBacnued8Xoxa8
+IYNoLz25duYbNn8b5uC1+vgT/dLQRGtR8uGsxt4dgEVjXw+sJvPkfx+20XdO
+ZqZQkJaf3hLk7z3un/ZTVyRWqY9YxkX3U5NzGnpR5wbpcl2QhVpa/P0Hu0vI
+NDZLfRaFUJ9kWpsdH+o35cNspFqHCI71UghcmBOxelNUwtGojasjbwj1jsrh
+WlazG8wuFHWpiycFdhVU4nYwgYGErHSvz4esLPG2P4xcd/BmPSZvunNw3sh/
+eOwr1Q6ZhLQq49wf9R3zdrytqlRsbvZR2tdD8ex/Xy6LNzn1YmIKCVnV6QOX
+qjuMKOsvLP6X42faw/vbi6MDv7rSxHp/o7gcdaiFmfN9yBpplvosCtHhsex5
+de3tUKdRiHV40RwzXwi88eInbu+nPuv4r8q6s7PdAi81dg6o3MtqdoPZde3a
+cyu8bOz1i/1xN5jAQAJ/fn7WpHUPWFjTkT+7eqVO268k+Wsc7T7IFml+Xp0c
+5OLoMr6DcW7e2+mqgSnr01aG3KKoC0dlX4+O1A/0XG26ZCYDU4jgcol2GUVW
+smParEOV2gU0ojkzcFpwjojlJRaKy1GHWvJg7aR30xoM3TBLfRaF0CJ7/ANy
+jXhEx8wVQlmTyLebmvBU85ygEMTz7LxPqauRczCrtbAUTK171anbon8Nn+zU
+oxAtV4MJDCikxV+5T96NVooNby06HRbg5bs1YmPgexPtHTyDk3uWVVa13l4+
+drphMWnT0NawNm1fWXvK13VJrn7isu4qvUFcdCf2k4BovdUzovk3f9e5GU1m
+3pxQL0eF7MmPkyd+88jwD81RvwfsCIE8nJohK6UQWG1mbJDPjM8TDkdsDvJ1
+dg88lpd2aEfIQk+nGRuyhC25C21H6u4XLdf9XrNbkoe2Wd/HWc1iMOWCM2Fx
+JaKKn3k9703WEEzA6hHfXDRm8oEKxLsI0XTJ+zWHEPXMSVGT8vEom5ln6rqf
+wwlh1qpZG7JbkMdjholHZb81b7HT5J/Ke7bFfFel5akxcdlGSxeUBpUt987s
+Wunn8tJQh+Xputoy0kdfu49fX2B2FTTEy1EgrzjAcw4yegPKPPW7fWNJCLrh
+FFUFSseohZAUfOlk63e+HlcRDWm+NvbLf2/GVYqqON7o9zMrrvgOt9UNoOLc
+hSOHz7yG9kzSx1nNWjCxysSwI6VSlbzS6N7E+WACAwBRtv9o3n+qem5tKmrP
+fjrb14A5a3K6+42mqnJ0uWYxQpy7yP717i0PXHhjd+iREoTXC7ovN9112HAP
+vvHl9KG2L7z2tv3UkzUGPc9cVxU1SbPtXYPvGZV9pjGoUn9PlLfJeYSvbv0M
+K4uc5LSUZHZoOsjmXI4CRdUvUxw/umG4FmKm+p2wJwTNcGqOCuSOUQqhai/a
+7OrQ+Rtx7oLRY7c/7Hi+JJ5f4Nu9mfQkZ8GoEXO7pvqi63NGMJ3q91dWsxTM
+prLjYcfL1c9PZPcmbgcTGBCIcz925Om2Rxijn8xt9754w027XkS0lybvPfLA
+zO84TU+KaO2LbwQ48n42bAvrrlIZ7KLtzmfu7/7aqLUrK9nhPnZNvvkbemiX
+o0BeEctzMh4HzFRfxaoQ5m2RIMtKLQTNcJooqDrhaavbInmaMNWOn1SLtlXf
+p1nNVjAfFIa/5THBQ8M4+6F/fdnZ/e11+bqbGoeDCQwU2gtC3aZElqG+pqZO
+5gn7/1T/t45hz8tr92P1DAt7eiEq7lZnQUq8pej8xVo0u6YSz4R9rCyCNz7E
+sMOw7iqZQUJaV9mAacYWrPyX+f/uXmQT31ziwk9G7IHmX44CrHQfz32z0Saz
+meqzKYQa2eOdZg2nSLJSC2E4nG7TG05rsOdpi9z81WtUKrz+/NwJS9NRi733
+YVarYS+YWhSCw286Gzw3cTaYwMBBWZvkw9PkDxIdyWwzcs7mPTGxUd+t235W
+vXeqbEgPdnlhyF+0DBnqHv4n4qBHm3gM7Mue7PLkG24ms+4qiUFCeH3lRFsX
+v5Dwo0mJJzIqpLoZsOzxLs9ZhwW9+MgJ6XJUtBdunOR7ps5wIDBLfRaFUCNv
+eHBxr88rLzpvSLlZJmE8VKHKSiUEgdVdj/F55WXent8rmsoyvh3/0jD+/quC
+xsKUYIe/j16efF+ENWeFr9oUnXAsZsuaiOxm5FlGX2W1GvaC2Q3JvYmjwQQG
+Fu1FW72DbqK+lKm/CMAhcGHWlo/29nw8YN1VBIOE+Na2gJ33KM8LYvly1Iiy
+F8zYSvJurnnqm8byQqBZY0OIfgOCCQxO2u6GzglHfY1Yk8xmLAZZHpkgLTru
+6rPuWSbrrjI2KBOkx8ZcruvlSXVs+I+VRvqvv2u0Ba4yU31GWFgIFGvsCNGf
+QDCBwUh78Y8B4SUIw5NSXJCydsyLr76zP71AxMFPuAmssalzM4Z9VxEM4tJ6
+IdbLuSU7/mNlhxbvKSZ/jR1ZfQQsJgSaNTaE6H8gmMDgQ9mQsXn9b6i7koCV
+gDf9sT3sMuXbEqA+AABcBW+5ffRYPlTwGYAQrYVJx++00N16QH0AAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPoLvCUv4ou5/LEOE5ceLJaw9lqz
+hcz2y0X7pS0DDIhh74EYAoMJaUXi0bsiXIVVxPuM8WftTEcLme2Xi/ZLWwYY
+EMPeQxZDQlx07rJA/5ARJj8BACuAULYrNTMwyf21/BVGdVo5ZrZfLtovbRlg
+QAx7D3kM5dUp66Py9Y+BZfITALAaJIX7Po8rY31yZSGz/XLRfmmLSQiFNQ05
+EMPeYxhDScEPyxJ6VPRg8hMA4AxEe+nJtTPfsPnbMAev1cef6BejJlqLkg9n
+NZp3iCUuzIlYvSkq4WjUxtWRN4R6Z/X0yiwjFHWpiycF9qh0w+W20EigB1aT
+efK/D9tMDZcEVpsdH+o35cNspKp2tPSMJy66n5qc04BWCstSacbAvh79EENy
+x8yKYRcM01ta/P0Hu0ukiD8BAI7Q/jBy3cGb9Zi86c7BeSP/4bGvVHtAPyGt
+yjj3R33HnApvqyoVI44ceOPFT9zeT33W8d+UdWdnuwVeasRZMMsIRe25FV42
+9npV2LjdFkoJ9Nv07H9fLotn8GRByJ5X194OdRqFWHGVBuN4qtqLowO/utLE
+vMUWSjPT9vXb0R8xpHYMOYZamKe3MHO+T89AMPkJAHAC+bOrV+q0mSnJX+No
+90G2SPPz6uQgF0eX8R2Mc/PeTlINjxZlTSLfbmrCU828UCGI59l5n1IXju6l
+WSbIq1O3Rf8aPtlJ13k53hYqCfTouDsGeq7OY1p6UPb4B+Rq4NTuGcVTDdGc
+GTgtOEfEcNGLhTRT1qetDLlFEQLOxpDOMcQYag0ipLfkwdpJ76Y16Nln8hMj
+aCMPAL0Gby06HRbg5bs1YmPgexPtHTyDk3uWfFa13l4+drphzWkqsNrM2CCf
+GZ8nHI7YHOTr7B54LC/t0I6QhZ5OMzZkCVtyF9qO1HXDlut+r9ktyWNvp5u6
+LXLBmbC4ElHFz7yeYyl329IDcgmUtad8XZfk6jeHVk3kcdWMeBLNv/m7zs1o
+MhzUWE6zbhgXAedcDCkdQ48hWnrLnvw4eeI3j6RoPzECyq8DloZouuT9mkOI
+eqKmqEn5eJTNzDN13SsKhDBr1awN2S2MZ3GSgi+dbP3O1+MqoiHN18Z++e/N
+uEpRFccb/X5mxRXf4ba6EVycu3Dk8JnX2Nv/oGoLVpkYdqRUqpJXIt2b+rkt
+3Y2ikKA1b7HT5J/Ke462NGrSjavS8tSYuGyjlST0eEoffe0+fn2B8ZMOy2nW
+BcMRknMxpHMMMYao6S2vOMBzDtJ/+5HJT4yAexNgcTQVn6PLNUsM4txF9q9/
+pisPjgtv7A49UkKxhUxKe9FmV4elmjFbnLtg9NjtDzsmX8TzC3y7N5Oe5CwY
+NWJu17OG6PqcEUyfNRS1Zz+d7WvAnDU5hoMNSVuayo6HHS9XTzCR703925ZO
+qCUQXnvbfurJGoOxkFpNmnFVUZM02941+J5RWXjkeGJlkZOclpIFgtU0647h
+dNdhwz34VhZD+oYjxRA9vRVVv0xx/OiGGO0nut8gRR4AeoN+wrfd++INN+2z
+PNFemrz3yAPEonY043mioOqEp61uj+ZpwlQ7flItq+89GLflQWH4Wx4TPDSM
+sx/615ed3d9el280gHCwLSoTEohvBDjyfq40WKWiUtO8vRLkeMpKdriPXZMv
+YWKqN2nWhenZOwdjaKLhKDE0I73lFbE8px7zKCY/MQKemwCLo074Cfv/VCd8
+R0p6ee1+rJ6FYU8vRMXd6izIircUnb9Yy+ytHcPxfJveeF6DPU9b5OavXiRT
+4fXn505Yms5ysXHytmhRCA6/6dyb56a+bYspCbCyCN74EMMhjDoCssc7zRpX
+keIpvrnEhZ9MdpNmN826MDVCcjaGNI6hxlAL0/TGSvfx3Dfrv2DC5CdGwL0J
+sDgdCW8zcs7mPTGxUd+t235Wvb+qbEgPdnlhyF+0DBnqHv4nkzGDwOqux/i8
+8jJvz+8VTWUZ345/aRh//1VBY2FKsMPfRy9Pvi/CmrPCV22KTjgWs2VNRHYz
+2w8aJG3pBu3e1M9tYSCB7MkuT77h9j5FBOQNDy7u9XnlRecNKTfLJIxvoqjx
+lD3e5TnrsIDsAx0W00wP2hGSszGkdQwtht0wTe/2wo2TfM/U4Wg/MQLuTYDF
+0V8osHYGUltMgwuztny0t+fslt0IoFkjxLe2Bey8R37cDUelGXwxFGUvmLG1
+R4OZ/AQA+h5NwkeWcW3QMIuB1BZGyARp0XFXn3XP+9mNAIo1mSA9NuZyHdVb
+4NyVZnDFECuN9F9/tw3xJwDQ1yjFBSlrx7z46jv70wtEFjwvqC8YSG1BgMAa
+m7DOaTa7EUCzhkvrhRjVCw1cl2bwxBArO7R4T3E74k8AAAAAwFLgTX9sD7vc
+oET7CQAAAABYCqK1MOn4nRYc7ScAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAGXhLXsQXc/ljHSYuPVgsgcPiLQtE29LIn55Y8taPJabLlAMmgEiy
+yIANpkxw+VyRmQfxm0BakXj0rghXYRXxPmP84fhDy0IWbUJcdO6ygD5pjRPA
+gilhxRCSx6f27+JP2zEAB4G+BSLJIgM2mERrftT6M9WoBZ+ZWle2KzUjnOT+
+Wv4K2mKRQK8hj7a8OmV9VD75CZkqsgSwbEpYLbgw72jSw5pr8/gDbhDoYyCS
+LDJwgymvSlj2QwFJrS52kRTu+zyubGCFjrsYRltS8MOyhCrye41xAvRRShAK
+q3osk9dePPz/qjFVSxYXBwFrCia3I2llDOBgSkt2z/u+WMqCJaK99OTamW/Y
+/G2Yg9fq40/0aykTrUXJh7Mae3cKFY19PbCazJP/fdhG31GZmTIDRV3q4kmB
+XWVicNH91OScBrJiM6zR84oayKItLf7+g90lZDIbJwBZSrAYfPXhobXZ8aF+
+Uz7MRqpDR26L1LFeRh4X5kSs3hSVcDRq4+rIG0LNGTWy0sgFH8ybP3++v/eo
+4WP9VhyuNPvEa84GUyUtP70lyN973D/tp65IrFI3cNBEkv0xwdqCyTVkpXt9
+PmRlF6j9YeS6gzfrMXnTnYPzRv7DY1+pNkiEtCrj3B/1HZN2vK2qVGzuDYrS
+vh6KZ//7clm8yaczJqbMQVF7boWXjb1+CbP24ujAr640WepsSOMrUkVbmDnf
+h6ydxglAlhIsBr/DRdnz6trboU6jEGukkkHtmPmRxxsvfuL2fuqzjv+qrDs7
+2y3wUqP+CWqi7AXeO3szQeVsMGVVpw9c6piCq5T1Fxb/y/EzbSGIQRFJ1scE
+qwsm18Cfn581ad0DFpZv5M+uXqnTyinJX+No90G2SPPz6uQgF0eX8R2Mc/Pe
+TleSS1mftjLkFkVpSir7enSIF+i52nRtSwamzEFenbot+tfwyU49ymsSzZmB
+04JzRJZYcTG+InW0JQ/WTno3rcHQDeMEIEsJFoOvRfb4B+T63STQOWZu5JU1
+iXy7qQlPNbNbhSCeZ+d9Sr8GOINBoK8yWQtLwVThcol2ZVBWsmParEOV2kXg
+fowkLZweE6wtmJxDWvyV++TdT5BahLcWnQ4L8PLdGrEx8L2J9g6ewck96x+r
+Wm8vHzvdsJazaRgXMia3r6w95eu6JFc/DVl3ldqgXHAmLK5EVPEzr+e9qSMX
+f/N3nZvRZObNyYwrkiJ78uPkid88MlzVM04AUynBTvCRh1MzpKSMPFabGRvk
+M+PzhMMRm4N8nd0Dj+WlHdoRstDTacaGLGFL7kLbkbqhqeW632t2S/LQ3uHp
+40xmOZi46E7sJwHReivA/RdJxnBxTND81hqDyQnENxeNmXygAvEuQjRd8n7N
+IUR971fUpHw8ymbmmbruOzghzFo1a0N2C/JgzLBHU9lvzVvsNPmn8p5tMd9V
+aXlqTFy20cM3uUGsMjHsSKlUJa80vlNIH33tPn59gdnVyNCvSIa84gDPOcjo
+PUnjBKBPCbaCTzecIkWezjHqyEsKvnSy9Ttfj6uIhjRfG/vlvzfjKkVVHG/0
++5kVV3yH2+q6vTh34cjhM6+hPZP0cSazGUxly70zu1b6ubw01GF5uq5OUb9F
+kiFcHBNU1hpMjiDK9h/N+09Vz805Re3ZT2f7GjBnTU63XJryx9Hlmmdgce4i
++9c/09UoxoU3doceKUHYSuy+3HTXYcM9+MaX04favvDa2/ZTT9YYJI65ripq
+kmbbuwbfM6q9TGKwqex42PFy9VyJ7E6BlUVOclpKMsUxHWczr0janqpfpjh+
+dMPw74wTgDQltLAXfJrhFCXy9FJSRl7VXrTZ1aHzN+LcBaPHbn/YMa8lnl/g
+272Z9CRnwagRc7smqKLrc0YwnaD2VyazHEyV+pu4vE3OI3x1a8D9F0n6rtEJ
+F8cEqw0mZxDnfuzI0y2FMkZfi7Z7X7zhpl0sItpLk/ceeWDmJ5umZ5u09sU3
+Ahx5Pxu2hXVXjQ0+KAx/y2OCh4Zx9kP/+rKz+9vr8nXJKSvZ4T52Tb75e3rI
+VyRDXhHLczJOZuMEoEwJFoNv3hYJspTUkacZBBIFVSc8bXUL+08Tptrxk2rR
+9q77NJPZDWYXbXc+c3/310atf/0WSdNwc0yw0mByifaCULcpkWWor6SotZiw
+/0/1f+sY87y8dj9WT+Gxpxei4m51VoXEW4rOX6xFs2uqR5uwj5VF8MaHGErO
+uqvkBrUoBIffdDZ4ihHfXOLCT+5FGiFfkQysdB/PfbPRqyjGCUCREiwGX43s
+8U6zhlMkKakjbzgIbNMbBGqw52mL3PzVKysqvP783AlL0xsQK532YSarYSuY
+hLSusgHTjKBY+S/z/929DNVvkTQFd8cEKwwmt1DWJvnwNBFAokMLm5FzNu+J
+iY36bt32s+qtP2VDerDLC0P+omXIUPfwPxFvebQ9moF92ZNdnnzDPUzWXSUx
+2A3JnUL2eJfnrMOCXnzkhHpFUtoLN07yPVNnmM3GCUCWEiwGX4284cHFvT6v
+vOi8IeVmmYRxB0OVkiryBFZ3PcbnlZd5e36vaCrL+Hb8S8P4+68KGgtTgh3+
+Pnp58n0R1pwVvmpTdMKxmC1rIrKbkacVfZXJatgLJiG8vnKirYtfSPjRpMQT
+GRVS3fND/0WSFi6PCVYXTO7RXrTVO+gm05dVu9B/huUQuDBry0d7ez4bsO4q
+mkFCfGtbwM57lOcFsX9FCkTZC2ZsJXmD3zgBzEuJPgh+30e+3+BUMCGSphgs
+wexj2u6GzglHe4lcqwX6UmAfIBOkRcddfdY9T2LdVRSDMkF6bMzlul6eS8dG
+E7DSSP/1d8l2pIwTwKyUUGPh4Pd95PsTrgQTImmaQRTMPqW9+MeAcJRvtpTi
+gpS1Y1589Z396QUiDj5XElhjU+c6L/uuohnEpfVCrJcTJHaagJUdWrynmPw1
+duMEQE6JbiwW/L6PfP/DhWBCJE0x6ILZhygbMjav/21g76sNbvCmP7aHXW6g
+6jfGCQApAQAAB8Bbbh89lg/FegYmRGth0vE7LXQ3GuMEgJQAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAzAZvyYv4Yi5/rMPEpQeLJfBuOjIW
+CiDo0ntAGgCwWqQViUfvinAVVhHvM8afSUlYoAcWCiDo0nv6UBpCXHTusmAA
+FV4HgP6GULYrNTM/yf21/BVG5XcBU1gogKBL7+lTaeTVKeuj8uGo2MEIobAa
+2a3IVR2Swn2fx5VxbeJnRZG0UABBl97TR9JICn5YllAFx8VyH2nFuV3fRMQd
++Xn3l8u3nqsmkQyryTz534dtprKcwGqz40P9pnyYjVSjjdxWe+nJtTPfsPnb
+MAev1cefaCs846L7qck5DTSVnPrBVZW0/PSWIH/vcf+0n7oisQpj5CctuDAn
+YvWmqISjURtXR94Q6p2VRLQWJR/OauzdAZvksTXEiiNJ08BeBXCw6mJuZyTD
+WGLdVfpOGmnx9x/sLkGtuQf0McqapFm8TYXqA7aJ5isfePzf2wZP1Ipn//ty
+WTyDyQwhe15dezvUaRRi/VAy2h9Grjt4sx6TN905OG/kPzz2lXZlcXtxdOBX
+V5pIM7hfXJVVnT5wqbrDPWX9hcX/cvxMW0aDzk968MaLn7i9n/qs478q687O
+dgu81NjZ1QhpVca5P+o7Jg94W1Wp2NyBkDq23Vh1JCkb2LsADlpdzOuMpFBI
+3OfSCDPn+5DFF+ASCkH8VLsZB0o70l1RfeytN7/uWa+1Q/VAz9Wmi8JqkT3+
+Abm2NQnyZ1ev1GkzR5K/xtHug2xR1++I5szAacE5IqOJY/+4qsLlEu26iaxk
+x7RZhyrlJvw0gbImkW83NeGpZj7aoQ7PzvuUuvq0vDo5yMXRZXwH49y8t5MU
+Oew2UZ+2MuQWRSDoYtvVJKuOJFUDEQJIxqDVxazOSAGFxH0ujeTB2knvpjVY
+03rnYARvvhrqMXz0/G8P7QrdcvxhzzctlbWnfF2X5Or3Bry16HRYgJfv1oiN
+ge9NtHfwDE7urnGO3B1orWlovb187HT9mtBE82/+rnMzmgwSq59dxUV3Yj8J
+iNZbKKDwU6XCajNjg3xmfJ5wOGJzkK+ze+CxvLRDO0IWejrN2JAlbMldaDtS
+1/1brvu9ZrckD213mLaguT5Gse3879YSSTOShw7QhbXOiCyxCdiWRvbkx8kT
+v3kEq3qcp71oj7fry0NtfMIu1fdcPm7NW+w0+afynp2EaLrk/ZpDiHq2pKhJ
++XiUzcwzddqnZbruIC1PjYnLNloAoLGm/q0wa9WsDdkt+rkvffS1+/j1BQaT
+q/50Vdly78yulX4uLw11WJ6uq/JE7qcaScGXTrZ+5+txFdGQ5mtjv/z3Zlyl
+qIrjjX4/s+KK73BbXdcS5y4cOXzmNbS5L8MxkCy2aqwokujJQwvowlJnpDNF
+LrEp2JVGXnGA5xwEL1VyHExwbNm8nx61Nvyx+/2RwyZ9/UCi90vhtbftp56s
+MUggTQHl6HLNc744d5H967p1Y5ruoKhJmm3vGnzPqKo5tTUVLryxO/RIicGu
+MFYWOclpqeHEqJ9dVak/ncjb5DzCV7dUQO6nmvaiza4Onb8R5y4YPXa7eiGV
+eH6Bb/dm0pOcBaNGzO2aBIquzxnBdH6uqD376WxfNdNdhw334Gv+OWdNDvnY
+TB5bNdYUSeTkoQV0YakzmjClMpbYFOxKo6j6ZYrjRzeYro4C/UJ70RaPqZFl
+6gwiWv74dIxz8H29m5P4RoAj7+dKg8UF/axru/fFG266p2NzlriprBHtpcl7
+jzwwrs4nK9nhPnZNvqTnT/vT1S7a7nzm/u6vjQSdn2poOlqioOqEp61u8fxp
+wlQ7flIt2t6w6fk5ZWzVWFMkkZOHFtCFpc5I71gnPSU2BbvSyCtieU6oS7JA
+H4OVRb05bmXn/ir25/5pnuF/Yvq/jeCNDzHMPHXWTdiv+bsOkb28dj/uWkqW
+Pd5pVncwtoY9vRAVd6uz1izeUnT+Yq3OLfHNJS78ZMPk6y9XCWldZQOm6WFY
++S/z/929TEHupxrDjrZNr6PVYM/TFrn5q1cvVHj9+bkTlqajlnY3NQbSxFbz
+ayuKJHLy0AK6sNQZqUxRS2wKdqXBSvfx3DejvnMB9DFEW3H8qv+z8vuf4g/t
+27rlaHHPLydkT3Z58g13ZTuyzmbknM17YmKjvlu3/WzXJqe84cHFvT6vvOi8
+IeVmmYRxvyWxpmxID3Z5YchftAwZ6q53x5Q93uU567DA6LuK/nGVEF5fOdHW
+xS8k/GhS4omMCqkufFR+Eljd9RifV17m7fm9oqks49vxLw3j778qaCxMCXb4
+++jlyfdFWHNW+KpN0QnHYrasichuRn4pmXYMpI2t1nMriSS5HQYNJAV0Ibdm
+VmckN0UtMT2sS9NeuHGS75k6xLkFwC1wYdaWj/b2nGHoP633HjRrhPjWtoCd
+98iOHOGUqzR+ch/riSS7XnEdTumismJpRNkLZmyFxybrRyZIi467+qx7uqbJ
+us49KhZAsSYTpMfGXK6jfCeYK66a8pP7WEkk2fXKCuCKLiprlgYrjfRff9fo
+RRDAGiGwxqbOZWKVUlyQsnbMi6++sz+9QNS7Q1qQreHSeiFm4kmEC64y8ZP7
+cD6S7HplNXBBF5U1S4OVHVq8pxiemgAAAACugDf9sT3sMuOXMAAAAADAwhCt
+hUnH77TAWxAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB04C15EV/M
+5Y91mLj0YLHE6j8o5TIQau4AWgAAC8gEl88VIdYDYIi0IvHoXRGuwirifcb4
+MynaCZgJWagJcdG5ywKZqf/KBAsmycDDwloAwGCAaM2PWn+m2kJntxHKdqVm
+PJPcX8tfAZUiLQh5qOXVKeuj8nt7Zqxlk2TgYUktAGBwIK9KWPZDAUltL3aR
+FO77PK4MJo19gGGoJQU/LEuo6tVtpY+ShFAMtGHbAloAwOBAWrJ73vfFUtN/
+yMBU+ektQf7e4/5pP3VFYpX++cFEa1Hy/2fv3MOauLZAf/rX+Y5tT2s9VIRD
+PSAUVAQ1Wqm8Wj2tKLa2VK8v8H60th5UVHwXbXtqa1GRV8XaAypaAQWxn5Vb
+FGvRIgj4BARFKY9ECCKPkEAek2Qml4QQ8piZzCQTEmD9/vIbydprr7X2nj1r
+z+x1tLDdvCOoMFHtqQ1zXrd7YbSz37qTjwlqZSPNBad+ftBjZI4jVtUMZC05
+y6aFlqkLNaP8ezmZxW14lWkYQ7dFFXimFld//V5MjRk+xgsSJt2hwBBuUWpU
+0IwPimhVsiPQ1sC5FvUFvbA32xcAMDKQ1O4P+ICRXSAJ+8yhS029Q1PeemHZ
+ay6faI6Qx8Ts/HN/tPauFdEedq3A1BuU6EH8xsOlrYi04/bh9+1f8j5Qa3hL
+kT39ZdOqVKNPZ4SqmoOMe261n53TMq07hag6MfTzKx2WOhXSsEUiU/MKFgXg
+2YsieEHCoDt69ZY8a+LeinIdR7PKKq6y+M61lC9oh72ZvgCAkQH67PzcaRsr
+mEjWoFKhOiMjqdkza+6Rxr7EhbQpM8zdxX1yL5M8/XeT1eOSt+auibwpwP9P
+6dOrV1rUI1pYvt7F8b0ivr4G7RdDfdaVEQgwrqo5SJtydiX+GjvdVfvepMA6
+C0JnRRTzLZGpMmyR2NTCig3T3sltI1ODxPh4QcKkO/qQPPqWdgVwXG0JnGsh
+X9AOewq+AABAXP251/SYx7S2gdDuqjPRIX6BO+O2hr471cnZJyKzcUAAyr+d
+vDIk0ZSsBWnJaW26b4VPfFO/trRCzj0d6LG8RHsuZFZVYmlSTlZ0Sg2/4QeW
+7r2pd0L8LdhjYX6HiTORCS3iInn83fSpXz4k6yiJ8Y0FCTPuoH1voutci/kC
+vzkiKPgCAABB6dIJ0w810HxuwDou+b/qHKlcg8qasz8aZzcnq0WVs5B33c3a
+uybI/cVRzuF5tCucULw3YbzCtXO3FHXpzzHdZctcp39fr9sXE1UV1+ckpRQZ
+ZIDwpSGN6dHHasUKaaPhnUL88AuvyZsrTa5DRr9FPKQNh1huYaQvSZIYnzxI
+mHEH+b2JljsURM61jC8ImyOAgi8AAOAXBY9n/Y+tu0ks4579eF6gHgvWFw9M
+P6pyyYn1qpyOoGSp0790tmwwQdk2t7GBVPMWA8296TF6jLevYXPaoLwbMVHH
+anC23nnX3naaeapZb2owSVVZc8Y8J4+Iuwb7UDjSOupORp+sV66g8e4USF38
+NNcVZYYzkXEjm9giHjL2jzNcPryB83dUjI8bJGqYcwfJvYmOO0icawlf0A97
+Yl8AAKBBUPKRC4v+fov2IO25+9nrnno5ip7bn3i982s7zeyJ8ecmTFSbuf9Y
+Bf4HoIIbIS6sH/T7wqyqhtIq7se+5T3FW8Ukp1F/fdnN6+2N5ZopS1Kzx2vi
++nLTN/Rot4iHtCGZ5bocZ1YegOy5iShIGHWHKftN9JxrAV+YEEsUfAEAgKgy
+ynNGfB3dt4aUg3TKwT+VP+sdan5+MY8kCkzc0tiGqMYlUv/jov8wn9NDnlxI
+SLnZV3IS7ao6f5GrozdSF8eaHKk/9TCrKp40DTLO0Tfc9J5iBKXL3X0zuaa/
+Hka7RTyQ2gMsr+1k76GQGZ8gSBhzRx+SR9+YdG+i7lyL+IJ2LFHwBQAAcm5G
+AGvXA7obs72D1M5+wfZ9SckJ/924+6xyTxjjXV8z1cE9KDL2eEb6T/kNYvpb
+zqT3JnlbXoT73577i5rnRnnF/qk3W0oe7/Xx1d+TZ1ZVHGkD4NwpJI/2+sw9
+yjHjwxq6LeIiur91WmBWC1khaRLj4wUJg+5QIm2ruLg/4JXn3bZkl9YJKRe8
+puVci/iCfixR8AUAAApR1U7/sFK6yW/t5IYNgfIKd3y4X3dJyqyq9KRhgpu7
+Qr65a9YZNYzozy9aPHun6Ut104LEttwxXHwBACOFnjtRC2LpvUSuHqT0U4GD
+gISTm5hy9enAYp1ZVelIk3DykpMut5j57RQT+iO18cGbzfnA2KQgUWIr7hhG
+vgCAkYKo+ruQ2Boa845cUJm9YcLz//j3wbxKvqXOPDADDGnv6NsAYFhVetJQ
+cSsPMfMLS2b0R+qOLNtXbdZKnXaQDGAL7hhWvgCAkYK8LX/75t/aIAE+PEE7
+/tgdfZn2iyl6QJAwATO+AIARA9p16/iJcijNMwzBuu9nnLzdxcA9BYLEXJjz
+BQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAVkH65Kflb31n2iep
+gB5gTAYBYzIL2NNqSDiXz1XBpyu0wISPTh/c6ztrD0Ss+YAxGQSMySxgT6uB
+dZcnbM5qMvOssREGyis7nvGg+dr7vhCxZgPGZBAwJrOAPa2HlJ226ttK0wuu
+MQUmGzrPbVLuxaP/rwlRdBXaYsQOJUsqbN2YQwwwJrOAPa2IuCbm/a+raRZw
+wkS1pzbMed3uhdHOfutOPsapyK0EaS449fODHmMTJYZwi1KjgmZ8UESrrhw+
+4vozO8KC/Sf902nm6nS28sRolH8vJ7O4zdSyPSivOG7dtoS04wlb18Xf4KkO
+nJHUxi9+7/1FixYF+48bMzFo9dFGk4+mtl1LqpG15CybFtpfImrEGJOaKDqM
+4Mhk3phqhlJwAnSR1O4P+IC0DjoOogfxGw+XtiLSjtuH37d/yftAraHHZE9/
+2bQqtc74SgOTPGvi3opyHUez5ikeEvaZQ5d6VzkKeeuFZa+5fKKuRSCqTgz9
+/EqHCUdsou0XV3rOz3na+1N5y9l5nqGX2rWPQ+MXLfb/xpzVlM1asr9t7rnV
+fnZO2uULR4QxqYiixUiOTMaN2d/8UApOgC7os/Nzp22soJfRkz69eqVFHV7C
+8vUuju8V8fXltl8M9VlnvCCrGsmjb2nX48YDlQrV+SxJzZ5Zc480qjfRsM6C
+0FkRxXy6CzZ5c7qv48y0J6qlmIyTynL0P61d05tCxMpbc9dE3iQwhO1ask+9
+ppxdib/GTnfVKa07AoxJQRRNbDAySbFpY/aJtbXgBJhFXP251/QYU6rGqem+
+FT7xTf3C2wo593Sgx/IS7bBFu6vORIf4Be6M2xr67lQnZ5+IzIH64rRnVFJp
+vQ/3t5NXhiTWDGQqsc7fgj0W5ncYhCzCLUgOC5j9adrRuO1hgW5eoSfKco/s
+iVzi4zp7SyGvq2SJg71mKHVdD3rVcXlZN2UtlZAWmtfG5iwp5WRFp9TwG35g
+6Q7/kWNMElGEDJ3IpIwtGtMGgxNgFkHp0gnTDzWY+o4exitcO3dLUZd+IHSX
+LXOd/n29rlis45L/q86RyjWNrDn7o3F2c7Ja1CsTshlVXJ+TlFJk8JhOKE3e
+dTdr75og9xdHOYfnaUrliB9+4TV5cyVOUTdh5SZXh6DzragCa8sNtHMK/70T
+VcjYKazx8wsargSOcdDEqKBkif2YOdfoPZNQnE5tzpJIY3r0sVqxQtpoMPxH
+jDFJRCkZ4pFJEVs0pk0GJ8As/KLg8az/sXW3D2Xcsx/PC9Rjwfpi/ZhCeTdi
+oo7V4Gxt8q697TTzVLNeoKlKWifWqx7vBSVLnf7Vn3Unm1FlzRnznDwi7hpU
+sSaWpgQTlG1zGxuY26ZWDqmLn+a6Am8lJKra7uHc9z+CksXjJ+5+0LuoxZ5d
+8HV8I+Nx8eJxYxf2r6b41xeMpbqaGrDhmx6jx3j7EtmwD5uzZEfdyeiT9col
+Kt7wHynGJBGlGAaRST66jVnAesa01eCkYk+AMoKSj1xYmuQ3HTBRbeb+YxX4
+H+wKboS4sH7QF6sdZj13P3vd88uH6tyGKbskxNL66Ln9idc7v7ar9ZPU7PGa
+uL4cZ2ONJGLTOeyffBw0WegnaTMdfTO49DZajS/1bdCSFfdj3/Ke4q1iktOo
+v77s5vX2xnLNvDEyjEkqiowhEpnGsU1j2mpwAswiqozynBFfR/u9GeTJhYSU
+m30lPNGuqvMXuToikLo41uRI/fhQhtmUg38q/1LakOznF/OoPxktefSNSTOq
+vjRM3NLYhqjiH6n/cdF/BjIngtLl7r6ZeNGmH7G7tCK2GXmWu9QzWJkGUKCt
+5xdOWZFHtyy5senURi2pQcY5+oab3tJ0JBjTiCgyhkhkGsN2janBpoITYBY5
+NyOApfIRnR+15UW4/+25v6h5bpRX7J96sSZ5vNfHV3/PszfM7OwXbN+XlJzw
+3427z/Zvk0rbKi7uD3jlebct2aV1QsoBgSMN411fM9XBPSgy9nhG+k/5DWLN
+Kk3yaK/P3KMcg08fMKTlelLAKy+z9v3e0FGX/9XkF0f7HrzKab+fHeH89/Hh
+mff4SGdh7NptiWknknasjyvqpL2UIp1ObdaSA+AM/+FvTAqiSBgikUmKLRtz
+AJsKToBhRFU7/cNKqb6hTB2UV7jjw/1VOjuS2o/n5kNDGia4uSvkm7vdQzID
+bFOWVIAxjQORaR1jKoa4PQE9eu5ELYg14yVyYiSc3MSUq08H1lWqMDMhgYgP
+ZWkSTl5y0uWWIXxeoK1YUgHGpAJEpjWMqRgO9gR0EFV/FxJroa/KMKS9oy/J
+rpALKrM3THj+H/8+mFfJN/t5mYY0VNzKQ4b8OsoWLKkAYxoHItM6xlQMF3sC
+Wsjb8rdv/g12/gAAAABbAu26dfxEOdRvAgAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAABc0K6yuM8W+k50nrricLWQsffvLSR2RAGuAZgCnA4M
+NcQN6cfv8FEF0pAaMCGYSi1Wa4odUYBrAKYApwNDDkwukqtWUcJ7G3xX32Sq
+fLOFxI4owDUAU4DTAV0w2ZB5eBbeP/BpSh3jxxFaSKyZDCG/KEaSa4aWX4Yi
+Nuh0wCiYqPbUhjmv270w2tlv3cnH+CWXFUhzwamfH/QYG0IYwi1KjQqa8UER
+rep4+Ijrz+wIC/af9E+nmavT2cqTjFH+vZzM4jaD4i7kOhF3EOuuyjxa2G7a
+sZYorzhu3baEtOMJW9fF3+BpnWdollgKamthDb+okbXkLJsW2l98ZyS5RiFu
+OLf3y7iUYz/EbArfea4J5+DsIeQXSqpSi0Y6MDS6B7C004HBRvQgfuPh0lZE
+2nH78Pv2L3kfqDU8zl729JdNq1IprDowybMm7q0o13E0K7fiIWGfOXSpqVcZ
+eeuFZa+5fHKnr2qzqDox9PMrHdTjjLCDmJidf+6P1t6JBe1h1wpoRi7afnGl
+5/ycp70/k7ecnecZeqkdZUCscbW1sIpf+tvmnlvtZ+ekXRhupLhG3pwxl7Xt
+vrLuEdZ55T3v/3tLL1U0hPxCUVUq0UgLpka3Bks7HRh0pE+vXmlRx5mwfL2L
+43tFfL0/6fV6qM+6Mqr1CyWPvqVdVRwPVCpUZzokNXtmzT3SqF6dYp0FobMi
+ivkUV25EHZQ2ZYa5u7hP7mWSp/9u3QprxpE3p/s6zkx7olrkyTipLEf/08o6
+0jTEyltz10TeJDCr7fqlT72mnF2Jv8ZOd9UpWjpsXENOr8yZjrMP1fZO6LKm
+E2+98YVu3ekh5BeqqlKIRpowNLo1WHo8Atal+1b4xDf1izQr5NzTgR7LS7R9
+hnZXnYkO8QvcGbc19N2pTs4+EZkDtZZpjzVSab0P+reTV4Yk1gwMf6zzt2CP
+hfkd+uFLLoe4gwQg3ILksIDZn6YdjdseFujmFXqiLPfInsglPq6ztxTyukqW
+ONhrRmjX9aBXHZeX0dtpJS1QblxtK/pFysmKTqnhN/zA0p0Dh41rjIB2Xo3y
+HjN+0VdH9kbtOPlA983kIeQXuqqqoOUp5ka3DY1HYLDBeIVr524p6tIPiu6y
+Za7Tv6/XjUWs45L/q86RyvWNrDn7o3F2c7Ja1E/LZGNNXJ+TlFJk8MhOKE3e
+dTdr75og9xdHOYfntfX/TPzwC6/JmysNl0AkWpF0kBBh5SZXh6DzragCa8sN
+tHMK/70TVcjYKazx8wsargSOcdBEv6Bkif2YOdforX0pjgWb8wvSmB59rFas
+kDYazIHDxTXGEVXt8/d4eZRdQPSlVt0NkiHkF7qqKsg9ZeHRbSPjERhsUN6N
+mKhjNTh7nLxrbzvNPNWsF3GqUsuJ9arnfEHJUqd/9WeMycaarDljnpNHxN0e
+/f8glqYEE5RtcxsbmNumVg6pi5/mugJvVUQih7iDhIiqtns497UjKFk8fuJu
+Ze4Ge3bB1/GNjMfFi8eNXdi/TuNfXzCW6jpNxj378bxAJW96jB7j7av654L1
+xfgTs835paPuZPTJeuXKF28OHC6u0QLHNQjnxKr3v3/Y3fZHzHz70dO+qBBq
+/ecQ8gtdVck9ZfHRbQvjERhkMFFt5v5jFfjFCQU3QlxYPzTqPcNrx1vP3c9e
+9/zyofq53JT8ObG0Pnpuf+L1zq/tav0kNXu8Jq4vF1KXQ9pBQkjGQjqH/ZOP
+gya//SRtpqNvBpfePqvxdZoN+qXifuxb3lO8VUxyGvXXl9283t5Yrplqholr
+jDW+w3tmfJ2yK1jXHx9PcIu4p9XhIeQXeqqa5ikSgf1QHd1WH4/AYIM8uZCQ
+crNL9VYL2lV1/iJX5x0cpC6ONTlSP1aU8Tbl4J/Kv5Q2JPv5xTzqTyJLHn1j
+0ljTl4aJWxrbEFXAIvU/LvrPwFO/oHS5u28mXuTha2Wkg4Toj4VdWmOhGXmW
+u9QzWJlgUKCt5xdOWZHXhhqVqIOxsWCjftEg4xx9w01vfT5MXEMOUpfwxqQ1
+fR1H/jw4yyf2T0T7f4eMX+ioaqqnCASaMrqtPB6BQUbelhfh/rfn/qLmuVFe
+OgNNieTxXh9f/c3P3nizs1+wfV9ScsJ/N+4+27+9KW2ruLg/4JXn3bZkl9YJ
+KQcHjjSMd33NVAf3oMjY4xnpP+U3iDXLNcmjvT5zj3LwPoPAkUOhg7hgSMv1
+pIBXXmbt+72hoy7/q8kvjvY9eJXTfj87wvnv48Mz7/GRzsLYtdsS004k7Vgf
+V9RJe2VOOhZs1i8D4MyBw8U1xhToqU5d+3/WfP196pEDO3ccr9b9NmgI+YWq
+qqZ6ilAg/dFt5fEI2CYor3DHh/t1X7/Ufk43HxrSMMHNXSHf3O3GzSwwq5Wt
+Y1N+UYBr+hlCfrG8qvQEkoYQAOAg4eQmplx9OrDAUsVbX86dAShLk3DykpMu
+txC9wMqsVkMAW/GLAlyjw9Dxi6VVpSPQmKoAgAuGtHf0JYgVckFl9oYJz//j
+3wfzKvlmJ0xoSEPFrTyEaE3FrFZDBlvwiwJcY8BQ8IulVaUnkIqqAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAwHAD7SqL+2yh70TnqSsOVwth29gULGRDcA0AACMV
+cUP68Tt8VIE0pAZMCIbPBE3BQjYE1wAAMGLB5CK5akUuvLfBd/VNRus+jBQs
+ZENwDQDYPJgMMhqWRXj/wKcpFMqqDi5Dy+8WsqFtugYAhiTihnN7v4xLOfZD
+zKbwneeacL7KRpoLTv38oMfY1IMh3KLUqKAZHxQxUC1HXH9mR1iw/6R/Os1c
+nc5WflOO8u/lZBa34R3WRkdPTFR7asOc1+1eGO3st+7kYzqVGciRteQsmxba
+f46ZcW1JQXnFceu2JaQdT9i6Lv4GT+ukNay7KvNoYbt530VSM4I1/K6GCWMa
+hpBGY3NsaGHXAACgQt6cMZe17b7yRC2s88p73v/3ll4+Qvb0l02rUiksBTHJ
+syburSjXcQwUmJawzxy61IQoCyVfWPaaS3/BF1F1YujnVwyql9HRU/QgfuPh
+0lZE2nH78Pv2L3kfqGXmcBYZ99xqPzsn7TM2ybQlB22/uNJzfs7T3p/KW87O
+8wy91N43BWJidv65P1p71w9oD7tWYOosSMUIVvF7f9sMGJMghMy1oaVdAwBA
+HzJO6kzH2Ydqe+cgWdOJt9744oFObZXeoRjqs073wH0STClGgwcqFaozRJKa
+PbPmHumvMYN1FoTOilCW0NT/AUU9pU+vXmlRT8TC8vUujpo6zmYhbcrZlfhr
+7HTdmm6E2hpB3pzu66gpRsNJZTn6n1YWDZA2ZYa5u7hP7mWSp//uKpzaoBoR
+rblrIm8SmIOCEazk9z71GDEmQQjRsCEeDLgGAABKoJ1Xo7zHjF/01ZG9UTtO
+PtB9/VXOPR3osbxEe4pCu6vORIf4Be6M2xr67lQnZ5+IzIEz+mnPUaTSFCj/
+dvLKkMSagdsl1vlbsMfC/A69GYquniq6b4VPfFO/QoApqko5WdEpNfwGg3qj
+BNoqFAi3IDksYPanaUfjtocFunmFnijLPbIncomP6+wthbyukiUO9pr7Rdf1
+oFepFvHUQPnAf3wjWNHvtI1JN4SMYHHXAABAFVHVPn+Pl0fZBURfatXN6XeX
+LXOd/n297syFdVzyf9U5UrmElTVnfzTObk5WizqFQTZHietzklKKDLIyhNLk
+XXez9q4Jcn9xlHP4QOkx8cMvvCZvrtRbl9LVU/m/vMK1c7cU4ZZepqUq0pge
+faxWjFsLG19bJcLKTa4OQcpaaFhbbqCdU/jvnahCxk5hjZ9f0HAlcIyDZsoT
+lCyxHzPnGr1nEor3JiIjWM3vJhmTZggZw8KuAQCAEgjnxKr3v3/Y3fZHzHz7
+0dO+qNAug8m79rbTzFPNeqNauyCLoGSp0780yXySOUrWnDHPySPibo/+fxBL
+U4IJyra5jQ3MbVNPn0hd/DTXFfpLVbp6KlDejZioYzX4LwHQUbWj7mT0yXrl
+Oh1vOsXXVglJgemMx8WLx41d2L84519fMJbq4lzGPfvxvEAlb3qMHuPtq/rn
+gvXFuHdgEiNYye+mGpNeCBnD0q7RgtA1ADDiEVXt8J7ZV1wF6/rj4wluEfe0
+bk6CGyEurB8a9TI+2lNBz93PXvf88qE6ZWLKvgOxtD56bn/i9c6v7eohLKnZ
+4zVxvX4daXp6YqLazP3HKgS0ZwVDgRX3Y9/ynuKtYpLTqL++7Ob19sZyzcSI
+r60SkgkwncP+ycdBs6nxJG2mo28GXpFqEow/N5EawTp+N9mY9ELIGBZ2DQAA
+VEDqEt6YtKZvgYr8eXCWj061ZaQujjU5Un86UE4FUw6q/k7akOznF/OoP78v
+efSNSXOUvjRM3NLY1lfLBan/cdF/BhIygtLl7r6Z+tMBHT2RJxcSUm52qd6u
+Qruqzl/kUn5Tj7jjCtxa2ATaKtGfAHdpTYDNyLPcpZ7ByqySAm09v3DKirw2
+yvW6+zB2bzJiBGv5XQM9Y9ILIWNY2DUAAFAC66lOXft/1nz9feqRAzt3HK/W
+/ZxF8nivj6/+VnnvVGBnv2D7vqTkhP9u3H22f+dZ2lZxcX/AK8+7bckurRNS
+HrE40jDe9TVTHdyDImOPZ6T/lN8g1ugkebTXZ+5RjsGXLlT1lLflRbj/7bm/
+qHlulJfOvZi+qgPgTKdE2mJIy/WkgFdeZu37vaGjLv+ryS+O9j14ldN+PzvC
++e/jwzPv8ZHOwti12xLTTiTtWB9X1El7ZU56b6JgBOv4fQAaxsQXRRxC5Fje
+NQAAMAHKK9zx4X7dd2K1UyjmQ0MaJri5K+Sbu90484zl9aQtkERb28em/K4w
+YkzGHQ0AwBBAwslNTLn6dGANrZoK+vaoGICyNAknLznpcgvhO98W1pOmQGPa
+2j624neFUWMy7mgAAIYGGNLe0Ze7V8gFldkbJjz/j38fzKvkm53QoCENFbfy
+ECPPIBbTk7ZAKtraPrbgd4URYzLuaAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAY
+yqBdZXGfLfSd6Dx1xeFqIWPvLlhI7MgB/GKzgGsAwPKIG9KP3+GjCqQhNWBC
+MJVzu60pduQAfrFZwDUAMAhgcpFctUQT3tvgu/omU8UOLCR25AB+sVnANQAw
+iAjvH/g0hUKNV9sQayaYbMhkTEaUX4YW4BrA0mCi2lMb5rxu98JoZ791Jx/j
+V41QIM0Fp35+0EM+qVETZQKylpxl00L7T1dD+fdyMovb8A5WI0Fcf2ZHWLD/
+pH86zVydztY+QgDrrso8Wthu2mebKK84bt22hLTjCVvXxd/gaZ0mZ5ZYjRDm
+vKP8kpZblBoVNOODIgYqDhna0zS/qNF1cZ+6I8MvzI+ake0aYLggehC/8XBp
+KyLtuH34ffuXvA/UGp78Inv6y6ZVqUYXM1REmYKMe261n52T9smfourE0M+v
+GNSrI0bCPnPoUhOiLFZ+YdlrLgP1fTAxO//cH63S3iHTw64V0BwWaPvFlZ7z
+c572/kzecnaeZ+ildpQBsRoY9E6vTpJnTdxbUa7jGCieTmBP2n5RY+jiEeMX
+xkfNCHcNMFyQPr16pUU9GITl610cNfWmNfQGU6jPOt1yBSaKMknDppxdib/G
+TtetNId1FoTOilBWOqUGKhWqM1mSmj2z5h5RlyaSNmWGubu4T+5lkqf/7iqc
+ArVkyJvTfR011Xw4qSxH/9PKGg5mitXAoHfUmFJoCQ8Ce9L2iwpDF1vfL/LW
+3DWRNwnMatOjZmS7BhiWdN8Kn/imfl0EhZx7OtBjeYl2KKDdVWeiQ/wCd8Zt
+DX13qpOzT0SmboUDAlGEEAuUcrKiU2r4DQZVULHO34I9FuZ36I80ct1Q/u3k
+lSGJNWIFRRBuQXJYwOxP047GbQ8LdPMKPVGWe2RP5BIf19lbCnldJUsc7DWT
+Sdf1oFepVkGlDzPeoX1vomtP+n4hdDEZFvcLxaL2tjlqVP8LrgGGCRivcO3c
+LUUGJaK7y5a5Tv++XnfAYB2X/F91jlQuwmTN2R+Ns5uT1SI3KkqJuD4nKaXI
+ILWALxBpTI8+VivGrdAtfviF1+TNlYbrK0Ld5F13s/auCXJ/cZRzOPVKc8LK
+Ta4OQcpiclhbbqCdU/jvnahCxk5hjZ9f0HAlcIyDZmgJSpbYj5lzjYG9HEOY
+8g7ZvYmWaxRE9qTpFzIXk2Jhv1CcAG1x1CjANcAwAuXdiIk6VoOzEcu79rbT
+zFPNesNCu2KOoGSp078GdnCIRfUia86Y5+QRcbdH/z9wBHbUnYw+Wa9cweGN
+DqQufprrCrwlF4luCmUhoLJtbmMDc9vMr9Cd8bh48bixC/sXgfzrC8ZSXQTK
+uGc/nheox4L1xbgzE4PeIbk30XENiT1p+YXcxaRY2i9veowe4+07WH5hbtSA
+a4BhBCaqzdx/rEKA62TBjRAX1g+NeokG7WDuufvZ655fPhQbFUWGocCK+7Fv
+eU/xVjHJadRfX3bzentjuWboSWr2eE1cr182nEy3fnpuf+L1zq/t5t+b0jns
+n3wcNMnzJ2kzHX0z8GqGmwWD3jFtv4mePen4xYiLSbGwX4wvzm1z1IBrgOED
+8uRCQsrNLtXLMmhX1fmLXJ0XhZC6ONbkSP2AVgbzlIOqSt7ShmQ/v5hHEuOi
+yMAXqAanQrdCULrc3TcTL6zxRGHilsa2vhJASP2Pi/5DPaenP9B2aQ20ZuRZ
+7lLPYGX2QoG2nl84ZUVeG+Wa5NRg0DtKJI++MeneRN2e9PyiAc/FpFjYL8Ym
+QNsdNSPeNcDwQN6WF+H+t+f+oua5UV6xf+qNDMnjvT6++ju0vcFsZ79g+76k
+5IT/btx9Vrl3SkEUCTgCB8AZHZJHe33mHuXgfbGBIwrjXV8z1cE9KDL2eEb6
+T/kNYoorVAxpuZ4U8MrLrH2/N3TU5X81+cXRvgevctrvZ0c4/318eOY9PtJZ
+GLt2W2LaiaQd6+OKOpl9aGLQO0qkbRUX9we88rzbluzSOiHlGYGWPen5ZQB6
+E6Dl/UI6AdryqBnhrgFGFCivcMeH+3Xf6tROAjACPYGY4OaukG/uduPeYhjX
+zaaxvHdoSAO/aLC1UQOuAYYlEk5uYsrVpwOrQFUwx9cxPMooCpRw8pKTLrcQ
+vWvLuG62joW9Q1ka+EUXGxo14Bpg+IIh7R19WWyFXFCZvWHC8//498G8Sj4T
+WSx6AlFxKw8hSsoxrtvQwGLeoSEN/GKIjYwacA0AAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAANYB7SqL+2yh70TnqSsOVwvNPZaLWWkjkJHmDqtoaPtmAYAR
+j7gh/fgdPqpAGlIDJgSb+6E5s9JGIJZ3ByaoOneZw0i9bwnn8rkq+uffGdPQ
+4ljYLAAAMAAmF8lVs4vw3gbf1TfNrLvErLQRyGC4Q9qUvTmhHP9sBBqyu8sT
+Nmc1Ua2zREtDC2NJswCA7YPJhlKYC+8f+DSFQk1za0hjiiHkEcu6Q1j57ao0
+yuX7cJGy01Z9W4lzmrdpWCVgLGAWAGAYTFR7asOc1+1eGO3st+7kY/wCMgqk
+ueDUzw96jE1wGMItSo0KmvFBEXMV9mQtOcumhfYfNYny7+VkFrfhHVhJohZx
+H7Huqsyjhe20PocX15/ZERbsP+mfTjNXp7O1D3oxRRodbbWwhkcMO24L7lCj
+GyeE0sTVX78XQ73wsSHimpj3v66mJQDlFcet25aQdjxh67r4GzytU3YZCRh8
+6EWp2WYBAIYRPYjfeLi0FZF23D78vv1L3gdqDQ/Vkj39ZdOqVApLO0zyrIl7
+K8p1HM0qDCTIuOdW+9k5aR+DLKpODP38ikERUGII+4iJ2fnn/mjtXS6iPexa
+ATWJEvaZQ5eaeiXIWy8se81loJqbSdJoaKuFVTxC0HEru0ONYZwQSeMVLArA
+sylFJLX7Az6gtTuEtl9c6Tk/52mvBvKWs/M8Qy+1o6QaMgHtKDXTLADAMNKn
+V6+0qANSWL7exfG9/pKUGnqHVqjPOsrlW0ypXkesXlPOrsRfY6frlt3EOgtC
+Z0UoK0hTE0LQR2lTZpi7i/vkXiZ5+u+uMqxVjQsqFaoTZJKaPbPmHlEXkDNR
+GmVttTWwjkcIOm5ld/TJNIgTYmnCig3T3qFc9lgf9Nn5udM2VtDI6Mmb030d
+NdX0OKksR//TyhpKTAUMgZ50o9Q8swCAJem+FT7xTf2SMwo593Sgx/IS7YkQ
+7a46Ex3iF7gzbmvou1OdnH0iMgcqvtCeCYmlSTlZ0Sk1/AaDktBY52/BHgvz
+O/QHEqliJH2kq5jqf/m3k1eGJFo0DWJzHlH9r0HHre0OwjjBRfL4u+lT9erD
+Ukdc/bnX9JjHOt1AuAXJYQGzP007Grc9LNDNK/REWe6RPZFLfFxnbynkdZUs
+cbDXLDC6rge9SrUKOSWYilLzzAIAlgPjFa6du6WoS3+C6S5b5jr9+3rd6QPr
+uOT/qnOkcq0sa87+aJzdnKwWdXaAbCYU1+ckpRQZpH/wpSGN6dHHasUKaaPh
+nCN++IXX5M2VhktNEsVI+khoEyJp8q67WXvXBLm/OMo5nHoJXZrYnEcURB23
+qjvI4gQPacMhlluYqe/FCUqXTph+qEHvbiqs3OTqEKQs5oq15QbaOYX/3okq
+ZOwU1vj5BQ1XAsc4aO5GgpIl9mPmXGNuO5apKDXPLABgKVDejZioYzU4++68
+a287zTzVrBfZ2sXIBCVLnf6lSWiTzISy5ox5Th4Rd3v0/wNHWkfdyeiT9coF
+IN6cg9TFT3Ndgbf6JFaMpI+EkEhTKD8MKdvmNjaQaiJExj378bxAPRasL8af
+m23OIyQdt6I7yOMEDxn7xxkuH97A+TsqDuIXBY9n/Y+t9/KHfhXy3QNVyDMe
+Fy8eN3Zh/3MT//qCsVSfm6gGDCNRSmwWALAamKg2c/+xCvxPCQU3QlxYPzTq
+LRS1h0PP3c9e99RkA0zZ3TCUVnE/9i3vKd4qJjmN+uvLbl5vbyzXjDhJzR6v
+ievLcbL+RIqR9pGGYrpJj57bn3i982s740l6G/QIWcet5w4jcYKHtCGZ5Wpy
+Vk1Q8pEL64i+8UnuTekc9k8+Dpr9pidpMx19M7iMPmozEqXmmQUALADy5EJC
+ys0u1atDaFfV+YtcnZd1kLo41uRI/XlHORymHPxT+Ze9Qe3nF/OoP8ctefSN
+STMhvjSFcvv46BtueuthQelyd99MvBGOL8pIH2kpholbGtv6CrUh9T8u+g/z
+OT0b9Qhxx63pDg14cYIHUnuA5bXd1FcPRJVRnjMMKsTq35t2ad2bmpFnuUs9
+g5UJPwXaen7hlBV5bSiubFNhJErNMwsAMI28LS/C/W/P/UXNc6O8Yv/UG3eS
+x3t9fPX3q3uHg539gu37kpIT/rtx99n+3VdpW8XF/QGvPO+2Jbu0Tkh5BBJI
+6wNnzpE82usz9ygH76saHFEU+khDMYx3fc1UB/egyNjjGek/5TeIGX5oslmP
+EHfcmu4YgOq9SXR/67TArBYTbw9ybkYAS3Xr0YAhLdeTAl55mbXv94aOuvyv
+Jr842vfgVU77/ewI57+PD8+8x0c6C2PXbktMO5G0Y31cUSfTaxlGotQ8swCA
+NUB5hTs+3K+7otJOI5gPPWmY4OaukG/u4h+xYk3FBg2b8shQcwe/aPHsnaY/
+H4iqdvqHldrUtowtmAUArIOEk5uYcvXpwEpdNRwMUhumQkeahJOXnHS5hei1
+Y+spNrjYikeGnDuQ2vjgzXdId6TI6bkTtSD28SCfMUSKTZgFAKwFhrR39OWv
+FXJBZfaGCc//498H8yr5Zico6ElDxa08hChBYU3FBh9b8MiQcwdSd2TZvmqz
+Hg9E1d+FxNbYys3JZswCAAAAmAba8cfu6Mvmvrwib8vfvvk3hl9osCbMmAUA
+AAAwAaz7fsbJ210M3FPQrlvHT5SbV7/JZmDOLAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAwVEC7yuI+W+g70XnqisPVwuHxZrCNAqZmFqvY00KN
+QmwMQyScy+eqdL62MLwCECJuSD9+h48qkIbUgAnBBTzlNUxQde4yh/zjfzAy
+bfBMDZiOVexpoUYhNoYdWHd5wuasJinZFYAMTC6Sq+4wwnsbfFf3l/6UNmVv
+TijHP8JUAUY2DXxTA6ZiFXtaqFGIjeGGlJ226ttKIekVi4DJhtsTg/D+gU9T
+6gaelYSV365KY+PffQbJyEYZol7QNzVgHlaxp4UahdgYJohrYt7/ulpMekVV
+ZvTUhjmv270w2tlv3cnHBHWwkeaCUz8/6DE22WEItyg1KmjGB0W0ytXhI64/
+syMs2H/SP51mrk5nK49SRvn3cjKL2/CqAVmiuX6w7qrMo4XtOmeKiau/fi+m
+RqwwBM/IRrFZL+ArZqYjUF5x3LptCWnHE7aui7/B0zoSB8/UDOmsDyVjUhNl
+ArKWnGXTQvtLStm2PUnR7Yj5jVqzL8AgIandH/CBTmrW8IpCIXoQv/FwaSsi
+7bh9+H37l7wP1Bqepy97+sumVakUliuY5FkT91aU6ziapVRx1WefOXSpqVcZ
+eeuFZa+5fKI+pF9UnRj6+ZUOxgOUoLnePonZ+ef+aO19REJ72LUCTcO8gkUB
+eMbCM7JRbNYLxIqZ7gi0/eJKz/k5T3t/Km85O88z9FJ73wxEZGrGdB6AojGp
+iDIFGffcaj87J+1yh7ZrTzIMO2Jeo9bsCzBYoM/Oz522sUJIdkWhkD69eqVF
+Pd6E5etdHN8r4usLar8Y6rPOeNFQNZJH39Iu840HKhWqc1KSmj2z5h5pVCfQ
+sM6C0FkRxXyG81UEzUmbMsPcXdwn9zLJ03+3VoE1YcWGae/ktumrgWdko9is
+F8gUM9UR8uZ0X8eZaU9UDwkyTirL0f+0smY7sakNRbTmrom8SWALBo1JQZQp
+SJtydiX+GjvdVacUrxXtaSqGHTGzUUvHBmATiKs/95oeo13ozPCKLt23wie+
+qV/PWyHnng70WF6i7Wy0u+pMdIhf4M64raHvTnVy9onIHKiBTXtWJJWmQPm3
+k1eGJGplz7DO34I9FuZ3mHhzotscEZLH302f+uVD/T80ZmSj2KQXcBUjdATC
+LUgOC5j9adrRuO1hgW5eoSfKco/siVzi4zp7SyGvq2SJg71mku+6HvSq4/Iy
+ervb8qaf3llI5dmUGWOSiCKEWKCUkxWdUsNv+IGle2+yoj0Z7ggZthMbgNUQ
+lC6dMP1Qg5TsijYYr3Dt3C1FXfojo7tsmev07+t1f4V1XPJ/1TlSuciTNWd/
+NM5uTlaL+jGbbFYU1+ckpRQZ5C0Ipcm77mbtXRPk/uIo5/A8TQ0Z8cMvvCZv
+rjR5HUizOQKkDYdYbmEGrwyRG9m4bjboBULFiB0hrNzk6hB0vhVVYG25gXZO
+4b93ogoZO4U1fn5Bw5XAMQ6aGUdQssR+zJxr9B7wKM4/TBmTRJQSWvZEGtOj
+j9WKFdJGwyndavYkh35HSLGN2ACsCL8oeDzrf2wZ2ZUBUN6NmKhjNTh7vbxr
+bzvNPNWsN/JUtZ4T61X5DkHJUqd/aTZoSGZFWXPGPCePiLsG5Z2JpSnBBGXb
+3MYGavJnSF38NNcVOMspGffsx/MC9Viwvlh/RqHXHAEy9o8zXD68oT8mcY1M
+VTGb9QK+YoSOUIiqtns49/2PoGTx+Im7H/Q+X2LPLvg6vpHxuHjxuLEL+9fG
+/OsLxlJdGw+Y8U2P0WO8fYnMSKazErrGJBGloGfPjrqT0SfrlY8deFO69exJ
+e7yQd4QUW4gNwKoISj5yYWl2afCvqMFEtZn7j1XgfyoquBHiwvpB/1fa4dpz
+97PXPTXZLVN2Ooil9dFz+xOvd35tV+snqdnjNXF9uekvadNrjgBpQzLL1XDg
+EBrZKDbrBULFiB1BMv+kc9g/+Tho9hSepM109M3g0tvbNr42ZtCYpKLIMBRY
+cT/2Le8p3iomOY3668tuXm9vLNfc1KxmT6Y7QorVYwOwNqLKKM8Z8XUI2RUV
+yJMLCSk3+2pbol1V5y9ydf4CqYtjTY7UHzDKcJ1y8E/lX/ZO0n5+MY/6s/OS
+R9+YNCvqS8PELY1tiGpCQOp/XPSfgSSboHS5u2+mGcOPXnMEILUHWF7bDXZl
+CYxsFBv1AqlixI7Qn392ac0/zciz3KWewcqkjgJtPb9wyoo8ujXMjc0/DBrT
+iCgyiL2jUG70H33DTe9xw2r2ZLojpFg5NgDrI+dmBLBUfie+0nutLS/C/W/P
+/UXNc6O8Yv/UG3ySx3t9fPU3gXvD1c5+wfZ9SckJ/924+2z/vrG0reLi/oBX
+nnfbkl1aJ6QcVTjSMN71NVMd3IMiY49npP+U3yDWLFslj/b6zD3KMeMjJ1rN
+ESG6v3VaYFaLfh/xjGwUm/UCqWJEjsCQlutJAa+8zNr3e0NHXf5Xk18c7Xvw
+Kqf9fnaE89/Hh2fe4yOdhbFrtyWmnUjasT6uqJP2KoN0/mHQmBREkUDgnT5w
+pnTr2ZPhjpBg5dgAbANR1U7/sFIB6RVKoLzCHR/u131C0H7MNx8a0jDBzV0h
+39wlPC+I4eaI4Rctnr0T52VWE41sFJvygoIZR1gNyxuTtkAbtifjlgFGOj13
+ohbE6rzNbHiFIhJObmLK1acDC01VuJqQusKHsjQJJy856XKLmSfVMaE8Uhsf
+vPkOXobdZCMbxVa8oGDKEdbEwsakKdCm7cm4ZYARj6j6u5DYGgnpFcpgSHtH
+336MQi6ozN4w4fl//PtgXiXf7AQCDWmouJWHmLmwZEZ5pO7Isn3V+K+xm2Fk
+o9iCFxTMOML6WMyYtAXasD0ZtwwAKJT58vztm3/T3k00vALQB+34Y3f0ZcK3
+JcDIAAAApKBdt46fKNd+/9XwCkAPrPt+xsnbXWS3HjAyAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAoAHtKov7bKHvROepKw5XCwfpXXNmG7VK
+FwASwCMMAsYERiTihvTjd/ioAmlIDZgQPEgnUzLbKJ40TFB17jKHkRMxJJzL
+56rgAzE6WCWohitgTGBkgslFctW8K7y3wXe1QfHcodAovjRpU/bmhHJzDyzF
+ussTNmc12ebpcjaLVYJquALGBJgGkw2ltbbw/oFPU+osc/TeIDWqL01Y+e2q
+NLZZtxUpO23Vt5Wm145kiqEVSxqsElTDFTDmyAQT1Z7aMOd1uxdGO/utO/kY
+v+S1AmkuOPXzgx5j0wSGcItSo4JmfFBEq6AeDcVQ/r2czOI20wpHyVpylk0L
+1Slzg3VXZR4tbLfA+ZkkhjWjUYpdEFd//V5MDb0CVjqIa2Le/7qapoCRFEvK
+Gh/Fceu2JaQdT9i6Lv4GT+v4LEaCikFjUhNFB3H9mR1hwf6T/uk0c3U6W3k4
+um0bExiCiB7Ebzxc2opIO24fft/+Je8DtYan8Mue/rJpVSqFdQsmedbEvRXl
+Oo5msVd6iomqE0M/v9JBO1hl3HOr/eyctEqwYWJ2/rk/WnufL9Aedq2A0fAn
+1N+cRql3gVewKADPlxSR1O4P+IBugn8ExVKvudsvrvScn/O096fylrPzPEMv
+tfdNqAwFFYPGpCKKFhL2mUOXmnqFyFsvLHvN5RN1mRrbNSYwBJE+vXqlRR2p
+wvL1Lo7vFfH1/qQ3bkJ91lGu9yx59C3tQuQ0FcM6C0JnRRTzaS3/pE05uxJ/
+jZ3uqpnYpU2ZYe4u7pN7meTpvxunRKEZEOlvTqN0uiCs2DDtndw2E1fI6LPz
+c6dtrKCX0Rs5sdSLvDnd13Fm2hPVc4KMk8py9D+tLOROw7/y1tw1kTcJbMGg
+MSmIogkqFaozrZKaPbPmHmlUZ4+taExgWNN9K3zim/pFshVy7ulAj+Ul2iMA
+7a46Ex3iF7gzbmvou1OdnH0iMgdKRNOeT0il4SuGdf4W7LEwv0N/DBCLknKy
+olNq+A0/sFwpl662nP4mSaPXBcnj76ZP/fKhiVk9cfXnXtNjzKjNOPRjSYFw
+C5LDAmZ/mnY0bntYoJtX6Imy3CN7Ipf4uM7eUsjrKlniYK+Z5LuuB73quLyM
+3mY95cLlzBiTRBQh5AJR/u3klSGJWqlj6xkTGMZgvMK1c7cUdemHVXfZMtfp
+39frRjPWccn/VedI5QpJ1pz90Ti7OVkt6udtsvlEXJ+TlFJk8NBPIo1AMfHD
+L7wmb640XEfhi0Ia06OP1YoV0kYL3JtM0Z++NLpdkDYcYrmFmfpqk6B06YTp
+hxpMfZlieMSSQli5ydUh6HwrqsDacgPtnMJ/70QVMnYKa/z8goYrgWMcNBOo
+oGSJ/Zg51+g94FG8NzFlTBJRSujaU951N2vvmiD3F0c5h+dpqqhZzZjAsAXl
+3YiJOlaDs0vKu/a208xTzXoxq6oQnVivyhQISpY6/as/50w2n8iaM+Y5eUTc
+NSiiTiyNQDGkLn6a6wq8pRWOqI66k9En65XLPbr3Jhn37MfzAvVYsL5Yf3DT
+1p8URrogY/84w+XDGzh/R6VT/KLg8az/sWW0f0je5SEWS6Kq7R7Off8jKFk8
+fuLuB71PCNizC76Ob2Q8Ll48buzC/qU+//qCsVSX+gNmfNNj9BhvXyIzkums
+hK4xyUPRFHsqlB/TlW1zGxuoSR5bz5jkMQkMUTBRbeb+YxX4H1kKboS4sH5o
+1FtCa0dsz93PXvfUpI9M2SMgkkaomKRmj9fE9eU4+yGGoirux77lPcVbxSSn
+UX992c3r7Y3lBmPQHGjrT1OaCV2QNiSzXE1OjAhKPnJhHdF3OhWGUyyRTKfp
+HPZPPg6aLZInaTMdfTO49LbqjT83MWhM00KRRGA/Pbc/8Xrn13a1XKsZExiO
+IE8uJKTc7Ksgi3ZVnb/I1XmLB6mLY02O1I82ZcROOfin8i97Z0E/v5hH/Wlo
+yaNvTJpPDKWRKCYoXe7um4kXvsSKKZTbrEffcGM+p0dffxOk0ewCUnuA5bXd
+1N1jUWWU54z4Otqvcw2vWNKfTndpTafNyLPcpZ7ByhyVAm09v3DKirw2siLM
+OBi7NzFoTFNDkUAgJm5pbENUtyOk/sdF/xnI6VnNmMCwQ96WF+H+t+f+oua5
+UV6xf+qFreTxXh9f/e3T3oi1s1+wfV9ScsJ/N+4+279BKm2ruLg/4JXn3bZk
+l9YJKYcXjjRSxSSP9vrMPcrB+5aCQLE+LHhvoqU/bWn0uyC6v3VaYFaLiSNc
+zs0IYKlmDzo/GlaxhCEt15MCXnmZte/3ho66/K8mvzja9+BVTvv97Ajnv48P
+z7zHRzoLY9duS0w7kbRjfVxRJ+11Pum9iUFjmhGK+AIx3vU1Ux3cgyJjj2ek
+/5TfINY8jFnPmMCIBOUV7vhwv+4SXPtJ33zoScMEN3eFfHMX/0weZhWjiDWt
+QQC/aPHsnaa/dCuq2ukfVsr4TXxoxZKtY3lj0hM4pI0JDFEknNzElKtPB5Zo
+qog1IemDDx1pEk5ectLlFqKtEGYVo4j1rEEEUhsfvPmOGZtqPXeiFsSa8RI5
+MUMnloYAFjYmHYFD35jAEAVD2jv6UswKuaAye8OE5//x74N5lXyzn77pSUPF
+rTyEaGHGrGIUsaY1iEDqjizbV23Wp4qi6u9CYmssc4bZUIilIYPFjElP4PAw
+JgAAFgTt+GN39OU2MycneVv+9s2/wZ40AAAAYD5Y9/2Mk7e7GLinoF23jp8o
+h/pNAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADBiQbvK4j5b6DvR
+eeqKw9VCxt4ttpDYEYVVbMhsoxAGgwPYGRh2iBvSj9/howqkITVgQjCVip3W
+FDuisIoNmW0UTxomqDp3mUN+OIWEc/lcFXyERRlqdqZyBQBsBUwukqvmAOG9
+Db6rTa2pOlhiRxRWsSGzjeJLkzZlb04oJzw+FOsuT9ic1QSHuFGHqp2pXAEA
+20J4/8CnKXWMr6AsJNZMMNlQGotWsSGzjepLE1Z+uyqNjX/3kbLTVn1biVPJ
+jlmGVgxQxLidqVwBgEFGXH9mR1iw/6R/Os1cnc7WPoQY667KPFrYbtphbSiv
+OG7dtoS04wlb18Xf4Gmdq2OWWI0QUe2pDXNet3thtLPfupOPCQqhI80Fp35+
+0GNsusEQblFqVNCMD4po1bajoRjKv5eTWdyGV4aKBAu5hhQSw5rSKL0uiKu/
+fi+mBq+WlLgm5v2vq3X/x2ZjoB9ZS86yaaH9FbhMiwFzWlRBzc5UrgDAYCJh
+nzl0qal3zpC3Xlj2mssnmmILmJidf+6P1t6FE9rDrhXQnAXR9osrPefnPO39
+mbzl7DzP0EvtKANiNYgexG88XNqKSDtuH37f/iXvA7WGJ/vLnv6yaVUqhUU+
+JnnWxL0V5TqOZt1VeoqJqhNDP7/SQb3HFnKNifqb1CjtLvAKFgXg+VJSuz/g
+A71tLpuNgf62uedW+9k5aVeHpB0D5rZI3c5UrgDAIIJKheoshqRmz6y5Rxr7
+nuKlTZlh7i7uk3uZ5Om/m27lOnlzuq/jzLQnqjWijJPKcvQ/razeTEOsvDV3
+TeRNgpJ30qdXr7SoR42wfL2L43tFfP2OtV8M9VlHufCt5NG3tGuC01QM6ywI
+nRVRzKeaNLKMa0zT38RGaXdBWLFh2ju5bfomQp+dnzttY4VORs9mY0CtXlPO
+rsRfY6e76lQuphsD5rVIx85UrhhAOkgBgBpod9WZ6BC/wJ1xW0Pfnerk7BOR
+qVUCHOXfTl4Zkkj9ER7hFiSHBcz+NO1o3PawQDev0BNluUf2RC7xcZ29pZDX
+VbLEwV4zV3RdD3rVcXkZvQ100jLW2nTfCp/4pn69aoWcezrQY3mJ9rAhtQDt
+eYncnriKYZ2/BXsszO8wmHmZdY3F9DdZGvUuSB5/N33qlw/1/1Bc/bnX9Bji
++oc2FwNSTlZ0Sg2/4QeW7r2JMAYs1yIuhnamcsUAyoMUAMjAOi75v+ocqVy0
+yZqzPxpnNyerRfWQL++6m7V3TZD7i6Ocw/Mo1wISVm5ydQg634oqsLbcQDun
+8N87UYWMncIaP7+g4UrgGAfN3UhQssR+zJxr9NajFMMe4xWunbulqEt/rHeX
+LXOd/n297mxFaAHyeUlcn5OUUmSQiSGRRqCY+OEXXpM3Vxo+dDDsGmrQ198k
+abS6IG04xHILM3gPUFC6dML0Qw0Et0mbiwGkMT36WK1YIW00vFMQxgBF6LeI
+h6GdqVwxAO5NADOoai4n1qvyIIKSpU7/+kS7lDcmKNvmNjaQ/CFeC1HVdg/n
+Far7j6Bk8fiJux/0rrCwZxd8Hd/IeFy8eNzYhf3PTfzrC8ZSfW6Scc9+PC9Q
+yZseo8d4+6r+uWB9Mf4cifJuxEQdq8HZBedde9tp5qlmvbmE2AIk85KsOWOe
+k0fEXYOy5yT2xFcMqYuf5roCzxCMumbAhlrg2JC2/qQw0gUZ+8cZLh/e0J9b
++UXB41n/Y+O+RmBzMdBRdzL6ZL3yaQbvTkEYA2Z4jbxFPAztTOWKoapUBikA
+GEU7qnvufva6p94De8/tT7ze+bXd/HtTOof9k4+DZr/pSdpMR98MLr1Vv/El
+GSaqzdx/rAL/W0zBjRAX1g+NeittYguYstdAJI1QMUnNHq+J68txXoRm1jWW
+0t8kaf1Q6oK0IZnlariMEZR85MI6ou9NY6paJwYq7se+5T3FW8Ukp1F/fdnN
+6+2N5ZqbGnEMWKpFPAztTOWKAfDcBDCDMqqnHPxTGdW9cefnF/NIosDELY1t
+iGpoI/U/LvoP9cSR/r1pl9a9qRl5lrvUM1iZ8FOgrecXTlmRR7fit7GwR55c
+SEi52VfzFe2qOn+Rq/NGEVIXx5ocqT8F4FmgD8mjb0yalwylkSgmKF3u7puJ
+d5Nm1jWW0p+2NNpdQGoPsLy2G7xqIaqM8pwRX6eviM3GgBoZ5+gbbnpPMcQx
+YKkW8TC0M5UrBsC9CWCG3qi2s1+wfV9ScsJ/N+4+q9xExXjX10x1cA+KjD2e
+kf5TfoOY4loZQ1quJwW88jJr3+8NHXX5X01+cbTvwauc9vvZEc5/Hx+eeY+P
+dBbGrt2WmHYiacf6uKJO2mORNOzlbXkR7n977i9qnhvlFfun3sQlebzXx1d/
+exzHAkqkbRUX9we88rzbluzSOiHlmyiONFLFJI/2+sw9ysHLTDHoGurQ1Z+2
+NPpdEN3fOi0wq0XfBXJuRgBLtfjRumarMTAAzp2CJAYs1CIuhnamcsUAuDcB
+zKCdDRj+oLzCHR/u1132MWsBetIwwc1dId/cxT8HxiqusaY1COAXLZ69E2ep
+Lqra6R9WSvtl5SEVAxZpkQBDO1O5AgAWQhXVhpmR4YuEk5uYcvXpwLqZWQvQ
+kSbh5CUnXW4heiHbKq6xnjWIQGrjgzffwdsp6bkTtSCW+CVyYoZODFigRSIM
+7UzlCgBYBLmgMnvDhOf/8e+DeZV8S32YbntgSHtH34YHwxagJw0Vt/IQotWy
+VVxjTWsQgdQdWbavGn+lLqr+LiS2xqST/IZCDFikRSIM7UzlCgAAwEgE7fhj
+d/Rlwrcl5G352zf/RveVGsAAQztTuQIAADASwbrvZ5y83UV260G7bh0/UQ71
+m8zC0M5UrgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIwA0K6yuM8W
++k50nrricLVwkF5atUqjAC426AsbVGm4MmimBp+OLCScy+eqzPsIQtyQfvwO
+H1UgDakBE4IH6SxDvEYxQdW5yxzyj+EN+0vlCkAGc76wqEqARTDV+4w0BAxX
+sO7yhM1ZTWYeWYXJRXLVBCO8t8F3NWnlR+bAb1TalL05oZzwcEjD/lK5AhiB
+IV9YXiXAApjkfeYaAoYlUnbaqm8rTa/bpYfw/oFPU+oYXizRbVRY+e2qNDb+
+jGfYXypXLAImG4aPZeb5YlBUAiwGHe8z2hAw/BDXxLz/dbXY+B8OgPKK49Zt
+S0g7nrB1XfwNns7BHVWZRwvbLXiklKwlZ9m0UJ1iK3iNiqu/fi+mBq9Xhv2l
+ckVVLfTUhjmv270w2tlv3cnHBJW3keaCUz8/6DF2y8EQblFqVNCMD4poFWXD
+l4WrGMq/l5NZ3GZGzRu6Lfb9l5m+GCSVmJSvBSXvUxNFB3H9mR1hwf6T/uk0
+c3U6W3nYtiW9j9NcP/S8bxRrzjOA9ZHU7g/4gFbWFm2/uNJzfs7T3sCQt5yd
+5xl6qb0vajAxO//cH629ayS0h10rsETgyLjnVvvZOWkVAiNqlFewKOBAreGh
++Ib9pXJFoRA9iN94uLQVkXbcPvy+/UveeLJlT3/ZtCqVwloOkzxr4t6Kch1H
+s2AoHsSKiaoTQz+/0sG4HwhbNN8Xg6YSU/K1oOh9KqJoIWGfOXSpqVeIvPXC
+stdcPlGXaLCU9wmao+99Y1hzngFsAPTZ+bnTNlbQyKrIm9N9HWemPVGtyWSc
+VJaj/2lltWRpU2aYu4v75F4mefrvtkR9LWlTzq7EX2Onu2ruTcSNCis2THsn
+t01/UWrYXypXeht6evVKi3p8CcvXuzi+V8TXF91+MdRnnfHymWokj76lXcwa
+BzLFsM6C0FkRxXxmE4dELTLgi8FTyQB5a+6ayJsEzmPQ+xRE0QSVCtWpYUnN
+nllzjzSqE2iW8T5Rc7S9bwwG5hlSnwK2jrj6c6/pMbr1xxBuQXJYwOxP047G
+bQ8LdPMKPVGWe2RP5BIf19lbCnldJUsc7DUDqut60KuOy8uY25FEu6vORIf4
+Be6M2xr67lQnZ5+ITHUFZSknKzqlht/wA8uVQgFlyePvpk/98qF+LsGwv1Su
+6NJ9K3zim/pVqxVy7ulAj+Ul2ooR90Vhwr2JVBq+Yljnb8EeC/M7TJyeTGgR
+F8q+GDyVDKBcKZsZ75uiKrlAlH87eWVIolb2zKLeN2yOCALvD8I8A9XPhzSC
+0qUTph9q0BsewspNrg5B51tRBdaWG2jnFP57J6qQsVNY4+cXNFwJHOOgiRJB
+yRL7MXOumb9rMgDWccn/VedI5YJP1pz90Ti7OVktcgXSmB59rFaskDZSuzdJ
+Gw6x3MIMXuMx7C+VKzrq8QrXzt1S1KU/4rvLlrlO/75e91f4fVFBdm8S1+ck
+pRQZ5GNIpBEoJn74hdfkzZUmP8PSbxEPyr4YPJUMoDiPMeV9I6rSDQB5192s
+vWuC3F8c5Ryep6kgZDHv4zdHAIH3lVh4noF705CGXxQ8nvU/tt6mqahqu4fz
+ClVcCEoWj5+4+0Hvqgd7dsHX8Y2Mx8WLx41d2L+e4V9fMJbqekbGPfvxvEA9
+Fqwv1h+dqgLKifWqxIegZKnTvz6501F3MvpkvXLVRvXeJGP/OMPlwxv6f2fY
+XypXBkB5N2KijtXgbGDzrr3tNPNUs95AxemLOj9Pcm+SNWfMc/KIuGtQ25lY
+GoFiSF38NNcVOO4xwxfkLeJB2ReUFGNEJcPm3vQYPcbbl8gOxuTT9T65qqYE
+gEL5PVHZNrexgZr8mSW9j9McAQTeV2LpeYaKTwFbRVDykQtLk6LuhyRm0jns
+n3wcNHngJ2kzHX0zuIzuR2qPiJ67n73u+WXF/di3vKd4q5jkNOqvL7t5vb2x
+3GDkaiNtSGa5GgazYX+pXFGDiWoz9x+rwP9OVHAjxIX1g/6vDPvSn9wwZb+J
+SBqhYpKaPV4T15ebvqVDu0U8KPti8FQywPgam0Hvm6wqcTj10XP7E693fm1X
+y7WY9/GbI4DA+0osPM/Ac9OQRlQZ5Tkjvk7vLRr9mNmlFTPNyLPcpZ7Bygdx
+Bdp6fuGUFXkM13xWjogpB/9U6tQb135+MY+00vQyztE33Cg8NyG1B1he2w12
+Sg37S+VKn8QnFxJSbvYVtkS7qs5f5Or8BVIXx5ocqT8REPdF8ugbk+5NhtJI
+FBOULnf3zTRj6UC7RTwo+2LwVDLA2DzGoPfNUBVPICZuaWxDVPcHpP7HRf8Z
+SLJZxPvEzRFA4H0lFp5n4N40pJFzMwJYqpDQgCEt15MCXnmZte/3ho66/K8m
+vzja9+BVTvv97Ajnv48Pz7zHRzoLY9duS0w7kbRjfVxRJ9MvcfaOCDv7Bdv3
+JSUn/Hfj7rO6G8hU702i+1unBWa16EezYX+pXOm91pYX4f635/6i5rlRXrF/
+6s0oksd7fXz1d7YJ+iJtq7i4P+CV5922ZJfWCSkPORxppIpJHu31mXuUY8Zn
+LnRbxIWyLwZPJQNI5zEGvW+eqjgCMd71NVMd3IMiY49npP+U3yDWPMVYxPvE
+zRFB4P1BmGfg3jS0EVXt9A8rtan3LLUzCSbDL1o8eyfOYs2wv1SuUALlFe74
+cL9um4z0xURpmODmrpBv7pp1Yswg+2LQVGIey3ufnkCb9z4AGKHnTtSCWHov
+8loY1Yign+vRAamND958B29HyrC/VK5QRMLJTUy5+nRg9cxEXwagI03CyUtO
+utxi5mkxg+2LQVLJMljY+3QEDgXvA4ARRNXfhcTW2MrNSS6ozN4w4fl//Ptg
+XiXf5GwhUndk2b5q/LWaYX+pXKEMhrR39KXjGepLP/SkoeJWHmLmi0nW8MWg
+qGQ5LOZ9egKHhvcBwAjytvztm39j+IUGa4J2/LE7+jLhHq1hf6lcAUyCti+A
+YYQR7wOAMdCuW8dPlA+TWkVY9/2Mk7e7yKY7w/5SuQLQxiRfAMMECt4HAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGAQQLvK4j5b6DvReeqKw9VC
+eHvbgoCpmQIsCQw9JJzL56rgAxnKiBvSj9/howqkITVgQnDfWZiYoOrcZQ75
+AQ1gZ9rgmRowBbAkMNTAussTNmc1mXlw2IgCk4vkqjuM8N4G39X9BUmlTdmb
+E8oJjwYFO5sCvqkB+oAlgSGGlJ226ttK06unUQSTDcPHBeH9A5+m1A08Kwkr
+v12Vxsa/+wySnY0yRB2hb2rbYCga0zYtCQD6iGti3v+6WrcCECaqPbVhzut2
+L4x29lt38jFBgW6kueDUzw96jA1ODOEWpUYFzfigiFYRQHxZuIqh/Hs5mcVt
+ZlTZodti3391V2UeLWzXOelMXP31ezE1ePWU8OxsTutaDBdHoLziuHXbEtKO
+J2xdF3+Dp3VQD56pGdJZHysYUyGuP7MjLNh/0j+dZq5OZyvPLLdtSwLAICCp
+3R/wgV7uWfQgfuPh0lZE2nH78Pv2L3kfqDU84l/29JdNq1IprL4wybMm7q0o
+13E0C9TiQayYqDox9PMrHYwPOcIWMTE7/9wfrb2PSGgPu1agaZhXsCgAz154
+dja9dS2GjSPQ9osrPefnPO39qbzl7DzP0EvtfXMqkakZ03kAqxhTwj5z6FJT
+rzLy1gvLXnP5RF0Nw3YtCQCDAPrs/NxpGyt0Mk3Sp1evtKjHrbB8vYvje0V8
+/Z+1Xwz1WWe8dK4ayaNvaRdPx4FMMayzIHRWRDGf2RQLUYvSpswwdxf3yb1M
+8vTfrVX2TVixYdo7uW36auDZ2eTWteUOG0fIm9N9HWemPVE9Ksg4qSxH/9PK
+WujEpjYU0Zq7JvImgS1s1pgKVCpUZwYlNXtmzT3SqM4J26olAWAwEFd/7jU9
+hrg2Xfet8Ilv6tfJVsi5pwM9lpdoxy7aXXUmOsQvcGfc1tB3pzo5+0RkDlSC
+pz2KSaXhK4Z1/hbssTC/w8Sbkwkt4iJ5/N30qV8+1M/dGbOzUYaBIxBuQXJY
+wOxP047GbQ8LdPMKPVGWe2RP5BIf19lbCnldJUsc7DX3i67rQa86Li+jt19P
+uYC4TRoT5d9OXhmSqJUQHgKWBABLIShdOmH6oQaCCRfjFa6du6WoS39wdJct
+c53+fb3ur7COS/6vOkcq13my5uyPxtnNyWpRZw3IRrG4PicppcggdUEijUAx
+8cMvvCZvrjS5Bhv9FvGQNhxiuYUZvARFbmfjug0PRwgrN7k6BJ1vRRVYW26g
+nVP4752oQsZOYY2fX9BwJXCMg2YOFZQssR8z5xq9ZxKKM6otGlPedTdr75og
+9xdHOYfnaYo12bolAcBy8IuCx7P+x8bdc0V5N2KijtXg7Bnzrr3tNPNUs97I
+U5WfTqxX5U0EJUud/tWfOScbxbLmjHlOHhF3DSpOE0sjUAypi5/mugJngSjj
+nv14XqAeC9YX609OtFvEQ8b+cYbLhzf00yG4dqaq2HBxhEJUtd3Due9/BCWL
+x0/c/aD3IQF7dsHX8Y2Mx8WLx41d2L/a519fMJbqan/AjG96jB7j7UtkRjKd
+lVjZmArlJ3Jl29zGBmpSwrZtSQCwJIKSj1xYmgy3FpioNnP/sQr870QFN0Jc
+WD/o/0p73PXc/ex1T01qy5TMPJE0QsUkNXu8Jq4vN/0lbdot4iFtSGa5Gk4F
+hHY2ynByBMmMms5h/+TjoNkleZI209E3g0tvt974at9mjdlPz+1PvN75tV2t
+nw1bEgAsjKgyynNGfJ3+G0vIkwsJKTf7ym2iXVXnL3J1/gKpi2NNjtQfM8px
+N+Xgn8q/7J2h/fxiHvUn0yWPvjFpFBtKI1FMULrc3TeT5iA0q0U8kNoDLK/t
+BvvMBHY2yvByhP6MuktrRm1GnuUu9QxWpqkUaOv5hVNW5NGtM29sRrVRY2Li
+lsY2RHU7Qup/XPSfgZyezVoSACyOnJsRwFIFtta1trwI97899xc1z43yiv1T
+b1KVPN7r46u/mdw77uzsF2zfl5Sc8N+Nu8/2b/NK2you7g945Xm3LdmldULK
+gwRHGqlikkd7feYe5ZjxkRPdFnER3d86LTCrRb+beHY2yvByBIa0XE8KeOVl
+1r7fGzrq8r+a/OJo34NXOe33syOc/z4+PPMeH+ksjF27LTHtRNKO9XFFnbRX
+GaQzqs0aE+NdXzPVwT0oMvZ4RvpP+Q1izUOdjVoSAAYFUdVO/7BS2m+LorzC
+HR/u13080M5XmA89aZjg5q6Qb+4SnhfEfIsE8IsWz96J83quiXY2ynB0hNWw
+KWMOaUsCgPn03IlaEGvKy80STm5iytWnA6tM1bgzIW+FDx1pEk5ectLlFjNP
+qmNCf6Q2PnjzHYMtcIUZdjbKsHOENbEVYw59SwKAuYiqvwuJrTFp0sSQ9o6+
+RLlCLqjM3jDh+X/8+2BeJd/sD87pSUPFrTzEzOUlM/ojdUeW7avGf43dDDsb
+ZRg5wvrYgjGHhyUBwDzkbfnbN/9Gd7sUMADt+GN39OU2olkH7AwAAEAHtOvW
+8RPlUFfILLDu+xknb3eR3XrAzgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAANqgXWVxny30neg8dcXhaiFjL1tbSKxVGrVKX4YTYEDzARsCIwxx
+Q/rxO3xUgTSkBkwIZuywSQuJtUqjVunLcAIMaD54NsQEVecuc7TPPTG8AgBD
+FUwukqsWYcJ7G3xXG1SPtTGxVmnUKn0ZToABzQffhtKm7M0J5dqH0xpeAYCh
+jfD+gU9T6hhfcVlIrFUatUpfjILJhsw8BAY0H30bCiu/XZWmU2TE8AoA2DaY
+qPbUhjmv270w2tlv3cnH2iWyse6qzKOF7aYdrYnyiuPWbUtIO56wdV38DZ7W
+CUJmiSVHXH9mR1iw/6R/Os1cnc7WPmTalvtC4gItkOaCUz8/6DE2Y2IItyg1
+KmjGB0W0au3hY2hPlH8vJ7O4jV51LkvFGAX5WljBgPiKmWRDmrEtrv76vZga
+MekVALBlRA/iNx4ubUWkHbcPv2//kveBWnXUY2J2/rk/WnsXWmgPu1ZAc/JA
+2y+u9Jyf87T3Z/KWs/M8Qy+1owyIJUfCPnPoUlOv/vLWC8tec/lEUyLDtvtC
+6AItZE9/2bQqlcLDBSZ51sS9FeU6jmYdWDwI7CmqTgz9/EoH9e5aKMaMy9fC
+KgYkVoy2DWnHNq9gUYCuIQyvAIDtIn169UqLOlyF5etdHN8r4quuN2WGubu4
+T+5lkqf/bpwafaTIm9N9HWemPVEtDWWcVJaj/2llRWszxRoBlQrViRhJzZ5Z
+c4809mUwbLwvRC7Q7lj7xVCfdWVUCyJKHn1Lu0Y5HgT2VGCdBaGzIor5FJNe
+DMSYvDV3TeRNgv7brAHJFKNpQ/qxLazYMO2d3DYt+YZXAMAWQLurzkSH+AXu
+jNsa+u5UJ2efiMxG3VVk963wiW/qV8ImAuEWJIcFzP407Wjc9rBAN6/QE2W5
+R/ZELvFxnb2lkNdVssTBXjMSu64Hveq4vIy5zW7yvqD828krQxKppy+s2hcd
+8F0g554O9Fheoj2zklqA9tRK155Y52/BHgvzO/SnOYZjbADKpclt0oC4iplm
+Q+qxLXn83fSpXz4Uk10BANsA67jk/6pzpHKtJmvO/mic3ZysloGkAsYrXDt3
+S1EX5WWVsHKTq0PQ+VZUgbXlBto5hf/eiSpk7BTW+PkFDVcCxzhoZnBByRL7
+MXOuMbD/Ybwv8q67WXvXBLm/OMo5PI+wgpNN9WWgUwQu6C5b5jr9+3rdCff/
+s3fmYU2cW8Bv/7pPbXtvraUuXK4FQVARl2hLDcuttlcqVltqP5eC32Nr66WK
+Flyrtrd1KSqyVay9uKAVqKL28cpXFGu1RRBwRQQLIiDIIgKGBLJMkpl8JAQI
+ycxk3smETML5/eUzkvOe95zz7jPvofEmXdcqrzqZmJxrspmEaE/5n1/6jIsq
+Nl3pcBxj3TAcm/hoQErF0G2IFNvK6j0CjzDDtx9NnwAAT9DloU6o0u0ySPLn
+u7zSu2uNi65ERx4sozhFJkVWss7LdZGuz5bkzxs5ZvPdzhkZ8fiM0PnVtHt5
+84YPnd291hBfnjWU6VpD1XDio5mBRsxakWfc39DURaP9oKNwrcfQQMYbGLat
+SxfULhD9/obL1KP1Rp0RtQVoulZVfdpMF6/wmybJ6tHsiVXGTXJfRGYFTmOs
+14Cvew0eMkFopwYkV4yVDTWMY1tV88MUt/euSOieAABPMIz5jpufjvbWL/AJ
+WUX6zoO3EVPt0fTnqbU1P/qO6DmjeZgy1VmY1sDpew9Udemm4/rHPm/90mL5
+2NQPddGYcYHkSoib4PsHRhtV1BZgc1yCZk9F2RafMSuKpMzlsIuxbsyvm3hr
+QErF0G3YDaPYVlYnCdz7TKJMnwAAT9DG/Pjd97Ux3xmnfn7R5dqNbOzhmfjk
+q11pYvG2ktNnG5i9ymPcn28y6M/rsceZ872DtZtkGrzp9Ozxi7I4ToFOVhdC
+3vigGdM1Wazqh7n/Zr6nZ9u6mHMBVhkrGBdh3IuRe1OLonwrq66VuT0lBQs9
+helkIzS3MdaNubGJpwakVQzNhsixjVXsEvisM3zBxPQJAPCEzph3GjZr3Y7E
+pPivV20+oT1iVTdnhXs+8/RTep4e5BNzn0m3QWCNlxMDXnxBsOO36tbK7P+M
+e36wcPel2pY7GeGufx25JP2WGHuSE/PZ2oSUw4nrV8TmPuF6oUFSF0J0ednE
+EZ5BETGH0lJ/zK6WM5yj27guDFyguLfdV2h8wk9iAS3K5ttndwa8+KzH6oyC
+SinjQRTJnory7b4zDtSSfaDDYYwZQDs28daAtIqh2RA9tmV31kwKPN6I0z0B
+AJ5guFdg7zhSXcyDi3LWv7ez75SXWwsgSCMkVzeFbL1JfgEOT/3CKwNq+sOG
+4tx50zb0qbDpEwDgCbqYj6vkW7/BCkeqCyMUtZkJyZce9U79ubUAY2mK2qyk
+xPONVG+B89cvfDGgpl9siFXEBUcZvkJB8gQAeIFaUpyxctSzL725O6tYbI37
+gvoRR6oLAgTW0tp15MCxBRCk4fImEUa1ocR3v/DBgJp+sSFWuW/BjlIZ7RMA
+AAAA6D/w1j82bzxv+LaE6RMAAAAA6D+I9jtpR6634XRPAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAADsBbyuM/XS2cIzrxEV7S6WQv9KKgKn5A/gC
+ADhAUXv+VAnLTABmkFenHrohxjVY9f6AUcFMsoACLCEzNSEpOXW+VmHup0yw
+YpA4Hlb2BQAMBIj2ovio43WoGaeZSlfL1Lr+THprpXAp5K+0IuSmVtZlRMUX
+kd/PiSDbqkHieFjTFwAwMFDWpCzeVkySLIxbpHd2fZJcCZPGfsDY1NLibYtT
+aiwaVvopSAiVo3XbVvAFAAwM5GXRc74plZv/Qwaiqo6tDwv2H/t3l6lLU2sM
+LyQm2kvSD+S0WHYxFiGrOLpy+min5wa7+i0/co8iSzZWf/Hoz3c7zPRx1Kpa
+gKrx5IJJoYX69NG4+NbJ9LxmslQ3nNG3RB1kppaXfvNOdJkFPiYLEi7doSGw
+htz9kUFT3s1FSo1Hoa2Jc63qC7Swt9gXADAwUFTsDHiXk1MgRc2xPefqOpum
+uunMgn+4fdxzsT0hr8k+9UdT51wR76ipkLAdoGR341btLWjClK3X984Z9rcJ
+uypMhxTVo/99vni/2dUZpaqWoGo4tdTPyWWBwUghK00I/eJCq7XuqjQtkcrU
+ootzA8jsxRCyIOHQHZ16Kx7XNVyLdB+OmLaVVFly51rLF8hhb6EvAGBggD8+
+PWPSqttcbNbgSql+R0ZRtuW1GfsedG1cKOvSwzzdPMd1MtbbfzNdljB1U+ay
+iKsS8v9UPrp0oVHfoqVFK9yc38kVG2vQcjbUd3khhQDzqlqCsu7kpoRfYia7
+G45NGuLJxdDXwvPE1tipMi2R2tTS2ysnvZXZzFINsiDh0h1dKMq3IacUJ9WW
+wrlW8gVy2FvmCwAYIMhLv/CZHH0P6RgIby85tjHEL3BD7JrQf010cfUNT3/Q
+KwAXX0/6MCSBza4FbQ5rQ9qvLRnzunGyao264adAr4X5hn0ht6pSS1PWHt+Y
+XCau/l7Qd2zq7BB/Dfaand3KdlRAL5EUxb1vJ0/86k+WO0nmgoQbdyCPTajO
+tZovyIujwjJfAMAAQVIwf9TkPdWI6wai9Zz/y64R2jmoqj7j/eFO04836vYs
+1G03j29fFuT5/CDXJVnIeVcYjk2EKOezGatz24z7mPbCBe6Tv6vqWxeWqsqr
+TiYm55rsAJFLwx6kbjxYIdcoH5iOFPI/v/QZF1XMOjsaeolkKKv3CDzC2L4k
+SR8k3LiDfmxCcoeGyrnW8QVlcRRY5gsAGCCIc4NHCv5b0/eQWNVw4qOZgUbM
+WpHX2/3o8i8nVOn2dCT5811e6XNkQ0gK13oMDWS6b9Fb3Oteg4dMEJoWZwgu
+uhIdebCM5Ohd9PsbLlOP1ht1DaxUVdWnzXTxCr9pcg5FIq218sjGI1XaGTTZ
+SIFVxk1yX1Ro2hOZNzLLEslQ1fwwxe29KyR/x0QN0iDRw507aMYmFHfQONca
+vkAPe2pfAADQgyT/fTcB+nmLYSPtuPnpaG+jPYqO6x/7vPVLC+Luifl1EyGr
+SN958Db5B6CSKyFugu+N68KtqqbSbt+J+eeE8RN0jHUZ9JcXPHzeWFXU02Up
+yrb4jFlRxP5AD7lEMpTVSQL3hSS9MiMog4RTd7A5b0JzrhV8wSKWLPMFAAwQ
+ZMWR3lPiKlHfGtI20vG772t/1tnU/PyiyxUaQt74oBnTtUus6oe5/+Z+Tw97
+eCY++WpXIky8reT02YY+emOVsYJxEcZdD7eqkknrQVV74FUPo1WMpGChpzC9
+gf3rYcglkoFV7BL4rKN7D4UOiiDhzB1dKMq3shqbmDvXKr5AjiXLfAEAAwR1
+Q1qAYNNd1IPZzkbqNGzWuh2JSfFfr9p8QnsmTIguL5s4wjMoIuZQWuqP2dVy
+9CNn2rFJ3ZwV7vnM00/peXqQT8x9o95ScW+7r9D4TJ5bVUmk9UIyUijKt/vO
+OFBrwYc1qCWSIruzZlLg8UaW6a3JgoRDd2hRNt8+uzPgxWc9VmcUVEoZ64nk
+XKv4Aj2WLPMFAAwUZCUb/MMKUDe/DTc3eAQuyln/3s6+U1JuVUWTRkiubgrZ
+etOiO2o40V+cO2/aBvZTdXZBwi93OIovAGCg0HEjclYM2kvk+kaKvhXYDyhq
+MxOSLz3qnaxzqyqKNEVtVlLi+UYLv53iQn+sIi44ypIPjFkFiRa+uMOBfAEA
+AwVZ6bchMWUI/Y5aUpyxctSzL725O6tYbK07DyyAwFpauw4AOFYVTRoubxJh
+Fn5hyY3+WOW+BTtKLZqpIwdJL3xwh0P5AgAGCurm7HVRvzbDBrhjgrf+sXnj
+eeQXU4yAIOECbnwBAAMGvO3aocNFkJrHASHa76Qdud7GwZgCQWIp3PkCAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA+gLcVxn46WzjGdeKivaVS
+eNmaPTaxpJUKhboAAHsUtedPlfT5dMX0CWAGeXXqoRtiXINV7w8YFcwkfy9A
+jk0saaVCoS4AwBaivSg+6nidku4JYB5CLVPrBnPprZXCpZDYlD02saSVCoW6
+AABLlDUpi7cVS2mf2AZCZZfrNumdXZ8kV7K6e86K2KMxbWJJKxUKdQEANORl
+0XO+KZXTPmEAIas4unL6aKfnBrv6LT9yjyRHtxas/uLRn+92mOslCawhd39k
+0JR3c5EyzSEohotvnUzPa2abywcX5cUuXxufcih+zfK4KyKDW2iI9pL0Azkt
+lt2YxltjauRVx9aHBfuP/bvL1KWpNdoLufltSVJozGtRobaoC4lHOCnUJnUB
+AAMUFTsD3u2zc2z6hAGyu3Gr9hY0YcrW63vnDPvbhF0VpokEVI/+9/ni/Qym
+W4TicV3DtUj34YhZUNEUk5UmhH5xoZVFG8Nbzn7o/fbJR50/VTeemOkdeq6l
+q+0S8prsU380KTv/pKOmQsK2+fLWmIqaY3vO1XUqo246s+Afbh/rUz3w15Kk
+UJrXskJtUhcKj9hlXQDAEPzx6RmTVt2W0j1hgPLRpQuN+hYuLVrh5vxOrti4
+pJazob7Lzado1aMo34acoRtRMeLJxdDXwvPEqHtd6vpUofPUlIe6pYKqdr/A
+2f8nbaJvZV16mKeb57hOxnr7b6ZLH6duylwWcZXCFrw1pgZXSvU7g4qyLa/N
+2PdAfyLJV0uSQmVehEKtVBcWUHjELusCAIbIS7/wmRxtmDXO9Aki7deWjHnd
+OBW3Rt3wU6DXwnzDTgRvLzm2McQvcEPsmtB/TXRx9Q1P7804jtyd0kojV4x4
+8muw1+zsVpMuFWu4mBQWMO2TlAOx68ICPXxCDxdm7tsS8YGv+7TVOaK2/A9G
+DOsZL9ouB73svLAQ7VyYNvs8rc5dP7etMXHx9aQPQxLKerd9+WlJFiFBh9Xr
+QgeqR/hcFwBggKRg/qjJe6qVdE+QIEQ5n81Yndtm3Eu1Fy5wn/xdVV+xROs5
+/5ddI7QTblV9xvvDnaYfb9RvE9B1p/Kqk4nJuSZ7SDTSKBST//mlz7ioYpLp
+n7T4c/cRQaebcA3RnBno5LLktye4RlWTLBj59sXqC4FDRvS0VUn+B8OGTP8d
+bU3CcGziozHVbTePb18W5Pn8INclWT2ZiHhqSfSQoMXKdaEH0SO8rgsAmEWc
+GzxS8N8aFd2TTlQNJz6aGWjErBV5xs0aF12JjjxYRnJ4L/r9DZepR+uNWo4u
+yXVClW6HRZI/3+WVng1zmu5UVZ8208Ur/KZJXmtqaRSKYZVxk9wXkc0IZSXr
+vFy7/keSP2/kmM13O6ekxOMzQudX0+7lzRs+dHb3rFJ8edZQprPKXjO+7jV4
+yAQhlRnpdNZiY2N2QkgK13oMDcxs1ivHV0sihwQt1q4LfeNC8wi/6wIA5pDk
+v+8m6Dk3IH/CFEJWkb7z4G3yD3YlV0LcBN8bizVsbh03Px3t/dWf+m0JNkck
+VNIoFVOUbfEZs6KI5GyNpuWm1tb86DuiZzf+YcpUZ2FaA9qpsPl1E2+N2U3H
+9Y993vqlRa8fXy2JHBK0WLkuZkDzCL/rAgDmkBVHek+Jq8TonjADe3gmPvlq
+V1JPvK3k9NmGPiKwyljBuAjjzkvb3Mbvvq/9S2V1kp9fdHn3HrqifCur7tRU
+Go1ikoKFnsJ0slZn3HI3GbTceuxx5nzvYO12iAZvOj17/KIs1Fzl5sYmnhqT
+kDc+aMZ0nR9W9cPcf/fuIPHVksghQYuV62IGNI/wuy4AYA51Q1qAQBeW1E+Y
+iGnOCvd85umn9Dw9yCfmvlFzV9zb7is0PnbubG5Ow2at25GYFP/1qs0nuk93
+lc23z+4MePFZj9UZBZVSxq2CRBqtYory7b4zDtSafJpDYI2XEwNefEGw47fq
+1srs/4x7frBw96XaljsZ4a5/Hbkk/ZYYe5IT89nahJTDietXxOY+QZ5S0vao
+vDUmIbq8bOIIz6CImENpqT9mV8t7pug8tSR6SNBg/bqYAckjPK8LAJhFVrLB
+P6xAQvuEG3BRzvr3dvZ979Rwm8Jy0KQRkqubQrbebLfLnXBeGZPHluTWJrbF
+keoCAObpuBE5K6bPK+OmT7hCUZuZkHzpUe90X9fcWGwgkoMiTVGblZR4vtGO
+rwzkizF5bUlubWJbHKkuAMAAWem3ITFlCton3EFgLa1d++MataQ4Y+WoZ196
+c3dWsdjiTQM0abi8SYTxcJ6PBh+MyWNLcmsT2+JIdQEAhqibs9dF/Wp42Gn6
+BAAAAAD6F7zt2qHDRYYv1Jo+AQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAADASuBthbGfzhaOcZ24aG+pFN7mZwMPbchDlRwYsDYAcI28OvXQ
+DTGuwar3B4wKZpIjFzCGzIaEpOTU+Vr6S08UtedPlVjn4z5wa3/CNgAAAKCE
+UMvUut5RemulcOlVyIjNAnIbKusyouKLKG+mJdqL4qOO11npfkBwa3/CKgAA
+wIYQKrsJTOmdXZ8kV/JtmmdHBtSY2lBavG1xSg356KOsSVm8rZgkSaJ1VQKs
+CUoAAABTCFnF0ZXTRzs9N9jVb/mRexQ5tLH6i0d/vtthrscksIbc/ZFBU97N
+RUq0R4686tj6sGD/sX93mbo0tUZ7PzQuvnUyPa/ZJI8RvU7UFSTaS9IP5LRY
+drcnbw1IrhgrG5L4oqcUEhvKS795J7qMLEeZvCx6zjelaNnLyLEjtzITxQJV
+48kFk0IL9Ql32HnWkhJ1oAUAADBFdjdu1d6CJkzZen3vnGF/m7CrwjRJgOrR
+/z5fvJ/BLJRQPK5ruBbpPhwxCSwZippje87VdSqjbjqz4B9uH9/o6NK3NCH0
+iwutzPsdygoS8prsU380dc7u8I6aCgnbnoy3BqRWDNmGFL6gtqHo4twAMkMo
+KnYGvMvJKZAduZWJKDaoGk4t9XNyWWAwUiB71tISUQMAAJiifHTpQqM+hKRF
+K9yc38kVG/0J3nI21Hd5IdNsiIrybcgJysnAlVL9xpaibMtrM/Y90G8REE8u
+hr4WnidmOPmkqqCyLj3M081zXCdjvf03900j2Bd1U+ayiKsU9eetAekUQ7Qh
+lS+obSi9vXLSW5nNxvLxx6dnTFp1m4MdPTtyKwNRbFDWndyU8EvMZHfDsQnZ
+s5aViBwAAMCK9mtLxrxunIlco274KdBrYb5hE8TbS45tDPEL3BC7JvRfE11c
+fcPTH/RMHpG7VlppGlx8PenDkASD/QHiya/BXrOzW006Plo51BU0i5m85Obk
+29iApIqxs6GpL6hQ3Pt28sSv/jT+Q3npFz6To9HyajqKW9moSi1QWXt8Y3KZ
+uPp7Qd+xidKz1iuRFIoAAAAWEKKcz2aszm0zDur2wgXuk7+r6tuciNZz/i+7
+RmjnZ6r6jPeHO00/3qhfz9N1rfKqk4nJuSZbDpTS1G03j29fFuT5/CDXJVnN
+3T+T//mlz7ioYtMpMY1WNBU0C8NOjI8GpFQM3YbkvqBAWb1H4BFm8pqcpGD+
+qMl7qhFHEcdwqxlVkTyLPUjdeLBCrlE+MB0pKD3LEPQSyaAIAABABhddiY48
+WEZyTCv6/Q2XqUfrjRqNLoF1QpVuq0KSP9/llZ4zCJquVVWfNtPFK/xmh/F/
+UEvTQkgK13oMDezZIcAq4ya5LyokiXsaOdQVpELVcOKjmYFaXvcaPGSCUPfP
+WSvyyHtB3hqQXDFWNtSY+oICVc0PU9zeu2LchYlzg0cK/lvT97S+184G9LGz
+Q7iVXlUUz7ZWHtl4pEq7miEbKSg9a97OLEskrQ95ACCoAQAa3XtE6TsP3ib/
+GlJyJcRN8P0Do7muYQB33Px0tHfP+p3NcQm1tC46rn/s89YvLXr9FGVbfMas
+KCI5taCSQ1tBs5ifYPPWgJSKoduwm76+oEBZnSRwX2jSQUry33cT7DM2hVkc
+wK2sVTUVePtOzD8njJ+gY6zLoL+84OHzxqqinkGN2rPWKpEMigAAABSwh2fi
+k6+26TLE420lp8829Hm9BquMFYyLMI51bQCP331f+5edYejnF13evbGuKN/K
+qms1lkbIGx80Y7q2jFX9MPffvftIkoKFnsL0BpJtJXKtzFTQLOY6MZ4akFYx
+NBtS+4ICrGKXwGedyZsIsuJI7ylxlaivb9m9Wy1QlTpOOlHVHnjVw2gVQ+1Z
+a5VIBkUAAABj1M1Z4Z7PPP2UnqcH+cTcN2o3invbfYXG57edAew0bNa6HYlJ
+8V+v2nyi+8hX2Xz77M6AF5/1WJ1RUCnFmWpBIo0QXV42cYRnUETMobTUH7Or
+5T0zTkX5dt8ZB2rJPuMgkcOgguag7cR4a0BaxdBsSO0LKmR31kwKPN5orL+6
+IS1AsOku6gm5fbvVMlUp4qQLkpGCxrNWKpEUigAAAE7BRTnr39vZdw5kuPC3
+HARphOTqppCtN8lvROFWK87glQE1/WFDce68aRtIZs2ykg3+YQVM36bnVCXu
+sb5bkQXSetYqJVJAFQAAwDGK2syE5EuPeueIugBG352hgLE0RW1WUuL5RqoD
+C2614hK+GFDTLzbEKuKCo26QHUh03IicFYP2EvkAdiuiQDOetUKJVFAHAABw
+DoG1tHYdOWjUkuKMlaOefenN3VnFYou/QUeQhsubRBjVnJBbrbiHDwbU9IsN
+scp9C3aUkk+aZaXfhsSUIQxOA9atyAJpPWuVEqmgCwAAAACbgLf+sXnjecq3
+JdTN2euifm2GkwiHxUwAAAAA9D9E+520I9fb6IYevO3aocNF1snfBNgaBgEA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2Ba8rTD209nCMa4TF+0t
+lcJ7vVYETN1vgKk5BIwJUKKoPX+qxDrfg8irUw/dEOMarHp/wKhgJllAAZaQ
+mZqQlJw6X0t/S4IVve+oQFRzCBgToIBoL4qPOl5n4SVZlNLVMrWu25PeWilc
+CnkqrQi5qZV1GVHxRZSXc1rX+44KRDWHgDEBcpQ1KYu3FbPPFMYQ6Z1dnyRX
+It7BCbDB2NTS4m2LU2rIR59+8r5ZCJVdrtv4GdVgTMARkJdFz/mmFDXhDRmE
+rOLoyumjnZ4b7Oq3/Mg9w9TQRHtJ+oGcFssuwKKRbwBWf/Hoz3c76BsnM1Eo
+yKuOrQ8L9h/7d5epS1NrtFcs4+JbJ9Pzmi3Ic4NUXDdkppaXfvNOdBmZj1l5
+n0NHaG8ybcjdHxk05d1cpFyHCIpZ6AhclBe7fG18yqH4NcvjrogMrsrhW1Rz
+a8xuVI0nF0wK7U6oxG9jAo6EomJnwLucbPHK7sat2lvQhClbr++dM+xvE3ZV
+6LtMQl6TfeqPps55O95RUyFhG32U8g1QPfrf54v3m516MRGFhKLm2J5zdZ1C
+1E1nFvzD7WP95f2y0oTQLy60ct7eKIqjNrXo4twAskqy8j6HjujUWPG4ruFa
+pPtwxDy8aIqxdwTecvZD77dPPur8qbrxxEzv0HMtXR0q/6KaW2N2l91waqmf
+k4thsj/+GhNwJPDHp2dMWnWbgz0d5aNLFxr17UpatMLN+Z1cse55XXqYp5vn
+uE7GevtvpssGpm7KXBZxlSIvHJV8AzpDP9R3ufmUmQxEIYIrpfptFEXZltdm
+7Hug30AjnlwMfS08T8zxFgtFcdSmlt5eOemtzGZjNVh5n0NH6FGUb0POEY+o
+GFtHqOtThc5TUx7q1gmq2v0CZ/+ftNnIeRjVejgypl69upObEn6JmezeJxEt
+X40JOBTy0i98JkejpWLD20uObQzxC9wQuyb0XxNdXH3D0/umVda0X1sy5nXj
+ZNLmoc1hbV6+uuGnQK+F+YaBy7mq9AJx8fWkD0MSDHbPiCe/BnvNzm5lOTih
+FkeF4t63kyd+9afxH7Lxfh+4cQRyd8rCrZSOwBouJoUFTPsk5UDsurBAD5/Q
+w4WZ+7ZEfODrPm11jqgt/4MRw3rGi7bLQS87LyxEO6zv56jm0JjK2uMbk8vE
+1d8L+o5N9mBMwO6RFMwfNXlPNeIoQrSe83/ZNUI7c1LVZ7w/3Gn68cbedTgh
+yvlsxurcNuT+mGHgUclvL1zgPvm7qr51Ya+qvOpkYnKuydYFpUB1283j25cF
+eT4/yHVJVk9uGfmfX/qMiypmnQUNsTgKlNV7BB5hJm9AsfN+r24cOYKuO0X1
+AqVi1I6QFn/uPiLodBOuIZozA51clvz2BNeoapIFI9++WH0hcMiIng5Ukv/B
+sCHTf0dbk/RzVHNmTOxB6saDFXKN8oHJ2MR7YwIOgDg3eKTgvzV9jzZVDSc+
+mhloxKwVeb3tRpdVOaFKtxkhyZ/v8krvkQcuuhIdebAM4fWC3uJe9xo8ZILQ
+tDhDqOWLfn/DZerReqOWx1ZVVX3aTBev8JsmaZ9pBGq03xMVrvUYGtizf4ZV
+xk1yX0QyOzRvZDbFUaCq+WGK23tXjPdCWHq/C+4cQdOdsvECuWKUjtDIStZ5
+uXb9jyR/3sgxm+92ri+Jx2eEzq+m3cubN3zo7O6pvvjyrKFMp/q2imqOjNla
+eWTjkSrt+olsbOK3MQGHQJL/vpug53iEMYbB3HHz09He+v0iQlaRvvPgbZbf
+cZqfFNHKl1wJcRN8b1wXzlWlEthNx/WPfd76pUUvV1G2xWfMiiL2B3poxVGg
+rE4SuJv2Ayy9r+HUEeyOSJDdSu0Imu40tbbmR98RPUckD1OmOgvTGtCO6vs1
+qrky5u07Mf+cMH6CjrEug/7ygofPG6uKegY1HhsTcBRkxZHeU+IqUV9T0wbz
++N33tT/r7Pb8/KLLtTMs7OGZ+OSrXQkp8baS02cb0OSaCzwz8rHKWMG4COMG
+w7mqZAIJeeODZkzXt2BVP8z9d+8mm6RgoacwHbEFsi+OAqxil8BnnckhM0vv
+c+kILYryray6UyS3UjvCuDvdZNCd1mOPM+d7B2v3qDR40+nZ4xdloSZ778eo
+1sKdMfWoag+86mG0buKtMQHHQd2QFiDQxQ8SncHsNGzWuh2JSfFfr9p8Qnt2
+qm7OCvd85umn9Dw9yCfmPmKnRxt4DOQr7m33FRofJnOuKolAQnR52cQRnkER
+MYfSUn/Mrpb3zIAV5dt9ZxyoteAjJ6TiqJDdWTMp8HijcUfAyvscOkKLsvn2
+2Z0BLz7rsTqjoFLKuKtCdSuVIwis8XJiwIsvCHb8Vt1amf2fcc8PFu6+VNty
+JyPc9a8jl6TfEmNPcmI+W5uQcjhx/YrY3CfIs4z+imot3BmzF5KxiafGBBwL
+WckG/7AC1JcyDTcBeAQuyln/3s6+ywPOVUUQSEiubgrZepPyviCOi6NGnDtv
+2gaSd3PZed881ncEmjQuHGEzwJjAwKTjRuSsGNTXiHXBzGIzyPooajMTki89
+6p1lcq4qY4GK2qykxPONFt5Ux4X+WEVccNQNkyNwDUvvM8LKjkCRxo0jbAkY
+ExiIyEq/DYkpQ+ie1JLijJWjnn3pzd1ZxWIefsJNYC2tXYcx3KuKIBCXN4kw
+C+eW3OiPVe5bsKOU/DV2ZO8jYDVHoEnjwhG2B4wJDDzUzdnron5FPZUE7AS8
+9Y/NG89Tvi0B3gcAgK/gbdcOHS6CDD4OCNF+J+3I9Ta6oQe8DwAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAACArcDbCmM/nS0c4zpx0d5SKWevNVtJ
+rE0KtUldHAywoeWADYGBhLw69dANMa7BqvcHjArm7E5HK4m1SaE2qYuDATa0
+HDIbEpKSU+drDS8ZMX0CAHYJoZapdTMw6a2VwqUmeVp5JtYmhdqkLg4G2NBy
+yG2orMuIii8yvAbW9AkA2DHSO7s+Sa7kfLplJbE2KdQmdTELobKnTghsaDnG
+NpQWb1uc0iejh+kTAOAxhKzi6Mrpo52eG+zqt/zIPcNk1ER7SfqBnBZ2l1ji
+orzY5WvjUw7Fr1ked0VkcFePRWIZoWo8uWBSaJ9MN3yuC40LDMDqLx79+W6H
+ue6SwBpy90cGTXk3FymrHS197YmLb51Mz2tGS4VlrTBjIN8AG9iQXDFWNuyG
+YXjLS795J7pMTvsEAHiL7G7cqr0FTZiy9freOcP+NmFXhf6CfkJek33qj6bO
+WRbeUVMhQew58JazH3q/ffJR58/UjSdmeoeea8E5EMsIVcOppX5OLgZZ2Phd
+F0oXGNbp0f8+X7yfwcqCUDyua7gW6T4cMeMqDab21MhKE0K/uNDKvMZWCjPz
+8g3rYQsbUiuGbEM9zMNbdHFuQF9DmD4BAJ6ifHTpQqM+VqVFK9yc38kV657X
+pYd5unmO62Sst/9mkmx4tKjrU4XOU1Me6uaFqtr9Amf/n7SJoy0UywRl3clN
+Cb/ETHbvabw8rwuVCwzoHB1DfZcXMk09qCjfhpwNnFo9E3tqIZ5cDH0tPE/M
+cNOLgzBTN2Uui7hKYQLe2pBOMUQb6gUihLf09spJb2U2G8g3fWICrZ0BwArg
+7SXHNob4BW6IXRP6r4kurr7h6X1TPmvary0Z87pxzmkqsIaLSWEB0z5JORC7
+LizQwyf0cGHmvi0RH/i6T1udI2rL/2DEsJ5m2HY56GXnhYXcnXRT10VZe3xj
+cpm4+ntB376Uv3XpA7kL1A0/BXotzDesDq03kftVFvYknvwa7DU7u9W4m+M4
+zHphnAScdzakVAzdhmjhrbj37eSJX/0pp3tiAiRbB/ofovWc/8uuEdqJmqo+
+4/3hTtOPN/buKBCinM9mrM5tYzyLkxZ/7j4i6HQTriGaMwOdXJb89gTXqGqS
+BSPfvlh9IXDIiJ4eXJL/wbAh03/n7vyDqi7Yg9SNByvkGuUDpLHJxnXprRSF
+C9oLF7hP/q6qb29L4026flVedTIxOddkJwndnvI/v/QZF1VsutLhOMy6Ydhn
+8s6GdIoh2hA1vJXVewQeYYZvP5o+MQHGJsAG6DI+J1Tpthgk+fNdXvm4Jz04
+LroSHXmwjOIImRRZyTov10W6PluSP2/kmM13O6djxOMzQudX0+7lzRs+dHb3
+WkN8edZQpmsNVcOJj2YGGjFrRZ5xZ0NSl9bKIxuPVGknmMhjk23r0gW1C0S/
+v+Ey9Wi9UV9I7U2aflVVnzbTxSv8pklaeGR7YpVxk9wXkRmC0zDrteHrXoOH
+TBDamQ3pK45kQ/TwVtX8MMXtvSsSuic9/4NkZwDgFsOA77j56Whv/eqekFWk
+7zx4GzGpHU1/nlpb86PviJ4zmocpU52FaQ2cvvdgWpfbd2L+OWH8BB1jXQb9
+5QUPnzdWFZl0IDysi8aMCyRXQtwE3z8w2qWi8ia7sxJkeyrKtviMWVEkZSLK
+kjDrxvx8noc2NFNxFBuyCG9ldZLAvc88yvSJCbBuAmyANuDH776vDfjOIPXz
+iy7XzsKwh2fik692JWTF20pOn21g9h6PcX++yaA/r8ceZ873DtZukmnwptOz
+xy/K4jjZOHld9KhqD7zqYcm6qX/rYs4FWGWsYFyEcRdGbQFF+VZW/SqSPSUF
+Cz2F6WSDNLdh1o25PpO3NqRRDNWGepiGN1axS+CzzvAFE9MnJsDYBNiAzoB3
+GjZr3Y7EpPivV20+oT1fVTdnhXs+8/RTep4e5BNzn0mfQWCNlxMDXnxBsOO3
+6tbK7P+Me36wcPel2pY7GeGufx25JP2WGHuSE/PZ2oSUw4nrV8TmPuF6oUFS
+l17QxiYb14WBCxT3tvsKjY/3KSygbL59dmfAi896rM4oqJQyHkRR7ako3+47
+40At2Qc6HIaZAbR9Jm9tSKsYmg17YRresjtrJgUeb8TpnpgAYxNgAww3Cuwd
+R6qLeXBRzvr3dvad73JrATRphOTqppCtN8kvwOGpawaeDcW586Zt6FNh0ycA
+wAd0AR9XybdOgxWOVBdGKGozE5IvPeqd93NrARRpitqspMTzjVRvgfPXNQPL
+hlhFXHDUjQ7aJwBge9SS4oyVo5596c3dWcViK94X1B84Ul0QILCWVqxrms2t
+BdCk4fImEUb1QgPfXTNwbIhV7luwo1RG+wQAAAAA+g+89Y/NG883q+meAAAA
+AED/QbTfSTtyvQ2newIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADw
+A7ytMPbT2cIxrhMX7S2VwvX0VgRMbRPA7P0GmHrAoag9f6qE5UX/ZpBXpx66
+IcY1WPX+gFHBcOGiFSEzNSEpOXW+VkH7O1PvWzEeHA/uzA6YATqTAQbRXhQf
+dbwONaE0U+lqmVrX/qS3VgqX0qanBCyD3NTKuoyo+CLy6zc1ZN63bjw4HhyZ
+HTAPdCYDC2VNyuJtxSS5wLhFemfXJ8mV9DNJgBOMTS0t3rY4pYa8GzT1fj/F
+A6FytBWDZWa3DXbqBehMBgTysug535TKOZBEyCqOrpw+2um5wa5+y4/cM8zV
+TLSXpB/IabHs3isa+QZg9ReP/ny3g77JMROFgrzq2PqwYP+xf3eZujS1RnvX
+Mi6+dTI9r5ksk43lmBbXDZmp5aXfvBNdRuZjU++TxQOHltfeTNqQuz8yaMq7
+uUhJ7shxGLMzgLdeIFfMQkfgorzY5WvjUw7Fr1ked0XU56oiDjoTgP8oKnYG
+vMvJxq3sbtyqvQVNmLL1+t45w/42YVeFvu0S8prsU380dU4g8Y6aCgnbmKKU
+b4Dq0f8+X7zf7ISKiSgkFDXH9pyr6xSibjqz4B9uH+vv7JeVJoR+caGV81ZE
+URy1qUUX5waQVdLU+2TxwKHlO1VUPK5ruBbpPhwxASsZjmN2BvDWC9SKsXcE
+3nL2Q++3Tz7q/Km68cRM79BzLV2jE0edCcB/8MenZ0xadZuDzQXlo0sXGvVB
+KS1a4eb8Tq5Y97wuPczTzXNcJ2O9/TfTJQFTN2Uui7hKkfqSSr4BnQEd6rvc
+fO5MBqIQwZVS/eaIomzLazP2PdDv5BBPLoa+Fp4n5njjhKI4alNLb6+c9FZm
+s7Eapt4niwcOLa9HUb4NOTk4GQ5jdgbw1gt0irF1hLo+Veg8NeWhbtGlqt0v
+cPb/SZvmnavOBLAD5KVf+EyOvoe0c4u3lxzbGOIXuCF2Tei/Jrq4+oan982v
+rGm/tmTM68a5os3DOHUyuXx1w0+BXgvzDcORc1XpBeLi60kfhiQYbOMQT34N
+9pqd3cqyl0QtjgrFvW8nT/zqT+M/NPW+uXjgxvLIvaKjmx0RXnqBVDFKR2AN
+F5PCAqZ9knIgdl1YoIdP6OHCzH1bIj7wdZ+2OkfUlv/BiGE9Y1zb5aCXnRcW
+or35AHnY7R1JwfxRk/dUI44iROs5/5ddI7TzIVV9xvvDnaYfb+xdXROinM9m
+rM5tQ+4YGIYTlfz2wgXuk7+r6lsX9qrKq04mJueabEhQClS33Ty+fVmQ5/OD
+XJdk9aSUkf/5pc+4qGLWyc8Qi6NAWb1H4BFm8l6Tqffp44Ery9P1igPS7Gi6
+8dALlIpRO0Ja/Ln7iKDTTbiGaM4MdHJZ8tsTXKOqSRaMfPti9YXAISN6RiNJ
+/gfDhkz/HW2BB2OTvSPODR4p+G9N3wNLVcOJj2YGGjFrRV5v0OnSKydU6Vby
+kvz5Lq/07r3joivRkQfLEF4v6C3uda/BQyYITYszhFq+6Pc3XKYerTdqT2xV
+VdWnzXTxCr9pku2ZRqBG+2FL4VqPoYE9GzlYZdwk90Ukcz7zRmZTHAWqmh+m
+uL13xXiHw9T7pPGghzvL0/SKA9PsCIrx1gvkilE6QiMrWefl2vU/kvx5I8ds
+vtu5viQenxE6v5p2L2/e8KGzu9dN4suzhjJdN6F1JgCPkeS/7ybo2adnjGGI
+dtz8dLS3fuOCkFWk7zx4m+UHheanOrTyJVdC3ATfG9eFc1WpBHbTcf1jn7d+
+adHLVZRt8Rmzooj9gR5acRQoq5ME7qat29T7lPHAoeXZnXQ4tNmZwlsvUCpG
+7QiasSm1tuZH3xE9500PU6Y6C9Ma0N57gHWTvSMrjvSeEleJ+pqaNkTH776v
+/Vln+/Pziy7X7jtjD8/EJ1/tykOJt5WcPtuAJtdcOJmRj1XGCsZFGDcDzlUl
+E0jIGx80Y7qGiVX9MPffvbs9koKFnsJ0xHbFvjgKsIpdAp91JkfHpt6niAcO
+La9FUb6VVa/osGZnBk+9QKsYtSOMx6ZNBmNTPfY4c753sHbDT4M3nZ49flFW
+M2J6Wxib7B11Q1qAQBcVSHSGqNOwWet2JCbFf71q8wntiai6OSvc85mnn9Lz
+9CCfmPuIrY82nBjIV9zb7is0PiLmXFUSgYTo8rKJIzyDImIOpaX+mF0t75k+
+Ksq3+844UGvB1zZIxVEhu7NmUuDxRuPmbep9snjg0PJalM23z+4MePFZj9UZ
+BZVSxj2OQ5udAbz1Aq1iVI4gsMbLiQEvviDY8Vt1a2X2f8Y9P1i4+1Jty52M
+cNe/jlySfkuMPcmJ+WxtQsrhxPUrYnOfIM8yYGyye2QlG/zDClBftTRc2vMI
+XJSz/r2dfeepnKuKIJCQXN0UsvUm5cU1HBdHjTh33rQNJG/cmnqfXTz0g+Ud
+2+zcwCsvaLhxBDBw6bgROSsG9X1WXYiy2JWwPorazITkS496546cq8pYoKI2
+KynxfKOFV6ZxoT9WERccdcPkYFtD5n1W8aDFypZ3cLNzBV+8oOHKEcAARlb6
+bUhMGUI7UUuKM1aOevalN3dnFYt5+GE2gbW0dp0KcK8qgkBc3iTCLJwxcqM/
+VrlvwY5S8vepTb2PHA+9WM3yA8Ds3MEHL2i4cQQwwFE3Z6+L+hX1rBGwE/DW
+PzZvPE95bG/qfYgHLkA2OwAAJuBt1w4dLoJUMg4I0X4n7cj1Nro+0NT7EA+W
+wsrsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADMHbCmM/nS0c
+4zpx0d5SaT+9l2ylQm1SFwfDAeIBwgAA7B95deqhG2Jcg1XvDxgV3E83XFqp
+UJvUxcFwgHggk0ZISk6dr7XObRoAAFgBQi1T62aW0lsrhUtNEq3aVaE2qYuD
+4QDxQC5NWZcRFV8El8cCgJ0hvbPrk+TKfp5YWqlQm9TFLITKnvpFB4gHY2nS
+4m2LU2rgAlmA9xCyiqMrp492em6wq9/yI/coUsFj9ReP/ny3g75bYSaKBarG
+kwsmhRbqcyLg4lsn0/Oa2eYWwkV5scvXxqccil+zPO6KyOBWHKK9JP1ATosV
+b9/tWxHLC7VyXTiMDe0Nqg25+yODprybi5SMD0ExiwKDa9fQQmNYCwplWAV5
+6TfvRJehZpwDgH5Gdjdu1d6CJkzZen3vnGF/m7CrwvT6ftWj/32+eL/ZiRwT
+UWxQNZxa6ufkssCg0clKE0K/uNDKogHjLWc/9H775KPOn6obT8z0Dj3X0tWj
+E/Ka7FN/NHXOJ/GOmgqJNQYo04pYVqi168JhbHTqpHhc13At0n04YqJYNMXY
+BgbXrqGHUn9LCmVeBdHFuQFcNU4AsBLKR5cuNOqjVFq0ws35nVyx0Z909oCh
+vssLzSZyYyCKlYZ1Jzcl/BIz2d1wbNIQTy6GvhaeJ0ZdmqnrU4XOU1Me6ubW
+qtr9Amf/n7T5rpV16WGebp7jOhnr7b+ZJJ2dxZhWxMJCOaiLuilzWcRVCtdy
+GBt6FOXbkJOYIyrGKjA4d42Z4ij0t6RQlCpIb6+c9FZmsz3trQIDm/ZrS8a8
+bpyRWqNu+CnQa2G+YfeDt5cc2xjiF7ghdk3ovya6uPqGpz9QMBBFCbVAZe3x
+jcll4urvBX3Hps4+6Ndgr9nZrSYNDGu4mBQWMO2TlAOx68ICPXxCDxdm7tsS
+8YGv+7TVOaK2/A9GDOvpytouB73svLCQu5NuFhWhw+p1YZx3m5vYQB6bWEQa
+VWBw7Bqr6c9KGloVFPe+nTzxqz9hVw+wDwhRzmczVue2Gbfp9sIF7pO/q+rb
+eIjWc/4vu0Zop6eq+oz3hztNP96oNitKi7zqZGJyrsmmC7lA7EHqxoMVco3y
+gWmjk//5pc+4qGKSuaW0+HP3EUGnm3AN0ZwZ6OSy5LcnuEZVkywY+fbF6guB
+Q0b09OCS/A+GDZn+u+XnH5ZUhBYr14Xh2MRVbNCNTUiBQacYZWBw7BpmsG8p
+zKWhVkFZvUfgEQYvcAJ2AS66Eh15sIzktFv0+xsuU4/WG/UZutTSCVW6jQlJ
+/nyXVz7uSZ1NLaoTVX3aTBev8JsmebZJBLZWHtl4pEo7MSRrdFhl3CT3RWTr
+BFnJOi/Xrv+R5M8bOWbz3c4ZIvH4jND51bR7efOGD53dvdYQX541lOlaQ9Vw
+4qOZgUbMWpFn3K8gV4QWa9flda/BQyYIqerSBXexQTM2oQQGfaRRBwanrrEg
+Hhi1FHI4qYKq5ocpbu9dIfk7ppUCgP6BkFWk7zx4mzxLm+RKiJvg+wdGmw6G
+baTj5qejvfVbBLSi6DAVePtOzD8njJ+gY6zLoL+84OHzxqqinr5LUbbFZ8yK
+IqmpKJr+PLW25kffET1nNA9TpjoL0xo4PedGrggtVq6L+XUTh7HB7rwJOdKo
+A4Nb11hLf0RpLKqgrE4SuHO5lQ0AVgF7eCY++WpXhlG8reT02YY+b/BglbGC
+cRHGTV3bRsbvvq/9y85I9/OLLleYF0UHuUA9qtoDr3oYTQglBQs9helkfbFx
+f77JoD+vxx5nzvcO1m6SafCm07PHL8riOK03ckVosXJdzI1NHMaGFkX5VlZj
+E1KkUQcGt66xlv4spCFWAavYJfBZZ433fQCAM9TNWeGezzz9lJ6nB/nE3Ddq
+JYp7232Fxqe1nW3EadisdTsSk+K/XrX5hPZIloEoGkgE9kLS6BTl231nHKg1
++ZaFwBovJwa8+IJgx2/VrZXZ/xn3/GDh7ku1LXcywl3/OnJJ+i0x9iQn5rO1
+CSmHE9eviM19wvXL4qgVocH6daEdmziMDS3K5ttndwa8+KzH6oyCSinjQRQ1
+0qgCg1qxLqw4NnHYUjipguzOmkmBxxu5nZMBQP+Di3LWv7ez7zTLcG+BE9AE
+EpKrm0K23uTj1SucW4bXWD82OAwMm7jGltagQJw7b9oGWDYBDoGiNjMh+dKj
+3vmxro3EVXI8NjEUqKjNSko838jPa1c4twzfsXJscBgYNnGN7axBBVYRFxx1
+g9NDNQCwIQTW0op1TUfVkuKMlaOefenN3VnFYi72xNAE4vImEcbDFZPGCpax
+D6wWGxwGhk1cY0trUIFV7luwoxRWTQAAAABfwFv/2LzxfPPAmTcBAAAAPIdo
+v5N25HobvAUBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOCB4W2Hs
+p7OFY1wnLtpbKuXnl7p2g02MaaVCITAsB2wI6FHUnj9Vgp52YiAjr049dEOM
+a7Dq/QGjgplkdgUosYkxrVQoBIblgA0BHUR7UXzU8Tp+Xh7HWwi1TK0bzKW3
+VgqXQopPi7CJMa1UKASG5YANAS3KmpTF24pJEqX1M4TKLtdt0ju7PkmuVJj/
+Q8A8NjGmlQrlZ2DYVyvjpw2BfkJeFj3nm1I52o8IWcXRldNHOz032NVv+ZF7
+FDmfsfqLR3++22GuMRBYQ+7+yKAp7+YipYRDUAwX3zqZntdMlnGHCbgoL3b5
+2viUQ/FrlsddERncx0K0l6QfyGmx7O4wDo3JTBQK8qpj68OC/cf+3WXq0tQa
+7e3U/DYmOaa14KRQ+wkM/rYyK7kGsH8UFTsD3kXd0JXdjVu1t6AJU7Ze3ztn
+2N8m7KowvVJf9eh/ny/ez2DOQyge1zVci3QfjpiuFE0xWWlC6BcXWlkEOt5y
+9kPvt08+6vypuvHETO/Qcy1dnRAhr8k+9UeTsvNPOmoqJGzbEIfGZCIKCUXN
+sT3n6jqFqJvOLPiH28f6vAf8NSZKLSwt1I4Cg7etzEquARwA/PHpGZNW3Ubb
+0VM+unShUR+O0qIVbs7v5IqN5bacDfVdzjjHp6J8G3IqbUTFiCcXQ18LzxOj
+LiXU9alC56kpD3XTQVXtfoGz/0/adNzKuvQwTzfPcZ2M9fbfTJdITd2UuSzi
+KoUtODQmA1GI4Eqpfg9IUbbltRn7HugPJW1oTBZQ1MLCQu0oMPTwsJVZxzWA
+IyAv/cJncvQ99ju67deWjHndOGe2Rt3wU6DXwnzDRoO3lxzbGOIXuCF2Tei/
+Jrq4+oan9+Z7Rm41tNLIFSOe/BrsNTu71aTZYA0Xk8ICpn2SciB2XVigh0/o
+4cLMfVsiPvB1n7Y6R9SW/8GIYT2tr+1y0MvOCwvRDmdp85LT6tz1c0Rj0oii
+hF4gLr6e9GFIQlnvzq/tjMllLczgaIFhy1bGsWsAx0dSMH/U5D3VbN/RI0Q5
+n81YndtmHInthQvcJ39X1Vcs0XrO/2XXCO2kSlWf8f5wp+nHG/VrdbpWI686
+mZica7JPQCONQjH5n1/6jIsqJpmDSYs/dx8RdLoJ1xDNmYFOLkt+e4JrVDXJ
+gpFvX6y+EDhkRE+nI8n/YNiQ6b+jTT0ZdkFcGZNGlBZUe6rbbh7fvizI8/lB
+rkuyetLy2MyY9CDWwhyOFRi2bWUcuwZwdMS5wSMF/63pe36pajjx0cxAI2at
+yDNuHLjoSnTkwTKSM1rR72+4TD1abxRnunTPCVW67QBJ/nyXV3q2l2lajao+
+baaLV/hNkwzP1NIoFMMq4ya5LyKb2spK1nm5dv2PJH/eyDGb73ZO4IjHZ4TO
+r6bdy5s3fOjs7umx+PKsoUynx71mfN1r8JAJQioz0umsBdWYNKI07OzZCSEp
+XOsxNDCzWS/Udsakj0m0WpjDsQLDxq2MU9cwjQfAbpHkv+8m6DlGQIGQVaTv
+PHib/INdyZUQN8H3xmINg7Pj5qejvb/6U7+IZ7MTTiWNUjFF2RafMSuKSM7W
+aLqg1NqaH31H9BwrPEyZ6ixMa0Cb3JmfHnNoTFpRdFB7p4uO6x/7vPVLi16u
+zYzJaS3M4UiBYfNWxq1rAEdHVhzpPSWuEvl1Luzhmfjkq13pLfG2ktNnG/qI
+wCpjBeMijANUG5zjd9/X/qWyOsnPL7q8e8dZUb6VVasxlUajmKRgoacwnaz7
+MO6CNhl0QfXY48z53sHafR0N3nR69vhFWc2IWT3NdUEcGtOMKDrIBBLyxgfN
+mK63wKp+mPvv3i0XmxmT01qYw3ECQ4uNWxm3rgEcHXVDWoBA1+JQftScFe75
+zNNP6Xl6kE/MfaMuUHFvu6/Q+PC2Mzidhs1atyMxKf7rVZtPdJ+FKptvn90Z
+8OKzHqszCiqljJs3iTRaxRTl231nHKg1+fyCwBovJwa8+IJgx2/VrZXZ/xn3
+/GDh7ku1LXcywl3/OnJJ+i0x9iQn5rO1CSmHE9eviM19gtx6aLsgDo3JQBQN
+JAIJ0eVlE0d4BkXEHEpL/TG7Wt4zp7WdMbmsBT2OExhabNzKyEWxdQ0wEJCV
+bPAPK2D6FipzcFHO+vd29n3503BRbzlo0gjJ1U0hW2+222XwW9+YaAJ5bEzO
+zcJr7KqVDSzXAJbTcSNyVowFL5FTo6jNTEi+9Kh3VqcLThYbiOSgSFPUZiUl
+nm+04ysDrWxMFIG8NibnZuE79tPKBpxrAEuRlX4bElNmnTurCKyltWs3WaOW
+FGesHPXsS2/uzioWW7yTgyYNlzeJMB5O8tGwmjHRBPLYmJybxT6wh1Y2QF0D
+WIa6OXtd1K8cn0kDAAAAgEXgbdcOHS6C/E0AAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAABAf4K3FcZ+Ols4xnXior2lUktfaudWGkCFY9vZsWvH
+K8DUAF+RV6ceuiHGNVj1/oBRwUwygqJKIyQlp87X0t+Coag9f6oEvvZiDDM7
+M3nCGiu6jNuYBGhg22ABwOoQapla18FIb60ULr1qYbZucmnKuoyo+CLKe0qJ
+9qL4qON1/Lwtjp8wtTOTJ6zKt6rLuI1JgAZWDRYA+hPpnV2fJFdyNVkyliYt
+3rY4pYa8K1PWpCzeVkySGY1bCJUDNjXzdmbyBJl+chm3MQnQgNJgAYBjCFnF
+0ZXTRzs9N9jVb/mRe4aJnYn2kvQDOS1IF0LKq46tDwv2H/t3l6lLU2sMrzom
+kyYv/ead6DKypFXysug535T2/R8aVQ3A6i8e/fluh7khh8AacvdHBk15Nxcp
+xRstqsaTCyaFFuoTneDiWyfT85rJMuhYqUQdzOzM5AkiZC5jKwopipDhMpCo
+VbUAOwokALASsrtxq/YWNGHK1ut75wz724RdFfrmRchrsk/90dQ5R8I7aiok
+zDoDRc2xPefqOiWom84s+Ifbxzc6NPTSRBfnBvQUaSioYmfAu0ZHCpSqGqB6
+9L/PF+9nMKkmFI/rGq5Fug9HTD9Kg6rh1FI/J5cFBg1cVpoQ+sWFVmtd92xa
+InM7M3mCBJnLWEpCjSJEOAwkSlUtwb4CCQCsgvLRpQuN+kiTFq1wc34nV6x7
+Xpce5unmOa6Tsd7+m/smTaMGV0r1e2SKsi2vzdj3oGv5Ty1NenvlpLcym43n
+pvjj0zMmrbrdZ3uISlXDn7WcDfVdXsg0QaOifBtyamxKlHUnNyX8EjPZ3bBL
+0RBPLoa+Fp4ntsbGoWmJKHZm8gQFMpexBDmKTFA3ZS6LuEoRB1wGEoWqlmBv
+gQQAFoK3lxzbGOIXuCF2Tei/Jrq4+oanP+g7K2y/tmTM68aJpVlJw8XXkz4M
+SWCw9lfc+3byxK/+NP5DeekXPpOjqRMtkquqbvgp0GthvmGPQqsn8thELU1Z
+e3xjcpm4+ntB3y6ls0/5NdhrdnYr2x4fvURSTO3M5AkK5lxGBldRZAJtjnVD
+uAkkZFUdKZAAwGKI1nP+L7tGaOdeqvqM94c7TT/e2LtJQIhyPpuxOreNaexT
+SlO33Ty+fVmQ5/ODXJdkNZvZhVBW7xF4hJm8cyUpmD9q8p5qimGSStX2wgXu
+k7+r6vsrmlrTjU3yqpOJybkmmyjk0rAHqRsPVsg1ygemDVz+55c+46KKGS48
+SSqLXCIZpnZm8gQFepdRwU0UmcBwbOImkOhVdfhAAgDL0eViTqjSbWdI8ue7
+vNK7PY6LrkRHHiyjOBVGlabRfg1RuNZjaKC51b+q5ocpbu9dMW4S4tzgkYL/
+1pCe/lKrKvr9DZepR+uNugFqPWnGJlV92kwXr/CbJscHJNJaK49sPFKlnYSS
+NXCsMm6S+6JC08asajjx0cxAI2atyDPuKZFLJMPUzkyeoKhK6jLzP+QkikyL
+e91r8JAJQiqTdsFdINGo6viBBACWYxicHTc/He2tX5sTsor0nQdvI34xSSWt
+m47rH/u89UsLvVBldZLAfaFJg5Pkv+8mINu8p1VVciXETfC98a+o9WRz3mQq
+7fadmH9OGD9Bx1iXQX95wcPnjVVFPX2RomyLz5gVRezPYZBLJMPUzkyeoEDp
+Mno4iSITzK+bOA0kNqo6TCABgOVog3P87vva4OwMMT+/6HLtjAl7eCY++Wqb
+LhM83lZy+mwDs7dwyKQR8sYHzZiudWJVP8z9t9ndGKxil8Bnncmxtqw40ntK
+XKWxImZUxSpjBeMijFsvea21KMq3shqbyKV1oqo98KqH0eRTUrDQU5jewP4N
+K+QSyTC1M5MnKFC4zBycRJEJ5sYmzgKJvaoOE0gAYDmdwek0bNa6HYlJ8V+v
+2nxCexaqbs4K93zm6af0PD3IJ+Y+w+6FRBohurxs4gjPoIiYQ2mpP2ZXy83O
+IWV31kwKPN6IGz1WN6QFCDbd7TMtZaCq4t52X6HxyTaJnlqUzbfP7gx48VmP
+1RkFlVJjBVBq3QtJA1eUb/edcaDWgm9TUEskxdTOTJ6gQOYyBnASRabK0I1N
+HAaSBao6TCABgOUYLup5Ik2cO2/aBpJZmKxkg39YAfKuNi7KWf/ezr7ybFlr
+QnJ1U8jWmxZd82IlOzN5ggQ7l3HrHc6AQKLAwiABAFJ0wYm+7WJFaVhFXHAU
+6feKHTciZ8WgvZHchaI2MyH50qPeKa/taq2ozUpKPN9o4Scv1rEzkyeIsHIZ
+t97hEggkEiwOEgAwQS0pzlg56tmX3tydVSy2+PtybqRhlfsW7Cgln4TJSr8N
+iSljdWsagbW0dp0B2LTWuLxJhFn4kaK17MzkCTLILuPWO9wDgWQEB0ECAPwH
+b/1j88bzlIfH6ubsdVG/NsPOtqWY2pnJEzaAyxwaboIEAHgO0X4n7cj1Nrp+
+DG+7duhwEeRvsghTOzN5whZwmcPCXZAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAdo3y4Y8L//ktu09kAUPAkhwCxhw44G2FsZ/OFo5xnbhob6nU
+zr9eUNSeP1WC9gkGi58MAAhp+U+7twtf2wKdgIWAJTkEjDmQkFenHrohxjVY
+9f6AUcFMch3zFqK9KD7qeB3K1VQsfjIQwEWFh9Lu1v8+RwidgGWAJTkEjDmw
+INQytW7RIL21UrjUnhPyKmtSFm8rRsrPxeInbCBUdrUsUzacPfD/6jBNWw4f
+OwF7Mia/LWln8NiYdhSTdqRqD9I7uz5JruSVx9GQl0XP+aYUKccM2U8IWcXR
+ldNHOz032NVv+ZF7FJnMsfqLR3++22HOzQTWkLs/MmjKu7lISe7IZZEqhotv
+nUzPa2ab+gUX5cUuXxufcih+zfK4KyLdpSWKirh578yZO3dusP/wIWOClh54
+wPp6Y94aUyOvOrY+LNh/7N9dpi5NrdFWcMBYkpkoFOzNmBp59antX8UmH/w+
++vMlG06RbZvYUQN32Oaj17u9JP1ATos93/SnqNgZ8C7aliTZT2R341btLWjC
+lK3X984Z9rcJuypMW4Dq0f8+X7yfwThOKB7XNVyLdB+OmICVDGrFZKUJoV9c
+aGXhPLzl7Ifeb5981PlTdeOJmd6h51oMr9QS587z32rJBJW3xlTUHNtzrnMK
+rlE3nVnwD7eP9ZkBBoQlmYhCwu6Mqa5PmyFYe0d75Tbx5MI7E/7vNaPdIjtq
+4A7efAh5TfapP5o6Jw94R02FxD4HKPzx6RmTVt1G2Z4j+4ny0aULjfqYkBat
+cHN+J1ds/LOWs6G+y81nkdSjKN+GnBycBDrFiCcXQ18LzxOjToDV9alC56kp
+D3VzHVXtfoGz/0+GeaEZdALqpsxlEVcpbMFbY2pwpVS/taEo2/LajH0P9DNn
+G1qSFg4tyUAUIvZmTK3Mqc7T9lR0ilDVHf7nq1/2zehrRw3cwZuPsi49zNPN
+c1wnY739N9OlPaTtiGyMvPQLn8nRSNnPzP2k/dqSMa8bJ2/WqBt+CvRamG9o
+Bby95NjGEL/ADbFrQv810cXVNzy9NykycjzQSiNXjHjya7DX7OxWk5jAGi4m
+hQVM+yTlQOy6sEAPn9DDhZn7tkR84Os+bXWOqC3/gxHDeppA2+Wgl50XFqId
+ONImyKbVuevntjUmLr6e9GFIQllv12Q7SzKGG0vSiKLEYYyJP7kUOWHIyLn/
+2bc9cv2Ru31fTrajBg7NpwfGHZENkBTMHzV5TzXKC3f0PyFEOZ/NWJ3bZmzm
+9sIF7pO/q+r7K6L1nP/LrhHaGYOqPuP94U7TjzfqZ3p08SCvOpmYnGuyCKaR
+RqGY/M8vfcZFFZPMK6TFn7uPCDrdhGuI5sxAJ5clvz3BNaqaZMHIty9WXwgc
+MqInCCT5HwwbMv13tEkVw5DgozHVbTePb18W5Pn8INclWT2Ja2xmSYZwZUka
+UVoc3piykh3+Xi8McgrYeK6p7xmJHTVwaD498HlsEucGjxT8t6ZvmKkaTnw0
+M9CIWSvyutxO+hM9uOhKdOTBMpJzYtHvb7hMPVpv5ENdTuSEKt2aXJI/3+WV
+7j1YunhQ1afNdPEKv2mSBplaGoViWGXcJPdFZFMNWck6L9eu/5Hkzxs5ZrN2
+/4J4fEbo/Gravbx5w4fO7p6uiC/PGsp0utJr2Ne9Bg+ZIOxrWGN4a8xOCEnh
+Wo+hgZnNeuVsZ0myEDWGO0vSiNI4vDGx2sOL53z3Z3vzH9FvDxs86cs++/p2
+1MCh+aB1RDZCkv++m6Bn49OynxCyivSdB2+Tf48ruRLiJvje+FeGHuy4+elo
+76/+1K902ezxUkmjVExRtsVnzIoiktM2mpBIra350XdEzzbvw5SpzsK0BrTj
+RvPTFd4as5uO6x/7vPVLi14/m1nSPBxaklYUHQ5hTFnJ+glT4yq1lSDa/vho
+lEf4LQMV7aiBQ/Ppgc/rJllxpPeUrniz8CfYwzPxyVe7ckDibSWnzzb0+Qus
+MlYwLsLY+loPjt99X/uXyuokP7/o8u5tWUX5VlbxYCqNRjFJwUJPYTqZO41D
+YpNBSNRjjzPnewdr19kavOn07PGLslBzbpsLCZ4ak5A3PmjGdO0Jq/ph7r97
+NyVsZklzcGhJM6LocAhjYpXxr45d1vUGAXZ/92u+Mfcxw/+1mwYOzacHPo9N
+6oa0AMGmuyifN5H9RN2cFe75zNNP6Xl6kE+fuNWiuLfdV2h8gNzpQadhs9bt
+SEyK/3rV5hPdB4bK5ttndwa8+KzH6oyCSiljc5NIo1VMUb7dd8aBWpPdSQJr
+vJwY8OILgh2/VbdWZv9n3PODhbsv1bbcyQh3/evIJem3xNiTnJjP1iakHE5c
+vyI29wny7JQ2JHhrTEJ0ednEEZ5BETGH0lJ/zK6W98xTbWdJWji0JANRNDiC
+MTsV6Cjd/9n/WfbNd/v37dqw/lBp32+D7KiBQ/Pphs9jU+e4vME/rADpJUIW
+P9GCi3LWv7ez7wuNhitfy0GTRkiubgrZerOdT1usjOGVMcGS5hgQxuRVTGpo
+LckrVe3X49am40bkrBikl8jZ/KQLRW1mQvKlR73zFZ0H0bYUaUCRpqjNSko8
+32jHNwLyxZhgSfMMFGPyJSY15i3JF1Xt3OPWRVb6bUgM2jd5LH7SDYG1tHZt
+uWrUkuKMlaOefenN3VnFYov3H9Ck4fImEWb3ExU+GBMsaY6BZUw+xKSGmSX5
+oKoDeNyaqJuz10X9inSKxuInAAAAAIAC3nbt0OEipFdjWfwEAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAW4G2FsZ/OFo5xnbhob6mUs1f5
+rSR2QDFwXMNDlRwYsDZgD8irUw/dEOMarHp/wKhgzi5rtJLYAUU/uoaQlJw6
+X0t/P4ui9vypEut8hwjR0p+wDQAA6FcItUyt62+kt1YKl17lKvW2lcQOKPrV
+Ncq6jKj4IsprQon2ovio43VWuqwNoqU/YRUAgINBqOzG1dI7uz5JruR84mQl
+sRZiR37R9JtrpMXbFqfUkI8+ypqUxduKSTLWWVclwJqgBABgSwhZxdGV00c7
+PTfY1W/5kXvkubI1WP3Foz/f7TDXtRFYQ+7+yKAp7+Yi5REjR151bH1YsP/Y
+v7tMXZpao72QGBffOpme10yazZ5aJ+oKEu0l6QdyWthdTYmL8mKXr41PORS/
+ZnncFZHB1YgWiWWgtgE28Au5YqxcQ+LinlL6zzXy0m/eiS4jy8AmL4ue800p
+Sm42KqwVhAzkG8AoWpiJYoGq8eSCSaGF+txA7ALGkhJ1oAUAYEtkd+NW7S1o
+wpSt1/fOGfa3CbsqTG+lVz363+eL9zOY1xGKx3UN1yLdhyPmuCRDUXNsz7m6
+TmXUTWcW/MPt4xsdXfqWJoR+caGVeUumrCAhr8k+9UdT53wJ76ipkCD2DXjL
+2Q+93z75qPNn6sYTM71Dz7XgHIg1r7YBNvELtWLIrqFwcb+7RnRxbgCZfRUV
+OwPe5eQUyEpBaF6+AQyjhYkoNqgaTi31c3JZYDBSIAeMpSWiBgBgS5SPLl1o
+1DtFWrTCzfmdXLHRn3Q29VDf5YVMUyEqyrch518mA1dK9TtQirItr83Y90C/
+6CaeXAx9LTxPzHA6R1VBZV16mKeb57hOxnr7b+6bJc086vpUofPUlIe6aZ+q
+dr/A2f8nbUZoBLHqpsxlEVcpzMpbv9AphugaKhf3u2ukt1dOeiuz2Vht/PHp
+GZNW3eZgR4+DIOyvaGEgig3KupObEn6JmexuODYhB4xlJSIHAMAb2q8tGfO6
+caJljbrhp0CvhfmGQY23lxzbGOIXuCF2Tei/Jrq4+oanP+iZjiH3gbTSOpf+
+15M+DEkwWHETT34N9pqd3WrSldDKoa4gBVjDxaSwgGmfpByIXRcW6OETergw
+c9+WiA983aetzhG15X8wYlhPs227HPSy88JCtLNsxtmceekXUsXYucbUxWbg
+2jWKe99OnvjVn8bly0u/8JkcjZYClOMg7KWfo4WNqtQClbXHNyaXiau/F/Qd
+mygDxnolkkIRAABPIEQ5n81YndtmHCbthQvcJ39X1TdAidZz/i+7RmhnPKr6
+jPeHO00/3qhfIdP1gfKqk4nJuSaLeEpp6rabx7cvC/J8fpDrkqzm7p/J//zS
+Z1xUsekkk0YrmgpSIi3+3H1E0OkmXEM0ZwY6uSz57QmuUdUkC0a+fbH6QuCQ
+ET1dniT/g2FDpv+OtiZh2Nvw0S+UiqG7htzF5uDWNcrqPQKPMJPX5CQF80dN
+3lONOIpwHITd9HO0mFEVKWCwB6kbD1bINcoHpiMFZcAwBL1EMigCAOAFuOhK
+dOTBMpKDT9Hvb7hMPVpvFIa6jMkJVbrFvyR/vssrPYcFNH2gqj5tpotX+M0O
+4/+glqaFkBSu9Rga2LPmxirjJrkvIpsK08ihriAlspJ1Xq5d5Ujy540cs/lu
+58SKeHxG6Pxq2r28ecOHzu6enIsvzxrKdN2kajjx0cxALa97DR4yQaj756wV
+eeTdFW/9Qq4YK9doTF1sDm5do6r5YYrbe1eMuzBxbvBIwX9r+p7W97rPgD7u
+4zQIbRUt9KqiBExr5ZGNR6q0qxmykYIyYMzbmWWJpPUhDwAENQArQcgq0nce
+vE3+faHkSoib4PsHRrNHw5DouPnpaO+eFTGbcw1qaV10XP/Y561fWvT6Kcq2
++IxZUURyDkAlh7aClNB0gKm1NT/6jug51HiYMtVZmNaAdqhrfibMW79QKobu
+mm76utgc3LpGWZ0kcDcdvyT577sJ9hlb2CzcBmE3/RotrFU1FXj7Tsw/J4yf
+oGOsy6C/vODh88aqop5BjTpgrFUiGRQBANga7OGZ+OSrbbpXmfC2ktNnG/q8
+sIJVxgrGRRhHjzYkxu++r/3LTsf6+UWXd29VK8q3suoDjaUR8sYHzZiudWBV
+P8z9d++Gj6Rgoacwnay7IdfKTAUpMe4ANxl0gPXY48z53sHaXSUN3nR69vhF
+Wc24WYl9MNfb8NQvtIqhuYbaxebg1jVYxS6BzzqTNxFkxZHeU+IqUV/f4jYI
+u+nHaLFAVerw02jfSznwqofRKoY6YKxVIhkUAQDYFHVzVrjnM08/pefpQT4x
+940iUXFvu6/Q+ES0MySchs1atyMxKf7rVZtPdB+iKptvn90Z8OKzHqszCiql
+jDtrEmmE6PKyiSM8gyJiDqWl/phdLe+ZwynKt/vOOFBL9mEEiRwGFSSFwBov
+Jwa8+IJgx2/VrZXZ/xn3/GDh7ku1LXcywl3/OnJJ+i0x9iQn5rO1CSmHE9ev
+iM19gty8aHsb3vqFVjE011C7mB7OXSO7s2ZS4PFGY7OoG9ICBLpRDwkOg9BQ
+mX6KFstUpQi/LkhGCpqAsVKJpFAEAMB7cFHO+vd29p1VGC6lLQdBGiG5uilk
+603yO0a41Yrv8MovGjt2jTh33rQNJLNmWckG/7ACpi/pd8PTmlo/WpAF0gaM
+VUqkgCoAADtAUZuZkHzpUe+sSxcS6PsdFDCWpqjNSko830h1BMCtVnYAX/yi
+sWfXYBVxwVE3yA4kOm5EzopBe4mczzW1crQgCjQTMFYokQrqAADsAgJrae06
+G9CoJcUZK0c9+9Kbu7OKxRZ/1Y0gDZc3iTCqWRa3WtkNfPCLxp5dg1XuW7Cj
+lHzSLCv9NiSmDGFw4nVNNVaMFmSBtAFjlRKpoAsAAAAAm4C3/rF543nKlzDU
+zdnron5Ffc0FsB/MBAAAAED/Q7TfSTtyvY1u6MHbrh06XGSd/E2ArWEQAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABPwNsKYz+dLRzjOnHR3lIp
+vOBrdZQPf1z4z29RPkMFKAFjAnaDovb8qRL4hoIx8urUQzfEuAar3h8wKrjr
+CkxCUnLqfC19ewc7s4KQlv+0e7vwtS3QnVoOGBOwG4j2ovio43UWXiw1oCDU
+MrVuhJHeWilc2p2wUlmXERVfRHl1JNiZHbio8FDa3frf5wihO7UYMCZgPyhr
+UhZvK2afXYshhMoBlwvSO7s+Sa7sbePS4m2LU2rIR59+srNZ7MwRyoazB/5f
+HaZpy+FjdwrGBABrIS+LnvNNad8kMYSs4ujK6aOdnhvs6rf8yD2KHM5Y/cWj
+P9/tMNc4Cawhd39k0JR3c5HyypHLIlUMF986mZ7XbEEWFtQSu/6rvST9QE5L
+n5uw5KXfvBNdRpZyh8zOlpRugKM4AhflxS5fG59yKH7N8rgrIt1FLoqKuHnv
+zJk7d26w//AhY4KWHnjA+spn3hqzG1XjyQWTQrvT/fDbmABgbRQVOwPeNcoZ
+9v/bO/O4Jq7u/z/+1Vf1aetSFOHhsSAUVAQ1UtGwVG0riq0t1a9Lwe+L1tYH
+FRX3ot201gXZKtZ+QcUFUBGfl5VfUayiIgi4sipKAYkQRJaQsCSTZCY/whKy
+zExmJhMS8Lz/8hXJued+zj137tw7mdP+KGLdodw6RNp479Anlm+57i/THcKy
+F3+sXx5Xrn/phUleVvPvhtiPplnzFA9ix9pLovy/vdrI+hsTCVvExFXp52/W
+ddwioa1VZSJVw4KMBV54euHpzLx1NQZMINCGS184z0150fFVee25Oc7+lxvU
+XzMmzFroucuQpb7ZitnTNv/8Cg8LG/VSdOYrJgAYG/TlhdmT1xVo7DRJX1y/
+Wtudt235a+ysP84San+t4ZK/+2r9BR27kTz5mXY9bhzIHMOaMvynBWUL2d1i
+IWpRWp0U4GjnOKGD8c6eO9TKgrUVrJ38YWq9tht4OjNuXd3ugAmEvCaBa+0W
+/7zzPkHGi+NYe55Wr5VNYTqV16WuDL5DoIXZitntXnXK9qg/w6bYa5RJNVcx
+AcDoiEu+dZmyh7h8WcvdwHHTtUspK+T8095OS3PUBy7aUnwm1M/De1v4Jv+P
+JtnYugcl9dYnpp3FpNbwHcOa/vJ1mp/eyPDixKBFXCRPf5ky6fvH2nt3+nTW
+ywAIBMLPiAnwmvF1/JHwLQHeDi7+x/NSD+8MXuRuP2NjpqA5Z5GVpep60XzL
+Z6T10rwWyo4qIa0bTupz19dNJ6aUdzY0tlRY+RtH89rUH8QEAKMgyl08dsrB
+SoIJFxNkrpq9MatZOzNa8pbYT/m1QvNbWONlz5G2wcpFnqwm+fPRFrPO1nYv
+1ciyWFyREh2bpbNvQWKNwDHx4+9cJmwoZFyji36LeEgrD3IcAu5ozwPkOuv3
+bWAEoq1wvb2Vz4U6VIHVp3pb2ARea0IVsqpYzpi5GZVXvUdYqSZQUc4iyxGz
+btC7J6E4nZqdmMizhNCjZWKF9JnOtcnsxQQAIyHM8h3D+b8q3ANXVHB7T8jR
+UpwzY8GNmTZup2q0Mq+zPHFURee+iShnsc07X/XUGSbJYllN4hwbp6AHOhWJ
+ia0ROIaUR0y2X4azOpTxz305x1uLeWuytScn2i3iIav6fardZ7e190Jwdabq
+2EAJhKK9eIuTbdf/iHIWjhm341HH/SX28iLX+r3Ep9kLR4+a37PUF96aN4rq
+Ur9XxulOw0a4colkJPNZiYnEbCw/EXqiQnn/hHdtMm8xAcBoiHI+t+Mcfqa7
+nsfay5L2HS3A/52o6LafHec37W+p513rg2/edVZtbTHZmSeyRuiYpHSny7g1
++cwf0qbdIh7SyhiOve48QKizXgZSIEim0wRe1Ul3K9URyfN4N2tuIp/eUwD6
+l/pmKGZBUdj7rhNdOxlvM/i1oQ4uM9flqy5qZiwmABiT9sIQ56kR5dpPLCHP
+L0bG3ukqx4g2F1+4xNf4C6Q8nDMhWDthlHk38cDfyr/smKE9PPY86dmalzzZ
+xSiLda2ROCbKXerITaKZgQa1iAdStp/jsqVYew+GQGe9DKxAaE+n29Wm0xrk
+ZepiZ1/lHpUCrbswf+KyNLqlyPVNp2YrZjcy3pH3HLTum8xWTAAwLnJ+ohen
+c1SrfVafFuT4+qB/dDNosEvY31qTquTpbneu9mFyR95ZWM7bsjc6JvLHdTvO
+9RwaS+sLLu3zGj7EYWNybnkb5QzBsUbqmOTJbvfZR3gG/MiJbou4tBdtmux9
+tla7m3g662VgBQJDam9Few0fytl7rbKxPP2HCW8M4x64zmsoSg6yfXNMYNJD
+IdKUGbZqc1T88eita8KzmmivMkinU7MVsxeca5OZigkAxqe9eJtnQC7tR0VR
+QebWz/Zp3h6o71cYDj1rmOjOdr9dDwjfF8R+iwQIsxbO2KZz28RYZ70MxECY
+DBATAMyH1vsh88KYPNws4aVGxV5/0bvK7Mw7BvtW+NCxJuGlxURfqTXwTXVs
++I+URfhuuK9zBK4wQGe9DLhAmBIQEwDMhfaSX/zCmP1GHEMaGpGuRZ1cVJi8
+duyQtz84kFYoNPj1DPSsoeI6AWLg2pId/5Hyw0v2luA/xm6AznoZQIEwPSAm
+AJgH8vr0LRv+ontWCuiANt7cEXqlnmjWAZ0BAADogDbfPXY8H+oKGQTWUpR4
+4l4z2aUHdAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHhFkD4/
+ufT9X6AQNiuAmIaANueFfzOfO8520rJDJW2s/aTBSGYBADAeWNuT0wd2c6ft
+hOnUcEBMwxBXJhy7L0QVSGWc11hf1t7naiSzAAAYDVSQdyzxUc2NT7gwnRoM
+iGkomLxd3nlX0/ZwLXeFTo1mMzMLAICRkPIvHfl/1YiiOROmU4MxbzExWX/a
+yWor2v91bDnrGhrJLACwC9ZedmrtrHct/jnM1mP1iacEVc2RmoxT/33USp7Y
+1EzRQVxxZmuAr+f4f9m4rUioUr4cGhU+TEnKrmdaBQoVZIev3hwZfyxy0+qI
+24LO9xdJyiIWfvzJggULfD1Hjxjns+LIM8bvtGZRTJy+s4CsNmXJZP+eCkSv
+jpgKDOFnxYX4TP00i1apQVJYEJOkj1hLcdKRzAZmL7DFCw0LZgGg72h/FLHu
+UG4dIm28d+gTy7dc95fpziWyF3+sXx6nd6FFxRQtJFVnDl7uWIIr5HUXl/zb
+7qvu0hbtJVH+315tZJBdaMOlL5znprzo+Kq89twcZ//LDepv1xNmLfTcZchS
+n0UxCfpuGDL++RUeFjbq1fFeCTE7ZmTJy2r+3RD70TTL4JLAhpiEfcTEVenn
+b9ZJO2RurSoT0QwPYWgMMwsAfYj0xfWrtd350Ja/xs764yyh1p90DHR/99V5
+eqvuUTBFE1Ta1r0FIyndOW324WfdlXKwpgz/aUHZQrr3ZfKaBK61W/zzzqWt
+jBfHsfY8rV5M29DplEUxCftuANLqlO1Rf4ZNsdeo3GpCMeV1qSuD7xBowaaY
+XUie/Ey7RDshrIhJ1EdpdVKAo53jhA7GO3vuwKmESQpRaAw0CwCmouVu4Ljp
+2hWvFXL+aW+npTnqEwDaUnwm1M/De1v4Jv+PJtnYugcladauJjBFCLlBVHgv
+5gu/qNLeeulY01++TvPTG3WmAISfERPgNePr+CPhWwK8HVz8j+elHt4ZvMjd
+fsbGTEFzziIrS9UU13zLZ6T10jwjnQizJKZu38khtiblnQ2NLRVW/sbRnE5N
+KCblquLsiEn72sSimCynjPmMcwAwOpggc9XsjVnN2lnVkrfEfsqvFZo5gzVe
+9hxpG6xcIMpqkj8fbTHrbK1crykl4oqU6NgsnW0PQoPy5gdnd6/0cXxjsG1g
+mqrykvjxdy4TNhTiLPzaCtfbW/lcqEMVWH2qt4VN4LUmVCGriuWMmZtRedV7
+hJUqS0U5iyxHzLrB3vGDendYERO/7z3QUhJ5lhB6tEyskD7TmU5NJybFaxNb
+I5Ps2mR8MZmnDC7mMc4BwOiggtt7Qo6W4pw3C27MtHE7VaOVtZ2lq6MqOvcj
+RDmLbd7pPRAhNtWBrCZxjo1T0AOd0xMSgx1gorzNDqO8U+u7jSLlEZPtl+Gt
+BduLtzjZdv2PKGfhmHE7HnXccmAvL3Kt30t8mr1w9Kj5PetJ4a15o6iuJ2X8
+c1/O8dZi3pps/LmERTFx+t7jEg0lG8tPhJ6oUK7T8aZT04k53WnYCFduX4lJ
+cm3qCzGZpgw+5jDOAcDYYO1lSfuOFuCX1BPd9rPj/KZ93KGeaK0PvnnX+fvH
+Yr2myCAy2EPrva9cPvyzoduupHSny7g1+W26dkhyNoFXddLdSrUP/zzezZqb
+yGf7PJhFMXvQ7Ls+dK0VFIW97zrRtZPxNoNfG+rgMnNdvmoeNpmY+u+bWBWT
+yXkTi2KymzImH+cAYHSQ5xcjY+90lYNFm4svXOJrPA+FlIdzJgRrJ5sy0SYe
++Fv5l9LKGA+PPU8k+k2RgWcQE9c+q0c6cxap+H3Bf3r3tUS5Sx25SXj5pp2z
+29VytgZ5mbrY2Ve5EaJA6y7Mn7gsje0C7KyJSdx3feCHphsZ78h7DlpLfZOJ
+qe/axOLIVCJ5sovRtYklMdlNGROPcwAwNvL6tCDH1wf9o5tBg13C/tZKDsnT
+3e5c7UPajkSzsJy3ZW90TOSP63acU57rUjBFAo5BTHBr5SQrR5/gsGOJCSfT
+K8WqlaXkyW732Ud4Oj8lwZDaW9Few4dy9l6rbCxP/2HCG8O4B67zGoqSg2zf
+HBOY9FCINGWGrdocFX88euua8KwmdheTLIpJ3He94FjrBWc6NZ2YpNcmFsVU
+Iq0vuLTPa/gQh43JueVtlGdqtsTEN8U0ZUw8zgHATEAFmVs/26f5xKn6BgUr
+0DCIie5s99v1oKVf7oEbX0x61kBMUlgUk/WUAQBAIeGlRsVef9G7Qu1MtIhy
+lq9NVAxKeGkx0VdqDf+5j8kwsph0rIGYemBRTNZTBgAAJRjS0Nh1/qGQiwqT
+144d8vYHB9IKhWxsF9AwiIrrBEi/XOSrYzQx6VkDMUlhUUzWUwYAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAABgRoc174N/O542wnLTtU0tbvH2IwCUbSEEJjOBAa
+AOifiCsTjt0XogqkMs5rrC+VF3gD2hhJQwiN4UBoAKCfgsnb5Z3LvraHa7kr
+7kDVAwYYSUMIjeFAaAAjg8ngttm4tBXt/zqWQrHXvqV/xd1IGkJoDOeVCg1A
+hrjy/O7vw2OP/rZnfeC289U4P2tHajJO/fdRq77xjSH8rLgQn6mfZrFXK0ZW
+m7Jksn/PK8tQ4cOUpOx6vLeV0XEVay87tXbWuxb/HGbrsfrEUzqlCQgQV5zZ
+GuDrOf5fNm4rEqoQSq6Sggqyw1dvjow/FrlpdcRtgdr737CW4qQjmQ2G/X6T
+mgImiDu+Y8zE1A2KqhVDNHxVQ9MD3ZTEo3+GBuhb5DWJszmbi5SvJMOarn7s
++r93tW56ZS/+WL88jsJ6A5O8rObfDbEfzVbZa2U5mfMrPCxs1F+n2V4S5f/t
+VZ0icHRcbX8Use5Qbh0ibbx36BPLt1z3lxn4HhlJ1ZmDl6sRZZHxi0v+bddT
+l4fMVXLQhktfOM9NedHxVXntuTnO/pcbuvIME1eln79Z17F+QFurykRMU42K
+AiaJO7FjtMUkCIqhGr6yoelpm15K4tJPQwP0MTJenJv1jINlHQNdVn38/fe+
+e6RROqgj3v7uqzXLAJDApEQOIdLqlO1Rf4ZN0SzfhjVl+E8LUpYP1YKqq9IX
+16/Wdid8W/4aO2tV9WqmoNK27k0TSenOabMP95QUInRVD/KaBK61qv4OL45j
+7XlaWXVBWp0U4GjnOKGD8c6eO4pxKtVSgoICpok7mWN0xSQIioEashAaeV3q
+yuA7BMqabWi63aOXkgT0z9AAfQ7adD3EdcSYBT8c3h2y9cQjzWcs5fzT3k5L
+c9SjhbYUnwn18/DeFr7J/6NJNrbuQUm9lQNoJwKxNSnvbGhsqbBSp7Qo1vSX
+r9P89EatTKDraictdwPHTdeussDE287/Fd6L+cIvqrT34k7gqkKB8DNiArxm
+fB1/JHxLgLeDi//xvNTDO4MXudvP2JgpaM5ZZGWpmpSab/mMpFq3lD74Cpgw
+7oSOEYlJNyh6MHpoKFaiN8PQ0E3JgRsaoK9oL97r6TR0sIVX6OU6zY3jlrwl
+9lN+rdBMD6zxsudI22DlOklWk/z5aItZZ2u775PJEkFckRIdm6Vz649vDXmW
+EHq0TIxb9lr8+DuXCRsKtdY/dF1V/q8gc9XsjVm4BadpeduBvPnB2d0rfRzf
+GGwb2FsHEN9VJW2F6+2tfJTl37D6VG8Lm8BrTahCVhXLGTM3o/Kq9wgrVV6J
+chZZjph1g70DA/XuEChgsriTOUYoJs2g6MPIoaE4AZpdaOinJJlj/Tk0QB+B
+8I4v/+TXxy31N/fMtRw2+bsC9TqighszbdxO1WgNHfVKNKKcxTbvqHaMSRJB
+VpM4x8Yp6EGr9n/gWGssPxF6okK5wsJLBKQ8YrL9Mu0lEV1XFajg9p6Qo6X4
+h810vFX7G0yUt9lhlHdqPUbmqhKSmtqJT7MXjh41v2cFKLw1bxTVFaCMf+7L
+Od5azFuTjXv5JVHARHEnDw2xmPSCog9jh2a607ARrtx+FhomKUnumJL+GBqg
+r2gv3urq1lVVBmu++eVYh6CHahcn0W0/O85vz7S2FdTHW+uDb951/v5x9305
+k81tXWsFRWHvu0507WS8zeDXhjq4zFyXrxrSktKdLuPWaNfipucq1l6WtO9o
+gYj26CPuexet975y+fDPBozMVSUkWZbAqzrpbqXaOX8e72bNTcSr8m0QpAqY
+Ju56QkMsJr2g6MPIodG/ODfD0DBKSXLHuuhnoQH6EKQ88r3xK7tWQcjfB6a5
+a1SFRsrDOROCtceccrxNPND5d9LKGA+PPU96NpElT3YxSgR8awrcstcKUe5S
+R26S9rCj4yry/GJk7J3mzqd40ObiC5f4lJ/UwzOIiWuf1XeV7kEqfl/wn949
+CnxXlWhn2Xa1LKtBXqYudvZVbl0o0LoL8ycuS6unXEWcGnoUMF3cSRwjFpNe
+UPRh5NDomwDNNjTdUE9JIlP9NjRA34K1lsSt+p+VP/0ad3j/tq3HSjR/MyF5
+utudq30e2zHeLCznbdkbHRP547od53qON6X1BZf2eQ0f4rAxObe8jfKwILDW
+BU4iSJ7sdp99hKfziwqqrsrr04IcXx/0j24GDXbRuBzT9xYT3Fo5ycrRJzjs
+WGLCyfRKsUpBIlcxpPZWtNfwoZy91yoby9N/mPDGMO6B67yGouQg2zfHBCY9
+FCJNmWGrNkfFH4/euiY8q4ndmyYKCpgm7qSOEYmJb4o4KOQYPzSkE6DZhqYX
+GimJb6qfhgYwN1BB5tbP9mk+eKl+n2449Kxhojvb/XY9aMEZz8Z3lZ5BElfN
+n34UdyNE2ayB0ABAFxJealTs9Re9C7XO8dZ1RsUCdKxJeGkx0VdqCZ/5NrKr
+dAzqc9X86T9xZz3K5g6EBgC6wJCGxq4NYoVcVJi8duyQtz84kFYoNHiviZ41
+VFwnQPTchhjNVXoGqbhq/vSHuLMe5f4BhAYAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAYCKDNeeHfzOeOs5207FBJmxk9aWG2jvUZoIDhGElDCA0AGBlxZcKx+0JU
+gVTGeY31NaPfCJqtY30GKGA4RtIQQgMAxgaTt8s7l31tD9dyV9wxUtUMBpit
+Y30GKGA4RtIQQgP0gMngttm4tBXt/zqWQtnTPsdsHeszzFOB/pWSRtLQPEMD
+kCGuPL/7+/DYo7/tWR+47Xw1zg+8kZqMU/991KpvfGMIPysuxGfqp1mG1xrC
+2stOrZ31rsU/h9l6rD7xtLtWACp8mJKUXY/33i5aroorzmwN8PUc/y8btxUJ
+VSz9Zl1Wm7Jksn/Pe8b0u0oKKsgOX705Mv5Y5KbVEbcFam9Cw1qKk45kNhj2
+S0Z8eQ37oj7HIDSUoBaafpSSJGjGpasVQzQ0cmiAvkVekzibs7lI+XIurOnq
+x67/e1frplf24o/1y+MorDcwyctq/t0Q+9EsFIBufxSx7lBuHSJtvHfoE8u3
+XPeX9cxS7SVR/t9e1SmHRsdVSdWZg5erEWUJ5otL/m2nUVCGMTL++RUeFjbq
+78Akc5UctOHSF85zU150fFVee26Os//lhq48w8RV6edv1nWsH9DWqjIR01Qj
+lpfpF/U5BqGhCJXQ9KOUJEM3LoZpaOzQAH2MjBfnZj3jYFnHQJdVH3//ve8e
+aZRX6Yi3v/tqzRfik8CkWAwO0hfXr9Z2D/22/DV21qpSy8oraIb/tCBlIU0t
+KLuKStu69zgkpTunzT6sXQuHicPVKduj/gybollzjdBVPchrErjWqko0vDiO
+tedpZf0BaXVSgKOd44QOxjt77ijGKadLzVsSeRl9UZ9jEBrK3uoPTT9KSVKD
+OnExUEMWQiOvS10ZfIeqsoCxQZuuh7iOGLPgh8O7Q7aeeKT5jKWcf9rbaWmO
+erTQluIzoX4e3tvCN/l/NMnG1j0oqfcd+rQTgdRaJy13A8dNVy8JgDX95es0
+P71RKxPouqpAhfdivvCLKhUrqEFsTco7GxpbKqzUqQdK4KpCgfAzYgK8Znwd
+fyR8S4C3g4v/8bzUwzuDF7nbz9iYKWjOWWRlqcr95ls+I6lW8KSPjrz6Oqvn
+i3hAaBiBr3A/SkkmcSHD6KGBGhlmR3vxXk+noYMtvEIv12luHLfkLbGf8muF
+ZnpgjZc9R9oGK9dJsprkz0dbzDpb232fTJYI4oqU6NgsnVt/EmvK/xVkrpq9
+MUujOrL48XcuEzYUaq1/6Lkqb35wdvdKH8c3BtsG6pY2o+Uq8iwh9GiZGLdW
+Nb6rStoK19tb+SgLoWH1qd4WNoHXmlCFrCqWM2ZuRuVV7xFWqrwS5SyyHDHr
+huEHBjjgyUvaWQpf1AVCwwAihftRShKaIosLKUYODVybzAuEd3z5J78+bqm/
+uWeu5bDJ3xWoV9QU3Jhp43aqRmvwqtdkEeUstnlHdS5AkgiymsQ5Nk5BD3RO
+EIitKVDB7T0hR0u1zoOR8ojJ9su0l0R0XVWCifI2O4zyTq3XbICOq43lJ0JP
+VCgXg3iJhu+qEpLq0olPsxeOHjW/ZwUovDVvFNUVoIx/7ss53lrMW5ONfw3B
+l5eks+RxIQRCo2AvNP0oJQlMkceFFGOHZrrTsBGuXPLQAH1Fe/FWV7eu+ipY
+880vxzoEPVS7OIlu+9lxftPe9Vcfb60PvnnX+fvH3bsvTDa3iaxh7WVJ+44W
+iHQGiKR0p8u4NdpVqem62kXrva9cPvyzgeIg1LVWUBT2vutE107G2wx+baiD
+y8x1+apkx3dVCUmWJfCqTrpbqXbOn8e7WXMT8epdGwShvMSd1RMXQiA09CBV
+uB+lJL4pPXEhxcihgfsmswIpj3xv/MqupQvy94Fp7ho1oJHycM6EYO0xpxxv
+Ew90/p20MsbDY8+Tnv1oyZNdjBJB1xry/GJk7J3mzgdt0ObiC5f4KrdEuUsd
+uUnaw466q5i49ll9V80ZpOL3Bf/R3Tii52o3OLWqCVxVop1l29WyrAZ5mbrY
+2Ve5daFA6y7Mn7gsrZ5yPW1qkMhL3lkKX9RtDEJDAz0K96OUJHdMgR8XUowc
+Grg2mRdYa0ncqv9Z+dOvcYf3b9t6rETzNxOSp7vdudrnsR3jzcJy3pa90TGR
+P67bca7npFRaX3Bpn9fwIQ4bk3PL2ygPCxxr8vq0IMfXB/2jm0GDXdSumJIn
+u91nH+Hp/KKCqquY4NbKSVaOPsFhxxITTqZXiqnfABB0vAucRCNyFUNqb0V7
+DR/K2XutsrE8/YcJbwzjHrjOayhKDrJ9c0xg0kMh0pQZtmpzVPzx6K1rwrOa
+2F2Zk8pL1llqX9QFQkMVCgr3o5QkdqwLetcm44cGrk39ClSQufWzfZoPXqrf
+pxsOPWuY6M52v10PWnBmrX7kan+ATekgNCzSr8Rk1zEA0EDCS42Kvf6id6HW
+Od66zqhYgI41CS8tJvpKLeGDy/3IVbOHXekgNGzSf8RkeRQBgBYY0tDYdQyg
+kIsKk9eOHfL2BwfSCoUGb2jQs4aK6wSInrVuP3LVjGFXum4gNCzSH8Q0yigC
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKA/gTbnhX8znzvOdtKyQyVtrD25
+ZSSzrxTsaggRMRyICAD0FeLKhGP3hagCqYzzGuvL2s/BjWT2lYJdDSEihmP8
+iGCi4vNXeFAzHQAUmLxd3rlia3u4lrviDltVeIxk9pWCXQ0hIobTFxGRVidv
+iMzvny/rAAAj0Fa0/+tYChWuzcOsgWCy/pT67GoIETEc40akrfDn5fGU6lUC
+rwBYe9mptbPetfjnMFuP1SeeEtTkQWoyTv33USt5FlEzRQdxxZmtAb6e4/9l
+47YioUr54hNU+DAlKbse77WS+pHVpiyZ7K9Z/7SlOOlIZgOzH62jguzw1Zsj
+449FblodcVug9i5Ng8yqjLAXGuV7BPhZcSE+Uz/NYq8UnqaejEJD0kcmGuoO
+GEOs0fFWDRNEBN8xZsliFA0ppp645KeP91CudwwMaNofRaw7lFuHSBvvHfrE
+8i3X/WW6r76Svfhj/fI4vYslKqZoIak6c/BydYcRed3FJf+26ylw1l4S5f/t
+VZ1qnXqR8c+v8LCwUXvvMSauSj9/s65jnYa2VpWJaFpEGy594Tw35UXH1+S1
+5+Y4+19uQFkwq4LF0HT4JHlZzb8bYj+aZrkEEnT1pB8awj4y0pBgwAz8iBA7
+RjsiRtGQeuoJMhZ4GTxxAAMB6YvrV2u7R0Jb/ho76497Ckeq6JiC/d1X63+R
+PQVTNEGlbd37HZLSndNmH+4pqIY1ZfhPC1LWeaaBtDple9SfYVN662xKq5MC
+HO0cJ3Qw3tlzRzFOeW4y5DUJXGtVLTNeHMfa87Sygg0Ns/K61JXBdwiUZTE0
+3TApM0eIrp5KaIaGqI8MQ0MwYAwMtF5v1T0wSUTIHKObLEbQkE7qtRWsnfyh
+drVjTUizBhiQtNwNHDdduzCMQs4/7e20NEd9KKAtxWdC/Ty8t4Vv8v9oko2t
+e1CSZl0WAlOEkBtEhfdivvCLUrvTx5r+8nWan96oPYKJ7Uh5Z0NjS4WVtGpA
+I/yMmACvGV/HHwnfEuDt4OJ/PC/18M7gRe72MzZmCppzFllZqiaB5ls+I6nW
+gFZBuV4MO6GhPRMy0JN+aMj7SNexzv/VGTDsY3YRIXSMWUToashW6kme/jJl
+klYFZC2gytKrBibIXDV7Y1az9hBuyVtiP+XXCs0kxBove460DVauxmQ1yZ+P
+tph1tlau15QScUVKdGyWzh4DoUF584Ozu1f6OL4x2Dawtwqq+PF3LhM2FOou
+3vDtIM8SQo+WiRXSZ7SuTcqz2fX2Vj7KUppYfaq3hU3gtSZUIauK5YyZm1F5
+1XuElepqJMpZZDli1g16K2CKWcZWaMhmQlpxIdOTZmj09ZFQE3oDhmXMLiJk
+jtGPCCMN2Uk9aeVBjkMA6XOAcG16tUAFt/eEHC3FOdwV3Jhp43aqRmuAqpcM
+E+Ustnmnd1+a2FQHsprEOTZOQQ9atf+DxKBC+duHvM0Oo7xV9/pIecRk+2V4
+dyk4dhrLT4SeqFAu4mhfm7RrQO/orQGd+DR74ehR83vum4S35o2iet8k45/7
+co63kulOw0a4cjv/OW9NNv7EzF5oSGZCOnEh15NWaCiNGXzoDRg99EZEjf4T
+EXIZGUVEQVtDdlJPVvX7VLvPbuP8Hb2sAQYGWHtZ0r6jBSLcIItu+9lxfnum
+tXmhPg5bH3zzrnP3bTipKTKIDPbQeu8rlw//bOi2Kynd6TJuTX4bFTsFRWHv
+u0507WS8zeDXhjq4zFyXr5PyuJBcmxJ4VSfdrVTnTc/j3ay5iXx663T9K0AW
+Q8PsdIO2nnRCY8iYoTdg2MMMI6JHRvoR6YGehqyknrQyhmNPvsaD+6ZXBuT5
+xcjYO82dj5ihzcUXLvE1npJBysM5E4K1R7ZyHE488LfyLztGk4fHnicS/abI
+wDOIiWuf1XcVLkMqfl/wn97tBVHuUkduEt6VAN+xbmS8I+85GHLftF3t2lSD
+vExd7Oyr3PBToHUX5k9cllaP6rWogb4sYzE0SiRPdjGaCWnpSTc0TMcMvQHD
+FmYbERLH6EWEuYaspB5Stp/jsoX0UQu4Nr0ayOvTghxfH/SPbgYNdgn7W2tu
+kDzd7c7VPvXtGIcWlvO27I2Oifxx3Y5zymNPCqZIwDGICW6tnGTl6BMcdiwx
+4WR6pVi1fpM82e0++wgP73cbOHZ6oXdtwpDaW9Few4dy9l6rbCxP/2HCG8O4
+B67zGoqSg2zfHBOY9FCINGWGrdocFX88euua8Kwm2hMhaZaxGBol0vqCS/u8
+hg9x2JicW95G+SJKV096oTFgzNAaMOxgthEhdYxeRAzQkJXUay/aNNn7bC2Z
+GnBtAnpABZlbP9unuZRRv39nBRoGMdGd7X67HuC/24R1x8wa44eGnrU+DI2Z
+BhoiYpg1YdbCGdsYP+UPvHpIeKlRsddf9C4HO8dhRDnL1yYqBiW8tJjoK7VE
+jxqz7pi5Y+TQ0LHWp6Ex30BDRJiDlEX4brhP7TAYALrAkIbGrm1ohVxUmLx2
+7JC3PziQVihkY0efhkFUXCdAiPYZWHesf2C00NCz1oehMfdAQ0SYgZQfXrK3
+BO6aAAAAAHMBbby5I/SKsX6TBgAAAAB0wVqKEk/ca6b5qCsAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAABACtqcF/7NfO4420nLDpW09dGb5U3SKKAA
+5fsK0JlFQMz+h4R35Xwx/coT6ogrE47dF6IKpDLOa6xvH70rEa9RTFR8/gpP
+Qvo93f6yoMArBXvKA2SYJK0GKiBmfwNryY/ccLaaaoVzIivydnnnlNP2cC13
+BWllSfbAb1RanbwhMh///ZMKvP6yo8ArBUvKA3owSVoNVEDMfoa0Kn75z4U4
+pcGY0Va0/+vYcvLFM+toN9pW+PPy+Cr8OVC3vywrQAQmG4C3C4Ypbxr6YyBM
+klYDFRCzfyAu3fPJTyVi/X/YCyrIDl+9OTL+WOSm1RG3BWqvAcFaipOOZDYY
+4ZVVWHvZqbWz3rX45zBbj9UnnqrXhcZrVFzy08d7SvF6pdtfPAVImlMDqck4
+9d9HrfpmOgzhZ8WF+Ez9NItWlTd8W7iOocKHKUnZ9XhFdIzUYtd/Gai8Ya2r
+YYJAKMQVZ7YG+HqO/5eN24qEKuXrsQ2MgpHTik0ldfvOArLalCWT/XtqMJm3
+mEAfICnb5/UprZ1XtOHSF85zU150BFdee26Os//lhq7IY+Kq9PM36zrWzGhr
+VZmI1eC3P4pYdyi3DpE23jv0ieVbrvvLuhOCqFFBxgIv1R+podtfPAUIm1ND
+9uKP9cvjKKy+MMnLav7dEPvRNCuQ4kHsWHtJlP+3VxtZTzkjKm9I62qYJBCS
+qjMHL1d3OCOvu7jk33ZfdRdeYB4FY6cVi0oS9N0wZPzzKzwsbNTrA5qvmEAf
+gL68MHvyugIa+yzymgSutVv8884FjYwXx7H2PK0syCytTgpwtHOc0MF4Z88d
+7Nbvkr64frW2O5fa8tfYWX+cJez8nLDRtoK1kz9Mrdde/+n2F08BoubUDTVc
+8ndfTbn+uuTJz7SrY+NA5hjWlOE/LShbyO5+lRGVN6B1dbsmCYQClbZ17wxK
+SndOm334Wfc2JtMosJBW8rrUlcF3CIRgU0mivhuAtDple9SfYVPsNWrXmlBM
+wOSIS751mbLnqcZKCeFnxAR4zfg6/kj4lgBvBxf/43mph3cGL3K3n7ExU9Cc
+s8jKUjWwm2/5jLRemsfeqSLaUnwm1M/De1v4Jv+PJtnYugclaVZfVrTcDRw3
+XbsutQ6Sp79MmfT9Y+0dJN3+4imgvzk5/7S309Ic9Twm9Zz2lMhAB6zpL1+n
++emNDC9Ofa48TcwyEKjwXswXflFqe5iEUTB6WlEuJs6Okjh9J4fYmpR3NjS2
+VFj5G0fz2mRCMQGTI8pdPHbKwUqtYdpWuN7eyudCHarA6lO9LWwCrzWhCllV
+LGfM3IzKq94jrFSRFuUsshwx6wYL2/cqsMbLniNtg5WrJVlN8uejLWadre29
+98YEmatmb8xq1jcBSysPchwCdB7F0e0vvgL6mmvJW2I/5dcKzW+ReE42JYor
+UqJjs3S2LujrIH78ncuEDYWMV4N9rDw938wwEPLmB2d3r/RxfGOwbWCaqi4Q
+cRSMnFYUr03sKInf9x5oKYk8Swg9WiZWSJ/pXJtMJyZgcoRZvmM4/1eldeLY
+XrzFyXZZZ2xFOQvHjNvxqGNthL28yLV+L/Fp9sLRo+b3rEmEt+aNoromkfHP
+fTnHW4t5a7K1s6Sz+HJURecGhChnsc07vRvaqOD2npCjpQTnuBqNVf0+1e6z
+29obFLr9xVdAX3OCGzNt3E7VaCUfseckU6KsJnGOjVPQA51Ne9o6IOURk+2X
+4QTDPJWn4ZjZBkKh/FVX3maHUd6qXUzCKBg9raY7DRvhyiXSsAv2lMTre49L
+NJRsLD8ReqJCef+Ed20ynZjkAxIwPqKcz+04OhvGJHFP4FWddLdS7eU+j3ez
+5ibyWT1TVB/ArQ++ede5e4MIay9L2ne0gNoPN6WVMRx73QGp2198BfQ1J7rt
+Z8f5TftbRJ4zO+agrYOkdKfLuDX5zB/S7lvlqWK2geih9d5XLh/+2dDtH3EU
+jJxW+u+bWFWyC82+60PXWkFR2PuuE107GW8z+LWhDi4z1+WrLmomExMwOe2F
+Ic5TI8q1HtnRjvt2tbjXIC9TFzv7Km+mFWjdhfkTl6XVs1tMUjmAJx74W+lT
+xzzn4bHniXJVhTy/GBl7p6tuJdpcfOESn/TRVaRsP8dli85pp25/8RXQ1xxS
+Hs6ZEKydM/ieK5E82cVoSqSlgyh3qSM3yYAk7FvlqWGmgcDEtc/qkc4pGan4
+fcF/eve1iKNg5LTSd21iTUnivuuDOC4K5UMLR95z0LpvMpmYgMmR8xO9OJ1h
+VYEhtbeivYYP5ey9VtlYnv7DhDeGcQ9c5zUUJQfZvjkmMOmhEGnKDFu1OSr+
+ePTWNeFZTWwvSDoGsIXlvC17o2Mif1y345zyvFRenxbk+Pqgf3QzaLBL2N/k
+s1x70abJ3mdrtUekbn9xFKDSnOTpbneu9nkyjudKpPUFl/Z5DR/isDE5t7yN
+cpLQ1UHyZLf77CM8A37k1LfKU8BsA4EJbq2cZOXoExx2LDHhZHqlWHXjQBQF
+46cV6bWJRSWJ+64Xgrh0gXNtMp2YgOlpL97mGZBL9QncPkH9xp8xwqyFM7bh
+PCSq21+GCqCCzK2f7dNsgRXPGVrDRHe2++16QPi+IPZbJIC68uxgVoFgIwom
+w6yUVPRzMQHDab0fMi/MgEd72adzADPY/VEHKYvw3YD7m0Dd/jJWQMJLjYq9
+/qJ3ocmG573QsSbhpcVEX6k18Icmfa08W5hLINiJgikxFyUVA0FMwFDaS37x
+Cys1l4uTXFSYvHbskLc/OJBWKGR8J46UH16ytwT/YWrd/hqgAIY0NHbtvLPk
+eQ/0rKHiOgFi4PLSFMqzhzkEgo0omB5zUFIxUMQEDENen75lw18D6LAQbby5
+I/QK4QGtbn8HnAKmgrbyAAAAxKDNd48dzx8gVXWwlqLEE/eaySZA3f4OKAVM
+BSPlAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAjATanBf+zXzu
+ONtJyw6VtLH2HLORzL46mERAdhuFMWBWDIARZWyzgDkhrkw4dl+IKpDKOK+x
+vlQKhJrS7KuDSQRkt1E8a5io+PwVHitvwZDwrpwvhh+FUWYAjChjmwXMCkze
+Lu/M77aHa7krdAqzmpnZVweTCMhuo/jWpNXJGyLzDX1VKdaSH7nhbDW8V446
+A2BEGdssYJa0Fe3/Orac9de6GcmsgWCyfrPcNomA7Daqba2t8Ofl8VUGXVak
+VfHLfy5kXi+SLfrRQFIxAEaUsc0CJkJWm7Jksr9GRRispTjpSGYDsxdXooLs
+8NWbI+OPRW5aHXFboPZyHoPMqoy0l51aO+tdi38Os/VYfeIpQf1zpCbj1H8f
+teqbKTCEnxUX4jP10yxadfTwEVec2Rrg6zn+XzZuKxKqlK+RRoUPU5Ky65kV
+i2I7LuToOs9CoxS7IC756eM9pfSKVmkgLt3zyU8lNA28MgPJ6CmJC4m85jy9
+AOaDjH9+hYeFjVq1MkxclX7+Zl3HOhZtrSoT0Qw12nDpC+e5KS86viavPTfH
+2f9yA8qCWRXtjyLWHcqtQ6SN9w59YvmW6/4y3VoCshd/rF8eR2H5hEleVvPv
+htiPplnjFQ9J1ZmDl6s7nJHXXVzyb7uvuitgtJdE+X97tZF2d9mOCzkEzhvW
+KPUuCDIWeOEFkqr3Zfu8PqV7yPCqDCTjpyQuhPKa9/QCmA3S6pTtUX+GTbFX
+TSDS6qQARzvHCR2Md/bcgVP+jhR5TQLX2i3+eecKT8aL41h7nlYWi6ZhVl6X
+ujL4DkF5PemL61dru0d5W/4aO+uPs4Raf9IxfP3dV+dRrc8nefIz7frjeKDS
+tu4NHUnpzmmzDz/r3qTCmjL8pwVlC2lt9rAeF2bOG9IonS60Fayd/GFqPcP9
+MPTlhdmT1xXQ29F7RQaSgpWUpA+RvGY+vQB9C9pSfCbUz8N7W/gm/48m2di6
+ByV1l3mW8s6GxpYKK3/j2C+hnIIIPyMmwGvG1/FHwrcEeDu4+B/PSz28M3iR
+u/2MjZmC5pxFVpaqNG++5TPSemkevaNJ0qrZ6rTcDRw3Xbs8tkLOP+3ttDRH
+vTvECigYTCmk1hSo8F7MF35RajtUWNNfvk7z0xu15xSW42Ic55lao9cFydNf
+pkz6/jHDXT1xybcuU/YYUI+xnw8k46ck814owZeXAPOZXoC+AGu87DnSNli5
+5JLVJH8+2mLW2Vq5AnmWEHq0TKyQPqM5B7YVrre38rlQhyqw+lRvC5vAa02o
+QlYVyxkzN6PyqvcIK9VwEeUsshwx6wa9pSTFwYMJMlfN3pjVrJ2pLXlL7Kf8
+WqGZCfgKdEI2pYgrUqJjs3T2UQityZsfnN290sfxjcG2gWmqAk3ix9+5TNhQ
+qLuWYzku1KDpPCNrdLsgrTzIcQhg+niVKHfx2CkHK5k+TDEABpKxU5IcEk0U
+xPISYh7TC9BHdFZ5jqrovMcW5Sy2eeer+43lJ0JPVCgXOLTnwPbiLU62yzoH
+iChn4ZhxOx51rO2wlxe51u8lPs1eOHrU/J6FjfDWvFFUFzYy/rkv53grme40
+bIQrt/Of89Zk4w9qVHB7T8jRUpwDbMGNmTZup2q0pgEcBbqPVEimFFlN4hwb
+p6AHOrXTia0pwUR5mx1Geav2qJDyiMn2y/BUYDUuvQKqgSMgPef1wUoXZFW/
+T7X77DbO31HplDDLdwzn/6pktL+oZGAMJGOnJOMRRSwvIeYwvQB9hvrgaX3w
+zbvO3xcUhb3vOtG1k/E2g18b6uAyc12+Tu7gQjJ4EnhVJ92tVBvCz+PdrLmJ
+fHoHk/oXNlh7WdK+owX4v7MU3faz4/z2TGsVratAzw4Sk2MCYmtdtN77yuXD
+Pxu6/ZOU7nQZtyYf5zyE3bgYxXn61hh0QVoZw7FnvNEkyvncjnNYO+JUGDAD
+ycgpybAXpPISYvLpBehLlINn4oG/lYOnYxrw8NjzRG1HWMY78p6DIfdN29UG
+Tw3yMnWxs6/yjlyB1l2YP3FZGt3q4voGD/L8YmTsna7CsWhz8YVLfI0HrJDy
+cM6EYO0EJlZA8mQXoylF2xomrn1Wj3SmIVLx+4L/9G7FiHKXOnKT8FKI3bgY
+xXkm1mh3ASnbz3HZwvQ0vr0wxHlqRDntx/wG0EAyckoy6IVeeQkx8fQC9C0d
+g8fCct6WvdExkT+u23FO86yS3hyIIbW3or2GD+XsvVbZWJ7+w4Q3hnEPXOc1
+FCUH2b45JjDpoRBpygxbtTkq/nj01jXhWU20V2ikg0denxbk+Pqgf3QzaLBL
+2N9aQ17ydLc7V/volUABaX3BpX1ew4c4bEzOLW+jPMpxrGGCWysnWTn6BIcd
+S0w4mV4pVi0WJU92u88+wsP7bQqLcaEOLeeZWKPfhfaiTZO9z9YynDHl/EQv
+TucMRudLA2cgGT8l6feCgry4mHh6Afoc9ZvugQ8qyNz62T7NVTi7CtCwhonu
+bPfb9QD/nTwmiYvJpCBGmLVwxjbmDzG3F2/zDMhl/7Hg/jOQTMurNb0ArNI5
+eBjsevRbJLzUqNjrL3qXvOwqQNmahJcWE32llugoxCRxMZEUJCBlEb4b7htw
+qNZ6P2RemAEPkRPTTwaSaXnlpheAJeSiwuS1Y4e8/cGBtELhq/N7aQxpaOza
+tWdZARrWUHGdACFa6JokLiaTggSk/PCSvSUG/fSzveQXv7BS47xHzewHkml5
+RacXAAAGOGjjzR2hVyg/e0GAvD59y4a/WD7jBwAAAF5JsJaixBP3mlm4pqDN
+d48dz4f6TQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAdIE254V/
+M587znbSskMlbfCoMW1MIiC7jcIY6BtAZwCgjLgy4dh9IapAKuO8xvrCux5p
+YxIB2W0UzxomKj5/hUf+RgkJ78r5YvjlFGWo6czsEwAYaGDydnnn7NL2cC13
+BdMSq68wJhGQ3UbxrUmrkzdE5hO+QxVryY/ccLbaPN9kZ55Q1ZnZJwAwMGkr
+2v91bLm5rcQwWb9JPpMIyG6j2tbaCn9eHl+Ff/WRVsUv/7kQp5wfu/SjAUAd
+/Toz+wQYQGDtZafWznrX4p/DbD1Wn3hKUCEZqck49d9HreRJQs0UHcQVZ7YG
++HqO/5eN24qEKuXLjFHhw5Sk7Hq8ikdUQAXZ4as3R8Yfi9y0OuK2QO19OFhL
+cdKRzAbD3t3GopjKF4nys+JCfKZ+mkWrJh0+LClJ0kFWBOyLRnWlILMmLvnp
+4z2leAWgxKV7PvmpRPN/zHcAdCOrTVky2b+nbJaB2cSgxU6o6czsE2DA0P4o
+Yt2h3DpE2njv0CeWb7nuL9N9nb3sxR/rl8fpXZpSMUULSdWZg5erO4zI6y4u
++bfdV92lEtpLovy/vdrIYBJEGy594Tw35UXHV+W15+Y4+19u6Lo6YeKq9PM3
+6zoWYGhrVZmI6fzKopgdPkleVvPvhtiPplkvFQ+2lCTsIEsC9kGjBFIQWxNk
+LPDCC6SkbJ/Xp1rHXGY7AHra5p9f4WFho17SkXk2MWyRus7MPgEGCNIX16/W
+dke2LX+NnfXHWUKtP+mY0P3dV+svUErBFE1QaVv3doakdOe02Yefdd+8Y00Z
+/tOCsoV078vkNQlca7f4553LRBkvjmPteVpZxVpanRTgaOc4oYPxzp47yArZ
+yetSVwbfIdCCRTG7kTz5mXYtbzxYUpKogzQEpA/LjRJIQWytrWDt5A9T67Ul
+Ql9emD15XYHGjp75DoAu96pTtkf9GTbFXqPcMNNsYtYiHZ2ZfQIMQFruBo6b
+rl1nWiHnn/Z2WpqjnkxoS/GZUD8P723hm/w/mmRj6x6UpFlvm8AUIeQGUeG9
+mC/8otTu3LGmv3yd5qc36oxIhJ8RE+A14+v4I+FbArwdXPyP56Ue3hm8yN1+
+xsZMQXPOIitL1XTRfMtnpPXSPHpn6JSrNrMjJu2piS0lWQ+x4c7TbZSuFERI
+nv4yZdL3j7X/UFzyrcuUPcRFC81uAEh5Z0NjS4WVv3E0r03E2WS0FnHR1ZnZ
+J8CAAxNkrpq9MatZe4S25C2xn/JrhWaOYY2XPUfaBisXW7Ka5M9HW8w6WyvX
+a0qJuCIlOjZLZwuB0KC8+cHZ3St9HN8YbBuYpqrkI378ncuEDYU4S+W2wvX2
+Vj4X6lAFVp/qbWETeK0JVciqYjlj5mZUXvUeYaW6GolyFlmOmHWD3pKU4rWJ
+LTHJpiYjK8k8xAbAbqM0pSBAWnmQ4xCg8xygKHfx2CkHKwkuk2Y3AJBnCaFH
+y8QK6TPdKwVxNlGDfot46OrM7BNggIEKbu8JOVqKc3YruDHTxu1UjVYGdJZa
+jqro3L8Q5Sy2ead3357YVAeymsQ5Nk5BD3SKbJMYVCh/y5C32WGUt+reHSmP
+mGy/DO+ep714i5Nt1/+IchaOGbfjUceSCnt5kWv9XuLT7IWjR83vuW8S3po3
+iup9k4x/7ss53kqmOw0b4crt/Oe8Ndn40yR7YpJMTUZXkmmIcekVUA0cAVlt
+lKYURK5X/T7V7rPb2nOrMMt3DOf/qnAfIzC7AdBYfiL0RIXybgbvSkE4BgyI
+GnmLeOjqzOwTYCCBtZcl7TtagP8LQtFtPzvOb8+01ofqo7H1wTfvOnffVpOa
+IoPIYA+t975y+fDPhm67ktKdLuPW5OM8vktybUrgVZ10t1KdNz2Pd7PmJvLp
+HQLrv29iUUxmxw1sKcl6iA1xnlmj9KQgQFoZw7HXXcOIcj634xzWDqU+V00z
+AAqKwt53nejayXibwa8NdXCZuS5fdVEjHgPGahEPXZ2ZfQIMHJDnFyNj73SV
+F0Wbiy9c4ms89YKUh3MmBGsPXOVonHjgb+VfdowOD489TyT6TZGBZxAT1z6r
+RzpzHKn4fcF/erdfRLlLHblJeNcV7WvTdrVrUw3yMnWxs69yw0+B1l2YP3FZ
+Gt1K3fquTSyKqUTyZBejqYkNJVkPMVPnmTdKTwoCkLL9HJctOo9atBeGOE+N
+KNd2xEwHgAoZ78h7Dlp3McRjwFgt4qGrM7NPgAGCvD4tyPH1Qf/oZtBgl7C/
+tdJN8nS3O1f7ULdjNFpYztuyNzom8sd1O84pDz8pmCIBxyAmuLVykpWjT3DY
+scSEk+mVYtVKVPJkt/vsIzyd/RQMqb0V7TV8KGfvtcrG8vQfJrwxjHvgOq+h
+KDnI9s0xgUkPhUhTZtiqzVHxx6O3rgnPaqKdjqTXJhbFVCKtL7i0z2v4EIeN
+ybnlbZQvoqwoiW/HsBAzdN6ARmlJQUR70abJ3mdrtfWX8xO9OJ0rH7XPzHUA
+9IJzpSAZA0ZqERddnZl9ArxCoILMrZ/t01yaqN/FswINg5jozna/XQ/657tK
+jC8mW0qyHmIqmEwKYoRZC2dsw1mYtxdv8wzIpX3QYVYDQMFONhlJZ2afAK8W
+El5qVOz1F72rvc7RqLujwRzKBiW8tJjoK7X9+D0lRhaTLSVZDzEVTCQFCUhZ
+hO+G+3gnJa33Q+aFET9EToy5DAAFW9lkHJ2ZfQK8emBIQ2PXNr1CLipMXjt2
+yNsfHEgrFLLxg3IaBlFxnQDpl3dM6hhNTLaUZD3EVDCZFCQg5YeX7C3BX5e3
+l/ziF1bK6E1+5jAAFOxkk7F0ZvYJAADAwAdtvLkj9Arh0xLy+vQtG/6i+zwN
+oIOuzsw+AQAAGPhgLUWJJ+41k1160Oa7x47nQ/0mg9DVmdknAAAAAAAAAAAA
+QJ/z/wHm1TXR
+ "], {{0, 3290}, {564, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{564, 3290},
+ PlotRange->{{0, 564}, {0, 3290}}]], "Output",
+ ImageSize->{568, 3290},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[4]=",
+ CellID->1206263096]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"NPointTo4Point",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 18, 59, 58.703336}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "NPointTo4Point[expr, q] reduces scalar IR finite 5-point functions to \
+scalar 4-point functions according to Eq. 4.52 in arXiv:0709.1075.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "NPointTo4Point",
+ "titlemodifier" -> "", "windowtitle" -> "NPointTo4Point", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/NPointTo4Point"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5232, 165, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2035077065]},
+ "RasterizedOutput"->{
+ Cell[15002, 498, 361789, 5939, 3024, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1206263096]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 378742, 6489},
+ {"RasterizedOutput", 378886, 6493}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3203, 91, 485, 13, 101, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3713, 108, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->520539732],
+Cell[4454, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4510, 138, 118, 3, 70, "Input",
+ CellID->971530134],
+Cell[4631, 143, 540, 15, 56, "Output",
+ CellID->1936532499]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5232, 165, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2035077065],
+Cell[CellGroupData[{
+Cell[5645, 184, 195, 6, 26, "ExampleSection",
+ CellID->100727435],
+Cell[5843, 192, 130, 4, 27, "Input",
+ CellID->102456380],
+Cell[5976, 198, 143, 5, 27, "Input",
+ CellID->1800694022],
+Cell[CellGroupData[{
+Cell[6144, 207, 547, 19, 27, "Input",
+ CellID->1464883166],
+Cell[6694, 228, 3295, 115, 64, "Output",
+ CellID->1733350505]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10026, 348, 246, 7, 27, "Input",
+ CellID->453605134],
+Cell[10275, 357, 4724, 139, 93, "Print",
+ CellID->996693103],
+Cell[15002, 498, 361789, 5939, 3024, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1206263096]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[376830, 6442, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NTerms.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NTerms.nb
index 3a6ed476a..3e2e38d32 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NTerms.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NTerms.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9409, 326]
-NotebookOptionsPosition[ 5536, 200]
-NotebookOutlinePosition[ 8313, 281]
-CellTagsIndexPosition[ 8205, 275]
+NotebookDataLength[ 9457, 326]
+NotebookOptionsPosition[ 5719, 207]
+NotebookOutlinePosition[ 8454, 286]
+CellTagsIndexPosition[ 8346, 280]
WindowTitle->NTerms
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$107942],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$190955],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/NTerms",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NTerms", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NTerms", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +119,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->39215680],
+ CellID->1272617833],
Cell[CellGroupData[{
@@ -118,7 +129,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->376720262],
+ CellID->381699119],
Cell[CellGroupData[{
@@ -131,12 +142,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["2", TraditionalForm]], "Output",
- ImageSize->{12, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NTerms",
- CellLabel->"Out[1]=",
- CellID->306409458]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -150,12 +160,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NTerms",
- CellLabel->"Out[2]=",
- CellID->730102974]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +177,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NTerms",
- CellLabel->"Out[3]=",
- CellID->313925848]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -186,12 +194,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NTerms",
- CellLabel->"Out[4]=",
- CellID->2111597694]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -200,8 +207,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"NTerms",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -210,21 +217,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 43.857945}",
+ "built" -> "{2020, 1, 5, 19, 0, 0.130174}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"NTerms[x] is equivalent to Length if x is a sum; otherwise NTerms[x] \
-returns 1, except NTerms[0] -> 0.", "synonyms" -> {}, "title" -> "NTerms",
- "titlemodifier" -> "", "windowtitle" -> "NTerms", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/NTerms"}, "SearchTextTranslated" -> ""},
+returns 1, except NTerms[0] -> 0.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "NTerms", "titlemodifier" -> "", "windowtitle" -> "NTerms",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/NTerms"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -232,8 +240,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -242,92 +251,83 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3335, 95, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[3597, 106, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->39215680]},
+ CellID->1272617833]},
"NTerms"->{
- Cell[3966, 124, 147, 5, 27, "Input",
+ Cell[4230, 135, 147, 5, 27, "Input",
CellTags->"NTerms",
CellID->1306328315],
- Cell[4116, 131, 207, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->306409458],
- Cell[4360, 143, 157, 5, 27, "Input",
+ Cell[4380, 142, 187, 6, 35, "Output",
+ CellTags->"NTerms"],
+ Cell[4604, 153, 157, 5, 27, "Input",
CellTags->"NTerms",
CellID->1734949005],
- Cell[4520, 150, 207, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->730102974],
- Cell[4764, 162, 124, 4, 27, "Input",
+ Cell[4764, 160, 187, 6, 35, "Output",
+ CellTags->"NTerms"],
+ Cell[4988, 171, 124, 4, 27, "Input",
CellTags->"NTerms",
CellID->2035037256],
- Cell[4891, 168, 207, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->313925848],
- Cell[5135, 180, 124, 4, 27, "Input",
+ Cell[5115, 177, 187, 6, 35, "Output",
+ CellTags->"NTerms"],
+ Cell[5339, 188, 124, 4, 27, "Input",
CellTags->"NTerms",
CellID->1695654423],
- Cell[5262, 186, 208, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->2111597694]}
+ Cell[5466, 194, 187, 6, 35, "Output",
+ CellTags->"NTerms"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7361, 243},
- {"NTerms", 7492, 247}
+ {"PrimaryExamplesSection", 7588, 252},
+ {"NTerms", 7722, 256}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 440, 13, 83, "Usage",
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[3132, 89, 440, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3335, 95, 386, 15, 31, "PrimaryExamplesSection",
+Cell[3597, 106, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->39215680],
+ CellID->1272617833],
Cell[CellGroupData[{
-Cell[3746, 114, 195, 6, 25, "ExampleSection",
- CellID->376720262],
+Cell[4010, 125, 195, 6, 26, "ExampleSection",
+ CellID->381699119],
Cell[CellGroupData[{
-Cell[3966, 124, 147, 5, 27, "Input",
+Cell[4230, 135, 147, 5, 27, "Input",
CellTags->"NTerms",
CellID->1306328315],
-Cell[4116, 131, 207, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->306409458]
+Cell[4380, 142, 187, 6, 35, "Output",
+ CellTags->"NTerms"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4360, 143, 157, 5, 27, "Input",
+Cell[4604, 153, 157, 5, 27, "Input",
CellTags->"NTerms",
CellID->1734949005],
-Cell[4520, 150, 207, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->730102974]
+Cell[4764, 160, 187, 6, 35, "Output",
+ CellTags->"NTerms"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4764, 162, 124, 4, 27, "Input",
+Cell[4988, 171, 124, 4, 27, "Input",
CellTags->"NTerms",
CellID->2035037256],
-Cell[4891, 168, 207, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->313925848]
+Cell[5115, 177, 187, 6, 35, "Output",
+ CellTags->"NTerms"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5135, 180, 124, 4, 27, "Input",
+Cell[5339, 188, 124, 4, 27, "Input",
CellTags->"NTerms",
CellID->1695654423],
-Cell[5262, 186, 208, 7, 36, "Output",
- CellTags->"NTerms",
- CellID->2111597694]
+Cell[5466, 194, 187, 6, 35, "Output",
+ CellTags->"NTerms"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5509, 198, 23, 0, 42, "FooterCell"]
+Cell[5692, 205, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NegativeInteger.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NegativeInteger.nb
index 4b758c2a2..267430755 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NegativeInteger.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NegativeInteger.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6154, 187]
-NotebookOptionsPosition[ 3887, 121]
-NotebookOutlinePosition[ 5886, 176]
-CellTagsIndexPosition[ 5809, 171]
+NotebookDataLength[ 6875, 208]
+NotebookOptionsPosition[ 4830, 151]
+NotebookOutlinePosition[ 6668, 200]
+CellTagsIndexPosition[ 6625, 197]
WindowTitle->NegativeInteger
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/NegativeInteger\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/NegativeInteger"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/NegativeInteger\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/NegativeInteger"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
NegativeInteger.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$105856],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/NegativeInteger", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$187850],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/NegativeInteger", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ NegativeInteger.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NegativeInteger", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NegativeInteger", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"DataType"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"NegativeInteger",
- CellID->1863453208]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,21 +161,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 35.525992}",
+ "built" -> "{2020, 1, 5, 18, 59, 52.029138}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"NegativeInteger is a data type. E.g. DataType[n, NegativeInteger] can be \
-set to True.", "synonyms" -> {}, "title" -> "NegativeInteger",
- "titlemodifier" -> "", "windowtitle" -> "NegativeInteger", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/NegativeInteger"}},
+set to True.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "NegativeInteger", "titlemodifier" -> "", "windowtitle" ->
+ "NegativeInteger", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/NegativeInteger"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -154,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "NegativeInteger"->{
- Cell[3610, 107, 235, 9, 70, "Text",
- CellTags->"NegativeInteger",
- CellID->1863453208]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"NegativeInteger", 5691, 164}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3031, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 387, 11, 70, "Usage",
+Cell[3621, 97, 292, 11, 70, "ObjectNameGrid"],
+Cell[3916, 110, 387, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3337, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4328, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3610, 107, 235, 9, 70, "Text",
- CellTags->"NegativeInteger",
- CellID->1863453208]
+Cell[4601, 139, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3860, 119, 23, 0, 70, "FooterCell"]
+Cell[4803, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nf.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nf.nb
index 395a43b83..32db0460d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nf.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nf.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6567, 209]
-NotebookOptionsPosition[ 4463, 145]
-NotebookOutlinePosition[ 6312, 198]
-CellTagsIndexPosition[ 6248, 193]
+NotebookDataLength[ 7773, 237]
+NotebookOptionsPosition[ 5837, 182]
+NotebookOutlinePosition[ 7564, 229]
+CellTagsIndexPosition[ 7521, 226]
WindowTitle->Nf
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Nf\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Nf"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Nf.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$106204],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Nf",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Amplitude\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Amplitude"], "\<\"CounterTerm\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CounterTerm"], "\<\"Convolute\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Convolute"], "\<\"AnomalousDimension\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/AnomalousDimension"], "\<\"SplittingFunction\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SplittingFunction"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Nf\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Nf"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Nf.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$188296],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Nf",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Nf", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Nf", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -136,9 +175,7 @@ Cell[TextData[{
ButtonNote->"SplittingFunction"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Nf",
- CellID->822571614]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -155,19 +192,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 36.821328}",
+ "built" -> "{2020, 1, 5, 18, 59, 52.983164}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "Nf denotes the number of flavors.",
- "synonyms" -> {}, "title" -> "Nf", "titlemodifier" -> "", "windowtitle" ->
- "Nf", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Nf"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Nf", "titlemodifier" ->
+ "", "windowtitle" -> "Nf", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Nf"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -176,41 +214,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Nf"->{
- Cell[3492, 107, 929, 33, 70, "Text",
- CellTags->"Nf",
- CellID->822571614]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Nf", 6143, 186}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3408, 81, 70, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 335, 11, 70, "Usage",
+Cell[3985, 104, 279, 11, 70, "ObjectNameGrid"],
+Cell[4267, 117, 335, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3219, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4627, 132, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3492, 107, 929, 33, 70, "Text",
- CellTags->"Nf",
- CellID->822571614]
+Cell[4900, 146, 895, 31, 70, "SeeAlso"]
}, Open ]],
-Cell[4436, 143, 23, 0, 70, "FooterCell"]
+Cell[5810, 180, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nielsen.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nielsen.nb
index f9566ecfd..784610bec 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nielsen.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Nielsen.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15751, 578]
-NotebookOptionsPosition[ 9962, 382]
-NotebookOutlinePosition[ 13577, 492]
-CellTagsIndexPosition[ 13466, 486]
+NotebookDataLength[ 16669, 600]
+NotebookOptionsPosition[ 11469, 431]
+NotebookOutlinePosition[ 14625, 523]
+CellTagsIndexPosition[ 14514, 517]
WindowTitle->Nielsen
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Nielsen\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Nielsen"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Nielsen.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SimplifyPolyLog\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SimplifyPolyLog"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Nielsen\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Nielsen"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Nielsen.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$106558],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Nielsen", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$188746],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Nielsen", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Nielsen", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Nielsen", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +127,58 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->310859751],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Nielsen", "]"}]], "Input",
+ CellTags->"Nielsen",
+ CellLabel->"In[5]:=",
+ CellID->393617069],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"PolyLog", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{114, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Nielsen",
+ CellLabel->"Out[5]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +194,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1054756312],
+ CellID->1354488895],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,34 +204,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1326836899],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->"Nielsen",
- CellID->108447826],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Nielsen", "]"}]], "Input",
- CellTags->"Nielsen",
- CellLabel->"In[1]:=",
- CellID->393617069],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"PolyLog", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{124, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Nielsen",
- CellLabel->"Out[1]=",
- CellID->61376182]
-}, Open ]],
+ CellID->913768145],
Cell[CellGroupData[{
@@ -151,7 +212,7 @@ Cell[BoxData[
RowBox[{"Nielsen", "[",
RowBox[{"1", ",", "2", ",", "x"}], "]"}]], "Input",
CellTags->"Nielsen",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1266057514],
Cell[BoxData[
@@ -165,20 +226,17 @@ Cell[BoxData[
TraditionalForm]}]], "(",
FormBox["x",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{49, 15},
+ ImageSize->{51, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Nielsen",
- CellLabel->"Out[2]=",
- CellID->1282400495]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
Numerical evaluation is done via N[Nielsen[n_,p_,x_]] := \
(-1)^(n+p-1)/(n-1)!/p! NIntegrate[Log[1-x t]^p Log[t]^(n-1)/t,{t,0,1}];\
-\>", "Text",
- CellTags->"Nielsen",
- CellID->826105795],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -187,22 +245,19 @@ Cell[BoxData[
RowBox[{"Nielsen", "[",
RowBox[{"1", ",", "2", ",", ".45"}], "]"}], "]"}]], "Input",
CellTags->"Nielsen",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1539557957],
Cell[BoxData[
FormBox["0.07287162612104658`", TraditionalForm]], "Output",
- ImageSize->{64, 15},
+ ImageSize->{65, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Nielsen",
- CellLabel->"Out[3]=",
- CellID->233293253]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["Some special values are built in.", "Text",
- CellTags->"Nielsen",
- CellID->76431912],
+Cell["Some special values are built in.", "Notes"],
Cell[CellGroupData[{
@@ -220,7 +275,7 @@ Cell[BoxData[
RowBox[{"Nielsen", "[",
RowBox[{"1", ",", "2", ",", "1"}], "]"}]}], "}"}]], "Input",
CellTags->"Nielsen",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1900952317],
Cell[BoxData[
@@ -235,12 +290,11 @@ Cell[BoxData[
"Zeta"], "8"], ",",
TemplateBox[{"3"},
"Zeta"]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{155, 42},
+ ImageSize->{151, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Nielsen",
- CellLabel->"Out[4]=",
- CellID->488179787]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -250,7 +304,7 @@ Cell[BoxData[
RowBox[{"1", ",", "2", ",", "x", ",",
RowBox[{"PolyLog", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"Nielsen",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1917228474],
Cell[BoxData[
@@ -272,12 +326,11 @@ Cell[BoxData[
RowBox[{"1", "-", "x"}], ")"}]}], "+",
TemplateBox[{"3"},
"Zeta"]}], TraditionalForm]], "Output",
- ImageSize->{419, 41},
+ ImageSize->{430, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Nielsen",
- CellLabel->"Out[5]=",
- CellID->552589005]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -287,7 +340,7 @@ Cell[BoxData[
RowBox[{"1", ",", "3", ",", "x", ",",
RowBox[{"PolyLog", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"Nielsen",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->2065085174],
Cell[BoxData[
@@ -316,12 +369,11 @@ Cell[BoxData[
RowBox[{"1", "-", "x"}], ")"}]}], "+",
FractionBox[
SuperscriptBox["\[Pi]", "4"], "90"]}], TraditionalForm]], "Output",
- ImageSize->{337, 94},
+ ImageSize->{339, 80},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Nielsen",
- CellLabel->"Out[6]=",
- CellID->944860275]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -331,23 +383,22 @@ Cell[BoxData[
RowBox[{"3", ",", "1", ",", "x", ",",
RowBox[{"PolyLog", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"Nielsen",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1212916567],
Cell[BoxData[
FormBox[
TemplateBox[{"4","x"},
"PolyLog"], TraditionalForm]], "Output",
- ImageSize->{47, 15},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Nielsen",
- CellLabel->"Out[7]=",
- CellID->1203520778]
+ CellLabel->"Out[6]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -373,9 +424,7 @@ Cell[TextData[{
ButtonNote->"SimplifyPolyLog"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Nielsen",
- CellID->1377301931]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -383,7 +432,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Nielsen",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -392,20 +441,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 38.288986}",
+ "built" -> "{2020, 1, 5, 18, 59, 53.997528}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "Nielsen[i, j, x] denotes Nielsen's polylogarithm.",
- "synonyms" -> {}, "title" -> "Nielsen", "titlemodifier" -> "",
- "windowtitle" -> "Nielsen", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Nielsen"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Nielsen",
+ "titlemodifier" -> "", "windowtitle" -> "Nielsen", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Nielsen"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -413,8 +462,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -422,164 +472,136 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3318, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1054756312]},
"Nielsen"->{
- Cell[3930, 122, 75, 2, 35, "Subsubsection",
- CellTags->"Nielsen",
- CellID->108447826],
- Cell[4030, 128, 131, 4, 27, "Input",
+ Cell[5142, 159, 131, 4, 70, "Input",
CellTags->"Nielsen",
CellID->393617069],
- Cell[4164, 134, 273, 10, 36, "Output",
- CellTags->"Nielsen",
- CellID->61376182],
- Cell[4474, 149, 159, 5, 27, "Input",
+ Cell[5276, 165, 254, 9, 37, "Output",
+ CellTags->"Nielsen"],
+ Cell[6224, 210, 159, 5, 27, "Input",
CellTags->"Nielsen",
CellID->1266057514],
- Cell[4636, 156, 390, 16, 36, "Output",
- CellTags->"Nielsen",
- CellID->1282400495],
- Cell[5041, 175, 196, 5, 52, "Text",
- CellTags->"Nielsen",
- CellID->826105795],
- Cell[5262, 184, 190, 6, 27, "Input",
+ Cell[6386, 217, 369, 15, 38, "Output",
+ CellTags->"Nielsen"],
+ Cell[6950, 242, 190, 6, 27, "Input",
CellTags->"Nielsen",
CellID->1539557957],
- Cell[5455, 192, 227, 7, 36, "Output",
- CellTags->"Nielsen",
- CellID->233293253],
- Cell[5697, 202, 90, 2, 32, "Text",
- CellTags->"Nielsen",
- CellID->76431912],
- Cell[5812, 208, 485, 15, 45, "Input",
+ Cell[7143, 250, 207, 6, 35, "Output",
+ CellTags->"Nielsen"],
+ Cell[7440, 263, 485, 15, 45, "Input",
CellTags->"Nielsen",
CellID->1900952317],
- Cell[6300, 225, 425, 17, 63, "Output",
- CellTags->"Nielsen",
- CellID->488179787],
- Cell[6762, 247, 208, 6, 27, "Input",
+ Cell[7928, 280, 405, 16, 55, "Output",
+ CellTags->"Nielsen"],
+ Cell[8370, 301, 208, 6, 27, "Input",
CellTags->"Nielsen",
CellID->1917228474],
- Cell[6973, 255, 678, 24, 62, "Output",
- CellTags->"Nielsen",
- CellID->552589005],
- Cell[7688, 284, 208, 6, 27, "Input",
+ Cell[8581, 309, 658, 23, 56, "Output",
+ CellTags->"Nielsen"],
+ Cell[9276, 337, 208, 6, 27, "Input",
CellTags->"Nielsen",
CellID->2065085174],
- Cell[7899, 292, 912, 31, 115, "Output",
- CellTags->"Nielsen",
- CellID->944860275],
- Cell[8848, 328, 208, 6, 27, "Input",
+ Cell[9487, 345, 892, 30, 101, "Output",
+ CellTags->"Nielsen"],
+ Cell[10416, 380, 208, 6, 27, "Input",
CellTags->"Nielsen",
CellID->1212916567],
- Cell[9059, 336, 245, 9, 36, "Output",
- CellTags->"Nielsen",
- CellID->1203520778],
- Cell[9672, 368, 248, 9, 32, "Text",
- CellTags->"Nielsen",
- CellID->1377301931]}
+ Cell[10627, 388, 224, 8, 37, "Output",
+ CellTags->"Nielsen"]},
+ "PrimaryExamplesSection"->{
+ Cell[5591, 181, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1354488895]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11736, 424},
- {"Nielsen", 11870, 428}
+ {"Nielsen", 13269, 474},
+ {"PrimaryExamplesSection", 14370, 510}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3012, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 417, 13, 82, "Usage",
- CellID->982511436],
+Cell[3594, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3318, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1054756312],
-Cell[3709, 112, 196, 6, 25, "ExampleSection",
- CellID->1326836899],
+Cell[3903, 112, 417, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3930, 122, 75, 2, 35, "Subsubsection",
- CellTags->"Nielsen",
- CellID->108447826],
+Cell[4345, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->310859751],
+Cell[5086, 155, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4030, 128, 131, 4, 27, "Input",
+Cell[5142, 159, 131, 4, 70, "Input",
CellTags->"Nielsen",
CellID->393617069],
-Cell[4164, 134, 273, 10, 36, "Output",
- CellTags->"Nielsen",
- CellID->61376182]
+Cell[5276, 165, 254, 9, 37, "Output",
+ CellTags->"Nielsen"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4474, 149, 159, 5, 27, "Input",
+Cell[5591, 181, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1354488895],
+Cell[CellGroupData[{
+Cell[6004, 200, 195, 6, 26, "ExampleSection",
+ CellID->913768145],
+Cell[CellGroupData[{
+Cell[6224, 210, 159, 5, 27, "Input",
CellTags->"Nielsen",
CellID->1266057514],
-Cell[4636, 156, 390, 16, 36, "Output",
- CellTags->"Nielsen",
- CellID->1282400495]
+Cell[6386, 217, 369, 15, 38, "Output",
+ CellTags->"Nielsen"]
}, Open ]],
-Cell[5041, 175, 196, 5, 52, "Text",
- CellTags->"Nielsen",
- CellID->826105795],
+Cell[6770, 235, 155, 3, 49, "Notes"],
Cell[CellGroupData[{
-Cell[5262, 184, 190, 6, 27, "Input",
+Cell[6950, 242, 190, 6, 27, "Input",
CellTags->"Nielsen",
CellID->1539557957],
-Cell[5455, 192, 227, 7, 36, "Output",
- CellTags->"Nielsen",
- CellID->233293253]
+Cell[7143, 250, 207, 6, 35, "Output",
+ CellTags->"Nielsen"]
}, Open ]],
-Cell[5697, 202, 90, 2, 32, "Text",
- CellTags->"Nielsen",
- CellID->76431912],
+Cell[7365, 259, 50, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5812, 208, 485, 15, 45, "Input",
+Cell[7440, 263, 485, 15, 45, "Input",
CellTags->"Nielsen",
CellID->1900952317],
-Cell[6300, 225, 425, 17, 63, "Output",
- CellTags->"Nielsen",
- CellID->488179787]
+Cell[7928, 280, 405, 16, 55, "Output",
+ CellTags->"Nielsen"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6762, 247, 208, 6, 27, "Input",
+Cell[8370, 301, 208, 6, 27, "Input",
CellTags->"Nielsen",
CellID->1917228474],
-Cell[6973, 255, 678, 24, 62, "Output",
- CellTags->"Nielsen",
- CellID->552589005]
+Cell[8581, 309, 658, 23, 56, "Output",
+ CellTags->"Nielsen"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7688, 284, 208, 6, 27, "Input",
+Cell[9276, 337, 208, 6, 27, "Input",
CellTags->"Nielsen",
CellID->2065085174],
-Cell[7899, 292, 912, 31, 115, "Output",
- CellTags->"Nielsen",
- CellID->944860275]
+Cell[9487, 345, 892, 30, 101, "Output",
+ CellTags->"Nielsen"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8848, 328, 208, 6, 27, "Input",
+Cell[10416, 380, 208, 6, 27, "Input",
CellTags->"Nielsen",
CellID->1212916567],
-Cell[9059, 336, 245, 9, 36, "Output",
- CellTags->"Nielsen",
- CellID->1203520778]
-}, Open ]],
-Cell[9319, 348, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10627, 388, 224, 8, 37, "Output",
+ CellTags->"Nielsen"]
}, Open ]]
}, Open ]],
+Cell[10878, 400, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[9399, 354, 270, 12, 31, "SeeAlsoSection",
+Cell[10946, 405, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9672, 368, 248, 9, 32, "Text",
- CellTags->"Nielsen",
- CellID->1377301931]
+Cell[11219, 419, 208, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[9935, 380, 23, 0, 42, "FooterCell"]
+Cell[11442, 429, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommFreeQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommFreeQ.nb
index 0479dc825..2dc881d8d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommFreeQ.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommFreeQ.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6834, 209]
-NotebookOptionsPosition[ 4485, 142]
-NotebookOutlinePosition[ 6569, 198]
-CellTagsIndexPosition[ 6495, 193]
+NotebookDataLength[ 7851, 235]
+NotebookOptionsPosition[ 5710, 177]
+NotebookOutlinePosition[ 7642, 227]
+CellTagsIndexPosition[ 7599, 224]
WindowTitle->NonCommFreeQ
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/NonCommFreeQ\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/NonCommFreeQ"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"$NonComm\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/$NonComm"], "\<\"NonCommQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/NonCommQ"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"SUNTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/NonCommFreeQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/NonCommFreeQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
NonCommFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$106900],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/NonCommFreeQ", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$189188],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/NonCommFreeQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ NonCommFreeQ.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NonCommFreeQ", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NonCommFreeQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -133,9 +170,7 @@ Cell[TextData[{
ButtonNote->"SUNTrace"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"NonCommFreeQ",
- CellID->177809745]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -152,10 +187,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 39.838573}",
+ "built" -> "{2020, 1, 5, 18, 59, 55.256891}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -163,11 +198,12 @@ TaggingRules->{
"None", "summary" ->
"NonCommFreeQ[exp] yields True if exp contains no non-commutative objects \
(i.e. those objects which are listed in $NonComm) or only non-commutative \
-objects inside DiracTrace's or SUNTrace's.", "synonyms" -> {}, "title" ->
- "NonCommFreeQ", "titlemodifier" -> "", "windowtitle" -> "NonCommFreeQ",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/NonCommFreeQ"}},
+objects inside DiracTrace's or SUNTrace's.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "NonCommFreeQ", "titlemodifier" -> "",
+ "windowtitle" -> "NonCommFreeQ", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/NonCommFreeQ"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -176,41 +212,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "NonCommFreeQ"->{
- Cell[3729, 110, 714, 27, 70, "Text",
- CellTags->"NonCommFreeQ",
- CellID->177809745]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"NonCommFreeQ", 6380, 186}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3297, 79, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 524, 14, 70, "Usage",
+Cell[3884, 102, 289, 11, 70, "ObjectNameGrid"],
+Cell[4176, 115, 524, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3456, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4725, 133, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3729, 110, 714, 27, 70, "Text",
- CellTags->"NonCommFreeQ",
- CellID->177809745]
+Cell[4998, 147, 670, 25, 70, "SeeAlso"]
}, Open ]],
-Cell[4458, 140, 23, 0, 70, "FooterCell"]
+Cell[5683, 175, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommQ.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommQ.nb
index 43f2c8f53..9c24faff6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommQ.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommQ.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6713, 208]
-NotebookOptionsPosition[ 4431, 141]
-NotebookOutlinePosition[ 6452, 197]
-CellTagsIndexPosition[ 6382, 192]
+NotebookDataLength[ 7753, 233]
+NotebookOptionsPosition[ 5668, 176]
+NotebookOutlinePosition[ 7544, 225]
+CellTagsIndexPosition[ 7501, 222]
WindowTitle->NonCommQ
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/NonCommQ\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/NonCommQ"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/NonCommQ.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"$NonComm\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/$NonComm"], "\<\"NonCommFreeQ\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/NonCommFreeQ"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"SUNTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/NonCommQ\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/NonCommQ"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/NonCommQ.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$107250],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/NonCommQ", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$189636],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/NonCommQ", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NonCommQ", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NonCommQ", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -132,9 +169,7 @@ Cell[TextData[{
ButtonNote->"SUNTrace"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"NonCommQ",
- CellID->303191409]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -151,10 +186,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 41.128276}",
+ "built" -> "{2020, 1, 5, 18, 59, 56.297267}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -162,11 +197,11 @@ TaggingRules->{
"None", "summary" ->
"NonCommQ[exp] yields True if exp contains non-commutative objects (i.e. \
those objects which are listed in $NonComm) not inside DiracTrace's or \
-SUNTrace's.", "synonyms" -> {}, "title" -> "NonCommQ", "titlemodifier" -> "",
- "windowtitle" -> "NonCommQ", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/NonCommQ"}},
+SUNTrace's.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "NonCommQ",
+ "titlemodifier" -> "", "windowtitle" -> "NonCommQ", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/NonCommQ"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -175,41 +210,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "NonCommQ"->{
- Cell[3667, 109, 722, 27, 70, "Text",
- CellTags->"NonCommQ",
- CellID->303191409]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"NonCommQ", 6271, 185}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 70, "AnchorBarGrid",
+Cell[580, 21, 3288, 79, 70, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 487, 13, 70, "Usage",
+Cell[3871, 102, 285, 11, 70, "ObjectNameGrid"],
+Cell[4159, 115, 487, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3394, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4671, 132, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3667, 109, 722, 27, 70, "Text",
- CellTags->"NonCommQ",
- CellID->303191409]
+Cell[4944, 146, 682, 25, 70, "SeeAlso"]
}, Open ]],
-Cell[4404, 139, 23, 0, 70, "FooterCell"]
+Cell[5641, 174, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommutative.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommutative.nb
index eee22b34b..afa6f5e40 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommutative.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NonCommutative.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6357, 194]
-NotebookOptionsPosition[ 4089, 128]
-NotebookOutlinePosition[ 6090, 183]
-CellTagsIndexPosition[ 6014, 178]
+NotebookDataLength[ 7205, 217]
+NotebookOptionsPosition[ 5154, 160]
+NotebookOutlinePosition[ 6997, 209]
+CellTagsIndexPosition[ 6954, 206]
WindowTitle->NonCommutative
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/NonCommutative\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/NonCommutative"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"], "\<\"DeclareNonCommutative\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DeclareNonCommutative"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/NonCommutative\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/NonCommutative"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
NonCommutative.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$107598],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/NonCommutative", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$190082],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/NonCommutative", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ NonCommutative.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NonCommutative", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NonCommutative", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +153,7 @@ Cell[TextData[{
ButtonNote->"DeclareNonCommutative"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"NonCommutative",
- CellID->776574018]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,21 +170,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 42.499841}",
+ "built" -> "{2020, 1, 5, 18, 59, 57.292137}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"NonCommutative is a data type which may be used, e.g., as: DataType[x, \
-NonCommutative] = True.", "synonyms" -> {}, "title" -> "NonCommutative",
- "titlemodifier" -> "", "windowtitle" -> "NonCommutative", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/NonCommutative"}},
+NonCommutative] = True.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "NonCommutative", "titlemodifier" -> "", "windowtitle" ->
+ "NonCommutative", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/NonCommutative"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "NonCommutative"->{
- Cell[3616, 108, 431, 15, 70, "Text",
- CellTags->"NonCommutative",
- CellID->776574018]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"NonCommutative", 5897, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3147, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 399, 12, 70, "Usage",
+Cell[3736, 99, 291, 11, 70, "ObjectNameGrid"],
+Cell[4030, 112, 399, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3343, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4454, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3616, 108, 431, 15, 70, "Text",
- CellTags->"NonCommutative",
- CellID->776574018]
+Cell[4727, 142, 385, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4062, 126, 23, 0, 70, "FooterCell"]
+Cell[5127, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericQ1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericQ1.nb
index 23a3df7af..530fa50e7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericQ1.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericQ1.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9257, 311]
-NotebookOptionsPosition[ 5703, 199]
-NotebookOutlinePosition[ 8335, 274]
-CellTagsIndexPosition[ 8224, 268]
+NotebookDataLength[ 9301, 313]
+NotebookOptionsPosition[ 5903, 207]
+NotebookOutlinePosition[ 8455, 280]
+CellTagsIndexPosition[ 8344, 274]
WindowTitle->NumericQ1
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108618],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$191821],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/NumericQ1", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NumericQ1", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NumericQ1", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +121,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1531988954],
+ CellID->395669097],
Cell[CellGroupData[{
@@ -120,7 +131,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->146669933],
+ CellID->711952792],
Cell[CellGroupData[{
@@ -136,12 +147,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NumericQ1",
- CellLabel->"Out[1]=",
- CellID->583048133]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -160,12 +170,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NumericQ1",
- CellLabel->"Out[2]=",
- CellID->1595713370]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -185,12 +194,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"NumericQ1",
- CellLabel->"Out[3]=",
- CellID->397430963]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -209,21 +217,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 47.013464}",
+ "built" -> "{2020, 1, 5, 19, 0, 2.361565}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"NumericQ1[x, {a, b, ..}] is like NumericQ, but assumes that {a,b,..} are \
-numeric quantities.", "synonyms" -> {}, "title" -> "NumericQ1",
- "titlemodifier" -> "", "windowtitle" -> "NumericQ1", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/NumericQ1"}, "SearchTextTranslated" -> ""},
+numeric quantities.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "NumericQ1", "titlemodifier" -> "", "windowtitle" -> "NumericQ1", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/NumericQ1"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -232,7 +241,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -241,78 +250,71 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3422, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3684, 108, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1531988954]},
+ CellID->395669097]},
"NumericQ1"->{
- Cell[4055, 126, 241, 8, 31, "Input",
+ Cell[4316, 137, 241, 8, 33, "Input",
CellTags->"NumericQ1",
CellID->294886798],
- Cell[4299, 136, 214, 7, 36, "Output",
- CellTags->"NumericQ1",
- CellID->583048133],
- Cell[4550, 148, 288, 10, 31, "Input",
+ Cell[4560, 147, 194, 6, 35, "Output",
+ CellTags->"NumericQ1"],
+ Cell[4791, 158, 288, 10, 33, "Input",
CellTags->"NumericQ1",
CellID->792660906],
- Cell[4841, 160, 215, 7, 36, "Output",
- CellTags->"NumericQ1",
- CellID->1595713370],
- Cell[5093, 172, 328, 11, 31, "Input",
+ Cell[5082, 170, 194, 6, 35, "Output",
+ CellTags->"NumericQ1"],
+ Cell[5313, 181, 328, 11, 33, "Input",
CellTags->"NumericQ1",
CellID->103103501],
- Cell[5424, 185, 213, 7, 36, "Output",
- CellTags->"NumericQ1",
- CellID->397430963]}
+ Cell[5644, 194, 193, 6, 35, "Output",
+ CellTags->"NumericQ1"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7530, 242},
- {"NumericQ1", 7666, 246}
+ {"PrimaryExamplesSection", 7717, 251},
+ {"NumericQ1", 7853, 255}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2249, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 2277, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2833, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2888, 78, 509, 15, 83, "Usage",
+Cell[2861, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[3150, 89, 509, 15, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3422, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3684, 108, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1531988954],
+ CellID->395669097],
Cell[CellGroupData[{
-Cell[3835, 116, 195, 6, 25, "ExampleSection",
- CellID->146669933],
+Cell[4096, 127, 195, 6, 26, "ExampleSection",
+ CellID->711952792],
Cell[CellGroupData[{
-Cell[4055, 126, 241, 8, 31, "Input",
+Cell[4316, 137, 241, 8, 33, "Input",
CellTags->"NumericQ1",
CellID->294886798],
-Cell[4299, 136, 214, 7, 36, "Output",
- CellTags->"NumericQ1",
- CellID->583048133]
+Cell[4560, 147, 194, 6, 35, "Output",
+ CellTags->"NumericQ1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4550, 148, 288, 10, 31, "Input",
+Cell[4791, 158, 288, 10, 33, "Input",
CellTags->"NumericQ1",
CellID->792660906],
-Cell[4841, 160, 215, 7, 36, "Output",
- CellTags->"NumericQ1",
- CellID->1595713370]
+Cell[5082, 170, 194, 6, 35, "Output",
+ CellTags->"NumericQ1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5093, 172, 328, 11, 31, "Input",
+Cell[5313, 181, 328, 11, 33, "Input",
CellTags->"NumericQ1",
CellID->103103501],
-Cell[5424, 185, 213, 7, 36, "Output",
- CellTags->"NumericQ1",
- CellID->397430963]
+Cell[5644, 194, 193, 6, 35, "Output",
+ CellTags->"NumericQ1"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5676, 197, 23, 0, 42, "FooterCell"]
+Cell[5876, 205, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericalFactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericalFactor.nb
index 7300ca7e4..c423f3087 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericalFactor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/NumericalFactor.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5259, 146]
-NotebookOptionsPosition[ 3351, 94]
-NotebookOutlinePosition[ 5181, 142]
-CellTagsIndexPosition[ 5138, 139]
+NotebookDataLength[ 5491, 156]
+NotebookOptionsPosition[ 3613, 105]
+NotebookOutlinePosition[ 5427, 153]
+CellTagsIndexPosition[ 5384, 150]
WindowTitle->NumericalFactor
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ NumericalFactor.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108276],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$191385],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/NumericalFactor", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ NumericalFactor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["NumericalFactor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["NumericalFactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -104,21 +115,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 45.533308}",
+ "built" -> "{2020, 1, 5, 19, 0, 1.291304}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"NumericalFactor[expr] gives the overall numerical factor of expr.",
- "synonyms" -> {}, "title" -> "NumericalFactor", "titlemodifier" -> "",
- "windowtitle" -> "NumericalFactor", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/NumericalFactor"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "NumericalFactor",
+ "titlemodifier" -> "", "windowtitle" -> "NumericalFactor", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/NumericalFactor"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -127,7 +138,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -141,13 +152,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 2302, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 396, 12, 70, "Usage",
+Cell[2892, 76, 292, 11, 70, "ObjectNameGrid"],
+Cell[3187, 89, 396, 12, 70, "Usage",
CellID->982511436],
-Cell[3324, 92, 23, 0, 70, "FooterCell"]
+Cell[3586, 103, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE.nb
index c9d5cc5b6..b3e83039b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6074, 188]
-NotebookOptionsPosition[ 3861, 122]
-NotebookOutlinePosition[ 5818, 177]
-CellTagsIndexPosition[ 5753, 172]
+NotebookDataLength[ 7852, 250]
+NotebookOptionsPosition[ 5640, 186]
+NotebookOutlinePosition[ 7399, 234]
+CellTagsIndexPosition[ 7356, 231]
WindowTitle->OPE
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPE\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPE"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OPE.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$112395],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/OPE",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPE1Loop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPE1Loop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OPE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$196664],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/OPE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +95,23 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPE", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["OPE"], "InlineFormula"],
- " \[LineSeparator]",
- "is a convenience variable to separate OPE insertions.\nOPE is also an \
-option of several input functions like GluonPropagator."
+ " \[LineSeparator]is a convenience variable to separate OPE insertions."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +122,42 @@ option of several input functions like GluonPropagator."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+OPE is also an option of several input functions like GluonPropagator.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -113,9 +179,7 @@ Cell[TextData[{
ButtonNote->"OPE1Loop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPE",
- CellID->1798984343]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,21 +196,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 3.233412}",
+ "built" -> "{2020, 1, 5, 19, 0, 14.039512}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "OPE is a convenience variable to separate OPE insertions. OPE is also an \
-option of several input functions like GluonPropagator.", "synonyms" -> {},
- "title" -> "OPE", "titlemodifier" -> "", "windowtitle" -> "OPE", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/OPE"}},
+ "OPE is a convenience variable to separate OPE insertions.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPE", "titlemodifier" ->
+ "", "windowtitle" -> "OPE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/OPE"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +219,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "OPE"->{
- Cell[3596, 108, 223, 9, 70, "Text",
- CellTags->"OPE",
- CellID->1798984343]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"OPE", 5647, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2982, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 433, 12, 70, "Usage",
+Cell[3560, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3843, 110, 350, 10, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3323, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4218, 124, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[4951, 150, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4985, 152, 116, 3, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[5138, 160, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3596, 108, 223, 9, 70, "Text",
- CellTags->"OPE",
- CellID->1798984343]
+Cell[5411, 174, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3834, 120, 23, 0, 70, "FooterCell"]
+Cell[5613, 184, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE1Loop.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE1Loop.nb
index 3a9d1c1f3..5b3fceea4 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE1Loop.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE1Loop.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6077, 189]
-NotebookOptionsPosition[ 3877, 123]
-NotebookOutlinePosition[ 5816, 178]
-CellTagsIndexPosition[ 5746, 173]
+NotebookDataLength[ 6822, 209]
+NotebookOptionsPosition[ 4823, 153]
+NotebookOutlinePosition[ 6615, 201]
+CellTagsIndexPosition[ 6572, 198]
WindowTitle->OPE1Loop
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPE1Loop\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPE1Loop"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OPE1Loop.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPESum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPESum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPE1Loop\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPE1Loop"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OPE1Loop.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$109998],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPE1Loop", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$193586],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPE1Loop", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPE1Loop", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPE1Loop", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"OPESum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPE1Loop",
- CellID->1134342572]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,21 +163,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 53.385016}",
+ "built" -> "{2020, 1, 5, 19, 0, 6.817801}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"OPE1Loop[q1, amp] and OPE1Loop[{q1,q2}, amp] do sub-loop decomposition.",
- "synonyms" -> {}, "title" -> "OPE1Loop", "titlemodifier" -> "",
- "windowtitle" -> "OPE1Loop", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OPE1Loop"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPE1Loop",
+ "titlemodifier" -> "", "windowtitle" -> "OPE1Loop", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/OPE1Loop"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -156,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "OPE1Loop"->{
- Cell[3613, 109, 222, 9, 70, "Text",
- CellTags->"OPE1Loop",
- CellID->1134342572]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"OPE1Loop", 5635, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 70, "AnchorBarGrid",
+Cell[580, 21, 2998, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 433, 13, 70, "Usage",
+Cell[3581, 97, 285, 11, 70, "ObjectNameGrid"],
+Cell[3869, 110, 433, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3340, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4327, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3613, 109, 222, 9, 70, "Text",
- CellTags->"OPE1Loop",
- CellID->1134342572]
+Cell[4600, 141, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3850, 121, 23, 0, 70, "FooterCell"]
+Cell[4796, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE2TID.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE2TID.nb
index 25c77e1b2..1754ecfe9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE2TID.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPE2TID.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9053, 291]
-NotebookOptionsPosition[ 5738, 193]
-NotebookOutlinePosition[ 8295, 262]
-CellTagsIndexPosition[ 8186, 256]
+NotebookDataLength[ 8969, 294]
+NotebookOptionsPosition[ 6295, 212]
+NotebookOutlinePosition[ 8336, 270]
+CellTagsIndexPosition[ 8267, 265]
WindowTitle->OPE2TID
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPE2TID\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPE2TID"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OPE2TID.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPESum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPESum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPE2TID\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPE2TID"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OPE2TID.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$110348],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPE2TID", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$194034],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPE2TID", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,28 +95,28 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPE2TID", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPE2TID", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"OPE2TID", "[",
- RowBox[{"exp", ",", " ", "k1", ",", " ", "k2", ",", " ", "p"}],
- "]"}], ".", " ", "The"}], " ", "setting", " ", "of", " ", "the",
- " ", "option", " ", "EpsContract", " ", "determines", " ", "the",
- " ", "dimension", " ", "in", " ", "which", " ", "the", " ", "Levi"}],
- "-",
- RowBox[{"Civita", " ", "tensors", " ", "are", " ",
- RowBox[{"contracted", "."}]}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "Part[{\"OPE2TID[exp, k1, k2, p]. The setting of the option EpsContract \
-determines the dimension in which the Levi-Civita tensors are contracted.\"}, \
-2]"
+ RowBox[{"OPE2TID", "[",
+ RowBox[{"exp", ",", " ", "k1", ",", " ", "k2", ",", " ", "p"}], "]"}]],
+ "InlineFormula"],
+ "\n\tdoes a special tensor integral decomposition of exp."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -105,32 +127,33 @@ determines the dimension in which the Levi-Civita tensors are contracted.\"}, \
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1024732886],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1583348681],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->2114051963],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -149,16 +172,14 @@ Cell[BoxData[
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
RowBox[{"EpsContract", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{504, 15},
+ ImageSize->{464, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPE2TID",
CellLabel->"Out[1]=",
CellID->1228598425]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -184,9 +205,7 @@ Cell[TextData[{
ButtonNote->"OPESum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPE2TID",
- CellID->2032594420]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -203,24 +222,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 54.666298}",
+ "built" -> "{2020, 1, 5, 19, 0, 7.827450}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "OPE2TID[exp, k1, k2, p]. The setting of the option EpsContract \
-determines the dimension in \\ which the Levi - Civita tensors are \
-contracted.] Part[{\"OPE2TID[exp, k1, k2, p]. The setting of the option \
-EpsContract determines the dimension in which the Levi-Civita tensors are \
-contracted.\"}, 2]", "synonyms" -> {}, "title" -> "OPE2TID", "titlemodifier" ->
- "", "windowtitle" -> "OPE2TID", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OPE2TID"}, "SearchTextTranslated" -> ""},
+ "OPE2TID[exp, k1, k2, p] does a special tensor integral decomposition of \
+exp.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPE2TID",
+ "titlemodifier" -> "", "windowtitle" -> "OPE2TID", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/OPE2TID"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -229,7 +245,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -237,62 +253,49 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3889, 107, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1024732886]},
"OPE2TID"->{
- Cell[4523, 136, 132, 4, 27, "Input",
+ Cell[5154, 159, 132, 4, 70, "Input",
CellTags->"OPE2TID",
CellID->1639885788],
- Cell[4658, 142, 449, 14, 36, "Output",
- CellTags->"OPE2TID",
- CellID->1228598425],
- Cell[5475, 179, 221, 9, 31, "Text",
+ Cell[5289, 165, 449, 14, 37, "Output",
CellTags->"OPE2TID",
- CellID->2032594420]}
+ CellID->1228598425]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7765, 239},
- {"OPE2TID", 7900, 243}
+ {"OPE2TID", 8067, 255}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2994, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 988, 25, 117, "Usage",
- CellID->982511436],
+Cell[3576, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3889, 107, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1024732886],
+Cell[3885, 112, 446, 13, 93, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4302, 126, 196, 6, 25, "ExampleSection",
- CellID->2114051963],
+Cell[4356, 129, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1583348681],
+Cell[5098, 155, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4523, 136, 132, 4, 27, "Input",
+Cell[5154, 159, 132, 4, 70, "Input",
CellTags->"OPE2TID",
CellID->1639885788],
-Cell[4658, 142, 449, 14, 36, "Output",
+Cell[5289, 165, 449, 14, 37, "Output",
CellTags->"OPE2TID",
CellID->1228598425]
}, Open ]]
-}, Open ]],
-Cell[5134, 160, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5202, 165, 270, 12, 31, "SeeAlsoSection",
+Cell[5799, 186, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5475, 179, 221, 9, 31, "Text",
- CellTags->"OPE2TID",
- CellID->2032594420]
+Cell[6072, 200, 181, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5711, 191, 23, 0, 42, "FooterCell"]
+Cell[6268, 210, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEDelta.nb
index 2f12e2691..ef9f8c485 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEDelta.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEDelta.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10084, 356]
-NotebookOptionsPosition[ 6225, 233]
-NotebookOutlinePosition[ 8932, 311]
-CellTagsIndexPosition[ 8822, 305]
+NotebookDataLength[ 10502, 360]
+NotebookOptionsPosition[ 6874, 248]
+NotebookOutlinePosition[ 9467, 321]
+CellTagsIndexPosition[ 9357, 315]
WindowTitle->OPEDelta
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPEDelta\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPEDelta"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OPEDelta.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2QuarkOperator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2QuarkOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPEDelta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPEDelta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OPEDelta.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$110681],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPEDelta", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$194467],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPEDelta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPEDelta", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPEDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +139,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->599204391],
+ CellID->1236723403],
Cell[CellGroupData[{
@@ -117,12 +149,12 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1945637181],
+ CellID->2114371267],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"OPEDelta", ",", "\[Mu]"}], "]"}]], "Input",
CellTags->"OPEDelta",
CellLabel->"In[1]:=",
@@ -136,17 +168,14 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 17},
+ ImageSize->{25, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEDelta",
- CellLabel->"Out[1]=",
- CellID->568278769]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -159,18 +188,12 @@ Cell[BoxData[
CellID->1662840966],
Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 18},
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEDelta",
- CellLabel->"Out[2]=",
- CellID->1005702488]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -183,18 +206,12 @@ Cell[BoxData[
CellID->766618795],
Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 18},
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEDelta",
- CellLabel->"Out[3]=",
- CellID->1002463011]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
@@ -224,9 +241,7 @@ Cell[TextData[{
ButtonNote->"Twist2QuarkOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPEDelta",
- CellID->1239185621]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -243,21 +258,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 56.190802}",
+ "built" -> "{2020, 1, 5, 19, 0, 8.928947}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"OPEDelta is a lightlike axial vector as used e.g. in the operator \
-product expansion in QCD.", "synonyms" -> {}, "title" -> "OPEDelta",
- "titlemodifier" -> "", "windowtitle" -> "OPEDelta", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/OPEDelta"}, "SearchTextTranslated" -> ""},
+product expansion in QCD.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "OPEDelta", "titlemodifier" -> "", "windowtitle" -> "OPEDelta", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/OPEDelta"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -265,8 +280,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -275,89 +291,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3302, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4315, 126, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->599204391]},
+ CellID->1236723403]},
"OPEDelta"->{
- Cell[3935, 123, 162, 5, 27, "Input",
+ Cell[4949, 155, 154, 5, 27, "Input",
CellTags->"OPEDelta",
CellID->82705691],
- Cell[4100, 130, 429, 18, 38, "Output",
- CellTags->"OPEDelta",
- CellID->568278769],
- Cell[4566, 153, 151, 5, 27, "Input",
+ Cell[5106, 162, 371, 15, 35, "Output",
+ CellTags->"OPEDelta"],
+ Cell[5514, 182, 151, 5, 27, "Input",
CellTags->"OPEDelta",
CellID->1662840966],
- Cell[4720, 160, 318, 12, 39, "Output",
- CellTags->"OPEDelta",
- CellID->1005702488],
- Cell[5075, 177, 158, 5, 27, "Input",
+ Cell[5668, 189, 189, 6, 35, "Output",
+ CellTags->"OPEDelta"],
+ Cell[5894, 200, 158, 5, 27, "Input",
CellTags->"OPEDelta",
CellID->766618795],
- Cell[5236, 184, 318, 12, 39, "Output",
- CellTags->"OPEDelta",
- CellID->1002463011],
- Cell[5922, 219, 261, 9, 32, "Text",
- CellTags->"OPEDelta",
- CellID->1239185621]}
+ Cell[6055, 207, 189, 6, 35, "Output",
+ CellTags->"OPEDelta"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8047, 276},
- {"OPEDelta", 8181, 280}
+ {"PrimaryExamplesSection", 8737, 292},
+ {"OPEDelta", 8873, 296}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3024, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 395, 12, 82, "Usage",
+Cell[3607, 97, 285, 11, 45, "ObjectNameGrid"],
+Cell[3895, 110, 395, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3302, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4315, 126, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->599204391],
+ CellID->1236723403],
Cell[CellGroupData[{
-Cell[3714, 113, 196, 6, 25, "ExampleSection",
- CellID->1945637181],
+Cell[4728, 145, 196, 6, 26, "ExampleSection",
+ CellID->2114371267],
Cell[CellGroupData[{
-Cell[3935, 123, 162, 5, 27, "Input",
+Cell[4949, 155, 154, 5, 27, "Input",
CellTags->"OPEDelta",
CellID->82705691],
-Cell[4100, 130, 429, 18, 38, "Output",
- CellTags->"OPEDelta",
- CellID->568278769]
+Cell[5106, 162, 371, 15, 35, "Output",
+ CellTags->"OPEDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4566, 153, 151, 5, 27, "Input",
+Cell[5514, 182, 151, 5, 27, "Input",
CellTags->"OPEDelta",
CellID->1662840966],
-Cell[4720, 160, 318, 12, 39, "Output",
- CellTags->"OPEDelta",
- CellID->1005702488]
+Cell[5668, 189, 189, 6, 35, "Output",
+ CellTags->"OPEDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5075, 177, 158, 5, 27, "Input",
+Cell[5894, 200, 158, 5, 27, "Input",
CellTags->"OPEDelta",
CellID->766618795],
-Cell[5236, 184, 318, 12, 39, "Output",
- CellTags->"OPEDelta",
- CellID->1002463011]
+Cell[6055, 207, 189, 6, 35, "Output",
+ CellTags->"OPEDelta"]
}, Open ]]
}, Open ]],
-Cell[5581, 200, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6271, 217, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5649, 205, 270, 12, 31, "SeeAlsoSection",
+Cell[6339, 222, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5922, 219, 261, 9, 32, "Text",
- CellTags->"OPEDelta",
- CellID->1239185621]
+Cell[6612, 236, 220, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6198, 231, 23, 0, 42, "FooterCell"]
+Cell[6847, 246, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEInt.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEInt.nb
index 76feecf75..a69727c6a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEInt.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEInt.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8649, 269]
-NotebookOptionsPosition[ 5464, 177]
-NotebookOutlinePosition[ 8028, 245]
-CellTagsIndexPosition[ 7920, 239]
+NotebookDataLength[ 6792, 209]
+NotebookOptionsPosition[ 4808, 153]
+NotebookOutlinePosition[ 6585, 201]
+CellTagsIndexPosition[ 6542, 198]
WindowTitle->OPEInt
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPEInt\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPEInt"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OPEInt.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPEInt\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPEInt"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OPEInt.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$112044],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/OPEInt",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$196214],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPEInt", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,32 +95,26 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPEInt", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPEInt", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"OPEInt", "[",
- RowBox[{"expr", ",", " ", "q", ",", " ", "p", ",", " ", "x"}],
- "]"}], ".", " ", "The"}], " ", "dimension", " ", "is", " ",
- "changed", " ", "to", " ", "the", " ", "one", " ", "indicated", " ",
- "by", " ", "the", " ", "option", " ",
- RowBox[{"Dimension", ".", " ", "The"}], " ", "setting", " ", "of",
- " ", "the", " ", "option", " ", "EpsContract", " ", "determines", " ",
- "the", " ", "dimension", " ", "in", " ", "which", " ", "the", " ",
- "Levi"}], "-",
- RowBox[{"Civita", " ", "tensors", " ", "are", " ",
- RowBox[{"contracted", "."}]}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "Part[{\"OPEInt[expr, q, p, x]. The dimension is changed to the one \
-indicated by the option Dimension. The setting of the option EpsContract \
-determines the dimension in which the Levi-Civita tensors are \
-contracted.\"}, 2]"
+ RowBox[{"OPEInt", "[",
+ RowBox[{"expr", ",", " ", "q", ",", " ", "p", ",", " ", "x"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]calculates 1-loop OPE-type self energies."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,44 +125,6 @@ contracted.\"}, 2]"
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"OPEInt",
- CellLabel->"In[1]:=",
- CellID->1228083412]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -168,9 +146,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPEInt",
- CellID->1872757445]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -187,26 +163,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 1.983327}",
+ "built" -> "{2020, 1, 5, 19, 0, 13.077466}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "OPEInt[expr, q, p, x]. The dimension is changed to the one indicated by \
-the \\ option Dimension. The setting of the option EpsContract determines the \
-dimension \\ in which the Levi - Civita tensors are contracted.] \
-Part[{\"OPEInt[expr, q, p, x]. The dimension is changed to the one indicated \
-by the option Dimension. The setting of the option EpsContract determines the \
-dimension in which the Levi-Civita tensors are contracted.\"}, 2]",
- "synonyms" -> {}, "title" -> "OPEInt", "titlemodifier" -> "",
- "windowtitle" -> "OPEInt", "type" -> "Symbol", "uri" ->
+ "OPEInt[expr, q, p, x] calculates 1-loop OPE-type self energies.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPEInt", "titlemodifier" ->
+ "", "windowtitle" -> "OPEInt", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/OPEInt"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -215,62 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4170, 111, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "OPEInt"->{
- Cell[4764, 138, 91, 3, 70, "Input",
- CellTags->"OPEInt",
- CellID->1228083412],
- Cell[5211, 163, 211, 9, 70, "Text",
- CellTags->"OPEInt",
- CellID->1872757445]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7601, 225},
- {"OPEInt", 7726, 229}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 2983, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 1275, 29, 70, "Usage",
+Cell[3564, 97, 283, 11, 70, "ObjectNameGrid"],
+Cell[3850, 110, 446, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4170, 111, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[4574, 130, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4764, 138, 91, 3, 70, "Input",
- CellTags->"OPEInt",
- CellID->1228083412]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4904, 147, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4938, 149, 270, 12, 70, "SeeAlsoSection",
+Cell[4321, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[5211, 163, 211, 9, 70, "Text",
- CellTags->"OPEInt",
- CellID->1872757445]
+Cell[4594, 141, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[5437, 175, 23, 0, 70, "FooterCell"]
+Cell[4781, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrate.nb
index 44e9e57c4..addc459fa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrate.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8751, 269]
-NotebookOptionsPosition[ 5505, 177]
-NotebookOutlinePosition[ 8119, 245]
-CellTagsIndexPosition[ 8005, 239]
+NotebookDataLength[ 9022, 287]
+NotebookOptionsPosition[ 6581, 217]
+NotebookOutlinePosition[ 8477, 267]
+CellTagsIndexPosition[ 8434, 264]
WindowTitle->OPEIntegrate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPEIntegrate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPEIntegrate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPEIntegrate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPEIntegrate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
OPEIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111699],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPEIntegrate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$195781],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPEIntegrate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,32 +95,28 @@ OPEIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPEIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPEIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"OPEIntegrate", "[",
- RowBox[{"expr", ",", " ", "q", ",", " ", "x"}], "]"}], ".", " ",
- "The"}], " ", "dimension", " ", "is", " ", "changed", " ", "to",
- " ", "the", " ", "one", " ", "indicated", " ", "by", " ", "the", " ",
- "option", " ",
- RowBox[{"Dimension", ".", " ", "The"}], " ", "setting", " ", "of",
- " ", "the", " ", "option", " ", "EpsContract", " ", "determines", " ",
- "the", " ", "dimension", " ", "in", " ", "which", " ", "the", " ",
- "Levi"}], "-",
- RowBox[{"Civita", " ", "tensors", " ", "are", " ",
- RowBox[{"contracted", "."}]}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "Part[{\"OPEIntegrate[expr, q, x]. The dimension is changed to the one \
-indicated by the option Dimension. The setting of the option EpsContract \
-determines the dimension in which the Levi-Civita tensors are \
-contracted.\"}, 2]"
+ RowBox[{"OPEIntegrate", "[",
+ RowBox[{"expr", ",", " ", "q", ",", " ", "x"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]calculates a one-loop OPE-type integral."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,44 +127,68 @@ contracted.\"}, 2]"
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->132546791],
+
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
+Cell[BoxData[
+ RowBox[{"Options", "[", "OPEIntegrate", "]"}]], "Input",
+ CellLabel->"In[18]:="],
-Cell[BoxData[""], "Input",
- CellTags->"OPEIntegrate",
- CellLabel->"In[1]:=",
- CellID->614498431]
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Divideout", "\[Rule]", "1"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "4"}], ",",
+ RowBox[{"EpsilonOrder", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"Factorout", "\[Rule]", "1"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"D", "\[Rule]",
+ RowBox[{
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm], "+", "4"}]}], "}"}]}], ",",
+ RowBox[{"OPEIntegrateDelta", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{553, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[18]="]
}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -168,17 +210,15 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPEIntegrate",
- CellID->1317066831]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"OPEIntegrate",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -187,26 +227,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 0.734294}",
+ "built" -> "{2020, 1, 5, 19, 0, 12.036129}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "OPEIntegrate[expr, q, x]. The dimension is changed to the one indicated \
-by the \\ option Dimension. The setting of the option EpsContract determines \
-the dimension \\ in which the Levi - Civita tensors are contracted.] \
-Part[{\"OPEIntegrate[expr, q, x]. The dimension is changed to the one \
-indicated by the option Dimension. The setting of the option EpsContract \
-determines the dimension in which the Levi-Civita tensors are contracted.\"}, \
-2]", "synonyms" -> {}, "title" -> "OPEIntegrate", "titlemodifier" -> "",
- "windowtitle" -> "OPEIntegrate", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OPEIntegrate"}},
+ "OPEIntegrate[expr, q, x] calculates a one-loop OPE-type integral.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPEIntegrate",
+ "titlemodifier" -> "", "windowtitle" -> "OPEIntegrate", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/OPEIntegrate"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -214,65 +250,48 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4200, 111, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "OPEIntegrate"->{
- Cell[4794, 138, 96, 3, 70, "Input",
- CellTags->"OPEIntegrate",
- CellID->614498431],
- Cell[5246, 163, 217, 9, 70, "Text",
- CellTags->"OPEIntegrate",
- CellID->1317066831]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7669, 225},
- {"OPEIntegrate", 7800, 229}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3009, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 1268, 29, 70, "Usage",
+Cell[3596, 97, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3910, 112, 436, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4200, 111, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
+Cell[4371, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->132546791],
+Cell[5112, 155, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4604, 130, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4794, 138, 96, 3, 70, "Input",
- CellTags->"OPEIntegrate",
- CellID->614498431]
+Cell[5168, 159, 95, 2, 70, "Input"],
+Cell[5266, 163, 767, 21, 56, "Output"]
}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4939, 147, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4973, 149, 270, 12, 70, "SeeAlsoSection",
+Cell[6094, 191, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5246, 163, 217, 9, 70, "Text",
- CellTags->"OPEIntegrate",
- CellID->1317066831]
+Cell[6367, 205, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5478, 175, 23, 0, 70, "FooterCell"]
+Cell[6554, 215, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrateDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrateDelta.nb
index 5892a783d..b1c998e5d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrateDelta.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEIntegrateDelta.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8330, 259]
-NotebookOptionsPosition[ 5097, 168]
-NotebookOutlinePosition[ 7687, 235]
-CellTagsIndexPosition[ 7568, 229]
+NotebookDataLength[ 8535, 262]
+NotebookOptionsPosition[ 6087, 195]
+NotebookOutlinePosition[ 8082, 246]
+CellTagsIndexPosition[ 8039, 243]
WindowTitle->OPEIntegrateDelta
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPEIntegrateDelta\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPEIntegrateDelta"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPEIntegrateDelta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPEIntegrateDelta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
OPEIntegrateDelta.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111354],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPEIntegrateDelta", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$195338],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPEIntegrateDelta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ OPEIntegrateDelta.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPEIntegrateDelta", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPEIntegrateDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -82,14 +114,12 @@ Cell[BoxData[GridBox[{
RowBox[{"OPEIntegrateDelta", "[",
RowBox[{"expr", ",", " ", "x", ",", " ", "m"}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "introduces the \[Delta](1-x) (DeltaFunction[1-x]). The ",
+ " \[LineSeparator]introduces the \[Delta](1-x) (DeltaFunction[1-x]). The \
+",
StyleBox["Mathematica",
FontSlant->"Italic"],
" Integrate function is called and each integration (from 0 to 1) is \
-recorded for reference (and bug-checking) in the list $MIntegrate. \nNotice \
-that the dimension specified by the option should also be the dimension used \
-in expr. It is replaced in OPEIntegrateDelta by (4+Epsilon)."
+recorded for reference (and bug-checking) in the list $MIntegrate."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -100,44 +130,43 @@ in expr. It is replaced in OPEIntegrateDelta by (4+Epsilon)."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
CellID->1],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
+Cell["", "SectionHeaderSpacer"],
-Cell[BoxData[""], "Input",
- CellTags->"OPEIntegrateDelta",
- CellLabel->"In[1]:=",
- CellID->1585063282]
-}, Open ]]
-}, Open ]],
+Cell["\<\
+Notice that the dimension specified by the option should also be the \
+dimension used in expr. It is replaced in OPEIntegrateDelta by (4+Epsilon).\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]],
Cell[CellGroupData[{
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -159,9 +188,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPEIntegrateDelta",
- CellID->2121617043]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -178,10 +205,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 59.392024}",
+ "built" -> "{2020, 1, 5, 19, 0, 11.069400}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -190,13 +217,12 @@ TaggingRules->{
"OPEIntegrateDelta[expr, x, m] introduces the \\[Delta](1-x) \
(DeltaFunction[1-x]). The Mathematica Integrate function is called and each \
integration (from 0 to 1) is recorded for reference (and bug-checking) in the \
-list $MIntegrate. Notice that the dimension specified by the option should \
-also be the dimension used in expr. It is replaced in OPEIntegrateDelta by \
-(4+Epsilon).", "synonyms" -> {}, "title" -> "OPEIntegrateDelta",
- "titlemodifier" -> "", "windowtitle" -> "OPEIntegrateDelta", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/OPEIntegrateDelta"}},
+list $MIntegrate.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "OPEIntegrateDelta", "titlemodifier" -> "", "windowtitle" ->
+ "OPEIntegrateDelta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/OPEIntegrateDelta"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -205,62 +231,39 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3781, 102, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "OPEIntegrateDelta"->{
- Cell[4375, 129, 102, 3, 70, "Input",
- CellTags->"OPEIntegrateDelta",
- CellID->1585063282],
- Cell[4833, 154, 222, 9, 70, "Text",
- CellTags->"OPEIntegrateDelta",
- CellID->2121617043]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7215, 215},
- {"OPEIntegrateDelta", 7351, 219}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2282, 52, 70, "AnchorBarGrid",
+Cell[589, 21, 3029, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2874, 75, 60, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2937, 78, 819, 20, 70, "Usage",
+Cell[3621, 97, 294, 11, 70, "ObjectNameGrid"],
+Cell[3918, 110, 661, 18, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3781, 102, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
+Cell[4604, 132, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
CellID->1],
+Cell[5337, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5371, 160, 192, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
Cell[CellGroupData[{
-Cell[4185, 121, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4375, 129, 102, 3, 70, "Input",
- CellTags->"OPEIntegrateDelta",
- CellID->1585063282]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4526, 138, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4560, 140, 270, 12, 70, "SeeAlsoSection",
+Cell[5600, 169, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4833, 154, 222, 9, 70, "Text",
- CellTags->"OPEIntegrateDelta",
- CellID->2121617043]
+Cell[5873, 183, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[5070, 166, 23, 0, 70, "FooterCell"]
+Cell[6060, 193, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESum.nb
index fefd09ecc..92a428353 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESum.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESum.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16152, 587]
-NotebookOptionsPosition[ 11791, 444]
-NotebookOutlinePosition[ 14729, 531]
-CellTagsIndexPosition[ 14619, 525]
+NotebookDataLength[ 16484, 587]
+NotebookOptionsPosition[ 12556, 463]
+NotebookOutlinePosition[ 15275, 541]
+CellTagsIndexPosition[ 15165, 535]
WindowTitle->OPESum
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPESum\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPESum"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OPESum.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPESumExplicit\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPESumExplicit"], "\<\"OPESumSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPESumSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPESum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPESum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OPESum.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$113079],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/OPESum",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$197547],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPESum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPESum", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPESum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->515601059],
+ CellID->1624710317],
Cell[CellGroupData[{
@@ -121,24 +155,23 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1756004996],
+ CellID->1809286407],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"OPESum", "[",
+ RowBox[{"OPESum", "[",
+ RowBox[{
RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"SO", "[", "p", "]"}], "^", "OPEi"}],
- RowBox[{
- RowBox[{"SO", "[", "k", "]"}], "^",
- RowBox[{"(",
- RowBox[{"OPEm", "-", "OPEi", "-", "3"}], ")"}]}]}], ",",
- RowBox[{"{",
- RowBox[{"OPEi", ",", "0", ",",
- RowBox[{"OPEm", "-", "3"}]}], "}"}]}], "]"}]}]], "Input",
+ RowBox[{"SO", "[", "p", "]"}], "^", "OPEi"}],
+ RowBox[{
+ RowBox[{"SO", "[", "k", "]"}], "^",
+ RowBox[{"(",
+ RowBox[{"OPEm", "-", "OPEi", "-", "3"}], ")"}]}]}], ",",
+ RowBox[{"{",
+ RowBox[{"OPEi", ",", "0", ",",
+ RowBox[{"OPEm", "-", "3"}]}], "}"}]}], "]"}]], "Input",
CellTags->"OPESum",
CellLabel->"In[1]:=",
CellID->448625968],
@@ -173,18 +206,17 @@ Cell[BoxData[
FormBox["p",
TraditionalForm]}], ")"}], "i"]}]}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{183, 47},
+ ImageSize->{197, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESum",
- CellLabel->"Out[1]=",
- CellID->1323502805]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"OPESumExplicit", "[", "t1", "]"}]], "Input",
+ RowBox[{"OPESumExplicit", "[", "%", "]"}]], "Input",
CellTags->"OPESum",
CellLabel->"In[2]:=",
CellID->575960405],
@@ -248,18 +280,17 @@ Cell[BoxData[
TraditionalForm],
FormBox["p",
TraditionalForm]}]}]]}], TraditionalForm]], "Output",
- ImageSize->{180, 49},
+ ImageSize->{196, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESum",
- CellLabel->"Out[2]=",
- CellID->988725801]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"OPESum", "[",
RowBox[{
RowBox[{
@@ -305,18 +336,17 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "j"}], "+", "m", "-", "4"}]]}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{200, 49},
+ ImageSize->{221, 48},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESum",
- CellLabel->"Out[3]=",
- CellID->1408007149]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"OPESumExplicit", "[", "t2", "]"}]], "Input",
+ RowBox[{"OPESumExplicit", "[", "%", "]"}]], "Input",
CellTags->"OPESum",
CellLabel->"In[4]:=",
CellID->1712949576],
@@ -386,21 +416,12 @@ Cell[BoxData[
RowBox[{"a", "-", "c"}], ")"}], " ",
RowBox[{"(",
RowBox[{"b", "-", "c"}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{477, 105},
+ ImageSize->{521, 90},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESum",
- CellLabel->"Out[4]=",
- CellID->1163635134]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{" ",
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2"}], "]"}]}]], "Input",
- CellTags->"OPESum",
- CellLabel->"In[5]:=",
- CellID->790847648]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -435,9 +456,7 @@ Cell[TextData[{
ButtonNote->"OPESumSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPESum",
- CellID->1162371524]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -445,7 +464,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"OPESum",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -454,21 +473,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 6.159074}",
+ "built" -> "{2020, 1, 5, 19, 0, 15.999798}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"OPESum[exp, {i, 0, m}] denotes a symbolic sum.The syntax is the same as \
-for Sum.", "synonyms" -> {}, "title" -> "OPESum", "titlemodifier" -> "",
- "windowtitle" -> "OPESum", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OPESum"}, "SearchTextTranslated" -> ""},
+for Sum.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPESum",
+ "titlemodifier" -> "", "windowtitle" -> "OPESum", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/OPESum"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -476,8 +495,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -486,109 +506,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3414, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4523, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->515601059]},
+ CellID->1624710317]},
"OPESum"->{
- Cell[4047, 127, 477, 16, 27, "Input",
+ Cell[5157, 161, 442, 15, 27, "Input",
CellTags->"OPESum",
CellID->448625968],
- Cell[4527, 145, 961, 35, 68, "Output",
- CellTags->"OPESum",
- CellID->1323502805],
- Cell[5525, 185, 132, 4, 27, "Input",
+ Cell[5602, 178, 940, 34, 67, "Output",
+ CellTags->"OPESum"],
+ Cell[6579, 217, 131, 4, 27, "Input",
CellTags->"OPESum",
CellID->575960405],
- Cell[5660, 191, 1709, 64, 70, "Output",
- CellTags->"OPESum",
- CellID->988725801],
- Cell[7406, 260, 563, 19, 27, "Input",
+ Cell[6713, 223, 1689, 63, 62, "Output",
+ CellTags->"OPESum"],
+ Cell[8439, 291, 547, 19, 27, "Input",
CellTags->"OPESum",
CellID->934947616],
- Cell[7972, 281, 800, 31, 70, "Output",
- CellTags->"OPESum",
- CellID->1408007149],
- Cell[8809, 317, 133, 4, 27, "Input",
+ Cell[8989, 312, 779, 30, 69, "Output",
+ CellTags->"OPESum"],
+ Cell[9805, 347, 132, 4, 27, "Input",
CellTags->"OPESum",
CellID->1712949576],
- Cell[8945, 323, 1846, 70, 126, "Output",
- CellTags->"OPESum",
- CellID->1163635134],
- Cell[10806, 396, 166, 6, 70, "Input",
- CellTags->"OPESum",
- CellID->790847648],
- Cell[11328, 424, 421, 15, 70, "Text",
- CellTags->"OPESum",
- CellID->1162371524]}
+ Cell[9940, 353, 1824, 69, 111, "Output",
+ CellTags->"OPESum"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13593, 487},
- {"OPESum", 13725, 491}
+ {"PrimaryExamplesSection", 14401, 507},
+ {"OPESum", 14535, 511}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3112, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 519, 16, 82, "Usage",
+Cell[3693, 99, 283, 11, 45, "ObjectNameGrid"],
+Cell[3979, 112, 519, 16, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3414, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4523, 132, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->515601059],
+ CellID->1624710317],
Cell[CellGroupData[{
-Cell[3826, 117, 196, 6, 25, "ExampleSection",
- CellID->1756004996],
+Cell[4936, 151, 196, 6, 26, "ExampleSection",
+ CellID->1809286407],
Cell[CellGroupData[{
-Cell[4047, 127, 477, 16, 27, "Input",
+Cell[5157, 161, 442, 15, 27, "Input",
CellTags->"OPESum",
CellID->448625968],
-Cell[4527, 145, 961, 35, 68, "Output",
- CellTags->"OPESum",
- CellID->1323502805]
+Cell[5602, 178, 940, 34, 67, "Output",
+ CellTags->"OPESum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5525, 185, 132, 4, 27, "Input",
+Cell[6579, 217, 131, 4, 27, "Input",
CellTags->"OPESum",
CellID->575960405],
-Cell[5660, 191, 1709, 64, 70, "Output",
- CellTags->"OPESum",
- CellID->988725801]
+Cell[6713, 223, 1689, 63, 62, "Output",
+ CellTags->"OPESum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7406, 260, 563, 19, 27, "Input",
+Cell[8439, 291, 547, 19, 27, "Input",
CellTags->"OPESum",
CellID->934947616],
-Cell[7972, 281, 800, 31, 70, "Output",
- CellTags->"OPESum",
- CellID->1408007149]
+Cell[8989, 312, 779, 30, 69, "Output",
+ CellTags->"OPESum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8809, 317, 133, 4, 27, "Input",
+Cell[9805, 347, 132, 4, 27, "Input",
CellTags->"OPESum",
CellID->1712949576],
-Cell[8945, 323, 1846, 70, 126, "Output",
- CellTags->"OPESum",
- CellID->1163635134]
-}, Open ]],
-Cell[10806, 396, 166, 6, 70, "Input",
- CellTags->"OPESum",
- CellID->790847648]
+Cell[9940, 353, 1824, 69, 111, "Output",
+ CellTags->"OPESum"]
+}, Open ]]
}, Open ]],
-Cell[10987, 405, 31, 0, 70, "SectionFooterSpacer"]
+Cell[11791, 426, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11055, 410, 270, 12, 70, "SeeAlsoSection",
+Cell[11859, 431, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[11328, 424, 421, 15, 70, "Text",
- CellTags->"OPESum",
- CellID->1162371524]
+Cell[12132, 445, 382, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[11764, 442, 23, 0, 70, "FooterCell"]
+Cell[12529, 461, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumExplicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumExplicit.nb
index cc6a77275..2661ed350 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumExplicit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumExplicit.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14519, 520]
-NotebookOptionsPosition[ 10005, 378]
-NotebookOutlinePosition[ 13024, 464]
-CellTagsIndexPosition[ 12906, 458]
+NotebookDataLength[ 16346, 583]
+NotebookOptionsPosition[ 11950, 447]
+NotebookOutlinePosition[ 14738, 525]
+CellTagsIndexPosition[ 14620, 519]
WindowTitle->OPESumExplicit
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPESumExplicit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPESumExplicit"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPESum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPESum"], "\<\"OPESumSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPESumSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPESumExplicit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPESumExplicit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
OPESumExplicit.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$112740],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPESumExplicit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$197108],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPESumExplicit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ OPESumExplicit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPESumExplicit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPESumExplicit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -92,6 +127,55 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->258634994],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "OPESumExplicit", "]"}]], "Input",
+ CellLabel->"In[28]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Assumptions", "\[Rule]", "True"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{135, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[28]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,7 +191,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->467468200],
+ CellID->1659838998],
Cell[CellGroupData[{
@@ -117,22 +201,21 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1729431576],
+ CellID->2035920903],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"OPESum", "[",
+ RowBox[{"OPESum", "[",
+ RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"A", "^", "i"}],
- RowBox[{"B", "^",
- RowBox[{"(",
- RowBox[{"m", "-", "i", "-", "3"}], ")"}]}]}], ",",
- RowBox[{"{",
- RowBox[{"i", ",", "0", ",",
- RowBox[{"m", "-", "3"}]}], "}"}]}], "]"}]}]], "Input",
+ RowBox[{"A", "^", "i"}],
+ RowBox[{"B", "^",
+ RowBox[{"(",
+ RowBox[{"m", "-", "i", "-", "3"}], ")"}]}]}], ",",
+ RowBox[{"{",
+ RowBox[{"i", ",", "0", ",",
+ RowBox[{"m", "-", "3"}]}], "}"}]}], "]"}]], "Input",
CellTags->"OPESumExplicit",
CellLabel->"In[1]:=",
CellID->448095633],
@@ -151,18 +234,17 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "3"}], "-", "i", "+", "m"}]]}]}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{119, 47},
+ ImageSize->{133, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumExplicit",
- CellLabel->"Out[1]=",
- CellID->1524447392]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"OPESumExplicit", "[", "t1", "]"}]], "Input",
+ RowBox[{"OPESumExplicit", "[", "%", "]"}]], "Input",
CellTags->"OPESumExplicit",
CellLabel->"In[2]:=",
CellID->21429542],
@@ -182,18 +264,17 @@ Cell[BoxData[
RowBox[{"m", "-", "2"}]],
TraditionalForm],
RowBox[{"A", "-", "B"}]]}], TraditionalForm]], "Output",
- ImageSize->{105, 45},
+ ImageSize->{116, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumExplicit",
- CellLabel->"Out[2]=",
- CellID->110967973]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"OPESum", "[",
RowBox[{
RowBox[{
@@ -239,18 +320,17 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "j"}], "+", "m", "-", "4"}]]}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{200, 49},
+ ImageSize->{221, 48},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumExplicit",
- CellLabel->"Out[3]=",
- CellID->643122567]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"OPESumExplicit", "[", "t2", "]"}]], "Input",
+ RowBox[{"OPESumExplicit", "[", "%", "]"}]], "Input",
CellTags->"OPESumExplicit",
CellLabel->"In[4]:=",
CellID->773320980],
@@ -320,21 +400,12 @@ Cell[BoxData[
RowBox[{"a", "-", "c"}], ")"}], " ",
RowBox[{"(",
RowBox[{"b", "-", "c"}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{477, 105},
+ ImageSize->{521, 90},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumExplicit",
- CellLabel->"Out[4]=",
- CellID->1923019791]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2"}], "]"}], ";"}]], "Input",
- CellTags->"OPESumExplicit",
- CellLabel->"In[5]:=",
- CellID->363319919]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -369,9 +440,7 @@ Cell[TextData[{
ButtonNote->"OPESumSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPESumExplicit",
- CellID->1999250698]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -379,7 +448,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"OPESumExplicit",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -388,20 +457,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 4.570394}",
+ "built" -> "{2020, 1, 5, 19, 0, 14.906612}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "OPESumExplicit[exp] calculates OPESum's.",
- "synonyms" -> {}, "title" -> "OPESumExplicit", "titlemodifier" -> "",
- "windowtitle" -> "OPESumExplicit", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OPESumExplicit"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPESumExplicit",
+ "titlemodifier" -> "", "windowtitle" -> "OPESumExplicit", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/OPESumExplicit"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -409,8 +479,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -419,109 +490,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3315, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5617, 178, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->467468200]},
+ CellID->1659838998]},
"OPESumExplicit"->{
- Cell[3948, 123, 404, 14, 27, "Input",
+ Cell[6251, 207, 371, 13, 27, "Input",
CellTags->"OPESumExplicit",
CellID->448095633],
- Cell[4355, 139, 513, 19, 68, "Output",
- CellTags->"OPESumExplicit",
- CellID->1524447392],
- Cell[4905, 163, 139, 4, 27, "Input",
+ Cell[6625, 222, 492, 18, 67, "Output",
+ CellTags->"OPESumExplicit"],
+ Cell[7154, 245, 138, 4, 27, "Input",
CellTags->"OPESumExplicit",
CellID->21429542],
- Cell[5047, 169, 513, 20, 66, "Output",
- CellTags->"OPESumExplicit",
- CellID->110967973],
- Cell[5597, 194, 572, 19, 27, "Input",
+ Cell[7295, 251, 493, 19, 59, "Output",
+ CellTags->"OPESumExplicit"],
+ Cell[7825, 275, 556, 19, 27, "Input",
CellTags->"OPESumExplicit",
CellID->1082502911],
- Cell[6172, 215, 807, 31, 70, "Output",
- CellTags->"OPESumExplicit",
- CellID->643122567],
- Cell[7016, 251, 140, 4, 27, "Input",
+ Cell[8384, 296, 787, 30, 69, "Output",
+ CellTags->"OPESumExplicit"],
+ Cell[9208, 331, 139, 4, 27, "Input",
CellTags->"OPESumExplicit",
CellID->773320980],
- Cell[7159, 257, 1854, 70, 126, "Output",
- CellTags->"OPESumExplicit",
- CellID->1923019791],
- Cell[9028, 330, 174, 6, 70, "Input",
- CellTags->"OPESumExplicit",
- CellID->363319919],
- Cell[9558, 358, 405, 15, 70, "Text",
- CellTags->"OPESumExplicit",
- CellID->1999250698]}
+ Cell[9350, 337, 1832, 69, 111, "Output",
+ CellTags->"OPESumExplicit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11797, 420},
- {"OPESumExplicit", 11937, 424}
+ {"PrimaryExamplesSection", 13786, 491},
+ {"OPESumExplicit", 13928, 495}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3121, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 371, 12, 82, "Usage",
+Cell[3710, 98, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4026, 113, 371, 12, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3315, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4422, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->258634994],
+Cell[5163, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5219, 159, 97, 2, 70, "Input"],
+Cell[5319, 163, 237, 8, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5617, 178, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->467468200],
+ CellID->1659838998],
Cell[CellGroupData[{
-Cell[3727, 113, 196, 6, 25, "ExampleSection",
- CellID->1729431576],
+Cell[6030, 197, 196, 6, 26, "ExampleSection",
+ CellID->2035920903],
Cell[CellGroupData[{
-Cell[3948, 123, 404, 14, 27, "Input",
+Cell[6251, 207, 371, 13, 27, "Input",
CellTags->"OPESumExplicit",
CellID->448095633],
-Cell[4355, 139, 513, 19, 68, "Output",
- CellTags->"OPESumExplicit",
- CellID->1524447392]
+Cell[6625, 222, 492, 18, 67, "Output",
+ CellTags->"OPESumExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4905, 163, 139, 4, 27, "Input",
+Cell[7154, 245, 138, 4, 27, "Input",
CellTags->"OPESumExplicit",
CellID->21429542],
-Cell[5047, 169, 513, 20, 66, "Output",
- CellTags->"OPESumExplicit",
- CellID->110967973]
+Cell[7295, 251, 493, 19, 59, "Output",
+ CellTags->"OPESumExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5597, 194, 572, 19, 27, "Input",
+Cell[7825, 275, 556, 19, 27, "Input",
CellTags->"OPESumExplicit",
CellID->1082502911],
-Cell[6172, 215, 807, 31, 70, "Output",
- CellTags->"OPESumExplicit",
- CellID->643122567]
+Cell[8384, 296, 787, 30, 69, "Output",
+ CellTags->"OPESumExplicit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7016, 251, 140, 4, 27, "Input",
+Cell[9208, 331, 139, 4, 27, "Input",
CellTags->"OPESumExplicit",
CellID->773320980],
-Cell[7159, 257, 1854, 70, 126, "Output",
- CellTags->"OPESumExplicit",
- CellID->1923019791]
+Cell[9350, 337, 1832, 69, 111, "Output",
+ CellTags->"OPESumExplicit"]
+}, Open ]]
}, Open ]],
-Cell[9028, 330, 174, 6, 70, "Input",
- CellTags->"OPESumExplicit",
- CellID->363319919]
-}, Open ]],
-Cell[9217, 339, 31, 0, 70, "SectionFooterSpacer"]
+Cell[11209, 410, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9285, 344, 270, 12, 70, "SeeAlsoSection",
+Cell[11277, 415, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9558, 358, 405, 15, 70, "Text",
- CellTags->"OPESumExplicit",
- CellID->1999250698]
+Cell[11550, 429, 358, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[9978, 376, 23, 0, 70, "FooterCell"]
+Cell[11923, 445, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumSimplify.nb
index 1bed45c90..24e69a602 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPESumSimplify.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15450, 549]
-NotebookOptionsPosition[ 10715, 399]
-NotebookOutlinePosition[ 13834, 488]
-CellTagsIndexPosition[ 13716, 482]
+NotebookDataLength[ 17893, 638]
+NotebookOptionsPosition[ 12972, 481]
+NotebookOutlinePosition[ 15992, 568]
+CellTagsIndexPosition[ 15874, 562]
WindowTitle->OPESumSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OPESumSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OPESumSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPESum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPESum"], "\<\"OPESumExplicit\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPESumExplicit"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OPESumSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OPESumSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
OPESumSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$113422],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OPESumSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$197989],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OPESumSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ OPESumSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPESumSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPESumSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -92,6 +127,55 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->240770846],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "OPESumSimplify", "]"}]], "Input",
+ CellLabel->"In[34]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Assumptions", "\[Rule]", "True"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{135, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[34]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,7 +191,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->214949193],
+ CellID->1935570068],
Cell[CellGroupData[{
@@ -117,7 +201,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1016907880],
+ CellID->1016291654],
Cell[CellGroupData[{
@@ -164,7 +248,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "2"}], "-", "i", "+", "m"}]]}]}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{247, 45},
+ ImageSize->{268, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumSimplify",
@@ -242,7 +326,7 @@ Cell[BoxData[
RowBox[{"-", "2"}], "-", "i", "+", "m"}]]}]}],
HoldForm],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{317, 46},
+ ImageSize->{347, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumSimplify",
@@ -273,7 +357,7 @@ Cell[BoxData[
SuperscriptBox["a", "i"],
TraditionalForm]}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{40, 45},
+ ImageSize->{48, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumSimplify",
@@ -321,7 +405,7 @@ Cell[BoxData[
SuperscriptBox["a",
RowBox[{"j", "-", "i"}]]}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{119, 45},
+ ImageSize->{142, 44},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumSimplify",
@@ -349,7 +433,7 @@ Cell[BoxData[
RowBox[{"i", ",", "0", ",", "m"}], "}"}], ",",
RowBox[{"{",
RowBox[{"j", ",", "0", ",", "i"}], "}"}]}], "]"}]], "Output",
- ImageSize->{291, 20},
+ ImageSize->{292, 25},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPESumSimplify",
@@ -390,17 +474,15 @@ Cell[TextData[{
ButtonNote->"OPESumExplicit"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OPESumSimplify",
- CellID->189414120]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"OPESumSimplify",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -409,20 +491,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 7.832950}",
+ "built" -> "{2020, 1, 5, 19, 0, 17.113608}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "OPESumSimplify[exp] simplifies OPESum's in exp.",
- "synonyms" -> {}, "title" -> "OPESumSimplify", "titlemodifier" -> "",
- "windowtitle" -> "OPESumSimplify", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OPESumSimplify"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OPESumSimplify",
+ "titlemodifier" -> "", "windowtitle" -> "OPESumSimplify", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/OPESumSimplify"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -431,7 +514,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -440,117 +523,123 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3322, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5624, 178, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->214949193]},
+ CellID->1935570068]},
"OPESumSimplify"->{
- Cell[3955, 123, 160, 5, 27, "Input",
+ Cell[6258, 207, 160, 5, 27, "Input",
CellTags->"OPESumSimplify",
CellID->301700583],
- Cell[4118, 130, 1157, 41, 66, "Output",
+ Cell[6421, 214, 1157, 41, 65, "Output",
CellTags->"OPESumSimplify",
CellID->843585068],
- Cell[5312, 176, 106, 3, 27, "Input",
+ Cell[7615, 260, 106, 3, 27, "Input",
CellTags->"OPESumSimplify",
CellID->603012719],
- Cell[5421, 181, 1926, 68, 67, "Output",
+ Cell[7724, 265, 1926, 68, 67, "Output",
CellTags->"OPESumSimplify",
CellID->276666428],
- Cell[7384, 254, 290, 9, 27, "Input",
+ Cell[9687, 338, 290, 9, 27, "Input",
CellTags->"OPESumSimplify",
CellID->341981151],
- Cell[7677, 265, 387, 15, 66, "Output",
+ Cell[9980, 349, 387, 15, 65, "Output",
CellTags->"OPESumSimplify",
CellID->956192019],
- Cell[8101, 285, 456, 15, 27, "Input",
+ Cell[10404, 369, 456, 15, 27, "Input",
CellTags->"OPESumSimplify",
CellID->445474412],
- Cell[8560, 302, 658, 26, 66, "Output",
+ Cell[10863, 386, 658, 26, 65, "Output",
CellTags->"OPESumSimplify",
CellID->630874009],
- Cell[9255, 333, 134, 4, 27, "Input",
+ Cell[11558, 417, 134, 4, 27, "Input",
CellTags->"OPESumSimplify",
CellID->1811258609],
- Cell[9392, 339, 509, 17, 54, "Output",
- CellTags->"OPESumSimplify",
- CellID->899717952],
- Cell[10269, 379, 404, 15, 70, "Text",
+ Cell[11695, 423, 509, 17, 61, "Output",
CellTags->"OPESumSimplify",
- CellID->189414120]}
+ CellID->899717952]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12514, 441},
- {"OPESumSimplify", 12654, 445}
+ {"PrimaryExamplesSection", 14760, 524},
+ {"OPESumSimplify", 14902, 528}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3121, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 378, 12, 82, "Usage",
+Cell[3710, 98, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4026, 113, 378, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3322, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4429, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->240770846],
+Cell[5170, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5226, 159, 97, 2, 70, "Input"],
+Cell[5326, 163, 237, 8, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5624, 178, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->214949193],
+ CellID->1935570068],
Cell[CellGroupData[{
-Cell[3734, 113, 196, 6, 25, "ExampleSection",
- CellID->1016907880],
+Cell[6037, 197, 196, 6, 26, "ExampleSection",
+ CellID->1016291654],
Cell[CellGroupData[{
-Cell[3955, 123, 160, 5, 27, "Input",
+Cell[6258, 207, 160, 5, 27, "Input",
CellTags->"OPESumSimplify",
CellID->301700583],
-Cell[4118, 130, 1157, 41, 66, "Output",
+Cell[6421, 214, 1157, 41, 65, "Output",
CellTags->"OPESumSimplify",
CellID->843585068]
}, Open ]],
Cell[CellGroupData[{
-Cell[5312, 176, 106, 3, 27, "Input",
+Cell[7615, 260, 106, 3, 27, "Input",
CellTags->"OPESumSimplify",
CellID->603012719],
-Cell[5421, 181, 1926, 68, 67, "Output",
+Cell[7724, 265, 1926, 68, 67, "Output",
CellTags->"OPESumSimplify",
CellID->276666428]
}, Open ]],
Cell[CellGroupData[{
-Cell[7384, 254, 290, 9, 27, "Input",
+Cell[9687, 338, 290, 9, 27, "Input",
CellTags->"OPESumSimplify",
CellID->341981151],
-Cell[7677, 265, 387, 15, 66, "Output",
+Cell[9980, 349, 387, 15, 65, "Output",
CellTags->"OPESumSimplify",
CellID->956192019]
}, Open ]],
Cell[CellGroupData[{
-Cell[8101, 285, 456, 15, 27, "Input",
+Cell[10404, 369, 456, 15, 27, "Input",
CellTags->"OPESumSimplify",
CellID->445474412],
-Cell[8560, 302, 658, 26, 66, "Output",
+Cell[10863, 386, 658, 26, 65, "Output",
CellTags->"OPESumSimplify",
CellID->630874009]
}, Open ]],
Cell[CellGroupData[{
-Cell[9255, 333, 134, 4, 27, "Input",
+Cell[11558, 417, 134, 4, 27, "Input",
CellTags->"OPESumSimplify",
CellID->1811258609],
-Cell[9392, 339, 509, 17, 54, "Output",
+Cell[11695, 423, 509, 17, 61, "Output",
CellTags->"OPESumSimplify",
CellID->899717952]
}, Open ]]
}, Open ]],
-Cell[9928, 360, 31, 0, 70, "SectionFooterSpacer"]
+Cell[12231, 444, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9996, 365, 270, 12, 70, "SeeAlsoSection",
+Cell[12299, 449, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10269, 379, 404, 15, 70, "Text",
- CellTags->"OPESumSimplify",
- CellID->189414120]
+Cell[12572, 463, 358, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[10688, 397, 23, 0, 70, "FooterCell"]
+Cell[12945, 479, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEi.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEi.nb
index 5a237b986..482cf5bd1 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEi.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OPEi.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14758, 532]
-NotebookOptionsPosition[ 10013, 372]
-NotebookOutlinePosition[ 13214, 468]
-CellTagsIndexPosition[ 13106, 462]
+NotebookDataLength[ 14455, 518]
+NotebookOptionsPosition[ 10113, 375]
+NotebookOutlinePosition[ 13087, 463]
+CellTagsIndexPosition[ 12979, 457]
WindowTitle->OPEi
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111017],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$194903],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/OPEi",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OPEi", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OPEi", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +118,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->36494890],
+ CellID->463695855],
Cell[CellGroupData[{
@@ -117,7 +128,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1892922609],
+ CellID->35029913],
Cell[CellGroupData[{
@@ -128,12 +139,11 @@ Cell[BoxData["OPEi"], "Input",
Cell[BoxData[
FormBox["i", TraditionalForm]], "Output",
- ImageSize->{9, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEi",
- CellLabel->"Out[1]=",
- CellID->1058262689]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -154,12 +164,11 @@ Cell[BoxData[
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{268, 15},
+ ImageSize->{259, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEi",
- CellLabel->"Out[2]=",
- CellID->1847732928]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -212,17 +221,14 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1"}],
"}"}], TraditionalForm]], "Output",
- ImageSize->{114, 15},
+ ImageSize->{119, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEi",
- CellLabel->"Out[3]=",
- CellID->1115714619]
+ CellLabel->"Out[3]="]
}, Open ]],
-Cell["Re has been changed:", "Text",
- CellTags->"OPEi",
- CellID->920512070],
+Cell["Re has been changed:", "Notes"],
Cell[CellGroupData[{
@@ -264,12 +270,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Re", "(", "i", ")"}], ">", "1"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{371, 15},
+ ImageSize->{395, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEi",
- CellLabel->"Out[4]=",
- CellID->1830261914]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -310,12 +315,11 @@ Cell[BoxData[
RowBox[{"Re", "(",
RowBox[{"m", "-", "i"}], ")"}], ">", "2"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{295, 15},
+ ImageSize->{314, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEi",
- CellLabel->"Out[5]=",
- CellID->480392578]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -358,12 +362,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Re", "(", "m", ")"}], ">", "1"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{416, 15},
+ ImageSize->{425, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OPEi",
- CellLabel->"Out[6]=",
- CellID->718023073]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -382,10 +385,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 57.805270}",
+ "built" -> "{2020, 1, 5, 19, 0, 9.992171}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -393,10 +396,11 @@ TaggingRules->{
"None", "summary" ->
"OPEi etc. are variables with DataType PositiveInteger which are used in \
functions relating to the operator product expansion.", "synonyms" -> {},
- "title" -> "OPEi", "titlemodifier" -> "", "windowtitle" -> "OPEi", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/OPEi"}, "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "OPEi", "titlemodifier" -> "",
+ "windowtitle" -> "OPEi", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/OPEi"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -405,7 +409,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -414,126 +418,108 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3312, 94, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[3574, 105, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->36494890]},
+ CellID->463695855]},
"OPEi"->{
- Cell[3944, 123, 93, 3, 27, "Input",
+ Cell[4205, 134, 93, 3, 27, "Input",
CellTags->"OPEi",
CellID->1513541744],
- Cell[4040, 128, 205, 7, 36, "Output",
- CellTags->"OPEi",
- CellID->1058262689],
- Cell[4282, 140, 277, 8, 27, "Input",
+ Cell[4301, 139, 185, 6, 35, "Output",
+ CellTags->"OPEi"],
+ Cell[4523, 150, 277, 8, 27, "Input",
CellTags->"OPEi",
CellID->1628297296],
- Cell[4562, 150, 334, 11, 36, "Output",
- CellTags->"OPEi",
- CellID->1847732928],
- Cell[4933, 166, 1093, 41, 45, "Input",
+ Cell[4803, 160, 313, 10, 35, "Output",
+ CellTags->"OPEi"],
+ Cell[5153, 175, 1093, 41, 45, "Input",
CellTags->"OPEi",
CellID->233448399],
- Cell[6029, 209, 308, 10, 36, "Output",
- CellTags->"OPEi",
- CellID->1115714619],
- Cell[6352, 222, 75, 2, 32, "Text",
- CellTags->"OPEi",
- CellID->920512070],
- Cell[6452, 228, 536, 18, 45, "Input",
+ Cell[6249, 218, 287, 9, 35, "Output",
+ CellTags->"OPEi"],
+ Cell[6613, 234, 536, 18, 45, "Input",
CellTags->"OPEi",
CellID->631981450],
- Cell[6991, 248, 635, 23, 36, "Output",
- CellTags->"OPEi",
- CellID->1830261914],
- Cell[7663, 276, 552, 20, 27, "Input",
+ Cell[7152, 254, 614, 22, 37, "Output",
+ CellTags->"OPEi"],
+ Cell[7803, 281, 552, 20, 27, "Input",
CellTags->"OPEi",
CellID->1153963056],
- Cell[8218, 298, 518, 19, 36, "Output",
- CellTags->"OPEi",
- CellID->480392578],
- Cell[8773, 322, 537, 18, 45, "Input",
+ Cell[8358, 303, 498, 18, 37, "Output",
+ CellTags->"OPEi"],
+ Cell[8893, 326, 537, 18, 45, "Input",
CellTags->"OPEi",
CellID->1255237485],
- Cell[9313, 342, 634, 23, 36, "Output",
- CellTags->"OPEi",
- CellID->718023073]}
+ Cell[9433, 346, 614, 22, 37, "Output",
+ CellTags->"OPEi"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11853, 415},
- {"OPEi", 11982, 419}
+ {"PrimaryExamplesSection", 11942, 419},
+ {"OPEi", 12073, 423}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 429, 12, 97, "Usage",
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[3120, 89, 429, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3312, 94, 386, 15, 31, "PrimaryExamplesSection",
+Cell[3574, 105, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->36494890],
+ CellID->463695855],
Cell[CellGroupData[{
-Cell[3723, 113, 196, 6, 25, "ExampleSection",
- CellID->1892922609],
+Cell[3986, 124, 194, 6, 26, "ExampleSection",
+ CellID->35029913],
Cell[CellGroupData[{
-Cell[3944, 123, 93, 3, 27, "Input",
+Cell[4205, 134, 93, 3, 27, "Input",
CellTags->"OPEi",
CellID->1513541744],
-Cell[4040, 128, 205, 7, 36, "Output",
- CellTags->"OPEi",
- CellID->1058262689]
+Cell[4301, 139, 185, 6, 35, "Output",
+ CellTags->"OPEi"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4282, 140, 277, 8, 27, "Input",
+Cell[4523, 150, 277, 8, 27, "Input",
CellTags->"OPEi",
CellID->1628297296],
-Cell[4562, 150, 334, 11, 36, "Output",
- CellTags->"OPEi",
- CellID->1847732928]
+Cell[4803, 160, 313, 10, 35, "Output",
+ CellTags->"OPEi"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4933, 166, 1093, 41, 45, "Input",
+Cell[5153, 175, 1093, 41, 45, "Input",
CellTags->"OPEi",
CellID->233448399],
-Cell[6029, 209, 308, 10, 36, "Output",
- CellTags->"OPEi",
- CellID->1115714619]
+Cell[6249, 218, 287, 9, 35, "Output",
+ CellTags->"OPEi"]
}, Open ]],
-Cell[6352, 222, 75, 2, 32, "Text",
- CellTags->"OPEi",
- CellID->920512070],
+Cell[6551, 230, 37, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6452, 228, 536, 18, 45, "Input",
+Cell[6613, 234, 536, 18, 45, "Input",
CellTags->"OPEi",
CellID->631981450],
-Cell[6991, 248, 635, 23, 36, "Output",
- CellTags->"OPEi",
- CellID->1830261914]
+Cell[7152, 254, 614, 22, 37, "Output",
+ CellTags->"OPEi"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7663, 276, 552, 20, 27, "Input",
+Cell[7803, 281, 552, 20, 27, "Input",
CellTags->"OPEi",
CellID->1153963056],
-Cell[8218, 298, 518, 19, 36, "Output",
- CellTags->"OPEi",
- CellID->480392578]
+Cell[8358, 303, 498, 18, 37, "Output",
+ CellTags->"OPEi"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8773, 322, 537, 18, 45, "Input",
+Cell[8893, 326, 537, 18, 45, "Input",
CellTags->"OPEi",
CellID->1255237485],
-Cell[9313, 342, 634, 23, 36, "Output",
- CellTags->"OPEi",
- CellID->718023073]
+Cell[9433, 346, 614, 22, 37, "Output",
+ CellTags->"OPEi"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[9986, 370, 23, 0, 42, "FooterCell"]
+Cell[10086, 373, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoop.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoop.nb
index aaee3757c..3544b69e2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoop.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoop.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 33669, 1163]
-NotebookOptionsPosition[ 26253, 932]
-NotebookOutlinePosition[ 31194, 1066]
-CellTagsIndexPosition[ 31083, 1060]
+NotebookDataLength[ 22449, 750]
+NotebookOptionsPosition[ 17793, 608]
+NotebookOutlinePosition[ 20828, 690]
+CellTagsIndexPosition[ 20717, 684]
WindowTitle->OneLoop
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OneLoop\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OneLoop"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OneLoop.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"B0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/B0"], "\<\"C0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/C0"], "\<\"D0\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/D0"], "\<\"TID\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TID"], "\<\"TID\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TID"], "\<\"TIDL\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TIDL"], "\<\"$LimitTo4\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/$LimitTo4"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OneLoop\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OneLoop"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/OneLoop.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108961],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OneLoop", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$192259],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OneLoop", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,53 +101,31 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OneLoop", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OneLoop", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"OneLoop", "[",
RowBox[{"q", ",", " ", "amplitude"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]calculates the one-loop Feynman diagram amplitude (",
- StyleBox["n",
- FontSlant->"Italic"],
- "-point, where ",
- StyleBox["n",
- FontSlant->"Italic"],
- "\[LessEqual]4 and the highest tensor rank of the integration momenta \
-(after cancellation of scalar products) may be up to 3; unless \
-OneLoopSimplify is used).\n\nThe argument q denotes the integration variable, \
-i.e., the loop momentum. OneLoop[name, q, amplitude] has as first argument a \
-name of the amplitude. If the second argument has head FeynAmp then \
-OneLoop[q, FeynAmp[name, k, expr]] and OneLoop[FeynAmp[name, k, expr]] \
-tranform to OneLoop[name, k, expr].\n\nNOTICE: While OneLoop is restricted to \
-'t Hooft Feynman gauge, the function ",
- ButtonBox["OneLoopSimplify",
- BaseStyle->"AddOnsLink",
- ButtonData:>"OneLoopSimplify",
- ButtonNote->"OneLoopSimplify"],
- " does not have this restriction (but is usually slower).\n\nWARNING: If \
-you encounter anomalies: The default setting of West is True, i.e., the way ",
-
- Cell[BoxData[
- FormBox[
- RowBox[{" ",
- RowBox[{"tr", "(",
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"],
- SuperscriptBox["\[Gamma]", "\[Nu]"],
- SuperscriptBox["\[Gamma]", "\[Rho]"],
- SuperscriptBox["\[Gamma]", "\[Sigma]"],
- SuperscriptBox["\[Gamma]", "\[Tau]"],
- SuperscriptBox["\[Gamma]", "\[Lambda]"],
- SuperscriptBox["\[Gamma]", "5"]}], ")"}]}], TraditionalForm]]],
- " is calculated in D dimensions has changed compared to the old FeynCalc \
-version. Please keep in mind that the issue of ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "schemes is inherintly tricky."
+ " \[LineSeparator]calculates the one-loop Feynman diagram amplitude. The \
+argument q denotes the integration variable, i.e., the loop momentum. \
+OneLoop[name, q, amplitude] has as first argument a name of the amplitude. If \
+the second argument has head FeynAmp then OneLoop[q, FeynAmp[name, k, expr]] \
+and OneLoop[FeynAmp[name, k, expr]] tranform to OneLoop[name, k, expr]."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -130,51 +136,56 @@ version. Please keep in mind that the issue of ",
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->23066227],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->170033547],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->859974825],
+Cell["OneLoop is deprecated, please use TID instead!", "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "OneLoop", "]"}]], "Input",
CellTags->"OneLoop",
- CellLabel->"In[1]:=",
+ CellLabel->"In[41]:=",
CellID->183705859],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- RowBox[{"DenominatorOrder", "\[Rule]", "False"}], ",",
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
RowBox[{"FinalSubstitutions", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
RowBox[{"FormatType", "\[Rule]", "InputForm"}], ",",
RowBox[{"InitialSubstitutions", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
@@ -183,6 +194,7 @@ Cell[BoxData[
RowBox[{"IsolateNames", "\[Rule]", "False"}], ",",
RowBox[{"Mandelstam", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
+ RowBox[{"NPointTo4Point", "\[Rule]", "True"}], ",",
RowBox[{"OneLoopSimplify", "\[Rule]", "False"}], ",",
RowBox[{"PaVeAutoOrder", "\[Rule]", "True"}], ",",
RowBox[{"PaVeAutoReduce", "\[Rule]", "True"}], ",",
@@ -192,29 +204,58 @@ Cell[BoxData[
RowBox[{"SmallVariables", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"WriteOut", "\[Rule]", "False"}], ",",
- RowBox[{"WriteOutPaVe", "\[Rule]", "False"}], ",",
- RowBox[{"Sum", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{474, 130},
+ RowBox[{"WriteOutPaVe", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{544, 108},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoop",
- CellLabel->"Out[1]=",
- CellID->353873485]
+ CellLabel->"Out[41]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->479073918],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->757238189],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"-", "I"}], "/",
- RowBox[{"Pi", "^", "2"}]}], " ",
- RowBox[{"FAD", "[",
- RowBox[{"{",
- RowBox[{"q", ",", "m"}], "}"}], "]"}]}], "//", "FCI"}]], "Input",
+ RowBox[{"-", "I"}], "/",
+ RowBox[{"Pi", "^", "2"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}]}]], "Input",
CellTags->"OneLoop",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1162504480],
Cell[BoxData[
@@ -224,17 +265,25 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["\[Pi]", "2"], " ",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{110, 49},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{104, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoop",
- CellLabel->"Out[2]=",
- CellID->155772215]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,7 +292,7 @@ Cell[BoxData[
RowBox[{"OneLoop", "[",
RowBox[{"q", ",", "%"}], "]"}]], "Input",
CellTags->"OneLoop",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1041679425],
Cell[BoxData[
@@ -255,84 +304,43 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{58, 21},
+ ImageSize->{59, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoop",
- CellLabel->"Out[3]=",
- CellID->987393919]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"mf", "/:",
- RowBox[{"MakeBoxes", "[",
- RowBox[{"mf", ",", "TraditionalForm"}], "]"}], "=",
- RowBox[{"InterpretationBox", "[",
- RowBox[{
- RowBox[{"SubscriptBox", "[",
- RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", "mf"}], "]"}]}],
- ";"}]], "Input",
- CellTags->"OneLoop",
- CellLabel->"In[4]:=",
- CellID->1188939388],
-
-Cell[TextData[{
- "Remember that FAD[{q,mf},{q-k,mf}] is a fast possibility to enter ",
- Cell[BoxData[
- FormBox[
- RowBox[{"1", "/",
- RowBox[{
- RowBox[{"(", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["q", "2"], "-",
- SuperscriptBox["mf", "2"]}], ")"}], " ",
- RowBox[{"(", " ",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "k"}], ")"}], "2"], "-",
- SuperscriptBox["mf", "2"]}], ")"}]}], " ", ")"}], "."}]}],
- TraditionalForm]]]
-}], "Text",
- CellTags->"OneLoop",
- CellID->878853717],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{
- RowBox[{"I", " ",
- FractionBox[
- SuperscriptBox["el", "2"],
- RowBox[{"16", " ",
- SuperscriptBox["Pi", "4"],
- RowBox[{"(",
- RowBox[{"1", "-", "D"}], ")"}]}]],
- RowBox[{"FAD", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"q", ",", "mf"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"q", "-", "k"}], ",", "mf"}], "}"}]}], "]"}],
- RowBox[{"DiracTrace", "[",
+ RowBox[{"I", " ",
+ FractionBox[
+ SuperscriptBox["el", "2"],
+ RowBox[{"16", " ",
+ SuperscriptBox["Pi", "4"],
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]],
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "mf"}], "}"}], ",",
+ RowBox[{"{",
RowBox[{
- RowBox[{"(",
- RowBox[{"mf", "+",
- RowBox[{"GS", "[",
- RowBox[{"q", "-", "k"}], "]"}]}], ")"}], ".",
- RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
- RowBox[{"(",
- RowBox[{"mf", "+",
- RowBox[{"GS", "[", "q", "]"}]}], ")"}], ".",
- RowBox[{"GA", "[", "\[Mu]", "]"}]}], "]"}]}], " ", "//", " ",
- "FCI"}]}]], "Input",
+ RowBox[{"q", "-", "k"}], ",", "mf"}], "}"}]}], "]"}],
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"mf", "+",
+ RowBox[{"GSD", "[",
+ RowBox[{"q", "-", "k"}], "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"mf", "+",
+ RowBox[{"GSD", "[", "q", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " "}]], "Input",
CellTags->"OneLoop",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->257997891],
Cell[BoxData[
@@ -345,46 +353,41 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
FormBox[
- RowBox[{
- OverscriptBox[
+ FormBox[
+ RowBox[{
FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
+ TraditionalForm], "-",
FormBox["k",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}], "+",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "mf"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
RowBox[{"(",
- RowBox[{
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
+ RowBox[{"mf", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
TraditionalForm], ")"}]}],
RowBox[{"16", " ",
SuperscriptBox["\[Pi]", "4"], " ",
@@ -392,54 +395,59 @@ Cell[BoxData[
RowBox[{"1", "-", "D"}], ")"}], " ",
RowBox[{
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}], ")"}], ".",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["mf", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`mf^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["k",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}], ")"}]}]}]],
- TraditionalForm]], "Output",
- ImageSize->{312, 57},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["mf", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`k + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`k + $CellContext`q, D]],
+ "-", $CellContext`mf^2],
+ Editable->False], ")"}]}]}]], TraditionalForm]], "Output",
+ ImageSize->{312, 47},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoop",
- CellLabel->"Out[5]=",
- CellID->1705341778]
+ CellLabel->"Out[3]="]
}, Open ]],
-Cell["\<\
-The input to OneLoop may be in 4 dimensions, since the function changes the \
-dimension of the objects automatically to the setting of the Dimension option \
-(D by default).\
-\>", "Text",
- CellTags->"OneLoop",
- CellID->1557552127],
-
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"OneLoop", "[",
- RowBox[{"q", ",", "t"}], "]"}]], "Input",
- CellTags->"OneLoop",
- CellLabel->"In[6]:=",
- CellID->1098604939],
+ RowBox[{"q", ",", "%"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
@@ -451,415 +459,85 @@ Cell[BoxData[
SuperscriptBox["el", "2"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FractionBox["8", "3"], " ",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"], " ",
- FormBox[
- TagBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"8", " ",
+ SuperscriptBox["mf", "2"], " ",
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"], ",",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"], ",",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "+",
- RowBox[{
- FractionBox["4", "3"], " ",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"], ",",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"], ",",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-",
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["mf", "2"], ",",
+ SuperscriptBox["mf", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]]}], "+",
FractionBox[
- RowBox[{"4", " ",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
SuperscriptBox[
FormBox[
OverscriptBox[
FormBox["k",
TraditionalForm], "_"],
- TraditionalForm], "2"]}], "9"], "-",
- RowBox[{
- FractionBox["8", "3"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "+",
- FractionBox[
- RowBox[{"8", " ",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}], "3"]}], ")"}]}]}],
- TraditionalForm]], "Output",
- ImageSize->{468, 112},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"OneLoop",
- CellLabel->"Out[6]=",
- CellID->644858930]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"FullSimplify", "[", "%", "]"}]], "Input",
- CellTags->"OneLoop",
- CellLabel->"In[7]:=",
- CellID->67502148],
-
-Cell[BoxData[
- FormBox[
- FractionBox[
- RowBox[{
- SuperscriptBox["el", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
+ TraditionalForm], "2"], " ",
+ FormBox[
+ TagBox[
FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"], "+",
- RowBox[{"2", " ",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}]}], ")"}], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"], ",",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"], ",",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"], "-",
- RowBox[{"6", " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "+",
- RowBox[{"6", " ",
- SuperscriptBox[
- RowBox[{"(",
- InterpretationBox[
- SubscriptBox["m", "f"],
- $CellContext`mf], ")"}], "2"]}]}], ")"}]}],
- RowBox[{"36", " ",
- SuperscriptBox["\[Pi]", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{497, 52},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"OneLoop",
- CellLabel->"Out[7]=",
- CellID->976659518]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{"k", ",", "r"}], "]"}], " ",
- RowBox[{"FAD", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"k", ",", "m"}], "}"}], " ", ",", " ",
- RowBox[{"k", " ", "-", " ", "p"}]}], "]"}]}], "//", "FCI"}]], "Input",
- CellTags->"OneLoop",
- CellLabel->"In[8]:=",
- CellID->784091824],
-
-Cell[BoxData[
- FormBox[
- FractionBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}],
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{134, 54},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"OneLoop",
- CellLabel->"Out[8]=",
- CellID->998928272]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"OneLoop", "[",
- RowBox[{"k", ",", "%"}], "]"}]], "Input",
- CellTags->"OneLoop",
- CellLabel->"In[9]:=",
- CellID->128259577],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Pi]", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["mf", "2"], ",",
+ SuperscriptBox["mf", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]], "+",
FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
+ RowBox[{"4", " ", "D", " ",
FormBox[
TagBox[
FormBox[
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["mf", "2"], ")"}],
TraditionalForm],
HoldForm],
TraditionalForm]}],
- RowBox[{"2", " ",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"]}]]}], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], ",", "0", ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- RowBox[{"2", " ",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"]}]], "+",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], ",", "0", ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
- SuperscriptBox[
+ RowBox[{"1", "-", "D"}]], "-",
+ FractionBox[
+ RowBox[{"8", " ",
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"]}]]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{478, 113},
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["mf", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{456, 101},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"OneLoop",
- CellLabel->"Out[9]=",
- CellID->326586043]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[", "t", "]"}]], "Input",
- CellTags->"OneLoop",
- CellLabel->"In[10]:=",
- CellID->1779805039]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -900,10 +578,10 @@ Cell[TextData[{
ButtonNote->"D0"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["OneLoopSimplify",
+ StyleBox[ButtonBox["TID",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/OneLoopSimplify",
- ButtonNote->"OneLoopSimplify"],
+ ButtonData->"paclet:FeynCalc/ref/TID",
+ ButtonNote->"TID"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["TID",
@@ -923,9 +601,7 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/$LimitTo4",
ButtonNote->"$LimitTo4"],
FontFamily->"Verdana"]
-}], "Text",
- CellTags->"OneLoop",
- CellID->1073109549]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -933,7 +609,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"OneLoop",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -942,35 +618,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 48.682794}",
+ "built" -> "{2020, 1, 5, 19, 0, 3.482634}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "OneLoop[q, amplitude] calculates the one-loop Feynman diagram amplitude \
-(n-point, where n<=4 and the highest tensor rank of the integration momenta \
-(after cancellation of scalar products) may be up to 3; unless \
-OneLoopSimplify is used). The argument q denotes the integration variable, \
-i.e., the loop momentum. OneLoop[name, q, amplitude] has as first argument a \
-name of the amplitude. If the second argument has head FeynAmp then \
-OneLoop[q, FeynAmp[name, k, expr]] and OneLoop[FeynAmp[name, k, expr]] \
-tranform to OneLoop[name, k, expr]. NOTICE: While OneLoop is restricted to 't \
-Hooft Feynman gauge, the function OneLoopSimplify does not have this \
-restriction (but is usually slower). WARNING: If you encounter anomalies: The \
-default setting of West is True, i.e., the way tr(\\[Gamma]^\\[Mu] \\[Gamma]^\
-\\[Nu] \\[Gamma]^\\[Rho] \\[Gamma]^\\[Sigma] \\ \\[Gamma]^\\[Tau] \
-\\[Gamma]^\\[Lambda] \\[Gamma]^5) is calculated in D dimensions has changed \
-compared to the old FeynCalc version. Please keep in mind that the issue of \
-\\[Gamma]^5schemes is inherintly tricky.", "synonyms" -> {}, "title" ->
- "OneLoop", "titlemodifier" -> "", "windowtitle" -> "OneLoop", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/OneLoop"}, "SearchTextTranslated" ->
- ""},
+ "OneLoop[q, amplitude] calculates the one-loop Feynman diagram amplitude. \
+The argument q denotes the integration variable, i.e., the loop momentum. \
+OneLoop[name, q, amplitude] has as first argument a name of the amplitude. If \
+the second argument has head FeynAmp then OneLoop[q, FeynAmp[name, k, expr]] \
+and OneLoop[FeynAmp[name, k, expr]] tranform to OneLoop[name, k, expr].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OneLoop",
+ "titlemodifier" -> "", "windowtitle" -> "OneLoop", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/OneLoop"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -978,8 +644,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -987,184 +654,104 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[5046, 132, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->23066227]},
"OneLoop"->{
- Cell[5677, 161, 131, 4, 27, "Input",
+ Cell[5985, 171, 132, 4, 70, "Input",
CellTags->"OneLoop",
CellID->183705859],
- Cell[5811, 167, 1447, 34, 151, "Output",
- CellTags->"OneLoop",
- CellID->353873485],
- Cell[7295, 206, 293, 11, 27, "Input",
+ Cell[6120, 177, 1502, 35, 129, "Output",
+ CellTags->"OneLoop"],
+ Cell[8315, 248, 261, 10, 27, "Input",
CellTags->"OneLoop",
CellID->1162504480],
- Cell[7591, 219, 472, 17, 70, "Output",
- CellTags->"OneLoop",
- CellID->155772215],
- Cell[8100, 241, 149, 5, 27, "Input",
+ Cell[8579, 260, 778, 25, 63, "Output",
+ CellTags->"OneLoop"],
+ Cell[9394, 290, 149, 5, 27, "Input",
CellTags->"OneLoop",
CellID->1041679425],
- Cell[8252, 248, 364, 14, 42, "Output",
- CellTags->"OneLoop",
- CellID->987393919],
- Cell[8631, 265, 381, 12, 45, "Input",
- CellTags->"OneLoop",
- CellID->1188939388],
- Cell[9015, 279, 608, 21, 51, "Text",
- CellTags->"OneLoop",
- CellID->878853717],
- Cell[9648, 304, 925, 31, 75, "Input",
+ Cell[9546, 297, 344, 13, 42, "Output",
+ CellTags->"OneLoop"],
+ Cell[9927, 315, 822, 28, 78, "Input",
CellTags->"OneLoop",
CellID->257997891],
- Cell[10576, 337, 2440, 86, 78, "Output",
- CellTags->"OneLoop",
- CellID->1705341778],
- Cell[13031, 426, 240, 6, 52, "Text",
- CellTags->"OneLoop",
- CellID->1557552127],
- Cell[13296, 436, 149, 5, 27, "Input",
- CellTags->"OneLoop",
- CellID->1098604939],
- Cell[13448, 443, 3235, 111, 133, "Output",
- CellTags->"OneLoop",
- CellID->644858930],
- Cell[16720, 559, 129, 4, 27, "Input",
- CellTags->"OneLoop",
- CellID->67502148],
- Cell[16852, 565, 2335, 80, 73, "Output",
- CellTags->"OneLoop",
- CellID->976659518],
- Cell[19224, 650, 350, 12, 27, "Input",
- CellTags->"OneLoop",
- CellID->784091824],
- Cell[19577, 664, 849, 35, 75, "Output",
- CellTags->"OneLoop",
- CellID->998928272],
- Cell[20463, 704, 148, 5, 27, "Input",
- CellTags->"OneLoop",
- CellID->128259577],
- Cell[20614, 711, 3983, 143, 134, "Output",
- CellTags->"OneLoop",
- CellID->326586043],
- Cell[24612, 857, 125, 4, 27, "Input",
- CellTags->"OneLoop",
- CellID->1779805039],
- Cell[25093, 883, 1118, 44, 32, "Text",
- CellTags->"OneLoop",
- CellID->1073109549]}
+ Cell[10752, 345, 2868, 96, 68, "Output",
+ CellTags->"OneLoop"]},
+ "PrimaryExamplesSection"->{
+ Cell[7683, 219, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->479073918]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 29071, 989},
- {"OneLoop", 29204, 993}
+ {"OneLoop", 19928, 656},
+ {"PrimaryExamplesSection", 20574, 677}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3452, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 2145, 50, 367, "Usage",
- CellID->982511436],
+Cell[4034, 103, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[5046, 132, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->23066227],
+Cell[4343, 118, 733, 16, 136, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[5457, 151, 195, 6, 25, "ExampleSection",
- CellID->859974825],
+Cell[5101, 138, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->170033547],
+Cell[5842, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5876, 166, 84, 1, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[5677, 161, 131, 4, 27, "Input",
+Cell[5985, 171, 132, 4, 70, "Input",
CellTags->"OneLoop",
CellID->183705859],
-Cell[5811, 167, 1447, 34, 151, "Output",
- CellTags->"OneLoop",
- CellID->353873485]
+Cell[6120, 177, 1502, 35, 129, "Output",
+ CellTags->"OneLoop"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[7295, 206, 293, 11, 27, "Input",
+Cell[7683, 219, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->479073918],
+Cell[CellGroupData[{
+Cell[8095, 238, 195, 6, 26, "ExampleSection",
+ CellID->757238189],
+Cell[CellGroupData[{
+Cell[8315, 248, 261, 10, 27, "Input",
CellTags->"OneLoop",
CellID->1162504480],
-Cell[7591, 219, 472, 17, 70, "Output",
- CellTags->"OneLoop",
- CellID->155772215]
+Cell[8579, 260, 778, 25, 63, "Output",
+ CellTags->"OneLoop"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8100, 241, 149, 5, 27, "Input",
+Cell[9394, 290, 149, 5, 27, "Input",
CellTags->"OneLoop",
CellID->1041679425],
-Cell[8252, 248, 364, 14, 42, "Output",
- CellTags->"OneLoop",
- CellID->987393919]
+Cell[9546, 297, 344, 13, 42, "Output",
+ CellTags->"OneLoop"]
}, Open ]],
-Cell[8631, 265, 381, 12, 45, "Input",
- CellTags->"OneLoop",
- CellID->1188939388],
-Cell[9015, 279, 608, 21, 51, "Text",
- CellTags->"OneLoop",
- CellID->878853717],
Cell[CellGroupData[{
-Cell[9648, 304, 925, 31, 75, "Input",
+Cell[9927, 315, 822, 28, 78, "Input",
CellTags->"OneLoop",
CellID->257997891],
-Cell[10576, 337, 2440, 86, 78, "Output",
- CellTags->"OneLoop",
- CellID->1705341778]
+Cell[10752, 345, 2868, 96, 68, "Output",
+ CellTags->"OneLoop"]
}, Open ]],
-Cell[13031, 426, 240, 6, 52, "Text",
- CellTags->"OneLoop",
- CellID->1557552127],
Cell[CellGroupData[{
-Cell[13296, 436, 149, 5, 27, "Input",
- CellTags->"OneLoop",
- CellID->1098604939],
-Cell[13448, 443, 3235, 111, 133, "Output",
- CellTags->"OneLoop",
- CellID->644858930]
+Cell[13657, 446, 106, 3, 27, "Input"],
+Cell[13766, 451, 2575, 87, 122, "Output"]
+}, Open ]]
}, Open ]],
-Cell[CellGroupData[{
-Cell[16720, 559, 129, 4, 27, "Input",
- CellTags->"OneLoop",
- CellID->67502148],
-Cell[16852, 565, 2335, 80, 73, "Output",
- CellTags->"OneLoop",
- CellID->976659518]
+Cell[16368, 542, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19224, 650, 350, 12, 27, "Input",
- CellTags->"OneLoop",
- CellID->784091824],
-Cell[19577, 664, 849, 35, 75, "Output",
- CellTags->"OneLoop",
- CellID->998928272]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[20463, 704, 148, 5, 27, "Input",
- CellTags->"OneLoop",
- CellID->128259577],
-Cell[20614, 711, 3983, 143, 134, "Output",
- CellTags->"OneLoop",
- CellID->326586043]
-}, Open ]],
-Cell[24612, 857, 125, 4, 27, "Input",
- CellTags->"OneLoop",
- CellID->1779805039]
-}, Open ]],
-Cell[24752, 864, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[24820, 869, 270, 12, 31, "SeeAlsoSection",
+Cell[16436, 547, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[25093, 883, 1118, 44, 32, "Text",
- CellTags->"OneLoop",
- CellID->1073109549]
+Cell[16709, 561, 1042, 42, 57, "SeeAlso"]
}, Open ]],
-Cell[26226, 930, 23, 0, 42, "FooterCell"]
+Cell[17766, 606, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSimplify.nb
index e80bd38d6..e394d5566 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSimplify.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 49233, 1343]
-NotebookOptionsPosition[ 42732, 1141]
-NotebookOutlinePosition[ 46895, 1258]
-CellTagsIndexPosition[ 46738, 1251]
+NotebookDataLength[ 54839, 1510]
+NotebookOptionsPosition[ 48519, 1318]
+NotebookOutlinePosition[ 52446, 1426]
+CellTagsIndexPosition[ 52289, 1419]
WindowTitle->OneLoopSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OneLoopSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OneLoopSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TID\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TID"], "\<\"TIDL\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TIDL"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OneLoopSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OneLoopSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
OneLoopSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$109312],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OneLoopSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$192703],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OneLoopSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ OneLoopSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OneLoopSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OneLoopSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -94,72 +130,107 @@ integration momentum."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->2095467611],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1580551472],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1251915012],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "OneLoopSimplify", "]"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[1]:=",
+ CellLabel->"In[15]:=",
CellID->408969695],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- RowBox[{"Collecting", "\[Rule]", "False"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"DimensionalReduction", "\[Rule]", "False"}], ",",
RowBox[{"DiracSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Automatic"}], ",",
RowBox[{"FinalSubstitutions", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
- RowBox[{"IntegralTable", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
RowBox[{"OPE1Loop", "\[Rule]", "False"}], ",",
- RowBox[{"ApartFF", "\[Rule]", "True"}], ",",
+ RowBox[{"PowerSimplify", "\[Rule]", "True"}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "True"}], ",",
- RowBox[{"SUNTrace", "\[Rule]", "False"}]}], "}"}],
+ RowBox[{"SUNTrace", "\[Rule]", "False"}], ",",
+ RowBox[{"ToPaVe", "\[Rule]", "False"}], ",",
+ RowBox[{"UsePaVeBasis", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{522, 54},
+ ImageSize->{554, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoopSimplify",
- CellLabel->"Out[1]=",
- CellID->1003429626]
+ CellLabel->"Out[15]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1405242556],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1353084621],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{
- RowBox[{"SP", "[",
+ RowBox[{"SPD", "[",
RowBox[{"k", ",", "r"}], "]"}], " ",
RowBox[{"FAD", "[",
RowBox[{
@@ -167,7 +238,7 @@ Cell[BoxData[
RowBox[{"k", ",", "m"}], "}"}], " ", ",", " ",
RowBox[{"k", " ", "-", " ", "p"}]}], "]"}]}], "//", "FCI"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->2051602371],
Cell[BoxData[
@@ -175,37 +246,59 @@ Cell[BoxData[
FractionBox[
RowBox[{
FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
+ FormBox["k",
+ TraditionalForm],
TraditionalForm],
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
+ FormBox["r",
+ TraditionalForm],
TraditionalForm]}],
RowBox[{
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{134, 54},
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{144, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoopSimplify",
- CellLabel->"Out[2]=",
- CellID->180261333]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -214,84 +307,121 @@ Cell[BoxData[
RowBox[{"OneLoopSimplify", "[",
RowBox[{"%", ",", "k"}], "]"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1712188386],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"2", " ",
+ SuperscriptBox[
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
- SuperscriptBox[
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"2", " ",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{284, 52},
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{299, 47},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoopSimplify",
- CellLabel->"Out[3]=",
- CellID->1287447332]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -302,7 +432,7 @@ Cell[BoxData[
RowBox[{"%", "/.",
RowBox[{"m", "\[Rule]", "0"}]}], ",", "k"}], "]"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->2028218956],
Cell[BoxData[
@@ -321,22 +451,45 @@ Cell[BoxData[
TraditionalForm]}],
RowBox[{"2", " ",
RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], TraditionalForm]], "Output",
- ImageSize->{95, 44},
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]}]}]], TraditionalForm]], "Output",
+ ImageSize->{111, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoopSimplify",
- CellLabel->"Out[4]=",
- CellID->2099456974]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -353,62 +506,94 @@ Cell[BoxData[
RowBox[{"FVD", "[",
RowBox[{"k", ",", "\[Mu]"}], "]"}]}], "//", "FCI"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1056142741],
Cell[BoxData[
FormBox[
FractionBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["k",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "2"], ".",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ RowBox[{
SuperscriptBox[
RowBox[{"(",
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["k",
TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ")"}], "2"], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{177, 50},
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{199, 45},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoopSimplify",
- CellLabel->"Out[5]=",
- CellID->1341686868]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -417,292 +602,265 @@ Cell[BoxData[
RowBox[{"OneLoopSimplify", "[", " ",
RowBox[{"%", ",", "k"}], "]"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->971533335],
Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
-1:eJzt3Q1UVNXeP/Bu93+7rbu8q+4y5EUxRBAEVDBkTBSUFEUlV74ufNK63h4N
-yvuYb2mWpRRgrfLlUtxutjC9eS9qVkJhoUChpJghCCgYarw48jbMjA7M2zn8
-BzJkZs7MnH1e5s3vZ63nWd7g/Pb+7T1ns885e84eseL/5q+8/7777lv3oOH/
-zf/ry9PWrv3r5gX/z/A/4jav/98Vvzf8o8Pwf3W/u+++3n/3AAAAOAn61oV/
-rHp203u7Xl36v1m1XY6uDgDAPer2+f+bs/ViVw/V+sWUoCVnlIIEpWUFcyP/
-XqG68681vf+yEwcWDQAgAO3V3ZEhL1wQZuzqqt4UOePLVqqnp7tmS1T8sVZa
-kLBOXjQAAG+aXw7+b+KGvBadINGom0fiIjdXdxvmp2258VFbaroFCStc0bqb
-X+/IvKB0loGaVpzflX5MqnV0PQDAwXQ3j2/f8NGFW5RQAW+fXxme8G2HYbC7
-/VPK+DkFMvsNe2yK1klzFke9WKpwlsG496ZK4YrwxP1NwvwxBACXRHWeSlu9
-r653CkmpW9VCjMi6ho8mBCwuVRqGvaNL/Mel16kFCCpc0cqzKWET91x1rpmo
-ui49InjVD04zXQcAvrQtJ/dumhUaGHfgWnPRB68+94T/6KTPpJbnXOq6tHFD
-Rj0mMYgaL/kfxqd4pDEVpxePDJoSHTfzyaSVieMWlcjtl47toun244n+ko8b
-TGKQFiR4zbVXd0f4zeub1QOAe6BavpjsFbwhOy0jt0Gjbzka7T/3lMKeMTVX
-MiST95oOd85StLxk4aMhWy+Z307m1m7atnOF5zsYCyQM2FW1IchvSSnfrgIA
-p3H7xxV+HpHL08vkVN+VuyT0+XJVD6WsyHlrWXjQrO+5zFSZYzKvVaY7vpk9
-PqVcqIVlJOmwKFpz5e0wrylftZtPQTm1W3f1psCHgpgGd7JG6+l76jjZe+x7
-9RqWDQMATk5Tv3PsoEcS+tZ49V2Wj4o/1vrr3eDOoql+U4s5jMaWYvJYq6w8
-mzT8T38c6M/B6y+af/lE6HS6Kl8K8J5VYj4D5VgQrW5rkjNOjYkbTXFq7tDA
-dQxtAACuiG7Pn+7hs7i4s3fyR7XmzgtbmN9+59GcvJjbaGwtZh8Oa5VpdWvD
-9WsDXW/q0JrNWAVPR12bGuIVk282Nxa8IPJGkxVM8w5Ns+MjTwAQk6o8ZYTn
-9Lw2wxhAyYrXSWa/X99/enMdja3F7BF6rTL7orkNkh0FCcNCt182HfMEL4i4
-0TRXdozxnXPCjqsBAUBE2utZEYMe9I1f9crWzauXv5B5plN/94ccR2OrMQVf
-q8y+aG7p6KU5scMnHWjWG/1XwQsibjRKeijWb9phqd4sFAC4IFp2YraX7zIL
-d3C5DV9WYoqwVplt0T2c/7hQ7fkLAqfsM/qmheAFETea/sbBuOBFx9vF+asG
-APbWVbk2wHsG04oBSlmVl5Xs//DIlKy8KiXJOW85Jpu1yryIkY5Bd21G9IRt
-1QPWQQheEGmjddekSmLewT1jAHeha8yOGhad3SjkHVwxYjq6aFpVvSc59Vz/
-V6MFL4gwIK0o256cWYO3zQG4D1qnE/whkBgxna1owQtyYKMBAAAAAAAAAAAA
-ADgnWvHT7jf/WW+/rQbA7d0HAEwqKyutnTn6Gwclw+O4vBgFgJkMAJjo9Va/
-OYjRGEiwfZMYALDWf1r94f7f3f8ATitgheWbxACAvTunVf3Z3eE+k/5bidMK
-AMCRcKcCAMAZUB3Fa5995eJtR9cDAAAAAAAAAAAAAADAjKXt2u1zuDOwWwpi
-FOQG7c/HPZ4+uBkee9wLcLgzYJOC9uaJI0WtPN/1LkZbuUH788GQPqW8+PmX
-tbexdhhcF4c97gU83BlYToFqy1vy2F+/kwt0hovRVm7Q/nwMTF9dl/F4zO6r
-GkfXCYCRvrPsky2JYcPHrC5nXltpfY97nof3bkH89Y7MC8r+0cxmQFHQivO7
-0o9JtYw/tJJCd83rEWM2Vgp0HWyrrRwS07SDnA5J3+ma9sWOfrpQ5rzZgDuj
-lBX/Wv3U0nVvvLYmKWn7dzKGV6XcKlvu6zW7gOkjymaPez6H66Q5i6NeLFUY
-HWsloGhoWeGK8MT9TWaDlrUUaHnJspFhWy8J8tpFNk1t/5iMHeRkSPpOL82J
-9Ys90OyAnRLhnqeqWD3Sa/p/bhgGYU39zqjxr5kPHeraN0M8oj5pMhun2e1x
-z+dw5dmUsIl7rhpPaywGFJe6Lj0ieNUPRpNA6ykYRoH5vqPWCjEzZtfU9o/J
-2EHOh6DvDLPjKO8JH/6C4RjsTi8/f+TwpVu9H1O69djkETO/N/3mvb7504lD
-Rm+7rKZVdTnr44N9xq+rvHOTjc0e9zwOp9uPJ/pLPm7QsQtISttycu+mWaGB
-cQeuNRd98OpzT/iPTvpMavks1F7dHeE379uOu6e0jRSUZ572HbqgRMG/aDZN
-LUZMG5g7iHuVbOIckKDvui+9Hjxk0sEbdv5jDzCQ8oeVIZJ3fzZ9hNFZ9KTP
-8GfO3Php17L5KRkfZh88fpnkypbH4fKShY+GmF3n86zPQFTLF5O9gjdkp2Xk
-Nmj0LUej/eeeYhg7f9NVtSHIb0mpld8woq57K+SR8RZmWYRFsyJGTKuYO4h/
-lbRt5wrPdwjabgR9J/9urqfPwtJ7bY0JOA9927cb45dmVpkt71FdWO0/5PGM
-7aveLGzjMF3gcbjmytthXlO+ajeuEc/6GLn94wo/j8jl6WVyw3Cua/hIEvp8
-uar3TnrOW8vCg2aZXibQbbmTvce+V8/ykbvi9DzPIQlm1xqciuaRjngLa5k7
-iEWVbKTZXb0p8KEg5lGea44Efddds2XU4Mf2WpzxA4ip9xbaMxuPNjB8VA2X
-eOM8/J+WeA5dVNRJ/qiGz+FdlS8FeM8yudBnE5Dta/Y19TvHDnok4cvW3ql1
-71X3qPhjrb9OszuLpvpNNXtdouLU3KGB69i+WVxWEDPYZ+nZW0w/Iy6aBUsx
-ua4rttmMjB0kRJq0uq1JzjgYcs+Rfd9p6t8dMzg0vU5t+1cBhEUpyna+mFrA
-/P0EquXzWM9RL5eeePZRr4SjLYbJKK0juC3A63B1bWqIV0y+0dSLVUCWr9mn
-2/One/gsLu4b1KnW3HlhC/Pb7wSTFzONFbKCad6haWxPU/n3Mz08nzzNNFiR
-F22btZh9SNcV22xGpg5iXSVOafLIkX3fqS9vGz04/B/XnP3RJLgdbeO+BTGv
-lyt1vbSdV4puGn1elaVJvsOWnFaoKtYH/mVs2iX5z/u35N+0dodA03hox6FG
-jQCH0x0FCcNCt18eWCHygJapylNGeE7PazOc2ZSseJ1k9vv1/UUxjhWaKzvG
-+M45wXZlXdfF9QGDo/7dzFA74qJ5ptMjylplpg5iXSVOaXLPkaDvlKULvT3i
-T8rIqgbAl6pijf8Dd/fJ/b3nU0ZPL7ovvREZOv/rNqqH6ihcE+03OiF5/1Xr
-0wvVhbUzXrozOeF5eO/az+GTDgwYzjgEtEh7PSti0IO+8ate2bp59fIXMs90
-Dhg2mcYKSnoo1m/aYSnbsZ/u+Gamp+8z58xvVRAXzTcdMdYq9zB1EPsqcUmT
-e44EfaeuSwsZzP7pAMC9gWrPXxA4ZZ/5sn0B0LITs718l1m4jcowVuhvHIwL
-XnS8nf2Ipm/+dJInw9UxcdEsWIkpxlrl30Jb6yDB0+SeI0HfUS2fTRkSuLEK
-rxECMNZdmxE9YVu1IF9mM9ZVuTbAewbTggBKWZWXlez/8MiUrLwq5W8ncHdN
-qiTmHbJHO4bhOGZopNkaN9Ki2bAcU4B1xVZY6SDB0+ScI0Hf0bKT83yDN1dj
-MAYwRauq9ySnnhP8m7e6xuyoYdHZjSyn3bSibHtyZg3pt0yojm8WBUiyrhs9
-ECIsmhUxYrJjsYMErxLXgCR9R8sK5o+cmIkneAB2ROt09ni3gro2Y+L4rTVG
-c0cxirZTOiQEr5L4OeqlhxPG/a2Yw1JOAHB6tPxs2sv7f8EzIRdAyUq2bT7S
-jIkxAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOIAYu8aL
-thO9Y6CJbHKzdFwO2t89cN013t4xe18vPjfy7xWqO/9aU0H6QnnO0EQ2uVk6
-Lgft715Id423e8yu6k2RM75spXq369kSFX+s1e4vGkcT2eRm6bgctL87EGHX
-eIFjUjePxEVu7t3WjW7LjY/aUiPCDnxWoYlsckQ6uptf78i8oHSWgYJWnN+V
-fkzqmNfgo/0d2/6CEGPXeMFj3j6/Mjzh2w5Dr9/+KWX8nAKZXfsfTWSTQ9LR
-SXMWR71YKvhmjNzRssIV4Yn7Rdk93Sq0fx+Htb8gxNg1XoSYuoaPJgQsLlUa
-+v/oEv9x6WRbQvODJrLJQekoz6aETdxz1blmQuq69IjgVT/YdbqI9r/LEe1v
-gbbl5N5Ns0ID4w5cay764NXnnvAfnfSZ1PIfCja7xjtDTMXpxSODpkTHzXwy
-aWXiuEUlcittYIMzpOPgJqIVP+1+85/1Fu9kuEY6dPvxRH/Jxw0mMUgLsok0
-oPbq7gi/eX2zSgvQ/iSEb3/7oVq+mOwVvCE7LSO3QaNvORrtP/eUwtVjaq5k
-SCbvNe13uxTtKjFJmkh/46BkeFyxlfHaFdKRlyx8NGTrJfMxjVvltW3nCs93
-MBZIGLCrakOQ35JSy7+B9mdgx/a3n9s/rvDziFyeXian+i43JKHPl6t6KGVF
-zlvLwoNmfc9lVskck98qR5J60h3fzB6fUi7UagbXbiLmmERNZHs0cHQTsUhH
-c+XtMK8pX7WbT4E4Vb67elPgQ0FMgwtx59JtuZO9x75Xb3H7ca7t71RnnAu3
-v0CUZ5OG/+mPA/05eP3Fgb2iqd85dtAjCX0LU/quJUbFH2v99T5SZ9FUv6nW
-PgKWWIrJZ5WjCPW03TiiFW3XJuIRs7+J/nD/7+5/wLWbqKvypQDvWSXmMyCO
-lafVbU1yxqkZcc0Vp+YODVzH0K5829+ZzjhXbH9h0erWhuvXBrre1KEd8NeJ
-bs+f7uGzuLiz979Rrbnzwhbmt9+5qS8v5nYeWYvZh8MqR1HqaatxRCzazk3E
-OeavTVR/dne4z6T/Vrp0E6lrU0O8YvLN5maCV5685rKCad6haQzPvQRof+YS
-+WXBqVlcsf3tTFWeMsJzel6boeKUrHidZPb79f114noeWYvZw3GVoxj1dGDR
-9m4irjHvsHWl7BJNRHcUJAwL3X7Z9JwTvPLENddc2THGd84JyysM+bQ/Y4k8
-s+A2SLpu+9uJ9npWxKAHfeNXvbJ18+rlL2Se6dTf/SHH88hqTI6rHMWopwOL
-tnsT8VxcSnUUr332lYu3uRTtPE2kl+bEDp90oFlv9F8FrzxxzSnpoVi/aYel
-erNQ/b/Bo/2d54xz3fa3D1p2YraX7zIL95O4tbmVmJxXOYpRTwcWbecmEmP9
-M8uie5ypiXqo9vwFgVP2Ga30F7zyxDU3THzjghcdb+fcLy5zxrlp+wulq3Jt
-gPcMpseclLIqLyvZ/+GRKVl5VUqSilqOyWaVo/3q6cCi7dtE3GPyLtq5msig
-uzYjesK26gHP4QWvPGnNu2tSJTHv8Lln6UJnnFu2v0B0jdlRw6KzG4X8VqCr
-xHRg0a4S04FFi5YOrarek5x6rv+ruYIXRBiQVpRtT86s4bMWE+0/kP3bXzC0
-Tif4nWtXienAol0lpgOLtls6ghdk/45A+4saEAAAAAAAAAAAAABANPcBAAAL
-lZWVoo7GMgAAYEGvd/Q38gAAwAK2L3sEAAAxsXzZIwAAAAAAAAAAAAAAAAAA
-AAAAM17blPM+3BkgBZfjqHzFKPde6zuwgs825fwPdwb3SAramyeOFLU64IX6
-InBUl4lRLkNMSnnx8y9rb2NN7j2LwzblAh7uDNw6Baotb8ljf/1O7l5nuKO6
-TIxyB8ZU12U8HrP7qkbI+OAs9J1ln2xJDBs+ZnU589a51rcp53l472azX+/I
-vKDsHwpsBhQFrTi/K/2YVMv4Q/dOobvm9YgxGytNr4NNk3I6vLpMLGKUaxJT
-17QvdvTThTLn7RmwiFJW/Gv1U0vXvfHamqSk7d/JGF7ecatsua/X7AKm/mWz
-TTmfw3XSnMVRL5YqjI61ElA0tKxwRXji/iaz08jNU6DlJctGhm291G1yCFNS
-ToZ7l4lEjHIZYuqlObF+sQea3ePO0j1FVbF6pNf0/9wwDMKa+p1R418zPe8M
-1z61b4Z4RH3SZDZOs9umnM/hyrMpYRP3XDWe31gMKC51XXpE8KofjGaDbp+C
-YUSb7ztqrenMmDEp58Oxy0QhRrkWYhpmx1HeEz78BcOxq9HLzx85fOlW7+eV
-bj02ecTM7+Wmv9H86cQho7ddVtOqupz18cE+49dV3rlDxWabch6H0+3HE/0l
-Hzfo2AUkpW05uXfTrNDAuAPXmos+ePW5J/xHJ30mtfwR1l7dHeE379uOu+e2
-+6egPPO079AFJQoWSXGvlU2cA3LpMnGqxKZcwWJ2X3o9eMikgzfwkkrXpfxh
-ZYjk3Z9N7/93Fj3pM/yZMzd+2rVsfkrGh9kHj18mudbicbi8ZOGjIWYXyTzr
-MxDV8sVkr+AN2WkZuQ0afcvRaP+5pxSWf72rakOQ35JSK79hxsVTUNe9FfLI
-eNNZFnNSPGp1h7btXOH5DsbRh1tATl3GFtcq2SOm/Lu5nj4LS11xjQ8Y6Nu+
-3Ri/NLPKbG2M6sJq/yGPZ2xf9WZhG4e/tTwO11x5O8xrylftxjXiWR8jt39c
-4ecRuTy9TG4YC3UNH0lCny9X9d5Jz3lrWXjQLNPLBLotd7L32Pfq2T+vdlQK
-FleiEqagOD3Pc0iCSTswJ8WiVhYb9lfd1ZsCHwpiHuUJ0+SaLwlOOXKKSb6u
-uLtmy6jBj+21ePUCTqz3/tMzG482MHxmDdd64zz8n5Z4Dl1U1En+zIbP4V2V
-LwV4zzK5SmYTkO1LqjX1O8cOeiThy9beeWnv5feo+GOtv85RO4um+k0tNj2h
-FKfmDg1cR/C6a4elYHF1K1kKsoKYwT5Lz96ynRSrWvVYathf0eq2JjnjAEKc
-Zj/iLhPtw8MC9zTNAr07ZnBoep2avA7gUJSibOeLqQXMi/upls9jPUe9XHri
-2Ue9Eo62GGZytI7gmprX4era1BCvmHyjORirgCxfUk2350/38Flc3DciUq25
-88IW5rffCSYvZjqhZAXTvEPTCD7jjkyhj9nqVrIU5N/P9PB88rTxwMuUFOta
-MTesDeRp9iPuMtE+PCyK5p6mCfXlbaMHh//jmrM/ZgVj2sZ9C2JeL1fqemk7
-rxTdNPrgKkuTfIctOa1QVawP/MvYtEvyn/dvyb9p7fJa03hox6FGjQCH0x0F
-CcNCt18eWCHygJapylNGeE7PazN89ilZ8TrJ7Pfr+4tiPKE0V3aM8Z1zwtay
-NCdJoYdpdSvLFH7TdXF9wOCofzcb1Y4pKda14jRSEad590dk+QpTJa6jMfc0
-TSlLF3p7xJ+UEVcBHElVscb/gbs7t/7e8ymjW//dl96IDJ3/dRvVQ3UUron2
-G52QvP+q9XmG6sLaGS/d+fPN8/DehZPDJx0YMBZwCGiR9npWxKAHfeNXvbJ1
-8+rlL2Se6Rww5jCdUJT0UKzftMNSWwOnk6TAtLqVbQq/oTu+menp+8w541sV
-5kmxrxWXkYo4zX6k+QpTJY6jMfc0Tanr0kIGi3O3HO5ZVHv+gsAp+8zX7wuA
-lp2Y7eW7zMJNOIYTSn/jYFzwouPtZIsfHJQC80pU8hT0zZ9O8jS70reaFHHD
-2kKc5t3ac+oyflXq4Toac0/T7NdbPpsyJHBjFV4jBILqrs2InrCt2spiKq66
-KtcGeM9gWhlAKavyspL9Hx6ZkpVXpfzto99dkyqJeYfDcxFHpMC8EpVLCobh
-OGZopNk3CawkRdqwNpGmebeSXLuMR5U45mg1JuEaaVp2cp5v8OZqDMYgMFpV
-vSc59ZzgX8HVNWZHDYvObmQ5Z6UVZduTM2s4fUXDtVOgOr5ZFCDJum7yQMhi
-UoS1so1rQD5dJlKV7BKTlhXMHzkxE0/wwHXQOp0zv2SBDTuloK7NmDh+aw3b
-yb3gtXLCnhKjSgLF1EsPJ4z7WzGH1agA4PRo+dm0l/f/gmdCLoCSlWzbfKQZ
-E2MAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABwYcTbrwMA
-sEfLCuZG/r1CdedfayrEeKm3eyDefp0NtD8A/KqrelPkjC9bqd7tbrZExR9r
-xcutbWG9/TobaH8A6EPdPBIXubl3WzS6LTc+agvzxhC6m1/vyLygdJaBglac
-35V+TOqYF3ETbL/OArv2BwD3d/v8yvCEbzsM4+ztn1LGzymQMYy4OmnO4qgX
-SwXfDo47Wla4Ijxxvyj7N1tFtP06G2zaHwDuAbqGjyYELC5VGkbco0v8x6Uz
-bcurPJsSNnHPVefaEkZdlx4RvOoHu07XCbdfZ4NN+wOAK9K2nNy7aVZoYNyB
-a81FH7z63BP+o5M+k1qeQipOLx4ZNCU6buaTSSsTxy0qkZv9Bt1+PNFf8nGD
-SQzSggSvufbq7gi/eX2zSjuVyGb7deHbHwBcFdXyxWSv4A3ZaRm5DRp9y9Fo
-/7mnFJZ+WXMlQzJ5r+lIa0ResvDRkK2XzG9nEhXUT9t2rvB8B2OBhAG7qjYE
-+S0ptV2kZdxSEDAmi/YHAFd1+8cVfh6Ry9PL5FTfhbAk9PlylYW1snTHN7PH
-p5RbWxygufJ2mNeUr9rNp6DMBVHKipy3loUHzfqecZrXXb0p8KEgpsGdrOY9
-fU+9JnuPfa+exwbIhCXyiMncLCzaHwBclaZ+59hBjyT0LZnqu8swKv5Y77+5
-rpXtqnwpwHtWifnszlJBBp1FU/2mFjNfdNPqtiY541yQuOaKU3OHBq67aD5a
-Ks8mDf/THwf6c/B6ht8Tuq14NAsAuBu6PX+6h8/i4s7euSzVmjsvbGF++8DH
-TaRrZdW1qSFeMflmc2NrBcmLOQw75DWXFUzzDk1jeO5Fq1sbrl8b6HpTh9Zs
-di94W9mIyalZAMBFqcpTRnhOz2szDAaUrHidZPb79QNHK/K1snRHQcKw0O2X
-Tcc8awVxGnaIa665smOM75wT3JeECd5WNmJiNAa4h2ivZ0UMetA3ftUrWzev
-Xv5C5plO/d0fclsrq5fmxA6fdKBZb/RfrRbEZdghrjklPRTrN+2wVG8WSqwS
-+cbEaAxw76BlJ2Z7+S5jutPJfa0s1Z6/IHDKPqNvWlgpqIfTsENcc/2Ng3HB
-i463c170K0ZbCd4sAOCiuirXBnjPYFoAwWatrEXdtRnRE7ZVD1gHYbkgSlmV
-l5Xs//DIlKy8KiXrgYy05t01qZKYd/h8V0KMthK8WQDANekas6OGRWc3Cr58
-lVZV70lOPdf/1WjBCyIMSCvKtidn1vBZGSZGW4nW/gDgamidzj7fFBa8ILvV
-XNQS7Z8FAAAAAAAAAAAAAICroBU/7X7zn/V4fT4I6T4AYFJZWWnxtNHfOCgZ
-HocF1iAoGQAw0estfxcSozEAgEP1v0PvD/f/7v4HLL9DDwAAxHTnHXr1Z3eH
-+0z6b6Wld+gBAIA94E4FAIAzoDqK1z77ysXbjq4HAAAAAAAAAAAAAACAGV57
-wfM+3Bm4QQpEHJWvGOXea30H7o3PXvD8D3cGbFLQ3jxxpKjVPd7R7qguE6Nc
-hpiU8uLnX9bextphcF0c9oIX8HBnYDkFqi1vyWN//U7uXme4o7pMjHIHxlTX
-ZTwes/uqRsj4AILRd5Z9siUxbPiY1eXMayut7wXP8/De/Y2/3pF5Qdk/mtkM
-KApacX5X+jGplvGHVlLornk9YszGStPrYNOknA7XfEUlRrkmMXVN+2JHP10o
-c96eAXdGKSv+tfqppeveeG1NUtL272QM70m5Vbbc12t2AdNHlM1e8HwO10lz
-Fke9WKowOtZKQNHQssIV4Yn7m8xGAmsp0PKSZSPDtl4yee0iY1JOhlO+YhKj
-XIaYemlOrF/sgWb3uLMErkVVsXqk1/T/3DAMwpr6nVHjXzMdOgyXb7VvhnhE
-fdJkNk6z2wuez+HKsylhE/dcNZ6iWQwoLnVdekTwqh+MJrTWUzCMaPN9R601
-nRkzJuV8yPMVjxjlWohpmB1HeU/48BcMx2B3evn5I4cv3eo95ejWY5NHzPze
-9Jv3+uZPJw4Zve2ymlbV5ayPD/YZv67yzk02NnvB8zicbj+e6C/5uEHHLiAp
-bcvJvZtmhQbGHbjWXPTBq8894T866TOp5bNQe3V3hN+8bzvuDk82UlCeedp3
-6IISBYukuNfKJs4BifMVrUpsyhUsZvel14OHTDp4w85/7AEGUv6wMkTy7s+m
-jzA6i570Gf7MmRs/7Vo2PyXjw+yDxy+TXC7yOFxesvDRELPrfJ71GYhq+WKy
-V/CG7LSM3AaNvuVotP/cUwrLv95VtSHIb0mpld8woq57K+SR8aazLOakeNTq
-Dm3bucLzHYyjD7eAxPmS4Fole8SUfzfX02dhqSuu8QH3oG/7dmP80swqs+U9
-qgur/Yc8nrF91ZuFbRymCzwO11x5O8xrylftxjXiWR8jt39c4ecRuTy9TG4Y
-znUNH0lCny9XWV6JSrflTvYe+149y0fuitPzPIckmFxrMCfFolaUsiLnrWXh
-QbPMLl76dFdvCnwoiHmUJ0yTa74kOOXIKSb5uuLumi2jBj+21+LVC4CYem+h
-PbPxaAPDaWe4XB3n4f+0xHPooqJO8sdOfA7vqnwpwHuWyYU+m4D97wPvx/w+
-cE39zrGDHkn4srV3at17B2FU/LHef1tc3ao4NXdo4Dq2bxaXFcQM9ll69pbt
-pFjVqqf3smCq31QLL3Gk1W1NcsYBhDjNfmT59vBveRs5WsU9TbNA744ZHJpe
-pyavAwA/lKJs54upBczfT6BaPo/1HPVy6YlnH/VKONpimIzSOoLbArwOV9em
-hnjF5BtNI1kFvPM+8AEY3wdOt+dP9/BZXNw3qFOtufPCFua3DwxmtrpVVjDN
-OzSN7Wkq/36mh+eTp40HXqakWNdKXsxhpCJPsx9Zvj2CtDynHG3E7MN6rbL6
-8rbRg8P/cc3ZH7OC29E27lsQ83q5UtdL23ml6KbRuacsTfIdtuS0QlWxPvAv
-Y9MuyX/evyX/prU7BJrGQzsONWoEOJzuKEgYFrr98sAKkQe0TFWeMsJzel6b
-4fSlZMXrJLPfrx9YlPnqVs2VHWN855xgu7Ku6+L6gMFR/242qh1TUqxrxWmk
-Ik7z7o/I8hWmSlxHY+5pmlKWLvT2iD8pI64CAC+qijX+D9zdJPf3nk8ZPb3o
-vvRGZOj8r9uoHqqjcE203+iE5P1XrU+VVBfWznjpzgyE5+G9az+HTzowYDjj
-ENAi7fWsiEEP+savemXr5tXLX8g80zlg2GRa3UpJD8X6TTssZTv20x3fzPT0
-feac8a0K86TY14rLSEWcZj/SfIWpEsfRmHuaptR1aSGDxblbDuC6qPb8BYFT
-9pl/BUEAtOzEbC/fZUz3EZlXoupvHIwLXnS8nf2NGn3zp5M8za70rSZlpVY9
-nEYq4jTv1p44X/5V6uE6GnNP0+zXWz6bMiRwYxVeIwRgrLs2I3rCtmor68G4
-6qpcG+A9g2lxA/NK1O6aVEnMO2SPdgzDcczQSLNvElhJynKtKGVVXlay/8Mj
-U7LyqpSsh0jSNO9WkkO+fKvEMUerMQnXSNOyk/N8gzdXYzAGMEWrqvckp54T
-/FvEusbsqGHR2Y0sp920omx7cmYN6bdMqI5vFgVIsq6bPBCymBRhrWzjGpBj
-vmJWyS4xaVnB/JETM/EED8COaJ3OHu+JUNdmTBy/tYbt5F7wWtkpTRJiVEmg
-mHrp4YRxfyvmsJQTAJweLT+b9vL+X/BMyAVQspJtm480Y2IMAAAAAAAAAAAA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAiPeEt25uVk6AHDvIN4SnQ1a
-VjA38u8Vqjv/WlMhxovOGblZOo4s2uWgrcBNsN4SnY2u6k2RM75spXq3ANoS
-FX+s1e4v/HaXdBzfkq4DbQVugWBLdBaom0fiIjf3bhVHt+XGR21hvVmGUNwm
-HXZF625+vSPzgtJZBh9acX5X+jGpvV/zjrYCN0C0JTobt8+vDE/4tsPwib/9
-U8r4OQUyu3723SkdNkXrpDmLo14sFXyzQe5oWeGK8MT9ouwObhnaClwd4Zbo
-bOgaPpoQsLhUafjsH13iPy5djK2KLXGvdNgUrTybEjZxz1Xnml2p69Ijglf9
-YM8pKNoKnI225eTeTbNCA+MOXGsu+uDV557wH530mdTyH142W6KTxlScXjwy
-aEp03Mwnk1YmjltUIrdcXVrx0+43/1lv8dLfxdKxRfii6fbjif6SjxtMYpAW
-JHjNtVd3R/jN65up2qnEe7mtwFlRLV9M9grekJ2Wkdug0bccjfafe0phz5ia
-KxmSyXtNP/PM9DcOSobHFVsZ4FwqHfsXLS9Z+GjI1kvmf864tZu27Vzh+Q7G
-AgkDdlVtCPJbUsqnq9BW4Opu/7jCzyNyeXqZnOq7fJOEPl+u6qGUFTlvLQsP
-mvU9l6kdc0zmxb10xzezx6eUs1vNYHs0JimaXzrMTUSUjt2L1lx5O8xrylft
-5tMqTh+D7upNgQ8FMQ1YxB1Bt+VO9h77Xj2P7bUF/tS5dVuBU9LU7xw76JGE
-voU+fddmo+KPtf56+7SzaKrfVGsjH2lMHot7lWeThv/pjwZ/uP939z/Q+48/
-B6+/aD6qilC0GE3Un04/snS4Ft1V+VKA96wS81kVx4JodVuTnHG6R9wRilNz
-hwauY2gDvm3Ftetdsa3ApdHt+dM9fBYXd/bOAKjW3HlhC/Pb7zzLkhdzG2qs
-xezDYXEvrW5tuH7tWv3Z3eE+k/5bee3atetNHVqzaYsoRYvRRL+mMwBxOpyK
-VtemhnjF5JvN9wQviLwjZAXTvEPTGJ6lCdBWzCXa4IptBS5NVZ4ywnN6Xpvh
-g0DJitdJZr9f39/HXIcaazF7+C3utXWnQoyixWgiRxVNdxQkDAvdftn0PBa8
-IOKO0FzZMcZ3zgnuqwEF73o3bitwStrrWRGDHvSNX/XK1s2rl7+QeaZTf/eH
-HIcaqzF5Lu6lOorXPvvKxdt2LFqMJnJc0XppTuzwSQea9Ub/VfCCiDuCkh6K
-9Zt2WKo3CyVWiba5bVuBU6JlJ2Z7+S6zcC+N2/luJaYIi3tFL1qMJnJk0VR7
-/oLAKfuMvj0geEHEHWG45okLXnS8nfNHQpRPnZu2FTinrsq1Ad4zmB4bU8qq
-vKxk/4dHpmTlVSlJOt5yTDaLe3kRo2gxmsixRXfXZkRP2FY94Nm+4AWRdkR3
-Taok5h0+90FF+tS5ZVuBU9I1ZkcNi85uFPJblmLEdGDRbpZOH1pVvSc59Vz/
-130FL4gwIK0o256cWcNnUSDaClwerdMJ/iRAjJgOLNrN0rFPQfZvNLQVAAAA
-AAAAAAAAAAC4l/sAwGVVVlY6eggBwcgAwGXp9fhGHgAAAAAAAAAAAAAAAAAA
-AAAAAAAAAACQsLThuAtBCo4tyA3an497PH0QENet0p3IPZKC9uaJI0WtPN+Y
-LkZbuUH788GQPqW8+PmXtbfxCmTghnSrdCfk1ilQbXlLHvvrd3KBznAx2soN
-2p+Pgemr6zIej9l9VePoOoET0neWfbIlMWz4mNXlzDs329oqXXfz6x2ZF5T9
-Q4HNgKKgFed3pR+Tahl/6N4pdNe8HjFmY6VA18G22sohMU07yOmQ9J2uaV/s
-6KcLZc6bDYiFUlb8a/VTS9e98dqapKTt38kYXkpyq2y5r9fsAqaPh82t0nXS
-nMVRL5YqjI61ElA0tKxwRXji/iazM97NU6DlJctGhm291M3wM2I228ohMRk7
-yMmQ9J1emhPrF3ug2QF7M4JDqSpWj/Sa/p8bhkFYU78zavxr5qetuvbNEI+o
-T5rMxmkWW6Urz6aETdxz1XhOYDGguNR16RHBq34wmkG5fQqGUWC+76i1QsyM
-WbSVQ2IydpDzIeg7w+w4ynvCh79gOL7H6OXnjxy+dKv3I0K3Hps8Yub3ctPf
-aP504pDR2y6raVVdzvr4YJ/x6yrv3OCytVU63X480V/ycYOOXUBS2paTezfN
-Cg2MO3CtueiDV597wn900mdSyx9h7dXdEX7zvu24ez64fwrKM0/7Dl1QouBf
-tO22EiemDcwdxL1KNnEOSNB33ZdeDx4y6eANvD3znqX8YWWI5N2fTR8fdBY9
-6TP8mTM3ftq1bH5KxofZB49fZntVKS9Z+GiI2UUyj4CmqJYvJnsFb8hOy8ht
-0Ohbjkb7zz3FMPD8pqtqQ5DfklIrv2HGxVNQ170V8sh4C7MswqJZESOmVcwd
-xL9K2rZzhec7BG03gr6TfzfX02dh6b22xgR+pW/7dmP80swqs6U1qgur/Yc8
-nrF91ZuFbYR/qjVX3g7zmvJVu3FIHgHN3P5xhZ9H5PL0MrlhLNQ1fCQJfb5c
-1XsrPOetZeFBs0zn+XRb7mTvse/Vs39e7agULK5EJUxBcXqe55AEs+sda0Vb
-bD0x0uGNuYNYVMlGmt3VmwIfCmIe5bnmSNB33TVbRg1+bK/FGT+4r97bV89s
-PNrA8DExXF6N8/B/WuI5dFFRJ+Fjkq7KlwK8Z5lcJbMJqDybNPxPfxzoz8Hr
-L5p/vjX1O8cOeiThy9beeWnvJeuo+GOtv85RO4um+k0tNj3RFKfmDg1cxxDJ
-6VKwuBCXLAVZQcxgn6VnbzH9jLj1WCBOxwabzcjYQUKkSavbmuSMgyH3HNn3
-nab+3TGDQ9Pr1LZ/FdwJpSjb+WJqAfN3A6iWz2M9R71ceuLZR70SjrYYJoK0
-jvUlubo2NcQrJt9o3sIqIK1ubbh+baDrTR1as3GPbs+f7uGzuLhvRKRac+eF
-LcxvvxNMXsx0oskKpnmHphF8xh2ZQh+zhbhkKci/n+nh+eRppsGKvPVsI0/H
-VkBbzcjUQayrxClNHjmy7zv15W2jB4f/45qzP5oEQWkb9y2Ieb1cqeul7bxS
-dNPos6IsTfIdtuS0QlWxPvAvY9MuyX/evyX/prWrc03joR2HGvtm2XRHQcKw
-0O2XB0YkD2iZqjxlhOf0vDbDaUHJitdJZr9f318U44mmubJjjO+cE7aWpTlJ
-Cj1MC3FZpvCbrovrAwZH/buZoXbErSdGOrwxdRDrKnFKk3uOBH2nLF3o7RF/
-UkZWNXBtqoo1/g/c3ZH2955PGT056L70RmTo/K/bqB6qo3BNtN/ohOT9V63/
-aVddWDvjpTsTg96Fk8MnHRgwFnAIaJH2elbEoAd941e9snXz6uUvZJ7pHDDm
-MJ1olPRQrN+0w1JbA6eTpMC0EJdtCr+hO76Z6en7zDnzWxXErSdGOgIw7yD2
-VeKSJvccCfpOXZcWMpjoAQeALVR7/oLAKfvM17wLgJadmO3lu8zCPUiGE01/
-42Bc8KLj7WTDgYNSYF6JSp6CvvnTSZ4MV8fErccCcTqCsNpBgqfJPUeCvqNa
-PpsyJHBjFV4jBILqrs2InrCtWpBvghnrqlwb4D2D6Wk6pazKy0r2f3hkSlZe
-lfK3T393Taok5h0Oz0UckQLzSlQuKRiG45ihkWZr3EhbT4x0hGKlgwRPk3OO
-BH1Hy07O8w3eXI3BGARGq6r3JKeeE/xrq7rG7Khh0dmNLOestKJse3JmDaev
-aLh2ClTHN4sCJFnXjR4IERbNihgx2bHYQYJXiWtAkr6jZQXzR07MxBM8cB20
-TufMLyZgw04pqGszJo7fWmM0dxSjaCfsEcGrJH6OeunhhHF/KyZdTgoAroCW
-n017ef8veCbkAihZybbNR5oxMQYAAODm/wNMnDYl
- "], {{0, 237}, {474, 0}}, {0,
- 255},
+1:eJzt3XtUVNe9OPDk/v5pu1xtorWLlaoRJIBQsTBJgBihRC1GNBTktyIGXEti
+r8sXQdL4jGk0EjQYRIJJJPFVLmgiJqGm+IwgDwU0gMhLCKCjDODMODDAvM+Z
+C+hNZOacM/u8z4zfz1rtsnXc+/vdZ+/NnnM2+7gnvhXz3//1xBNPvP2r4f+K
+Wb4xPCVl+ebFTw3/j/+f9PaqlUl/X/Fq0j/+vvLvKcGJ/2/4/6wd/s9PTz7x
+xMifrQAAAIB4sL6qj/974azp7n9eur9xCBc7HAAAeJzpO//n0I/9mNXY+UXo
+tMiLGn5qwUSd68WtHQAA0OEWnWV0yhqqTZq1onqAs4LN8iOLE8v6rNbB2qTQ
+ZZf7OSvYCWoHAACWhm589PecdgNn5eGq04sXHFNYrIabO4PnnujBOCtZ+rUD
+AAAr+EBD/pelKguHRQ5eW/3XtJsGq6Ur9y/Baa3cTfZc1m7supj7TdOgVG5t
+YP21BfkVSrPYcQAAxITrb589eanXNDwnDN5u03IzMQ+vT0PmFalwY/uBcN+E
+Kq2wC1Wk2s09hcnLvuDwqwEXdI2Z8ZsvqLn86QgAcCamu/kJ3h7efsN8/zT7
+3QYdJ6VaFMfCfcJeiU/enr43Sha1p7BTJ+BiFKV2THU6PnhNlVa4qNDg9y/G
+B62q6JfK2h0AwAmLpvLIO7Hhczdl7FgT6Td+wozEk92svhPTKhBXnYmds7/T
+xKZC5gGg1D48bYf5xF0hmpLFbbrhSfl8pM/Cs2qYlAFwKbj67PxnPJMvKC1W
+TPn9oolPBR3vxqz40K1aObMlK1GBZuK9zSOTYsiGG9wsuSkDIMoIqfaBqiWe
+gVkdhPM2g6bTdxTsyyknu+VAo+lGymre5u+XUs9x6wEAxNVX9rq777Ym/cif
+B2tWuk+KLulVVB2M9gz6Us5o1Wdf4KUelnubzYoTiRFhNhasregjnPk4zUhT
+Ej75hdwuwkmUfkXmrryIyT6ragaJK6PXdMb2jADPpVXc7UoEAIhvoDpxmnfy
+g8WWvvn9GV4ryodnuuHhHvIyszmZqECMr73NqAEwz0h7OcZD9uktonWy2E1n
+aNnhP31t3RCDmgAAEjVUl+TlsXx0qJu7ji+dve7M6EY35hMLSYEP/5Ljvc00
+AmCakbH9Y5nfOqKJT/Sm01bGec/KV8DWCwBch75pq6/bi2+kpGZmpW/fklV8
+7+FUwnhiISvQysveZhoBMM7I0JoaPOvz23YLZdGbznAzNXgOw/tLAABJMrbt
+8p8aU6yxuy3LeFVJViAve5vpBMB8+YppSjdG77bd+yd20+Ha6q0xH9QMwK4L
+AFyHqTM7cEpEkcp+XDOcWMgK5GdvM40A2MzJwwzyU5k5xT2PrJVFbjqDvCh7
+37luTvcQAgDEhOvvlB16032cW9SBMoVh7ExgUtflxU71Wl3Y3I++oKUqUBCc
+ZzS2dKNKbcT5qYh202H6Xo0RVsgAAAAAAAA8riy9p1auq5bcb7YDAMBjyXL3
+X/MW8vUGBeCS5gIAmOro6KAeXzAnAwCA6H75bfoQn6cnzJxF/dv0AAAABAHr
+ZAAAkA6YkwEAQDpgTgbSgZEenMv8k07K5RN8lFjJ8lHvY3XhgJMxyM+dbNDS
+6JV6goNzcW3DyXNy23PViD7pUtASpN3C0iTW1eSjXvQ+DICw8IG6vSlf3aV1
+PAFOeHCu6e7XKXvrxp48Q/xJF4KQIJMWliaxriYf9aL3YQAEZbp9eNnOeoZn
+j9senDtUv3PZYfujIwk+6XLIE2TVwtIk1tXko170PgwAe7iuLTfpFa+J4552
+f3nN0VaCF7HpW9Je296ot/+Xennp19nvrX+3RE34Dnsr8cG5+sbti9JabItD
+O53Y2HUx95umQeIlCkI8vMP6awvyK5QEp6pRJUjcwpTJSgGzZPnER73ofRgA
+LuiaMt7aX9lrNKmv7X/N7XczP2oz2nzC0LY79G/E9+ewnoIQtxl7frL9Jw+Q
+nTmsuRgVOrYatNOJzT2Fycu+oFoCUccjEF1jZvzmC2NfI0qdIFELO05WEugn
+yx8+6kXvwwBww9RTfKH7Ydcaqlvr8cdF5f1jP4Hd+25OwFvXCb9Xj7wT0++f
+zYTrBfIzh4euJwXMO6XEHX9yTByq0/HBa6ooT3Ohikc4+P2L8UGrKvpREyRo
+YZRkpYFusrzho170PgwAHwauLp8eYveWIH3jZv/AtFaiBdtA1fJp3in1Oov6
+h03zl2w7er6mC+X0XEPrh4F/fo/mzGlRHAvzibtCOUsxjIe6Xk3lkXdiw+du
+ytixJtJv/IQZiSe7HZ33jt8/H+mz8KwasW77FkZJlklglBgWSDNZgaLiu0BG
+fRgAWnBN6eo5b5fb/UK+tvL1aYGfdBI80BheVz/nueLS1cLDR4t+orF509T5
+iey5BJpPxgeqlngGZnVQPVdhGg81XH12/jOeyReUFium/H7RxKeCjndjVnzo
+Vq2c4N77A/rmbf5+KfWISzX7FkZIllFg+o6CfTnlapJv9UQFmh1v0KWXLG1M
+2p92gQhpjsWoDwNAA6a5nLb+YAtBL+8vj3xWduC2/VJC17DRe/yzAdNDc2g+
+gTbf/vx5j+jL9L6Ya0rCJ7+Q20VxkxA5nl/Oh3kE6fkwI/dDfLc1ja6IBmtW
+uk+KLulVVB2M9gwif0GSsT0jwHNpFeKItW9hx8kyCszclRcx2WdVzSBqgZd6
+EDb90kvWKkT7U2KYpk0OTPowAKhwXVv+7oPXiX9fQXtlsYfss1t205yhZYff
+lFcP7XnpD14biF5VT87UmS3zjKMxiEfDuBzjIfvUPgwO4qE0UJ04zTv5wSpQ
+3/z+DK8VI18lHLy0bjgW/+lrUaOwb2GHyTINjG6BGMKmX3rJchGVKGmOxagP
+A4DGeOffe3Oq+0a3j2F9Dd+dVox5nKyrX/+n5zPabR8xD4+KmZPn/6dX9UPc
+JLdXT3TTeMptbPtI5r8B5SGMRXO14NvaPstofR/L/NaRj3wW8VAZqkvy8lg+
+OkrNXceXzl53RvUgGso5QVsZ5z0rX4EYg30LO0qWcWD0C3z4lxSbfukly01U
+IqQ5FnofBoAei7Jolfevn3zioSd/459us5PMosgLlW1tevRpBjbUXvLlCvff
+Tl35bbO6NS/i979yi8o4fxf1eZruxj8Cwr7qRthD3Fee4O2dUDr6pdbQmho8
+y+4JJBfxUNA3bfV1e/GNlNTMrPTtW7KK7z2cBajnBMPN1OA56DMGQQtTJMsm
+MApkBVodbfqlmSw3UQmfpg30PgwA53QNm2YnVHJ456y/PPalTfSXGJimdGP0
+bkGXJsa2Xf5TY4o1dpM71ZyAa6u3xnxQQ+N3bwla2EGyjAKjQlqgg02/9JPl
+JCqh07TDsA8DwInBH9cvSCfcDMeIsS0jMuVHkudM1AzyU5k5xT1C/VKrqTM7
+cEpEkcp+wiGfEwzyoux957rphUjYwhTJMgmMElmBDjb9MkqWfVRCp2mPRR8G
+gAO6xg9j0ls4mpSN7Z8t2dXIeIWBG1VqowBb9XH9nbJDb7qPc4s6UKawuQti
+UtflxU71Wl3Y3G+7oML0vRoG4ZG0MFGyDAMjR1UgNYbJso5K4DTtsezDALBm
+UZ7dkHJeycHdM0x96d0t55SCH4Qgddy1MOAb9GEgBVjf1UNH6tie7osP3Mg7
+eq0PZh4C3LQw4Bv0YQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAGAKo/uCYJHKFBE0EQrXy8gZwVVwfnraLwgWp0wbmIC9zUmb
+yOr8rWRPyIyckYsNvccTTvsFweKUabWa5UcWJ5b1Wa2DtUmhyy73c1MqAudp
+IquLtdIo0TJyRi429B5v6C8IFqlMXHV68YJjCovVcHNn8NwTPcIflyv5JrK6
+YiuJn5EzcrGh9xii9YJgkcocvLb6r2k3DVZLV+5fgtO4exkhImdoIqsrthJi
+Rsaui7nfNA1K5Xs11l9bkF+h5Ofd4Y6INPTgEnCG7guCxSlz+Ed0yLwiFW5s
+PxDum1ClFfRntXM0kdUFWwktI3NPYfKyLzj+CsOWrjEzfvMFtdAvpBJp6MEl
+4A7tFwSLU6ZFcSzcJ+yV+OTt6XujZFF7Cjt1gv08dpImstJuJUvvqZXrqrWc
+VC1iRpjqdHzwmiqO8uAOfv9ifNCqin7BLoFVtKHnzJdAMBZN5ZF3YsPnbsrY
+sSbSb/yEGYknu1mt4jkvkFaZuOpM7Jz9nSaWFTKsXawC6ZZJt5Usd/81b6GD
+Z/PithJKRsNzRphP3BWi+UDkS4zfPx/ps/CsmmJGEOUS0CrT5S+BcHD12fnP
+eCZfUFqsmPL7RROfCjrejVnxoVu1cmYrTKICzSw3Q6IGOdIvQjbc4PhV8U7b
+RCRl0m4llAlB1FZCymigaolnYFYH4aTBIHh9R8G+nHKy77v0LrG+eZu/X0o9
+RfyML4Gkhp5TXwL2zIoTiRFhNhasreizya+v7HV3321N+pE/D9asdJ8UXdKr
+qDoY7Rn0pZzRzyn7Ai/1sN0MyXWQqI3DT+0CNRHrMn9ppRCfpyfMnOXkraQp
+CZ/8Qm4X4QimH7y5Ky9iss+qmkEugje2ZwR4Lq2y35HG9hJIbOg54yUQ3kB1
+4jTv5Ac/HvTN78/wWlE+fL2HAwx5mdlQIioQY7kZkvMgxa1dqCZiW+bPUBZp
+0m8l7eUYD9mnt4gWaWIHb2jZ4T99bd0QeYFML4G0hp5TXwKhDNUleXksHw3O
+3HV86ex1Z0Z3xjBvCpICH/4ls82QnAcpbu0CNhGrMn+BMCE4QSsZ2z+W+a0j
+GnWiB6+tjPOela+geO7P/BKQVsoiEaYt49SXQCD6pq2+bi++kZKamZW+fUtW
+8b2HyTNuCrICrSw2Q3IepLi1C9lEbMp8hOMJwSlaydCaGjzr89t2qzTRgzfc
+TA2eQ10R80tAVimbRBi3jDNfAmEY23b5T40p1tjdnGL8c5CsQBabITkPkhbn
+biJedgLTCUBKrTT8TzSlG6N32+77Ejt4XFu9NeaDmgF2j/ydZOi58iXggqkz
+O3BKRJHKPhKGTUFWIJvNkJwHSYtTNxE/O4FpBCCpVnrAID+VmVPc88hCTeTg
+DfKi7H3nutnu3nSioeeql4A1XH+n7NCb7uPcog6UKQxjYzep6/Jip3qtLmzu
+R/+pSlWgZIIUt3ahm0gQTtFKYyswqtRG3GFdwgSP6Xs1RpZJOt/Qc7lLAAAA
+AAAAAAAAAOAS5gIAAKCjo6ND7JkbAAAAFXqnMQAAAAAAAAAAAAAAScKQz4ZF
+/6STcvkErY9Hjj8TK1k+6n2sLpxLMcjPnWzQ0rhieoLTUHFtw8lzctvzr4g+
+6VJcPkErao60e5E0iXVB+agXfZwCKcEH6vamfHWX1u+c44SnoZrufp2yt27s
+cSLEn3QhLp+gFSlHJr1ImsS6oHzUiz5OgYSYbh9etrOe4YHStqehDtXvXHbY
+/jxAgk+6HJdP0EqVI6teJE1iXVA+6kUfp4BvuK4tN+kVr4njnnZ/ec3RVoK3
+a+lb0l7b3qi3/5d6eenX2e+tf7dETfa2e6LTUPWN2xeltdgWh3aKrLHrYu43
+TYPEP74R4uEd1l9bkF+hJDgqy0UStDLNkbgXUeYrBWwvKPf4qBd9nAL+6Zoy
+3tpf2Ws0qa/tf83tdzM/ajPafMLQtjv0b8T3rrCeghC3GXt+sv0nD5CdDau5
+GBU6thq0U2TNPYXJy76gWh5QxyMQXWNm/OYLY98N6VIJWpnkSNSLHOcrCcwv
+KPf4qBd9nAIhmHqKL3Q/bPahurUef1xU3j/2E9i97+YEvHWd8DvnyIsO/f7Z
+TPizlPxs2KHrSQHzTilxx58cE4fqdHzwmiqiN50jxSMc/P7F+KBVFf0um6CV
+fo4EvQglX2lgeEG5x0e96OMUCG/g6vLpIXavftE3bvYPTGslWswMVC2f5p1S
+r7Oof9g0f8m2o+drulCORDW0fhj45/doTiwWxbEwn7grlCOYYTzU9Woqj7wT
+Gz53U8aONZF+4yfMSDzZ7egQb/z++UifhWfVtOp2pgSttHO070Uo+TKMjfMC
+GV1Q3qPiu0BG4xRwCNeUrp7zdrndr4hrK1+fFvhJJ8HN/uF19XOeKy5dLTx8
+tOgnGhsbTZ2fyJ5LoPnUeKBqiWdgVgfVMwem8VDD1WfnP+OZfEFpsWLK7xdN
+fCroeDdmxYdu1coJ7r0/oG/e5u+XUk9rGSOpBM2O96zSy9G+FyHky6jx9R0F
++3LK1STf6gVJljYmfYx2gQhpjsVonALOYJrLaesPthD0gP7yyGdlB27b/5jV
+NWz0Hv9swPTQHJpPZ823P3/eI/oyvS+tmpLwyS/kdlHcQEOOh96JJSO3C3y3
+NY2uFgZrVrpPii7pVVQdjPYMIn/rjbE9I8BzaRWt3iyhBC/1IOyDpZejfS9y
+nC9hbI4a39yVFzHZZ1XNIGqBPCRrFaKPUWKYpk0OTMYp4Aaua8vfffA68V5+
+7ZXFHrLPbtnNAoaWHX5TXj2056U/eG0gev84OVNntswzjt6MZdVejvGQfWof
+BgfxUBqoTpzmnfxghaRvfn+G14qRrxIO3kQ2HIv/9LX0opBSghjCPlh6Odr3
+Iof5ksTmsPHpFsh9slxEJUqaYzEap4ALxjv/3ptT3Te6uwrra/jutGLMo1Zd
+/fo/PZ/Rbvv4dbjHzJw8/z+9qh/iJrm9eqKbxhNgY9tHMv8NKA8oLJqrBd/W
+9llG6/tY5reOfFSwiIfKUF2Sl8fy0R5s7jq+dPa6M6oH0VCOF21lnPesfIXj
+GCSb4MO/pNgHi5zjKPte5Chf8tiYT1YCJctNVCKkORb6OAVcsiiLVnn/+skn
+HnryN/7pNhutLIq8UNnWpkfv9GND7SVfrnD/7dSV3zarW/Mifv8rt6iM83dR
+HzfpbvwjIOyrboQttn3lCd7eCaWjX/gMranBs+yeQHIRDwV901ZftxffSEnN
+zErfviWr+N7DEUI9Xgw3U4PnII0mySZodbQPFj3HUQS9iCJf6tgYT1ZCJctN
+VMKnaQN9nAKB6Ro2zU6o5PCuUn957Eub6P/4xTSlG6N3C/pj29i2y39qTLHG
+bu6jGi+4tnprzAc19H8vVUoJOtgHSz9Hgl7kIF9GjU9FuGQ5iUroNO0wHKdA
+AIM/rl+QTrgZjhFjW0Zkyo8kz2CoGeSnMnOKe4T6hU9TZ3bglIgilf1gJB8v
+BnlR9r5z3QxDlEiCDvbBMsqRsBdR5Muk8SkJmSz7qIRO0x6LcQp4p2v8MCa9
+haNJ2dj+2ZJdjYx/+uJGldoowDZ2XH+n7NCb7uPcog6UKWxuEpjUdXmxU71W
+Fzb32y42MH2vhl14UkiQGsMcSXoRUb4MG5+c4MmyjkrgNO2xHKeAZxbl2Q0p
+55Uc3FnC1Jfe3XJOKfghAUB83PUiwDcYp9KH9V09dKSO7cm3+MCNvKPX+mBU
+Pqa46UWAbzBOAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAQFQY3bcMAwAAcxjMMpT0tN8yTBtcAgAeb2b5kcWJZX1W62BtUuiy
+y/1ixyNpOO23DKOASwAA+D+46vTiBccUFqvh5s7guSd64HBWFOhvGUYAlwAA
+8LPBa6v/mnbTYLV05f4lOI309X7Grou53zQNSuV7NdZfW5BfoeTnjcWO0HrL
+MALESwAAeAwML81C5hWpcGP7gXDfhCot4RrN3FOYvOwLrpaFHNE1ZsZvvqAW
++jU4dN8y7BjSJQAAPBYsimPhPmGvxCdvT98bJYvaU9ips1sKY6rT8cFrqrRE
+/15M+P2L8UGrKvqFXLvTfsuwYyiXAADgtCyayiPvxIbP3ZSxY02k3/gJMxJP
+dpN+xcdVZ2Ln7O+kfCH78JwR5hN3hWhKplUX58EPT8rnI30WnlWznMI4z4JW
+mSiXAADgxHD12fnPeCZfUFqsmPL7RROfCjrebSbeVTsyH4RsuEG92BuoWuIZ
+mNVBOGkQ1YVZ8aFbtXKyxZ6+o2BfTjnZLQcawY+U1bzN3y+lnu1ilV6lzMsk
+ahmkSwAAcGJ9Za+7+25r0o/8ebBmpfuk6Es9bHbVakrCJ7+Q20U4idrXVdKr
+qDoY7Rn0pZx4WWjuyouY7LOqZpCL4I3tGQGeS6vsd6SZFScSI8JsLFhb0Uc4
+uXLdYsRlOmoZAIBLGqhOnOad/GDtqG9+f4bXivI+jM2uWu3lGA/Zp7eI1slE
+deEjM2XIy8xmHprBG1p2+E9fWzfEoCbmlTIuk1XLAACc01BdkpfH8tFJxNx1
+fOnsdWce2bPFaFetsf1jmd86oomPpC7mMw/d4LWVcd6z8hXs9j5w32I8tAwA
+wDnpm7b6ur34RkpqZlb69i1Zxfd+Gf+Md9UaWlODZ31+226hTFYX45mHbvCG
+m6nBc9hOcXy0GOctAwBwTsa2Xf5TY4o1drdNWe2qxTSlG6N32+77Iq2L6cxD
+M3hcW7015oOaAXa7LvhoMc5bBgDgnEyd2YFTIopUtpMB+121BvmpzJzinkfW
+ymR1MZ556AVvkBdl7zvXzXYLGR8txnnLAACcEK6/U3boTfdxblEHyhQGHn7r
+ADeq1EbcYV0mdV1e7FSv1YXN/ehrS9rBY/pejZFlkny0GOctAwAAAAAAAAAA
+AAAAkLC5AAAWOjo6xB7EAAAAqND7bXcAAAAAAAAAAAAAAB5vGPJ5vOifdF6P
+Q44/EytZPup9rC4ccCYG+bmTDVoaXVJPcB4vrm04eU5ue+YY0SddDVqOtBtZ
+msS6oHzUi96NARAQPlC3N+Wru7SOWsAJz+M13f06ZW/d2FN0iD/pWhByZNLI
+0iTWBeWjXvRuDIBwTLcPL9tZz/AcddvzeIfqdy47bH8MJsEnXRF5jqwaWZrE
+uqB81IvejQFgCde15Sa94jVx3NPuL6852krwUjl9S9pr2xv19v9SLy/9Ovu9
+9e+WqMleBk90Hq++cfuitBbb4tBO7jV2Xcz9pmmQeH2CEI8QsP7agvwKJcFR
+aFQ5EjcyZb5SwCxZPvFRL3o3BoA1XVPGW/sre40m9bX9r7n9buZHbUabTxja
+dof+jfjmHNZTEOI2Y89Ptv/kAbLzeDUXo0LHVoN2cq+5pzB52RdU6x/qeISj
+a8yM33xh7FtRqXMkamTH+UoC/WT5w0e96N0YAA6YeoovdD/sV0N1az3+uKi8
+f+wnsHvfzQl46zrhl+qR12L6/bOZcLFAfh7v0PWkgHmnlLjjT46JQ3U6PnhN
+lZYqG6p4BIXfvxgftKqiHzVHgkZGyVca6CbLGz7qRe/GAHBu4Ory6SF2bzzS
+N272D0xrJVqtDVQtn+adUq+zqH/YNH/JtqPna7pQDuU1tH4Y+Of3aM6cFsWx
+MJ+4K5RTFMN4qOvVVB55JzZ87qaMHWsi/cZPmJF4shvhhHb8/vlIn4Vn1YjV
+2zcySr4MY+O8QJrJChQV3wUy6sYAoMM1pavnvF1u99v42srXpwV+0knwNGN4
+Xf2c54pLVwsPHy36icbOTVPnJ7LnEmg+Fh+oWuIZmNVB9VCFaTzUcPXZ+c94
+Jl9QWqyY8vtFE58KOt5tdrxnVd+8zd8vpR5xqWbfyAj5EseGWfGhW7VygucC
+D+LqKNiXU64m+VYvSLK0MUiTfoEIaY7FqBsDgArTXE5bf7CFoIv3l0c+Kztw
+234doWvY6D3+2YDpoTk0Hz+bb3/+vEf0ZXrfyjUl4ZNfyO2iuEOIHA+9w2FG
+7of4bmsaXQ4N1qx0nxR9qQdhH6yxPSPAc2kV4oi1b2TH+RLGVtKrqDoY7RlE
+9rolc1dexGSfVTWDqAXykKyV/SVwlKYDDNO0yYFJNwYACa5ry9998DrxLyto
+ryz2kH12y26aM7Ts8Jvy6qE9L/3Ba0MdrS1cps5smWccjRE8GsblGA/Zp/Zh
+cBAPpYHqxGneyQ+WgPrm92d4rSjvwxD2wQ6H4z99LWog9o3sMF+S2HA2r8AT
+JlkuohIlzbEYdWMAEBjv/HtvTnXf6PYxrK/hu9OKMc+SdfXr//R8Rrvt8+Xh
+ITFz8vz/9Kp+iJvk9uqJbhqPuI1tH8n8N6A8gbForhZ8W9tnGa3vY5nfOvJh
+zyIeKkN1SV4ey0eHqLnr+NLZ6848siOKah+stjLOe1a+AjEM+0Z2lC95bMwn
+K4GS5SYqEdIcC70bA0CDRVm0yvvXTz7x0JO/8U+32UlmUeSFyrY2PfooAxtq
+L/lyhftvp678tlndmhfx+1+5RWWcv4v6PE134x8BYV91I+wh7itP8PZOKB39
+RmtoTQ2eZfcEkot4KOibtvq6vfhGSmpmVvr2LVnF936ZAqj3wRpupgbPQZ8x
+CBqZIl/q2BhPVkIly01UwqdpA70bA8AtXcOm2QmVHN426y+PfWkT/fUFpind
+GL1b0HWJsW2X/9SYYo3d5O5gHyyurd4a80ENjd+9JWhkB/mSxsZ0shIuWU6i
+EjpNOwy7MQDsDf64fkE64WY4RoxtGZEpP5I8ZKJmkJ/KzCnuEeo3Wk2d2YFT
+IopUtsPXwT5Yg7woe9+5bnpREjYyRb5ksTGerIRMln1UQqdpj0U3BoAtXeOH
+MektHE3KxvbPluxqZLy8wI0qtVGAffq4/k7ZoTfdx7lFHShT0LoLgul7NQwi
+JGlkonypYjOp6/Jip3qtLmzuR7+9K3iyrKMSOE17LLsxAOxYlGc3pJxXcnDr
+DFNfenfLOaXgpyA4Ae4aGfANujEQHdZ39dCROrZH++IDN/KOXuuDaYcYN40M
++AbdGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AEZhdN/26wxcMikAwGNAT/ttv0xgwk6LAiQlcEaSqt0ZQYsBZ4HTftsvIrP8
+yOLEsj6rdbA2KXTZ5X7OCkbAT1JiZiR27c4IWgw4NfS3/aLBVacXLzimsFgN
+N3cGzz3RI8pRtZwmJW5GkmhPpwItBpwYrbf9ohm8tvqvaTcNVktX7l+C07h7
+FyA6rpMSNyPE2o1dF3O/aRqUyhd1rL+2IL9Cyc/7sB2AFgPOiu7bfpEMr01C
+5hWpcGP7gXDfhCqt0IsU7pMSNyOk2s09hcnLvuDwyw4XdI2Z8ZsvqAV/yRK0
+GHBStN/2i8SiOBbuE/ZKfPL29L1Rsqg9hZ06qoWIpffUynXVWk6qHsFDUjQz
+4hhK7ZjqdHzwmiruWpEj+P2L8UGrKvqFXYlCiwGJsWgqj7wTGz53U8aONZF+
+4yfMSDzZzer7EK0CcdWZ2Dn7O5FfT2+5+695Cx1sj+A8I1pl0s1I+NqHJ6Ew
+n7grRBOMuJ1heIo5H+mz8Kya5RTDeQ90+RYD0oKrz85/xjP5gtJixZTfL5r4
+VNDxbsyKD92qlTNb4BEVaCbeBjwyIEI23EBfnaLMyXQCYJUUUSvRzkj42geq
+lngGZnUQzkIMOoO+o2BfTjnZF2h610LfvM3fL6Webetx3QNdv8WApPSVve7u
+u61JP/LnwZqV7pOiS3oVVQejPYO+lDP6iW9f4KUeltuAzYoTiRFhI0J8np4w
+c9boHxesregj7PU8BMB5K/2S0SNoZMSidk1J+OQXcrsIpwT6FZm78iIm+6yq
+GSSujN61MLZnBHgurbLfksi2udh1AGdsMeC8BqoTp3knP/hBq29+f4bXivLh
+jj58qUNeZjbbEBWIcbUNGGWdzEcAnLeSiLVrL8d4yD69RbTqE7szGFp2+E9f
+WzfEoCbmlTrm8i0GpGSoLsnLY/noZTZ3HV86e92Z0T1hzDsVSYEP/5LtNmCE
+OZmPADhvJTFrN7Z/LPNbRzSMRe8M2so471n5CnYbCbjvAK7eYkBK9E1bfd1e
+fCMlNTMrffuWrOJ7D7sR405FVqCVm23AjudkPgLgvJXErd3Qmho86/Pbdss+
+0TuD4WZq8By27clHB3DtFgNSYmzb5T81plhjd1eO8RqMrEBe9jYLFADnrUQL
+D7VjmtKN0bttN/6J3RlwbfXWmA9qBtjtIeCnB7pyiwEpMXVmB06JKFLZX1OG
+nYqsQH72NgsUAOetRAtPtRvkpzJzinseWfmJ3BkM8qLsfee62e4h5K8HumqL
+AcnA9XfKDr3pPs4t6kCZwjC2F5jUdXmxU71WFzb3oy8nqAoUBB8BcN5KEqod
+N6rURpyfimhfC0zfqzGyvGa890CXazEAAAAAAAAAAAAAACjNBQC4uo6ODrFn
+GgAAAAAAAAAAAAAAAAAASA7G8ixiyXP5BK2PR44/EytZPup9rC4cQKNnexax
+1Ll8glbUHA3ycycbtE4/7sW6oHzUS1Qmrm04eU4urXcFAiHhXB2GLFUun6AV
+KUd8oG5vyld3XeA8BbEuKB/1Epdpuvt1yt46OIzoccf6MGSpc/kErVQ5mm4f
+Xraz3qUOSxfrgvJRr22ZQ/U7lx22P00USByua8tNesVr4rin3V9ec7SV9HV7
+uF5e+nX2e+vfLVETvljdinoUrbHrYu43TYPE9SDUwjusv7Ygv0JJcICXiyRo
+ZZqjviXtte2Nepv/lzJfKWB7QbnHR71EZeobty9Ka7G9YEDadE0Zb+2v7DWa
+1Nf2v+b2u5kftRnJPor1FIS4zdjzE/EH0I6iNfcUJi/7gmp5QF2LQHSNmfGb
+L4x9Y6VLJWhlkqOhbXfo32zugDrOVxKYX1Du8VEvWZmai1GhFEMaSJCpp/hC
+98NLNlS31uOPi8r7yT478qJGv382E/7URTuKFlOdjg9eU0X0/nWkWoSD378Y
+H7Sqov/nxZ+rJWilnyN277s5AW9df/TOBUq+0sDwgnKPj3rJyxy6nhQw75RS
+ut9hAKWBq8unhxC8zOb//rpq+TTvlHqdRf3DpvlLth09X9NF8zxai+JYmE/c
+FcoRzL4Wgno1lUfeiQ2fuyljx5pIv/ETZiSe7HZ0tDh+/3ykz8Kzalp1O1OC
+Vto56hs3+wemtT6yJEbJl2FsnBfI6ILyHhXfBRpaPwz883sSWAAABnBN6eo5
+b5cTv4jdOrqKfs5zxaWrhYePFv3EbAvkQNUSz8CsDqpnDhzUQgBXn53/jGfy
+BaXFiim/XzTxqaDj3ZgVH7pVKye9f65v3ubvl1JPaxkjqQTNjves0stRW/n6
+tMBPOh/JDiFfRo2v7yjYl1OuJvlWL0iytDHpY7QLREhzLFPnJ7LnElxzm5Cr
+wzSX09YfbCHvPbqGjd7jnw2YHprD/DmupiR88gu5XRQ30JBrMStOJEaE2Viw
+toL4R8rI7QLfbU2jq4XBmpXuk6JLehVVB6M9g8jfxWNszwjwXFpFqzdLKMFL
+PQj7YOnl2F8e+azswO1HGsxxvoSxOWp8c1dexGSfVTWDqAXykKxViD5GiWGa
+Njnc/vx5j+jLTnBzCYyB69rydx+8TvV7AIaWHX5TXj2056U/eG0gen86Eu3l
+GA/Zp7fIJyNOarE3UJ04zTv5wQpJ3/z+DK8VI18HHLwfbTgW/+lr6UUhpQQx
+hH2w9HLUXlnsIfvs0ewc5ksSm8PGp1sg98lyEZUoaY5l6syWecbRW1kA0Rnv
+/HtvTnXf6M4srK/hu9MK+8e0w31r5uT5/+lV/RA3ye3VE900nhVbNFcLvq3t
+s4yW8rHMbx35qGBRC5WhuiQvj+WjPdjcdXzp7HVnVA+ioRwv2so471n5Cscx
+SDbBh39JsQ8WOcdRuvr1f3o+o/2R3uEoX/LYmE9WAiXLTVQipDmWse0jmf8G
+wR5gAg5YlEWrvH/95BMPPfkb/3TbTVrYUHvJlyvcfzt15bfN6ta8iN//yi0q
+4/xd1AdTfeUJ3t4JpaNf+AytqcGziJ8isqyFgr5pq6/bi2+kpGZmpW/fklV8
+7+EIoR4vhpupwXOQRpNkE7Q62geLnuMoiyIvVLa16dHnRRT5UsfGeLISKllu
+ohI+TRu6G/8ICPuqW8yt8EDaME3pxujdgv7YNrbt8p8aU6yxm/uoxguurd4a
+80EN/d9LlVKCDvbB0s9R17BpdkLlmHuTDvJl1PhUhEuWk6iETtNOf3nsS5tg
+mQwoGeSnMnOKe4T6hU9TZ3bglIgilf1gJB8vBnlR9r5z3QxDlEiCDvbBMspx
+8Mf1C9Jbbb4zU+TLpPEpCZks+6iETtOesS0jMuVHkmelAPwMN6rURgG2seP6
+O2WH3nQf5xZ1oExhc5PApK7Li53qtbqwud92sYHpezXswpNCgtQY5qhr/DAm
+vcXuRiZRvgwbn5zgybKOSuA07RnbP1uyqxFWyQC4Lovy7IaU80q4P+kEMPWl
+d7ecUwp+mAcAQEhY39VDR+qc//xkV4cP3Mg7eq0PfnoCAAAAAAAAJO1/AXTF
+Kdc=
+ "], {{0, 207}, {476, 0}}, {0, 255},
ColorFunction->RGBColor],
BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
Selectable->False],
- BaseStyle->"ImageGraphics",
+ DefaultBaseStyle->"ImageGraphics",
ImageSize->Automatic,
- ImageSizeRaw->{474, 237},
- PlotRange->{{0, 474}, {0, 237}}]], "Output",
- ImageSize->{478, 237},
+ ImageSizeRaw->{476, 207},
+ PlotRange->{{0, 476}, {0, 207}}]], "Output",
+ ImageSize->{480, 207},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellLabel->"Out[6]=",
- CellID->607915696]
+ CellLabel->"Out[5]=",
+ CellID->1455716630]
}, Open ]],
Cell[CellGroupData[{
@@ -716,140 +874,141 @@ Cell[BoxData[
SubscriptBox["p", "1"], "]"}], "\[Rule]", "0"}]}], "//",
"FCI"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1848776094],
Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
-1:eJzt3Q1QE2f+B3Cv/f97nRtv2pspClYsRhEEfD1KegXfqFJAqVNfcPBO23Na
-KVhaK9JitV4LLWA759vRcnfaweqc98e2ngUqnFjhqqWKpbwUfMGiHqgRCIFE
-AnnbzT+hFiHZTXY3u0k2+X5m7iaV7PM8v2d/v+xu8iQ7cd2ry9bfN2rUqPQH
-Tf+37I9vLNi06Y9blv+P6T+it2x+cd39pgevmP4n+8WoUebHRgAAABAUeaf+
-L8nPZ+7cvW31iwWX+109HBfDbAC4BqmoWBL+SoP67qON5kdAqa/21cXbf+g3
-Ep3H5gStOqvipVHRzr+nzYZod4QLYK5cq785M3zRF52E0ThwYWtETHEn6eoR
-uT3d1T3hIRvq+UlU0c+/p8yG6HeEE2GuXIq4/Vl0+JbmAdMxs6skJmLrhQGq
-Z+lvH9+RX69yl11DKmt35xbLdC7pXPvfwy8mZJR26Hlpjdn8uy+PmQ0UAnOY
-K9fqq10/M+5Et2lm+75Pnb24QkExx3pZUWLEy9VKd5l+80XZqXUzEw7e4Oel
-ggX97fKsjH31dwi+GmQy/27Lk2YDhcAc5sql9G37Hp+cWK0yzfHRVZIZuS0a
-6+eozqWGPbH3qnsdojQtubOCk7916nGc6DmTk3agxXxaQWg6NXy8VDGZfzfl
-WbOBQmAOc8UvXcdX+zNjQwOjD127WfnRtheekkxN+lxGf2xRfpM4KWhOZPTT
-zyStT5ix8nSv1TNIeXmCRPpxm0UbbDvifeS6q3tmBSwdPNw7qUdNS86MMVN+
-KzWJmC39PeVHb/zPv7N42GygEITr0ZvnShhEx7Eo3+CMwpy8kjatoeNopGTJ
-GSXdk7VX8qRR+y3ndoTe0yseC9l+0fpdK1YdDdF1nT9V203ZIcsG+5syggJW
-Vdvvkh63EHhsk8H8O4+HzQYKgTnMlWv1fbcuwCd8bW5NLzF4ISMNfalOTbOq
-luz+d/zs1DpbH/xrr7wf5jvnS7n1sYm6I0LVUPTemplBsV9TniYNNGcGPhRE
-tTvZjdw4+BlIlN/0na1aNrPjUI8OtEk9LQzm34k8bDZ47hqFgBcNoWhbd00f
-/Ujc4HKcwauUKTHF5sdcV9X2N7422S/2tPWhia4jk57K+QHzq6ivbUlN141e
-ymMm65Erzyx5NDD9B+uXEdW5pAm/+uVwvw7eTPE8vufKgWlxAyKZDUd3Lteu
-UQie/aLhQqS8bKHPuMSqHvNBjugsWRq2okw+/DMitqtqNZezQ3znllkdNG11
-1FvFoSjYj1xRscAvNIfiUxBS09l2/dpw129066wO+7zPlZ02OU2L04hlNnjY
-uZy6RiF49ouGC6nrUieOXVjaZQqCUFSlS+M/bB0+PvarasnuirjxoVmXLKO0
-1RGn+Wc9cu2VHdP8F5/kviqM97my06Z7v2h72Gzw3jUKAS8awtBdL5g1+kH/
-mOQ3t29JW7sh/2yP4d4fua2qNciK5k148tBNw4h/tdkRl/lnPXJCdmRewIJP
-ZQarpoTq0dE23fpF28NmQ4CuUQjMeexcCYBUnIz39V9D9eYT91W1hLxseeCc
-AyPWpNvoyMhp/lmP3HDrcHTwynI5y9cRB3p0rE2je79oe9hsCNI1CoF5ox46
-V0Lob9w02W8R1ae2TFbV0hq4nBf5+DvNwz68pe+IUDWVFqRIHp6UWlDapGI8
-O2xHPnAhWzr3A0femhJirnifFqfxsNkQqGsUAnMeOVcC0LcXRoyPLGznfdkv
-qW7em5J9fugrqbx3xLJBUlmTlZJ/wZHFYULMlWDzLzgPmw0UgmA9MueBcyUI
-Uq93zjvsvHfktJEL2qPzo+CLh80GCsENe/SAuQIAAAAAAAAAAAAAcDek8vs9
-7/61lcstOEYBMNDY2Oh4nro6CACnslU1hluHpROiOX2LQAHAgMHAwze8XB0E
-gFPZqhqaF22mP8AFwBVyDICVoZL53/t+cd8DliXD8Ae4ADhDjgGwcrdkWs/t
-mTnuyf9rRMkAAIiAA+9pAwCAsxHdVZuef/OHPlePAwAAAAAAAAAAAADAXdHd
-RN45m7sDDwiBjuhCE92ArSEEd+YZodHeRN4pm7sDDwiBjuhCE92ArSEEd+ZZ
-oVndRN6pm7sDDwiBjuhCE92ArSEEdyaC0Aw9NZ9sTQibMC2tjnpNofVN5Hnc
-3HzH4+M78utVQ98YstugIEhl7e7cYpmO8o82Q7Acv9vhHpoLeH06GcUfAirC
-YYSq4e9pz65Of/utjUlJWf9RUPzEyZ2atf6+8RUKimmmuok8n5vrZUWJES9X
-K0dsa6NBwZCKU+tmJhy8YbWvbIdAOX43wzE0QQicjWJPJ6P4Q0BFOE7dkDbJ
-d+E/b5mqQ9u6K2L2WxetfuFVc/ndEJ+IT25YFRD1TeT53Fx1LjXsib1XRx7z
-aBsUlqYld1Zw8rcjzhDshUA5fvfDJTRBCJyNYk8no/hDQEXwwNBb+9mnF++Y
-B0d2FkdNfPpry2/DG27+44kxU9+5pCHVLUWbY4LHzU5vHHw/h/om8lYdcN+c
-lJcnSKQft+mZNciWruOr/ZmxoYHRh67drPxo2wtPSaYmfS6jv+zRXd0zK2Dp
-ie57O9JOCNTj5z4A3iPiHppABM1GsaeTB4SAiuCb6tv1IdI//6i1+OeeymfG
-TXju7K3vd69Zlpr3t8LD5ZfYXB44sHnv6RWPhWy3PNlycDzDER3HonyDMwpz
-8kratIaOo5GSJWeU9E/vb8oIClhVbeMZTMbvwADu0nWdP1XbTZl53BpkH5rw
-+M9GsaeTUfwhoCJ4Zeg68XrM6vymPsv3mtT1aZIxv8vLSn73VBeHyy8HNtde
-eT/Md86X8pEjcnA8I/R9ty7AJ3xtbk2vKcf1bfukoS/VqekXZJJdJVF+03e2
-Wr6QsBo/gwEQqoai99bMDIq1Os8cNNCcGfhQEHXqs4yIa2hCEyIbXZVOtHuT
-/ZyjIry2IqyZ36157vWjbRQDNF0mzPCR/EE69tGVlT3sPzxwZPP+xtcm+8We
-HnmsY9Ig01/m17bumj76kbgvOs2nJeYrtykxxebHtAsylWeWPBqYzvQ3/inH
-z2gARvPZ0/yA+TQ/3Ehqum70Up5WsI6IY2iCEigbXZZORrq9yXrOURHeWRHW
-CGXNrpezKzppLi7+NW/slDeqTz7/mG/c0Q7TgZzUs7jycmhzzeXsEN+5ZSOO
-y4waZPjL/KS8bKHPuMSqwUwnOkuWhq0okw9vzGpBpqJigV9oTouG+/gZD6C3
-ij5FabGPaAi70IQjXDa6Mp2o9ybrOUdFeGFFUNC1H1g+9091Kr2ZrudK5e0R
-o1RVJ/mPX/WNUt2wOfA303Mu9v54cGvZbVsXYdr2IzuOtGt52JzsrogbH5p1
-afiA2DdIT12XOnHswtIu0/4kFFXp0vgPW4d3Zb0gU3tlxzT/xSeZLqyiGj/j
-AXBKUdYR3fsTu9CEImQ2ujKdKPcmwzl3kxCMqAh3oW7YKHng3u2D7x/7bPXw
-K4WBi2+Hhy473kUYie5TGyMDpsalHLxq+9ijrt+06LW7Ry4HNzfIiuZNePLQ
-zXsZyKFBWrrrBbNGP+gfk/zm9i1pazfkn+0ZlulUCzIJ2ZF5AQs+lTEuCOvx
-Mx8AlxRlHdEQ1qEJQ9hsdGE6Ue1NpnPuJiGgIoARQl62PHDOAetF7jwgFSfj
-ff3XUL2bRb0g03DrcHTwynI5m3eHbI3fxgCMnFKUdURDOIQmRi5KJyPl3uQ2
-56gI5n2hIlxk4HJe5OPvNNtYI8RVf+OmyX6LqD7Jpl6QOXAhWzr3A7ZvcdkY
-P/0ACFVTaUGK5OFJqQWlTSrGecM2onuD5BSaGLkinaj3Juc5R0WgItwdqW7e
-m5J9nvdvverbCyPGRxa2MzxlIZU1WSn5F9h/ZYF2/CwHYB/XBjmHJkZiTyej
-+ENARQBXpF7v2s8YeB+AyyPyZh4w+S4PARUBAAAAAAAAAAAAAAAAAAAAAAAA
-AAAAAAAAAAAAAAAAAAAAAM5h926hAADgPuzfLZQDUlGxJPyVBvXdRxsb8JOR
-4AxIPPAi9HcL5aC/OTN80eDdpAcubI2IKe7Er02CMyDxwGvYuFsoB8Ttz6LD
-t5jv9EF2lcREbL0gwD1LAKwg8cBL2LxbKBd9tetnxp3oNp3l9H2fOntxhTve
-Hho8EBIPvIGdu4VyoW/b9/jkxGqVUS87ukoyIxf3rQOnQOKBGOk6vtqfGRsa
-GH3o2s3Kj7a98JRkatLnMvp3PezcLZRTm8pvEicFzYmMfvqZpPUJM1aeZnU3
-aoCfIfHAOxAdx6J8gzMKc/JK2rSGjqORkiVnlM5sU3slTxq1v423e52C90Li
-gTfo+25dgE/42tyaXmLwglEa+lKd2sH12NRtEqqGovfWzAyK/Xr4KQ3Z/e/4
-2al1WGsFjkPigRfQtu6aPvqRuMFlT0ZSXp4wJabY/NiR9dh0bZr0VM4PmF+F
-61AQAhIPvAApL1voMy6xqsf8uTnRWbI0bEWZfPinixzWY9tqs7cKtQMCQeKB
-N1DXpU4cu7C0y5TmhKIqXRr/Yevwj9A5rce21SZqBwSDxAMvoLteMGv0g/4x
-yW9u35K2dkP+2R7DvT9yXI9ts03UDggFiQdegFScjPf1X0P1jjXn9dg22jSi
-dkAwSDzwBv2Nmyb7LfpSbv1FMCbrsdm2SaiaSgtSJA9PSi0obVLx9n1KADMk
-HngBfXthxPjIwnY+V6oK0SaAXUg88AqkXs/7ry0I0SaAXUg8AAAAAAAAAAAA
-AABwnVEAYtbY2IgSAM4czx/nUwCImcFgsJ/lKAGg4Xj+AIDjVOeSJvzql8P9
-OnjzDyx/SxcAAJyD1HS2Xb823PUb3TqsWAYAAAAAAAAAAAAAAAAAAAAAAK9F
-3qn/S/LzmTt3b1v9YsFl1mtgHdzcHSAEQBV4QAjeo6/21cXbf+g3Ep3H5gSt
-YnEbF142dwcIAVAFHhCC99Fd3RMesqFe7ZrN3QFCAFSBB4TgIQw9NZ9sTQib
-MC2tro/yCdr/Hn4xIaO0g/qGRg5ubr75+fEd+fWqoe+y2W1QEKSydndusUxH
-+UdPD8Fy/C5mMxCBoArMkEJuglA1/D3t2dXpb7+1MSkp6z8Kih9PuVOz1t83
-vkJBMeX62+VZGfvq79i6Lagjm+tlRYkRL1crR2xro0HBkIpT62YmHLxhlZIe
-HwLl+F2KNhDuUAWMIIXcgrohbZLvwn/eMmWptnVXxOy3Lg5YPkVz+d0Qn4hP
-blglMtFzJiftQIt5A0LTqaHJOUc2V51LDXti79WRR0TaBoWlacmdFZz87Yiz
-BS8IgXL8rkYViCNQBUwhhdyAobf2s08v3jEPnewsjpr49Ne9ls+4+Y8nxkx9
-55KGVLcUbY4JHjc7vXHwbStNS86MMVN+KzWJmC39Pc0HEA5sTsrLEyTSj9v0
-zBpkS9fx1f7M2NDA6EPXblZ+tO2FpyRTkz6X0R97dVf3zApYeqL73m72/BCo
-x8+6XycE4hBUAVJInFTfrg+R/vlHrcU/91Q+M27Cc2dvfb97zbLUvL8VHi6/
-ZPM6kL/Ne0+veCxku+VJj4PjGY7oOBblG5xRmJNX0qY1dByNlCw5o6R/en9T
-RlDAqmobz7Ai9hCox8++37t0XedP1XZTFpLw+4IZVAFSSCwMXSdej1md39Rn
-eeBR16dJxvwuLyv53VNdHC7FHNhce+X9MN85X8pHjsjB8YzQ9926AJ/wtbk1
-vaZ817ftk4a+VKc2v79Z9N6amUGxlqdbZFdJlN/0na2WBe1+IdAunWUZAvX4
-6fulnbqfDDRnBj4URFXAQgfCEKqA9yrwthRyGvObUs+9frSNYvimi4gZPpI/
-SMc+urKyh/2VhCOb9ze+Ntkv9vTIIyGTBpn+AL62ddf00Y/EfdFpPkUxX8VN
-iSnu/Ol0padyfsD8Ksu0UZ5Z8mhgOouf0ndZCLRLZ9mFQDl+W/0a6abuJ6Sm
-60Yv5VmSwIEwgSoQogq8KoWchlDW7Ho5u6KT5orjX/PGTnmj+uTzj/nGHe0w
-HdRJPYurMIc211zODvGdWzbiGM2oQYY/gE/Kyxb6jEusGsx6orNkadiKMvnd
-xnqrqNJGUbHALzSnRcM0ApeGMMhq6Sy7EKjGb69f6qmzQ+hA7EIVCFQF3pNC
-zqNrP7B87p/qVHozXc+VytsjYlBVJ/mPX/WNUt2wOfA303Mu9v54cGvZbVsX
-ZNr2IzuOtGt52JzsrogbH5p1afiA2DdIT12XOnHswtIu004mFFXp0vgPW4e6
-okwb7ZUd0/wXn7S3yMpNQjBSLZ1lGMLPqMZvr19OFSd0IHagCnivgp95Swo5
-kbpho+SBezcmvn/ss9XDP/wduPh2eOiy412Ekeg+tTEyYGpcysGrto9M6vpN
-i167ezhzcHODrGjehCcP3byXjRwapKW7XjBr9IP+Mclvbt+StnZD/tmeYVlP
-lTaE7Mi8gAWfyuwVh5uEQLV0lmkIQ6zHb7dfLhUnfCA2oQr4r4Ih3pFC8DNC
-XrY8cM4BQZbAk4qT8b7+a2iWaFGkjeHW4ejgleVyFtfFRpeFQL10lkMIVONn
-PXX2OCMQ8RJ7FSCFvMzA5bzIx99ppvqs2EH9jZsm+y2i+lSbUDWVFqRIHp6U
-WlDapPp5pw5cyJbO/YDDG2CuCIF66Sy3EKzHz3bq3CQQ8RJ7FSCFvAupbt6b
-kn2e92/A6tsLI8ZHFrYzPH0hlTVZKfkXOH19QewhWI6fZb/2OXFfiBRSyA6k
-kFcg9XrRfQJhwVUh8N6vB+wLkUIKAQAAsPT/xzgAGQ==
- "], {{0, 110}, {487, 0}}, {0,
- 255},
+1:eJztnX9UVGX+x22//7R7PLutrXs4rZogAUJSQAVm4pK2mGQsyPekBp4j2Xr8
+RUjlz2zTNDQMlbCS8tdxUUut2Fr8maCggRog8ksIUJQBHKYZBphfzL2zgKzB
+zL137q+ZuXN9v86po3J5ns/783w+89x7n888j2fiG7H/+M2wYcPefLD3f7Hz
+V0akpMxfPeuh3r/8f9KbixYmvb7gxaS3Xl/4ekpY4v/1/uNrvf+pHhg2rO/P
+FgAAAABwgdAUf/SPlyaN93xy7s7KbtLV5gAAAOCEvvFfe37qICzGxs/Dx0Wd
+VTugCwJzA3ArELHAvSDNOnN/0HaXJk1acKlTnFZ7mvbNSizQWCxdpUnh8y52
+iNMqAI4CEQtkQPe1D1/PqjeI0xjZfnzWjEMKs8VwfWPYtCOthDjNAuAgELHA
+7SE7Kw5+cb7dLFZ7XVcW/y31usFibj7w17DUWpEmBwAcBSIWuDek/ubJY+fa
+TBYL0XWzTivCZ3nvHc3EF3LbSWP9rgj/hGItbm2AtEHEArfGdPtggq+Xb0Av
+/o9PfqdCJ7xJs+JQhN+U5+OT16dtiw6J3prTqMOSEZAwiFggPczqon1vx0VM
+W5W+YUlUwIiHJyQea+lxWptk+4m4qTsbTQI7BEAQiFjg3pCqk9Mf8U4+ozRb
+COX3M0c+FHq4pUdgfThVm4SF7L5R2jTk1qUvJyauuCbCXT0AQkDEArdGU/CK
+p/+6Kn3fn7tKFnqOijnXKrQ+3LbN/DZF8e4Y79AvmoTe6gMgPohY4M50Xkoc
+55tc3n97oa9+b4LPgkINIbA+nKpN0mKsT5/4HJICSBBELHBnusuSfLzm939S
+9zQfnjt52YlBpYQ868Np2kRSAImCiAXujL5qrb/HM6+mbNqekbZ+TUbenV9D
+lnd9OF2bSAogTRCxwJ0x1m0OHBubp7ZZxBRQH07bJpICSBJELHBnTI2ZwWMi
+c9ut41dIfThdm0gKIE0QscBtIfW3Cva85jncI3pXgcIgzhcYmNo0qcqy48b6
+LM6p7hDte/wACAMRCwAAAAAAAAAAAADcmWkAgGnTGhoakE3ACYgSaQAA9vQo
+jiRGTrFixtILGuzMB0QFkQYAAAAAAAAAAAAAXAXBep9w9le6KbIXaLk/NLoQ
+ZNM9ZC/QgRiaTh2r0HLwmZ5in3BSW3HsVJP1LoVUV8oK2Qu03B8axQPZxB/Z
+C3QYZGfZtpQvb3M6LIqk3CfcdPurlG1lnaT9K2WE7AVa7g+NIoFsEoTsBToK
+08298zaWd/P7Zet9wrvLN87be5MqhnnuKO4+yF6g5f7QKAxkkzg4VCCpqzuQ
+9LzPyOF/9Hxuyf5amoOqjc1nD3xd1SWV9zpER+nRgxeUNLun6WtSX15fqbf5
+d1LfdP6rzHeXv5OvImgaptonXF+5fmZqjXVz7HYUZ/QbC3scDr0nZSLQIlwj
+B5BNQy5BNv0P0SNtKLqq9Dd2FrUZTaorO1/2+MMTH9YZba7pac1Jnve5xCZK
+XeX2+NVnVBR+MdRtCf879SsoovXoRI8JW3+21dgH3T7h6rPR4UP9wm5Hcft+
+Y7bHSVB5UlYCLUI0cusG2XQPZNM9HBBpQzG15p1pGZDdXbbU6y8zCzusLiHa
+j8eHLSnWit63QMhfzsaHLrrQYT03E3e+nRr0xlXKh8C+s18D/llte2thYdon
+vPtqUtAL3ylJ+1cOsYOF35jscR42npSbQAtvjdxANt0D2eTQSGOg8/L88RM/
+s35vZVYcmuI350cq/5nVRfvejouYtip9w5KogBEPT0g81iJol3huDZK/nI7y
+e+mkyiry9JWrA4NTa6lm7c7i+eN8U8p1ZtUPq6bPXrf/dEkzm83CDbUfBD/5
+LsfwYPCbUHuY++UxKDSetNORGwm08NQoAGQTDcgmR0Kqzy+e+mahzRf4O4tn
+ewdnNFAuU5Oqk9Mf8U4+ozRbCOX3M0c+FHq4hbCQ3TdKm2jeClr0DUd3ZBVS
+Pb3RNdhDW3Wpr14XGJBSbjW7aYteGRf8cSOFwb03SI95Lzh3OWfv/tyfOdRv
+mho/DnksgeMSM5PfBNrDDI9BofEkM5ISSB8k9+Cjkb+NyCY6kE2Og1BfTF2+
+u4bCMnV+xOinDzRTRkrfU4z/uqr+ibWrZKHnqJj8NkXx7hjvULrDm3qasyNH
++y0q6aI2w7bBc630VZfG+vQg77nFVgHRURj1aMium7b96ypW+o54NGh8eBbl
+Sjk9PTc/e8or5iK3B2Emv3G0h9ueOdwHhc6TzEhIIFOQ3IOPRp4gmxhANjkI
+Uld3cMvuq9TV/dqLsV4hn9ygck3npcRxvsl3Zx199XsTfBb03X4IOIOPqkGC
+vurSULMhcPzSMqv3dtofZ3mFfGprcO/VAWNe3LP12T/7rLD+HWZMjZkh3nM4
+DguD34TawwivQaH2JDNSEsgQJIPN4ayRD8gmZpBNDsF469/bsi5p+ot0CE3F
+t8cVQ1Z6jfUfhQQso7KpuyzJx2t+fyj0NB+eO3nZif56Gv6BR9PgwA9tqy61
+RXN8Jx1UWE3RuvLljz+VXm+9XN1r1hOjp/+nrf2HOaM8XjzSwmG52Fj3YUjg
+CjZLE2b15aPflGruuoHOb4LtYYLfoFB7kgLJChz4IUNpLmuNgkA22QPZJD5m
+Ze4i398+MGyAB34XmGZdr2Oo3RQ2yWatpndyqlrr7/HMqymbtmekrV+TkXdn
+QBXvwKNr0EJTdWm4vilsqm1HZkV2eMjaqsFLKER3ff4XCzx/P3bhN9Wq2uzI
+Pz3oEZ1++jbbBRDdtbeCpnzZwqIaVVOY4OubcL7/+YzOb8LtYYDfoNB4kgLJ
+CrTYK81lr5E/yCYWIJtcA6E+vzJmi/X0aazbHDg2Nk9t4yy+gUfbIHXVJam9
+tDb2/ZJO28HSVayanFAkYklXR2Hcs6u41wlR+82h8BoUek/aQUoC7ZTm8tYo
+OsgmZJOrMDR9tz0rr3XQXGhqzAweE5nbbmstz8Cja5C66tLQlJu541QL9buy
+rp+Wz0ijrJHihbEuPSrlJ5plJGZs/eZQ+AwKoyftIhGBdkpzhWkUHWQTsslV
+kMZ2lfGuIlJ/q2DPa57DPaJ3FSisnl1MqrLsuLE+i3OqO9i/G2JqkBJC36Y2
+0l+nq/wgNq1GpMgz1n86e3Ml77uAQX5zKDwHxY4n2XQsAYHMCNcoOsgmfkgh
+2ByaTWAQZuXJFSmnlSLsrUCozr2z5pTSicsVAEgLZBNwEYTm8p59ZVx2SKaC
+7LyWvf+KxpX7OgHgcpBNAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAADgBGH/aPj7GvgHAFdDIPEY0bM4Gl4gbj0EsvePW4+O
+S4DHnEJP075ZiQUai6WrNCl83sUOV9sjaUgWR8NzRz5DIEf/yGd0nAU85nTI
+9uOzZhxSmC2G6xvDph1pxS7FbGA6Gp4zMhwCGflHhqPjYOAx59N1ZfHfUq8b
+LObmA38NS6U9C9DYfPbA11VdUnlAIjpKjx68oHTNqdjMR8Nzh+UQuA3y8g8S
+hCvwmNPpnTAnvpDbThrrd0X4JxRrKWfOntac5Hmfi3VzJRK6yu3xq8+onH1Q
+lZ2j4XnAagjcBrn5BwnCFXjM6ZgVhyL8pjwfn7w+bVt0SPTWnEadzexItB+P
+D1tSrHWFfUyQv5yND110ocOZ07mdo+H5wGYI3AbZ+QcJwhV4TAzM6qJ9b8dF
+TFuVvmFJVMCIhyckHmuhfVAg20/ETd3ZaGJsUHFoit+cH6lczqkv0Y3vdfrp
+KL+XTqoEOl10FZzaZDMErkV+/hG3dyTIkD7hMVEgVSenP+KdfEZpthDK72eO
+fCj0cEsPdTVvn8snrrjGfMvUWTzbOzijgXJcqPoiLGT3jdImulsmfcPRHVmF
+dA8uHIzva6t6XWBASrnQWz5unfJvk8ozrIbAxcjPP6L2jgTBR4r4aApe8fRf
+V6Xv+3NXyULPUTHnWoVU86rzI0Y/faCZ0km2feW3KYp3x3iHftFEPeX1NGdH
+jvZbVNIlhvHG+vQg77nFtmVtPYojiZFTrJix9IKGMhDE9hh1m/Y8I13cwT9C
+R1xA70iQ++Ejxcl0Xkoc55t8dzrRV783wWdBoYYQUs2rvRjrFfLJDaqpk6ov
+ss8TE5/jl4wcjTfUbAgcv7Ssm0dP/Dvl3aYgz7gQ+flH3N6RIPhIEZvusiQf
+r/n9lvU0H547edmJQYVfvKp5jfUfhQQsoxJG0xd/n3M1Xls0x3fSQYWwlWXx
+PeYAz7gQ+flH5N6RIPhIERl91Vp/j2deTdm0PSNt/ZqMvDu/KuddzWuo3RQ2
+6bObNnMnXV+8fc7VeMP1TWFThWa9IzwmumdciPz8I3rvSBCuyNtjgjHWbQ4c
+G5untnnDJaial1CfXxmzxbp4jLYv3nc13IwntZfWxr5f0ilsUdkRHhPdMy5E
+fv5xQO9IEHykiIipMTN4TGRuu7UZwqt5DU3fbc/Kax00fdL1xdvn3Iw3NOVm
+7jjVIrQOzREeE90zLkR+/nFQ70gQrsjVY8Ig9bcK9rzmOdwjeleBwuCA+YQ0
+tquMpN2+TKqy7LixPotzqjvYT9CcjSf0bWqjQJGO8JjonnEh8vOPY3tHgnDu
+QG4eAwAAAAAAAAAAAAC8mAaAqDQ0NCAsAeCHKOkDgCPg9i1sAAAAAAAAAAAA
+AAAAcE8I1vtCs7/SfZGxRolLk7h5wpG9QIusNTpVmqHp1LEKLYdO9BQ765La
+imOnmqw3JaO6Um7IWKPEpUncPOHIXqBF1hqdKI3sLNuW8uVtTt/5Jyl31jXd
+/iplW9nQHWCor5QXMtYocWkSN084shdokbVG50kz3dw7b2M5z/3MrXfW7S7f
+OG+v7UaRFFfKERlrlLg0iZsnHNkLtMhao0BppK7uQNLzPiOH/9HzuSX7aylO
+ndPXpL68vlJv+5v6pvNfZb67/J18FUHXOMXOuvrK9TNTa6ybY7eBsLH57IGv
+q7qo3+2wsMcZEB2lRw9eUFLsiWZPI6M6KcBfGh/sR+bAdfzi0BbJR5dQ/0te
+oAXpww9dVfobO4vajCbVlZ0ve/zhiQ/rjFZXGOq2hP+d+p0N0Xp0oseErT9b
+/8qAbTTbAqvPRocP7YbdBsI9rTnJ8z5nmrCY7XEeusrt8avPDD1p1Z5G++ok
+AR9pPHuyG5n34BeHQ3GT6OLvfzcRaEH6cMfUmnemZWDYusuWev1lZmHH0CuI
+O99ODXrjKuUrlb4zQwP+WW17o25h2ha4+2pS0AvfKUn7Vw6xo/14fNiSYi2T
+GiZ7nAr5y9n40EUXOlhrZKNOGnCWxhP7kfkr/OJwMO4TXTz97z4CLUgfQXRe
+nj9+os35RvrK1YHBqbVU01xn8fxxvinlOrPqh1XTZ6/bf7qkmc32uobaD4Kf
+fJdjtJgVh6b4zfmRcaB42sPcr7po39txEdNWpW9YEhUw4uEJicdaWOwhT/5y
+OsrvpZMqlt2zUcfTEtEb5ChNDKgj89cfCx53d4ouXv53J4EWpA9/SPX5xVPf
+LLTZ4UJb9Mq44I8bKVKo9x7pMe8F5y7n7N2f+zOHgkdT48chjyVwXJPtLJ7t
+HZzRwFQsw9ceZkjVyemPeCefUZothPL7mSMfCj3c0mO/1FNfvS4wIKWc5dzK
+Qh21JYSF7L5R2kT33ljfcHRHVqGK5jnNKdKEQxeZ/0OEcZdUdNkZU17+l5RA
+pI+j0odQX0xdvruGQk9HYdSjIbtu2s4zuoqVviMeDRofnkV7m0RNz83PnvKK
+ucjtCUidHzH66QPNDC+OWNvDbY+mvidN/3VV/c8OXSULPUfFnGtlUepprE8P
+8p5bzHKusq+O0pL8NkXx7hjvULpDpnqasyNH+y0q6WLboAOkCYU+MgfgHYeD
+kFB02RtTfv6XkECkj4PSh9TVHdyy+yr1l3u0P87yCvn0hs3QGmo2BIx5cc/W
+Z//ss6KMUzGiqTEzxHsORx3ai7FeIZ/YmiGCPYx0Xkoc55t8d+7UV783wWdB
+oYZgUerZa07g+KVsDbGrjsYSUsgxjs6RJgjGyLxnjfBxl1J02R1TPv6XkkCk
+jyPSx3jr39uyLmn6i4wITcW3xxVDVqp15csffyq93nr1ulf/E6On/6et/Yc5
+ozxePNLCYX3VWPdhSOAKNu/yzerLR78p1Zj7+/soJGAZvXgB9jDRXZbk4zW/
+fzx6mg/PnbzsxKCqIKZST23RHN9JBxUszbCnjt4S/nHoJGkCsBOZd6/hP+6S
+jS47Y8ra/5IVOPBDpI9YmJW5i3x/+8CwAR74XWCaVb2RWZEdHrK2avCCJNFd
+n//FAs/fj134TbWqNjvyTw96RKefvs12PUR37a2gKV+2sChO1RQm+PomnO9/
+XDPUbgqbRL3MJdAeBvRVa/09nnk1ZdP2jLT1azLy7vw63sylnobrm8KmcggP
+BnXMlvCOQ6dJ44n9yBQ67pKNLuYxZe9/yQq0IH0cnT426CpWTU4oErGWp6Mw
+7tlV3AtrCPX5lTFbxKpnY4WxbnPg2Ng8tU1A2yn1JLWX1sa+X9LJIRHsqKO1
+hG8cOlGaWyCl6GIaU97+l5JApI8L0qfrp+Uz0igrDnlhrEuPSvmJZtmAGUPT
+d9uz8lp5r2RxxNSYGTwmMrfd2ud2Sj0NTbmZO061cLaSQR2dJbzj0MnS3AKJ
+RBfTmArzv0QEIn049iYSusoPYtNqRPocN9Z/OntzJe+bAtLYrjI6YS4j9bcK
+9rzmOdwjeleBgtPzJaFvU/O1kEodkyUmVVl23FifxTnVHezftblGmlsghehi
+GFPh/peCQGaQPg7DrDy5IuW0UoStFgjVuXfWnFI6fnkMAADAYAjN5T37yrjs
+N04F2Xkte/8VjSt33gEAAAAAAAAAAABg5r8EAQ+u
+ "], {{0, 99}, {493, 0}}, {0, 255},
ColorFunction->RGBColor],
BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
Selectable->False],
- BaseStyle->"ImageGraphics",
+ DefaultBaseStyle->"ImageGraphics",
ImageSize->Automatic,
- ImageSizeRaw->{487, 110},
- PlotRange->{{0, 487}, {0, 110}}]], "Output",
- ImageSize->{491, 110},
+ ImageSizeRaw->{493, 99},
+ PlotRange->{{0, 493}, {0, 99}}]], "Output",
+ ImageSize->{497, 99},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellLabel->"Out[7]=",
- CellID->846997809]
+ CellLabel->"Out[6]=",
+ CellID->472334896]
}, Open ]],
Cell[CellGroupData[{
@@ -865,24 +1024,72 @@ Cell[BoxData[
RowBox[{"k", "-",
SubscriptBox["p", "2"]}]}], "]"}], " ",
RowBox[{
- RowBox[{"SP", "[",
+ RowBox[{"SPD", "[",
RowBox[{"k", ",", "l"}], "]"}], "^", "2"}]}], ",", "k"}],
"]"}]], "Input",
CellTags->"OneLoopSimplify",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->214879980],
Cell[BoxData[
FormBox[
- RowBox[{
+ RowBox[{"-",
RowBox[{"(",
RowBox[{
- RowBox[{"D", " ",
- SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"D", " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ RowBox[{"(",
RowBox[{
FormBox[
FormBox["l",
@@ -896,18 +1103,10 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm],
- FormBox["1",
+ FormBox["2",
TraditionalForm]],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]}], "+",
- RowBox[{"D", " ",
- SuperscriptBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
RowBox[{
FormBox[
FormBox["l",
@@ -921,176 +1120,162 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm],
- FormBox["2",
+ FormBox["1",
TraditionalForm]],
- TraditionalForm]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], "2"]}], "+",
- RowBox[{"2", " ", "D", " ",
- RowBox[{"(",
+ TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]],
- TraditionalForm]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- FormBox[
- SubscriptBox[
+ SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["l",
TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]],
- TraditionalForm], "2"]}], "-",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- FormBox[
- SubscriptBox[
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]],
- TraditionalForm], "2"]}], "-",
- RowBox[{"4", " ",
- RowBox[{"(",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm], "2"]}], "-",
RowBox[{
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- SubscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm], "2"]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["p",
+ FormBox["l",
TraditionalForm],
TraditionalForm],
- FormBox["2",
- TraditionalForm]],
- TraditionalForm]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
- FormBox["1",
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{"2", " ",
- SuperscriptBox[
- FormBox[
- FormBox["l",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SubscriptBox[
FormBox[
- FormBox["p",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["l",
TraditionalForm],
TraditionalForm],
- FormBox["1",
- TraditionalForm]],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- SubscriptBox[
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["p",
- TraditionalForm],
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
TraditionalForm],
- FormBox["2",
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{"4", " ",
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}]}]}], ")"}], "/",
RowBox[{"(",
- RowBox[{"D", "-", "1"}], ")"}], " ",
- RowBox[{
- SuperscriptBox[
- FormBox["k",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
+ RowBox[{"4", " ",
RowBox[{"(",
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- SubscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["1",
- TraditionalForm]], "+",
- SubscriptBox[
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
- FormBox["p",
+ FormBox["k",
TraditionalForm],
- TraditionalForm],
- FormBox["2",
- TraditionalForm]]}], ")"}], "2"]}]}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{455, 45},
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]], "+",
+ SubscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D],
+ FeynCalc`Momentum[$CellContext`k, D] - FeynCalc`Momentum[
+ Subscript[$CellContext`p, 1], D] + FeynCalc`Momentum[
+ Subscript[$CellContext`p, 2], D]]],
+ Editable->False]}]}], ")"}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{503, 45},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"OneLoopSimplify",
- CellLabel->"Out[8]=",
- CellID->347723347]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -1114,12 +1299,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["OneLoop",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/OneLoop",
- ButtonNote->"OneLoop"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["TID",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/TID",
@@ -1132,9 +1311,7 @@ Cell[TextData[{
ButtonNote->"TIDL"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OneLoopSimplify",
- CellID->1598004520]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1151,22 +1328,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 50.330437}",
+ "built" -> "{2020, 1, 5, 19, 0, 4.618151}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"OneLoopSimplify[amp, q] simplifies the one-loop amplitude amp. The \
-second argument denotes the integration momentum.", "synonyms" -> {}, "title" ->
- "OneLoopSimplify", "titlemodifier" -> "", "windowtitle" ->
- "OneLoopSimplify", "type" -> "Symbol", "uri" ->
+second argument denotes the integration momentum.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "OneLoopSimplify", "titlemodifier" -> "",
+ "windowtitle" -> "OneLoopSimplify", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/OneLoopSimplify"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1175,7 +1352,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1183,168 +1360,158 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3429, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2095467611]},
"OneLoopSimplify"->{
- Cell[4063, 125, 147, 4, 27, "Input",
+ Cell[5325, 162, 148, 4, 70, "Input",
CellTags->"OneLoopSimplify",
CellID->408969695],
- Cell[4213, 131, 831, 22, 75, "Output",
- CellTags->"OneLoopSimplify",
- CellID->1003429626],
- Cell[5081, 158, 359, 12, 27, "Input",
+ Cell[5476, 168, 1076, 25, 93, "Output",
+ CellTags->"OneLoopSimplify"],
+ Cell[7247, 229, 360, 12, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->2051602371],
- Cell[5443, 172, 857, 35, 75, "Output",
- CellTags->"OneLoopSimplify",
- CellID->180261333],
- Cell[6337, 212, 165, 5, 27, "Input",
+ Cell[7610, 243, 1573, 57, 63, "Output",
+ CellTags->"OneLoopSimplify"],
+ Cell[9220, 305, 165, 5, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->1712188386],
- Cell[6505, 219, 1850, 74, 73, "Output",
- CellTags->"OneLoopSimplify",
- CellID->1287447332],
- Cell[8392, 298, 221, 7, 27, "Input",
+ Cell[9388, 312, 3179, 111, 68, "Output",
+ CellTags->"OneLoopSimplify"],
+ Cell[12604, 428, 221, 7, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->2028218956],
- Cell[8616, 307, 751, 31, 65, "Output",
- CellTags->"OneLoopSimplify",
- CellID->2099456974],
- Cell[9404, 343, 419, 13, 27, "Input",
+ Cell[12828, 437, 1454, 54, 57, "Output",
+ CellTags->"OneLoopSimplify"],
+ Cell[14319, 496, 419, 13, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->1056142741],
- Cell[9826, 358, 1237, 52, 71, "Output",
- CellTags->"OneLoopSimplify",
- CellID->1341686868],
- Cell[11100, 415, 169, 5, 27, "Input",
+ Cell[14741, 511, 2381, 84, 66, "Output",
+ CellTags->"OneLoopSimplify"],
+ Cell[17159, 600, 169, 5, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->971533335],
- Cell[11272, 422, 16693, 282, 258, "Output",
+ Cell[17331, 607, 15074, 255, 228, "Output",
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellID->607915696],
- Cell[28002, 709, 271, 10, 27, "Input",
+ CellID->1455716630],
+ Cell[32442, 867, 271, 10, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->1848776094],
- Cell[28276, 721, 7425, 130, 131, "Output",
+ Cell[32716, 879, 7541, 131, 120, "Output",
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellID->846997809],
- Cell[35738, 856, 441, 16, 27, "Input",
+ CellID->472334896],
+ Cell[40294, 1015, 442, 16, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->214879980],
- Cell[36182, 874, 5617, 218, 66, "Output",
- CellTags->"OneLoopSimplify",
- CellID->347723347],
- Cell[42167, 1115, 523, 21, 32, "Text",
- CellTags->"OneLoopSimplify",
- CellID->1598004520]},
+ Cell[40739, 1033, 7051, 244, 66, "Output",
+ CellTags->"OneLoopSimplify"]},
+ "PrimaryExamplesSection"->{
+ Cell[6613, 200, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1405242556]},
"RasterizedOutput"->{
- Cell[11272, 422, 16693, 282, 258, "Output",
+ Cell[17331, 607, 15074, 255, 228, "Output",
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellID->607915696],
- Cell[28276, 721, 7425, 130, 131, "Output",
+ CellID->1455716630],
+ Cell[32716, 879, 7541, 131, 120, "Output",
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellID->846997809]}
+ CellID->472334896]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 44612, 1185},
- {"OneLoopSimplify", 44754, 1189},
- {"RasterizedOutput", 46469, 1241}
+ {"OneLoopSimplify", 50376, 1362},
+ {"PrimaryExamplesSection", 51875, 1405},
+ {"RasterizedOutput", 52019, 1409}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3116, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 479, 14, 82, "Usage",
- CellID->982511436],
+Cell[3706, 99, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3429, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2095467611],
+Cell[4023, 114, 479, 14, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3842, 115, 196, 6, 25, "ExampleSection",
- CellID->1251915012],
+Cell[4527, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1580551472],
+Cell[5269, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4063, 125, 147, 4, 27, "Input",
+Cell[5325, 162, 148, 4, 70, "Input",
CellTags->"OneLoopSimplify",
CellID->408969695],
-Cell[4213, 131, 831, 22, 75, "Output",
- CellTags->"OneLoopSimplify",
- CellID->1003429626]
+Cell[5476, 168, 1076, 25, 93, "Output",
+ CellTags->"OneLoopSimplify"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5081, 158, 359, 12, 27, "Input",
+Cell[6613, 200, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1405242556],
+Cell[CellGroupData[{
+Cell[7026, 219, 196, 6, 26, "ExampleSection",
+ CellID->1353084621],
+Cell[CellGroupData[{
+Cell[7247, 229, 360, 12, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->2051602371],
-Cell[5443, 172, 857, 35, 75, "Output",
- CellTags->"OneLoopSimplify",
- CellID->180261333]
+Cell[7610, 243, 1573, 57, 63, "Output",
+ CellTags->"OneLoopSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6337, 212, 165, 5, 27, "Input",
+Cell[9220, 305, 165, 5, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->1712188386],
-Cell[6505, 219, 1850, 74, 73, "Output",
- CellTags->"OneLoopSimplify",
- CellID->1287447332]
+Cell[9388, 312, 3179, 111, 68, "Output",
+ CellTags->"OneLoopSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8392, 298, 221, 7, 27, "Input",
+Cell[12604, 428, 221, 7, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->2028218956],
-Cell[8616, 307, 751, 31, 65, "Output",
- CellTags->"OneLoopSimplify",
- CellID->2099456974]
+Cell[12828, 437, 1454, 54, 57, "Output",
+ CellTags->"OneLoopSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9404, 343, 419, 13, 27, "Input",
+Cell[14319, 496, 419, 13, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->1056142741],
-Cell[9826, 358, 1237, 52, 71, "Output",
- CellTags->"OneLoopSimplify",
- CellID->1341686868]
+Cell[14741, 511, 2381, 84, 66, "Output",
+ CellTags->"OneLoopSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11100, 415, 169, 5, 27, "Input",
+Cell[17159, 600, 169, 5, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->971533335],
-Cell[11272, 422, 16693, 282, 258, "Output",
+Cell[17331, 607, 15074, 255, 228, "Output",
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellID->607915696]
+ CellID->1455716630]
}, Open ]],
Cell[CellGroupData[{
-Cell[28002, 709, 271, 10, 27, "Input",
+Cell[32442, 867, 271, 10, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->1848776094],
-Cell[28276, 721, 7425, 130, 131, "Output",
+Cell[32716, 879, 7541, 131, 120, "Output",
CellTags->{"OneLoopSimplify", "RasterizedOutput"},
- CellID->846997809]
+ CellID->472334896]
}, Open ]],
Cell[CellGroupData[{
-Cell[35738, 856, 441, 16, 27, "Input",
+Cell[40294, 1015, 442, 16, 27, "Input",
CellTags->"OneLoopSimplify",
CellID->214879980],
-Cell[36182, 874, 5617, 218, 66, "Output",
- CellTags->"OneLoopSimplify",
- CellID->347723347]
+Cell[40739, 1033, 7051, 244, 66, "Output",
+ CellTags->"OneLoopSimplify"]
}, Open ]]
}, Open ]],
-Cell[41826, 1096, 31, 0, 29, "SectionFooterSpacer"]
+Cell[47817, 1281, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[41894, 1101, 270, 12, 31, "SeeAlsoSection",
+Cell[47885, 1286, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[42167, 1115, 523, 21, 32, "Text",
- CellTags->"OneLoopSimplify",
- CellID->1598004520]
+Cell[48158, 1300, 319, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[42705, 1139, 23, 0, 42, "FooterCell"]
+Cell[48492, 1316, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSum.nb
index 1673a7865..2d1a3ee13 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSum.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OneLoopSum.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6207, 190]
-NotebookOptionsPosition[ 3924, 123]
-NotebookOutlinePosition[ 5945, 179]
-CellTagsIndexPosition[ 5873, 174]
+NotebookDataLength[ 6948, 210]
+NotebookOptionsPosition[ 4872, 153]
+NotebookOutlinePosition[ 6741, 202]
+CellTagsIndexPosition[ 6698, 199]
WindowTitle->OneLoopSum
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/OneLoopSum\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/OneLoopSum"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/OneLoopSum.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$109654],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/OneLoopSum", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/OneLoopSum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/OneLoopSum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+OneLoopSum.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$193144],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/OneLoopSum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OneLoopSum", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OneLoopSum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"OneLoopSum",
- CellID->702509014]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 22, 52.079224}",
+ "built" -> "{2020, 1, 5, 19, 0, 5.777966}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -144,11 +174,11 @@ TaggingRules->{
"None", "summary" ->
"OneLoopSum[FeynAmp[ ... ], FeynAmp[ ... ] , ...] will calculate a list \
of Feynman amplitudes by replacing FeynAmp step by step by OneLoop.",
- "synonyms" -> {}, "title" -> "OneLoopSum", "titlemodifier" -> "",
- "windowtitle" -> "OneLoopSum", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/OneLoopSum"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "OneLoopSum",
+ "titlemodifier" -> "", "windowtitle" -> "OneLoopSum", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/OneLoopSum"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +187,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "OneLoopSum"->{
- Cell[3656, 109, 226, 9, 70, "Text",
- CellTags->"OneLoopSum",
- CellID->702509014]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"OneLoopSum", 5761, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 3009, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 464, 13, 70, "Usage",
+Cell[3594, 97, 287, 11, 70, "ObjectNameGrid"],
+Cell[3884, 110, 464, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3383, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4373, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3656, 109, 226, 9, 70, "Text",
- CellTags->"OneLoopSum",
- CellID->702509014]
+Cell[4646, 141, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3897, 121, 23, 0, 70, "FooterCell"]
+Cell[4845, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OptionsSelect.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OptionsSelect.nb
index 1489a50e2..540cf0282 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/OptionsSelect.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/OptionsSelect.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5461, 149]
-NotebookOptionsPosition[ 3465, 96]
-NotebookOutlinePosition[ 5383, 145]
-CellTagsIndexPosition[ 5340, 142]
+NotebookDataLength[ 5695, 159]
+NotebookOptionsPosition[ 3727, 107]
+NotebookOutlinePosition[ 5631, 156]
+CellTagsIndexPosition[ 5588, 153]
WindowTitle->OptionsSelect
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ OptionsSelect.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$113759],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$198427],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/OptionsSelect", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ OptionsSelect.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["OptionsSelect", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["OptionsSelect", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,10 +117,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 9.366529}",
+ "built" -> "{2020, 1, 5, 19, 0, 18.257683}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -117,11 +128,11 @@ TaggingRules->{
"None", "summary" ->
"OptionsSelect[function, opts] returns the option settings of opts \
accepted by function. When an option occurs several times in opts, the first \
-setting is selected.", "synonyms" -> {}, "title" -> "OptionsSelect",
- "titlemodifier" -> "", "windowtitle" -> "OptionsSelect", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/OptionsSelect"}},
+setting is selected.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "OptionsSelect", "titlemodifier" -> "", "windowtitle" -> "OptionsSelect",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/OptionsSelect"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -130,7 +141,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -144,13 +155,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 2294, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 522, 14, 70, "Usage",
+Cell[2882, 76, 290, 11, 70, "ObjectNameGrid"],
+Cell[3175, 89, 522, 14, 70, "Usage",
CellID->982511436],
-Cell[3438, 94, 23, 0, 70, "FooterCell"]
+Cell[3700, 105, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PD.nb
index eca938497..39ec57b35 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PD.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6075, 191]
-NotebookOptionsPosition[ 3956, 127]
-NotebookOutlinePosition[ 5820, 180]
-CellTagsIndexPosition[ 5756, 175]
+NotebookDataLength[ 6975, 214]
+NotebookOptionsPosition[ 5026, 159]
+NotebookOutlinePosition[ 6767, 206]
+CellTagsIndexPosition[ 6724, 203]
WindowTitle->PD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/PD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$118581],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/PD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PropagatorDenominator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PropagatorDenominator"], "\<\"IFPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/IFPD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/PD.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$208542],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/PD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -118,9 +152,7 @@ Cell[TextData[{
ButtonNote->"IFPD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PD",
- CellID->155972299]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -137,19 +169,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 28.660122}",
+ "built" -> "{2020, 1, 5, 19, 0, 44.167261}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "PD is an abbreviation for PropagatorDenominator.",
- "synonyms" -> {}, "title" -> "PD", "titlemodifier" -> "", "windowtitle" ->
- "PD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/PD"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PD", "titlemodifier" ->
+ "", "windowtitle" -> "PD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PD"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -158,41 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PD"->{
- Cell[3507, 107, 407, 15, 70, "Text",
- CellTags->"PD",
- CellID->155972299]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PD", 5651, 168}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3104, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 350, 11, 70, "Usage",
+Cell[3681, 99, 279, 11, 70, "ObjectNameGrid"],
+Cell[3963, 112, 350, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3234, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4338, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3507, 107, 407, 15, 70, "Text",
- CellTags->"PD",
- CellID->155972299]
+Cell[4611, 141, 373, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3929, 125, 23, 0, 70, "FooterCell"]
+Cell[4999, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVe.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVe.nb
index 677e0ea49..315e50e4d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVe.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVe.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12840, 429]
-NotebookOptionsPosition[ 8956, 310]
-NotebookOutlinePosition[ 11824, 389]
-CellTagsIndexPosition[ 11716, 383]
+NotebookDataLength[ 11807, 383]
+NotebookOptionsPosition[ 8534, 290]
+NotebookOutlinePosition[ 11091, 357]
+CellTagsIndexPosition[ 10983, 351]
WindowTitle->PaVe
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PaVe\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PaVe"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/PaVe.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$117545],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/PaVe",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVeReduce\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PaVe\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PaVe"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/PaVe.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$206332],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/PaVe",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +95,36 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PaVe", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PaVe", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"PaVe", "[",
- RowBox[{"i", ",", "j", ",", "..."}]}]], "InlineFormula"],
- " \[LineSeparator]",
- "{p10,p12,...},{m1^2, mw^2, ...}] denotes the invariant (and scalar) \
-Passarino-Veltman integrals, i.e. the coefficient functions of the tensor \
-integral decomposition. Joining plist and mlist gives the same conventions as \
-for A0, B0, C0, D0. Automatic simlifications are performed for the \
-coefficient functions of two-point integrals and for the scalar integrals."
+ RowBox[{"i", ",", "j", ",", "...", ",",
+ RowBox[{"{",
+ RowBox[{"p10", ",", "p12", ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], ",",
+ RowBox[{"mw", "^", "2"}], ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]denotes the invariant (and scalar) Passarino-Veltman \
+integrals, i.e. the coefficient functions of the tensor integral \
+decomposition. Joining plist and mlist gives the same conventions as for A0, \
+B0, C0, D0. Automatic simlifications are performed for the coefficient \
+functions of two-point integrals and for the scalar integrals."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,7 +150,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->284592706],
+ CellID->463206704],
Cell[CellGroupData[{
@@ -122,45 +160,13 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1328759427],
-
-Cell["Some of the PaVe's reduce to special cases.", "Text",
- CellTags->"PaVe",
- CellID->1877067255],
-
-Cell[CellGroupData[{
+ CellID->1950835585],
-Cell[BoxData[
- RowBox[{"PaVe", "[",
- RowBox[{"0", ",",
- RowBox[{"{",
- RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f"}], "}"}],
- ",",
- RowBox[{"{",
- RowBox[{"m1", ",", "m2", ",", "m3", ",", "m4"}], "}"}]}], "]"}]], "Input",\
-
- CellTags->"PaVe",
- CellLabel->"In[1]:=",
- CellID->200539338],
-
-Cell[BoxData[
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"D\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- "a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f", ",", "m1", ",",
- "m2", ",", "m3", ",", "m4"}], ")"}],
- TraditionalForm],
- HoldForm], TraditionalForm]], "Output",
- ImageSize->{242, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PaVe",
- CellLabel->"Out[1]=",
- CellID->1799689194]
-}, Open ]],
+Cell[TextData[{
+ "Some of the PaVe's reduce to special cases with ",
+ Cell[BoxData[
+ RowBox[{"PaVeAutoReduce", "\[Rule]", "True"}]], "InlineFormula"]
+}], "Notes"],
Cell[CellGroupData[{
@@ -171,107 +177,83 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"m", "^", "2"}], ",",
- RowBox[{"M", "^", "2"}]}], "}"}]}], "]"}]], "Input",
+ RowBox[{"M", "^", "2"}]}], "}"}], ",",
+ RowBox[{"PaVeAutoReduce", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"PaVe",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->378525516],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ RowBox[{"2", " ", "m", " ", "M"}], "+",
+ SuperscriptBox["M", "2"], "-", "pp"}], ")"}], " ",
+ RowBox[{"(",
RowBox[{
- RowBox[{"(",
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ", "m", " ", "M"}], "+",
+ SuperscriptBox["M", "2"], "-", "pp"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- SuperscriptBox["m", "2"], "-",
- SuperscriptBox["M", "2"], "+", "pp"}], ")"}], " ",
- RowBox[{"(",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"pp", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ", "pp"}]], "-",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ", "pp"}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["M", "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "3"], " ",
- SuperscriptBox["m", "2"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "+",
- RowBox[{
- FractionBox["1", "18"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"3", " ",
- SuperscriptBox["m", "2"]}], "+",
- RowBox[{"3", " ",
- SuperscriptBox["M", "2"]}], "-", "pp"}], ")"}]}]}],
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+", "pp"}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ", "pp"}]], "+",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["M", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "-", "pp"}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ", "pp"}]]}],
TraditionalForm]], "Output",
- ImageSize->{553, 166},
+ ImageSize->{481, 96},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVe",
- CellLabel->"Out[2]=",
- CellID->1156896528]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -301,9 +283,7 @@ Cell[TextData[{
ButtonNote->"PaVeReduce"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PaVe",
- CellID->1153293303]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -311,7 +291,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PaVe",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -320,25 +300,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 24.193374}",
+ "built" -> "{2020, 1, 5, 19, 0, 38.448791}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "PaVe[i, j, ... {p10,p12,...},{m1^2, mw^2, ...}] denotes the invariant \
-(and scalar) Passarino-Veltman integrals, i.e. the coefficient functions of \
-the tensor integral decomposition. Joining plist and mlist gives the same \
-conventions as for A0, B0, C0, D0. Automatic simlifications are performed for \
-the coefficient functions of two-point integrals and for the scalar \
-integrals.", "synonyms" -> {}, "title" -> "PaVe", "titlemodifier" -> "",
- "windowtitle" -> "PaVe", "type" -> "Symbol", "uri" ->
+ "PaVe[i, j, ..., {p10, p12, ...}, {m1^2, mw^2, ...}] denotes the \
+invariant (and scalar) Passarino-Veltman integrals, i.e. the coefficient \
+functions of the tensor integral decomposition. Joining plist and mlist gives \
+the same conventions as for A0, B0, C0, D0. Automatic simlifications are \
+performed for the coefficient functions of two-point integrals and for the \
+scalar integrals.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "PaVe",
+ "titlemodifier" -> "", "windowtitle" -> "PaVe", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PaVe"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -346,8 +326,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -356,81 +337,54 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3626, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4821, 137, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->284592706]},
+ CellID->463206704]},
"PaVe"->{
- Cell[4237, 126, 99, 2, 32, "Text",
- CellTags->"PaVe",
- CellID->1877067255],
- Cell[4361, 132, 320, 11, 27, "Input",
- CellTags->"PaVe",
- CellID->200539338],
- Cell[4684, 145, 459, 16, 36, "Output",
- CellTags->"PaVe",
- CellID->1799689194],
- Cell[5180, 166, 288, 10, 27, "Input",
+ Cell[5620, 172, 344, 11, 27, "Input",
CellTags->"PaVe",
CellID->378525516],
- Cell[5471, 178, 2845, 95, 187, "Output",
- CellTags->"PaVe",
- CellID->1156896528],
- Cell[8684, 296, 230, 9, 31, "Text",
- CellTags->"PaVe",
- CellID->1153293303]}
+ Cell[5967, 185, 1964, 70, 117, "Output",
+ CellTags->"PaVe"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11055, 357},
- {"PaVe", 11185, 361}
+ {"PrimaryExamplesSection", 10679, 338},
+ {"PaVe", 10810, 342}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 2990, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 743, 17, 128, "Usage",
+Cell[3569, 97, 281, 11, 45, "ObjectNameGrid"],
+Cell[3853, 110, 943, 23, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3626, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4821, 137, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->284592706],
+ CellID->463206704],
Cell[CellGroupData[{
-Cell[4038, 118, 196, 6, 25, "ExampleSection",
- CellID->1328759427],
-Cell[4237, 126, 99, 2, 32, "Text",
- CellTags->"PaVe",
- CellID->1877067255],
+Cell[5233, 156, 196, 6, 26, "ExampleSection",
+ CellID->1950835585],
+Cell[5432, 164, 163, 4, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4361, 132, 320, 11, 27, "Input",
- CellTags->"PaVe",
- CellID->200539338],
-Cell[4684, 145, 459, 16, 36, "Output",
- CellTags->"PaVe",
- CellID->1799689194]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5180, 166, 288, 10, 27, "Input",
+Cell[5620, 172, 344, 11, 27, "Input",
CellTags->"PaVe",
CellID->378525516],
-Cell[5471, 178, 2845, 95, 187, "Output",
- CellTags->"PaVe",
- CellID->1156896528]
+Cell[5967, 185, 1964, 70, 117, "Output",
+ CellTags->"PaVe"]
}, Open ]]
}, Open ]],
-Cell[8343, 277, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7958, 259, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8411, 282, 270, 12, 31, "SeeAlsoSection",
+Cell[8026, 264, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8684, 296, 230, 9, 31, "Text",
- CellTags->"PaVe",
- CellID->1153293303]
+Cell[8299, 278, 193, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[8929, 308, 23, 0, 70, "FooterCell"]
+Cell[8507, 288, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrder.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrder.nb
index 9e4e454d9..3c4925420 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrder.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrder.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12642, 424]
-NotebookOptionsPosition[ 8536, 298]
-NotebookOutlinePosition[ 11477, 379]
-CellTagsIndexPosition[ 11364, 373]
+NotebookDataLength[ 13448, 446]
+NotebookOptionsPosition[ 9537, 330]
+NotebookOutlinePosition[ 12363, 406]
+CellTagsIndexPosition[ 12250, 400]
WindowTitle->PaVeOrder
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PaVeOrder\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PaVeOrder"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/PaVeOrder.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVeReduce\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PaVeOrder\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PaVeOrder"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/PaVeOrder.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$118229],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PaVeOrder", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$207213],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PaVeOrder", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PaVeOrder", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PaVeOrder", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,7 +152,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1268026566],
+ CellID->795923657],
Cell[CellGroupData[{
@@ -130,7 +162,12 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->629516765],
+ CellID->2100172249],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[",
+ RowBox[{"t", ",", "s"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
@@ -146,7 +183,7 @@ Cell[BoxData[
RowBox[{"me2", ",", "me2", ",", "0", ",", "0"}], "}"}]}]}],
"]"}]], "Input",
CellTags->"PaVeOrder",
- CellLabel->"In[1]:=",
+ CellLabel->"In[2]:=",
CellID->641538627],
Cell[BoxData[
@@ -160,12 +197,11 @@ Cell[BoxData[
"me2", ",", "0", ",", "0", ",", "me2"}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{305, 15},
+ ImageSize->{311, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeOrder",
- CellLabel->"Out[1]=",
- CellID->1082848295]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -182,7 +218,7 @@ Cell[BoxData[
RowBox[{"me2", ",", "me2", ",", "0", ",", "0"}], "}"}]}]}],
"]"}]], "Input",
CellTags->"PaVeOrder",
- CellLabel->"In[2]:=",
+ CellLabel->"In[3]:=",
CellID->490694983],
Cell[BoxData[
@@ -196,12 +232,11 @@ Cell[BoxData[
"me2", ",", "0", ",", "0", ",", "me2"}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{305, 15},
+ ImageSize->{311, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeOrder",
- CellLabel->"Out[2]=",
- CellID->1266309668]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -226,7 +261,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"f", ",", "e"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellTags->"PaVeOrder",
- CellLabel->"In[3]:=",
+ CellLabel->"In[4]:=",
CellID->1444685309],
Cell[BoxData[
@@ -254,12 +289,11 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{318, 35},
+ ImageSize->{322, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeOrder",
- CellLabel->"Out[3]=",
- CellID->1493961476]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -289,9 +323,7 @@ Cell[TextData[{
ButtonNote->"PaVeReduce"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PaVeOrder",
- CellID->776510000]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -299,7 +331,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PaVeOrder",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -308,10 +340,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 27.077538}",
+ "built" -> "{2020, 1, 5, 19, 0, 40.432063}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -321,11 +353,11 @@ TaggingRules->{
way. PaVeOrder[expr, PaVeOrderList -> { {..., s, u, ...}, {... m1 2, m2 2 \
...}, ...}] orders the arguments of all D0 in expr according to the specified \
ordering lists. The lists may contain only a subsequence of the \
-D0-variables.", "synonyms" -> {}, "title" -> "PaVeOrder", "titlemodifier" ->
- "", "windowtitle" -> "PaVeOrder", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PaVeOrder"}, "SearchTextTranslated" -> ""},
+D0-variables.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "PaVeOrder",
+ "titlemodifier" -> "", "windowtitle" -> "PaVeOrder", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/PaVeOrder"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -333,8 +365,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -343,89 +376,78 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3793, 107, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4788, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1268026566]},
+ CellID->795923657]},
"PaVeOrder"->{
- Cell[4426, 136, 430, 13, 45, "Input",
+ Cell[5531, 173, 430, 13, 45, "Input",
CellTags->"PaVeOrder",
CellID->641538627],
- Cell[4859, 151, 472, 16, 36, "Output",
- CellTags->"PaVeOrder",
- CellID->1082848295],
- Cell[5368, 172, 430, 13, 45, "Input",
+ Cell[5964, 188, 451, 15, 37, "Output",
+ CellTags->"PaVeOrder"],
+ Cell[6452, 208, 430, 13, 45, "Input",
CellTags->"PaVeOrder",
CellID->490694983],
- Cell[5801, 187, 472, 16, 36, "Output",
- CellTags->"PaVeOrder",
- CellID->1266309668],
- Cell[6310, 208, 724, 21, 62, "Input",
+ Cell[6885, 223, 451, 15, 37, "Output",
+ CellTags->"PaVeOrder"],
+ Cell[7373, 243, 724, 21, 62, "Input",
CellTags->"PaVeOrder",
CellID->1444685309],
- Cell[7037, 231, 855, 30, 56, "Output",
- CellTags->"PaVeOrder",
- CellID->1493961476],
- Cell[8260, 284, 234, 9, 31, "Text",
- CellTags->"PaVeOrder",
- CellID->776510000]}
+ Cell[8100, 266, 834, 29, 56, "Output",
+ CellTags->"PaVeOrder"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10575, 344},
- {"PaVeOrder", 10712, 348}
+ {"PrimaryExamplesSection", 11618, 377},
+ {"PaVeOrder", 11754, 381}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2249, 52, 51, "AnchorBarGrid",
+Cell[581, 21, 3010, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2833, 75, 52, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2888, 78, 880, 25, 117, "Usage",
+Cell[3594, 97, 286, 11, 45, "ObjectNameGrid"],
+Cell[3883, 110, 880, 25, 122, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3793, 107, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4788, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1268026566],
+ CellID->795923657],
Cell[CellGroupData[{
-Cell[4206, 126, 195, 6, 25, "ExampleSection",
- CellID->629516765],
+Cell[5200, 158, 196, 6, 26, "ExampleSection",
+ CellID->2100172249],
+Cell[5399, 166, 107, 3, 27, "Input"],
Cell[CellGroupData[{
-Cell[4426, 136, 430, 13, 45, "Input",
+Cell[5531, 173, 430, 13, 45, "Input",
CellTags->"PaVeOrder",
CellID->641538627],
-Cell[4859, 151, 472, 16, 36, "Output",
- CellTags->"PaVeOrder",
- CellID->1082848295]
+Cell[5964, 188, 451, 15, 37, "Output",
+ CellTags->"PaVeOrder"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5368, 172, 430, 13, 45, "Input",
+Cell[6452, 208, 430, 13, 45, "Input",
CellTags->"PaVeOrder",
CellID->490694983],
-Cell[5801, 187, 472, 16, 36, "Output",
- CellTags->"PaVeOrder",
- CellID->1266309668]
+Cell[6885, 223, 451, 15, 37, "Output",
+ CellTags->"PaVeOrder"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6310, 208, 724, 21, 62, "Input",
+Cell[7373, 243, 724, 21, 62, "Input",
CellTags->"PaVeOrder",
CellID->1444685309],
-Cell[7037, 231, 855, 30, 56, "Output",
- CellTags->"PaVeOrder",
- CellID->1493961476]
+Cell[8100, 266, 834, 29, 56, "Output",
+ CellTags->"PaVeOrder"]
}, Open ]]
}, Open ]],
-Cell[7919, 265, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8961, 299, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7987, 270, 270, 12, 31, "SeeAlsoSection",
+Cell[9029, 304, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8260, 284, 234, 9, 31, "Text",
- CellTags->"PaVeOrder",
- CellID->776510000]
+Cell[9302, 318, 193, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[8509, 296, 23, 0, 42, "FooterCell"]
+Cell[9510, 328, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrderList.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrderList.nb
index 36b829001..bca2ff681 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrderList.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeOrderList.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6678, 208]
-NotebookOptionsPosition[ 4383, 141]
-NotebookOutlinePosition[ 6411, 197]
-CellTagsIndexPosition[ 6336, 192]
+NotebookDataLength[ 7640, 231]
+NotebookOptionsPosition[ 5565, 174]
+NotebookOutlinePosition[ 7431, 223]
+CellTagsIndexPosition[ 7388, 220]
WindowTitle->PaVeOrderList
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PaVeOrderList\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PaVeOrderList"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVeOrder\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeOrder"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"PaVe\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVe"], "\<\"D0\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/D0"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PaVeOrderList\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PaVeOrderList"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PaVeOrderList.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$117882],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PaVeOrderList", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$206768],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PaVeOrderList", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ PaVeOrderList.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PaVeOrderList", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PaVeOrderList", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +143,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["PaVeOrder",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/PaVeOrder",
@@ -132,9 +167,7 @@ Cell[TextData[{
ButtonNote->"D0"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PaVeOrderList",
- CellID->1960294739]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -151,10 +184,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 25.694670}",
+ "built" -> "{2020, 1, 5, 19, 0, 39.531610}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -162,11 +195,11 @@ TaggingRules->{
"None", "summary" ->
"PaVeOrderList is an option for PaVeOrder and PaVeReduce, specifying in \
which order the arguments of D0 are to be permuted.", "synonyms" -> {},
- "title" -> "PaVeOrderList", "titlemodifier" -> "", "windowtitle" ->
- "PaVeOrderList", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "PaVeOrderList", "titlemodifier" -> "",
+ "windowtitle" -> "PaVeOrderList", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PaVeOrderList"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -175,41 +208,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PaVeOrderList"->{
- Cell[3637, 108, 704, 28, 70, "Text",
- CellTags->"PaVeOrderList",
- CellID->1960294739]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PaVeOrderList", 6219, 185}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3275, 78, 70, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 426, 12, 70, "Usage",
+Cell[3863, 101, 290, 11, 70, "ObjectNameGrid"],
+Cell[4156, 114, 426, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3364, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4607, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3637, 108, 704, 28, 70, "Text",
- CellTags->"PaVeOrderList",
- CellID->1960294739]
+Cell[4880, 144, 643, 25, 70, "SeeAlso"]
}, Open ]],
-Cell[4356, 139, 23, 0, 70, "FooterCell"]
+Cell[5538, 172, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeReduce.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeReduce.nb
index 41688d629..d93361ffa 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeReduce.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeReduce.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.2' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 34914, 1149]
-NotebookOptionsPosition[ 27047, 885]
-NotebookOutlinePosition[ 31720, 1027]
-CellTagsIndexPosition[ 31606, 1021]
+NotebookDataLength[ 47038, 1415]
+NotebookOptionsPosition[ 40712, 1208]
+NotebookOutlinePosition[ 44493, 1320]
+CellTagsIndexPosition[ 44377, 1314]
WindowTitle->PaVeReduce
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PaVeReduce\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PaVeReduce"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/PaVeReduce.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$111848],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PaVeReduce", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FRH\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FRH"], "\<\"PaVeOrder\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVeOrder"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PaVeReduce\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PaVeReduce"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+PaVeReduce.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$207652],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PaVeReduce", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,16 +97,27 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PaVeReduce", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PaVeReduce", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"PaVeReduce", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "reduces all Passarino-Veltman integrals (i.e. all PaVe's) in expr down \
-to scalar A0, B0, C0 and D0."
+ " \[LineSeparator]reduces all Passarino-Veltman integrals (i.e. all \
+PaVe's) in expr down to scalar A0, B0, C0 and D0."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -93,63 +128,103 @@ to scalar A0, B0, C0 and D0."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->906569074],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1713910284],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->318399322],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "PaVeReduce", "]"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[1]:=",
+ CellLabel->"In[26]:=",
CellID->1685498711],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
+ RowBox[{"A0ToB0", "\[Rule]", "False"}], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
RowBox[{"Dimension", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor2"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "False"}], ",",
RowBox[{"Mandelstam", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
+ RowBox[{"PaVeAutoReduce", "\[Rule]", "False"}], ",",
RowBox[{"PaVeOrderList", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
- RowBox[{"WriteOutPaVe", "\[Rule]", "False"}]}], "}"}],
+ RowBox[{"WriteOutPaVe", "\[Rule]", "False"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{418, 35},
+ ImageSize->{456, 71},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[1]=",
- CellID->1380007374]
+ CellLabel->"Out[26]=",
+ CellID->458544387]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1536895706],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1759687694],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"PaVeReduce", "[",
RowBox[{
@@ -166,39 +241,20 @@ Cell[BoxData[
RowBox[{"M", "^", "2"}]}], "}"}]}], "]"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "FF"}]}], "]"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->311139632],
Cell[BoxData[
FormBox[
TagBox[
- RowBox[{"FF", "(", "981", ")"}],
+ RowBox[{"FF", "(", "45", ")"}],
HoldForm], TraditionalForm]], "Output",
- ImageSize->{55, 15},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[2]=",
- CellID->1665481194]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"FF", "[", "10", "]"}]], "Input",
- CellTags->"PaVeReduce",
- CellLabel->"In[3]:=",
- CellID->469470556],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"FF", "(", "10", ")"}], TraditionalForm]], "Output",
- ImageSize->{48, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PaVeReduce",
- CellLabel->"Out[3]=",
- CellID->111861120]
+ CellLabel->"Out[1]=",
+ CellID->516283693]
}, Open ]],
Cell[CellGroupData[{
@@ -206,18 +262,188 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FRH", "[", "%", "]"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->927282004],
Cell[BoxData[
FormBox[
- RowBox[{"FF", "(", "10", ")"}], TraditionalForm]], "Output",
- ImageSize->{48, 15},
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ", "D"}], "-", "3"}], ")"}], " ",
+ SuperscriptBox["M", "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]], "-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["M", "2"], " ", "s"}],
+ RowBox[{"2", " ",
+ SuperscriptBox["m", "2"], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]], "-",
+ FractionBox[
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}],
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]], "+",
+ FractionBox["s",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]]}], ")"}], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "1"}], ")"}], " ",
+ SuperscriptBox["M", "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]]}], "+",
+ FractionBox[
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]], "-",
+ FractionBox["s",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]]}], ")"}],
+ " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"s", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "1"}], ")"}], " ",
+ SuperscriptBox["M", "4"]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]]}], "-",
+ FractionBox[
+ RowBox[{"D", " ",
+ SuperscriptBox["M", "2"], " ", "s"}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]], "+",
+ FractionBox[
+ RowBox[{"4", " ", "D", " ",
+ SuperscriptBox["m", "2"], " ",
+ SuperscriptBox["M", "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}], "2"]}]]}], ")"}],
+ " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",", "s", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm]}], "-",
+ FractionBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["M", "2"], ")"}],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SuperscriptBox["m", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}]}]], "+",
+ FractionBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SuperscriptBox["m", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-", "s"}], ")"}]}]]}],
+ TraditionalForm]], "Output",
+ ImageSize->{498, 261},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[4]=",
- CellID->1785054415]
+ CellLabel->"Out[2]=",
+ CellID->1592936160]
}, Open ]],
Cell[CellGroupData[{
@@ -237,43 +463,32 @@ Cell[BoxData[
"}"}]}], "]"}], ",",
RowBox[{"WriteOutPaVe", "\[Rule]", "\"\\""}]}], "]"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1031771651],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- FractionBox[
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"t", ",", "mw2", ",", "me2"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm],
- RowBox[{"mw2", "-", "t"}]]}], "+",
FractionBox[
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "mw2", ",", "mw2"}], ")"}],
- TraditionalForm],
- HoldForm],
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"mw2", ",", "0", ",", "mw2"}], ")"}],
+ TraditionalForm],
+ RowBox[{"mw2", "-", "t"}]], "-",
+ FractionBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"t", ",", "mw2", ",", "me2"}], ")"}],
TraditionalForm],
- RowBox[{"mw2", "-", "t"}]], "+",
- FractionBox["2",
RowBox[{"mw2", "-", "t"}]]}], TraditionalForm]], "Output",
- ImageSize->{334, 42},
+ ImageSize->{254, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[5]=",
- CellID->795683657]
+ CellLabel->"Out[3]=",
+ CellID->1972744154]
}, Open ]],
Cell[CellGroupData[{
@@ -290,15 +505,15 @@ Cell[BoxData[
"\"\\""}], ",", "String"}], "]"}],
"]"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->2052937684],
Cell[BoxData[
FormBox[
TagBox[
TagBox[GridBox[{
- {"\<\"( 2/(mw2 - t) + B0[0, mw2, mw2]/(mw2 - t) - B0[t, mw2, \
-SmallVariable[me2]]/\"\>"},
+ {"\<\"( PaVe[0, {mw2}, {0, mw2}]/(mw2 - t) - PaVe[0, {t}, {mw2, \
+SmallVariable[me2]}]/\"\>"},
{"\<\" (mw2 - t)\"\>"},
{"\<\" ) \"\>"}
},
@@ -315,12 +530,12 @@ SmallVariable[me2]]/\"\>"},
Column],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]], TraditionalForm]], "Output",
- ImageSize->{517, 51},
+ ImageSize->{533, 49},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[6]//TableForm=",
- CellID->1465048226]
+ CellLabel->"Out[4]//TableForm=",
+ CellID->1778677368]
}, Open ]],
Cell[BoxData[
@@ -330,7 +545,7 @@ Cell[BoxData[
"FileNames", "[", "\"\\"", "]"}]}],
";"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[7]:=",
+ CellLabel->"In[5]:=",
CellID->1002068234],
Cell[BoxData[
@@ -338,7 +553,7 @@ Cell[BoxData[
RowBox[{"se", "=",
RowBox[{"SmallVariable", "[", "ME2", "]"}]}], ";"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[8]:=",
+ CellLabel->"In[6]:=",
CellID->175960789],
Cell[CellGroupData[{
@@ -362,43 +577,183 @@ Cell[BoxData[
RowBox[{"IsolateNames", "\[Rule]", "F"}]}], "]"}], "//",
"FRH"}]}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[9]:=",
+ CellLabel->"In[7]:=",
CellID->1868254708],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"D", " ",
+ RowBox[{"(",
+ RowBox[{"MW2", "-", "S"}], ")"}], " ",
+ SuperscriptBox["T", "2"], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"D\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ "ME2", ",", "MW2", ",", "MW2", ",", "ME2", ",", "S", ",", "T", ",",
+ "0", ",", "ME2", ",", "0", ",", "ME2"}], ")"}],
+ TraditionalForm], " ",
+ SuperscriptBox["S", "3"]}],
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["MW2", "2"], "-",
+ RowBox[{"S", " ", "U"}]}], ")"}], "3"]}]]}], "-",
+ FractionBox[
+ RowBox[{"D", " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"MW2", "-", "S"}], ")"}], "2"], " ", "T", " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"MW2", ",", "S", ",", "ME2", ",", "ME2", ",", "0", ",", "0"}],
+ ")"}],
+ TraditionalForm], " ",
+ SuperscriptBox["S", "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["MW2", "2"], "-",
+ RowBox[{"S", " ", "U"}]}], ")"}], "3"]}]], "+",
+ FractionBox[
+ RowBox[{"D", " ",
+ RowBox[{"(",
+ RowBox[{"MW2", "-", "S"}], ")"}], " ",
+ SuperscriptBox["T", "2"], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ "T", ",", "ME2", ",", "ME2", ",", "ME2", ",", "ME2", ",", "0"}], ")"}],
+
+ TraditionalForm], " ",
+ SuperscriptBox["S", "2"]}],
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["MW2", "2"], "-",
+ RowBox[{"S", " ", "U"}]}], ")"}], "3"]}]], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"D", " ", "S", " ", "T"}], "-",
+ RowBox[{"2", " ", "S", " ", "U"}]}], ")"}], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"S", ",", "0", ",", "0"}], ")"}],
+ TraditionalForm], " ", "S"}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"MW2", "-", "S"}], ")"}], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["MW2", "2"], "-",
+ RowBox[{"S", " ", "U"}]}], ")"}], "2"]}]], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["MW2", "2"], "+",
+ RowBox[{"2", " ", "S", " ", "MW2"}], "+",
+ RowBox[{"S", " ", "U"}]}], ")"}], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", "ME2", ")"}],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "MW2", " ",
+ RowBox[{"(",
+ RowBox[{"MW2", "-", "S"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", " ", "MW2"}], "-", "T"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["MW2", "2"], "-",
+ RowBox[{"S", " ", "U"}]}], ")"}]}]], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"(",
- RowBox[{"MW2", "+", "S"}], ")"}], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"4", " ",
- SuperscriptBox["MW2", "3"]}], "-",
- RowBox[{"9", " ",
- SuperscriptBox["MW2", "2"], " ", "S"}], "-",
RowBox[{
- SuperscriptBox["MW2", "2"], " ", "U"}], "-",
- RowBox[{"4", " ", "MW2", " ", "S", " ", "U"}], "+",
+ RowBox[{"-", "2"}], " ", "D", " ",
+ SuperscriptBox["MW2", "5"]}], "+",
+ RowBox[{"16", " ",
+ SuperscriptBox["MW2", "5"]}], "-",
+ RowBox[{"3", " ", "D", " ", "S", " ",
+ SuperscriptBox["MW2", "4"]}], "+",
+ RowBox[{"2", " ", "S", " ",
+ SuperscriptBox["MW2", "4"]}], "-",
+ RowBox[{"3", " ", "D", " ", "U", " ",
+ SuperscriptBox["MW2", "4"]}], "+",
+ RowBox[{"10", " ", "U", " ",
+ SuperscriptBox["MW2", "4"]}], "-",
+ RowBox[{"8", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"4", " ", "D", " ", "S", " ", "U", " ",
+ SuperscriptBox["MW2", "3"]}], "-",
+ RowBox[{"16", " ", "S", " ", "U", " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["MW2", "2"]}], "+",
+ RowBox[{"4", " ", "D", " ", "S", " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"8", " ", "S", " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ", "U", " ",
+ SuperscriptBox["MW2", "2"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["S", "4"], " ", "MW2"}], "+",
+ RowBox[{"4", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ", "U", " ", "MW2"}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["U", "3"]}], "-",
RowBox[{"2", " ",
- SuperscriptBox["S", "3"]}], "+",
- RowBox[{"5", " ",
- SuperscriptBox["S", "2"], " ", "U"}], "+",
- RowBox[{"3", " ", "S", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["U", "3"]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["U", "2"]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["S", "3"], " ",
SuperscriptBox["U", "2"]}]}], ")"}], " ",
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"T", ",", "ME2", ",", "ME2"}], ")"}],
- TraditionalForm],
- HoldForm],
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"MW2", ",", "0", ",", "ME2"}], ")"}],
TraditionalForm]}], ")"}], "/",
RowBox[{"(",
RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"MW2", "-", "S"}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -413,47 +768,48 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"4", " ",
- SuperscriptBox["MW2", "5"]}], "-",
- RowBox[{"5", " ",
- SuperscriptBox["MW2", "4"], " ", "S"}], "-",
- RowBox[{
- SuperscriptBox["MW2", "4"], " ", "U"}], "-",
- RowBox[{"16", " ",
- SuperscriptBox["MW2", "3"], " ",
- SuperscriptBox["S", "2"]}], "+",
- RowBox[{"4", " ",
- SuperscriptBox["MW2", "2"], " ",
- SuperscriptBox["S", "3"]}], "-",
- RowBox[{"4", " ",
- SuperscriptBox["MW2", "2"], " ",
- SuperscriptBox["S", "2"], " ", "U"}], "+",
- RowBox[{"4", " ",
- SuperscriptBox["MW2", "2"], " ", "S", " ",
- SuperscriptBox["U", "2"]}], "+",
- RowBox[{"4", " ", "MW2", " ",
+ RowBox[{"20", " ",
+ SuperscriptBox["MW2", "4"]}], "-",
+ RowBox[{"2", " ", "D", " ", "S", " ",
+ SuperscriptBox["MW2", "3"]}], "-",
+ RowBox[{"12", " ", "S", " ",
+ SuperscriptBox["MW2", "3"]}], "-",
+ RowBox[{"6", " ", "T", " ",
+ SuperscriptBox["MW2", "3"]}], "-",
+ RowBox[{"2", " ", "D", " ", "U", " ",
+ SuperscriptBox["MW2", "3"]}], "-",
+ RowBox[{"4", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["MW2", "2"]}], "+",
+ RowBox[{"2", " ", "S", " ", "T", " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"20", " ", "S", " ", "U", " ",
+ SuperscriptBox["MW2", "2"]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox["S", "3"], " ", "MW2"}], "+",
+ RowBox[{"3", " ", "D", " ", "S", " ",
+ SuperscriptBox["U", "2"], " ", "MW2"}], "+",
+ RowBox[{"12", " ",
+ SuperscriptBox["S", "2"], " ", "U", " ", "MW2"}], "+",
+ RowBox[{"6", " ", "S", " ", "T", " ", "U", " ", "MW2"}], "+",
+ RowBox[{"D", " ",
SuperscriptBox["S", "4"]}], "+",
- RowBox[{"8", " ", "MW2", " ",
- SuperscriptBox["S", "3"], " ", "U"}], "+",
- RowBox[{
- SuperscriptBox["S", "3"], " ",
- SuperscriptBox["U", "2"]}], "+",
- RowBox[{
+ RowBox[{"D", " ",
SuperscriptBox["S", "2"], " ",
- SuperscriptBox["U", "3"]}]}], ")"}], " ",
+ SuperscriptBox["U", "2"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ", "U"}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["S", "2"], " ", "T", " ", "U"}]}], ")"}], " ",
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"MW2", ",", "0", ",", "ME2"}], ")"}],
- TraditionalForm],
- HoldForm],
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"T", ",", "ME2", ",", "ME2"}], ")"}],
TraditionalForm]}], ")"}], "/",
RowBox[{"(",
RowBox[{"2", " ",
RowBox[{"(",
- RowBox[{"MW2", "-", "S"}], ")"}], " ",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -462,139 +818,190 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}], "2"]}], ")"}]}], "+",
- FractionBox[
- RowBox[{"S", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["MW2", "2"], "-",
- RowBox[{"4", " ", "MW2", " ", "S"}], "+",
- RowBox[{"2", " ",
- SuperscriptBox["S", "2"]}], "+",
- RowBox[{"S", " ", "U"}]}], ")"}], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"S", ",", "0", ",", "0"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{"MW2", "-", "S"}], ")"}], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}], "2"]}]], "-",
- FractionBox[
- RowBox[{
- SuperscriptBox["S", "2"], " ",
- SuperscriptBox["T", "2"], " ",
- RowBox[{"(",
- RowBox[{"MW2", "-", "S"}], ")"}], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- "T", ",", "ME2", ",", "ME2", ",", "ME2", ",", "ME2", ",", "0"}],
- ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- RowBox[{"2", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}], "3"]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["S", "2"], " ", "T", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"MW2", "-", "S"}], ")"}], "2"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- "MW2", ",", "S", ",", "ME2", ",", "ME2", ",", "0", ",", "0"}], ")"}],
-
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}], "3"]], "-",
+ RowBox[{"S", " ", "U"}]}], ")"}], "2"]}], ")"}]}], "-",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"(",
- RowBox[{"MW2", "+", "S"}], ")"}], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
+ RowBox[{"128", " ", "D", " ",
+ SuperscriptBox["MW2", "7"]}], "+",
+ RowBox[{"48", " ",
+ SuperscriptBox["MW2", "7"]}], "-",
+ RowBox[{"608", " ", "D", " ", "S", " ",
SuperscriptBox["MW2", "6"]}], "-",
+ RowBox[{"128", " ", "D", " ", "T", " ",
+ SuperscriptBox["MW2", "6"]}], "-",
+ RowBox[{"144", " ", "U", " ",
+ SuperscriptBox["MW2", "6"]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["MW2", "5"]}], "+",
+ RowBox[{"1152", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["MW2", "5"]}], "+",
+ RowBox[{"28", " ", "D", " ",
+ SuperscriptBox["T", "2"], " ",
+ SuperscriptBox["MW2", "5"]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "5"]}], "+",
+ RowBox[{"888", " ", "D", " ", "S", " ", "T", " ",
+ SuperscriptBox["MW2", "5"]}], "-",
RowBox[{"8", " ",
- SuperscriptBox["MW2", "5"], " ", "S"}], "-",
- RowBox[{"2", " ",
- SuperscriptBox["MW2", "5"], " ", "T"}], "+",
- RowBox[{"12", " ",
- SuperscriptBox["MW2", "4"], " ",
- SuperscriptBox["S", "2"]}], "+",
- RowBox[{"20", " ",
- SuperscriptBox["MW2", "4"], " ", "S", " ", "T"}], "-",
- RowBox[{"8", " ",
- SuperscriptBox["MW2", "3"], " ",
- SuperscriptBox["S", "3"]}], "-",
- RowBox[{"36", " ",
- SuperscriptBox["MW2", "3"], " ",
- SuperscriptBox["S", "2"], " ", "T"}], "-",
+ SuperscriptBox["D", "2"], " ", "S", " ", "U", " ",
+ SuperscriptBox["MW2", "5"]}], "-",
+ RowBox[{"96", " ", "S", " ", "U", " ",
+ SuperscriptBox["MW2", "5"]}], "+",
+ RowBox[{"48", " ", "T", " ", "U", " ",
+ SuperscriptBox["MW2", "5"]}], "-",
+ RowBox[{"16", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["MW2", "4"]}], "-",
+ RowBox[{"1088", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["MW2", "4"]}], "-",
+ RowBox[{"420", " ", "D", " ", "S", " ",
+ SuperscriptBox["T", "2"], " ",
+ SuperscriptBox["MW2", "4"]}], "+",
+ RowBox[{"288", " ", "S", " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "4"]}], "-",
+ RowBox[{"1840", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ", "T", " ",
+ SuperscriptBox["MW2", "4"]}], "+",
RowBox[{"6", " ",
- SuperscriptBox["MW2", "3"], " ", "S", " ",
- SuperscriptBox["T", "2"]}], "+",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "4"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"512", " ", "D", " ",
+ SuperscriptBox["S", "4"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"64", " ", "D", " ", "S", " ",
+ SuperscriptBox["T", "3"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"10", " ",
+ SuperscriptBox["D", "2"], " ", "S", " ",
+ SuperscriptBox["U", "3"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"1116", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["T", "2"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"18", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"48", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "3"]}], "-",
+ RowBox[{"96", " ", "S", " ", "T", " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"1568", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ", "T", " ",
+ SuperscriptBox["MW2", "3"]}], "-",
RowBox[{"2", " ",
- SuperscriptBox["MW2", "2"], " ",
- SuperscriptBox["S", "4"]}], "+",
- RowBox[{"20", " ",
- SuperscriptBox["MW2", "2"], " ",
- SuperscriptBox["S", "3"], " ", "T"}], "+",
- RowBox[{"6", " ",
- SuperscriptBox["MW2", "2"], " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "3"], " ", "U", " ",
+ SuperscriptBox["MW2", "3"]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "5"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"96", " ", "D", " ",
+ SuperscriptBox["S", "5"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"324", " ", "D", " ",
SuperscriptBox["S", "2"], " ",
- SuperscriptBox["T", "2"]}], "-",
- RowBox[{"2", " ", "MW2", " ",
- SuperscriptBox["S", "4"], " ", "T"}], "-",
- RowBox[{"6", " ", "MW2", " ",
- SuperscriptBox["S", "3"], " ",
- SuperscriptBox["T", "2"]}], "+",
- RowBox[{"4", " ", "MW2", " ",
+ SuperscriptBox["T", "3"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"144", " ",
SuperscriptBox["S", "2"], " ",
- SuperscriptBox["T", "3"]}], "-",
+ SuperscriptBox["U", "3"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"716", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["T", "2"], " ",
+ SuperscriptBox["MW2", "2"]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["U", "2"], " ",
+ SuperscriptBox["MW2", "2"]}], "-",
+ RowBox[{"528", " ", "D", " ",
+ SuperscriptBox["S", "4"], " ", "T", " ",
+ SuperscriptBox["MW2", "2"]}], "+",
+ RowBox[{"16", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "4"], " ", "U", " ",
+ SuperscriptBox["MW2", "2"]}], "-",
RowBox[{
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "6"], " ", "MW2"}], "+",
+ RowBox[{"38", " ", "D", " ",
+ SuperscriptBox["S", "2"], " ",
+ SuperscriptBox["T", "4"], " ", "MW2"}], "-",
+ RowBox[{"7", " ",
+ SuperscriptBox["D", "2"], " ",
SuperscriptBox["S", "2"], " ",
- SuperscriptBox["T", "4"]}]}], ")"}], " ",
+ SuperscriptBox["U", "4"], " ", "MW2"}], "+",
+ RowBox[{"100", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["T", "3"], " ", "MW2"}], "-",
+ RowBox[{"6", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["U", "3"], " ", "MW2"}], "+",
+ RowBox[{"48", " ",
+ SuperscriptBox["S", "2"], " ", "T", " ",
+ SuperscriptBox["U", "3"], " ", "MW2"}], "+",
+ RowBox[{"120", " ", "D", " ",
+ SuperscriptBox["S", "4"], " ",
+ SuperscriptBox["T", "2"], " ", "MW2"}], "+",
+ RowBox[{"40", " ", "D", " ",
+ SuperscriptBox["S", "5"], " ", "T", " ", "MW2"}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "5"], " ", "U", " ", "MW2"}], "-",
+ RowBox[{
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "7"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["T", "4"]}], "-",
+ RowBox[{
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "3"], " ",
+ SuperscriptBox["U", "4"]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "4"], " ",
+ SuperscriptBox["U", "3"]}], "-",
+ RowBox[{"6", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "5"], " ",
+ SuperscriptBox["U", "2"]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["D", "2"], " ",
+ SuperscriptBox["S", "6"], " ", "U"}]}], ")"}], " ",
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- "MW2", ",", "MW2", ",", "T", ",", "ME2", ",", "0", ",", "ME2"}],
- ")"}],
- TraditionalForm],
- HoldForm],
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ "MW2", ",", "MW2", ",", "T", ",", "ME2", ",", "0", ",", "ME2"}], ")"}],
TraditionalForm]}], ")"}], "/",
RowBox[{"(",
- RowBox[{"2", " ",
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -603,50 +1010,16 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}], "3"]}], ")"}]}], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["S", "3"], " ",
- SuperscriptBox["T", "2"], " ",
- RowBox[{"(",
- RowBox[{"MW2", "-", "S"}], ")"}], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"D\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- "MW2", ",", "MW2", ",", "ME2", ",", "ME2", ",", "T", ",", "S", ",",
- "ME2", ",", "0", ",", "ME2", ",", "0"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- RowBox[{"2", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}], "3"]}]], "-",
- FractionBox[
- RowBox[{"MW2", "+", "S"}],
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"4", " ", "MW2"}], "-", "T"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["MW2", "2"], "-",
- RowBox[{"S", " ", "U"}]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{576, 512},
+ RowBox[{"S", " ", "U"}]}], ")"}], "3"]}], ")"}]}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{579, 824},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[9]=",
- CellID->2007769481]
+ CellLabel->"Out[7]=",
+ CellID->775966781]
}, Open ]],
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{
RowBox[{"Write2", "[",
@@ -655,113 +1028,11 @@ Cell[BoxData[
RowBox[{"FormatType", "\[Rule]", "FortranForm"}]}], "]"}], ";"}]], "Input",\
CellTags->"PaVeReduce",
- CellLabel->"In[10]:=",
+ CellLabel->"In[8]:=",
CellID->1848976065],
Cell[CellGroupData[{
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "1",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "2"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 1, " and ", 2],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->166843212],
-
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "3",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "4"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 3, " and ", 4],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->698332942],
-
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "7",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "8"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 7, " and ", 8],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->1548805099],
-
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "11",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "12"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 11, " and ", 12],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->1669457698],
-
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "13",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "14"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 13, " and ", 14],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->1662947713],
-
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "15",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "16"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 15, " and ", 16],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->481089128],
-
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "17",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "18"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 17, " and ", 18],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"PaVeReduce",
- CellLabel->"During evaluation of In[10]:=",
- CellID->2099280721]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{"ReadList", "[",
@@ -773,44 +1044,96 @@ Cell[BoxData[
",", "\"\<\>\""}], "]"}], "<>", "\"\\""}], ",",
"String"}], "]"}], "]"}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[11]:=",
+ CellLabel->"In[9]:=",
CellID->193852328],
Cell[BoxData[
FormBox[
TagBox[
TagBox[GridBox[{
- {"\<\" d122res = (-0.5*(MW2 + S))/((4.*MW2 - 1.*T)*(MW2^2 - \
-1.*S*U)) - \"\>"},
- {"\<\" (0.5*(4.*MW2^5 - 5.*MW2^4*S - 16.*MW2^3*S^2 + 4.*MW2^2*S^3 + \
-4.*MW2*S^4 - \"\>"},
- {"\<\" 1.*MW2^4*U - 4.*MW2^2*S^2*U + 8.*MW2*S^3*U + 4.*MW2^2*S*U^2 + \
-S^3*U^2 + \"\>"},
- {"\<\" S^2*U^3)*B0[MW2, 0., ME2])/((MW2 - 1.*S)*(4.*MW2 - 1.*T)^2*\"\
-\>"},
- {"\<\" (MW2^2 - 1.*S*U)^2) + (0.5*S*(MW2^2 - 4.*MW2*S + 2.*S^2 + \
-S*U)*\"\>"},
- {"\<\" B0[S, 0., 0.])/((MW2 - 1.*S)*(MW2^2 - 1.*S*U)^2) + \"\>"},
- {"\<\" (0.5*(MW2 + S)*(4.*MW2^3 - 9.*MW2^2*S + 2.*S^3 - 1.*MW2^2*U - \
-4.*MW2*S*U + \"\>"},
- {"\<\" 5.*S^2*U + 3.*S*U^2)*B0[T, ME2, ME2])/((4.*MW2 - \
-1.*T)^2*\"\>"},
- {"\<\" (MW2^2 - 1.*S*U)^2) - \"\>"},
- {"\<\" (0.5*(MW2 + S)*(2.*MW2^6 - 8.*MW2^5*S + 12.*MW2^4*S^2 - \
-8.*MW2^3*S^3 + \"\>"},
- {"\<\" 2.*MW2^2*S^4 - 2.*MW2^5*T + 20.*MW2^4*S*T - 36.*MW2^3*S^2*T + \
+ {"\<\" d122res = -((5.D-1*(MW2**2 + S*U + MW2*S*2D0)*\"\>"},
+ {"\<\" & PaVe(0D0,List(),List(ME2)))/\"\>"},
+ {"\<\" & (MW2*(MW2 - S*1D0)*(MW2**2 - S*U*1D0)*\"\>"},
+ {"\<\" & (-(T*1D0) + MW2*4D0))) + \"\>"},
+ {"\<\" & (5.D-1*(D*S**3*U**2 + D*S**2*U**3 - D*MW2**5*2D0 + \
+\"\>"},
+ {"\<\" & MW2**4*S*2D0 + D*MW2**2*S**3*2D0 + \"\>"},
+ {"\<\" & D*MW2*S**4*2D0 - D*MW2**2*S**2*U*2D0 - \"\>"},
+ {"\<\" & S**3*U**2*2D0 - S**2*U**3*2D0 - D*MW2**4*S*3D0 - \
+\"\>"},
+ {"\<\" & D*MW2**4*U*3D0 + D*MW2**3*S*U*4D0 + \"\>"},
+ {"\<\" & D*MW2*S**3*U*4D0 + D*MW2**2*S*U**2*4D0 - \"\>"},
+ {"\<\" & D*MW2**3*S**2*8D0 - MW2**2*S*U**2*8D0 + \"\>"},
+ {"\<\" & MW2**4*U*1.D1 + MW2**5*1.6D1 - \
+MW2**3*S*U*1.6D1)*\"\>"},
+ {"\<\" & PaVe(0D0,List(MW2),List(0D0,ME2)))/\"\>"},
+ {"\<\" & ((MW2 - S*1D0)*(MW2**2 - S*U*1D0)**2*\"\>"},
+ {"\<\" & (-(D*1D0) + 2D0)*(-(T*1D0) + MW2*4D0)**2) - \"\>"},
+ {"\<\" & (S*5.D-1*(-(D*S*T*1D0) + MW2**2*2D0 - S*U*2D0)*\"\>"},
+ {"\<\" & PaVe(0D0,List(S),List(0D0,0D0)))/\"\>"},
+ {"\<\" & ((MW2 - S*1D0)*(MW2**2 - S*U*1D0)**2*\"\>"},
+ {"\<\" & (-(D*1D0) + 2D0)) - \"\>"},
+ {"\<\" & (5.D-1*(D*MW2*S**3 + D*S**4 + D*S**2*U**2 - \"\>"},
+ {"\<\" & D*MW2**3*S*2D0 + MW2**2*S*T*2D0 - \"\>"},
+ {"\<\" & D*MW2**3*U*2D0 + D*S**3*U*2D0 - S**2*T*U*2D0 + \"\>"},
+ {"\<\" & D*MW2*S*U**2*3D0 - D*MW2**2*S**2*4D0 - \"\>"},
+ {"\<\" & MW2**3*T*6D0 + MW2*S*T*U*6D0 - MW2**3*S*1.2D1 + \
+\"\>"},
+ {"\<\" & MW2*S**2*U*1.2D1 + MW2**4*2.D1 - \
+MW2**2*S*U*2.D1)\"\>"},
+ {"\<\" & *PaVe(0D0,List(T),List(ME2,ME2)))/\"\>"},
+ {"\<\" & ((MW2**2 - S*U*1D0)**2*(-(D*1D0) + 2D0)*\"\>"},
+ {"\<\" & (-(T*1D0) + MW2*4D0)**2) - \"\>"},
+ {"\<\" & (1.25D-1*(-(D**2*MW2*S**6*1D0) - D**2*S**7*1D0 - \"\>"},
+ {"\<\" & D**2*S**3*U**4*1D0 + D*S**3*T**4*2D0 - \"\>"},
+ {"\<\" & D**2*MW2**3*S**3*U*2D0 - D**2*MW2*S**5*U*2D0 - \"\>"},
+ {"\<\" & D**2*MW2**5*S**2*4D0 - D**2*S**6*U*4D0 - \"\>"},
+ {"\<\" & D**2*MW2**5*U**2*4D0 - D**2*S**4*U**3*4D0 + \"\>"},
+ {"\<\" & D**2*MW2**3*S**4*6D0 - D**2*S**5*U**2*6D0 - \"\>"},
+ {"\<\" & D**2*MW2*S**3*U**3*6D0 - \"\>"},
+ {"\<\" & D**2*MW2*S**2*U**4*7D0 + D**2*MW2**2*S**5*8D0 - \
\"\>"},
- {"\<\" 20.*MW2^2*S^3*T - 2.*MW2*S^4*T - 6.*MW2^3*S*T^2 + \
-6.*MW2^2*S^2*T^2 - \"\>"},
- {"\<\" 6.*MW2*S^3*T^2 + 4.*MW2*S^2*T^3 - 1.*S^2*T^4)*\"\>"},
- {"\<\" C0[MW2, MW2, T, ME2, 0., ME2])/((4.*MW2 - 1.*T)^2*(MW2^2 - \
-1.*S*U)^3) + \"\>"},
- {"\<\" ((MW2 & 1.*S)^2*S^2*T*C0[MW2, S, ME2, ME2, 0., 0.])/(MW2^2 - \
-1.*S*U)^3 - \"\>"},
- {"\<\" (0.5*(MW2 - 1.*S)*S^2*T^2*C0[T, ME2, ME2, ME2, ME2, 0.])/\"\>"},
- {"\<\" (MW2^2 - 1.*S*U)^3 + (0.5*(MW2 - 1.*S)*S^3*T^2*D0[MW2, MW2, \
-ME2, ME2, T, S, \"\>"},
- {"\<\" ME2, 0., ME2, 0.])/(MW2^2 - 1.*S*U)^3\"\>"}
+ {"\<\" & D**2*MW2**5*S*U*8D0 + \"\>"},
+ {"\<\" & D**2*MW2**2*S**3*U**2*8D0 + \"\>"},
+ {"\<\" & D**2*MW2**3*S*U**3*1.D1 - \"\>"},
+ {"\<\" & D**2*MW2**4*S**3*1.6D1 + \"\>"},
+ {"\<\" & D**2*MW2**2*S**4*U*1.6D1 + \"\>"},
+ {"\<\" & D**2*MW2**3*S**2*U**2*1.8D1 + \"\>"},
+ {"\<\" & D*MW2**5*T**2*2.8D1 + D*MW2*S**2*T**4*3.8D1 + \
+\"\>"},
+ {"\<\" & D*MW2*S**5*T*4.D1 + MW2**7*4.8D1 + \"\>"},
+ {"\<\" & MW2**5*T*U*4.8D1 + MW2**3*S**2*U**2*4.8D1 + \"\>"},
+ {"\<\" & MW2*S**2*T*U**3*4.8D1 + D*MW2**3*S*T**3*6.4D1 - \
+\"\>"},
+ {"\<\" & D*MW2**2*S**5*9.6D1 - MW2**5*S*U*9.6D1 - \"\>"},
+ {"\<\" & MW2**3*S*T*U**2*9.6D1 + D*MW2*S**3*T**3*1.D2 + \"\>"},
+ {"\<\" & D*MW2*S**4*T**2*1.2D2 + D*MW2**7*1.28D2 - \"\>"},
+ {"\<\" & D*MW2**6*T*1.28D2 - MW2**6*U*1.44D2 - \"\>"},
+ {"\<\" & MW2**2*S**2*U**3*1.44D2 + MW2**4*S*U**2*2.88D2 - \
+\"\>"},
+ {"\<\" & D*MW2**2*S**2*T**3*3.24D2 - \"\>"},
+ {"\<\" & D*MW2**4*S*T**2*4.2D2 + D*MW2**3*S**4*5.12D2 - \"\>"},
+ {"\<\" & D*MW2**2*S**4*T*5.28D2 - D*MW2**6*S*6.08D2 - \"\>"},
+ {"\<\" & D*MW2**2*S**3*T**2*7.16D2 + \"\>"},
+ {"\<\" & D*MW2**5*S*T*8.88D2 - D*MW2**4*S**3*1.088D3 + \
+\"\>"},
+ {"\<\" & D*MW2**3*S**2*T**2*1.116D3 + \"\>"},
+ {"\<\" & D*MW2**5*S**2*1.152D3 + \"\>"},
+ {"\<\" & D*MW2**3*S**3*T*1.568D3 - \
+D*MW2**4*S**2*T*1.84D3)\"\>"},
+ {"\<\" & *PaVe(0D0,List(MW2,MW2,T),List(ME2,0D0,ME2)))/\"\>"},
+ {"\<\" & ((MW2**2 - S*U*1D0)**3*(-(D*1D0) + 2D0)*\"\>"},
+ {"\<\" & (-(D*1D0) + 3D0)*(-(T*1D0) + MW2*4D0)**2) - \"\>"},
+ {"\<\" & (D*S**2*T*2.5D-1*(MW2 - S*1D0)**2*\"\>"},
+ {"\<\" & PaVe(0D0,List(MW2,S,ME2),List(ME2,0D0,0D0)))/\"\>"},
+ {"\<\" & ((MW2**2 - S*U*1D0)**3*(-(D*1D0) + 3D0)) + \"\>"},
+ {"\<\" & (D*S**2*T**2*1.25D-1*(MW2 - S*1D0)*\"\>"},
+ {"\<\" & PaVe(0D0,List(T,ME2,ME2),List(ME2,ME2,0D0)))/\"\>"},
+ {"\<\" & ((MW2**2 - S*U*1D0)**3*(-(D*1D0) + 3D0)) - \"\>"},
+ {"\<\" & (D*S**3*T**2*1.25D-1*(MW2 - S*1D0)*\"\>"},
+ {"\<\" & PaVe(0D0,List(ME2,MW2,MW2,ME2,S,T),\"\>"},
+ {"\<\" & List(0D0,ME2,0D0,ME2)))/\"\>"},
+ {"\<\" & ((MW2**2 - S*U*1D0)**3*(-(D*1D0) + 3D0))\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
@@ -825,22 +1148,23 @@ ME2, ME2, T, S, \"\>"},
Column],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]], TraditionalForm]], "Output",
- ImageSize->{594, 321},
+ ImageSize->{461, 1272},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PaVeReduce",
- CellLabel->"Out[11]//TableForm=",
- CellID->273826743]
+ CellLabel->"Out[9]//TableForm=",
+ CellID->2020509582]
}, Open ]],
Cell[BoxData[
RowBox[{
- RowBox[{"DeleteFile", "/@",
- RowBox[{"FileNames", "[", "\"\\"", "]"}]}], ";",
- RowBox[{"Clear", "[",
- RowBox[{"d122", ",", "se"}], "]"}], ";"}]], "Input",
+ RowBox[{
+ RowBox[{"DeleteFile", "/@",
+ RowBox[{"FileNames", "[", "\"\\"", "]"}]}], ";",
+ RowBox[{"Clear", "[",
+ RowBox[{"d122", ",", "se"}], "]"}], ";"}], " "}]], "Input",
CellTags->"PaVeReduce",
- CellLabel->"In[12]:=",
+ CellLabel->"In[10]:=",
CellID->793776799]
}, Open ]],
@@ -876,9 +1200,8 @@ Cell[TextData[{
ButtonNote->"PaVeOrder"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PaVeReduce",
- CellID->1234185302]
+}], "SeeAlso",
+ CellID->939950363]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -895,22 +1218,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2015, 11, 6, 23, 4, 29.112410}",
+ "built" -> "{2020, 1, 5, 19, 0, 41.675133}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PaVeReduce[expr] reduces all Passarino-Veltman integrals (i.e. all \
-PaVe's) in expr down to scalar A0, B0, C0 and D0.", "synonyms" -> {}, "title" ->
- "PaVeReduce", "titlemodifier" -> "", "windowtitle" -> "PaVeReduce",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/PaVeReduce"},
- "SearchTextTranslated" -> ""},
+PaVe's) in expr down to scalar A0, B0, C0 and D0.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "PaVeReduce", "titlemodifier" -> "",
+ "windowtitle" -> "PaVeReduce", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PaVeReduce"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.2 for Linux x86 (64-bit) (July 6, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -919,7 +1242,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.2 for Linux x86 (64-bit) (July 6, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -927,230 +1250,173 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3368, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->906569074]},
"PaVeReduce"->{
- Cell[4000, 124, 138, 4, 27, "Input",
+ Cell[5266, 160, 139, 4, 70, "Input",
CellTags->"PaVeReduce",
CellID->1685498711],
- Cell[4141, 130, 552, 17, 56, "Output",
+ Cell[5408, 166, 994, 25, 92, "Output",
CellTags->"PaVeReduce",
- CellID->1380007374],
- Cell[4730, 152, 539, 17, 45, "Input",
+ CellID->458544387],
+ Cell[7097, 227, 539, 17, 45, "Input",
CellTags->"PaVeReduce",
CellID->311139632],
- Cell[5272, 171, 268, 10, 36, "Output",
- CellTags->"PaVeReduce",
- CellID->1665481194],
- Cell[5577, 186, 124, 4, 27, "Input",
- CellTags->"PaVeReduce",
- CellID->469470556],
- Cell[5704, 192, 241, 8, 36, "Output",
+ Cell[7639, 246, 266, 10, 37, "Output",
CellTags->"PaVeReduce",
- CellID->111861120],
- Cell[5982, 205, 124, 4, 27, "Input",
+ CellID->516283693],
+ Cell[7942, 261, 124, 4, 27, "Input",
CellTags->"PaVeReduce",
CellID->927282004],
- Cell[6109, 211, 242, 8, 36, "Output",
+ Cell[8069, 267, 5286, 178, 282, "Output",
CellTags->"PaVeReduce",
- CellID->1785054415],
- Cell[6388, 224, 509, 16, 45, "Input",
+ CellID->1592936160],
+ Cell[13392, 450, 509, 16, 45, "Input",
CellTags->"PaVeReduce",
CellID->1031771651],
- Cell[6900, 242, 874, 33, 63, "Output",
+ Cell[13904, 468, 634, 22, 55, "Output",
CellTags->"PaVeReduce",
- CellID->795683657],
- Cell[7811, 280, 416, 13, 45, "Input",
+ CellID->1972744154],
+ Cell[14575, 495, 416, 13, 45, "Input",
CellTags->"PaVeReduce",
CellID->2052937684],
- Cell[8230, 295, 898, 27, 72, "Output",
+ Cell[14994, 510, 902, 27, 85, "Output",
CellTags->"PaVeReduce",
- CellID->1465048226],
- Cell[9143, 325, 227, 8, 27, "Input",
+ CellID->1778677368],
+ Cell[15911, 540, 227, 8, 27, "Input",
CellTags->"PaVeReduce",
CellID->1002068234],
- Cell[9373, 335, 179, 6, 27, "Input",
+ Cell[16141, 550, 179, 6, 27, "Input",
CellTags->"PaVeReduce",
CellID->175960789],
- Cell[9577, 345, 696, 20, 45, "Input",
+ Cell[16345, 560, 696, 20, 45, "Input",
CellTags->"PaVeReduce",
CellID->1868254708],
- Cell[10276, 367, 8762, 277, 533, "Output",
+ Cell[17044, 582, 16051, 437, 845, "Output",
CellTags->"PaVeReduce",
- CellID->2007769481],
- Cell[19075, 649, 286, 9, 27, "Input",
+ CellID->775966781],
+ Cell[33110, 1022, 285, 9, 27, "Input",
CellTags->"PaVeReduce",
CellID->1848976065],
- Cell[19386, 662, 547, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->166843212],
- Cell[19936, 676, 547, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->698332942],
- Cell[20486, 690, 548, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->1548805099],
- Cell[21037, 704, 552, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->1669457698],
- Cell[21592, 718, 552, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->1662947713],
- Cell[22147, 732, 551, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->481089128],
- Cell[22701, 746, 552, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->2099280721],
- Cell[23302, 764, 393, 12, 45, "Input",
+ Cell[33420, 1035, 392, 12, 45, "Input",
CellTags->"PaVeReduce",
CellID->193852328],
- Cell[23698, 778, 2288, 54, 342, "Output",
+ Cell[33815, 1049, 5837, 106, 1308, "Output",
CellTags->"PaVeReduce",
- CellID->273826743],
- Cell[26001, 835, 271, 8, 27, "Input",
+ CellID->2020509582],
+ Cell[39667, 1158, 293, 9, 27, "Input",
CellTags->"PaVeReduce",
- CellID->793776799],
- Cell[26628, 865, 377, 15, 31, "Text",
- CellTags->"PaVeReduce",
- CellID->1234185302]}
+ CellID->793776799]},
+ "PrimaryExamplesSection"->{
+ Cell[6463, 198, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1536895706]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 28894, 929},
- {"PaVeReduce", 29030, 933}
+ {"PaVeReduce", 42545, 1252},
+ {"PrimaryExamplesSection", 44233, 1307}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3106, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 449, 13, 83, "Usage",
- CellID->982511436],
+Cell[3691, 99, 287, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3368, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->906569074],
+Cell[4003, 114, 440, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3780, 114, 195, 6, 25, "ExampleSection",
- CellID->318399322],
+Cell[4468, 130, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1713910284],
+Cell[5210, 156, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4000, 124, 138, 4, 27, "Input",
+Cell[5266, 160, 139, 4, 70, "Input",
CellTags->"PaVeReduce",
CellID->1685498711],
-Cell[4141, 130, 552, 17, 56, "Output",
+Cell[5408, 166, 994, 25, 92, "Output",
CellTags->"PaVeReduce",
- CellID->1380007374]
+ CellID->458544387]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4730, 152, 539, 17, 45, "Input",
- CellTags->"PaVeReduce",
- CellID->311139632],
-Cell[5272, 171, 268, 10, 36, "Output",
- CellTags->"PaVeReduce",
- CellID->1665481194]
-}, Open ]],
+Cell[6463, 198, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1536895706],
+Cell[CellGroupData[{
+Cell[6876, 217, 196, 6, 26, "ExampleSection",
+ CellID->1759687694],
Cell[CellGroupData[{
-Cell[5577, 186, 124, 4, 27, "Input",
+Cell[7097, 227, 539, 17, 45, "Input",
CellTags->"PaVeReduce",
- CellID->469470556],
-Cell[5704, 192, 241, 8, 36, "Output",
+ CellID->311139632],
+Cell[7639, 246, 266, 10, 37, "Output",
CellTags->"PaVeReduce",
- CellID->111861120]
+ CellID->516283693]
}, Open ]],
Cell[CellGroupData[{
-Cell[5982, 205, 124, 4, 27, "Input",
+Cell[7942, 261, 124, 4, 27, "Input",
CellTags->"PaVeReduce",
CellID->927282004],
-Cell[6109, 211, 242, 8, 36, "Output",
+Cell[8069, 267, 5286, 178, 282, "Output",
CellTags->"PaVeReduce",
- CellID->1785054415]
+ CellID->1592936160]
}, Open ]],
Cell[CellGroupData[{
-Cell[6388, 224, 509, 16, 45, "Input",
+Cell[13392, 450, 509, 16, 45, "Input",
CellTags->"PaVeReduce",
CellID->1031771651],
-Cell[6900, 242, 874, 33, 63, "Output",
+Cell[13904, 468, 634, 22, 55, "Output",
CellTags->"PaVeReduce",
- CellID->795683657]
+ CellID->1972744154]
}, Open ]],
Cell[CellGroupData[{
-Cell[7811, 280, 416, 13, 45, "Input",
+Cell[14575, 495, 416, 13, 45, "Input",
CellTags->"PaVeReduce",
CellID->2052937684],
-Cell[8230, 295, 898, 27, 72, "Output",
+Cell[14994, 510, 902, 27, 85, "Output",
CellTags->"PaVeReduce",
- CellID->1465048226]
+ CellID->1778677368]
}, Open ]],
-Cell[9143, 325, 227, 8, 27, "Input",
+Cell[15911, 540, 227, 8, 27, "Input",
CellTags->"PaVeReduce",
CellID->1002068234],
-Cell[9373, 335, 179, 6, 27, "Input",
+Cell[16141, 550, 179, 6, 27, "Input",
CellTags->"PaVeReduce",
CellID->175960789],
Cell[CellGroupData[{
-Cell[9577, 345, 696, 20, 45, "Input",
+Cell[16345, 560, 696, 20, 45, "Input",
CellTags->"PaVeReduce",
CellID->1868254708],
-Cell[10276, 367, 8762, 277, 533, "Output",
+Cell[17044, 582, 16051, 437, 845, "Output",
CellTags->"PaVeReduce",
- CellID->2007769481]
+ CellID->775966781]
}, Open ]],
-Cell[CellGroupData[{
-Cell[19075, 649, 286, 9, 27, "Input",
+Cell[33110, 1022, 285, 9, 27, "Input",
CellTags->"PaVeReduce",
CellID->1848976065],
Cell[CellGroupData[{
-Cell[19386, 662, 547, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->166843212],
-Cell[19936, 676, 547, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->698332942],
-Cell[20486, 690, 548, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->1548805099],
-Cell[21037, 704, 552, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->1669457698],
-Cell[21592, 718, 552, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->1662947713],
-Cell[22147, 732, 551, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->481089128],
-Cell[22701, 746, 552, 12, 62, "Print",
- CellTags->"PaVeReduce",
- CellID->2099280721]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[23302, 764, 393, 12, 45, "Input",
+Cell[33420, 1035, 392, 12, 45, "Input",
CellTags->"PaVeReduce",
CellID->193852328],
-Cell[23698, 778, 2288, 54, 342, "Output",
+Cell[33815, 1049, 5837, 106, 1308, "Output",
CellTags->"PaVeReduce",
- CellID->273826743]
+ CellID->2020509582]
}, Open ]],
-Cell[26001, 835, 271, 8, 27, "Input",
+Cell[39667, 1158, 293, 9, 27, "Input",
CellTags->"PaVeReduce",
CellID->793776799]
}, Open ]],
-Cell[26287, 846, 31, 0, 29, "SectionFooterSpacer"]
+Cell[39975, 1170, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[26355, 851, 270, 12, 31, "SeeAlsoSection",
+Cell[40043, 1175, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[26628, 865, 377, 15, 31, "Text",
- CellTags->"PaVeReduce",
- CellID->1234185302]
+Cell[40316, 1189, 354, 14, 56, "SeeAlso",
+ CellID->939950363]
}, Open ]],
-Cell[27020, 883, 23, 0, 42, "FooterCell"]
+Cell[40685, 1206, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeUVPart.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeUVPart.nb
new file mode 100644
index 000000000..945de8744
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PaVeUVPart.nb
@@ -0,0 +1,544 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15943, 534]
+NotebookOptionsPosition[ 11874, 413]
+NotebookOutlinePosition[ 14320, 474]
+CellTagsIndexPosition[ 14235, 469]
+WindowTitle->PaVeUVPart
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVeReduce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PaVeUVPart\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PaVeUVPart"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+PaVeUVPart.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$208097],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PaVeUVPart", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PaVeUVPart", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PaVeUVPart", "[", "expr", "]"}]], "InlineFormula"],
+ " \[LineSeparator]replaces all occuring Passarino-Veltman functions by \
+their explicit values, where only the UV divergent part is preserved, while \
+possible IR divergences and the finite part are discarded. \[LineSeparator]\
+\[LineSeparator]The function uses the algorithm from \"Sulyok, G., A closed \
+expression for the UV-divergent parts of one-loop tensor integrals in \
+dimensional regularization, Phys. Part. Nuclei Lett. (2017) 14:631, \
+arXiv:hep-ph/0609282 "
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1956058901],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PaVeUVPart", "]"}]], "Input",
+ CellLabel->"In[52]:=",
+ CellID->617667665],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCLoopExtract", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Prefactor", "\[Rule]", "1"}], ",",
+ RowBox[{"ToPaVe2", "\[Rule]", "True"}], ",",
+ RowBox[{"Together", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{575, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[52]=",
+ CellID->717628530]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->887622295],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->852270963],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PaVeUVPart", "[",
+ RowBox[{"A0", "[",
+ RowBox[{"m", "^", "2"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1445277710],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"2", " ",
+ SuperscriptBox["m", "2"]}],
+ RowBox[{"D", "-", "4"}]]}], TraditionalForm]], "Output",
+ ImageSize->{59, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->384429231]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PaVeUVPart", "[",
+ RowBox[{"x", "+",
+ RowBox[{"y", " ",
+ RowBox[{"B0", "[",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], ",", "0", ",",
+ SuperscriptBox["M", "2"]}], "]"}]}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1518685822],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"D", " ", "x"}], "-",
+ RowBox[{"4", " ", "x"}], "-",
+ RowBox[{"2", " ", "y"}]}],
+ RowBox[{"D", "-", "4"}]], TraditionalForm]], "Output",
+ ImageSize->{116, 34},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->319680291]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"PaVe", "[",
+ RowBox[{"0", ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"p10", ",", "p12", ",", "p20"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], ",",
+ RowBox[{"m2", "^", "2"}], ",",
+ RowBox[{"m3", "^", "2"}]}], "}"}]}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"PaVeUVPart", "[", "%", "]"}]}], "Input",
+ CellLabel->"In[3]:=",
+ CellID->759345267],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"C\"\>", "\<\"00\"\>"], "(",
+ RowBox[{"p10", ",", "p12", ",", "p20", ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"], ",",
+ SuperscriptBox["m3", "2"]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{232, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->812213864],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}]}]]}], TraditionalForm]], "Output",
+ ImageSize->{83, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1946544093]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"PaVe", "[",
+ RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
+ RowBox[{"{",
+ RowBox[{"p10", ",", "p12", ",", "p23", ",", "0", ",", "p20", ",", "p13"}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], ",",
+ RowBox[{"m2", "^", "2"}], ",",
+ RowBox[{"m3", "^", "2"}], ",",
+ RowBox[{"m4", "^", "2"}]}], "}"}]}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"PaVeUVPart", "[", "%", "]"}]}], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1054433755],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"D\"\>", "\<\"000000\"\>"], "(",
+ RowBox[{
+ "p10", ",", "p12", ",", "p23", ",", "0", ",", "p20", ",", "p13", ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"], ",",
+ SuperscriptBox["m3", "2"], ",",
+ SuperscriptBox["m4", "2"]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{368, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->792114270],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"5", " ",
+ SuperscriptBox["m1", "2"]}]}], "-",
+ RowBox[{"5", " ",
+ SuperscriptBox["m2", "2"]}], "-",
+ RowBox[{"5", " ",
+ SuperscriptBox["m3", "2"]}], "-",
+ RowBox[{"5", " ",
+ SuperscriptBox["m4", "2"]}], "+", "p10", "+", "p12", "+", "p13", "+",
+ "p20", "+", "p23"}],
+ RowBox[{"480", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{408, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->146736684]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PaVe",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PaVe",
+ ButtonNote->"PaVe"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["PaVeReduce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PaVeReduce",
+ ButtonNote->"PaVeReduce"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"PaVeUVPart",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 43.018874}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PaVeUVPart[expr] replaces all occuring Passarino-Veltman functions by \
+their explicit values, where only the UV divergent part is preserved, while \
+possible IR divergences and the finite part are discarded. The function uses \
+the algorithm from \"Sulyok, G., A closed expression for the UV-divergent \
+parts of one-loop tensor integrals in dimensional regularization, Phys. Part. \
+Nuclei Lett. (2017) 14:631, arXiv:hep-ph/0609282 ", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "PaVeUVPart", "titlemodifier" -> "",
+ "windowtitle" -> "PaVeUVPart", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PaVeUVPart"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6479, 194, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->887622295]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 14092, 462}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 3093, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3678, 98, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3990, 113, 791, 17, 170, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4806, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1956058901],
+Cell[5548, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5604, 164, 113, 3, 70, "Input",
+ CellID->617667665],
+Cell[5720, 169, 698, 18, 56, "Output",
+ CellID->717628530]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6479, 194, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->887622295],
+Cell[CellGroupData[{
+Cell[6891, 213, 195, 6, 26, "ExampleSection",
+ CellID->852270963],
+Cell[CellGroupData[{
+Cell[7111, 223, 160, 5, 27, "Input",
+ CellID->1445277710],
+Cell[7274, 230, 303, 11, 59, "Output",
+ CellID->384429231]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7614, 246, 311, 10, 33, "Input",
+ CellID->1518685822],
+Cell[7928, 258, 341, 12, 55, "Output",
+ CellID->319680291]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8306, 275, 414, 12, 45, "Input",
+ CellID->759345267],
+Cell[8723, 289, 406, 12, 42, "Output",
+ CellID->812213864],
+Cell[9132, 303, 305, 11, 59, "Output",
+ CellID->1946544093]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9474, 319, 531, 14, 62, "Input",
+ CellID->1054433755],
+Cell[10008, 335, 485, 14, 42, "Output",
+ CellID->792114270],
+Cell[10496, 351, 628, 21, 62, "Output",
+ CellID->146736684]
+}, Open ]]
+}, Open ]],
+Cell[11151, 376, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11219, 381, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11492, 395, 340, 13, 56, "SeeAlso"]
+}, Open ]],
+Cell[11847, 411, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Pair.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Pair.nb
index bf4fbfce3..3eec0e99f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Pair.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Pair.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21595, 832]
-NotebookOptionsPosition[ 14317, 581]
-NotebookOutlinePosition[ 18784, 717]
-CellTagsIndexPosition[ 18676, 711]
+NotebookDataLength[ 22852, 853]
+NotebookOptionsPosition[ 15912, 623]
+NotebookOutlinePosition[ 20072, 745]
+CellTagsIndexPosition[ 19964, 739]
WindowTitle->Pair
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Pair\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Pair"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Pair.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$115502],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Pair",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FV\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"FVD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FVD"], "\<\"MT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/MT"], "\<\"MTD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/MTD"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"SP\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SP"], "\<\"SPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Pair\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Pair"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Pair.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$200662],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Pair",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Pair", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Pair", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,7 +155,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1751102170],
+ CellID->1154538991],
Cell[CellGroupData[{
@@ -126,11 +165,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->431213674],
+ CellID->308626153],
-Cell["This represents a four-dimensional metric tensor.", "Text",
- CellTags->"Pair",
- CellID->1660838641],
+Cell["This represents a four-dimensional metric tensor", "Notes"],
Cell[CellGroupData[{
@@ -149,28 +186,21 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{38, 19},
+ ImageSize->{39, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[1]=",
- CellID->1133543032]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["This is a D-dimensional metric tensor.", "Text",
- CellTags->"Pair",
- CellID->1732482457],
+Cell["This is a D-dimensional metric tensor", "Notes"],
Cell[CellGroupData[{
@@ -190,25 +220,49 @@ Cell[BoxData[
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{36, 19},
+ ImageSize->{37, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["\<\
+If the Lorentz indices live in different dimensions, this gets resolved \
+according to the t'Hoft-Veltman-Breitenlohner-Maison prescription\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Alpha]", ",",
+ RowBox[{"n", "-", "4"}]}], "]"}], ",",
+ RowBox[{"LorentzIndex", "[", "\[Beta]", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[3]:=",
+ CellID->1343625376],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[2]=",
- CellID->395860998]
+ CellLabel->"Out[3]="]
}, Open ]],
+Cell["A 4-dimensional Lorentz vector", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
@@ -217,7 +271,7 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Alpha]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[3]:=",
+ CellLabel->"In[4]:=",
CellID->958079821],
Cell[BoxData[
@@ -229,19 +283,51 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Pair",
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell["A D-dimensional Lorentz vector", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Alpha]", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[5]:=",
+ CellID->106742008],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{25, 19},
+ ImageSize->{26, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[3]=",
- CellID->53465480]
+ CellLabel->"Out[5]="]
}, Open ]],
+Cell["4-dimensional scalar products of Lorentz vectors", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
@@ -250,7 +336,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "q", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[4]:=",
+ CellLabel->"In[6]:=",
CellID->1770091706],
Cell[BoxData[
@@ -268,12 +354,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{43, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[4]=",
- CellID->2098206398]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -284,7 +369,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "p", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[5]:=",
+ CellLabel->"In[7]:=",
CellID->227830423],
Cell[BoxData[
@@ -295,12 +380,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[5]=",
- CellID->212297594]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -312,7 +396,7 @@ Cell[BoxData[
RowBox[{"p", "-", "q"}], "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[6]:=",
+ CellLabel->"In[8]:=",
CellID->25203155],
Cell[BoxData[
@@ -328,22 +412,23 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{79, 17},
+ ImageSize->{91, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[6]=",
- CellID->1189007863]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -355,7 +440,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "p", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}], "^", "2"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[7]:=",
+ CellLabel->"In[9]:=",
CellID->1431519685],
Cell[BoxData[
@@ -366,12 +451,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "4"], TraditionalForm]], "Output",
- ImageSize->{24, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[7]=",
- CellID->966009047]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -383,7 +467,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "p", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}], "^", "3"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[8]:=",
+ CellLabel->"In[10]:=",
CellID->721851127],
Cell[BoxData[
@@ -394,37 +478,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "6"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Pair",
- CellLabel->"Out[8]=",
- CellID->1932921647]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"n", "-", "4"}]}], "]"}], ",",
- RowBox[{"LorentzIndex", "[", "\[Beta]", "]"}]}], "]"}], "//",
- "Contract"}]], "Input",
- CellTags->"Pair",
- CellLabel->"In[9]:=",
- CellID->1343625376],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[9]=",
- CellID->1776583038]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -437,7 +495,7 @@ Cell[BoxData[
RowBox[{"p", "-", "q"}], "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}], "]"}]], "Input",
CellTags->"Pair",
- CellLabel->"In[10]:=",
+ CellLabel->"In[11]:=",
CellID->294431519],
Cell[BoxData[
@@ -462,12 +520,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{69, 20},
+ ImageSize->{81, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[10]=",
- CellID->1562380290]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -484,17 +541,16 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "q", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "]"}]}]], "Input",
CellTags->"Pair",
- CellLabel->"In[11]:=",
+ CellLabel->"In[12]:=",
CellID->1586756083],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Pair",
- CellLabel->"Out[11]=",
- CellID->824407583]
+ CellLabel->"Out[12]="]
}, Open ]]
}, Open ]],
@@ -518,12 +574,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["FourVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector",
- ButtonNote->"FourVector"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["FV",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FV",
@@ -536,12 +586,6 @@ Cell[TextData[{
ButtonNote->"FVD"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["MetricTensor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MetricTensor",
- ButtonNote->"MetricTensor"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["MT",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/MT",
@@ -572,9 +616,7 @@ Cell[TextData[{
ButtonNote->"SPD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Pair",
- CellID->1831653521]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -582,7 +624,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Pair",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -591,10 +633,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 15.768597}",
+ "built" -> "{2020, 1, 5, 19, 0, 23.098671}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -605,11 +647,11 @@ representation: x and y may have heads LorentzIndex or Momentum. If both x \
and y have head LorentzIndex, the metric tensor is understood. If x and y \
have head Momentum, a scalar product is meant. If one of x and y has head \
LorentzIndex and the other Momentum, a Lorentz vector p^\\[Mu] is \
-understood.", "synonyms" -> {}, "title" -> "Pair", "titlemodifier" -> "",
- "windowtitle" -> "Pair", "type" -> "Symbol", "uri" ->
+understood.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Pair",
+ "titlemodifier" -> "", "windowtitle" -> "Pair", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Pair"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -617,8 +659,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -627,213 +670,191 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3709, 103, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5168, 142, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1751102170]},
+ CellID->1154538991]},
"Pair"->{
- Cell[4320, 130, 105, 2, 32, "Text",
- CellTags->"Pair",
- CellID->1660838641],
- Cell[4450, 136, 236, 7, 27, "Input",
+ Cell[5869, 173, 236, 7, 27, "Input",
CellTags->"Pair",
CellID->1043747934],
- Cell[4689, 145, 514, 22, 40, "Output",
- CellTags->"Pair",
- CellID->1133543032],
- Cell[5218, 170, 94, 2, 31, "Text",
- CellTags->"Pair",
- CellID->1732482457],
- Cell[5337, 176, 286, 9, 27, "Input",
+ Cell[6108, 182, 413, 17, 39, "Output",
+ CellTags->"Pair"],
+ Cell[6615, 206, 286, 9, 27, "Input",
CellTags->"Pair",
CellID->1359804749],
- Cell[5626, 187, 489, 21, 40, "Output",
+ Cell[6904, 217, 389, 16, 39, "Output",
+ CellTags->"Pair"],
+ Cell[7497, 243, 287, 9, 27, "Input",
CellTags->"Pair",
- CellID->395860998],
- Cell[6152, 213, 225, 7, 27, "Input",
+ CellID->1343625376],
+ Cell[7787, 254, 185, 6, 35, "Output",
+ CellTags->"Pair"],
+ Cell[8059, 267, 225, 7, 27, "Input",
CellTags->"Pair",
CellID->958079821],
- Cell[6380, 222, 440, 19, 40, "Output",
+ Cell[8287, 276, 383, 16, 37, "Output",
+ CellTags->"Pair"],
+ Cell[8757, 299, 275, 9, 27, "Input",
CellTags->"Pair",
- CellID->53465480],
- Cell[6857, 246, 215, 7, 27, "Input",
+ CellID->106742008],
+ Cell[9035, 310, 356, 15, 37, "Output",
+ CellTags->"Pair"],
+ Cell[9496, 332, 215, 7, 27, "Input",
CellTags->"Pair",
CellID->1770091706],
- Cell[7075, 255, 476, 20, 38, "Output",
- CellTags->"Pair",
- CellID->2098206398],
- Cell[7588, 280, 214, 7, 27, "Input",
+ Cell[9714, 341, 455, 19, 37, "Output",
+ CellTags->"Pair"],
+ Cell[10206, 365, 214, 7, 27, "Input",
CellTags->"Pair",
CellID->227830423],
- Cell[7805, 289, 326, 13, 41, "Output",
- CellTags->"Pair",
- CellID->212297594],
- Cell[8168, 307, 238, 8, 27, "Input",
+ Cell[10423, 374, 306, 12, 39, "Output",
+ CellTags->"Pair"],
+ Cell[10766, 391, 238, 8, 27, "Input",
CellTags->"Pair",
CellID->25203155],
- Cell[8409, 317, 664, 28, 38, "Output",
- CellTags->"Pair",
- CellID->1189007863],
- Cell[9110, 350, 241, 8, 27, "Input",
+ Cell[11007, 401, 686, 29, 37, "Output",
+ CellTags->"Pair"],
+ Cell[11730, 435, 241, 8, 27, "Input",
CellTags->"Pair",
CellID->1431519685],
- Cell[9354, 360, 326, 13, 41, "Output",
- CellTags->"Pair",
- CellID->966009047],
- Cell[9717, 378, 240, 8, 27, "Input",
+ Cell[11974, 445, 306, 12, 39, "Output",
+ CellTags->"Pair"],
+ Cell[12317, 462, 241, 8, 27, "Input",
CellTags->"Pair",
CellID->721851127],
- Cell[9960, 388, 327, 13, 41, "Output",
- CellTags->"Pair",
- CellID->1932921647],
- Cell[10324, 406, 326, 11, 27, "Input",
- CellTags->"Pair",
- CellID->1343625376],
- Cell[10653, 419, 206, 7, 36, "Output",
- CellTags->"Pair",
- CellID->1776583038],
- Cell[10896, 431, 290, 9, 27, "Input",
+ Cell[12561, 472, 307, 12, 39, "Output",
+ CellTags->"Pair"],
+ Cell[12905, 489, 290, 9, 27, "Input",
CellTags->"Pair",
CellID->294431519],
- Cell[11189, 442, 640, 27, 41, "Output",
- CellTags->"Pair",
- CellID->1562380290],
- Cell[11866, 474, 402, 13, 27, "Input",
+ Cell[13198, 500, 619, 26, 39, "Output",
+ CellTags->"Pair"],
+ Cell[13854, 531, 402, 13, 27, "Input",
CellTags->"Pair",
CellID->1586756083],
- Cell[12271, 489, 206, 7, 36, "Output",
- CellTags->"Pair",
- CellID->824407583],
- Cell[12845, 519, 1430, 57, 31, "Text",
- CellTags->"Pair",
- CellID->1831653521]}
+ Cell[14259, 546, 186, 6, 35, "Output",
+ CellTags->"Pair"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16405, 628},
- {"Pair", 16537, 632}
+ {"PrimaryExamplesSection", 18040, 671},
+ {"Pair", 18172, 675}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3454, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 826, 21, 127, "Usage",
+Cell[4033, 104, 281, 11, 45, "ObjectNameGrid"],
+Cell[4317, 117, 826, 21, 137, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3709, 103, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5168, 142, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1751102170],
+ CellID->1154538991],
Cell[CellGroupData[{
-Cell[4122, 122, 195, 6, 25, "ExampleSection",
- CellID->431213674],
-Cell[4320, 130, 105, 2, 32, "Text",
- CellTags->"Pair",
- CellID->1660838641],
+Cell[5581, 161, 195, 6, 26, "ExampleSection",
+ CellID->308626153],
+Cell[5779, 169, 65, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4450, 136, 236, 7, 27, "Input",
+Cell[5869, 173, 236, 7, 27, "Input",
CellTags->"Pair",
CellID->1043747934],
-Cell[4689, 145, 514, 22, 40, "Output",
- CellTags->"Pair",
- CellID->1133543032]
+Cell[6108, 182, 413, 17, 39, "Output",
+ CellTags->"Pair"]
}, Open ]],
-Cell[5218, 170, 94, 2, 31, "Text",
- CellTags->"Pair",
- CellID->1732482457],
+Cell[6536, 202, 54, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5337, 176, 286, 9, 27, "Input",
+Cell[6615, 206, 286, 9, 27, "Input",
CellTags->"Pair",
CellID->1359804749],
-Cell[5626, 187, 489, 21, 40, "Output",
+Cell[6904, 217, 389, 16, 39, "Output",
+ CellTags->"Pair"]
+}, Open ]],
+Cell[7308, 236, 164, 3, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[7497, 243, 287, 9, 27, "Input",
CellTags->"Pair",
- CellID->395860998]
+ CellID->1343625376],
+Cell[7787, 254, 185, 6, 35, "Output",
+ CellTags->"Pair"]
}, Open ]],
+Cell[7987, 263, 47, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6152, 213, 225, 7, 27, "Input",
+Cell[8059, 267, 225, 7, 27, "Input",
CellTags->"Pair",
CellID->958079821],
-Cell[6380, 222, 440, 19, 40, "Output",
+Cell[8287, 276, 383, 16, 37, "Output",
+ CellTags->"Pair"]
+}, Open ]],
+Cell[8685, 295, 47, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[8757, 299, 275, 9, 27, "Input",
CellTags->"Pair",
- CellID->53465480]
+ CellID->106742008],
+Cell[9035, 310, 356, 15, 37, "Output",
+ CellTags->"Pair"]
}, Open ]],
+Cell[9406, 328, 65, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6857, 246, 215, 7, 27, "Input",
+Cell[9496, 332, 215, 7, 27, "Input",
CellTags->"Pair",
CellID->1770091706],
-Cell[7075, 255, 476, 20, 38, "Output",
- CellTags->"Pair",
- CellID->2098206398]
+Cell[9714, 341, 455, 19, 37, "Output",
+ CellTags->"Pair"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7588, 280, 214, 7, 27, "Input",
+Cell[10206, 365, 214, 7, 27, "Input",
CellTags->"Pair",
CellID->227830423],
-Cell[7805, 289, 326, 13, 41, "Output",
- CellTags->"Pair",
- CellID->212297594]
+Cell[10423, 374, 306, 12, 39, "Output",
+ CellTags->"Pair"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8168, 307, 238, 8, 27, "Input",
+Cell[10766, 391, 238, 8, 27, "Input",
CellTags->"Pair",
CellID->25203155],
-Cell[8409, 317, 664, 28, 38, "Output",
- CellTags->"Pair",
- CellID->1189007863]
+Cell[11007, 401, 686, 29, 37, "Output",
+ CellTags->"Pair"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9110, 350, 241, 8, 27, "Input",
+Cell[11730, 435, 241, 8, 27, "Input",
CellTags->"Pair",
CellID->1431519685],
-Cell[9354, 360, 326, 13, 41, "Output",
- CellTags->"Pair",
- CellID->966009047]
+Cell[11974, 445, 306, 12, 39, "Output",
+ CellTags->"Pair"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9717, 378, 240, 8, 27, "Input",
+Cell[12317, 462, 241, 8, 27, "Input",
CellTags->"Pair",
CellID->721851127],
-Cell[9960, 388, 327, 13, 41, "Output",
- CellTags->"Pair",
- CellID->1932921647]
+Cell[12561, 472, 307, 12, 39, "Output",
+ CellTags->"Pair"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10324, 406, 326, 11, 27, "Input",
- CellTags->"Pair",
- CellID->1343625376],
-Cell[10653, 419, 206, 7, 36, "Output",
- CellTags->"Pair",
- CellID->1776583038]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10896, 431, 290, 9, 27, "Input",
+Cell[12905, 489, 290, 9, 27, "Input",
CellTags->"Pair",
CellID->294431519],
-Cell[11189, 442, 640, 27, 41, "Output",
- CellTags->"Pair",
- CellID->1562380290]
+Cell[13198, 500, 619, 26, 39, "Output",
+ CellTags->"Pair"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11866, 474, 402, 13, 27, "Input",
+Cell[13854, 531, 402, 13, 27, "Input",
CellTags->"Pair",
CellID->1586756083],
-Cell[12271, 489, 206, 7, 36, "Output",
- CellTags->"Pair",
- CellID->824407583]
+Cell[14259, 546, 186, 6, 35, "Output",
+ CellTags->"Pair"]
}, Open ]]
}, Open ]],
-Cell[12504, 500, 31, 0, 29, "SectionFooterSpacer"]
+Cell[14472, 556, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12572, 505, 270, 12, 31, "SeeAlsoSection",
+Cell[14540, 561, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12845, 519, 1430, 57, 31, "Text",
- CellTags->"Pair",
- CellID->1831653521]
+Cell[14813, 575, 1057, 43, 56, "SeeAlso"]
}, Open ]],
-Cell[14290, 579, 23, 0, 42, "FooterCell"]
+Cell[15885, 621, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairCollect.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairCollect.nb
index 0e82c9d59..fa5ac475a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairCollect.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairCollect.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6280, 194]
-NotebookOptionsPosition[ 4029, 128]
-NotebookOutlinePosition[ 6016, 183]
-CellTagsIndexPosition[ 5943, 178]
+NotebookDataLength[ 7099, 215]
+NotebookOptionsPosition[ 5059, 159]
+NotebookOutlinePosition[ 6891, 207]
+CellTagsIndexPosition[ 6848, 204]
WindowTitle->PairCollect
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PairCollect\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PairCollect"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracTrace\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Pair"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PairCollect\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PairCollect"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PairCollect.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$114103],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PairCollect", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$198865],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PairCollect", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ PairCollect.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PairCollect", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PairCollect", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +152,7 @@ Cell[TextData[{
ButtonNote->"Pair"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PairCollect",
- CellID->777103219]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,21 +169,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 10.740789}",
+ "built" -> "{2020, 1, 5, 19, 0, 19.250026}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PairCollect is an option for DiracTrace specifying if the result is \
-collected with respect to Pair's.", "synonyms" -> {}, "title" ->
- "PairCollect", "titlemodifier" -> "", "windowtitle" -> "PairCollect",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/PairCollect"}},
+collected with respect to Pair's.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "PairCollect", "titlemodifier" -> "", "windowtitle" ->
+ "PairCollect", "type" -> "Symbol", "uri" -> "FeynCalc/ref/PairCollect"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +192,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PairCollect"->{
- Cell[3604, 108, 383, 15, 70, "Text",
- CellTags->"PairCollect",
- CellID->777103219]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PairCollect", 5829, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3097, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 405, 12, 70, "Usage",
+Cell[3683, 98, 288, 11, 70, "ObjectNameGrid"],
+Cell[3974, 111, 405, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3331, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4404, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3604, 108, 383, 15, 70, "Text",
- CellTags->"PairCollect",
- CellID->777103219]
+Cell[4677, 141, 340, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4002, 126, 23, 0, 70, "FooterCell"]
+Cell[5032, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract.nb
index 0d2c4511f..2fd25ea53 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6237, 194]
-NotebookOptionsPosition[ 4009, 128]
-NotebookOutlinePosition[ 5972, 183]
-CellTagsIndexPosition[ 5898, 178]
+NotebookDataLength[ 7032, 214]
+NotebookOptionsPosition[ 5019, 158]
+NotebookOutlinePosition[ 6824, 206]
+CellTagsIndexPosition[ 6781, 203]
WindowTitle->PairContract
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PairContract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PairContract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Contract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PairContract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PairContract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PairContract.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$115145],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PairContract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$200201],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PairContract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ PairContract.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PairContract", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PairContract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,7 +139,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Pair",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Pair",
@@ -119,9 +151,7 @@ Cell[TextData[{
ButtonNote->"Contract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PairContract",
- CellID->229888043]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,21 +168,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 14.476958}",
+ "built" -> "{2020, 1, 5, 19, 0, 22.097578}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PairContract is like Pair, but with (local) contraction properties.",
- "synonyms" -> {}, "title" -> "PairContract", "titlemodifier" -> "",
- "windowtitle" -> "PairContract", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PairContract"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PairContract",
+ "titlemodifier" -> "", "windowtitle" -> "PairContract", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/PairContract"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -161,41 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PairContract"->{
- Cell[3574, 107, 393, 16, 70, "Text",
- CellTags->"PairContract",
- CellID->229888043]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PairContract", 5783, 171}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3097, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 369, 11, 70, "Usage",
+Cell[3684, 98, 289, 11, 70, "ObjectNameGrid"],
+Cell[3976, 111, 369, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3301, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4370, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3574, 107, 393, 16, 70, "Text",
- CellTags->"PairContract",
- CellID->229888043]
+Cell[4643, 140, 334, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[3982, 126, 23, 0, 70, "FooterCell"]
+Cell[4992, 156, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract2.nb
index 1c5a47f26..fe9d83848 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract2.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6467, 201]
-NotebookOptionsPosition[ 4211, 135]
-NotebookOutlinePosition[ 6200, 190]
-CellTagsIndexPosition[ 6125, 185]
+NotebookDataLength[ 7357, 223]
+NotebookOptionsPosition[ 5321, 167]
+NotebookOutlinePosition[ 7148, 215]
+CellTagsIndexPosition[ 7105, 212]
WindowTitle->PairContract2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PairContract2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PairContract2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"PairContract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PairContract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PairContract2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PairContract2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PairContract2.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$114450],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PairContract2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$199310],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PairContract2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ PairContract2.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PairContract2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PairContract2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +142,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Pair",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Pair",
@@ -126,9 +160,7 @@ Cell[TextData[{
ButtonNote->"PairContract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PairContract2",
- CellID->1911268297]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -145,21 +177,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 12.049900}",
+ "built" -> "{2020, 1, 5, 19, 0, 20.237305}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PairContract2 is like Pair, but with local contraction properties among \
-PairContract2's.", "synonyms" -> {}, "title" -> "PairContract2",
- "titlemodifier" -> "", "windowtitle" -> "PairContract2", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PairContract2"}},
+PairContract2's.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PairContract2", "titlemodifier" -> "", "windowtitle" -> "PairContract2",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/PairContract2"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -168,41 +200,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PairContract2"->{
- Cell[3603, 108, 566, 22, 70, "Text",
- CellTags->"PairContract2",
- CellID->1911268297]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PairContract2", 6008, 178}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3203, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 392, 12, 70, "Usage",
+Cell[3791, 100, 290, 11, 70, "ObjectNameGrid"],
+Cell[4084, 113, 392, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3330, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4501, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3603, 108, 566, 22, 70, "Text",
- CellTags->"PairContract2",
- CellID->1911268297]
+Cell[4774, 143, 505, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4184, 133, 23, 0, 70, "FooterCell"]
+Cell[5294, 165, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract3.nb
index 54a8bdafe..e2fd1abdf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PairContract3.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6467, 201]
-NotebookOptionsPosition[ 4211, 135]
-NotebookOutlinePosition[ 6200, 190]
-CellTagsIndexPosition[ 6125, 185]
+NotebookDataLength[ 7357, 223]
+NotebookOptionsPosition[ 5321, 167]
+NotebookOutlinePosition[ 7148, 215]
+CellTagsIndexPosition[ 7105, 212]
WindowTitle->PairContract3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PairContract3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PairContract3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"PairContract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PairContract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PairContract3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PairContract3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PairContract3.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$114798],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PairContract3", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$199756],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PairContract3", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ PairContract3.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PairContract3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PairContract3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +142,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Pair",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Pair",
@@ -126,9 +160,7 @@ Cell[TextData[{
ButtonNote->"PairContract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PairContract3",
- CellID->1570776194]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -145,21 +177,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 13.224958}",
+ "built" -> "{2020, 1, 5, 19, 0, 21.243269}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PairContract3 is like Pair, but with local contraction properties among \
-PairContract3's.", "synonyms" -> {}, "title" -> "PairContract3",
- "titlemodifier" -> "", "windowtitle" -> "PairContract3", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PairContract3"}},
+PairContract3's.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PairContract3", "titlemodifier" -> "", "windowtitle" -> "PairContract3",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/PairContract3"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -168,41 +200,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PairContract3"->{
- Cell[3603, 108, 566, 22, 70, "Text",
- CellTags->"PairContract3",
- CellID->1570776194]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PairContract3", 6008, 178}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3203, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 392, 12, 70, "Usage",
+Cell[3791, 100, 290, 11, 70, "ObjectNameGrid"],
+Cell[4084, 113, 392, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3330, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4501, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3603, 108, 566, 22, 70, "Text",
- CellTags->"PairContract3",
- CellID->1570776194]
+Cell[4774, 143, 505, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4184, 133, 23, 0, 70, "FooterCell"]
+Cell[5294, 165, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialD.nb
deleted file mode 100644
index af9dccf70..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialD.nb
+++ /dev/null
@@ -1,434 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.2' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12162, 424]
-NotebookOptionsPosition[ 7949, 292]
-NotebookOutlinePosition[ 10919, 376]
-CellTagsIndexPosition[ 10808, 370]
-WindowTitle->PartialD
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/PartialD.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$108786],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["PartialD", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"PartialD", "[", "mu", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the four-dimensional ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], "."}], TraditionalForm]]],
- " PartialD is used to denote derivative fields. PartialD[LorentzIndex[",
- Cell[BoxData[
- FormBox[
- RowBox[{"\[Mu]", ",",
- StyleBox["D",
- FontSlant->"Plain"]}], TraditionalForm]]],
- "]] denotes the ",
- Cell[BoxData[
- FormBox[
- StyleBox["D",
- FontSlant->"Plain"], TraditionalForm]]],
- "-dimensional ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], "."}], TraditionalForm]]]
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1441110026],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->883590867],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"PartialD",
- CellID->521788538],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"QuantumField", "[",
- RowBox[{"A", ",",
- RowBox[{"{", "\[Mu]", "}"}]}], "]"}], ".",
- RowBox[{"LeftPartialD", "[", "\[Nu]", "]"}]}]], "Input",
- CellTags->"PartialD",
- CellLabel->"In[1]:=",
- CellID->426841837],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox["\[Mu]",
- TraditionalForm]], ".",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[LeftArrow]"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{45, 27},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PartialD",
- CellLabel->"Out[1]=",
- CellID->1113557239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
- CellTags->"PartialD",
- CellLabel->"In[2]:=",
- CellID->820901076],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], TraditionalForm]], "Output",
- ImageSize->{39, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PartialD",
- CellLabel->"Out[2]=",
- CellID->1344586855]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
- CellTags->"PartialD",
- CellLabel->"In[3]:=",
- CellID->820708648],
-
-Cell[BoxData[
- RowBox[{"QuantumField", "[",
- RowBox[{
- RowBox[{"FCPartialD", "[",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",", "A", ",",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]], "Output",
- ImageSize->{497, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PartialD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->74553335]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["ExpandPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ExpandPartialD",
- ButtonNote->"ExpandPartialD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["LeftPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeftPartialD",
- ButtonNote->"LeftPartialD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["LeftRightPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeftRightPartialD",
- ButtonNote->"LeftRightPartialD"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["RightPartialD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/RightPartialD",
- ButtonNote->"RightPartialD"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"PartialD",
- CellID->1527820766]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"PartialD",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2015, 11, 6, 23, 4, 12.005586}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "PartialD[mu] denotes the four-dimensional \
-\\[PartialD]TraditionalForm\\`TraditionalForm\\`\\[Mu]. PartialD is used to \
-denote derivative fields. PartialD[LorentzIndex[\\[Mu], D]] denotes the \
-D-dimensional \\[PartialD]TraditionalForm\\`TraditionalForm\\`\\[Mu].",
- "synonyms" -> {}, "title" -> "PartialD", "titlemodifier" -> "",
- "windowtitle" -> "PartialD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PartialD"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.2 for Linux x86 (64-bit) (July 6, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.2 for Linux x86 (64-bit) (July 6, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4080, 122, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1441110026]},
- "PartialD"->{
- Cell[4691, 149, 85, 2, 35, "Subsubsection",
- CellTags->"PartialD",
- CellID->521788538],
- Cell[4801, 155, 250, 8, 27, "Input",
- CellTags->"PartialD",
- CellID->426841837],
- Cell[5054, 165, 479, 19, 48, "Output",
- CellTags->"PartialD",
- CellID->1113557239],
- Cell[5570, 189, 133, 4, 27, "Input",
- CellTags->"PartialD",
- CellID->820901076],
- Cell[5706, 195, 492, 20, 40, "Output",
- CellTags->"PartialD",
- CellID->1344586855],
- Cell[6235, 220, 131, 4, 27, "Input",
- CellTags->"PartialD",
- CellID->820708648],
- Cell[6369, 226, 393, 11, 36, "Output",
- CellTags->"PartialD",
- CellID->74553335],
- Cell[7130, 260, 777, 27, 32, "Text",
- CellTags->"PartialD",
- CellID->1527820766]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 9937, 338},
- {"PartialD", 10073, 342}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 1173, 40, 105, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[4080, 122, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1441110026],
-Cell[4471, 139, 195, 6, 25, "ExampleSection",
- CellID->883590867],
-Cell[CellGroupData[{
-Cell[4691, 149, 85, 2, 35, "Subsubsection",
- CellTags->"PartialD",
- CellID->521788538],
-Cell[CellGroupData[{
-Cell[4801, 155, 250, 8, 27, "Input",
- CellTags->"PartialD",
- CellID->426841837],
-Cell[5054, 165, 479, 19, 48, "Output",
- CellTags->"PartialD",
- CellID->1113557239]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5570, 189, 133, 4, 27, "Input",
- CellTags->"PartialD",
- CellID->820901076],
-Cell[5706, 195, 492, 20, 40, "Output",
- CellTags->"PartialD",
- CellID->1344586855]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6235, 220, 131, 4, 27, "Input",
- CellTags->"PartialD",
- CellID->820708648],
-Cell[6369, 226, 393, 11, 36, "Output",
- CellTags->"PartialD",
- CellID->74553335]
-}, Open ]],
-Cell[6777, 240, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6857, 246, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[7130, 260, 777, 27, 32, "Text",
- CellTags->"PartialD",
- CellID->1527820766]
-}, Open ]],
-Cell[7922, 290, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialDRelations.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialDRelations.nb
index 2f9bc5ef6..ae47076e9 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialDRelations.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialDRelations.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11672, 401]
-NotebookOptionsPosition[ 7815, 285]
-NotebookOutlinePosition[ 10574, 361]
-CellTagsIndexPosition[ 10455, 355]
+NotebookDataLength[ 12638, 422]
+NotebookOptionsPosition[ 9176, 321]
+NotebookOutlinePosition[ 11737, 390]
+CellTagsIndexPosition[ 11616, 384]
WindowTitle->PartialDRelations
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PartialDRelations\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PartialDRelations"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCPartialD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PartialD"], "\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"LeftPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftPartialD"], "\<\"LeftRightPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/LeftRightPartialD"], "\<\"RightPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RightPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PartialDRelations\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PartialDRelations"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PartialDRelations.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$115852],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PartialDRelations", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$201116],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PartialDRelations", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ PartialDRelations.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PartialDRelations", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PartialDRelations", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +146,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->660817011],
+ CellID->903885071],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -115,13 +156,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->670359256],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"PartialDRelations",
- CellID->56378705],
+ CellID->1255266426],
Cell[CellGroupData[{
@@ -157,12 +192,11 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 27},
+ ImageSize->{72, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialDRelations",
- CellLabel->"Out[1]=",
- CellID->1055472864]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -186,48 +220,51 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["B",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}]}], "+",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["B",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}]}], "+",
RowBox[{
- RowBox[{
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- SubsuperscriptBox[
- FormBox["C",
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm], "\[Null]"]}], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ SubscriptBox[
+ FormBox["C",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], ")"}], ".",
SubscriptBox[
FormBox["B",
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{133, 19},
+ ImageSize->{198, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialDRelations",
- CellLabel->"Out[2]=",
- CellID->42444932]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -246,39 +283,38 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[RawData["\<\
Cell[TextData[{
- ButtonBox[\"FCPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/PartialD\",
- ButtonNote->\"FCPartialD\"],
- \", \",
- ButtonBox[\"ExpandPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/ExpandPartialD\",
- ButtonNote->\"ExpandPartialD\"],
- \", \",
- ButtonBox[\"LeftPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/LeftPartialD\",
- ButtonNote->\"LeftPartialD\"],
- \", \",
- ButtonBox[\"LeftRightPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/LeftRightPartialD\",
- ButtonNote->\"LeftRightPartialD\"],
- \", \",
- ButtonBox[\"RightPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/RightPartialD\",
- ButtonNote->\"RightPartialD\"],
- \".\"
-}], \"Text\",
- CellTags->\"PartialDRelations\",
- CellID->730120334]\
-\>"], "Text",
- CellTags->"PartialDRelations",
- CellID->730120334]
+ StyleBox[ButtonBox["FCPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PartialD",
+ ButtonNote->"FCPartialD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ExpandPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExpandPartialD",
+ ButtonNote->"ExpandPartialD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["LeftPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LeftPartialD",
+ ButtonNote->"LeftPartialD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["LeftRightPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LeftRightPartialD",
+ ButtonNote->"LeftRightPartialD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["RightPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/RightPartialD",
+ ButtonNote->"RightPartialD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -286,7 +322,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PartialDRelations",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -295,22 +331,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 17.229256}",
+ "built" -> "{2020, 1, 5, 19, 0, 24.270162}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PartialDRelations is an option for ExpandPartialD. It is a list of rules \
-applied by ExpandPartialD at the end.", "synonyms" -> {}, "title" ->
- "PartialDRelations", "titlemodifier" -> "", "windowtitle" ->
+applied by ExpandPartialD at the end.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "PartialDRelations", "titlemodifier" -> "", "windowtitle" ->
"PartialDRelations", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PartialDRelations"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -318,8 +354,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -328,81 +365,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3376, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4785, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->660817011]},
+ CellID->903885071]},
"PartialDRelations"->{
- Cell[3986, 121, 93, 2, 35, "Subsubsection",
- CellTags->"PartialDRelations",
- CellID->56378705],
- Cell[4104, 127, 362, 11, 27, "Input",
+ Cell[5418, 162, 362, 11, 27, "Input",
CellTags->"PartialDRelations",
CellID->1264073129],
- Cell[4469, 140, 597, 24, 48, "Output",
- CellTags->"PartialDRelations",
- CellID->1055472864],
- Cell[5103, 169, 274, 8, 27, "Input",
+ Cell[5783, 175, 576, 23, 45, "Output",
+ CellTags->"PartialDRelations"],
+ Cell[6396, 203, 274, 8, 27, "Input",
CellTags->"PartialDRelations",
CellID->1340152745],
- Cell[5380, 179, 1113, 46, 40, "Output",
- CellTags->"PartialDRelations",
- CellID->42444932],
- Cell[6861, 248, 912, 32, 471, "Text",
- CellTags->"PartialDRelations",
- CellID->730120334]}
+ Cell[6673, 213, 1194, 49, 40, "Output",
+ CellTags->"PartialDRelations"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9697, 329},
- {"PartialDRelations", 9840, 333}
+ {"PrimaryExamplesSection", 11100, 366},
+ {"PartialDRelations", 11244, 370}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2282, 52, 51, "AnchorBarGrid",
+Cell[589, 21, 3457, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2874, 75, 60, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2937, 78, 414, 12, 82, "Usage",
+Cell[4049, 104, 294, 11, 45, "ObjectNameGrid"],
+Cell[4346, 117, 414, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3376, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4785, 133, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->660817011],
-Cell[3766, 111, 195, 6, 25, "ExampleSection",
- CellID->670359256],
+ CellID->903885071],
Cell[CellGroupData[{
-Cell[3986, 121, 93, 2, 35, "Subsubsection",
- CellTags->"PartialDRelations",
- CellID->56378705],
+Cell[5197, 152, 196, 6, 26, "ExampleSection",
+ CellID->1255266426],
Cell[CellGroupData[{
-Cell[4104, 127, 362, 11, 27, "Input",
+Cell[5418, 162, 362, 11, 27, "Input",
CellTags->"PartialDRelations",
CellID->1264073129],
-Cell[4469, 140, 597, 24, 48, "Output",
- CellTags->"PartialDRelations",
- CellID->1055472864]
+Cell[5783, 175, 576, 23, 45, "Output",
+ CellTags->"PartialDRelations"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5103, 169, 274, 8, 27, "Input",
+Cell[6396, 203, 274, 8, 27, "Input",
CellTags->"PartialDRelations",
CellID->1340152745],
-Cell[5380, 179, 1113, 46, 40, "Output",
- CellTags->"PartialDRelations",
- CellID->42444932]
-}, Open ]],
-Cell[6508, 228, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6673, 213, 1194, 49, 40, "Output",
+ CellTags->"PartialDRelations"]
}, Open ]]
}, Open ]],
+Cell[7894, 266, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[6588, 234, 270, 12, 31, "SeeAlsoSection",
+Cell[7962, 271, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6861, 248, 912, 32, 471, "Text",
- CellTags->"PartialDRelations",
- CellID->730120334]
+Cell[8235, 285, 899, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[7788, 283, 23, 0, 70, "FooterCell"]
+Cell[9149, 319, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialFourVector.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialFourVector.nb
index d6466dab3..70eb399cf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialFourVector.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialFourVector.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9932, 327]
-NotebookOptionsPosition[ 6400, 224]
-NotebookOutlinePosition[ 9049, 295]
-CellTagsIndexPosition[ 8930, 289]
+NotebookDataLength[ 10163, 329]
+NotebookOptionsPosition[ 7008, 239]
+NotebookOutlinePosition[ 9461, 304]
+CellTagsIndexPosition[ 9342, 298]
WindowTitle->PartialFourVector
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PartialFourVector\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PartialFourVector"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Contract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PartialFourVector\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PartialFourVector"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PartialFourVector.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$116187],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PartialFourVector", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$201555],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PartialFourVector", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ PartialFourVector.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PartialFourVector", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PartialFourVector", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -83,10 +116,9 @@ Cell[BoxData[GridBox[{
RowBox[{"exp", ",", " ",
RowBox[{"FourVector", "[",
RowBox[{"p", ",", " ", "mu"}], "]"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- " calculates the partial derivative of exp w.r.t. p(mu). \
-PartialFourVector[exp, FourVector[p, mu], FourVector[p,nu], ...] gives the \
-multiple derivative."
+ " \[LineSeparator] calculates the partial derivative of exp w.r.t. \
+p(mu). PartialFourVector[exp, FV[p, mu], FV[p,nu], ...] gives the multiple \
+derivative."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,7 +144,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1396902996],
+ CellID->1514889249],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -120,13 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->308511971],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"PartialFourVector",
- CellID->1758819018],
+ CellID->29019256],
Cell[CellGroupData[{
@@ -136,9 +164,9 @@ Cell[BoxData[
RowBox[{"a", " ",
SuperscriptBox["\[ExponentialE]",
SuperscriptBox[
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Nu]"}], "]"}], "2"]]}], ",",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
CellTags->"PartialFourVector",
CellLabel->"In[1]:=",
@@ -154,30 +182,25 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "2"]], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{77, 24},
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{86, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialFourVector",
- CellLabel->"Out[1]=",
- CellID->1052815023]
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -197,12 +220,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["FourVector",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector",
- ButtonNote->"FourVector"],
- FontFamily->"Verdana"],
- ", ",
StyleBox[ButtonBox["Pair",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Pair",
@@ -215,9 +232,7 @@ Cell[TextData[{
ButtonNote->"Contract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PartialFourVector",
- CellID->156343692]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -225,7 +240,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PartialFourVector",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -234,23 +249,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 18.718563}",
+ "built" -> "{2020, 1, 5, 19, 0, 25.291809}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PartialFourVector[exp, FourVector[p, mu]] calculates the partial \
-derivative of exp w.r.t. p(mu). PartialFourVector[exp, FourVector[p, mu], \
-FourVector[p,nu], ...] gives the multiple derivative.", "synonyms" -> {},
+derivative of exp w.r.t. p(mu). PartialFourVector[exp, FV[p, mu], FV[p,nu], \
+...] gives the multiple derivative.", "synonyms" -> {}, "tabletags" -> {},
"title" -> "PartialFourVector", "titlemodifier" -> "", "windowtitle" ->
"PartialFourVector", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PartialFourVector"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -258,8 +273,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -268,67 +284,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3584, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4628, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1396902996]},
+ CellID->1514889249]},
"PartialFourVector"->{
- Cell[4195, 126, 95, 2, 35, "Subsubsection",
- CellTags->"PartialFourVector",
- CellID->1758819018],
- Cell[4315, 132, 399, 12, 39, "Input",
+ Cell[5260, 160, 383, 12, 40, "Input",
CellTags->"PartialFourVector",
CellID->877301924],
- Cell[4717, 146, 725, 29, 45, "Output",
- CellTags->"PartialFourVector",
- CellID->1052815023],
- Cell[5810, 198, 548, 21, 31, "Text",
- CellTags->"PartialFourVector",
- CellID->156343692]}
+ Cell[5646, 174, 618, 24, 43, "Output",
+ CellTags->"PartialFourVector"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8366, 269},
- {"PartialFourVector", 8510, 273}
+ {"PrimaryExamplesSection", 9000, 285},
+ {"PartialFourVector", 9145, 289}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2282, 52, 51, "AnchorBarGrid",
+Cell[589, 21, 3117, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2874, 75, 60, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2937, 78, 622, 17, 99, "Usage",
+Cell[3709, 98, 294, 11, 45, "ObjectNameGrid"],
+Cell[4006, 111, 597, 16, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3584, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4628, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1396902996],
-Cell[3975, 116, 195, 6, 25, "ExampleSection",
- CellID->308511971],
+ CellID->1514889249],
Cell[CellGroupData[{
-Cell[4195, 126, 95, 2, 35, "Subsubsection",
- CellTags->"PartialFourVector",
- CellID->1758819018],
+Cell[5041, 150, 194, 6, 26, "ExampleSection",
+ CellID->29019256],
Cell[CellGroupData[{
-Cell[4315, 132, 399, 12, 39, "Input",
+Cell[5260, 160, 383, 12, 40, "Input",
CellTags->"PartialFourVector",
CellID->877301924],
-Cell[4717, 146, 725, 29, 45, "Output",
- CellTags->"PartialFourVector",
- CellID->1052815023]
-}, Open ]],
-Cell[5457, 178, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5646, 174, 618, 24, 43, "Output",
+ CellTags->"PartialFourVector"]
}, Open ]]
}, Open ]],
+Cell[6291, 202, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[5537, 184, 270, 12, 31, "SeeAlsoSection",
+Cell[6359, 207, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5810, 198, 548, 21, 31, "Text",
- CellTags->"PartialFourVector",
- CellID->156343692]
+Cell[6632, 221, 334, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[6373, 222, 23, 0, 42, "FooterCell"]
+Cell[6981, 237, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialIntegrate.nb
index 1948ac282..bef0cbb1a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartialIntegrate.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15322, 527]
-NotebookOptionsPosition[ 9895, 359]
-NotebookOutlinePosition[ 13517, 460]
-CellTagsIndexPosition[ 13397, 454]
+NotebookDataLength[ 16071, 555]
+NotebookOptionsPosition[ 10799, 395]
+NotebookOutlinePosition[ 14249, 489]
+CellTagsIndexPosition[ 14129, 483]
WindowTitle->PartialIntegrate
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ PartialIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$116521],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$201988],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/PartialIntegrate", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ PartialIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PartialIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PartialIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,36 +109,33 @@ exp/ap the factor that is to be differentiated."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1887046392],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellID->1928672186],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1636965545],
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"PartialIntegrate",
- CellID->1897608068],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -140,16 +150,47 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"Integrate", "\[Rule]", "Integrate"}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{152, 15},
+ ImageSize->{135, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialIntegrate",
CellLabel->"Out[1]=",
CellID->1807152704]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1910558346],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->740972048],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"PartialIntegrate", "[",
RowBox[{
@@ -160,7 +201,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"PartialIntegrate",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->899216893],
Cell[BoxData[
@@ -202,12 +243,11 @@ Cell[BoxData[
RowBox[{"g", "(", "x", ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}]}],
RowBox[{"\[DifferentialD]", "x"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{549, 34},
+ ImageSize->{396, 72},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialIntegrate",
- CellLabel->"Out[2]=",
- CellID->1654017289]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -221,7 +261,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"3", "x"}], "+", "2"}], "]"}], ",", "x"}], "]"}]}]], "Input",
CellTags->"PartialIntegrate",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->474075126],
Cell[BoxData[
@@ -237,12 +277,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"3", " ", "x"}], "+", "2"}], ")"}], "-", "1"}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{189, 41},
+ ImageSize->{195, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialIntegrate",
- CellLabel->"Out[3]=",
- CellID->1187465286]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -257,7 +296,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"3", "x"}], "+", "2"}], "]"}]], ",", "x"}], "]"}]}]], "Input",
CellTags->"PartialIntegrate",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1976852949],
Cell[BoxData[
@@ -273,12 +312,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"3", " ", "x"}], "+", "2"}], ")"}]}]]}],
TraditionalForm]], "Output",
- ImageSize->{160, 46},
+ ImageSize->{167, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialIntegrate",
- CellLabel->"Out[4]=",
- CellID->347096584]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -297,7 +335,7 @@ Cell[BoxData[
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}], "//",
"FullSimplify"}]], "Input",
CellTags->"PartialIntegrate",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->2004778923],
Cell[BoxData[
@@ -307,12 +345,11 @@ Cell[BoxData[
RowBox[{"log", "(", "8", ")"}]], "-",
FractionBox["5",
RowBox[{"log", "(", "125", ")"}]]}], TraditionalForm]], "Output",
- ImageSize->{124, 44},
+ ImageSize->{121, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialIntegrate",
- CellLabel->"Out[5]=",
- CellID->1569708030]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -328,7 +365,7 @@ Cell[BoxData[
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}], "//",
"Simplify"}]], "Input",
CellTags->"PartialIntegrate",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->359240358],
Cell[BoxData[
@@ -338,19 +375,18 @@ Cell[BoxData[
RowBox[{"log", "(", "8", ")"}]], "-",
FractionBox["5",
RowBox[{"log", "(", "125", ")"}]]}], TraditionalForm]], "Output",
- ImageSize->{124, 44},
+ ImageSize->{121, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PartialIntegrate",
- CellLabel->"Out[6]=",
- CellID->1067599584]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[BoxData[
RowBox[{"Clear", "[",
RowBox[{"f", ",", "g"}], "]"}]], "Input",
CellTags->"PartialIntegrate",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1553816606]
}, Open ]]
}, Open ]],
@@ -369,10 +405,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 20.184623}",
+ "built" -> "{2020, 1, 5, 19, 0, 26.375258}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -381,11 +417,11 @@ TaggingRules->{
"PartialIntegrate[exp, ap, t] does a partial integration of the definite \
integral Integrate[exp,{t,0,1}], with ap the factor that is to be integrated \
and exp/ap the factor that is to be differentiated.", "synonyms" -> {},
- "title" -> "PartialIntegrate", "titlemodifier" -> "", "windowtitle" ->
- "PartialIntegrate", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "PartialIntegrate", "titlemodifier" -> "",
+ "windowtitle" -> "PartialIntegrate", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PartialIntegrate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -393,8 +429,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -402,133 +439,124 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3540, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1887046392]},
"PartialIntegrate"->{
- Cell[4152, 125, 94, 2, 35, "Subsubsection",
- CellTags->"PartialIntegrate",
- CellID->1897608068],
- Cell[4271, 131, 150, 4, 27, "Input",
+ Cell[4622, 141, 150, 4, 70, "Input",
CellTags->"PartialIntegrate",
CellID->1554098382],
- Cell[4424, 137, 291, 10, 36, "Output",
+ Cell[4775, 147, 291, 10, 37, "Output",
CellTags->"PartialIntegrate",
CellID->1807152704],
- Cell[4752, 152, 343, 11, 27, "Input",
+ Cell[5760, 193, 343, 11, 27, "Input",
CellTags->"PartialIntegrate",
CellID->899216893],
- Cell[5098, 165, 1335, 44, 55, "Output",
- CellTags->"PartialIntegrate",
- CellID->1654017289],
- Cell[6470, 214, 292, 10, 29, "Input",
+ Cell[6106, 206, 1314, 43, 93, "Output",
+ CellTags->"PartialIntegrate"],
+ Cell[7457, 254, 292, 10, 29, "Input",
CellTags->"PartialIntegrate",
CellID->474075126],
- Cell[6765, 226, 489, 18, 62, "Output",
- CellTags->"PartialIntegrate",
- CellID->1187465286],
- Cell[7291, 249, 311, 11, 54, "Input",
+ Cell[7752, 266, 468, 17, 56, "Output",
+ CellTags->"PartialIntegrate"],
+ Cell[8257, 288, 311, 11, 55, "Input",
CellTags->"PartialIntegrate",
CellID->1976852949],
- Cell[7605, 262, 483, 18, 67, "Output",
- CellTags->"PartialIntegrate",
- CellID->347096584],
- Cell[8125, 285, 461, 15, 45, "Input",
+ Cell[8571, 301, 463, 17, 60, "Output",
+ CellTags->"PartialIntegrate"],
+ Cell[9071, 323, 461, 15, 45, "Input",
CellTags->"PartialIntegrate",
CellID->2004778923],
- Cell[8589, 302, 352, 12, 65, "Output",
- CellTags->"PartialIntegrate",
- CellID->1569708030],
- Cell[8978, 319, 337, 12, 27, "Input",
+ Cell[9535, 340, 331, 11, 59, "Output",
+ CellTags->"PartialIntegrate"],
+ Cell[9903, 356, 337, 12, 27, "Input",
CellTags->"PartialIntegrate",
CellID->359240358],
- Cell[9318, 333, 352, 12, 65, "Output",
- CellTags->"PartialIntegrate",
- CellID->1067599584],
- Cell[9685, 348, 156, 5, 27, "Input",
+ Cell[10243, 370, 331, 11, 59, "Output",
+ CellTags->"PartialIntegrate"],
+ Cell[10589, 384, 156, 5, 27, "Input",
CellTags->"PartialIntegrate",
- CellID->1553816606]}
+ CellID->1553816606]},
+ "PrimaryExamplesSection"->{
+ Cell[5127, 164, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1910558346]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11865, 404},
- {"PartialIntegrate", 12008, 408}
+ {"PartialIntegrate", 12805, 441},
+ {"PrimaryExamplesSection", 13985, 476}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 584, 16, 98, "Usage",
- CellID->982511436],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3540, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1887046392],
-Cell[3931, 115, 196, 6, 25, "ExampleSection",
- CellID->1928672186],
+Cell[3215, 91, 584, 16, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4152, 125, 94, 2, 35, "Subsubsection",
- CellTags->"PartialIntegrate",
- CellID->1897608068],
+Cell[3824, 111, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1636965545],
+Cell[4566, 137, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4271, 131, 150, 4, 27, "Input",
+Cell[4622, 141, 150, 4, 70, "Input",
CellTags->"PartialIntegrate",
CellID->1554098382],
-Cell[4424, 137, 291, 10, 36, "Output",
+Cell[4775, 147, 291, 10, 37, "Output",
CellTags->"PartialIntegrate",
CellID->1807152704]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4752, 152, 343, 11, 27, "Input",
+Cell[5127, 164, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1910558346],
+Cell[CellGroupData[{
+Cell[5540, 183, 195, 6, 26, "ExampleSection",
+ CellID->740972048],
+Cell[CellGroupData[{
+Cell[5760, 193, 343, 11, 27, "Input",
CellTags->"PartialIntegrate",
CellID->899216893],
-Cell[5098, 165, 1335, 44, 55, "Output",
- CellTags->"PartialIntegrate",
- CellID->1654017289]
+Cell[6106, 206, 1314, 43, 93, "Output",
+ CellTags->"PartialIntegrate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6470, 214, 292, 10, 29, "Input",
+Cell[7457, 254, 292, 10, 29, "Input",
CellTags->"PartialIntegrate",
CellID->474075126],
-Cell[6765, 226, 489, 18, 62, "Output",
- CellTags->"PartialIntegrate",
- CellID->1187465286]
+Cell[7752, 266, 468, 17, 56, "Output",
+ CellTags->"PartialIntegrate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7291, 249, 311, 11, 54, "Input",
+Cell[8257, 288, 311, 11, 55, "Input",
CellTags->"PartialIntegrate",
CellID->1976852949],
-Cell[7605, 262, 483, 18, 67, "Output",
- CellTags->"PartialIntegrate",
- CellID->347096584]
+Cell[8571, 301, 463, 17, 60, "Output",
+ CellTags->"PartialIntegrate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8125, 285, 461, 15, 45, "Input",
+Cell[9071, 323, 461, 15, 45, "Input",
CellTags->"PartialIntegrate",
CellID->2004778923],
-Cell[8589, 302, 352, 12, 65, "Output",
- CellTags->"PartialIntegrate",
- CellID->1569708030]
+Cell[9535, 340, 331, 11, 59, "Output",
+ CellTags->"PartialIntegrate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8978, 319, 337, 12, 27, "Input",
+Cell[9903, 356, 337, 12, 27, "Input",
CellTags->"PartialIntegrate",
CellID->359240358],
-Cell[9318, 333, 352, 12, 65, "Output",
- CellTags->"PartialIntegrate",
- CellID->1067599584]
+Cell[10243, 370, 331, 11, 59, "Output",
+ CellTags->"PartialIntegrate"]
}, Open ]],
-Cell[9685, 348, 156, 5, 27, "Input",
+Cell[10589, 384, 156, 5, 27, "Input",
CellTags->"PartialIntegrate",
CellID->1553816606]
}, Open ]]
}, Open ]],
-Cell[9868, 357, 23, 0, 42, "FooterCell"]
+Cell[10772, 393, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartitHead.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartitHead.nb
index 03ba7618d..a18055d26 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartitHead.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PartitHead.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5339, 148]
-NotebookOptionsPosition[ 3403, 96]
-NotebookOutlinePosition[ 5261, 144]
-CellTagsIndexPosition[ 5218, 141]
+NotebookDataLength[ 5577, 159]
+NotebookOptionsPosition[ 3665, 107]
+NotebookOutlinePosition[ 5513, 156]
+CellTagsIndexPosition[ 5470, 153]
WindowTitle->PartitHead
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$116858],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$202421],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/PartitHead", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PartitHead", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PartitHead", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,10 +117,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 21.758863}",
+ "built" -> "{2020, 1, 5, 19, 0, 27.586680}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -117,10 +128,11 @@ TaggingRules->{
"None", "summary" ->
"PartitHead[expr, h] returns a list {ex1, h[ex2]} with ex1 free of \
expressions with head h, and h[ex2] having head h.", "synonyms" -> {},
- "title" -> "PartitHead", "titlemodifier" -> "", "windowtitle" ->
- "PartitHead", "type" -> "Symbol", "uri" -> "FeynCalc/ref/PartitHead"}},
+ "tabletags" -> {}, "title" -> "PartitHead", "titlemodifier" -> "",
+ "windowtitle" -> "PartitHead", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PartitHead"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -129,7 +141,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -143,13 +155,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 2281, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 479, 14, 70, "Usage",
+Cell[2866, 76, 287, 11, 70, "ObjectNameGrid"],
+Cell[3156, 89, 479, 14, 70, "Usage",
CellID->982511436],
-Cell[3376, 94, 23, 0, 70, "FooterCell"]
+Cell[3638, 105, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliEta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliEta.nb
new file mode 100644
index 000000000..f4648f21d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliEta.nb
@@ -0,0 +1,334 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9459, 324]
+NotebookOptionsPosition[ 6427, 231]
+NotebookOutlinePosition[ 8542, 288]
+CellTagsIndexPosition[ 8458, 283]
+WindowTitle->PauliEta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliEta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliEta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/PauliEta.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$202856],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliEta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliEta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliEta", "[", "I", "]"}]], "InlineFormula"],
+ " \[LineSeparator]represents a two-component Pauli spinor \[Eta], while \
+PauliEta[-I] stands for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Eta]", "\[Dagger]"]], "InlineFormula"]
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1806999093],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->242148617],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliEta", "[", "I", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1157004633],
+
+Cell[BoxData[
+ FormBox["\[Eta]", TraditionalForm]], "Output",
+ ImageSize->{13, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->277278612]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliEta", "[",
+ RowBox[{"-", "I"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->717279545],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Eta]", "\[Dagger]"], TraditionalForm]], "Output",
+ ImageSize->{22, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1183914614]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliEta", "[",
+ RowBox[{"-", "I"}], "]"}], ".",
+ RowBox[{"SIS", "[", "p", "]"}], ".",
+ RowBox[{"PauliXi", "[", "I", "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1769020709],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Eta]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".", "\[Xi]"}], TraditionalForm]], "Output",
+ ImageSize->{89, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->193595258]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "ComplexConjugate"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->306922129],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Xi]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".", "\[Eta]"}], TraditionalForm]], "Output",\
+
+ ImageSize->{89, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1685683644]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"PauliEta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 28.570365}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliEta[I] represents a two-component Pauli spinor \\[Eta], while \
+PauliEta[-I] stands for \\[Eta]^\\[Dagger]", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "PauliEta", "titlemodifier" -> "",
+ "windowtitle" -> "PauliEta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PauliEta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3666, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1806999093]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8314, 276}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[580, 21, 2273, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2856, 76, 285, 11, 45, "ObjectNameGrid"],
+Cell[3144, 89, 497, 14, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3666, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1806999093],
+Cell[CellGroupData[{
+Cell[4079, 126, 195, 6, 26, "ExampleSection",
+ CellID->242148617],
+Cell[CellGroupData[{
+Cell[4299, 136, 105, 3, 27, "Input",
+ CellID->1157004633],
+Cell[4407, 141, 191, 6, 37, "Output",
+ CellID->277278612]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4635, 152, 122, 4, 27, "Input",
+ CellID->717279545],
+Cell[4760, 158, 224, 7, 40, "Output",
+ CellID->1183914614]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5021, 170, 221, 7, 27, "Input",
+ CellID->1769020709],
+Cell[5245, 179, 504, 18, 40, "Output",
+ CellID->193595258]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5786, 202, 108, 3, 27, "Input",
+ CellID->306922129],
+Cell[5897, 207, 464, 17, 40, "Output",
+ CellID->1685683644]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6400, 229, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliOrder.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliOrder.nb
new file mode 100644
index 000000000..6c46918c0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliOrder.nb
@@ -0,0 +1,661 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18612, 651]
+NotebookOptionsPosition[ 14797, 532]
+NotebookOutlinePosition[ 17116, 594]
+CellTagsIndexPosition[ 16996, 588]
+WindowTitle->PauliOrder
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliOrder\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliOrder"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/PauliOrder.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$203286],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliOrder", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliOrder", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliOrder", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]orders the Pauli matrices in expr alphabetically. \
+PauliOrder[exp, orderlist] orders the Pauli matrices in expr according to \
+orderlist."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1498210237],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PauliOrder", "]"}]], "Input",
+ CellLabel->"In[54]:=",
+ CellID->1005205598],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"PauliTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"PauliReduce", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliSigmaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"FCPauliIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{564, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[54]=",
+ CellID->747262532]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1240066917],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1647391173],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSI", "[",
+ RowBox[{"k", ",", "j", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1633341388],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{81, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1809751487]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliOrder", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->997524077],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztmntMW1Ucx0ESEIeTUXG8Juscj+EYARMZDnXSzA3CYIEB849lAS3I2Hhq
+kEQDYjY2Ftxi1oFTHMgCLqIjzAhGgQULLEB4BTceZkB4jVdboBRuKbcWWsdG
+2/v89XI1/SQQ4N6e+/1+7++ce87hcmOSwmKfMTExSXtW9S0sOv2d1NTojHBr
+1S8RiWnxcYn8DwITP+LH8VP3x5ip/mij+go2NTFZ/VlpxIgRI2wEVaCbLWEz
+YbN9Nmv7f8NU8svT9yp/eyijfbEVaW91ZatYodX+ZHXGcT9X16i7YvaWkj7x
+BMHIkM32YbURKSSaOYPrIQuUfmarYqEzabetf/6gnGY7itGbvi++8mGbVPvQ
+rDDKyTG8ln01/hgM8UTAzpDN9gG1ESkkmjmD6yELoH5GqwJFRDMIwJVQuWhk
+XtcAN9/K5+6IqO6uvFGQn3+9tEnEyChODr3iCX4cI0M22wfVRqSQaOYMrod0
+m1D6GasKZORW+vH9u/emdclotaOYrsuM9HGwC/jp0YrWQVlXsqtzZHVzwTGv
+wPSS+gczkAMrAJji8cHLkM32wbQRKSSaOYPrIQuofuaqAkUGfnjL1vn9lnmM
+k9K1GB8f33jSQnsCl+NXMqo9Gi3e/9Sd4xJ6JPT83ellSPFw6BevBjMBnAzZ
+bJ+UNjohaMDLGQ5iesgCpx8/eVTWX5IY4GprtY3rn1DcR31XAZ2uCtzu9J5w
+Fuc8ZPTOVcHX1y4kHuWdrp7SYVHWne7Cea1gSHs0Qvov7rUyt7aw8szpW6Kq
+c4NqKPsa9ItfR38C2Bmy2T5pbVRD0EAkZyCIFjYp4PTjJy+7/2WS4N4EIp9p
+FYTYveCV249onaM96uoYflFxbbiDfWiNCKdM5INFMTeHVOMNujgxKtXRxZd6
+v/Cw8cz7W1uHfEDgbeNytoS/a8vLfOEsxOoIzD6u+Cds6E0AO0M22yetjWoI
+GojkjA9oYYPXCVTy8kd1f4xrLrTQcWaX41FKw5Vi6vesE+5W5pyAzLZ5nCyW
++q8EBmfVzeiZpCAPr+zj7Mnu2TgkIcNlyYe2m1vuPJF0yvN5MwvHY7k9tNdH
+QPbXReoR/zS6E8DOkKp9xcSduLPNc7oPAtmnpI1KCOtXJJQzAGQKmwRQ+kkn
+P98SvcdPz+xBNacrz07IyMvPi/feuvqK3BqWHufIThrlk423Ci/H+jp6f9wg
+eXq7YXmq8eeqnr++8nE4IBhgfjOJnn3i4jESMACKke8PBdeK8U9k5O4/hnII
+0EUCaw2yTgwhT1x/mpcmlOgYrNCF7ksH7V1TmlZnAqKawxxzh6jSP1taWtv7
+SG39o3NtuZFhVzqk6OKDbA/7gxWTT97d5bGyICfrnW8Ef1IxynwPp2mfoHjs
+BAwBwT7OwN1fb5BGCLBFAmsNsE4MIU+5Im7MSSns0f1y1Ujxm9ZbXr2gXqvN
+NUXYWTidorDJuNR7zsc9Vv3B2YYQ7utFI4bbHF4e+zHm8NsbCDrToKuKmbGv
+ZDKBdft+7ts4XgdYYV8NEyEQu/uw1sCDAm1QNSEovVjYOadnvTErDLY14xyp
+l6xdeKjAe+tLIb9MkX4AKcbKfB39ytf+H6h6uvh7JXUuUNMLDDP2lZuTAP5z
+nDH7GkHsKQNYa9BBQTaIDFdevt6sXhStSLorqsY2bPZJ22KdzW14NSLl6jt9
+mV7c0G8HKexnotNV7+7wEQzKVXOQrhxeRNEwK17gYMq+cnMSwOvjDNpXw6Iy
+oG1NIW4pv90uUcC0ZogG1xqd+jXezdL038W86XP7Lmnv58vHbifzfII++6b4
+albK+YqBRWobjKi0My+SF5v3XUHu5zc65gy+3UQAJu0rNyUBzD7OsH01LCoD
+utYkwpNubifrNSsAgKDAGzRixIgRI0aM/Jf5B2J4rcQ=
+ "], {{0, 18}, {332, 0}}, {0,
+ 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{332, 18},
+ PlotRange->{{0, 332}, {0, 18}}]], "Output",
+ ImageSize->{336, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->703811211]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->5485257],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{81, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->759353013]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliOrder", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1804070708],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{81, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1298014942]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliOrder", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{",
+ RowBox[{"j", ",", "i", ",", "k"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->2068399078],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{165, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1348167359]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"PauliOrder",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 29.849140}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliOrder[exp] orders the Pauli matrices in expr alphabetically. \
+PauliOrder[exp, orderlist] orders the Pauli matrices in expr according to \
+orderlist.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "PauliOrder",
+ "titlemodifier" -> "", "windowtitle" -> "PauliOrder", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/PauliOrder"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5335, 167, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1240066917]},
+ "RasterizedOutput"->{
+ Cell[7566, 267, 2466, 49, 40, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->703811211]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16730, 577},
+ {"RasterizedOutput", 16874, 581}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 2281, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2866, 76, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3178, 91, 476, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3679, 108, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1498210237],
+Cell[4421, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4477, 138, 114, 3, 70, "Input",
+ CellID->1005205598],
+Cell[4594, 143, 680, 17, 56, "Output",
+ CellID->747262532]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5335, 167, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1240066917],
+Cell[CellGroupData[{
+Cell[5748, 186, 196, 6, 26, "ExampleSection",
+ CellID->1647391173],
+Cell[CellGroupData[{
+Cell[5969, 196, 133, 4, 27, "Input",
+ CellID->1633341388],
+Cell[6105, 202, 1315, 55, 39, "Output",
+ CellID->1809751487]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7457, 262, 106, 3, 27, "Input",
+ CellID->997524077],
+Cell[7566, 267, 2466, 49, 40, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->703811211]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10069, 321, 131, 4, 27, "Input",
+ CellID->5485257],
+Cell[10203, 327, 1221, 52, 39, "Output",
+ CellID->759353013]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11461, 384, 107, 3, 27, "Input",
+ CellID->1804070708],
+Cell[11571, 389, 1081, 46, 39, "Output",
+ CellID->1298014942]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12689, 440, 190, 6, 27, "Input",
+ CellID->2068399078],
+Cell[12882, 448, 1849, 77, 39, "Output",
+ CellID->1348167359]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[14770, 530, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigma.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigma.nb
index 29b696f33..d07550600 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigma.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigma.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5450, 148]
-NotebookOptionsPosition[ 3429, 95]
-NotebookOutlinePosition[ 5372, 144]
-CellTagsIndexPosition[ 5329, 141]
+NotebookDataLength[ 15445, 557]
+NotebookOptionsPosition[ 11972, 454]
+NotebookOutlinePosition[ 14205, 512]
+CellTagsIndexPosition[ 14120, 507]
WindowTitle->PauliSigma
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$117200],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$204582],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/PauliSigma", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,16 +74,27 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PauliSigma", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PauliSigma", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData["PauliSigma"], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the vector of the 3 Pauli matrices. PauliSigma[1], \
-PauliSigma[2], PauliSigma[3] give the explicit Pauli matrices. PauliSigma[] \
-yields {PauliSigma[1], PauliSigma[2], PauliSigma[3]}."
+ Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"x", ",", "dim"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the internal representation of a Pauli matrix with \
+a Lorentz or Cartesian index or a contraction of a Pauli matrix and a Lorentz \
+or Cartesian vector. PauliSigma[x,3] simplifies to PauliSigma[x]."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -91,12 +103,359 @@ yields {PauliSigma[1], PauliSigma[2], PauliSigma[3]}."
"RowsIndexed" -> {}}},
CellID->982511436],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1820053215],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->71676832],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Alpha]", "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A Pauli matrix contracted with a Lorentz or Cartesian vector is displayed \
+as ",
+ Cell[BoxData[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ StyleBox["p",
+ FontSlant->"Italic"]}]], "InlineFormula"]
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{40, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"Momentum", "[", "q", "]"}], "]"}], " ", ".", " ",
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{145, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "PauliSigmaExpand"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{154, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}], "]"}], " ", ".", " ",
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Input",
+ CellLabel->"In[7]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{148, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "PauliSigmaExpand"}]], "Input",
+ CellLabel->"In[8]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{157, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]="]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
WindowTitle->"PauliSigma",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -105,22 +464,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 22.950694}",
+ "built" -> "{2020, 1, 5, 19, 0, 33.567808}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "PauliSigma denotes the vector of the 3 Pauli matrices. PauliSigma[1], \
-PauliSigma[2], PauliSigma[3] give the explicit Pauli matrices. PauliSigma[] \
-yields {PauliSigma[1], PauliSigma[2], PauliSigma[3]}.", "synonyms" -> {},
- "title" -> "PauliSigma", "titlemodifier" -> "", "windowtitle" ->
- "PauliSigma", "type" -> "Symbol", "uri" -> "FeynCalc/ref/PauliSigma"}},
+ "PauliSigma[x, dim] is the internal representation of a Pauli matrix with \
+a Lorentz or Cartesian index or a contraction of a Pauli matrix and a Lorentz \
+or Cartesian vector. PauliSigma[x,3] simplifies to PauliSigma[x].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PauliSigma",
+ "titlemodifier" -> "", "windowtitle" -> "PauliSigma", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/PauliSigma"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -128,30 +488,80 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{}
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3748, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1820053215]}
+ }
*)
(*CellTagsIndex
-CellTagsIndex->{}
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13976, 500}
+ }
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 2281, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 505, 13, 70, "Usage",
+Cell[2866, 76, 287, 11, 45, "ObjectNameGrid"],
+Cell[3156, 89, 567, 14, 102, "Usage",
CellID->982511436],
-Cell[3402, 93, 23, 0, 70, "FooterCell"]
+Cell[CellGroupData[{
+Cell[3748, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1820053215],
+Cell[CellGroupData[{
+Cell[4161, 126, 194, 6, 26, "ExampleSection",
+ CellID->71676832],
+Cell[CellGroupData[{
+Cell[4380, 136, 132, 3, 27, "Input"],
+Cell[4515, 141, 298, 11, 35, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4850, 157, 127, 3, 27, "Input"],
+Cell[4980, 162, 469, 19, 38, "Output"]
+}, Open ]],
+Cell[5464, 184, 229, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[5718, 195, 121, 3, 27, "Input"],
+Cell[5842, 200, 328, 12, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6207, 217, 130, 3, 27, "Input"],
+Cell[6340, 222, 509, 20, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6886, 247, 253, 7, 27, "Input"],
+Cell[7142, 256, 749, 28, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7928, 289, 88, 2, 27, "Input"],
+Cell[8019, 293, 805, 30, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8861, 328, 271, 7, 27, "Input"],
+Cell[9135, 337, 1231, 47, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10403, 389, 88, 2, 27, "Input"],
+Cell[10494, 393, 1412, 54, 37, "Output"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11945, 452, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigmaCombine.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigmaCombine.nb
new file mode 100644
index 000000000..4d579b93e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigmaCombine.nb
@@ -0,0 +1,485 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13186, 475]
+NotebookOptionsPosition[ 9616, 362]
+NotebookOutlinePosition[ 11736, 419]
+CellTagsIndexPosition[ 11651, 414]
+WindowTitle->PauliSigmaCombine
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliSigmaCombine\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliSigmaCombine"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+PauliSigmaCombine.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$203718],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliSigmaCombine", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliSigmaCombine", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliSigmaCombine", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ " is (nearly) the inverse operation to PauliSigmaExpand."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->548299899],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PauliSigmaCombine", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->112848552],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{319, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->1257983067]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2119726070],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->139676244],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIS", "[", "p", "]"}], "+",
+ RowBox[{"SIS", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1929257165],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{90, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1908821994]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigmaCombine", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->787757974],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{81, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->942083614]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliXi", "[", "I", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1203087577],
+
+Cell[BoxData[
+ FormBox["\[Xi]", TraditionalForm]], "Output",
+ ImageSize->{14, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->705850805]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliXi", "[",
+ RowBox[{"-", "I"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SIS", "[",
+ RowBox[{"p1", "+", "p2"}], "]"}], "+",
+ RowBox[{"SIS", "[", "q", "]"}]}], ")"}], ".",
+ RowBox[{"PauliEta", "[", "I", "]"}]}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->603891002],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Xi]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".", "\[Eta]"}], TraditionalForm]], "Output",\
+
+ ImageSize->{186, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->2088402094]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigmaCombine", "[", "%", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->742653397],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Xi]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".", "\[Eta]"}],
+ TraditionalForm]], "Output",
+ ImageSize->{165, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->257797074]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"PauliSigmaCombine",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 31.019154}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliSigmaCombine[exp] is (nearly) the inverse operation to \
+PauliSigmaExpand.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PauliSigmaCombine", "titlemodifier" -> "", "windowtitle" ->
+ "PauliSigmaCombine", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PauliSigmaCombine"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4973, 160, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2119726070]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11507, 407}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 2310, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2902, 76, 294, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3221, 91, 409, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3655, 107, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->548299899],
+Cell[4396, 133, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4452, 137, 119, 3, 70, "Input",
+ CellID->112848552],
+Cell[4574, 142, 338, 11, 37, "Output",
+ CellID->1257983067]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4973, 160, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2119726070],
+Cell[CellGroupData[{
+Cell[5386, 179, 195, 6, 26, "ExampleSection",
+ CellID->139676244],
+Cell[CellGroupData[{
+Cell[5606, 189, 153, 5, 27, "Input",
+ CellID->1929257165],
+Cell[5762, 196, 630, 25, 37, "Output",
+ CellID->1908821994]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6429, 226, 113, 3, 27, "Input",
+ CellID->787757974],
+Cell[6545, 231, 495, 19, 37, "Output",
+ CellID->942083614]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7077, 255, 104, 3, 27, "Input",
+ CellID->1203087577],
+Cell[7184, 260, 190, 6, 37, "Output",
+ CellID->705850805]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7411, 271, 329, 11, 27, "Input",
+ CellID->603891002],
+Cell[7743, 284, 943, 35, 43, "Output",
+ CellID->2088402094]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8723, 324, 113, 3, 27, "Input",
+ CellID->742653397],
+Cell[8839, 329, 711, 26, 43, "Output",
+ CellID->257797074]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9589, 360, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigmaExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigmaExpand.nb
new file mode 100644
index 000000000..a348dd8e0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSigmaExpand.nb
@@ -0,0 +1,556 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15098, 546]
+NotebookOptionsPosition[ 11468, 432]
+NotebookOutlinePosition[ 13643, 490]
+CellTagsIndexPosition[ 13558, 485]
+WindowTitle->PauliSigmaExpand
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliSigmaExpand\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliSigmaExpand"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+PauliSigmaExpand.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$204150],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliSigmaExpand", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliSigmaExpand", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliSigmaExpand", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]expands all PauliSigma[Momentum[a+b+..]] in exp into \
+(PauliSigma[Momentum[a]] + PauliSigma[Momentum[b]] + ...)."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1785023302],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PauliSigmaExpand", "]"}]], "Input",
+ CellLabel->"In[28]:=",
+ CellID->75673897],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{275, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[28]=",
+ CellID->1058349922]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2086613689],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->603372099],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIS", "[", "q", "]"}], ".",
+ RowBox[{"SIS", "[",
+ RowBox[{"p", "-", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->796036632],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{145, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->37904610]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigmaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1438122220],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{154, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1224876436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], ".",
+ RowBox[{"SIS", "[",
+ RowBox[{"c", "+", "d"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1438060670],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{183, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2004337862]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigmaExpand", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "a", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->209619609],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{192, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->134825304]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSigmaExpand", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->807488357],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{201, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1769928785]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"PauliSigmaExpand",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 32.270081}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliSigmaExpand[exp] expands all PauliSigma[Momentum[a+b+..]] in exp \
+into (PauliSigma[Momentum[a]] + PauliSigma[Momentum[b]] + ...).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PauliSigmaExpand",
+ "titlemodifier" -> "", "windowtitle" -> "PauliSigmaExpand", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/PauliSigmaExpand"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5006, 160, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2086613689]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13414, 478}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3215, 91, 457, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3697, 107, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1785023302],
+Cell[4439, 133, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4495, 137, 118, 3, 70, "Input",
+ CellID->75673897],
+Cell[4616, 142, 329, 11, 37, "Output",
+ CellID->1058349922]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5006, 160, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2086613689],
+Cell[CellGroupData[{
+Cell[5419, 179, 195, 6, 26, "ExampleSection",
+ CellID->603372099],
+Cell[CellGroupData[{
+Cell[5639, 189, 176, 6, 27, "Input",
+ CellID->796036632],
+Cell[5818, 197, 860, 33, 37, "Output",
+ CellID->37904610]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6715, 235, 113, 3, 27, "Input",
+ CellID->1438122220],
+Cell[6831, 240, 826, 31, 37, "Output",
+ CellID->1224876436]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7694, 276, 201, 7, 27, "Input",
+ CellID->1438060670],
+Cell[7898, 285, 1027, 39, 42, "Output",
+ CellID->2004337862]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8962, 329, 197, 6, 27, "Input",
+ CellID->209619609],
+Cell[9162, 337, 984, 37, 42, "Output",
+ CellID->134825304]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10183, 379, 175, 5, 27, "Input",
+ CellID->807488357],
+Cell[10361, 386, 1041, 39, 42, "Output",
+ CellID->1769928785]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11441, 430, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSimplify.nb
new file mode 100644
index 000000000..c5f7a27a2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliSimplify.nb
@@ -0,0 +1,1232 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 38492, 1222]
+NotebookOptionsPosition[ 33577, 1064]
+NotebookOutlinePosition[ 36093, 1132]
+CellTagsIndexPosition[ 35971, 1126]
+WindowTitle->PauliSimplify
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"], "\<\"PauliTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PauliTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+PauliSimplify.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$205018],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]simplifies products of Pauli matrices and expands \
+non-commutative products. Double indices and vectors are contracted. The \
+order of the Pauli matrices is not changed."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->862007093],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PauliSimplify", "]"}]], "Input",
+ CellLabel->"In[20]:=",
+ CellID->1378423485],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
+ RowBox[{"Expand2", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"FCCheckSyntax", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCPauliIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliOrder", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliReduce", "\[Rule]", "True"}], ",",
+ RowBox[{"PauliSigmaCombine", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{535, 73},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[20]=",
+ CellID->1275872628]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1332408565],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2107597735],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[", "p1", "]"}], ".",
+ RowBox[{"CSI", "[", "i", "]"}], ".",
+ RowBox[{"CSIS", "[", "p2", "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1786567575],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{137, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1582738395]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->147134958],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{344, 26},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2085934795]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], ".",
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], ".",
+ RowBox[{"CSIS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1133104696],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{187, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1271926102]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1015419780],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQlUE9cagEU0VEUKBEQWBRQQUeRBe4q4lcKrig9FUcG2WqsV3MGllfqO
+ry49iqJUa0UQpUpRqQuWgz1C64Iigg9RhKJsPgGFoLKELYEsTB4YVDSZ/WYy
+JPc7xx6pZDL/9/93mZk7M7ZLQ/2D+/bp02fje53/8V8S9smGDUs2zzXs/GF+
+yMaVy0OClvmEfBO0PGjD+KW6nf9zTOcf+87f7/q7DAKBQCAQCBMgUkTdu9A7
+0AxRmhFFrwCqhvQeJHW3U/58LKRdsh2tJWkpuXypwvZfpG2e5+HgEHidrwnN
+Ai1MgmDY1gxRYKMgUpw0M6I6YMuCaAQdjf+NDPadONr2H59HPRDQqjVBfqid
+6aToCjHNXZJWn3Q3GbniXqviPzVlBlpZzr2mjjYBUJQcjDCJgG1bM0QBjIJI
+cdLMiOrQ7JYF0Rrayk/+crepQyYqPzpl5L+u8WltDBE11IsA1CsibqhqUTbF
+bMkNsh02P60w5XhMdHTs6ewG5uahQEXJQQ2T4McxbGuGKKBREClOmhlRHZrc
+siDaAyIVys/XCvJCJi7LaaG6HVHVmbB54+3GbiwQ0tofaV361gA3i6FeSc86
+FP5RWLDOwTogLSdmtotPWEJGUT3d2R4JQImSgxkmPni2NUMUsCiIFCfNjKgO
+jW9ZEO1D8HdEUOz/2il/HhGV/zbF1PrrO1jdS5gCNTU1CnuSt9qW65FQrTi9
+anu4xZFr7zfdb9f1OgnlPaUJXVGvt4MaphxMVzi2NUMUqSjo6Hq1wzgZURNa
+07IgWgLSUnj6WEYdrVMVdak+ZlafZTbh/J6o+uKhqCOHd4fM9F6VVqvkG4WF
+YfbcD2IqFadXorI9Y/U5hnr6zuGl9Lt7SgAQ1Q16mG9Ad4VtWzNEkY6Cqq5u
+iGQEH0RYlhDi5WCqb2Q7aXV8Kf2L+1rSsiC9HMUJj/LJD9JW+WfSjefirmUr
+lWXNCnVKbCP8a3MtzP2uNuA0L3HFiaUnKyVd3/q8ulVJm2gv+cHJ2DnykUjx
+o+VRrsb2axOCRgwaHpTZBO6SJqOicMPsETCqK2zbmiGKdBRUdXVDJCP4CB/+
+GBp1+7lIXJ8bNWvo+y4RZWjbIyyTXS2LTJFT2Qip7UBYhYRfkn7q0OG/rpz5
+eef2PfFZtYoHyuKq04tGjRg1phOnsZO3FFI5PyytvbxtgaM+h+u19V4LTqto
+Lzvg47stvR5l3it6fGAcd/SO4nfnWKKnies+NeMMsFkQuth5sK6e5eyIYiK7
+Kn1+cfnanGa8X2NI1GvQwnwb5a6wbVMVRRCGRFGKgoquN99IKCMynIoSP0u/
+UtPdnwvurxlhORProARfJotbFk0IFBKkN9Gcu8HDuL+OTl+OkY2TnVF/nb6G
+U+KeUMoqIiw7v2P15sjoyJWuBl3PNnjJAKedZA+9xS+yzsTtD3a3dP32VuPb
+FywltVkXUosfHHSzmBhVDuxCpbTq1099cVZHMSqKeJgYrtQEGyvqNZR1kSw8
+IhX1kpY7S0Z7oJ+bAyizCwZbFv3cAY4dwgY6G8Z4g35mc5J4Ellz9mKr/v0s
+F1JYKIQICvd6mjusz+46ym64Oo3LsQg8ffPOndy8UlJrRpHmexEB/gfutyJt
+RTuczD2TX/RsFRJe4gwrQ5sJvt8lVwNcFUOoc2BQFMEwsV2pDZZV1JsN0tBF
+tvAIDjcIP2OV98bMRvRDEkAyZcy2LBK5a3t8/qfYTKVHW+Bih6gaCe/c0mkf
+v8OMNbfeKe2OZ0meRp0pfXnnVlPWAvN++h/GVpKeQkiq4icbDhqzW34Sujl7
+/lA9q8XYS3yU0l6y080xWP7BpluzbD86UaW66cwbRR6ORlyXiSiK5LBMlIxJ
+VwRrSQ77RMlhQhepipJ18LPC18cVYy0UACRTxmzLIpE7SfWpacMcVyq7pZRs
+7KSqFKIOkLpLPib9TKZfqkNkSP3lQHM9U99zNeQnj02Zvqa63OkZjV0/SCpj
+XA2GzPqjlvRkW8pLdLf0OP9yyX/n3GaSS2i+gPS+kIfAXJRlomRqc4UH+0TJ
+YVYXfkUhwrLTe+LymzH7QlAyGQ4fSO7AxQ5hCQg/3d9Md6DzvlJhS/GvX1ob
+2Cw6y6My6Wm9F2zNMfa+2iDrepbGVhdbv2MVFFbvIHWpU4e5RVWIOw/HC8K9
+5594ysiNZAQ6B5aJkqnNFQ4sFNW9Y4zqwqso0dOU/bE58ssnHY2Fyak8ZbEB
+k8lw+CByBzB2CEtozl5kyXnPzHaIgYHRcPcvdl9+RrUIxbzf13m7zfjP0fhD
+29bvSi5vo3YEi7TmRwZ4B0f+EhOx/fj9ZoauReAPN6wTJVOXKxzYKEoOo7ow
+K0pae2nlqAE6ry6f6wwct1f5ympwMhkOH0DuQMYOYQWtd1dYcwwmJPLgISo2
+UBRBoCiAaLNMbY5dQxHkrRuhN5D2TWuaDxRFECgKINosU5tj10TET+ID3Uz1
+dProDrLz3nQX9xZHrQWKIggUBRBtlqnNsUMgEAgEAoFAIBAIBAKBQCAQCAQC
+gUAgEAgEAoFA1Awihc9BUg40oxagdvYAc0EcjXDV0VqSlpLLp3qHlqTudsqf
+j5U+uVDyIm3zPA8Hh8DrfA3wBBKwZjBS8BqaWdYMAGqn7fwICqx7ExmdygHU
+OfQCV0TqARc01RrkSlp90t1k5AplT3klgiA/1M50UnSF8odWNGUGWlnOvQZH
+GwUAmsFOgRyaWdYYQGnXHud0otCezoFIPeCCoVpzXCHihipq7ySRf1zUUC9C
+sdCSG2Q7bH5aYcrxmOjo2NPZDdo9ue4BUDNYKXj9O/SyrCGA007XuYRflJ5y
+I+fy2YTzWc9Z/YAxOpUDpnPoDa6I1AP+RtBUa4YraV361gA3i6FeSc+oPAVQ
+VHUmbN54u7EbC5S/mlZYsM7BOiAtJ2a2i09YQkZRPcvCVx/AzOCloAuaWdYg
+wGin77z98UE/s/66+qMm/vMDY46B+xHUF4SqFzqVA6pzYL8rIvWAC6ZqjXEl
+yFtty/VIqMaYvYQp8Oo0ICIq/22KqfXXKO/Ranu4xZFr7zfdb9f1Ovgw8p6Q
+NUM5Bd0QyLI2AKggAThvzQ2yNpl0iicVFm6yN7D/7kEb9d1RKdQrB1jnwHpX
+xOoBF3TVTLtChGUJIV4OpvpGtpNWx5fSvCDVA2FhmD33A/S3r3chqr54KOrI
+4d0hM71XpdX2lIHUpfqYWX2W2aT8c2V7xupzDPX0ncMpv62eDYCXT9oM1RR0
+QyTLbKb90f7AgMgyut0MqIKk71xYsGGkyfj4Kom05twnpsO/ysLcFCkAueqG
+RuWA6hzY74pQPeCCrpppV8KHP4ZG3X4uEtfnRs0a+r5LRBnao1cVp8HKpsSv
+aS/5wckY50mu4ooTS092vQUWaXte3fpWV8e/NtfC3O9qg9IOWFwe5WpsvzYh
+aMSg4UGZTXidNJndBhI7UcDLJ2mGegq6wc8ya+XL6WjKu3AhrxHlfI7KtKNA
+33lb0feOXJefy9sab34z1nrWcZAvTwPjikgU2IDqHNjvilA94IKummlX4mfp
+V2q6d0Nwf80Iy5lYA6mEX5J+6tDhv66c+Xnn9j3xWbXoh1+ixwfGcUfvKMYe
+MtvLDvj4bkuvf/sgT1p7edsCR30O12vrvRYFBaKnies+NeMMsFkQuth5sK6e
+5eyIYhonNolCIvYeSJ9fXL42B+VZtqDlUzJDJQVvvpFQlumjAvngvpqSdiU9
+DAjnokf7nAfr2zq6f+zpE3qySMDsaiPg/QNpS2RyQdkVQ3VFsB5egjW4o6lm
+xBU6LXeWjPZAP7htzt3gYdxfR6cvx8jGyc6ov05fwylxTxQLSlKbdSG1+MFB
+N4uJUeWYY6D4RdaZuP3B7pau395CmweAABGWnd+xenNkdORKVwPdV+9OHOC0
+k/B5D6KxK4D/etBuAMknC+UUEM4ye+WLa2/GrZg6ec6efbGPUJqZarRL+TlH
+Ny78fFnIN//eeSyvibB2fOfiimg3k9HbwQ//AF0RrRyqlohC3RXL6gpdFPGu
+GAfwdYXwM1Z5b8xsRB+3Oi2PN+hnNieJJ5E1Zy+26t/PcmGOwiUsCS9xhpWh
+zQTf75KrMSJEmu9FBPgfuN+KtBXtcDL3TH6hovEGERTu9TR3WJ/ddajYcHUa
+l2MRePrmnTu5eaXvrgtse3z+p9jMemWXLonFrvRzRIYbUPJJQScFRLPMbvmN
+N+bYuR9Ijn6IOlNVgfa2ovBJjl8kYWlTDp5zcdWZtV6m/TlmM7dk84G3JlCu
+CFYOZUvEoOWKVXWFIYqgajxUUFcd/Kzw9XHFWNeqO54leRp1Gnp5P1BT1gLz
+fvofxlZSHJHbS3a6OQbL11s03Zpl+9GJKtUsMJNUxU82HDRmt/yqSHP2/KF6
+VouVr/OQVJ+aNsxxpbI7ocjGLuGdWzrt4y48HI24LhNf/nXGmlvKxxOm5cth
+IAUsl9+aG+zo+n3ywbuop8ZVoF2Qt8p2sKWXf2AnC5aFFwnobIw2b1z1gAWu
+2GVJDivrio2icECEZaf3xOU3Y56QQ+ou+Zj0M5l+qQ6RIfWXA831TH3P1VBc
+/irlJbpbepx/uQy8c6Cf5BKaryJPTZm+prrc6RmNXT9IKmNcDYbM+qOW5BhN
+PXb8oxvm5XfvGQMpYLd8YWHYmDGrLhy68QJtYyrQLmvMmDp0xNr7vaBb6AnT
+rlhtiU11xWpRyhA9TdkfmyM/cd/RWJicylO2WAThp/ub6Q503lcqbCn+9Utr
+A5tFZ3mUp3lIXerUYW5RFWIZIigI955/AuSikLdovRdszTH2vtog63oaxFYX
+W79jFWQXw9CIHW+4UYf87m0ykAJWyxc92uvquPBs9MnczCuFzcrGQFVol7WX
+hjubuu4v61Xr9xl3xWpLbKorVotSQFp7aeWoATqvruDqDBy3V/nSxObsRZac
+98xshxgYGA13/2L35We0eiekNT8ywDs48peYiO3H7ytNCiDEvN/XebvN+M/R
++EPb1u9KLm8jv6iCRuyYlaku+XKYSAGL5cvaindMHuv/1dyQuL9blAevEu0y
+pKXg8FLPCX7Bm77f9sP+izW94Y4l5l2x2RKr6orNoijTeneFNcdgQiJPC28e
+V3vsat8BNaLG2LVZO1mgK+JAV3gI8taN0BtI7aas3o7aY1f7DqgRNcauzdrJ
+Al0RB7rCRPwkPtDNVE+nj+4gO+9Nd2ne3dS7UHvsat8BNaLG2LVZO1mgK+JA
+VxAIBAKB0Ob/A5Gs8A==
+ "], {{0, 43}, {549, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{549, 43},
+ PlotRange->{{0, 549}, {0, 43}}]], "Output",
+ ImageSize->{553, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[4]=",
+ CellID->339233762]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], ".",
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], ".",
+ RowBox[{"CSIS", "[", "p", "]"}]}], ",",
+ RowBox[{"PauliReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->932118586],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnAtUTHkcx0spj7btIaHoIZVStuweJSw6jlfrkUexxWGFFpXas21nOSzH
+IzaLFU7YPYla67nsqYiybYqKsKGypPSyTU1NzdS8bjuptT1mmjv3/mbmf+v/
+OYcj8ru/+X/v/3/v/O/0sVoT7L2un4aGRtgAyW/eq8Onh4aujlhsIPliaVBY
+4PqggLVzgr4KWB8Q6rZGS/KXjpJf7poaGq1/bsFgMJjeDyEi1N2CfBjRJIbJ
+CFn3rt14xQM9z8SNhcnXctkiunWE/yRHLHG3tfW5w0Z3HiijSZRDwSiCuO5+
+1Dovj7FWH62IfsqlFSj3cbCNyeTjrwVQvUkQlZ+dOGT0hoeN9EvVZ/iYmy1O
+RXimtiihScRDwZCmqfjsTw/qxS384pNTR89LZdMqRvBra/jAM4EQ1JY1QCzf
+DbkBViOXJudf+/nE8eMx8Vm1KF4TlNAk0qFgyEOIeG1vjLh5QR5rsxuo1uGX
+nQ9f4mYzLuwJD6w3EStt+zLXEcNmXKoS0y7GexJia7EsOfvEwvFzwuPSn9dA
+XmagAG4S+VAwFOD+tT8g5mUz5f9P8It/mWpi8UUO5ckuDW7eRitj97hy+gt4
+07Ot9sZjFsxesOcOSwjQmVKAbhL1UDAKQzTkx59KZ9EZe4KVNMfUfHlGPVhT
+Enj54WOMJ5wooX8B5L+IHKenY6Cr57S3iPp61AmC9yIuaIatiZ6h1eSNsUUA
++zbgTaozFH55atzlZ42q3hgQ1+ddjL9bjexqLJXwHqmsrGz/PqKp5MalP94K
+Wvf1Sl5wus1XckXYqYtHDF9wu1ZeNKSqtdNcuMvByCnqbz7tgoLiaBejMZvj
+AqwHjwrIqIc4f3jPDgZH33vLF9TkRs8f9uH4/S9ktUk2CEWaRDwUYdVvIStP
+drxJU+QQVPrsUIf39JBfxK0aZl30hezCtHNHj928df7H3d9FxmZKWWwEZfH+
+dtZ2jhIcxk3Zmk/lTY2oOmWHr72ejvGM7Q8b4JZR/qtDzsZjdxbQvcDw3ySE
+zDTVGWjpG7zK6QMtXbOF+wvIvEzR2+vrN2dzpP+joCrtVmX76cp9tMna7LOe
+rl3yg6DapOzu1ReKmJXk57bxvoyRoweJU7qFqE31mxh4F2RFVgmc3FB3o/6a
+mv10DC0dbAz7a/YzmHq6lNKdgeRe7+LOjRFRx6MCXfRbPzP1joEOuyndp8mv
+JqzOvJxU8PSI6wiP6GL5d7+w7b1HVHZmpheZPfGGnNVj3WXfEQIG0RFkQxFV
+JHxqvzyr20yl3zDZkSRqU+bZe92oYcxclZxqbvraposuVQhbOFmrzPtrm/lR
+2OIluPkHpg233ZLVukrV3p5lrDPCJ/7PnJzcvCIK+/VkqgkrEuaaG1hO8vrm
+arnciQrbXkdITlWCnf6lZ1hGnezzAiiITgdFOJSG+742rkdedf4mBRpuenXx
+cEyG1BtYsiPZ9Hybs2Mo4L43RYQVF9bM+rQLczfd7XKyiKsuTTOUvKx3j9Pr
+M32Ha+t9HFOi8GIuLIudYjDYcV/bWzFO1tJhuuarKG8pwlZTRsEOw+tub2g8
+3kPG8LYjZmfu3XK6oKdNJaAgOvWIcijsO9NHftJlg1iBQwjLz80aaR8o7fMV
+pEeS//Kgi82K+93rk5w7qoVgJc4Zoj1kdiKLaCFqUnyG65p4XahUfMWtz/Ay
+0TKenV7X+oWw5ISL/tD5v1dTfaQGW00ZBf9H/lVVcksXH3n6MafHnKGC6AjS
+oXAyva0nHOv88SiQQ5AfyeaCnc5jNz3iUn0JKoVgp3mbag1y+r6I11BwZqWF
+vqX/rxVUVvLGh+ssdIw8b9e2tH5Ibft4qwWnXve4+9cVETvn4pW8OhFMNWUU
+lHUcOVOV/+baDzHZde/ON3Fd/tWkCmkHBguiI0iHwn8ZNcFxc+d5AnEIBUaS
+c2+5nUd8BTM2gTlZ/mY6A0ythurrG46a+Pm+lCqqDycFFVdCPF3nbjsZe3TH
+lj1Xi5sUvFeoy/C3s/NPb7/FoFtNGQVl0ONUFVUnBtoN1Pxvc0RzkPMB6c8v
+4ILoCNKhNBftdvPoss0GcAjyI9lcuNvN8xT9nTuV0Phgg4WO/qQEhiwsvZc+
+GYSYnR6+KJLSgz/ZkB5JgpP9rfcuyCdUyoSbF2KtO0jeg2qM0umzQTSXXj8U
+kwZyB9EG2ZFsLk08evhmJYqf8O6GoDTWx9VEV1NDa7CN59cPlPIgGkOCvh4E
+wWcB/UiPAiMpbnrLhv45IgwGg8FgMBgMBoPBYDAYDAajXrCNsxeDw6UEiFUS
+UHfJCGUo+sAKSPuUDxZVQKySsLpLRihDEQc2kb7mg0UUEKskpO6SEcpQ5IEV
+kPYtHyyCgFgloXWXjFCGIg1sIn3PB4smAFZJYN0lI5ShaAMtIO1jPlhawEsv
+24FQfcLqLqnYOJktvYQPF1hAql4fLLPChZdetiPfKim/GmndJalqiitDu0sv
+SR2IRqvhoNJL+HDJJUJ6iEipR0kV7P3hQksv30Nf9Qmru6Rg42SC9FKlRlNw
+AakafbBMCFc2QNJL0lZJVesuFYQR0ks0jabo+2AZEa4soKSXJK2SqtddKgoj
+pJcIGk0Z4YNlRLjSUbX0EmndZRvMkF4iZzRlgA+2Be1we0IN0kukdZdtMEJ6
+iZ7RlBk+WEaE2w21SC/R0112K8sI6SV6RlOEfbBMC7dL9+qSXiKnu+xelgnS
+SwSNpuj6YJkWLjWw9BIKBKWXOFwoEAgXSy+hQFB6icOFQt3hYullL5Ze4nB7
+cbgYDEYJ/AufFtRo
+ "], {{0, 43}, {313, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{313, 43},
+ PlotRange->{{0, 313}, {0, 43}}]], "Output",
+ ImageSize->{317, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[5]=",
+ CellID->994211324]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->393722192],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{78, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->18548593]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1619263835],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"3", " ",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"D", " ",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{93, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->127924084]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l", ",", "m", ",", "i"}],
+ "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->925136306],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["m",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{164, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]=",
+ CellID->652994641]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->96707573],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnQtUjGkYx7MdRQ1dZpRq0E03q1yXXBYRoVXrUpzdTookl4oi7XHbHLXY
+rF1sLYtDCWeJU6tC6CSyarWIUkulRKaaqaapue5ORKRpar73Hd/XPL9z6jSd
+5v+90//53u/9nnfqb+YbNH/FZ2pqaiF9pJ/m+4RNW7/eJ3yBrvTBosCQAP9A
+v+WzA0P9/P3Wj/dVl37TVvqxv5eaWsvX/wEAAABKQiKSYNEVY9JVCcAUoMch
+5j5OS8pli4jqCF+lhS90tLLyzGCjrGYJ9/4eH2cHi7F7/+UjlCU5YAoAdIro
+efw4hsXKu1ziUnVZnkyTBdeQniJSBKW/jqBbb37UhFaWzIApACAHiaC2ooHw
+pV1KQ66f2aBFaflJx2JjYg4lZNeiEG05ieMcGRbB9xuRqAlqCjKSrxTkpCSc
+uV7O5RRcOXPyYiFXjEQbIWAKCU0ByIKo+vo2j1HGA53OvSReJbz7wVZDPNLu
+xLo7zA6LyyyoESAYofSmqSpxmsGQ5TkNCLSEL86tsNJS17Zw8nC31Nak2zt5
+eo7T1x1zrFyIQB0RYAoJTQFIRmPeajO6Y9xz4tfhpkebbehD3VzcIjOqEVac
+pDp1tiFzSVYdEjX+k732dLvIIl5V4hSGyZJMTl32t0wD57RqUvWYwRQSmgJ0
+E0nTs/SfZzB60+y8wrZt2RTo4+7k4hOZXNqEwlZefthQ+ujYMuLXYX7xrs9p
+GrqatOFRRc0IRtaKhJ2xwNjILb0WSRELnx0ew7D67mFjzaW5hkZfX6ttuBtg
+ypgQT3yKaHp6Osxr7mQ75qCxy+PLiDWswRREpgCfFvGrC050hktK6xVI9Cp5
++RDaYO9L1YTvJJof77DTHx6NYGdIUHJwpP7QtXF+5tqD/bLqkF0r6255DTKc
++ScLSb9DVHlq0gDzoHtcdsZCY0PpL5T7INSSPvq3MqKLkeay0/vTKqS/RVFV
+0uLB5sv+JtJUB1PQmAJ8YiQ1l10N6FPPtnU8mouihmnRZ6bXElTmP91nT7eN
+KCR6MeaXnwp2NtToa7o4yHt4P3VNE/fdhTyCmlLE7Js7FtvSNPQmh2exCZ8k
+ItblzW7MPprMBRuCPGxovXW/8A1d6qivQbMPyaglqC4WNArfTAvNhRHjpseU
+ElgsgSldNkVUley/9k490UEAeOBkehjpOZ6oaFs5C0r2O2jrTbtcI+MZEl7x
+2YjV4dEx0QEj+7e8Df81fe12vrtfELJuJaYWPvxllPHEgyXyzzL5ggqBVhbT
+ILuBuC73wDfz9xV2+BYBMAW5KaKKE86u19jEhQAM1N/2Zup+0PGQVKfOYdDs
+o590eDMhaczfM9XIal12y61B7dVZdA1jz4QbOTm5eUXv9teFlafmMHVNJ7hu
+uvBc7hnSFUEFQCuLaZDdQMS5e2anv4t1Py0znxRWu2OCKThMgYmLxHDzVpnq
+DP/xvY6HqPL0DIb+lKMd7xYLK45P1tUe9kPx6yfUZy8aqMn0JrJtjVwQhyym
+QUonkz98Z01px5w1Nzmy+kWS+r82DDWcksz64AfAFDymONro0R0myjUFUD68
+/I2WOjbb2zoeIlaKr6nBl9EFMvoVdVmuA9TpLpmclgfCstiR/Q3mEWqjIhfE
+IYtpkIrAzV1m73zxw618MAWLKbDiIi1NBVttdCxDH7yZpcQN+XGrx9u6RmbJ
+/iM27t0VQzT0p19tadw33tvmYOb2e2l396dE7Jyz5/M4ImSCOGQxDVIhJE0v
+Sln813MV/2ms28r2t4pgChZTYOIiJfyXtxOjZhv01mQu3PB9RMTWjWuWLV27
+O/FBXeftAUHl+eDpo+ZsOXz8wPZ1kRdKFHi/FyfLy9raK7N16Y1AEIcspkEq
+goR9w3+EsbXL2j1HT8afuNTBwcEUHKbAxAUAAAAAAAAAAAAAAAAAAAAAAAAA
+AAAAAAAAXQBXuAxWVCG5hjqvkcwlBNlJpIHk4TJYIXNyDSpfyPwa20HmEoLs
+pHegqkxikD9cBiukTa5B6AtpX+PHkLmEIDvpDQgrkxBkD5fBGgeDNrkGKch8
+oVA6D6YSQgJkJ70FWWUqDPnDZTDHwaBMrkEIUl8olM6DKZ8ICZCd1ALSyiQC
+6cNlsMbBoE2uQQk6XyiUzoOphJAA2UmtKFaZEl5xXKCT1QCantmk1ceLeEQH
+RPpwGaxxMOiSa8jrC4XSeTCUEDJfIDupFcUqk/dob9DB21V8QU3uwXkDdRx2
+FxPbiSB9uAzeOBhkyTXk9YVC6TwYSgiZL5Cd1IpilSl4eT39RetTGv9ZY27y
+FbElJsnDZXBm9CBNriGrL2RK55GDoiXUaegPIl9UIDupqyCozIYcH1tHGSs2
+1QyXUaa4bCjsCxXt6PL/FSTmi0L0KHe6WZkyD8TOXDU9JKujqADVDJdRpnhn
+x6WsLxS1o4sTF0FfFKCHudOtypSJmH0rat2Rwg5bjaoZLoNLvHuJPxT2hRp2
+tCl2K/RHqb7gkKWYOx0jXdUl7Dpyr15Gg1A1w2WUKS4DavtCVTvkr7iU7QsO
+Waq68x788qSfDt3hvJYVc/IvpFa26++rTLiMMsXlQ0FfeoQd8iYupfjSOhRw
+R+bxWCkB1n17ve2d9dKy3/PxvqSqhMsoU1wO1PSlR9jR6cSlLF/eAO4AAAAA
+AAAAAAAAwFv+B2BBjvg=
+ "], {{0, 41}, {403, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{403, 41},
+ PlotRange->{{0, 403}, {0, 41}}]], "Output",
+ ImageSize->{407, 41},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[9]=",
+ CellID->200884934]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["PauliTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliTrick",
+ ButtonNote->"PauliTrick"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"PauliSimplify",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 34.933579}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliSimplify[exp] simplifies products of Pauli matrices and expands \
+non-commutative products. Double indices and vectors are contracted. The \
+order of the Pauli matrices is not changed.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "PauliSimplify", "titlemodifier" -> "",
+ "windowtitle" -> "PauliSimplify", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PauliSimplify"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6531, 195, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1332408565]},
+ "RasterizedOutput"->{
+ Cell[14966, 550, 5853, 104, 61, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->339233762],
+ Cell[21203, 671, 3348, 63, 64, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->994211324],
+ Cell[29559, 961, 3230, 61, 62, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->200884934]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 35505, 1109},
+ {"RasterizedOutput", 35649, 1113}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 3117, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3705, 98, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4020, 113, 511, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4556, 130, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->862007093],
+Cell[5297, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5353, 160, 117, 3, 70, "Input",
+ CellID->1378423485],
+Cell[5473, 165, 997, 23, 94, "Output",
+ CellID->1275872628]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6531, 195, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1332408565],
+Cell[CellGroupData[{
+Cell[6944, 214, 196, 6, 26, "ExampleSection",
+ CellID->2107597735],
+Cell[CellGroupData[{
+Cell[7165, 224, 197, 6, 27, "Input",
+ CellID->1786567575],
+Cell[7365, 232, 1484, 59, 43, "Output",
+ CellID->1582738395]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8886, 296, 109, 3, 27, "Input",
+ CellID->147134958],
+Cell[8998, 301, 3317, 134, 47, "Output",
+ CellID->2085934795]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12352, 440, 229, 7, 27, "Input",
+ CellID->1133104696],
+Cell[12584, 449, 2232, 91, 41, "Output",
+ CellID->1271926102]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14853, 545, 110, 3, 27, "Input",
+ CellID->1015419780],
+Cell[14966, 550, 5853, 104, 61, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->339233762]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20856, 659, 344, 10, 27, "Input",
+ CellID->932118586],
+Cell[21203, 671, 3348, 63, 64, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->994211324]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[24588, 739, 133, 4, 27, "Input",
+ CellID->393722192],
+Cell[24724, 745, 1220, 52, 38, "Output",
+ CellID->18548593]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[25981, 802, 110, 3, 27, "Input",
+ CellID->1619263835],
+Cell[26094, 807, 857, 35, 38, "Output",
+ CellID->127924084]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[26988, 847, 166, 5, 27, "Input",
+ CellID->925136306],
+Cell[27157, 854, 2254, 97, 39, "Output",
+ CellID->652994641]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[29448, 956, 108, 3, 27, "Input",
+ CellID->96707573],
+Cell[29559, 961, 3230, 61, 62, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->200884934]
+}, Open ]]
+}, Open ]],
+Cell[32816, 1026, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[32884, 1031, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[33157, 1045, 378, 14, 56, "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+Cell[33550, 1062, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliTrick.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliTrick.nb
new file mode 100644
index 000000000..94ee7a8db
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliTrick.nb
@@ -0,0 +1,1118 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 29022, 1108]
+NotebookOptionsPosition[ 24874, 976]
+NotebookOutlinePosition[ 27027, 1033]
+CellTagsIndexPosition[ 26941, 1028]
+WindowTitle->PauliTrick
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PauliSigma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PauliSigma"], "\<\"PauliSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PauliSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliTrick\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliTrick"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+PauliTrick.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$205462],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliTrick", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliTrick", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliTrick", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]contracts sigma matrices with each other and performs \
+several simplifications (no expansion, use PauliSimplify for this)."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->127320183],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PauliTrick", "]"}]], "Input",
+ CellLabel->"In[68]:=",
+ CellID->1855886680],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Expanding", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCPauliIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliSigmaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliReduce", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{575, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[68]=",
+ CellID->1510717930]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2010502978],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1355423925],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[", "p1", "]"}], ".",
+ RowBox[{"CSI", "[", "i", "]"}], ".",
+ RowBox[{"CSIS", "[", "p2", "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->331777472],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{137, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1874165954]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliTrick", "[", "%", "]"}], "//", "Contract"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1979638166],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p1",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p2",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{344, 26},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1808357935]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->8618082],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{78, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->622419386]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliTrick", "[", "%", "]"}], "//", "Contract"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1048487381],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "1"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{129, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1491870908]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], ".",
+ RowBox[{"CSI", "[", "j", "]"}], ".",
+ RowBox[{"CSIS", "[", "p", "]"}], ".",
+ RowBox[{"CSIS", "[", "i", "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1299757137],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{182, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1656049268]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"PauliTrick", "[", "%", "]"}], "//", "Contract"}], "//",
+ "EpsEvaluate"}], "//", "FCCanonicalizeDummyIndices"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1826628874],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"FCGV", "(", "\<\"ci781\"\>", ")"}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"FCGV", "(", "\<\"ci781\"\>", ")"}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"FCGV", "(", "\<\"ci781\"\>", ")"}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox[
+ RowBox[{"FCGV", "(", "\<\"ci781\"\>", ")"}],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{426, 51},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->2004700614]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliTrick", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"PauliReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->528116067],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{256, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]=",
+ CellID->998716380]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["PauliSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSimplify",
+ ButtonNote->"PauliSimplify"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"PauliTrick",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 36.204440}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliTrick[exp] contracts sigma matrices with each other and performs \
+several simplifications (no expansion, use PauliSimplify for this).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PauliTrick",
+ "titlemodifier" -> "", "windowtitle" -> "PauliTrick", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/PauliTrick"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6086, 187, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2010502978]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 26797, 1021}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 3111, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3696, 98, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4008, 113, 461, 12, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4494, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->127320183],
+Cell[5235, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5291, 159, 114, 3, 70, "Input",
+ CellID->1855886680],
+Cell[5408, 164, 617, 16, 56, "Output",
+ CellID->1510717930]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6086, 187, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2010502978],
+Cell[CellGroupData[{
+Cell[6499, 206, 196, 6, 26, "ExampleSection",
+ CellID->1355423925],
+Cell[CellGroupData[{
+Cell[6720, 216, 196, 6, 27, "Input",
+ CellID->331777472],
+Cell[6919, 224, 1484, 59, 43, "Output",
+ CellID->1874165954]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8440, 288, 138, 4, 27, "Input",
+ CellID->1979638166],
+Cell[8581, 294, 3317, 134, 47, "Output",
+ CellID->1808357935]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11935, 433, 131, 4, 27, "Input",
+ CellID->8618082],
+Cell[12069, 439, 1221, 52, 38, "Output",
+ CellID->622419386]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13327, 496, 138, 4, 27, "Input",
+ CellID->1048487381],
+Cell[13468, 502, 910, 37, 40, "Output",
+ CellID->1491870908]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14415, 544, 236, 7, 27, "Input",
+ CellID->1299757137],
+Cell[14654, 553, 1940, 77, 43, "Output",
+ CellID->1656049268]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16631, 635, 228, 7, 27, "Input",
+ CellID->1826628874],
+Cell[16862, 644, 4482, 180, 72, "Output",
+ CellID->2004700614]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[21381, 829, 174, 5, 27, "Input",
+ CellID->528116067],
+Cell[21558, 836, 2519, 98, 43, "Output",
+ CellID->998716380]
+}, Open ]]
+}, Open ]],
+Cell[24104, 938, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[24172, 943, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[24445, 957, 387, 14, 56, "SeeAlso",
+ CellID->830480392]
+}, Open ]],
+Cell[24847, 974, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliXi.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliXi.nb
new file mode 100644
index 000000000..f8c5e678c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PauliXi.nb
@@ -0,0 +1,333 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9430, 323]
+NotebookOptionsPosition[ 6409, 230]
+NotebookOutlinePosition[ 8515, 287]
+CellTagsIndexPosition[ 8431, 282]
+WindowTitle->PauliXi
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PauliXi\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PauliXi"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/PauliXi.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$205901],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PauliXi", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["PauliXi", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PauliXi", "[", "I", "]"}]], "InlineFormula"],
+ " \[LineSeparator]represents a two-component Pauli spinor \[Xi], while \
+PauliXi[-I] stands for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Xi]", "\[Dagger]"]], "InlineFormula"]
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->435946336],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->766904401],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliXi", "[", "I", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->47983789],
+
+Cell[BoxData[
+ FormBox["\[Xi]", TraditionalForm]], "Output",
+ ImageSize->{14, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1490471658]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PauliXi", "[",
+ RowBox[{"-", "I"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->556532228],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Xi]", "\[Dagger]"], TraditionalForm]], "Output",
+ ImageSize->{23, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->429638525]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PauliXi", "[",
+ RowBox[{"-", "I"}], "]"}], ".",
+ RowBox[{"SIS", "[", "p", "]"}], ".",
+ RowBox[{"PauliEta", "[", "I", "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1261818576],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Xi]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".", "\[Eta]"}], TraditionalForm]], "Output",
+ ImageSize->{89, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->244546897]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "ComplexConjugate"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1643081713],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Eta]", "\[Dagger]"], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".", "\[Xi]"}], TraditionalForm]], "Output",
+ ImageSize->{89, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1727681521]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"PauliXi",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 37.324583}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "PauliXi[I] represents a two-component Pauli spinor \\[Xi], while \
+PauliXi[-I] stands for \\[Xi]^\\[Dagger]", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "PauliXi", "titlemodifier" -> "",
+ "windowtitle" -> "PauliXi", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PauliXi"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3656, 107, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->435946336]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8288, 275}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[3138, 89, 493, 14, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3656, 107, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->435946336],
+Cell[CellGroupData[{
+Cell[4068, 126, 195, 6, 26, "ExampleSection",
+ CellID->766904401],
+Cell[CellGroupData[{
+Cell[4288, 136, 102, 3, 27, "Input",
+ CellID->47983789],
+Cell[4393, 141, 191, 6, 37, "Output",
+ CellID->1490471658]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4621, 152, 121, 4, 27, "Input",
+ CellID->556532228],
+Cell[4745, 158, 222, 7, 40, "Output",
+ CellID->429638525]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5004, 170, 221, 7, 27, "Input",
+ CellID->1261818576],
+Cell[5228, 179, 504, 18, 40, "Output",
+ CellID->244546897]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5769, 202, 109, 3, 27, "Input",
+ CellID->1643081713],
+Cell[5881, 207, 462, 16, 40, "Output",
+ CellID->1727681521]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6382, 228, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PlusDistribution.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PlusDistribution.nb
index a48123b4c..a31bac4e8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PlusDistribution.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PlusDistribution.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14012, 493]
-NotebookOptionsPosition[ 8763, 327]
-NotebookOutlinePosition[ 12161, 424]
-CellTagsIndexPosition[ 12041, 418]
+NotebookDataLength[ 14476, 500]
+NotebookOptionsPosition[ 9590, 351]
+NotebookOutlinePosition[ 12806, 440]
+CellTagsIndexPosition[ 12686, 434]
WindowTitle->PlusDistribution
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PlusDistribution\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PlusDistribution"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Integrate2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Integrate2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PlusDistribution\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PlusDistribution"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PlusDistribution.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$118926],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PlusDistribution", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$208985],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PlusDistribution", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ PlusDistribution.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PlusDistribution", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PlusDistribution", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->192220710],
+ CellID->1455966426],
Cell[CellGroupData[{
@@ -120,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->944721156],
+ CellID->1591433506],
Cell[CellGroupData[{
@@ -139,12 +171,11 @@ Cell[BoxData[
RowBox[{"(",
FractionBox["1",
RowBox[{"1", "-", "x"}]], ")"}], "+"], TraditionalForm]], "Output",
- ImageSize->{62, 43},
+ ImageSize->{65, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PlusDistribution",
- CellLabel->"Out[1]=",
- CellID->793477050]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +199,11 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}],
RowBox[{"1", "-", "x"}]], ")"}], "+"], TraditionalForm]], "Output",
- ImageSize->{96, 44},
+ ImageSize->{97, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PlusDistribution",
- CellLabel->"Out[2]=",
- CellID->311507260]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -193,12 +223,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PlusDistribution",
- CellLabel->"Out[3]=",
- CellID->1505699793]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -220,12 +249,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PlusDistribution",
- CellLabel->"Out[4]=",
- CellID->1574569015]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -248,12 +276,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PlusDistribution",
- CellLabel->"Out[5]=",
- CellID->207625118]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -283,12 +310,11 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}],
RowBox[{"1", "-", "x"}]], ")"}], "+"]}], TraditionalForm]], "Output",
- ImageSize->{159, 44},
+ ImageSize->{160, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PlusDistribution",
- CellLabel->"Out[6]=",
- CellID->593139408]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -318,9 +344,7 @@ Cell[TextData[{
ButtonNote->"Integrate2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PlusDistribution",
- CellID->773699831]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -337,22 +361,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 29.911911}",
+ "built" -> "{2020, 1, 5, 19, 0, 45.164931}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PlusDistribution[1/(1 - x)] denotes a distribution (in the sense of the \
-\"+\" prescription).", "synonyms" -> {}, "title" -> "PlusDistribution",
- "titlemodifier" -> "", "windowtitle" -> "PlusDistribution", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PlusDistribution"},
- "SearchTextTranslated" -> ""},
+\"+\" prescription).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PlusDistribution", "titlemodifier" -> "", "windowtitle" ->
+ "PlusDistribution", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PlusDistribution"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -360,8 +384,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -370,131 +395,113 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3458, 97, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4453, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->192220710]},
+ CellID->1455966426]},
"PlusDistribution"->{
- Cell[4090, 126, 216, 7, 27, "Input",
+ Cell[5087, 158, 216, 7, 27, "Input",
CellTags->"PlusDistribution",
CellID->1721332915],
- Cell[4309, 135, 312, 11, 64, "Output",
- CellTags->"PlusDistribution",
- CellID->793477050],
- Cell[4658, 151, 272, 9, 27, "Input",
+ Cell[5306, 167, 292, 10, 57, "Output",
+ CellTags->"PlusDistribution"],
+ Cell[5635, 182, 272, 9, 27, "Input",
CellTags->"PlusDistribution",
CellID->1742616386],
- Cell[4933, 162, 372, 13, 65, "Output",
- CellTags->"PlusDistribution",
- CellID->311507260],
- Cell[5342, 180, 347, 11, 27, "Input",
+ Cell[5910, 193, 352, 12, 57, "Output",
+ CellTags->"PlusDistribution"],
+ Cell[6299, 210, 347, 11, 27, "Input",
CellTags->"PlusDistribution",
CellID->2079014638],
- Cell[5692, 193, 218, 7, 36, "Output",
- CellTags->"PlusDistribution",
- CellID->1505699793],
- Cell[5947, 205, 407, 13, 27, "Input",
+ Cell[6649, 223, 197, 6, 35, "Output",
+ CellTags->"PlusDistribution"],
+ Cell[6883, 234, 407, 13, 27, "Input",
CellTags->"PlusDistribution",
CellID->1214045782],
- Cell[6357, 220, 218, 7, 36, "Output",
- CellTags->"PlusDistribution",
- CellID->1574569015],
- Cell[6612, 232, 435, 14, 27, "Input",
+ Cell[7293, 249, 197, 6, 35, "Output",
+ CellTags->"PlusDistribution"],
+ Cell[7527, 260, 435, 14, 27, "Input",
CellTags->"PlusDistribution",
CellID->1844765701],
- Cell[7050, 248, 217, 7, 36, "Output",
- CellTags->"PlusDistribution",
- CellID->207625118],
- Cell[7304, 260, 324, 11, 27, "Input",
+ Cell[7965, 276, 197, 6, 35, "Output",
+ CellTags->"PlusDistribution"],
+ Cell[8199, 287, 324, 11, 27, "Input",
CellTags->"PlusDistribution",
CellID->847354966],
- Cell[7631, 273, 481, 17, 65, "Output",
- CellTags->"PlusDistribution",
- CellID->593139408],
- Cell[8480, 313, 241, 9, 70, "Text",
- CellTags->"PlusDistribution",
- CellID->773699831]}
+ Cell[8526, 300, 461, 16, 57, "Output",
+ CellTags->"PlusDistribution"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10621, 371},
- {"PlusDistribution", 10763, 375}
+ {"PrimaryExamplesSection", 11492, 396},
+ {"PlusDistribution", 11636, 400}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3039, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 502, 15, 83, "Usage",
+Cell[3630, 97, 293, 11, 45, "ObjectNameGrid"],
+Cell[3926, 110, 502, 15, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3458, 97, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4453, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->192220710],
+ CellID->1455966426],
Cell[CellGroupData[{
-Cell[3870, 116, 195, 6, 25, "ExampleSection",
- CellID->944721156],
+Cell[4866, 148, 196, 6, 26, "ExampleSection",
+ CellID->1591433506],
Cell[CellGroupData[{
-Cell[4090, 126, 216, 7, 27, "Input",
+Cell[5087, 158, 216, 7, 27, "Input",
CellTags->"PlusDistribution",
CellID->1721332915],
-Cell[4309, 135, 312, 11, 64, "Output",
- CellTags->"PlusDistribution",
- CellID->793477050]
+Cell[5306, 167, 292, 10, 57, "Output",
+ CellTags->"PlusDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4658, 151, 272, 9, 27, "Input",
+Cell[5635, 182, 272, 9, 27, "Input",
CellTags->"PlusDistribution",
CellID->1742616386],
-Cell[4933, 162, 372, 13, 65, "Output",
- CellTags->"PlusDistribution",
- CellID->311507260]
+Cell[5910, 193, 352, 12, 57, "Output",
+ CellTags->"PlusDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5342, 180, 347, 11, 27, "Input",
+Cell[6299, 210, 347, 11, 27, "Input",
CellTags->"PlusDistribution",
CellID->2079014638],
-Cell[5692, 193, 218, 7, 36, "Output",
- CellTags->"PlusDistribution",
- CellID->1505699793]
+Cell[6649, 223, 197, 6, 35, "Output",
+ CellTags->"PlusDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5947, 205, 407, 13, 27, "Input",
+Cell[6883, 234, 407, 13, 27, "Input",
CellTags->"PlusDistribution",
CellID->1214045782],
-Cell[6357, 220, 218, 7, 36, "Output",
- CellTags->"PlusDistribution",
- CellID->1574569015]
+Cell[7293, 249, 197, 6, 35, "Output",
+ CellTags->"PlusDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6612, 232, 435, 14, 27, "Input",
+Cell[7527, 260, 435, 14, 27, "Input",
CellTags->"PlusDistribution",
CellID->1844765701],
-Cell[7050, 248, 217, 7, 36, "Output",
- CellTags->"PlusDistribution",
- CellID->207625118]
+Cell[7965, 276, 197, 6, 35, "Output",
+ CellTags->"PlusDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7304, 260, 324, 11, 27, "Input",
+Cell[8199, 287, 324, 11, 27, "Input",
CellTags->"PlusDistribution",
CellID->847354966],
-Cell[7631, 273, 481, 17, 65, "Output",
- CellTags->"PlusDistribution",
- CellID->593139408]
+Cell[8526, 300, 461, 16, 57, "Output",
+ CellTags->"PlusDistribution"]
}, Open ]]
}, Open ]],
-Cell[8139, 294, 31, 0, 70, "SectionFooterSpacer"]
+Cell[9014, 320, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8207, 299, 270, 12, 70, "SeeAlsoSection",
+Cell[9082, 325, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[8480, 313, 241, 9, 70, "Text",
- CellTags->"PlusDistribution",
- CellID->773699831]
+Cell[9355, 339, 193, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[8736, 325, 23, 0, 70, "FooterCell"]
+Cell[9563, 349, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Polarization.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Polarization.nb
index 62561c826..75ef9dfa2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Polarization.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Polarization.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15842, 538]
-NotebookOptionsPosition[ 9737, 350]
-NotebookOutlinePosition[ 13839, 461]
-CellTagsIndexPosition[ 13723, 455]
+NotebookDataLength[ 16391, 543]
+NotebookOptionsPosition[ 10702, 374]
+NotebookOutlinePosition[ 14589, 476]
+CellTagsIndexPosition[ 14473, 470]
WindowTitle->Polarization
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Polarization\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Polarization"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PolarizationVector\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PolarizationVector"], "\<\"PolarizationSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PolarizationSum"], "\<\"DoPolarizationSums\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DoPolarizationSums"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Polarization\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Polarization"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Polarization.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$119266],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Polarization", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$209425],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Polarization", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,24 +99,32 @@ Polarization.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Polarization", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Polarization", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"Polarization", "[", "k", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of a polarization momentum with (incoming) momentum k. A \
-slashed polarization vector (e1(k) slash) has to be entered as \
-DiracSlash[Polarization[k]]. The internal representation for a polarization \
-vector e1 corresponding to a boson with four momentum k is: Momentum[ \
-Polarization[ k, I ] ]. With this notation transversality of polarization \
-vectors is provided, i.e. , Pair[ Momentum[k], Momentum[ Polarization[k, I] ] \
-] yields 0. Polarization[k,-I] denotes the complex conjugate polarization. \
-Polarization is also an option of various functions related to the operator \
-product expansion. The setting 0 denotes the unpolarized and 1 the polarized \
-case."
+ " \[LineSeparator]is the head of a polarization momentum with (incoming) \
+momentum k. A slashed polarization vector (e1(k) slash) has to be entered as \
+GS[Polarization[k]]. The internal representation for a polarization vector e1 \
+corresponding to a boson with four momentum k is: Momentum[ Polarization[ k, \
+I ] ]. With this notation transversality of polarization vectors is provided, \
+i.e. , Pair[ Momentum[k], Momentum[ Polarization[k, I] ] ] yields 0. \
+Polarization[k,-I] denotes the complex conjugate polarization. Polarization \
+is also an option of various functions related to the operator product \
+expansion. The setting 0 denotes the unpolarized and 1 the polarized case."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -116,7 +150,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1534973530],
+ CellID->1400570862],
Cell[CellGroupData[{
@@ -126,7 +160,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->276449574],
+ CellID->1428208848],
Cell[CellGroupData[{
@@ -140,12 +174,11 @@ Cell[BoxData[
FormBox[
RowBox[{"Polarization", "(",
RowBox[{"k", ",", "\[ImaginaryI]"}], ")"}], TraditionalForm]], "Output",
- ImageSize->{117, 15},
+ ImageSize->{112, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[1]=",
- CellID->503395489]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -160,12 +193,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"Polarization", "[",
RowBox[{"k", ",", "\[ImaginaryI]"}], "]"}]], "Output",
- ImageSize->{150, 15},
+ ImageSize->{149, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1532058091]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -183,12 +215,11 @@ Cell[BoxData[
RowBox[{"Polarization", "(",
RowBox[{"k", ",",
RowBox[{"-", "\[ImaginaryI]"}]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{127, 15},
+ ImageSize->{123, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[3]=",
- CellID->1609141955]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -206,18 +237,17 @@ Cell[BoxData[
RowBox[{"Polarization", "[",
RowBox[{"k", ",",
RowBox[{"-", "\[ImaginaryI]"}]}], "]"}]], "Output",
- ImageSize->{159, 15},
+ ImageSize->{158, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1652128522]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSlash", "[",
+ RowBox[{"GS", "[",
RowBox[{"Polarization", "[", "k", "]"}], "]"}]], "Input",
CellTags->"Polarization",
CellLabel->"In[5]:=",
@@ -233,19 +263,18 @@ Cell[BoxData[
FormBox["k",
TraditionalForm], ")"}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{53, 15},
+ ImageSize->{58, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[5]=",
- CellID->665542938]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracSlash", "[",
+ RowBox[{"GS", "[",
RowBox[{"Polarization", "[", "k", "]"}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"Polarization",
@@ -253,16 +282,14 @@ Cell[BoxData[
CellID->710690441],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{"Polarization", "[",
- RowBox[{"k", ",", "\[ImaginaryI]"}], "]"}], "]"}], "]"}]], "Output",
- ImageSize->{331, 15},
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k", ",", "\[ImaginaryI]"}], "]"}], "]"}]], "Output",
+ ImageSize->{182, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1978838604]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -294,12 +321,11 @@ Cell[BoxData[
FormBox["k",
TraditionalForm], ")"}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{55, 19},
+ ImageSize->{63, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Polarization",
- CellLabel->"Out[7]=",
- CellID->149210740]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -341,17 +367,15 @@ Cell[TextData[{
ButtonNote->"DoPolarizationSums"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Polarization",
- CellID->1965130928]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Polarization",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -360,10 +384,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 31.541132}",
+ "built" -> "{2020, 1, 5, 19, 0, 46.412929}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -371,19 +395,19 @@ TaggingRules->{
"None", "summary" ->
"Polarization[k] is the head of a polarization momentum with (incoming) \
momentum k. A slashed polarization vector (e1(k) slash) has to be entered as \
-DiracSlash[Polarization[k]]. The internal representation for a polarization \
-vector e1 corresponding to a boson with four momentum k is: \
-Momentum[Polarization[k, I ] ]. With this notation transversality of \
-polarization vectors is provided, i.e. , Pair[Momentum[k], \
-Momentum[Polarization[k, I] ] ] yields 0. Polarization[k,-I] denotes the \
-complex conjugate polarization. Polarization is also an option of various \
-functions related to the operator product expansion. The setting 0 denotes \
-the unpolarized and 1 the polarized case.", "synonyms" -> {}, "title" ->
- "Polarization", "titlemodifier" -> "", "windowtitle" -> "Polarization",
- "type" -> "Symbol", "uri" -> "FeynCalc/ref/Polarization"},
- "SearchTextTranslated" -> ""},
+GS[Polarization[k]]. The internal representation for a polarization vector e1 \
+corresponding to a boson with four momentum k is: Momentum[Polarization[k, I \
+] ]. With this notation transversality of polarization vectors is provided, \
+i.e. , Pair[Momentum[k], Momentum[Polarization[k, I] ] ] yields 0. \
+Polarization[k,-I] denotes the complex conjugate polarization. Polarization \
+is also an option of various functions related to the operator product \
+expansion. The setting 0 denotes the unpolarized and 1 the polarized case.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Polarization",
+ "titlemodifier" -> "", "windowtitle" -> "Polarization", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Polarization"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -391,8 +415,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -401,145 +426,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3960, 103, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5174, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1534973530]},
+ CellID->1400570862]},
"Polarization"->{
- Cell[4593, 132, 135, 4, 27, "Input",
+ Cell[5808, 166, 135, 4, 27, "Input",
CellTags->"Polarization",
CellID->438222688],
- Cell[4731, 138, 289, 9, 36, "Output",
- CellTags->"Polarization",
- CellID->503395489],
- Cell[5057, 152, 170, 5, 27, "Input",
+ Cell[5946, 172, 269, 8, 37, "Output",
+ CellTags->"Polarization"],
+ Cell[6252, 185, 170, 5, 27, "Input",
CellTags->"Polarization",
CellID->790373903],
- Cell[5230, 159, 274, 8, 49, "Output",
- CellTags->"Polarization",
- CellID->1532058091],
- Cell[5541, 172, 177, 6, 27, "Input",
+ Cell[6425, 192, 253, 7, 51, "Output",
+ CellTags->"Polarization"],
+ Cell[6715, 204, 177, 6, 27, "Input",
CellTags->"Polarization",
CellID->211711632],
- Cell[5721, 180, 310, 10, 36, "Output",
- CellTags->"Polarization",
- CellID->1609141955],
- Cell[6068, 195, 212, 7, 27, "Input",
+ Cell[6895, 212, 289, 9, 37, "Output",
+ CellTags->"Polarization"],
+ Cell[7221, 226, 212, 7, 27, "Input",
CellTags->"Polarization",
CellID->36512114],
- Cell[6283, 204, 293, 9, 49, "Output",
- CellTags->"Polarization",
- CellID->1652128522],
- Cell[6613, 218, 172, 5, 27, "Input",
+ Cell[7436, 235, 272, 8, 51, "Output",
+ CellTags->"Polarization"],
+ Cell[7745, 248, 164, 5, 27, "Input",
CellTags->"Polarization",
CellID->734957023],
- Cell[6788, 225, 420, 15, 36, "Output",
- CellTags->"Polarization",
- CellID->665542938],
- Cell[7245, 245, 211, 7, 27, "Input",
+ Cell[7912, 255, 400, 14, 37, "Output",
+ CellTags->"Polarization"],
+ Cell[8349, 274, 203, 7, 27, "Input",
CellTags->"Polarization",
CellID->710690441],
- Cell[7459, 254, 349, 10, 49, "Output",
- CellTags->"Polarization",
- CellID->1978838604],
- Cell[7845, 269, 320, 9, 27, "Input",
+ Cell[8555, 283, 283, 8, 51, "Output",
+ CellTags->"Polarization"],
+ Cell[8875, 296, 320, 9, 27, "Input",
CellTags->"Polarization",
CellID->1314823646],
- Cell[8168, 280, 528, 21, 40, "Output",
- CellTags->"Polarization",
- CellID->149210740],
- Cell[9064, 324, 631, 21, 31, "Text",
- CellTags->"Polarization",
- CellID->1965130928]}
+ Cell[9198, 307, 508, 20, 37, "Output",
+ CellTags->"Polarization"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12178, 402},
- {"Polarization", 12318, 406}
+ {"PrimaryExamplesSection", 13180, 427},
+ {"Polarization", 13320, 431}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3261, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 1028, 21, 177, "Usage",
+Cell[3848, 101, 289, 11, 45, "ObjectNameGrid"],
+Cell[4140, 114, 1009, 19, 171, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3960, 103, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5174, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1534973530],
+ CellID->1400570862],
Cell[CellGroupData[{
-Cell[4373, 122, 195, 6, 25, "ExampleSection",
- CellID->276449574],
+Cell[5587, 156, 196, 6, 26, "ExampleSection",
+ CellID->1428208848],
Cell[CellGroupData[{
-Cell[4593, 132, 135, 4, 27, "Input",
+Cell[5808, 166, 135, 4, 27, "Input",
CellTags->"Polarization",
CellID->438222688],
-Cell[4731, 138, 289, 9, 36, "Output",
- CellTags->"Polarization",
- CellID->503395489]
+Cell[5946, 172, 269, 8, 37, "Output",
+ CellTags->"Polarization"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5057, 152, 170, 5, 27, "Input",
+Cell[6252, 185, 170, 5, 27, "Input",
CellTags->"Polarization",
CellID->790373903],
-Cell[5230, 159, 274, 8, 49, "Output",
- CellTags->"Polarization",
- CellID->1532058091]
+Cell[6425, 192, 253, 7, 51, "Output",
+ CellTags->"Polarization"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5541, 172, 177, 6, 27, "Input",
+Cell[6715, 204, 177, 6, 27, "Input",
CellTags->"Polarization",
CellID->211711632],
-Cell[5721, 180, 310, 10, 36, "Output",
- CellTags->"Polarization",
- CellID->1609141955]
+Cell[6895, 212, 289, 9, 37, "Output",
+ CellTags->"Polarization"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6068, 195, 212, 7, 27, "Input",
+Cell[7221, 226, 212, 7, 27, "Input",
CellTags->"Polarization",
CellID->36512114],
-Cell[6283, 204, 293, 9, 49, "Output",
- CellTags->"Polarization",
- CellID->1652128522]
+Cell[7436, 235, 272, 8, 51, "Output",
+ CellTags->"Polarization"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6613, 218, 172, 5, 27, "Input",
+Cell[7745, 248, 164, 5, 27, "Input",
CellTags->"Polarization",
CellID->734957023],
-Cell[6788, 225, 420, 15, 36, "Output",
- CellTags->"Polarization",
- CellID->665542938]
+Cell[7912, 255, 400, 14, 37, "Output",
+ CellTags->"Polarization"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7245, 245, 211, 7, 27, "Input",
+Cell[8349, 274, 203, 7, 27, "Input",
CellTags->"Polarization",
CellID->710690441],
-Cell[7459, 254, 349, 10, 49, "Output",
- CellTags->"Polarization",
- CellID->1978838604]
+Cell[8555, 283, 283, 8, 51, "Output",
+ CellTags->"Polarization"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7845, 269, 320, 9, 27, "Input",
+Cell[8875, 296, 320, 9, 27, "Input",
CellTags->"Polarization",
CellID->1314823646],
-Cell[8168, 280, 528, 21, 40, "Output",
- CellTags->"Polarization",
- CellID->149210740]
+Cell[9198, 307, 508, 20, 37, "Output",
+ CellTags->"Polarization"]
}, Open ]]
}, Open ]],
-Cell[8723, 305, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9733, 331, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8791, 310, 270, 12, 31, "SeeAlsoSection",
+Cell[9801, 336, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9064, 324, 631, 21, 31, "Text",
- CellTags->"Polarization",
- CellID->1965130928]
+Cell[10074, 350, 586, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[9710, 348, 23, 0, 42, "FooterCell"]
+Cell[10675, 372, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationSum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationSum.nb
index b9386a2bd..ac6232bc6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationSum.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationSum.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 28926, 858]
-NotebookOptionsPosition[ 23358, 687]
-NotebookOutlinePosition[ 27083, 791]
-CellTagsIndexPosition[ 26929, 784]
+NotebookDataLength[ 20994, 775]
+NotebookOptionsPosition[ 16409, 635]
+NotebookOutlinePosition[ 19111, 709]
+CellTagsIndexPosition[ 18992, 703]
WindowTitle->PolarizationSum
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PolarizationSum\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PolarizationSum"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Polariazation\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Polariazation"], "\<\"DoPolariazationSums\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DoPolariazationSums"], "\<\"Uncontract\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Uncontract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PolarizationSum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PolarizationSum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PolarizationSum.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$119607],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PolarizationSum", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$209884],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PolarizationSum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +99,29 @@ PolarizationSum.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PolarizationSum", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PolarizationSum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"PolarizationSum", "[",
- RowBox[{"mu", ",", "nu", ",", " ", "..."}], " ", "]"}]],
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", " ", "..."}], " ", "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "defines (as abbreviations) several polarization sums. The first two \
-arguments are the interpreted as Lorentz indices, all further ones are \
-momenta. PolarizationSum performs no calculations."
+ " \[LineSeparator]returns different polarization sums depending on its \
+arguments"
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -96,6 +132,125 @@ momenta. PolarizationSum performs no calculations."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1731109750],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PolarizationSum", "[",
+ RowBox[{"\[Mu]", ",", " ", "\[Nu]"}], "]"}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"PolarizationSum", "[",
+ RowBox[{"\[Mu]", ",", " ", "\[Nu]", ",", " ", "k", ",", " ", "0"}], "]"}]],
+ "InlineFormula"],
+ " gives ",
+ Cell[BoxData[
+ RowBox[{"-",
+ SuperscriptBox["g", "\[Mu]\[Nu]"]}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PolarizationSum", "[",
+ RowBox[{"\[Mu]", ",", " ", "\[Nu]", ",", " ", "k"}], "]"}]],
+ "InlineFormula"],
+ " returns ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ SuperscriptBox["g", "\[Mu]\[Nu]"]}], "+",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["k", "\[Mu]"],
+ SuperscriptBox["k", "\[Nu]"]}],
+ SuperscriptBox["k", "2"]]}]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"PolarizationSum", "[",
+ RowBox[{"\[Mu]", ",", " ", "\[Nu]", ",", " ", "k", ",", " ", "n"}], "]"}]],
+ "InlineFormula"],
+ " yields ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ SuperscriptBox["g", "\[Mu]\[Nu]"]}], "+",
+ FractionBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["k", "\[Mu]"],
+ SuperscriptBox["n", "\[Nu]"]}], "+",
+ RowBox[{
+ SuperscriptBox["k", "\[Nu]"],
+ SuperscriptBox["n", "\[Mu]"]}]}],
+ RowBox[{"k", "\[CenterDot]", "n"}]], "-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["n", "2"],
+ SuperscriptBox["k", "\[Mu]"],
+ SuperscriptBox["k", "\[Nu]"]}],
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"k", "\[CenterDot]", "n"}], ")"}], "2"]]}]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "PolarizationSum", "]"}]], "Input",
+ CellLabel->"In[28]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"VirtualBoson", "\[Rule]", "False"}], ",",
+ RowBox[{"Heads", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"LorentzIndex", ",", "LorentzIndex"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{475, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[28]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,184 +262,191 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->245803775],
+ CellID->1038110517],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1478638315],
+ CellID->1367338889],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "PolarizationSum", "]"}]], "Input",
+ RowBox[{"PolarizationSum", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
CellTags->"PolarizationSum",
CellLabel->"In[1]:=",
- CellID->2045558864],
+ CellID->1305140513],
Cell[BoxData[
FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"VirtualBoson", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{260, 15},
+ RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationSum",
- CellLabel->"Out[1]=",
- CellID->993421841]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"PolarizationSum", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "k"}], "]"}]], "Input",
CellTags->"PolarizationSum",
- CellLabel->"In[2]:=",
- CellID->1305140513],
+ CellLabel->"In[1]:=",
+ CellID->225444567],
Cell[BoxData[
FormBox[
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ RowBox[{
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ TraditionalForm]]}],
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{106, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationSum",
- CellLabel->"Out[2]=",
- CellID->430115432]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"PolarizationSum", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "k"}], "]"}]], "Input",
- CellTags->"PolarizationSum",
- CellLabel->"In[3]:=",
- CellID->225444567],
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "k", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
FractionBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
- SuperscriptBox[
- FormBox[
- OverscriptBox[
+ SuperscriptBox[
+ FormBox[
FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm], "2"]], "-",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{95, 51},
+ TraditionalForm]]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"]], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{100, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PolarizationSum",
- CellLabel->"Out[3]=",
- CellID->1457144102]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[BoxData[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SP", "[", "k", "]"}], "=", "0"}], ";"}]}], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"PolarizationSum", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "k", ",", "n"}], "]"}]], "Input",
CellTags->"PolarizationSum",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->697709473],
-Cell[BoxData[
- FormBox[
- RowBox[{
- StyleBox[
- RowBox[{"PolarizationSum", "::", "notmassless"}], "MessageName"], ":",
- " ", "\<\"Warning! You are inserting a polarization sum for massless \
-vector bosons, but the momentum of the external boson \
-\[NoBreak]\\!\\(\\*FormBox[\\\"k\\\", TraditionalForm]\\)\[NoBreak] is not \
-on-shell. Please put it on-shell via \
-ScalarProduct[\[NoBreak]\\!\\(\\*FormBox[\\\"k\\\", TraditionalForm]\\)\
-\[NoBreak],\[NoBreak]\\!\\(\\*FormBox[\\\"k\\\", \
-TraditionalForm]\\)\[NoBreak]]=0 \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
-ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
-ButtonData:>\\\"paclet:FeynCalc/ref/PolarizationSum\\\", ButtonNote -> \
-\\\"FeynCalc`PolarizationSum::notmassless\\\"]\\)\"\>"}],
- TraditionalForm]], "Message", "MSG",
- CellTags->"PolarizationSum",
- CellLabel->"During evaluation of In[4]:=",
- CellID->268895154],
-
Cell[BoxData[
FormBox[
RowBox[{
@@ -297,34 +459,26 @@ Cell[BoxData[
FormBox["n",
TraditionalForm], "_"],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
SuperscriptBox[
RowBox[{
FormBox["\<\"(\"\>",
@@ -346,53 +500,39 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], "2"]]}], "-",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], "+",
- FractionBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["n",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
+ TraditionalForm]]}],
RowBox[{
FormBox[
OverscriptBox[
@@ -408,34 +548,26 @@ Cell[BoxData[
TraditionalForm]}]], "+",
FractionBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["n",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}],
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["n",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
RowBox[{
FormBox[
OverscriptBox[
@@ -449,206 +581,12 @@ Cell[BoxData[
FormBox["n",
TraditionalForm], "_"],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{247, 54},
+ ImageSize->{277, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationSum",
- CellLabel->"Out[4]=",
- CellID->1315646059]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"PolarizationSum", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "k", ",",
- RowBox[{
- SubscriptBox["p", "1"], "-",
- SubscriptBox["p", "2"]}]}], "]"}]], "Input",
- CellTags->"PolarizationSum",
- CellLabel->"In[5]:=",
- CellID->1841435515],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- StyleBox[
- RowBox[{"PolarizationSum", "::", "notmassless"}], "MessageName"], ":",
- " ", "\<\"Warning! You are inserting a polarization sum for massless \
-vector bosons, but the momentum of the external boson \
-\[NoBreak]\\!\\(\\*FormBox[\\\"k\\\", TraditionalForm]\\)\[NoBreak] is not \
-on-shell. Please put it on-shell via \
-ScalarProduct[\[NoBreak]\\!\\(\\*FormBox[\\\"k\\\", TraditionalForm]\\)\
-\[NoBreak],\[NoBreak]\\!\\(\\*FormBox[\\\"k\\\", \
-TraditionalForm]\\)\[NoBreak]]=0 \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
-ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
-ButtonData:>\\\"paclet:FeynCalc/ref/PolarizationSum\\\", ButtonNote -> \
-\\\"FeynCalc`PolarizationSum::notmassless\\\"]\\)\"\>"}],
- TraditionalForm]], "Message", "MSG",
- CellTags->"PolarizationSum",
- CellLabel->"During evaluation of In[5]:=",
- CellID->1845572420],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQlUU2f2wG3nPzOdOc6Z9kgIoFEMiywii5GwWLBoURDwL4oWK7hMRyqV
-lqO4IC2KtcicTqdlakv9tx1cRju2Lq3QokUBtTJCXQAXFgVlX0IgBAIhyXv8
-A1hK8t5LXvKSvBe8v3Pag4fwvZt77/u++233ztz4VuSmZydNmrTtOeX/Ijfs
-fGnr1g3JK/5H+Y+g5KS/bvyN8od3lf9tfmbSpOGfhwAAAAAAAAAzZBKGioqK
-kd+gXflhvDfLJU9+Shz+iXwLqCB3oceWsuG/Gbif5rcku1Fuui9FEdAJ8FSD
-9pZ9HLd+1z8+envNX7Oq+wk+VYthcHBw5Df993bxXv6uAxn28xTv4HMdqE4t
-SMoSPBdfEKJIR85q3203eo3zJY0C6AR4qum7+dbS1Dv9Q0jHty/OWn1drOOf
-I22ngnjJ9waUfZAgJ9g75f6Abn+vaD4W6Pv3hz1V6YERx5snxvBqGp3I2i6e
-KuxgqMYQ8Z2z31X3EXSZALPARr/jQmjtyOoyeS5vlBGE1oT03dzkEfKjUOkj
-fbfivZbmd+nqLb0lsfNi875ZG7Bb52czFVPoBBHkrp674bJItWmKPkCEHs1K
-azJ8AzLrBik+GTAF2Oh3XAitjcH6E38N357bjjOIKbpLj6SEz57ulnC7D/NL
-ecPn8+xXFYuH5K1nVnPdD9RIcRrX2IKyy/JxDONFnWpVkJKUEdCuk4H7ezzd
-dlSozy8p+QAx+jQrbzoc6Ly2QOduEzAn5G3n923/vKwXIfpAb2ksxyoUb/Ts
-ubbKbtaL/kGLI6I3hbtHXRXp3MKQ6PJSjss7d4hWWWgBEZf/X8LyNdv2vpMY
-Hb3vchfOG0ynTlDR1Ri72amVOk6ETIui9WSgbeCxCTIJBbAg3T+lJxyuGfZC
-RNohxes+pNX7XVjeR5qwL9Dggwz+/C8atHoHcQuMRFKeYGe16KsWpbiDtR96
-e72DfUnp1AnaVRDJcdyKiTkYhjLu8Laed6ge+g6mI2u/9MWuJa4OQcceNRd+
-+vZrC7nO0adbtdlNWpPubuk4l6/E24v/Kt4yqaL5uI+lc1qVFJXUnEwKdrLx
-2lYxOgVHhRdCveJva12jIG6BmShEN099U9k7HA6gHefmz1x8RT1yoFUn4utr
-OVNXXO3B/kY/H9CKns0OVO5xsvQ70WImA8bTDNL+7Xwrp+3Z6Rk5DYOK9jP+
-3LCfcPxLV7oLI2ymr7vecuujmMj4jEPZJ85XEc9tjNQCbYj/u8mF/8FD9Wk9
-nTqR1rznYuFFMJpT8QGZ4OeCm0IDNiu6HMa2WVms664dYHL6bmy0ZfFiD5SK
-kJHFOr7r69pHP61IyhK4lr4Z++L2Fwj0Gz+ot0ATCsGPO4LXHLyL2WSkVSc9
-15axLUMwgdAoFHxg4N4uhz/Pwl9B0a/ZgfspjlPmkpi8AfSinJbPmWwRMnIU
-aQjtPB/uGHyug/LgLqvLdGdx1/LZU6MKu/VaLqfeAi0MLwKt23GmAWcfgV6d
-dOUHTLFZU4J7UoySD6BSQZMI9zXXs9nB2g/cprjibzEBzAHtzFvEsllVNOKJ
-SEfOstkr8zrHzIuIy0++F+MxawnBaEUE0n42kO24s/ji+hlWIWfalQMkKtet
-O6LeAg0gPaUfbnk3H//EFc06EV1ZzGJHXMObLxjHB7Q0S3wgWVqV5jzF4+NH
-Mt0eB5gYye34mexFuQKleZGuom380E9q1Xr77sIFtguKdHMbcXE0Z9rqaz2S
-8iSHF+akV4oeHk3Ja9MlxKbegsmRNR5eEbDntlg+jKz7QWGbiiZp1kn/nST7
-Kd7/bsb5uHF8QFuzhAeSxcUrrVnBl7p0expgYmSPszwnP8cJjtudmpwQ+8bB
-690Y1xIV6ew2A5V7ea6RPwiQIURYkOhv6xyy+WidTvEn9RZMjqQ8kfu7X49N
-/oa9XGWlj26doMILi9mcdT9jZyzG8QEyzY5+Tu1AsrQm3WXKnH/UwpFSRoN2
-XQy14sRovIOij9sAzEPRfNyP7ZqOWUIwkg+QaXYI50Ay0n76RUuHHXcZfvzk
-qae/Yqu99cvfd2pacoOuY4Kg7DsCpvIw27NG8gEyzeIcSEa7Li3jOCXfe3p7
-DuLcC0zKqyBvzPae5q9FAug6JgqI8EKUPT/rscr6o5F8QHuzuAeSlW9LpJ3P
-wQm7RIp7JVD1VqCG3AtMyquAyuUa9/gQ8d3crM3c5+3is3Lvihm/wwFoQVqd
-4eOVqnqd30g+oK1Z3APJitZvQtz/UmRGm/E6gnslUOVWoKbcCxMx1wRgJqCi
-kvSdR+sZugSJdF1NSz7VPFFDDlJozL0wAXNNAABgCDTnXjDLXBMAABgcRNqr
-Oq/TknuBibkmAAAwLnLBlYMJa+J27Nm37+3E2KXhUcsWL15/RuUuMdncC4DZ
-gPbcytz/WS2js+QAjEZWfyjIMeJ4w+hKjqLlKz7nJfVNK7K5FwwA0V4PoCta
-UnEqWk7wpwdp256k+0tMNKjnR2UQ4v+udPD7T+voFpWi9fQK7tz91fQdkO4C
-DIRCoXHhiVzXQfeXmGhoMQrDEJdET//j78fzJ6ekX5cl0L47H4Q5+S6P25W2
-d+drUev3fdto+I5DiwyACRmzxW+ffebZ34Et6Iexbwcq7Wh4/Gg8j5uEsrFF
-0IGaA4t89pVJjHpmRYsMgAl5YovakkwPG7//VIAtaMdc3w5ZQ3YU5w9/sJ6z
-cE1ixpGLNeaS8Q6gBrkJCwAQIG8/n74lJfObnK8/fz9l80pvq8k2i/9eAdWq
-Jj6IsGjr+t13sMVPAIAEfTfWO/uNS5aC9FxPcZ6xHBKwAgCgCUn5W05Oif/t
-+SXKQHquJfstP9z4VJ+5BwBAK4j41sFNS//3L0l73v8o88P3/3Yg81xdP0xX
-AAAAAAB4OpBU/jP18GNm5+2kFVRUemDvOUzZMcKM3NQAc2jBtOYACEG7i171
-fEUlOQrzD/SaWEJZXaavz/vqtdgIM3JTAcccQ2ARVUxoDoAYVPjjcpfwC8Lx
-rqopBxEzMLWE0up3vTz3VeGHAuoZuamAZ44hsIgaJjMHQIzSVSPsA75uhYNp
-mpGUJTi74zorJiM3FcAc5DCROQANiK6u4rpjYj8KMP8Co34Sdhcts/XA1PbA
-ychNCTAHo8wBECMp22I/M7ZUJTOyorv0SEr47OluCbf1OPuoJeeqQaBDQnnj
-v3g2fl+1jLuJiZuRmxJgDkaZAyBG9uhjDzZOLcDe0liOVahqQlRmYXoJ+27F
-cTlR40qu4mbkpgSYgzwmMAegAVHRUusZG2+ojxXS6v0uLO8jTczNdUCDhMNZ
-mSxn/+2BEVcnwRzkMYE5AGIGH37gxvJUq8gzUuTLx9I5rUqKSmpOJgU72Xht
-qyC9Xi1rv/TFriWuDkHHHjUXfvr2awu5ztGnMXvwFKFFwt7StRzriJ/wKr0b
-BjAHo8wBaKDvxgYO66V89Yrg3YURNtPXXW+59VFMZHzGoewT56swC08ywc8F
-N4W4Bkbav51v5bQ9Oz0jp2FQ0X7GnxtmaAPTIqG0+l0X1ryjxhtawRyMMgeg
-AdHlRSybV0rUZoWSsgSupW/Gvrj9BQIiuwzc2+Xw51mplXhZevtubLRl8WIP
-lIqQkaoQfNfXDZxmlR4J5Y1fzmW5GDEbJJiDUeYANCC8EGDB2aA2t5bVZbqz
-uGv57KlRhcT191CpoEmEO4YM1n44Z7JFyEjNyyG083y4Y/C5DtLL3WSSv9Ek
-4fDs2sJxpCKfcQBzMMocgAa6C1+ysFlTorIXiLSfDWQ77iy+uH6GVciZdsVw
-7U9d9rnQzjzl2Llq9CQ10pGzbPbKvM6xBhBx+cn3YjxmLblCkC6LRPI340pI
-fBVC3pjNsxie0evwLJ0AczDKHIAGektesbEMVk16Jy6O5kxbfa1HUp7k8MKc
-9ErRw6MpeW3kJ5SS2/Ez2YtyBehwAdCibfzQT2rVjNtdSK3wvZElJLwKIX2Q
-4Wrh+Vm90ZKrgDkYZQ5AAwNVe50seNmN4+LIgcq9PNfIHwTIECIsSPS3dQ7Z
-fLROh45d9jjLc/JznOC43anJCbFvHLzejXEiURElXzWBhKOfU78KMbyKabkQ
-s4ppOMAcjDIHoAG084cFltyEcsOtmqFdF0OtODEaz+NQ9FWKkJFwCO8qBNJ2
-2o9lv92ISffBHITQYQ5AEwOVqU7s+WfbDXZot79iq731y993ajpVSK+vkpEQ
-9ypEf0WiHTvoe4ERD0yCOXChyxyAJkRXV3DsEwx2QVnemO09zV8l5MZ5Jp2+
-ql1CgqsQSOvXvlZuhryZhgOYAwOd5gA0oAz7AqbxvjRYYWxULtc4DCDiu7lZ
-m7nP28Vn5d4V03FDSZuERFchektjZjpsMXIWCDCHOrSaA9CEvPFLvm0IJrUM
-oIa0Ks3Nfp3R71SBOchhInMAmpDVH/JxAiNoQV5/iO+0vtj4FybAHGQwmTkA
-TcibDi9wfxNCP00omo8FerylTzYKnQFzaMeE5gA0gQjy1oVnVMOBXkJQYX5s
-WHqVaTQE5tCGSc0BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-AAAAAAAAAAAAAAAAAAAAAABgVCZhqKio+OWXaFd+GO/N4ZIhIz8l4hYPIWwB
-FeQu9BhNSjtwP81viZak3SYDX2CmSmtGUPclgCkQlvL8lVoMg4Njuev77+3i
-vTxSYXjgfop38LkOvES8xC1IyhI8F18QokhHzmrfbTd6cf6YDggEZqi0ZgR1
-XwKYAmEpT3IgbaeCeCNVxlFBTrB3yn0ds70NZ5f0/fvDnqr0wIjjzUwfxMlJ
-K2u7eKqwg+nfZQxEfOfsd9V9mNfU5DEASV8yJ/Xi6ZZ5sSs2FFSNBrWAKeVJ
-jr6bmzxCfhzO+d93K95raX6XrgNFb0nsvNi8b9YG7DaHDL4kpEUEuavnbrgs
-UlWESCTCNVB9fb1hJdTDDaQ1Gb4BmXXqRZBMHgOQ8iV89VJ0fpIYSLeMi12x
-oaBqNKgRbCnPMRTdpUdSwmdPd0vAyTwtb/h8nv2qYvGQvPXMaq77gRq8+sQa
-W1B2WT6OYbyoU63ka6IbFYrSDtzf4+m2o0J95ocgCK6B5HIDDzn6uIG86XCg
-89oC1VeVajyJB3VfIlAvJecnjYF0a16RtkZwS3mOp7c0lmMVijcK9FxbZTfr
-Rf+gxRHRm8Ldo64SlR0kbmFIdHkpx+UdRlUb1l9aVHQ1xm52aqWZJelWtJ4M
-tA08puLGlONJfCj5kjmqF0e35hVpE0JQynM80ur9LizvI03YgXbwQQZ//hfa
-yxsSt8BE9JcW7SqI5DhuxQyKjEc5NnpbzztU/6slScUAukPJl8xTvVjdMi3S
-lrVf+mLXEleHoGOPmgs/ffu1hVzn6NOt2t5qolKe41A0H/exdE6rkqKSmpNJ
-wU42XtsqRjtLVHgh1Cv+ttaek7gFJkJBWvH1tZypK67iFCPTzzp6oOeDBir3
-OFn6nWgZ82Wy8aRuUPMlutVrKN0yL9JG2r+db+W0PTs9I6dhUNF+xp8b9pMB
-Sup1F0bYTF93veXWRzGR8RmHsk+cryKe2xipBVOiv7TSmvdcLLzGjy/jMJJ1
-DPUg0eUwts3K4l+GDrLxpI5Q8gQGqNcgumUgfTc22rJ4sQdKRchIwMl3fV17
-RKAVSVkC19I3Y1/c/gKBfvEV9RZMCQVpe64tY1uGXMEfoI1jHYM9aOB+iuOU
-ub90FmTjSR2h5gkMUK8hdMtABms/nDPZImRkO20I7Twf7hh8roPy4K6cl7mz
-uGv57KlRhd16rZRRb8GUUJG2Kz9gis2aEtzdNsrWEZdET//j78fzJ6cknJhX
-zwcN1n7gNsXVUEsa+FD0BOOpdwLolgpoZ94ils2qohGbIB05y2avzOv89WuR
-ODWKB9J+NpDtuLP44voZViFn2pVDBSrXrTui3oIpoSSt6MpiFjviGl4Eq8U6
-w4eHyk++F+MxawnBqDqESjsaHj8az+MmoQx7kEtPN5BWpTlP8fj4kYzsl9Ud
-qp6gt3qfAt1SQnI7fiZ7Ua5A+bWQrqJt/NBPasf3cnqeGhUXR3Omrb7WIylP
-cnhhTnql6OHRlLw2XYJN6i2YEkrS9t9Jsp/i/e9mnI9rsc4o3YULbBcUUVuQ
-1NcNxMUrrVnBl7ooPVwzVD2BknonuG6pIHuc5Tn5OU5w3O7U5ITYNw5e78a3
-iW6nRgcq9/JcI38QIEOIsCDR39Y5ZPPROp3iLuotmBJq0qLCC4vZnHU/Y0Nq
-ctYRFVF2b33dQFqT7jJlzj9qDXyIajyUPYGSeie2bqmAdl0MteLEaIsmNJwa
-BaijaD7ux3ZNx0xqSVqHunvr6wZI++kXLR123GXOdiEeVNQLuiWiv2KrvfXL
-33dqWnzSemoUoIrSuQOm8jD7h2SsM2QI99bTDdCuS8s4Tsn3mOrdv0BBvaBb
-AuSN2d7T/DXdwSNxahSgDiK8EGXPz3qssiKm3TqjUHZvPd0A7cqPtPM5yNhl
-vF/RX72gWyJQuVzjkEbi1ChgEKTVGT5eqaqXxbRZZ2h4F+BubtZm7vN28Vm5
-d8X69ux6uYGi9ZsQ978UMX/jfBh91Au6BcwCVFSSvvNoPUMXxbAgXVfTkk81
-M3dYVMWs1GtmugUAAAAAAAAAAADMD7TnVub+z2rNKVOM2QC6pQnctIeAHmjK
-FaloOcGfHqRti47ub8BQtKT6JKFbur8BQ6GYQ7ULMBAKBfGtCHJdB93fgKFo
-Uiw53dL9DRiKFsUCtDJ2q/q3zz7z7O+Ib1UDugO6BSYwT25V15Zketj4/aeC
-6FY1oAegW2DiQ27CAugD6BaYwCDCoq3rd9/B1gABKAO6BQAAAAAAAAAAAAAA
-AKgjqfxn6uHHjE3aST+oqPTA3nOYWlt6ZnoHgIkB2l30qucr6hlBDH5m1eCY
-UkJZXaavz/sP1RI16JnpXTvMV/6QmQiJhfliM1/CJ6DCH5e7hF8Qqp2jqcUw
-OMisFCcmlVBa/a6X574q/MhMt0zvJGC+8ofMREgszBeb+RKOouw5IuwDvm6F
-hKGakZQlOLvj9h2Q6R14KhFdXcV1x4TiFDDGBT3Dop+E3UXLbD0wBS2Yl+l9
-ouqfdpgvtmkllJRtsZ8ZW6pSmUbRXXokJXz2dLeE23qcz8OGW4aPuOiQUN74
-L56N31ct424aGinTO+jfSDBfbOZLOIbs0ccebJx6eL2lsRyr0Pwu5l4kMr2E
-fbfiuJyocWVHjZjpHfRvJJgvNvMlHEVUtNR6xsYb6j2ctHq/C8v7SBNz7/LT
-IKGi5Su+5ey/PTDBihXo30gwX2zmSzjK4MMP3FiealVpRgpd+Vg6p1VJUUnN
-yaRgJxuvbRWktw9k7Ze+2LXE1SHo2KPmwk/ffm0h1zn6NOZIBEVokbC3dC3H
-OuInvGrnhgX0bySYLzbzJXxC340NHNZL+eplsLsLI2ymr7vecuujmMj4jEPZ
-J85XYdYBZYKfC24KccVC2r+db+W0PTs9I6dhUNF+xp8bZuj3jRYJpdXvurDm
-HTX+gAD6NxLMF5v5Ej5BdHkRy+aVErVJuqQsgWvpm7Evbn+BgOg1Gbi3y+HP
-s1Ir8TLJ9t3YaMvixR4oFSm/tLzhc77r67cNd+aBPgnljV/OZbnsrzb2sVvQ
-v5FgvtjMl/AXhBcCLDgb1JY6ZHWZ7izuWj57alQhcdE5VCpoEuH2fIO1H86Z
-bBHyXcdwb4l2ng93DD7XQXr3YSxl3BjYlHE0STi82GHhmHzPyIm3Qf9GAhRr
-QLoLX7KwWVOisjWLtJ8NZDvuLL64foZVyJl2xXDBS12ejnbmKUOZVaMH25GO
-nGWzV+Z1jjWAiMtPvhfjMWvJFYKUTk9Sxo0DkzLOuBIS30yRN2bzLIbnoTo8
-S3dA/0a6GQSKNaRie0tesbEMVk3MJi6O5kxbfa1HUp7k8MKc9ErRw6MpeW3k
-5/eS2/Ez2YtyBehw1cuibfzQT2rV3rXuQmqFv40sIeHNFOmDDFcLz8/qjVvF
-E/RvpJtBoFhDKnagaq+TBS+7cVz0M1C5l+ca+YMAGUKEBYn+ts4hm4/W6TDO
-yh5neU5+jhMctzs1OSH2jYPXuzFfXVREScMmkHD0c+o3U4YXlS0XYhaVDQvo
-f+xzhr0ZBIod+5whFIt2/rDAkptQbriVFLTrYqgVJ0Zjl0ZRwxQhI+EQ3s0U
-pO20H8t+O7NT9U9g/dMLKFaNgcpUJ/b8s+0GW0rpr9hqb/3y952azsLRq2Ey
-EuLeTOmvSLRjB30vYPQxvwmsf3oBxaojurqCY59gsKhQ3pjtPc1fZQaE80w6
-NaxdQoKbKUjr175Wboa8KGgEJrD+6QUUi22u7XTANN6XDYaKC1G5XOOojIjv
-5mZt5j5vF5+Ve1dMh1tok5DoZkpvacxMhy0GTMphFCau/mkGFItB3vgl3zYE
-k+kHUENaleZmv44pjgwA9COrP+TjBO+EFuT1h/hO64tNcVoaAMwEedPhBe5v
-Mj0SpxdF87FAj7f0yaEAABMXRJC3Ljyj2sjnq80ZVJgfG5ZeBRoCAAAAADX+
-H/e6rxY=
- "], {{0, 131}, {361, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{361, 131},
- PlotRange->{{0, 361}, {0, 131}}]], "Output",
- ImageSize->{365, 131},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"PolarizationSum", "RasterizedOutput"},
- CellLabel->"Out[5]=",
- CellID->281630538]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -672,15 +610,25 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Polarization",
+ StyleBox[ButtonBox["Polariazation",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Polariazation",
+ ButtonNote->"Polariazation"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DoPolariazationSums",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DoPolariazationSums",
+ ButtonNote->"DoPolariazationSums"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Uncontract",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Polarization",
- ButtonNote->"Polarization"],
+ ButtonData->"paclet:FeynCalc/ref/Uncontract",
+ ButtonNote->"Uncontract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PolarizationSum",
- CellID->986230835]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -688,7 +636,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PolarizationSum",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -697,24 +645,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 33.118398}",
+ "built" -> "{2020, 1, 5, 19, 0, 47.559590}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "PolarizationSum[mu, nu, ... ] defines (as abbreviations) several \
-polarization sums. The first two arguments are the interpreted as Lorentz \
-indices, all further ones are momenta. PolarizationSum performs no \
-calculations.", "synonyms" -> {}, "title" -> "PolarizationSum",
- "titlemodifier" -> "", "windowtitle" -> "PolarizationSum", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PolarizationSum"},
- "SearchTextTranslated" -> ""},
+ "PolarizationSum[\\[Mu], \\[Nu], ... ] returns different polarization \
+sums depending on its arguments", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "PolarizationSum", "titlemodifier" -> "", "windowtitle" ->
+ "PolarizationSum", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PolarizationSum"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -722,8 +668,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -732,134 +679,104 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3552, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7708, 253, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->245803775]},
+ CellID->1038110517]},
"PolarizationSum"->{
- Cell[4185, 127, 148, 4, 27, "Input",
- CellTags->"PolarizationSum",
- CellID->2045558864],
- Cell[4336, 133, 352, 12, 36, "Output",
- CellTags->"PolarizationSum",
- CellID->993421841],
- Cell[4725, 150, 173, 5, 27, "Input",
+ Cell[8342, 282, 173, 5, 27, "Input",
CellTags->"PolarizationSum",
CellID->1305140513],
- Cell[4901, 157, 601, 25, 38, "Output",
- CellTags->"PolarizationSum",
- CellID->430115432],
- Cell[5539, 187, 182, 5, 27, "Input",
+ Cell[8518, 289, 448, 18, 37, "Output",
+ CellTags->"PolarizationSum"],
+ Cell[9133, 318, 182, 5, 27, "Input",
CellTags->"PolarizationSum",
CellID->225444567],
- Cell[5724, 194, 1425, 61, 72, "Output",
- CellTags->"PolarizationSum",
- CellID->1457144102],
- Cell[7186, 260, 192, 5, 27, "Input",
+ Cell[9318, 325, 1084, 46, 60, "Output",
+ CellTags->"PolarizationSum"],
+ Cell[11936, 442, 192, 5, 27, "Input",
CellTags->"PolarizationSum",
CellID->697709473],
- Cell[7381, 267, 886, 18, 73, "Message",
- CellTags->"PolarizationSum",
- CellID->268895154],
- Cell[8270, 287, 4023, 169, 75, "Output",
- CellTags->"PolarizationSum",
- CellID->1315646059],
- Cell[12330, 461, 265, 8, 27, "Input",
- CellTags->"PolarizationSum",
- CellID->1841435515],
- Cell[12598, 471, 887, 18, 73, "Message",
- CellTags->"PolarizationSum",
- CellID->1845572420],
- Cell[13488, 491, 9214, 159, 152, "Output",
- CellTags->{"PolarizationSum", "RasterizedOutput"},
- CellID->281630538],
- Cell[23070, 673, 246, 9, 31, "Text",
- CellTags->"PolarizationSum",
- CellID->986230835]},
- "RasterizedOutput"->{
- Cell[13488, 491, 9214, 159, 152, "Output",
- CellTags->{"PolarizationSum", "RasterizedOutput"},
- CellID->281630538]}
+ Cell[12131, 449, 3297, 138, 64, "Output",
+ CellTags->"PolarizationSum"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 25343, 733},
- {"PolarizationSum", 25484, 737},
- {"RasterizedOutput", 26783, 777}
+ {"PrimaryExamplesSection", 18315, 680},
+ {"PolarizationSum", 18458, 684}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3255, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 602, 16, 98, "Usage",
- CellID->982511436],
+Cell[3845, 101, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3552, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->245803775],
+Cell[4162, 116, 470, 14, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3964, 117, 196, 6, 25, "ExampleSection",
- CellID->1478638315],
+Cell[4657, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1731109750],
+Cell[5399, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5433, 162, 432, 15, 70, "Notes",
+ CellID->1067943069],
+Cell[5868, 179, 427, 16, 70, "Notes"],
+Cell[6298, 197, 800, 28, 70, "Notes"],
Cell[CellGroupData[{
-Cell[4185, 127, 148, 4, 27, "Input",
- CellTags->"PolarizationSum",
- CellID->2045558864],
-Cell[4336, 133, 352, 12, 36, "Output",
- CellTags->"PolarizationSum",
- CellID->993421841]
+Cell[7123, 229, 98, 2, 70, "Input"],
+Cell[7224, 233, 423, 13, 35, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4725, 150, 173, 5, 27, "Input",
+Cell[7708, 253, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1038110517],
+Cell[CellGroupData[{
+Cell[8121, 272, 196, 6, 26, "ExampleSection",
+ CellID->1367338889],
+Cell[CellGroupData[{
+Cell[8342, 282, 173, 5, 27, "Input",
CellTags->"PolarizationSum",
CellID->1305140513],
-Cell[4901, 157, 601, 25, 38, "Output",
- CellTags->"PolarizationSum",
- CellID->430115432]
+Cell[8518, 289, 448, 18, 37, "Output",
+ CellTags->"PolarizationSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5539, 187, 182, 5, 27, "Input",
+Cell[9003, 312, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9133, 318, 182, 5, 27, "Input",
CellTags->"PolarizationSum",
CellID->225444567],
-Cell[5724, 194, 1425, 61, 72, "Output",
- CellTags->"PolarizationSum",
- CellID->1457144102]
+Cell[9318, 325, 1084, 46, 60, "Output",
+ CellTags->"PolarizationSum"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7186, 260, 192, 5, 27, "Input",
- CellTags->"PolarizationSum",
- CellID->697709473],
-Cell[7381, 267, 886, 18, 73, "Message",
- CellTags->"PolarizationSum",
- CellID->268895154],
-Cell[8270, 287, 4023, 169, 75, "Output",
- CellTags->"PolarizationSum",
- CellID->1315646059]
+Cell[10439, 376, 180, 4, 27, "Input"],
+Cell[10622, 382, 940, 41, 60, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[12330, 461, 265, 8, 27, "Input",
- CellTags->"PolarizationSum",
- CellID->1841435515],
-Cell[12598, 471, 887, 18, 73, "Message",
+Cell[11611, 429, 105, 2, 9, "ExampleDelimiter"],
+Cell[11719, 433, 192, 5, 45, "Input"],
+Cell[CellGroupData[{
+Cell[11936, 442, 192, 5, 27, "Input",
CellTags->"PolarizationSum",
- CellID->1845572420],
-Cell[13488, 491, 9214, 159, 152, "Output",
- CellTags->{"PolarizationSum", "RasterizedOutput"},
- CellID->281630538]
+ CellID->697709473],
+Cell[12131, 449, 3297, 138, 64, "Output",
+ CellTags->"PolarizationSum"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[22729, 654, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15467, 592, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[22797, 659, 270, 12, 31, "SeeAlsoSection",
+Cell[15535, 597, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[23070, 673, 246, 9, 31, "Text",
- CellTags->"PolarizationSum",
- CellID->986230835]
+Cell[15808, 611, 559, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[23331, 685, 23, 0, 42, "FooterCell"]
+Cell[16382, 633, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationUncontract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationUncontract.nb
deleted file mode 100644
index 6ae3aef65..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationUncontract.nb
+++ /dev/null
@@ -1,202 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6443, 193]
-NotebookOptionsPosition[ 4116, 127]
-NotebookOutlinePosition[ 6168, 182]
-CellTagsIndexPosition[ 6084, 177]
-WindowTitle->PolarizationUncontract
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PolarizationUncontract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PolarizationUncontract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-PolarizationUncontract.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$119945],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PolarizationUncontract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["PolarizationUncontract", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["PolarizationUncontract"], "InlineFormula"],
- " \[LineSeparator]",
- "does Uncontract on scalar products involving polarization vectors."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["Polarization",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Polarization",
- ButtonNote->"Polarization"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Uncontract",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Uncontract",
- ButtonNote->"Uncontract"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"PolarizationUncontract",
- CellID->945398040]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"PolarizationUncontract",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 34.667568}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "PolarizationUncontract does Uncontract on scalar products involving \
-polarization vectors.", "synonyms" -> {}, "title" -> "PolarizationUncontract",
- "titlemodifier" -> "", "windowtitle" -> "PolarizationUncontract", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PolarizationUncontract"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PolarizationUncontract"->{
- Cell[3656, 107, 418, 15, 70, "Text",
- CellTags->"PolarizationUncontract",
- CellID->945398040]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PolarizationUncontract", 5959, 170}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[594, 21, 2302, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2899, 75, 65, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2967, 78, 391, 11, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3383, 93, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3656, 107, 418, 15, 70, "Text",
- CellTags->"PolarizationUncontract",
- CellID->945398040]
-}, Open ]],
-Cell[4089, 125, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationVector.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationVector.nb
index 1919da55d..4d2d80047 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationVector.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PolarizationVector.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21632, 789]
-NotebookOptionsPosition[ 14332, 558]
-NotebookOutlinePosition[ 18721, 684]
-CellTagsIndexPosition[ 18599, 678]
+NotebookDataLength[ 16727, 592]
+NotebookOptionsPosition[ 11372, 429]
+NotebookOutlinePosition[ 14759, 523]
+CellTagsIndexPosition[ 14637, 517]
WindowTitle->PolarizationVector
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PolarizationVector\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PolarizationVector"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FV\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FV"], "\<\"Pair\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"Polarization\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Polarization"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PolarizationVector\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PolarizationVector"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PolarizationVector.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$120294],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PolarizationVector", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$210328],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PolarizationVector", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ PolarizationVector.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PolarizationVector", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PolarizationVector", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->672337024],
+ CellID->186998201],
Cell[CellGroupData[{
@@ -118,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1692020730],
+ CellID->710680084],
Cell[CellGroupData[{
@@ -135,19 +169,16 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[CurlyEpsilon]", "_"],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], "(",
FormBox["k",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{44, 17},
+ ImageSize->{48, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[1]=",
- CellID->1849918377]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -167,19 +198,16 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], "(",
FormBox["k",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{51, 17},
+ ImageSize->{56, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[2]=",
- CellID->1945453536]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[TextData[{
@@ -190,9 +218,7 @@ Cell[TextData[{
SubscriptBox["\[CurlyEpsilon]", "\[Mu]"], "(", "k", ")"}],
TraditionalForm]]],
"is a special four-vector."
-}], "Text",
- CellTags->"PolarizationVector",
- CellID->1108597225],
+}], "Notes"],
Cell[CellGroupData[{
@@ -211,26 +237,23 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"Polarization", "[",
RowBox[{"k", ",", "\[ImaginaryI]"}], "]"}], "]"}]}], "]"}]], "Output",
- ImageSize->{427, 15},
+ ImageSize->{426, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[3]//StandardForm=",
- CellID->152992573]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
-Cell["The transverality property is not automatic.", "Text",
- CellTags->"PolarizationVector",
- CellID->1023112491],
+Cell["The transverality property is not automatic.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", " ", "=", " ",
+ RowBox[{" ",
RowBox[{
RowBox[{"PolarizationVector", "[",
RowBox[{"k", ",", "\[Mu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"k", ",", "\[Mu]"}], "]"}]}]}]], "Input",
CellTags->"PolarizationVector",
CellLabel->"In[4]:=",
@@ -247,37 +270,30 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["k",
- TraditionalForm], ")"}],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{66, 19},
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["k",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{75, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[4]=",
- CellID->1099894979]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Contract", "[", "a1", "]"}]], "Input",
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"PolarizationVector",
CellLabel->"In[5]:=",
CellID->918402341],
@@ -298,23 +314,22 @@ Cell[BoxData[
FormBox["k",
TraditionalForm], ")"}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{55, 19},
+ ImageSize->{63, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[5]=",
- CellID->1789359074]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{
RowBox[{"PolarizationVector", "[",
RowBox[{"k", ",", "\[Mu]", ",",
RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"k", ",", "\[Mu]"}], "]"}]}]}]], "Input",
CellTags->"PolarizationVector",
CellLabel->"In[6]:=",
@@ -331,183 +346,42 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox["k",
- TraditionalForm], ")"}],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{66, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PolarizationVector",
- CellLabel->"Out[6]=",
- CellID->1008334660]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Contract", "[", "a2", "]"}]], "Input",
- CellTags->"PolarizationVector",
- CellLabel->"In[7]:=",
- CellID->554867330],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PolarizationVector",
- CellLabel->"Out[7]=",
- CellID->1890424275]
-}, Open ]],
-
-Cell[TextData[{
- "Depending on the alphabetical ordering of the momenta, simplifcations are \
-done - e.g. \[LineSeparator]",
- Cell[BoxData[
- FormBox[
RowBox[{
- RowBox[{
- RowBox[{"-",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"k", "-", "p", "-", "k"}], ")"}], "\[Mu]"]}],
- RowBox[{
- SubscriptBox["\[CurlyEpsilon]", "\[Mu]"], "(",
- FormBox[
- RowBox[{"k", "-", "p"}],
- TraditionalForm], ")"}]}], "=",
- RowBox[{
- RowBox[{
- SuperscriptBox["k", "\[Mu]"],
- RowBox[{
- SubscriptBox["\[CurlyEpsilon]", "\[Mu]"], "(",
- FormBox[
- RowBox[{"k", "-", "p"}],
- TraditionalForm], ")"}]}], "=",
- FormBox[
- RowBox[{"k", "\[NoBreak]", "\[CenterDot]", "\[NoBreak]",
- RowBox[{
- RowBox[{"(", "\[NoBreak]",
- FormBox[
- RowBox[{"\[CurlyEpsilon]", "\[NoBreak]", "(", "\[NoBreak]",
- FormBox[
- RowBox[{"k", "-", "p"}],
- TraditionalForm], "\[NoBreak]", ")"}],
- TraditionalForm], "\[NoBreak]", ")"}], "."}]}],
- TraditionalForm]}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"PolarizationVector",
- CellID->1584802873],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"a3", " ", "=", " ",
- RowBox[{
- RowBox[{"PolarizationVector", "[",
- RowBox[{
- RowBox[{"k", "-", "p"}], ",", "\[Mu]", ",",
- RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], " ",
- RowBox[{"FourVector", "[",
- RowBox[{"p", ",", "\[Mu]"}], "]"}]}]}]], "Input",
- CellTags->"PolarizationVector",
- CellLabel->"In[8]:=",
- CellID->367797496],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[CurlyEpsilon]", "_"],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], "(",
- FormBox[
- RowBox[{"k", "-", "p"}],
- TraditionalForm], ")"}],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{92, 19},
+ TraditionalForm]], "(",
+ FormBox["k",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{75, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[8]=",
- CellID->2007724546]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Contract", "[", "a3", "]"}]], "Input",
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"PolarizationVector",
- CellLabel->"In[9]:=",
- CellID->1968835101],
+ CellLabel->"In[7]:=",
+ CellID->554867330],
Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox["\[CurlyEpsilon]", "_"], "(",
- FormBox[
- RowBox[{"k", "-", "p"}],
- TraditionalForm], ")"}],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{80, 21},
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PolarizationVector",
- CellLabel->"Out[9]=",
- CellID->1932094598]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2", ",", "a3"}], "]"}]], "Input",
- CellTags->"PolarizationVector",
- CellLabel->"In[10]:=",
- CellID->88853703]
+ CellLabel->"Out[7]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -530,11 +404,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["FourVector",
+ StyleBox[ButtonBox["FV",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector",
- ButtonNote->"FourVector"],
+ ButtonData->"paclet:FeynCalc/ref/FV",
+ ButtonNote->"FV"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["Pair",
@@ -549,9 +422,7 @@ Cell[TextData[{
ButtonNote->"Polarization"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PolarizationVector",
- CellID->1661672347]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -559,7 +430,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PolarizationVector",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -568,21 +439,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 35.881055}",
+ "built" -> "{2020, 1, 5, 19, 0, 48.734962}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PolarizationVector[p, mu] gives a polarization vector.",
- "synonyms" -> {}, "title" -> "PolarizationVector", "titlemodifier" -> "",
- "windowtitle" -> "PolarizationVector", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PolarizationVector"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PolarizationVector",
+ "titlemodifier" -> "", "windowtitle" -> "PolarizationVector", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/PolarizationVector"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -590,8 +462,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -600,197 +473,127 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3383, 95, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4534, 129, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->672337024]},
+ CellID->186998201]},
"PolarizationVector"->{
- Cell[4016, 124, 175, 5, 27, "Input",
+ Cell[5166, 158, 175, 5, 27, "Input",
CellTags->"PolarizationVector",
CellID->1596092203],
- Cell[4194, 131, 464, 18, 38, "Output",
- CellTags->"PolarizationVector",
- CellID->1849918377],
- Cell[4695, 154, 211, 6, 27, "Input",
+ Cell[5344, 165, 403, 15, 37, "Output",
+ CellTags->"PolarizationVector"],
+ Cell[5784, 185, 211, 6, 27, "Input",
CellTags->"PolarizationVector",
CellID->597384549],
- Cell[4909, 162, 491, 19, 38, "Output",
- CellTags->"PolarizationVector",
- CellID->1945453536],
- Cell[5415, 184, 262, 10, 35, "Text",
- CellTags->"PolarizationVector",
- CellID->1108597225],
- Cell[5702, 198, 208, 6, 27, "Input",
+ Cell[5998, 193, 430, 16, 37, "Output",
+ CellTags->"PolarizationVector"],
+ Cell[6677, 224, 208, 6, 27, "Input",
CellTags->"PolarizationVector",
CellID->1765549294],
- Cell[5913, 206, 415, 12, 49, "Output",
- CellTags->"PolarizationVector",
- CellID->152992573],
- Cell[6343, 221, 114, 2, 32, "Text",
- CellTags->"PolarizationVector",
- CellID->1023112491],
- Cell[6482, 227, 302, 9, 27, "Input",
+ Cell[6888, 232, 395, 11, 51, "Output",
+ CellTags->"PolarizationVector"],
+ Cell[7384, 250, 278, 9, 27, "Input",
CellTags->"PolarizationVector",
CellID->1218109993],
- Cell[6787, 238, 834, 35, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->1099894979],
- Cell[7658, 278, 138, 4, 27, "Input",
+ Cell[7665, 261, 684, 28, 37, "Output",
+ CellTags->"PolarizationVector"],
+ Cell[8386, 294, 137, 4, 27, "Input",
CellTags->"PolarizationVector",
CellID->918402341],
- Cell[7799, 284, 535, 21, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->1789359074],
- Cell[8371, 310, 359, 10, 27, "Input",
+ Cell[8526, 300, 514, 20, 37, "Output",
+ CellTags->"PolarizationVector"],
+ Cell[9077, 325, 335, 10, 27, "Input",
CellTags->"PolarizationVector",
CellID->113884671],
- Cell[8733, 322, 834, 35, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->1008334660],
- Cell[9604, 362, 138, 4, 27, "Input",
+ Cell[9415, 337, 684, 28, 37, "Output",
+ CellTags->"PolarizationVector"],
+ Cell[10136, 370, 137, 4, 27, "Input",
CellTags->"PolarizationVector",
CellID->554867330],
- Cell[9745, 368, 220, 7, 36, "Output",
- CellTags->"PolarizationVector",
- CellID->1890424275],
- Cell[9980, 378, 1177, 37, 51, "Text",
- CellTags->"PolarizationVector",
- CellID->1584802873],
- Cell[11182, 419, 385, 11, 27, "Input",
- CellTags->"PolarizationVector",
- CellID->367797496],
- Cell[11570, 432, 861, 36, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->2007724546],
- Cell[12468, 473, 139, 4, 27, "Input",
- CellTags->"PolarizationVector",
- CellID->1968835101],
- Cell[12610, 479, 562, 22, 42, "Output",
- CellTags->"PolarizationVector",
- CellID->1932094598],
- Cell[13187, 504, 170, 5, 27, "Input",
- CellTags->"PolarizationVector",
- CellID->88853703],
- Cell[13713, 531, 577, 22, 31, "Text",
- CellTags->"PolarizationVector",
- CellID->1661672347]}
+ Cell[10276, 376, 199, 6, 35, "Output",
+ CellTags->"PolarizationVector"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16160, 601},
- {"PolarizationVector", 16304, 605}
+ {"PrimaryExamplesSection", 13245, 474},
+ {"PolarizationVector", 13390, 478}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2286, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 3203, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2879, 75, 61, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2943, 78, 415, 13, 82, "Usage",
+Cell[3796, 99, 295, 11, 45, "ObjectNameGrid"],
+Cell[4094, 112, 415, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3383, 95, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4534, 129, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->672337024],
+ CellID->186998201],
Cell[CellGroupData[{
-Cell[3795, 114, 196, 6, 25, "ExampleSection",
- CellID->1692020730],
+Cell[4946, 148, 195, 6, 26, "ExampleSection",
+ CellID->710680084],
Cell[CellGroupData[{
-Cell[4016, 124, 175, 5, 27, "Input",
+Cell[5166, 158, 175, 5, 27, "Input",
CellTags->"PolarizationVector",
CellID->1596092203],
-Cell[4194, 131, 464, 18, 38, "Output",
- CellTags->"PolarizationVector",
- CellID->1849918377]
+Cell[5344, 165, 403, 15, 37, "Output",
+ CellTags->"PolarizationVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4695, 154, 211, 6, 27, "Input",
+Cell[5784, 185, 211, 6, 27, "Input",
CellTags->"PolarizationVector",
CellID->597384549],
-Cell[4909, 162, 491, 19, 38, "Output",
- CellTags->"PolarizationVector",
- CellID->1945453536]
+Cell[5998, 193, 430, 16, 37, "Output",
+ CellTags->"PolarizationVector"]
}, Open ]],
-Cell[5415, 184, 262, 10, 35, "Text",
- CellTags->"PolarizationVector",
- CellID->1108597225],
+Cell[6443, 212, 209, 8, 35, "Notes"],
Cell[CellGroupData[{
-Cell[5702, 198, 208, 6, 27, "Input",
+Cell[6677, 224, 208, 6, 27, "Input",
CellTags->"PolarizationVector",
CellID->1765549294],
-Cell[5913, 206, 415, 12, 49, "Output",
- CellTags->"PolarizationVector",
- CellID->152992573]
+Cell[6888, 232, 395, 11, 51, "Output",
+ CellTags->"PolarizationVector"]
}, Open ]],
-Cell[6343, 221, 114, 2, 32, "Text",
- CellTags->"PolarizationVector",
- CellID->1023112491],
+Cell[7298, 246, 61, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6482, 227, 302, 9, 27, "Input",
+Cell[7384, 250, 278, 9, 27, "Input",
CellTags->"PolarizationVector",
CellID->1218109993],
-Cell[6787, 238, 834, 35, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->1099894979]
+Cell[7665, 261, 684, 28, 37, "Output",
+ CellTags->"PolarizationVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7658, 278, 138, 4, 27, "Input",
+Cell[8386, 294, 137, 4, 27, "Input",
CellTags->"PolarizationVector",
CellID->918402341],
-Cell[7799, 284, 535, 21, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->1789359074]
+Cell[8526, 300, 514, 20, 37, "Output",
+ CellTags->"PolarizationVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8371, 310, 359, 10, 27, "Input",
+Cell[9077, 325, 335, 10, 27, "Input",
CellTags->"PolarizationVector",
CellID->113884671],
-Cell[8733, 322, 834, 35, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->1008334660]
+Cell[9415, 337, 684, 28, 37, "Output",
+ CellTags->"PolarizationVector"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9604, 362, 138, 4, 27, "Input",
+Cell[10136, 370, 137, 4, 27, "Input",
CellTags->"PolarizationVector",
CellID->554867330],
-Cell[9745, 368, 220, 7, 36, "Output",
- CellTags->"PolarizationVector",
- CellID->1890424275]
-}, Open ]],
-Cell[9980, 378, 1177, 37, 51, "Text",
- CellTags->"PolarizationVector",
- CellID->1584802873],
-Cell[CellGroupData[{
-Cell[11182, 419, 385, 11, 27, "Input",
- CellTags->"PolarizationVector",
- CellID->367797496],
-Cell[11570, 432, 861, 36, 40, "Output",
- CellTags->"PolarizationVector",
- CellID->2007724546]
+Cell[10276, 376, 199, 6, 35, "Output",
+ CellTags->"PolarizationVector"]
+}, Open ]]
}, Open ]],
-Cell[CellGroupData[{
-Cell[12468, 473, 139, 4, 27, "Input",
- CellTags->"PolarizationVector",
- CellID->1968835101],
-Cell[12610, 479, 562, 22, 42, "Output",
- CellTags->"PolarizationVector",
- CellID->1932094598]
-}, Open ]],
-Cell[13187, 504, 170, 5, 27, "Input",
- CellTags->"PolarizationVector",
- CellID->88853703]
-}, Open ]],
-Cell[13372, 512, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10502, 386, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13440, 517, 270, 12, 31, "SeeAlsoSection",
+Cell[10570, 391, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13713, 531, 577, 22, 31, "Text",
- CellTags->"PolarizationVector",
- CellID->1661672347]
+Cell[10843, 405, 487, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[14305, 556, 23, 0, 42, "FooterCell"]
+Cell[11345, 427, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveInteger.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveInteger.nb
index 916d6a41d..2a9562c10 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveInteger.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveInteger.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6144, 187]
-NotebookOptionsPosition[ 3882, 121]
-NotebookOutlinePosition[ 5876, 176]
-CellTagsIndexPosition[ 5799, 171]
+NotebookDataLength[ 6864, 208]
+NotebookOptionsPosition[ 4825, 151]
+NotebookOutlinePosition[ 6657, 200]
+CellTagsIndexPosition[ 6614, 197]
WindowTitle->PositiveInteger
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PositiveInteger\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PositiveInteger"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PositiveInteger\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PositiveInteger"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PositiveInteger.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$120638],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PositiveInteger", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$210769],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PositiveInteger", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ PositiveInteger.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PositiveInteger", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PositiveInteger", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"DataType"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PositiveInteger",
- CellID->1743918349]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,21 +161,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 37.408968}",
+ "built" -> "{2020, 1, 5, 19, 0, 49.846879}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PositiveInteger is a data type. E.g. DataType[OPEm, PositiveInteger] \
-gives True.", "synonyms" -> {}, "title" -> "PositiveInteger", "titlemodifier" ->
- "", "windowtitle" -> "PositiveInteger", "type" -> "Symbol", "uri" ->
+gives True.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PositiveInteger", "titlemodifier" -> "", "windowtitle" ->
+ "PositiveInteger", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PositiveInteger"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -154,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PositiveInteger"->{
- Cell[3605, 107, 235, 9, 70, "Text",
- CellTags->"PositiveInteger",
- CellID->1743918349]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PositiveInteger", 5681, 164}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3031, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 382, 11, 70, "Usage",
+Cell[3621, 97, 292, 11, 70, "ObjectNameGrid"],
+Cell[3916, 110, 382, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3332, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4323, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3605, 107, 235, 9, 70, "Text",
- CellTags->"PositiveInteger",
- CellID->1743918349]
+Cell[4596, 139, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3855, 119, 23, 0, 70, "FooterCell"]
+Cell[4798, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveNumber.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveNumber.nb
index 4500b0879..63034d2c3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveNumber.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PositiveNumber.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6153, 188]
-NotebookOptionsPosition[ 3888, 122]
-NotebookOutlinePosition[ 5886, 177]
-CellTagsIndexPosition[ 5810, 172]
+NotebookDataLength[ 6878, 209]
+NotebookOptionsPosition[ 4832, 152]
+NotebookOutlinePosition[ 6671, 201]
+CellTagsIndexPosition[ 6628, 198]
WindowTitle->PositiveNumber
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PositiveNumber\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PositiveNumber"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PositiveNumber\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PositiveNumber"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PositiveNumber.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$120982],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PositiveNumber", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$211211],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PositiveNumber", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ PositiveNumber.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PositiveNumber", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PositiveNumber", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"DataType"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PositiveNumber",
- CellID->1422262610]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,21 +162,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 38.739583}",
+ "built" -> "{2020, 1, 5, 19, 0, 50.917719}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"PositiveNumber is a data type. E.g. DataType[Epsilon, PositiveNumber] = \
-True (by default). ", "synonyms" -> {}, "title" -> "PositiveNumber",
- "titlemodifier" -> "", "windowtitle" -> "PositiveNumber", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PositiveNumber"}},
+True (by default). ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PositiveNumber", "titlemodifier" -> "", "windowtitle" ->
+ "PositiveNumber", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PositiveNumber"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PositiveNumber"->{
- Cell[3612, 108, 234, 9, 70, "Text",
- CellTags->"PositiveNumber",
- CellID->1422262610]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PositiveNumber", 5693, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3027, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 395, 12, 70, "Usage",
+Cell[3616, 97, 291, 11, 70, "ObjectNameGrid"],
+Cell[3910, 110, 395, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3339, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4330, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3612, 108, 234, 9, 70, "Text",
- CellTags->"PositiveNumber",
- CellID->1422262610]
+Cell[4603, 140, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3861, 120, 23, 0, 70, "FooterCell"]
+Cell[4805, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PostFortranFile.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PostFortranFile.nb
index ef5f70b38..e52f3bd34 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PostFortranFile.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PostFortranFile.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6504, 196]
-NotebookOptionsPosition[ 4148, 129]
-NotebookOutlinePosition[ 6235, 185]
-CellTagsIndexPosition[ 6158, 180]
+NotebookDataLength[ 7317, 218]
+NotebookOptionsPosition[ 5185, 160]
+NotebookOutlinePosition[ 7109, 210]
+CellTagsIndexPosition[ 7066, 207]
WindowTitle->PostFortranFile
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PostFortranFile\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PostFortranFile"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Write2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Write2"], "\<\"PreFortranFile\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PreFortranFile"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PostFortranFile\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PostFortranFile"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PostFortranFile.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$121327],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PostFortranFile", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$211654],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PostFortranFile", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ PostFortranFile.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PostFortranFile", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PostFortranFile", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,9 +153,7 @@ Cell[TextData[{
ButtonNote->"PreFortranFile"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PostFortranFile",
- CellID->1559653274]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,10 +170,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 39.983924}",
+ "built" -> "{2020, 1, 5, 19, 0, 51.753223}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -150,11 +181,12 @@ TaggingRules->{
"None", "summary" ->
"PostFortranFile is an option for Write2 which may be set to a file name \
(or a list of file names) or a string, which will be put at the end of the \
-generated Fortran file.", "synonyms" -> {}, "title" -> "PostFortranFile",
- "titlemodifier" -> "", "windowtitle" -> "PostFortranFile", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PostFortranFile"}},
+generated Fortran file.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PostFortranFile", "titlemodifier" -> "", "windowtitle" ->
+ "PostFortranFile", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PostFortranFile"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +195,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PostFortranFile"->{
- Cell[3700, 109, 406, 15, 70, "Text",
- CellTags->"PostFortranFile",
- CellID->1559653274]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PostFortranFile", 6039, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3125, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 477, 13, 70, "Usage",
+Cell[3715, 98, 292, 11, 70, "ObjectNameGrid"],
+Cell[4010, 111, 477, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3427, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4512, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3700, 109, 406, 15, 70, "Text",
- CellTags->"PostFortranFile",
- CellID->1559653274]
+Cell[4785, 142, 358, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4121, 127, 23, 0, 70, "FooterCell"]
+Cell[5158, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Power2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Power2.nb
index e75384d6f..b07cf372e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Power2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Power2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9249, 318]
-NotebookOptionsPosition[ 5715, 208]
-NotebookOutlinePosition[ 8301, 281]
-CellTagsIndexPosition[ 8193, 275]
+NotebookDataLength[ 9922, 336]
+NotebookOptionsPosition[ 6631, 236]
+NotebookOutlinePosition[ 9068, 304]
+CellTagsIndexPosition[ 8960, 298]
WindowTitle->Power2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Power2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Power2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Power2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PowerFactor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PowerFactor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Power2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Power2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Power2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$121672],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Power2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$212097],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Power2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Power2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Power2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +142,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2002944619],
+ CellID->1439015721],
Cell[CellGroupData[{
@@ -120,7 +152,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1141506699],
+ CellID->1049005295],
Cell[CellGroupData[{
@@ -137,12 +169,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "a"}], ")"}], "b"], TraditionalForm]], "Output",
- ImageSize->{44, 19},
+ ImageSize->{48, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Power2",
- CellLabel->"Out[1]=",
- CellID->1555519313]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -164,12 +195,11 @@ Cell[BoxData[
FormBox[
SuperscriptBox["a", "b"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{63, 19},
+ ImageSize->{69, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Power2",
- CellLabel->"Out[2]=",
- CellID->1786215167]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -199,9 +229,7 @@ Cell[TextData[{
ButtonNote->"PowerFactor"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Power2",
- CellID->1979787947]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -209,7 +237,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"Power2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -218,10 +246,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 41.179587}",
+ "built" -> "{2020, 1, 5, 19, 0, 52.693298}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -229,11 +257,11 @@ TaggingRules->{
"None", "summary" ->
"Power2[x, y] represents x^y. Sometimes Power2 is more useful than the \
Mathematica Power. Power2[-a,b] simplifies to (-1)^b Power2[a,b] (if no \
-Epsilon is in b ...).", "synonyms" -> {}, "title" -> "Power2",
- "titlemodifier" -> "", "windowtitle" -> "Power2", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Power2"}, "SearchTextTranslated" -> ""},
+Epsilon is in b ...).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Power2", "titlemodifier" -> "", "windowtitle" -> "Power2", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Power2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -242,7 +270,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -251,75 +279,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3424, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4421, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2002944619]},
+ CellID->1439015721]},
"Power2"->{
- Cell[4058, 126, 165, 6, 27, "Input",
+ Cell[5055, 158, 165, 6, 27, "Input",
CellTags->"Power2",
CellID->1628207625],
- Cell[4226, 134, 276, 10, 40, "Output",
- CellTags->"Power2",
- CellID->1555519313],
- Cell[4539, 149, 166, 6, 27, "Input",
+ Cell[5223, 166, 255, 9, 40, "Output",
+ CellTags->"Power2"],
+ Cell[5515, 180, 166, 6, 27, "Input",
CellTags->"Power2",
CellID->1450604516],
- Cell[4708, 157, 362, 14, 40, "Output",
- CellTags->"Power2",
- CellID->1786215167],
- Cell[5438, 194, 235, 9, 31, "Text",
- CellTags->"Power2",
- CellID->1979787947]}
+ Cell[5684, 188, 341, 13, 40, "Output",
+ CellTags->"Power2"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7603, 252},
- {"Power2", 7736, 256}
+ {"PrimaryExamplesSection", 8501, 280},
+ {"Power2", 8635, 284}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3000, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 529, 15, 99, "Usage",
+Cell[3581, 97, 283, 11, 45, "ObjectNameGrid"],
+Cell[3867, 110, 529, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3424, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4421, 129, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2002944619],
+ CellID->1439015721],
Cell[CellGroupData[{
-Cell[3837, 116, 196, 6, 25, "ExampleSection",
- CellID->1141506699],
+Cell[4834, 148, 196, 6, 26, "ExampleSection",
+ CellID->1049005295],
Cell[CellGroupData[{
-Cell[4058, 126, 165, 6, 27, "Input",
+Cell[5055, 158, 165, 6, 27, "Input",
CellTags->"Power2",
CellID->1628207625],
-Cell[4226, 134, 276, 10, 40, "Output",
- CellTags->"Power2",
- CellID->1555519313]
+Cell[5223, 166, 255, 9, 40, "Output",
+ CellTags->"Power2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4539, 149, 166, 6, 27, "Input",
+Cell[5515, 180, 166, 6, 27, "Input",
CellTags->"Power2",
CellID->1450604516],
-Cell[4708, 157, 362, 14, 40, "Output",
- CellTags->"Power2",
- CellID->1786215167]
+Cell[5684, 188, 341, 13, 40, "Output",
+ CellTags->"Power2"]
}, Open ]]
}, Open ]],
-Cell[5097, 175, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6052, 205, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5165, 180, 270, 12, 31, "SeeAlsoSection",
+Cell[6120, 210, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5438, 194, 235, 9, 31, "Text",
- CellTags->"Power2",
- CellID->1979787947]
+Cell[6393, 224, 196, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5688, 206, 23, 0, 42, "FooterCell"]
+Cell[6604, 234, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerFactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerFactor.nb
index 938d04d6d..83c00c00b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerFactor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerFactor.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9308, 320]
-NotebookOptionsPosition[ 5823, 212]
-NotebookOutlinePosition[ 8339, 283]
-CellTagsIndexPosition[ 8226, 277]
+NotebookDataLength[ 10036, 339]
+NotebookOptionsPosition[ 6742, 240]
+NotebookOutlinePosition[ 9165, 307]
+CellTagsIndexPosition[ 9052, 301]
WindowTitle->PowerFactor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PowerFactor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PowerFactor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PowerSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PowerSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PowerFactor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PowerFactor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PowerFactor.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$122006],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PowerFactor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$212531],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PowerFactor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ PowerFactor.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PowerFactor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PowerFactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,7 +152,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->279825663],
+ CellID->2043088650],
Cell[CellGroupData[{
@@ -130,7 +162,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->289609349],
+ CellID->1399129809],
Cell[CellGroupData[{
@@ -147,12 +179,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["x", "a"], " ",
SuperscriptBox["y", "a"]}], TraditionalForm]], "Output",
- ImageSize->{43, 15},
+ ImageSize->{50, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PowerFactor",
- CellLabel->"Out[1]=",
- CellID->160369455]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +199,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", " ", "y"}], ")"}], "a"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{52, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PowerFactor",
- CellLabel->"Out[2]=",
- CellID->783402888]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -203,9 +233,7 @@ Cell[TextData[{
ButtonNote->"PowerSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PowerFactor",
- CellID->2043225141]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -222,20 +250,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 42.748910}",
+ "built" -> "{2020, 1, 5, 19, 0, 53.973564}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "PowerFactor[exp] replaces x^ay^awith (x y) a.",
- "synonyms" -> {}, "title" -> "PowerFactor", "titlemodifier" -> "",
- "windowtitle" -> "PowerFactor", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PowerFactor"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PowerFactor",
+ "titlemodifier" -> "", "windowtitle" -> "PowerFactor", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/PowerFactor"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -243,8 +271,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -253,75 +282,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3627, 107, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4628, 139, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->279825663]},
+ CellID->2043088650]},
"PowerFactor"->{
- Cell[4259, 136, 162, 6, 27, "Input",
+ Cell[5262, 168, 162, 6, 27, "Input",
CellTags->"PowerFactor",
CellID->1163522766],
- Cell[4424, 144, 285, 10, 36, "Output",
- CellTags->"PowerFactor",
- CellID->160369455],
- Cell[4746, 159, 133, 4, 27, "Input",
+ Cell[5427, 176, 265, 9, 37, "Output",
+ CellTags->"PowerFactor"],
+ Cell[5729, 190, 133, 4, 27, "Input",
CellTags->"PowerFactor",
CellID->485962359],
- Cell[4882, 165, 285, 10, 36, "Output",
- CellTags->"PowerFactor",
- CellID->783402888],
- Cell[5535, 198, 246, 9, 32, "Text",
- CellTags->"PowerFactor",
- CellID->2043225141]}
+ Cell[5865, 196, 265, 9, 37, "Output",
+ CellTags->"PowerFactor"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7609, 254},
- {"PowerFactor", 7747, 258}
+ {"PrimaryExamplesSection", 8570, 283},
+ {"PowerFactor", 8709, 287}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3025, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 701, 25, 84, "Usage",
+Cell[3611, 97, 288, 11, 45, "ObjectNameGrid"],
+Cell[3902, 110, 701, 25, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3627, 107, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4628, 139, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->279825663],
+ CellID->2043088650],
Cell[CellGroupData[{
-Cell[4039, 126, 195, 6, 25, "ExampleSection",
- CellID->289609349],
+Cell[5041, 158, 196, 6, 26, "ExampleSection",
+ CellID->1399129809],
Cell[CellGroupData[{
-Cell[4259, 136, 162, 6, 27, "Input",
+Cell[5262, 168, 162, 6, 27, "Input",
CellTags->"PowerFactor",
CellID->1163522766],
-Cell[4424, 144, 285, 10, 36, "Output",
- CellTags->"PowerFactor",
- CellID->160369455]
+Cell[5427, 176, 265, 9, 37, "Output",
+ CellTags->"PowerFactor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4746, 159, 133, 4, 27, "Input",
+Cell[5729, 190, 133, 4, 27, "Input",
CellTags->"PowerFactor",
CellID->485962359],
-Cell[4882, 165, 285, 10, 36, "Output",
- CellTags->"PowerFactor",
- CellID->783402888]
+Cell[5865, 196, 265, 9, 37, "Output",
+ CellTags->"PowerFactor"]
}, Open ]]
}, Open ]],
-Cell[5194, 179, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6157, 209, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5262, 184, 270, 12, 31, "SeeAlsoSection",
+Cell[6225, 214, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5535, 198, 246, 9, 32, "Text",
- CellTags->"PowerFactor",
- CellID->2043225141]
+Cell[6498, 228, 202, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5796, 210, 23, 0, 42, "FooterCell"]
+Cell[6715, 238, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerSimplify.nb
index 20e6ea9db..8a7846b51 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PowerSimplify.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14432, 510]
-NotebookOptionsPosition[ 9780, 369]
-NotebookOutlinePosition[ 13032, 457]
-CellTagsIndexPosition[ 12915, 451]
+NotebookDataLength[ 15094, 525]
+NotebookOptionsPosition[ 10722, 396]
+NotebookOutlinePosition[ 13834, 479]
+CellTagsIndexPosition[ 13717, 473]
WindowTitle->PowerSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PowerSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PowerSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"], "\<\"OPEm\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OPEi"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PowerSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PowerSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PowerSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$122341],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PowerSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$212966],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PowerSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ PowerSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PowerSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PowerSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -216,7 +249,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->192981915],
+ CellID->1388239057],
Cell[CellGroupData[{
@@ -226,7 +259,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->601132939],
+ CellID->889816326],
Cell[CellGroupData[{
@@ -243,12 +276,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PowerSimplify",
- CellLabel->"Out[1]=",
- CellID->1102382447]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -269,12 +301,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "m"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{47, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PowerSimplify",
- CellLabel->"Out[2]=",
- CellID->1909539921]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -295,12 +326,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "m"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{47, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PowerSimplify",
- CellLabel->"Out[3]=",
- CellID->2035038976]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -319,12 +349,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "m"], TraditionalForm]], "Output",
- ImageSize->{46, 15},
+ ImageSize->{47, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PowerSimplify",
- CellLabel->"Out[4]=",
- CellID->952797373]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -360,9 +389,7 @@ Cell[TextData[{
ButtonNote->"OPEm"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PowerSimplify",
- CellID->219988964]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -370,7 +397,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PowerSimplify",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -379,10 +406,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 44.262033}",
+ "built" -> "{2020, 1, 5, 19, 0, 55.190344}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -393,11 +420,12 @@ n (x - y) n; thus assuming that the exponent is an integer (even if it is \
symbolic). Furthermore (-1) a + n and I a + n are expanded and I 2 m -> (-1) \
m and (-1)^(n m) -> 1 and (-1)^(n m) -> TraditionalForm\\`(-1) m for n even \
and odd respectively and (-1) -n -> (-1) n and E Im\\[Pi] -> (-1) m.",
- "synonyms" -> {}, "title" -> "PowerSimplify", "titlemodifier" -> "",
- "windowtitle" -> "PowerSimplify", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PowerSimplify"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "PowerSimplify",
+ "titlemodifier" -> "", "windowtitle" -> "PowerSimplify", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/PowerSimplify"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -405,8 +433,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -415,103 +444,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[6200, 203, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7269, 236, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->192981915]},
+ CellID->1388239057]},
"PowerSimplify"->{
- Cell[6832, 232, 252, 9, 27, "Input",
+ Cell[7902, 265, 252, 9, 27, "Input",
CellTags->"PowerSimplify",
CellID->1178513781],
- Cell[7087, 243, 215, 7, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->1102382447],
- Cell[7339, 255, 257, 9, 27, "Input",
+ Cell[8157, 276, 194, 6, 35, "Output",
+ CellTags->"PowerSimplify"],
+ Cell[8388, 287, 257, 9, 27, "Input",
CellTags->"PowerSimplify",
CellID->1283744805],
- Cell[7599, 266, 283, 10, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->1909539921],
- Cell[7919, 281, 256, 9, 27, "Input",
+ Cell[8648, 298, 262, 9, 37, "Output",
+ CellTags->"PowerSimplify"],
+ Cell[8947, 312, 256, 9, 27, "Input",
CellTags->"PowerSimplify",
CellID->604286428],
- Cell[8178, 292, 283, 10, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->2035038976],
- Cell[8498, 307, 208, 7, 27, "Input",
+ Cell[9206, 323, 262, 9, 37, "Output",
+ CellTags->"PowerSimplify"],
+ Cell[9505, 337, 208, 7, 27, "Input",
CellTags->"PowerSimplify",
CellID->1089003122],
- Cell[8709, 316, 282, 10, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->952797373],
- Cell[9359, 349, 379, 15, 32, "Text",
- CellTags->"PowerSimplify",
- CellID->219988964]}
+ Cell[9716, 346, 262, 9, 37, "Output",
+ CellTags->"PowerSimplify"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11910, 416},
- {"PowerSimplify", 12050, 420}
+ {"PrimaryExamplesSection", 12897, 445},
+ {"PowerSimplify", 13038, 449}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3101, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 3262, 121, 145, "Usage",
+Cell[3689, 98, 290, 11, 45, "ObjectNameGrid"],
+Cell[3982, 111, 3262, 121, 144, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[6200, 203, 387, 15, 31, "PrimaryExamplesSection",
+Cell[7269, 236, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->192981915],
+ CellID->1388239057],
Cell[CellGroupData[{
-Cell[6612, 222, 195, 6, 25, "ExampleSection",
- CellID->601132939],
+Cell[7682, 255, 195, 6, 26, "ExampleSection",
+ CellID->889816326],
Cell[CellGroupData[{
-Cell[6832, 232, 252, 9, 27, "Input",
+Cell[7902, 265, 252, 9, 27, "Input",
CellTags->"PowerSimplify",
CellID->1178513781],
-Cell[7087, 243, 215, 7, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->1102382447]
+Cell[8157, 276, 194, 6, 35, "Output",
+ CellTags->"PowerSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7339, 255, 257, 9, 27, "Input",
+Cell[8388, 287, 257, 9, 27, "Input",
CellTags->"PowerSimplify",
CellID->1283744805],
-Cell[7599, 266, 283, 10, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->1909539921]
+Cell[8648, 298, 262, 9, 37, "Output",
+ CellTags->"PowerSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7919, 281, 256, 9, 27, "Input",
+Cell[8947, 312, 256, 9, 27, "Input",
CellTags->"PowerSimplify",
CellID->604286428],
-Cell[8178, 292, 283, 10, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->2035038976]
+Cell[9206, 323, 262, 9, 37, "Output",
+ CellTags->"PowerSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8498, 307, 208, 7, 27, "Input",
+Cell[9505, 337, 208, 7, 27, "Input",
CellTags->"PowerSimplify",
CellID->1089003122],
-Cell[8709, 316, 282, 10, 36, "Output",
- CellTags->"PowerSimplify",
- CellID->952797373]
+Cell[9716, 346, 262, 9, 37, "Output",
+ CellTags->"PowerSimplify"]
}, Open ]]
}, Open ]],
-Cell[9018, 330, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10005, 359, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9086, 335, 270, 12, 31, "SeeAlsoSection",
+Cell[10073, 364, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9359, 349, 379, 15, 32, "Text",
- CellTags->"PowerSimplify",
- CellID->219988964]
+Cell[10346, 378, 334, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[9753, 367, 23, 0, 42, "FooterCell"]
+Cell[10695, 394, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PreFortranFile.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PreFortranFile.nb
index 0f0bbc5c4..8de6c4342 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PreFortranFile.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PreFortranFile.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6498, 196]
-NotebookOptionsPosition[ 4147, 129]
-NotebookOutlinePosition[ 6231, 185]
-CellTagsIndexPosition[ 6155, 180]
+NotebookDataLength[ 7321, 218]
+NotebookOptionsPosition[ 5188, 160]
+NotebookOutlinePosition[ 7113, 210]
+CellTagsIndexPosition[ 7070, 207]
WindowTitle->PreFortranFile
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PreFortranFile\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PreFortranFile"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Write2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Write2"], "\<\"PostFortranFile\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PostFortranFile"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PreFortranFile\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PreFortranFile"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PreFortranFile.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$123025],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PreFortranFile", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$213848],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PreFortranFile", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ PreFortranFile.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PreFortranFile", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PreFortranFile", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,9 +153,7 @@ Cell[TextData[{
ButtonNote->"PostFortranFile"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PreFortranFile",
- CellID->659690590]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -139,10 +170,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 46.975244}",
+ "built" -> "{2020, 1, 5, 19, 0, 57.423750}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -150,11 +181,12 @@ TaggingRules->{
"None", "summary" ->
"PreFortranFile is an option for Write2 which may be set to a file name \
(or a list of file names) or a string, which will be put at the beginning of \
-the generated Fortran file.", "synonyms" -> {}, "title" -> "PreFortranFile",
- "titlemodifier" -> "", "windowtitle" -> "PreFortranFile", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/PreFortranFile"}},
+the generated Fortran file.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PreFortranFile", "titlemodifier" -> "", "windowtitle" ->
+ "PreFortranFile", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/PreFortranFile"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -163,41 +195,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PreFortranFile"->{
- Cell[3698, 109, 407, 15, 70, "Text",
- CellTags->"PreFortranFile",
- CellID->659690590]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PreFortranFile", 6038, 173}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3123, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 481, 13, 70, "Usage",
+Cell[3712, 98, 291, 11, 70, "ObjectNameGrid"],
+Cell[4006, 111, 481, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3425, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4512, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3698, 109, 407, 15, 70, "Text",
- CellTags->"PreFortranFile",
- CellID->659690590]
+Cell[4785, 142, 361, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4120, 127, 23, 0, 70, "FooterCell"]
+Cell[5161, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Prefactor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Prefactor.nb
index 9b79476b2..5c7fcb09a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Prefactor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Prefactor.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6539, 198]
-NotebookOptionsPosition[ 4163, 130]
-NotebookOutlinePosition[ 6276, 187]
-CellTagsIndexPosition[ 6205, 182]
+NotebookDataLength[ 7371, 219]
+NotebookOptionsPosition[ 5200, 161]
+NotebookOutlinePosition[ 7163, 211]
+CellTagsIndexPosition[ 7120, 208]
WindowTitle->Prefactor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Prefactor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Prefactor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Prefactor.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Prefactor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Prefactor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Prefactor.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$122679],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Prefactor", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$213404],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Prefactor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Prefactor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Prefactor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -121,9 +154,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Prefactor",
- CellID->1510913655]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -140,10 +171,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 45.804534}",
+ "built" -> "{2020, 1, 5, 19, 0, 56.437828}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -152,11 +183,11 @@ TaggingRules->{
"Prefactor is an option for OneLoop and OneLoopSum. If set as option of \
OneLoop, the amplitude is multiplied by Prefactor before calculation; if \
specified as option of OneLoopSum, after calculation in the final result as a \
-global factor.", "synonyms" -> {}, "title" -> "Prefactor", "titlemodifier" ->
- "", "windowtitle" -> "Prefactor", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Prefactor"}},
+global factor.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Prefactor",
+ "titlemodifier" -> "", "windowtitle" -> "Prefactor", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Prefactor"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -165,41 +196,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Prefactor"->{
- Cell[3730, 110, 391, 15, 70, "Text",
- CellTags->"Prefactor",
- CellID->1510913655]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Prefactor", 6092, 175}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2249, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3094, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2833, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2888, 78, 544, 14, 70, "Usage",
+Cell[3678, 98, 286, 11, 70, "ObjectNameGrid"],
+Cell[3967, 111, 544, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3457, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4536, 129, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3730, 110, 391, 15, 70, "Text",
- CellTags->"Prefactor",
- CellID->1510913655]
+Cell[4809, 143, 349, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4136, 128, 23, 0, 70, "FooterCell"]
+Cell[5173, 159, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominator.nb
index 729a12906..c56045671 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominator.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15845, 540]
-NotebookOptionsPosition[ 9636, 352]
-NotebookOutlinePosition[ 13608, 460]
-CellTagsIndexPosition[ 13483, 454]
+NotebookDataLength[ 11533, 366]
+NotebookOptionsPosition[ 8105, 270]
+NotebookOutlinePosition[ 10710, 337]
+CellTagsIndexPosition[ 10585, 331]
WindowTitle->PropagatorDenominator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/PropagatorDenominator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PropagatorDenominator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynAmpDenominator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominator"], \
+"\<\"FeynAmpDenominatorExplicit\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynAmpDenominatorExplicit"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/PropagatorDenominator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/PropagatorDenominator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
PropagatorDenominator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$123709],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PropagatorDenominator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$214292],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/PropagatorDenominator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,29 +98,30 @@ PropagatorDenominator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["PropagatorDenominator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["PropagatorDenominator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"PropagatorDenominator", "[",
- RowBox[{"q", ",", " ", "m"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a factor of the denominator of a propagator. If p is supposed to be \
-D-dimensional enter: PropagatorDenominator[Momentum[q, D], m]. What is meant \
-is ",
- Cell[BoxData[
- FormBox[
- RowBox[{" ",
- RowBox[{"1", "/",
- RowBox[{"(",
- RowBox[{"q", "^", "2"}]}]}]}], TraditionalForm]]],
- " - ",
- Cell[BoxData[
- FormBox[
- RowBox[{"m", "^", "2"}], TraditionalForm]]],
- "). PropagatorDenominator[p] evaluates to PropagatorDenominator[p, 0]. "
+ RowBox[{
+ RowBox[{"Momentum", "[", "q", "]"}], ",", " ", "m"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator] is a factor of the denominator of a propagator. If q \
+is supposed to be D-dimensional, use PropagatorDenominator[Momentum[q, D], \
+m]. What is meant is 1/(q^2-m^2). PropagatorDenominator must appear inside \
+FeynAmpDenominator, it is not a standalone object."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -121,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1470919898],
+ CellID->1600014743],
Cell[CellGroupData[{
@@ -131,14 +157,17 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2052018641],
+ CellID->1515559240],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{" ",
- RowBox[{"PropagatorDenominator", "[",
- RowBox[{"p", ",", "m"}], "]"}]}]], "Input",
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"PropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}], "]"}]}]], "Input",\
+
CellTags->"PropagatorDenominator",
CellLabel->"In[1]:=",
CellID->158185315],
@@ -146,163 +175,60 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["1",
- RowBox[{
- SuperscriptBox["p", "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{64, 47},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominator",
- CellLabel->"Out[1]=",
- CellID->442450206]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"PropagatorDenominator", "[", "p", "]"}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[2]:=",
- CellID->498222960],
-
-Cell[BoxData[
- FormBox[
- FractionBox["1",
- SuperscriptBox["p", "2"]], TraditionalForm]], "Output",
- ImageSize->{27, 47},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p],
+ FeynCalc`Momentum[$CellContext`p]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{63, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"PropagatorDenominator",
- CellLabel->"Out[2]=",
- CellID->1576931809]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
+ RowBox[{"FeynAmpDenominator", "[",
RowBox[{"PropagatorDenominator", "[",
- RowBox[{"q", ",", "m"}], "]"}], " "}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[3]:=",
- CellID->1389901751],
-
-Cell[BoxData[
- FormBox[
- FractionBox["1",
RowBox[{
- SuperscriptBox["q", "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{63, 47},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominator",
- CellLabel->"Out[3]=",
- CellID->298016951]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FCI", "[", "t1", "]"}], "]"}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[4]:=",
- CellID->2126879083],
-
-Cell[BoxData[
- RowBox[{"PropagatorDenominator", "[",
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"q", ",", "D"}], "]"}], ",", "m"}], "]"}]], "Output",
- ImageSize->{328, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominator",
- CellLabel->"Out[4]//StandardForm=",
- CellID->537265154]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"ChangeDimension", "[",
- RowBox[{"t1", ",", "D"}], "]"}], "]"}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[5]:=",
- CellID->678156808],
-
-Cell[BoxData[
- RowBox[{"PropagatorDenominator", "[",
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"q", ",", "D"}], "]"}], ",", "m"}], "]"}]], "Output",
- ImageSize->{328, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominator",
- CellLabel->"Out[5]//StandardForm=",
- CellID->2020025200]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"PropagatorDenominatorExplicit", "[", "t1", "]"}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[6]:=",
- CellID->253071892],
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "m"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{64, 47},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominator",
- CellLabel->"Out[6]=",
- CellID->1114450386]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[7]:=",
- CellID->1713457301],
-
-Cell[BoxData[
- FractionBox["1",
- RowBox[{
- RowBox[{"-",
- SuperscriptBox["m", "2"]}], "+",
- RowBox[{"Pair", "[",
+ InterpretationBox[
RowBox[{
- RowBox[{"Momentum", "[", "q", "]"}], ",",
- RowBox[{"Momentum", "[", "q", "]"}]}], "]"}]}]]], "Output",
- ImageSize->{296, 42},
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{61, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominator",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1426276777]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[", "t1", "]"}]], "Input",
- CellTags->"PropagatorDenominator",
- CellLabel->"In[8]:=",
- CellID->598061343]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -331,29 +257,21 @@ Cell[TextData[{
ButtonNote->"FeynAmpDenominator"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["PropagatorDenominatorExplicit",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/PropagatorDenominatorExplicit",
- ButtonNote->"PropagatorDenominatorExplicit"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["IFPD",
+ StyleBox[ButtonBox["FeynAmpDenominatorExplicit",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/IFPD",
- ButtonNote->"IFPD"],
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominatorExplicit",
+ ButtonNote->"FeynAmpDenominatorExplicit"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"PropagatorDenominator",
- CellID->1480042296]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"PropagatorDenominator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -362,24 +280,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 49.708355}",
+ "built" -> "{2020, 1, 5, 19, 0, 58.250628}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "PropagatorDenominator[q, m] is a factor of the denominator of a \
-propagator. If p is supposed to be D-dimensional enter: \
-PropagatorDenominator[Momentum[q, D], m]. What is meant is 1/(q^2 - m^2). \
-PropagatorDenominator[p] evaluates to PropagatorDenominator[p, 0]. ",
- "synonyms" -> {}, "title" -> "PropagatorDenominator", "titlemodifier" ->
- "", "windowtitle" -> "PropagatorDenominator", "type" -> "Symbol", "uri" ->
+ "PropagatorDenominator[Momentum[q], m] is a factor of the denominator of \
+a propagator. If q is supposed to be D-dimensional, use \
+PropagatorDenominator[Momentum[q, D], m]. What is meant is 1/(q^2-m^2). \
+PropagatorDenominator must appear inside FeynAmpDenominator, it is not a \
+standalone object.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "PropagatorDenominator", "titlemodifier" -> "", "windowtitle" ->
+ "PropagatorDenominator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/PropagatorDenominator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -387,8 +306,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -397,151 +317,57 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3873, 108, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4817, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1470919898]},
+ CellID->1600014743]},
"PropagatorDenominator"->{
- Cell[4507, 137, 195, 6, 27, "Input",
+ Cell[5451, 163, 282, 9, 27, "Input",
CellTags->"PropagatorDenominator",
CellID->158185315],
- Cell[4705, 145, 319, 11, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->442450206],
- Cell[5061, 161, 153, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->498222960],
- Cell[5217, 167, 269, 9, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->1576931809],
- Cell[5523, 181, 207, 6, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->1389901751],
- Cell[5733, 189, 319, 11, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->298016951],
- Cell[6089, 205, 176, 5, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->2126879083],
- Cell[6268, 212, 340, 10, 49, "Output",
- CellTags->"PropagatorDenominator",
- CellID->537265154],
- Cell[6645, 227, 211, 6, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->678156808],
- Cell[6859, 235, 341, 10, 49, "Output",
- CellTags->"PropagatorDenominator",
- CellID->2020025200],
- Cell[7237, 250, 162, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->253071892],
- Cell[7402, 256, 427, 16, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->1114450386],
- Cell[7866, 277, 145, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->1713457301],
- Cell[8014, 283, 431, 14, 76, "Output",
- CellTags->"PropagatorDenominator",
- CellID->1426276777],
- Cell[8460, 300, 138, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->598061343],
- Cell[8954, 326, 640, 21, 32, "Text",
- CellTags->"PropagatorDenominator",
- CellID->1480042296]}
+ Cell[5736, 174, 660, 22, 61, "Output",
+ CellTags->"PropagatorDenominator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11689, 398},
- {"PropagatorDenominator", 11838, 402}
+ {"PrimaryExamplesSection", 10232, 318},
+ {"PropagatorDenominator", 10381, 322}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2298, 52, 51, "AnchorBarGrid",
+Cell[593, 21, 3207, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2894, 75, 64, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2961, 78, 887, 26, 116, "Usage",
+Cell[3803, 100, 298, 11, 45, "ObjectNameGrid"],
+Cell[4104, 113, 688, 17, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3873, 108, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4817, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1470919898],
+ CellID->1600014743],
Cell[CellGroupData[{
-Cell[4286, 127, 196, 6, 25, "ExampleSection",
- CellID->2052018641],
+Cell[5230, 153, 196, 6, 26, "ExampleSection",
+ CellID->1515559240],
Cell[CellGroupData[{
-Cell[4507, 137, 195, 6, 27, "Input",
+Cell[5451, 163, 282, 9, 27, "Input",
CellTags->"PropagatorDenominator",
CellID->158185315],
-Cell[4705, 145, 319, 11, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->442450206]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5061, 161, 153, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->498222960],
-Cell[5217, 167, 269, 9, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->1576931809]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5523, 181, 207, 6, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->1389901751],
-Cell[5733, 189, 319, 11, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->298016951]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6089, 205, 176, 5, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->2126879083],
-Cell[6268, 212, 340, 10, 49, "Output",
- CellTags->"PropagatorDenominator",
- CellID->537265154]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6645, 227, 211, 6, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->678156808],
-Cell[6859, 235, 341, 10, 49, "Output",
- CellTags->"PropagatorDenominator",
- CellID->2020025200]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7237, 250, 162, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->253071892],
-Cell[7402, 256, 427, 16, 68, "Output",
- CellTags->"PropagatorDenominator",
- CellID->1114450386]
+Cell[5736, 174, 660, 22, 61, "Output",
+ CellTags->"PropagatorDenominator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7866, 277, 145, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->1713457301],
-Cell[8014, 283, 431, 14, 76, "Output",
- CellTags->"PropagatorDenominator",
- CellID->1426276777]
-}, Open ]],
-Cell[8460, 300, 138, 4, 27, "Input",
- CellTags->"PropagatorDenominator",
- CellID->598061343]
+Cell[6433, 201, 229, 6, 27, "Input"],
+Cell[6665, 209, 600, 20, 61, "Output"]
+}, Open ]]
}, Open ]],
-Cell[8613, 307, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7292, 233, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8681, 312, 270, 12, 31, "SeeAlsoSection",
+Cell[7360, 238, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[8954, 326, 640, 21, 32, "Text",
- CellTags->"PropagatorDenominator",
- CellID->1480042296]
+Cell[7633, 252, 430, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[9609, 350, 23, 0, 42, "FooterCell"]
+Cell[8078, 268, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominatorExplicit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominatorExplicit.nb
deleted file mode 100644
index daa2fb995..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/PropagatorDenominatorExplicit.nb
+++ /dev/null
@@ -1,440 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12822, 430]
-NotebookOptionsPosition[ 8440, 304]
-NotebookOutlinePosition[ 11518, 385]
-CellTagsIndexPosition[ 11385, 379]
-WindowTitle->PropagatorDenominatorExplicit
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->
- False], {"\<\"FeynCalc/ref/PropagatorDenominatorExplicit\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/PropagatorDenominatorExplicit"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-PropagatorDenominatorExplicit.html"], StandardForm]], "Input",
- TextClipboardType -> "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$123371],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/PropagatorDenominatorExplicit", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["PropagatorDenominatorExplicit", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"PropagatorDenominatorExplicit", "[", "exp", "]"}]],
- "InlineFormula"],
- " \[LineSeparator]",
- "changes each occurence of PropagatorDenominator[a,b] in exp into \
-1/(ScalarProduct[a,a]-b^2) and replaces FeynAmpDenominator by Identity."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1349282833],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->178136284],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"FAD", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"q", ",", "m"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"q", "-", "p"}], ",", "0"}], "}"}]}], "]"}], "//",
- "FCI"}]], "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellLabel->"In[1]:=",
- CellID->1979434489],
-
-Cell[BoxData[
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{134, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominatorExplicit",
- CellLabel->"Out[1]=",
- CellID->184591534]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"PropagatorDenominatorExplicit", "[", "%", "]"}], "//",
- "FCE"}]], "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellLabel->"In[2]:=",
- CellID->1414487344],
-
-Cell[BoxData[
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- RowBox[{"2", " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}]}]}], "+",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"],
- TraditionalForm], "+",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm], "2"],
- TraditionalForm]}], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{219, 48},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominatorExplicit",
- CellLabel->"Out[2]=",
- CellID->1018418607]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellLabel->"In[3]:=",
- CellID->1009314577],
-
-Cell[BoxData[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- SuperscriptBox["m", "2"]}], "+",
- RowBox[{"SPD", "[",
- RowBox[{"q", ",", "q"}], "]"}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"SPD", "[",
- RowBox[{"p", ",", "p"}], "]"}], "-",
- RowBox[{"2", " ",
- RowBox[{"SPD", "[",
- RowBox[{"p", ",", "q"}], "]"}]}], "+",
- RowBox[{"SPD", "[",
- RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}]]], "Output",
- ImageSize->{417, 42},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"PropagatorDenominatorExplicit",
- CellLabel->"Out[3]//StandardForm=",
- CellID->2031191550]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["FeynAmpDenominator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator",
- ButtonNote->"FeynAmpDenominator"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["PropagatorDenominator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/PropagatorDenominator",
- ButtonNote->"PropagatorDenominator"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->413051005]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"PropagatorDenominatorExplicit",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 48.216831}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "PropagatorDenominatorExplicit[exp] changes each occurence of \
-PropagatorDenominator[a,b] in exp into 1/(ScalarProduct[a,a]-b^2) and \
-replaces FeynAmpDenominator by Identity.", "synonyms" -> {}, "title" ->
- "PropagatorDenominatorExplicit", "titlemodifier" -> "", "windowtitle" ->
- "PropagatorDenominatorExplicit", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/PropagatorDenominatorExplicit"}, "SearchTextTranslated" ->
- ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3567, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1349282833]},
- "PropagatorDenominatorExplicit"->{
- Cell[4200, 127, 326, 12, 27, "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1979434489],
- Cell[4529, 141, 588, 22, 69, "Output",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->184591534],
- Cell[5154, 168, 199, 6, 27, "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1414487344],
- Cell[5356, 176, 1323, 51, 69, "Output",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1018418607],
- Cell[6716, 232, 149, 4, 27, "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1009314577],
- Cell[6868, 238, 686, 23, 76, "Output",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->2031191550],
- Cell[7922, 284, 476, 15, 32, "Text",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->413051005]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 10436, 350},
- {"PropagatorDenominatorExplicit", 10592, 354}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[601, 21, 2352, 54, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2956, 77, 72, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[3031, 80, 511, 14, 98, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3567, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1349282833],
-Cell[CellGroupData[{
-Cell[3980, 117, 195, 6, 25, "ExampleSection",
- CellID->178136284],
-Cell[CellGroupData[{
-Cell[4200, 127, 326, 12, 27, "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1979434489],
-Cell[4529, 141, 588, 22, 69, "Output",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->184591534]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5154, 168, 199, 6, 27, "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1414487344],
-Cell[5356, 176, 1323, 51, 69, "Output",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1018418607]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6716, 232, 149, 4, 27, "Input",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->1009314577],
-Cell[6868, 238, 686, 23, 76, "Output",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->2031191550]
-}, Open ]]
-}, Open ]],
-Cell[7581, 265, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7649, 270, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[7922, 284, 476, 15, 32, "Text",
- CellTags->"PropagatorDenominatorExplicit",
- CellID->413051005]
-}, Open ]],
-Cell[8413, 302, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QCDFeynmanRuleConvention.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QCDFeynmanRuleConvention.nb
new file mode 100644
index 000000000..684f1a03a
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QCDFeynmanRuleConvention.nb
@@ -0,0 +1,619 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16989, 609]
+NotebookOptionsPosition[ 12937, 484]
+NotebookOutlinePosition[ 15136, 542]
+CellTagsIndexPosition[ 15051, 537]
+WindowTitle->QCDFeynmanRuleConvention
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonGhostVertex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonGhostVertex"], "\<\"GhostPropagator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GhostPropagator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/QCDFeynmanRuleConvention\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QCDFeynmanRuleConvention"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+QCDFeynmanRuleConvention.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$214744],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QCDFeynmanRuleConvention", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["QCDFeynmanRuleConvention", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["QCDFeynmanRuleConvention"], "InlineFormula"],
+ " \[LineSeparator]fixes the sign convention in the QCD Feynman rules for \
+the ghost propagator and the ghost-gluon vertex."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->752835657],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "This is done by setting the value of ",
+ Cell[BoxData[
+ RowBox[{"QCDFeynmanRuleConvention", "[", "GhostPropagator", "]"}]],
+ "InlineFormula"],
+ " \nand ",
+ Cell[BoxData[
+ RowBox[{"QCDFeynmanRuleConvention", "[", "GluonGhostVertex", "]"}]],
+ "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->879734618],
+
+Cell["\<\
+The default values are 1 for both, which corresponds to the convention used \
+in most books. \
+\>", "Notes",
+ CellID->1067943069],
+
+Cell["\<\
+Setting them to -1 enforces the convention that can be found e.g. in the book \
+\"Applications of Perturbative QCD\" by R. Field.\
+\>", "Notes",
+ CellID->1840666987]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->807955020],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1951505576],
+
+Cell["\<\
+Enforce the convention as in \"Applications of Perturbative QCD\" by R. Field.\
+\>", "Notes",
+ CellID->803209126],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"QCDFeynmanRuleConvention", "[", "GhostPropagator", "]"}], "=",
+ RowBox[{"-", "1"}]}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"QCDFeynmanRuleConvention", "[", "GluonGhostVertex", "]"}], "=",
+ RowBox[{"-", "1"}]}], ";"}]}], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1106838633],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"GHP", "[",
+ RowBox[{"p", ",", "a", ",", "b"}], "]"}], "//",
+ "Explicit"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"GGV", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}], "//",
+ "Explicit"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->324395928],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]]}], TraditionalForm]], "Output",
+ ImageSize->{60, 44},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1640395952],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{94, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->439123559]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->93244301],
+
+Cell["Back to the standard convention.", "Notes",
+ CellID->1490697563],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"QCDFeynmanRuleConvention", "[", "GhostPropagator", "]"}], "=",
+ "1"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"QCDFeynmanRuleConvention", "[", "GluonGhostVertex", "]"}], "=",
+ "1"}]}], "Input",
+ CellLabel->"In[1]:=",
+ CellID->465790131],
+
+Cell[BoxData[
+ FormBox["1", TraditionalForm]], "Output",
+ ImageSize->{11, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1889181831],
+
+Cell[BoxData[
+ FormBox["1", TraditionalForm]], "Output",
+ ImageSize->{11, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1408422653]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"GHP", "[",
+ RowBox[{"p", ",", "a", ",", "b"}], "]"}], "//",
+ "Explicit"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"GGV", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}], "//",
+ "Explicit"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1471525816],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{49, 44},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->949693572],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], ")"}], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{117, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->292726559]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["GluonGhostVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GluonGhostVertex",
+ ButtonNote->"GluonGhostVertex"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["GhostPropagator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GhostPropagator",
+ ButtonNote->"GhostPropagator"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->1235706309]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"QCDFeynmanRuleConvention",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 0, 59.467690}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "QCDFeynmanRuleConvention fixes the sign convention in the QCD Feynman \
+rules for the ghost propagator and the ghost-gluon vertex.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "QCDFeynmanRuleConvention",
+ "titlemodifier" -> "", "windowtitle" -> "QCDFeynmanRuleConvention",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/QCDFeynmanRuleConvention"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6052, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->807955020]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 14908, 530}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[596, 21, 3215, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3814, 101, 301, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4140, 116, 423, 11, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4588, 131, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->752835657],
+Cell[5329, 157, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5363, 159, 320, 11, 70, "Notes",
+ CellID->879734618],
+Cell[5686, 172, 139, 4, 70, "Notes",
+ CellID->1067943069],
+Cell[5828, 178, 175, 4, 70, "Notes",
+ CellID->1840666987]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6052, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->807955020],
+Cell[CellGroupData[{
+Cell[6464, 207, 196, 6, 26, "ExampleSection",
+ CellID->1951505576],
+Cell[6663, 215, 123, 3, 32, "Notes",
+ CellID->803209126],
+Cell[6789, 220, 352, 10, 45, "Input",
+ CellID->1106838633],
+Cell[CellGroupData[{
+Cell[7166, 234, 490, 16, 45, "Input",
+ CellID->324395928],
+Cell[7659, 252, 780, 30, 65, "Output",
+ CellID->1640395952],
+Cell[8442, 284, 703, 31, 40, "Output",
+ CellID->439123559]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9182, 320, 124, 3, 9, "ExampleDelimiter",
+ CellID->93244301],
+Cell[9309, 325, 70, 1, 32, "Notes",
+ CellID->1490697563],
+Cell[CellGroupData[{
+Cell[9404, 330, 281, 8, 45, "Input",
+ CellID->465790131],
+Cell[9688, 340, 187, 6, 35, "Output",
+ CellID->1889181831],
+Cell[9878, 348, 187, 6, 35, "Output",
+ CellID->1408422653]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10102, 359, 491, 16, 45, "Input",
+ CellID->1471525816],
+Cell[10596, 377, 738, 29, 65, "Output",
+ CellID->949693572],
+Cell[11337, 408, 766, 33, 43, "Output",
+ CellID->292726559]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[12142, 446, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12210, 451, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[12483, 465, 412, 14, 56, "SeeAlso",
+ CellID->1235706309]
+}, Open ]],
+Cell[12910, 482, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QGV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QGV.nb
index d9fbcd62b..259f510a0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QGV.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QGV.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5906, 185]
-NotebookOptionsPosition[ 3791, 121]
-NotebookOutlinePosition[ 5651, 174]
-CellTagsIndexPosition[ 5586, 169]
+NotebookDataLength[ 6691, 206]
+NotebookOptionsPosition[ 4750, 151]
+NotebookOutlinePosition[ 6484, 198]
+CellTagsIndexPosition[ 6441, 195]
WindowTitle->QGV
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QGV\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QGV"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/QGV.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$124057],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/QGV",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"QuarkGluonVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuarkGluonVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QGV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QGV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/QGV.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$215188],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/QGV",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QGV", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QGV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"QuarkGluonVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QGV",
- CellID->625072103]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 51.190659}",
+ "built" -> "{2020, 1, 5, 19, 1, 0.579914}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "QGV is equivalent to QuarkGluonVertex.",
- "synonyms" -> {}, "title" -> "QGV", "titlemodifier" -> "", "windowtitle" ->
- "QGV", "type" -> "Symbol", "uri" -> "FeynCalc/ref/QGV"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QGV", "titlemodifier" ->
+ "", "windowtitle" -> "QGV", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/QGV"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "QGV"->{
- Cell[3503, 107, 246, 9, 70, "Text",
- CellTags->"QGV",
- CellID->625072103]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"QGV", 5481, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2998, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 340, 11, 70, "Usage",
+Cell[3576, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3859, 110, 340, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3230, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4224, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3503, 107, 246, 9, 70, "Text",
- CellTags->"QGV",
- CellID->625072103]
+Cell[4497, 139, 211, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3764, 119, 23, 0, 70, "FooterCell"]
+Cell[4723, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QO.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QO.nb
index 6dca060f9..76d4df89f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QO.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QO.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5907, 185]
-NotebookOptionsPosition[ 3796, 121]
-NotebookOutlinePosition[ 5652, 174]
-CellTagsIndexPosition[ 5588, 169]
+NotebookDataLength[ 6714, 206]
+NotebookOptionsPosition[ 4775, 151]
+NotebookOutlinePosition[ 6507, 198]
+CellTagsIndexPosition[ 6464, 195]
WindowTitle->QO
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QO\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QO"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/QO.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$124407],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/QO",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2QuarkOperator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2QuarkOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QO\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QO"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/QO.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$215636],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/QO",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QO", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QO", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"Twist2QuarkOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QO",
- CellID->1788859244]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 52.395527}",
+ "built" -> "{2020, 1, 5, 19, 1, 1.713084}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "QO is equivalent to Twist2QuarkOperator.",
- "synonyms" -> {}, "title" -> "QO", "titlemodifier" -> "", "windowtitle" ->
- "QO", "type" -> "Symbol", "uri" -> "FeynCalc/ref/QO"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QO", "titlemodifier" ->
+ "", "windowtitle" -> "QO", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/QO"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "QO"->{
- Cell[3499, 107, 255, 9, 70, "Text",
- CellTags->"QO",
- CellID->1788859244]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"QO", 5483, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3014, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 342, 11, 70, "Usage",
+Cell[3591, 97, 279, 11, 70, "ObjectNameGrid"],
+Cell[3873, 110, 342, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3226, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4240, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3499, 107, 255, 9, 70, "Text",
- CellTags->"QO",
- CellID->1788859244]
+Cell[4513, 139, 220, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3769, 119, 23, 0, 70, "FooterCell"]
+Cell[4748, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QP.nb
index ff6a52e8a..12ce47de0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QP.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6072, 188]
-NotebookOptionsPosition[ 3871, 122]
-NotebookOutlinePosition[ 5818, 177]
-CellTagsIndexPosition[ 5754, 172]
+NotebookDataLength[ 6324, 200]
+NotebookOptionsPosition[ 4146, 134]
+NotebookOutlinePosition[ 6083, 190]
+CellTagsIndexPosition[ 6019, 185]
WindowTitle->QP
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$124757],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$216083],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/QP",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,14 +117,15 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
+Cell[RawData["\<\
Cell[TextData[{
- StyleBox[ButtonBox["QuarkPropagator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/QuarkPropagator",
- ButtonNote->"QuarkPropagator"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
+ ButtonBox[\"QuarkPropagator\",
+ BaseStyle->\"Link\",
+ ButtonData:>\"paclet:FeynCalc/ref/QuarkPropagator\",
+ ButtonNote->\"QuarkPropagator\"],
+ \".\"
+}], \"SeeAlso\"]\
+\>"], "Text",
CellTags->"QP",
CellID->218226034]
}, Open ]],
@@ -132,10 +144,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 53.608891}",
+ "built" -> "{2020, 1, 5, 19, 1, 2.558030}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -143,10 +155,11 @@ TaggingRules->{
"None", "summary" ->
"QP is an alias for QuarkPropagator. QP[p] is the massless quark \
propagator. QP[{p,m}] gives the quark propagator with mass m.",
- "synonyms" -> {}, "title" -> "QP", "titlemodifier" -> "", "windowtitle" ->
- "QP", "type" -> "Symbol", "uri" -> "FeynCalc/ref/QP"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QP", "titlemodifier" ->
+ "", "windowtitle" -> "QP", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/QP"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,7 +168,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -164,32 +177,31 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"QP"->{
- Cell[3587, 108, 242, 9, 70, "Text",
+ Cell[3849, 119, 255, 10, 70, "Text",
CellTags->"QP",
CellID->218226034]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"QP", 5650, 165}
+ {"QP", 5914, 178}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 2262, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 430, 12, 70, "Usage",
+Cell[2839, 76, 279, 11, 70, "ObjectNameGrid"],
+Cell[3121, 89, 430, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3314, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[3576, 105, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3587, 108, 242, 9, 70, "Text",
+Cell[3849, 119, 255, 10, 70, "Text",
CellTags->"QP",
CellID->218226034]
}, Open ]],
-Cell[3844, 120, 23, 0, 70, "FooterCell"]
+Cell[4119, 132, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuantumField.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuantumField.nb
index abd486b06..b46a128e3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuantumField.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuantumField.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 23422, 863]
-NotebookOptionsPosition[ 14293, 561]
-NotebookOutlinePosition[ 19666, 720]
-CellTagsIndexPosition[ 19550, 714]
+NotebookDataLength[ 22624, 819]
+NotebookOptionsPosition[ 14976, 577]
+NotebookOutlinePosition[ 19468, 704]
+CellTagsIndexPosition[ 19352, 698]
WindowTitle->QuantumField
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QuantumField\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QuantumField"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynRule\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynRule"], "\<\"FCPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCPartialD"], "\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ExpandPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuantumField\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuantumField"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
QuantumField.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$125113],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/QuantumField", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$216532],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuantumField", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ QuantumField.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QuantumField", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QuantumField", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1441027904],
+ CellID->1519740058],
Cell[CellGroupData[{
@@ -122,11 +157,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->71990275],
+ CellID->1271161724],
-Cell["This denotes a scalar field.", "Text",
- CellTags->"QuantumField",
- CellID->173552947],
+Cell["This denotes a scalar field.", "Notes"],
Cell[CellGroupData[{
@@ -138,12 +171,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["S", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{16, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[1]=",
- CellID->2038740597]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -157,12 +189,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
OverscriptBox["\[Psi]", "_"], TraditionalForm]], "Output",
- ImageSize->{17, 15},
+ ImageSize->{16, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[2]=",
- CellID->2083488651]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -175,17 +206,14 @@ Cell[BoxData[
Cell[BoxData[
FormBox["\[Psi]", TraditionalForm]], "Output",
- ImageSize->{16, 15},
+ ImageSize->{15, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[3]=",
- CellID->1186167697]
+ CellLabel->"Out[3]="]
}, Open ]],
-Cell["This is a field with a Lorentz index.", "Text",
- CellTags->"QuantumField",
- CellID->1204193660],
+Cell["This is a field with a Lorentz index.", "Notes"],
Cell[CellGroupData[{
@@ -204,17 +232,14 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{22, 18},
+ ImageSize->{24, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[4]=",
- CellID->188307989]
+ CellLabel->"Out[4]="]
}, Open ]],
-Cell["Color indices should be put after the Lorentz ones.", "Text",
- CellTags->"QuantumField",
- CellID->1363299018],
+Cell["Color indices should be put after the Lorentz ones.", "Notes"],
Cell[CellGroupData[{
@@ -240,12 +265,11 @@ Cell[BoxData[
FormBox["a",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 19},
+ ImageSize->{29, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[5]=",
- CellID->568800193]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -261,12 +285,11 @@ Cell[BoxData[
RowBox[{"GaugeField", ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"SUNIndex", "[", "a", "]"}]}], "]"}]], "Output",
- ImageSize->{438, 15},
+ ImageSize->{441, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[6]//StandardForm=",
- CellID->232650919]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[TextData[{
@@ -281,9 +304,7 @@ Cell[TextData[{
RowBox[{
SubsuperscriptBox["A", "\[Mu]", "a"], "."}]}], TraditionalForm]]],
" "
-}], "Text",
- CellTags->"QuantumField",
- CellID->508873038],
+}], "Notes"],
Cell[CellGroupData[{
@@ -309,20 +330,17 @@ Cell[BoxData[
FormBox["a",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 17},
+ ImageSize->{29, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[7]=",
- CellID->1323752020]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell["\<\
- The first list of indices is usually interpreted as type LorentzIndex, \
-except for OPEDelta, which gets converted to type Momentum. \
-\>", "Text",
- CellTags->"QuantumField",
- CellID->708047350],
+The first list of indices is usually interpreted as type LorentzIndex, except \
+for OPEDelta, which gets converted to type Momentum. \
+\>", "Notes"],
Cell[CellGroupData[{
@@ -341,17 +359,14 @@ Cell[BoxData[
RowBox[{"A", ",",
RowBox[{"Momentum", "[", "OPEDelta", "]"}], ",",
RowBox[{"SUNIndex", "[", "a", "]"}]}], "]"}]], "Output",
- ImageSize->{392, 15},
+ ImageSize->{393, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[8]//StandardForm=",
- CellID->517587533]
+ CellLabel->"Out[8]//StandardForm="]
}, Open ]],
-Cell["Derivatives of fields are denoted as follows.", "Text",
- CellTags->"QuantumField",
- CellID->162225984],
+Cell["Derivatives of fields are denoted as follows.", "Notes"],
Cell[CellGroupData[{
@@ -367,24 +382,24 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], TraditionalForm]], "Output",
- ImageSize->{40, 19},
+ TraditionalForm]], ")"}], TraditionalForm]], "Output",
+ ImageSize->{59, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[9]=",
- CellID->407944783]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -400,20 +415,19 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
- FormBox["S",
- TraditionalForm], "\[Null]", "\[Null]"]}], TraditionalForm]], "Output",
- ImageSize->{33, 17},
+ FormBox["S",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{50, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[10]=",
- CellID->57451832]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -431,13 +445,12 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SubscriptBox["\[PartialD]",
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]],
SubsuperscriptBox[
FormBox["A",
TraditionalForm],
@@ -448,13 +461,12 @@ Cell[BoxData[
FormBox[
FormBox["a",
TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{43, 17},
+ TraditionalForm]], ")"}], TraditionalForm]], "Output",
+ ImageSize->{63, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[11]=",
- CellID->1175747409]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -473,23 +485,30 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
- RowBox[{"QuantumField", "(",
- RowBox[{
+ SuperscriptBox[
+ FormBox[
SubsuperscriptBox["\[PartialD]",
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm], "m"], ",", "A", ",",
- FormBox["\[CapitalDelta]",
- TraditionalForm], ",",
- FormBox["a",
- TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{185, 18},
+ TraditionalForm], "m"],
+ TraditionalForm],
+ RowBox[{
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{62, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[12]=",
- CellID->2017233085]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -505,12 +524,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuantumField",
- CellLabel->"Out[13]=",
- CellID->1933229370]
+ CellLabel->"Out[13]="]
}, Open ]]
}, Open ]],
@@ -552,17 +570,15 @@ Cell[TextData[{
ButtonNote->"ExpandPartialD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QuantumField",
- CellID->231016079]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"QuantumField",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -571,10 +587,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 54.860059}",
+ "built" -> "{2020, 1, 5, 19, 1, 3.544006}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -584,11 +600,12 @@ TaggingRules->{
QuantumField[par, ftype, {lorind}, {sunind}] denotes a quantum field of type \
ftype with (possible) Lorentz-indices lorind and SU(N) indices sunind. The \
optional first argument par denotes a partial derivative acting on the \
-field.", "synonyms" -> {}, "title" -> "QuantumField", "titlemodifier" -> "",
- "windowtitle" -> "QuantumField", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/QuantumField"}, "SearchTextTranslated" -> ""},
+field.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "QuantumField",
+ "titlemodifier" -> "", "windowtitle" -> "QuantumField", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/QuantumField"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -596,8 +613,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -606,265 +624,203 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3592, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4779, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1441027904]},
+ CellID->1519740058]},
"QuantumField"->{
- Cell[4202, 126, 91, 2, 31, "Text",
- CellTags->"QuantumField",
- CellID->173552947],
- Cell[4318, 132, 136, 4, 27, "Input",
+ Cell[5461, 165, 136, 4, 27, "Input",
CellTags->"QuantumField",
CellID->1327076480],
- Cell[4457, 138, 214, 7, 36, "Output",
- CellTags->"QuantumField",
- CellID->2038740597],
- Cell[4708, 150, 149, 4, 27, "Input",
+ Cell[5600, 171, 193, 6, 35, "Output",
+ CellTags->"QuantumField"],
+ Cell[5830, 182, 149, 4, 27, "Input",
CellTags->"QuantumField",
CellID->1661786669],
- Cell[4860, 156, 242, 8, 36, "Output",
- CellTags->"QuantumField",
- CellID->2083488651],
- Cell[5139, 169, 144, 4, 27, "Input",
+ Cell[5982, 188, 221, 7, 37, "Output",
+ CellTags->"QuantumField"],
+ Cell[6240, 200, 144, 4, 27, "Input",
CellTags->"QuantumField",
CellID->377089919],
- Cell[5286, 175, 219, 7, 36, "Output",
- CellTags->"QuantumField",
- CellID->1186167697],
- Cell[5520, 185, 101, 2, 31, "Text",
- CellTags->"QuantumField",
- CellID->1204193660],
- Cell[5646, 191, 186, 6, 27, "Input",
+ Cell[6387, 206, 198, 6, 37, "Output",
+ CellTags->"QuantumField"],
+ Cell[6679, 219, 186, 6, 27, "Input",
CellTags->"QuantumField",
CellID->776002298],
- Cell[5835, 199, 307, 12, 39, "Output",
- CellTags->"QuantumField",
- CellID->188307989],
- Cell[6157, 214, 115, 2, 32, "Text",
- CellTags->"QuantumField",
- CellID->1363299018],
- Cell[6297, 220, 229, 7, 27, "Input",
+ Cell[6868, 227, 287, 11, 39, "Output",
+ CellTags->"QuantumField"],
+ Cell[7263, 245, 229, 7, 27, "Input",
CellTags->"QuantumField",
CellID->674687696],
- Cell[6529, 229, 423, 18, 40, "Output",
- CellTags->"QuantumField",
- CellID->568800193],
- Cell[6989, 252, 132, 4, 27, "Input",
+ Cell[7495, 254, 403, 17, 40, "Output",
+ CellTags->"QuantumField"],
+ Cell[7935, 276, 132, 4, 27, "Input",
CellTags->"QuantumField",
CellID->1682950318],
- Cell[7124, 258, 360, 10, 49, "Output",
- CellTags->"QuantumField",
- CellID->232650919],
- Cell[7499, 271, 379, 14, 36, "Text",
- CellTags->"QuantumField",
- CellID->508873038],
- Cell[7903, 289, 223, 7, 27, "Input",
+ Cell[8070, 282, 340, 9, 51, "Output",
+ CellTags->"QuantumField"],
+ Cell[8783, 310, 223, 7, 27, "Input",
CellTags->"QuantumField",
CellID->503486981],
- Cell[8129, 298, 434, 18, 38, "Output",
- CellTags->"QuantumField",
- CellID->1323752020],
- Cell[8578, 319, 205, 5, 52, "Text",
- CellTags->"QuantumField",
- CellID->708047350],
- Cell[8808, 328, 261, 8, 27, "Input",
+ Cell[9009, 319, 413, 17, 38, "Output",
+ CellTags->"QuantumField"],
+ Cell[9620, 346, 261, 8, 27, "Input",
CellTags->"QuantumField",
CellID->511543671],
- Cell[9072, 338, 350, 10, 49, "Output",
- CellTags->"QuantumField",
- CellID->517587533],
- Cell[9437, 351, 108, 2, 31, "Text",
- CellTags->"QuantumField",
- CellID->162225984],
- Cell[9570, 357, 238, 7, 27, "Input",
+ Cell[9884, 356, 330, 9, 51, "Output",
+ CellTags->"QuantumField"],
+ Cell[10316, 372, 238, 7, 27, "Input",
CellTags->"QuantumField",
CellID->737122763],
- Cell[9811, 366, 495, 20, 40, "Output",
- CellTags->"QuantumField",
- CellID->407944783],
- Cell[10343, 391, 205, 6, 27, "Input",
+ Cell[10557, 381, 484, 20, 40, "Output",
+ CellTags->"QuantumField"],
+ Cell[11078, 406, 205, 6, 27, "Input",
CellTags->"QuantumField",
CellID->1485590656],
- Cell[10551, 399, 433, 16, 38, "Output",
- CellTags->"QuantumField",
- CellID->57451832],
- Cell[11021, 420, 280, 8, 27, "Input",
+ Cell[11286, 414, 392, 15, 38, "Output",
+ CellTags->"QuantumField"],
+ Cell[11715, 434, 280, 8, 27, "Input",
CellTags->"QuantumField",
CellID->1178067453],
- Cell[11304, 430, 624, 26, 38, "Output",
- CellTags->"QuantumField",
- CellID->1175747409],
- Cell[11965, 461, 312, 10, 27, "Input",
+ Cell[11998, 444, 589, 24, 38, "Output",
+ CellTags->"QuantumField"],
+ Cell[12624, 473, 312, 10, 27, "Input",
CellTags->"QuantumField",
CellID->1296308546],
- Cell[12280, 473, 521, 18, 39, "Output",
- CellTags->"QuantumField",
- CellID->2017233085],
- Cell[12838, 496, 251, 7, 27, "Input",
+ Cell[12939, 485, 610, 25, 40, "Output",
+ CellTags->"QuantumField"],
+ Cell[13586, 515, 251, 7, 27, "Input",
CellTags->"QuantumField",
CellID->1498512634],
- Cell[13092, 505, 218, 7, 36, "Output",
- CellTags->"QuantumField",
- CellID->1933229370],
- Cell[13678, 535, 573, 21, 32, "Text",
- CellTags->"QuantumField",
- CellID->231016079]}
+ Cell[13840, 524, 197, 6, 35, "Output",
+ CellTags->"QuantumField"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16343, 607},
- {"QuantumField", 16482, 611}
+ {"PrimaryExamplesSection", 17070, 625},
+ {"QuantumField", 17210, 629}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3215, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 660, 17, 114, "Usage",
+Cell[3802, 100, 289, 11, 45, "ObjectNameGrid"],
+Cell[4094, 113, 660, 17, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3592, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4779, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1441027904],
+ CellID->1519740058],
Cell[CellGroupData[{
-Cell[4005, 118, 194, 6, 25, "ExampleSection",
- CellID->71990275],
-Cell[4202, 126, 91, 2, 31, "Text",
- CellTags->"QuantumField",
- CellID->173552947],
+Cell[5192, 153, 196, 6, 26, "ExampleSection",
+ CellID->1271161724],
+Cell[5391, 161, 45, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4318, 132, 136, 4, 27, "Input",
+Cell[5461, 165, 136, 4, 27, "Input",
CellTags->"QuantumField",
CellID->1327076480],
-Cell[4457, 138, 214, 7, 36, "Output",
- CellTags->"QuantumField",
- CellID->2038740597]
+Cell[5600, 171, 193, 6, 35, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4708, 150, 149, 4, 27, "Input",
+Cell[5830, 182, 149, 4, 27, "Input",
CellTags->"QuantumField",
CellID->1661786669],
-Cell[4860, 156, 242, 8, 36, "Output",
- CellTags->"QuantumField",
- CellID->2083488651]
+Cell[5982, 188, 221, 7, 37, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5139, 169, 144, 4, 27, "Input",
+Cell[6240, 200, 144, 4, 27, "Input",
CellTags->"QuantumField",
CellID->377089919],
-Cell[5286, 175, 219, 7, 36, "Output",
- CellTags->"QuantumField",
- CellID->1186167697]
+Cell[6387, 206, 198, 6, 37, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
-Cell[5520, 185, 101, 2, 31, "Text",
- CellTags->"QuantumField",
- CellID->1204193660],
+Cell[6600, 215, 54, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5646, 191, 186, 6, 27, "Input",
+Cell[6679, 219, 186, 6, 27, "Input",
CellTags->"QuantumField",
CellID->776002298],
-Cell[5835, 199, 307, 12, 39, "Output",
- CellTags->"QuantumField",
- CellID->188307989]
+Cell[6868, 227, 287, 11, 39, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
-Cell[6157, 214, 115, 2, 32, "Text",
- CellTags->"QuantumField",
- CellID->1363299018],
+Cell[7170, 241, 68, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6297, 220, 229, 7, 27, "Input",
+Cell[7263, 245, 229, 7, 27, "Input",
CellTags->"QuantumField",
CellID->674687696],
-Cell[6529, 229, 423, 18, 40, "Output",
- CellTags->"QuantumField",
- CellID->568800193]
+Cell[7495, 254, 403, 17, 40, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6989, 252, 132, 4, 27, "Input",
+Cell[7935, 276, 132, 4, 27, "Input",
CellTags->"QuantumField",
CellID->1682950318],
-Cell[7124, 258, 360, 10, 49, "Output",
- CellTags->"QuantumField",
- CellID->232650919]
+Cell[8070, 282, 340, 9, 51, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
-Cell[7499, 271, 379, 14, 36, "Text",
- CellTags->"QuantumField",
- CellID->508873038],
+Cell[8425, 294, 333, 12, 37, "Notes"],
Cell[CellGroupData[{
-Cell[7903, 289, 223, 7, 27, "Input",
+Cell[8783, 310, 223, 7, 27, "Input",
CellTags->"QuantumField",
CellID->503486981],
-Cell[8129, 298, 434, 18, 38, "Output",
- CellTags->"QuantumField",
- CellID->1323752020]
+Cell[9009, 319, 413, 17, 38, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
-Cell[8578, 319, 205, 5, 52, "Text",
- CellTags->"QuantumField",
- CellID->708047350],
+Cell[9437, 339, 158, 3, 49, "Notes"],
Cell[CellGroupData[{
-Cell[8808, 328, 261, 8, 27, "Input",
+Cell[9620, 346, 261, 8, 27, "Input",
CellTags->"QuantumField",
CellID->511543671],
-Cell[9072, 338, 350, 10, 49, "Output",
- CellTags->"QuantumField",
- CellID->517587533]
+Cell[9884, 356, 330, 9, 51, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
-Cell[9437, 351, 108, 2, 31, "Text",
- CellTags->"QuantumField",
- CellID->162225984],
+Cell[10229, 368, 62, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[9570, 357, 238, 7, 27, "Input",
+Cell[10316, 372, 238, 7, 27, "Input",
CellTags->"QuantumField",
CellID->737122763],
-Cell[9811, 366, 495, 20, 40, "Output",
- CellTags->"QuantumField",
- CellID->407944783]
+Cell[10557, 381, 484, 20, 40, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10343, 391, 205, 6, 27, "Input",
+Cell[11078, 406, 205, 6, 27, "Input",
CellTags->"QuantumField",
CellID->1485590656],
-Cell[10551, 399, 433, 16, 38, "Output",
- CellTags->"QuantumField",
- CellID->57451832]
+Cell[11286, 414, 392, 15, 38, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11021, 420, 280, 8, 27, "Input",
+Cell[11715, 434, 280, 8, 27, "Input",
CellTags->"QuantumField",
CellID->1178067453],
-Cell[11304, 430, 624, 26, 38, "Output",
- CellTags->"QuantumField",
- CellID->1175747409]
+Cell[11998, 444, 589, 24, 38, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11965, 461, 312, 10, 27, "Input",
+Cell[12624, 473, 312, 10, 27, "Input",
CellTags->"QuantumField",
CellID->1296308546],
-Cell[12280, 473, 521, 18, 39, "Output",
- CellTags->"QuantumField",
- CellID->2017233085]
+Cell[12939, 485, 610, 25, 40, "Output",
+ CellTags->"QuantumField"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12838, 496, 251, 7, 27, "Input",
+Cell[13586, 515, 251, 7, 27, "Input",
CellTags->"QuantumField",
CellID->1498512634],
-Cell[13092, 505, 218, 7, 36, "Output",
- CellTags->"QuantumField",
- CellID->1933229370]
+Cell[13840, 524, 197, 6, 35, "Output",
+ CellTags->"QuantumField"]
}, Open ]]
}, Open ]],
-Cell[13337, 516, 31, 0, 29, "SectionFooterSpacer"]
+Cell[14064, 534, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13405, 521, 270, 12, 31, "SeeAlsoSection",
+Cell[14132, 539, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13678, 535, 573, 21, 32, "Text",
- CellTags->"QuantumField",
- CellID->231016079]
+Cell[14405, 553, 529, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[14266, 559, 23, 0, 42, "FooterCell"]
+Cell[14949, 575, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkField.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkField.nb
index 1d0193597..dd11be393 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkField.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkField.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8335, 274]
-NotebookOptionsPosition[ 5147, 178]
-NotebookOutlinePosition[ 7572, 245]
-CellTagsIndexPosition[ 7460, 239]
+NotebookDataLength[ 10293, 344]
+NotebookOptionsPosition[ 7067, 247]
+NotebookOutlinePosition[ 9318, 309]
+CellTagsIndexPosition[ 9206, 303]
WindowTitle->QuarkField
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QuarkField\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QuarkField"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/QuarkField.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$125461],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/QuarkField", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"AntiQuarkField\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/AntiQuarkField"], "\<\"QuantumField\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuantumField"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkField\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkField"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+QuarkField.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$217846],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkField", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +97,25 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QuarkField", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QuarkField", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["QuarkField"], "InlineFormula"],
- " \[LineSeparator]",
- "is the name of a fermionic field. QuarkField is just a name with no \
-functional properties. Only typesetting rules are attached."
+ " \[LineSeparator]is the name of a fermionic field."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -92,6 +126,44 @@ functional properties. Only typesetting rules are attached."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1129859403],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This is just a name with no functional properties. Only typesetting rules are \
+attached.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -107,7 +179,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1602133664],
+ CellID->445214421],
Cell[CellGroupData[{
@@ -117,7 +189,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->148769325],
+ CellID->1688325336],
Cell[CellGroupData[{
@@ -128,12 +200,11 @@ Cell[BoxData["QuarkField"], "Input",
Cell[BoxData[
FormBox["\[Psi]", TraditionalForm]], "Output",
- ImageSize->{16, 15},
+ ImageSize->{15, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkField",
- CellLabel->"Out[1]=",
- CellID->753517076]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -169,9 +240,7 @@ Cell[TextData[{
ButtonNote->"QuantumField"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QuarkField",
- CellID->1398753735]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -179,7 +248,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"QuarkField",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -188,22 +257,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 56.408064}",
+ "built" -> "{2020, 1, 5, 19, 1, 7.285329}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "QuarkField is the name of a fermionic field. QuarkField is just a name \
-with no functional properties. Only typesetting rules are attached.",
- "synonyms" -> {}, "title" -> "QuarkField", "titlemodifier" -> "",
- "windowtitle" -> "QuarkField", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/QuarkField"}, "SearchTextTranslated" -> ""},
+ "None", "summary" -> "QuarkField is the name of a fermionic field.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QuarkField",
+ "titlemodifier" -> "", "windowtitle" -> "QuarkField", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/QuarkField"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -211,8 +278,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -221,61 +289,63 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3361, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5344, 166, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1602133664]},
+ CellID->445214421]},
"QuarkField"->{
- Cell[3994, 123, 105, 3, 27, "Input",
+ Cell[5977, 195, 105, 3, 27, "Input",
CellTags->"QuarkField",
CellID->1364163366],
- Cell[4102, 128, 216, 7, 36, "Output",
- CellTags->"QuarkField",
- CellID->753517076],
- Cell[4686, 158, 419, 15, 31, "Text",
- CellTags->"QuarkField",
- CellID->1398753735]}
+ Cell[6085, 200, 196, 6, 37, "Output",
+ CellTags->"QuarkField"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7029, 222},
- {"QuarkField", 7166, 226}
+ {"PrimaryExamplesSection", 8887, 290},
+ {"QuarkField", 9024, 294}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3125, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 442, 12, 97, "Usage",
+Cell[3710, 99, 287, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4022, 114, 337, 10, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3361, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4384, 128, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1129859403],
+Cell[5126, 154, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5160, 156, 135, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5344, 166, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1602133664],
+ CellID->445214421],
Cell[CellGroupData[{
-Cell[3774, 113, 195, 6, 25, "ExampleSection",
- CellID->148769325],
+Cell[5756, 185, 196, 6, 26, "ExampleSection",
+ CellID->1688325336],
Cell[CellGroupData[{
-Cell[3994, 123, 105, 3, 27, "Input",
+Cell[5977, 195, 105, 3, 27, "Input",
CellTags->"QuarkField",
CellID->1364163366],
-Cell[4102, 128, 216, 7, 36, "Output",
- CellTags->"QuarkField",
- CellID->753517076]
+Cell[6085, 200, 196, 6, 37, "Output",
+ CellTags->"QuarkField"]
}, Open ]]
}, Open ]],
-Cell[4345, 139, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6308, 210, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4413, 144, 270, 12, 31, "SeeAlsoSection",
+Cell[6376, 215, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4686, 158, 419, 15, 31, "Text",
- CellTags->"QuarkField",
- CellID->1398753735]
+Cell[6649, 229, 376, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5120, 176, 23, 0, 42, "FooterCell"]
+Cell[7040, 245, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldChi.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldChi.nb
new file mode 100644
index 000000000..f6cf65145
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldChi.nb
@@ -0,0 +1,400 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11156, 390]
+NotebookOptionsPosition[ 8035, 294]
+NotebookOutlinePosition[ 10103, 350]
+CellTagsIndexPosition[ 10019, 345]
+WindowTitle->QuarkFieldChi
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkFieldChi\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkFieldChi"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+QuarkFieldChi.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$217412],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkFieldChi", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["QuarkFieldChi", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["QuarkFieldChi"], "InlineFormula"],
+ " \[LineSeparator]is the name of a fermionic field."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1321284150],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This is just a name with no functional properties. Only typesetting rules are \
+attached.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1705075774],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->836054372],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["QuarkFieldChi"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->713862864],
+
+Cell[BoxData[
+ FormBox["\[Chi]", TraditionalForm]], "Output",
+ ImageSize->{16, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1462318022]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"QuantumField", "[", "QuarkFieldChiDagger", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"QuantumField", "[", "QuarkFieldChi", "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->497682476],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ SubscriptBox["D",
+ FormBox["\[Mu]",
+ TraditionalForm]], ".",
+ FormBox["\[Chi]",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{94, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1741711077]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->304243571],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["\[Chi]",
+ TraditionalForm], ")"}], ")"}]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c26",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c26",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ FormBox["\[Chi]",
+ TraditionalForm]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{293, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->459767281]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"QuarkFieldChi",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 6.243410}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "QuarkFieldChi is the name of a fermionic field.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QuarkFieldChi",
+ "titlemodifier" -> "", "windowtitle" -> "QuarkFieldChi", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/QuarkFieldChi"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4522, 143, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1705075774]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9875, 338}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3197, 91, 340, 10, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3562, 105, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1321284150],
+Cell[4304, 131, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4338, 133, 135, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4522, 143, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1705075774],
+Cell[CellGroupData[{
+Cell[4935, 162, 195, 6, 26, "ExampleSection",
+ CellID->836054372],
+Cell[CellGroupData[{
+Cell[5155, 172, 82, 2, 27, "Input",
+ CellID->713862864],
+Cell[5240, 176, 192, 6, 38, "Output",
+ CellID->1462318022]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5469, 187, 294, 7, 45, "Input",
+ CellID->497682476],
+Cell[5766, 196, 580, 23, 42, "Output",
+ CellID->1741711077]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6383, 224, 110, 3, 27, "Input",
+ CellID->304243571],
+Cell[6496, 229, 1473, 58, 43, "Output",
+ CellID->459767281]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8008, 292, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldChiDagger.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldChiDagger.nb
new file mode 100644
index 000000000..825ca99dc
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldChiDagger.nb
@@ -0,0 +1,401 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11265, 391]
+NotebookOptionsPosition[ 8114, 295]
+NotebookOutlinePosition[ 10213, 351]
+CellTagsIndexPosition[ 10129, 346]
+WindowTitle->QuarkFieldChiDagger
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkFieldChiDagger\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkFieldChiDagger"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+QuarkFieldChiDagger.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$216980],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkFieldChiDagger", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["QuarkFieldChiDagger", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["QuarkFieldChiDagger"], "InlineFormula"],
+ " \[LineSeparator]is the name of a fermionic field."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1754857514],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This is just a name with no functional properties. Only typesetting rules are \
+attached.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->168180068],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1223850326],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["QuarkFieldChiDagger"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1148663248],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"], TraditionalForm]], "Output",
+ ImageSize->{25, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->629632876]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"QuantumField", "[", "QuarkFieldChiDagger", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"QuantumField", "[", "QuarkFieldChi", "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->497682476],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ SubscriptBox["D",
+ FormBox["\[Mu]",
+ TraditionalForm]], ".",
+ FormBox["\[Chi]",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{94, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->861497191]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->304243571],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["\[Chi]",
+ TraditionalForm], ")"}], ")"}]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c25",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Chi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c25",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ FormBox["\[Chi]",
+ TraditionalForm]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{293, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->726769996]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"QuarkFieldChiDagger",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 4.809555}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "QuarkFieldChiDagger is the name of a fermionic field.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "QuarkFieldChiDagger", "titlemodifier" ->
+ "", "windowtitle" -> "QuarkFieldChiDagger", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/QuarkFieldChiDagger"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4564, 143, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->168180068]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9986, 339}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3233, 91, 346, 10, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3604, 105, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1754857514],
+Cell[4346, 131, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4380, 133, 135, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4564, 143, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->168180068],
+Cell[CellGroupData[{
+Cell[4976, 162, 196, 6, 26, "ExampleSection",
+ CellID->1223850326],
+Cell[CellGroupData[{
+Cell[5197, 172, 89, 2, 27, "Input",
+ CellID->1148663248],
+Cell[5289, 176, 223, 7, 41, "Output",
+ CellID->629632876]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5549, 188, 294, 7, 45, "Input",
+ CellID->497682476],
+Cell[5846, 197, 579, 23, 42, "Output",
+ CellID->861497191]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6462, 225, 110, 3, 27, "Input",
+ CellID->304243571],
+Cell[6575, 230, 1473, 58, 43, "Output",
+ CellID->726769996]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8087, 293, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldPsi.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldPsi.nb
new file mode 100644
index 000000000..996e2da30
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldPsi.nb
@@ -0,0 +1,401 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11169, 391]
+NotebookOptionsPosition[ 8046, 295]
+NotebookOutlinePosition[ 10114, 351]
+CellTagsIndexPosition[ 10030, 346]
+WindowTitle->QuarkFieldPsi
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkFieldPsi\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkFieldPsi"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+QuarkFieldPsi.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$218714],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkFieldPsi", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["QuarkFieldPsi", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["QuarkFieldPsi"], "InlineFormula"],
+ " \[LineSeparator]",
+ "is the name of a fermionic field."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1866551030],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This is just a name with no functional properties. Only typesetting rules are \
+attached.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1620274030],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1979523067],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["QuarkFieldPsi"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->323831762],
+
+Cell[BoxData[
+ FormBox["\[Psi]", TraditionalForm]], "Output",
+ ImageSize->{15, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1906276170]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"QuantumField", "[", "QuarkFieldPsiDagger", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"QuantumField", "[", "QuarkFieldPsi", "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->497682476],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ SubscriptBox["D",
+ FormBox["\[Mu]",
+ TraditionalForm]], ".",
+ FormBox["\[Psi]",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{92, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2090937959]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->304243571],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["\[Psi]",
+ TraditionalForm], ")"}], ")"}]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c27",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c27",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ FormBox["\[Psi]",
+ TraditionalForm]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{289, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1801611746]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"QuarkFieldPsi",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 9.601018}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "QuarkFieldPsi is the name of a fermionic field.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QuarkFieldPsi",
+ "titlemodifier" -> "", "windowtitle" -> "QuarkFieldPsi", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/QuarkFieldPsi"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4531, 144, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1620274030]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9886, 339}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[585, 21, 2294, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2882, 76, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3197, 91, 349, 11, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3571, 106, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1866551030],
+Cell[4313, 132, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4347, 134, 135, 4, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4531, 144, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1620274030],
+Cell[CellGroupData[{
+Cell[4944, 163, 196, 6, 26, "ExampleSection",
+ CellID->1979523067],
+Cell[CellGroupData[{
+Cell[5165, 173, 82, 2, 27, "Input",
+ CellID->323831762],
+Cell[5250, 177, 192, 6, 37, "Output",
+ CellID->1906276170]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5479, 188, 294, 7, 45, "Input",
+ CellID->497682476],
+Cell[5776, 197, 580, 23, 42, "Output",
+ CellID->2090937959]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6393, 225, 110, 3, 27, "Input",
+ CellID->304243571],
+Cell[6506, 230, 1474, 58, 43, "Output",
+ CellID->1801611746]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8019, 293, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldPsiDagger.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldPsiDagger.nb
new file mode 100644
index 000000000..aadfcc0cc
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkFieldPsiDagger.nb
@@ -0,0 +1,412 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11533, 402]
+NotebookOptionsPosition[ 8163, 297]
+NotebookOutlinePosition[ 10431, 360]
+CellTagsIndexPosition[ 10318, 354]
+WindowTitle->QuarkFieldPsiDagger
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkFieldPsiDagger\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkFieldPsiDagger"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+QuarkFieldPsiDagger.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$218282],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkFieldPsiDagger", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["QuarkFieldPsiDagger", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["QuarkFieldPsiDagger"], "InlineFormula"],
+ " \[LineSeparator]is the name of a fermionic field."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->438342181],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This is just a name with no functional properties. Only typesetting rules are \
+attached.\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2036647928],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->941412550],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["QuarkFieldPsiDagger"], "Input",
+ CellTags->"QuarkField",
+ CellLabel->"In[1]:=",
+ CellID->1364163366],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"], TraditionalForm]], "Output",
+ ImageSize->{24, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"QuarkField",
+ CellLabel->"Out[1]=",
+ CellID->1343136]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"QuantumField", "[", "QuarkFieldPsiDagger", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"QuantumField", "[", "QuarkFieldPsi", "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->497682476],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ SubscriptBox["D",
+ FormBox["\[Mu]",
+ TraditionalForm]], ".",
+ FormBox["\[Psi]",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{92, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1166658841]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->304243571],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["\[Psi]",
+ TraditionalForm], ")"}], ")"}]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c24",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Psi]", "\[Dagger]"],
+ TraditionalForm], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c24",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ FormBox["\[Psi]",
+ TraditionalForm]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{289, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2081171150]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"QuarkFieldPsiDagger",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 8.443238}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "QuarkFieldPsiDagger is the name of a fermionic field.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "QuarkFieldPsiDagger", "titlemodifier" ->
+ "", "windowtitle" -> "QuarkFieldPsiDagger", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/QuarkFieldPsiDagger"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4563, 143, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2036647928]},
+ "QuarkField"->{
+ Cell[5196, 172, 114, 3, 27, "Input",
+ CellTags->"QuarkField",
+ CellID->1364163366],
+ Cell[5313, 177, 246, 8, 40, "Output",
+ CellTags->"QuarkField",
+ CellID->1343136]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9978, 340},
+ {"QuarkField", 10116, 344}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3233, 91, 346, 10, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3604, 105, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->438342181],
+Cell[4345, 131, 31, 0, 14, "SectionHeaderSpacer"],
+Cell[4379, 133, 135, 4, 32, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4563, 143, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2036647928],
+Cell[CellGroupData[{
+Cell[4976, 162, 195, 6, 26, "ExampleSection",
+ CellID->941412550],
+Cell[CellGroupData[{
+Cell[5196, 172, 114, 3, 27, "Input",
+ CellTags->"QuarkField",
+ CellID->1364163366],
+Cell[5313, 177, 246, 8, 40, "Output",
+ CellTags->"QuarkField",
+ CellID->1343136]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5596, 190, 294, 7, 45, "Input",
+ CellID->497682476],
+Cell[5893, 199, 580, 23, 42, "Output",
+ CellID->1166658841]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6510, 227, 110, 3, 27, "Input",
+ CellID->304243571],
+Cell[6623, 232, 1474, 58, 43, "Output",
+ CellID->2081171150]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8136, 295, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkGluonVertex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkGluonVertex.nb
index 8f128355a..0775922c6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkGluonVertex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkGluonVertex.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18947, 666]
-NotebookOptionsPosition[ 13296, 487]
-NotebookOutlinePosition[ 16873, 589]
-CellTagsIndexPosition[ 16753, 583]
+NotebookDataLength[ 22723, 814]
+NotebookOptionsPosition[ 16914, 632]
+NotebookOutlinePosition[ 20122, 721]
+CellTagsIndexPosition[ 20002, 715]
WindowTitle->QuarkGluonVertex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QuarkGluonVertex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QuarkGluonVertex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkGluonVertex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkGluonVertex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
QuarkGluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$125795],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/QuarkGluonVertex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$219172],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkGluonVertex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,14 +95,26 @@ QuarkGluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QuarkGluonVertex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QuarkGluonVertex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"QuarkGluonVertex", "[",
- RowBox[{"mu", ",", " ", "a"}], "]"}]], "InlineFormula"],
+ RowBox[{"\[Mu]", ",", " ", "a"}], "]"}]], "InlineFormula"],
" \[LineSeparator]",
"gives the Feynman rule for the quark-gluon vertex. "
}]]}
@@ -93,6 +127,89 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1086406271],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ Cell[BoxData["QGV"], "InlineFormula"],
+ " can be used as an abbreviation of ",
+ ButtonBox["QuarkGluonVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuarkGluonVertex",
+ ButtonNote->"QuarkGluonVertex"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "The dimension and the name of the coupling constant are determined by the \
+options ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ " and ",
+ ButtonBox["CouplingConstant",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ ". "
+}], "Notes",
+ CellID->14058075],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "QuarkGluonVertex", "]"}]], "Input",
+ CellLabel->"In[38]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CounterTerm", "\[Rule]", "False"}], ",",
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "False"}], ",",
+ RowBox[{"\[CapitalOmega]", "\[Rule]", "False"}], ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{396, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[38]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -104,59 +221,85 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1902982783],
+ CellID->1807272232],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->894471574],
+ CellID->542719504],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "QuarkGluonVertex", "]"}]], "Input",
+ RowBox[{"QuarkGluonVertex", "[",
+ RowBox[{"\[Mu]", ",", "a", ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkGluonVertex",
CellLabel->"In[1]:=",
- CellID->1162740224],
+ CellID->158944719],
Cell[BoxData[
FormBox[
- RowBox[{"{",
+ RowBox[{"\[ImaginaryI]", " ",
+ SubscriptBox["g", "s"], " ",
RowBox[{
- RowBox[{"CounterTerm", "\[Rule]", "False"}], ",",
- RowBox[{"CouplingConstant", "\[Rule]",
- SubscriptBox["g", "s"]}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"Explicit", "\[Rule]", "False"}], ",",
- RowBox[{"\[CapitalOmega]", "\[Rule]", "False"}], ",",
- RowBox[{"Polarization", "\[Rule]", "0"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{420, 35},
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ ImageSize->{83, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkGluonVertex",
- CellLabel->"Out[1]=",
- CellID->1237177013]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"QuarkGluonVertex", "[",
- RowBox[{"\[Mu]", ",", "a", ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"QuarkGluonVertex",
- CellLabel->"In[2]:=",
- CellID->158944719],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"QGV", "[",
+ RowBox[{"\[Mu]", ",", "a"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["Q",
+ FormBox["a",
+ TraditionalForm],
+ FormBox["\[Mu]",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{30, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
@@ -173,23 +316,28 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{76, 17},
+ ImageSize->{83, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"QuarkGluonVertex",
- CellLabel->"Out[2]=",
- CellID->1997015232]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"QuarkGluonVertex", "[",
RowBox[{"\[Mu]", ",", "a", ",",
RowBox[{"CounterTerm", " ", "\[Rule]", "1"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkGluonVertex",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->196044183],
Cell[BoxData[
@@ -216,12 +364,11 @@ Cell[BoxData[
TraditionalForm]]}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{186, 55},
+ ImageSize->{206, 53},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkGluonVertex",
- CellLabel->"Out[3]=",
- CellID->1493367329]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -232,7 +379,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", " ", "\[Rule]", "2"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkGluonVertex",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1947570088],
Cell[BoxData[
@@ -255,12 +402,11 @@ Cell[BoxData[
TraditionalForm]]}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{137, 45},
+ ImageSize->{149, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkGluonVertex",
- CellLabel->"Out[4]=",
- CellID->559873087]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -271,7 +417,7 @@ Cell[BoxData[
RowBox[{"CounterTerm", " ", "\[Rule]", "3"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkGluonVertex",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->339282308],
Cell[BoxData[
@@ -297,16 +443,22 @@ Cell[BoxData[
TraditionalForm]]}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{184, 45},
+ ImageSize->{200, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkGluonVertex",
- CellLabel->"Out[5]=",
- CellID->1688386600]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"QuarkGluonVertex", "[",
RowBox[{
@@ -317,26 +469,22 @@ Cell[BoxData[
RowBox[{"OPE", "\[Rule]", "True"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkGluonVertex",
- CellLabel->"In[6]:=",
+ CellLabel->"In[1]:=",
CellID->2017937273],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"\[CapitalOmega]", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
SubscriptBox["g", "s"], " ",
RowBox[{
RowBox[{"(",
@@ -405,12 +553,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}]}]}], TraditionalForm]], "Output",
- ImageSize->{444, 47},
+ ImageSize->{481, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkGluonVertex",
- CellLabel->"Out[6]=",
- CellID->389181480]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -425,7 +572,7 @@ Cell[BoxData[
RowBox[{"OPE", "\[Rule]", "False"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkGluonVertex",
- CellLabel->"In[7]:=",
+ CellLabel->"In[2]:=",
CellID->729288779],
Cell[BoxData[
@@ -443,12 +590,12 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{76, 17},
+ ImageSize->{83, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkGluonVertex",
- CellLabel->"Out[7]=",
- CellID->1936603618]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -478,9 +625,7 @@ Cell[TextData[{
ButtonNote->"GluonVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QuarkGluonVertex",
- CellID->507567203]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -488,7 +633,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"QuarkGluonVertex",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -497,21 +642,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 57.890898}",
+ "built" -> "{2020, 1, 5, 19, 1, 10.687084}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "QuarkGluonVertex[mu, a] gives the Feynman rule for the quark-gluon \
-vertex. ", "synonyms" -> {}, "title" -> "QuarkGluonVertex", "titlemodifier" ->
- "", "windowtitle" -> "QuarkGluonVertex", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/QuarkGluonVertex"}, "SearchTextTranslated" -> ""},
+ "QuarkGluonVertex[\\[Mu], a] gives the Feynman rule for the quark-gluon \
+vertex. ", "synonyms" -> {}, "tabletags" -> {}, "title" -> "QuarkGluonVertex",
+ "titlemodifier" -> "", "windowtitle" -> "QuarkGluonVertex", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/QuarkGluonVertex"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -519,8 +665,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -529,145 +676,146 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3392, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6615, 212, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1902982783]},
+ CellID->1807272232]},
"QuarkGluonVertex"->{
- Cell[4025, 124, 150, 4, 27, "Input",
- CellTags->"QuarkGluonVertex",
- CellID->1162740224],
- Cell[4178, 130, 597, 17, 56, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1237177013],
- Cell[4812, 152, 220, 6, 27, "Input",
+ Cell[7248, 241, 220, 6, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->158944719],
- Cell[5035, 160, 529, 20, 38, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1997015232],
- Cell[5601, 185, 275, 7, 27, "Input",
+ Cell[7471, 249, 508, 19, 37, "Output",
+ CellTags->"QuarkGluonVertex"],
+ Cell[9305, 333, 275, 7, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->196044183],
- Cell[5879, 194, 804, 29, 76, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1493367329],
- Cell[6720, 228, 276, 7, 27, "Input",
+ Cell[9583, 342, 783, 28, 74, "Output",
+ CellTags->"QuarkGluonVertex"],
+ Cell[10403, 375, 276, 7, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->1947570088],
- Cell[6999, 237, 698, 25, 66, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->559873087],
- Cell[7734, 267, 275, 7, 27, "Input",
+ Cell[10682, 384, 678, 24, 60, "Output",
+ CellTags->"QuarkGluonVertex"],
+ Cell[11397, 413, 275, 7, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->339282308],
- Cell[8012, 276, 778, 28, 66, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1688386600],
- Cell[8827, 309, 383, 11, 27, "Input",
+ Cell[11675, 422, 757, 27, 60, "Output",
+ CellTags->"QuarkGluonVertex"],
+ Cell[12611, 461, 383, 11, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->2017937273],
- Cell[9213, 322, 2477, 90, 68, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->389181480],
- Cell[11727, 417, 383, 11, 27, "Input",
+ Cell[12997, 474, 2368, 85, 67, "Output",
+ CellTags->"QuarkGluonVertex"],
+ Cell[15402, 564, 383, 11, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->729288779],
- Cell[12113, 430, 529, 20, 38, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1936603618],
- Cell[13010, 473, 244, 9, 31, "Text",
- CellTags->"QuarkGluonVertex",
- CellID->507567203]}
+ Cell[15788, 577, 508, 19, 37, "Output",
+ CellTags->"QuarkGluonVertex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15134, 530},
- {"QuarkGluonVertex", 15277, 534}
+ {"PrimaryExamplesSection", 18801, 677},
+ {"QuarkGluonVertex", 18945, 681}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3041, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 436, 13, 82, "Usage",
+Cell[3632, 97, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3950, 112, 439, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3392, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4414, 129, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1086406271],
+Cell[5156, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5190, 157, 275, 9, 70, "Notes",
+ CellID->1067943069],
+Cell[5468, 168, 413, 14, 70, "Notes",
+ CellID->14058075],
+Cell[CellGroupData[{
+Cell[5906, 186, 99, 2, 70, "Input"],
+Cell[6008, 190, 546, 15, 56, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6615, 212, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1902982783],
+ CellID->1807272232],
Cell[CellGroupData[{
-Cell[3805, 114, 195, 6, 25, "ExampleSection",
- CellID->894471574],
+Cell[7028, 231, 195, 6, 26, "ExampleSection",
+ CellID->542719504],
Cell[CellGroupData[{
-Cell[4025, 124, 150, 4, 27, "Input",
+Cell[7248, 241, 220, 6, 27, "Input",
CellTags->"QuarkGluonVertex",
- CellID->1162740224],
-Cell[4178, 130, 597, 17, 56, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1237177013]
+ CellID->158944719],
+Cell[7471, 249, 508, 19, 37, "Output",
+ CellTags->"QuarkGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4812, 152, 220, 6, 27, "Input",
- CellTags->"QuarkGluonVertex",
- CellID->158944719],
-Cell[5035, 160, 529, 20, 38, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1997015232]
+Cell[8016, 273, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8146, 279, 106, 3, 27, "Input"],
+Cell[8255, 284, 270, 10, 38, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5601, 185, 275, 7, 27, "Input",
+Cell[8562, 299, 84, 2, 27, "Input"],
+Cell[8649, 303, 477, 18, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9175, 327, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9305, 333, 275, 7, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->196044183],
-Cell[5879, 194, 804, 29, 76, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1493367329]
+Cell[9583, 342, 783, 28, 74, "Output",
+ CellTags->"QuarkGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6720, 228, 276, 7, 27, "Input",
+Cell[10403, 375, 276, 7, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->1947570088],
-Cell[6999, 237, 698, 25, 66, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->559873087]
+Cell[10682, 384, 678, 24, 60, "Output",
+ CellTags->"QuarkGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7734, 267, 275, 7, 27, "Input",
+Cell[11397, 413, 275, 7, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->339282308],
-Cell[8012, 276, 778, 28, 66, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1688386600]
+Cell[11675, 422, 757, 27, 60, "Output",
+ CellTags->"QuarkGluonVertex"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[8827, 309, 383, 11, 27, "Input",
+Cell[12481, 455, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[12611, 461, 383, 11, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->2017937273],
-Cell[9213, 322, 2477, 90, 68, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->389181480]
+Cell[12997, 474, 2368, 85, 67, "Output",
+ CellTags->"QuarkGluonVertex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11727, 417, 383, 11, 27, "Input",
+Cell[15402, 564, 383, 11, 27, "Input",
CellTags->"QuarkGluonVertex",
CellID->729288779],
-Cell[12113, 430, 529, 20, 38, "Output",
- CellTags->"QuarkGluonVertex",
- CellID->1936603618]
+Cell[15788, 577, 508, 19, 37, "Output",
+ CellTags->"QuarkGluonVertex"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[12669, 454, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16335, 601, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12737, 459, 270, 12, 31, "SeeAlsoSection",
+Cell[16403, 606, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13010, 473, 244, 9, 31, "Text",
- CellTags->"QuarkGluonVertex",
- CellID->507567203]
+Cell[16676, 620, 196, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[13269, 485, 23, 0, 42, "FooterCell"]
+Cell[16887, 630, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkMass.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkMass.nb
index f6ad0d4ca..a4f729408 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkMass.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkMass.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6324, 199]
-NotebookOptionsPosition[ 4130, 133]
-NotebookOutlinePosition[ 6062, 188]
-CellTagsIndexPosition[ 5991, 183]
+NotebookDataLength[ 7250, 222]
+NotebookOptionsPosition[ 5258, 166]
+NotebookOutlinePosition[ 7041, 214]
+CellTagsIndexPosition[ 6998, 211]
WindowTitle->QuarkMass
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QuarkMass\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QuarkMass"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/QuarkMass.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Amplitude\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Amplitude"], "\<\"CounterTerm\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CounterTerm"], "\<\"RTL\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/RTL"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkMass\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkMass"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/QuarkMass.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$126136],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/QuarkMass", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$219618],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkMass", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QuarkMass", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QuarkMass", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -124,9 +159,7 @@ Cell[TextData[{
ButtonNote->"RTL"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QuarkMass",
- CellID->966046819]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -143,21 +176,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 23, 59.409432}",
+ "built" -> "{2020, 1, 5, 19, 1, 11.896397}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"QuarkMass is an option of Amplitude, CounterTerm and RTL.",
- "synonyms" -> {}, "title" -> "QuarkMass", "titlemodifier" -> "",
- "windowtitle" -> "QuarkMass", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/QuarkMass"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "QuarkMass",
+ "titlemodifier" -> "", "windowtitle" -> "QuarkMass", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/QuarkMass"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -166,41 +199,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "QuarkMass"->{
- Cell[3545, 107, 543, 21, 70, "Text",
- CellTags->"QuarkMass",
- CellID->966046819]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"QuarkMass", 5879, 176}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2249, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 3184, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2833, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2888, 78, 359, 11, 70, "Usage",
+Cell[3768, 100, 286, 11, 70, "ObjectNameGrid"],
+Cell[4057, 113, 359, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3272, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4441, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3545, 107, 543, 21, 70, "Text",
- CellTags->"QuarkMass",
- CellID->966046819]
+Cell[4714, 142, 502, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4103, 131, 23, 0, 70, "FooterCell"]
+Cell[5231, 164, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkPropagator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkPropagator.nb
index 1a32a1ed0..91b389d74 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkPropagator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/QuarkPropagator.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11273, 381]
-NotebookOptionsPosition[ 7237, 257]
-NotebookOutlinePosition[ 10069, 336]
-CellTagsIndexPosition[ 9952, 330]
+NotebookDataLength[ 15667, 542]
+NotebookOptionsPosition[ 11529, 416]
+NotebookOutlinePosition[ 14074, 485]
+CellTagsIndexPosition[ 13955, 479]
WindowTitle->QuarkPropagator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/QuarkPropagator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/QuarkPropagator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"QuarkGluonVertex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/QuarkGluonVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/QuarkPropagator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/QuarkPropagator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
QuarkPropagator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$126483],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/QuarkPropagator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$220080],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/QuarkPropagator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,60 +97,89 @@ QuarkPropagator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["QuarkPropagator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["QuarkPropagator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"QuarkPropagator", "[", "p", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the massless quark propagator. QuarkPropagator[{p,m}] or gives the \
-quark propagator with mass m."
+ " \[LineSeparator]is the massless quark propagator."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"QuarkPropagator", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",", "m"}], "}"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]gives the quark propagator with mass ",
+ Cell[BoxData["m"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1452880142],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->377938345],
-Cell[CellGroupData[{
+Cell["", "SectionHeaderSpacer"],
Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->2017901716],
+ Cell[BoxData["QP"], "InlineFormula"],
+ " can be used as an abbreviation of ",
+ ButtonBox["QuarkPropagator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuarkPropagator",
+ ButtonNote->"QuarkPropagator"],
+ "."
+}], "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "QuarkPropagator", "]"}]], "Input",
- CellTags->"QuarkPropagator",
- CellLabel->"In[1]:=",
- CellID->1137505588],
+ CellLabel->"In[50]:="],
Cell[BoxData[
FormBox[
@@ -141,22 +194,51 @@ Cell[BoxData[
RowBox[{"\[CapitalOmega]", "\[Rule]", "False"}], ",",
RowBox[{"Polarization", "\[Rule]", "0"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{419, 35},
+ ImageSize->{393, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"QuarkPropagator",
- CellLabel->"Out[1]=",
- CellID->759410596]
+ CellLabel->"Out[50]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->708793879],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->438324506],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"QuarkPropagator", "[",
RowBox[{"p", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkPropagator",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1589814930],
Cell[BoxData[
@@ -168,15 +250,22 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm]}]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]], TraditionalForm]], "Output",
- ImageSize->{47, 47},
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{49, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkPropagator",
- CellLabel->"Out[2]=",
- CellID->1709152205]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -188,7 +277,7 @@ Cell[BoxData[
RowBox[{"p", ",", "m"}], "}"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"QuarkPropagator",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1965811029],
Cell[BoxData[
@@ -202,17 +291,89 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm]}]}], ")"}]}],
- RowBox[{
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- ImageSize->{88, 47},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{92, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"QuarkPropagator",
- CellLabel->"Out[3]=",
- CellID->545226998]
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"QP", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",", "m"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[CapitalPi]", "q"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{51, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Explicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}]}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{92, 39},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -248,9 +409,7 @@ Cell[TextData[{
ButtonNote->"QuarkGluonVertex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"QuarkPropagator",
- CellID->704256164]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -258,7 +417,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"QuarkPropagator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -267,22 +426,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 0.622220}",
+ "built" -> "{2020, 1, 5, 19, 1, 13.015421}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "QuarkPropagator[p] is the massless quark propagator. \
-QuarkPropagator[{p,m}] or gives the quark propagator with mass m.",
- "synonyms" -> {}, "title" -> "QuarkPropagator", "titlemodifier" -> "",
+ "QuarkPropagator[p] is the massless quark propagator. QuarkPropagator[{p, \
+m}] gives the quark propagator with mass m.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "QuarkPropagator", "titlemodifier" -> "",
"windowtitle" -> "QuarkPropagator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/QuarkPropagator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -290,8 +449,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -300,89 +460,90 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3401, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6584, 206, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1452880142]},
+ CellID->708793879]},
"QuarkPropagator"->{
- Cell[4035, 124, 148, 4, 27, "Input",
- CellTags->"QuarkPropagator",
- CellID->1137505588],
- Cell[4186, 130, 639, 18, 56, "Output",
- CellTags->"QuarkPropagator",
- CellID->759410596],
- Cell[4862, 153, 205, 6, 27, "Input",
+ Cell[7216, 235, 205, 6, 27, "Input",
CellTags->"QuarkPropagator",
CellID->1589814930],
- Cell[5070, 161, 456, 17, 68, "Output",
- CellTags->"QuarkPropagator",
- CellID->1709152205],
- Cell[5563, 183, 254, 8, 27, "Input",
+ Cell[7424, 243, 651, 24, 60, "Output",
+ CellTags->"QuarkPropagator"],
+ Cell[8112, 272, 254, 8, 27, "Input",
CellTags->"QuarkPropagator",
CellID->1965811029],
- Cell[5820, 193, 569, 21, 68, "Output",
- CellTags->"QuarkPropagator",
- CellID->545226998],
- Cell[6757, 237, 438, 15, 32, "Text",
- CellTags->"QuarkPropagator",
- CellID->704256164]}
+ Cell[8369, 282, 848, 29, 60, "Output",
+ CellTags->"QuarkPropagator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9118, 301},
- {"QuarkPropagator", 9260, 305}
+ {"PrimaryExamplesSection", 13451, 461},
+ {"QuarkPropagator", 13593, 465}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3155, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 451, 13, 83, "Usage",
- CellID->982511436],
+Cell[3745, 99, 292, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3401, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1452880142],
+Cell[4062, 114, 674, 20, 148, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[3814, 114, 196, 6, 25, "ExampleSection",
- CellID->2017901716],
+Cell[4761, 138, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->377938345],
+Cell[5502, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5536, 166, 271, 9, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4035, 124, 148, 4, 27, "Input",
- CellTags->"QuarkPropagator",
- CellID->1137505588],
-Cell[4186, 130, 639, 18, 56, "Output",
- CellTags->"QuarkPropagator",
- CellID->759410596]
+Cell[5832, 179, 98, 2, 70, "Input"],
+Cell[5933, 183, 590, 16, 56, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4862, 153, 205, 6, 27, "Input",
+Cell[6584, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->708793879],
+Cell[CellGroupData[{
+Cell[6996, 225, 195, 6, 26, "ExampleSection",
+ CellID->438324506],
+Cell[CellGroupData[{
+Cell[7216, 235, 205, 6, 27, "Input",
CellTags->"QuarkPropagator",
CellID->1589814930],
-Cell[5070, 161, 456, 17, 68, "Output",
- CellTags->"QuarkPropagator",
- CellID->1709152205]
+Cell[7424, 243, 651, 24, 60, "Output",
+ CellTags->"QuarkPropagator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5563, 183, 254, 8, 27, "Input",
+Cell[8112, 272, 254, 8, 27, "Input",
CellTags->"QuarkPropagator",
CellID->1965811029],
-Cell[5820, 193, 569, 21, 68, "Output",
- CellTags->"QuarkPropagator",
- CellID->545226998]
+Cell[8369, 282, 848, 29, 60, "Output",
+ CellTags->"QuarkPropagator"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9254, 316, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9384, 322, 125, 4, 27, "Input"],
+Cell[9512, 328, 262, 9, 39, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9811, 342, 84, 2, 27, "Input"],
+Cell[9898, 346, 818, 28, 60, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[6416, 218, 31, 0, 29, "SectionFooterSpacer"]
+Cell[10755, 379, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6484, 223, 270, 12, 31, "SeeAlsoSection",
+Cell[10823, 384, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[6757, 237, 438, 15, 32, "Text",
- CellTags->"QuarkPropagator",
- CellID->704256164]
+Cell[11096, 398, 391, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[7210, 255, 23, 0, 42, "FooterCell"]
+Cell[11502, 414, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI.nb
index 15c7385dc..1617d2122 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8692, 270]
-NotebookOptionsPosition[ 5434, 177]
-NotebookOutlinePosition[ 8077, 246]
-CellTagsIndexPosition[ 7972, 240]
+NotebookDataLength[ 8064, 231]
+NotebookOptionsPosition[ 5606, 169]
+NotebookOutlinePosition[ 7856, 223]
+CellTagsIndexPosition[ 7813, 220]
WindowTitle->RHI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RHI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RHI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/RHI.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$128210],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI2FC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI2FC"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RHI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RHI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/RHI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$222301],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RHI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RHI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,44 +141,6 @@ RHI[any, {a,b,c,d,e}, {al,be,ga,de,ep}]; \nRHI[{0,0,0,0,0},{a,b,c,d,e}, \
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"RHI",
- CellLabel->"In[1]:=",
- CellID->1055475085]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -168,9 +162,7 @@ Cell[TextData[{
ButtonNote->"RHI2FC"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RHI",
- CellID->1234981081]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -187,10 +179,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 7.381068}",
+ "built" -> "{2020, 1, 5, 19, 1, 18.175760}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -203,11 +195,11 @@ p.k1, y: p.k2, z: k1.k2. a: dl.k1, b: dl.k2, c: dl.(p-k1), d: dl.(p-k2), e: \
dl.(k1-k2), f: dl.(p+k1-k2), g: dl.(p-k1-k2) RHI[any___,{a,b,c,d,e,0,0}, \
{al,be,ga,de,ep}] simplifies to RHI[any, {a,b,c,d,e}, {al,be,ga,de,ep}]; \
RHI[{0,0,0,0,0},{a,b,c,d,e}, {al,be,ga,de,ep}] simplifies to RHI[{a,b,c,d,e}, \
-{al,be,ga,de,ep}].", "synonyms" -> {}, "title" -> "RHI", "titlemodifier" ->
- "", "windowtitle" -> "RHI", "type" -> "Symbol", "uri" ->
+{al,be,ga,de,ep}].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "RHI",
+ "titlemodifier" -> "", "windowtitle" -> "RHI", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/RHI"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -216,62 +208,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4137, 111, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "RHI"->{
- Cell[4731, 138, 88, 3, 70, "Input",
- CellTags->"RHI",
- CellID->1055475085],
- Cell[5175, 163, 217, 9, 70, "Text",
- CellTags->"RHI",
- CellID->1234981081]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7662, 226},
- {"RHI", 7784, 230}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2977, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 1247, 29, 70, "Usage",
+Cell[3555, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3838, 110, 1247, 29, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4137, 111, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[4541, 130, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4731, 138, 88, 3, 70, "Input",
- CellTags->"RHI",
- CellID->1055475085]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4868, 147, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4902, 149, 270, 12, 70, "SeeAlsoSection",
+Cell[5110, 143, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[5175, 163, 217, 9, 70, "Text",
- CellTags->"RHI",
- CellID->1234981081]
+Cell[5383, 157, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[5407, 175, 23, 0, 70, "FooterCell"]
+Cell[5579, 167, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI2FC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI2FC.nb
index af753d707..e6827ee89 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI2FC.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHI2FC.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8691, 269]
-NotebookOptionsPosition[ 5416, 176]
-NotebookOutlinePosition[ 8071, 245]
-CellTagsIndexPosition[ 7963, 239]
+NotebookDataLength[ 8042, 230]
+NotebookOptionsPosition[ 5583, 168]
+NotebookOutlinePosition[ 7834, 222]
+CellTagsIndexPosition[ 7791, 219]
WindowTitle->RHI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RHI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RHI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/RHI.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$127859],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI2FC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI2FC"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RHI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RHI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/RHI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$221853],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RHI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RHI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,44 +140,6 @@ RHI[any, {a,b,c,d,e}, {al,be,ga,de,ep}]; \nRHI[{0,0,0,0,0},{a,b,c,d,e}, \
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"RHI2FC",
- CellLabel->"In[1]:=",
- CellID->729912401]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -167,9 +161,7 @@ Cell[TextData[{
ButtonNote->"RHI2FC"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RHI2FC",
- CellID->2129471313]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -186,10 +178,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 6.067246}",
+ "built" -> "{2020, 1, 5, 19, 1, 17.156224}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -202,11 +194,11 @@ p.k1, y: p.k2, z: k1.k2. a: dl.k1, b: dl.k2, c: dl.(p-k1), d: dl.(p-k2), e: \
dl.(k1-k2), f: dl.(p+k1-k2), g: dl.(p-k1-k2) RHI[any___,{a,b,c,d,e,0,0}, \
{al,be,ga,de,ep}] simplifies to RHI[any, {a,b,c,d,e}, {al,be,ga,de,ep}]; \
RHI[{0,0,0,0,0},{a,b,c,d,e}, {al,be,ga,de,ep}] simplifies to RHI[{a,b,c,d,e}, \
-{al,be,ga,de,ep}].", "synonyms" -> {}, "title" -> "RHI", "titlemodifier" ->
- "", "windowtitle" -> "RHI", "type" -> "Symbol", "uri" ->
+{al,be,ga,de,ep}].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "RHI",
+ "titlemodifier" -> "", "windowtitle" -> "RHI", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/RHI"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -215,62 +207,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4114, 110, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "RHI2FC"->{
- Cell[4708, 137, 90, 3, 70, "Input",
- CellTags->"RHI2FC",
- CellID->729912401],
- Cell[5154, 162, 220, 9, 70, "Text",
- CellTags->"RHI2FC",
- CellID->2129471313]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7645, 225},
- {"RHI2FC", 7770, 229}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2977, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 1224, 28, 70, "Usage",
+Cell[3555, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3838, 110, 1224, 28, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4114, 110, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[4518, 129, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4708, 137, 90, 3, 70, "Input",
- CellTags->"RHI2FC",
- CellID->729912401]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4847, 146, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4881, 148, 270, 12, 70, "SeeAlsoSection",
+Cell[5087, 142, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[5154, 162, 220, 9, 70, "Text",
- CellTags->"RHI2FC",
- CellID->2129471313]
+Cell[5360, 156, 181, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[5389, 174, 23, 0, 70, "FooterCell"]
+Cell[5556, 166, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHM.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHM.nb
index f0e78fd6f..3cd4b071b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHM.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHM.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7285, 245]
-NotebookOptionsPosition[ 4547, 160]
-NotebookOutlinePosition[ 6673, 221]
-CellTagsIndexPosition[ 6568, 215]
+NotebookDataLength[ 6661, 207]
+NotebookOptionsPosition[ 4714, 152]
+NotebookOutlinePosition[ 6454, 199]
+CellTagsIndexPosition[ 6411, 196]
WindowTitle->RHM
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RHM\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RHM"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/RHM.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$128561],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHM",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RHM\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RHM"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/RHM.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$222749],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHM",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RHM", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RHM", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -92,44 +124,6 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"RHM",
- CellLabel->"In[1]:=",
- CellID->233473012]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -151,9 +145,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RHM",
- CellID->1366061454]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -170,19 +162,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 8.631149}",
+ "built" -> "{2020, 1, 5, 19, 1, 19.155566}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "RHM[] is like RHI[], gives Gamma functions.",
- "synonyms" -> {}, "title" -> "RHM", "titlemodifier" -> "", "windowtitle" ->
- "RHM", "type" -> "Symbol", "uri" -> "FeynCalc/ref/RHM"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "RHM", "titlemodifier" ->
+ "", "windowtitle" -> "RHM", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/RHM"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -191,62 +184,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3260, 94, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "RHM"->{
- Cell[3854, 121, 87, 3, 70, "Input",
- CellTags->"RHM",
- CellID->233473012],
- Cell[4297, 146, 208, 9, 70, "Text",
- CellTags->"RHM",
- CellID->1366061454]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 6260, 201},
- {"RHM", 6381, 205}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2971, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 370, 12, 70, "Usage",
+Cell[3549, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3832, 110, 370, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3260, 94, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[3664, 113, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[3854, 121, 87, 3, 70, "Input",
- CellTags->"RHM",
- CellID->233473012]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3990, 130, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4024, 132, 270, 12, 70, "SeeAlsoSection",
+Cell[4227, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4297, 146, 208, 9, 70, "Text",
- CellTags->"RHM",
- CellID->1366061454]
+Cell[4500, 140, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4520, 158, 23, 0, 70, "FooterCell"]
+Cell[4687, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHO.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHO.nb
index 5b2594ce5..106d37a87 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHO.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHO.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7658, 250]
-NotebookOptionsPosition[ 4733, 162]
-NotebookOutlinePosition[ 7046, 226]
-CellTagsIndexPosition[ 6941, 220]
+NotebookDataLength[ 7034, 212]
+NotebookOptionsPosition[ 4900, 154]
+NotebookOutlinePosition[ 6827, 204]
+CellTagsIndexPosition[ 6784, 201]
WindowTitle->RHO
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RHO\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RHO"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/RHO.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$128912],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHO",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RHO\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RHO"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/RHO.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$223197],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHO",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RHO", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RHO", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -94,44 +126,6 @@ suppressed. The explicit expressions may be recovered by RHO[i, mu, nu, p]."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"RHO",
- CellLabel->"In[1]:=",
- CellID->868607428]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -153,9 +147,7 @@ Cell[TextData[{
ButtonNote->"RHI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RHO",
- CellID->2131383850]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -172,10 +164,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 9.868159}",
+ "built" -> "{2020, 1, 5, 19, 1, 20.020575}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -184,10 +176,11 @@ TaggingRules->{
"RHO[i] with i from 1 to 4 is an abbreviation for the 4 operators (eq. \
(3.2.17) -- (3.2.20)) defined in R.Hambergs thesis. The Lorentz indices are \
suppressed. The explicit expressions may be recovered by RHO[i, mu, nu, p].",
- "synonyms" -> {}, "title" -> "RHO", "titlemodifier" -> "", "windowtitle" ->
- "RHO", "type" -> "Symbol", "uri" -> "FeynCalc/ref/RHO"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "RHO", "titlemodifier" ->
+ "", "windowtitle" -> "RHO", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/RHO"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -196,62 +189,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3446, 96, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "RHO"->{
- Cell[4040, 123, 87, 3, 70, "Input",
- CellTags->"RHO",
- CellID->868607428],
- Cell[4483, 148, 208, 9, 70, "Text",
- CellTags->"RHO",
- CellID->2131383850]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 6633, 206},
- {"RHO", 6754, 210}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2971, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 556, 14, 70, "Usage",
+Cell[3549, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3832, 110, 556, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3446, 96, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[3850, 115, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4040, 123, 87, 3, 70, "Input",
- CellTags->"RHO",
- CellID->868607428]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4176, 132, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4210, 134, 270, 12, 70, "SeeAlsoSection",
+Cell[4413, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4483, 148, 208, 9, 70, "Text",
- CellTags->"RHO",
- CellID->2131383850]
+Cell[4686, 142, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4706, 160, 23, 0, 70, "FooterCell"]
+Cell[4873, 152, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHP.nb
index c36d24d08..a04d7ccc0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RHP.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7732, 253]
-NotebookOptionsPosition[ 4799, 164]
-NotebookOutlinePosition[ 7120, 229]
-CellTagsIndexPosition[ 7015, 223]
+NotebookDataLength[ 7102, 214]
+NotebookOptionsPosition[ 4966, 156]
+NotebookOutlinePosition[ 6895, 206]
+CellTagsIndexPosition[ 6852, 203]
WindowTitle->RHP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RHP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RHP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/RHP.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$129263],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"RHO\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/RHO"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RHP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RHP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/RHP.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$223645],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/RHP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RHP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RHP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,44 +128,6 @@ nu. See the thesis of Roelof Hamberg (but correcting a misprint)."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"RHP",
- CellLabel->"In[1]:=",
- CellID->374441694]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -155,9 +149,7 @@ Cell[TextData[{
ButtonNote->"RHO"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RHP",
- CellID->1242736892]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -174,10 +166,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 11.170645}",
+ "built" -> "{2020, 1, 5, 19, 1, 21.063925}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -186,11 +178,11 @@ TaggingRules->{
"RHP[i, mu, nu, p] with i from 1 to 4 gives the projectors for RHO[i]. \
RHP[mu, nu, p] gives Sum[RHP[i,mu, nu, p] RHO[i], {i, 4}] collected with \
respect to mu and nu. See the thesis of Roelof Hamberg (but correcting a \
-misprint).", "synonyms" -> {}, "title" -> "RHP", "titlemodifier" -> "",
- "windowtitle" -> "RHP", "type" -> "Symbol", "uri" ->
+misprint).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "RHP",
+ "titlemodifier" -> "", "windowtitle" -> "RHP", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/RHP"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -199,62 +191,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3512, 98, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "RHP"->{
- Cell[4106, 125, 87, 3, 70, "Input",
- CellTags->"RHP",
- CellID->374441694],
- Cell[4549, 150, 208, 9, 70, "Text",
- CellTags->"RHP",
- CellID->1242736892]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 6707, 209},
- {"RHP", 6828, 213}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2971, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 622, 16, 70, "Usage",
+Cell[3549, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3832, 110, 622, 16, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3512, 98, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[3916, 117, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4106, 125, 87, 3, 70, "Input",
- CellTags->"RHP",
- CellID->374441694]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4242, 134, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4276, 136, 270, 12, 70, "SeeAlsoSection",
+Cell[4479, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4549, 150, 208, 9, 70, "Text",
- CellTags->"RHP",
- CellID->1242736892]
+Cell[4752, 144, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4772, 162, 23, 0, 70, "FooterCell"]
+Cell[4939, 154, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RTL.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RTL.nb
index 1e951e588..11595612a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RTL.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RTL.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7660, 254]
-NotebookOptionsPosition[ 4810, 167]
-NotebookOutlinePosition[ 7047, 230]
-CellTagsIndexPosition[ 6942, 224]
+NotebookDataLength[ 7119, 217]
+NotebookOptionsPosition[ 5062, 160]
+NotebookOutlinePosition[ 6911, 209]
+CellTagsIndexPosition[ 6868, 206]
WindowTitle->RTL
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RTL\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RTL"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/RTL.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$129950],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/RTL",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI"], "\<\"Epsilon\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Epsilon"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RTL\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RTL"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/RTL.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$224535],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/RTL",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RTL", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RTL", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,44 +126,6 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"RTL",
- CellLabel->"In[1]:=",
- CellID->1882300186]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -158,9 +153,7 @@ Cell[TextData[{
ButtonNote->"Epsilon"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RTL",
- CellID->463893301]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -177,10 +170,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 14.054988}",
+ "built" -> "{2020, 1, 5, 19, 1, 23.125077}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -188,10 +181,11 @@ TaggingRules->{
"None", "summary" ->
"RTL[exp] inserts the list of known TLI integrals into exp, substitutes D\
\\[RightArrow]4+Epsilon and expands around Epsilon up to the finite part.",
- "synonyms" -> {}, "title" -> "RTL", "titlemodifier" -> "", "windowtitle" ->
- "RTL", "type" -> "Symbol", "uri" -> "FeynCalc/ref/RTL"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "RTL", "titlemodifier" ->
+ "", "windowtitle" -> "RTL", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/RTL"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -200,62 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3367, 95, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "RTL"->{
- Cell[3961, 122, 88, 3, 70, "Input",
- CellTags->"RTL",
- CellID->1882300186],
- Cell[4405, 147, 363, 15, 70, "Text",
- CellTags->"RTL",
- CellID->463893301]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 6633, 210},
- {"RTL", 6754, 214}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 3056, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 477, 13, 70, "Usage",
+Cell[3634, 98, 280, 11, 70, "ObjectNameGrid"],
+Cell[3917, 111, 477, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3367, 95, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[3771, 114, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[3961, 122, 88, 3, 70, "Input",
- CellTags->"RTL",
- CellID->1882300186]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4098, 131, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4132, 133, 270, 12, 70, "SeeAlsoSection",
+Cell[4419, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4405, 147, 363, 15, 70, "Text",
- CellTags->"RTL",
- CellID->463893301]
+Cell[4692, 142, 328, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4783, 165, 23, 0, 70, "FooterCell"]
+Cell[5035, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceGamma.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceGamma.nb
index abe9540a3..062655435 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceGamma.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceGamma.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6208, 189]
-NotebookOptionsPosition[ 3914, 122]
-NotebookOutlinePosition[ 5945, 178]
-CellTagsIndexPosition[ 5872, 173]
+NotebookDataLength[ 6904, 208]
+NotebookOptionsPosition[ 4835, 151]
+NotebookOutlinePosition[ 6697, 200]
+CellTagsIndexPosition[ 6654, 197]
WindowTitle->ReduceGamma
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ReduceGamma\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ReduceGamma"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ReduceGamma\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ReduceGamma"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ReduceGamma.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$126819],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ReduceGamma", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$220519],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ReduceGamma", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,15 +95,24 @@ ReduceGamma.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ReduceGamma", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ReduceGamma", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["ReduceGamma"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option of OneLoop. If set to True all DiracMatrix[6] and \
-DiracMatrix[7] (i.e. all ChiralityProjector) are reduced to Gamma5."
+ " \[LineSeparator]is an option of OneLoop. If set to True all GA[6] and \
+GA[7] (i.e. all chirality projectors) are reduced to Gamma5."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -113,9 +144,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ReduceGamma",
- CellID->581277123]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,22 +161,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 2.220666}",
+ "built" -> "{2020, 1, 5, 19, 1, 14.109009}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ReduceGamma is an option of OneLoop. If set to True all DiracMatrix[6] \
-and DiracMatrix[7] (i.e. all ChiralityProjector) are reduced to Gamma5.",
- "synonyms" -> {}, "title" -> "ReduceGamma", "titlemodifier" -> "",
+ "ReduceGamma is an option of OneLoop. If set to True all GA[6] and GA[7] \
+(i.e. all chirality projectors) are reduced to Gamma5.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "ReduceGamma", "titlemodifier" -> "",
"windowtitle" -> "ReduceGamma", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ReduceGamma"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -156,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "ReduceGamma"->{
- Cell[3645, 108, 227, 9, 70, "Text",
- CellTags->"ReduceGamma",
- CellID->581277123]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"ReduceGamma", 5759, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3013, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 446, 12, 70, "Usage",
+Cell[3599, 97, 288, 11, 70, "ObjectNameGrid"],
+Cell[3890, 110, 421, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3372, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4336, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3645, 108, 227, 9, 70, "Text",
- CellTags->"ReduceGamma",
- CellID->581277123]
+Cell[4609, 139, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3887, 120, 23, 0, 70, "FooterCell"]
+Cell[4808, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceToScalars.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceToScalars.nb
index 305bcd4aa..ddcbf1aac 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceToScalars.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ReduceToScalars.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6454, 195]
-NotebookOptionsPosition[ 4118, 128]
-NotebookOutlinePosition[ 6185, 184]
-CellTagsIndexPosition[ 6108, 179]
+NotebookDataLength[ 7262, 217]
+NotebookOptionsPosition[ 5149, 159]
+NotebookOutlinePosition[ 7054, 209]
+CellTagsIndexPosition[ 7011, 206]
WindowTitle->ReduceToScalars
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ReduceToScalars\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ReduceToScalars"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ReduceToScalars\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ReduceToScalars"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ReduceToScalars.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$127164],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ReduceToScalars", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$220962],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ReduceToScalars", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ ReduceToScalars.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ReduceToScalars", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ReduceToScalars", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +152,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ReduceToScalars",
- CellID->1934839663]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,10 +169,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 3.456228}",
+ "built" -> "{2020, 1, 5, 19, 1, 15.154057}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -149,11 +180,12 @@ TaggingRules->{
"None", "summary" ->
"ReduceToScalars is an option for OneLoop and OneLoopSum that specifies \
whether the result will be reduced to scalar A0, B0, C0 and D0 scalar \
-integrals.", "synonyms" -> {}, "title" -> "ReduceToScalars", "titlemodifier" ->
- "", "windowtitle" -> "ReduceToScalars", "type" -> "Symbol", "uri" ->
+integrals.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "ReduceToScalars", "titlemodifier" -> "", "windowtitle" ->
+ "ReduceToScalars", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/ReduceToScalars"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "ReduceToScalars"->{
- Cell[3679, 108, 397, 15, 70, "Text",
- CellTags->"ReduceToScalars",
- CellID->1934839663]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"ReduceToScalars", 5989, 172}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3119, 75, 70, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 456, 12, 70, "Usage",
+Cell[3709, 98, 292, 11, 70, "ObjectNameGrid"],
+Cell[4004, 111, 456, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3406, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4485, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3679, 108, 397, 15, 70, "Text",
- CellTags->"ReduceToScalars",
- CellID->1934839663]
+Cell[4758, 141, 349, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4091, 126, 23, 0, 70, "FooterCell"]
+Cell[5122, 157, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Rename.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Rename.nb
index 5ea3c8932..23fbc3fcd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Rename.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Rename.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6040, 188]
-NotebookOptionsPosition[ 3836, 122]
-NotebookOutlinePosition[ 5782, 177]
-CellTagsIndexPosition[ 5714, 172]
+NotebookDataLength[ 6804, 208]
+NotebookOptionsPosition[ 4789, 152]
+NotebookOutlinePosition[ 6597, 200]
+CellTagsIndexPosition[ 6554, 197]
WindowTitle->Rename
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Rename\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Rename"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Rename.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Rename\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Rename"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Rename.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$127509],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Rename",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$221405],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Rename", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Rename", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Rename", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"Contract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Rename",
- CellID->345735960]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,21 +162,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 4.788383}",
+ "built" -> "{2020, 1, 5, 19, 1, 16.155323}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Rename is an option for Contract. If set to True, dummy indices in Eps \
-are renamed, using $MU[i].", "synonyms" -> {}, "title" -> "Rename",
- "titlemodifier" -> "", "windowtitle" -> "Rename", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Rename"}},
+are renamed, using $MU[i].", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Rename", "titlemodifier" -> "", "windowtitle" -> "Rename", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Rename"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Rename"->{
- Cell[3569, 108, 225, 9, 70, "Text",
- CellTags->"Rename",
- CellID->345735960]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Rename", 5606, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 70, "AnchorBarGrid",
+Cell[578, 21, 2994, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 401, 12, 70, "Usage",
+Cell[3575, 97, 283, 11, 70, "ObjectNameGrid"],
+Cell[3861, 110, 401, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3296, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4287, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3569, 108, 225, 9, 70, "Text",
- CellTags->"Rename",
- CellID->345735960]
+Cell[4560, 140, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3809, 120, 23, 0, 70, "FooterCell"]
+Cell[4762, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RightPartialD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RightPartialD.nb
index 658fae7f7..4de03425c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RightPartialD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RightPartialD.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12843, 455]
-NotebookOptionsPosition[ 8112, 304]
-NotebookOutlinePosition[ 11239, 394]
-CellTagsIndexPosition[ 11123, 388]
+NotebookDataLength[ 13515, 469]
+NotebookOptionsPosition[ 9162, 333]
+NotebookOutlinePosition[ 12072, 416]
+CellTagsIndexPosition[ 11955, 410]
WindowTitle->RightPartialD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RightPartialD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RightPartialD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExpandPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandPartialD"], "\<\"FCPartialD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PartialD"], "\<\"LeftPartialD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/LeftPartialD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RightPartialD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RightPartialD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
RightPartialD.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$129607],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/RightPartialD", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$224089],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/RightPartialD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ RightPartialD.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RightPartialD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RightPartialD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1428598870],
+ CellID->1777068154],
Cell[CellGroupData[{
@@ -121,7 +157,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->709509502],
+ CellID->2097032936],
Cell[CellGroupData[{
@@ -139,12 +175,11 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 27},
+ ImageSize->{23, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RightPartialD",
- CellLabel->"Out[1]=",
- CellID->1461309897]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -173,12 +208,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\[Mu]",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{47, 27},
+ ImageSize->{50, 24},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RightPartialD",
- CellLabel->"Out[2]=",
- CellID->1675009373]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -192,24 +226,24 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["\[PartialD]",
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- SubsuperscriptBox[
+ SubscriptBox[
FormBox["A",
TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm], "\[Null]"]}], TraditionalForm]], "Output",
- ImageSize->{40, 19},
+ TraditionalForm]], ")"}], TraditionalForm]], "Output",
+ ImageSize->{59, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RightPartialD",
- CellLabel->"Out[3]=",
- CellID->528358345]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -226,12 +260,11 @@ Cell[BoxData[
RowBox[{"FCPartialD", "[",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",", "A", ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}]}], "]"}]], "Output",
- ImageSize->{496, 15},
+ ImageSize->{500, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RightPartialD",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1851835493]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -247,12 +280,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"RightPartialD", "[",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Output",
- ImageSize->{247, 15},
+ ImageSize->{250, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RightPartialD",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1374997587]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -275,29 +307,26 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[RawData["\<\
Cell[TextData[{
- ButtonBox[\"ExpandPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/ExpandPartialD\",
- ButtonNote->\"ExpandPartialD\"],
- \", \",
- ButtonBox[\"FCPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/PartialD\",
- ButtonNote->\"FCPartialD\"],
- \", \",
- ButtonBox[\"LeftPartialD\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/LeftPartialD\",
- ButtonNote->\"LeftPartialD\"],
- \".\"
-}], \"Text\",
- CellTags->\"RightPartialD\",
- CellID->1409903491]\
-\>"], "Text",
- CellTags->"RightPartialD",
- CellID->1409903491]
+ StyleBox[ButtonBox["ExpandPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExpandPartialD",
+ ButtonNote->"ExpandPartialD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PartialD",
+ ButtonNote->"FCPartialD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["LeftPartialD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LeftPartialD",
+ ButtonNote->"LeftPartialD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -314,21 +343,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 12.499631}",
+ "built" -> "{2020, 1, 5, 19, 1, 22.076186}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"RightPartialD[mu] denotes \\[PartialD]\\[Mu], acting to the right.",
- "synonyms" -> {}, "title" -> "RightPartialD", "titlemodifier" -> "",
- "windowtitle" -> "RightPartialD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/RightPartialD"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "RightPartialD",
+ "titlemodifier" -> "", "windowtitle" -> "RightPartialD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/RightPartialD"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -337,7 +367,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -346,117 +376,101 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3425, 98, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4626, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1428598870]},
+ CellID->1777068154]},
"RightPartialD"->{
- Cell[4058, 127, 140, 4, 27, "Input",
+ Cell[5260, 163, 140, 4, 27, "Input",
CellTags->"RightPartialD",
CellID->27121698],
- Cell[4201, 133, 357, 13, 48, "Output",
- CellTags->"RightPartialD",
- CellID->1461309897],
- Cell[4595, 151, 273, 8, 27, "Input",
+ Cell[5403, 169, 336, 12, 45, "Output",
+ CellTags->"RightPartialD"],
+ Cell[5776, 186, 273, 8, 27, "Input",
CellTags->"RightPartialD",
CellID->1087611627],
- Cell[4871, 161, 485, 19, 48, "Output",
- CellTags->"RightPartialD",
- CellID->1675009373],
- Cell[5393, 185, 139, 4, 27, "Input",
+ Cell[6052, 196, 464, 18, 45, "Output",
+ CellTags->"RightPartialD"],
+ Cell[6553, 219, 139, 4, 27, "Input",
CellTags->"RightPartialD",
CellID->1776931750],
- Cell[5535, 191, 496, 20, 40, "Output",
- CellTags->"RightPartialD",
- CellID->528358345],
- Cell[6068, 216, 132, 4, 27, "Input",
+ Cell[6695, 225, 485, 20, 40, "Output",
+ CellTags->"RightPartialD"],
+ Cell[7217, 250, 132, 4, 27, "Input",
CellTags->"RightPartialD",
CellID->887044202],
- Cell[6203, 222, 400, 11, 49, "Output",
- CellTags->"RightPartialD",
- CellID->1851835493],
- Cell[6640, 238, 179, 6, 27, "Input",
+ Cell[7352, 256, 379, 10, 51, "Output",
+ CellTags->"RightPartialD"],
+ Cell[7768, 271, 179, 6, 27, "Input",
CellTags->"RightPartialD",
CellID->472956421],
- Cell[6822, 246, 284, 8, 49, "Output",
- CellTags->"RightPartialD",
- CellID->1374997587],
- Cell[7474, 277, 596, 22, 70, "Text",
- CellTags->"RightPartialD",
- CellID->1409903491]}
+ Cell[7950, 279, 263, 7, 51, "Output",
+ CellTags->"RightPartialD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9932, 347},
- {"RightPartialD", 10072, 351}
+ {"PrimaryExamplesSection", 10970, 377},
+ {"RightPartialD", 11111, 381}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3233, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 487, 16, 86, "Usage",
+Cell[3821, 101, 290, 11, 45, "ObjectNameGrid"],
+Cell[4114, 114, 487, 16, 88, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3425, 98, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4626, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1428598870],
+ CellID->1777068154],
Cell[CellGroupData[{
-Cell[3838, 117, 195, 6, 25, "ExampleSection",
- CellID->709509502],
+Cell[5039, 153, 196, 6, 26, "ExampleSection",
+ CellID->2097032936],
Cell[CellGroupData[{
-Cell[4058, 127, 140, 4, 27, "Input",
+Cell[5260, 163, 140, 4, 27, "Input",
CellTags->"RightPartialD",
CellID->27121698],
-Cell[4201, 133, 357, 13, 48, "Output",
- CellTags->"RightPartialD",
- CellID->1461309897]
+Cell[5403, 169, 336, 12, 45, "Output",
+ CellTags->"RightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4595, 151, 273, 8, 27, "Input",
+Cell[5776, 186, 273, 8, 27, "Input",
CellTags->"RightPartialD",
CellID->1087611627],
-Cell[4871, 161, 485, 19, 48, "Output",
- CellTags->"RightPartialD",
- CellID->1675009373]
+Cell[6052, 196, 464, 18, 45, "Output",
+ CellTags->"RightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5393, 185, 139, 4, 27, "Input",
+Cell[6553, 219, 139, 4, 27, "Input",
CellTags->"RightPartialD",
CellID->1776931750],
-Cell[5535, 191, 496, 20, 40, "Output",
- CellTags->"RightPartialD",
- CellID->528358345]
+Cell[6695, 225, 485, 20, 40, "Output",
+ CellTags->"RightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6068, 216, 132, 4, 27, "Input",
+Cell[7217, 250, 132, 4, 27, "Input",
CellTags->"RightPartialD",
CellID->887044202],
-Cell[6203, 222, 400, 11, 49, "Output",
- CellTags->"RightPartialD",
- CellID->1851835493]
+Cell[7352, 256, 379, 10, 51, "Output",
+ CellTags->"RightPartialD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6640, 238, 179, 6, 27, "Input",
+Cell[7768, 271, 179, 6, 27, "Input",
CellTags->"RightPartialD",
CellID->472956421],
-Cell[6822, 246, 284, 8, 49, "Output",
- CellTags->"RightPartialD",
- CellID->1374997587]
+Cell[7950, 279, 263, 7, 51, "Output",
+ CellTags->"RightPartialD"]
}, Open ]]
}, Open ]],
-Cell[7133, 258, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8240, 290, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7201, 263, 270, 12, 31, "SeeAlsoSection",
+Cell[8308, 295, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7474, 277, 596, 22, 70, "Text",
- CellTags->"RightPartialD",
- CellID->1409903491]
+Cell[8581, 309, 539, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[8085, 302, 23, 0, 70, "FooterCell"]
+Cell[9135, 331, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RussianTrick.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RussianTrick.nb
index b90022ef3..9a52ce4bf 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/RussianTrick.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/RussianTrick.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 17283, 614]
-NotebookOptionsPosition[ 12127, 453]
-NotebookOutlinePosition[ 15590, 550]
-CellTagsIndexPosition[ 15474, 544]
+NotebookDataLength[ 23116, 807]
+NotebookOptionsPosition[ 18037, 652]
+NotebookOutlinePosition[ 21293, 741]
+CellTagsIndexPosition[ 21177, 735]
WindowTitle->RussianTrick
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/RussianTrick\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/RussianTrick"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FourDivergence\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FourDivergence"], "\<\"FourLaplacian\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FourLaplacian"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/RussianTrick\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/RussianTrick"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
RussianTrick.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$130297],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/RussianTrick", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$224981],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/RussianTrick", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ RussianTrick.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["RussianTrick", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["RussianTrick", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -84,11 +120,10 @@ Cell[BoxData[GridBox[{
RowBox[{"{",
RowBox[{"q1", ",", "q2", ",", "p"}], "}"}]}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "(=RussianTrick[exp,p,p,{q1,q2,p}]) does the integration by parts where \
-p is the external momentum. RussianTrick[exp, k,l, {q1,q2,p}] \
-(=RussianTrick[exp,k,l]) does integration by parts where l is the momentum to \
-be differentiated.\n\nThe result is an expression which is vanishing."
+ " \[LineSeparator](=RussianTrick[exp,p,p,{q1,q2,p}]) does the \
+integration by parts where p is the external momentum. RussianTrick[exp, k,l, \
+{q1,q2,p}] (=RussianTrick[exp,k,l]) does integration by parts where l is the \
+momentum to be differentiated."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -99,6 +134,41 @@ be differentiated.\n\nThe result is an expression which is vanishing."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1328140832],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["The result is an expression which is vanishing.", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -114,7 +184,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1414267960],
+ CellID->1229599249],
Cell[CellGroupData[{
@@ -124,7 +194,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2071258702],
+ CellID->1465108529],
Cell[CellGroupData[{
@@ -163,12 +233,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["0",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{88, 20},
+ ImageSize->{89, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RussianTrick",
- CellLabel->"Out[1]=",
- CellID->2099872204]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -203,47 +272,114 @@ Cell[BoxData[
FormBox["\<\")\"\>",
TraditionalForm]}], "2"], "/",
RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox[
RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D],
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox[
RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "-",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D],
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D], -FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D], -FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}]}], TraditionalForm]], "Output",
- ImageSize->{520, 43},
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D] - FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D], FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D] - FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D]]],
+ Editable->False]}]}], TraditionalForm]], "Output",
+ ImageSize->{541, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RussianTrick",
- CellLabel->"Out[2]=",
- CellID->1909433347]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -282,47 +418,114 @@ Cell[BoxData[
FormBox["\<\")\"\>",
TraditionalForm]}], "2"]}], ")"}], "/",
RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox[
RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D],
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D],
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D], -FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D] - FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D], FeynCalc`Momentum[
+ FeynCalc`FCGV["q1"], D] - FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}]}], TraditionalForm]], "Output",
- ImageSize->{520, 43},
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D], -FeynCalc`Momentum[
+ FeynCalc`FCGV["p"], D] + FeynCalc`Momentum[
+ FeynCalc`FCGV["q2"], D]]],
+ Editable->False]}]}], TraditionalForm]], "Output",
+ ImageSize->{541, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RussianTrick",
- CellLabel->"Out[3]=",
- CellID->2087454288]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -356,12 +559,11 @@ Cell[BoxData[
FormBox["0",
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{103, 20},
+ ImageSize->{107, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RussianTrick",
- CellLabel->"Out[4]=",
- CellID->641619861]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -401,8 +603,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RussianTrick",
- CellLabel->"Out[5]=",
- CellID->1453686089]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[BoxData[
@@ -444,17 +645,15 @@ Cell[TextData[{
ButtonNote->"FourLaplacian"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"RussianTrick",
- CellID->1345403817]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"RussianTrick",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -463,10 +662,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 15.233421}",
+ "built" -> "{2020, 1, 5, 19, 1, 24.011940}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -475,13 +674,12 @@ TaggingRules->{
"RussianTrick[exp, k, {q1, q2, p}] (=RussianTrick[exp,p,p,{q1,q2,p}]) \
does the integration by parts where p is the external momentum. \
RussianTrick[exp, k,l, {q1,q2,p}] (=RussianTrick[exp,k,l]) does integration \
-by parts where l is the momentum to be differentiated. The result is an \
-expression which is vanishing.", "synonyms" -> {}, "title" -> "RussianTrick",
- "titlemodifier" -> "", "windowtitle" -> "RussianTrick", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/RussianTrick"}, "SearchTextTranslated" ->
- ""},
+by parts where l is the momentum to be differentiated.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "RussianTrick", "titlemodifier" -> "",
+ "windowtitle" -> "RussianTrick", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/RussianTrick"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -489,8 +687,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -499,123 +698,117 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3693, 101, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5672, 171, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1414267960]},
+ CellID->1229599249]},
"RussianTrick"->{
- Cell[4327, 130, 387, 13, 27, "Input",
+ Cell[6306, 200, 387, 13, 27, "Input",
CellTags->"RussianTrick",
CellID->202624512],
- Cell[4717, 145, 606, 25, 41, "Output",
- CellTags->"RussianTrick",
- CellID->2099872204],
- Cell[5360, 175, 125, 4, 27, "Input",
+ Cell[6696, 215, 585, 24, 42, "Output",
+ CellTags->"RussianTrick"],
+ Cell[7318, 244, 125, 4, 27, "Input",
CellTags->"RussianTrick",
CellID->195595910],
- Cell[5488, 181, 1772, 64, 64, "Output",
- CellTags->"RussianTrick",
- CellID->1909433347],
- Cell[7297, 250, 189, 6, 27, "Input",
+ Cell[7446, 250, 3791, 131, 62, "Output",
+ CellTags->"RussianTrick"],
+ Cell[11274, 386, 189, 6, 27, "Input",
CellTags->"RussianTrick",
CellID->767131830],
- Cell[7489, 258, 1861, 66, 64, "Output",
- CellTags->"RussianTrick",
- CellID->2087454288],
- Cell[9387, 329, 130, 4, 27, "Input",
+ Cell[11466, 394, 3880, 133, 63, "Output",
+ CellTags->"RussianTrick"],
+ Cell[15383, 532, 130, 4, 27, "Input",
CellTags->"RussianTrick",
CellID->2066492260],
- Cell[9520, 335, 699, 28, 41, "Output",
- CellTags->"RussianTrick",
- CellID->641619861],
- Cell[10256, 368, 153, 5, 27, "Input",
+ Cell[15516, 538, 679, 27, 42, "Output",
+ CellTags->"RussianTrick"],
+ Cell[16232, 570, 153, 5, 27, "Input",
CellTags->"RussianTrick",
CellID->1029114011],
- Cell[10412, 375, 750, 29, 42, "Output",
- CellTags->"RussianTrick",
- CellID->1453686089],
- Cell[11177, 407, 128, 4, 27, "Input",
+ Cell[16388, 577, 729, 28, 42, "Output",
+ CellTags->"RussianTrick"],
+ Cell[17132, 608, 128, 4, 27, "Input",
CellTags->"RussianTrick",
- CellID->659830929],
- Cell[11661, 433, 424, 15, 32, "Text",
- CellTags->"RussianTrick",
- CellID->1345403817]}
+ CellID->659830929]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14194, 500},
- {"RussianTrick", 14334, 504}
+ {"PrimaryExamplesSection", 20098, 699},
+ {"RussianTrick", 20238, 703}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 51, "AnchorBarGrid",
+Cell[584, 21, 3135, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 761, 19, 162, "Usage",
+Cell[3722, 99, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4036, 114, 701, 18, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3693, 101, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4762, 136, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1328140832],
+Cell[5504, 162, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5538, 164, 85, 1, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5672, 171, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1414267960],
+ CellID->1229599249],
Cell[CellGroupData[{
-Cell[4106, 120, 196, 6, 25, "ExampleSection",
- CellID->2071258702],
+Cell[6085, 190, 196, 6, 26, "ExampleSection",
+ CellID->1465108529],
Cell[CellGroupData[{
-Cell[4327, 130, 387, 13, 27, "Input",
+Cell[6306, 200, 387, 13, 27, "Input",
CellTags->"RussianTrick",
CellID->202624512],
-Cell[4717, 145, 606, 25, 41, "Output",
- CellTags->"RussianTrick",
- CellID->2099872204]
+Cell[6696, 215, 585, 24, 42, "Output",
+ CellTags->"RussianTrick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5360, 175, 125, 4, 27, "Input",
+Cell[7318, 244, 125, 4, 27, "Input",
CellTags->"RussianTrick",
CellID->195595910],
-Cell[5488, 181, 1772, 64, 64, "Output",
- CellTags->"RussianTrick",
- CellID->1909433347]
+Cell[7446, 250, 3791, 131, 62, "Output",
+ CellTags->"RussianTrick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7297, 250, 189, 6, 27, "Input",
+Cell[11274, 386, 189, 6, 27, "Input",
CellTags->"RussianTrick",
CellID->767131830],
-Cell[7489, 258, 1861, 66, 64, "Output",
- CellTags->"RussianTrick",
- CellID->2087454288]
+Cell[11466, 394, 3880, 133, 63, "Output",
+ CellTags->"RussianTrick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9387, 329, 130, 4, 27, "Input",
+Cell[15383, 532, 130, 4, 27, "Input",
CellTags->"RussianTrick",
CellID->2066492260],
-Cell[9520, 335, 699, 28, 41, "Output",
- CellTags->"RussianTrick",
- CellID->641619861]
+Cell[15516, 538, 679, 27, 42, "Output",
+ CellTags->"RussianTrick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10256, 368, 153, 5, 27, "Input",
+Cell[16232, 570, 153, 5, 27, "Input",
CellTags->"RussianTrick",
CellID->1029114011],
-Cell[10412, 375, 750, 29, 42, "Output",
- CellTags->"RussianTrick",
- CellID->1453686089]
+Cell[16388, 577, 729, 28, 42, "Output",
+ CellTags->"RussianTrick"]
}, Open ]],
-Cell[11177, 407, 128, 4, 27, "Input",
+Cell[17132, 608, 128, 4, 27, "Input",
CellTags->"RussianTrick",
CellID->659830929]
}, Open ]],
-Cell[11320, 414, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17275, 615, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11388, 419, 270, 12, 31, "SeeAlsoSection",
+Cell[17343, 620, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[11661, 433, 424, 15, 32, "Text",
- CellTags->"RussianTrick",
- CellID->1345403817]
+Cell[17616, 634, 379, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[12100, 451, 23, 0, 42, "FooterCell"]
+Cell[18010, 650, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SD.nb
index 6d83e4901..c422e9620 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SD.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9963, 351]
-NotebookOptionsPosition[ 6141, 227]
-NotebookOutlinePosition[ 8853, 306]
-CellTagsIndexPosition[ 8749, 300]
+NotebookDataLength[ 10605, 365]
+NotebookOptionsPosition[ 6985, 251]
+NotebookOutlinePosition[ 9605, 326]
+CellTagsIndexPosition[ 9501, 320]
WindowTitle->SD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$132709],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNDelta\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SD.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$228084],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +95,26 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SD", "[",
RowBox[{"i", ",", " ", "j"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the (FeynCalc-external) Kronecker-delta for SU(",
- StyleBox["N",
- FontSlant->"Italic"],
- ") with color indices i and j. SD[i,j] is transformed into \
+ " \[LineSeparator]denotes the SU(N) Kronecker delta with color indices i \
+and j in the adjoint represnetation. SD[i,j] is transformed into \
SUNDelta[SUNIndex[i],SUNIndex[j]] by FeynCalcInternal."
}]]}
}]], "Usage",
@@ -112,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1806139957],
+ CellID->1337573792],
Cell[CellGroupData[{
@@ -122,7 +151,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1894505946],
+ CellID->986174178],
Cell[CellGroupData[{
@@ -141,12 +170,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{33, 19},
+ ImageSize->{35, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SD",
- CellLabel->"Out[1]=",
- CellID->181124899]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -163,12 +191,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}]], "Output",
- ImageSize->{277, 15},
+ ImageSize->{280, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SD",
- CellLabel->"Out[2]//StandardForm=",
- CellID->2135323799]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -183,12 +210,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SD", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{68, 15},
+ ImageSize->{70, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->850743885]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -218,17 +244,15 @@ Cell[TextData[{
ButtonNote->"SUNDelta"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SD",
- CellID->2009139529]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -237,22 +261,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 26.872182}",
+ "built" -> "{2020, 1, 5, 19, 1, 32.221597}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SD[i, j] is the (FeynCalc-external) Kronecker-delta for SU(N) with color \
-indices i and j. SD[i,j] is transformed into \
+ "SD[i, j] denotes the SU(N) Kronecker delta with color indices i and j in \
+the adjoint represnetation. SD[i,j] is transformed into \
SUNDelta[SUNIndex[i],SUNIndex[j]] by FeynCalcInternal.", "synonyms" -> {},
- "title" -> "SD", "titlemodifier" -> "", "windowtitle" -> "SD", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SD"}, "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "SD", "titlemodifier" -> "", "windowtitle" ->
+ "SD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SD"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -260,8 +285,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -270,89 +296,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3474, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4415, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1806139957]},
+ CellID->1337573792]},
"SD"->{
- Cell[4108, 128, 138, 5, 27, "Input",
+ Cell[5048, 157, 138, 5, 27, "Input",
CellTags->"SD",
CellID->476174335],
- Cell[4249, 135, 325, 13, 40, "Output",
- CellTags->"SD",
- CellID->181124899],
- Cell[4611, 153, 148, 5, 27, "Input",
+ Cell[5189, 164, 305, 12, 38, "Output",
+ CellTags->"SD"],
+ Cell[5531, 181, 148, 5, 27, "Input",
CellTags->"SD",
CellID->1096492812],
- Cell[4762, 160, 320, 10, 49, "Output",
- CellTags->"SD",
- CellID->2135323799],
- Cell[5119, 175, 147, 5, 27, "Input",
+ Cell[5682, 188, 299, 9, 51, "Output",
+ CellTags->"SD"],
+ Cell[6018, 202, 147, 5, 27, "Input",
CellTags->"SD",
CellID->315527863],
- Cell[5269, 182, 240, 8, 49, "Output",
- CellTags->"SD",
- CellID->850743885],
- Cell[5877, 213, 222, 9, 31, "Text",
- CellTags->"SD",
- CellID->2009139529]}
+ Cell[6168, 209, 220, 7, 51, "Output",
+ CellTags->"SD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8022, 271},
- {"SD", 8151, 275}
+ {"PrimaryExamplesSection", 8922, 297},
+ {"SD", 9052, 301}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 2992, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 590, 17, 99, "Usage",
+Cell[3569, 97, 279, 11, 45, "ObjectNameGrid"],
+Cell[3851, 110, 539, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3474, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4415, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1806139957],
+ CellID->1337573792],
Cell[CellGroupData[{
-Cell[3887, 118, 196, 6, 25, "ExampleSection",
- CellID->1894505946],
+Cell[4828, 147, 195, 6, 26, "ExampleSection",
+ CellID->986174178],
Cell[CellGroupData[{
-Cell[4108, 128, 138, 5, 27, "Input",
+Cell[5048, 157, 138, 5, 27, "Input",
CellTags->"SD",
CellID->476174335],
-Cell[4249, 135, 325, 13, 40, "Output",
- CellTags->"SD",
- CellID->181124899]
+Cell[5189, 164, 305, 12, 38, "Output",
+ CellTags->"SD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4611, 153, 148, 5, 27, "Input",
+Cell[5531, 181, 148, 5, 27, "Input",
CellTags->"SD",
CellID->1096492812],
-Cell[4762, 160, 320, 10, 49, "Output",
- CellTags->"SD",
- CellID->2135323799]
+Cell[5682, 188, 299, 9, 51, "Output",
+ CellTags->"SD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5119, 175, 147, 5, 27, "Input",
+Cell[6018, 202, 147, 5, 27, "Input",
CellTags->"SD",
CellID->315527863],
-Cell[5269, 182, 240, 8, 49, "Output",
- CellTags->"SD",
- CellID->850743885]
+Cell[6168, 209, 220, 7, 51, "Output",
+ CellTags->"SD"]
}, Open ]]
}, Open ]],
-Cell[5536, 194, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6415, 220, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5604, 199, 270, 12, 31, "SeeAlsoSection",
+Cell[6483, 225, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5877, 213, 222, 9, 31, "Text",
- CellTags->"SD",
- CellID->2009139529]
+Cell[6756, 239, 187, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6114, 225, 23, 0, 42, "FooterCell"]
+Cell[6958, 249, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SDF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SDF.nb
new file mode 100644
index 000000000..5c7860484
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SDF.nb
@@ -0,0 +1,329 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9372, 319]
+NotebookOptionsPosition[ 5800, 205]
+NotebookOutlinePosition[ 8502, 283]
+CellTagsIndexPosition[ 8398, 277]
+WindowTitle->SDF
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SDF\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SDF"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SDF.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$227648],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SDF",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SDF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SDF", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes the SU(N) Kronecker delta with color indices i \
+and j in the fundamental represnetation. SDF[i,j] is transformed into \
+SUNFDelta[SUNFIndex[i],SUNFIndex[j]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1513383795],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1555907635],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Input",
+ CellTags->"SD",
+ CellLabel->"In[1]:=",
+ CellID->476174335],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SD",
+ CellLabel->"Out[1]=",
+ CellID->1696842737]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SD",
+ CellLabel->"In[2]:=",
+ CellID->1096492812],
+
+Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}]], "Output",
+ ImageSize->{304, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SD",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1791360550]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SD",
+ CellLabel->"In[3]:=",
+ CellID->315527863],
+
+Cell[BoxData[
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{78, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SD",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->344493145]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SDF",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 31.114272}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SDF[i, j] denotes the SU(N) Kronecker delta with color indices i and j \
+in the fundamental represnetation. SDF[i,j] is transformed into \
+SUNFDelta[SUNFIndex[i],SUNFIndex[j]] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SDF", "titlemodifier" -> "", "windowtitle" ->
+ "SDF", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SDF"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3695, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1513383795]},
+ "SD"->{
+ Cell[4329, 136, 139, 5, 27, "Input",
+ CellTags->"SD",
+ CellID->476174335],
+ Cell[4471, 143, 324, 13, 38, "Output",
+ CellTags->"SD",
+ CellID->1696842737],
+ Cell[4832, 161, 148, 5, 27, "Input",
+ CellTags->"SD",
+ CellID->1096492812],
+ Cell[4983, 168, 323, 10, 51, "Output",
+ CellTags->"SD",
+ CellID->1791360550],
+ Cell[5343, 183, 147, 5, 27, "Input",
+ CellTags->"SD",
+ CellID->315527863],
+ Cell[5493, 190, 241, 8, 51, "Output",
+ CellTags->"SD",
+ CellID->344493145]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7750, 251},
+ {"SD", 7880, 255}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 543, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3695, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1513383795],
+Cell[CellGroupData[{
+Cell[4108, 126, 196, 6, 26, "ExampleSection",
+ CellID->1555907635],
+Cell[CellGroupData[{
+Cell[4329, 136, 139, 5, 27, "Input",
+ CellTags->"SD",
+ CellID->476174335],
+Cell[4471, 143, 324, 13, 38, "Output",
+ CellTags->"SD",
+ CellID->1696842737]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4832, 161, 148, 5, 27, "Input",
+ CellTags->"SD",
+ CellID->1096492812],
+Cell[4983, 168, 323, 10, 51, "Output",
+ CellTags->"SD",
+ CellID->1791360550]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5343, 183, 147, 5, 27, "Input",
+ CellTags->"SD",
+ CellID->315527863],
+Cell[5493, 190, 241, 8, 51, "Output",
+ CellTags->"SD",
+ CellID->344493145]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5773, 203, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SFAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SFAD.nb
new file mode 100644
index 000000000..48bb0824e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SFAD.nb
@@ -0,0 +1,462 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 13794, 452]
+NotebookOptionsPosition[ 9771, 337]
+NotebookOutlinePosition[ 12494, 402]
+CellTagsIndexPosition[ 12409, 397]
+WindowTitle->SFAD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SFAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SFAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SFAD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$232030],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SFAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SFAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"q1", "+"}], "..."}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"p1", ".", "q2"}], "+"}], "..."}], ","}], "}"}], " ",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], ",", "s"}], "}"}]}], ",", "n"}], "}"}],
+ ",", "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a Lorentzian propagator given by 1/[(q1+...)^2 \
++ p1.q2 ... + m^2 + sign*I*eta]^n, where q1^2 and p1.q2 are scalar products \
+of Lorentz vectors in D dimensions. For brevity one can also use shorter \
+forms such as SFAD[{q1+ ..., m^2}, ...], SFAD[{q1+ ..., m^2 , n}, ...], \
+SFAD[{q1+ ..., {m^2, -1}}, ...], SFAD[q1,...] etc. If s is not explicitly \
+specified, then its value is determined by the option EtaSign, which has the \
+default value +1. If n is not explicitly specified, then the default value 1 \
+is assumed. Translation into FeynCalc internal form is performed by \
+FeynCalcInternal, where a SFAD is encoded using the special head \
+StandardPropagatorDenominator."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->262819662],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SFAD", "]"}]], "Input",
+ CellLabel->"In[40]:=",
+ CellID->971493175],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"EtaSign", "\[Rule]", "1"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{192, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[40]=",
+ CellID->700586331]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->655036859],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->670386769],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->175037123],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->488189443]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->395343369],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1936993594]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1163062305],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{102, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1031711574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->310482442],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{118, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->123443100]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"SFAD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 42.350679}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SFAD[{{q1 + ..., p1.q2 + ...,} {m^2, s}, n}, ...] denotes a Lorentzian \
+propagator given by 1/[(q1+...)^2 + p1.q2 ... + m^2 + sign*I*eta]^n, where \
+q1^2 and p1.q2 are scalar products of Lorentz vectors in D dimensions. For \
+brevity one can also use shorter forms such as SFAD[{q1+ ..., m^2}, ...], \
+SFAD[{q1+ ..., m^2 , n}, ...], SFAD[{q1+ ..., {m^2, -1}}, ...], SFAD[q1,...] \
+etc. If s is not explicitly specified, then its value is determined by the \
+option EtaSign, which has the default value +1. If n is not explicitly \
+specified, then the default value 1 is assumed. Translation into FeynCalc \
+internal form is performed by FeynCalcInternal, where a SFAD is encoded using \
+the special head StandardPropagatorDenominator.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SFAD", "titlemodifier" -> "",
+ "windowtitle" -> "SFAD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SFAD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5927, 183, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->655036859]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12266, 390}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3142, 91, 1479, 35, 188, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4646, 130, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->262819662],
+Cell[5387, 156, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5443, 160, 107, 3, 70, "Input",
+ CellID->971493175],
+Cell[5553, 165, 313, 11, 37, "Output",
+ CellID->700586331]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5927, 183, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->655036859],
+Cell[CellGroupData[{
+Cell[6339, 202, 195, 6, 26, "ExampleSection",
+ CellID->670386769],
+Cell[CellGroupData[{
+Cell[6559, 212, 223, 8, 27, "Input",
+ CellID->175037123],
+Cell[6785, 222, 454, 13, 61, "Output",
+ CellID->488189443]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7276, 240, 298, 11, 27, "Input",
+ CellID->395343369],
+Cell[7577, 253, 455, 13, 61, "Output",
+ CellID->1936993594]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8069, 271, 322, 12, 27, "Input",
+ CellID->1163062305],
+Cell[8394, 285, 446, 13, 61, "Output",
+ CellID->1031711574]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8877, 303, 250, 9, 27, "Input",
+ CellID->310482442],
+Cell[9130, 314, 575, 16, 61, "Output",
+ CellID->123443100]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9744, 335, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SI.nb
new file mode 100644
index 000000000..bd11d30d5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SI.nb
@@ -0,0 +1,535 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14186, 525]
+NotebookOptionsPosition[ 9634, 370]
+NotebookOutlinePosition[ 12757, 465]
+CellTagsIndexPosition[ 12651, 459]
+WindowTitle->SI
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SI.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$235119],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SI", "[", "mu", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for 3-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "\[Mu]"]], "InlineFormula"],
+ " with 4-dimensional Lorentz index \[Mu] and is transformed into \
+PauliSigma[LorentzIndex[mu]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->511663903],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1270634949],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SI", "[", "\[Mu]", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{26, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->1454500452]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SI", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "-",
+ RowBox[{"SI", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{114, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->1332152641]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"SI", "[", "\[Mu]", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Output",
+ ImageSize->{226, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->2119095156]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SI", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{104, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->1409387309]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"SI", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SI", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SI", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SI", "[", "\[Rho]", "]"}], ".",
+ RowBox[{"SI", "[", "\[Sigma]", "]"}]}]], "Output",
+ ImageSize->{197, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->687995878]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SI", "[", "\[Alpha]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SIS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"SI", "[", "\[Beta]", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[6]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{136, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[6]=",
+ CellID->521459962]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SI",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 50.065075}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SI[mu] can be used as input for 3-dimensional \\[Sigma]^\\[Mu] with \
+4-dimensional Lorentz index \\[Mu] and is transformed into \
+PauliSigma[LorentzIndex[mu]] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SI", "titlemodifier" -> "", "windowtitle" ->
+ "SI", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SI"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3719, 108, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->511663903]},
+ "GA"->{
+ Cell[4352, 137, 119, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[4474, 143, 333, 13, 35, "Output",
+ CellTags->"GA",
+ CellID->1454500452],
+ Cell[4844, 161, 231, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[5078, 171, 1008, 42, 35, "Output",
+ CellTags->"GA",
+ CellID->1332152641],
+ Cell[6123, 218, 189, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[6315, 226, 270, 8, 51, "Output",
+ CellTags->"GA",
+ CellID->2119095156],
+ Cell[6622, 239, 182, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[6807, 247, 952, 40, 35, "Output",
+ CellTags->"GA",
+ CellID->1409387309],
+ Cell[7796, 292, 222, 7, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[8021, 301, 368, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->687995878],
+ Cell[8426, 317, 270, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+ Cell[8699, 328, 869, 35, 39, "Output",
+ CellTags->"GA",
+ CellID->521459962]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11507, 415},
+ {"GA", 11636, 419}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[574, 21, 2262, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2839, 76, 279, 11, 45, "ObjectNameGrid"],
+Cell[3121, 89, 573, 15, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3719, 108, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->511663903],
+Cell[CellGroupData[{
+Cell[4131, 127, 196, 6, 26, "ExampleSection",
+ CellID->1270634949],
+Cell[CellGroupData[{
+Cell[4352, 137, 119, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[4474, 143, 333, 13, 35, "Output",
+ CellTags->"GA",
+ CellID->1454500452]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4844, 161, 231, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[5078, 171, 1008, 42, 35, "Output",
+ CellTags->"GA",
+ CellID->1332152641]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6123, 218, 189, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[6315, 226, 270, 8, 51, "Output",
+ CellTags->"GA",
+ CellID->2119095156]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6622, 239, 182, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[6807, 247, 952, 40, 35, "Output",
+ CellTags->"GA",
+ CellID->1409387309]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7796, 292, 222, 7, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[8021, 301, 368, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->687995878]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8426, 317, 270, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+Cell[8699, 328, 869, 35, 39, "Output",
+ CellTags->"GA",
+ CellID->521459962]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9607, 368, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SID.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SID.nb
new file mode 100644
index 000000000..42011a709
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SID.nb
@@ -0,0 +1,527 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14025, 517]
+NotebookOptionsPosition[ 9407, 361]
+NotebookOutlinePosition[ 12598, 457]
+CellTagsIndexPosition[ 12492, 451]
+WindowTitle->SID
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SID\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SID"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SID.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$232467],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SID",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SID", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SID", "[", "mu", "]"}]], "InlineFormula"],
+ " \[LineSeparator] can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "\[Mu]"]], "InlineFormula"],
+ " with D-dimensional Lorentz index \[Mu] and is transformed into \
+PauliSigma[LorentzIndex[mu,D],D-1] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1441824756],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1728690255],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SID", "[", "\[Mu]", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->1580788601]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SID", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "-",
+ RowBox[{"SID", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{110, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->1707847873]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"SID", "[", "\[Mu]", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",", "D"}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{303, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->982434685]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SID", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{100, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->591237031]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"SID", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SID", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SID", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SID", "[", "\[Rho]", "]"}], ".",
+ RowBox[{"SID", "[", "\[Sigma]", "]"}]}]], "Output",
+ ImageSize->{233, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->785410539]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SID", "[", "\[Alpha]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SISD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"SID", "[", "\[Beta]", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[6]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{131, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[6]=",
+ CellID->26554913]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"SID",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 43.429023}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SID[mu] can be used as input for D-1-dimensional \\[Sigma]^\\[Mu] with \
+D-dimensional Lorentz index \\[Mu] and is transformed into \
+PauliSigma[LorentzIndex[mu,D],D-1] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SID", "titlemodifier" -> "", "windowtitle" ->
+ "SID", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SID"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3735, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1441824756]},
+ "GA"->{
+ Cell[4369, 137, 120, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[4492, 143, 309, 12, 35, "Output",
+ CellTags->"GA",
+ CellID->1580788601],
+ Cell[4838, 160, 233, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[5074, 170, 900, 38, 35, "Output",
+ CellTags->"GA",
+ CellID->1707847873],
+ Cell[6011, 213, 190, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[6204, 221, 362, 12, 51, "Output",
+ CellTags->"GA",
+ CellID->982434685],
+ Cell[6603, 238, 183, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[6789, 246, 847, 36, 35, "Output",
+ CellTags->"GA",
+ CellID->591237031],
+ Cell[7673, 287, 223, 7, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[7899, 296, 372, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->785410539],
+ Cell[8308, 312, 273, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+ Cell[8584, 323, 757, 31, 39, "Output",
+ CellTags->"GA",
+ CellID->26554913]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11350, 407},
+ {"GA", 11480, 411}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 583, 15, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3735, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1441824756],
+Cell[CellGroupData[{
+Cell[4148, 127, 196, 6, 26, "ExampleSection",
+ CellID->1728690255],
+Cell[CellGroupData[{
+Cell[4369, 137, 120, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[4492, 143, 309, 12, 35, "Output",
+ CellTags->"GA",
+ CellID->1580788601]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4838, 160, 233, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[5074, 170, 900, 38, 35, "Output",
+ CellTags->"GA",
+ CellID->1707847873]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6011, 213, 190, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[6204, 221, 362, 12, 51, "Output",
+ CellTags->"GA",
+ CellID->982434685]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6603, 238, 183, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[6789, 246, 847, 36, 35, "Output",
+ CellTags->"GA",
+ CellID->591237031]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7673, 287, 223, 7, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[7899, 296, 372, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->785410539]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8308, 312, 273, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+Cell[8584, 323, 757, 31, 39, "Output",
+ CellTags->"GA",
+ CellID->26554913]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9380, 359, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SIE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SIE.nb
new file mode 100644
index 000000000..1183c0114
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SIE.nb
@@ -0,0 +1,542 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14427, 532]
+NotebookOptionsPosition[ 9804, 376]
+NotebookOutlinePosition[ 13000, 472]
+CellTagsIndexPosition[ 12894, 466]
+WindowTitle->SIE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SIE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SIE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SIE.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$232905],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SIE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SIE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SIE", "[", "mu", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "\[Mu]"]], "InlineFormula"],
+ " with D-4-dimensional Lorentz index \[Mu] and is transformed into \
+PauliSigma[LorentzIndex[mu,D-4],D-4] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1850550997],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->918560624],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SIE", "[", "\[Mu]", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[1]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{25, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[1]=",
+ CellID->538826974]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIE", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "-",
+ RowBox[{"SIE", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[2]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{110, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[2]=",
+ CellID->992615645]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"SIE", "[", "\[Mu]", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[3]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{336, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->100810708]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SIE", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[4]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{100, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[4]=",
+ CellID->1727518160]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"SIE", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[5]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIE", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SIE", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SIE", "[", "\[Rho]", "]"}], ".",
+ RowBox[{"SIE", "[", "\[Sigma]", "]"}]}]], "Output",
+ ImageSize->{233, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->344931708]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIE", "[", "\[Alpha]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SISE", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"SIE", "[", "\[Beta]", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[6]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Sigma]", "^"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{131, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GA",
+ CellLabel->"Out[6]=",
+ CellID->334848625]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SIE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 44.537142}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SIE[mu] can be used as input for D-1-dimensional \\[Sigma]^\\[Mu] with \
+D-4-dimensional Lorentz index \\[Mu] and is transformed into \
+PauliSigma[LorentzIndex[mu,D-4],D-4] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SIE", "titlemodifier" -> "", "windowtitle" ->
+ "SIE", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SIE"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3738, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1850550997]},
+ "GA"->{
+ Cell[4371, 137, 120, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+ Cell[4494, 143, 332, 13, 35, "Output",
+ CellTags->"GA",
+ CellID->538826974],
+ Cell[4863, 161, 233, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+ Cell[5099, 171, 1007, 42, 35, "Output",
+ CellTags->"GA",
+ CellID->992615645],
+ Cell[6143, 218, 190, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+ Cell[6336, 226, 410, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->100810708],
+ Cell[6783, 245, 183, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+ Cell[6969, 253, 952, 40, 35, "Output",
+ CellTags->"GA",
+ CellID->1727518160],
+ Cell[7958, 298, 223, 7, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+ Cell[8184, 307, 372, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->344931708],
+ Cell[8593, 323, 273, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+ Cell[8869, 334, 869, 35, 39, "Output",
+ CellTags->"GA",
+ CellID->334848625]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11751, 422},
+ {"GA", 11881, 426}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 586, 15, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3738, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1850550997],
+Cell[CellGroupData[{
+Cell[4151, 127, 195, 6, 26, "ExampleSection",
+ CellID->918560624],
+Cell[CellGroupData[{
+Cell[4371, 137, 120, 4, 27, "Input",
+ CellTags->"GA",
+ CellID->192317475],
+Cell[4494, 143, 332, 13, 35, "Output",
+ CellTags->"GA",
+ CellID->538826974]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4863, 161, 233, 8, 27, "Input",
+ CellTags->"GA",
+ CellID->950175955],
+Cell[5099, 171, 1007, 42, 35, "Output",
+ CellTags->"GA",
+ CellID->992615645]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6143, 218, 190, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->872281918],
+Cell[6336, 226, 410, 14, 51, "Output",
+ CellTags->"GA",
+ CellID->100810708]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6783, 245, 183, 6, 27, "Input",
+ CellTags->"GA",
+ CellID->1064432869],
+Cell[6969, 253, 952, 40, 35, "Output",
+ CellTags->"GA",
+ CellID->1727518160]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7958, 298, 223, 7, 27, "Input",
+ CellTags->"GA",
+ CellID->1945449635],
+Cell[8184, 307, 372, 11, 51, "Output",
+ CellTags->"GA",
+ CellID->344931708]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8593, 323, 273, 9, 27, "Input",
+ CellTags->"GA",
+ CellID->1527316325],
+Cell[8869, 334, 869, 35, 39, "Output",
+ CellTags->"GA",
+ CellID->334848625]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9777, 374, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SIS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SIS.nb
new file mode 100644
index 000000000..cff21b594
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SIS.nb
@@ -0,0 +1,479 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12964, 469]
+NotebookOptionsPosition[ 8751, 328]
+NotebookOutlinePosition[ 11717, 417]
+CellTagsIndexPosition[ 11611, 411]
+WindowTitle->SIS
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SIS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SIS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SIS.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$237305],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SIS",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SIS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SIS", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for 3-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "\[Mu]"],
+ SubscriptBox["p", "\[Mu]"]}]], "InlineFormula"],
+ " with 4-dimensional Lorentz vector p and is transformed into \
+PauliSigma[Momentum[p]] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1726614346],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->280692986],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SIS", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->1637918358]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SIS", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]], "Output",
+ ImageSize->{194, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1001021899]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SIS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{201, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->2121924726]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIS", "[", "p", "]"}], ".",
+ RowBox[{"SIS", "[", "q", "]"}], ".",
+ RowBox[{"SIS", "[", "r", "]"}], ".",
+ RowBox[{"SIS", "[", "s", "]"}]}]], "Output",
+ ImageSize->{225, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1909118460]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SIS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SIS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"SIS", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[5]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{186, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[5]=",
+ CellID->1395211320]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SIS",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 55.736220}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SIS[p] can be used as input for 3-dimensional \\[Sigma]^\\[Mu] p\\[Mu] \
+with 4-dimensional Lorentz vector p and is transformed into \
+PauliSigma[Momentum[p]] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SIS", "titlemodifier" -> "", "windowtitle" ->
+ "SIS", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SIS"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3771, 110, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1726614346]},
+ "GS"->{
+ Cell[4404, 139, 117, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[4524, 145, 366, 14, 37, "Output",
+ CellTags->"GS",
+ CellID->1637918358],
+ Cell[4927, 164, 182, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5112, 173, 262, 8, 51, "Output",
+ CellTags->"GS",
+ CellID->1001021899],
+ Cell[5411, 186, 160, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[5574, 193, 1220, 48, 37, "Output",
+ CellTags->"GS",
+ CellID->2121924726],
+ Cell[6831, 246, 198, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[7032, 255, 353, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1909118460],
+ Cell[7422, 271, 259, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+ Cell[7684, 282, 1001, 39, 37, "Output",
+ CellTags->"GS",
+ CellID->1395211320]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10627, 373},
+ {"GS", 10757, 377}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 619, 17, 105, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3771, 110, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1726614346],
+Cell[CellGroupData[{
+Cell[4184, 129, 195, 6, 26, "ExampleSection",
+ CellID->280692986],
+Cell[CellGroupData[{
+Cell[4404, 139, 117, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[4524, 145, 366, 14, 37, "Output",
+ CellTags->"GS",
+ CellID->1637918358]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4927, 164, 182, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5112, 173, 262, 8, 51, "Output",
+ CellTags->"GS",
+ CellID->1001021899]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5411, 186, 160, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[5574, 193, 1220, 48, 37, "Output",
+ CellTags->"GS",
+ CellID->2121924726]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6831, 246, 198, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[7032, 255, 353, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1909118460]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7422, 271, 259, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+Cell[7684, 282, 1001, 39, 37, "Output",
+ CellTags->"GS",
+ CellID->1395211320]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8724, 326, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SISD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SISD.nb
new file mode 100644
index 000000000..015671725
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SISD.nb
@@ -0,0 +1,468 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12681, 458]
+NotebookOptionsPosition[ 8403, 316]
+NotebookOutlinePosition[ 11437, 406]
+CellTagsIndexPosition[ 11331, 400]
+WindowTitle->SISD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SISD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SISD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SISD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$236432],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SISD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SISD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SISD", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "\[Mu]"],
+ SubscriptBox["p", "\[Mu]"]}]], "InlineFormula"],
+ " with D-dimensional Lorentz vector p and is transformed into \
+PauliSigma[Momentum[p,D],D-1] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->775255644],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1442595079],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SISD", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{36, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->1971313389]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SISD", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{271, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1525716750]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SISD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["s",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{189, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->274123798]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SISD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SISD", "[", "p", "]"}], ".",
+ RowBox[{"SISD", "[", "q", "]"}], ".",
+ RowBox[{"SISD", "[", "r", "]"}], ".",
+ RowBox[{"SISD", "[", "s", "]"}]}]], "Output",
+ ImageSize->{261, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1426173981]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SISD", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"SISD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"SISD", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[5]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Sigma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{177, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[5]=",
+ CellID->218984313]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SISD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 53.407258}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SISD[p] can be used as input for D-1-dimensional \\[Sigma]^\\[Mu] \
+p\\[Mu] with D-dimensional Lorentz vector p and is transformed into \
+PauliSigma[Momentum[p,D],D-1] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SISD", "titlemodifier" -> "",
+ "windowtitle" -> "SISD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SISD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3773, 110, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->775255644]},
+ "GS"->{
+ Cell[4406, 139, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[4527, 145, 315, 12, 37, "Output",
+ CellTags->"GS",
+ CellID->1971313389],
+ Cell[4879, 162, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5065, 171, 355, 12, 51, "Output",
+ CellTags->"GS",
+ CellID->1525716750],
+ Cell[5457, 188, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[5621, 195, 991, 40, 37, "Output",
+ CellTags->"GS",
+ CellID->274123798],
+ Cell[6649, 240, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[6851, 249, 357, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1426173981],
+ Cell[7245, 265, 262, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+ Cell[7510, 276, 827, 33, 37, "Output",
+ CellTags->"GS",
+ CellID->218984313]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10351, 362},
+ {"GS", 10480, 366}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[3120, 89, 628, 17, 105, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3773, 110, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->775255644],
+Cell[CellGroupData[{
+Cell[4185, 129, 196, 6, 26, "ExampleSection",
+ CellID->1442595079],
+Cell[CellGroupData[{
+Cell[4406, 139, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[4527, 145, 315, 12, 37, "Output",
+ CellTags->"GS",
+ CellID->1971313389]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4879, 162, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5065, 171, 355, 12, 51, "Output",
+ CellTags->"GS",
+ CellID->1525716750]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5457, 188, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[5621, 195, 991, 40, 37, "Output",
+ CellTags->"GS",
+ CellID->274123798]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6649, 240, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[6851, 249, 357, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->1426173981]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7245, 265, 262, 9, 27, "Input",
+ CellTags->"GS",
+ CellID->2143558790],
+Cell[7510, 276, 827, 33, 37, "Output",
+ CellTags->"GS",
+ CellID->218984313]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[8376, 314, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SISE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SISE.nb
new file mode 100644
index 000000000..912f319d1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SISE.nb
@@ -0,0 +1,416 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11474, 406]
+NotebookOptionsPosition[ 7603, 279]
+NotebookOutlinePosition[ 10417, 362]
+CellTagsIndexPosition[ 10313, 356]
+WindowTitle->SISE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SISE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SISE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SISE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$236869],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SISE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SISE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SISE", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-4-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "\[Mu]"],
+ SubscriptBox["p", "\[Mu]"]}]], "InlineFormula"],
+ " with D-4-dimensional Lorentz vector p and is transformed into \
+PauliSigma[Momentum[p,D-4],D-4] by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1123870704],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->996763060],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SISE", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[1]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{36, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[1]=",
+ CellID->1203463284]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SISE", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[2]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ ImageSize->{304, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->925800961]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SISE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[3]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Sigma]", "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{191, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[3]=",
+ CellID->145229704]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SISE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[4]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SISE", "[", "p", "]"}], ".",
+ RowBox[{"SISE", "[", "q", "]"}], ".",
+ RowBox[{"SISE", "[", "r", "]"}], ".",
+ RowBox[{"SISE", "[", "s", "]"}]}]], "Output",
+ ImageSize->{261, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"GS",
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->440357301]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SISE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 54.444016}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SISE[p] can be used as input for D-4-dimensional \\[Sigma]^\\[Mu] \
+p\\[Mu] with D-4-dimensional Lorentz vector p and is transformed into \
+PauliSigma[Momentum[p,D-4],D-4] by FeynCalcInternal.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SISE", "titlemodifier" -> "",
+ "windowtitle" -> "SISE", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SISE"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3777, 110, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1123870704]},
+ "GS"->{
+ Cell[4410, 139, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+ Cell[4531, 145, 366, 14, 37, "Output",
+ CellTags->"GS",
+ CellID->1203463284],
+ Cell[4934, 164, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+ Cell[5120, 173, 402, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->925800961],
+ Cell[5559, 192, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+ Cell[5723, 199, 1219, 48, 37, "Output",
+ CellTags->"GS",
+ CellID->145229704],
+ Cell[6979, 252, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+ Cell[7181, 261, 356, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->440357301]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9498, 324},
+ {"GS", 9628, 328}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2257, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2836, 76, 281, 11, 45, "ObjectNameGrid"],
+Cell[3120, 89, 632, 17, 105, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3777, 110, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1123870704],
+Cell[CellGroupData[{
+Cell[4190, 129, 195, 6, 26, "ExampleSection",
+ CellID->996763060],
+Cell[CellGroupData[{
+Cell[4410, 139, 118, 4, 27, "Input",
+ CellTags->"GS",
+ CellID->1176675883],
+Cell[4531, 145, 366, 14, 37, "Output",
+ CellTags->"GS",
+ CellID->1203463284]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4934, 164, 183, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->1027241244],
+Cell[5120, 173, 402, 14, 51, "Output",
+ CellTags->"GS",
+ CellID->925800961]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5559, 192, 161, 5, 27, "Input",
+ CellTags->"GS",
+ CellID->1339265647],
+Cell[5723, 199, 1219, 48, 37, "Output",
+ CellTags->"GS",
+ CellID->145229704]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6979, 252, 199, 7, 27, "Input",
+ CellTags->"GS",
+ CellID->837744205],
+Cell[7181, 261, 356, 11, 51, "Output",
+ CellTags->"GS",
+ CellID->440357301]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7576, 277, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMP.nb
index ba23e1881..748ecb6cc 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMP.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13527, 427]
-NotebookOptionsPosition[ 9946, 317]
-NotebookOutlinePosition[ 12484, 386]
-CellTagsIndexPosition[ 12377, 380]
+NotebookDataLength[ 34365, 1060]
+NotebookOptionsPosition[ 30448, 937]
+NotebookOutlinePosition[ 32669, 1000]
+CellTagsIndexPosition[ 32562, 994]
WindowTitle->SMP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SMP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SMP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SMP.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$138871],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SMP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SMVertex\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SMVertex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SMP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SMP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SMP.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$239523],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SMP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,18 +95,28 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SMP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SMP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"SMP", "[", "par", "]"}]], "InlineFormula"],
- " \[LineSeparator]displays a symbol for the model parameter par. Typical \
-parameters are masses, coupling constants, mixing angles etc. Parameters that \
-are complex, like CKM matrix element, have an I as an additional parameter, \
-i.e. SMP[\\\"V_ud\\\",I] and SMP[\\\"V_ud\\\",-I]. SMP[] shows the list of \
-available parameters.\""
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " \[LineSeparator]displays a symbol for the model parameter ",
+ Cell[BoxData["\"\\""], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -95,6 +127,64 @@ available parameters.\""
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->398927661],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+Typical parameters are masses, coupling constants, mixing angles etc. \
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "Parameters that are complex, like CKM matrix element, have an ",
+ Cell[BoxData["I"], "InlineFormula"],
+ " as an additional argument, i.e. ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[",
+ RowBox[{"\"\\"", ",", "I"}], "]"}]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[",
+ RowBox[{"\"\\"", ",",
+ RowBox[{"-", "I"}]}], "]"}]], "InlineFormula"],
+ ". "
+}], "Notes"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "]"}]], "InlineFormula"],
+ " shows the list of all available parameters."
+}], "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -106,21 +196,27 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->30316906],
+ CellID->1092749213],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(3)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->411172676],
+ CellID->902623796],
+
+Cell[TextData[{
+ "Electron mass ",
+ Cell[BoxData[
+ SubscriptBox["m", "e"]], "InlineFormula"]
+}], "Notes"],
Cell[CellGroupData[{
@@ -133,98 +229,489 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
SubscriptBox["m", "e"], TraditionalForm]], "Output",
- ImageSize->{23, 15},
+ ImageSize->{25, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SMP",
- CellLabel->"Out[1]=",
- CellID->355285945]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Weak coupling constant ",
+ Cell[BoxData[
+ SubscriptBox["g", "W"]], "InlineFormula"]
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "\[IndentingNewLine]"}]], "Input",\
+
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["g", "W"], TraditionalForm]], "Output",
+ ImageSize->{29, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "List all available ",
+ ButtonBox["SMP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMP",
+ ButtonNote->"SMP"],
+ "'s"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"SMP", "[", "]"}]], "Input",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->947204407],
Cell[BoxData[
FormBox[
- RowBox[{"{",
- RowBox[{"\<\"m_e\"\>", ",", "\<\"m_mu\"\>", ",", "\<\"m_tau\"\>",
- ",", "\<\"m_u\"\>", ",", "\<\"m_d\"\>", ",", "\<\"m_c\"\>",
- ",", "\<\"m_s\"\>", ",", "\<\"m_t\"\>", ",", "\<\"m_b\"\>",
- ",", "\<\"m_H\"\>", ",", "\<\"m_W\"\>", ",", "\<\"m_Z\"\>",
- ",", "\<\"m_q\"\>", ",", "\<\"m_Q\"\>", ",", "\<\"m_pi\"\>",
- ",", "\<\"g_s\"\>", ",", "\<\"e\"\>", ",", "\<\"cos_W\"\>",
- ",", "\<\"sin_W\"\>", ",", "\<\"theta_W\"\>", ",", "\<\"cos_C\"\>",
- ",", "\<\"sin_C\"\>", ",", "\<\"theta_C\"\>", ",", "\<\"alpha_fs\"\>",
- ",", "\<\"alpha_s\"\>", ",",
- RowBox[{"{",
- RowBox[{"\<\"V_ud\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_ud\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_us\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_us\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_ub\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_ub\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_cd\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_cd\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_cs\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_cs\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_cb\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_cb\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_td\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_td\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_ts\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_ts\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_tb\"\>", ",", "\[ImaginaryI]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\<\"V_tb\"\>", ",",
- RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]}], "}"}],
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ SubscriptBox["N", "F"], "\<\"N_F\"\>"},
+ {
+ SubscriptBox["m", "e"], "\<\"m_e\"\>"},
+ {
+ SubscriptBox["m", "\[Mu]"], "\<\"m_mu\"\>"},
+ {
+ SubscriptBox["m", "\[Tau]"], "\<\"m_tau\"\>"},
+ {
+ SubscriptBox["m", "u"], "\<\"m_u\"\>"},
+ {
+ SubscriptBox["m", "d"], "\<\"m_d\"\>"},
+ {
+ SubscriptBox["m", "c"], "\<\"m_c\"\>"},
+ {
+ SubscriptBox["m", "s"], "\<\"m_s\"\>"},
+ {
+ SubscriptBox["m", "t"], "\<\"m_t\"\>"},
+ {
+ SubscriptBox["m", "b"], "\<\"m_b\"\>"},
+ {
+ SubscriptBox["m", "H"], "\<\"m_H\"\>"},
+ {
+ SubscriptBox["m", "W"], "\<\"m_W\"\>"},
+ {
+ SubscriptBox["m", "Z"], "\<\"m_Z\"\>"},
+ {
+ SubscriptBox["m", "q"], "\<\"m_q\"\>"},
+ {
+ SubscriptBox["m", "Q"], "\<\"m_Q\"\>"},
+ {
+ SubscriptBox["m",
+ SubscriptBox["q", "u"]], "\<\"m_qu\"\>"},
+ {
+ SubscriptBox["m",
+ SubscriptBox["q", "d"]], "\<\"m_qd\"\>"},
+ {
+ SubscriptBox["m", "l"], "\<\"m_l\"\>"},
+ {
+ SubscriptBox["m", "\[Pi]"], "\<\"m_pi\"\>"},
+ {"\<\"g\"\>", "\<\"g\"\>"},
+ {
+ SubscriptBox["g", "s"], "\<\"g_s\"\>"},
+ {"\<\"e\"\>", "\<\"e\"\>"},
+ {
+ SubscriptBox["e", "Q"], "\<\"e_Q\"\>"},
+ {
+ SubscriptBox["Q", "u"], "\<\"Q_u\"\>"},
+ {
+ SubscriptBox["Q", "d"], "\<\"Q_d\"\>"},
+ {
+ SubscriptBox["G", "F"], "\<\"G_F\"\>"},
+ {
+ SubscriptBox["g", "W"], "\<\"g_W\"\>"},
+ {
+ SubscriptBox[
+ RowBox[{"g", "'"}], "W"], "\<\"g'_W\"\>"},
+ {
+ RowBox[{
+ RowBox[{"cos", "("}],
+ SubscriptBox["\[Theta]", "W"], ")"}], "\<\"cos_W\"\>"},
+ {
+ RowBox[{
+ RowBox[{"sin", "("}],
+ SubscriptBox["\[Theta]", "W"], ")"}], "\<\"sin_W\"\>"},
+ {
+ SubscriptBox["\[Theta]", "W"], "\<\"theta_W\"\>"},
+ {
+ RowBox[{
+ RowBox[{"cos", "("}],
+ SubscriptBox["\[Theta]", "C"], ")"}], "\<\"cos_C\"\>"},
+ {
+ RowBox[{
+ RowBox[{"sin", "("}],
+ SubscriptBox["\[Theta]", "C"], ")"}], "\<\"sin_C\"\>"},
+ {
+ SubscriptBox["\[Theta]", "C"], "\<\"theta_C\"\>"},
+ {"\[Alpha]", "\<\"alpha_fs\"\>"},
+ {
+ SubscriptBox["\[Alpha]", "s"], "\<\"alpha_s\"\>"},
+ {
+ SubscriptBox["\[Delta]", "\[Psi]"], "\<\"d_psi\"\>"},
+ {
+ SubscriptBox["\[Delta]", "\[Phi]"], "\<\"d_phi\"\>"},
+ {
+ SubscriptBox["\[Delta]", "A"], "\<\"d_A\"\>"},
+ {
+ SubscriptBox["\[Delta]", "m"], "\<\"d_m\"\>"},
+ {
+ SubscriptBox["\[Delta]", "u"], "\<\"d_u\"\>"},
+ {
+ SubscriptBox["\[Delta]", "\[Xi]"], "\<\"d_xi\"\>"},
+ {
+ SubscriptBox["\[Delta]", "e"], "\<\"d_e\"\>"},
+ {
+ SubscriptBox["\[Delta]", "g"], "\<\"d_g\"\>"},
+ {
+ SubscriptBox["Z", "\[Psi]"], "\<\"Z_psi\"\>"},
+ {
+ SubscriptBox["Z", "\[Phi]"], "\<\"Z_phi\"\>"},
+ {
+ SubscriptBox["Z", "A"], "\<\"Z_A\"\>"},
+ {
+ SubscriptBox["Z", "m"], "\<\"Z_m\"\>"},
+ {
+ SubscriptBox["Z", "u"], "\<\"Z_u\"\>"},
+ {
+ SubscriptBox["Z", "\[Xi]"], "\<\"Z_xi\"\>"},
+ {
+ SubscriptBox["Z", "e"], "\<\"Z_e\"\>"},
+ {
+ SubscriptBox["Z", "g"], "\<\"Z_g\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "\[Psi]"], "\<\"dZ_psi\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "\[Phi]"], "\<\"dZ_phi\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "A"], "\<\"dZ_A\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "m"], "\<\"dZ_m\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "u"], "\<\"dZ_u\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "\[Xi]"], "\<\"dZ_xi\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "e"], "\<\"dZ_e\"\>"},
+ {
+ SubscriptBox["\[Delta]Z", "g"], "\<\"dZ_g\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Psi]", "MS"], "\<\"d_psi^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Phi]", "MS"], "\<\"d_phi^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "A", "MS"], "\<\"d_A^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "m", "MS"], "\<\"d_m^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "u", "MS"], "\<\"d_u^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Xi]", "MS"], "\<\"d_xi^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "e", "MS"], "\<\"d_e^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "g", "MS"], "\<\"d_g^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Psi]", "MS"], "\<\"Z_psi^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Phi]", "MS"], "\<\"Z_phi^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "A", "MS"], "\<\"Z_A^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "m", "MS"], "\<\"Z_m^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "u", "MS"], "\<\"Z_u^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Xi]", "MS"], "\<\"Z_xi^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "e", "MS"], "\<\"Z_e^MS\"\>"},
+ {
+ SubsuperscriptBox["Z", "g", "MS"], "\<\"Z_g^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Psi]", "MS"], "\<\"dZ_psi^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Phi]", "MS"], "\<\"dZ_phi^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "A", "MS"], "\<\"dZ_A^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "m", "MS"], "\<\"dZ_m^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "u", "MS"], "\<\"dZ_u^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Xi]", "MS"], "\<\"dZ_xi^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "e", "MS"], "\<\"dZ_e^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "g", "MS"], "\<\"dZ_g^MS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Psi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_psi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Phi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_phi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "A",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_A^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "m",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_m^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "u",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_u^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Xi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_xi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "e",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_e^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "g",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"d_g^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Psi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_psi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Phi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_phi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "A",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_A^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "m",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_m^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "u",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_u^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Xi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_xi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "e",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_e^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "g",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"Z_g^MSbar\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Psi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_psi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Phi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_phi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "A",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_A^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "m",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_m^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "u",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_u^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Xi]",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_xi^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "e",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_e^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "g",
+ OverscriptBox["MS", "\[LongDash]"]], "\<\"dZ_g^MSbar\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Psi]", "OS"], "\<\"d_psi^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Phi]", "OS"], "\<\"d_phi^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "A", "OS"], "\<\"d_A^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "m", "OS"], "\<\"d_m^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "u", "OS"], "\<\"d_u^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "\[Xi]", "OS"], "\<\"d_xi^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "e", "OS"], "\<\"d_e^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]", "g", "OS"], "\<\"d_g^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Psi]", "OS"], "\<\"Z_psi^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Phi]", "OS"], "\<\"Z_phi^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "A", "OS"], "\<\"Z_A^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "m", "OS"], "\<\"Z_m^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "u", "OS"], "\<\"Z_u^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "\[Xi]", "OS"], "\<\"Z_xi^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "e", "OS"], "\<\"Z_e^OS\"\>"},
+ {
+ SubsuperscriptBox["Z", "g", "OS"], "\<\"Z_g^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Psi]", "OS"], "\<\"dZ_psi^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Phi]", "OS"], "\<\"dZ_phi^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "A", "OS"], "\<\"dZ_A^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "m", "OS"], "\<\"dZ_m^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "u", "OS"], "\<\"dZ_u^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "\[Xi]", "OS"], "\<\"dZ_xi^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "e", "OS"], "\<\"dZ_e^OS\"\>"},
+ {
+ SubsuperscriptBox["\[Delta]Z", "g", "OS"], "\<\"dZ_g^OS\"\>"},
+ {
+ SubscriptBox["V", "ud"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_ud\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "ud", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_ud\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "us"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_us\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "us", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_us\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "ub"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_ub\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "ub", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_ub\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "cd"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_cd\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "cd", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_cd\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "cs"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_cs\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "cs", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_cs\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "cb"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_cb\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "cb", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_cb\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "td"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_td\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "td", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_td\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "ts"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_ts\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "ts", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_ts\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["V", "tb"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_tb\"\>", ",", "\[ImaginaryI]"}], "}"}]},
+ {
+ SubsuperscriptBox["V", "tb", "*"],
+ RowBox[{"{",
+ RowBox[{"\<\"V_tb\"\>", ",",
+ RowBox[{"-", "\[ImaginaryI]"}]}], "}"}]},
+ {
+ SubscriptBox["s", "12"], "\<\"s_12\"\>"},
+ {
+ SubscriptBox["s", "13"], "\<\"s_13\"\>"},
+ {
+ SubscriptBox["s", "23"], "\<\"s_23\"\>"},
+ {
+ SubscriptBox["c", "12"], "\<\"c_12\"\>"},
+ {
+ SubscriptBox["c", "13"], "\<\"c_13\"\>"},
+ {
+ SubscriptBox["c", "23"], "\<\"c_23\"\>"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
TraditionalForm]], "Output",
- ImageSize->{519, 92},
+ ImageSize->{180, 3290},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[2]=",
- CellID->755184812]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SMP", "/@",
- RowBox[{"SMP", "[", "]"}]}]], "Input",
- CellLabel->"In[3]:=",
+ RowBox[{"Last", "/@",
+ RowBox[{"SMP", "[", "]"}]}]}]], "Input",
+ CellLabel->"In[2]:=",
CellID->307037125],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
+ SubscriptBox["N", "F"], ",",
SubscriptBox["m", "e"], ",",
SubscriptBox["m", "\[Mu]"], ",",
SubscriptBox["m", "\[Tau]"], ",",
@@ -239,8 +726,20 @@ Cell[BoxData[
SubscriptBox["m", "Z"], ",",
SubscriptBox["m", "q"], ",",
SubscriptBox["m", "Q"], ",",
- SubscriptBox["m", "\[Pi]"], ",",
- SubscriptBox["g", "s"], ",", "e", ",",
+ SubscriptBox["m",
+ SubscriptBox["q", "u"]], ",",
+ SubscriptBox["m",
+ SubscriptBox["q", "d"]], ",",
+ SubscriptBox["m", "l"], ",",
+ SubscriptBox["m", "\[Pi]"], ",", "\<\"g\"\>", ",",
+ SubscriptBox["g", "s"], ",", "\<\"e\"\>", ",",
+ SubscriptBox["e", "Q"], ",",
+ SubscriptBox["Q", "u"], ",",
+ SubscriptBox["Q", "d"], ",",
+ SubscriptBox["G", "F"], ",",
+ SubscriptBox["g", "W"], ",",
+ SubscriptBox[
+ RowBox[{"g", "'"}], "W"], ",",
RowBox[{
RowBox[{"cos", "("}],
SubscriptBox["\[Theta]", "W"], ")"}], ",",
@@ -256,6 +755,126 @@ Cell[BoxData[
SubscriptBox["\[Theta]", "C"], ")"}], ",",
SubscriptBox["\[Theta]", "C"], ",", "\[Alpha]", ",",
SubscriptBox["\[Alpha]", "s"], ",",
+ SubscriptBox["\[Delta]", "\[Psi]"], ",",
+ SubscriptBox["\[Delta]", "\[Phi]"], ",",
+ SubscriptBox["\[Delta]", "A"], ",",
+ SubscriptBox["\[Delta]", "m"], ",",
+ SubscriptBox["\[Delta]", "u"], ",",
+ SubscriptBox["\[Delta]", "\[Xi]"], ",",
+ SubscriptBox["\[Delta]", "e"], ",",
+ SubscriptBox["\[Delta]", "g"], ",",
+ SubscriptBox["Z", "\[Psi]"], ",",
+ SubscriptBox["Z", "\[Phi]"], ",",
+ SubscriptBox["Z", "A"], ",",
+ SubscriptBox["Z", "m"], ",",
+ SubscriptBox["Z", "u"], ",",
+ SubscriptBox["Z", "\[Xi]"], ",",
+ SubscriptBox["Z", "e"], ",",
+ SubscriptBox["Z", "g"], ",",
+ SubscriptBox["\[Delta]Z", "\[Psi]"], ",",
+ SubscriptBox["\[Delta]Z", "\[Phi]"], ",",
+ SubscriptBox["\[Delta]Z", "A"], ",",
+ SubscriptBox["\[Delta]Z", "m"], ",",
+ SubscriptBox["\[Delta]Z", "u"], ",",
+ SubscriptBox["\[Delta]Z", "\[Xi]"], ",",
+ SubscriptBox["\[Delta]Z", "e"], ",",
+ SubscriptBox["\[Delta]Z", "g"], ",",
+ SubsuperscriptBox["\[Delta]", "\[Psi]", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "\[Phi]", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "A", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "m", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "u", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "\[Xi]", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "e", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "g", "MS"], ",",
+ SubsuperscriptBox["Z", "\[Psi]", "MS"], ",",
+ SubsuperscriptBox["Z", "\[Phi]", "MS"], ",",
+ SubsuperscriptBox["Z", "A", "MS"], ",",
+ SubsuperscriptBox["Z", "m", "MS"], ",",
+ SubsuperscriptBox["Z", "u", "MS"], ",",
+ SubsuperscriptBox["Z", "\[Xi]", "MS"], ",",
+ SubsuperscriptBox["Z", "e", "MS"], ",",
+ SubsuperscriptBox["Z", "g", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Psi]", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Phi]", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "A", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "m", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "u", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Xi]", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "e", "MS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "g", "MS"], ",",
+ SubsuperscriptBox["\[Delta]", "\[Psi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "\[Phi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "A",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "m",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "u",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "\[Xi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "e",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "g",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Psi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "\[Phi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "A",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "m",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "u",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "\[Xi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "e",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "g",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["Z", "\[Psi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Phi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "A",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "m",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "u",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Xi]",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "e",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]Z", "g",
+ OverscriptBox["MS", "\[LongDash]"]], ",",
+ SubsuperscriptBox["\[Delta]", "\[Psi]", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "\[Phi]", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "A", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "m", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "u", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "\[Xi]", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "e", "OS"], ",",
+ SubsuperscriptBox["\[Delta]", "g", "OS"], ",",
+ SubsuperscriptBox["Z", "\[Psi]", "OS"], ",",
+ SubsuperscriptBox["Z", "\[Phi]", "OS"], ",",
+ SubsuperscriptBox["Z", "A", "OS"], ",",
+ SubsuperscriptBox["Z", "m", "OS"], ",",
+ SubsuperscriptBox["Z", "u", "OS"], ",",
+ SubsuperscriptBox["Z", "\[Xi]", "OS"], ",",
+ SubsuperscriptBox["Z", "e", "OS"], ",",
+ SubsuperscriptBox["Z", "g", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Psi]", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Phi]", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "A", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "m", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "u", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "\[Xi]", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "e", "OS"], ",",
+ SubsuperscriptBox["\[Delta]Z", "g", "OS"], ",",
SubscriptBox["V", "ud"], ",",
SubsuperscriptBox["V", "ud", "*"], ",",
SubscriptBox["V", "us"], ",",
@@ -273,12 +892,18 @@ Cell[BoxData[
SubscriptBox["V", "ts"], ",",
SubsuperscriptBox["V", "ts", "*"], ",",
SubscriptBox["V", "tb"], ",",
- SubsuperscriptBox["V", "tb", "*"]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{482, 62},
+ SubsuperscriptBox["V", "tb", "*"], ",",
+ SubscriptBox["s", "12"], ",",
+ SubscriptBox["s", "13"], ",",
+ SubscriptBox["s", "23"], ",",
+ SubscriptBox["c", "12"], ",",
+ SubscriptBox["c", "13"], ",",
+ SubscriptBox["c", "23"]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{557, 299},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[3]=",
- CellID->1441626688]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -301,16 +926,11 @@ Cell[TextData[{
WholeCellGroupOpener->True,
CellID->1255426704],
-Cell[TextData[{
- StyleBox[ButtonBox["SMVertex",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SMVertex",
- ButtonNote->"SMVertex"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"SMP",
- CellID->450516788]
+Cell[TextData[StyleBox[ButtonBox["SMVertex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMVertex",
+ ButtonNote->"SMVertex"],
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -318,7 +938,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"SMP",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -327,24 +947,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 55.093557}",
+ "built" -> "{2020, 1, 5, 19, 2, 0.483584}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SMP[par] displays a symbol for the model parameter par. Typical \
-parameters are masses, coupling constants, mixing angles etc. Parameters that \
-are complex, like CKM matrix element, have an I as an additional parameter, \
-i.e. SMP[\\\"V_ud\\\",I] and SMP[\\\"V_ud\\\",-I]. SMP[] shows the list of \
-available parameters.\"", "synonyms" -> {}, "title" -> "SMP", "titlemodifier" ->
+ "SMP[\"par\"] displays a symbol for the model parameter \"par\".",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SMP", "titlemodifier" ->
"", "windowtitle" -> "SMP", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SMP"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -352,8 +969,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -362,73 +980,88 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3537, 97, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[5832, 187, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->30316906]},
+ CellID->1092749213]},
"SMP"->{
- Cell[4168, 126, 127, 4, 29, "Input",
+ Cell[6574, 222, 127, 4, 29, "Input",
CellTags->"SMP",
CellID->519370115],
- Cell[4298, 132, 226, 8, 36, "Output",
- CellTags->"SMP",
- CellID->355285945],
- Cell[9682, 303, 222, 9, 31, "Text",
- CellTags->"SMP",
- CellID->450516788]}
+ Cell[6704, 228, 206, 7, 37, "Output",
+ CellTags->"SMP"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11979, 363},
- {"SMP", 12107, 367}
+ {"PrimaryExamplesSection", 32264, 981},
+ {"SMP", 32395, 985}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2982, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 647, 15, 115, "Usage",
+Cell[3560, 97, 280, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3865, 112, 443, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3537, 97, 386, 15, 31, "PrimaryExamplesSection",
+Cell[4333, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->398927661],
+Cell[5074, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5108, 157, 116, 3, 70, "Notes",
+ CellID->1067943069],
+Cell[5227, 162, 414, 13, 70, "Notes"],
+Cell[5644, 177, 139, 4, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5832, 187, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->30316906],
+ CellID->1092749213],
Cell[CellGroupData[{
-Cell[3948, 116, 195, 6, 25, "ExampleSection",
- CellID->411172676],
+Cell[6245, 206, 195, 6, 26, "ExampleSection",
+ CellID->902623796],
+Cell[6443, 214, 106, 4, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4168, 126, 127, 4, 29, "Input",
+Cell[6574, 222, 127, 4, 29, "Input",
CellTags->"SMP",
CellID->519370115],
-Cell[4298, 132, 226, 8, 36, "Output",
- CellTags->"SMP",
- CellID->355285945]
+Cell[6704, 228, 206, 7, 37, "Output",
+ CellTags->"SMP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4561, 145, 94, 3, 27, "Input",
+Cell[6947, 240, 105, 2, 9, "ExampleDelimiter"],
+Cell[7055, 244, 115, 4, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[7195, 252, 127, 4, 46, "Input"],
+Cell[7325, 258, 188, 6, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7562, 270, 105, 2, 9, "ExampleDelimiter"],
+Cell[7670, 274, 160, 7, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[7855, 285, 94, 3, 27, "Input",
CellID->947204407],
-Cell[4658, 150, 2494, 62, 113, "Output",
- CellID->755184812]
+Cell[7952, 290, 13517, 407, 3311, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7189, 217, 120, 4, 27, "Input",
+Cell[21506, 702, 148, 5, 27, "Input",
CellID->307037125],
-Cell[7312, 223, 2002, 57, 83, "Output",
- CellID->1441626688]
+Cell[21657, 709, 8197, 195, 320, "Output"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[9341, 284, 31, 0, 29, "SectionFooterSpacer"]
+Cell[29893, 909, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9409, 289, 270, 12, 31, "SeeAlsoSection",
+Cell[29961, 914, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9682, 303, 222, 9, 31, "Text",
- CellTags->"SMP",
- CellID->450516788]
+Cell[30234, 928, 172, 4, 56, "SeeAlso"]
}, Open ]],
-Cell[9919, 315, 23, 0, 70, "FooterCell"]
+Cell[30421, 935, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMPToSymbol.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMPToSymbol.nb
new file mode 100644
index 000000000..2bcf16b14
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMPToSymbol.nb
@@ -0,0 +1,414 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11952, 404]
+NotebookOptionsPosition[ 8429, 300]
+NotebookOutlinePosition[ 10742, 359]
+CellTagsIndexPosition[ 10657, 354]
+WindowTitle->SMPToSymbol
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SMP\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SMP"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SMPToSymbol\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SMPToSymbol"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SMPToSymbol.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$239961],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SMPToSymbol", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SMPToSymbol", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SMPToSymbol", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]converts objects of type SMP[\"sth\"] in exp to \
+symbols using ToExpression[\"sth\"]. The option StringReplace can be used to \
+specify string replacement rules that will take care of characters (e.g. ^ or \
+_) that cannot appear in valid expressions. SMPToSymbol is useful when \
+exporting FeynCalc expressions to other tools, e.g. FORM."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1882068752],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SMPToSymbol", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1067943069],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"StringReplace", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"\<\"_\"\>", "\[Rule]", "\<\"\"\>"}], ",",
+ RowBox[{"\<\"^\"\>", "\[Rule]", "\<\"\"\>"}]}], "}"}]}], ",",
+ RowBox[{"Conjugate", "\[Rule]", "\<\"CC\"\>"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{298, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->602000371]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->348954702],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->646201416],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SP", "[", "p", "]"}], "-",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->512390421],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"],
+ TraditionalForm], "-",
+ SubsuperscriptBox["m", "e", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{65, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->320685510]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SMPToSymbol", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1934684273],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"],
+ TraditionalForm], "-",
+ SuperscriptBox["me", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{67, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->924611777]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[StyleBox[ButtonBox["SMP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMP",
+ ButtonNote->"SMP"],
+ FontFamily->"Verdana"]], "SeeAlso",
+ CellID->1062507596]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"SMPToSymbol",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 1.653284}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SMPToSymbol[exp] converts objects of type SMP[\"sth\"] in exp to symbols \
+using ToExpression[\"sth\"]. The option StringReplace can be used to specify \
+string replacement rules that will take care of characters (e.g. ^or _) that \
+cannot appear in valid expressions. SMPToSymbol is useful when exporting \
+FeynCalc expressions to other tools, e.g. FORM.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SMPToSymbol", "titlemodifier" -> "",
+ "windowtitle" -> "SMPToSymbol", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SMPToSymbol"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6062, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->348954702]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10514, 347}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 3005, 74, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3591, 97, 288, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3904, 112, 678, 15, 135, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4607, 131, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1882068752],
+Cell[5349, 157, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5405, 161, 114, 3, 70, "Input",
+ CellID->1067943069],
+Cell[5522, 166, 479, 15, 37, "Output",
+ CellID->602000371]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6062, 188, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->348954702],
+Cell[CellGroupData[{
+Cell[6474, 207, 195, 6, 26, "ExampleSection",
+ CellID->646201416],
+Cell[CellGroupData[{
+Cell[6694, 217, 185, 6, 29, "Input",
+ CellID->512390421],
+Cell[6882, 225, 409, 16, 40, "Output",
+ CellID->320685510]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7328, 246, 108, 3, 27, "Input",
+ CellID->1934684273],
+Cell[7439, 251, 402, 16, 39, "Output",
+ CellID->924611777]
+}, Open ]]
+}, Open ]],
+Cell[7868, 271, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7936, 276, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[8209, 290, 178, 5, 56, "SeeAlso",
+ CellID->1062507596]
+}, Open ]],
+Cell[8402, 298, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMVertex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMVertex.nb
index 649558191..a5d8e38f5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMVertex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SMVertex.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11672, 395]
-NotebookOptionsPosition[ 8336, 295]
-NotebookOutlinePosition[ 10949, 366]
-CellTagsIndexPosition[ 10837, 360]
+NotebookDataLength[ 14554, 513]
+NotebookOptionsPosition[ 10890, 401]
+NotebookOutlinePosition[ 13197, 465]
+CellTagsIndexPosition[ 13085, 459]
WindowTitle->SMVertex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SMVertex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SMVertex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SMVertex.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SMP\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SMP"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SMVertex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SMVertex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SMVertex.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$139547],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SMVertex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$240402],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SMVertex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +95,26 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SMVertex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SMVertex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"SMVertex", "[",
- RowBox[{
- "\"\\"", ",", " ", "p", ",", "mu", ",", " ", "q", ",", "nu", ",",
- " ", "k", ",", "rho"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "gives the photon-W-W vertex (p,mu correspond to the photon, q,nu to the \
-(incoming) W+ and k,rho to the (incoming) W-. All momenta are flowing into \
-the vertex. SMVertex[\"HHH\", ___] give the three-higgs coupling. "
+ Cell[BoxData["SMVertex"], "InlineFormula"],
+ " \[LineSeparator]is a library of SM vertices. Currently it implements \
+only few vertices and is not really useful."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,6 +125,57 @@ the vertex. SMVertex[\"HHH\", ___] give the three-higgs coupling. "
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->523475446],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SMVertex", "]"}]], "Input",
+ CellLabel->"In[58]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{207, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[58]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +191,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->580320162],
+ CellID->766392537],
Cell[CellGroupData[{
@@ -122,30 +201,9 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2136770321],
+ CellID->1266283360],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "SMVertex", "]"}]], "Input",
- CellTags->"SMVertex",
- CellLabel->"In[1]:=",
- CellID->537549751],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{221, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SMVertex",
- CellLabel->"Out[1]=",
- CellID->1908910905]
-}, Open ]],
+Cell["This is the photon-W-W vertex (all momenta ingoing)", "Notes"],
Cell[CellGroupData[{
@@ -155,148 +213,196 @@ Cell[BoxData[
"\"\\"", ",", "p", ",", "\[Mu]", ",", " ", "q", ",", "\[Nu]", ",",
" ", "k", ",", "\[Rho]"}], "]"}]], "Input",
CellTags->"SMVertex",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1911879451],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-", "\[ImaginaryI]"}], " ", "e", " ",
+ RowBox[{"-", "\[ImaginaryI]"}], " ", "\<\"e\"\>", " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{351, 25},
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{383, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SMVertex",
- CellLabel->"Out[2]=",
- CellID->60024772]
-}, Open ]]
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell["This is the HHH-coupling", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SMVertex", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"3", " ", "\[ImaginaryI]", " ", "\<\"e\"\>", " ",
+ SubsuperscriptBox["m", "H", "2"]}],
+ RowBox[{"2", " ",
+ SubscriptBox["m", "W"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"sin", "("}],
+ SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}],
+ TraditionalForm]], "Output",
+ ImageSize->{129, 42},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell["This is the H-electron-coupling", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SMVertex", "[", "\"\\"", "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ", "\<\"e\"\>", " ",
+ SubscriptBox["m", "e"]}],
+ RowBox[{"2", " ",
+ SubscriptBox["m", "W"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"sin", "("}],
+ SubscriptBox["\[Theta]", "W"], ")"}], ")"}]}]]}],
+ TraditionalForm]], "Output",
+ ImageSize->{129, 37},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]],
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[StyleBox[ButtonBox["SMP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMP",
+ ButtonNote->"SMP"],
+ FontFamily->"Verdana"]], "SeeAlso"]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"SMVertex",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -305,23 +411,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 57.855545}",
+ "built" -> "{2020, 1, 5, 19, 2, 2.767169}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SMVertex[\"AWW\", p, mu, q, nu, k, rho] gives the photon-W-W vertex \
-(p,mu correspond to the photon, q,nu to the (incoming) W+ and k,rho to the \
-(incoming) W-. All momenta are flowing into the vertex. SMVertex[\"HHH\", \
-___] give the three-higgs coupling. ", "synonyms" -> {}, "title" ->
- "SMVertex", "titlemodifier" -> "", "windowtitle" -> "SMVertex", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SMVertex"}, "SearchTextTranslated" -> ""},
+ "SMVertex is a library of SM vertices. Currently it implements only few \
+vertices and is not really useful.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SMVertex", "titlemodifier" -> "", "windowtitle" -> "SMVertex",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/SMVertex"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -329,8 +434,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -339,64 +445,76 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3592, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5560, 178, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->580320162]},
+ CellID->766392537]},
"SMVertex"->{
- Cell[4225, 128, 133, 4, 27, "Input",
- CellTags->"SMVertex",
- CellID->537549751],
- Cell[4361, 134, 341, 12, 36, "Output",
- CellTags->"SMVertex",
- CellID->1908910905],
- Cell[4739, 151, 241, 7, 27, "Input",
+ Cell[6264, 209, 241, 7, 27, "Input",
CellTags->"SMVertex",
CellID->1911879451],
- Cell[4983, 160, 3287, 128, 46, "Output",
- CellTags->"SMVertex",
- CellID->60024772]}
+ Cell[6508, 218, 2508, 97, 40, "Output",
+ CellTags->"SMVertex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10324, 340},
- {"SMVertex", 10458, 344}
+ {"PrimaryExamplesSection", 12770, 446},
+ {"SMVertex", 12905, 450}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 2992, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 685, 17, 114, "Usage",
+Cell[3575, 97, 285, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3885, 112, 400, 11, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3592, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4310, 127, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->523475446],
+Cell[5051, 153, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5107, 157, 91, 2, 70, "Input"],
+Cell[5201, 161, 298, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5560, 178, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->580320162],
+ CellID->766392537],
Cell[CellGroupData[{
-Cell[4004, 118, 196, 6, 25, "ExampleSection",
- CellID->2136770321],
+Cell[5972, 197, 196, 6, 26, "ExampleSection",
+ CellID->1266283360],
+Cell[6171, 205, 68, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4225, 128, 133, 4, 27, "Input",
- CellTags->"SMVertex",
- CellID->537549751],
-Cell[4361, 134, 341, 12, 36, "Output",
+Cell[6264, 209, 241, 7, 27, "Input",
CellTags->"SMVertex",
- CellID->1908910905]
+ CellID->1911879451],
+Cell[6508, 218, 2508, 97, 40, "Output",
+ CellTags->"SMVertex"]
}, Open ]],
+Cell[9031, 318, 41, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4739, 151, 241, 7, 27, "Input",
- CellTags->"SMVertex",
- CellID->1911879451],
-Cell[4983, 160, 3287, 128, 46, "Output",
- CellTags->"SMVertex",
- CellID->60024772]
-}, Open ]]
+Cell[9097, 322, 94, 2, 27, "Input"],
+Cell[9194, 326, 482, 16, 63, "Output"]
+}, Open ]],
+Cell[9691, 345, 48, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[9764, 349, 94, 2, 27, "Input"],
+Cell[9861, 353, 462, 16, 58, "Output"]
}, Open ]]
}, Open ]],
-Cell[8309, 293, 23, 0, 42, "FooterCell"]
+Cell[10350, 373, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10418, 378, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10691, 392, 157, 4, 70, "SeeAlso"]
+}, Open ]],
+Cell[10863, 399, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SO.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SO.nb
index 488082424..917586283 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SO.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SO.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10716, 385]
-NotebookOptionsPosition[ 6933, 261]
-NotebookOutlinePosition[ 9605, 340]
-CellTagsIndexPosition[ 9501, 334]
+NotebookDataLength[ 11674, 406]
+NotebookOptionsPosition[ 8163, 294]
+NotebookOutlinePosition[ 10672, 367]
+CellTagsIndexPosition[ 10567, 361]
WindowTitle->SO
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SO\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SO"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SO.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141249],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SO",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCI"], "\<\"OPEDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPEDelta"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"SOD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SOD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SO\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SO"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SO.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$242593],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SO",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SO", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SO", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +147,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1376503462],
+ CellID->813827590],
Cell[CellGroupData[{
@@ -118,7 +157,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->996773448],
+ CellID->1283657613],
Cell[CellGroupData[{
@@ -137,12 +176,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["p",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SO",
- CellLabel->"Out[1]=",
- CellID->1525917797]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +206,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{77, 17},
+ ImageSize->{84, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SO",
- CellLabel->"Out[2]=",
- CellID->1173558036]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -196,8 +233,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SO",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1244939750]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -221,7 +257,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["FCI",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FCI",
@@ -252,9 +287,7 @@ Cell[TextData[{
ButtonNote->"SOD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SO",
- CellID->747915813]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -271,10 +304,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 5.032287}",
+ "built" -> "{2020, 1, 5, 19, 2, 8.029871}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -282,11 +315,11 @@ TaggingRules->{
"None", "summary" ->
"SO[q] is a four-dimensional scalar product of OPEDelta with q. It is \
transformed into Pair[Momentum[q], Momentum[OPEDelta] by FCI.",
- "synonyms" -> {}, "title" -> "SO", "titlemodifier" -> "", "windowtitle" ->
- "SO", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SO"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SO", "titlemodifier" ->
+ "", "windowtitle" -> "SO", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SO"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -295,7 +328,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -304,89 +337,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3347, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4689, 134, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1376503462]},
+ CellID->813827590]},
"SO"->{
- Cell[3980, 124, 115, 4, 27, "Input",
+ Cell[5322, 163, 115, 4, 27, "Input",
CellTags->"SO",
CellID->549535977],
- Cell[4098, 130, 370, 14, 38, "Output",
- CellTags->"SO",
- CellID->1525917797],
- Cell[4505, 149, 139, 5, 27, "Input",
+ Cell[5440, 169, 349, 13, 37, "Output",
+ CellTags->"SO"],
+ Cell[5826, 187, 139, 5, 27, "Input",
CellTags->"SO",
CellID->2038998491],
- Cell[4647, 156, 489, 19, 38, "Output",
- CellTags->"SO",
- CellID->1173558036],
- Cell[5173, 180, 179, 7, 27, "Input",
+ Cell[5968, 194, 468, 18, 37, "Output",
+ CellTags->"SO"],
+ Cell[6473, 217, 179, 7, 27, "Input",
CellTags->"SO",
CellID->73131493],
- Cell[5355, 189, 323, 10, 49, "Output",
- CellTags->"SO",
- CellID->1244939750],
- Cell[6046, 222, 845, 34, 31, "Text",
- CellTags->"SO",
- CellID->747915813]}
+ Cell[6655, 226, 302, 9, 51, "Output",
+ CellTags->"SO"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8772, 305},
- {"SO", 8901, 309}
+ {"PrimaryExamplesSection", 9989, 338},
+ {"SO", 10118, 342}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3342, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 463, 13, 99, "Usage",
+Cell[3919, 104, 279, 11, 45, "ObjectNameGrid"],
+Cell[4201, 117, 463, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3347, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4689, 134, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1376503462],
+ CellID->813827590],
Cell[CellGroupData[{
-Cell[3760, 114, 195, 6, 25, "ExampleSection",
- CellID->996773448],
+Cell[5101, 153, 196, 6, 26, "ExampleSection",
+ CellID->1283657613],
Cell[CellGroupData[{
-Cell[3980, 124, 115, 4, 27, "Input",
+Cell[5322, 163, 115, 4, 27, "Input",
CellTags->"SO",
CellID->549535977],
-Cell[4098, 130, 370, 14, 38, "Output",
- CellTags->"SO",
- CellID->1525917797]
+Cell[5440, 169, 349, 13, 37, "Output",
+ CellTags->"SO"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4505, 149, 139, 5, 27, "Input",
+Cell[5826, 187, 139, 5, 27, "Input",
CellTags->"SO",
CellID->2038998491],
-Cell[4647, 156, 489, 19, 38, "Output",
- CellTags->"SO",
- CellID->1173558036]
+Cell[5968, 194, 468, 18, 37, "Output",
+ CellTags->"SO"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5173, 180, 179, 7, 27, "Input",
+Cell[6473, 217, 179, 7, 27, "Input",
CellTags->"SO",
CellID->73131493],
-Cell[5355, 189, 323, 10, 49, "Output",
- CellTags->"SO",
- CellID->1244939750]
+Cell[6655, 226, 302, 9, 51, "Output",
+ CellTags->"SO"]
}, Open ]]
}, Open ]],
-Cell[5705, 203, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6984, 239, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5773, 208, 270, 12, 31, "SeeAlsoSection",
+Cell[7052, 244, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6046, 222, 845, 34, 31, "Text",
- CellTags->"SO",
- CellID->747915813]
+Cell[7325, 258, 796, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[6906, 259, 23, 0, 42, "FooterCell"]
+Cell[8136, 292, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SOD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SOD.nb
index 82a47af0d..23d3c833a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SOD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SOD.nb
@@ -3,69 +3,96 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10675, 380]
-NotebookOptionsPosition[ 6857, 256]
-NotebookOutlinePosition[ 9555, 335]
-CellTagsIndexPosition[ 9450, 329]
+NotebookDataLength[ 11601, 401]
+NotebookOptionsPosition[ 8001, 288]
+NotebookOutlinePosition[ 10592, 362]
+CellTagsIndexPosition[ 10486, 356]
WindowTitle->SOD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SOD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SOD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SOD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$140231],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SOD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPEDelta\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPEDelta"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Pair"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"SOD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SOD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SOD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SOD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SOD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$241283],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SOD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +100,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SOD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SOD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +145,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1345673083],
+ CellID->786295109],
Cell[CellGroupData[{
@@ -118,7 +155,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1544719042],
+ CellID->1421429396],
Cell[CellGroupData[{
@@ -137,12 +174,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["p",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SOD",
- CellLabel->"Out[1]=",
- CellID->1608750131]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -168,12 +204,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{77, 17},
+ ImageSize->{84, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SOD",
- CellLabel->"Out[2]=",
- CellID->1010314656]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,8 +233,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SOD",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1393449003]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -247,9 +281,7 @@ Cell[TextData[{
ButtonNote->"SOD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SOD",
- CellID->1925156465]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -266,10 +298,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 0.515545}",
+ "built" -> "{2020, 1, 5, 19, 2, 4.666565}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -277,11 +309,11 @@ TaggingRules->{
"None", "summary" ->
"SOD[q] is a D-dimensional scalar product of OPEDelta with q. It is \
transformed into Pair[Momentum[q,D], Momentum[OPEDelta,D] by \
-FeynCalcInternal.", "synonyms" -> {}, "title" -> "SOD", "titlemodifier" -> "",
- "windowtitle" -> "SOD", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SOD"},
- "SearchTextTranslated" -> ""},
+FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SOD",
+ "titlemodifier" -> "", "windowtitle" -> "SOD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SOD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -289,8 +321,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -299,89 +332,77 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3368, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4612, 132, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1345673083]},
+ CellID->786295109]},
"SOD"->{
- Cell[4002, 124, 117, 4, 27, "Input",
+ Cell[5245, 161, 117, 4, 27, "Input",
CellTags->"SOD",
CellID->950791209],
- Cell[4122, 130, 371, 14, 38, "Output",
- CellTags->"SOD",
- CellID->1608750131],
- Cell[4530, 149, 140, 5, 27, "Input",
+ Cell[5365, 167, 350, 13, 37, "Output",
+ CellTags->"SOD"],
+ Cell[5752, 185, 140, 5, 27, "Input",
CellTags->"SOD",
CellID->720250068],
- Cell[4673, 156, 490, 19, 38, "Output",
- CellTags->"SOD",
- CellID->1010314656],
- Cell[5200, 180, 182, 7, 27, "Input",
+ Cell[5895, 192, 469, 18, 37, "Output",
+ CellTags->"SOD"],
+ Cell[6401, 215, 182, 7, 27, "Input",
CellTags->"SOD",
CellID->737230779],
- Cell[5385, 189, 374, 12, 49, "Output",
- CellTags->"SOD",
- CellID->1393449003],
- Cell[6127, 224, 688, 27, 31, "Text",
- CellTags->"SOD",
- CellID->1925156465]}
+ Cell[6586, 224, 353, 11, 51, "Output",
+ CellTags->"SOD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8712, 300},
- {"SOD", 8842, 304}
+ {"PrimaryExamplesSection", 9900, 333},
+ {"SOD", 10030, 337}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3248, 79, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 478, 13, 99, "Usage",
+Cell[3826, 102, 280, 11, 45, "ObjectNameGrid"],
+Cell[4109, 115, 478, 13, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3368, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4612, 132, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1345673083],
+ CellID->786295109],
Cell[CellGroupData[{
-Cell[3781, 114, 196, 6, 25, "ExampleSection",
- CellID->1544719042],
+Cell[5024, 151, 196, 6, 26, "ExampleSection",
+ CellID->1421429396],
Cell[CellGroupData[{
-Cell[4002, 124, 117, 4, 27, "Input",
+Cell[5245, 161, 117, 4, 27, "Input",
CellTags->"SOD",
CellID->950791209],
-Cell[4122, 130, 371, 14, 38, "Output",
- CellTags->"SOD",
- CellID->1608750131]
+Cell[5365, 167, 350, 13, 37, "Output",
+ CellTags->"SOD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4530, 149, 140, 5, 27, "Input",
+Cell[5752, 185, 140, 5, 27, "Input",
CellTags->"SOD",
CellID->720250068],
-Cell[4673, 156, 490, 19, 38, "Output",
- CellTags->"SOD",
- CellID->1010314656]
+Cell[5895, 192, 469, 18, 37, "Output",
+ CellTags->"SOD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5200, 180, 182, 7, 27, "Input",
+Cell[6401, 215, 182, 7, 27, "Input",
CellTags->"SOD",
CellID->737230779],
-Cell[5385, 189, 374, 12, 49, "Output",
- CellTags->"SOD",
- CellID->1393449003]
+Cell[6586, 224, 353, 11, 51, "Output",
+ CellTags->"SOD"]
}, Open ]]
}, Open ]],
-Cell[5786, 205, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6966, 239, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5854, 210, 270, 12, 31, "SeeAlsoSection",
+Cell[7034, 244, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6127, 224, 688, 27, 31, "Text",
- CellTags->"SOD",
- CellID->1925156465]
+Cell[7307, 258, 652, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[6830, 254, 23, 0, 42, "FooterCell"]
+Cell[7974, 286, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SP.nb
index b8d8a172f..60cce538a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SP.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16200, 622]
-NotebookOptionsPosition[ 10983, 442]
-NotebookOutlinePosition[ 14344, 545]
-CellTagsIndexPosition[ 14238, 539]
+NotebookDataLength[ 16876, 632]
+NotebookOptionsPosition[ 12093, 472]
+NotebookOutlinePosition[ 15203, 565]
+CellTagsIndexPosition[ 15097, 559]
WindowTitle->SP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SP.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$145087],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"ExpandScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ScalarProduct"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SP.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$250707],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -115,7 +150,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1611303645],
+ CellID->1487555505],
Cell[CellGroupData[{
@@ -125,7 +160,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->259486820],
+ CellID->1513609754],
Cell[CellGroupData[{
@@ -164,12 +199,11 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm], "2"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{68, 20},
+ ImageSize->{81, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[1]=",
- CellID->1148967332]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -190,13 +224,15 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -205,23 +241,24 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- RowBox[{"2", " ",
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}], "+",
OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}], "+",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{133, 17},
+ ImageSize->{151, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[2]=",
- CellID->53518921]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -267,12 +304,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{123, 20},
+ ImageSize->{142, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[3]=",
- CellID->21872907]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -316,12 +352,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{136, 21},
+ ImageSize->{154, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[4]=",
- CellID->988669305]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -337,12 +372,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SP", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{68, 15},
+ ImageSize->{70, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[5]//StandardForm=",
- CellID->591158186]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -362,12 +396,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "a", "]"}], ",",
RowBox[{"Momentum", "[", "b", "]"}]}], "]"}]], "Output",
- ImageSize->{250, 15},
+ ImageSize->{251, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[6]//StandardForm=",
- CellID->504879117]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -386,12 +419,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SP", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{68, 15},
+ ImageSize->{70, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SP",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1698640474]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -433,9 +465,7 @@ Cell[TextData[{
ButtonNote->"ScalarProduct"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SP",
- CellID->468161499]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -443,7 +473,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"SP",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -452,10 +482,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 21.910512}",
+ "built" -> "{2020, 1, 5, 19, 2, 30.332486}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -463,11 +493,11 @@ TaggingRules->{
"None", "summary" ->
"SP[a, b] denotes a four-dimensional scalar product. SP[a, b] is \
transformed into ScalarProduct[a, b] by FeynCalcInternal. SP[p] is the same \
-as SP[p, p] (= p^2).", "synonyms" -> {}, "title" -> "SP", "titlemodifier" ->
- "", "windowtitle" -> "SP", "type" -> "Symbol", "uri" ->
+as SP[p, p] (= p^2).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SP",
+ "titlemodifier" -> "", "windowtitle" -> "SP", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SP"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -476,7 +506,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -485,145 +515,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3546, 102, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4742, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1611303645]},
+ CellID->1487555505]},
"SP"->{
- Cell[4179, 131, 202, 7, 27, "Input",
+ Cell[5376, 166, 202, 7, 27, "Input",
CellTags->"SP",
CellID->1327327216],
- Cell[4384, 140, 724, 31, 41, "Output",
- CellTags->"SP",
- CellID->1148967332],
- Cell[5145, 176, 206, 8, 27, "Input",
+ Cell[5581, 175, 703, 30, 39, "Output",
+ CellTags->"SP"],
+ Cell[6321, 210, 206, 8, 27, "Input",
CellTags->"SP",
CellID->903181536],
- Cell[5354, 186, 878, 37, 38, "Output",
- CellTags->"SP",
- CellID->53518921],
- Cell[6269, 228, 252, 9, 27, "Input",
+ Cell[6530, 220, 946, 40, 37, "Output",
+ CellTags->"SP"],
+ Cell[7513, 265, 252, 9, 27, "Input",
CellTags->"SP",
CellID->1760867040],
- Cell[6524, 239, 835, 35, 41, "Output",
- CellTags->"SP",
- CellID->21872907],
- Cell[7396, 279, 186, 6, 27, "Input",
+ Cell[7768, 276, 816, 34, 39, "Output",
+ CellTags->"SP"],
+ Cell[8621, 315, 186, 6, 27, "Input",
CellTags->"SP",
CellID->1518821322],
- Cell[7585, 287, 883, 36, 42, "Output",
- CellTags->"SP",
- CellID->988669305],
- Cell[8505, 328, 175, 6, 27, "Input",
+ Cell[8810, 323, 863, 35, 39, "Output",
+ CellTags->"SP"],
+ Cell[9710, 363, 175, 6, 27, "Input",
CellTags->"SP",
CellID->1767436480],
- Cell[8683, 336, 240, 8, 49, "Output",
- CellTags->"SP",
- CellID->591158186],
- Cell[8960, 349, 205, 8, 27, "Input",
+ Cell[9888, 371, 220, 7, 51, "Output",
+ CellTags->"SP"],
+ Cell[10145, 383, 205, 8, 27, "Input",
CellTags->"SP",
CellID->736982087],
- Cell[9168, 359, 315, 10, 49, "Output",
- CellTags->"SP",
- CellID->504879117],
- Cell[9520, 374, 234, 9, 27, "Input",
+ Cell[10353, 393, 295, 9, 51, "Output",
+ CellTags->"SP"],
+ Cell[10685, 407, 234, 9, 70, "Input",
CellTags->"SP",
CellID->355867518],
- Cell[9757, 385, 241, 8, 49, "Output",
- CellTags->"SP",
- CellID->1698640474],
- Cell[10366, 416, 575, 21, 32, "Text",
- CellTags->"SP",
- CellID->468161499]}
+ Cell[10922, 418, 220, 7, 51, "Output",
+ CellTags->"SP"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12852, 486},
- {"SP", 12982, 490}
+ {"PrimaryExamplesSection", 13944, 516},
+ {"SP", 14074, 520}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3196, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 662, 20, 104, "Usage",
+Cell[3773, 100, 279, 11, 45, "ObjectNameGrid"],
+Cell[4055, 113, 662, 20, 110, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3546, 102, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4742, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1611303645],
+ CellID->1487555505],
Cell[CellGroupData[{
-Cell[3959, 121, 195, 6, 25, "ExampleSection",
- CellID->259486820],
+Cell[5155, 156, 196, 6, 26, "ExampleSection",
+ CellID->1513609754],
Cell[CellGroupData[{
-Cell[4179, 131, 202, 7, 27, "Input",
+Cell[5376, 166, 202, 7, 27, "Input",
CellTags->"SP",
CellID->1327327216],
-Cell[4384, 140, 724, 31, 41, "Output",
- CellTags->"SP",
- CellID->1148967332]
+Cell[5581, 175, 703, 30, 39, "Output",
+ CellTags->"SP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5145, 176, 206, 8, 27, "Input",
+Cell[6321, 210, 206, 8, 27, "Input",
CellTags->"SP",
CellID->903181536],
-Cell[5354, 186, 878, 37, 38, "Output",
- CellTags->"SP",
- CellID->53518921]
+Cell[6530, 220, 946, 40, 37, "Output",
+ CellTags->"SP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6269, 228, 252, 9, 27, "Input",
+Cell[7513, 265, 252, 9, 27, "Input",
CellTags->"SP",
CellID->1760867040],
-Cell[6524, 239, 835, 35, 41, "Output",
- CellTags->"SP",
- CellID->21872907]
+Cell[7768, 276, 816, 34, 39, "Output",
+ CellTags->"SP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7396, 279, 186, 6, 27, "Input",
+Cell[8621, 315, 186, 6, 27, "Input",
CellTags->"SP",
CellID->1518821322],
-Cell[7585, 287, 883, 36, 42, "Output",
- CellTags->"SP",
- CellID->988669305]
+Cell[8810, 323, 863, 35, 39, "Output",
+ CellTags->"SP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8505, 328, 175, 6, 27, "Input",
+Cell[9710, 363, 175, 6, 27, "Input",
CellTags->"SP",
CellID->1767436480],
-Cell[8683, 336, 240, 8, 49, "Output",
- CellTags->"SP",
- CellID->591158186]
+Cell[9888, 371, 220, 7, 51, "Output",
+ CellTags->"SP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8960, 349, 205, 8, 27, "Input",
+Cell[10145, 383, 205, 8, 27, "Input",
CellTags->"SP",
CellID->736982087],
-Cell[9168, 359, 315, 10, 49, "Output",
- CellTags->"SP",
- CellID->504879117]
+Cell[10353, 393, 295, 9, 51, "Output",
+ CellTags->"SP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9520, 374, 234, 9, 27, "Input",
+Cell[10685, 407, 234, 9, 70, "Input",
CellTags->"SP",
CellID->355867518],
-Cell[9757, 385, 241, 8, 49, "Output",
- CellTags->"SP",
- CellID->1698640474]
+Cell[10922, 418, 220, 7, 51, "Output",
+ CellTags->"SP"]
}, Open ]]
}, Open ]],
-Cell[10025, 397, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11169, 429, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10093, 402, 270, 12, 31, "SeeAlsoSection",
+Cell[11237, 434, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[10366, 416, 575, 21, 32, "Text",
- CellTags->"SP",
- CellID->468161499]
+Cell[11510, 448, 541, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[10956, 440, 23, 0, 42, "FooterCell"]
+Cell[12066, 470, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPC.nb
index 8afe8cb8d..50dd36fc6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPC.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPC.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5932, 185]
-NotebookOptionsPosition[ 3809, 121]
-NotebookOutlinePosition[ 5677, 174]
-CellTagsIndexPosition[ 5612, 169]
+NotebookDataLength[ 6724, 206]
+NotebookOptionsPosition[ 4774, 151]
+NotebookOutlinePosition[ 6517, 198]
+CellTagsIndexPosition[ 6474, 195]
WindowTitle->SPC
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SPC\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SPC"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SPC.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141594],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPC",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ScalarProductCancel\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ScalarProductCancel"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SPC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SPC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SPC.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$243038],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPC",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SPC", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SPC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"ScalarProductCancel"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SPC",
- CellID->777067132]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 6.525758}",
+ "built" -> "{2020, 1, 5, 19, 2, 9.173056}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "SPC is an abbreviation for ScalarProductCancel.",
- "synonyms" -> {}, "title" -> "SPC", "titlemodifier" -> "", "windowtitle" ->
- "SPC", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SPC"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SPC", "titlemodifier" ->
+ "", "windowtitle" -> "SPC", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SPC"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SPC"->{
- Cell[3512, 107, 255, 9, 70, "Text",
- CellTags->"SPC",
- CellID->777067132]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SPC", 5507, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 3004, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 349, 11, 70, "Usage",
+Cell[3582, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3865, 110, 349, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3239, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4239, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3512, 107, 255, 9, 70, "Text",
- CellTags->"SPC",
- CellID->777067132]
+Cell[4512, 139, 220, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3782, 119, 23, 0, 70, "FooterCell"]
+Cell[4747, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPD.nb
index bc15ece41..f9bc7f9e7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPD.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPD.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16991, 655]
-NotebookOptionsPosition[ 11365, 461]
-NotebookOutlinePosition[ 14929, 570]
-CellTagsIndexPosition[ 14822, 564]
+NotebookDataLength[ 17708, 664]
+NotebookOptionsPosition[ 12505, 491]
+NotebookOutlinePosition[ 15853, 590]
+CellTagsIndexPosition[ 15746, 584]
WindowTitle->SPD
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SPD\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SPD"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SPD.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141947],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPD",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PD"], "\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"ExpandScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ScalarProduct"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SPD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SPD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SPD.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$243489],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SPD", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SPD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -116,7 +152,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1090459362],
+ CellID->802463375],
Cell[CellGroupData[{
@@ -126,7 +162,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->972663145],
+ CellID->1325491493],
Cell[CellGroupData[{
@@ -162,12 +198,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{65, 20},
+ ImageSize->{75, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[1]=",
- CellID->1537579140]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -188,11 +223,13 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -201,21 +238,22 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- RowBox[{"2", " ",
- FormBox["p",
- TraditionalForm]}], "+",
- FormBox["q",
- TraditionalForm]}],
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ FormBox["p",
+ TraditionalForm]}], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{129, 17},
+ ImageSize->{143, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[2]=",
- CellID->1810693243]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -257,12 +295,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{119, 20},
+ ImageSize->{134, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[3]=",
- CellID->533108024]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -302,12 +339,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{131, 20},
+ ImageSize->{146, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[4]=",
- CellID->33170286]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -323,12 +359,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SPD", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{76, 15},
+ ImageSize->{78, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1457236269]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -350,12 +385,11 @@ Cell[BoxData[
RowBox[{"a", ",", "D"}], "]"}], ",",
RowBox[{"Momentum", "[",
RowBox[{"b", ",", "D"}], "]"}]}], "]"}]], "Output",
- ImageSize->{296, 15},
+ ImageSize->{297, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[6]//StandardForm=",
- CellID->716068529]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -374,12 +408,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SPD", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{76, 15},
+ ImageSize->{78, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[7]//StandardForm=",
- CellID->966232396]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -399,12 +432,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SPD", "[",
RowBox[{"p", ",", "q"}], "]"}]], "Output",
- ImageSize->{77, 15},
+ ImageSize->{78, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SPD",
- CellLabel->"Out[8]//StandardForm=",
- CellID->1514523545]
+ CellLabel->"Out[8]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -452,17 +484,15 @@ Cell[TextData[{
ButtonNote->"ScalarProduct"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SPD",
- CellID->1031641673]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"SPD",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -471,10 +501,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 7.745116}",
+ "built" -> "{2020, 1, 5, 19, 2, 10.302587}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -482,11 +512,11 @@ TaggingRules->{
"None", "summary" ->
"SPD[a, b] denotes a D-dimensional scalar product. SPD[a, b] is \
transformed into ScalarProduct[a, b,Dimension->D] by FeynCalcInternal. SPD[p] \
-is the same as SPD[p,p] (= p^2).", "synonyms" -> {}, "title" -> "SPD",
- "titlemodifier" -> "", "windowtitle" -> "SPD", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SPD"}, "SearchTextTranslated" -> ""},
+is the same as SPD[p,p] (= p^2).", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SPD", "titlemodifier" -> "", "windowtitle" -> "SPD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SPD"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -494,8 +524,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -504,159 +535,137 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3572, 103, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4828, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1090459362]},
+ CellID->802463375]},
"SPD"->{
- Cell[4205, 132, 205, 7, 27, "Input",
+ Cell[5461, 168, 205, 7, 27, "Input",
CellTags->"SPD",
CellID->1779475118],
- Cell[4413, 141, 638, 28, 41, "Output",
- CellTags->"SPD",
- CellID->1537579140],
- Cell[5088, 174, 208, 8, 27, "Input",
+ Cell[5669, 177, 617, 27, 39, "Output",
+ CellTags->"SPD"],
+ Cell[6323, 209, 208, 8, 27, "Input",
CellTags->"SPD",
CellID->437622958],
- Cell[5299, 184, 768, 33, 38, "Output",
- CellTags->"SPD",
- CellID->1810693243],
- Cell[6104, 222, 254, 9, 27, "Input",
+ Cell[6534, 219, 830, 36, 37, "Output",
+ CellTags->"SPD"],
+ Cell[7401, 260, 254, 9, 27, "Input",
CellTags->"SPD",
CellID->1031117972],
- Cell[6361, 233, 722, 31, 41, "Output",
- CellTags->"SPD",
- CellID->533108024],
- Cell[7120, 269, 186, 6, 27, "Input",
+ Cell[7658, 271, 702, 30, 39, "Output",
+ CellTags->"SPD"],
+ Cell[8397, 306, 186, 6, 27, "Input",
CellTags->"SPD",
CellID->87993462],
- Cell[7309, 277, 765, 32, 41, "Output",
- CellTags->"SPD",
- CellID->33170286],
- Cell[8111, 314, 177, 6, 27, "Input",
+ Cell[8586, 314, 746, 31, 39, "Output",
+ CellTags->"SPD"],
+ Cell[9369, 350, 177, 6, 27, "Input",
CellTags->"SPD",
CellID->2034315321],
- Cell[8291, 322, 243, 8, 49, "Output",
- CellTags->"SPD",
- CellID->1457236269],
- Cell[8571, 335, 208, 8, 27, "Input",
+ Cell[9549, 358, 222, 7, 51, "Output",
+ CellTags->"SPD"],
+ Cell[9808, 370, 208, 8, 27, "Input",
CellTags->"SPD",
CellID->1917897688],
- Cell[8782, 345, 366, 12, 49, "Output",
- CellTags->"SPD",
- CellID->716068529],
- Cell[9185, 362, 236, 9, 27, "Input",
+ Cell[10019, 380, 346, 11, 51, "Output",
+ CellTags->"SPD"],
+ Cell[10402, 396, 236, 9, 27, "Input",
CellTags->"SPD",
CellID->980827421],
- Cell[9424, 373, 242, 8, 49, "Output",
- CellTags->"SPD",
- CellID->966232396],
- Cell[9703, 386, 288, 10, 27, "Input",
+ Cell[10641, 407, 222, 7, 51, "Output",
+ CellTags->"SPD"],
+ Cell[10900, 419, 288, 10, 27, "Input",
CellTags->"SPD",
CellID->1873446419],
- Cell[9994, 398, 243, 8, 49, "Output",
- CellTags->"SPD",
- CellID->1514523545],
- Cell[10605, 429, 718, 27, 32, "Text",
- CellTags->"SPD",
- CellID->1031641673]}
+ Cell[11191, 431, 222, 7, 51, "Output",
+ CellTags->"SPD"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13250, 505},
- {"SPD", 13381, 509}
+ {"PrimaryExamplesSection", 14433, 536},
+ {"SPD", 14563, 540}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3260, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 682, 21, 104, "Usage",
+Cell[3838, 101, 280, 11, 45, "ObjectNameGrid"],
+Cell[4121, 114, 682, 21, 110, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3572, 103, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4828, 139, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1090459362],
+ CellID->802463375],
Cell[CellGroupData[{
-Cell[3985, 122, 195, 6, 25, "ExampleSection",
- CellID->972663145],
+Cell[5240, 158, 196, 6, 26, "ExampleSection",
+ CellID->1325491493],
Cell[CellGroupData[{
-Cell[4205, 132, 205, 7, 27, "Input",
+Cell[5461, 168, 205, 7, 27, "Input",
CellTags->"SPD",
CellID->1779475118],
-Cell[4413, 141, 638, 28, 41, "Output",
- CellTags->"SPD",
- CellID->1537579140]
+Cell[5669, 177, 617, 27, 39, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5088, 174, 208, 8, 27, "Input",
+Cell[6323, 209, 208, 8, 27, "Input",
CellTags->"SPD",
CellID->437622958],
-Cell[5299, 184, 768, 33, 38, "Output",
- CellTags->"SPD",
- CellID->1810693243]
+Cell[6534, 219, 830, 36, 37, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6104, 222, 254, 9, 27, "Input",
+Cell[7401, 260, 254, 9, 27, "Input",
CellTags->"SPD",
CellID->1031117972],
-Cell[6361, 233, 722, 31, 41, "Output",
- CellTags->"SPD",
- CellID->533108024]
+Cell[7658, 271, 702, 30, 39, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7120, 269, 186, 6, 27, "Input",
+Cell[8397, 306, 186, 6, 27, "Input",
CellTags->"SPD",
CellID->87993462],
-Cell[7309, 277, 765, 32, 41, "Output",
- CellTags->"SPD",
- CellID->33170286]
+Cell[8586, 314, 746, 31, 39, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8111, 314, 177, 6, 27, "Input",
+Cell[9369, 350, 177, 6, 27, "Input",
CellTags->"SPD",
CellID->2034315321],
-Cell[8291, 322, 243, 8, 49, "Output",
- CellTags->"SPD",
- CellID->1457236269]
+Cell[9549, 358, 222, 7, 51, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8571, 335, 208, 8, 27, "Input",
+Cell[9808, 370, 208, 8, 27, "Input",
CellTags->"SPD",
CellID->1917897688],
-Cell[8782, 345, 366, 12, 49, "Output",
- CellTags->"SPD",
- CellID->716068529]
+Cell[10019, 380, 346, 11, 51, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9185, 362, 236, 9, 27, "Input",
+Cell[10402, 396, 236, 9, 27, "Input",
CellTags->"SPD",
CellID->980827421],
-Cell[9424, 373, 242, 8, 49, "Output",
- CellTags->"SPD",
- CellID->966232396]
+Cell[10641, 407, 222, 7, 51, "Output",
+ CellTags->"SPD"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9703, 386, 288, 10, 27, "Input",
+Cell[10900, 419, 288, 10, 27, "Input",
CellTags->"SPD",
CellID->1873446419],
-Cell[9994, 398, 243, 8, 49, "Output",
- CellTags->"SPD",
- CellID->1514523545]
+Cell[11191, 431, 222, 7, 51, "Output",
+ CellTags->"SPD"]
}, Open ]]
}, Open ]],
-Cell[10264, 410, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11440, 442, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10332, 415, 270, 12, 31, "SeeAlsoSection",
+Cell[11508, 447, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10605, 429, 718, 27, 32, "Text",
- CellTags->"SPD",
- CellID->1031641673]
+Cell[11781, 461, 682, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[11338, 459, 23, 0, 42, "FooterCell"]
+Cell[12478, 489, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPE.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPE.nb
new file mode 100644
index 000000000..8b34519d2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPE.nb
@@ -0,0 +1,700 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 18524, 690]
+NotebookOptionsPosition[ 13299, 516]
+NotebookOutlinePosition[ 16667, 616]
+CellTagsIndexPosition[ 16560, 610]
+WindowTitle->SPE
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PD\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PD"], "\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"ExpandScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"ScalarProduct\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProduct"], "\<\"SPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ScalarProduct"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SPE\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SPE"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SPE.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$243941],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPE",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SPE", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SPE", "[",
+ RowBox[{"a", ",", " ", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a D-4-dimensional scalar product. SPE[a, b] is \
+transformed into Pair[Momentum[a, -4 + D], Momentum[b, -4 + D]] by \
+FeynCalcInternal. SPE[p] is the same as SPE[p,p] ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}], ")"}]], "InlineFormula"]
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->406808914],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1794536108],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"SPE", "[", "q", "]"}]}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[1]:=",
+ CellID->1779475118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{75, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SPE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[2]:=",
+ CellID->437622958],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"]}], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{143, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"SPE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[3]:=",
+ CellID->1031117972],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{134, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"SPE", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[4]:=",
+ CellID->87993462],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "^"],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{146, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[5]:=",
+ CellID->2034315321],
+
+Cell[BoxData[
+ RowBox[{"SPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{78, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[5]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[6]:=",
+ CellID->1917897688],
+
+Cell[BoxData[
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"a", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ ImageSize->{361, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[6]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"SPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[7]:=",
+ CellID->980827421],
+
+Cell[BoxData[
+ RowBox[{"SPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{78, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[7]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"SP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], ",", " ",
+ RowBox[{"D", "-", "4"}]}], "]"}], "]"}], "//", "StandardForm"}]], "Input",\
+
+ CellTags->"SPE",
+ CellLabel->"In[8]:=",
+ CellID->1873446419],
+
+Cell[BoxData[
+ RowBox[{"SPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Output",
+ ImageSize->{78, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SPE",
+ CellLabel->"Out[8]//StandardForm="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["PD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PD",
+ ButtonNote->"PD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Calc",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Calc",
+ ButtonNote->"Calc"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ExpandScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExpandScalarProduct",
+ ButtonNote->"ExpandScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso"]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SPE",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 11.712542}",
+ "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SPE[a, b] denotes a D-4-dimensional scalar product. SPE[a, b] is \
+transformed into Pair[Momentum[a, -4 + D], Momentum[b, -4 + D]] by \
+FeynCalcInternal. SPE[p] is the same as SPE[p,p] (= p^2)", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SPE", "titlemodifier" -> "", "windowtitle" ->
+ "SPE", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SPE"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4900, 138, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->406808914]},
+ "SPE"->{
+ Cell[5533, 167, 205, 7, 27, "Input",
+ CellTags->"SPE",
+ CellID->1779475118],
+ Cell[5741, 176, 704, 30, 39, "Output",
+ CellTags->"SPE"],
+ Cell[6482, 211, 208, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->437622958],
+ Cell[6693, 221, 947, 40, 37, "Output",
+ CellTags->"SPE"],
+ Cell[7677, 266, 254, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->1031117972],
+ Cell[7934, 277, 817, 34, 39, "Output",
+ CellTags->"SPE"],
+ Cell[8788, 316, 186, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->87993462],
+ Cell[8977, 324, 864, 35, 39, "Output",
+ CellTags->"SPE"],
+ Cell[9878, 364, 177, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->2034315321],
+ Cell[10058, 372, 222, 7, 51, "Output",
+ CellTags->"SPE"],
+ Cell[10317, 384, 208, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->1917897688],
+ Cell[10528, 394, 442, 15, 51, "Output",
+ CellTags->"SPE"],
+ Cell[11007, 414, 236, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->980827421],
+ Cell[11246, 425, 222, 7, 51, "Output",
+ CellTags->"SPE"],
+ Cell[11505, 437, 313, 11, 27, "Input",
+ CellTags->"SPE",
+ CellID->1873446419],
+ Cell[11821, 450, 222, 7, 51, "Output",
+ CellTags->"SPE"]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15245, 562},
+ {"SPE", 15375, 566}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 3354, 80, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3932, 103, 280, 11, 45, "ObjectNameGrid"],
+Cell[4215, 116, 660, 18, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4900, 138, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->406808914],
+Cell[CellGroupData[{
+Cell[5312, 157, 196, 6, 26, "ExampleSection",
+ CellID->1794536108],
+Cell[CellGroupData[{
+Cell[5533, 167, 205, 7, 27, "Input",
+ CellTags->"SPE",
+ CellID->1779475118],
+Cell[5741, 176, 704, 30, 39, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6482, 211, 208, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->437622958],
+Cell[6693, 221, 947, 40, 37, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7677, 266, 254, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->1031117972],
+Cell[7934, 277, 817, 34, 39, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8788, 316, 186, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->87993462],
+Cell[8977, 324, 864, 35, 39, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9878, 364, 177, 6, 27, "Input",
+ CellTags->"SPE",
+ CellID->2034315321],
+Cell[10058, 372, 222, 7, 51, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10317, 384, 208, 8, 27, "Input",
+ CellTags->"SPE",
+ CellID->1917897688],
+Cell[10528, 394, 442, 15, 51, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11007, 414, 236, 9, 27, "Input",
+ CellTags->"SPE",
+ CellID->980827421],
+Cell[11246, 425, 222, 7, 51, "Output",
+ CellTags->"SPE"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11505, 437, 313, 11, 27, "Input",
+ CellTags->"SPE",
+ CellID->1873446419],
+Cell[11821, 450, 222, 7, 51, "Output",
+ CellTags->"SPE"]
+}, Open ]]
+}, Open ]],
+Cell[12070, 461, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12138, 466, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[12411, 480, 846, 31, 70, "SeeAlso"]
+}, Open ]],
+Cell[13272, 514, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPL.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPL.nb
index b76253ac2..1d736d9a5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPL.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SPL.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5913, 185]
-NotebookOptionsPosition[ 3793, 121]
-NotebookOutlinePosition[ 5658, 174]
-CellTagsIndexPosition[ 5593, 169]
+NotebookDataLength[ 6697, 206]
+NotebookOptionsPosition[ 4750, 151]
+NotebookOutlinePosition[ 6490, 198]
+CellTagsIndexPosition[ 6447, 195]
WindowTitle->SPL
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SPL\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SPL"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SPL.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$144735],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPL",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SimplifyPolyLog\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SimplifyPolyLog"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SPL\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SPL"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SPL.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$250257],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SPL",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SPL", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SPL", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"SimplifyPolyLog"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SPL",
- CellID->899844592]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 20.564425}",
+ "built" -> "{2020, 1, 5, 19, 2, 29.202269}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "SPL is an abbreviation for SimplifyPolyLog.",
- "synonyms" -> {}, "title" -> "SPL", "titlemodifier" -> "", "windowtitle" ->
- "SPL", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SPL"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SPL", "titlemodifier" ->
+ "", "windowtitle" -> "SPL", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SPL"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -152,41 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SPL"->{
- Cell[3508, 107, 243, 9, 70, "Text",
- CellTags->"SPL",
- CellID->899844592]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SPL", 5488, 162}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2996, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 345, 11, 70, "Usage",
+Cell[3574, 97, 280, 11, 70, "ObjectNameGrid"],
+Cell[3857, 110, 345, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3235, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4227, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3508, 107, 243, 9, 70, "Text",
- CellTags->"SPL",
- CellID->899844592]
+Cell[4500, 139, 208, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3766, 119, 23, 0, 70, "FooterCell"]
+Cell[4723, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUND.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUND.nb
index 921be241a..b75c0aea6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUND.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUND.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 19267, 743]
-NotebookOptionsPosition[ 12835, 517]
-NotebookOutlinePosition[ 16720, 639]
-CellTagsIndexPosition[ 16612, 633]
+NotebookDataLength[ 19316, 727]
+NotebookOptionsPosition[ 13614, 533]
+NotebookOutlinePosition[ 17097, 639]
+CellTagsIndexPosition[ 16989, 633]
WindowTitle->SUND
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUND\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUND"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUND.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$147861],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUND",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNDelta\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNF"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUND\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUND"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUND.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$255599],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUND",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUND", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUND", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -115,7 +150,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->733782815],
+ CellID->1033923088],
Cell[CellGroupData[{
@@ -125,7 +160,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->666038436],
+ CellID->353083208],
Cell[CellGroupData[{
@@ -146,21 +181,19 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{42, 19},
+ ImageSize->{49, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[1]=",
- CellID->257225185]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"tt", "=",
- RowBox[{"SUND", "[",
- RowBox[{"a", ",", "b", ",", "c", ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]}]], "Input",
+ RowBox[{"SUND", "[",
+ RowBox[{"a", ",", "b", ",", "c", ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUND",
CellLabel->"In[2]:=",
CellID->1361287318],
@@ -222,12 +255,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{265, 25},
+ ImageSize->{292, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[2]=",
- CellID->229657836]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -249,12 +281,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{42, 19},
+ ImageSize->{49, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[3]=",
- CellID->1988918016]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -276,12 +307,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{43, 19},
+ ImageSize->{50, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[4]=",
- CellID->1040614065]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -305,12 +335,11 @@ Cell[BoxData[
RowBox[{"4", "-",
SubsuperscriptBox["C", "A", "2"]}], ")"}], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
- ImageSize->{104, 21},
+ ImageSize->{113, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[5]=",
- CellID->1608432966]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -340,12 +369,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"4", "-",
SuperscriptBox["N", "2"]}], ")"}]}], "N"], TraditionalForm]], "Output",
- ImageSize->{130, 46},
+ ImageSize->{129, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[6]=",
- CellID->576134912]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -383,12 +411,11 @@ Cell[BoxData[
FormBox["e",
TraditionalForm],
TraditionalForm]}]]}], "N"]}], TraditionalForm]], "Output",
- ImageSize->{109, 46},
+ ImageSize->{112, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[7]=",
- CellID->985891006]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -405,12 +432,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SUND", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}]], "Output",
- ImageSize->{106, 15},
+ ImageSize->{109, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[8]//StandardForm=",
- CellID->702924348]
+ CellLabel->"Out[8]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -431,12 +457,11 @@ Cell[BoxData[
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}], ",",
RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}]], "Output",
- ImageSize->{346, 15},
+ ImageSize->{352, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[9]//StandardForm=",
- CellID->1657792981]
+ CellLabel->"Out[9]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -455,19 +480,12 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SUND", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}]], "Output",
- ImageSize->{106, 15},
+ ImageSize->{109, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUND",
- CellLabel->"Out[10]//StandardForm=",
- CellID->1049412344]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[", "tt", "]"}]], "Input",
- CellTags->"SUND",
- CellLabel->"In[11]:=",
- CellID->619973322]
+ CellLabel->"Out[10]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -508,17 +526,15 @@ Cell[TextData[{
ButtonNote->"SUNSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUND",
- CellID->37121422]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SUND",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -527,20 +543,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 34.273425}",
+ "built" -> "{2020, 1, 5, 19, 2, 43.651251}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "SUND[a, b, c] are the symmetric SU(N) dabc.",
- "synonyms" -> {}, "title" -> "SUND", "titlemodifier" -> "", "windowtitle" ->
- "SUND", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SUND"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUND", "titlemodifier" ->
+ "", "windowtitle" -> "SUND", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SUND"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -549,7 +565,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -558,193 +574,161 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3450, 102, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4619, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->733782815]},
+ CellID->1033923088]},
"SUND"->{
- Cell[4082, 131, 153, 5, 27, "Input",
+ Cell[5252, 166, 153, 5, 27, "Input",
CellTags->"SUND",
CellID->1395182696],
- Cell[4238, 138, 361, 15, 40, "Output",
- CellTags->"SUND",
- CellID->257225185],
- Cell[4636, 158, 229, 7, 27, "Input",
+ Cell[5408, 173, 341, 14, 38, "Output",
+ CellTags->"SUND"],
+ Cell[5786, 192, 203, 6, 27, "Input",
CellTags->"SUND",
CellID->1361287318],
- Cell[4868, 167, 1579, 62, 46, "Output",
- CellTags->"SUND",
- CellID->229657836],
- Cell[6484, 234, 152, 5, 27, "Input",
+ Cell[5992, 200, 1559, 61, 43, "Output",
+ CellTags->"SUND"],
+ Cell[7588, 266, 152, 5, 27, "Input",
CellTags->"SUND",
CellID->875422809],
- Cell[6639, 241, 362, 15, 40, "Output",
- CellTags->"SUND",
- CellID->1988918016],
- Cell[7038, 261, 153, 5, 27, "Input",
+ Cell[7743, 273, 341, 14, 38, "Output",
+ CellTags->"SUND"],
+ Cell[8121, 292, 153, 5, 27, "Input",
CellTags->"SUND",
CellID->2104582579],
- Cell[7194, 268, 362, 15, 40, "Output",
- CellTags->"SUND",
- CellID->1040614065],
- Cell[7593, 288, 284, 9, 27, "Input",
+ Cell[8277, 299, 341, 14, 38, "Output",
+ CellTags->"SUND"],
+ Cell[8655, 318, 284, 9, 27, "Input",
CellTags->"SUND",
CellID->1572742744],
- Cell[7880, 299, 366, 13, 42, "Output",
- CellTags->"SUND",
- CellID->1608432966],
- Cell[8283, 317, 395, 13, 27, "Input",
+ Cell[8942, 329, 345, 12, 42, "Output",
+ CellTags->"SUND"],
+ Cell[9324, 346, 395, 13, 27, "Input",
CellTags->"SUND",
CellID->2028272220],
- Cell[8681, 332, 409, 15, 67, "Output",
- CellTags->"SUND",
- CellID->576134912],
- Cell[9127, 352, 395, 13, 27, "Input",
+ Cell[9722, 361, 389, 14, 62, "Output",
+ CellTags->"SUND"],
+ Cell[10148, 380, 395, 13, 27, "Input",
CellTags->"SUND",
CellID->1938547204],
- Cell[9525, 367, 581, 23, 67, "Output",
- CellTags->"SUND",
- CellID->985891006],
- Cell[10143, 395, 191, 7, 27, "Input",
+ Cell[10546, 395, 561, 22, 62, "Output",
+ CellTags->"SUND"],
+ Cell[11144, 422, 191, 7, 27, "Input",
CellTags->"SUND",
CellID->1197762042],
- Cell[10337, 404, 255, 8, 49, "Output",
- CellTags->"SUND",
- CellID->702924348],
- Cell[10629, 417, 220, 8, 27, "Input",
+ Cell[11338, 431, 235, 7, 51, "Output",
+ CellTags->"SUND"],
+ Cell[11610, 443, 220, 8, 27, "Input",
CellTags->"SUND",
CellID->1553275724],
- Cell[10852, 427, 364, 11, 49, "Output",
- CellTags->"SUND",
- CellID->1657792981],
- Cell[11253, 443, 250, 9, 27, "Input",
+ Cell[11833, 453, 343, 10, 51, "Output",
+ CellTags->"SUND"],
+ Cell[12213, 468, 250, 9, 27, "Input",
CellTags->"SUND",
CellID->1610675678],
- Cell[11506, 454, 257, 8, 49, "Output",
- CellTags->"SUND",
- CellID->1049412344],
- Cell[11778, 465, 122, 4, 27, "Input",
- CellTags->"SUND",
- CellID->619973322],
- Cell[12256, 491, 537, 21, 32, "Text",
- CellTags->"SUND",
- CellID->37121422]}
+ Cell[12466, 479, 236, 7, 51, "Output",
+ CellTags->"SUND"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14589, 559},
- {"SUND", 14720, 563}
+ {"PrimaryExamplesSection", 15355, 575},
+ {"SUND", 15487, 579}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3164, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 567, 20, 84, "Usage",
+Cell[3743, 100, 281, 11, 45, "ObjectNameGrid"],
+Cell[4027, 113, 567, 20, 86, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3450, 102, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4619, 137, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->733782815],
+ CellID->1033923088],
Cell[CellGroupData[{
-Cell[3862, 121, 195, 6, 25, "ExampleSection",
- CellID->666038436],
+Cell[5032, 156, 195, 6, 26, "ExampleSection",
+ CellID->353083208],
Cell[CellGroupData[{
-Cell[4082, 131, 153, 5, 27, "Input",
+Cell[5252, 166, 153, 5, 27, "Input",
CellTags->"SUND",
CellID->1395182696],
-Cell[4238, 138, 361, 15, 40, "Output",
- CellTags->"SUND",
- CellID->257225185]
+Cell[5408, 173, 341, 14, 38, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4636, 158, 229, 7, 27, "Input",
+Cell[5786, 192, 203, 6, 27, "Input",
CellTags->"SUND",
CellID->1361287318],
-Cell[4868, 167, 1579, 62, 46, "Output",
- CellTags->"SUND",
- CellID->229657836]
+Cell[5992, 200, 1559, 61, 43, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6484, 234, 152, 5, 27, "Input",
+Cell[7588, 266, 152, 5, 27, "Input",
CellTags->"SUND",
CellID->875422809],
-Cell[6639, 241, 362, 15, 40, "Output",
- CellTags->"SUND",
- CellID->1988918016]
+Cell[7743, 273, 341, 14, 38, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7038, 261, 153, 5, 27, "Input",
+Cell[8121, 292, 153, 5, 27, "Input",
CellTags->"SUND",
CellID->2104582579],
-Cell[7194, 268, 362, 15, 40, "Output",
- CellTags->"SUND",
- CellID->1040614065]
+Cell[8277, 299, 341, 14, 38, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7593, 288, 284, 9, 27, "Input",
+Cell[8655, 318, 284, 9, 27, "Input",
CellTags->"SUND",
CellID->1572742744],
-Cell[7880, 299, 366, 13, 42, "Output",
- CellTags->"SUND",
- CellID->1608432966]
+Cell[8942, 329, 345, 12, 42, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8283, 317, 395, 13, 27, "Input",
+Cell[9324, 346, 395, 13, 27, "Input",
CellTags->"SUND",
CellID->2028272220],
-Cell[8681, 332, 409, 15, 67, "Output",
- CellTags->"SUND",
- CellID->576134912]
+Cell[9722, 361, 389, 14, 62, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9127, 352, 395, 13, 27, "Input",
+Cell[10148, 380, 395, 13, 27, "Input",
CellTags->"SUND",
CellID->1938547204],
-Cell[9525, 367, 581, 23, 67, "Output",
- CellTags->"SUND",
- CellID->985891006]
+Cell[10546, 395, 561, 22, 62, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10143, 395, 191, 7, 27, "Input",
+Cell[11144, 422, 191, 7, 27, "Input",
CellTags->"SUND",
CellID->1197762042],
-Cell[10337, 404, 255, 8, 49, "Output",
- CellTags->"SUND",
- CellID->702924348]
+Cell[11338, 431, 235, 7, 51, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10629, 417, 220, 8, 27, "Input",
+Cell[11610, 443, 220, 8, 27, "Input",
CellTags->"SUND",
CellID->1553275724],
-Cell[10852, 427, 364, 11, 49, "Output",
- CellTags->"SUND",
- CellID->1657792981]
+Cell[11833, 453, 343, 10, 51, "Output",
+ CellTags->"SUND"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11253, 443, 250, 9, 27, "Input",
+Cell[12213, 468, 250, 9, 27, "Input",
CellTags->"SUND",
CellID->1610675678],
-Cell[11506, 454, 257, 8, 49, "Output",
- CellTags->"SUND",
- CellID->1049412344]
+Cell[12466, 479, 236, 7, 51, "Output",
+ CellTags->"SUND"]
+}, Open ]]
}, Open ]],
-Cell[11778, 465, 122, 4, 27, "Input",
- CellTags->"SUND",
- CellID->619973322]
-}, Open ]],
-Cell[11915, 472, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12729, 490, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11983, 477, 270, 12, 31, "SeeAlsoSection",
+Cell[12797, 495, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12256, 491, 537, 21, 32, "Text",
- CellTags->"SUND",
- CellID->37121422]
+Cell[13070, 509, 502, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[12808, 515, 23, 0, 42, "FooterCell"]
+Cell[13587, 531, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDelta.nb
index c2984b2de..38b1f85ac 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDelta.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDelta.nb
@@ -3,69 +3,100 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18740, 706]
-NotebookOptionsPosition[ 12095, 479]
-NotebookOutlinePosition[ 16116, 602]
-CellTagsIndexPosition[ 16004, 596]
+NotebookDataLength[ 19623, 717]
+NotebookOptionsPosition[ 14016, 534]
+NotebookOutlinePosition[ 17408, 633]
+CellTagsIndexPosition[ 17296, 627]
WindowTitle->SUNDelta
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNDelta\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNDelta"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNDelta.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExplicitSUNIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitSUNIndex"], "\<\"SD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SD"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNF"], "\<\"SUNIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNIndex"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNSimplify"], "\<\"Trick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Trick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNDelta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNDelta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNDelta.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$147507],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNDelta", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$255145],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNDelta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +104,26 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNDelta", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SUNDelta", "[",
RowBox[{"a", ",", " ", "b"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the Kronecker-delta for SU(",
- StyleBox["N",
- FontSlant->"Italic"],
- ") with color indices a and b."
+ " \[LineSeparator] is the Kronecker-delta for SU(N) with color indices a \
+and b in the adjoint representation."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -111,7 +149,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->115072705],
+ CellID->1175478356],
Cell[CellGroupData[{
@@ -121,13 +159,15 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1145699523],
+ CellID->1406820232],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}]], "Input",
CellTags->"SUNDelta",
CellLabel->"In[1]:=",
CellID->582133429],
@@ -136,30 +176,69 @@ Cell[BoxData[
FormBox[
SuperscriptBox["\[Delta]",
RowBox[{
- FormBox["a",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
TraditionalForm],
- FormBox["b",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{33, 19},
+ ImageSize->{35, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[1]=",
- CellID->718384624]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Trick", "[", " ",
+ RowBox[{
+ RowBox[{"SUNDelta", "[",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}],
+ RowBox[{"SUNDelta", "[",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "b", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
- RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}], " ",
- RowBox[{"SUNDelta", "[",
- RowBox[{"b", ",", "c"}], "]"}]}], " ", "]"}]], "Input",
- CellTags->"SUNDelta",
- CellLabel->"In[2]:=",
- CellID->223165993],
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{69, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
@@ -173,12 +252,10 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{32, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNDelta",
- CellLabel->"Out[2]=",
- CellID->1779629564]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -189,7 +266,7 @@ Cell[BoxData[
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}]], "Input",
CellTags->"SUNDelta",
- CellLabel->"In[3]:=",
+ CellLabel->"In[4]:=",
CellID->2091383946],
Cell[BoxData[
@@ -204,12 +281,11 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{33, 19},
+ ImageSize->{35, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[3]=",
- CellID->791346519]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -217,45 +293,24 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
- CellTags->"SUNDelta",
- CellLabel->"In[4]:=",
- CellID->2066302871],
-
-Cell[BoxData[
- RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{117, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNDelta",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1680727312]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"SUNDelta",
CellLabel->"In[5]:=",
- CellID->76062746],
+ CellID->2066302871],
Cell[BoxData[
RowBox[{"SUNDelta", "[",
RowBox[{
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}]], "Output",
- ImageSize->{277, 15},
+ ImageSize->{280, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1303706973]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -265,8 +320,10 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}], "//", "FCI"}], "//",
+ "FCE"}], "//", "StandardForm"}]], "Input",
CellTags->"SUNDelta",
CellLabel->"In[6]:=",
CellID->1106151471],
@@ -274,12 +331,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SD", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Output",
- ImageSize->{68, 15},
+ ImageSize->{70, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1065622125]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -299,21 +355,19 @@ Cell[BoxData[
RowBox[{
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}]], "Output",
- ImageSize->{277, 15},
+ ImageSize->{280, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[7]//StandardForm=",
- CellID->708863202]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]],
Cell["\<\
-Symbolic arguments to SUNDelta are transformed into the data type SUNIndex \
-and integer arguments are transformed to ExplicitSUNIndex. The difference is \
-that SUNSimplify will only sum over symbolic indices.\
-\>", "Text",
- CellTags->"SUNDelta",
- CellID->1535277851],
+The arguments of SUNDelta may also represent explicit integer indices via the \
+head ExplictiSUNIndex. The difference is that SUNSimplify will only sum over \
+symbolic indices.\
+\>", "Notes",
+ CellID->879136127],
Cell[CellGroupData[{
@@ -321,11 +375,18 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "2"}], "]"}],
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"ExplicitSUNIndex", "[", "2", "]"}]}], "]"}],
RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}],
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}],
RowBox[{"SUNDelta", "[",
- RowBox[{"c", ",", "2"}], "]"}]}], "//", "SUNSimplify"}]], "Input",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "c", "]"}], ",",
+ RowBox[{"ExplicitSUNIndex", "[", "2", "]"}]}], "]"}]}], "//",
+ "SUNSimplify"}]], "Input",
CellTags->"SUNDelta",
CellLabel->"In[8]:=",
CellID->69005829],
@@ -353,12 +414,11 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{62, 19},
+ ImageSize->{64, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[8]=",
- CellID->1797928550]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -379,12 +439,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"ExplicitSUNIndex", "[", "2", "]"}], ",",
RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}]}]], "Output",
- ImageSize->{349, 33},
+ ImageSize->{352, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[9]//StandardForm=",
- CellID->391311139]
+ CellLabel->"Out[9]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -392,7 +451,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
- RowBox[{"SUNDelta", "[",
+ RowBox[{"SD", "[",
RowBox[{"1", ",", "2"}], "]"}], "//", "FCI"}], "//",
"StandardForm"}]], "Input",
CellTags->"SUNDelta",
@@ -404,12 +463,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"ExplicitSUNIndex", "[", "1", "]"}], ",",
RowBox[{"ExplicitSUNIndex", "[", "2", "]"}]}], "]"}]], "Output",
- ImageSize->{405, 15},
+ ImageSize->{406, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNDelta",
- CellLabel->"Out[10]//StandardForm=",
- CellID->432360453]
+ CellLabel->"Out[10]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -433,7 +491,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ExplicitSUNIndex",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ExplicitSUNIndex",
@@ -470,17 +527,15 @@ Cell[TextData[{
ButtonNote->"Trick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNDelta",
- CellID->1124087961]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SUNDelta",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -489,21 +544,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 32.603743}",
+ "built" -> "{2020, 1, 5, 19, 2, 42.435654}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SUNDelta[a, b] is the Kronecker-delta for SU(N) with color indices a and \
-b.", "synonyms" -> {}, "title" -> "SUNDelta", "titlemodifier" -> "",
- "windowtitle" -> "SUNDelta", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SUNDelta"}, "SearchTextTranslated" -> ""},
+b in the adjoint representation.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SUNDelta", "titlemodifier" -> "", "windowtitle" -> "SUNDelta",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/SUNDelta"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -511,8 +567,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -521,193 +578,147 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3398, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4816, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->115072705]},
+ CellID->1175478356]},
"SUNDelta"->{
- Cell[4031, 127, 150, 5, 27, "Input",
+ Cell[5450, 165, 222, 7, 27, "Input",
CellTags->"SUNDelta",
CellID->582133429],
- Cell[4184, 134, 331, 13, 40, "Output",
- CellTags->"SUNDelta",
- CellID->718384624],
- Cell[4552, 152, 279, 9, 27, "Input",
- CellTags->"SUNDelta",
- CellID->223165993],
- Cell[4834, 163, 408, 17, 36, "Output",
- CellTags->"SUNDelta",
- CellID->1779629564],
- Cell[5279, 185, 223, 7, 27, "Input",
+ Cell[5675, 174, 387, 16, 38, "Output",
+ CellTags->"SUNDelta"],
+ Cell[7568, 262, 223, 7, 27, "Input",
CellTags->"SUNDelta",
CellID->2091383946],
- Cell[5505, 194, 407, 17, 40, "Output",
- CellTags->"SUNDelta",
- CellID->791346519],
- Cell[5949, 216, 187, 6, 27, "Input",
+ Cell[7794, 271, 387, 16, 38, "Output",
+ CellTags->"SUNDelta"],
+ Cell[8218, 292, 264, 9, 27, "Input",
CellTags->"SUNDelta",
CellID->2066302871],
- Cell[6139, 224, 254, 8, 49, "Output",
- CellTags->"SUNDelta",
- CellID->1680727312],
- Cell[6430, 237, 216, 8, 27, "Input",
- CellTags->"SUNDelta",
- CellID->76062746],
- Cell[6649, 247, 326, 10, 49, "Output",
- CellTags->"SUNDelta",
- CellID->1303706973],
- Cell[7012, 262, 247, 9, 27, "Input",
+ Cell[8485, 303, 305, 9, 51, "Output",
+ CellTags->"SUNDelta"],
+ Cell[8827, 317, 326, 11, 27, "Input",
CellTags->"SUNDelta",
CellID->1106151471],
- Cell[7262, 273, 247, 8, 49, "Output",
- CellTags->"SUNDelta",
- CellID->1065622125],
- Cell[7546, 286, 211, 8, 27, "Input",
+ Cell[9156, 330, 226, 7, 51, "Output",
+ CellTags->"SUNDelta"],
+ Cell[9419, 342, 211, 8, 27, "Input",
CellTags->"SUNDelta",
CellID->892399657],
- Cell[7760, 296, 325, 10, 49, "Output",
- CellTags->"SUNDelta",
- CellID->708863202],
- Cell[8100, 309, 277, 6, 72, "Text",
- CellTags->"SUNDelta",
- CellID->1535277851],
- Cell[8402, 319, 331, 11, 27, "Input",
+ Cell[9633, 352, 305, 9, 51, "Output",
+ CellTags->"SUNDelta"],
+ Cell[10199, 373, 578, 18, 45, "Input",
CellTags->"SUNDelta",
CellID->69005829],
- Cell[8736, 332, 649, 28, 40, "Output",
- CellTags->"SUNDelta",
- CellID->1797928550],
- Cell[9422, 365, 127, 4, 27, "Input",
+ Cell[10780, 393, 628, 27, 38, "Output",
+ CellTags->"SUNDelta"],
+ Cell[11445, 425, 127, 4, 27, "Input",
CellTags->"SUNDelta",
CellID->965204507],
- Cell[9552, 371, 500, 15, 67, "Output",
- CellTags->"SUNDelta",
- CellID->391311139],
- Cell[10089, 391, 219, 8, 27, "Input",
+ Cell[11575, 431, 480, 14, 69, "Output",
+ CellTags->"SUNDelta"],
+ Cell[12092, 450, 213, 8, 27, "Input",
CellTags->"SUNDelta",
CellID->1853160304],
- Cell[10311, 401, 342, 10, 49, "Output",
- CellTags->"SUNDelta",
- CellID->432360453],
- Cell[11021, 434, 1032, 40, 32, "Text",
- CellTags->"SUNDelta",
- CellID->1124087961]}
+ Cell[12308, 460, 322, 9, 51, "Output",
+ CellTags->"SUNDelta"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13901, 522},
- {"SUNDelta", 14035, 526}
+ {"PrimaryExamplesSection", 15897, 579},
+ {"SUNDelta", 16033, 583}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3460, 83, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 491, 16, 83, "Usage",
+Cell[4043, 106, 285, 11, 45, "ObjectNameGrid"],
+Cell[4331, 119, 460, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3398, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4816, 136, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->115072705],
+ CellID->1175478356],
Cell[CellGroupData[{
-Cell[3810, 117, 196, 6, 25, "ExampleSection",
- CellID->1145699523],
+Cell[5229, 155, 196, 6, 26, "ExampleSection",
+ CellID->1406820232],
Cell[CellGroupData[{
-Cell[4031, 127, 150, 5, 27, "Input",
+Cell[5450, 165, 222, 7, 27, "Input",
CellTags->"SUNDelta",
CellID->582133429],
-Cell[4184, 134, 331, 13, 40, "Output",
- CellTags->"SUNDelta",
- CellID->718384624]
+Cell[5675, 174, 387, 16, 38, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4552, 152, 279, 9, 27, "Input",
- CellTags->"SUNDelta",
- CellID->223165993],
-Cell[4834, 163, 408, 17, 36, "Output",
- CellTags->"SUNDelta",
- CellID->1779629564]
+Cell[6099, 195, 333, 10, 27, "Input"],
+Cell[6435, 207, 605, 26, 38, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5279, 185, 223, 7, 27, "Input",
- CellTags->"SUNDelta",
- CellID->2091383946],
-Cell[5505, 194, 407, 17, 40, "Output",
- CellTags->"SUNDelta",
- CellID->791346519]
+Cell[7077, 238, 87, 2, 27, "Input"],
+Cell[7167, 242, 364, 15, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5949, 216, 187, 6, 27, "Input",
- CellTags->"SUNDelta",
- CellID->2066302871],
-Cell[6139, 224, 254, 8, 49, "Output",
+Cell[7568, 262, 223, 7, 27, "Input",
CellTags->"SUNDelta",
- CellID->1680727312]
+ CellID->2091383946],
+Cell[7794, 271, 387, 16, 38, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6430, 237, 216, 8, 27, "Input",
- CellTags->"SUNDelta",
- CellID->76062746],
-Cell[6649, 247, 326, 10, 49, "Output",
+Cell[8218, 292, 264, 9, 27, "Input",
CellTags->"SUNDelta",
- CellID->1303706973]
+ CellID->2066302871],
+Cell[8485, 303, 305, 9, 51, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7012, 262, 247, 9, 27, "Input",
+Cell[8827, 317, 326, 11, 27, "Input",
CellTags->"SUNDelta",
CellID->1106151471],
-Cell[7262, 273, 247, 8, 49, "Output",
- CellTags->"SUNDelta",
- CellID->1065622125]
+Cell[9156, 330, 226, 7, 51, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7546, 286, 211, 8, 27, "Input",
+Cell[9419, 342, 211, 8, 27, "Input",
CellTags->"SUNDelta",
CellID->892399657],
-Cell[7760, 296, 325, 10, 49, "Output",
- CellTags->"SUNDelta",
- CellID->708863202]
+Cell[9633, 352, 305, 9, 51, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
-Cell[8100, 309, 277, 6, 72, "Text",
- CellTags->"SUNDelta",
- CellID->1535277851],
+Cell[9953, 364, 221, 5, 49, "Notes",
+ CellID->879136127],
Cell[CellGroupData[{
-Cell[8402, 319, 331, 11, 27, "Input",
+Cell[10199, 373, 578, 18, 45, "Input",
CellTags->"SUNDelta",
CellID->69005829],
-Cell[8736, 332, 649, 28, 40, "Output",
- CellTags->"SUNDelta",
- CellID->1797928550]
+Cell[10780, 393, 628, 27, 38, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9422, 365, 127, 4, 27, "Input",
+Cell[11445, 425, 127, 4, 27, "Input",
CellTags->"SUNDelta",
CellID->965204507],
-Cell[9552, 371, 500, 15, 67, "Output",
- CellTags->"SUNDelta",
- CellID->391311139]
+Cell[11575, 431, 480, 14, 69, "Output",
+ CellTags->"SUNDelta"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10089, 391, 219, 8, 27, "Input",
+Cell[12092, 450, 213, 8, 27, "Input",
CellTags->"SUNDelta",
CellID->1853160304],
-Cell[10311, 401, 342, 10, 49, "Output",
- CellTags->"SUNDelta",
- CellID->432360453]
+Cell[12308, 460, 322, 9, 51, "Output",
+ CellTags->"SUNDelta"]
}, Open ]]
}, Open ]],
-Cell[10680, 415, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12657, 473, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10748, 420, 270, 12, 31, "SeeAlsoSection",
+Cell[12725, 478, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[11021, 434, 1032, 40, 32, "Text",
- CellTags->"SUNDelta",
- CellID->1124087961]
+Cell[12998, 492, 976, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[12068, 477, 23, 0, 42, "FooterCell"]
+Cell[13989, 532, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDeltaContract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDeltaContract.nb
index 8f3b18659..4b19cda15 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDeltaContract.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNDeltaContract.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6826, 203]
-NotebookOptionsPosition[ 4343, 134]
-NotebookOutlinePosition[ 6556, 192]
-CellTagsIndexPosition[ 6478, 187]
+NotebookDataLength[ 11065, 360]
+NotebookOptionsPosition[ 7988, 274]
+NotebookOutlinePosition[ 10337, 334]
+CellTagsIndexPosition[ 10252, 329]
WindowTitle->SUNDeltaContract
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNDeltaContract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNDeltaContract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNDelta\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"], "\<\"SUNIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNIndex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNDeltaContract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNDeltaContract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SUNDeltaContract.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$147155],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNDeltaContract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$254699],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNDeltaContract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,28 +96,147 @@ SUNDeltaContract.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNDeltaContract", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNDeltaContract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"SUNDeltaContract", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "substitues for all SUNDelta in expr SUNDeltaContract, contracts the \
-SUN(N) indices and resubstitutes SUNDelta. SUNDeltaContract[i, j] is the \
-Kronecker-delta for SU(",
- StyleBox["N",
- FontSlant->"Italic"],
- ") with contraction properties. SUNDeltaContract wraps also the head \
-SUNIndex around its arguments."
+ RowBox[{"SUNDeltaContract", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitues for all ",
+ ButtonBox["SUNDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNDelta",
+ ButtonNote->"SUNDelta"],
+ " in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " ",
+ ButtonBox["SUNDeltaContract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNDeltaContract",
+ ButtonNote->"SUNDeltaContract"],
+ ", contracts the adjoint ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " indices and resubstitutes ",
+ ButtonBox["SUNDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNDelta",
+ ButtonNote->"SUNDelta"],
+ "."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNDeltaContract", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta for ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " in the adjoint representation with contraction properties. It wraps \
+the head ",
+ ButtonBox["SUNIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNIndex",
+ ButtonNote->"SUNIndex"],
+ " around its arguments."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->455417684],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1517005805],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->238416033],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNDelta", "[",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], "2"], TraditionalForm]], "Output",
+ ImageSize->{55, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNDeltaContract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["N", "2"], "-", "1"}], TraditionalForm]], "Output",
+ ImageSize->{50, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
@@ -125,17 +267,15 @@ Cell[TextData[{
ButtonNote->"SUNIndex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNDeltaContract",
- CellID->332681775]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SUNDeltaContract",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -144,24 +284,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 31.349483}",
+ "built" -> "{2020, 1, 5, 19, 2, 41.292880}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SUNDeltaContract[expr] substitues for all SUNDelta in expr \
-SUNDeltaContract, contracts the SUN(N) indices and resubstitutes SUNDelta. \
-SUNDeltaContract[i, j] is the Kronecker-delta for SU(N) with contraction \
-properties. SUNDeltaContract wraps also the head SUNIndex around its \
-arguments.", "synonyms" -> {}, "title" -> "SUNDeltaContract", "titlemodifier" ->
- "", "windowtitle" -> "SUNDeltaContract", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SUNDeltaContract"}},
+ "SUNDeltaContract[exp] substitues for all SUNDelta in exp \
+SUNDeltaContract, contracts the adjoint SU (N) indices and resubstitutes \
+SUNDelta. SUNDeltaContract[i, j] is the Kronecker-delta for SU (N) in the \
+adjoint representation with contraction properties. It wraps the head \
+SUNIndex around its arguments.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SUNDeltaContract", "titlemodifier" -> "", "windowtitle" ->
+ "SUNDeltaContract", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SUNDeltaContract"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -169,8 +310,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -178,35 +320,51 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "SUNDeltaContract"->{
- Cell[3907, 114, 394, 15, 70, "Text",
- CellTags->"SUNDeltaContract",
- CellID->332681775]}
+ "PrimaryExamplesSection"->{
+ Cell[5613, 163, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1517005805]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"SUNDeltaContract", 6359, 180}
+ {"PrimaryExamplesSection", 10108, 322}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2278, 52, 70, "AnchorBarGrid",
+Cell[588, 21, 3121, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2869, 75, 59, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 678, 18, 70, "Usage",
- CellID->982511436],
+Cell[3712, 98, 293, 11, 45, "ObjectNameGrid"],
+Cell[4008, 111, 1580, 48, 165, "Usage",
+ CellID->455417684],
+Cell[CellGroupData[{
+Cell[5613, 163, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1517005805],
+Cell[CellGroupData[{
+Cell[6026, 182, 195, 6, 26, "ExampleSection",
+ CellID->238416033],
Cell[CellGroupData[{
-Cell[3634, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[6246, 192, 205, 6, 27, "Input"],
+Cell[6454, 200, 432, 17, 43, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6923, 222, 92, 2, 27, "Input"],
+Cell[7018, 226, 214, 7, 37, "Output"]
+}, Open ]]
+}, Open ]],
+Cell[7259, 237, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7327, 242, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[3907, 114, 394, 15, 70, "Text",
- CellTags->"SUNDeltaContract",
- CellID->332681775]
+Cell[7600, 256, 346, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[4316, 132, 23, 0, 70, "FooterCell"]
+Cell[7961, 272, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNF.nb
index c57c3ae79..634bc7273 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNF.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNF.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 25214, 999]
-NotebookOptionsPosition[ 17285, 716]
-NotebookOutlinePosition[ 21906, 863]
-CellTagsIndexPosition[ 21798, 857]
+NotebookDataLength[ 26414, 1021]
+NotebookOptionsPosition[ 19060, 768]
+NotebookOutlinePosition[ 23247, 896]
+CellTagsIndexPosition[ 23139, 890]
WindowTitle->SUNF
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNF\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNF"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNF.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$148553],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNF",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUND\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUND"], "\<\"SUNDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"], "\<\"SUNIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNIndex"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNSimplify"], "\<\"SUNT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNT"], "\<\"Trick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Trick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNF\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNF"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNF.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$257812],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNF",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNF", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,6 +138,58 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->585406414],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SUNF", "]"}]], "Input",
+ CellTags->"SUNF",
+ CellLabel->"In[11]:=",
+ CellID->121887364],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Explicit", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{111, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNF",
+ CellLabel->"Out[11]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -111,7 +205,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->55069536],
+ CellID->1846243533],
Cell[CellGroupData[{
@@ -121,42 +215,20 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1000495346],
+ CellID->168350434],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "SUNF", "]"}]], "Input",
- CellTags->"SUNF",
- CellLabel->"In[1]:=",
- CellID->121887364],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Explicit", "\[Rule]", "False"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{118, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNF",
- CellLabel->"Out[1]=",
- CellID->788322241]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t1", "=",
+ RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], "x"}], "+",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"b", ",", "a", ",", "c"}], "]"}], "y"}]}]}]], "Input",
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], "x"}], "+",
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"b", ",", "a", ",", "c"}], "]"}], "y"}]}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1766434801],
Cell[BoxData[
@@ -180,20 +252,19 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{119, 19},
+ ImageSize->{137, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[2]=",
- CellID->1741928660]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[", "t1", "]"}]], "Input",
+ RowBox[{"Calc", "[", "%", "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->139383085],
Cell[BoxData[
@@ -229,20 +300,19 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{119, 19},
+ ImageSize->{137, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[3]=",
- CellID->1893375491]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[", "t1", "]"}]], "Input",
+ RowBox[{"SUNSimplify", "[", "%%", "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->479451850],
Cell[BoxData[
@@ -264,12 +334,11 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{90, 19},
+ ImageSize->{102, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[4]=",
- CellID->622570571]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -278,7 +347,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "a", ",", "b"}], "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1757637776],
Cell[BoxData[
@@ -291,12 +360,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{43, 19},
+ ImageSize->{48, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[5]=",
- CellID->752391067]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -306,31 +374,25 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "a", ",", "b"}], "]"}], "//", "Calc"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->169262538],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[6]=",
- CellID->1205699996]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[TextData[{
"This is a consequence of the usual choice for the normalization of the ",
Cell[BoxData[
FormBox[
- RowBox[{
- SubscriptBox["T", "a"], " ", "generatorsin", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{"see", " ", "SUNT"}], ")"}], "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"SUNF",
- CellID->565916861],
+ SubscriptBox["T", "a"], TraditionalForm]]],
+ " generators."
+}], "Notes"],
Cell[CellGroupData[{
@@ -339,7 +401,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->2026232239],
Cell[BoxData[
@@ -397,12 +459,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{253, 25},
+ ImageSize->{278, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[7]=",
- CellID->621120740]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -415,7 +476,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "b", ",", "d"}], "]"}]}], "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->386944916],
Cell[BoxData[
@@ -432,12 +493,11 @@ Cell[BoxData[
FormBox["d",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{54, 19},
+ ImageSize->{63, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[8]=",
- CellID->631419441]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -449,7 +509,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->963311023],
Cell[BoxData[
@@ -508,12 +568,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{263, 25},
+ ImageSize->{289, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[9]=",
- CellID->215339899]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -524,18 +583,17 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], "//", "StandardForm"}]], "Input",\
CellTags->"SUNF",
- CellLabel->"In[10]:=",
+ CellLabel->"In[9]:=",
CellID->1003312113],
Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}]], "Output",
- ImageSize->{106, 15},
+ ImageSize->{109, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[10]//StandardForm=",
- CellID->792790909]
+ CellLabel->"Out[9]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -547,7 +605,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], "//", "FCI"}], "//",
"StandardForm"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[11]:=",
+ CellLabel->"In[10]:=",
CellID->2081826967],
Cell[BoxData[
@@ -556,12 +614,11 @@ Cell[BoxData[
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}], ",",
RowBox[{"SUNIndex", "[", "c", "]"}]}], "]"}]], "Output",
- ImageSize->{346, 15},
+ ImageSize->{352, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[11]//StandardForm=",
- CellID->1149570291]
+ CellLabel->"Out[10]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -574,18 +631,17 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
"StandardForm"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[12]:=",
+ CellLabel->"In[11]:=",
CellID->1938677300],
Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}]], "Output",
- ImageSize->{106, 15},
+ ImageSize->{109, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[12]//StandardForm=",
- CellID->1462891621]
+ CellLabel->"Out[11]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -594,7 +650,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"b", ",", "a", ",", "c"}], "]"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[13]:=",
+ CellLabel->"In[12]:=",
CellID->334638901],
Cell[BoxData[
@@ -607,12 +663,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{42, 19},
+ ImageSize->{48, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[13]=",
- CellID->532100486]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -622,7 +677,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"b", ",", "a", ",", "c"}], "]"}], "//", "FCI"}]], "Input",
CellTags->"SUNF",
- CellLabel->"In[14]:=",
+ CellLabel->"In[13]:=",
CellID->1328454294],
Cell[BoxData[
@@ -642,12 +697,11 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{52, 19},
+ ImageSize->{59, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNF",
- CellLabel->"Out[14]=",
- CellID->1815424467]
+ CellLabel->"Out[13]="]
}, Open ]]
}, Open ]],
@@ -707,9 +761,7 @@ Cell[TextData[{
ButtonNote->"Trick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNF",
- CellID->639373109]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -726,21 +778,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 37.487904}",
+ "built" -> "{2020, 1, 5, 19, 2, 50.607291}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SUNF[a, b, c] are the structure constants of SU(N). The arguments a,b,c \
-should be of symbolic type.", "synonyms" -> {}, "title" -> "SUNF",
- "titlemodifier" -> "", "windowtitle" -> "SUNF", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SUNF"}, "SearchTextTranslated" -> ""},
+should be of symbolic type.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SUNF", "titlemodifier" -> "", "windowtitle" -> "SUNF", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SUNF"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -748,8 +800,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -757,250 +810,219 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3400, 98, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->55069536]},
"SUNF"->{
- Cell[4032, 127, 125, 4, 27, "Input",
+ Cell[5648, 170, 126, 4, 70, "Input",
CellTags->"SUNF",
CellID->121887364],
- Cell[4160, 133, 273, 10, 36, "Output",
- CellTags->"SUNF",
- CellID->788322241],
- Cell[4470, 148, 312, 11, 27, "Input",
+ Cell[5777, 176, 254, 9, 37, "Output",
+ CellTags->"SUNF"],
+ Cell[6725, 221, 282, 10, 27, "Input",
CellTags->"SUNF",
CellID->1766434801],
- Cell[4785, 161, 622, 26, 40, "Output",
- CellTags->"SUNF",
- CellID->1741928660],
- Cell[5444, 192, 120, 4, 27, "Input",
+ Cell[7010, 233, 601, 25, 40, "Output",
+ CellTags->"SUNF"],
+ Cell[7648, 263, 119, 4, 27, "Input",
CellTags->"SUNF",
CellID->139383085],
- Cell[5567, 198, 874, 38, 40, "Output",
- CellTags->"SUNF",
- CellID->1893375491],
- Cell[6478, 241, 127, 4, 27, "Input",
+ Cell[7770, 269, 853, 37, 40, "Output",
+ CellTags->"SUNF"],
+ Cell[8660, 311, 127, 4, 27, "Input",
CellTags->"SUNF",
CellID->479451850],
- Cell[6608, 247, 561, 24, 40, "Output",
- CellTags->"SUNF",
- CellID->622570571],
- Cell[7206, 276, 153, 5, 27, "Input",
+ Cell[8790, 317, 542, 23, 40, "Output",
+ CellTags->"SUNF"],
+ Cell[9369, 345, 153, 5, 27, "Input",
CellTags->"SUNF",
CellID->1757637776],
- Cell[7362, 283, 361, 15, 40, "Output",
- CellTags->"SUNF",
- CellID->752391067],
- Cell[7760, 303, 180, 6, 27, "Input",
+ Cell[9525, 352, 341, 14, 38, "Output",
+ CellTags->"SUNF"],
+ Cell[9903, 371, 180, 6, 27, "Input",
CellTags->"SUNF",
CellID->169262538],
- Cell[7943, 311, 206, 7, 36, "Output",
- CellTags->"SUNF",
- CellID->1205699996],
- Cell[8164, 321, 339, 11, 49, "Text",
- CellTags->"SUNF",
- CellID->565916861],
- Cell[8528, 336, 203, 6, 27, "Input",
+ Cell[10086, 379, 185, 6, 35, "Output",
+ CellTags->"SUNF"],
+ Cell[10504, 398, 203, 6, 27, "Input",
CellTags->"SUNF",
CellID->2026232239],
- Cell[8734, 344, 1552, 60, 46, "Output",
- CellTags->"SUNF",
- CellID->621120740],
- Cell[10323, 409, 283, 9, 27, "Input",
+ Cell[10710, 406, 1532, 59, 43, "Output",
+ CellTags->"SUNF"],
+ Cell[12279, 470, 283, 9, 27, "Input",
CellTags->"SUNF",
CellID->386944916],
- Cell[10609, 420, 459, 19, 40, "Output",
- CellTags->"SUNF",
- CellID->631419441],
- Cell[11105, 444, 256, 8, 27, "Input",
+ Cell[12565, 481, 439, 18, 40, "Output",
+ CellTags->"SUNF"],
+ Cell[13041, 504, 256, 8, 27, "Input",
CellTags->"SUNF",
CellID->963311023],
- Cell[11364, 454, 1571, 61, 46, "Output",
- CellTags->"SUNF",
- CellID->215339899],
- Cell[12972, 520, 192, 7, 27, "Input",
+ Cell[13300, 514, 1551, 60, 43, "Output",
+ CellTags->"SUNF"],
+ Cell[14888, 579, 191, 7, 27, "Input",
CellTags->"SUNF",
CellID->1003312113],
- Cell[13167, 529, 256, 8, 49, "Output",
- CellTags->"SUNF",
- CellID->792790909],
- Cell[13460, 542, 221, 8, 27, "Input",
+ Cell[15082, 588, 235, 7, 51, "Output",
+ CellTags->"SUNF"],
+ Cell[15354, 600, 221, 8, 27, "Input",
CellTags->"SUNF",
CellID->2081826967],
- Cell[13684, 552, 365, 11, 49, "Output",
- CellTags->"SUNF",
- CellID->1149570291],
- Cell[14086, 568, 250, 9, 27, "Input",
+ Cell[15578, 610, 344, 10, 51, "Output",
+ CellTags->"SUNF"],
+ Cell[15959, 625, 250, 9, 27, "Input",
CellTags->"SUNF",
CellID->1938677300],
- Cell[14339, 579, 257, 8, 49, "Output",
- CellTags->"SUNF",
- CellID->1462891621],
- Cell[14633, 592, 153, 5, 27, "Input",
+ Cell[16212, 636, 236, 7, 51, "Output",
+ CellTags->"SUNF"],
+ Cell[16485, 648, 153, 5, 27, "Input",
CellTags->"SUNF",
CellID->334638901],
- Cell[14789, 599, 362, 15, 40, "Output",
- CellTags->"SUNF",
- CellID->532100486],
- Cell[15188, 619, 181, 6, 27, "Input",
+ Cell[16641, 655, 342, 14, 38, "Output",
+ CellTags->"SUNF"],
+ Cell[17020, 674, 181, 6, 27, "Input",
CellTags->"SUNF",
CellID->1328454294],
- Cell[15372, 627, 509, 22, 40, "Output",
- CellTags->"SUNF",
- CellID->1815424467],
- Cell[16249, 672, 994, 39, 32, "Text",
- CellTags->"SUNF",
- CellID->639373109]}
+ Cell[17204, 682, 488, 21, 38, "Output",
+ CellTags->"SUNF"]},
+ "PrimaryExamplesSection"->{
+ Cell[6092, 192, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1846243533]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 19099, 759},
- {"SUNF", 19228, 763}
+ {"SUNF", 20898, 812},
+ {"PrimaryExamplesSection", 22995, 883}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3424, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 517, 16, 83, "Usage",
- CellID->982511436],
+Cell[4003, 105, 281, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3400, 98, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->55069536],
+Cell[4309, 120, 517, 16, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3811, 117, 196, 6, 25, "ExampleSection",
- CellID->1000495346],
+Cell[4851, 140, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->585406414],
+Cell[5592, 166, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4032, 127, 125, 4, 27, "Input",
+Cell[5648, 170, 126, 4, 70, "Input",
CellTags->"SUNF",
CellID->121887364],
-Cell[4160, 133, 273, 10, 36, "Output",
- CellTags->"SUNF",
- CellID->788322241]
+Cell[5777, 176, 254, 9, 37, "Output",
+ CellTags->"SUNF"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4470, 148, 312, 11, 27, "Input",
+Cell[6092, 192, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1846243533],
+Cell[CellGroupData[{
+Cell[6505, 211, 195, 6, 26, "ExampleSection",
+ CellID->168350434],
+Cell[CellGroupData[{
+Cell[6725, 221, 282, 10, 27, "Input",
CellTags->"SUNF",
CellID->1766434801],
-Cell[4785, 161, 622, 26, 40, "Output",
- CellTags->"SUNF",
- CellID->1741928660]
+Cell[7010, 233, 601, 25, 40, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5444, 192, 120, 4, 27, "Input",
+Cell[7648, 263, 119, 4, 27, "Input",
CellTags->"SUNF",
CellID->139383085],
-Cell[5567, 198, 874, 38, 40, "Output",
- CellTags->"SUNF",
- CellID->1893375491]
+Cell[7770, 269, 853, 37, 40, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6478, 241, 127, 4, 27, "Input",
+Cell[8660, 311, 127, 4, 27, "Input",
CellTags->"SUNF",
CellID->479451850],
-Cell[6608, 247, 561, 24, 40, "Output",
- CellTags->"SUNF",
- CellID->622570571]
+Cell[8790, 317, 542, 23, 40, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7206, 276, 153, 5, 27, "Input",
+Cell[9369, 345, 153, 5, 27, "Input",
CellTags->"SUNF",
CellID->1757637776],
-Cell[7362, 283, 361, 15, 40, "Output",
- CellTags->"SUNF",
- CellID->752391067]
+Cell[9525, 352, 341, 14, 38, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7760, 303, 180, 6, 27, "Input",
+Cell[9903, 371, 180, 6, 27, "Input",
CellTags->"SUNF",
CellID->169262538],
-Cell[7943, 311, 206, 7, 36, "Output",
- CellTags->"SUNF",
- CellID->1205699996]
+Cell[10086, 379, 185, 6, 35, "Output",
+ CellTags->"SUNF"]
}, Open ]],
-Cell[8164, 321, 339, 11, 49, "Text",
- CellTags->"SUNF",
- CellID->565916861],
+Cell[10286, 388, 193, 6, 33, "Notes"],
Cell[CellGroupData[{
-Cell[8528, 336, 203, 6, 27, "Input",
+Cell[10504, 398, 203, 6, 27, "Input",
CellTags->"SUNF",
CellID->2026232239],
-Cell[8734, 344, 1552, 60, 46, "Output",
- CellTags->"SUNF",
- CellID->621120740]
+Cell[10710, 406, 1532, 59, 43, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10323, 409, 283, 9, 27, "Input",
+Cell[12279, 470, 283, 9, 27, "Input",
CellTags->"SUNF",
CellID->386944916],
-Cell[10609, 420, 459, 19, 40, "Output",
- CellTags->"SUNF",
- CellID->631419441]
+Cell[12565, 481, 439, 18, 40, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11105, 444, 256, 8, 27, "Input",
+Cell[13041, 504, 256, 8, 27, "Input",
CellTags->"SUNF",
CellID->963311023],
-Cell[11364, 454, 1571, 61, 46, "Output",
- CellTags->"SUNF",
- CellID->215339899]
+Cell[13300, 514, 1551, 60, 43, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12972, 520, 192, 7, 27, "Input",
+Cell[14888, 579, 191, 7, 27, "Input",
CellTags->"SUNF",
CellID->1003312113],
-Cell[13167, 529, 256, 8, 49, "Output",
- CellTags->"SUNF",
- CellID->792790909]
+Cell[15082, 588, 235, 7, 51, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13460, 542, 221, 8, 27, "Input",
+Cell[15354, 600, 221, 8, 27, "Input",
CellTags->"SUNF",
CellID->2081826967],
-Cell[13684, 552, 365, 11, 49, "Output",
- CellTags->"SUNF",
- CellID->1149570291]
+Cell[15578, 610, 344, 10, 51, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14086, 568, 250, 9, 27, "Input",
+Cell[15959, 625, 250, 9, 27, "Input",
CellTags->"SUNF",
CellID->1938677300],
-Cell[14339, 579, 257, 8, 49, "Output",
- CellTags->"SUNF",
- CellID->1462891621]
+Cell[16212, 636, 236, 7, 51, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14633, 592, 153, 5, 27, "Input",
+Cell[16485, 648, 153, 5, 27, "Input",
CellTags->"SUNF",
CellID->334638901],
-Cell[14789, 599, 362, 15, 40, "Output",
- CellTags->"SUNF",
- CellID->532100486]
+Cell[16641, 655, 342, 14, 38, "Output",
+ CellTags->"SUNF"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15188, 619, 181, 6, 27, "Input",
+Cell[17020, 674, 181, 6, 27, "Input",
CellTags->"SUNF",
CellID->1328454294],
-Cell[15372, 627, 509, 22, 40, "Output",
- CellTags->"SUNF",
- CellID->1815424467]
+Cell[17204, 682, 488, 21, 38, "Output",
+ CellTags->"SUNF"]
}, Open ]]
}, Open ]],
-Cell[15908, 653, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17719, 707, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15976, 658, 270, 12, 31, "SeeAlsoSection",
+Cell[17787, 712, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[16249, 672, 994, 39, 32, "Text",
- CellTags->"SUNF",
- CellID->639373109]
+Cell[18060, 726, 958, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[17258, 714, 23, 0, 42, "FooterCell"]
+Cell[19033, 766, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFDelta.nb
new file mode 100644
index 000000000..3ab894df2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFDelta.nb
@@ -0,0 +1,648 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 17061, 638]
+NotebookOptionsPosition[ 12013, 468]
+NotebookOutlinePosition[ 14831, 550]
+CellTagsIndexPosition[ 14719, 544]
+WindowTitle->SUNFDelta
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNFDelta\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNFDelta"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNFDelta.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$256496],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNFDelta", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SUNFDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta for SU(N) with color indices a \
+and b in the fundamental representation."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->729025756],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->984784336],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}]], "Input",
+ CellTags->"SUNDelta",
+ CellLabel->"In[1]:=",
+ CellID->582133429],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{33, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNDelta",
+ CellLabel->"Out[1]=",
+ CellID->29521155]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}],
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "b", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "c", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->970611158],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{65, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1745728117]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "SUNSimplify"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1250352668],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{32, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1286479361]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->472676003],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}], "2"], TraditionalForm]], "Output",
+ ImageSize->{33, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1829996566]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "SUNSimplify"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->702868214],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["C", "A"], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1033443082]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1142784317],
+
+Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}]], "Output",
+ ImageSize->{304, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->225868128]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}], "//", "FCI"}], "//",
+ "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->2037381176],
+
+Cell[BoxData[
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ ImageSize->{78, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->1450369289]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1154477064],
+
+Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}]], "Output",
+ ImageSize->{304, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[8]//StandardForm=",
+ CellID->1300251866]
+}, Open ]],
+
+Cell["\<\
+The arguments of SUNFDelta may also represent explicit integer indices via \
+the head ExplictiSUNFIndex. The difference is that SUNSimplify and \
+SUNFSimplify will only sum over symbolic indices.\
+\>", "Notes",
+ CellID->879136127],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}]}], "]"}],
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}],
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "c", "]"}], ",",
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}]}], "]"}]}], "//",
+ "SUNFSimplify"}]], "Input",
+ CellTags->"SUNDelta",
+ CellLabel->"In[9]:=",
+ CellID->69005829],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{60, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNDelta",
+ CellLabel->"Out[9]=",
+ CellID->1884304944]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellTags->"SUNDelta",
+ CellLabel->"In[10]:=",
+ CellID->965204507],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}], " ",
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "c", "]"}]}], "]"}]}]], "Output",
+ ImageSize->{376, 33},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNDelta",
+ CellLabel->"Out[10]//StandardForm=",
+ CellID->1607056186]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SDF", "[",
+ RowBox[{"1", ",", "2"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SUNDelta",
+ CellLabel->"In[11]:=",
+ CellID->1853160304],
+
+Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"ExplicitSUNFIndex", "[", "1", "]"}], ",",
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}]}], "]"}]], "Output",
+ ImageSize->{430, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNDelta",
+ CellLabel->"Out[11]//StandardForm=",
+ CellID->1026123076]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SUNFDelta",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 46.989939}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SUNFDelta[a, b] is the Kronecker-delta for SU(N) with color indices a \
+and b in the fundamental representation.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SUNFDelta", "titlemodifier" -> "",
+ "windowtitle" -> "SUNFDelta", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SUNFDelta"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3634, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->729025756]},
+ "SUNDelta"->{
+ Cell[4266, 135, 225, 7, 27, "Input",
+ CellTags->"SUNDelta",
+ CellID->582133429],
+ Cell[4494, 144, 404, 17, 38, "Output",
+ CellTags->"SUNDelta",
+ CellID->29521155],
+ Cell[9435, 362, 588, 18, 62, "Input",
+ CellTags->"SUNDelta",
+ CellID->69005829],
+ Cell[10026, 382, 645, 28, 38, "Output",
+ CellTags->"SUNDelta",
+ CellID->1884304944],
+ Cell[10708, 415, 128, 4, 27, "Input",
+ CellTags->"SUNDelta",
+ CellID->965204507],
+ Cell[10839, 421, 508, 15, 69, "Output",
+ CellTags->"SUNDelta",
+ CellID->1607056186],
+ Cell[11384, 441, 214, 8, 27, "Input",
+ CellTags->"SUNDelta",
+ CellID->1853160304],
+ Cell[11601, 451, 346, 10, 51, "Output",
+ CellTags->"SUNDelta",
+ CellID->1026123076]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13848, 512},
+ {"SUNDelta", 13983, 516}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[581, 21, 2277, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2861, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[3150, 89, 459, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3634, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->729025756],
+Cell[CellGroupData[{
+Cell[4046, 125, 195, 6, 26, "ExampleSection",
+ CellID->984784336],
+Cell[CellGroupData[{
+Cell[4266, 135, 225, 7, 27, "Input",
+ CellTags->"SUNDelta",
+ CellID->582133429],
+Cell[4494, 144, 404, 17, 38, "Output",
+ CellTags->"SUNDelta",
+ CellID->29521155]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4935, 166, 359, 11, 45, "Input",
+ CellID->970611158],
+Cell[5297, 179, 622, 27, 38, "Output",
+ CellID->1745728117]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5956, 211, 104, 3, 27, "Input",
+ CellID->1250352668],
+Cell[6063, 216, 383, 16, 37, "Output",
+ CellID->1286479361]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6483, 237, 228, 7, 27, "Input",
+ CellID->472676003],
+Cell[6714, 246, 393, 16, 41, "Output",
+ CellID->1829996566]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7144, 267, 103, 3, 27, "Input",
+ CellID->702868214],
+Cell[7250, 272, 209, 7, 37, "Output",
+ CellID->1033443082]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7496, 284, 244, 8, 27, "Input",
+ CellID->1142784317],
+Cell[7743, 294, 305, 9, 51, "Output",
+ CellID->225868128]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8085, 308, 306, 10, 27, "Input",
+ CellID->2037381176],
+Cell[8394, 320, 225, 7, 51, "Output",
+ CellID->1450369289]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8656, 332, 190, 7, 27, "Input",
+ CellID->1154477064],
+Cell[8849, 341, 306, 9, 51, "Output",
+ CellID->1300251866]
+}, Open ]],
+Cell[9170, 353, 240, 5, 65, "Notes",
+ CellID->879136127],
+Cell[CellGroupData[{
+Cell[9435, 362, 588, 18, 62, "Input",
+ CellTags->"SUNDelta",
+ CellID->69005829],
+Cell[10026, 382, 645, 28, 38, "Output",
+ CellTags->"SUNDelta",
+ CellID->1884304944]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10708, 415, 128, 4, 27, "Input",
+ CellTags->"SUNDelta",
+ CellID->965204507],
+Cell[10839, 421, 508, 15, 69, "Output",
+ CellTags->"SUNDelta",
+ CellID->1607056186]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11384, 441, 214, 8, 27, "Input",
+ CellTags->"SUNDelta",
+ CellID->1853160304],
+Cell[11601, 451, 346, 10, 51, "Output",
+ CellTags->"SUNDelta",
+ CellID->1026123076]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11986, 466, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFDeltaContract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFDeltaContract.nb
new file mode 100644
index 000000000..c57b6defc
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFDeltaContract.nb
@@ -0,0 +1,375 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 11162, 365]
+NotebookOptionsPosition[ 8023, 275]
+NotebookOutlinePosition[ 10332, 334]
+CellTagsIndexPosition[ 10247, 329]
+WindowTitle->SUNFDeltaContract
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNFDelta\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNFDelta"], "\<\"SUNFIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNFIndex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNFDeltaContract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNFDeltaContract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SUNFDeltaContract.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$256056],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNFDeltaContract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SUNFDeltaContract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNFDeltaContract", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitues for all ",
+ ButtonBox["SUNFDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFDelta",
+ ButtonNote->"SUNFDelta"],
+ " in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " ",
+ ButtonBox["SUNFDeltaContract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFDeltaContract",
+ ButtonNote->"SUNFDeltaContract"],
+ ", contracts the fundamental ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " indices and resubstitutes ",
+ ButtonBox["SUNFDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFDelta",
+ ButtonNote->"SUNFDelta"],
+ "."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNFDeltaContract", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta for ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " in the fundamental representation with contraction properties. It \
+wraps the head ",
+ ButtonBox["SUNFIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFIndex",
+ ButtonNote->"SUNFIndex"],
+ " around its arguments."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
+ "RowsIndexed" -> {}}},
+ CellID->455417684],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->788888489],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->681143337],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "b", "]"}]}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->622785154],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}], "2"], TraditionalForm]], "Output",
+ ImageSize->{33, 20},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1092659905]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFDeltaContract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1040305798],
+
+Cell[BoxData[
+ FormBox["N", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->595035273]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SUNFDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFDelta",
+ ButtonNote->"SUNFDelta"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNFIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFIndex",
+ ButtonNote->"SUNFIndex"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->660285530]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SUNFDeltaContract",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 45.172079}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SUNFDeltaContract[exp] substitues for all SUNFDelta in exp \
+SUNFDeltaContract, contracts the fundamental SU (N) indices and resubstitutes \
+SUNFDelta. SUNFDeltaContract[i, j] is the Kronecker-delta for SU (N) in the \
+fundamental representation with contraction properties. It wraps the head \
+SUNFIndex around its arguments.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SUNFDeltaContract", "titlemodifier" -> "", "windowtitle" ->
+ "SUNFDeltaContract", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SUNFDeltaContract"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5645, 163, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->788888489]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 10104, 322}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 3129, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3721, 98, 294, 11, 45, "ObjectNameGrid"],
+Cell[4018, 111, 1602, 48, 181, "Usage",
+ CellID->455417684],
+Cell[CellGroupData[{
+Cell[5645, 163, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->788888489],
+Cell[CellGroupData[{
+Cell[6057, 182, 195, 6, 26, "ExampleSection",
+ CellID->681143337],
+Cell[CellGroupData[{
+Cell[6277, 192, 228, 7, 27, "Input",
+ CellID->622785154],
+Cell[6508, 201, 393, 16, 41, "Output",
+ CellID->1092659905]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6938, 222, 114, 3, 27, "Input",
+ CellID->1040305798],
+Cell[7055, 227, 186, 6, 35, "Output",
+ CellID->595035273]
+}, Open ]]
+}, Open ]],
+Cell[7268, 237, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7336, 242, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[7609, 256, 372, 14, 56, "SeeAlso",
+ CellID->660285530]
+}, Open ]],
+Cell[7996, 273, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFIndex.nb
new file mode 100644
index 000000000..2c2d076ed
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFIndex.nb
@@ -0,0 +1,364 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10285, 354]
+NotebookOptionsPosition[ 6360, 229]
+NotebookOutlinePosition[ 9080, 306]
+CellTagsIndexPosition[ 8970, 300]
+WindowTitle->SUNFIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNFIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNFIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNFIndex.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$256933],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNFIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SUNFIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNFIndex", "[", "a", "]"}]], "InlineFormula"],
+ " \[LineSeparator] is an SU(N) index in the fundamental representation. \
+If the argument is an integer, SUNFIndex[a] turns into ExplicitSUNFIndex[a]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1612021199],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1907431679],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFIndex", "[", "i", "]"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[1]:=",
+ CellID->973923672],
+
+Cell[BoxData[
+ FormBox["i", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNIndex",
+ CellLabel->"Out[1]=",
+ CellID->769084224]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[2]:=",
+ CellID->293124345],
+
+Cell[BoxData[
+ RowBox[{"SUNFIndex", "[", "i", "]"}]], "Output",
+ ImageSize->{101, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNIndex",
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->529449408]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFIndex", "[", "2", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1927371187],
+
+Cell[BoxData[
+ FormBox["2", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->819007020]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1807480238],
+
+Cell[BoxData[
+ RowBox[{"ExplicitSUNFIndex", "[", "2", "]"}]], "Output",
+ ImageSize->{166, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->2061967096]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[5]:=",
+ CellID->874008605],
+
+Cell[BoxData[
+ RowBox[{"SUNFDelta", "[",
+ RowBox[{
+ RowBox[{"SUNFIndex", "[", "i", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "j", "]"}]}], "]"}]], "Output",
+ ImageSize->{301, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNIndex",
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->127438419]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SUNFIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 48.276683}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SUNFIndex[a] is an SU(N) index in the fundamental representation. If the \
+argument is an integer, SUNFIndex[a] turns into ExplicitSUNFIndex[a].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNFIndex",
+ "titlemodifier" -> "", "windowtitle" -> "SUNFIndex", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/SUNFIndex"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3642, 105, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1612021199]},
+ "SUNIndex"->{
+ Cell[4276, 134, 128, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->973923672],
+ Cell[4407, 140, 209, 7, 35, "Output",
+ CellTags->"SUNIndex",
+ CellID->769084224],
+ Cell[4653, 152, 127, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->293124345],
+ Cell[4783, 158, 231, 7, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->529449408],
+ Cell[5745, 202, 218, 8, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->874008605],
+ Cell[5966, 212, 328, 10, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->127438419]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8284, 274},
+ {"SUNIndex", 8420, 278}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[581, 21, 2277, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2861, 76, 286, 11, 45, "ObjectNameGrid"],
+Cell[3150, 89, 467, 12, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3642, 105, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1612021199],
+Cell[CellGroupData[{
+Cell[4055, 124, 196, 6, 26, "ExampleSection",
+ CellID->1907431679],
+Cell[CellGroupData[{
+Cell[4276, 134, 128, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->973923672],
+Cell[4407, 140, 209, 7, 35, "Output",
+ CellTags->"SUNIndex",
+ CellID->769084224]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4653, 152, 127, 4, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->293124345],
+Cell[4783, 158, 231, 7, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->529449408]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5051, 170, 106, 3, 27, "Input",
+ CellID->1927371187],
+Cell[5160, 175, 186, 6, 35, "Output",
+ CellID->819007020]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5383, 186, 105, 3, 27, "Input",
+ CellID->1807480238],
+Cell[5491, 191, 217, 6, 51, "Output",
+ CellID->2061967096]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5745, 202, 218, 8, 27, "Input",
+ CellTags->"SUNIndex",
+ CellID->874008605],
+Cell[5966, 212, 328, 10, 51, "Output",
+ CellTags->"SUNIndex",
+ CellID->127438419]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6333, 227, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFJacobi.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFJacobi.nb
index 29a2c8d58..b1d85c593 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFJacobi.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFJacobi.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11386, 412]
-NotebookOptionsPosition[ 7860, 303]
-NotebookOutlinePosition[ 10419, 375]
-CellTagsIndexPosition[ 10307, 369]
+NotebookDataLength[ 12194, 433]
+NotebookOptionsPosition[ 8852, 332]
+NotebookOutlinePosition[ 11324, 401]
+CellTagsIndexPosition[ 11210, 395]
WindowTitle->SUNFJacobi
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNFJacobi\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNFJacobi"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNFJacobi.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$148207],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNFJacobi", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNF\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNF"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNFJacobi\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNFJacobi"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SUNFJacobi.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$257366],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNFJacobi", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNFJacobi", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNFJacobi", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1313177361],
+ CellID->358688028],
Cell[CellGroupData[{
@@ -117,7 +150,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1159165310],
+ CellID->802224328],
Cell[CellGroupData[{
@@ -167,12 +200,11 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{81, 19},
+ ImageSize->{94, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNFJacobi",
- CellLabel->"Out[1]=",
- CellID->311054380]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -253,12 +285,11 @@ Cell[BoxData[
FormBox["e",
TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{173, 19},
+ ImageSize->{200, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNFJacobi",
- CellLabel->"Out[2]=",
- CellID->692961439]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -294,9 +325,7 @@ Cell[TextData[{
ButtonNote->"SUNSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNFJacobi",
- CellID->614882988]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -313,21 +342,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 36.017251}",
+ "built" -> "{2020, 1, 5, 19, 2, 49.475502}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SUNFJacobi is an option for SUNSimplify, indicating whether the Jacobi \
-identity should be used.", "synonyms" -> {}, "title" -> "SUNFJacobi",
- "titlemodifier" -> "", "windowtitle" -> "SUNFJacobi", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/SUNFJacobi"}, "SearchTextTranslated" -> ""},
+identity should be used.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SUNFJacobi", "titlemodifier" -> "", "windowtitle" -> "SUNFJacobi",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/SUNFJacobi"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -335,8 +365,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -345,75 +376,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3318, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4394, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1313177361]},
+ CellID->358688028]},
"SUNFJacobi"->{
- Cell[3952, 123, 397, 13, 27, "Input",
+ Cell[5026, 156, 397, 13, 27, "Input",
CellTags->"SUNFJacobi",
CellID->167388740],
- Cell[4352, 138, 802, 36, 40, "Output",
- CellTags->"SUNFJacobi",
- CellID->311054380],
- Cell[5191, 179, 396, 13, 27, "Input",
+ Cell[5426, 171, 782, 35, 38, "Output",
+ CellTags->"SUNFJacobi"],
+ Cell[6245, 211, 396, 13, 27, "Input",
CellTags->"SUNFJacobi",
CellID->693485776],
- Cell[5590, 194, 1475, 66, 40, "Output",
- CellTags->"SUNFJacobi",
- CellID->692961439],
- Cell[7433, 283, 385, 15, 32, "Text",
- CellTags->"SUNFJacobi",
- CellID->614882988]}
+ Cell[6644, 226, 1455, 65, 38, "Output",
+ CellTags->"SUNFJacobi"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9694, 346},
- {"SUNFJacobi", 9831, 350}
+ {"PrimaryExamplesSection", 10730, 377},
+ {"SUNFJacobi", 10867, 381}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3095, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 399, 12, 82, "Usage",
+Cell[3680, 98, 287, 11, 45, "ObjectNameGrid"],
+Cell[3970, 111, 399, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3318, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4394, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1313177361],
+ CellID->358688028],
Cell[CellGroupData[{
-Cell[3731, 113, 196, 6, 25, "ExampleSection",
- CellID->1159165310],
+Cell[4806, 146, 195, 6, 26, "ExampleSection",
+ CellID->802224328],
Cell[CellGroupData[{
-Cell[3952, 123, 397, 13, 27, "Input",
+Cell[5026, 156, 397, 13, 27, "Input",
CellTags->"SUNFJacobi",
CellID->167388740],
-Cell[4352, 138, 802, 36, 40, "Output",
- CellTags->"SUNFJacobi",
- CellID->311054380]
+Cell[5426, 171, 782, 35, 38, "Output",
+ CellTags->"SUNFJacobi"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5191, 179, 396, 13, 27, "Input",
+Cell[6245, 211, 396, 13, 27, "Input",
CellTags->"SUNFJacobi",
CellID->693485776],
-Cell[5590, 194, 1475, 66, 40, "Output",
- CellTags->"SUNFJacobi",
- CellID->692961439]
+Cell[6644, 226, 1455, 65, 38, "Output",
+ CellTags->"SUNFJacobi"]
}, Open ]]
}, Open ]],
-Cell[7092, 264, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8126, 295, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7160, 269, 270, 12, 31, "SeeAlsoSection",
+Cell[8194, 300, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7433, 283, 385, 15, 32, "Text",
- CellTags->"SUNFJacobi",
- CellID->614882988]
+Cell[8467, 314, 343, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7833, 301, 23, 0, 42, "FooterCell"]
+Cell[8825, 330, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFSimplify.nb
new file mode 100644
index 000000000..4a3b2aed2
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNFSimplify.nb
@@ -0,0 +1,788 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 20296, 778]
+NotebookOptionsPosition[ 15489, 619]
+NotebookOutlinePosition[ 17645, 677]
+CellTagsIndexPosition[ 17560, 672]
+WindowTitle->SUNFSimplify
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNTF\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNTF"], "\<\"SUNFDelta\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNFDelta"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNFSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNFSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SUNFSimplify.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$258290],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNFSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SUNFSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNFSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is an auxiliary function that simplifies expressions \
+containing ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " indices in the fundamental representation."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1833172902],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The simplifications performed by ",
+ ButtonBox["SUNFSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFSimplify",
+ ButtonNote->"SUNFSimplify"],
+ " are mostly limited to the contractions of the fundamental indices. The \
+function is by far not as powerful as ",
+ ButtonBox["SUNSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNSimplify",
+ ButtonNote->"SUNSimplify"],
+ "."
+}], "Notes",
+ CellID->489493579],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SUNFSimplify", "]"}]], "Input",
+ CellLabel->"In[88]:=",
+ CellID->1041867794],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"SUNNToCACF", "\[Rule]", "True"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{256, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[88]=",
+ CellID->668571394]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->447594986],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->834270223],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "a"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1645730981],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["a",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{32, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->155622206]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2020542843],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["C", "A"], TraditionalForm]], "Output",
+ ImageSize->{28, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1223277700]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFSimplify", "[",
+ RowBox[{
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "a"}], "]"}], ",",
+ RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1669500633],
+
+Cell[BoxData[
+ FormBox["N", TraditionalForm]], "Output",
+ ImageSize->{19, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1340879115]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->2143112255],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}], " ",
+ RowBox[{"SDF", "[",
+ RowBox[{"b", ",", "d"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1116774172],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["b",
+ TraditionalForm],
+ FormBox["d",
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{67, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->701037265]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->484032834],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{34, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->943875095]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->1919868339],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{"i", ",", "a", ",", "d"}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{"j", ",", "d", ",", "c"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->637189304],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm]}]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["d",
+ TraditionalForm]}],
+ FormBox["i",
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["d",
+ TraditionalForm],
+ FormBox["c",
+ TraditionalForm]}],
+ FormBox["j",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{103, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->583553117]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->530124426],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{86, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->644955829]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->244284520],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SDF", "[",
+ RowBox[{"a", ",", "b"}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNTF", "[",
+ RowBox[{"i", ",", "a", ",", "d"}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{"j", ",", "d", ",", "b"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"SD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{"i", ",", "a", ",", "d"}], "]"}], " ",
+ RowBox[{"SUNTF", "[",
+ RowBox[{"i", ",", "d", ",", "b"}], "]"}]}]}], ")"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1780598793],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["d",
+ TraditionalForm]}],
+ FormBox["i",
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["d",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm]}],
+ FormBox["i",
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["d",
+ TraditionalForm]}],
+ FormBox["i",
+ TraditionalForm]], " ",
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["d",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm]}],
+ FormBox["j",
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{232, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->2112755555]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNFSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->15173409],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["N", "2"], "-", "1"}], ")"}], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{159, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1316558811]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["SUNTF",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTF",
+ ButtonNote->"SUNTF"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNFDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNFDelta",
+ ButtonNote->"SUNFDelta"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->2060818988]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SUNFSimplify",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 51.880678}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SUNFSimplify[exp] is an auxiliary function that simplifies expressions \
+containing SU (N) indices in the fundamental representation.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNFSimplify",
+ "titlemodifier" -> "", "windowtitle" -> "SUNFSimplify", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SUNFSimplify"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6345, 202, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->447594986]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 17417, 665}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[584, 21, 3101, 75, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3688, 98, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4002, 113, 551, 16, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4578, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1833172902],
+Cell[5320, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5354, 161, 463, 14, 70, "Notes",
+ CellID->489493579],
+Cell[CellGroupData[{
+Cell[5842, 179, 116, 3, 70, "Input",
+ CellID->1041867794],
+Cell[5961, 184, 323, 11, 37, "Output",
+ CellID->668571394]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6345, 202, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->447594986],
+Cell[CellGroupData[{
+Cell[6757, 221, 195, 6, 26, "ExampleSection",
+ CellID->834270223],
+Cell[CellGroupData[{
+Cell[6977, 231, 123, 4, 27, "Input",
+ CellID->1645730981],
+Cell[7103, 237, 306, 12, 37, "Output",
+ CellID->155622206]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7446, 254, 109, 3, 27, "Input",
+ CellID->2020542843],
+Cell[7558, 259, 209, 7, 37, "Output",
+ CellID->1223277700]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7804, 271, 231, 7, 27, "Input",
+ CellID->1669500633],
+Cell[8038, 280, 187, 6, 35, "Output",
+ CellID->1340879115]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8262, 291, 126, 3, 9, "ExampleDelimiter",
+ CellID->2143112255],
+Cell[CellGroupData[{
+Cell[8413, 298, 201, 7, 27, "Input",
+ CellID->1116774172],
+Cell[8617, 307, 461, 19, 38, "Output",
+ CellID->701037265]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9115, 331, 108, 3, 27, "Input",
+ CellID->484032834],
+Cell[9226, 336, 382, 16, 38, "Output",
+ CellID->943875095]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9657, 358, 126, 3, 9, "ExampleDelimiter",
+ CellID->1919868339],
+Cell[CellGroupData[{
+Cell[9808, 365, 288, 9, 27, "Input",
+ CellID->637189304],
+Cell[10099, 376, 676, 29, 42, "Output",
+ CellID->583553117]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10812, 410, 108, 3, 27, "Input",
+ CellID->530124426],
+Cell[10923, 415, 612, 27, 43, "Output",
+ CellID->644955829]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11584, 448, 125, 3, 9, "ExampleDelimiter",
+ CellID->244284520],
+Cell[CellGroupData[{
+Cell[11734, 455, 601, 19, 45, "Input",
+ CellID->1780598793],
+Cell[12338, 476, 1350, 55, 43, "Output",
+ CellID->2112755555]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13725, 536, 173, 5, 27, "Input",
+ CellID->15173409],
+Cell[13901, 543, 805, 33, 59, "Output",
+ CellID->1316558811]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[14745, 581, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14813, 586, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[15086, 600, 361, 14, 56, "SeeAlso",
+ CellID->2060818988]
+}, Open ]],
+Cell[15462, 617, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndex.nb
index 29d4fb51d..ec3184c68 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndex.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10029, 353]
-NotebookOptionsPosition[ 6233, 231]
-NotebookOutlinePosition[ 8881, 308]
-CellTagsIndexPosition[ 8771, 302]
+NotebookDataLength[ 11813, 407]
+NotebookOptionsPosition[ 7977, 287]
+NotebookOutlinePosition[ 10561, 360]
+CellTagsIndexPosition[ 10451, 354]
WindowTitle->SUNIndex
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNIndex\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNIndex"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNIndex.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ExplicitSUNIndex\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExplicitSUNIndex"], "\<\"SUNDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNF"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNIndex"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNIndex.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$148906],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNIndex", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$258737],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNIndex", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +99,25 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNIndex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData["SUNIndex"], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of SU(",
- StyleBox["N",
- FontSlant->"Italic"],
- ") indices."
+ Cell[BoxData[
+ RowBox[{"SUNIndex", "[", "a", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is an SU(N) index in the adjoint representation. If \
+the argument is an integer, SUNIndex[a] turns into ExplicitSUNIndex[a]."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2042176178],
+ CellID->205043259],
Cell[CellGroupData[{
@@ -119,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1593002537],
+ CellID->36840381],
Cell[CellGroupData[{
@@ -131,12 +165,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["i", TraditionalForm]], "Output",
- ImageSize->{9, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNIndex",
- CellLabel->"Out[1]=",
- CellID->969035127]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -153,8 +186,35 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNIndex",
- CellLabel->"Out[2]//StandardForm=",
- CellID->675650496]
+ CellLabel->"Out[2]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNIndex", "[", "2", "]"}]], "Input",
+ CellLabel->"In[3]:="],
+
+Cell[BoxData[
+ FormBox["2", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ RowBox[{"ExplicitSUNIndex", "[", "2", "]"}]], "Output",
+ ImageSize->{158, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -166,7 +226,7 @@ Cell[BoxData[
RowBox[{"i", ",", "j"}], "]"}], "//", "FCI"}], "//",
"StandardForm"}]], "Input",
CellTags->"SUNIndex",
- CellLabel->"In[3]:=",
+ CellLabel->"In[5]:=",
CellID->874008605],
Cell[BoxData[
@@ -174,12 +234,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"SUNIndex", "[", "i", "]"}], ",",
RowBox[{"SUNIndex", "[", "j", "]"}]}], "]"}]], "Output",
- ImageSize->{276, 15},
+ ImageSize->{277, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNIndex",
- CellLabel->"Out[3]//StandardForm=",
- CellID->46597874]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -203,7 +262,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["ExplicitSUNIndex",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ExplicitSUNIndex",
@@ -222,9 +280,7 @@ Cell[TextData[{
ButtonNote->"SUNF"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNIndex",
- CellID->341377518]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -241,20 +297,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 39.102384}",
+ "built" -> "{2020, 1, 5, 19, 2, 53.205007}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "SUNIndex is the head of SU(N) indices.",
- "synonyms" -> {}, "title" -> "SUNIndex", "titlemodifier" -> "",
- "windowtitle" -> "SUNIndex", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SUNIndex"}, "SearchTextTranslated" -> ""},
+ "None", "summary" ->
+ "SUNIndex[a] is an SU(N) index in the adjoint representation. If the \
+argument is an integer, SUNIndex[a] turns into ExplicitSUNIndex[a].",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNIndex",
+ "titlemodifier" -> "", "windowtitle" -> "SUNIndex", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/SUNIndex"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -263,7 +321,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -272,89 +330,85 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3302, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4553, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2042176178]},
+ CellID->205043259]},
"SUNIndex"->{
- Cell[3936, 125, 127, 4, 27, "Input",
+ Cell[5184, 159, 127, 4, 27, "Input",
CellTags->"SUNIndex",
CellID->973923672],
- Cell[4066, 131, 208, 7, 36, "Output",
- CellTags->"SUNIndex",
- CellID->969035127],
- Cell[4311, 143, 127, 4, 27, "Input",
+ Cell[5314, 165, 189, 6, 35, "Output",
+ CellTags->"SUNIndex"],
+ Cell[5540, 176, 127, 4, 27, "Input",
CellTags->"SUNIndex",
CellID->293124345],
- Cell[4441, 149, 229, 7, 49, "Output",
- CellTags->"SUNIndex",
- CellID->675650496],
- Cell[4707, 161, 217, 8, 27, "Input",
+ Cell[5670, 182, 209, 6, 51, "Output",
+ CellTags->"SUNIndex"],
+ Cell[6525, 221, 217, 8, 27, "Input",
CellTags->"SUNIndex",
CellID->874008605],
- Cell[4927, 171, 324, 10, 49, "Output",
- CellTags->"SUNIndex",
- CellID->46597874],
- Cell[5619, 204, 572, 22, 32, "Text",
- CellTags->"SUNIndex",
- CellID->341377518]}
+ Cell[6745, 231, 305, 9, 51, "Output",
+ CellTags->"SUNIndex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8000, 273},
- {"SUNIndex", 8135, 277}
+ {"PrimaryExamplesSection", 9833, 331},
+ {"SUNIndex", 9968, 335}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3198, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 395, 14, 83, "Usage",
+Cell[3781, 101, 285, 11, 45, "ObjectNameGrid"],
+Cell[4069, 114, 459, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3302, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4553, 130, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2042176178],
+ CellID->205043259],
Cell[CellGroupData[{
-Cell[3715, 115, 196, 6, 25, "ExampleSection",
- CellID->1593002537],
+Cell[4965, 149, 194, 6, 26, "ExampleSection",
+ CellID->36840381],
Cell[CellGroupData[{
-Cell[3936, 125, 127, 4, 27, "Input",
+Cell[5184, 159, 127, 4, 27, "Input",
CellTags->"SUNIndex",
CellID->973923672],
-Cell[4066, 131, 208, 7, 36, "Output",
- CellTags->"SUNIndex",
- CellID->969035127]
+Cell[5314, 165, 189, 6, 35, "Output",
+ CellTags->"SUNIndex"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4311, 143, 127, 4, 27, "Input",
+Cell[5540, 176, 127, 4, 27, "Input",
CellTags->"SUNIndex",
CellID->293124345],
-Cell[4441, 149, 229, 7, 49, "Output",
- CellTags->"SUNIndex",
- CellID->675650496]
+Cell[5670, 182, 209, 6, 51, "Output",
+ CellTags->"SUNIndex"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5916, 193, 84, 2, 27, "Input"],
+Cell[6003, 197, 166, 5, 35, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4707, 161, 217, 8, 27, "Input",
+Cell[6206, 207, 84, 2, 27, "Input"],
+Cell[6293, 211, 195, 5, 51, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6525, 221, 217, 8, 27, "Input",
CellTags->"SUNIndex",
CellID->874008605],
-Cell[4927, 171, 324, 10, 49, "Output",
- CellTags->"SUNIndex",
- CellID->46597874]
+Cell[6745, 231, 305, 9, 51, "Output",
+ CellTags->"SUNIndex"]
}, Open ]]
}, Open ]],
-Cell[5278, 185, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7077, 244, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5346, 190, 270, 12, 31, "SeeAlsoSection",
+Cell[7145, 249, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5619, 204, 572, 22, 32, "Text",
- CellTags->"SUNIndex",
- CellID->341377518]
+Cell[7418, 263, 517, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[6206, 229, 23, 0, 42, "FooterCell"]
+Cell[7950, 285, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndexRename.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndexRename.nb
index d906de440..024d0d78d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndexRename.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNIndexRename.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6362, 195]
-NotebookOptionsPosition[ 4073, 128]
-NotebookOutlinePosition[ 6094, 184]
-CellTagsIndexPosition[ 6018, 179]
+NotebookDataLength[ 7181, 217]
+NotebookOptionsPosition[ 5117, 160]
+NotebookOutlinePosition[ 6973, 209]
+CellTagsIndexPosition[ 6930, 206]
WindowTitle->SUNIndexRename
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNIndexRename\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNIndexRename"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNSimplify"], "\<\"SUNIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNIndex"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNIndexRename\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNIndexRename"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SUNIndexRename.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$149244],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNIndexRename", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$259177],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNIndexRename", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ SUNIndexRename.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNIndexRename", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNIndexRename", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -119,9 +153,7 @@ Cell[TextData[{
ButtonNote->"SUNIndex"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNIndexRename",
- CellID->1033928155]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -138,22 +170,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 40.596485}",
+ "built" -> "{2020, 1, 5, 19, 2, 54.549238}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SUNIndexRename is an option of SUNSimplify. If set to False, no \
-automatic renaming of dummy indices is done.", "synonyms" -> {}, "title" ->
- "SUNIndexRename", "titlemodifier" -> "", "windowtitle" ->
- "SUNIndexRename", "type" -> "Symbol", "uri" ->
+automatic renaming of dummy indices is done.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SUNIndexRename", "titlemodifier" -> "",
+ "windowtitle" -> "SUNIndexRename", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SUNIndexRename"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -162,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SUNIndexRename"->{
- Cell[3629, 108, 402, 15, 70, "Text",
- CellTags->"SUNIndexRename",
- CellID->1033928155]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SUNIndexRename", 5900, 172}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3127, 76, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 412, 12, 70, "Usage",
+Cell[3716, 99, 291, 11, 70, "ObjectNameGrid"],
+Cell[4010, 112, 412, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3356, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4447, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3629, 108, 402, 15, 70, "Text",
- CellTags->"SUNIndexRename",
- CellID->1033928155]
+Cell[4720, 142, 355, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[4046, 126, 23, 0, 70, "FooterCell"]
+Cell[5090, 158, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNN.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNN.nb
index 5185d4265..171292b2b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNN.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNN.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8857, 303]
-NotebookOptionsPosition[ 5810, 208]
-NotebookOutlinePosition[ 8113, 274]
-CellTagsIndexPosition[ 8007, 268]
+NotebookDataLength[ 9998, 331]
+NotebookOptionsPosition[ 7081, 243]
+NotebookOutlinePosition[ 9322, 306]
+CellTagsIndexPosition[ 9216, 300]
WindowTitle->SUNN
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNN\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNN"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNN.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$149599],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNN",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNSimplify"], "\<\"Trick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Trick"], "\<\"SUNIndex\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNIndex"], "\<\"CA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CA"], "\<\"CF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CF"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNN\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNN"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNN.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$259630],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNN",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNN", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNN", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +148,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->399101034],
+ CellID->933193033],
Cell[CellGroupData[{
@@ -120,7 +158,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->308163258],
+ CellID->394912443],
Cell[CellGroupData[{
@@ -140,12 +178,11 @@ Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["N", "2"], "-", "1"}], TraditionalForm]], "Output",
- ImageSize->{49, 18},
+ ImageSize->{50, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNN",
- CellLabel->"Out[1]=",
- CellID->94438752]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -199,9 +236,7 @@ Cell[TextData[{
ButtonNote->"CF"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNN",
- CellID->1642067263]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -209,7 +244,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SUNN",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -218,21 +253,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 41.927557}",
+ "built" -> "{2020, 1, 5, 19, 2, 55.647684}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SUNN denotes the number of colors. Trick[SUNDelta[a, a]] yields (SUNN^2 \
--1).", "synonyms" -> {}, "title" -> "SUNN", "titlemodifier" -> "",
- "windowtitle" -> "SUNN", "type" -> "Symbol", "uri" ->
+-1).", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNN",
+ "titlemodifier" -> "", "windowtitle" -> "SUNN", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SUNN"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -240,8 +275,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -250,61 +286,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3354, 97, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4681, 135, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->399101034]},
+ CellID->933193033]},
"SUNN"->{
- Cell[3986, 126, 335, 10, 27, "Input",
+ Cell[5313, 164, 335, 10, 27, "Input",
CellTags->"SUNN",
CellID->1968246895],
- Cell[4324, 138, 252, 9, 39, "Output",
- CellTags->"SUNN",
- CellID->94438752],
- Cell[4944, 170, 824, 33, 32, "Text",
- CellTags->"SUNN",
- CellID->1642067263]}
+ Cell[5651, 176, 233, 8, 37, "Output",
+ CellTags->"SUNN"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7601, 251},
- {"SUNN", 7731, 255}
+ {"PrimaryExamplesSection", 8914, 287},
+ {"SUNN", 9045, 291}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3322, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 471, 15, 85, "Usage",
+Cell[3901, 103, 281, 11, 45, "ObjectNameGrid"],
+Cell[4185, 116, 471, 15, 87, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3354, 97, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4681, 135, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->399101034],
+ CellID->933193033],
Cell[CellGroupData[{
-Cell[3766, 116, 195, 6, 25, "ExampleSection",
- CellID->308163258],
+Cell[5093, 154, 195, 6, 26, "ExampleSection",
+ CellID->394912443],
Cell[CellGroupData[{
-Cell[3986, 126, 335, 10, 27, "Input",
+Cell[5313, 164, 335, 10, 27, "Input",
CellTags->"SUNN",
CellID->1968246895],
-Cell[4324, 138, 252, 9, 39, "Output",
- CellTags->"SUNN",
- CellID->94438752]
+Cell[5651, 176, 233, 8, 37, "Output",
+ CellTags->"SUNN"]
}, Open ]]
}, Open ]],
-Cell[4603, 151, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5911, 188, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4671, 156, 270, 12, 31, "SeeAlsoSection",
+Cell[5979, 193, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4944, 170, 824, 33, 32, "Text",
- CellTags->"SUNN",
- CellID->1642067263]
+Cell[6252, 207, 787, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[5783, 206, 23, 0, 42, "FooterCell"]
+Cell[7054, 241, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNNToCACF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNNToCACF.nb
index c8790c1ad..17f62da39 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNNToCACF.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNNToCACF.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9259, 308]
-NotebookOptionsPosition[ 6053, 212]
-NotebookOutlinePosition[ 8494, 279]
-CellTagsIndexPosition[ 8382, 273]
+NotebookDataLength[ 10474, 337]
+NotebookOptionsPosition[ 7411, 248]
+NotebookOutlinePosition[ 9783, 312]
+CellTagsIndexPosition[ 9671, 306]
WindowTitle->SUNNToCACF
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNNToCACF\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNNToCACF"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNNToCACF.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$149941],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNNToCACF", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CalcColorFactor\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CalcColorFactor"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNSimplify"], "\<\"Trick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Trick"], "\<\"SUNN\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNN"], "\<\"CA\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CA"], "\<\"CF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/CF"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNNToCACF\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNNToCACF"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SUNNToCACF.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$260072],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNNToCACF", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNNToCACF", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNNToCACF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +146,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2135442738],
+ CellID->1706728932],
Cell[CellGroupData[{
@@ -117,7 +156,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1201189711],
+ CellID->1367742659],
Cell[CellGroupData[{
@@ -138,12 +177,11 @@ Cell[BoxData[
RowBox[{"2", " ",
SubscriptBox["C", "A"], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
- ImageSize->{57, 15},
+ ImageSize->{65, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNNToCACF",
- CellLabel->"Out[1]=",
- CellID->573481763]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -203,9 +241,7 @@ Cell[TextData[{
ButtonNote->"CF"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNNToCACF",
- CellID->124208571]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -213,7 +249,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SUNNToCACF",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -222,10 +258,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 43.402920}",
+ "built" -> "{2020, 1, 5, 19, 2, 56.662835}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -233,11 +269,11 @@ TaggingRules->{
"None", "summary" ->
"SUNNToCACF is an option of SUNSimplify and CalcColorFactor. If set to \
True, the Casimir operator eigenvalues CA (=N) and CF (=(N^2-1)/(2 N)) are \
-introduced.", "synonyms" -> {}, "title" -> "SUNNToCACF", "titlemodifier" ->
- "", "windowtitle" -> "SUNNToCACF", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SUNNToCACF"}, "SearchTextTranslated" -> ""},
+introduced.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNNToCACF",
+ "titlemodifier" -> "", "windowtitle" -> "SUNNToCACF", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/SUNNToCACF"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -245,8 +281,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -255,61 +292,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3379, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4799, 133, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2135442738]},
+ CellID->1706728932]},
"SUNNToCACF"->{
- Cell[4013, 123, 340, 10, 27, "Input",
+ Cell[5433, 162, 340, 10, 27, "Input",
CellTags->"SUNNToCACF",
CellID->1879564079],
- Cell[4356, 135, 290, 10, 36, "Output",
- CellTags->"SUNNToCACF",
- CellID->573481763],
- Cell[5014, 168, 997, 39, 32, "Text",
- CellTags->"SUNNToCACF",
- CellID->124208571]}
+ Cell[5776, 174, 270, 9, 37, "Output",
+ CellTags->"SUNNToCACF"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7950, 256},
- {"SUNNToCACF", 8087, 260}
+ {"PrimaryExamplesSection", 9350, 293},
+ {"SUNNToCACF", 9488, 297}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3439, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 460, 12, 99, "Usage",
+Cell[4024, 104, 287, 11, 45, "ObjectNameGrid"],
+Cell[4314, 117, 460, 12, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3379, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4799, 133, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2135442738],
+ CellID->1706728932],
Cell[CellGroupData[{
-Cell[3792, 113, 196, 6, 25, "ExampleSection",
- CellID->1201189711],
+Cell[5212, 152, 196, 6, 26, "ExampleSection",
+ CellID->1367742659],
Cell[CellGroupData[{
-Cell[4013, 123, 340, 10, 27, "Input",
+Cell[5433, 162, 340, 10, 27, "Input",
CellTags->"SUNNToCACF",
CellID->1879564079],
-Cell[4356, 135, 290, 10, 36, "Output",
- CellTags->"SUNNToCACF",
- CellID->573481763]
+Cell[5776, 174, 270, 9, 37, "Output",
+ CellTags->"SUNNToCACF"]
}, Open ]]
}, Open ]],
-Cell[4673, 149, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6073, 187, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4741, 154, 270, 12, 31, "SeeAlsoSection",
+Cell[6141, 192, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5014, 168, 997, 39, 32, "Text",
- CellTags->"SUNNToCACF",
- CellID->124208571]
+Cell[6414, 206, 955, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[6026, 210, 23, 0, 42, "FooterCell"]
+Cell[7384, 246, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNSimplify.nb
index 4919ce22d..dbf6953dc 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNSimplify.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 42149, 1649]
-NotebookOptionsPosition[ 28803, 1195]
-NotebookOutlinePosition[ 36139, 1417]
-CellTagsIndexPosition[ 36022, 1411]
+NotebookDataLength[ 44008, 1727]
+NotebookOptionsPosition[ 31136, 1295]
+NotebookOutlinePosition[ 37371, 1480]
+CellTagsIndexPosition[ 37226, 1473]
WindowTitle->SUNSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNTrace\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNTrace"], "\<\"SUNT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNT"], "\<\"SUNTF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTF"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNF"], "\<\"SUND\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUND"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SUNSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$150280],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$260602],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,18 +99,27 @@ SUNSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
- Cell[BoxData["SUNSimplify"], "InlineFormula"],
- " \[LineSeparator]",
- "simplifies products of SUNT (and complex conjugated) matrices. Basic \
-renaming of dummy indices is done. If the option SUNTrace is set to False, \
-then any SUNT-matrices are taken out of DiracTrace[...]; otherwise a \
-color-trace is taken (by SUNTrace) before taking the SUN-objects in front of \
-DiracTrace[...]."
+ Cell[BoxData[
+ RowBox[{"SUNSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]simplifies products of SUNT and SUNTF matrices in the \
+expression."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -95,40 +130,39 @@ DiracTrace[...]."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->70223274],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2137365557],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1339731506],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "SUNSimplify", "]"}]], "Input",
- CellTags->"SUNSimplify",
- CellLabel->"In[1]:=",
- CellID->287772200],
+ CellLabel->"In[60]:="],
Cell[BoxData[
FormBox[
@@ -142,25 +176,53 @@ Cell[BoxData[
RowBox[{"SUNNToCACF", "\[Rule]", "True"}], ",",
RowBox[{"SUNTrace", "\[Rule]", "False"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{539, 35},
+ ImageSize->{501, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNSimplify",
- CellLabel->"Out[1]=",
- CellID->291333912]
+ CellLabel->"Out[60]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(12)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1511248044],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(12)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->636636871],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
- RowBox[{"SUNDelta", "[",
- RowBox[{"a", ",", "b"}], "]"}], " ",
- RowBox[{"SUNDelta", "[",
- RowBox[{"b", ",", "c"}], "]"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"SUNDelta", "[",
+ RowBox[{"a", ",", "b"}], "]"}], " ",
+ RowBox[{"SUNDelta", "[",
+ RowBox[{"b", ",", "c"}], "]"}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1698138274],
Cell[BoxData[
@@ -178,20 +240,19 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{64, 19},
+ ImageSize->{69, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[2]=",
- CellID->1129385138]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[", "t1", "]"}]], "Input",
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1520473065],
Cell[BoxData[
@@ -206,23 +267,27 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{32, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[3]=",
- CellID->1288692360]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{
- RowBox[{"SUNT", "[", "a", "]"}], ".",
- RowBox[{"SUNT", "[", "a", "]"}]}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNT", "[", "a", "]"}], ".",
+ RowBox[{"SUNT", "[", "a", "]"}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->1992995975],
Cell[BoxData[
@@ -234,42 +299,41 @@ Cell[BoxData[
SuperscriptBox["T",
FormBox["a",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{48, 15},
+ ImageSize->{55, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[4]=",
- CellID->1292635919]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[", "t2", "]"}]], "Input",
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->1767152339],
Cell[BoxData[
FormBox[
SubscriptBox["C", "F"], TraditionalForm]], "Output",
- ImageSize->{24, 15},
+ ImageSize->{26, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[5]=",
- CellID->2143185906]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t2", ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNT", "[", "a", "]"}], ".",
+ RowBox[{"SUNT", "[", "a", "]"}]}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}]], "Input",
- CellTags->"SUNSimplify",
- CellLabel->"In[6]:=",
- CellID->671897568],
+ CellLabel->"In[3]:="],
Cell[BoxData[
FormBox[
@@ -277,25 +341,29 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["N", "2"], "-", "1"}],
RowBox[{"2", " ", "N"}]], TraditionalForm]], "Output",
- ImageSize->{54, 45},
+ ImageSize->{54, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNSimplify",
- CellLabel->"Out[6]=",
- CellID->1286035113]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "r", ",", "s"}], "]"}],
- RowBox[{"SUNF", "[",
- RowBox[{"b", ",", "r", ",", "s"}], "]"}]}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "r", ",", "s"}], "]"}],
+ RowBox[{"SUNF", "[",
+ RowBox[{"b", ",", "r", ",", "s"}], "]"}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[7]:=",
+ CellLabel->"In[1]:=",
CellID->1014117597],
Cell[BoxData[
@@ -317,20 +385,19 @@ Cell[BoxData[
TraditionalForm],
FormBox["s",
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{81, 19},
+ ImageSize->{90, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[7]=",
- CellID->1079109643]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[", "t3", "]"}]], "Input",
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[8]:=",
+ CellLabel->"In[2]:=",
CellID->399652098],
Cell[BoxData[
@@ -347,60 +414,57 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{55, 19},
+ ImageSize->{62, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[8]=",
- CellID->911807905]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ", ".", " ",
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}]}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[9]:=",
+ CellLabel->"In[1]:=",
CellID->772128503],
Cell[BoxData[
FormBox[
- RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox["a",
- TraditionalForm],
- FormBox["b",
- TraditionalForm],
- FormBox["c",
- TraditionalForm]}]], ".",
- SuperscriptBox["f",
- RowBox[{
- FormBox["a",
- TraditionalForm],
- FormBox["b",
- TraditionalForm],
- FormBox["c",
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{84, 19},
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm],
+ FormBox["c",
+ TraditionalForm]}]], ")"}], "2"], TraditionalForm]], "Output",
+ ImageSize->{68, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[9]=",
- CellID->1265853983]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[", "t4", "]"}]], "Input",
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[10]:=",
+ CellLabel->"In[2]:=",
CellID->1437762377],
Cell[BoxData[
@@ -408,25 +472,30 @@ Cell[BoxData[
RowBox[{"2", " ",
SubsuperscriptBox["C", "A", "2"], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
- ImageSize->{57, 20},
+ ImageSize->{65, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[10]=",
- CellID->1672514552]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t5", "=",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUNF", "[",
- RowBox[{"d", ",", "b", ",", "c"}], "]"}]}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUNF", "[",
+ RowBox[{"d", ",", "b", ",", "c"}], "]"}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[11]:=",
+ CellLabel->"In[1]:=",
CellID->1679024090],
Cell[BoxData[
@@ -448,20 +517,19 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{83, 19},
+ ImageSize->{97, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[11]=",
- CellID->457488683]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[", "t5", "]"}]], "Input",
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[12]:=",
+ CellLabel->"In[2]:=",
CellID->1377676076],
Cell[BoxData[
@@ -478,25 +546,30 @@ Cell[BoxData[
FormBox["d",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{55, 19},
+ ImageSize->{63, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[12]=",
- CellID->1011263721]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t6", "=",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUND", "[",
- RowBox[{"d", ",", "b", ",", "c"}], "]"}]}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUND", "[",
+ RowBox[{"d", ",", "b", ",", "c"}], "]"}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[13]:=",
+ CellLabel->"In[1]:=",
CellID->188501571],
Cell[BoxData[
@@ -518,49 +591,57 @@ Cell[BoxData[
TraditionalForm],
FormBox["c",
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{83, 19},
+ ImageSize->{98, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[13]=",
- CellID->2102673396]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t6", ",",
+ RowBox[{"%", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[14]:=",
+ CellLabel->"In[2]:=",
CellID->181805532],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[14]=",
- CellID->1858289382]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUND", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUND", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{"SUNSimplify", "[",
- RowBox[{
- RowBox[{
- RowBox[{"SUND", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUND", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}]}], ",",
+ RowBox[{"%", ",",
RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}], "//",
"Factor2"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[15]:=",
+ CellLabel->"In[2]:=",
CellID->1466861165],
Cell[BoxData[
@@ -573,12 +654,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"4", "-",
SuperscriptBox["N", "2"]}], ")"}]}], "N"], TraditionalForm]], "Output",
- ImageSize->{130, 46},
+ ImageSize->{129, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[15]=",
- CellID->1818146513]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -593,9 +673,9 @@ Cell[BoxData[
RowBox[{"SUND", "[",
RowBox[{"e", ",", "b", ",", "c"}], "]"}]}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}], "//",
- "FullSimplify"}]], "Input",
+ "Simplify"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[16]:=",
+ CellLabel->"In[3]:=",
CellID->1134202251],
Cell[BoxData[
@@ -615,16 +695,22 @@ Cell[BoxData[
FormBox["e",
TraditionalForm],
TraditionalForm]}]]}], "N"], TraditionalForm]], "Output",
- ImageSize->{99, 46},
+ ImageSize->{101, 41},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[16]=",
- CellID->1693476425]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
RowBox[{
@@ -632,7 +718,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[17]:=",
+ CellLabel->"In[1]:=",
CellID->741099718],
Cell[BoxData[
@@ -691,12 +777,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{263, 25},
+ ImageSize->{289, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[17]=",
- CellID->65535242]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -708,7 +793,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[18]:=",
+ CellLabel->"In[2]:=",
CellID->721833298],
Cell[BoxData[
@@ -766,25 +851,65 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{242, 25},
+ ImageSize->{268, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[18]=",
- CellID->101677935]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNSimplify", "[",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUNT", "[",
+ RowBox[{"c", ",", "b", ",", "a"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUNT", "[",
- RowBox[{"c", ",", "b", ",", "a"}], "]"}]}], "]"}]], "Input",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox["a",
+ TraditionalForm],
+ FormBox["b",
+ TraditionalForm],
+ FormBox["c",
+ TraditionalForm]}]], " ",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox["c",
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox["b",
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox["a",
+ TraditionalForm]]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{131, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNSimplify", "[", "%", "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[19]:=",
+ CellLabel->"In[2]:=",
CellID->1477873564],
Cell[BoxData[
@@ -794,31 +919,36 @@ Cell[BoxData[
FractionBox["1", "2"]}], " ", "\[ImaginaryI]", " ",
SubscriptBox["C", "A"], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
- ImageSize->{83, 41},
+ ImageSize->{90, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[19]=",
- CellID->1237531474]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t7", "=",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
RowBox[{
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "e"}], "]"}],
- RowBox[{"SUNF", "[",
- RowBox[{"c", ",", "d", ",", "e"}], "]"}]}], "+",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "z"}], "]"}],
- RowBox[{"SUNF", "[",
- RowBox[{"c", ",", "d", ",", "z"}], "]"}]}]}]}]], "Input",
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "e"}], "]"}],
+ RowBox[{"SUNF", "[",
+ RowBox[{"c", ",", "d", ",", "e"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "z"}], "]"}],
+ RowBox[{"SUNF", "[",
+ RowBox[{"c", ",", "d", ",", "z"}], "]"}]}]}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[20]:=",
+ CellLabel->"In[1]:=",
CellID->1820847009],
Cell[BoxData[
@@ -858,22 +988,21 @@ Cell[BoxData[
TraditionalForm],
FormBox["z",
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{175, 19},
+ ImageSize->{204, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[20]=",
- CellID->1452581872]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t7", ",",
+ RowBox[{"%", ",",
RowBox[{"Explicit", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[21]:=",
+ CellLabel->"In[2]:=",
CellID->1998126322],
Cell[BoxData[
@@ -907,92 +1036,67 @@ Cell[BoxData[
FormBox["e",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{91, 19},
+ ImageSize->{108, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[21]=",
- CellID->465120276]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t7", ",",
+ RowBox[{"%", ",",
RowBox[{"Explicit", "\[Rule]", "False"}], ",",
RowBox[{"SUNIndexRename", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[22]:=",
+ CellLabel->"In[1]:=",
CellID->891597542],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["e",
- TraditionalForm],
- TraditionalForm]}]]}], "+",
- RowBox[{
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["z",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["z",
- TraditionalForm],
- TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{175, 19},
+ RowBox[{"2", " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["e",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{108, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[22]=",
- CellID->219600628]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1000,158 +1104,138 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
RowBox[{"1", "-",
- RowBox[{"SUNDelta", "[",
+ RowBox[{"SD", "[",
RowBox[{"i", ",", "i"}], "]"}]}], "]"}]], "Input",
CellTags->"SUNSimplify",
- CellLabel->"In[23]:=",
+ CellLabel->"In[2]:=",
CellID->1242397694],
Cell[BoxData[
FormBox[
RowBox[{"2", "-",
SubsuperscriptBox["C", "A", "2"]}], TraditionalForm]], "Output",
- ImageSize->{46, 20},
+ ImageSize->{53, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNSimplify",
- CellLabel->"Out[23]=",
- CellID->896501730]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t8", "=",
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"f", "[",
- RowBox[{"SUNIndex", "[", "a", "]"}], "]"}],
- RowBox[{
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
- RowBox[{"DiracMatrix", "[", "\[Nu]", "]"}]}]}], "]"}]}]], "Input",
- CellTags->"SUNSimplify",
- CellLabel->"In[24]:=",
- CellID->1263731064],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
Cell[BoxData[
- FormBox[
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{
- RowBox[{"f", "(",
- FormBox["a",
- TraditionalForm], ")"}], " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}]}],
- TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{104, 20},
+ RowBox[{"SUNSimplify", "[",
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUND", "[",
+ RowBox[{"d", ",", "b", ",", "c"}], "]"}]}], "]"}]], "Input",
+ CellTags->"SUNTrace",
+ CellLabel->"In[1]:=",
+ CellID->1959336477],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNSimplify",
- CellLabel->"Out[24]=",
- CellID->1605009291]
+ CellTags->"SUNTrace",
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t8", ",",
- RowBox[{"SUNTrace", "\[Rule]", "False"}]}], "]"}]], "Input",
- CellTags->"SUNSimplify",
- CellLabel->"In[25]:=",
- CellID->2092725674],
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUND", "[",
+ RowBox[{"a", ",", "b", ",", "d"}], "]"}]}], "]"}]], "Input",
+ CellTags->"SUNTrace",
+ CellLabel->"In[2]:=",
+ CellID->849009416],
Cell[BoxData[
- FormBox[
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{
- RowBox[{"f", "(",
- FormBox["a",
- TraditionalForm], ")"}], " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}]}],
- TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{104, 20},
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNSimplify",
- CellLabel->"Out[25]=",
- CellID->819509111]
+ CellTags->"SUNTrace",
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t8", ",",
- RowBox[{"SUNTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"SUNSimplify",
- CellLabel->"In[26]:=",
- CellID->41710248],
+ RowBox[{
+ RowBox[{"SUNF", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUND", "[",
+ RowBox[{"a", ",", "d", ",", "c"}], "]"}]}], "]"}]], "Input",
+ CellTags->"SUNTrace",
+ CellLabel->"In[3]:=",
+ CellID->1231032711],
Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"f", "(",
- FormBox["a",
- TraditionalForm], ")"}], " ",
- SubscriptBox["C", "A"], " ",
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{126, 20},
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNSimplify",
- CellLabel->"Out[26]=",
- CellID->737195172]
+ CellTags->"SUNTrace",
+ CellLabel->"Out[3]="]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
+ RowBox[{"SUNSimplify", "[",
RowBox[{
- "t1", ",", "t2", ",", "t3", ",", "t4", ",", "t5", ",", "t6", ",", "t7", ",",
- "t8"}], "]"}]], "Input",
- CellTags->"SUNSimplify",
- CellLabel->"In[27]:=",
- CellID->244792958]
+ RowBox[{"SUND", "[",
+ RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
+ RowBox[{"SUND", "[",
+ RowBox[{"d", ",", "b", ",", "c"}], "]"}]}], "]"}]], "Input",
+ CellTags->"SUNTrace",
+ CellLabel->"In[4]:=",
+ CellID->1107366946],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{"4", "-",
+ SubsuperscriptBox["C", "A", "2"]}], ")"}]}], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["C", "A"], "-",
+ RowBox[{"2", " ",
+ SubscriptBox["C", "F"]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{200, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNTrace",
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -1174,21 +1258,37 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["Trick",
+ StyleBox[ButtonBox["SUNTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTrace",
+ ButtonNote->"SUNTrace"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNT",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNT",
+ ButtonNote->"SUNT"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNTF",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTF",
+ ButtonNote->"SUNTF"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNF",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Trick",
- ButtonNote->"Trick"],
+ ButtonData->"paclet:FeynCalc/ref/SUNF",
+ ButtonNote->"SUNF"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["CalcColorFactor",
+ StyleBox[ButtonBox["SUND",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/CalcColorFactor",
- ButtonNote->"CalcColorFactor"],
+ ButtonData->"paclet:FeynCalc/ref/SUND",
+ ButtonNote->"SUND"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNSimplify",
- CellID->1451213327]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1205,24 +1305,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 44.934117}",
+ "built" -> "{2020, 1, 5, 19, 2, 57.836834}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SUNSimplify simplifies products of SUNT (and complex conjugated) \
-matrices. Basic renaming of dummy indices is done. If the option SUNTrace is \
-set to False, then any SUNT-matrices are taken out of DiracTrace[...]; \
-otherwise a color-trace is taken (by SUNTrace) before taking the SUN-objects \
-in front of DiracTrace[...].", "synonyms" -> {}, "title" -> "SUNSimplify",
+ "SUNSimplify[exp] simplifies products of SUNT and SUNTF matrices in the \
+expression.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNSimplify",
"titlemodifier" -> "", "windowtitle" -> "SUNSimplify", "type" -> "Symbol",
"uri" -> "FeynCalc/ref/SUNSimplify"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1230,8 +1327,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1240,417 +1338,397 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3554, 97, 386, 15, 31, "PrimaryExamplesSection",
+ Cell[6187, 188, 389, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->70223274]},
+ CellID->1511248044]},
"SUNSimplify"->{
- Cell[4186, 126, 139, 4, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->287772200],
- Cell[4328, 132, 617, 17, 56, "Output",
- CellTags->"SUNSimplify",
- CellID->291333912],
- Cell[4982, 154, 265, 9, 27, "Input",
+ Cell[6822, 217, 237, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1698138274],
- Cell[5250, 165, 492, 20, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1129385138],
- Cell[5779, 190, 135, 4, 27, "Input",
+ Cell[7062, 227, 471, 19, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[7570, 251, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1520473065],
- Cell[5917, 196, 411, 17, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->1288692360],
- Cell[6365, 218, 207, 7, 27, "Input",
+ Cell[7707, 257, 390, 16, 35, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[8264, 284, 181, 6, 27, "Input",
CellTags->"SUNSimplify",
CellID->1992995975],
- Cell[6575, 227, 358, 14, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->1292635919],
- Cell[6970, 246, 135, 4, 27, "Input",
+ Cell[8448, 292, 337, 13, 35, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[8822, 310, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1767152339],
- Cell[7108, 252, 235, 8, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->2143185906],
- Cell[7380, 265, 200, 6, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->671897568],
- Cell[7583, 273, 308, 11, 66, "Output",
- CellTags->"SUNSimplify",
- CellID->1286035113],
- Cell[7928, 289, 272, 9, 27, "Input",
+ Cell[8959, 316, 214, 7, 37, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[9896, 358, 244, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1014117597],
- Cell[8203, 300, 564, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1079109643],
- Cell[8804, 329, 134, 4, 27, "Input",
+ Cell[10143, 368, 543, 23, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[10723, 396, 133, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->399652098],
- Cell[8941, 335, 466, 19, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->911807905],
- Cell[9444, 359, 286, 9, 27, "Input",
+ Cell[10859, 402, 446, 18, 40, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[11484, 432, 249, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->772128503],
- Cell[9733, 370, 564, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1265853983],
- Cell[10334, 399, 136, 4, 27, "Input",
+ Cell[11736, 442, 412, 16, 43, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[12185, 463, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1437762377],
- Cell[10473, 405, 303, 10, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->1672514552],
- Cell[10813, 420, 278, 9, 27, "Input",
+ Cell[12322, 469, 281, 9, 40, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[12782, 490, 249, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1679024090],
- Cell[11094, 431, 564, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->457488683],
- Cell[11695, 460, 136, 4, 27, "Input",
+ Cell[13034, 500, 543, 23, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[13614, 528, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1377676076],
- Cell[11834, 466, 468, 19, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1011263721],
- Cell[12339, 490, 277, 9, 27, "Input",
+ Cell[13751, 534, 446, 18, 40, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[14376, 564, 248, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->188501571],
- Cell[12619, 501, 565, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->2102673396],
- Cell[13221, 530, 198, 6, 27, "Input",
+ Cell[14627, 574, 543, 23, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[15207, 602, 196, 6, 27, "Input",
CellTags->"SUNSimplify",
CellID->181805532],
- Cell[13422, 538, 214, 7, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->1858289382],
- Cell[13673, 550, 403, 13, 27, "Input",
+ Cell[15406, 610, 192, 6, 35, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[15982, 636, 235, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1466861165],
- Cell[14079, 565, 418, 15, 67, "Output",
- CellTags->"SUNSimplify",
- CellID->1818146513],
- Cell[14534, 585, 408, 13, 45, "Input",
+ Cell[16220, 646, 396, 14, 62, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[16653, 665, 403, 13, 27, "Input",
CellTags->"SUNSimplify",
CellID->1134202251],
- Cell[14945, 600, 556, 22, 67, "Output",
- CellTags->"SUNSimplify",
- CellID->1693476425],
- Cell[15538, 627, 264, 8, 27, "Input",
+ Cell[17059, 680, 535, 21, 62, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[17773, 713, 263, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->741099718],
- Cell[15805, 637, 1578, 61, 46, "Output",
- CellTags->"SUNSimplify",
- CellID->65535242],
- Cell[17420, 703, 264, 8, 27, "Input",
+ Cell[18039, 723, 1558, 60, 43, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[19634, 788, 263, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->721833298],
- Cell[17687, 713, 1538, 60, 46, "Output",
- CellTags->"SUNSimplify",
- CellID->101677935],
- Cell[19262, 778, 292, 9, 27, "Input",
+ Cell[19900, 798, 1517, 59, 43, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[22462, 908, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1477873564],
- Cell[19557, 789, 357, 12, 62, "Output",
- CellTags->"SUNSimplify",
- CellID->1237531474],
- Cell[19951, 806, 458, 15, 27, "Input",
+ Cell[22599, 914, 335, 11, 56, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[23113, 937, 423, 14, 27, "Input",
CellTags->"SUNSimplify",
CellID->1820847009],
- Cell[20412, 823, 974, 42, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1452581872],
- Cell[21423, 870, 200, 6, 27, "Input",
+ Cell[23539, 953, 952, 41, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[24528, 999, 198, 6, 27, "Input",
CellTags->"SUNSimplify",
CellID->1998126322],
- Cell[21626, 878, 814, 36, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->465120276],
- Cell[22477, 919, 256, 7, 27, "Input",
+ Cell[24729, 1007, 794, 35, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[25702, 1054, 254, 7, 27, "Input",
CellTags->"SUNSimplify",
CellID->891597542],
- Cell[22736, 928, 1477, 66, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->219600628],
- Cell[24250, 999, 219, 7, 27, "Input",
+ Cell[25959, 1063, 794, 35, 38, "Output",
+ CellTags->"SUNSimplify"],
+ Cell[26790, 1103, 212, 7, 27, "Input",
CellTags->"SUNSimplify",
CellID->1242397694],
- Cell[24472, 1008, 269, 9, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->896501730],
- Cell[24778, 1022, 360, 11, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->1263731064],
- Cell[25141, 1035, 706, 27, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->1605009291],
- Cell[25884, 1067, 200, 6, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->2092725674],
- Cell[26087, 1075, 705, 27, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->819509111],
- Cell[26829, 1107, 197, 6, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->41710248],
- Cell[27029, 1115, 733, 28, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->737195172],
- Cell[27777, 1146, 226, 7, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->244792958],
- Cell[28359, 1175, 402, 15, 31, "Text",
- CellTags->"SUNSimplify",
- CellID->1451213327]}
+ Cell[27005, 1112, 248, 8, 40, "Output",
+ CellTags->"SUNSimplify"]},
+ "SUNTrace"->{
+ Cell[27432, 1132, 288, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->1959336477],
+ Cell[27723, 1143, 189, 6, 35, "Output",
+ CellTags->"SUNTrace"],
+ Cell[27949, 1154, 287, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->849009416],
+ Cell[28239, 1165, 189, 6, 35, "Output",
+ CellTags->"SUNTrace"],
+ Cell[28465, 1176, 288, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->1231032711],
+ Cell[28756, 1187, 189, 6, 35, "Output",
+ CellTags->"SUNTrace"],
+ Cell[28982, 1198, 288, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->1107366946],
+ Cell[29273, 1209, 663, 26, 43, "Output",
+ CellTags->"SUNTrace"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 30870, 1241},
- {"SUNSimplify", 31006, 1245}
+ {"PrimaryExamplesSection", 33003, 1339},
+ {"SUNSimplify", 33142, 1343},
+ {"SUNTrace", 36570, 1449}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 3329, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 628, 15, 115, "Usage",
- CellID->982511436],
+Cell[3915, 101, 288, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3554, 97, 386, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->70223274],
+Cell[4228, 116, 406, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3965, 116, 196, 6, 25, "ExampleSection",
- CellID->1339731506],
+Cell[4659, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2137365557],
+Cell[5401, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4186, 126, 139, 4, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->287772200],
-Cell[4328, 132, 617, 17, 56, "Output",
- CellTags->"SUNSimplify",
- CellID->291333912]
+Cell[5457, 162, 94, 2, 70, "Input"],
+Cell[5554, 166, 572, 15, 55, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4982, 154, 265, 9, 27, "Input",
+Cell[6187, 188, 389, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1511248044],
+Cell[CellGroupData[{
+Cell[6601, 207, 196, 6, 26, "ExampleSection",
+ CellID->636636871],
+Cell[CellGroupData[{
+Cell[6822, 217, 237, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1698138274],
-Cell[5250, 165, 492, 20, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1129385138]
+Cell[7062, 227, 471, 19, 38, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5779, 190, 135, 4, 27, "Input",
+Cell[7570, 251, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1520473065],
-Cell[5917, 196, 411, 17, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->1288692360]
+Cell[7707, 257, 390, 16, 35, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6365, 218, 207, 7, 27, "Input",
+Cell[8134, 278, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[8264, 284, 181, 6, 27, "Input",
CellTags->"SUNSimplify",
CellID->1992995975],
-Cell[6575, 227, 358, 14, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->1292635919]
+Cell[8448, 292, 337, 13, 35, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6970, 246, 135, 4, 27, "Input",
+Cell[8822, 310, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1767152339],
-Cell[7108, 252, 235, 8, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->2143185906]
+Cell[8959, 316, 214, 7, 37, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7380, 265, 200, 6, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->671897568],
-Cell[7583, 273, 308, 11, 66, "Output",
- CellTags->"SUNSimplify",
- CellID->1286035113]
+Cell[9210, 328, 243, 7, 27, "Input"],
+Cell[9456, 337, 261, 9, 59, "Output"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[7928, 289, 272, 9, 27, "Input",
+Cell[9766, 352, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9896, 358, 244, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1014117597],
-Cell[8203, 300, 564, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1079109643]
+Cell[10143, 368, 543, 23, 38, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8804, 329, 134, 4, 27, "Input",
+Cell[10723, 396, 133, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->399652098],
-Cell[8941, 335, 466, 19, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->911807905]
+Cell[10859, 402, 446, 18, 40, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[9444, 359, 286, 9, 27, "Input",
+Cell[11354, 426, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[11484, 432, 249, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->772128503],
-Cell[9733, 370, 564, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1265853983]
+Cell[11736, 442, 412, 16, 43, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10334, 399, 136, 4, 27, "Input",
+Cell[12185, 463, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1437762377],
-Cell[10473, 405, 303, 10, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->1672514552]
+Cell[12322, 469, 281, 9, 40, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[10813, 420, 278, 9, 27, "Input",
+Cell[12652, 484, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[12782, 490, 249, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1679024090],
-Cell[11094, 431, 564, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->457488683]
+Cell[13034, 500, 543, 23, 38, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11695, 460, 136, 4, 27, "Input",
+Cell[13614, 528, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1377676076],
-Cell[11834, 466, 468, 19, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1011263721]
+Cell[13751, 534, 446, 18, 40, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[12339, 490, 277, 9, 27, "Input",
+Cell[14246, 558, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[14376, 564, 248, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->188501571],
-Cell[12619, 501, 565, 24, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->2102673396]
+Cell[14627, 574, 543, 23, 38, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13221, 530, 198, 6, 27, "Input",
+Cell[15207, 602, 196, 6, 27, "Input",
CellTags->"SUNSimplify",
CellID->181805532],
-Cell[13422, 538, 214, 7, 36, "Output",
- CellTags->"SUNSimplify",
- CellID->1858289382]
+Cell[15406, 610, 192, 6, 35, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[13673, 550, 403, 13, 27, "Input",
+Cell[15647, 622, 105, 2, 9, "ExampleDelimiter"],
+Cell[15755, 626, 202, 6, 27, "Input"],
+Cell[CellGroupData[{
+Cell[15982, 636, 235, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->1466861165],
-Cell[14079, 565, 418, 15, 67, "Output",
- CellTags->"SUNSimplify",
- CellID->1818146513]
+Cell[16220, 646, 396, 14, 62, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14534, 585, 408, 13, 45, "Input",
+Cell[16653, 665, 403, 13, 27, "Input",
CellTags->"SUNSimplify",
CellID->1134202251],
-Cell[14945, 600, 556, 22, 67, "Output",
- CellTags->"SUNSimplify",
- CellID->1693476425]
+Cell[17059, 680, 535, 21, 62, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[15538, 627, 264, 8, 27, "Input",
+Cell[17643, 707, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[17773, 713, 263, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->741099718],
-Cell[15805, 637, 1578, 61, 46, "Output",
- CellTags->"SUNSimplify",
- CellID->65535242]
+Cell[18039, 723, 1558, 60, 43, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17420, 703, 264, 8, 27, "Input",
+Cell[19634, 788, 263, 8, 27, "Input",
CellTags->"SUNSimplify",
CellID->721833298],
-Cell[17687, 713, 1538, 60, 46, "Output",
- CellTags->"SUNSimplify",
- CellID->101677935]
+Cell[19900, 798, 1517, 59, 43, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[21466, 863, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[21596, 869, 202, 6, 27, "Input"],
+Cell[21801, 877, 624, 26, 38, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19262, 778, 292, 9, 27, "Input",
+Cell[22462, 908, 134, 4, 27, "Input",
CellTags->"SUNSimplify",
CellID->1477873564],
-Cell[19557, 789, 357, 12, 62, "Output",
- CellTags->"SUNSimplify",
- CellID->1237531474]
+Cell[22599, 914, 335, 11, 56, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[19951, 806, 458, 15, 27, "Input",
+Cell[22983, 931, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[23113, 937, 423, 14, 27, "Input",
CellTags->"SUNSimplify",
CellID->1820847009],
-Cell[20412, 823, 974, 42, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->1452581872]
+Cell[23539, 953, 952, 41, 38, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21423, 870, 200, 6, 27, "Input",
+Cell[24528, 999, 198, 6, 27, "Input",
CellTags->"SUNSimplify",
CellID->1998126322],
-Cell[21626, 878, 814, 36, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->465120276]
+Cell[24729, 1007, 794, 35, 38, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[22477, 919, 256, 7, 27, "Input",
+Cell[25572, 1048, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[25702, 1054, 254, 7, 27, "Input",
CellTags->"SUNSimplify",
CellID->891597542],
-Cell[22736, 928, 1477, 66, 40, "Output",
- CellTags->"SUNSimplify",
- CellID->219600628]
+Cell[25959, 1063, 794, 35, 38, "Output",
+ CellTags->"SUNSimplify"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24250, 999, 219, 7, 27, "Input",
+Cell[26790, 1103, 212, 7, 27, "Input",
CellTags->"SUNSimplify",
CellID->1242397694],
-Cell[24472, 1008, 269, 9, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->896501730]
+Cell[27005, 1112, 248, 8, 40, "Output",
+ CellTags->"SUNSimplify"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[24778, 1022, 360, 11, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->1263731064],
-Cell[25141, 1035, 706, 27, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->1605009291]
+Cell[27302, 1126, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[27432, 1132, 288, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->1959336477],
+Cell[27723, 1143, 189, 6, 35, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25884, 1067, 200, 6, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->2092725674],
-Cell[26087, 1075, 705, 27, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->819509111]
+Cell[27949, 1154, 287, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->849009416],
+Cell[28239, 1165, 189, 6, 35, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[26829, 1107, 197, 6, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->41710248],
-Cell[27029, 1115, 733, 28, 41, "Output",
- CellTags->"SUNSimplify",
- CellID->737195172]
+Cell[28465, 1176, 288, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->1231032711],
+Cell[28756, 1187, 189, 6, 35, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
-Cell[27777, 1146, 226, 7, 27, "Input",
- CellTags->"SUNSimplify",
- CellID->244792958]
+Cell[CellGroupData[{
+Cell[28982, 1198, 288, 9, 27, "Input",
+ CellTags->"SUNTrace",
+ CellID->1107366946],
+Cell[29273, 1209, 663, 26, 43, "Output",
+ CellTags->"SUNTrace"]
+}, Open ]]
+}, Open ]]
}, Open ]],
-Cell[28018, 1156, 31, 0, 29, "SectionFooterSpacer"]
+Cell[29975, 1240, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[28086, 1161, 270, 12, 31, "SeeAlsoSection",
+Cell[30043, 1245, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[28359, 1175, 402, 15, 31, "Text",
- CellTags->"SUNSimplify",
- CellID->1451213327]
+Cell[30316, 1259, 778, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[28776, 1193, 23, 0, 42, "FooterCell"]
+Cell[31109, 1293, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNT.nb
index 5f1453796..478b119f3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNT.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21255, 837]
-NotebookOptionsPosition[ 13768, 570]
-NotebookOutlinePosition[ 18180, 711]
-CellTagsIndexPosition[ 18072, 705]
+NotebookDataLength[ 21198, 804]
+NotebookOptionsPosition[ 14651, 581]
+NotebookOutlinePosition[ 18536, 699]
+CellTagsIndexPosition[ 18428, 693]
WindowTitle->SUNT
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNT\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNT"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNT.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$150651],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNT",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"CA\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CA"], "\<\"CF\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/CF"], "\<\"SUND\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUND"], "\<\"SUNDelta\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNDelta"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNF"], "\<\"SUNSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNT\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNT"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNT.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$261523],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNT",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,22 +102,32 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SUNT", "[", "a", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the SU(",
+ " \[LineSeparator]is the SU(",
StyleBox["N",
FontSlant->"Italic"],
") ",
Cell[BoxData[
FormBox[
- SubscriptBox["T", "a"], TraditionalForm]]],
- " generator in the fundamental representation."
+ SuperscriptBox["T", "a"], TraditionalForm]]],
+ " generator in the fundamental representation. The fundamental indices \
+are implicit."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -114,7 +153,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->683323705],
+ CellID->6159029],
Cell[CellGroupData[{
@@ -124,7 +163,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1568727464],
+ CellID->1899326785],
Cell[CellGroupData[{
@@ -139,12 +178,11 @@ Cell[BoxData[
SuperscriptBox["T",
FormBox["a",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{24, 15},
+ ImageSize->{27, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[1]=",
- CellID->1672661577]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[TextData[{
@@ -153,9 +191,7 @@ Cell[TextData[{
FormBox[
SubscriptBox["T", "a"], TraditionalForm]]],
" is a noncommutative object, products have to separated by a dot (.)."
-}], "Text",
- CellTags->"SUNT",
- CellID->1160812067],
+}], "Notes"],
Cell[CellGroupData[{
@@ -180,12 +216,11 @@ Cell[BoxData[
SuperscriptBox["T",
FormBox["c",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{71, 19},
+ ImageSize->{84, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[2]=",
- CellID->818227996]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -201,31 +236,22 @@ Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["T",
- FormBox[
- FormBox["a",
- TraditionalForm],
+ FormBox["a",
TraditionalForm]], ".",
SuperscriptBox["T",
- FormBox[
- FormBox["b",
- TraditionalForm],
+ FormBox["b",
TraditionalForm]], ".",
SuperscriptBox["T",
- FormBox[
- FormBox["c",
- TraditionalForm],
+ FormBox["c",
TraditionalForm]], ".",
SuperscriptBox["T",
- FormBox[
- FormBox["d",
- TraditionalForm],
+ FormBox["d",
TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{95, 19},
+ ImageSize->{114, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[3]=",
- CellID->583778930]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -250,12 +276,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
RowBox[{"2", " ", "N"}]]}], TraditionalForm]], "Output",
- ImageSize->{45, 46},
+ ImageSize->{46, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[4]=",
- CellID->471863997]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -271,12 +296,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
SubsuperscriptBox["C", "F", "2"], TraditionalForm]], "Output",
- ImageSize->{24, 20},
+ ImageSize->{26, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[5]=",
- CellID->1224364730]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -304,12 +328,11 @@ Cell[BoxData[
SubscriptBox["C", "A"], "-",
RowBox[{"2", " ",
SubscriptBox["C", "F"]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{130, 41},
+ ImageSize->{144, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[6]=",
- CellID->207267640]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -334,12 +357,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
RowBox[{"2", " ", "N"}]]}], TraditionalForm]], "Output",
- ImageSize->{45, 46},
+ ImageSize->{46, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[7]=",
- CellID->1434438138]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[TextData[{
@@ -356,9 +378,7 @@ Cell[TextData[{
RowBox[{"1", "/", "2"}], " ",
RowBox[{
SubscriptBox["\[Delta]", "ab"], "."}]}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"SUNT",
- CellID->871639479],
+}], "Notes"],
Cell[CellGroupData[{
@@ -383,12 +403,11 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]], "2"], TraditionalForm]], "Output",
- ImageSize->{38, 46},
+ ImageSize->{39, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[8]=",
- CellID->1733460108]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[TextData[{
@@ -397,9 +416,7 @@ Cell[TextData[{
FormBox[
SubscriptBox["T", "f"], TraditionalForm]]],
", you need to include a factor 2Tf inside the trace."
-}], "Text",
- CellTags->"SUNT",
- CellID->2043701440],
+}], "Notes"],
Cell[CellGroupData[{
@@ -426,12 +443,11 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{53, 22},
+ ImageSize->{57, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[9]=",
- CellID->1858177206]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -452,12 +468,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"SUNIndex", "[", "a", "]"}], ",",
RowBox[{"SUNIndex", "[", "b", "]"}]}], "]"}]}]], "Output",
- ImageSize->{295, 39},
+ ImageSize->{297, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[10]//StandardForm=",
- CellID->1917924836]
+ CellLabel->"Out[10]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -474,12 +489,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SUNT", "[",
RowBox[{"SUNIndex", "[", "a", "]"}], "]"}]], "Output",
- ImageSize->{142, 15},
+ ImageSize->{144, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[11]//StandardForm=",
- CellID->1246194475]
+ CellLabel->"Out[11]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -496,12 +510,11 @@ Cell[BoxData[
Cell[BoxData[
RowBox[{"SUNT", "[", "a", "]"}]], "Output",
- ImageSize->{62, 15},
+ ImageSize->{63, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNT",
- CellLabel->"Out[12]//StandardForm=",
- CellID->822340341]
+ CellLabel->"Out[12]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -561,9 +574,7 @@ Cell[TextData[{
ButtonNote->"SUNSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNT",
- CellID->1735213783]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -580,21 +591,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 46.597896}",
+ "built" -> "{2020, 1, 5, 19, 3, 0.521831}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SUNT[a] is the SU(N) Ta generator in the fundamental representation.",
- "synonyms" -> {}, "title" -> "SUNT", "titlemodifier" -> "", "windowtitle" ->
- "SUNT", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SUNT"},
- "SearchTextTranslated" -> ""},
+ "SUNT[a] is the SU(N) T^a generator in the fundamental representation. \
+The fundamental indices are implicit.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SUNT", "titlemodifier" -> "", "windowtitle" -> "SUNT", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SUNT"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -602,8 +613,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -612,233 +624,188 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3429, 101, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4865, 140, 385, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->683323705]},
+ CellID->6159029]},
"SUNT"->{
- Cell[4062, 130, 120, 4, 27, "Input",
+ Cell[5496, 169, 120, 4, 27, "Input",
CellTags->"SUNT",
CellID->1010106474],
- Cell[4185, 136, 264, 10, 36, "Output",
- CellTags->"SUNT",
- CellID->1672661577],
- Cell[4464, 149, 224, 8, 33, "Text",
- CellTags->"SUNT",
- CellID->1160812067],
- Cell[4713, 161, 224, 7, 27, "Input",
+ Cell[5619, 175, 243, 9, 35, "Output",
+ CellTags->"SUNT"],
+ Cell[6087, 197, 224, 7, 27, "Input",
CellTags->"SUNT",
CellID->892665531],
- Cell[4940, 170, 421, 17, 40, "Output",
- CellTags->"SUNT",
- CellID->818227996],
- Cell[5398, 192, 163, 5, 27, "Input",
+ Cell[6314, 206, 401, 16, 38, "Output",
+ CellTags->"SUNT"],
+ Cell[6752, 227, 163, 5, 27, "Input",
CellTags->"SUNT",
CellID->1074191459],
- Cell[5564, 199, 644, 28, 40, "Output",
- CellTags->"SUNT",
- CellID->583778930],
- Cell[6245, 232, 259, 8, 27, "Input",
+ Cell[6918, 234, 473, 19, 38, "Output",
+ CellTags->"SUNT"],
+ Cell[7428, 258, 259, 8, 27, "Input",
CellTags->"SUNT",
CellID->984008279],
- Cell[6507, 242, 374, 15, 67, "Output",
- CellTags->"SUNT",
- CellID->471863997],
- Cell[6918, 262, 202, 6, 27, "Input",
+ Cell[7690, 268, 354, 14, 60, "Output",
+ CellTags->"SUNT"],
+ Cell[8081, 287, 202, 6, 27, "Input",
CellTags->"SUNT",
CellID->1204560137],
- Cell[7123, 270, 238, 8, 41, "Output",
- CellTags->"SUNT",
- CellID->1224364730],
- Cell[7398, 283, 191, 6, 27, "Input",
+ Cell[8286, 295, 217, 7, 40, "Output",
+ CellTags->"SUNT"],
+ Cell[8540, 307, 191, 6, 27, "Input",
CellTags->"SUNT",
CellID->979223472],
- Cell[7592, 291, 506, 20, 62, "Output",
- CellTags->"SUNT",
- CellID->207267640],
- Cell[8135, 316, 259, 8, 27, "Input",
+ Cell[8734, 315, 486, 19, 56, "Output",
+ CellTags->"SUNT"],
+ Cell[9257, 339, 259, 8, 27, "Input",
CellTags->"SUNT",
CellID->568398491],
- Cell[8397, 326, 375, 15, 67, "Output",
- CellTags->"SUNT",
- CellID->1434438138],
- Cell[8787, 344, 442, 16, 49, "Text",
- CellTags->"SUNT",
- CellID->871639479],
- Cell[9254, 364, 178, 6, 27, "Input",
+ Cell[9519, 349, 354, 14, 60, "Output",
+ CellTags->"SUNT"],
+ Cell[10317, 384, 178, 6, 27, "Input",
CellTags->"SUNT",
CellID->345164772],
- Cell[9435, 372, 435, 18, 67, "Output",
- CellTags->"SUNT",
- CellID->1733460108],
- Cell[9885, 393, 218, 8, 33, "Text",
- CellTags->"SUNT",
- CellID->2043701440],
- Cell[10128, 405, 213, 7, 27, "Input",
+ Cell[10498, 392, 414, 17, 60, "Output",
+ CellTags->"SUNT"],
+ Cell[11131, 422, 213, 7, 27, "Input",
CellTags->"SUNT",
CellID->92682768],
- Cell[10344, 414, 460, 19, 43, "Output",
- CellTags->"SUNT",
- CellID->1858177206],
- Cell[10841, 438, 216, 7, 27, "Input",
+ Cell[11347, 431, 439, 18, 40, "Output",
+ CellTags->"SUNT"],
+ Cell[11823, 454, 216, 7, 27, "Input",
CellTags->"SUNT",
CellID->615868524],
- Cell[11060, 447, 370, 12, 73, "Output",
- CellTags->"SUNT",
- CellID->1917924836],
- Cell[11467, 464, 185, 7, 27, "Input",
+ Cell[12042, 463, 349, 11, 69, "Output",
+ CellTags->"SUNT"],
+ Cell[12428, 479, 185, 7, 27, "Input",
CellTags->"SUNT",
CellID->871309874],
- Cell[11655, 473, 259, 8, 49, "Output",
- CellTags->"SUNT",
- CellID->1246194475],
- Cell[11951, 486, 214, 8, 27, "Input",
+ Cell[12616, 488, 238, 7, 51, "Output",
+ CellTags->"SUNT"],
+ Cell[12891, 500, 214, 8, 27, "Input",
CellTags->"SUNT",
CellID->1948844240],
- Cell[12168, 496, 222, 7, 49, "Output",
- CellTags->"SUNT",
- CellID->822340341],
- Cell[12758, 526, 968, 39, 32, "Text",
- CellTags->"SUNT",
- CellID->1735213783]}
+ Cell[13108, 510, 202, 6, 51, "Output",
+ CellTags->"SUNT"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15552, 613},
- {"SUNT", 15683, 617}
+ {"PrimaryExamplesSection", 16514, 625},
+ {"SUNT", 16643, 629}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3398, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 546, 19, 84, "Usage",
+Cell[3977, 104, 281, 11, 45, "ObjectNameGrid"],
+Cell[4261, 117, 579, 19, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3429, 101, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4865, 140, 385, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->683323705],
+ CellID->6159029],
Cell[CellGroupData[{
-Cell[3841, 120, 196, 6, 25, "ExampleSection",
- CellID->1568727464],
+Cell[5275, 159, 196, 6, 26, "ExampleSection",
+ CellID->1899326785],
Cell[CellGroupData[{
-Cell[4062, 130, 120, 4, 27, "Input",
+Cell[5496, 169, 120, 4, 27, "Input",
CellTags->"SUNT",
CellID->1010106474],
-Cell[4185, 136, 264, 10, 36, "Output",
- CellTags->"SUNT",
- CellID->1672661577]
+Cell[5619, 175, 243, 9, 35, "Output",
+ CellTags->"SUNT"]
}, Open ]],
-Cell[4464, 149, 224, 8, 33, "Text",
- CellTags->"SUNT",
- CellID->1160812067],
+Cell[5877, 187, 185, 6, 33, "Notes"],
Cell[CellGroupData[{
-Cell[4713, 161, 224, 7, 27, "Input",
+Cell[6087, 197, 224, 7, 27, "Input",
CellTags->"SUNT",
CellID->892665531],
-Cell[4940, 170, 421, 17, 40, "Output",
- CellTags->"SUNT",
- CellID->818227996]
+Cell[6314, 206, 401, 16, 38, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5398, 192, 163, 5, 27, "Input",
+Cell[6752, 227, 163, 5, 27, "Input",
CellTags->"SUNT",
CellID->1074191459],
-Cell[5564, 199, 644, 28, 40, "Output",
- CellTags->"SUNT",
- CellID->583778930]
+Cell[6918, 234, 473, 19, 38, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6245, 232, 259, 8, 27, "Input",
+Cell[7428, 258, 259, 8, 27, "Input",
CellTags->"SUNT",
CellID->984008279],
-Cell[6507, 242, 374, 15, 67, "Output",
- CellTags->"SUNT",
- CellID->471863997]
+Cell[7690, 268, 354, 14, 60, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6918, 262, 202, 6, 27, "Input",
+Cell[8081, 287, 202, 6, 27, "Input",
CellTags->"SUNT",
CellID->1204560137],
-Cell[7123, 270, 238, 8, 41, "Output",
- CellTags->"SUNT",
- CellID->1224364730]
+Cell[8286, 295, 217, 7, 40, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7398, 283, 191, 6, 27, "Input",
+Cell[8540, 307, 191, 6, 27, "Input",
CellTags->"SUNT",
CellID->979223472],
-Cell[7592, 291, 506, 20, 62, "Output",
- CellTags->"SUNT",
- CellID->207267640]
+Cell[8734, 315, 486, 19, 56, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8135, 316, 259, 8, 27, "Input",
+Cell[9257, 339, 259, 8, 27, "Input",
CellTags->"SUNT",
CellID->568398491],
-Cell[8397, 326, 375, 15, 67, "Output",
- CellTags->"SUNT",
- CellID->1434438138]
+Cell[9519, 349, 354, 14, 60, "Output",
+ CellTags->"SUNT"]
}, Open ]],
-Cell[8787, 344, 442, 16, 49, "Text",
- CellTags->"SUNT",
- CellID->871639479],
+Cell[9888, 366, 404, 14, 33, "Notes"],
Cell[CellGroupData[{
-Cell[9254, 364, 178, 6, 27, "Input",
+Cell[10317, 384, 178, 6, 27, "Input",
CellTags->"SUNT",
CellID->345164772],
-Cell[9435, 372, 435, 18, 67, "Output",
- CellTags->"SUNT",
- CellID->1733460108]
+Cell[10498, 392, 414, 17, 60, "Output",
+ CellTags->"SUNT"]
}, Open ]],
-Cell[9885, 393, 218, 8, 33, "Text",
- CellTags->"SUNT",
- CellID->2043701440],
+Cell[10927, 412, 179, 6, 33, "Notes"],
Cell[CellGroupData[{
-Cell[10128, 405, 213, 7, 27, "Input",
+Cell[11131, 422, 213, 7, 27, "Input",
CellTags->"SUNT",
CellID->92682768],
-Cell[10344, 414, 460, 19, 43, "Output",
- CellTags->"SUNT",
- CellID->1858177206]
+Cell[11347, 431, 439, 18, 40, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10841, 438, 216, 7, 27, "Input",
+Cell[11823, 454, 216, 7, 27, "Input",
CellTags->"SUNT",
CellID->615868524],
-Cell[11060, 447, 370, 12, 73, "Output",
- CellTags->"SUNT",
- CellID->1917924836]
+Cell[12042, 463, 349, 11, 69, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11467, 464, 185, 7, 27, "Input",
+Cell[12428, 479, 185, 7, 27, "Input",
CellTags->"SUNT",
CellID->871309874],
-Cell[11655, 473, 259, 8, 49, "Output",
- CellTags->"SUNT",
- CellID->1246194475]
+Cell[12616, 488, 238, 7, 51, "Output",
+ CellTags->"SUNT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11951, 486, 214, 8, 27, "Input",
+Cell[12891, 500, 214, 8, 27, "Input",
CellTags->"SUNT",
CellID->1948844240],
-Cell[12168, 496, 222, 7, 49, "Output",
- CellTags->"SUNT",
- CellID->822340341]
+Cell[13108, 510, 202, 6, 51, "Output",
+ CellTags->"SUNT"]
}, Open ]]
}, Open ]],
-Cell[12417, 507, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13337, 520, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12485, 512, 270, 12, 31, "SeeAlsoSection",
+Cell[13405, 525, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12758, 526, 968, 39, 32, "Text",
- CellTags->"SUNT",
- CellID->1735213783]
+Cell[13678, 539, 931, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[13741, 568, 23, 0, 42, "FooterCell"]
+Cell[14624, 579, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTF.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTF.nb
new file mode 100644
index 000000000..097e59430
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTF.nb
@@ -0,0 +1,593 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15371, 583]
+NotebookOptionsPosition[ 11460, 456]
+NotebookOutlinePosition[ 13775, 521]
+CellTagsIndexPosition[ 13667, 515]
+WindowTitle->SUNTF
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNTF\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNTF"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNTF.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$261078],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SUNTF",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SUNTF", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{", "a", "}"}], ",", "i", ",", "j"}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]is the SU(",
+ StyleBox["N",
+ FontSlant->"Italic"],
+ ") ",
+ Cell[BoxData[
+ FormBox[
+ SuperscriptBox["T", "a"], TraditionalForm]]],
+ " generator in the fundamental representation. The fundamental indices \
+are explicit."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660910752],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->216790256],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNTF", "[",
+ RowBox[{"a", ",", "i", ",", "j"}], "]"}]], "Input",
+ CellTags->"SUNT",
+ CellLabel->"In[1]:=",
+ CellID->1010106474],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["T",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}],
+ FormBox["a",
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{33, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SUNT",
+ CellLabel->"Out[1]=",
+ CellID->236492549]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",", "i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->798079172],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["T",
+ FormBox["a",
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox["b",
+ TraditionalForm]], ")"}],
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{86, 25},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1757242881]
+}, Open ]],
+
+Cell["\<\
+SUNTF are c-numbers, hence they are commutative objects and do not require a \
+dot\
+\>", "Notes",
+ CellID->542278934],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",", "i", ",", "j"}], "]"}],
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"c", ",", "d"}], "}"}], ",", "j", ",", "k"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->126110189],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["T",
+ FormBox["a",
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox["b",
+ TraditionalForm]], ")"}],
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["T",
+ FormBox["c",
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox["d",
+ TraditionalForm]], ")"}],
+ RowBox[{
+ FormBox["j",
+ TraditionalForm],
+ FormBox["k",
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{175, 25},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1442739890]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",", "i", ",", "j"}], "]"}],
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"c", ",", "d"}], "}"}], ",", "j", ",", "k"}], "]"}]}], "//",
+ "SUNFSimplify"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1399027732],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]],
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ ImageSize->{142, 23},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1075595377]
+}, Open ]],
+
+Cell["\<\
+A chain with closed indices is automatically converted into a trace\
+\>", "Notes",
+ CellID->1989962998],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",", "i", ",", "j"}], "]"}],
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"c", ",", "d"}], "}"}], ",", "j", ",", "i"}], "]"}]}], "//",
+ "SUNFSimplify"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->698303944],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"tr\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{146, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->137508342]
+}, Open ]],
+
+Cell["\<\
+SUNFSimplify is a dedicated function to deal with SUNTFs. However, \
+SUNSimplify will also call SUNFSimplify when it detects SUNTFs in the input\
+\>", "Notes",
+ CellID->1270640780],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNDelta", "[",
+ RowBox[{"a", ",", "b"}], "]"}],
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",", "i", ",", "j"}], "]"}],
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"c", ",", "d"}], "}"}], ",", "j", ",", "i"}], "]"}]}], "//",
+ "SUNSimplify"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->483980042],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ SubscriptBox["C", "F"], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["d",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{77, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->599900556]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}], ",", "i", ",", "j"}], "]"}], "//",
+ "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->1212273874],
+
+Cell[BoxData[
+ RowBox[{"SUNTF", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"SUNIndex", "[", "a", "]"}], ",",
+ RowBox[{"SUNIndex", "[", "b", "]"}]}], "}"}], ",",
+ RowBox[{"SUNFIndex", "[", "i", "]"}], ",",
+ RowBox[{"SUNFIndex", "[", "j", "]"}]}], "]"}]], "Output",
+ ImageSize->{493, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[7]//StandardForm=",
+ CellID->500789961]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SUNTF",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 59.246920}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SUNTF[{a}, i, j] is the SU(N) T^a generator in the fundamental \
+representation. The fundamental indices are explicit.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SUNTF", "titlemodifier" -> "",
+ "windowtitle" -> "SUNTF", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SUNTF"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3805, 115, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660910752]},
+ "SUNT"->{
+ Cell[4438, 144, 154, 5, 27, "Input",
+ CellTags->"SUNT",
+ CellID->1010106474],
+ Cell[4595, 151, 362, 15, 40, "Output",
+ CellTags->"SUNT",
+ CellID->236492549]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13342, 501},
+ {"SUNT", 13474, 505}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2261, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2841, 76, 282, 11, 45, "ObjectNameGrid"],
+Cell[3126, 89, 654, 22, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3805, 115, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1660910752],
+Cell[CellGroupData[{
+Cell[4218, 134, 195, 6, 26, "ExampleSection",
+ CellID->216790256],
+Cell[CellGroupData[{
+Cell[4438, 144, 154, 5, 27, "Input",
+ CellTags->"SUNT",
+ CellID->1010106474],
+Cell[4595, 151, 362, 15, 40, "Output",
+ CellTags->"SUNT",
+ CellID->236492549]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4994, 171, 183, 6, 27, "Input",
+ CellID->798079172],
+Cell[5180, 179, 457, 19, 46, "Output",
+ CellID->1757242881]
+}, Open ]],
+Cell[5652, 201, 127, 4, 32, "Notes",
+ CellID->542278934],
+Cell[CellGroupData[{
+Cell[5804, 209, 321, 11, 27, "Input",
+ CellID->126110189],
+Cell[6128, 222, 777, 33, 46, "Output",
+ CellID->1442739890]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6942, 260, 368, 13, 27, "Input",
+ CellID->1399027732],
+Cell[7313, 275, 832, 37, 44, "Output",
+ CellID->1075595377]
+}, Open ]],
+Cell[8160, 315, 113, 3, 32, "Notes",
+ CellID->1989962998],
+Cell[CellGroupData[{
+Cell[8298, 322, 367, 13, 27, "Input",
+ CellID->698303944],
+Cell[8668, 337, 857, 36, 40, "Output",
+ CellID->137508342]
+}, Open ]],
+Cell[9540, 376, 190, 4, 49, "Notes",
+ CellID->1270640780],
+Cell[CellGroupData[{
+Cell[9755, 384, 432, 15, 27, "Input",
+ CellID->483980042],
+Cell[10190, 401, 472, 19, 56, "Output",
+ CellID->599900556]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10699, 425, 256, 9, 27, "Input",
+ CellID->1212273874],
+Cell[10958, 436, 436, 13, 51, "Output",
+ CellID->500789961]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11433, 454, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTrace.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTrace.nb
index 438a8350f..606cd9547 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTrace.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SUNTrace.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 40227, 1575]
-NotebookOptionsPosition[ 32595, 1313]
-NotebookOutlinePosition[ 37057, 1450]
-CellTagsIndexPosition[ 36943, 1444]
+NotebookDataLength[ 39960, 1533]
+NotebookOptionsPosition[ 33935, 1335]
+NotebookOutlinePosition[ 37295, 1433]
+CellTagsIndexPosition[ 37181, 1427]
WindowTitle->SUNTrace
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SUNTrace\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SUNTrace"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SUNTrace.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SUNTrace\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SUNTrace"], "\<\"SUNT\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNT"], "\<\"SUNTF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTF"], "\<\"SUNF\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNF"], "\<\"SUND\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUND"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SUNTrace\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SUNTrace"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SUNTrace.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$151001],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SUNTrace", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$262000],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SUNTrace", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,13 +99,25 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SUNTrace", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SUNTrace", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"SUNTrace", "[", "expr", "]"}]], "InlineFormula"],
+ RowBox[{"SUNTrace", "[", "exp", "]"}]], "InlineFormula"],
" \[LineSeparator]",
"calculates the color-trace."
}]]}
@@ -92,6 +130,55 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1392268612],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SUNTrace", "]"}]], "Input",
+ CellLabel->"In[98]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Explicit", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{111, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[98]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -103,49 +190,48 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1542252705],
+ CellID->1412979261],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(4)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1571715533],
+ CellID->785766225],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "SUNTrace", "]"}]], "Input",
- CellTags->"SUNTrace",
- CellLabel->"In[1]:=",
- CellID->1664304457],
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
- RowBox[{"Explicit", "\[Rule]", "False"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{118, 15},
+ RowBox[{
+ SuperscriptBox["T",
+ FormBox["a",
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
+ FormBox["b",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{56, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNTrace",
- CellLabel->"Out[1]=",
- CellID->590812898]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SUNTrace", "[",
- RowBox[{"SUNT", "[",
- RowBox[{"a", ",", "b"}], "]"}], "]"}]], "Input",
+ RowBox[{"SUNTrace", "[", "%", "]"}]], "Input",
CellTags->"SUNTrace",
CellLabel->"In[2]:=",
CellID->401315043],
@@ -163,22 +249,27 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm]}]], "2"], TraditionalForm]], "Output",
- ImageSize->{38, 46},
+ ImageSize->{39, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[2]=",
- CellID->742626825]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"SUNTrace", "[",
RowBox[{"SUNT", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->2065971662],
Cell[BoxData[
@@ -208,12 +299,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{104, 19},
+ ImageSize->{116, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[3]=",
- CellID->1501954636]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -225,7 +315,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c"}], "]"}], ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->438695313],
Cell[BoxData[
@@ -262,22 +352,28 @@ Cell[BoxData[
FormBox["c",
TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{127, 46},
+ ImageSize->{139, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[4]=",
- CellID->771631595]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"SUNTrace", "[",
RowBox[{"SUNT", "[",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[5]:=",
+ CellLabel->"In[1]:=",
CellID->973332873],
Cell[BoxData[
@@ -312,25 +408,24 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{128, 19},
+ ImageSize->{146, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[5]=",
+ CellLabel->"Out[1]=",
CellID->538427953]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"SUNTrace", "[",
- RowBox[{
- RowBox[{"SUNT", "[",
- RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}], ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]}]], "Input",
+ RowBox[{"SUNTrace", "[",
+ RowBox[{
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[6]:=",
+ CellLabel->"In[2]:=",
CellID->414539651],
Cell[BoxData[
@@ -350,12 +445,12 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["b",
@@ -370,7 +465,7 @@ Cell[BoxData[
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["a",
@@ -391,14 +486,14 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm]}]]}], "+",
RowBox[{
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["a",
@@ -411,7 +506,7 @@ Cell[BoxData[
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["b",
@@ -426,7 +521,7 @@ Cell[BoxData[
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["b",
@@ -439,7 +534,7 @@ Cell[BoxData[
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["a",
@@ -454,7 +549,7 @@ Cell[BoxData[
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -467,7 +562,7 @@ Cell[BoxData[
SuperscriptBox["d",
RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"e\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"e62\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["a",
@@ -546,22 +641,21 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]]}],
RowBox[{"4", " ", "N"}]]}], TraditionalForm]], "Output",
- ImageSize->{427, 144},
+ ImageSize->{478, 123},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[6]=",
- CellID->873761273]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t1", ",",
+ RowBox[{"%", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[7]:=",
+ CellLabel->"In[3]:=",
CellID->485058595],
Cell[BoxData[
@@ -596,25 +690,30 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{128, 19},
+ ImageSize->{146, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[7]=",
- CellID->2048967442]
+ CellLabel->"Out[3]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"SUNTrace", "[",
- RowBox[{
- RowBox[{"SUNT", "[",
- RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "]"}], ",",
- RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SUNTrace", "[",
+ RowBox[{
+ RowBox[{"SUNT", "[",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "]"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[8]:=",
+ CellLabel->"In[1]:=",
CellID->1348500704],
Cell[BoxData[
@@ -624,7 +723,7 @@ Cell[BoxData[
FractionBox["1", "2"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
FormBox[
FormBox["a",
@@ -648,14 +747,16 @@ Cell[BoxData[
FormBox["d",
TraditionalForm],
TraditionalForm],
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -666,7 +767,8 @@ Cell[BoxData[
FractionBox["1", "8"], " ", "\[ImaginaryI]", " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -679,23 +781,25 @@ Cell[BoxData[
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["e",
TraditionalForm],
TraditionalForm],
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm]}]]}], "-",
RowBox[{
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -704,7 +808,8 @@ Cell[BoxData[
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -718,7 +823,8 @@ Cell[BoxData[
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -730,10 +836,11 @@ Cell[BoxData[
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -744,7 +851,8 @@ Cell[BoxData[
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["d",
@@ -756,14 +864,15 @@ Cell[BoxData[
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1129",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e66\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm]}]]}], "-",
FractionBox[
@@ -781,7 +890,7 @@ Cell[BoxData[
SuperscriptBox["\[Delta]",
RowBox[{
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -804,7 +913,7 @@ Cell[BoxData[
SuperscriptBox["\[Delta]",
RowBox[{
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -821,7 +930,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["\[Delta]",
@@ -847,7 +956,7 @@ Cell[BoxData[
FormBox["b",
TraditionalForm],
TraditionalForm],
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
@@ -863,14 +972,16 @@ Cell[BoxData[
FormBox["d",
TraditionalForm],
TraditionalForm],
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -881,7 +992,8 @@ Cell[BoxData[
FractionBox["1", "8"], " ", "\[ImaginaryI]", " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -894,23 +1006,25 @@ Cell[BoxData[
SuperscriptBox["f",
RowBox[{
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["e",
TraditionalForm],
TraditionalForm],
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm]}]]}], "-",
RowBox[{
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -919,7 +1033,8 @@ Cell[BoxData[
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -933,7 +1048,8 @@ Cell[BoxData[
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
@@ -945,10 +1061,11 @@ Cell[BoxData[
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -959,7 +1076,8 @@ Cell[BoxData[
FractionBox["1", "8"], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["d",
@@ -971,14 +1089,15 @@ Cell[BoxData[
TraditionalForm]}]], " ",
SuperscriptBox["d",
RowBox[{
- FormBox["c1130",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"e67\"\>", ")"}],
TraditionalForm],
FormBox[
FormBox["c",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm]}]]}], "-",
FractionBox[
@@ -996,7 +1115,7 @@ Cell[BoxData[
SuperscriptBox["\[Delta]",
RowBox[{
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1019,7 +1138,7 @@ Cell[BoxData[
SuperscriptBox["\[Delta]",
RowBox[{
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1036,7 +1155,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c1128",
+ FormBox["c65",
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["\[Delta]",
@@ -1096,22 +1215,21 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]]}]}], ")"}]}],
RowBox[{"2", " ", "N"}]]}], TraditionalForm]], "Output",
- ImageSize->{544, 339},
+ ImageSize->{557, 358},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[8]=",
- CellID->357301374]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SUNSimplify", "[",
- RowBox[{"t2", ",",
+ RowBox[{"%", ",",
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SUNTrace",
- CellLabel->"In[9]:=",
+ CellLabel->"In[2]:=",
CellID->1337618063],
Cell[BoxData[
@@ -1151,124 +1269,12 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{150, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNTrace",
- CellLabel->"Out[9]=",
- CellID->2000562450]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SUNSimplify", "[",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUND", "[",
- RowBox[{"d", ",", "b", ",", "c"}], "]"}]}], "]"}]], "Input",
- CellTags->"SUNTrace",
- CellLabel->"In[10]:=",
- CellID->1959336477],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNTrace",
- CellLabel->"Out[10]=",
- CellID->164079513]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SUNSimplify", "[",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUND", "[",
- RowBox[{"a", ",", "b", ",", "d"}], "]"}]}], "]"}]], "Input",
- CellTags->"SUNTrace",
- CellLabel->"In[11]:=",
- CellID->849009416],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{174, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SUNTrace",
- CellLabel->"Out[11]=",
- CellID->657628575]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SUNSimplify", "[",
- RowBox[{
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUND", "[",
- RowBox[{"a", ",", "d", ",", "c"}], "]"}]}], "]"}]], "Input",
- CellTags->"SUNTrace",
- CellLabel->"In[12]:=",
- CellID->1231032711],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNTrace",
- CellLabel->"Out[12]=",
- CellID->839284650]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SUNSimplify", "[",
- RowBox[{
- RowBox[{"SUND", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], " ",
- RowBox[{"SUND", "[",
- RowBox[{"d", ",", "b", ",", "c"}], "]"}]}], "]"}]], "Input",
- CellTags->"SUNTrace",
- CellLabel->"In[13]:=",
- CellID->1107366946],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{"(",
- RowBox[{"4", "-",
- SubsuperscriptBox["C", "A", "2"]}], ")"}]}], " ",
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["d",
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- SubscriptBox["C", "A"], "-",
- RowBox[{"2", " ",
- SubscriptBox["C", "F"]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{182, 22},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SUNTrace",
- CellLabel->"Out[13]=",
- CellID->1291039632]
+ CellLabel->"Out[2]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -1292,21 +1298,37 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- StyleBox[ButtonBox["SUNSimplify",
+ StyleBox[ButtonBox["SUNTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTrace",
+ ButtonNote->"SUNTrace"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNT",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNT",
+ ButtonNote->"SUNT"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNTF",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SUNTF",
+ ButtonNote->"SUNTF"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SUNF",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SUNSimplify",
- ButtonNote->"SUNSimplify"],
+ ButtonData->"paclet:FeynCalc/ref/SUNF",
+ ButtonNote->"SUNF"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["Tr",
+ StyleBox[ButtonBox["SUND",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Tr",
- ButtonNote->"Tr"],
+ ButtonData->"paclet:FeynCalc/ref/SUND",
+ ButtonNote->"SUND"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SUNTrace",
- CellID->1951145061]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1323,20 +1345,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 48.244548}",
+ "built" -> "{2020, 1, 5, 19, 3, 1.706140}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "SUNTrace[expr] calculates the color-trace.",
- "synonyms" -> {}, "title" -> "SUNTrace", "titlemodifier" -> "",
- "windowtitle" -> "SUNTrace", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SUNTrace"}, "SearchTextTranslated" -> ""},
+ "None", "summary" -> "SUNTrace[exp] calculates the color-trace.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SUNTrace",
+ "titlemodifier" -> "", "windowtitle" -> "SUNTrace", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/SUNTrace"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1344,8 +1366,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1354,229 +1377,164 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3280, 94, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5794, 181, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1542252705]},
+ CellID->1412979261]},
"SUNTrace"->{
- Cell[3914, 123, 134, 4, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1664304457],
- Cell[4051, 129, 277, 10, 36, "Output",
- CellTags->"SUNTrace",
- CellID->590812898],
- Cell[4365, 144, 182, 6, 27, "Input",
+ Cell[6881, 232, 127, 4, 27, "Input",
CellTags->"SUNTrace",
CellID->401315043],
- Cell[4550, 152, 438, 18, 67, "Output",
- CellTags->"SUNTrace",
- CellID->742626825],
- Cell[5025, 175, 193, 6, 27, "Input",
+ Cell[7011, 238, 418, 17, 60, "Output",
+ CellTags->"SUNTrace"],
+ Cell[7596, 266, 193, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->2065971662],
- Cell[5221, 183, 762, 32, 40, "Output",
- CellTags->"SUNTrace",
- CellID->1501954636],
- Cell[6020, 220, 257, 8, 27, "Input",
+ Cell[7792, 274, 741, 31, 40, "Output",
+ CellTags->"SUNTrace"],
+ Cell[8570, 310, 257, 8, 27, "Input",
CellTags->"SUNTrace",
CellID->438695313],
- Cell[6280, 230, 920, 39, 67, "Output",
- CellTags->"SUNTrace",
- CellID->771631595],
- Cell[7237, 274, 202, 6, 27, "Input",
+ Cell[8830, 320, 900, 38, 60, "Output",
+ CellTags->"SUNTrace"],
+ Cell[9909, 370, 202, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->973332873],
- Cell[7442, 282, 880, 37, 40, "Output",
+ Cell[10114, 378, 880, 37, 40, "Output",
CellTags->"SUNTrace",
CellID->538427953],
- Cell[8359, 324, 295, 9, 27, "Input",
+ Cell[11031, 420, 267, 8, 27, "Input",
CellTags->"SUNTrace",
CellID->414539651],
- Cell[8657, 335, 5254, 218, 165, "Output",
- CellTags->"SUNTrace",
- CellID->873761273],
- Cell[13948, 558, 194, 6, 27, "Input",
+ Cell[11301, 430, 5254, 217, 144, "Output",
+ CellTags->"SUNTrace"],
+ Cell[16592, 652, 193, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->485058595],
- Cell[14145, 566, 881, 37, 40, "Output",
- CellTags->"SUNTrace",
- CellID->2048967442],
- Cell[15063, 608, 306, 9, 27, "Input",
+ Cell[16788, 660, 860, 36, 40, "Output",
+ CellTags->"SUNTrace"],
+ Cell[17827, 708, 278, 8, 27, "Input",
CellTags->"SUNTrace",
CellID->1348500704],
- Cell[15372, 619, 12570, 484, 360, "Output",
- CellTags->"SUNTrace",
- CellID->357301374],
- Cell[27979, 1108, 195, 6, 27, "Input",
+ Cell[18108, 718, 13414, 503, 379, "Output",
+ CellTags->"SUNTrace"],
+ Cell[31559, 1226, 194, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->1337618063],
- Cell[28177, 1116, 1000, 42, 40, "Output",
- CellTags->"SUNTrace",
- CellID->2000562450],
- Cell[29214, 1163, 289, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1959336477],
- Cell[29506, 1174, 210, 7, 36, "Output",
- CellTags->"SUNTrace",
- CellID->164079513],
- Cell[29753, 1186, 288, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->849009416],
- Cell[30044, 1197, 210, 7, 36, "Output",
- CellTags->"SUNTrace",
- CellID->657628575],
- Cell[30291, 1209, 289, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1231032711],
- Cell[30583, 1220, 210, 7, 36, "Output",
- CellTags->"SUNTrace",
- CellID->839284650],
- Cell[30830, 1232, 289, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1107366946],
- Cell[31122, 1243, 685, 27, 43, "Output",
- CellTags->"SUNTrace",
- CellID->1291039632],
- Cell[32175, 1293, 378, 15, 32, "Text",
- CellTags->"SUNTrace",
- CellID->1951145061]}
+ Cell[31756, 1234, 979, 41, 40, "Output",
+ CellTags->"SUNTrace"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 34366, 1355},
- {"SUNTrace", 34501, 1359}
+ {"PrimaryExamplesSection", 35746, 1378},
+ {"SUNTrace", 35882, 1382}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3316, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 373, 12, 82, "Usage",
+Cell[3899, 101, 285, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4209, 116, 372, 12, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3280, 94, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4606, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1392268612],
+Cell[5348, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5404, 162, 91, 2, 70, "Input"],
+Cell[5498, 166, 235, 8, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5794, 181, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1542252705],
+ CellID->1412979261],
Cell[CellGroupData[{
-Cell[3693, 113, 196, 6, 25, "ExampleSection",
- CellID->1571715533],
+Cell[6207, 200, 195, 6, 26, "ExampleSection",
+ CellID->785766225],
Cell[CellGroupData[{
-Cell[3914, 123, 134, 4, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1664304457],
-Cell[4051, 129, 277, 10, 36, "Output",
- CellTags->"SUNTrace",
- CellID->590812898]
+Cell[6427, 210, 103, 3, 27, "Input"],
+Cell[6533, 215, 311, 12, 38, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4365, 144, 182, 6, 27, "Input",
+Cell[6881, 232, 127, 4, 27, "Input",
CellTags->"SUNTrace",
CellID->401315043],
-Cell[4550, 152, 438, 18, 67, "Output",
- CellTags->"SUNTrace",
- CellID->742626825]
+Cell[7011, 238, 418, 17, 60, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5025, 175, 193, 6, 27, "Input",
+Cell[7466, 260, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[7596, 266, 193, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->2065971662],
-Cell[5221, 183, 762, 32, 40, "Output",
- CellTags->"SUNTrace",
- CellID->1501954636]
+Cell[7792, 274, 741, 31, 40, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6020, 220, 257, 8, 27, "Input",
+Cell[8570, 310, 257, 8, 27, "Input",
CellTags->"SUNTrace",
CellID->438695313],
-Cell[6280, 230, 920, 39, 67, "Output",
- CellTags->"SUNTrace",
- CellID->771631595]
+Cell[8830, 320, 900, 38, 60, "Output",
+ CellTags->"SUNTrace"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[7237, 274, 202, 6, 27, "Input",
+Cell[9779, 364, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[9909, 370, 202, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->973332873],
-Cell[7442, 282, 880, 37, 40, "Output",
+Cell[10114, 378, 880, 37, 40, "Output",
CellTags->"SUNTrace",
CellID->538427953]
}, Open ]],
Cell[CellGroupData[{
-Cell[8359, 324, 295, 9, 27, "Input",
+Cell[11031, 420, 267, 8, 27, "Input",
CellTags->"SUNTrace",
CellID->414539651],
-Cell[8657, 335, 5254, 218, 165, "Output",
- CellTags->"SUNTrace",
- CellID->873761273]
+Cell[11301, 430, 5254, 217, 144, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13948, 558, 194, 6, 27, "Input",
+Cell[16592, 652, 193, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->485058595],
-Cell[14145, 566, 881, 37, 40, "Output",
- CellTags->"SUNTrace",
- CellID->2048967442]
+Cell[16788, 660, 860, 36, 40, "Output",
+ CellTags->"SUNTrace"]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[15063, 608, 306, 9, 27, "Input",
+Cell[17697, 702, 105, 2, 9, "ExampleDelimiter"],
+Cell[CellGroupData[{
+Cell[17827, 708, 278, 8, 27, "Input",
CellTags->"SUNTrace",
CellID->1348500704],
-Cell[15372, 619, 12570, 484, 360, "Output",
- CellTags->"SUNTrace",
- CellID->357301374]
+Cell[18108, 718, 13414, 503, 379, "Output",
+ CellTags->"SUNTrace"]
}, Open ]],
Cell[CellGroupData[{
-Cell[27979, 1108, 195, 6, 27, "Input",
+Cell[31559, 1226, 194, 6, 27, "Input",
CellTags->"SUNTrace",
CellID->1337618063],
-Cell[28177, 1116, 1000, 42, 40, "Output",
- CellTags->"SUNTrace",
- CellID->2000562450]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[29214, 1163, 289, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1959336477],
-Cell[29506, 1174, 210, 7, 36, "Output",
- CellTags->"SUNTrace",
- CellID->164079513]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[29753, 1186, 288, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->849009416],
-Cell[30044, 1197, 210, 7, 36, "Output",
- CellTags->"SUNTrace",
- CellID->657628575]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[30291, 1209, 289, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1231032711],
-Cell[30583, 1220, 210, 7, 36, "Output",
- CellTags->"SUNTrace",
- CellID->839284650]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[30830, 1232, 289, 9, 27, "Input",
- CellTags->"SUNTrace",
- CellID->1107366946],
-Cell[31122, 1243, 685, 27, 43, "Output",
- CellTags->"SUNTrace",
- CellID->1291039632]
+Cell[31756, 1234, 979, 41, 40, "Output",
+ CellTags->"SUNTrace"]
+}, Open ]]
}, Open ]]
}, Open ]],
-Cell[31834, 1274, 31, 0, 29, "SectionFooterSpacer"]
+Cell[32774, 1280, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[31902, 1279, 270, 12, 31, "SeeAlsoSection",
+Cell[32842, 1285, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[32175, 1293, 378, 15, 32, "Text",
- CellTags->"SUNTrace",
- CellID->1951145061]
+Cell[33115, 1299, 778, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[32568, 1311, 23, 0, 42, "FooterCell"]
+Cell[33908, 1333, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarGluonVertex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarGluonVertex.nb
index 2ad111cb8..48a30e4f3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarGluonVertex.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarGluonVertex.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9799, 309]
-NotebookOptionsPosition[ 6218, 207]
-NotebookOutlinePosition[ 9039, 280]
-CellTagsIndexPosition[ 8920, 274]
+NotebookDataLength[ 11429, 374]
+NotebookOptionsPosition[ 8010, 275]
+NotebookOutlinePosition[ 10519, 341]
+CellTagsIndexPosition[ 10398, 335]
WindowTitle->ScalarGluonVertex
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ ScalarGluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$130635],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$225430],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/ScalarGluonVertex", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ ScalarGluonVertex.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ScalarGluonVertex", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ScalarGluonVertex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -84,20 +97,106 @@ Cell[BoxData[GridBox[{
RowBox[{"{", "p", "}"}], ",", " ",
RowBox[{"{", "q", "}"}], ",", " ",
RowBox[{"{",
- RowBox[{"mu", ",", "a"}], "}"}]}], "]"}]], "InlineFormula"],
- " \n\tor ScalarGluonVertex[ p, q, mu, a ] yields the \
-scalar-scalar-gluon vertex (p and q are incoming momenta). \
-ScalarGluonVertex[{mu,a}, {nu,b}] yields the scalar-scalar-gluon-gluon vertex \
-(p and q are incoming momenta).\n\tThe dimension and the name of the \
-coupling constant are determined by the options Dimension and \
-CouplingConstant."
+ RowBox[{"\[Mu]", ",", "a"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]or ",
+ Cell[BoxData[
+ RowBox[{"ScalarGluonVertex", "[",
+ RowBox[{"p", ",", " ", "q", ",", " ", "\[Mu]", ",", " ", "a"}],
+ "]"}]], "InlineFormula"],
+ " yields the scalar-scalar-gluon vertex, where ",
+ Cell[BoxData["p"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["q"], "InlineFormula"],
+ " are incoming momenta."
+ }]]},
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ScalarGluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Nu]", ",", "b"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the scalar-scalar-gluon-gluon vertex, where ",
+ Cell[BoxData["p"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["q"], "InlineFormula"],
+ " are incoming momenta. syntax."
}]]}
}]], "Usage",
GridBoxOptions->{
GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {None, {None}},
"RowsIndexed" -> {}}},
- CellID->982511436],
+ CellID->2010081510],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2080976489],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The dimension and the name of the coupling constant are determined by the \
+options ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ " and ",
+ ButtonBox["CouplingConstant",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ScalarGluonVertex", "]"}]], "Input",
+ CellLabel->"In[55]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Gauge", "\[Rule]", "1"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{334, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[55]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
Cell[CellGroupData[{
@@ -116,7 +215,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1584676055],
+ CellID->2037554269],
Cell[CellGroupData[{
@@ -126,31 +225,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1754245303],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "ScalarGluonVertex", "]"}]], "Input",
- CellTags->"ScalarGluonVertex",
- CellLabel->"In[1]:=",
- CellID->1577288725],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"CouplingConstant", "\[Rule]",
- SubscriptBox["g", "s"]}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"Gauge", "\[Rule]", "1"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{351, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ScalarGluonVertex",
- CellLabel->"Out[1]=",
- CellID->1150833543]
-}, Open ]],
+ CellID->1269130457],
Cell[CellGroupData[{
@@ -160,9 +235,9 @@ Cell[BoxData[
RowBox[{"{", "p", "}"}], ",", " ",
RowBox[{"{", "q", "}"}], ",", " ",
RowBox[{"{",
- RowBox[{"mu", ",", " ", "a"}], "}"}]}], "]"}]], "Input",
+ RowBox[{"\[Mu]", ",", " ", "a"}], "}"}]}], "]"}]], "Input",
CellTags->"ScalarGluonVertex",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->581447761],
Cell[BoxData[
@@ -174,31 +249,24 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], " ",
SubscriptBox["g", "s"], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{122, 17},
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{123, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarGluonVertex",
- CellLabel->"Out[2]=",
- CellID->260312021]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -217,25 +285,25 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 16.807308}",
+ "built" -> "{2020, 1, 5, 19, 1, 25.264443}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ScalarGluonVertex[{p}, {q}, {mu, a}] or ScalarGluonVertex[p, q, mu, a ] \
-yields the scalar-scalar-gluon vertex (p and q are incoming momenta). \
-ScalarGluonVertex[{mu,a}, {nu,b}] yields the scalar-scalar-gluon-gluon vertex \
-(p and q are incoming momenta). The dimension and the name of the coupling \
-constant are determined by the options Dimension and CouplingConstant.",
- "synonyms" -> {}, "title" -> "ScalarGluonVertex", "titlemodifier" -> "",
- "windowtitle" -> "ScalarGluonVertex", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ScalarGluonVertex"}, "SearchTextTranslated" -> ""},
+ "ScalarGluonVertex[{p}, {q}, {\\[Mu], a}] or ScalarGluonVertex[p, q, \
+\\[Mu], a] yields the scalar-scalar-gluon vertex, where p and q are incoming \
+momenta. ScalarGluonVertex[{\\[Mu], a}, {\\[Nu], b}] yields the \
+scalar-scalar-gluon-gluon vertex, where p and q are incoming momenta. \
+syntax.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "ScalarGluonVertex",
+ "titlemodifier" -> "", "windowtitle" -> "ScalarGluonVertex", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ScalarGluonVertex"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -244,7 +312,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -253,64 +321,61 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3804, 103, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6360, 202, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1584676055]},
+ CellID->2037554269]},
"ScalarGluonVertex"->{
- Cell[4438, 132, 152, 4, 27, "Input",
- CellTags->"ScalarGluonVertex",
- CellID->1577288725],
- Cell[4593, 138, 422, 13, 36, "Output",
- CellTags->"ScalarGluonVertex",
- CellID->1150833543],
- Cell[5052, 156, 291, 9, 27, "Input",
+ Cell[6994, 231, 294, 9, 27, "Input",
CellTags->"ScalarGluonVertex",
CellID->581447761],
- Cell[5346, 167, 806, 33, 38, "Output",
- CellTags->"ScalarGluonVertex",
- CellID->260312021]}
+ Cell[7291, 242, 653, 26, 37, "Output",
+ CellTags->"ScalarGluonVertex"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8361, 254},
- {"ScalarGluonVertex", 8506, 258}
+ {"PrimaryExamplesSection", 10057, 322},
+ {"ScalarGluonVertex", 10202, 326}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2282, 52, 51, "AnchorBarGrid",
+Cell[589, 21, 2310, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2874, 75, 60, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2937, 78, 842, 21, 163, "Usage",
- CellID->982511436],
+Cell[2902, 76, 294, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3804, 103, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1584676055],
+Cell[3221, 91, 1364, 39, 165, "Usage",
+ CellID->2010081510],
Cell[CellGroupData[{
-Cell[4217, 122, 196, 6, 25, "ExampleSection",
- CellID->1754245303],
+Cell[4610, 134, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2080976489],
+Cell[5352, 160, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5386, 162, 415, 14, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4438, 132, 152, 4, 27, "Input",
- CellTags->"ScalarGluonVertex",
- CellID->1577288725],
-Cell[4593, 138, 422, 13, 36, "Output",
- CellTags->"ScalarGluonVertex",
- CellID->1150833543]
+Cell[5826, 180, 100, 2, 70, "Input"],
+Cell[5929, 184, 370, 11, 37, "Output"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5052, 156, 291, 9, 27, "Input",
+Cell[6360, 202, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2037554269],
+Cell[CellGroupData[{
+Cell[6773, 221, 196, 6, 26, "ExampleSection",
+ CellID->1269130457],
+Cell[CellGroupData[{
+Cell[6994, 231, 294, 9, 27, "Input",
CellTags->"ScalarGluonVertex",
CellID->581447761],
-Cell[5346, 167, 806, 33, 38, "Output",
- CellTags->"ScalarGluonVertex",
- CellID->260312021]
+Cell[7291, 242, 653, 26, 37, "Output",
+ CellTags->"ScalarGluonVertex"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[6191, 205, 23, 0, 42, "FooterCell"]
+Cell[7983, 273, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProduct.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProduct.nb
index b0587b01d..aa9b56f90 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProduct.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProduct.nb
@@ -3,69 +3,100 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21462, 787]
-NotebookOptionsPosition[ 14505, 568]
-NotebookOutlinePosition[ 18927, 691]
-CellTagsIndexPosition[ 18810, 685]
+NotebookDataLength[ 23956, 855]
+NotebookOptionsPosition[ 17058, 645]
+NotebookOutlinePosition[ 21321, 759]
+CellTagsIndexPosition[ 21204, 753]
WindowTitle->ScalarProduct
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ScalarProduct\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ScalarProduct"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"FCClearScalarProducts\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCClearScalarProducts"], "\<\"ExpandScalarProduct\
+\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"ScalarProductCancel\"\
+\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ScalarProductCancel"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Pair"], "\<\"SP\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SP"], "\<\"SPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ScalarProduct\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ScalarProduct"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ScalarProduct.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$131677],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ScalarProduct", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$226318],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ScalarProduct", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,34 +104,37 @@ ScalarProduct.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ScalarProduct", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ScalarProduct", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"ScalarProduct", "[",
RowBox[{"p", ",", " ", "q"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the input for scalar product. ScalarProduct[p] is equivalent to \
-ScalarProduct[p, p]. Expansion of sums of momenta in ScalarProduct is done \
-with ExpandScalarProduct. Scalar product may be set, e.g., ScalarProduct[a, \
-b] = ",
- Cell[BoxData[
- FormBox[
- RowBox[{"m", "^", "2"}], TraditionalForm]]],
- "; but a and b must not contain sums. Note that ScalarProduct[a, b] = ",
- Cell[BoxData[
- FormBox[
- RowBox[{"m", "^", "2"}], TraditionalForm]]],
- " actually sets also: Pair[Momentum[a, ___], Momentum[b, ___]] = ",
- Cell[BoxData[
- FormBox[
- RowBox[{"m", "^", "2"}], TraditionalForm]]],
- ". It is encouraged to always set ScalarProduct's ",
+ " \[LineSeparator] is the input for the scalar product of two Lorentz \
+vectors p and q. ScalarProduct[p] is equivalent to ScalarProduct[p, p]. \
+Expansion of sums of momenta in ScalarProduct is done with \
+ExpandScalarProduct. Scalar products may be set, e.g. via ScalarProduct[a, b] \
+= m^2; but a and b may not contain sums. Note that ScalarProduct[a, b] = m^2 \
+actually sets Lorentzian scalar products in different dimensions specified by \
+the value of the SetDimensions option. It is highly recommended to set \
+ScalarProduct's ",
StyleBox["before",
FontWeight->"Bold"],
- " any calculation. This improves the performance of FeynCalc ."
+ " any calculation. This improves the performance of FeynCalc.."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -111,6 +145,59 @@ b] = ",
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1621412968],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ScalarProduct", "]"}]], "Input",
+ CellLabel->"In[312]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"4", ",", "D"}], "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{414, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[312]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -126,7 +213,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1941076749],
+ CellID->237599024],
Cell[CellGroupData[{
@@ -136,7 +223,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1613247979],
+ CellID->50304825],
Cell[CellGroupData[{
@@ -162,12 +249,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{43, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[1]=",
- CellID->785575855]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -196,22 +282,23 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{101, 18},
+ ImageSize->{114, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[2]=",
- CellID->1751795401]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -231,12 +318,11 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{23, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[3]=",
- CellID->170285827]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -255,12 +341,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm], "2"], TraditionalForm]], "Output",
- ImageSize->{22, 20},
+ ImageSize->{26, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[4]=",
- CellID->794666024]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -282,8 +367,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[5]//StandardForm=",
- CellID->2085175923]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -309,8 +393,7 @@ Cell[BoxData[
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1965353289]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -329,12 +412,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["s", "2"], TraditionalForm]], "Output",
- ImageSize->{17, 39},
+ ImageSize->{17, 31},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[7]=",
- CellID->622238783]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -405,12 +487,11 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], "+",
FractionBox["s", "2"]}], TraditionalForm]], "Output",
- ImageSize->{180, 39},
+ ImageSize->{208, 31},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[8]=",
- CellID->1856511612]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -481,12 +562,11 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], "+",
FractionBox["s", "2"]}], TraditionalForm]], "Output",
- ImageSize->{180, 39},
+ ImageSize->{208, 31},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProduct",
- CellLabel->"Out[9]=",
- CellID->1175433176]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[BoxData[
@@ -516,7 +596,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Calc",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Calc",
@@ -559,9 +638,7 @@ Cell[TextData[{
ButtonNote->"SPD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ScalarProduct",
- CellID->912859437]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -569,7 +646,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"ScalarProduct",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -578,27 +655,29 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 22.280347}",
+ "built" -> "{2020, 1, 5, 19, 1, 27.743003}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ScalarProduct[p, q] is the input for scalar product. ScalarProduct[p] is \
-equivalent to ScalarProduct[p, p]. Expansion of sums of momenta in \
-ScalarProduct is done with ExpandScalarProduct. Scalar product may be set, \
-e.g., ScalarProduct[a, b] = m^2; but a and b must not contain sums. Note that \
-ScalarProduct[a, b] = m^2 actually sets also: Pair[Momentum[a, ___], \
-Momentum[b, ___]] = m^2. It is encouraged to always set ScalarProduct's \
-before any calculation. This improves the performance of FeynCalc .",
- "synonyms" -> {}, "title" -> "ScalarProduct", "titlemodifier" -> "",
- "windowtitle" -> "ScalarProduct", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ScalarProduct"}, "SearchTextTranslated" -> ""},
+ "ScalarProduct[p, q] is the input for the scalar product of two Lorentz \
+vectors p and q. ScalarProduct[p] is equivalent to ScalarProduct[p, p]. \
+Expansion of sums of momenta in ScalarProduct is done with \
+ExpandScalarProduct. Scalar products may be set, e.g. via ScalarProduct[a, b] \
+= m^2; but a and b may not contain sums. Note that ScalarProduct[a, b] = m^2 \
+actually sets Lorentzian scalar products in different dimensions specified by \
+the value of the SetDimensions option. It is highly recommended to set \
+ScalarProduct's before any calculation. This improves the performance of \
+FeynCalc..", "synonyms" -> {}, "tabletags" -> {}, "title" -> "ScalarProduct",
+ "titlemodifier" -> "", "windowtitle" -> "ScalarProduct", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ScalarProduct"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -606,8 +685,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -616,179 +696,167 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4136, 113, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6890, 200, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1941076749]},
+ CellID->237599024]},
"ScalarProduct"->{
- Cell[4770, 142, 160, 5, 27, "Input",
+ Cell[7521, 229, 160, 5, 27, "Input",
CellTags->"ScalarProduct",
CellID->888961720],
- Cell[4933, 149, 484, 20, 38, "Output",
- CellTags->"ScalarProduct",
- CellID->785575855],
- Cell[5454, 174, 204, 7, 27, "Input",
+ Cell[7684, 236, 464, 19, 37, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[8185, 260, 204, 7, 27, "Input",
CellTags->"ScalarProduct",
CellID->2091143136],
- Cell[5661, 183, 758, 30, 39, "Output",
- CellTags->"ScalarProduct",
- CellID->1751795401],
- Cell[6456, 218, 160, 5, 27, "Input",
+ Cell[8392, 269, 784, 31, 37, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[9213, 305, 160, 5, 27, "Input",
CellTags->"ScalarProduct",
CellID->780031215],
- Cell[6619, 225, 335, 13, 41, "Output",
- CellTags->"ScalarProduct",
- CellID->170285827],
- Cell[6991, 243, 136, 4, 27, "Input",
+ Cell[9376, 312, 315, 12, 39, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[9728, 329, 136, 4, 27, "Input",
CellTags->"ScalarProduct",
CellID->10314838],
- Cell[7130, 249, 335, 13, 41, "Output",
- CellTags->"ScalarProduct",
- CellID->794666024],
- Cell[7502, 267, 196, 6, 27, "Input",
+ Cell[9867, 335, 315, 12, 39, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[10219, 352, 196, 6, 27, "Input",
CellTags->"ScalarProduct",
CellID->158991943],
- Cell[7701, 275, 327, 10, 49, "Output",
- CellTags->"ScalarProduct",
- CellID->2085175923],
- Cell[8065, 290, 249, 8, 27, "Input",
+ Cell[10418, 360, 306, 9, 51, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[10761, 374, 249, 8, 27, "Input",
CellTags->"ScalarProduct",
CellID->1173751525],
- Cell[8317, 300, 377, 12, 49, "Output",
- CellTags->"ScalarProduct",
- CellID->1965353289],
- Cell[8731, 317, 266, 9, 27, "Input",
+ Cell[11013, 384, 356, 11, 51, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[11406, 400, 266, 9, 27, "Input",
CellTags->"ScalarProduct",
CellID->1579106051],
- Cell[9000, 328, 235, 8, 60, "Output",
- CellTags->"ScalarProduct",
- CellID->622238783],
- Cell[9272, 341, 312, 10, 27, "Input",
+ Cell[11675, 411, 215, 7, 52, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[11927, 423, 312, 10, 27, "Input",
CellTags->"ScalarProduct",
CellID->373851414],
- Cell[9587, 353, 1389, 59, 60, "Output",
- CellTags->"ScalarProduct",
- CellID->1856511612],
- Cell[11013, 417, 296, 10, 27, "Input",
+ Cell[12242, 435, 1368, 58, 52, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[13647, 498, 296, 10, 27, "Input",
CellTags->"ScalarProduct",
CellID->54231534],
- Cell[11312, 429, 1389, 59, 60, "Output",
+ Cell[13946, 510, 1368, 58, 52, "Output",
+ CellTags->"ScalarProduct"],
+ Cell[15329, 571, 142, 4, 27, "Input",
CellTags->"ScalarProduct",
- CellID->1175433176],
- Cell[12716, 491, 142, 4, 27, "Input",
- CellTags->"ScalarProduct",
- CellID->1715327028],
- Cell[13214, 517, 1249, 46, 51, "Text",
- CellTags->"ScalarProduct",
- CellID->912859437]}
+ CellID->1715327028]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 16772, 617},
- {"ScalarProduct", 16913, 621}
+ {"PrimaryExamplesSection", 19457, 697},
+ {"ScalarProduct", 19597, 701}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3583, 83, 53, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 1198, 31, 146, "Usage",
+Cell[4171, 106, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4486, 121, 1010, 22, 171, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4136, 113, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5521, 147, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1621412968],
+Cell[6263, 173, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[6319, 177, 97, 2, 70, "Input"],
+Cell[6419, 181, 410, 12, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6890, 200, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1941076749],
+ CellID->237599024],
Cell[CellGroupData[{
-Cell[4549, 132, 196, 6, 25, "ExampleSection",
- CellID->1613247979],
+Cell[7302, 219, 194, 6, 26, "ExampleSection",
+ CellID->50304825],
Cell[CellGroupData[{
-Cell[4770, 142, 160, 5, 27, "Input",
+Cell[7521, 229, 160, 5, 27, "Input",
CellTags->"ScalarProduct",
CellID->888961720],
-Cell[4933, 149, 484, 20, 38, "Output",
- CellTags->"ScalarProduct",
- CellID->785575855]
+Cell[7684, 236, 464, 19, 37, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5454, 174, 204, 7, 27, "Input",
+Cell[8185, 260, 204, 7, 27, "Input",
CellTags->"ScalarProduct",
CellID->2091143136],
-Cell[5661, 183, 758, 30, 39, "Output",
- CellTags->"ScalarProduct",
- CellID->1751795401]
+Cell[8392, 269, 784, 31, 37, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6456, 218, 160, 5, 27, "Input",
+Cell[9213, 305, 160, 5, 27, "Input",
CellTags->"ScalarProduct",
CellID->780031215],
-Cell[6619, 225, 335, 13, 41, "Output",
- CellTags->"ScalarProduct",
- CellID->170285827]
+Cell[9376, 312, 315, 12, 39, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6991, 243, 136, 4, 27, "Input",
+Cell[9728, 329, 136, 4, 27, "Input",
CellTags->"ScalarProduct",
CellID->10314838],
-Cell[7130, 249, 335, 13, 41, "Output",
- CellTags->"ScalarProduct",
- CellID->794666024]
+Cell[9867, 335, 315, 12, 39, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7502, 267, 196, 6, 27, "Input",
+Cell[10219, 352, 196, 6, 27, "Input",
CellTags->"ScalarProduct",
CellID->158991943],
-Cell[7701, 275, 327, 10, 49, "Output",
- CellTags->"ScalarProduct",
- CellID->2085175923]
+Cell[10418, 360, 306, 9, 51, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8065, 290, 249, 8, 27, "Input",
+Cell[10761, 374, 249, 8, 27, "Input",
CellTags->"ScalarProduct",
CellID->1173751525],
-Cell[8317, 300, 377, 12, 49, "Output",
- CellTags->"ScalarProduct",
- CellID->1965353289]
+Cell[11013, 384, 356, 11, 51, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8731, 317, 266, 9, 27, "Input",
+Cell[11406, 400, 266, 9, 27, "Input",
CellTags->"ScalarProduct",
CellID->1579106051],
-Cell[9000, 328, 235, 8, 60, "Output",
- CellTags->"ScalarProduct",
- CellID->622238783]
+Cell[11675, 411, 215, 7, 52, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9272, 341, 312, 10, 27, "Input",
+Cell[11927, 423, 312, 10, 27, "Input",
CellTags->"ScalarProduct",
CellID->373851414],
-Cell[9587, 353, 1389, 59, 60, "Output",
- CellTags->"ScalarProduct",
- CellID->1856511612]
+Cell[12242, 435, 1368, 58, 52, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11013, 417, 296, 10, 27, "Input",
+Cell[13647, 498, 296, 10, 27, "Input",
CellTags->"ScalarProduct",
CellID->54231534],
-Cell[11312, 429, 1389, 59, 60, "Output",
- CellTags->"ScalarProduct",
- CellID->1175433176]
+Cell[13946, 510, 1368, 58, 52, "Output",
+ CellTags->"ScalarProduct"]
}, Open ]],
-Cell[12716, 491, 142, 4, 27, "Input",
+Cell[15329, 571, 142, 4, 27, "Input",
CellTags->"ScalarProduct",
CellID->1715327028]
}, Open ]],
-Cell[12873, 498, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15486, 578, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12941, 503, 270, 12, 31, "SeeAlsoSection",
+Cell[15554, 583, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13214, 517, 1249, 46, 51, "Text",
- CellTags->"ScalarProduct",
- CellID->912859437]
+Cell[15827, 597, 1189, 43, 56, "SeeAlso"]
}, Open ]],
-Cell[14478, 566, 23, 0, 42, "FooterCell"]
+Cell[17031, 643, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductCancel.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductCancel.nb
index 4a4aec1bf..e93daebe0 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductCancel.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductCancel.nb
@@ -3,69 +3,99 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 25675, 935]
-NotebookOptionsPosition[ 19269, 737]
-NotebookOutlinePosition[ 23269, 849]
-CellTagsIndexPosition[ 23146, 843]
+NotebookDataLength[ 35987, 1193]
+NotebookOptionsPosition[ 30994, 1043]
+NotebookOutlinePosition[ 34156, 1129]
+CellTagsIndexPosition[ 34031, 1123]
WindowTitle->ScalarProductCancel
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ScalarProductCancel\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ScalarProductCancel"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"ApartFF\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ApartFF"], "\<\"FCClearScalarProducts\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCClearScalarProducts"], "\<\"ExpandScalarProduct\
+\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ExpandScalarProduct"], "\<\"Pair\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Pair"], "\<\"SP\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SP"], "\<\"SPC\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPC"], "\<\"SPD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SPD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ScalarProductCancel\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ScalarProductCancel"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ScalarProductCancel.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$130976],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ScalarProductCancel", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$225869],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ScalarProductCancel", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +103,20 @@ ScalarProductCancel.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ScalarProductCancel", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ScalarProductCancel", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -95,44 +137,39 @@ cancels simple cases."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1694334647],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1453232900],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1287092561],
+Cell["", "SectionHeaderSpacer"],
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["FeynAmpDenominatorSimplify",
- BaseStyle->"AddOnsLink",
- ButtonData:>"FeynAmpDenominatorSimplify",
- ButtonNote->"FeynAmpDenominatorSimplify"],
- "."
-}], "Text",
- CellTags->"ScalarProductCancel",
- CellID->1850483039],
+Cell["\<\
+ScalarProductCancel is deprecated, please use the more powerful ApartFF \
+instead!\
+\>", "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
@@ -152,228 +189,214 @@ Cell[BoxData[
RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{520, 35},
+ ImageSize->{475, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProductCancel",
CellLabel->"Out[1]=",
CellID->55006305]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1161232346],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->876504323],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
- RowBox[{
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}], " ",
+ RowBox[{"FAD", "[",
RowBox[{
- RowBox[{"SPD", "[",
- RowBox[{"q", ",", "p"}], "]"}], " ",
- RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
RowBox[{
- RowBox[{"{",
- RowBox[{"q", ",", "m"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"q", "-", "p"}], ",", "0"}], "}"}]}], "]"}]}], "//",
- "FCI"}]}]], "Input",
+ RowBox[{"q", "-", "p"}], ",", "0"}], "}"}]}], "]"}]}]], "Input",
CellTags->"ScalarProductCancel",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->2001963960],
Cell[BoxData[
FormBox[
FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
RowBox[{
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{134, 45},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ScalarProductCancel",
- CellLabel->"Out[2]=",
- CellID->1206303830]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ScalarProductCancel", "[",
- RowBox[{"t1", ",", "q"}], "]"}]], "Input",
- CellTags->"ScalarProductCancel",
- CellLabel->"In[3]:=",
- CellID->704586696],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"2", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox["1",
- RowBox[{"2", " ",
- RowBox[{"(",
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{242, 51},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{144, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProductCancel",
- CellLabel->"Out[3]=",
- CellID->2107806960]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"FeynAmpDenominatorSimplify", "[",
+ RowBox[{"ScalarProductCancel", "[",
RowBox[{"%", ",", "q"}], "]"}]], "Input",
CellTags->"ScalarProductCancel",
- CellLabel->"In[4]:=",
- CellID->559110996],
+ CellLabel->"In[2]:=",
+ CellID->704586696],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"2", " ",
+ FormBox[
+ FractionBox[
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox["1",
- RowBox[{"2", " ",
- RowBox[{"(",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{242, 51},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ScalarProductCancel",
- CellLabel->"Out[4]=",
- CellID->988137131]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SPC", "[",
- RowBox[{"t1", ",", "q", ",",
- RowBox[{"FDS", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"ScalarProductCancel",
- CellLabel->"In[5]:=",
- CellID->2094061205],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"2", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox["1",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]]}], TraditionalForm]], "Output",
- ImageSize->{242, 51},
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{253, 46},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProductCancel",
- CellLabel->"Out[5]=",
- CellID->889330047]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{
RowBox[{
RowBox[{"SPD", "[",
@@ -390,7 +413,7 @@ Cell[BoxData[
RowBox[{"q2", "-", "p"}], ",",
RowBox[{"q2", "-", "q1"}]}], "]"}]}], "//", "FCI"}]}]], "Input",
CellTags->"ScalarProductCancel",
- CellLabel->"In[6]:=",
+ CellLabel->"In[3]:=",
CellID->360584001],
Cell[BoxData[
@@ -423,235 +446,532 @@ Cell[BoxData[
TraditionalForm]}], ")"}]}],
RowBox[{
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["q1",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{356, 48},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{376, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProductCancel",
- CellLabel->"Out[6]=",
- CellID->1994571177]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SPC", "[",
- RowBox[{"t2", ",", "q1", ",", "q2", ",",
+ RowBox[{"%", ",", "q1", ",", "q2", ",",
RowBox[{"FDS", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"ScalarProductCancel",
- CellLabel->"In[7]:=",
+ CellLabel->"In[4]:=",
CellID->1734687931],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"2", " ",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- RowBox[{"(",
- RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox["1",
- RowBox[{"2", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- RowBox[{"-",
- SuperscriptBox["m", "2"]}], "-",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"2", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox["1",
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["q1",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
-
- ImageSize->{566, 176},
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{503, 206},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ScalarProductCancel",
- CellLabel->"Out[7]=",
- CellID->690872055]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2"}], "]"}], ";"}]], "Input",
- CellTags->"ScalarProductCancel",
- CellLabel->"In[8]:=",
- CellID->1734716984]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -674,11 +994,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["Calc",
+ StyleBox[ButtonBox["ApartFF",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Calc",
- ButtonNote->"Calc"],
+ ButtonData->"paclet:FeynCalc/ref/ApartFF",
+ ButtonNote->"ApartFF"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["FCClearScalarProducts",
@@ -717,20 +1036,7 @@ Cell[TextData[{
ButtonNote->"SPD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ScalarProductCancel",
- CellID->48437716],
-
-Cell[TextData[{
- StyleBox[ButtonBox["FeynAmpDenominatorSimplify",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominatorSimplify",
- ButtonNote->"FeynAmpDenominatorSimplify"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ScalarProductCancel",
- CellID->1547440041]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -738,7 +1044,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"ScalarProductCancel",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -747,10 +1053,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 18.560644}",
+ "built" -> "{2020, 1, 5, 19, 1, 26.514755}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -758,11 +1064,12 @@ TaggingRules->{
"None", "summary" ->
"ScalarProductCancel[exp, q1, q2, ...] cancels scalar products with \
propagators. ScalarProductCancel[exp] cancels simple cases.",
- "synonyms" -> {}, "title" -> "ScalarProductCancel", "titlemodifier" -> "",
- "windowtitle" -> "ScalarProductCancel", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ScalarProductCancel"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ScalarProductCancel",
+ "titlemodifier" -> "", "windowtitle" -> "ScalarProductCancel", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ScalarProductCancel"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -770,8 +1077,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -779,164 +1087,114 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3495, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1694334647]},
"ScalarProductCancel"->{
- Cell[4107, 124, 265, 10, 32, "Text",
- CellTags->"ScalarProductCancel",
- CellID->1850483039],
- Cell[4397, 138, 155, 4, 27, "Input",
+ Cell[5969, 175, 155, 4, 70, "Input",
CellTags->"ScalarProductCancel",
CellID->183152643],
- Cell[4555, 144, 555, 15, 56, "Output",
+ Cell[6127, 181, 555, 15, 56, "Output",
CellTags->"ScalarProductCancel",
CellID->55006305],
- Cell[5147, 164, 447, 16, 27, "Input",
+ Cell[7376, 232, 364, 13, 27, "Input",
CellTags->"ScalarProductCancel",
CellID->2001963960],
- Cell[5597, 182, 806, 33, 66, "Output",
- CellTags->"ScalarProductCancel",
- CellID->1206303830],
- Cell[6440, 220, 173, 5, 27, "Input",
+ Cell[7743, 247, 1565, 57, 60, "Output",
+ CellTags->"ScalarProductCancel"],
+ Cell[9345, 309, 172, 5, 27, "Input",
CellTags->"ScalarProductCancel",
CellID->704586696],
- Cell[6616, 227, 1027, 39, 72, "Output",
- CellTags->"ScalarProductCancel",
- CellID->2107806960],
- Cell[7680, 271, 179, 5, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->559110996],
- Cell[7862, 278, 1026, 39, 72, "Output",
- CellTags->"ScalarProductCancel",
- CellID->988137131],
- Cell[8925, 322, 203, 6, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->2094061205],
- Cell[9131, 330, 1026, 39, 72, "Output",
- CellTags->"ScalarProductCancel",
- CellID->889330047],
- Cell[10194, 374, 595, 19, 45, "Input",
+ Cell[9520, 316, 2324, 76, 67, "Output",
+ CellTags->"ScalarProductCancel"],
+ Cell[11881, 397, 579, 19, 27, "Input",
CellTags->"ScalarProductCancel",
CellID->360584001],
- Cell[10792, 395, 1664, 67, 69, "Output",
- CellTags->"ScalarProductCancel",
- CellID->1994571177],
- Cell[12493, 467, 215, 6, 27, "Input",
+ Cell[12463, 418, 3702, 129, 64, "Output",
+ CellTags->"ScalarProductCancel"],
+ Cell[16202, 552, 214, 6, 27, "Input",
CellTags->"ScalarProductCancel",
CellID->1734687931],
- Cell[12711, 475, 4463, 169, 197, "Output",
- CellTags->"ScalarProductCancel",
- CellID->690872055],
- Cell[17189, 647, 180, 6, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->1734716984],
- Cell[17725, 675, 1206, 46, 32, "Text",
- CellTags->"ScalarProductCancel",
- CellID->48437716],
- Cell[18934, 723, 293, 9, 32, "Text",
- CellTags->"ScalarProductCancel",
- CellID->1547440041]}
+ Cell[16419, 560, 13015, 412, 227, "Output",
+ CellTags->"ScalarProductCancel"]},
+ "PrimaryExamplesSection"->{
+ Cell[6743, 203, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1161232346]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 21175, 781},
- {"ScalarProductCancel", 21321, 785}
+ {"ScalarProductCancel", 32940, 1089},
+ {"PrimaryExamplesSection", 33887, 1116}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 51, "AnchorBarGrid",
+Cell[591, 21, 3579, 82, 53, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 521, 15, 83, "Usage",
- CellID->982511436],
+Cell[4173, 105, 296, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3495, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1694334647],
+Cell[4494, 120, 521, 15, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3908, 116, 196, 6, 25, "ExampleSection",
- CellID->1287092561],
-Cell[4107, 124, 265, 10, 32, "Text",
- CellTags->"ScalarProductCancel",
- CellID->1850483039],
+Cell[5040, 139, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1453232900],
+Cell[5782, 165, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5816, 167, 128, 4, 70, "Notes",
+ CellID->1067943069],
Cell[CellGroupData[{
-Cell[4397, 138, 155, 4, 27, "Input",
+Cell[5969, 175, 155, 4, 70, "Input",
CellTags->"ScalarProductCancel",
CellID->183152643],
-Cell[4555, 144, 555, 15, 56, "Output",
+Cell[6127, 181, 555, 15, 56, "Output",
CellTags->"ScalarProductCancel",
CellID->55006305]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5147, 164, 447, 16, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->2001963960],
-Cell[5597, 182, 806, 33, 66, "Output",
- CellTags->"ScalarProductCancel",
- CellID->1206303830]
-}, Open ]],
+Cell[6743, 203, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1161232346],
Cell[CellGroupData[{
-Cell[6440, 220, 173, 5, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->704586696],
-Cell[6616, 227, 1027, 39, 72, "Output",
- CellTags->"ScalarProductCancel",
- CellID->2107806960]
-}, Open ]],
+Cell[7156, 222, 195, 6, 26, "ExampleSection",
+ CellID->876504323],
Cell[CellGroupData[{
-Cell[7680, 271, 179, 5, 27, "Input",
+Cell[7376, 232, 364, 13, 27, "Input",
CellTags->"ScalarProductCancel",
- CellID->559110996],
-Cell[7862, 278, 1026, 39, 72, "Output",
- CellTags->"ScalarProductCancel",
- CellID->988137131]
+ CellID->2001963960],
+Cell[7743, 247, 1565, 57, 60, "Output",
+ CellTags->"ScalarProductCancel"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8925, 322, 203, 6, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->2094061205],
-Cell[9131, 330, 1026, 39, 72, "Output",
+Cell[9345, 309, 172, 5, 27, "Input",
CellTags->"ScalarProductCancel",
- CellID->889330047]
+ CellID->704586696],
+Cell[9520, 316, 2324, 76, 67, "Output",
+ CellTags->"ScalarProductCancel"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10194, 374, 595, 19, 45, "Input",
+Cell[11881, 397, 579, 19, 27, "Input",
CellTags->"ScalarProductCancel",
CellID->360584001],
-Cell[10792, 395, 1664, 67, 69, "Output",
- CellTags->"ScalarProductCancel",
- CellID->1994571177]
+Cell[12463, 418, 3702, 129, 64, "Output",
+ CellTags->"ScalarProductCancel"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12493, 467, 215, 6, 27, "Input",
+Cell[16202, 552, 214, 6, 27, "Input",
CellTags->"ScalarProductCancel",
CellID->1734687931],
-Cell[12711, 475, 4463, 169, 197, "Output",
- CellTags->"ScalarProductCancel",
- CellID->690872055]
-}, Open ]],
-Cell[17189, 647, 180, 6, 27, "Input",
- CellTags->"ScalarProductCancel",
- CellID->1734716984]
+Cell[16419, 560, 13015, 412, 227, "Output",
+ CellTags->"ScalarProductCancel"]
+}, Open ]]
}, Open ]],
-Cell[17384, 656, 31, 0, 29, "SectionFooterSpacer"]
+Cell[29461, 976, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17452, 661, 270, 12, 31, "SeeAlsoSection",
+Cell[29529, 981, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[17725, 675, 1206, 46, 32, "Text",
- CellTags->"ScalarProductCancel",
- CellID->48437716],
-Cell[18934, 723, 293, 9, 32, "Text",
- CellTags->"ScalarProductCancel",
- CellID->1547440041]
+Cell[29802, 995, 1150, 43, 70, "SeeAlso"]
}, Open ]],
-Cell[19242, 735, 23, 0, 42, "FooterCell"]
+Cell[30967, 1041, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductExpand.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductExpand.nb
deleted file mode 100644
index 59ff0f7a6..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScalarProductExpand.nb
+++ /dev/null
@@ -1,958 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 27349, 948]
-NotebookOptionsPosition[ 16859, 671]
-NotebookOutlinePosition[ 24182, 852]
-CellTagsIndexPosition[ 24021, 845]
-WindowTitle->ExpandScalarProduct
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ExpandScalarProduct\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ExpandScalarProduct"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-ExpandScalarProduct.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$131328],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ExpandScalarProduct", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["ExpandScalarProduct", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"ExpandScalarProduct", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands scalar products of sums of momenta in expr. ExpandScalarProduct \
-does not use Expand on expr.\nScalarProductExpand=ExpandScalarProduct."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1519351336],
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->333855967],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->899095157],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "ExpandScalarProduct", "]"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[1]:=",
- CellID->273889605],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
- RowBox[{"Momentum", "\[Rule]",
- RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{292, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[1]=",
- CellID->920923904]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{" ",
- RowBox[{"SP", "[",
- RowBox[{
- RowBox[{"p1", "+", "p2", "+", "p3"}], ",",
- RowBox[{"p4", "+", "p5", "+", "p6"}]}], "]"}]}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[2]:=",
- CellID->1037404763],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p5",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["p6",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{208, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[2]=",
- CellID->1945599465]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "ScalarProductExpand"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[3]:=",
- CellID->1803662543],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p5",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p6",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p5",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p6",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p5",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p6",
- TraditionalForm], "_"],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{508, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[3]=",
- CellID->1475081945]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SP", "[",
- RowBox[{"p", ",",
- RowBox[{"p", "-", "q"}]}], "]"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[4]:=",
- CellID->939566711],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{79, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[4]=",
- CellID->690684142]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ExpandScalarProduct", "[", "%", "]"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[5]:=",
- CellID->914251656],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], "-",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{69, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[5]=",
- CellID->948650275]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"FV", "[",
- RowBox[{
- RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[6]:=",
- CellID->1985163604],
-
-Cell[BoxData[
- FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], TraditionalForm]], "Output",
- ImageSize->{62, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[6]=",
- CellID->676672902]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ExpandScalarProduct", "[", "%", "]"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[7]:=",
- CellID->1492684079],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{58, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[7]=",
- CellID->206730951]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{
- RowBox[{"p", "-", "q"}], ",",
- RowBox[{"q", "-", "r"}]}], "]"}], "//", "FCI"}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[8]:=",
- CellID->174400737],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{120, 17},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[8]=",
- CellID->751387420]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "/.",
- RowBox[{"Pair", "\[Rule]", "ExpandScalarProduct"}]}]], "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"In[9]:=",
- CellID->311719391],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm]}], "-",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm], "2"]}], TraditionalForm]], "Output",
- ImageSize->{157, 20},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellLabel->"Out[9]=",
- CellID->180578566]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["Calc",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Calc",
- ButtonNote->"Calc"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["MomentumExpand",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumExpand",
- ButtonNote->"MomentumExpand"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["MomentumCombine",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumCombine",
- ButtonNote->"MomentumCombine"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1508774807]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"ExpandScalarProduct",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 20.265970}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "ExpandScalarProduct[expr] expands scalar products of sums of momenta in \
-expr. ExpandScalarProduct does not use Expand on expr. \
-ScalarProductExpand=ExpandScalarProduct.", "synonyms" -> {}, "title" ->
- "ExpandScalarProduct", "titlemodifier" -> "", "windowtitle" ->
- "ExpandScalarProduct", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ExpandScalarProduct"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3475, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1519351336]},
- "ExpandScalarProduct"->{
- Cell[4086, 122, 112, 2, 35, "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->899095157],
- Cell[4223, 128, 180, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->273889605],
- Cell[4406, 134, 401, 12, 36, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->920923904],
- Cell[4844, 151, 276, 8, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1037404763],
- Cell[5123, 161, 1051, 42, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1945599465],
- Cell[6211, 208, 171, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1803662543],
- Cell[6385, 214, 2905, 125, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1475081945],
- Cell[9327, 344, 204, 6, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->939566711],
- Cell[9534, 352, 703, 28, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->690684142],
- Cell[10274, 385, 174, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->914251656],
- Cell[10451, 391, 678, 27, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->948650275],
- Cell[11166, 423, 209, 6, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1985163604],
- Cell[11378, 431, 701, 28, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->676672902],
- Cell[12116, 464, 175, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1492684079],
- Cell[12294, 470, 850, 36, 40, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->206730951],
- Cell[13181, 511, 257, 8, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->174400737],
- Cell[13441, 521, 892, 36, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->751387420],
- Cell[14370, 562, 202, 5, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->311719391],
- Cell[14575, 569, 1265, 53, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->180578566],
- Cell[16208, 645, 609, 21, 32, "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1508774807]},
- "ScalarProductExpand"->{
- Cell[4086, 122, 112, 2, 35, "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->899095157],
- Cell[4223, 128, 180, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->273889605],
- Cell[4406, 134, 401, 12, 36, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->920923904],
- Cell[4844, 151, 276, 8, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1037404763],
- Cell[5123, 161, 1051, 42, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1945599465],
- Cell[6211, 208, 171, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1803662543],
- Cell[6385, 214, 2905, 125, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1475081945],
- Cell[9327, 344, 204, 6, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->939566711],
- Cell[9534, 352, 703, 28, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->690684142],
- Cell[10274, 385, 174, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->914251656],
- Cell[10451, 391, 678, 27, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->948650275],
- Cell[11166, 423, 209, 6, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1985163604],
- Cell[11378, 431, 701, 28, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->676672902],
- Cell[12116, 464, 175, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1492684079],
- Cell[12294, 470, 850, 36, 40, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->206730951],
- Cell[13181, 511, 257, 8, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->174400737],
- Cell[13441, 521, 892, 36, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->751387420],
- Cell[14370, 562, 202, 5, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->311719391],
- Cell[14575, 569, 1265, 53, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->180578566],
- Cell[16208, 645, 609, 21, 32, "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1508774807]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 18808, 716},
- {"ExpandScalarProduct", 18954, 720},
- {"ScalarProductExpand", 21489, 781}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[591, 21, 2290, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2884, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 501, 13, 121, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3475, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1519351336],
-Cell[3866, 112, 195, 6, 25, "ExampleSection",
- CellID->333855967],
-Cell[CellGroupData[{
-Cell[4086, 122, 112, 2, 35, "Subsubsection",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->899095157],
-Cell[CellGroupData[{
-Cell[4223, 128, 180, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->273889605],
-Cell[4406, 134, 401, 12, 36, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->920923904]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4844, 151, 276, 8, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1037404763],
-Cell[5123, 161, 1051, 42, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1945599465]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6211, 208, 171, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1803662543],
-Cell[6385, 214, 2905, 125, 39, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1475081945]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[9327, 344, 204, 6, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->939566711],
-Cell[9534, 352, 703, 28, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->690684142]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10274, 385, 174, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->914251656],
-Cell[10451, 391, 678, 27, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->948650275]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[11166, 423, 209, 6, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1985163604],
-Cell[11378, 431, 701, 28, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->676672902]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[12116, 464, 175, 4, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1492684079],
-Cell[12294, 470, 850, 36, 40, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->206730951]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[13181, 511, 257, 8, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->174400737],
-Cell[13441, 521, 892, 36, 38, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->751387420]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[14370, 562, 202, 5, 27, "Input",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->311719391],
-Cell[14575, 569, 1265, 53, 41, "Output",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->180578566]
-}, Open ]],
-Cell[15855, 625, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[15935, 631, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[16208, 645, 609, 21, 32, "Text",
- CellTags->{"ExpandScalarProduct", "ScalarProductExpand"},
- CellID->1508774807]
-}, Open ]],
-Cell[16832, 669, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScaleMu.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScaleMu.nb
index 4a5c78057..9743e5c2b 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScaleMu.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ScaleMu.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5176, 145]
-NotebookOptionsPosition[ 3288, 93]
-NotebookOutlinePosition[ 5098, 141]
-CellTagsIndexPosition[ 5055, 138]
+NotebookDataLength[ 6969, 220]
+NotebookOptionsPosition[ 4474, 148]
+NotebookOutlinePosition[ 6548, 204]
+CellTagsIndexPosition[ 6464, 199]
WindowTitle->ScaleMu
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$132024],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$226766],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/ScaleMu", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ScaleMu", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ScaleMu", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -89,6 +100,50 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->982511436],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1179005094],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1073653396],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["ScaleMu"], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox["\[Mu]", TraditionalForm]], "Output",
+ ImageSize->{14, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
@@ -103,21 +158,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 23.922754}",
+ "built" -> "{2020, 1, 5, 19, 1, 28.882275}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"ScaleMu is the mass scale used for dimensional regularization of loop \
-integrals.", "synonyms" -> {}, "title" -> "ScaleMu", "titlemodifier" -> "",
- "windowtitle" -> "ScaleMu", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ScaleMu"}},
+integrals.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "ScaleMu",
+ "titlemodifier" -> "", "windowtitle" -> "ScaleMu", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/ScaleMu"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -125,30 +180,51 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{}
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3545, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1179005094]}
+ }
*)
(*CellTagsIndex
-CellTagsIndex->{}
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 6320, 192}
+ }
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 70, "AnchorBarGrid",
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 382, 11, 70, "Usage",
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[3138, 89, 382, 11, 85, "Usage",
CellID->982511436],
-Cell[3261, 91, 23, 0, 70, "FooterCell"]
+Cell[CellGroupData[{
+Cell[3545, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1179005094],
+Cell[CellGroupData[{
+Cell[3958, 123, 196, 6, 26, "ExampleSection",
+ CellID->1073653396],
+Cell[CellGroupData[{
+Cell[4179, 133, 56, 1, 27, "Input"],
+Cell[4238, 136, 170, 5, 37, "Output"]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[4447, 146, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Schouten.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Schouten.nb
index 47c0cd5f7..b3c0abaa2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Schouten.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Schouten.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 38525, 1443]
-NotebookOptionsPosition[ 34683, 1330]
-NotebookOutlinePosition[ 37552, 1406]
-CellTagsIndexPosition[ 37438, 1400]
+NotebookDataLength[ 15524, 486]
+NotebookOptionsPosition[ 12106, 384]
+NotebookOutlinePosition[ 14372, 446]
+CellTagsIndexPosition[ 14252, 440]
WindowTitle->Schouten
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Schouten\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Schouten"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Schouten.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"FCSchoutenBruteForce\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCSchoutenBruteForce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Schouten\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Schouten"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Schouten.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$132368],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Schouten", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$227201],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Schouten", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +98,28 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Schouten", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Schouten", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
- RowBox[{"Schouten", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "applies the Schouten identity on at most 42 terms in a sum. If Schouten \
-should operate on larger expression you can give a second argument, e.g.: \
-Schouten[expr, 4711] which will work on sums with less than 4711 terms.\n\
-Schouten is also an option of Contract and DiracTrace. It may be set to an \
-integer indicating the maximum number of terms onto which the function \
-Schouten will be applied ."
+ RowBox[{"Schouten", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]attempts to automatically remove spurious terms in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " by applying the Schouten identity."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -97,6 +130,83 @@ Schouten will be applied ."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1180164228],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ ButtonBox["Schouten",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Schouten",
+ ButtonNote->"Schouten"],
+ " applies the identity for 4-vectors on at most ",
+ Cell[BoxData["42"], "InlineFormula"],
+ " terms in a sum."
+}], "Notes"],
+
+Cell[TextData[{
+ "If it should operate on a larger expression you can give a second argument, \
+e.g. ",
+ Cell[BoxData[
+ RowBox[{"Schouten", "[",
+ RowBox[{"expr", ",", "4711"}], "]"}]], "InlineFormula"],
+ " which will work on sums with less than ",
+ Cell[BoxData["4711"], "InlineFormula"],
+ " terms."
+}], "Notes"],
+
+Cell[TextData[{
+ ButtonBox["Schouten",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Schouten",
+ ButtonNote->"Schouten"],
+ " is also an option of ",
+ ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ " and ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ ". It may be set to an integer indicating the maximum number of terms onto \
+which the function ",
+ ButtonBox["Schouten",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Schouten",
+ ButtonNote->"Schouten"],
+ " will be applied "
+}], "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -112,7 +222,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1017579213],
+ CellID->1624219515],
Cell[CellGroupData[{
@@ -122,1169 +232,109 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->854925109],
+ CellID->614495084],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
- RowBox[{
- RowBox[{"Sum", "[",
- RowBox[{
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"a", "=", "1"}], "4"],
- RowBox[{"(",
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{"k", ",",
- RowBox[{"q", "[", "a", "]"}]}], "]"}],
- RowBox[{"(",
- RowBox[{
- FractionBox["1", "6"],
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "a", "]"}], ",",
- RowBox[{"LorentzIndex", "[", "b", "]"}], ",",
- RowBox[{"LorentzIndex", "[", "c", "]"}], ",",
- RowBox[{"LorentzIndex", "[", "d", "]"}]}], "]"}],
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "b", "]"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "c", "]"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "d", "]"}], "]"}]}], "]"}]}], ")"}]}], ")"}]}],
- ",",
- RowBox[{"{",
- RowBox[{"b", ",", "1", ",", "4"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"c", ",", "1", ",", "4"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"d", ",", "1", ",", "4"}], "}"}]}], "]"}], "-",
+ RowBox[{"(",
+ RowBox[{"(",
RowBox[{
- RowBox[{"Eps", "[",
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "1", "]"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "2", "]"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "3", "]"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"q", "[", "4", "]"}], "]"}]}], "]"}], "*",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Momentum", "[", "k", "]"}]}], "]"}]}]}]}]], "Input",
- CellTags->"Schouten",
- CellLabel->"In[1]:=",
- CellID->951506865],
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Tau]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Mu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",", "\[Mu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Nu]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Sigma]", ",", "\[Tau]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Rho]"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Tau]", ",", "\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}],
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Sigma]"}], "]"}]}]}], ")"}], ")"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{"-",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "-",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["k",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "4", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "3", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "2", ")"}],
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"q", "(", "1", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{567, 580},
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztm21QFGUAx6m+9KEmxXGGyaYBKiAKK5tRLkJehSAcAmwQpBoukJS4GCAw
+GnkTvQqKxtDGl+g0GC2yKTDEt5igiLARAgMRlEThQAiO42UP7mW74wi2g91n
+99l9lpXb3wfmYG/3nt///zy7d8edg/Sd8O332tjYpN5v/BEem+GTkhL7XsQK
+4y+vylJ3JMji44JkafEJ8Snu0vuMfzRtqLjHxsZ0G18y9Iale2w0LD+j5YcV
+dmRtyjz76gYv5EV5rbV/aKXjk0+vj6oY0DE8gLZHESGtU+H4eJNs4+v1o8Rt
+03dqPwryyG7D8MkrGRtfqR6ydNOrW78+8s25c6XZsfkNo8StBuzvsyVllVWK
+tHW2tvZOzs5u/vs6MChFplAZAUGnzLopxgBdgCCTZdURG8iNgCBUZt8Uc9iu
+UKS+LGoy7Y31D2oMk63Zkcd6tAz3ncEwdCYi+ESfDtd05Lv7l/frLbaramMC
+im9g/ZXSvEa1xej0wxcTNxdfn8JxzdV87+h69fxRVXWpYcVdU6ZsvvALOcNH
+y3OPDTACgkaZdVNQULkAQSfLuiNIyI2AoFZm1RRzWK9QlL4sappHc7Vw6+Eb
+0zC74uN/7AyQd2hwXe9X3u7yaxrL7Vj7vpCshkvHFS0LqtIPfBfsWdBpHDs+
+0Zzin9k6Obdp+GK4R1ab6cIz1fmx/xu/QWlBAjICglCZTVNQULgAQSjLuiM4
+KIyAoFZm0xQE3KxQNL5sappDe/NoYPT5YagsjSdyyaaqIcPU9UM+rq/9rl5w
+0cb+yvWJ2V3WtcjA1PWRT0hKe41PnMf/3BNzwHTdmUXfX+4r+dCkpen6PCrn
+8hjM0CABGgFBp8ymKTgoXICgk2XfERzkRkCQK7NpijncrFBEvoCaMshRKpVz
+Y7v1pZ9T0I+D5HOLdF9d3wkfFy/fmOTcgqLQ50MLf+ietFBUX0p8q7RnsasB
+1p7ttmZDSPaxiu/LFDX9/7uLtu/bHWG7FKcrSkvO36bzTEA3UJmQ1Eh9waKV
+BtgIlAlCZXBTsxJcpUHhQnKc+X3RydLuaPbuXKVBZQQMBLUyuKnZI3GTBoMV
+Sj670PiCatKNNCje3eLjv+uTvMSXn7Jd5SY9pYR4T0o30ngkNSY6TpaWufdo
+0+i8g2GoeovfgW6oV3Tam4c93QuZXG4ph3j7+KaQn0ao70MjDdpGpJlQwK0y
+BVylQeehyHJAJ8t01nGVBj0jmIkBhM1Cs4DHufHfwZgHgvbEYvjn7EsPP558
+YVCH6wdPb169YsNJJdOesHb5iy7bTvUuHKJp7JJ0qFft+HT3Z5Jn069w9Xyf
+Ttc00qBrRJ4JBRwrU8BRGmDIc0Any3jWcZQGLSOoiQGEzUKzhLe5YQYqEMQn
+FlVdpIPr7pk3RfHxywkOj4T9rGL4KBNNOx0eXOMbHmlka5y8fQJmqKjQ9pVL
+A71MSFxWrnrGY+Zm8Nu/qhZ9RcVBGmYEmgnvaQg0BzNLMTeEG4i4UuYYa5Q+
+5pzcMnPexNpz3Jziflk8BQpUtQF2jknNQtChgM4VkIs0zAg9E77SEHoOZnic
+G3dBIFa/UiaaZU6OsY2m/w9pe09GeyZVDzH/5K/mmtxt9XNFnXx9+gEOGl1z
+koYZoWfCVxpCz8EMj3PjLgjE2lcK1va+q936bSl7P91fkJu5v+YO3BumhrGW
+g1LvF0K3p2fl7CmqVPL4aTn6gLvmKA0zAs+EtzQEnoMZPueG8AOx8pUy1fnB
+WvvwmhEr+8YkCWIaRMQ0iIhpEFnWaUx3F697NLCKz+/KCRgxDSJiGkTENIgs
+3zQM2K26kjcdHrALPVTXp1l+fswQ0yAipkFETIOImIaIiIiI1fAvv3DoJQ==
+
+ "], {{0, 16}, {434, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{434, 16},
+ PlotRange->{{0, 434}, {0, 16}}]], "Output",
+ ImageSize->{438, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Schouten",
+ CellTags->"RasterizedOutput",
CellLabel->"Out[1]=",
- CellID->57522308]
+ CellID->1618506410]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "//", "Schouten"}]], "Input",
- CellTags->"Schouten",
- CellLabel->"In[2]:=",
- CellID->1513797212],
+ RowBox[{"Schouten", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Schouten",
- CellLabel->"Out[2]=",
- CellID->54124191]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -1308,7 +358,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Contract",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Contract",
@@ -1320,18 +369,23 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DiracTrace",
ButtonNote->"DiracTrace"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["FCSchoutenBruteForce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSchoutenBruteForce",
+ ButtonNote->"FCSchoutenBruteForce"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Schouten",
- CellID->1485744956]
+}], "SeeAlso",
+ CellID->655647701]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Schouten",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1340,25 +394,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 25.219151}",
+ "built" -> "{2020, 1, 5, 19, 1, 30.095056}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "Schouten[expr] applies the Schouten identity on at most 42 terms in a \
-sum. If Schouten should operate on larger expression you can give a second \
-argument, e.g.: Schouten[expr, 4711] which will work on sums with less than \
-4711 terms. Schouten is also an option of Contract and DiracTrace. It may be \
-set to an integer indicating the maximum number of terms onto which the \
-function Schouten will be applied .", "synonyms" -> {}, "title" -> "Schouten",
- "titlemodifier" -> "", "windowtitle" -> "Schouten", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Schouten"}, "SearchTextTranslated" -> ""},
+ "Schouten[exp] attempts to automatically remove spurious terms in exp by \
+applying the Schouten identity.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Schouten", "titlemodifier" -> "", "windowtitle" -> "Schouten",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/Schouten"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1366,8 +417,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1376,75 +428,66 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3654, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6666, 209, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1017579213]},
- "Schouten"->{
- Cell[4287, 128, 1955, 55, 168, "Input",
- CellTags->"Schouten",
- CellID->951506865],
- Cell[6245, 185, 27248, 1083, 601, "Output",
- CellTags->"Schouten",
- CellID->57522308],
- Cell[33530, 1273, 124, 4, 27, "Input",
- CellTags->"Schouten",
- CellID->1513797212],
- Cell[33657, 1279, 208, 7, 36, "Output",
- CellTags->"Schouten",
- CellID->54124191],
- Cell[34233, 1309, 408, 16, 31, "Text",
- CellTags->"Schouten",
- CellID->1485744956]}
+ CellID->1624219515]},
+ "RasterizedOutput"->{
+ Cell[8421, 274, 2418, 48, 39, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1618506410]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 36827, 1377},
- {"Schouten", 36962, 1381}
+ {"PrimaryExamplesSection", 13985, 429},
+ {"RasterizedOutput", 14129, 433}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 51, "AnchorBarGrid",
+Cell[580, 21, 3210, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 747, 17, 153, "Usage",
+Cell[3793, 100, 285, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4103, 115, 475, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3654, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4603, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1180164228],
+Cell[5345, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5379, 160, 256, 8, 70, "Notes"],
+Cell[5638, 170, 316, 9, 70, "Notes"],
+Cell[5957, 181, 660, 22, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6666, 209, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1017579213],
+ CellID->1624219515],
Cell[CellGroupData[{
-Cell[4067, 118, 195, 6, 25, "ExampleSection",
- CellID->854925109],
+Cell[7079, 228, 195, 6, 26, "ExampleSection",
+ CellID->614495084],
Cell[CellGroupData[{
-Cell[4287, 128, 1955, 55, 168, "Input",
- CellTags->"Schouten",
- CellID->951506865],
-Cell[6245, 185, 27248, 1083, 601, "Output",
- CellTags->"Schouten",
- CellID->57522308]
+Cell[7299, 238, 1119, 34, 62, "Input"],
+Cell[8421, 274, 2418, 48, 39, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->1618506410]
}, Open ]],
Cell[CellGroupData[{
-Cell[33530, 1273, 124, 4, 27, "Input",
- CellTags->"Schouten",
- CellID->1513797212],
-Cell[33657, 1279, 208, 7, 36, "Output",
- CellTags->"Schouten",
- CellID->54124191]
+Cell[10876, 327, 84, 2, 27, "Input"],
+Cell[10963, 331, 166, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[33892, 1290, 31, 0, 29, "SectionFooterSpacer"]
+Cell[11156, 340, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[33960, 1295, 270, 12, 31, "SeeAlsoSection",
+Cell[11224, 345, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[34233, 1309, 408, 16, 31, "Text",
- CellTags->"Schouten",
- CellID->1485744956]
+Cell[11497, 359, 567, 20, 56, "SeeAlso",
+ CellID->655647701]
}, Open ]],
-Cell[34656, 1328, 23, 0, 42, "FooterCell"]
+Cell[12079, 382, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Select1.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Select1.nb
deleted file mode 100644
index 27c4a41d7..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Select1.nb
+++ /dev/null
@@ -1,202 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6343, 193]
-NotebookOptionsPosition[ 4030, 126]
-NotebookOutlinePosition[ 6083, 182]
-CellTagsIndexPosition[ 6014, 177]
-WindowTitle->Select1
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Select1\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Select1"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Select1.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$133044],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Select1", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Select1", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"Select1", "[",
- RowBox[{"expr", ",", " ", "a", ",", " ", "b", ",", " ", "..."}],
- "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is equivalent to Select[expr, FreeQ2[#, {a,b, ...}]&], except the \
-special cases: Select1[a, b] returns a and Select1[a,a] returns 1 (where a is \
-not a product or a sum)."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["Select2",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Select2",
- ButtonNote->"Select2"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Select1",
- CellID->1574663120]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"Select1",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 28.358719}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Select1[expr, a, b, ...] is equivalent to Select[expr, FreeQ2[#, {a,b, \
-...}]&], except the special cases: Select1[a, b] returns a and Select1[a,a] \
-returns 1 (where a is not a product or a sum).", "synonyms" -> {}, "title" ->
- "Select1", "titlemodifier" -> "", "windowtitle" -> "Select1", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Select1"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "Select1"->{
- Cell[3764, 112, 224, 9, 70, "Text",
- CellTags->"Select1",
- CellID->1574663120]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"Select1", 5904, 170}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[579, 21, 2241, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2823, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 590, 16, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3491, 98, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3764, 112, 224, 9, 70, "Text",
- CellTags->"Select1",
- CellID->1574663120]
-}, Open ]],
-Cell[4003, 124, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Select2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Select2.nb
deleted file mode 100644
index b2c6dbeb0..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Select2.nb
+++ /dev/null
@@ -1,202 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6346, 193]
-NotebookOptionsPosition[ 4032, 126]
-NotebookOutlinePosition[ 6086, 182]
-CellTagsIndexPosition[ 6017, 177]
-WindowTitle->Select2
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Select2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Select2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Select2.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$133388],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Select2", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Select2", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"Select2", "[",
- RowBox[{"expr", ",", " ", "a", ",", " ", "b", ",", " ", "..."}],
- "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is equivalent to Select[expr, !FreeQ2[#, {a,b, ...}]&], except the \
-special cases: Select2[a, b] returns 1 and Select2[a,a] returns a (where a \
-is not a product or a sum)."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["Select1",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Select1",
- ButtonNote->"Select1"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Select2",
- CellID->1342904093]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"Select2",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 29.610883}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Select2[expr, a, b, ...] is equivalent to Select[expr, !FreeQ2[#, {a,b, \
-...}]&], except the special cases: Select2[a, b] returns 1 and Select2[a,a] \
-returns a (where a is not a product or a sum).", "synonyms" -> {}, "title" ->
- "Select2", "titlemodifier" -> "", "windowtitle" -> "Select2", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Select2"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "Select2"->{
- Cell[3766, 112, 224, 9, 70, "Text",
- CellTags->"Select2",
- CellID->1342904093]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"Select2", 5907, 170}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[579, 21, 2241, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2823, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 592, 16, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3493, 98, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3766, 112, 224, 9, 70, "Text",
- CellTags->"Select2",
- CellID->1342904093]
-}, Open ]],
-Cell[4005, 124, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectFree.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectFree.nb
index f2615da2f..9fcb178a1 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectFree.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectFree.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13697, 489]
-NotebookOptionsPosition[ 8120, 308]
-NotebookOutlinePosition[ 11727, 412]
-CellTagsIndexPosition[ 11613, 406]
+NotebookDataLength[ 14106, 493]
+NotebookOptionsPosition[ 8968, 331]
+NotebookOutlinePosition[ 12336, 426]
+CellTagsIndexPosition[ 12222, 420]
WindowTitle->SelectFree
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SelectFree\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SelectFree"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SelectFree.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$133733],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SelectFree", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FreeQ2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FreeQ2"], "\<\"SelectNotFree\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SelectNotFree"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SelectFree\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SelectFree"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SelectFree.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$228520],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SelectFree", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SelectFree", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SelectFree", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -82,10 +115,9 @@ Cell[BoxData[GridBox[{
RowBox[{"SelectFree", "[",
RowBox[{"expr", ",", " ", "a", ",", " ", "b", ",", " ", "..."}],
"]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is equivalent to Select[expr, FreeQ2[#, {a,b, ...}]&], except the \
-special cases: SelectFree[a, b] returns a and SelectFree[a,a] returns 1 \
-(where a is not a product or a sum).\n\nSelectFree is equivalent to Select1."
+ " \[LineSeparator]is equivalent to Select[expr, FreeQ2[#, {a,b, ...}]&], \
+except the special cases: SelectFree[a, b] returns a and SelectFree[a,a] \
+returns 1 (where a is not a product or a sum)."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -111,7 +143,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->620692154],
+ CellID->1387947054],
Cell[CellGroupData[{
@@ -121,7 +153,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->840314898],
+ CellID->276496415],
Cell[CellGroupData[{
@@ -137,12 +169,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"b", "+", "d"}], TraditionalForm]], "Output",
- ImageSize->{38, 15},
+ ImageSize->{44, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[1]=",
- CellID->818540084]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -157,12 +188,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["y", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{16, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[2]=",
- CellID->1323839729]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -181,12 +211,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"2", " ", "z"}], TraditionalForm]], "Output",
- ImageSize->{24, 15},
+ ImageSize->{26, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[3]=",
- CellID->912675516]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -200,12 +229,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["a", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[4]=",
- CellID->1001842240]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -219,12 +247,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[5]=",
- CellID->1438478141]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -238,12 +265,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[6]=",
- CellID->1251533165]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -258,12 +284,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectFree",
- CellLabel->"Out[7]=",
- CellID->1673614830]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -299,9 +324,7 @@ Cell[TextData[{
ButtonNote->"SelectNotFree"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SelectFree",
- CellID->1096848115]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -318,10 +341,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 30.896890}",
+ "built" -> "{2020, 1, 5, 19, 1, 33.327293}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -329,12 +352,12 @@ TaggingRules->{
"None", "summary" ->
"SelectFree[expr, a, b, ...] is equivalent to Select[expr, FreeQ2[#, \
{a,b, ...}]&], except the special cases: SelectFree[a, b] returns a and \
-SelectFree[a,a] returns 1 (where a is not a product or a sum). SelectFree is \
-equivalent to Select1.", "synonyms" -> {}, "title" -> "SelectFree",
+SelectFree[a,a] returns 1 (where a is not a product or a sum).",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SelectFree",
"titlemodifier" -> "", "windowtitle" -> "SelectFree", "type" -> "Symbol",
"uri" -> "FeynCalc/ref/SelectFree"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -342,8 +365,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -352,145 +376,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3558, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4593, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->620692154]},
+ CellID->1387947054]},
"SelectFree"->{
- Cell[4190, 127, 229, 7, 27, "Input",
+ Cell[5226, 159, 229, 7, 27, "Input",
CellTags->"SelectFree",
CellID->2065686659],
- Cell[4422, 136, 234, 8, 36, "Output",
- CellTags->"SelectFree",
- CellID->818540084],
- Cell[4693, 149, 184, 6, 27, "Input",
+ Cell[5458, 168, 214, 7, 35, "Output",
+ CellTags->"SelectFree"],
+ Cell[5709, 180, 184, 6, 27, "Input",
CellTags->"SelectFree",
CellID->1360286962],
- Cell[4880, 157, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1323839729],
- Cell[5129, 169, 292, 9, 27, "Input",
+ Cell[5896, 188, 191, 6, 37, "Output",
+ CellTags->"SelectFree"],
+ Cell[6124, 199, 292, 9, 27, "Input",
CellTags->"SelectFree",
CellID->205266173],
- Cell[5424, 180, 234, 8, 36, "Output",
- CellTags->"SelectFree",
- CellID->912675516],
- Cell[5695, 193, 154, 5, 27, "Input",
+ Cell[6419, 210, 214, 7, 35, "Output",
+ CellTags->"SelectFree"],
+ Cell[6670, 222, 154, 5, 27, "Input",
CellTags->"SelectFree",
CellID->374408699],
- Cell[5852, 200, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1001842240],
- Cell[6101, 212, 154, 5, 27, "Input",
+ Cell[6827, 229, 191, 6, 35, "Output",
+ CellTags->"SelectFree"],
+ Cell[7055, 240, 154, 5, 27, "Input",
CellTags->"SelectFree",
CellID->776099426],
- Cell[6258, 219, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1438478141],
- Cell[6507, 231, 154, 5, 27, "Input",
+ Cell[7212, 247, 191, 6, 35, "Output",
+ CellTags->"SelectFree"],
+ Cell[7440, 258, 154, 5, 27, "Input",
CellTags->"SelectFree",
CellID->836509757],
- Cell[6664, 238, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1251533165],
- Cell[6913, 250, 184, 6, 27, "Input",
+ Cell[7597, 265, 191, 6, 35, "Output",
+ CellTags->"SelectFree"],
+ Cell[7825, 276, 184, 6, 27, "Input",
CellTags->"SelectFree",
CellID->1631800392],
- Cell[7100, 258, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1673614830],
- Cell[7680, 288, 398, 15, 31, "Text",
- CellTags->"SelectFree",
- CellID->1096848115]}
+ Cell[8012, 284, 191, 6, 35, "Output",
+ CellTags->"SelectFree"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10102, 353},
- {"SelectFree", 10238, 357}
+ {"PrimaryExamplesSection", 10958, 377},
+ {"SelectFree", 11096, 381}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3103, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 639, 16, 147, "Usage",
+Cell[3688, 98, 287, 11, 45, "ObjectNameGrid"],
+Cell[3978, 111, 590, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3558, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4593, 130, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->620692154],
+ CellID->1387947054],
Cell[CellGroupData[{
-Cell[3970, 117, 195, 6, 25, "ExampleSection",
- CellID->840314898],
+Cell[5006, 149, 195, 6, 26, "ExampleSection",
+ CellID->276496415],
Cell[CellGroupData[{
-Cell[4190, 127, 229, 7, 27, "Input",
+Cell[5226, 159, 229, 7, 27, "Input",
CellTags->"SelectFree",
CellID->2065686659],
-Cell[4422, 136, 234, 8, 36, "Output",
- CellTags->"SelectFree",
- CellID->818540084]
+Cell[5458, 168, 214, 7, 35, "Output",
+ CellTags->"SelectFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4693, 149, 184, 6, 27, "Input",
+Cell[5709, 180, 184, 6, 27, "Input",
CellTags->"SelectFree",
CellID->1360286962],
-Cell[4880, 157, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1323839729]
+Cell[5896, 188, 191, 6, 37, "Output",
+ CellTags->"SelectFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5129, 169, 292, 9, 27, "Input",
+Cell[6124, 199, 292, 9, 27, "Input",
CellTags->"SelectFree",
CellID->205266173],
-Cell[5424, 180, 234, 8, 36, "Output",
- CellTags->"SelectFree",
- CellID->912675516]
+Cell[6419, 210, 214, 7, 35, "Output",
+ CellTags->"SelectFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5695, 193, 154, 5, 27, "Input",
+Cell[6670, 222, 154, 5, 27, "Input",
CellTags->"SelectFree",
CellID->374408699],
-Cell[5852, 200, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1001842240]
+Cell[6827, 229, 191, 6, 35, "Output",
+ CellTags->"SelectFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6101, 212, 154, 5, 27, "Input",
+Cell[7055, 240, 154, 5, 27, "Input",
CellTags->"SelectFree",
CellID->776099426],
-Cell[6258, 219, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1438478141]
+Cell[7212, 247, 191, 6, 35, "Output",
+ CellTags->"SelectFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6507, 231, 154, 5, 27, "Input",
+Cell[7440, 258, 154, 5, 27, "Input",
CellTags->"SelectFree",
CellID->836509757],
-Cell[6664, 238, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1251533165]
+Cell[7597, 265, 191, 6, 35, "Output",
+ CellTags->"SelectFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6913, 250, 184, 6, 27, "Input",
+Cell[7825, 276, 184, 6, 27, "Input",
CellTags->"SelectFree",
CellID->1631800392],
-Cell[7100, 258, 212, 7, 36, "Output",
- CellTags->"SelectFree",
- CellID->1673614830]
+Cell[8012, 284, 191, 6, 35, "Output",
+ CellTags->"SelectFree"]
}, Open ]]
}, Open ]],
-Cell[7339, 269, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8230, 294, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7407, 274, 270, 12, 31, "SeeAlsoSection",
+Cell[8298, 299, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7680, 288, 398, 15, 31, "Text",
- CellTags->"SelectFree",
- CellID->1096848115]
+Cell[8571, 313, 355, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[8093, 306, 23, 0, 42, "FooterCell"]
+Cell[8941, 329, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectGraphs.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectGraphs.nb
index 5ad3f2ccf..8945ce266 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectGraphs.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectGraphs.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6819, 197]
-NotebookOptionsPosition[ 4222, 126]
-NotebookOutlinePosition[ 6554, 186]
-CellTagsIndexPosition[ 6480, 181]
+NotebookDataLength[ 7553, 217]
+NotebookOptionsPosition[ 5172, 156]
+NotebookOutlinePosition[ 7346, 209]
+CellTagsIndexPosition[ 7303, 206]
WindowTitle->SelectGraphs
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SelectGraphs\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SelectGraphs"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoopSum\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SelectGraphs\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SelectGraphs"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SelectGraphs.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$134073],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SelectGraphs", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$228960],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SelectGraphs", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ SelectGraphs.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SelectGraphs", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SelectGraphs", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -117,9 +149,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SelectGraphs",
- CellID->1262985927]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -136,10 +166,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 32.391359}",
+ "built" -> "{2020, 1, 5, 19, 1, 34.410470}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -151,11 +181,11 @@ Possible settings are: SelectGraphs\\[RightArrow]{ i, j, ... } or \
SelectGraphs\\[RightArrow]{ a, {b, c}, ... } which indicates the graphs to be \
taken from the list provided to OneLoopSum. In the second setting the list \
{b, c} indicates that all amplitudes from b to c should be taken.",
- "synonyms" -> {}, "title" -> "SelectGraphs", "titlemodifier" -> "",
- "windowtitle" -> "SelectGraphs", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SelectGraphs"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SelectGraphs",
+ "titlemodifier" -> "", "windowtitle" -> "SelectGraphs", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SelectGraphs"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -164,41 +194,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SelectGraphs"->{
- Cell[3942, 112, 238, 9, 70, "Text",
- CellTags->"SelectGraphs",
- CellID->1262985927]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SelectGraphs", 6365, 174}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3023, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 737, 16, 70, "Usage",
+Cell[3610, 97, 289, 11, 70, "ObjectNameGrid"],
+Cell[3902, 110, 737, 16, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3669, 98, 270, 12, 70, "SeeAlsoSection",
+Cell[4664, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3942, 112, 238, 9, 70, "Text",
- CellTags->"SelectGraphs",
- CellID->1262985927]
+Cell[4937, 144, 193, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4195, 124, 23, 0, 70, "FooterCell"]
+Cell[5145, 154, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectNotFree.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectNotFree.nb
index 56029d7b4..e1cb04bab 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectNotFree.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectNotFree.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14064, 494]
-NotebookOptionsPosition[ 8308, 311]
-NotebookOutlinePosition[ 12048, 417]
-CellTagsIndexPosition[ 11931, 411]
+NotebookDataLength[ 15584, 547]
+NotebookOptionsPosition[ 10172, 376]
+NotebookOutlinePosition[ 13484, 470]
+CellTagsIndexPosition[ 13367, 464]
WindowTitle->SelectNotFree
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SelectNotFree\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SelectNotFree"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FreeQ2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FreeQ2"], "\<\"SelectFree\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SelectFree"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SelectNotFree\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SelectNotFree"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SelectNotFree.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$134418],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SelectNotFree", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$229405],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SelectNotFree", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,19 +96,31 @@ SelectNotFree.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SelectNotFree", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SelectNotFree", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SelectNotFree", "[",
RowBox[{"expr", ",", " ", "x"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "returns that part of expr which is not free of any occurance of x.\n\n\
-SelectNotFree[expr, a, b, ...] is equivalent to Select[expr, !FreeQ2[#, {a, \
-b, ...}]&], except the special cases: SelectNotFree[a, b] returns 1 and \
-SelectNotFree[a, a] returns a (where a is not a product or a sum)."
+ " \[LineSeparator]returns that part of ",
+ Cell[BoxData["expr"], "InlineFormula"],
+ " which is not free of any occurance of ",
+ Cell[BoxData["x"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -96,6 +131,45 @@ SelectNotFree[a, a] returns a (where a is not a product or a sum)."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->645962762],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+SelectNotFree[expr, a, b, ...] is equivalent to Select[expr, !FreeQ2[#, {a, \
+b, ...}]&], except the special cases: SelectNotFree[a, b] returns 1 and \
+SelectNotFree[a, a] returns a (where a is not a product or a sum).\
+\>", "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -111,7 +185,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->473327242],
+ CellID->1930666558],
Cell[CellGroupData[{
@@ -121,7 +195,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1904091965],
+ CellID->654434760],
Cell[CellGroupData[{
@@ -138,12 +212,11 @@ Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"f", "(", "a", ")"}], "+", "a"}], TraditionalForm]], "Output",
- ImageSize->{59, 15},
+ ImageSize->{63, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[1]=",
- CellID->879726471]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -163,12 +236,11 @@ Cell[BoxData[
FormBox[
RowBox[{"x", " ", "y", " ",
RowBox[{"f", "(", "x", ")"}]}], TraditionalForm]], "Output",
- ImageSize->{59, 15},
+ ImageSize->{67, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[2]=",
- CellID->1461838958]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -182,12 +254,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[3]=",
- CellID->1791356409]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -202,12 +273,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[4]=",
- CellID->209254169]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -221,12 +291,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["a", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{14, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[5]=",
- CellID->412334803]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -240,12 +309,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{11, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[6]=",
- CellID->1168169225]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -261,12 +329,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "x", ")"}], TraditionalForm]], "Output",
- ImageSize->{35, 15},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectNotFree",
- CellLabel->"Out[7]=",
- CellID->2104713784]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -302,9 +369,7 @@ Cell[TextData[{
ButtonNote->"SelectFree"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SelectNotFree",
- CellID->1049407209]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -312,7 +377,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SelectNotFree",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -321,25 +386,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 33.853869}",
+ "built" -> "{2020, 1, 5, 19, 1, 35.406203}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SelectNotFree[expr, x] returns that part of expr which is not free of \
-any occurance of x. SelectNotFree[expr, a, b, ...] is equivalent to \
-Select[expr, !FreeQ2[#, {a, b, ...}]&], except the special cases: \
-SelectNotFree[a, b] returns 1 and SelectNotFree[a, a] returns a (where a is \
-not a product or a sum).", "synonyms" -> {}, "title" -> "SelectNotFree",
- "titlemodifier" -> "", "windowtitle" -> "SelectNotFree", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SelectNotFree"}, "SearchTextTranslated" ->
- ""},
+any occurance of x.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SelectNotFree", "titlemodifier" -> "", "windowtitle" -> "SelectNotFree",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/SelectNotFree"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -347,8 +409,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -357,145 +420,135 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3612, 98, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5666, 172, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->473327242]},
+ CellID->1930666558]},
"SelectNotFree"->{
- Cell[4245, 127, 224, 7, 27, "Input",
+ Cell[6299, 201, 224, 7, 27, "Input",
CellTags->"SelectNotFree",
CellID->153420744],
- Cell[4472, 136, 266, 9, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->879726471],
- Cell[4775, 150, 294, 9, 27, "Input",
+ Cell[6526, 210, 246, 8, 37, "Output",
+ CellTags->"SelectNotFree"],
+ Cell[6809, 223, 294, 9, 27, "Input",
CellTags->"SelectNotFree",
CellID->1797995414],
- Cell[5072, 161, 277, 9, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->1461838958],
- Cell[5386, 175, 160, 5, 27, "Input",
+ Cell[7106, 234, 256, 8, 37, "Output",
+ CellTags->"SelectNotFree"],
+ Cell[7399, 247, 160, 5, 27, "Input",
CellTags->"SelectNotFree",
CellID->425208057],
- Cell[5549, 182, 215, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->1791356409],
- Cell[5801, 194, 185, 6, 27, "Input",
+ Cell[7562, 254, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"],
+ Cell[7793, 265, 185, 6, 27, "Input",
CellTags->"SelectNotFree",
CellID->1246254585],
- Cell[5989, 202, 214, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->209254169],
- Cell[6240, 214, 161, 5, 27, "Input",
+ Cell[7981, 273, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"],
+ Cell[8212, 284, 161, 5, 27, "Input",
CellTags->"SelectNotFree",
CellID->2055901328],
- Cell[6404, 221, 214, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->412334803],
- Cell[6655, 233, 161, 5, 27, "Input",
+ Cell[8376, 291, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"],
+ Cell[8607, 302, 161, 5, 27, "Input",
CellTags->"SelectNotFree",
CellID->1090066922],
- Cell[6819, 240, 215, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->1168169225],
- Cell[7071, 252, 189, 6, 27, "Input",
+ Cell[8771, 309, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"],
+ Cell[9002, 320, 189, 6, 27, "Input",
CellTags->"SelectNotFree",
CellID->803164089],
- Cell[7263, 260, 243, 8, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->2104713784],
- Cell[7874, 291, 392, 15, 31, "Text",
- CellTags->"SelectNotFree",
- CellID->1049407209]}
+ Cell[9194, 328, 222, 7, 37, "Output",
+ CellTags->"SelectNotFree"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10372, 358},
- {"SelectNotFree", 10511, 362}
+ {"PrimaryExamplesSection", 12057, 421},
+ {"SelectNotFree", 12198, 425}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3109, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 674, 16, 147, "Usage",
+Cell[3697, 98, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4012, 113, 541, 16, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3612, 98, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4578, 133, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->645962762],
+Cell[5319, 159, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5353, 161, 264, 5, 70, "Notes",
+ CellID->1067943069]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5666, 172, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->473327242],
+ CellID->1930666558],
Cell[CellGroupData[{
-Cell[4024, 117, 196, 6, 25, "ExampleSection",
- CellID->1904091965],
+Cell[6079, 191, 195, 6, 26, "ExampleSection",
+ CellID->654434760],
Cell[CellGroupData[{
-Cell[4245, 127, 224, 7, 27, "Input",
+Cell[6299, 201, 224, 7, 27, "Input",
CellTags->"SelectNotFree",
CellID->153420744],
-Cell[4472, 136, 266, 9, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->879726471]
+Cell[6526, 210, 246, 8, 37, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4775, 150, 294, 9, 27, "Input",
+Cell[6809, 223, 294, 9, 27, "Input",
CellTags->"SelectNotFree",
CellID->1797995414],
-Cell[5072, 161, 277, 9, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->1461838958]
+Cell[7106, 234, 256, 8, 37, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5386, 175, 160, 5, 27, "Input",
+Cell[7399, 247, 160, 5, 27, "Input",
CellTags->"SelectNotFree",
CellID->425208057],
-Cell[5549, 182, 215, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->1791356409]
+Cell[7562, 254, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5801, 194, 185, 6, 27, "Input",
+Cell[7793, 265, 185, 6, 27, "Input",
CellTags->"SelectNotFree",
CellID->1246254585],
-Cell[5989, 202, 214, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->209254169]
+Cell[7981, 273, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6240, 214, 161, 5, 27, "Input",
+Cell[8212, 284, 161, 5, 27, "Input",
CellTags->"SelectNotFree",
CellID->2055901328],
-Cell[6404, 221, 214, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->412334803]
+Cell[8376, 291, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6655, 233, 161, 5, 27, "Input",
+Cell[8607, 302, 161, 5, 27, "Input",
CellTags->"SelectNotFree",
CellID->1090066922],
-Cell[6819, 240, 215, 7, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->1168169225]
+Cell[8771, 309, 194, 6, 35, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7071, 252, 189, 6, 27, "Input",
+Cell[9002, 320, 189, 6, 27, "Input",
CellTags->"SelectNotFree",
CellID->803164089],
-Cell[7263, 260, 243, 8, 36, "Output",
- CellTags->"SelectNotFree",
- CellID->2104713784]
+Cell[9194, 328, 222, 7, 37, "Output",
+ CellTags->"SelectNotFree"]
}, Open ]]
}, Open ]],
-Cell[7533, 272, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9443, 339, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7601, 277, 270, 12, 31, "SeeAlsoSection",
+Cell[9511, 344, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7874, 291, 392, 15, 31, "Text",
- CellTags->"SelectNotFree",
- CellID->1049407209]
+Cell[9784, 358, 346, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[8281, 309, 23, 0, 42, "FooterCell"]
+Cell[10145, 374, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectSplit.nb
index 65ba2ac53..e51e08a10 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectSplit.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SelectSplit.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10282, 334]
-NotebookOptionsPosition[ 6959, 234]
-NotebookOutlinePosition[ 9546, 305]
-CellTagsIndexPosition[ 9433, 299]
+NotebookDataLength[ 10390, 338]
+NotebookOptionsPosition[ 7179, 243]
+NotebookOutlinePosition[ 9709, 312]
+CellTagsIndexPosition[ 9596, 306]
WindowTitle->SelectSplit
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ SelectSplit.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$134757],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$229845],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/SelectSplit", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ SelectSplit.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SelectSplit", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SelectSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +121,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1947745496],
+ CellID->1354756641],
Cell[CellGroupData[{
@@ -120,7 +131,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1740210034],
+ CellID->221507416],
Cell[CellGroupData[{
@@ -171,12 +182,11 @@ Cell[BoxData[
SuperscriptBox["d", "5"], ",",
SuperscriptBox["e", "6"]}], "}"}]}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{262, 21},
+ ImageSize->{275, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectSplit",
- CellLabel->"Out[1]=",
- CellID->559959953]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -220,12 +230,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"f", "+", "g"}], "}"}], ",",
RowBox[{"{", "}"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{255, 21},
+ ImageSize->{270, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SelectSplit",
- CellLabel->"Out[2]=",
- CellID->2002061756]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -244,10 +253,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 35.605973}",
+ "built" -> "{2020, 1, 5, 19, 1, 36.542062}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -256,11 +265,11 @@ TaggingRules->{
"SelectSplit[l, p] constructs list of mutually exclusive subsets from l \
in which every element li satisfies a criterium pj[li] with pj from p and \
appends the subset of remaining unmatched elements.", "synonyms" -> {},
- "title" -> "SelectSplit", "titlemodifier" -> "", "windowtitle" ->
- "SelectSplit", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SelectSplit"},
- "SearchTextTranslated" -> ""},
+ "tabletags" -> {}, "title" -> "SelectSplit", "titlemodifier" -> "",
+ "windowtitle" -> "SelectSplit", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SelectSplit"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -269,7 +278,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -278,64 +287,59 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3487, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3749, 108, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1947745496]},
+ CellID->1354756641]},
"SelectSplit"->{
- Cell[4121, 126, 822, 27, 51, "Input",
+ Cell[4382, 137, 822, 27, 53, "Input",
CellTags->"SelectSplit",
CellID->1220131740],
- Cell[4946, 155, 637, 23, 42, "Output",
- CellTags->"SelectSplit",
- CellID->559959953],
- Cell[5620, 183, 669, 22, 51, "Input",
+ Cell[5207, 166, 617, 22, 43, "Output",
+ CellTags->"SelectSplit"],
+ Cell[5861, 193, 669, 22, 53, "Input",
CellTags->"SelectSplit",
CellID->292281216],
- Cell[6292, 207, 601, 20, 42, "Output",
- CellTags->"SelectSplit",
- CellID->2002061756]}
+ Cell[6533, 217, 580, 19, 43, "Output",
+ CellTags->"SelectSplit"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8903, 279},
- {"SelectSplit", 9041, 283}
+ {"PrimaryExamplesSection", 9110, 288},
+ {"SelectSplit", 9249, 292}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 51, "AnchorBarGrid",
+Cell[583, 21, 2286, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 561, 15, 98, "Usage",
+Cell[2872, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[3163, 89, 561, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3487, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3749, 108, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1947745496],
+ CellID->1354756641],
Cell[CellGroupData[{
-Cell[3900, 116, 196, 6, 25, "ExampleSection",
- CellID->1740210034],
+Cell[4162, 127, 195, 6, 26, "ExampleSection",
+ CellID->221507416],
Cell[CellGroupData[{
-Cell[4121, 126, 822, 27, 51, "Input",
+Cell[4382, 137, 822, 27, 53, "Input",
CellTags->"SelectSplit",
CellID->1220131740],
-Cell[4946, 155, 637, 23, 42, "Output",
- CellTags->"SelectSplit",
- CellID->559959953]
+Cell[5207, 166, 617, 22, 43, "Output",
+ CellTags->"SelectSplit"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5620, 183, 669, 22, 51, "Input",
+Cell[5861, 193, 669, 22, 53, "Input",
CellTags->"SelectSplit",
CellID->292281216],
-Cell[6292, 207, 601, 20, 42, "Output",
- CellTags->"SelectSplit",
- CellID->2002061756]
+Cell[6533, 217, 580, 19, 43, "Output",
+ CellTags->"SelectSplit"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[6932, 232, 23, 0, 42, "FooterCell"]
+Cell[7152, 241, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series2.nb
index 38121f57a..cc4f0bca8 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series2.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 26106, 928]
-NotebookOptionsPosition[ 19042, 689]
-NotebookOutlinePosition[ 23443, 821]
-CellTagsIndexPosition[ 23332, 815]
+NotebookDataLength[ 26379, 933]
+NotebookOptionsPosition[ 19839, 719]
+NotebookOutlinePosition[ 23808, 834]
+CellTagsIndexPosition[ 23697, 828]
WindowTitle->Series2
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$135091],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$230275],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Series2", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Series2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Series2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,39 +110,40 @@ e, n] is equivalent to Series2[f, {e, 0, n}]."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1131879300],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->284019266],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1970642065],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Series2", "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[1]:=",
+ CellLabel->"In[3]:=",
CellID->1435843837],
Cell[BoxData[
@@ -145,16 +159,46 @@ Cell[BoxData[
Function[{}, EulerGamma]], "\[Rule]", "0"}], "}"}]}], ",",
RowBox[{"SimplifyPolyLog", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{372, 35},
+ ImageSize->{565, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[1]=",
- CellID->1982660957]
+ CellLabel->"Out[3]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1304305929],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1549648249],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"Series2", "[",
RowBox[{
@@ -167,7 +211,7 @@ Cell[BoxData[
RowBox[{"\[Delta]", "/", "2"}], ")"}]}], ",", "\[Delta]", ",", "1"}],
"]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->785606174],
Cell[BoxData[
@@ -181,12 +225,11 @@ Cell[BoxData[
FractionBox["1", "2"], " ", "\[Delta]", " ",
RowBox[{"log", "(", "x", ")"}]}], "+", "1"}], TraditionalForm]], "Output",\
- ImageSize->{206, 41},
+ ImageSize->{208, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[2]=",
- CellID->78273571]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -196,7 +239,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"Gamma", "[", "x", "]"}], ",", "x", ",", "1"}], "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1445520007],
Cell[BoxData[
@@ -206,12 +249,11 @@ Cell[BoxData[
FractionBox["1", "2"], " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ", "x"}], "+",
FractionBox["1", "x"]}], TraditionalForm]], "Output",
- ImageSize->{91, 41},
+ ImageSize->{95, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[3]=",
- CellID->1484488938]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -223,7 +265,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1607149077],
Cell[BoxData[
@@ -250,12 +292,11 @@ Cell[BoxData[
SeriesData[$CellContext`x, 0, {
1, -EulerGamma, Rational[1, 12] (6 EulerGamma^2 + Pi^2)}, -1, 2, 1],
Editable->False], TraditionalForm]], "Output",
- ImageSize->{228, 41},
+ ImageSize->{234, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[4]=",
- CellID->406465977]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -265,7 +306,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"Gamma", "[", "x", "]"}], ",", "x", ",", "2"}], "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->113546639],
Cell[BoxData[
@@ -281,12 +322,11 @@ Cell[BoxData[
FractionBox["1", "2"], " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ", "x"}], "+",
FractionBox["1", "x"]}], TraditionalForm]], "Output",
- ImageSize->{172, 45},
+ ImageSize->{177, 38},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[5]=",
- CellID->503684567]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -299,7 +339,7 @@ Cell[BoxData[
RowBox[{"FinalSubstitutions", "\[Rule]",
RowBox[{"{", "}"}]}]}], "]"}], "//", "FullSimplify"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->31680807],
Cell[BoxData[
@@ -333,12 +373,11 @@ Cell[BoxData[
TagBox["\[DoubledGamma]",
Function[{}, EulerGamma]], "2"], " ", "x"}], "+",
FractionBox["6", "x"]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{443, 43},
+ ImageSize->{454, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[6]=",
- CellID->607384212]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -358,7 +397,7 @@ Cell[BoxData[
"}"}]}], "]"}], "//", "Normal"}], "//", "Expand"}], "//",
"FullSimplify"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1418084636],
Cell[BoxData[
@@ -393,19 +432,16 @@ Cell[BoxData[
TagBox["\[DoubledGamma]",
Function[{}, EulerGamma]], "2"], " ", "x"}], "+",
FractionBox["12", "x"]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{435, 43},
+ ImageSize->{439, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[7]=",
- CellID->743143408]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell["\<\
There is a table of expansions of special hypergeometric functions.\
-\>", "Text",
- CellTags->"Series2",
- CellID->659671376],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -424,7 +460,7 @@ Cell[BoxData[
RowBox[{"OPEm", "+", "Epsilon"}]}], "}"}], ",", "1"}], "]"}], ",",
"Epsilon", ",", "1"}], "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->1447119838],
Cell[BoxData[
@@ -450,12 +486,11 @@ Cell[BoxData[
TraditionalForm], " ",
TemplateBox[{"1","m"},
"PolyGamma2"]}], "2"], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{297, 47},
+ ImageSize->{302, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[8]=",
- CellID->1252077467]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -477,7 +512,7 @@ Cell[BoxData[
RowBox[{"Epsilon", " ", "+", " ", "OPEm"}]}], "}"}], ",", " ", "1"}],
"]"}], ",", "Epsilon", ",", "1"}], "]"}]}]], "Input",
CellTags->"Series2",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->1777911067],
Cell[BoxData[
@@ -514,12 +549,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{493, 41},
+ ImageSize->{502, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[9]=",
- CellID->859590251]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -530,7 +564,7 @@ Cell[BoxData[
RowBox[{"1", " ", "+", " ",
RowBox[{"2", " ", "Epsilon"}]}], ",", "x"}], "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[10]:=",
+ CellLabel->"In[9]:=",
CellID->1986693903],
Cell[BoxData[
@@ -539,12 +573,11 @@ Cell[BoxData[
RowBox[{"2", " ",
TagBox["\[CurlyEpsilon]", TraditionalForm]}], "+", "1"}],"x"},
"Hypergeometric2F1"], TraditionalForm]], "Output",
- ImageSize->{133, 15},
+ ImageSize->{133, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[10]=",
- CellID->444344105]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -553,7 +586,7 @@ Cell[BoxData[
RowBox[{"Series2", "[",
RowBox[{"%", ",", "Epsilon", ",", "3"}], "]"}]], "Input",
CellTags->"Series2",
- CellLabel->"In[11]:=",
+ CellLabel->"In[10]:=",
CellID->180283674],
Cell[BoxData[
@@ -661,12 +694,11 @@ Cell[BoxData[
TraditionalForm], "3"], " ",
TemplateBox[{"3"},
"Zeta"]}], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{471, 136},
+ ImageSize->{481, 122},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series2",
- CellLabel->"Out[11]=",
- CellID->1006368312]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[TextData[{
@@ -679,9 +711,7 @@ Cell[TextData[{
SubscriptBox["F", "1"]}]}], TraditionalForm]]],
" tabulated in Series2.m. The interested user can consult the source code \
(search for HYPERLIST)."
-}], "Text",
- CellTags->"Series2",
- CellID->1023055054]
+}], "Notes"]
}, Open ]]
}, Open ]],
@@ -690,7 +720,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Series2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -699,10 +729,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 37.140927}",
+ "built" -> "{2020, 1, 5, 19, 1, 37.652259}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -712,11 +742,11 @@ TaggingRules->{
Gamma-bug in Mathematica versions smaller than 5.0) equivalent to Series, \
except that it applies Normal on the result and has an option \
FinalSubstitutions. Series2[f, e, n] is equivalent to Series2[f, {e, 0, n}].",
- "synonyms" -> {}, "title" -> "Series2", "titlemodifier" -> "",
- "windowtitle" -> "Series2", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Series2"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Series2",
+ "titlemodifier" -> "", "windowtitle" -> "Series2", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Series2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -725,7 +755,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -733,203 +763,178 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3544, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1131879300]},
"Series2"->{
- Cell[4178, 128, 132, 4, 27, "Input",
+ Cell[4625, 142, 132, 4, 70, "Input",
CellTags->"Series2",
CellID->1435843837],
- Cell[4313, 134, 585, 18, 56, "Output",
- CellTags->"Series2",
- CellID->1982660957],
- Cell[4935, 157, 356, 13, 27, "Input",
+ Cell[4760, 148, 564, 17, 37, "Output",
+ CellTags->"Series2"],
+ Cell[6019, 201, 356, 13, 27, "Input",
CellTags->"Series2",
CellID->785606174],
- Cell[5294, 172, 461, 16, 62, "Output",
- CellTags->"Series2",
- CellID->78273571],
- Cell[5792, 193, 192, 6, 27, "Input",
+ Cell[6378, 216, 442, 15, 56, "Output",
+ CellTags->"Series2"],
+ Cell[6857, 236, 192, 6, 27, "Input",
CellTags->"Series2",
CellID->1445520007],
- Cell[5987, 201, 347, 12, 62, "Output",
- CellTags->"Series2",
- CellID->1484488938],
- Cell[6371, 218, 240, 8, 27, "Input",
+ Cell[7052, 244, 326, 11, 56, "Output",
+ CellTags->"Series2"],
+ Cell[7415, 260, 240, 8, 27, "Input",
CellTags->"Series2",
CellID->1607149077],
- Cell[6614, 228, 911, 29, 62, "Output",
- CellTags->"Series2",
- CellID->406465977],
- Cell[7562, 262, 191, 6, 27, "Input",
+ Cell[7658, 270, 891, 28, 56, "Output",
+ CellTags->"Series2"],
+ Cell[8586, 303, 191, 6, 27, "Input",
CellTags->"Series2",
CellID->113546639],
- Cell[7756, 270, 490, 18, 66, "Output",
- CellTags->"Series2",
- CellID->503684567],
- Cell[8283, 293, 306, 9, 27, "Input",
+ Cell[8780, 311, 470, 17, 59, "Output",
+ CellTags->"Series2"],
+ Cell[9287, 333, 306, 9, 27, "Input",
CellTags->"Series2",
CellID->31680807],
- Cell[8592, 304, 1099, 36, 64, "Output",
- CellTags->"Series2",
- CellID->607384212],
- Cell[9728, 345, 478, 16, 45, "Input",
+ Cell[9596, 344, 1079, 35, 56, "Output",
+ CellTags->"Series2"],
+ Cell[10712, 384, 478, 16, 45, "Input",
CellTags->"Series2",
CellID->1418084636],
- Cell[10209, 363, 1105, 37, 64, "Output",
- CellTags->"Series2",
- CellID->743143408],
- Cell[11329, 403, 133, 4, 32, "Text",
- CellTags->"Series2",
- CellID->659671376],
- Cell[11487, 411, 502, 16, 45, "Input",
+ Cell[11193, 402, 1085, 36, 57, "Output",
+ CellTags->"Series2"],
+ Cell[12410, 447, 502, 16, 45, "Input",
CellTags->"Series2",
CellID->1447119838],
- Cell[11992, 429, 754, 28, 68, "Output",
- CellTags->"Series2",
- CellID->1252077467],
- Cell[12783, 462, 596, 18, 45, "Input",
+ Cell[12915, 465, 733, 27, 60, "Output",
+ CellTags->"Series2"],
+ Cell[13685, 497, 596, 18, 45, "Input",
CellTags->"Series2",
CellID->1777911067],
- Cell[13382, 482, 1093, 39, 62, "Output",
- CellTags->"Series2",
- CellID->859590251],
- Cell[14512, 526, 261, 7, 27, "Input",
+ Cell[14284, 517, 1073, 38, 56, "Output",
+ CellTags->"Series2"],
+ Cell[15394, 560, 260, 7, 27, "Input",
CellTags->"Series2",
CellID->1986693903],
- Cell[14776, 535, 398, 11, 36, "Output",
- CellTags->"Series2",
- CellID->444344105],
- Cell[15211, 551, 165, 5, 27, "Input",
+ Cell[15657, 569, 377, 10, 38, "Output",
+ CellTags->"Series2"],
+ Cell[16071, 584, 165, 5, 27, "Input",
CellTags->"Series2",
CellID->180283674],
- Cell[15379, 558, 3222, 110, 157, "Output",
- CellTags->"Series2",
- CellID->1006368312],
- Cell[18616, 671, 372, 12, 53, "Text",
- CellTags->"Series2",
- CellID->1023055054]}
+ Cell[16239, 591, 3201, 109, 143, "Output",
+ CellTags->"Series2"]},
+ "PrimaryExamplesSection"->{
+ Cell[5385, 172, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1304305929]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 21058, 735},
- {"Series2", 21192, 739}
+ {"Series2", 21825, 765},
+ {"PrimaryExamplesSection", 23553, 821}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 643, 17, 115, "Usage",
- CellID->982511436],
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3544, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1131879300],
+Cell[3160, 91, 643, 17, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3957, 118, 196, 6, 25, "ExampleSection",
- CellID->1970642065],
+Cell[3828, 112, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->284019266],
+Cell[4569, 138, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4178, 128, 132, 4, 27, "Input",
+Cell[4625, 142, 132, 4, 70, "Input",
CellTags->"Series2",
CellID->1435843837],
-Cell[4313, 134, 585, 18, 56, "Output",
- CellTags->"Series2",
- CellID->1982660957]
+Cell[4760, 148, 564, 17, 37, "Output",
+ CellTags->"Series2"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4935, 157, 356, 13, 27, "Input",
+Cell[5385, 172, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1304305929],
+Cell[CellGroupData[{
+Cell[5798, 191, 196, 6, 26, "ExampleSection",
+ CellID->1549648249],
+Cell[CellGroupData[{
+Cell[6019, 201, 356, 13, 27, "Input",
CellTags->"Series2",
CellID->785606174],
-Cell[5294, 172, 461, 16, 62, "Output",
- CellTags->"Series2",
- CellID->78273571]
+Cell[6378, 216, 442, 15, 56, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5792, 193, 192, 6, 27, "Input",
+Cell[6857, 236, 192, 6, 27, "Input",
CellTags->"Series2",
CellID->1445520007],
-Cell[5987, 201, 347, 12, 62, "Output",
- CellTags->"Series2",
- CellID->1484488938]
+Cell[7052, 244, 326, 11, 56, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6371, 218, 240, 8, 27, "Input",
+Cell[7415, 260, 240, 8, 27, "Input",
CellTags->"Series2",
CellID->1607149077],
-Cell[6614, 228, 911, 29, 62, "Output",
- CellTags->"Series2",
- CellID->406465977]
+Cell[7658, 270, 891, 28, 56, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7562, 262, 191, 6, 27, "Input",
+Cell[8586, 303, 191, 6, 27, "Input",
CellTags->"Series2",
CellID->113546639],
-Cell[7756, 270, 490, 18, 66, "Output",
- CellTags->"Series2",
- CellID->503684567]
+Cell[8780, 311, 470, 17, 59, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8283, 293, 306, 9, 27, "Input",
+Cell[9287, 333, 306, 9, 27, "Input",
CellTags->"Series2",
CellID->31680807],
-Cell[8592, 304, 1099, 36, 64, "Output",
- CellTags->"Series2",
- CellID->607384212]
+Cell[9596, 344, 1079, 35, 56, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9728, 345, 478, 16, 45, "Input",
+Cell[10712, 384, 478, 16, 45, "Input",
CellTags->"Series2",
CellID->1418084636],
-Cell[10209, 363, 1105, 37, 64, "Output",
- CellTags->"Series2",
- CellID->743143408]
+Cell[11193, 402, 1085, 36, 57, "Output",
+ CellTags->"Series2"]
}, Open ]],
-Cell[11329, 403, 133, 4, 32, "Text",
- CellTags->"Series2",
- CellID->659671376],
+Cell[12293, 441, 92, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[11487, 411, 502, 16, 45, "Input",
+Cell[12410, 447, 502, 16, 45, "Input",
CellTags->"Series2",
CellID->1447119838],
-Cell[11992, 429, 754, 28, 68, "Output",
- CellTags->"Series2",
- CellID->1252077467]
+Cell[12915, 465, 733, 27, 60, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12783, 462, 596, 18, 45, "Input",
+Cell[13685, 497, 596, 18, 45, "Input",
CellTags->"Series2",
CellID->1777911067],
-Cell[13382, 482, 1093, 39, 62, "Output",
- CellTags->"Series2",
- CellID->859590251]
+Cell[14284, 517, 1073, 38, 56, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14512, 526, 261, 7, 27, "Input",
+Cell[15394, 560, 260, 7, 27, "Input",
CellTags->"Series2",
CellID->1986693903],
-Cell[14776, 535, 398, 11, 36, "Output",
- CellTags->"Series2",
- CellID->444344105]
+Cell[15657, 569, 377, 10, 38, "Output",
+ CellTags->"Series2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15211, 551, 165, 5, 27, "Input",
+Cell[16071, 584, 165, 5, 27, "Input",
CellTags->"Series2",
CellID->180283674],
-Cell[15379, 558, 3222, 110, 157, "Output",
- CellTags->"Series2",
- CellID->1006368312]
+Cell[16239, 591, 3201, 109, 143, "Output",
+ CellTags->"Series2"]
}, Open ]],
-Cell[18616, 671, 372, 12, 53, "Text",
- CellTags->"Series2",
- CellID->1023055054]
+Cell[19455, 703, 330, 10, 50, "Notes"]
}, Open ]]
}, Open ]],
-Cell[19015, 687, 23, 0, 42, "FooterCell"]
+Cell[19812, 717, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series3.nb
index af377243c..098a5a219 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Series3.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10569, 365]
-NotebookOptionsPosition[ 6593, 240]
-NotebookOutlinePosition[ 9422, 320]
-CellTagsIndexPosition[ 9313, 314]
+NotebookDataLength[ 12373, 426]
+NotebookOptionsPosition[ 8346, 302]
+NotebookOutlinePosition[ 11089, 378]
+CellTagsIndexPosition[ 10978, 372]
WindowTitle->Series3
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Series3\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Series3"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Series3.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Series2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Series2"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Series3\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Series3"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Series3.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$135433],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Series3", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$230713],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Series3", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Series3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Series3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,32 +127,33 @@ fixed. Series3[f, e, n] is equivalent to Series3[f, {e, 0, n}]."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1621565240],
-
-Cell[CellGroupData[{
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1513618515],
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->847533583],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -135,16 +170,47 @@ Cell[BoxData[
RowBox[{"Factoring", "\[Rule]", "True"}], ",",
RowBox[{"FinalSubstitutions", "\[Rule]",
RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{286, 15},
+ ImageSize->{258, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series3",
CellLabel->"Out[1]=",
CellID->2070948847]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->621930810],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1483141090],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"Series3", "[",
RowBox[{
@@ -157,7 +223,7 @@ Cell[BoxData[
RowBox[{"\[Delta]", "/", "2"}], ")"}]}], ",", "\[Delta]", ",", "1"}],
"]"}]], "Input",
CellTags->"Series3",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1953540257],
Cell[BoxData[
@@ -170,12 +236,11 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "+", "1"}],
TraditionalForm]], "Output",
- ImageSize->{144, 41},
+ ImageSize->{147, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series3",
- CellLabel->"Out[2]=",
- CellID->2052658342]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -187,7 +252,7 @@ Cell[BoxData[
RowBox[{"Gamma", "[", "x", "]"}], ",", "x", ",", "1"}], "]"}], "//",
"FullSimplify"}]], "Input",
CellTags->"Series3",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1278931466],
Cell[BoxData[
@@ -196,12 +261,11 @@ Cell[BoxData[
FractionBox["1", "x"], "-",
TagBox["\[DoubledGamma]",
Function[{}, EulerGamma]], "+", "1"}], TraditionalForm]], "Output",
- ImageSize->{67, 41},
+ ImageSize->{68, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Series3",
- CellLabel->"Out[3]=",
- CellID->654585164]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -231,9 +295,7 @@ Cell[TextData[{
ButtonNote->"Series2"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Series3",
- CellID->601286817]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -250,10 +312,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 38.825543}",
+ "built" -> "{2020, 1, 5, 19, 1, 38.824811}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -262,11 +324,11 @@ TaggingRules->{
"Series3 performs a series expansion around 0. Series3 is equivalent to \
Series, except that it applies Normal on the result and that some Series bugs \
are fixed. Series3[f, e, n] is equivalent to Series3[f, {e, 0, n}].",
- "synonyms" -> {}, "title" -> "Series3", "titlemodifier" -> "",
- "windowtitle" -> "Series3", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Series3"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Series3",
+ "titlemodifier" -> "", "windowtitle" -> "Series3", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Series3"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -274,8 +336,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -283,90 +346,88 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3424, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1621565240]},
"Series3"->{
- Cell[4057, 124, 131, 4, 27, "Input",
+ Cell[5233, 159, 131, 4, 70, "Input",
CellTags->"Series3",
CellID->457203194],
- Cell[4191, 130, 368, 12, 36, "Output",
+ Cell[5367, 165, 368, 12, 37, "Output",
CellTags->"Series3",
CellID->2070948847],
- Cell[4596, 147, 357, 13, 27, "Input",
+ Cell[6429, 213, 357, 13, 27, "Input",
CellTags->"Series3",
CellID->1953540257],
- Cell[4956, 162, 413, 15, 62, "Output",
- CellTags->"Series3",
- CellID->2052658342],
- Cell[5406, 182, 232, 8, 27, "Input",
+ Cell[6789, 228, 392, 14, 56, "Output",
+ CellTags->"Series3"],
+ Cell[7218, 247, 232, 8, 27, "Input",
CellTags->"Series3",
CellID->1278931466],
- Cell[5641, 192, 319, 11, 62, "Output",
- CellTags->"Series3",
- CellID->654585164],
- Cell[6328, 226, 223, 9, 31, "Text",
- CellTags->"Series3",
- CellID->601286817]}
+ Cell[7453, 257, 299, 10, 56, "Output",
+ CellTags->"Series3"]},
+ "PrimaryExamplesSection"->{
+ Cell[5796, 184, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->621930810]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8543, 285},
- {"Series3", 8677, 289}
+ {"Series3", 10323, 348},
+ {"PrimaryExamplesSection", 10835, 365}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 2996, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 523, 13, 99, "Usage",
- CellID->982511436],
+Cell[3578, 97, 284, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3424, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1621565240],
+Cell[3887, 112, 523, 13, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3837, 114, 195, 6, 25, "ExampleSection",
- CellID->847533583],
+Cell[4435, 129, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1513618515],
+Cell[5177, 155, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4057, 124, 131, 4, 27, "Input",
+Cell[5233, 159, 131, 4, 70, "Input",
CellTags->"Series3",
CellID->457203194],
-Cell[4191, 130, 368, 12, 36, "Output",
+Cell[5367, 165, 368, 12, 37, "Output",
CellTags->"Series3",
CellID->2070948847]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4596, 147, 357, 13, 27, "Input",
+Cell[5796, 184, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->621930810],
+Cell[CellGroupData[{
+Cell[6208, 203, 196, 6, 26, "ExampleSection",
+ CellID->1483141090],
+Cell[CellGroupData[{
+Cell[6429, 213, 357, 13, 27, "Input",
CellTags->"Series3",
CellID->1953540257],
-Cell[4956, 162, 413, 15, 62, "Output",
- CellTags->"Series3",
- CellID->2052658342]
+Cell[6789, 228, 392, 14, 56, "Output",
+ CellTags->"Series3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5406, 182, 232, 8, 27, "Input",
+Cell[7218, 247, 232, 8, 27, "Input",
CellTags->"Series3",
CellID->1278931466],
-Cell[5641, 192, 319, 11, 62, "Output",
- CellTags->"Series3",
- CellID->654585164]
+Cell[7453, 257, 299, 10, 56, "Output",
+ CellTags->"Series3"]
}, Open ]]
}, Open ]],
-Cell[5987, 207, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7779, 271, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6055, 212, 270, 12, 31, "SeeAlsoSection",
+Cell[7847, 276, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6328, 226, 223, 9, 31, "Text",
- CellTags->"Series3",
- CellID->601286817]
+Cell[8120, 290, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6566, 238, 23, 0, 42, "FooterCell"]
+Cell[8319, 300, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetMandelstam.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetMandelstam.nb
index 6e2741668..c179d3485 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetMandelstam.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetMandelstam.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9357, 296]
-NotebookOptionsPosition[ 5685, 190]
-NotebookOutlinePosition[ 8491, 264]
-CellTagsIndexPosition[ 8376, 258]
+NotebookDataLength[ 38408, 1310]
+NotebookOptionsPosition[ 34465, 1195]
+NotebookOutlinePosition[ 36706, 1253]
+CellTagsIndexPosition[ 36620, 1248]
WindowTitle->SetMandelstam
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SetMandelstam\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SetMandelstam"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Mandelstam\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Mandelstam"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SetMandelstam\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SetMandelstam"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SetMandelstam.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$135770],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SetMandelstam", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$231155],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SetMandelstam", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,23 +95,95 @@ SetMandelstam.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SetMandelstam", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SetMandelstam", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SetMandelstam", "[",
+ RowBox[{"s", ",", " ", "t", ",", " ", "u", ",", " ",
+ SubscriptBox["p", "1"], ",", " ",
+ SubscriptBox["p", "2"], ",", " ",
+ SubscriptBox["p", "3"], ",", " ",
+ SubscriptBox["p", "4"], ",", " ",
+ SubscriptBox["m", "1"], ",", " ",
+ SubscriptBox["m", "2"], ",", " ",
+ SubscriptBox["m", "3"], ",", " ",
+ SubscriptBox["m", "4"]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]defines the Mandelstam variables ",
+ Cell[BoxData[
+ RowBox[{"s", "=",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["p", "1"], "+",
+ SubscriptBox["p", "2"]}], ")"}], "2"]}]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{"t", "=",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["p", "1"], "+",
+ SubscriptBox["p", "3"]}], ")"}], "2"]}]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{"u", "=",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["p", "1"], "+",
+ SubscriptBox["p", "4"]}], ")"}], "2"]}]], "InlineFormula"],
+ " and sets the momenta on-shell: ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox[
+ SubscriptBox["p", "1"], "2"], "=",
+ SuperscriptBox[
+ SubscriptBox["m", "1"], "2"]}]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox[
+ SubscriptBox["p", "2"], "2"], "=",
+ SuperscriptBox[
+ SubscriptBox["m", "2"], "2"]}]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox[
+ SubscriptBox["p", "3"], "2"], "=",
+ SuperscriptBox[
+ SubscriptBox["m", "3"], "2"]}]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox[
+ SubscriptBox["p", "4"], "2"], "=",
+ SuperscriptBox[
+ SubscriptBox["m", "4"], "2"]}]], "InlineFormula"],
+ ". Notice that ",
+ Cell[BoxData[
+ RowBox[{
RowBox[{
- "s", ",", " ", "t", ",", " ", "u", ",", " ", "p1", ",", " ", "p2", ",",
- " ", "p3", ",", " ", "p4", ",", " ", "m1", ",", " ", "m2", ",", " ",
- "m3", ",", " ", "m4"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "defines the Mandelstam variables s=(p1+p2)^2, t=(p1+p3)^2, u=(p1+p4)^2 \
-and sets the momenta on-shell: p1^2=m1^2, p2^2=m2^2, p3^2=m3^2, p4^2=m4^2. \
-Notice that p1+p2+p3+p4 = 0 is assumed.\nSetMandelstam[x, {p1, p2, p3, p4, \
-p5}, {m1, m2, m3, m4, m5}] defines x[i, j] = (pi+pj)^2 and sets the momenta \
-on-shell. p1+p2+p3+p4 = 0 is assumed."
+ SubscriptBox["p", "1"], "+",
+ SubscriptBox["p", "2"], "+",
+ SubscriptBox["p", "3"], "+",
+ SubscriptBox["p", "4"]}], "=", "0"}]], "InlineFormula"],
+ " is assumed."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -100,6 +194,56 @@ on-shell. p1+p2+p3+p4 = 0 is assumed."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1403689137],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SetMandelstam", "]"}]], "Input",
+ CellLabel->"In[23]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"4", ",", "D"}], "}"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{142, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[23]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -115,7 +259,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1199553859],
+ CellID->1891061268],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -123,41 +269,902 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1261629829],
+ CellID->788890342],
+
+Cell["\<\
+SetMandelstam assumes all momenta to be ingoing. For scattering processes \
+with p1+p2=p3+p4, the outgoing momenta should be written with a minus sign.\
+\>", "Notes"],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
-Cell["Examples", "Subsubsection",
- CellTags->"SetMandelstam",
- CellID->162667150],
+Cell[BoxData[
+ RowBox[{"SetMandelstam", "[",
+ RowBox[{"s", ",", "t", ",", "u", ",", "p1", ",", "p2", ",",
+ RowBox[{"-", "p3"}], ",",
+ RowBox[{"-", "p4"}], ",", "m1", ",", "m2", ",", "m3", ",", "m4"}],
+ "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ SuperscriptBox["m1", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ SuperscriptBox["m2", "2"],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ SuperscriptBox["m3", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ SuperscriptBox["m4", "2"],
+ SuperscriptBox["m1", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ SuperscriptBox["m2", "2"],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ SuperscriptBox["m3", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ SuperscriptBox["m4", "2"],
+ SuperscriptBox["m1", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ SuperscriptBox["m2", "2"],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ SuperscriptBox["m3", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ SuperscriptBox["m4", "2"],
+ SuperscriptBox["m1", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ SuperscriptBox["m2", "2"],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["u", "2"]}],
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["t", "2"]}],
+ SuperscriptBox["m3", "2"],
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ FractionBox["s", "2"]}],
+ SuperscriptBox["m4", "2"]}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+ "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{3376, 32},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[{
+ RowBox[{"SP", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"SP", "[",
+ RowBox[{"p1", ",", "p3"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"SP", "[",
+ RowBox[{"p1", ",", "p4"}], "]"}]}], "Input",
+ CellLabel->"In[3]:="],
+
Cell[BoxData[
- RowBox[{"Options", "[", "SetMandelstam", "]"}]], "Input",
- CellTags->"SetMandelstam",
- CellLabel->"In[1]:=",
- CellID->412090873],
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox["s", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{120, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="],
Cell[BoxData[
FormBox[
- RowBox[{"{",
- RowBox[{"Dimension", "\[Rule]",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["t", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{109, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox["u", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{111, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]="]
+}, Open ]],
+
+Cell["\<\
+SetMandelstam simultaneously sets scalar products in 4 and D dimensions. This \
+is controlled by the option Dimension.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p2"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"SPD", "[",
+ RowBox[{"p1", ",", "p3"}], "]"}]}], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox["s", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{120, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ FractionBox["t", "2"]}], TraditionalForm]], "Output",
+ ImageSize->{109, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
+}, Open ]],
+
+Cell["\<\
+It is also possible to have more than just 4 momenta. For example, for \
+p1+p2=p3+p4+p5 we can obtain x[i, j] = (pi+pj)^2\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"SetMandelstam", "[",
+ RowBox[{"x", ",", " ",
+ RowBox[{"{",
+ RowBox[{"p1", ",", " ", "p2", ",", " ",
+ RowBox[{"-", "p3"}], ",", " ",
+ RowBox[{"-", "p4"}], ",", " ",
+ RowBox[{"-", "p5"}]}], "}"}], ",", " ",
RowBox[{"{",
- RowBox[{"4", ",", "D", ",", "___"}], "}"}]}], "}"}],
+ RowBox[{
+ "m1", ",", " ", "m2", ",", " ", "m3", ",", " ", "m4", ",", " ", "m5"}],
+ "}"}]}], "]"}], " "}]}], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m1", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m2", "2"], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}]}], ",",
+ SuperscriptBox["m3", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ SuperscriptBox["m4", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m5", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m2", "2"], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}]}], ",",
+ SuperscriptBox["m3", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ SuperscriptBox["m4", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m5", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m2", "2"], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}]}], ",",
+ SuperscriptBox["m3", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ SuperscriptBox["m4", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m5", "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m2", "2"], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"], "+",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}]}], ",",
+ SuperscriptBox["m3", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ SuperscriptBox["m4", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"]}], "-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ SuperscriptBox["m5", "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m2", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m3", "2"], "2"]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"2", ",", "3"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ SuperscriptBox["m1", "2"], "2"]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "5"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}]}], ",",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "+",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"1", ",", "2"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"3", ",", "4"}], ")"}]}], "-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{180, 15},
+ ImageSize->{552, 1298},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SetMandelstam",
- CellLabel->"Out[1]=",
- CellID->926226480]
+ CellLabel->"Out[5]="]
}, Open ]],
-Cell["", "SectionFooterSpacer"]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SPD", "[",
+ RowBox[{"p4", ",", "p5"}], "]"}]], "Input",
+ CellLabel->"In[6]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"x", "(",
+ RowBox[{"4", ",", "5"}], ")"}]}], "-",
+ FractionBox[
+ SuperscriptBox["m4", "2"], "2"], "-",
+ FractionBox[
+ SuperscriptBox["m5", "2"], "2"]}], TraditionalForm]], "Output",
+ ImageSize->{161, 38},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
Cell[CellGroupData[{
Cell[TextData[{
@@ -181,9 +1188,7 @@ Cell[TextData[{
ButtonNote->"Mandelstam"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SetMandelstam",
- CellID->122883106]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -200,26 +1205,24 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 40.381391}",
+ "built" -> "{2020, 1, 5, 19, 1, 40.002474}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SetMandelstam[s, t, u, p1, p2, p3, p4, m1, m2, m3, m4] defines the \
-Mandelstam variables s=(p1+p2)^2, t=(p1+p3)^2, u=(p1+p4)^2 and sets the \
-momenta on-shell: p1^2=m1^2, p2^2=m2^2, p3^2=m3^2, p4^2=m4^2. Notice that \
-p1+p2+p3+p4 = 0 is assumed. SetMandelstam[x, {p1, p2, p3, p4, p5}, {m1, m2, \
-m3, m4, m5}] defines x[i, j] = (pi+pj)^2 and sets the momenta on-shell. \
-p1+p2+p3+p4 = 0 is assumed.", "synonyms" -> {}, "title" -> "SetMandelstam",
- "titlemodifier" -> "", "windowtitle" -> "SetMandelstam", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SetMandelstam"}, "SearchTextTranslated" ->
- ""},
+Mandelstam variables s = (p1 + p2) 2, t = (p1 + p3) 2, u = (p1 + p4) 2 and \
+sets the momenta on-shell: p1 2 = m1 2, p2 2 = m2 2, p3 2 = m3 2, p4 2 = m4 \
+2. Notice that p1 + p2 + p3 + p4 = 0 is assumed.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SetMandelstam", "titlemodifier" -> "",
+ "windowtitle" -> "SetMandelstam", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SetMandelstam"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -228,7 +1231,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -237,67 +1240,78 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3831, 102, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[7710, 246, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1199553859]},
- "SetMandelstam"->{
- Cell[4443, 129, 81, 2, 35, "Subsubsection",
- CellTags->"SetMandelstam",
- CellID->162667150],
- Cell[4549, 135, 143, 4, 27, "Input",
- CellTags->"SetMandelstam",
- CellID->412090873],
- Cell[4695, 141, 342, 12, 36, "Output",
- CellTags->"SetMandelstam",
- CellID->926226480],
- Cell[5405, 176, 238, 9, 31, "Text",
- CellTags->"SetMandelstam",
- CellID->122883106]}
+ CellID->1891061268]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7835, 238},
- {"SetMandelstam", 7976, 242}
+ {"PrimaryExamplesSection", 36476, 1241}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 51, "AnchorBarGrid",
+Cell[585, 21, 3027, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 893, 20, 138, "Usage",
+Cell[3615, 97, 290, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3930, 112, 2517, 80, 118, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3831, 102, 388, 15, 31, "PrimaryExamplesSection",
+Cell[6472, 196, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1403689137],
+Cell[7214, 222, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[7270, 226, 96, 2, 70, "Input"],
+Cell[7369, 230, 280, 9, 35, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7710, 246, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1199553859],
-Cell[4222, 119, 196, 6, 25, "ExampleSection",
- CellID->1261629829],
+ CellID->1891061268],
+Cell[CellGroupData[{
+Cell[8123, 265, 195, 6, 26, "ExampleSection",
+ CellID->788890342],
+Cell[8321, 273, 176, 3, 49, "Notes"],
+Cell[8500, 278, 92, 2, 27, "Input"],
Cell[CellGroupData[{
-Cell[4443, 129, 81, 2, 35, "Subsubsection",
- CellTags->"SetMandelstam",
- CellID->162667150],
+Cell[8617, 284, 251, 6, 27, "Input"],
+Cell[8871, 292, 5751, 187, 53, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14659, 484, 267, 7, 62, "Input"],
+Cell[14929, 493, 341, 12, 59, "Output"],
+Cell[15273, 507, 320, 11, 59, "Output"],
+Cell[15596, 520, 320, 11, 59, "Output"]
+}, Open ]],
+Cell[15931, 534, 143, 3, 49, "Notes"],
Cell[CellGroupData[{
-Cell[4549, 135, 143, 4, 27, "Input",
- CellTags->"SetMandelstam",
- CellID->412090873],
-Cell[4695, 141, 342, 12, 36, "Output",
- CellTags->"SetMandelstam",
- CellID->926226480]
+Cell[16099, 541, 188, 5, 45, "Input"],
+Cell[16290, 548, 341, 12, 59, "Output"],
+Cell[16634, 562, 320, 11, 59, "Output"]
}, Open ]],
-Cell[5052, 156, 31, 0, 29, "SectionFooterSpacer"]
+Cell[16969, 576, 146, 3, 49, "Notes"],
+Cell[CellGroupData[{
+Cell[17140, 583, 531, 15, 45, "Input"],
+Cell[17674, 600, 15643, 536, 1319, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[33354, 1141, 104, 3, 27, "Input"],
+Cell[33461, 1146, 401, 14, 59, "Output"]
}, Open ]]
}, Open ]],
+Cell[33889, 1164, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[5132, 162, 270, 12, 31, "SeeAlsoSection",
+Cell[33957, 1169, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5405, 176, 238, 9, 31, "Text",
- CellTags->"SetMandelstam",
- CellID->122883106]
+Cell[34230, 1183, 193, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5658, 188, 23, 0, 42, "FooterCell"]
+Cell[34438, 1193, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetTemporalComponent.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetTemporalComponent.nb
new file mode 100644
index 000000000..71b3d4f86
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SetTemporalComponent.nb
@@ -0,0 +1,293 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8638, 283]
+NotebookOptionsPosition[ 5646, 195]
+NotebookOutlinePosition[ 7851, 253]
+CellTagsIndexPosition[ 7767, 248]
+WindowTitle->SetTemporalComponent
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SetTemporalComponent\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SetTemporalComponent"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SetTemporalComponent.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$231593],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SetTemporalComponent", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SetTemporalComponent", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SetTemporalComponent", "[",
+ RowBox[{"p", ",", "val"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]sets the value of the temporal component of a 4-vector \
+p, TemporalPair[ExplicitLorentzIndex[0],TemporalMomentum[p]] to val."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->417437835],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->620081943],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->871413818],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "t", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->257885032],
+
+Cell[BoxData[
+ RowBox[{"SetTemporalComponent", "[",
+ RowBox[{"p", ",", "t"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2002104407],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TC", "[", "p", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->138481225],
+
+Cell[BoxData[
+ FormBox["t", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->128418288]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"TC", "[",
+ RowBox[{"p", "+", "q"}], "]"}], "//", "ExpandScalarProduct"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->504738512],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], "+", "t"}], TraditionalForm]], "Output",
+ ImageSize->{49, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1433132368]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SetTemporalComponent",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 41.224541}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SetTemporalComponent[p, val] sets the value of the temporal component of \
+a 4-vector p, TemporalPair[ExplicitLorentzIndex[0],TemporalMomentum[p]] to \
+val.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SetTemporalComponent",
+ "titlemodifier" -> "", "windowtitle" -> "SetTemporalComponent", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SetTemporalComponent"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3743, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->417437835]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7624, 241}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 2322, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2917, 76, 297, 11, 45, "ObjectNameGrid"],
+Cell[3217, 89, 501, 13, 101, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3743, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->417437835],
+Cell[CellGroupData[{
+Cell[4155, 125, 195, 6, 26, "ExampleSection",
+ CellID->620081943],
+Cell[4353, 133, 112, 3, 27, "Input",
+ CellID->871413818],
+Cell[4468, 138, 104, 3, 27, "Input",
+ CellID->257885032],
+Cell[4575, 143, 140, 4, 27, "Input",
+ CellID->2002104407],
+Cell[CellGroupData[{
+Cell[4740, 151, 98, 3, 27, "Input",
+ CellID->138481225],
+Cell[4841, 156, 186, 6, 35, "Output",
+ CellID->128418288]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5064, 167, 164, 5, 27, "Input",
+ CellID->504738512],
+Cell[5231, 174, 349, 14, 39, "Output",
+ CellID->1433132368]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5619, 193, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Simplify2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Simplify2.nb
index d4854ea1f..cf696854d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Simplify2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Simplify2.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6709, 208]
-NotebookOptionsPosition[ 4125, 131]
-NotebookOutlinePosition[ 6319, 192]
-CellTagsIndexPosition[ 6208, 186]
+NotebookDataLength[ 5579, 158]
+NotebookOptionsPosition[ 3650, 106]
+NotebookOutlinePosition[ 5515, 155]
+CellTagsIndexPosition[ 5472, 152]
WindowTitle->Simplify2
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$136102],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$233337],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Simplify2", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Simplify2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Simplify2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -91,42 +102,6 @@ PlusDistribution, PolyLog, Zeta2, Epsilon and Deltafunction."
"RowsIndexed" -> {}}},
CellID->982511436],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"Simplify2",
- CellLabel->"In[1]:=",
- CellID->1866023548]
-}, Open ]]
-}, Open ]],
-
Cell[" ", "FooterCell"]
},
Saveable->False,
@@ -141,10 +116,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 42.019927}",
+ "built" -> "{2020, 1, 5, 19, 1, 45.613094}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -152,11 +127,11 @@ TaggingRules->{
"None", "summary" ->
"Simplify2[exp] does some ordering on the expression exp with respect to \
Log, PlusDistribution, PolyLog, Zeta2, Epsilon and Deltafunction.",
- "synonyms" -> {}, "title" -> "Simplify2", "titlemodifier" -> "",
- "windowtitle" -> "Simplify2", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Simplify2"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Simplify2",
+ "titlemodifier" -> "", "windowtitle" -> "Simplify2", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Simplify2"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -165,51 +140,26 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3383, 95, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "Simplify2"->{
- Cell[3977, 122, 94, 3, 70, "Input",
- CellTags->"Simplify2",
- CellID->1866023548]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 5969, 175},
- {"Simplify2", 6096, 179}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[581, 21, 2249, 52, 70, "AnchorBarGrid",
+Cell[581, 21, 2277, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2833, 75, 52, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2888, 78, 470, 13, 70, "Usage",
+Cell[2861, 76, 286, 11, 70, "ObjectNameGrid"],
+Cell[3150, 89, 470, 13, 70, "Usage",
CellID->982511436],
-Cell[CellGroupData[{
-Cell[3383, 95, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[3787, 114, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[3977, 122, 94, 3, 70, "Input",
- CellTags->"Simplify2",
- CellID->1866023548]
-}, Open ]]
-}, Open ]],
-Cell[4098, 129, 23, 0, 70, "FooterCell"]
+Cell[3623, 104, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyDeltaFunction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyDeltaFunction.nb
index 9c9641ed8..a7231d19d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyDeltaFunction.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyDeltaFunction.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21475, 756]
-NotebookOptionsPosition[ 13341, 504]
-NotebookOutlinePosition[ 18202, 639]
-CellTagsIndexPosition[ 18077, 633]
+NotebookDataLength[ 21649, 747]
+NotebookOptionsPosition[ 14155, 524]
+NotebookOutlinePosition[ 18687, 645]
+CellTagsIndexPosition[ 18562, 639]
WindowTitle->SimplifyDeltaFunction
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SimplifyDeltaFunction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SimplifyDeltaFunction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DeltaFunction\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DeltaFunction"], "\<\"DeltaFunctionPrime\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DeltaFunctionPrime"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SimplifyDeltaFunction\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SimplifyDeltaFunction"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SimplifyDeltaFunction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$136447],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SimplifyDeltaFunction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$233775],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SimplifyDeltaFunction", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ SimplifyDeltaFunction.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SimplifyDeltaFunction", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SimplifyDeltaFunction", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -110,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1647774514],
+ CellID->195701692],
Cell[CellGroupData[{
@@ -120,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->846531538],
+ CellID->1321573759],
Cell[CellGroupData[{
@@ -141,12 +175,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{92, 15},
+ ImageSize->{97, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[1]=",
- CellID->117200739]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -170,12 +203,11 @@ Cell[BoxData[
UnderscriptBox["lim",
RowBox[{"x", "\[Rule]", "1"}]], "\[ThinSpace]",
RowBox[{"g", "(", "x", ")"}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{135, 33},
+ ImageSize->{141, 32},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[2]=",
- CellID->226766481]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,12 +230,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{98, 15},
+ ImageSize->{104, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[3]=",
- CellID->1487082282]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -241,12 +272,11 @@ Cell[BoxData[
UnderscriptBox["lim",
RowBox[{"x", "\[Rule]", "1"}]], "\[ThinSpace]",
RowBox[{"g", "(", "x", ")"}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{293, 33},
+ ImageSize->{308, 32},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[4]=",
- CellID->1033550143]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -269,12 +299,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{121, 15},
+ ImageSize->{126, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[5]=",
- CellID->2058651279]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -292,12 +321,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{57, 15},
+ ImageSize->{59, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[6]=",
- CellID->214547923]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -323,12 +351,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{130, 15},
+ ImageSize->{136, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[7]=",
- CellID->102107043]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -347,12 +374,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{67, 15},
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[8]=",
- CellID->1247820634]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -380,12 +406,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{176, 15},
+ ImageSize->{182, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[9]=",
- CellID->1462784843]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -399,12 +424,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
- ImageSize->{11, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[10]=",
- CellID->1037602810]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -430,12 +454,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{130, 15},
+ ImageSize->{136, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[11]=",
- CellID->1786873704]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -454,12 +477,11 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{67, 15},
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyDeltaFunction",
- CellLabel->"Out[12]=",
- CellID->1434858408]
+ CellLabel->"Out[12]="]
}, Open ]]
}, Open ]],
@@ -495,9 +517,7 @@ Cell[TextData[{
ButtonNote->"DeltaFunctionPrime"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SimplifyDeltaFunction",
- CellID->2042613065]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -505,7 +525,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"SimplifyDeltaFunction",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -514,10 +534,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 43.543399}",
+ "built" -> "{2020, 1, 5, 19, 1, 46.629198}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -526,12 +546,12 @@ TaggingRules->{
"SimplifyDeltaFunction[exp, x] simplifies f[x]*DeltaFunction[1-x] \
toLimit[f[x],x->1] DeltaFunction[1-x] and applies a list of transformation \
rules for DeltaFunctionPrime[1-x]*x^(OPEm-1)*f[x] where x^(OPEm-1) is \
-suppressed in exp.", "synonyms" -> {}, "title" -> "SimplifyDeltaFunction",
- "titlemodifier" -> "", "windowtitle" -> "SimplifyDeltaFunction", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SimplifyDeltaFunction"},
- "SearchTextTranslated" -> ""},
+suppressed in exp.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SimplifyDeltaFunction", "titlemodifier" -> "", "windowtitle" ->
+ "SimplifyDeltaFunction", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SimplifyDeltaFunction"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -539,8 +559,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -549,215 +570,185 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3584, 97, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4699, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1647774514]},
+ CellID->195701692]},
"SimplifyDeltaFunction"->{
- Cell[4217, 126, 220, 7, 27, "Input",
+ Cell[5332, 160, 220, 7, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->341273603],
- Cell[4440, 135, 372, 13, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->117200739],
- Cell[4849, 153, 181, 5, 27, "Input",
+ Cell[5555, 169, 352, 12, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[5944, 186, 181, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->197548510],
- Cell[5033, 160, 497, 17, 54, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->226766481],
- Cell[5567, 182, 221, 7, 27, "Input",
+ Cell[6128, 193, 477, 16, 53, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[6642, 214, 221, 7, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1890191905],
- Cell[5791, 191, 406, 14, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1487082282],
- Cell[6234, 210, 182, 5, 27, "Input",
+ Cell[6866, 223, 386, 13, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[7289, 241, 182, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1317091871],
- Cell[6419, 217, 918, 31, 54, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1033550143],
- Cell[7374, 253, 237, 7, 27, "Input",
+ Cell[7474, 248, 897, 30, 53, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[8408, 283, 237, 7, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->160707751],
- Cell[7614, 262, 419, 14, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->2058651279],
- Cell[8070, 281, 181, 5, 27, "Input",
+ Cell[8648, 292, 398, 13, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[9083, 310, 181, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->954894660],
- Cell[8254, 288, 316, 11, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->214547923],
- Cell[8607, 304, 280, 9, 27, "Input",
+ Cell[9267, 317, 296, 10, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[9600, 332, 280, 9, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->962444267],
- Cell[8890, 315, 435, 15, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->102107043],
- Cell[9362, 335, 181, 5, 27, "Input",
+ Cell[9883, 343, 415, 14, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[10335, 362, 181, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->523290366],
- Cell[9546, 342, 339, 12, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1247820634],
- Cell[9922, 359, 316, 10, 27, "Input",
+ Cell[10519, 369, 318, 11, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[10874, 385, 316, 10, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1418492585],
- Cell[10241, 371, 477, 16, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1462784843],
- Cell[10755, 392, 182, 5, 27, "Input",
+ Cell[11193, 397, 456, 15, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[11686, 417, 182, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->591675657],
- Cell[10940, 399, 224, 7, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1037602810],
- Cell[11201, 411, 282, 9, 27, "Input",
+ Cell[11871, 424, 203, 6, 35, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[12111, 435, 282, 9, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1446102124],
- Cell[11486, 422, 437, 15, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1786873704],
- Cell[11960, 442, 183, 5, 27, "Input",
+ Cell[12396, 446, 416, 14, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"],
+ Cell[12849, 465, 183, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1325762264],
- Cell[12146, 449, 340, 12, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1434858408],
- Cell[12854, 484, 445, 15, 31, "Text",
- CellTags->"SimplifyDeltaFunction",
- CellID->2042613065]}
+ Cell[13035, 472, 319, 11, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15359, 550},
- {"SimplifyDeltaFunction", 15507, 554}
+ {"PrimaryExamplesSection", 16215, 571},
+ {"SimplifyDeltaFunction", 16363, 575}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2298, 52, 51, "AnchorBarGrid",
+Cell[593, 21, 3179, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2894, 75, 64, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2961, 78, 598, 15, 99, "Usage",
+Cell[3775, 99, 298, 11, 45, "ObjectNameGrid"],
+Cell[4076, 112, 598, 15, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3584, 97, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4699, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1647774514],
+ CellID->195701692],
Cell[CellGroupData[{
-Cell[3997, 116, 195, 6, 25, "ExampleSection",
- CellID->846531538],
+Cell[5111, 150, 196, 6, 26, "ExampleSection",
+ CellID->1321573759],
Cell[CellGroupData[{
-Cell[4217, 126, 220, 7, 27, "Input",
+Cell[5332, 160, 220, 7, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->341273603],
-Cell[4440, 135, 372, 13, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->117200739]
+Cell[5555, 169, 352, 12, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4849, 153, 181, 5, 27, "Input",
+Cell[5944, 186, 181, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->197548510],
-Cell[5033, 160, 497, 17, 54, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->226766481]
+Cell[6128, 193, 477, 16, 53, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5567, 182, 221, 7, 27, "Input",
+Cell[6642, 214, 221, 7, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1890191905],
-Cell[5791, 191, 406, 14, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1487082282]
+Cell[6866, 223, 386, 13, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6234, 210, 182, 5, 27, "Input",
+Cell[7289, 241, 182, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1317091871],
-Cell[6419, 217, 918, 31, 54, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1033550143]
+Cell[7474, 248, 897, 30, 53, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7374, 253, 237, 7, 27, "Input",
+Cell[8408, 283, 237, 7, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->160707751],
-Cell[7614, 262, 419, 14, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->2058651279]
+Cell[8648, 292, 398, 13, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8070, 281, 181, 5, 27, "Input",
+Cell[9083, 310, 181, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->954894660],
-Cell[8254, 288, 316, 11, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->214547923]
+Cell[9267, 317, 296, 10, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8607, 304, 280, 9, 27, "Input",
+Cell[9600, 332, 280, 9, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->962444267],
-Cell[8890, 315, 435, 15, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->102107043]
+Cell[9883, 343, 415, 14, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9362, 335, 181, 5, 27, "Input",
+Cell[10335, 362, 181, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->523290366],
-Cell[9546, 342, 339, 12, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1247820634]
+Cell[10519, 369, 318, 11, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9922, 359, 316, 10, 27, "Input",
+Cell[10874, 385, 316, 10, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1418492585],
-Cell[10241, 371, 477, 16, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1462784843]
+Cell[11193, 397, 456, 15, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10755, 392, 182, 5, 27, "Input",
+Cell[11686, 417, 182, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->591675657],
-Cell[10940, 399, 224, 7, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1037602810]
+Cell[11871, 424, 203, 6, 35, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11201, 411, 282, 9, 27, "Input",
+Cell[12111, 435, 282, 9, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1446102124],
-Cell[11486, 422, 437, 15, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1786873704]
+Cell[12396, 446, 416, 14, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11960, 442, 183, 5, 27, "Input",
+Cell[12849, 465, 183, 5, 27, "Input",
CellTags->"SimplifyDeltaFunction",
CellID->1325762264],
-Cell[12146, 449, 340, 12, 36, "Output",
- CellTags->"SimplifyDeltaFunction",
- CellID->1434858408]
+Cell[13035, 472, 319, 11, 37, "Output",
+ CellTags->"SimplifyDeltaFunction"]
}, Open ]]
}, Open ]],
-Cell[12513, 465, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13381, 487, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12581, 470, 270, 12, 31, "SeeAlsoSection",
+Cell[13449, 492, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12854, 484, 445, 15, 31, "Text",
- CellTags->"SimplifyDeltaFunction",
- CellID->2042613065]
+Cell[13722, 506, 391, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[13314, 502, 23, 0, 42, "FooterCell"]
+Cell[14128, 522, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyGTI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyGTI.nb
index 4974d9611..f5b6a54c7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyGTI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyGTI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7368, 244]
-NotebookOptionsPosition[ 4561, 159]
-NotebookOutlinePosition[ 6739, 220]
-CellTagsIndexPosition[ 6626, 214]
+NotebookDataLength[ 6690, 206]
+NotebookOptionsPosition[ 4725, 151]
+NotebookOutlinePosition[ 6483, 198]
+CellTagsIndexPosition[ 6440, 195]
WindowTitle->SimplifyGTI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SimplifyGTI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SimplifyGTI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"GTI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GTI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SimplifyGTI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SimplifyGTI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SimplifyGTI.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$136792],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SimplifyGTI", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$234220],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SimplifyGTI", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ SimplifyGTI.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SimplifyGTI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SimplifyGTI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -91,44 +123,6 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1],
-
-Cell[BoxData[""], "Input",
- CellTags->"SimplifyGTI",
- CellLabel->"In[1]:=",
- CellID->1050810759]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["", "SectionFooterSpacer"],
-
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -150,9 +144,7 @@ Cell[TextData[{
ButtonNote->"GTI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SimplifyGTI",
- CellID->1783714031]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -169,19 +161,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 45.602210}",
+ "built" -> "{2020, 1, 5, 19, 1, 47.712961}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "SimplifyGTI simplifies GTI's.", "synonyms" -> {},
- "title" -> "SimplifyGTI", "titlemodifier" -> "", "windowtitle" ->
- "SimplifyGTI", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SimplifyGTI"}},
+ "tabletags" -> {}, "title" -> "SimplifyGTI", "titlemodifier" -> "",
+ "windowtitle" -> "SimplifyGTI", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SimplifyGTI"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -190,62 +183,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3257, 93, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1]},
- "SimplifyGTI"->{
- Cell[3851, 120, 96, 3, 70, "Input",
- CellTags->"SimplifyGTI",
- CellID->1050810759],
- Cell[4303, 145, 216, 9, 70, "Text",
- CellTags->"SimplifyGTI",
- CellID->1783714031]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 6293, 200},
- {"SimplifyGTI", 6422, 204}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[583, 21, 2258, 52, 70, "AnchorBarGrid",
+Cell[583, 21, 3005, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2844, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 331, 11, 70, "Usage",
+Cell[3591, 97, 288, 11, 70, "ObjectNameGrid"],
+Cell[3882, 110, 331, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3257, 93, 379, 15, 70, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1],
-Cell[CellGroupData[{
-Cell[3661, 112, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[3851, 120, 96, 3, 70, "Input",
- CellTags->"SimplifyGTI",
- CellID->1050810759]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3996, 129, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4030, 131, 270, 12, 70, "SeeAlsoSection",
+Cell[4238, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4303, 145, 216, 9, 70, "Text",
- CellTags->"SimplifyGTI",
- CellID->1783714031]
+Cell[4511, 139, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4534, 157, 23, 0, 70, "FooterCell"]
+Cell[4698, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyPolyLog.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyPolyLog.nb
index 24f0a8801..5bc26944c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyPolyLog.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SimplifyPolyLog.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 35736, 1312]
-NotebookOptionsPosition[ 25176, 966]
-NotebookOutlinePosition[ 31132, 1141]
-CellTagsIndexPosition[ 31011, 1135]
+NotebookDataLength[ 35418, 1284]
+NotebookOptionsPosition[ 25745, 978]
+NotebookOutlinePosition[ 31245, 1134]
+CellTagsIndexPosition[ 31124, 1128]
WindowTitle->SimplifyPolyLog
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SimplifyPolyLog\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SimplifyPolyLog"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Nielsen\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Nielsen"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SimplifyPolyLog\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SimplifyPolyLog"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SimplifyPolyLog.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$137137],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SimplifyPolyLog", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$234662],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SimplifyPolyLog", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ SimplifyPolyLog.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SimplifyPolyLog", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SimplifyPolyLog", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +140,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1802516224],
+ CellID->284460771],
Cell[CellGroupData[{
@@ -118,7 +150,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1535057229],
+ CellID->1751609327],
Cell[BoxData[
RowBox[{
@@ -159,12 +191,11 @@ Cell[BoxData[
RowBox[{"log", "(", "x", ")"}]}], "+",
RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ",
RowBox[{"log", "(", "x", ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{472, 43},
+ ImageSize->{476, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[2]=",
- CellID->2071359595]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -190,12 +221,11 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
RowBox[{"log", "(", "x", ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{301, 15},
+ ImageSize->{307, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[3]=",
- CellID->669626223]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -229,12 +259,11 @@ Cell[BoxData[
RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
RowBox[{"x", "+", "1"}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{442, 21},
+ ImageSize->{456, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[4]=",
- CellID->1110979124]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -266,12 +295,11 @@ Cell[BoxData[
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
RowBox[{"log", "(", "x", ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{421, 21},
+ ImageSize->{434, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[5]=",
- CellID->2004136203]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -309,12 +337,11 @@ Cell[BoxData[
RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{451, 41},
+ ImageSize->{463, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[6]=",
- CellID->746814688]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -350,12 +377,11 @@ Cell[BoxData[
RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{441, 41},
+ ImageSize->{452, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[7]=",
- CellID->965485175]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -402,12 +428,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "3"], "(",
RowBox[{"1", "-", "x"}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{252, 41},
+ ImageSize->{261, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[8]=",
- CellID->350232376]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -438,12 +463,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "3"], "(", "x", ")"}], "6"]}]}],
TraditionalForm]], "Output",
- ImageSize->{294, 47},
+ ImageSize->{300, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[9]=",
- CellID->1378986370]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -459,12 +483,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[10]=",
- CellID->1264404285]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -513,12 +536,11 @@ Cell[BoxData[
RowBox[{"4", " ",
TemplateBox[{"3"},
"Zeta"]}]}]}], TraditionalForm]], "Output",
- ImageSize->{413, 43},
+ ImageSize->{415, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[11]=",
- CellID->1217956432]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -584,12 +606,11 @@ Cell[BoxData[
SuperscriptBox["log", "2"], "(", "x", ")"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{511, 87},
+ ImageSize->{527, 74},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[12]=",
- CellID->1165745994]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -650,12 +671,11 @@ Cell[BoxData[
RowBox[{"log", "(", "x", ")"}]}], "-",
TemplateBox[{"3"},
"Zeta"]}]}], TraditionalForm]], "Output",
- ImageSize->{418, 96},
+ ImageSize->{424, 80},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[13]=",
- CellID->1811068047]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -773,12 +793,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(",
RowBox[{"1", "-", "x"}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{539, 158},
+ ImageSize->{544, 139},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[14]=",
- CellID->2000726501]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
@@ -803,12 +822,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"a", " ", "c"}], "+", "b"}], "c"], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{181, 44},
+ ImageSize->{187, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[15]=",
- CellID->352084172]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
@@ -828,12 +846,11 @@ Cell[BoxData[
FractionBox["1", "x"], ")"}], "\[LongEqual]",
RowBox[{"-",
RowBox[{"log", "(", "x", ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{126, 43},
+ ImageSize->{125, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[16]=",
- CellID->1162064393]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
@@ -858,12 +875,11 @@ Cell[BoxData[
FractionBox[
RowBox[{"x", "+", "1"}],
RowBox[{"1", "-", "x"}]]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{186, 43},
+ ImageSize->{184, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[17]=",
- CellID->1326650152]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
@@ -887,12 +903,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["x", "2"], "+", "1"}]], "+", "x"}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{207, 37},
+ ImageSize->{208, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[18]=",
- CellID->580053978]
+ CellLabel->"Out[18]="]
}, Open ]],
Cell[CellGroupData[{
@@ -916,12 +931,11 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["x", "2"], "-", "1"}]], "+", "x"}], ")"}]}],
TraditionalForm]], "Output",
- ImageSize->{210, 37},
+ ImageSize->{210, 33},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SimplifyPolyLog",
- CellLabel->"Out[19]=",
- CellID->654978590]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[BoxData[
@@ -957,9 +971,7 @@ Cell[TextData[{
ButtonNote->"Nielsen"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SimplifyPolyLog",
- CellID->1770209649]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -976,10 +988,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 47.292858}",
+ "built" -> "{2020, 1, 5, 19, 1, 48.766781}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -987,11 +999,12 @@ TaggingRules->{
"None", "summary" ->
"SimplifyPolyLog[y] performs several simplifications assuming that the \
variables occuring in the Log and PolyLog functions are between 0 and 1. ",
- "synonyms" -> {}, "title" -> "SimplifyPolyLog", "titlemodifier" -> "",
- "windowtitle" -> "SimplifyPolyLog", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SimplifyPolyLog"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SimplifyPolyLog",
+ "titlemodifier" -> "", "windowtitle" -> "SimplifyPolyLog", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SimplifyPolyLog"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -999,8 +1012,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1009,311 +1023,269 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3426, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4415, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1802516224]},
+ CellID->284460771]},
"SimplifyPolyLog"->{
- Cell[4038, 122, 241, 7, 29, "Input",
+ Cell[5026, 154, 241, 7, 29, "Input",
CellTags->"SimplifyPolyLog",
CellID->258376485],
- Cell[4304, 133, 212, 7, 27, "Input",
+ Cell[5292, 165, 212, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->312810151],
- Cell[4519, 142, 770, 24, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->2071359595],
- Cell[5326, 171, 187, 6, 27, "Input",
+ Cell[5507, 174, 749, 23, 57, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[6293, 202, 187, 6, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->533586750],
- Cell[5516, 179, 537, 18, 36, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->669626223],
- Cell[6090, 202, 239, 8, 27, "Input",
+ Cell[6483, 210, 517, 17, 37, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[7037, 232, 239, 8, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1083087116],
- Cell[6332, 212, 737, 24, 42, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1110979124],
- Cell[7106, 241, 212, 7, 27, "Input",
+ Cell[7279, 242, 716, 23, 42, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[8032, 270, 212, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->273399044],
- Cell[7321, 250, 714, 23, 42, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->2004136203],
- Cell[8072, 278, 289, 10, 27, "Input",
+ Cell[8247, 279, 693, 22, 42, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[8977, 306, 289, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1780815312],
- Cell[8364, 290, 775, 26, 62, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->746814688],
- Cell[9176, 321, 265, 9, 27, "Input",
+ Cell[9269, 318, 755, 25, 56, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[10061, 348, 265, 9, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->189309767],
- Cell[9444, 332, 750, 25, 62, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->965485175],
- Cell[10231, 362, 299, 10, 27, "Input",
+ Cell[10329, 359, 730, 24, 56, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[11096, 388, 299, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1734664877],
- Cell[10533, 374, 875, 35, 62, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->350232376],
- Cell[11445, 414, 233, 8, 27, "Input",
+ Cell[11398, 400, 855, 34, 56, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[12290, 439, 233, 8, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->128811971],
- Cell[11681, 424, 602, 21, 68, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1378986370],
- Cell[12320, 450, 213, 7, 27, "Input",
+ Cell[12526, 449, 581, 20, 60, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[13144, 474, 213, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->919109136],
- Cell[12536, 459, 221, 7, 36, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1264404285],
- Cell[12794, 471, 213, 7, 27, "Input",
+ Cell[13360, 483, 200, 6, 35, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[13597, 494, 213, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->418960340],
- Cell[13010, 480, 1170, 40, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1217956432],
- Cell[14217, 525, 290, 10, 27, "Input",
+ Cell[13813, 503, 1149, 39, 64, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[14999, 547, 290, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1663942518],
- Cell[14510, 537, 1587, 54, 108, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1165745994],
- Cell[16134, 596, 240, 8, 27, "Input",
+ Cell[15292, 559, 1566, 53, 95, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[16895, 617, 240, 8, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1897345533],
- Cell[16377, 606, 1400, 51, 117, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1811068047],
- Cell[17814, 662, 290, 10, 27, "Input",
+ Cell[17138, 627, 1379, 50, 101, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[18554, 682, 290, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->2143666635],
- Cell[18107, 674, 2964, 106, 179, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->2000726501],
- Cell[21108, 785, 210, 7, 27, "Input",
+ Cell[18847, 694, 2943, 105, 160, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[21827, 804, 210, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1854005981],
- Cell[21321, 794, 442, 16, 65, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->352084172],
- Cell[21800, 815, 185, 6, 27, "Input",
+ Cell[22040, 813, 422, 15, 57, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[22499, 833, 185, 6, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1150742435],
- Cell[21988, 823, 358, 12, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1162064393],
- Cell[22383, 840, 165, 5, 27, "Input",
+ Cell[22687, 841, 337, 11, 57, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[23061, 857, 165, 5, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1515894413],
- Cell[22551, 847, 513, 18, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1326650152],
- Cell[23101, 870, 165, 5, 27, "Input",
+ Cell[23229, 864, 492, 17, 57, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[23758, 886, 165, 5, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1072815012],
- Cell[23269, 877, 461, 17, 58, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->580053978],
- Cell[23767, 899, 165, 5, 27, "Input",
+ Cell[23926, 893, 441, 16, 54, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[24404, 914, 165, 5, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1622675607],
- Cell[23935, 906, 461, 17, 58, "Output",
+ Cell[24572, 921, 441, 16, 54, "Output",
+ CellTags->"SimplifyPolyLog"],
+ Cell[25028, 940, 135, 4, 27, "Input",
CellTags->"SimplifyPolyLog",
- CellID->654978590],
- Cell[24411, 926, 135, 4, 27, "Input",
- CellTags->"SimplifyPolyLog",
- CellID->1270078266],
- Cell[24902, 952, 232, 9, 31, "Text",
- CellTags->"SimplifyPolyLog",
- CellID->1770209649]}
+ CellID->1270078266]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 27083, 1010},
- {"SimplifyPolyLog", 27225, 1014}
+ {"PrimaryExamplesSection", 27697, 1024},
+ {"SimplifyPolyLog", 27839, 1028}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 3029, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 476, 13, 97, "Usage",
+Cell[3619, 97, 292, 11, 45, "ObjectNameGrid"],
+Cell[3914, 110, 476, 13, 101, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3426, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4415, 127, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1802516224],
+ CellID->284460771],
Cell[CellGroupData[{
-Cell[3839, 114, 196, 6, 25, "ExampleSection",
- CellID->1535057229],
-Cell[4038, 122, 241, 7, 29, "Input",
+Cell[4827, 146, 196, 6, 26, "ExampleSection",
+ CellID->1751609327],
+Cell[5026, 154, 241, 7, 29, "Input",
CellTags->"SimplifyPolyLog",
CellID->258376485],
Cell[CellGroupData[{
-Cell[4304, 133, 212, 7, 27, "Input",
+Cell[5292, 165, 212, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->312810151],
-Cell[4519, 142, 770, 24, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->2071359595]
+Cell[5507, 174, 749, 23, 57, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5326, 171, 187, 6, 27, "Input",
+Cell[6293, 202, 187, 6, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->533586750],
-Cell[5516, 179, 537, 18, 36, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->669626223]
+Cell[6483, 210, 517, 17, 37, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6090, 202, 239, 8, 27, "Input",
+Cell[7037, 232, 239, 8, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1083087116],
-Cell[6332, 212, 737, 24, 42, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1110979124]
+Cell[7279, 242, 716, 23, 42, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7106, 241, 212, 7, 27, "Input",
+Cell[8032, 270, 212, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->273399044],
-Cell[7321, 250, 714, 23, 42, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->2004136203]
+Cell[8247, 279, 693, 22, 42, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8072, 278, 289, 10, 27, "Input",
+Cell[8977, 306, 289, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1780815312],
-Cell[8364, 290, 775, 26, 62, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->746814688]
+Cell[9269, 318, 755, 25, 56, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9176, 321, 265, 9, 27, "Input",
+Cell[10061, 348, 265, 9, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->189309767],
-Cell[9444, 332, 750, 25, 62, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->965485175]
+Cell[10329, 359, 730, 24, 56, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10231, 362, 299, 10, 27, "Input",
+Cell[11096, 388, 299, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1734664877],
-Cell[10533, 374, 875, 35, 62, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->350232376]
+Cell[11398, 400, 855, 34, 56, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11445, 414, 233, 8, 27, "Input",
+Cell[12290, 439, 233, 8, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->128811971],
-Cell[11681, 424, 602, 21, 68, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1378986370]
+Cell[12526, 449, 581, 20, 60, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12320, 450, 213, 7, 27, "Input",
+Cell[13144, 474, 213, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->919109136],
-Cell[12536, 459, 221, 7, 36, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1264404285]
+Cell[13360, 483, 200, 6, 35, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12794, 471, 213, 7, 27, "Input",
+Cell[13597, 494, 213, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->418960340],
-Cell[13010, 480, 1170, 40, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1217956432]
+Cell[13813, 503, 1149, 39, 64, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14217, 525, 290, 10, 27, "Input",
+Cell[14999, 547, 290, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1663942518],
-Cell[14510, 537, 1587, 54, 108, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1165745994]
+Cell[15292, 559, 1566, 53, 95, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16134, 596, 240, 8, 27, "Input",
+Cell[16895, 617, 240, 8, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1897345533],
-Cell[16377, 606, 1400, 51, 117, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1811068047]
+Cell[17138, 627, 1379, 50, 101, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[17814, 662, 290, 10, 27, "Input",
+Cell[18554, 682, 290, 10, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->2143666635],
-Cell[18107, 674, 2964, 106, 179, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->2000726501]
+Cell[18847, 694, 2943, 105, 160, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21108, 785, 210, 7, 27, "Input",
+Cell[21827, 804, 210, 7, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1854005981],
-Cell[21321, 794, 442, 16, 65, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->352084172]
+Cell[22040, 813, 422, 15, 57, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21800, 815, 185, 6, 27, "Input",
+Cell[22499, 833, 185, 6, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1150742435],
-Cell[21988, 823, 358, 12, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1162064393]
+Cell[22687, 841, 337, 11, 57, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[22383, 840, 165, 5, 27, "Input",
+Cell[23061, 857, 165, 5, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1515894413],
-Cell[22551, 847, 513, 18, 64, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->1326650152]
+Cell[23229, 864, 492, 17, 57, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23101, 870, 165, 5, 27, "Input",
+Cell[23758, 886, 165, 5, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1072815012],
-Cell[23269, 877, 461, 17, 58, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->580053978]
+Cell[23926, 893, 441, 16, 54, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
Cell[CellGroupData[{
-Cell[23767, 899, 165, 5, 27, "Input",
+Cell[24404, 914, 165, 5, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1622675607],
-Cell[23935, 906, 461, 17, 58, "Output",
- CellTags->"SimplifyPolyLog",
- CellID->654978590]
+Cell[24572, 921, 441, 16, 54, "Output",
+ CellTags->"SimplifyPolyLog"]
}, Open ]],
-Cell[24411, 926, 135, 4, 27, "Input",
+Cell[25028, 940, 135, 4, 27, "Input",
CellTags->"SimplifyPolyLog",
CellID->1270078266]
}, Open ]],
-Cell[24561, 933, 31, 0, 29, "SectionFooterSpacer"]
+Cell[25178, 947, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24629, 938, 270, 12, 31, "SeeAlsoSection",
+Cell[25246, 952, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[24902, 952, 232, 9, 31, "Text",
- CellTags->"SimplifyPolyLog",
- CellID->1770209649]
+Cell[25519, 966, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[25149, 964, 23, 0, 42, "FooterCell"]
+Cell[25718, 976, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SinorUBarD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SinorUBarD.nb
new file mode 100644
index 000000000..fe150d782
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SinorUBarD.nb
@@ -0,0 +1,163 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 5339, 154]
+NotebookOptionsPosition[ 3527, 104]
+NotebookOutlinePosition[ 5275, 151]
+CellTagsIndexPosition[ 5232, 148]
+WindowTitle->SinorUBarD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SinorUBarD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SinorUBarD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SinorUBarD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$235551],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SinorUBarD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SinorUBarD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SinorUBarD", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]SinorUBarD"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"SinorUBarD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 51.241256}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "SinorUBarD[] SinorUBarD", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SinorUBarD", "titlemodifier" -> "",
+ "windowtitle" -> "SinorUBarD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SinorUBarD"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[582, 21, 2281, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2866, 76, 287, 11, 70, "ObjectNameGrid"],
+Cell[3156, 89, 341, 11, 70, "Usage",
+ CellID->982511436],
+Cell[3500, 102, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SirlinSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SirlinSimplify.nb
new file mode 100644
index 000000000..a0bbdb1e9
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SirlinSimplify.nb
@@ -0,0 +1,620 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 17588, 610]
+NotebookOptionsPosition[ 14042, 505]
+NotebookOutlinePosition[ 16367, 565]
+CellTagsIndexPosition[ 16282, 560]
+WindowTitle->SirlinSimplify
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorChainTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorChainTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SirlinSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SirlinSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SirlinSimplify.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$235990],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SirlinSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SirlinSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SirlinSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]simplifies spinor chains that contain Dirac matrices \
+using relations derived by Sirlin in Nuclear Physics B192 (1981) 93-99. \
+Contrary to the original paper, the sign of the Levi-Civita tensor is choosen \
+as ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Epsilon]", "0123"], "=", "1"}]], "InlineFormula"],
+ " which is the standard choice in FeynCalc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->992072733],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SirlinSimplify", "]"}]], "Input",
+ CellLabel->"In[14]:=",
+ CellID->250226562],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"FCCanonicalizeDummyIndices", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{464, 73},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[14]=",
+ CellID->1582403712]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->788160319],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1916597711],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p3", ",", "m3"}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "7"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}]}], " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p4", ",", "m4"}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "7"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->218568636],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p3",
+ TraditionalForm], ",",
+ FormBox["m3",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p4",
+ TraditionalForm], ",",
+ FormBox["m4",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{482, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->612231135]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SirlinSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->989392439],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m3",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["liS72",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m4",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["liS72",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{548, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1691287289]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SirlinSimplify",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 1, 52.237882}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SirlinSimplify[exp] simplifies spinor chains that contain Dirac matrices \
+using relations derived by Sirlin in Nuclear Physics B192 (1981) 93-99. \
+Contrary to the original paper, the sign of the Levi-Civita tensor is choosen \
+as \\[Epsilon]^0123 = 1 which is the standard choice in FeynCalc.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SirlinSimplify",
+ "titlemodifier" -> "", "windowtitle" -> "SirlinSimplify", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SirlinSimplify"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6754, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->788160319]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 16139, 553}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3223, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3812, 100, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4128, 115, 715, 18, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4868, 137, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->992072733],
+Cell[5609, 163, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5665, 167, 117, 3, 70, "Input",
+ CellID->250226562],
+Cell[5785, 172, 908, 21, 94, "Output",
+ CellID->1582403712]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6754, 200, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->788160319],
+Cell[CellGroupData[{
+Cell[7166, 219, 196, 6, 26, "ExampleSection",
+ CellID->1916597711],
+Cell[CellGroupData[{
+Cell[7387, 229, 588, 17, 45, "Input",
+ CellID->218568636],
+Cell[7978, 248, 2236, 91, 39, "Output",
+ CellID->612231135]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10251, 344, 110, 3, 27, "Input",
+ CellID->989392439],
+Cell[10364, 349, 2719, 108, 43, "Output",
+ CellID->1691287289]
+}, Open ]]
+}, Open ]],
+Cell[13110, 461, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[13178, 466, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[13451, 480, 549, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[14015, 503, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallDelta.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallDelta.nb
index 5f75f3b57..71499e392 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallDelta.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallDelta.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5136, 144]
-NotebookOptionsPosition[ 3272, 93]
-NotebookOutlinePosition[ 5058, 140]
-CellTagsIndexPosition[ 5015, 137]
+NotebookDataLength[ 5369, 154]
+NotebookOptionsPosition[ 3534, 104]
+NotebookOutlinePosition[ 5305, 151]
+CellTagsIndexPosition[ 5262, 148]
WindowTitle->SmallDelta
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$137488],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$237736],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/SmallDelta", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SmallDelta", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SmallDelta", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -103,20 +114,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 49.452302}",
+ "built" -> "{2020, 1, 5, 19, 1, 56.853237}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "SmallDelta denotes some small positive number.",
- "synonyms" -> {}, "title" -> "SmallDelta", "titlemodifier" -> "",
- "windowtitle" -> "SmallDelta", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SmallDelta"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SmallDelta",
+ "titlemodifier" -> "", "windowtitle" -> "SmallDelta", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/SmallDelta"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -125,7 +136,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -139,13 +150,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 70, "AnchorBarGrid",
+Cell[582, 21, 2281, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 348, 11, 70, "Usage",
+Cell[2866, 76, 287, 11, 70, "ObjectNameGrid"],
+Cell[3156, 89, 348, 11, 70, "Usage",
CellID->982511436],
-Cell[3245, 91, 23, 0, 70, "FooterCell"]
+Cell[3507, 102, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallEpsilon.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallEpsilon.nb
index e6e2c1378..a7dd1d44c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallEpsilon.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallEpsilon.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5161, 144]
-NotebookOptionsPosition[ 3287, 93]
-NotebookOutlinePosition[ 5083, 140]
-CellTagsIndexPosition[ 5040, 137]
+NotebookDataLength[ 5394, 154]
+NotebookOptionsPosition[ 3549, 104]
+NotebookOutlinePosition[ 5330, 151]
+CellTagsIndexPosition[ 5287, 148]
WindowTitle->SmallEpsilon
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ SmallEpsilon.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$137830],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$238172],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/SmallEpsilon", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ SmallEpsilon.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SmallEpsilon", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SmallEpsilon", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -103,20 +114,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 50.936093}",
+ "built" -> "{2020, 1, 5, 19, 1, 57.635032}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "SmallEpsilon denotes some small positive number.",
- "synonyms" -> {}, "title" -> "SmallEpsilon", "titlemodifier" -> "",
- "windowtitle" -> "SmallEpsilon", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SmallEpsilon"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SmallEpsilon",
+ "titlemodifier" -> "", "windowtitle" -> "SmallEpsilon", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SmallEpsilon"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -125,7 +136,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -139,13 +150,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 2290, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 350, 11, 70, "Usage",
+Cell[2877, 76, 289, 11, 70, "ObjectNameGrid"],
+Cell[3169, 89, 350, 11, 70, "Usage",
CellID->982511436],
-Cell[3260, 91, 23, 0, 70, "FooterCell"]
+Cell[3522, 102, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariable.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariable.nb
index d3ac9ca35..b5b825d9f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariable.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariable.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6791, 204]
-NotebookOptionsPosition[ 4396, 136]
-NotebookOutlinePosition[ 6525, 193]
-CellTagsIndexPosition[ 6450, 188]
+NotebookDataLength[ 7729, 228]
+NotebookOptionsPosition[ 5552, 170]
+NotebookOutlinePosition[ 7520, 220]
+CellTagsIndexPosition[ 7477, 217]
WindowTitle->SmallVariable
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SmallVariable\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SmallVariable"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVe\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"PropagatorDenominator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PropagatorDenominator"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SmallVariable\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SmallVariable"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SmallVariable.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$138175],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SmallVariable", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$238611],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SmallVariable", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ SmallVariable.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SmallVariable", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SmallVariable", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -127,9 +163,7 @@ Cell[TextData[{
ButtonNote->"PropagatorDenominator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SmallVariable",
- CellID->172314915]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -146,10 +180,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 52.324126}",
+ "built" -> "{2020, 1, 5, 19, 1, 58.444344}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -158,11 +192,11 @@ TaggingRules->{
"SmallVariable[me] is the head of small (negligible) variables. This \
means any mass with this head can be neglected if it appears in a sum, but \
not as an argument of Passarino-Veltman (PaVe) functions or \
-PropagatorDenominator.", "synonyms" -> {}, "title" -> "SmallVariable",
- "titlemodifier" -> "", "windowtitle" -> "SmallVariable", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SmallVariable"}},
+PropagatorDenominator.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SmallVariable", "titlemodifier" -> "", "windowtitle" -> "SmallVariable",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/SmallVariable"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -171,41 +205,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SmallVariable"->{
- Cell[3771, 110, 583, 21, 70, "Text",
- CellTags->"SmallVariable",
- CellID->172314915]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SmallVariable", 6334, 181}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[585, 21, 2266, 52, 70, "AnchorBarGrid",
+Cell[585, 21, 3233, 78, 70, "AnchorBarGrid",
CellID->1],
-Cell[2854, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 560, 14, 70, "Usage",
+Cell[3821, 101, 290, 11, 70, "ObjectNameGrid"],
+Cell[4114, 114, 560, 14, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3498, 96, 270, 12, 70, "SeeAlsoSection",
+Cell[4699, 132, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3771, 110, 583, 21, 70, "Text",
- CellTags->"SmallVariable",
- CellID->172314915]
+Cell[4972, 146, 538, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4369, 134, 23, 0, 70, "FooterCell"]
+Cell[5525, 168, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariables.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariables.nb
index e088ecda5..5ff3c6e46 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariables.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SmallVariables.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6299, 190]
-NotebookOptionsPosition[ 3963, 123]
-NotebookOutlinePosition[ 6033, 179]
-CellTagsIndexPosition[ 5957, 174]
+NotebookDataLength[ 7025, 211]
+NotebookOptionsPosition[ 4906, 153]
+NotebookOutlinePosition[ 6818, 203]
+CellTagsIndexPosition[ 6775, 200]
WindowTitle->SmallVariables
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SmallVariables\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SmallVariables"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SmallVariables\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SmallVariables"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SmallVariables.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$138521],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SmallVariables", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$239055],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SmallVariables", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ SmallVariables.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SmallVariables", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SmallVariables", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SmallVariables",
- CellID->922771173]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 53.737963}",
+ "built" -> "{2020, 1, 5, 19, 1, 59.430370}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -144,11 +174,12 @@ TaggingRules->{
"None", "summary" ->
"SmallVariables is an option for OneLoop. \"SmallVariables->{Melectron}\" \
i.e. will substitute \"SmallVariable[Melectron]\" for all Melectron's in the \
-calculation.", "synonyms" -> {}, "title" -> "SmallVariables", "titlemodifier" ->
- "", "windowtitle" -> "SmallVariables", "type" -> "Symbol", "uri" ->
+calculation.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SmallVariables", "titlemodifier" -> "", "windowtitle" ->
+ "SmallVariables", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SmallVariables"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +188,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SmallVariables"->{
- Cell[3691, 109, 230, 9, 70, "Text",
- CellTags->"SmallVariables",
- CellID->922771173]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SmallVariables", 5841, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3025, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 474, 13, 70, "Usage",
+Cell[3614, 97, 291, 11, 70, "ObjectNameGrid"],
+Cell[3908, 110, 474, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3418, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4407, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3691, 109, 230, 9, 70, "Text",
- CellTags->"SmallVariables",
- CellID->922771173]
+Cell[4680, 141, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3936, 121, 23, 0, 70, "FooterCell"]
+Cell[4879, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Smu.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Smu.nb
deleted file mode 100644
index b9966dc4c..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Smu.nb
+++ /dev/null
@@ -1,152 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5003, 143]
-NotebookOptionsPosition[ 3208, 93]
-NotebookOutlinePosition[ 4925, 139]
-CellTagsIndexPosition[ 4882, 136]
-WindowTitle->Smu
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Smu\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Smu"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Smu.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$139205],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Smu",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Smu", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["Smu"], "InlineFormula"],
- " \[LineSeparator]",
- " is ..."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"Smu",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 56.600918}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "Smu is ...", "synonyms" -> {}, "title" -> "Smu",
- "titlemodifier" -> "", "windowtitle" -> "Smu", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Smu"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{}
-*)
-(*CellTagsIndex
-CellTagsIndex->{}
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 313, 11, 70, "Usage",
- CellID->982511436],
-Cell[3181, 91, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Sn.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Sn.nb
index 63e827f9e..aa9630e60 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Sn.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Sn.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5299, 154]
-NotebookOptionsPosition[ 3487, 104]
-NotebookOutlinePosition[ 5220, 150]
-CellTagsIndexPosition[ 5177, 147]
+NotebookDataLength[ 5530, 164]
+NotebookOptionsPosition[ 3749, 115]
+NotebookOutlinePosition[ 5466, 161]
+CellTagsIndexPosition[ 5423, 158]
WindowTitle->Sn
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$139879],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$240837],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/Sn",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Sn", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Sn", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,19 +125,19 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 24, 59.310534}",
+ "built" -> "{2020, 1, 5, 19, 2, 3.846771}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "Sn is \\[Pi] n/2/(2 \\[Pi]) n.", "synonyms" -> {},
- "title" -> "Sn", "titlemodifier" -> "", "windowtitle" -> "Sn", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/Sn"}},
+ "tabletags" -> {}, "title" -> "Sn", "titlemodifier" -> "", "windowtitle" ->
+ "Sn", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Sn"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -135,7 +146,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -149,13 +160,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 2262, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 598, 22, 70, "Usage",
+Cell[2839, 76, 279, 11, 70, "ObjectNameGrid"],
+Cell[3121, 89, 598, 22, 70, "Usage",
CellID->982511436],
-Cell[3460, 102, 23, 0, 70, "FooterCell"]
+Cell[3722, 113, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve2.nb
index bf68c51c6..3fbe2fff5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve2.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13722, 486]
-NotebookOptionsPosition[ 8735, 323]
-NotebookOutlinePosition[ 12149, 422]
-CellTagsIndexPosition[ 12039, 416]
+NotebookDataLength[ 14532, 516]
+NotebookOptionsPosition[ 9695, 361]
+NotebookOutlinePosition[ 12893, 452]
+CellTagsIndexPosition[ 12783, 446]
WindowTitle->Solve2
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$140570],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$241722],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/Solve2",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Solve2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Solve2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -95,32 +108,33 @@ Solve."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1834799159],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1936670129],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1860198019],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -137,16 +151,47 @@ Cell[BoxData[
RowBox[{"Factoring", "\[Rule]", "Factor2"}], ",",
RowBox[{"FinalSubstitutions", "\[Rule]",
RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{305, 15},
+ ImageSize->{274, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve2",
CellLabel->"Out[1]=",
CellID->549167872]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->80636217],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1002636004],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"Solve2", "[",
RowBox[{
@@ -161,7 +206,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "y"}], "}"}]}], "]"}]], "Input",
CellTags->"Solve2",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1039333426],
Cell[BoxData[
@@ -176,19 +221,16 @@ Cell[BoxData[
RowBox[{"2", " ", "b"}], "-", "w"}], ")"}]}]}], ",",
RowBox[{"y", "\[Rule]",
RowBox[{"d", "+", "p"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{201, 41},
+ ImageSize->{212, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve2",
- CellLabel->"Out[2]=",
- CellID->1123970589]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell["\<\
If no equation sign is given the polynomials are supposed to be 0.\
-\>", "Text",
- CellTags->"Solve2",
- CellID->599967125],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -197,7 +239,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"x", "+", "y"}], ",", "x"}], "]"}]], "Input",
CellTags->"Solve2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1138368341],
Cell[BoxData[
@@ -205,12 +247,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", "\[Rule]",
RowBox[{"-", "y"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{66, 15},
+ ImageSize->{69, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve2",
- CellLabel->"Out[3]=",
- CellID->1865369573]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -223,7 +264,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"y", "\[Rule]", "h"}], "}"}]}]}], "]"}]], "Input",
CellTags->"Solve2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->455409208],
Cell[BoxData[
@@ -231,12 +272,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", "\[Rule]",
RowBox[{"-", "h"}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{68, 15},
+ ImageSize->{69, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve2",
- CellLabel->"Out[4]=",
- CellID->1227314769]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -256,7 +296,7 @@ Cell[BoxData[
RowBox[{"x", ",", "y"}], "}"}], ",",
RowBox[{"Factoring", "\[Rule]", "Expand"}]}], "]"}]], "Input",
CellTags->"Solve2",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->881839558],
Cell[BoxData[
@@ -269,12 +309,11 @@ Cell[BoxData[
FractionBox["w", "4"]}]}], ",",
RowBox[{"y", "\[Rule]",
RowBox[{"d", "+", "p"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{170, 42},
+ ImageSize->{180, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve2",
- CellLabel->"Out[5]=",
- CellID->950466968]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -293,7 +332,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "y"}], "}"}]}], "]"}]], "Input",
CellTags->"Solve2",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->564833870],
Cell[BoxData[
@@ -309,12 +348,11 @@ Cell[BoxData[
RowBox[{"2", " ", "b"}], "-", "w"}], ")"}]}]}], ",",
RowBox[{"y", "\[Rule]",
RowBox[{"d", "+", "p"}]}]}], "}"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{219, 41},
+ ImageSize->{228, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve2",
- CellLabel->"Out[6]=",
- CellID->1055420746]
+ CellLabel->"Out[5]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -323,8 +361,8 @@ Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"Solve2",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -333,10 +371,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 2.033976}",
+ "built" -> "{2020, 1, 5, 19, 2, 5.771678}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -346,11 +384,11 @@ TaggingRules->{
equations (and returns just a list) and accepts the options Factoring and \
FinalSubstitutions. Solve2 uses the \"high school algorithm\" and factors \
intermediate results. Therefore it can be drastically more useful than \
-Solve.", "synonyms" -> {}, "title" -> "Solve2", "titlemodifier" -> "",
- "windowtitle" -> "Solve2", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Solve2"}, "SearchTextTranslated" -> ""},
+Solve.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Solve2",
+ "titlemodifier" -> "", "windowtitle" -> "Solve2", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Solve2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -359,7 +397,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -367,127 +405,119 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3498, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1834799159]},
"Solve2"->{
- Cell[4132, 126, 130, 4, 27, "Input",
+ Cell[4580, 140, 130, 4, 70, "Input",
CellTags->"Solve2",
CellID->1980966786],
- Cell[4265, 132, 369, 12, 36, "Output",
+ Cell[4713, 146, 369, 12, 37, "Output",
CellTags->"Solve2",
CellID->549167872],
- Cell[4671, 149, 408, 15, 27, "Input",
+ Cell[5775, 194, 408, 15, 27, "Input",
CellTags->"Solve2",
CellID->1039333426],
- Cell[5082, 166, 479, 17, 62, "Output",
- CellTags->"Solve2",
- CellID->1123970589],
- Cell[5576, 186, 131, 4, 32, "Text",
- CellTags->"Solve2",
- CellID->599967125],
- Cell[5732, 194, 171, 6, 27, "Input",
+ Cell[6186, 211, 458, 16, 56, "Output",
+ CellTags->"Solve2"],
+ Cell[6775, 236, 171, 6, 27, "Input",
CellTags->"Solve2",
CellID->1138368341],
- Cell[5906, 202, 281, 10, 36, "Output",
- CellTags->"Solve2",
- CellID->1865369573],
- Cell[6224, 217, 284, 9, 27, "Input",
+ Cell[6949, 244, 260, 9, 37, "Output",
+ CellTags->"Solve2"],
+ Cell[7246, 258, 284, 9, 27, "Input",
CellTags->"Solve2",
CellID->455409208],
- Cell[6511, 228, 281, 10, 36, "Output",
- CellTags->"Solve2",
- CellID->1227314769],
- Cell[6829, 243, 460, 16, 27, "Input",
+ Cell[7533, 269, 260, 9, 35, "Output",
+ CellTags->"Solve2"],
+ Cell[7830, 283, 460, 16, 27, "Input",
CellTags->"Solve2",
CellID->881839558],
- Cell[7292, 261, 419, 15, 63, "Output",
- CellTags->"Solve2",
- CellID->950466968],
- Cell[7748, 281, 406, 15, 27, "Input",
+ Cell[8293, 301, 399, 14, 56, "Output",
+ CellTags->"Solve2"],
+ Cell[8729, 320, 406, 15, 27, "Input",
CellTags->"Solve2",
CellID->564833870],
- Cell[8157, 298, 512, 18, 62, "Output",
- CellTags->"Solve2",
- CellID->1055420746]}
+ Cell[9138, 337, 491, 17, 56, "Output",
+ CellTags->"Solve2"]},
+ "PrimaryExamplesSection"->{
+ Cell[5143, 165, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->80636217]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10756, 369},
- {"Solve2", 10889, 373}
+ {"Solve2", 11685, 407},
+ {"PrimaryExamplesSection", 12641, 439}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 603, 15, 113, "Usage",
- CellID->982511436],
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3498, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1834799159],
+Cell[3154, 91, 603, 15, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3911, 116, 196, 6, 25, "ExampleSection",
- CellID->1860198019],
+Cell[3782, 110, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1936670129],
+Cell[4524, 136, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4132, 126, 130, 4, 27, "Input",
+Cell[4580, 140, 130, 4, 70, "Input",
CellTags->"Solve2",
CellID->1980966786],
-Cell[4265, 132, 369, 12, 36, "Output",
+Cell[4713, 146, 369, 12, 37, "Output",
CellTags->"Solve2",
CellID->549167872]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4671, 149, 408, 15, 27, "Input",
+Cell[5143, 165, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->80636217],
+Cell[CellGroupData[{
+Cell[5554, 184, 196, 6, 26, "ExampleSection",
+ CellID->1002636004],
+Cell[CellGroupData[{
+Cell[5775, 194, 408, 15, 27, "Input",
CellTags->"Solve2",
CellID->1039333426],
-Cell[5082, 166, 479, 17, 62, "Output",
- CellTags->"Solve2",
- CellID->1123970589]
+Cell[6186, 211, 458, 16, 56, "Output",
+ CellTags->"Solve2"]
}, Open ]],
-Cell[5576, 186, 131, 4, 32, "Text",
- CellTags->"Solve2",
- CellID->599967125],
+Cell[6659, 230, 91, 2, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5732, 194, 171, 6, 27, "Input",
+Cell[6775, 236, 171, 6, 27, "Input",
CellTags->"Solve2",
CellID->1138368341],
-Cell[5906, 202, 281, 10, 36, "Output",
- CellTags->"Solve2",
- CellID->1865369573]
+Cell[6949, 244, 260, 9, 37, "Output",
+ CellTags->"Solve2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6224, 217, 284, 9, 27, "Input",
+Cell[7246, 258, 284, 9, 27, "Input",
CellTags->"Solve2",
CellID->455409208],
-Cell[6511, 228, 281, 10, 36, "Output",
- CellTags->"Solve2",
- CellID->1227314769]
+Cell[7533, 269, 260, 9, 35, "Output",
+ CellTags->"Solve2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6829, 243, 460, 16, 27, "Input",
+Cell[7830, 283, 460, 16, 27, "Input",
CellTags->"Solve2",
CellID->881839558],
-Cell[7292, 261, 419, 15, 63, "Output",
- CellTags->"Solve2",
- CellID->950466968]
+Cell[8293, 301, 399, 14, 56, "Output",
+ CellTags->"Solve2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7748, 281, 406, 15, 27, "Input",
+Cell[8729, 320, 406, 15, 27, "Input",
CellTags->"Solve2",
CellID->564833870],
-Cell[8157, 298, 512, 18, 62, "Output",
- CellTags->"Solve2",
- CellID->1055420746]
+Cell[9138, 337, 491, 17, 56, "Output",
+ CellTags->"Solve2"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[8708, 321, 23, 0, 42, "FooterCell"]
+Cell[9668, 359, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve3.nb
index 264bf98b2..e83a849ce 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Solve3.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8886, 290]
-NotebookOptionsPosition[ 5608, 190]
-NotebookOutlinePosition[ 8169, 261]
-CellTagsIndexPosition[ 8061, 255]
+NotebookDataLength[ 10118, 337]
+NotebookOptionsPosition[ 6727, 234]
+NotebookOutlinePosition[ 9228, 303]
+CellTagsIndexPosition[ 9120, 297]
WindowTitle->Solve3
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$140906],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$242154],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/Solve3",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Solve3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Solve3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,6 +106,63 @@ sometimes better than Solve for systems involving rational polyonomials."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1639737478],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Solve3", "]"}]], "Input",
+ CellTags->"Solve3",
+ CellLabel->"In[26]:=",
+ CellID->1333669928],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"ParallelMap", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{508, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Solve3",
+ CellLabel->"Out[26]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -108,7 +178,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1651359721],
+ CellID->999196841],
Cell[CellGroupData[{
@@ -118,32 +188,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1038726886],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Solve3", "]"}]], "Input",
- CellTags->"Solve3",
- CellLabel->"In[1]:=",
- CellID->1333669928],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"FinalSubstitutions", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"ParallelMap", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{427, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Solve3",
- CellLabel->"Out[1]=",
- CellID->1579913582]
-}, Open ]],
+ CellID->1198337696],
Cell[CellGroupData[{
@@ -161,7 +206,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "y"}], "}"}]}], "]"}]], "Input",
CellTags->"Solve3",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1175774569],
Cell[BoxData[
@@ -176,12 +221,11 @@ Cell[BoxData[
RowBox[{"2", " ", "b"}], "-", "w"}], ")"}]}]}], ",",
RowBox[{"y", "\[Rule]",
RowBox[{"d", "+", "p"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{201, 41},
+ ImageSize->{212, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Solve3",
- CellLabel->"Out[2]=",
- CellID->158619342]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -200,10 +244,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 3.529024}",
+ "built" -> "{2020, 1, 5, 19, 2, 6.944816}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -212,11 +256,11 @@ TaggingRules->{
"Solve3 is equivalent to Solve, except that it works only for linear \
equations (and returns just a list) and uses the \"high school algorithm\" \
and is sometimes better than Solve for systems involving rational \
-polyonomials.", "synonyms" -> {}, "title" -> "Solve3", "titlemodifier" -> "",
- "windowtitle" -> "Solve3", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Solve3"}, "SearchTextTranslated" -> ""},
+polyonomials.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Solve3",
+ "titlemodifier" -> "", "windowtitle" -> "Solve3", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Solve3"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -225,7 +269,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -233,65 +277,68 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3423, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1651359721]},
"Solve3"->{
- Cell[4057, 124, 130, 4, 27, "Input",
+ Cell[4505, 138, 131, 4, 70, "Input",
CellTags->"Solve3",
CellID->1333669928],
- Cell[4190, 130, 426, 14, 36, "Output",
- CellTags->"Solve3",
- CellID->1579913582],
- Cell[4653, 149, 408, 15, 27, "Input",
+ Cell[4639, 144, 459, 14, 37, "Output",
+ CellTags->"Solve3"],
+ Cell[5792, 194, 408, 15, 27, "Input",
CellTags->"Solve3",
CellID->1175774569],
- Cell[5064, 166, 478, 17, 62, "Output",
- CellTags->"Solve3",
- CellID->158619342]}
+ Cell[6203, 211, 458, 16, 56, "Output",
+ CellTags->"Solve3"]},
+ "PrimaryExamplesSection"->{
+ Cell[5159, 165, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->999196841]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7556, 235},
- {"Solve3", 7689, 239}
+ {"Solve3", 8644, 279},
+ {"PrimaryExamplesSection", 8977, 290}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 528, 13, 113, "Usage",
- CellID->982511436],
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3423, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1651359721],
+Cell[3154, 91, 528, 13, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3836, 114, 196, 6, 25, "ExampleSection",
- CellID->1038726886],
+Cell[3707, 108, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1639737478],
+Cell[4449, 134, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4057, 124, 130, 4, 27, "Input",
+Cell[4505, 138, 131, 4, 70, "Input",
CellTags->"Solve3",
CellID->1333669928],
-Cell[4190, 130, 426, 14, 36, "Output",
- CellTags->"Solve3",
- CellID->1579913582]
+Cell[4639, 144, 459, 14, 37, "Output",
+ CellTags->"Solve3"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4653, 149, 408, 15, 27, "Input",
+Cell[5159, 165, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->999196841],
+Cell[CellGroupData[{
+Cell[5571, 184, 196, 6, 26, "ExampleSection",
+ CellID->1198337696],
+Cell[CellGroupData[{
+Cell[5792, 194, 408, 15, 27, "Input",
CellTags->"Solve3",
CellID->1175774569],
-Cell[5064, 166, 478, 17, 62, "Output",
- CellTags->"Solve3",
- CellID->158619342]
+Cell[6203, 211, 458, 16, 56, "Output",
+ CellTags->"Solve3"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[5581, 188, 23, 0, 42, "FooterCell"]
+Cell[6700, 232, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinPolarizationSum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinPolarizationSum.nb
index 52d70e5a3..7d62d2d9d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinPolarizationSum.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinPolarizationSum.nb
@@ -10,62 +10,84 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6277, 189]
-NotebookOptionsPosition[ 3954, 122]
-NotebookOutlinePosition[ 6005, 178]
-CellTagsIndexPosition[ 5924, 173]
+NotebookDataLength[ 6992, 209]
+NotebookOptionsPosition[ 4905, 152]
+NotebookOutlinePosition[ 6785, 201]
+CellTagsIndexPosition[ 6742, 198]
WindowTitle->SpinPolarizationSum
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SpinPolarizationSum\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SpinPolarizationSum"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FermionSpinSum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FermionSpinSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinPolarizationSum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinPolarizationSum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SpinPolarizationSum.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$144020],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SpinPolarizationSum", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$256533],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinPolarizationSum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ SpinPolarizationSum.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SpinPolarizationSum", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SpinPolarizationSum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"FermionSpinSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SpinPolarizationSum",
- CellID->2085782463]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,18 +162,18 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 17.145632}",
+ "built" -> "{2019, 3, 29, 17, 53, 53.180042}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SpinPolarizationSum is an option for FermionSpinSum. The set (pure) \
-function acts on the usual spin sum.", "synonyms" -> {}, "title" ->
- "SpinPolarizationSum", "titlemodifier" -> "", "windowtitle" ->
+function acts on the usual spin sum.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SpinPolarizationSum", "titlemodifier" -> "", "windowtitle" ->
"SpinPolarizationSum", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SpinPolarizationSum"}},
CellContext->"Global`",
@@ -163,34 +193,24 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SpinPolarizationSum"->{
- Cell[3655, 108, 257, 9, 70, "Text",
- CellTags->"SpinPolarizationSum",
- CellID->2085782463]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SpinPolarizationSum", 5802, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 70, "AnchorBarGrid",
+Cell[591, 21, 3059, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 408, 12, 70, "Usage",
+Cell[3653, 97, 296, 11, 70, "ObjectNameGrid"],
+Cell[3952, 110, 408, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3382, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4385, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3655, 108, 257, 9, 70, "Text",
- CellTags->"SpinPolarizationSum",
- CellID->2085782463]
+Cell[4658, 140, 205, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3927, 120, 23, 0, 70, "FooterCell"]
+Cell[4878, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Spinor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Spinor.nb
index f19823225..68ff1f44c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Spinor.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Spinor.nb
@@ -3,69 +3,101 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18982, 695]
-NotebookOptionsPosition[ 12288, 477]
-NotebookOutlinePosition[ 16635, 601]
-CellTagsIndexPosition[ 16525, 595]
+NotebookDataLength[ 20282, 755]
+NotebookOptionsPosition[ 14563, 567]
+NotebookOutlinePosition[ 17787, 663]
+CellTagsIndexPosition[ 17677, 657]
WindowTitle->Spinor
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Spinor\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Spinor"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Spinor.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FermionSpinSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FermionSpinSum"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBar"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Spinor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Spinor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Spinor.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$142301],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Spinor",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$245728],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Spinor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,62 +105,27 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Spinor", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Spinor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"Spinor", "[",
RowBox[{"p", ",", " ", "m", ",", " ", "o"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of Dirac spinors. Which of the spinors ",
- StyleBox["u",
- FontSlant->"Italic"],
- ", ",
- StyleBox["v",
- FontSlant->"Italic"],
- ", ",
- Cell[BoxData[
- FormBox[
- OverscriptBox["u", "_"], TraditionalForm]]],
- " ",
- Cell[BoxData[
- FormBox[
- RowBox[{",", " "}], TraditionalForm]]],
- "or ",
- Cell[BoxData[
- FormBox[
- OverscriptBox["v",
- RowBox[{"_", " "}]], TraditionalForm]]],
- "is understood, depends on the sign of the momentum (p) argument and the \
-relative position of DiracSlash[p]: Spinor[sign p, mass] is that spinor which \
-yields: sign*mass*Spinor[p, mass] if the Dirac equation is applied (by \
-DiracEquation or DiracSimplify).\nThe optional argument o can be used for \
-additional degrees of freedom. If no optional argument o is supplied, a 1 is \
-subsituted in.\nSpinors of fermions of mass ",
- StyleBox["m",
- FontSlant->"Italic"],
- " are normalized to have square ",
- Cell[BoxData[
- FormBox[
- OverscriptBox["u", "_"], TraditionalForm]]],
- StyleBox["u",
- FontSlant->"Italic"],
- "=2 ",
- StyleBox["m",
- FontSlant->"Italic"],
- " and ",
- Cell[BoxData[
- FormBox[
- OverscriptBox["v",
- RowBox[{"_", " "}]], TraditionalForm]]],
- StyleBox["v=",
- FontSlant->"Italic"],
- "-2 ",
- StyleBox["m",
- FontSlant->"Italic"],
- "."
+ " \[LineSeparator]is the head of Dirac spinors. "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -139,6 +136,120 @@ subsituted in.\nSpinors of fermions of mass ",
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2080643155],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "Which of the spinors ",
+ StyleBox["u",
+ FontSlant->"Italic"],
+ ", ",
+ StyleBox["v",
+ FontSlant->"Italic"],
+ ", ",
+ Cell[BoxData[
+ FormBox[
+ OverscriptBox["u", "_"], TraditionalForm]]],
+ " or ",
+ Cell[BoxData[
+ FormBox[
+ OverscriptBox["v",
+ RowBox[{"_", " "}]], TraditionalForm]]],
+ "is understood, depends on the sign of the momentum (p) argument and the \
+relative position in the chain."
+}], "Notes"],
+
+Cell[TextData[{
+ "Spinor[Momentum[p],m] means \.7f",
+ Cell[BoxData[
+ FormBox[
+ OverscriptBox["u", "_"], TraditionalForm]]],
+ " if it stands at the beginning of the chain."
+}], "Notes"],
+
+Cell[TextData[{
+ "Spinor[Momentum[p],m] means \.7f",
+ Cell[BoxData[
+ FormBox["u", TraditionalForm]]],
+ " if it stands at the end of the chain."
+}], "Notes"],
+
+Cell[TextData[{
+ "Spinor[-Momentum[p],m] means \.7f",
+ Cell[BoxData[
+ FormBox[
+ OverscriptBox["v", "_"], TraditionalForm]]],
+ " if it stands at the beginning of the chain."
+}], "Notes"],
+
+Cell[TextData[{
+ "Spinor[-Momentum[p],m] means \.7f",
+ Cell[BoxData[
+ FormBox["v", TraditionalForm]]],
+ " if it stands at the end of the chain."
+}], "Notes"],
+
+Cell[TextData[{
+ "Spinors of fermions of mass ",
+ StyleBox["m",
+ FontSlant->"Italic"],
+ " are normalized to have square ",
+ Cell[BoxData[
+ FormBox[
+ OverscriptBox["u", "_"], TraditionalForm]]],
+ StyleBox["u",
+ FontSlant->"Italic"],
+ "=2 ",
+ StyleBox["m",
+ FontSlant->"Italic"],
+ " and ",
+ Cell[BoxData[
+ FormBox[
+ OverscriptBox["v",
+ RowBox[{"_", " "}]], TraditionalForm]]],
+ StyleBox["v=",
+ FontSlant->"Italic"],
+ "-2 ",
+ StyleBox["m",
+ FontSlant->"Italic"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell["\<\
+The optional argument o can be used for additional degrees of freedom. If no \
+optional argument o is supplied, a 1 is subsituted in.\
+\>", "Notes"]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -154,7 +265,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->802420279],
+ CellID->335626817],
Cell[CellGroupData[{
@@ -164,7 +275,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->747810670],
+ CellID->1552583930],
Cell[CellGroupData[{
@@ -188,12 +299,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{46, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[1]=",
- CellID->50146827]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -223,20 +333,17 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{70, 17},
+ ImageSize->{75, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[2]=",
- CellID->1920456025]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell["\<\
FeynCalc uses covariant normalization (as opposed to e.g. the normalization \
used in Bjorken&Drell).\
-\>", "Text",
- CellTags->"Spinor",
- CellID->815063905],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -254,12 +361,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"2", " ", "m"}], TraditionalForm]], "Output",
- ImageSize->{29, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[3]=",
- CellID->18406301]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -270,7 +376,7 @@ Cell[BoxData[
RowBox[{"Spinor", "[",
RowBox[{
RowBox[{"-", "p"}], ",", "m"}], "]"}], ".",
- RowBox[{"DiracSlash", "[", "p", "]"}]}], "]"}]], "Input",
+ RowBox[{"GS", "[", "p", "]"}]}], "]"}]], "Input",
CellTags->"Spinor",
CellLabel->"In[4]:=",
CellID->654515033],
@@ -297,12 +403,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{120, 18},
+ ImageSize->{127, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[4]=",
- CellID->1309692921]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -319,21 +424,13 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",", "0", ",", "1"}], "]"}]], "Output",\
- ImageSize->{204, 15},
+ ImageSize->{203, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1424658698]
+ CellLabel->"Out[5]//StandardForm="]
}, Open ]],
-Cell["\<\
-By convention, ChangeDimension does not operate on momenta in Spinor's (but \
-on e.g. DiracSlash[Momentum[p]]). \
-\>", "Text",
- CellTags->"Spinor",
- CellID->1281981934],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -351,12 +448,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",", "1"}], "]"}]], "Output",
- ImageSize->{227, 15},
+ ImageSize->{226, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1111090170]
+ CellLabel->"Out[6]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -374,17 +470,14 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
- ImageSize->{206, 15},
+ ImageSize->{205, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[7]//StandardForm=",
- CellID->601318454]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]],
-Cell["SmallVariable's are discarded by Spinor.", "Text",
- CellTags->"Spinor",
- CellID->1926267215],
+Cell["SmallVariable's are discarded by Spinor.", "Notes"],
Cell[CellGroupData[{
@@ -403,12 +496,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"Momentum", "[", "p", "]"}], ",", "0", ",", "1"}], "]"}]], "Output",\
- ImageSize->{204, 15},
+ ImageSize->{203, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Spinor",
- CellLabel->"Out[8]//StandardForm=",
- CellID->485940583]
+ CellLabel->"Out[8]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -468,9 +560,7 @@ Cell[TextData[{
ButtonNote->"SpinorVBar"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Spinor",
- CellID->659330762]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -478,7 +568,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Spinor",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -487,28 +577,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 9.391500}",
+ "built" -> "{2020, 1, 5, 19, 2, 16.464535}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Spinor[p, m, o] is the head of Dirac spinors. Which of the spinors u, v, \
-OverscriptBox[u, _] , or OverscriptBox[v, _\\ ]is understood, depends on the \
-sign of the momentum (p) argument and the relative position of DiracSlash[p]: \
-Spinor[sign p, mass] is that spinor which yields: sign*mass*Spinor[p, mass] \
-if the Dirac equation is applied (by DiracEquation or DiracSimplify). The \
-optional argument o can be used for additional degrees of freedom. If no \
-optional argument o is supplied, a 1 is subsituted in. Spinors of fermions of \
-mass m are normalized to have square OverscriptBox[u, _]u=2 m and \
-OverscriptBox[v, _\\ ]v=-2 m.", "synonyms" -> {}, "title" -> "Spinor",
- "titlemodifier" -> "", "windowtitle" -> "Spinor", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Spinor"}, "SearchTextTranslated" -> ""},
+ "None", "summary" -> "Spinor[p, m, o] is the head of Dirac spinors. ",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Spinor", "titlemodifier" ->
+ "", "windowtitle" -> "Spinor", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Spinor"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -517,7 +599,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -526,177 +608,155 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4706, 141, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7451, 252, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->802420279]},
+ CellID->335626817]},
"Spinor"->{
- Cell[5338, 170, 124, 4, 27, "Input",
+ Cell[8084, 281, 124, 4, 27, "Input",
CellTags->"Spinor",
CellID->1573141935],
- Cell[5465, 176, 467, 19, 38, "Output",
- CellTags->"Spinor",
- CellID->50146827],
- Cell[5969, 200, 145, 5, 27, "Input",
+ Cell[8211, 287, 448, 18, 37, "Output",
+ CellTags->"Spinor"],
+ Cell[8696, 310, 145, 5, 27, "Input",
CellTags->"Spinor",
CellID->67205944],
- Cell[6117, 207, 555, 23, 38, "Output",
- CellTags->"Spinor",
- CellID->1920456025],
- Cell[6687, 233, 166, 5, 52, "Text",
- CellTags->"Spinor",
- CellID->815063905],
- Cell[6878, 242, 267, 9, 27, "Input",
+ Cell[8844, 317, 534, 22, 37, "Output",
+ CellTags->"Spinor"],
+ Cell[9544, 349, 267, 9, 27, "Input",
CellTags->"Spinor",
CellID->540190510],
- Cell[7148, 253, 229, 8, 36, "Output",
- CellTags->"Spinor",
- CellID->18406301],
- Cell[7414, 266, 271, 9, 27, "Input",
+ Cell[9814, 360, 210, 7, 35, "Output",
+ CellTags->"Spinor"],
+ Cell[10061, 372, 263, 9, 27, "Input",
CellTags->"Spinor",
CellID->654515033],
- Cell[7688, 277, 679, 27, 39, "Output",
- CellTags->"Spinor",
- CellID->1309692921],
- Cell[8404, 309, 158, 5, 27, "Input",
+ Cell[10327, 383, 658, 26, 37, "Output",
+ CellTags->"Spinor"],
+ Cell[11022, 414, 158, 5, 27, "Input",
CellTags->"Spinor",
CellID->864077691],
- Cell[8565, 316, 298, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->1424658698],
- Cell[8878, 329, 179, 5, 52, "Text",
- CellTags->"Spinor",
- CellID->1281981934],
- Cell[9082, 338, 228, 8, 27, "Input",
+ Cell[11183, 421, 277, 9, 51, "Output",
+ CellTags->"Spinor"],
+ Cell[11497, 435, 228, 8, 27, "Input",
CellTags->"Spinor",
CellID->39280367],
- Cell[9313, 348, 321, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->1111090170],
- Cell[9671, 363, 183, 6, 27, "Input",
+ Cell[11728, 445, 300, 9, 51, "Output",
+ CellTags->"Spinor"],
+ Cell[12065, 459, 183, 6, 27, "Input",
CellTags->"Spinor",
CellID->1410615258],
- Cell[9857, 371, 297, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->601318454],
- Cell[10169, 384, 98, 2, 32, "Text",
- CellTags->"Spinor",
- CellID->1926267215],
- Cell[10292, 390, 227, 8, 27, "Input",
+ Cell[12251, 467, 277, 9, 51, "Output",
+ CellTags->"Spinor"],
+ Cell[12625, 483, 227, 8, 27, "Input",
CellTags->"Spinor",
CellID->557218901],
- Cell[10522, 400, 297, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->485940583],
- Cell[11187, 433, 1059, 39, 32, "Text",
- CellTags->"Spinor",
- CellID->659330762]}
+ Cell[12855, 493, 277, 9, 51, "Output",
+ CellTags->"Spinor"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14648, 527},
- {"Spinor", 14781, 531}
+ {"PrimaryExamplesSection", 16315, 609},
+ {"Spinor", 16448, 613}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3490, 84, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 1811, 59, 194, "Usage",
+Cell[4071, 107, 283, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4379, 122, 410, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4706, 141, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4814, 138, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2080643155],
+Cell[5556, 164, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5590, 166, 432, 18, 70, "Notes"],
+Cell[6025, 186, 187, 6, 70, "Notes"],
+Cell[6215, 194, 157, 5, 70, "Notes"],
+Cell[6375, 201, 188, 6, 70, "Notes"],
+Cell[6566, 209, 158, 5, 70, "Notes"],
+Cell[6727, 216, 514, 25, 70, "Notes",
+ CellID->1067943069],
+Cell[7244, 243, 158, 3, 70, "Notes"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7451, 252, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->802420279],
+ CellID->335626817],
Cell[CellGroupData[{
-Cell[5118, 160, 195, 6, 25, "ExampleSection",
- CellID->747810670],
+Cell[7863, 271, 196, 6, 26, "ExampleSection",
+ CellID->1552583930],
Cell[CellGroupData[{
-Cell[5338, 170, 124, 4, 27, "Input",
+Cell[8084, 281, 124, 4, 27, "Input",
CellTags->"Spinor",
CellID->1573141935],
-Cell[5465, 176, 467, 19, 38, "Output",
- CellTags->"Spinor",
- CellID->50146827]
+Cell[8211, 287, 448, 18, 37, "Output",
+ CellTags->"Spinor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5969, 200, 145, 5, 27, "Input",
+Cell[8696, 310, 145, 5, 27, "Input",
CellTags->"Spinor",
CellID->67205944],
-Cell[6117, 207, 555, 23, 38, "Output",
- CellTags->"Spinor",
- CellID->1920456025]
+Cell[8844, 317, 534, 22, 37, "Output",
+ CellTags->"Spinor"]
}, Open ]],
-Cell[6687, 233, 166, 5, 52, "Text",
- CellTags->"Spinor",
- CellID->815063905],
+Cell[9393, 342, 126, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[6878, 242, 267, 9, 27, "Input",
+Cell[9544, 349, 267, 9, 27, "Input",
CellTags->"Spinor",
CellID->540190510],
-Cell[7148, 253, 229, 8, 36, "Output",
- CellTags->"Spinor",
- CellID->18406301]
+Cell[9814, 360, 210, 7, 35, "Output",
+ CellTags->"Spinor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7414, 266, 271, 9, 27, "Input",
+Cell[10061, 372, 263, 9, 27, "Input",
CellTags->"Spinor",
CellID->654515033],
-Cell[7688, 277, 679, 27, 39, "Output",
- CellTags->"Spinor",
- CellID->1309692921]
+Cell[10327, 383, 658, 26, 37, "Output",
+ CellTags->"Spinor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8404, 309, 158, 5, 27, "Input",
+Cell[11022, 414, 158, 5, 27, "Input",
CellTags->"Spinor",
CellID->864077691],
-Cell[8565, 316, 298, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->1424658698]
+Cell[11183, 421, 277, 9, 51, "Output",
+ CellTags->"Spinor"]
}, Open ]],
-Cell[8878, 329, 179, 5, 52, "Text",
- CellTags->"Spinor",
- CellID->1281981934],
Cell[CellGroupData[{
-Cell[9082, 338, 228, 8, 27, "Input",
+Cell[11497, 435, 228, 8, 27, "Input",
CellTags->"Spinor",
CellID->39280367],
-Cell[9313, 348, 321, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->1111090170]
+Cell[11728, 445, 300, 9, 51, "Output",
+ CellTags->"Spinor"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9671, 363, 183, 6, 27, "Input",
+Cell[12065, 459, 183, 6, 27, "Input",
CellTags->"Spinor",
CellID->1410615258],
-Cell[9857, 371, 297, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->601318454]
+Cell[12251, 467, 277, 9, 51, "Output",
+ CellTags->"Spinor"]
}, Open ]],
-Cell[10169, 384, 98, 2, 32, "Text",
- CellTags->"Spinor",
- CellID->1926267215],
+Cell[12543, 479, 57, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[10292, 390, 227, 8, 27, "Input",
+Cell[12625, 483, 227, 8, 27, "Input",
CellTags->"Spinor",
CellID->557218901],
-Cell[10522, 400, 297, 10, 49, "Output",
- CellTags->"Spinor",
- CellID->485940583]
+Cell[12855, 493, 277, 9, 51, "Output",
+ CellTags->"Spinor"]
}, Open ]]
}, Open ]],
-Cell[10846, 414, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13159, 506, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10914, 419, 270, 12, 31, "SeeAlsoSection",
+Cell[13227, 511, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[11187, 433, 1059, 39, 32, "Text",
- CellTags->"Spinor",
- CellID->659330762]
+Cell[13500, 525, 1021, 37, 56, "SeeAlso"]
}, Open ]],
-Cell[12261, 475, 23, 0, 42, "FooterCell"]
+Cell[14536, 565, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainChiralSplit.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainChiralSplit.nb
new file mode 100644
index 000000000..466ed8a01
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainChiralSplit.nb
@@ -0,0 +1,527 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14929, 517]
+NotebookOptionsPosition[ 11549, 415]
+NotebookOutlinePosition[ 13713, 472]
+CellTagsIndexPosition[ 13628, 467]
+WindowTitle->SpinorChainChiralSplit
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSubstitute67\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute67"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToDiracGamma67"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorChainChiralSplit\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorChainChiralSplit"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorChainChiralSplit.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$244387],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorChainChiralSplit", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorChainChiralSplit", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorChainChiralSplit", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]introduces chiral projectors in spinor chains that \
+contain no ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2113651812],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SpinorChainChiralSplit", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->123332039],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSubstitute5", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{510, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[9]=",
+ CellID->1045438956]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->175922978],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->422308104],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1944273704],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"v", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{191, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1510764767]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainChiralSplit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->767934548],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{550, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->172408206]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SpinorChainChiralSplit",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 12.890424}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorChainChiralSplit[exp] introduces chiral projectors in spinor \
+chains that contain no \\[Gamma]^5.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SpinorChainChiralSplit", "titlemodifier" -> "", "windowtitle" ->
+ "SpinorChainChiralSplit", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SpinorChainChiralSplit"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6322, 193, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->175922978]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13485, 460}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[594, 21, 3281, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3878, 101, 299, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4202, 116, 501, 15, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4728, 135, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2113651812],
+Cell[5470, 161, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5526, 165, 124, 3, 70, "Input",
+ CellID->123332039],
+Cell[5653, 170, 608, 16, 56, "Output",
+ CellID->1045438956]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6322, 193, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->175922978],
+Cell[CellGroupData[{
+Cell[6734, 212, 195, 6, 26, "ExampleSection",
+ CellID->422308104],
+Cell[CellGroupData[{
+Cell[6954, 222, 256, 8, 27, "Input",
+ CellID->1944273704],
+Cell[7213, 232, 658, 26, 37, "Output",
+ CellID->1510764767]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7908, 263, 118, 3, 27, "Input",
+ CellID->767934548],
+Cell[8029, 268, 2534, 99, 42, "Output",
+ CellID->172408206]
+}, Open ]]
+}, Open ]],
+Cell[10590, 371, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10658, 376, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[10931, 390, 576, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[11522, 413, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainTranspose.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainTranspose.nb
new file mode 100644
index 000000000..727a4beb5
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainTranspose.nb
@@ -0,0 +1,899 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 24727, 889]
+NotebookOptionsPosition[ 20391, 757]
+NotebookOutlinePosition[ 22817, 818]
+CellTagsIndexPosition[ 22732, 813]
+WindowTitle->SpinorChainTranspose
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCChargeConjugateTransposed\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCChargeConjugateTransposed"], \
+"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Spinor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorChainTranspose\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorChainTranspose"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorChainTranspose.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$244827],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorChainTranspose", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorChainTranspose", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorChainTranspose", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]tranposes particular spinor chains in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ", which effectively switches the ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinors and reverses the order of the Dirac matrices using charge \
+conjugation operator. This operation is often required in calculations that \
+involve Majorana particles. By default, the function will tranpose all chains \
+of the form ",
+ Cell[BoxData[
+ RowBox[{"vbar", ".", "x", ".", "u"}]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ RowBox[{"vbar", ".", "x", ".", "v"}]], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1408763244],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "A different or more fine grained choice can be obtained via the option ",
+ Cell[BoxData["Select"], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->908030529],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SpinorChainTranspose", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->37503137],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
+ RowBox[{"Select", "\[Rule]",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}],
+ RowBox[{"u", "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}]},
+ {
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}],
+ RowBox[{"v", "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}]},
+ {
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}],
+ TraditionalForm],
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}],
+ TraditionalForm]},
+ {
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}],
+ TraditionalForm],
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["_",
+ TraditionalForm], ",",
+ FormBox["_",
+ TraditionalForm], ")"}],
+ TraditionalForm]}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ",",
+ RowBox[{"TimeConstrained", "\[Rule]", "3"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{447, 118},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->334721325]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1299793682],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1419071165],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBarD", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorUD", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1577118630],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{272, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1607764244]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainTranspose", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1510622750],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "-",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{336, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1670566186]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBarD", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorVD", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1486107992],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{272, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->691987419]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainTranspose", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1485524900],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{325, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1745938355]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBarD", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorVD", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1726192320],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{272, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1092633300]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainTranspose", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Select", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"SpinorUBarD", "[",
+ RowBox[{"_", ",", "_"}], "]"}], ",",
+ RowBox[{"SpinorVD", "[",
+ RowBox[{"_", ",", "_"}], "]"}]}], "}"}], "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1681222815],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "-",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["p1",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{336, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->438443861]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCChargeConjugateTransposed",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCChargeConjugateTransposed",
+ ButtonNote->"FCChargeConjugateTransposed"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SpinorChainTranspose",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 14.022755}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorChainTranspose[exp] tranposes particular spinor chains in exp, \
+which effectively switches the u and v spinors and reverses the order of the \
+Dirac matrices using charge conjugation operator. This operation is often \
+required in calculations that involve Majorana particles. By default, the \
+function will tranpose all chains of the form vbar.x.u and vbar.x.v.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SpinorChainTranspose",
+ "titlemodifier" -> "", "windowtitle" -> "SpinorChainTranspose", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SpinorChainTranspose"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[9116, 281, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1299793682]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 22588, 806}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[592, 21, 3271, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3866, 101, 297, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4188, 116, 1006, 26, 136, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5219, 146, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1408763244],
+Cell[5961, 172, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5995, 174, 172, 5, 70, "Notes",
+ CellID->908030529],
+Cell[CellGroupData[{
+Cell[6192, 183, 121, 3, 70, "Input",
+ CellID->37503137],
+Cell[6316, 188, 2739, 86, 139, "Output",
+ CellID->334721325]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9116, 281, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1299793682],
+Cell[CellGroupData[{
+Cell[9529, 300, 196, 6, 26, "ExampleSection",
+ CellID->1419071165],
+Cell[CellGroupData[{
+Cell[9750, 310, 395, 12, 27, "Input",
+ CellID->1577118630],
+Cell[10148, 324, 1087, 45, 37, "Output",
+ CellID->1607764244]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11272, 374, 117, 3, 27, "Input",
+ CellID->1510622750],
+Cell[11392, 379, 1481, 58, 37, "Output",
+ CellID->1670566186]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12910, 442, 395, 12, 27, "Input",
+ CellID->1486107992],
+Cell[13308, 456, 1086, 45, 37, "Output",
+ CellID->691987419]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14431, 506, 117, 3, 27, "Input",
+ CellID->1485524900],
+Cell[14551, 511, 1412, 57, 37, "Output",
+ CellID->1745938355]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16000, 573, 395, 12, 27, "Input",
+ CellID->1726192320],
+Cell[16398, 587, 1087, 45, 37, "Output",
+ CellID->1092633300]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17522, 637, 394, 12, 29, "Input",
+ CellID->1681222815],
+Cell[17919, 651, 1480, 58, 37, "Output",
+ CellID->438443861]
+}, Open ]]
+}, Open ]],
+Cell[19426, 713, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[19494, 718, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[19767, 732, 582, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[20364, 755, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainTrick.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainTrick.nb
new file mode 100644
index 000000000..c298ae6ae
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorChainTrick.nb
@@ -0,0 +1,715 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 19714, 705]
+NotebookOptionsPosition[ 16017, 588]
+NotebookOutlinePosition[ 18082, 644]
+CellTagsIndexPosition[ 17997, 639]
+WindowTitle->SpinorChainTrick
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCCanonicalizeDummyIndices\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FCCanonicalizeDummyIndices"], \
+"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Spinor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorChainTrick\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorChainTrick"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorChainTrick.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$245278],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorChainTrick", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorChainTrick", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorChainTrick", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]applies several simplifications to products of spinor \
+chains."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->987893942],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SpinorChainTrick", "]"}]], "Input",
+ CellLabel->"In[19]:=",
+ CellID->1331771423],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FCCanonicalizeDummyIndices", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{525, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[19]=",
+ CellID->564497348]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1580486668],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1817998826],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"a", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}], " ",
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p4", ",", "m4"}], "]"}]}]}], "+",
+ RowBox[{"b", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}], " ",
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p4", ",", "m4"}], "]"}]}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->485195771],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"a", " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"v", "(",
+ FormBox["p4",
+ TraditionalForm], ",",
+ FormBox["m4",
+ TraditionalForm], ")"}]}]}], "+",
+ RowBox[{"b", " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"v", "(",
+ FormBox["p4",
+ TraditionalForm], ",",
+ FormBox["m4",
+ TraditionalForm], ")"}]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{363, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1356254518]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainTrick", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->769535890],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+", "b"}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li521\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li521\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m4",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{322, 47},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->890778535]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->354778075],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GAE", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}], " ",
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p4", ",", "m4"}], "]"}]}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1667886211],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"v", "(",
+ FormBox["p4",
+ TraditionalForm], ",",
+ FormBox["m4",
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{336, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->675320390]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorChainTrick", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1721445382],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1918155661]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["FCCanonicalizeDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCanonicalizeDummyIndices",
+ ButtonNote->"FCCanonicalizeDummyIndices"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
+WindowTitle->"SpinorChainTrick",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 15.299017}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorChainTrick[exp] applies several simplifications to products of \
+spinor chains.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SpinorChainTrick", "titlemodifier" -> "", "windowtitle" ->
+ "SpinorChainTrick", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SpinorChainTrick"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6367, 193, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1580486668]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 17853, 632}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 3253, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3844, 101, 293, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4162, 116, 407, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4594, 132, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->987893942],
+Cell[5335, 158, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5391, 162, 120, 3, 70, "Input",
+ CellID->1331771423],
+Cell[5514, 167, 792, 19, 75, "Output",
+ CellID->564497348]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6367, 193, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1580486668],
+Cell[CellGroupData[{
+Cell[6780, 212, 196, 6, 26, "ExampleSection",
+ CellID->1817998826],
+Cell[CellGroupData[{
+Cell[7001, 222, 958, 29, 79, "Input",
+ CellID->485195771],
+Cell[7962, 253, 2275, 89, 56, "Output",
+ CellID->1356254518]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10274, 347, 112, 3, 27, "Input",
+ CellID->769535890],
+Cell[10389, 352, 2447, 95, 68, "Output",
+ CellID->890778535]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12873, 452, 125, 3, 9, "ExampleDelimiter",
+ CellID->354778075],
+Cell[CellGroupData[{
+Cell[13023, 459, 482, 15, 45, "Input",
+ CellID->1667886211],
+Cell[13508, 476, 1168, 47, 37, "Output",
+ CellID->675320390]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14713, 528, 113, 3, 27, "Input",
+ CellID->1721445382],
+Cell[14829, 533, 187, 6, 35, "Output",
+ CellID->1918155661]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[15055, 544, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[15123, 549, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[15396, 563, 579, 20, 70, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[15990, 586, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorCollect.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorCollect.nb
deleted file mode 100644
index eb8eda5b6..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorCollect.nb
+++ /dev/null
@@ -1,204 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6403, 195]
-NotebookOptionsPosition[ 4097, 128]
-NotebookOutlinePosition[ 6137, 184]
-CellTagsIndexPosition[ 6062, 179]
-WindowTitle->SpinorCollect
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SpinorCollect\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SpinorCollect"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-SpinorCollect.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$141336],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SpinorCollect", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["SpinorCollect", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["SpinorCollect"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for FermionSpinSum. If set to False the argument of \
-FermionSpinSum has to be already collected w.r.t. Spinor."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["FermionSpinSum",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FermionSpinSum",
- ButtonNote->"FermionSpinSum"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Spinor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Spinor",
- ButtonNote->"Spinor"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"SpinorCollect",
- CellID->660922928]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"SpinorCollect",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 1, 2, 15, 17, 20.031199}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "SpinorCollect is an option for FermionSpinSum. If set to False the \
-argument of FermionSpinSum has to be already collected w.r.t. Spinor.",
- "synonyms" -> {}, "title" -> "SpinorCollect", "titlemodifier" -> "",
- "windowtitle" -> "SpinorCollect", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SpinorCollect"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "SpinorCollect"->{
- Cell[3652, 108, 403, 15, 70, "Text",
- CellTags->"SpinorCollect",
- CellID->660922928]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"SpinorCollect", 5946, 172}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[585, 21, 2266, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2854, 75, 56, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2913, 78, 441, 12, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3379, 94, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3652, 108, 403, 15, 70, "Text",
- CellTags->"SpinorCollect",
- CellID->660922928]
-}, Open ]],
-Cell[4070, 126, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorU.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorU.nb
index 77f3c714e..5af2a05a5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorU.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorU.nb
@@ -3,69 +3,104 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12418, 456]
-NotebookOptionsPosition[ 7883, 306]
-NotebookOutlinePosition[ 10878, 395]
-CellTagsIndexPosition[ 10769, 389]
+NotebookDataLength[ 14162, 498]
+NotebookOptionsPosition[ 10347, 377]
+NotebookOutlinePosition[ 12779, 446]
+CellTagsIndexPosition[ 12668, 440]
WindowTitle->SpinorU
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SpinorU\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SpinorU"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SpinorU.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorU\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorU"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SpinorU.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$142994],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SpinorU", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$247537],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorU", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +108,35 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SpinorU", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SpinorU", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SpinorU", "[",
- RowBox[{"p", ",", " ", "m", ",", " ", "optarg"}], "]"}]],
- "InlineFormula"],
- " \[LineSeparator]",
- "denotes a u-spinor."
+ RowBox[{"p", ",", " ", "m"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{"u",
+ RowBox[{"(",
+ RowBox[{"p", ",", "m"}], ")"}]}], TraditionalForm]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ". "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,7 +162,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1436075671],
+ CellID->322452496],
Cell[CellGroupData[{
@@ -119,137 +172,133 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1237662649],
+ CellID->2037298074],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorU", "[", "p", "]"}]], "Input",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
CellTags->"SpinorU",
CellLabel->"In[1]:=",
CellID->1066488732],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox["\<\"u\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
+ RowBox[{"u", "(",
FormBox["p",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{63, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SpinorU",
- CellLabel->"Out[1]=",
- CellID->1004842359]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorU", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Input",
- CellTags->"SpinorU",
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[2]:=",
- CellID->1219506664],
+ CellID->2060242592],
Cell[BoxData[
- FormBox[
+ RowBox[{"Spinor", "[",
RowBox[{
- FormBox["\<\"u\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox["p",
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{69, 17},
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
+
+ ImageSize->{205, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorU",
- CellLabel->"Out[2]=",
- CellID->1525867517]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"SpinorU", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "StandardForm"}]], "Input",
+ RowBox[{"SpinorU", "[", "p", "]"}]], "Input",
CellTags->"SpinorU",
CellLabel->"In[3]:=",
- CellID->1318814434],
+ CellID->1219506664],
Cell[BoxData[
- RowBox[{"SpinorU", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Output",
- ImageSize->{110, 15},
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SpinorU",
- CellLabel->"Out[3]//StandardForm=",
- CellID->409865214]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"SpinorU", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorU",
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[4]:=",
- CellID->403119311],
+ CellID->1046277707],
Cell[BoxData[
RowBox[{"Spinor", "[",
RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "0", ",", "1"}], "]"}]], "Output",\
- ImageSize->{206, 15},
+ ImageSize->{203, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorU",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1261590967]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"SpinorU", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorU",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"SpinorU", "[", "p", "]"}]}]], "Input",
CellLabel->"In[5]:=",
- CellID->1260012205],
+ CellID->19834725],
Cell[BoxData[
- RowBox[{"Spinor", "[",
+ FormBox[
RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{90, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
- ImageSize->{206, 15},
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorU",
- CellLabel->"Out[5]//StandardForm=",
- CellID->220809349]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -296,10 +345,32 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
ButtonNote->"SpinorVBar"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SpinorU",
- CellID->844883429]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -307,7 +378,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SpinorU",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -316,20 +387,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 12.449124}",
+ "built" -> "{2020, 1, 5, 19, 2, 21.608256}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "SpinorU[p, m, optarg] denotes a u-spinor.",
- "synonyms" -> {}, "title" -> "SpinorU", "titlemodifier" -> "",
- "windowtitle" -> "SpinorU", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SpinorU"}, "SearchTextTranslated" -> ""},
+ "None", "summary" ->
+ "SpinorU[p, m] denotes a u (p, m)-spinor that depends on the \
+4-dimensional momentum p. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SpinorU", "titlemodifier" -> "", "windowtitle" -> "SpinorU", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SpinorU"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -337,8 +410,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -347,117 +421,85 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3322, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5252, 149, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1436075671]},
+ CellID->322452496]},
"SpinorU"->{
- Cell[3956, 125, 126, 4, 27, "Input",
+ Cell[5885, 178, 149, 5, 27, "Input",
CellTags->"SpinorU",
CellID->1066488732],
- Cell[4085, 131, 397, 16, 38, "Output",
- CellTags->"SpinorU",
- CellID->1004842359],
- Cell[4519, 152, 149, 5, 27, "Input",
+ Cell[6037, 185, 294, 11, 37, "Output",
+ CellTags->"SpinorU"],
+ Cell[6799, 220, 126, 4, 27, "Input",
CellTags->"SpinorU",
CellID->1219506664],
- Cell[4671, 159, 483, 20, 38, "Output",
- CellTags->"SpinorU",
- CellID->1525867517],
- Cell[5191, 184, 185, 6, 27, "Input",
- CellTags->"SpinorU",
- CellID->1318814434],
- Cell[5379, 192, 251, 8, 49, "Output",
- CellTags->"SpinorU",
- CellID->409865214],
- Cell[5667, 205, 215, 8, 27, "Input",
- CellTags->"SpinorU",
- CellID->403119311],
- Cell[5885, 215, 299, 10, 49, "Output",
- CellTags->"SpinorU",
- CellID->1261590967],
- Cell[6221, 230, 245, 9, 27, "Input",
- CellTags->"SpinorU",
- CellID->1260012205],
- Cell[6469, 241, 298, 10, 49, "Output",
- CellTags->"SpinorU",
- CellID->220809349],
- Cell[7135, 274, 706, 27, 28, "Text",
- CellTags->"SpinorU",
- CellID->844883429]}
+ Cell[6928, 226, 250, 9, 37, "Output",
+ CellTags->"SpinorU"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9649, 348},
- {"SpinorU", 9783, 352}
+ {"PrimaryExamplesSection", 12205, 422},
+ {"SpinorU", 12339, 426}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3662, 87, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 421, 14, 82, "Usage",
+Cell[4244, 110, 284, 11, 45, "ObjectNameGrid"],
+Cell[4531, 123, 696, 22, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3322, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5252, 149, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1436075671],
+ CellID->322452496],
Cell[CellGroupData[{
-Cell[3735, 115, 196, 6, 25, "ExampleSection",
- CellID->1237662649],
+Cell[5664, 168, 196, 6, 26, "ExampleSection",
+ CellID->2037298074],
Cell[CellGroupData[{
-Cell[3956, 125, 126, 4, 27, "Input",
+Cell[5885, 178, 149, 5, 27, "Input",
CellTags->"SpinorU",
CellID->1066488732],
-Cell[4085, 131, 397, 16, 38, "Output",
- CellTags->"SpinorU",
- CellID->1004842359]
+Cell[6037, 185, 294, 11, 37, "Output",
+ CellTags->"SpinorU"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4519, 152, 149, 5, 27, "Input",
+Cell[6368, 201, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6506, 207, 256, 8, 51, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6799, 220, 126, 4, 27, "Input",
CellTags->"SpinorU",
CellID->1219506664],
-Cell[4671, 159, 483, 20, 38, "Output",
- CellTags->"SpinorU",
- CellID->1525867517]
+Cell[6928, 226, 250, 9, 37, "Output",
+ CellTags->"SpinorU"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5191, 184, 185, 6, 27, "Input",
- CellTags->"SpinorU",
- CellID->1318814434],
-Cell[5379, 192, 251, 8, 49, "Output",
- CellTags->"SpinorU",
- CellID->409865214]
+Cell[7215, 240, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7353, 246, 256, 8, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5667, 205, 215, 8, 27, "Input",
- CellTags->"SpinorU",
- CellID->403119311],
-Cell[5885, 215, 299, 10, 49, "Output",
- CellTags->"SpinorU",
- CellID->1261590967]
+Cell[7646, 259, 154, 5, 27, "Input",
+ CellID->19834725],
+Cell[7803, 266, 497, 19, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6221, 230, 245, 9, 27, "Input",
- CellTags->"SpinorU",
- CellID->1260012205],
-Cell[6469, 241, 298, 10, 49, "Output",
- CellTags->"SpinorU",
- CellID->220809349]
+Cell[8337, 290, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8450, 295, 166, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[6794, 255, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8643, 304, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6862, 260, 270, 12, 31, "SeeAlsoSection",
+Cell[8711, 309, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[7135, 274, 706, 27, 28, "Text",
- CellTags->"SpinorU",
- CellID->844883429]
+Cell[8984, 323, 1321, 49, 70, "SeeAlso"]
}, Open ]],
-Cell[7856, 304, 23, 0, 70, "FooterCell"]
+Cell[10320, 375, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBar.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBar.nb
index 483303963..7bc32eb90 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBar.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBar.nb
@@ -3,69 +3,104 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12682, 458]
-NotebookOptionsPosition[ 7875, 301]
-NotebookOutlinePosition[ 11027, 394]
-CellTagsIndexPosition[ 10915, 388]
+NotebookDataLength[ 14295, 501]
+NotebookOptionsPosition[ 10445, 380]
+NotebookOutlinePosition[ 12910, 449]
+CellTagsIndexPosition[ 12799, 443]
WindowTitle->SpinorUBar
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SpinorUBar\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SpinorUBar"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SpinorUBar.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$142651],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SpinorUBar", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorUBar\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorUBar"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorUBar.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$246633],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorUBar", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +108,35 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SpinorUBar", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SpinorUBar", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SpinorUBar", "[",
RowBox[{"p", ",", " ", "m"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes a ",
+ " \[LineSeparator]denotes a ",
Cell[BoxData[
FormBox[
- OverscriptBox["u", "_"], TraditionalForm]]],
- "-spinor."
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ RowBox[{"p", ",", "m"}], ")"}], TraditionalForm]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,7 +162,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1212950574],
+ CellID->2076059377],
Cell[CellGroupData[{
@@ -122,129 +172,136 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2055207211],
-
-Cell["One argument only assumes a massless spinor.", "Text",
- CellTags->"SpinorUBar",
- CellID->1710109400],
+ CellID->1048506747],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorUBar", "[", "p", "]"}]], "Input",
- CellTags->"SpinorUBar",
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
CellLabel->"In[1]:=",
- CellID->1755344465],
+ CellID->1066488732],
Cell[BoxData[
FormBox[
RowBox[{
OverscriptBox["u", "_"], "(",
FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{37, 17},
+ ImageSize->{65, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorUBar",
- CellLabel->"Out[1]=",
- CellID->1842146552]
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorUBar", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Input",
- CellTags->"SpinorUBar",
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[2]:=",
- CellID->427410867],
+ CellID->2060242592],
Cell[BoxData[
- FormBox[
+ RowBox[{"Spinor", "[",
RowBox[{
- OverscriptBox["u", "_"], "(",
- FormBox["p",
- TraditionalForm], ",",
- FormBox["m",
- TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{59, 17},
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
+
+ ImageSize->{205, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorUBar",
- CellLabel->"Out[2]=",
- CellID->1886464450]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"SpinorUBar", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "StandardForm"}]], "Input",
- CellTags->"SpinorUBar",
+ RowBox[{"SpinorUBar", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
CellLabel->"In[3]:=",
- CellID->148613319],
+ CellID->1219506664],
Cell[BoxData[
- RowBox[{"SpinorUBar", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Output",
- ImageSize->{134, 15},
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{41, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorUBar",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1176797979]
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"SpinorUBar", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorUBar",
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[4]:=",
- CellID->477030617],
+ CellID->1046277707],
Cell[BoxData[
RowBox[{"Spinor", "[",
RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "0", ",", "1"}], "]"}]], "Output",\
- ImageSize->{206, 15},
+ ImageSize->{203, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorUBar",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1179870937]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"SpinorUBar", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorUBar",
+ RowBox[{"SpinorUBar", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
CellLabel->"In[5]:=",
- CellID->1397974308],
+ CellID->19834725],
Cell[BoxData[
- RowBox[{"Spinor", "[",
+ FormBox[
RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]], "Output",\
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{92, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
- ImageSize->{206, 15},
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorUBar",
- CellLabel->"Out[5]//StandardForm=",
- CellID->118588427]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -291,18 +348,40 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
ButtonNote->"SpinorVBar"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SpinorUBar",
- CellID->350873739]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"SpinorUBar",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -311,21 +390,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 10.940056}",
+ "built" -> "{2020, 1, 5, 19, 2, 19.156613}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SpinorUBar[p, m] denotes a OverscriptBox[u, _]-spinor.",
- "synonyms" -> {}, "title" -> "SpinorUBar", "titlemodifier" -> "",
- "windowtitle" -> "SpinorUBar", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SpinorUBar"}, "SearchTextTranslated" -> ""},
+ "SpinorUBar[p, m] denotes a OverscriptBox[u, _](p, m)-spinor that depends \
+on the 4-dimensional momentum p.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SpinorUBar", "titlemodifier" -> "", "windowtitle" ->
+ "SpinorUBar", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SpinorUBar"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -333,8 +413,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -343,123 +424,85 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3410, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5276, 149, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1212950574]},
- "SpinorUBar"->{
- Cell[4022, 126, 106, 2, 32, "Text",
- CellTags->"SpinorUBar",
- CellID->1710109400],
- Cell[4153, 132, 132, 4, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->1755344465],
- Cell[4288, 138, 298, 11, 38, "Output",
- CellTags->"SpinorUBar",
- CellID->1842146552],
- Cell[4623, 154, 154, 5, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->427410867],
- Cell[4780, 161, 342, 13, 38, "Output",
- CellTags->"SpinorUBar",
- CellID->1886464450],
- Cell[5159, 179, 190, 6, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->148613319],
- Cell[5352, 187, 258, 8, 49, "Output",
- CellTags->"SpinorUBar",
- CellID->1176797979],
- Cell[5647, 200, 221, 8, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->477030617],
- Cell[5871, 210, 302, 10, 49, "Output",
- CellTags->"SpinorUBar",
- CellID->1179870937],
- Cell[6210, 225, 251, 9, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->1397974308],
- Cell[6464, 236, 301, 10, 49, "Output",
- CellTags->"SpinorUBar",
- CellID->118588427],
- Cell[7133, 269, 700, 27, 70, "Text",
- CellTags->"SpinorUBar",
- CellID->350873739]}
+ CellID->2076059377]},
+ "SpinorU"->{
+ Cell[5910, 178, 152, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6065, 185, 318, 12, 37, "Output",
+ CellTags->"SpinorU"],
+ Cell[6851, 221, 129, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[6983, 227, 274, 10, 37, "Output",
+ CellTags->"SpinorU"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9671, 344},
- {"SpinorUBar", 9808, 348}
+ {"PrimaryExamplesSection", 12334, 425},
+ {"SpinorU", 12469, 429}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3669, 87, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 491, 17, 82, "Usage",
+Cell[4254, 110, 287, 11, 45, "ObjectNameGrid"],
+Cell[4544, 123, 707, 22, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3410, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5276, 149, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1212950574],
+ CellID->2076059377],
Cell[CellGroupData[{
-Cell[3823, 118, 196, 6, 25, "ExampleSection",
- CellID->2055207211],
-Cell[4022, 126, 106, 2, 32, "Text",
- CellTags->"SpinorUBar",
- CellID->1710109400],
+Cell[5689, 168, 196, 6, 26, "ExampleSection",
+ CellID->1048506747],
+Cell[CellGroupData[{
+Cell[5910, 178, 152, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6065, 185, 318, 12, 37, "Output",
+ CellTags->"SpinorU"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4153, 132, 132, 4, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->1755344465],
-Cell[4288, 138, 298, 11, 38, "Output",
- CellTags->"SpinorUBar",
- CellID->1842146552]
+Cell[6420, 202, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6558, 208, 256, 8, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4623, 154, 154, 5, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->427410867],
-Cell[4780, 161, 342, 13, 38, "Output",
- CellTags->"SpinorUBar",
- CellID->1886464450]
+Cell[6851, 221, 129, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[6983, 227, 274, 10, 37, "Output",
+ CellTags->"SpinorU"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5159, 179, 190, 6, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->148613319],
-Cell[5352, 187, 258, 8, 49, "Output",
- CellTags->"SpinorUBar",
- CellID->1176797979]
+Cell[7294, 242, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7432, 248, 256, 8, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5647, 200, 221, 8, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->477030617],
-Cell[5871, 210, 302, 10, 49, "Output",
- CellTags->"SpinorUBar",
- CellID->1179870937]
+Cell[7725, 261, 157, 5, 27, "Input",
+ CellID->19834725],
+Cell[7885, 268, 522, 20, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6210, 225, 251, 9, 27, "Input",
- CellTags->"SpinorUBar",
- CellID->1397974308],
-Cell[6464, 236, 301, 10, 49, "Output",
- CellTags->"SpinorUBar",
- CellID->118588427]
+Cell[8444, 293, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8557, 298, 166, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[6792, 250, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8750, 307, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6860, 255, 270, 12, 31, "SeeAlsoSection",
+Cell[8818, 312, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[7133, 269, 700, 27, 70, "Text",
- CellTags->"SpinorUBar",
- CellID->350873739]
+Cell[9091, 326, 1312, 49, 70, "SeeAlso"]
}, Open ]],
-Cell[7848, 299, 23, 0, 70, "FooterCell"]
+Cell[10418, 378, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBarD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBarD.nb
new file mode 100644
index 000000000..2c0573a75
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUBarD.nb
@@ -0,0 +1,526 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14599, 516]
+NotebookOptionsPosition[ 10615, 387]
+NotebookOutlinePosition[ 13072, 457]
+CellTagsIndexPosition[ 12961, 451]
+WindowTitle->SpinorUBarD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorUBarD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorUBarD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorUBarD.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$246181],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorUBarD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorUBarD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorUBarD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ RowBox[{"p", ",", "m"}], ")"}], TraditionalForm]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->282114210],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->981828233],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorUBarD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[1]:=",
+ CellID->1066488732],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{65, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]=",
+ CellID->397412940]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2060242592],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "m", ",", "1"}], "]"}]], "Output",
+ ImageSize->{228, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1288798928]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorUBarD", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[3]:=",
+ CellID->1219506664],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{41, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]=",
+ CellID->1376419356]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1046277707],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",", "1"}], "]"}]], "Output",
+ ImageSize->{226, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->377450379]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBarD", "[", "p", "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->19834725],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{89, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1339799775]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->1407961874]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBar",
+ ButtonNote->"SpinorUBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorU",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorU",
+ ButtonNote->"SpinorU"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorV",
+ ButtonNote->"SpinorV"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
+ ButtonNote->"SpinorVBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->780468192]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"SpinorUBarD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 17.932235}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorUBarD[p, m] denotes a OverscriptBox[u, _](p, m)-spinor that \
+depends on the D-dimensional momentum p.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SpinorUBarD", "titlemodifier" -> "",
+ "windowtitle" -> "SpinorUBarD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SpinorUBarD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5276, 149, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->282114210]},
+ "SpinorU"->{
+ Cell[5908, 178, 153, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6064, 185, 338, 13, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->397412940],
+ Cell[6914, 223, 130, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[7047, 229, 295, 11, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->1376419356]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12452, 431},
+ {"SpinorU", 12586, 435}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 3671, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4257, 110, 288, 11, 45, "ObjectNameGrid"],
+Cell[4548, 123, 703, 22, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5276, 149, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->282114210],
+Cell[CellGroupData[{
+Cell[5688, 168, 195, 6, 26, "ExampleSection",
+ CellID->981828233],
+Cell[CellGroupData[{
+Cell[5908, 178, 153, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6064, 185, 338, 13, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->397412940]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6439, 203, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6577, 209, 300, 9, 51, "Output",
+ CellID->1288798928]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6914, 223, 130, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[7047, 229, 295, 11, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->1376419356]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7379, 245, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7517, 251, 299, 9, 51, "Output",
+ CellID->377450379]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7853, 265, 159, 5, 27, "Input",
+ CellID->19834725],
+Cell[8015, 272, 524, 21, 37, "Output",
+ CellID->1339799775]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8576, 298, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8689, 303, 187, 6, 35, "Output",
+ CellID->1407961874]
+}, Open ]]
+}, Open ]],
+Cell[8903, 313, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8971, 318, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9244, 332, 1329, 50, 70, "SeeAlso",
+ CellID->780468192]
+}, Open ]],
+Cell[10588, 385, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUD.nb
new file mode 100644
index 000000000..22b2f0e8c
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorUD.nb
@@ -0,0 +1,522 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14462, 512]
+NotebookOptionsPosition[ 10515, 384]
+NotebookOutlinePosition[ 12937, 453]
+CellTagsIndexPosition[ 12826, 447]
+WindowTitle->SpinorUD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorUD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorUD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SpinorUD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$247085],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorUD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorUD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorUD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{"u",
+ RowBox[{"(",
+ RowBox[{"p", ",", "m"}], ")"}]}], TraditionalForm]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ". "
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->100627945],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->714870838],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorUD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[1]:=",
+ CellID->1066488732],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{63, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]=",
+ CellID->658020456]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2060242592],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "m", ",", "1"}], "]"}]], "Output",
+ ImageSize->{228, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1063623654]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorUD", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[3]:=",
+ CellID->1219506664],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]=",
+ CellID->882792700]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1046277707],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",", "1"}], "]"}]], "Output",
+ ImageSize->{226, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->1065078839]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"SpinorUD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->19834725],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{87, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->100090183]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->633382777]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBar",
+ ButtonNote->"SpinorUBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorU",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorU",
+ ButtonNote->"SpinorU"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorV",
+ ButtonNote->"SpinorV"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
+ ButtonNote->"SpinorVBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->694651819]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SpinorUD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 20.302439}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorUD[p, m] denotes a u (p, m)-spinor that depends on the \
+D-dimensional momentum p. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SpinorUD", "titlemodifier" -> "", "windowtitle" -> "SpinorUD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SpinorUD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5252, 149, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->100627945]},
+ "SpinorU"->{
+ Cell[5884, 178, 150, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6037, 185, 314, 12, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->658020456],
+ Cell[6863, 222, 127, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[6993, 228, 270, 10, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->882792700]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12318, 427},
+ {"SpinorU", 12452, 431}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[580, 21, 3664, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4247, 110, 285, 11, 45, "ObjectNameGrid"],
+Cell[4535, 123, 692, 22, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5252, 149, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->100627945],
+Cell[CellGroupData[{
+Cell[5664, 168, 195, 6, 26, "ExampleSection",
+ CellID->714870838],
+Cell[CellGroupData[{
+Cell[5884, 178, 150, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6037, 185, 314, 12, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->658020456]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6388, 202, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6526, 208, 300, 9, 51, "Output",
+ CellID->1063623654]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6863, 222, 127, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[6993, 228, 270, 10, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->882792700]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7300, 243, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7438, 249, 300, 9, 51, "Output",
+ CellID->1065078839]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7775, 263, 156, 5, 27, "Input",
+ CellID->19834725],
+Cell[7934, 270, 497, 20, 37, "Output",
+ CellID->100090183]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8468, 295, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8581, 300, 186, 6, 35, "Output",
+ CellID->633382777]
+}, Open ]]
+}, Open ]],
+Cell[8794, 310, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8862, 315, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9135, 329, 1338, 50, 70, "SeeAlso",
+ CellID->694651819]
+}, Open ]],
+Cell[10488, 382, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorV.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorV.nb
index 77a435ec2..225cd21ce 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorV.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorV.nb
@@ -3,69 +3,104 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12448, 458]
-NotebookOptionsPosition[ 7921, 308]
-NotebookOutlinePosition[ 10912, 397]
-CellTagsIndexPosition[ 10803, 391]
+NotebookDataLength[ 14208, 501]
+NotebookOptionsPosition[ 10373, 379]
+NotebookOutlinePosition[ 12805, 448]
+CellTagsIndexPosition[ 12694, 442]
WindowTitle->SpinorV
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SpinorV\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SpinorV"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SpinorV.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorV\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorV"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SpinorV.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$143680],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SpinorV", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$249345],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorV", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,17 +108,34 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SpinorV", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SpinorV", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SpinorV", "[",
- RowBox[{"p", ",", " ", "m", ",", " ", "optarg"}], "]"}]],
- "InlineFormula"],
- " \[LineSeparator]",
- "denotes a v-spinor."
+ RowBox[{"p", ",", " ", "m"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a ",
+ Cell[BoxData[
+ RowBox[{"v",
+ RowBox[{"(",
+ RowBox[{"p", ",", "m"}], ")"}]}]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ". "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -109,7 +161,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->855350702],
+ CellID->930877862],
Cell[CellGroupData[{
@@ -119,139 +171,135 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1921930974],
+ CellID->1178405923],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorV", "[", "p", "]"}]], "Input",
- CellTags->"SpinorV",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
CellLabel->"In[1]:=",
- CellID->1210511040],
+ CellID->1066488732],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox["\<\"v\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
+ RowBox[{"v", "(",
FormBox["p",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{44, 17},
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{63, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorV",
- CellLabel->"Out[1]=",
- CellID->663666949]
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorV", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Input",
- CellTags->"SpinorV",
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[2]:=",
- CellID->495899740],
+ CellID->2060242592],
Cell[BoxData[
- FormBox[
+ RowBox[{"Spinor", "[",
RowBox[{
- FormBox["\<\"v\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox["p",
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{68, 17},
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p", "]"}]}], ",", "m", ",", "1"}],
+ "]"}]], "Output",
+ ImageSize->{214, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorV",
- CellLabel->"Out[2]=",
- CellID->526244319]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"SpinorV", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "StandardForm"}]], "Input",
- CellTags->"SpinorV",
+ RowBox[{"SpinorV", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
CellLabel->"In[3]:=",
- CellID->54240099],
+ CellID->1219506664],
Cell[BoxData[
- RowBox[{"SpinorV", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Output",
- ImageSize->{110, 15},
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorV",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1454860616]
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"SpinorV", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorV",
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[4]:=",
- CellID->719384042],
+ CellID->1046277707],
Cell[BoxData[
RowBox[{"Spinor", "[",
RowBox[{
RowBox[{"-",
- RowBox[{"Momentum", "[", "p", "]"}]}], ",", "m", ",", "1"}],
+ RowBox[{"Momentum", "[", "p", "]"}]}], ",", "0", ",", "1"}],
"]"}]], "Output",
- ImageSize->{215, 15},
+ ImageSize->{212, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorV",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1229887592]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"SpinorV", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorV",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"SpinorV", "[", "p", "]"}]}]], "Input",
CellLabel->"In[5]:=",
- CellID->943725638],
+ CellID->19834725],
Cell[BoxData[
- RowBox[{"Spinor", "[",
+ FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"Momentum", "[", "p", "]"}]}], ",", "m", ",", "1"}],
- "]"}]], "Output",
- ImageSize->{215, 15},
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{90, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorV",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1429391488]
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -298,10 +346,33 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
ButtonNote->"SpinorVBar"],
FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
+ FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SpinorV",
- CellID->1898482478]
+}], "SeeAlso",
+ CellID->694651819]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -318,20 +389,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 15.611388}",
+ "built" -> "{2020, 1, 5, 19, 2, 26.503755}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "SpinorV[p, m, optarg] denotes a v-spinor.",
- "synonyms" -> {}, "title" -> "SpinorV", "titlemodifier" -> "",
- "windowtitle" -> "SpinorV", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SpinorV"}, "SearchTextTranslated" -> ""},
+ "None", "summary" ->
+ "SpinorV[p, m] denotes a v (p, m)-spinor that depends on the \
+4-dimensional momentum p. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SpinorV", "titlemodifier" -> "", "windowtitle" -> "SpinorV", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SpinorV"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -339,8 +412,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -349,117 +423,86 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3322, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5216, 148, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->855350702]},
- "SpinorV"->{
- Cell[3955, 125, 126, 4, 27, "Input",
- CellTags->"SpinorV",
- CellID->1210511040],
- Cell[4084, 131, 396, 16, 38, "Output",
- CellTags->"SpinorV",
- CellID->663666949],
- Cell[4517, 152, 148, 5, 27, "Input",
- CellTags->"SpinorV",
- CellID->495899740],
- Cell[4668, 159, 482, 20, 38, "Output",
- CellTags->"SpinorV",
- CellID->526244319],
- Cell[5187, 184, 183, 6, 27, "Input",
- CellTags->"SpinorV",
- CellID->54240099],
- Cell[5373, 192, 252, 8, 49, "Output",
- CellTags->"SpinorV",
- CellID->1454860616],
- Cell[5662, 205, 215, 8, 27, "Input",
- CellTags->"SpinorV",
- CellID->719384042],
- Cell[5880, 215, 320, 11, 49, "Output",
- CellTags->"SpinorV",
- CellID->1229887592],
- Cell[6237, 231, 244, 9, 27, "Input",
- CellTags->"SpinorV",
- CellID->943725638],
- Cell[6484, 242, 320, 11, 49, "Output",
- CellTags->"SpinorV",
- CellID->1429391488],
- Cell[7172, 276, 707, 27, 28, "Text",
- CellTags->"SpinorV",
- CellID->1898482478]}
+ CellID->930877862]},
+ "SpinorU"->{
+ Cell[5849, 177, 149, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6001, 184, 294, 11, 37, "Output",
+ CellTags->"SpinorU"],
+ Cell[6784, 220, 126, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[6913, 226, 250, 9, 37, "Output",
+ CellTags->"SpinorU"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9687, 350},
- {"SpinorV", 9820, 354}
+ {"PrimaryExamplesSection", 12231, 424},
+ {"SpinorU", 12365, 428}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3662, 87, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 421, 14, 82, "Usage",
+Cell[4244, 110, 284, 11, 45, "ObjectNameGrid"],
+Cell[4531, 123, 660, 21, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3322, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5216, 148, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->855350702],
+ CellID->930877862],
+Cell[CellGroupData[{
+Cell[5628, 167, 196, 6, 26, "ExampleSection",
+ CellID->1178405923],
Cell[CellGroupData[{
-Cell[3734, 115, 196, 6, 25, "ExampleSection",
- CellID->1921930974],
+Cell[5849, 177, 149, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6001, 184, 294, 11, 37, "Output",
+ CellTags->"SpinorU"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[3955, 125, 126, 4, 27, "Input",
- CellTags->"SpinorV",
- CellID->1210511040],
-Cell[4084, 131, 396, 16, 38, "Output",
- CellTags->"SpinorV",
- CellID->663666949]
+Cell[6332, 200, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6470, 206, 277, 9, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4517, 152, 148, 5, 27, "Input",
- CellTags->"SpinorV",
- CellID->495899740],
-Cell[4668, 159, 482, 20, 38, "Output",
- CellTags->"SpinorV",
- CellID->526244319]
+Cell[6784, 220, 126, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[6913, 226, 250, 9, 37, "Output",
+ CellTags->"SpinorU"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5187, 184, 183, 6, 27, "Input",
- CellTags->"SpinorV",
- CellID->54240099],
-Cell[5373, 192, 252, 8, 49, "Output",
- CellTags->"SpinorV",
- CellID->1454860616]
+Cell[7200, 240, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7338, 246, 277, 9, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5662, 205, 215, 8, 27, "Input",
- CellTags->"SpinorV",
- CellID->719384042],
-Cell[5880, 215, 320, 11, 49, "Output",
- CellTags->"SpinorV",
- CellID->1229887592]
+Cell[7652, 260, 154, 5, 27, "Input",
+ CellID->19834725],
+Cell[7809, 267, 497, 19, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6237, 231, 244, 9, 27, "Input",
- CellTags->"SpinorV",
- CellID->943725638],
-Cell[6484, 242, 320, 11, 49, "Output",
- CellTags->"SpinorV",
- CellID->1429391488]
+Cell[8343, 291, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8456, 296, 166, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[6831, 257, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8649, 305, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6899, 262, 270, 12, 31, "SeeAlsoSection",
+Cell[8717, 310, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[7172, 276, 707, 27, 28, "Text",
- CellTags->"SpinorV",
- CellID->1898482478]
+Cell[8990, 324, 1341, 50, 70, "SeeAlso",
+ CellID->694651819]
}, Open ]],
-Cell[7894, 306, 23, 0, 70, "FooterCell"]
+Cell[10346, 377, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBar.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBar.nb
index 262f3d189..6f572c03f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBar.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBar.nb
@@ -3,69 +3,104 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 12448, 450]
-NotebookOptionsPosition[ 7811, 299]
-NotebookOutlinePosition[ 10878, 389]
-CellTagsIndexPosition[ 10766, 383]
+NotebookDataLength[ 14322, 504]
+NotebookOptionsPosition[ 10508, 383]
+NotebookOutlinePosition[ 12917, 451]
+CellTagsIndexPosition[ 12806, 445]
WindowTitle->SpinorVBar
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SpinorVBar\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SpinorVBar"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SpinorVBar.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$143337],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SpinorVBar", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorVBar\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorVBar"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorVBar.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$248441],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorVBar", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +108,35 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SpinorVBar", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SpinorVBar", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"SpinorVBar", "[",
RowBox[{"p", ",", " ", "m"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes a ",
+ " \[LineSeparator]denotes a ",
Cell[BoxData[
FormBox[
- OverscriptBox["v", "_"], TraditionalForm]]],
- "(p,m)-spinor."
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ RowBox[{"p", ",", "m"}], ")"}], TraditionalForm]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ". "
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -112,7 +162,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->928046215],
+ CellID->1529551905],
Cell[CellGroupData[{
@@ -122,127 +172,138 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->682966705],
+ CellID->1794703897],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorVBar", "[", "p", "]"}]], "Input",
- CellTags->"SpinorVBar",
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
CellLabel->"In[1]:=",
- CellID->646348691],
+ CellID->1066488732],
Cell[BoxData[
FormBox[
RowBox[{
OverscriptBox["v", "_"], "(",
FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{65, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorVBar",
- CellLabel->"Out[1]=",
- CellID->1882446348]
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SpinorVBar", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Input",
- CellTags->"SpinorVBar",
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[2]:=",
- CellID->528224322],
+ CellID->2060242592],
Cell[BoxData[
- FormBox[
+ RowBox[{"Spinor", "[",
RowBox[{
- OverscriptBox["v", "_"], "(",
- FormBox["p",
- TraditionalForm], ",",
- FormBox["m",
- TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{57, 17},
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "p", "]"}]}], ",", "m", ",", "1"}],
+ "]"}]], "Output",
+ ImageSize->{214, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorVBar",
- CellLabel->"Out[2]=",
- CellID->1394668028]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"SpinorVBar", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "StandardForm"}]], "Input",
- CellTags->"SpinorVBar",
+ RowBox[{"SpinorVBar", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
CellLabel->"In[3]:=",
- CellID->678939025],
+ CellID->1219506664],
Cell[BoxData[
- RowBox[{"SpinorVBar", "[",
- RowBox[{"p", ",", "m"}], "]"}]], "Output",
- ImageSize->{134, 15},
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{41, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorVBar",
- CellLabel->"Out[3]//StandardForm=",
- CellID->1488791128]
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"SpinorVBar", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorVBar",
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
CellLabel->"In[4]:=",
- CellID->460340495],
+ CellID->1046277707],
Cell[BoxData[
RowBox[{"Spinor", "[",
RowBox[{
RowBox[{"-",
- RowBox[{"Momentum", "[", "p", "]"}]}], ",", "m", ",", "1"}],
+ RowBox[{"Momentum", "[", "p", "]"}]}], ",", "0", ",", "1"}],
"]"}]], "Output",
- ImageSize->{215, 15},
+ ImageSize->{212, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorVBar",
- CellLabel->"Out[4]//StandardForm=",
- CellID->683662572]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"SpinorVBar", "[",
- RowBox[{"p", ",", "m"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"SpinorVBar",
+ RowBox[{"SpinorVBar", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
CellLabel->"In[5]:=",
- CellID->1244393308],
+ CellID->19834725],
Cell[BoxData[
- RowBox[{"Spinor", "[",
+ FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"Momentum", "[", "p", "]"}]}], ",", "m", ",", "1"}],
- "]"}]], "Output",
- ImageSize->{215, 15},
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{92, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SpinorVBar",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1316602145]
+ CellLabel->"Out[5]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]="]
}, Open ]]
}, Open ]],
@@ -272,6 +333,12 @@ Cell[TextData[{
ButtonNote->"Spinor"],
FontFamily->"Verdana"],
", ",
+ StyleBox[ButtonBox["SpinorUBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBar",
+ ButtonNote->"SpinorUBar"],
+ FontFamily->"Verdana"],
+ ", ",
StyleBox[ButtonBox["SpinorU",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/SpinorU",
@@ -284,23 +351,40 @@ Cell[TextData[{
ButtonNote->"SpinorV"],
FontFamily->"Verdana"],
", ",
- StyleBox[ButtonBox["SpinorUBar",
+ StyleBox[ButtonBox["SpinorUBarD",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SpinorUBar",
- ButtonNote->"SpinorUBar"],
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SpinorVBar",
- CellID->1366275510]
+}], "SeeAlso",
+ CellID->780468192]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"SpinorVBar",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -309,21 +393,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 13.993663}",
+ "built" -> "{2020, 1, 5, 19, 2, 24.218279}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "SpinorVBar[p, m] denotes a OverscriptBox[v, _](p,m)-spinor.",
- "synonyms" -> {}, "title" -> "SpinorVBar", "titlemodifier" -> "",
- "windowtitle" -> "SpinorVBar", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SpinorVBar"}, "SearchTextTranslated" -> ""},
+ "SpinorVBar[p, m] denotes a OverscriptBox[v, _](p, m)-spinor that depends \
+on the 4-dimensional momentum p. ", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SpinorVBar", "titlemodifier" -> "", "windowtitle" ->
+ "SpinorVBar", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SpinorVBar"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -332,7 +417,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -341,117 +426,86 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3415, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5277, 149, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->928046215]},
- "SpinorVBar"->{
- Cell[4047, 128, 131, 4, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->646348691],
- Cell[4181, 134, 298, 11, 38, "Output",
- CellTags->"SpinorVBar",
- CellID->1882446348],
- Cell[4516, 150, 154, 5, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->528224322],
- Cell[4673, 157, 342, 13, 38, "Output",
- CellTags->"SpinorVBar",
- CellID->1394668028],
- Cell[5052, 175, 190, 6, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->678939025],
- Cell[5245, 183, 258, 8, 49, "Output",
- CellTags->"SpinorVBar",
- CellID->1488791128],
- Cell[5540, 196, 221, 8, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->460340495],
- Cell[5764, 206, 322, 11, 49, "Output",
- CellTags->"SpinorVBar",
- CellID->683662572],
- Cell[6123, 222, 251, 9, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->1244393308],
- Cell[6377, 233, 323, 11, 49, "Output",
- CellTags->"SpinorVBar",
- CellID->1316602145],
- Cell[7068, 267, 701, 27, 28, "Text",
- CellTags->"SpinorVBar",
- CellID->1366275510]}
+ CellID->1529551905]},
+ "SpinorU"->{
+ Cell[5911, 178, 152, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6066, 185, 318, 12, 37, "Output",
+ CellTags->"SpinorU"],
+ Cell[6873, 222, 129, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[7005, 228, 274, 10, 37, "Output",
+ CellTags->"SpinorU"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9612, 342},
- {"SpinorVBar", 9748, 346}
+ {"PrimaryExamplesSection", 12341, 427},
+ {"SpinorU", 12476, 431}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3669, 87, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 496, 17, 83, "Usage",
+Cell[4254, 110, 287, 11, 45, "ObjectNameGrid"],
+Cell[4544, 123, 708, 22, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3415, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5277, 149, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->928046215],
+ CellID->1529551905],
Cell[CellGroupData[{
-Cell[3827, 118, 195, 6, 25, "ExampleSection",
- CellID->682966705],
+Cell[5690, 168, 196, 6, 26, "ExampleSection",
+ CellID->1794703897],
+Cell[CellGroupData[{
+Cell[5911, 178, 152, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6066, 185, 318, 12, 37, "Output",
+ CellTags->"SpinorU"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[4047, 128, 131, 4, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->646348691],
-Cell[4181, 134, 298, 11, 38, "Output",
- CellTags->"SpinorVBar",
- CellID->1882446348]
+Cell[6421, 202, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6559, 208, 277, 9, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4516, 150, 154, 5, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->528224322],
-Cell[4673, 157, 342, 13, 38, "Output",
- CellTags->"SpinorVBar",
- CellID->1394668028]
+Cell[6873, 222, 129, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[7005, 228, 274, 10, 37, "Output",
+ CellTags->"SpinorU"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5052, 175, 190, 6, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->678939025],
-Cell[5245, 183, 258, 8, 49, "Output",
- CellTags->"SpinorVBar",
- CellID->1488791128]
+Cell[7316, 243, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7454, 249, 277, 9, 51, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5540, 196, 221, 8, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->460340495],
-Cell[5764, 206, 322, 11, 49, "Output",
- CellTags->"SpinorVBar",
- CellID->683662572]
+Cell[7768, 263, 157, 5, 27, "Input",
+ CellID->19834725],
+Cell[7928, 270, 522, 20, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6123, 222, 251, 9, 27, "Input",
- CellTags->"SpinorVBar",
- CellID->1244393308],
-Cell[6377, 233, 323, 11, 49, "Output",
- CellTags->"SpinorVBar",
- CellID->1316602145]
+Cell[8487, 295, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8600, 300, 166, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[6727, 248, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8793, 309, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6795, 253, 270, 12, 31, "SeeAlsoSection",
+Cell[8861, 314, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[7068, 267, 701, 27, 28, "Text",
- CellTags->"SpinorVBar",
- CellID->1366275510]
+Cell[9134, 328, 1332, 50, 70, "SeeAlso",
+ CellID->780468192]
}, Open ]],
-Cell[7784, 297, 23, 0, 70, "FooterCell"]
+Cell[10481, 381, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBarD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBarD.nb
new file mode 100644
index 000000000..c84d62081
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVBarD.nb
@@ -0,0 +1,530 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14651, 520]
+NotebookOptionsPosition[ 10662, 391]
+NotebookOutlinePosition[ 13122, 461]
+CellTagsIndexPosition[ 13011, 455]
+WindowTitle->SpinorVBarD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorVBarD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorVBarD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SpinorVBarD.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$247989],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorVBarD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorVBarD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorVBarD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ RowBox[{"p", ",", "m"}], ")"}], TraditionalForm]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ". "
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->795507055],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1325088500],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorVBarD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[1]:=",
+ CellID->1066488732],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{65, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]=",
+ CellID->260595618]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2060242592],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}]}], ",", "m", ",", "1"}], "]"}]], "Output",\
+
+ ImageSize->{237, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1722913412]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorVBarD", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[3]:=",
+ CellID->1219506664],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{41, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]=",
+ CellID->1512984979]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1046277707],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}]}], ",", "0", ",", "1"}], "]"}]], "Output",\
+
+ ImageSize->{235, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->602233374]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBarD", "[", "p", "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->19834725],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{89, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1007368411]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->288354181]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBar",
+ ButtonNote->"SpinorUBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorU",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorU",
+ ButtonNote->"SpinorU"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorV",
+ ButtonNote->"SpinorV"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
+ ButtonNote->"SpinorVBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD",
+ ButtonNote->"SpinorVD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->780468192]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"SpinorVBarD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 23.015739}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorVBarD[p, m] denotes a OverscriptBox[v, _](p, m)-spinor that \
+depends on the D-dimensional momentum p. ", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SpinorVBarD", "titlemodifier" -> "",
+ "windowtitle" -> "SpinorVBarD", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SpinorVBarD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5277, 149, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->795507055]},
+ "SpinorU"->{
+ Cell[5910, 178, 153, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6066, 185, 338, 13, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->260595618],
+ Cell[6939, 225, 130, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[7072, 231, 295, 11, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->1512984979]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12502, 435},
+ {"SpinorU", 12636, 439}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 3671, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4257, 110, 288, 11, 45, "ObjectNameGrid"],
+Cell[4548, 123, 704, 22, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5277, 149, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->795507055],
+Cell[CellGroupData[{
+Cell[5689, 168, 196, 6, 26, "ExampleSection",
+ CellID->1325088500],
+Cell[CellGroupData[{
+Cell[5910, 178, 153, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6066, 185, 338, 13, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->260595618]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6441, 203, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6579, 209, 323, 11, 51, "Output",
+ CellID->1722913412]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6939, 225, 130, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[7072, 231, 295, 11, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->1512984979]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7404, 247, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7542, 253, 322, 11, 51, "Output",
+ CellID->602233374]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7901, 269, 159, 5, 27, "Input",
+ CellID->19834725],
+Cell[8063, 276, 524, 21, 37, "Output",
+ CellID->1007368411]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8624, 302, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8737, 307, 186, 6, 35, "Output",
+ CellID->288354181]
+}, Open ]]
+}, Open ]],
+Cell[8950, 317, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9018, 322, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9291, 336, 1329, 50, 70, "SeeAlso",
+ CellID->780468192]
+}, Open ]],
+Cell[10635, 389, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVD.nb
new file mode 100644
index 000000000..9c6a344e1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SpinorVD.nb
@@ -0,0 +1,526 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14535, 516]
+NotebookOptionsPosition[ 10530, 387]
+NotebookOutlinePosition[ 13008, 457]
+CellTagsIndexPosition[ 12897, 451]
+WindowTitle->SpinorVD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Spinor\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Spinor"], "\<\"SpinorUBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBar"], "\<\"SpinorU\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorU"], "\<\"SpinorV\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorV"], "\<\"SpinorVBar\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorVBar"], "\<\"SpinorUBarD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUBarD"], "\<\"SpinorUD\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SpinorUD"], "\<\"SpinorVBarD\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SpinorVBarD"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SpinorVD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SpinorVD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SpinorVD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$248893],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SpinorVD", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SpinorVD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SpinorVD", "[",
+ RowBox[{"p", ",", " ", "m"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a ",
+ Cell[BoxData[
+ RowBox[{"v",
+ RowBox[{"(",
+ RowBox[{"p", ",", "m"}], ")"}]}]], "InlineFormula"],
+ "-spinor that depends on the ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional momentum ",
+ Cell[BoxData["p"], "InlineFormula"],
+ ". "
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->375942548],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->195895847],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorVD", "[",
+ RowBox[{"p", ",", "m"}], "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[1]:=",
+ CellID->1066488732],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{63, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[1]=",
+ CellID->1640245181]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->2060242592],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}]}], ",", "m", ",", "1"}], "]"}]], "Output",\
+
+ ImageSize->{237, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1875530041]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SpinorVD", "[", "p", "]"}]], "Input",
+ CellTags->"SpinorU",
+ CellLabel->"In[3]:=",
+ CellID->1219506664],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{39, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SpinorU",
+ CellLabel->"Out[3]=",
+ CellID->414446859]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[", "%", "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1046277707],
+
+Cell[BoxData[
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}]}], ",", "0", ",", "1"}], "]"}]], "Output",\
+
+ ImageSize->{235, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->5453947]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"SpinorVD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->19834725],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{87, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1725631249]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1275256319],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->2088412432]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBar",
+ ButtonNote->"SpinorUBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorU",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorU",
+ ButtonNote->"SpinorU"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorV",
+ ButtonNote->"SpinorV"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBar",
+ ButtonNote->"SpinorVBar"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD",
+ ButtonNote->"SpinorUBarD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD",
+ ButtonNote->"SpinorUD"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD",
+ ButtonNote->"SpinorVBarD"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->694651819]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"SpinorVD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 25.391246}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SpinorVD[p, m] denotes a v (p, m)-spinor that depends on the \
+D-dimensional momentum p. ", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "SpinorVD", "titlemodifier" -> "", "windowtitle" -> "SpinorVD", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SpinorVD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5221, 148, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->375942548]},
+ "SpinorU"->{
+ Cell[5853, 177, 150, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+ Cell[6006, 184, 315, 12, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->1640245181],
+ Cell[6856, 223, 127, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+ Cell[6986, 229, 270, 10, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->414446859]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 12388, 431},
+ {"SpinorU", 12522, 435}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[580, 21, 3664, 87, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[4247, 110, 285, 11, 45, "ObjectNameGrid"],
+Cell[4535, 123, 661, 21, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5221, 148, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->375942548],
+Cell[CellGroupData[{
+Cell[5633, 167, 195, 6, 26, "ExampleSection",
+ CellID->195895847],
+Cell[CellGroupData[{
+Cell[5853, 177, 150, 5, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1066488732],
+Cell[6006, 184, 315, 12, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->1640245181]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6358, 201, 135, 4, 27, "Input",
+ CellID->2060242592],
+Cell[6496, 207, 323, 11, 51, "Output",
+ CellID->1875530041]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6856, 223, 127, 4, 27, "Input",
+ CellTags->"SpinorU",
+ CellID->1219506664],
+Cell[6986, 229, 270, 10, 37, "Output",
+ CellTags->"SpinorU",
+ CellID->414446859]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7293, 244, 135, 4, 27, "Input",
+ CellID->1046277707],
+Cell[7431, 250, 320, 11, 51, "Output",
+ CellID->5453947]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7788, 266, 156, 5, 27, "Input",
+ CellID->19834725],
+Cell[7947, 273, 498, 20, 37, "Output",
+ CellID->1725631249]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8482, 298, 110, 3, 27, "Input",
+ CellID->1275256319],
+Cell[8595, 303, 187, 6, 35, "Output",
+ CellID->2088412432]
+}, Open ]]
+}, Open ]],
+Cell[8809, 313, 31, 0, 70, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8877, 318, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[9150, 332, 1338, 50, 70, "SeeAlso",
+ CellID->694651819]
+}, Open ]],
+Cell[10503, 385, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SplittingFunction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SplittingFunction.nb
index 73adceea5..d04e6c9a6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SplittingFunction.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SplittingFunction.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 65657, 2212]
-NotebookOptionsPosition[ 51712, 1758]
-NotebookOutlinePosition[ 59290, 1981]
-CellTagsIndexPosition[ 59167, 1975]
+NotebookDataLength[ 59813, 2072]
+NotebookOptionsPosition[ 47371, 1683]
+NotebookOutlinePosition[ 54014, 1869]
+CellTagsIndexPosition[ 53891, 1863]
WindowTitle->SplittingFunction
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SplittingFunction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SplittingFunction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"AnomalousDimension\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/AnomalousDimension"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SplittingFunction\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SplittingFunction"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
SplittingFunction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$144370],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SplittingFunction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$249794],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SplittingFunction", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ SplittingFunction.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SplittingFunction", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SplittingFunction", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,6 +130,58 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1521387340],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SplittingFunction", "]"}]], "Input",
+ CellTags->"SplittingFunction",
+ CellLabel->"In[6]:=",
+ CellID->414842319],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Polarization", "\[Rule]", "1"}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{110, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SplittingFunction",
+ CellLabel->"Out[6]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -111,7 +197,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1477549620],
+ CellID->1337686776],
Cell[CellGroupData[{
@@ -121,55 +207,28 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1135486383],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "SplittingFunction", "]"}]], "Input",
- CellTags->"SplittingFunction",
- CellLabel->"In[1]:=",
- CellID->414842319],
+ CellID->825458383],
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Polarization", "\[Rule]", "1"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{121, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SplittingFunction",
- CellLabel->"Out[1]=",
- CellID->594696224]
-}, Open ]],
+Cell["Unpolarized case:", "Notes"],
-Cell["Unpolarized case:", "Text",
- CellTags->"SplittingFunction",
- CellID->1917658754],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"SplittingFunction", ",",
- RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], ";"}]], "Input",
- CellTags->"SplittingFunction",
- CellLabel->"In[2]:=",
- CellID->665292837],
-
-Cell["\<\
-In general the argument should be a string, but if the variables Pqq etc. \
-have no value, you can omit the \"\".\
-\>", "Text",
+Cell[TextData[StyleBox["In general the argument should be a string, but if \
+the variables Pqq etc. have no value, you can omit the \"\".", "Notes"]], \
+"Notes",
CellTags->"SplittingFunction",
CellID->1814679407],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pqq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pqq", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->2029473456],
Cell[BoxData[
@@ -181,87 +240,93 @@ Cell[BoxData[
RowBox[{"6", " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"4", " ", "x"}], "+",
RowBox[{"8", " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- "4"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{397, 44},
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "-", "4"}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{262, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[3]=",
- CellID->1596392060]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pqg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pqg", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[4]:=",
+ CellLabel->"In[2]:=",
CellID->1960078762],
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["T", "f"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"16", " ",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"]}], "-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "8"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{234, 21},
+ SuperscriptBox["x", "2"]}], "-",
+ RowBox[{"16", " ", "x"}], "+", "8"}], ")"}], " ",
+ SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
+ ImageSize->{144, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[4]=",
- CellID->1245944145]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pgq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pgq", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[5]:=",
+ CellLabel->"In[3]:=",
CellID->1606503237],
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["C", "F"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
- FractionBox["8",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]], "-", "8"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{213, 44},
+ RowBox[{"4", " ", "x"}], "+",
+ FractionBox["8", "x"], "-", "8"}], ")"}], " ",
+ SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
+ ImageSize->{121, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[5]=",
- CellID->1432653043]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pgg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pgg", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->1592599209],
Cell[BoxData[
@@ -271,46 +336,46 @@ Cell[BoxData[
SubscriptBox["C", "A"], " ",
RowBox[{"(",
RowBox[{
+ RowBox[{"-",
+ SuperscriptBox["x", "2"]}], "+",
RowBox[{
FractionBox["11", "12"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "-",
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+",
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}]}], "+", "x", "+",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"], "+",
- FractionBox["1",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]], "-", "2"}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"], "+",
+ FractionBox["1", "x"], "-", "2"}], ")"}]}], "-",
RowBox[{
FractionBox["8", "3"], " ",
SubscriptBox["N", "f"], " ",
SubscriptBox["T", "f"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{567, 93},
+ ImageSize->{471, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[6]=",
- CellID->1371632662]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "aqq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"aqq", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[7]:=",
+ CellLabel->"In[5]:=",
CellID->1202955773],
Cell[BoxData[
@@ -326,53 +391,53 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], ")"}], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
+ RowBox[{"2", " ", "x"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "2"}], ")"}], " ",
+ RowBox[{"2", " ", "x"}], "+", "2"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-",
RowBox[{"4", " ",
- RowBox[{"(",
- RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "-",
+ RowBox[{"4", " ",
+ SubscriptBox[
+ RowBox[{"(",
FractionBox[
RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+",
- SubscriptBox[
- RowBox[{"(",
- FractionBox[
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}],
- ")"}]}], "-", "4"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{436, 115},
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "-", "4"}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{479, 77},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[7]=",
- CellID->1567961177]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "agq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"agq", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[8]:=",
+ CellLabel->"In[6]:=",
CellID->549448603],
Cell[BoxData[
@@ -382,39 +447,35 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-",
- FractionBox["4",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]], "+",
+ RowBox[{"4", " ", "x"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"-",
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-",
- FractionBox["4",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]], "+", "4"}], ")"}], " ",
+ RowBox[{"2", " ", "x"}], "-", "4"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+", "2"}],
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "+", "2"}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{460, 97},
+ ImageSize->{271, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[8]=",
- CellID->1027460889]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "aqg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"aqg", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[9]:=",
+ CellLabel->"In[7]:=",
CellID->715685164],
Cell[BoxData[
@@ -439,39 +500,40 @@ Cell[BoxData[
RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-", "4"}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{461, 21},
+ ImageSize->{466, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[9]=",
+ CellLabel->"Out[7]=",
CellID->700079032]
}, Open ]],
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "agg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"agg", ",",
+ RowBox[{"Polarization", "\[Rule]", "0"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[10]:=",
+ CellLabel->"In[8]:=",
CellID->443108438],
-Cell["Polarized case:", "Text",
- CellTags->"SplittingFunction",
- CellID->358761934],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"SplittingFunction", ",",
- RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], ";"}]], "Input",
- CellTags->"SplittingFunction",
- CellLabel->"In[11]:=",
- CellID->804753879],
+Cell["Polarized case:", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pqq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pqq", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[12]:=",
+ CellLabel->"In[9]:=",
CellID->1751600770],
Cell[BoxData[
@@ -483,82 +545,90 @@ Cell[BoxData[
RowBox[{"6", " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"4", " ", "x"}], "+",
RowBox[{"8", " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- "4"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{397, 44},
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "-", "4"}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{262, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[12]=",
- CellID->1771730461]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pqg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pqg", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[13]:=",
+ CellLabel->"In[10]:=",
CellID->715841852],
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["T", "f"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "8"}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{134, 18},
+ RowBox[{"16", " ", "x"}], "-", "8"}], ")"}], " ",
+ SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
+ ImageSize->{91, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[13]=",
- CellID->932494684]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pgq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pgq", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[14]:=",
+ CellLabel->"In[11]:=",
CellID->1646523691],
Cell[BoxData[
FormBox[
RowBox[{
- SubscriptBox["C", "F"], " ",
RowBox[{"(",
RowBox[{"8", "-",
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{132, 15},
+ RowBox[{"4", " ", "x"}]}], ")"}], " ",
+ SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
+ ImageSize->{88, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[14]=",
- CellID->288935917]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "Pgg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"Pgg", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[15]:=",
+ CellLabel->"In[12]:=",
CellID->1231189034],
Cell[BoxData[
@@ -572,41 +642,41 @@ Cell[BoxData[
FractionBox["22", "3"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"16", " ", "x"}], "+",
RowBox[{"8", " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
- "8"}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+", "8"}], ")"}]}], "-",
RowBox[{
FractionBox["8", "3"], " ",
SubscriptBox["N", "f"], " ",
SubscriptBox["T", "f"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{424, 93},
+ ImageSize->{412, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[15]=",
- CellID->1238950235]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "aqq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"aqq", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[16]:=",
+ CellLabel->"In[13]:=",
CellID->98129728],
Cell[BoxData[
@@ -622,58 +692,53 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], ")"}], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
RowBox[{"8", " ",
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
+ RowBox[{"2", " ", "x"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "2"}], ")"}], " ",
+ RowBox[{"2", " ", "x"}], "+", "2"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-",
RowBox[{"4", " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "-",
RowBox[{"4", " ",
SubscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- "4"}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{458, 115},
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "-", "4"}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{479, 77},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[16]=",
- CellID->721937427]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "agq", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"agq", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[17]:=",
+ CellLabel->"In[14]:=",
CellID->1908869685],
Cell[BoxData[
@@ -683,34 +748,35 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "+",
+ RowBox[{"4", " ", "x"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "4"}], ")"}], " ",
+ RowBox[{"2", " ", "x"}], "-", "4"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+", "2"}],
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "+", "2"}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{456, 15},
+ ImageSize->{271, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[17]=",
- CellID->707171378]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "agqd", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"agqd", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[18]:=",
+ CellLabel->"In[15]:=",
CellID->1649871241],
Cell[BoxData[
@@ -722,29 +788,31 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "4"}], ")"}], " ",
+ RowBox[{"2", " ", "x"}], "-", "4"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-", "2"}],
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-", "2"}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{360, 15},
+ ImageSize->{221, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[18]=",
- CellID->1438562024]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "aqg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"aqg", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[19]:=",
+ CellLabel->"In[16]:=",
CellID->1552619850],
Cell[BoxData[
@@ -756,29 +824,31 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"4", "-",
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
+ RowBox[{"8", " ", "x"}]}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-", "4"}],
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-", "4"}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{357, 18},
+ ImageSize->{217, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[19]=",
- CellID->991848500]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "aqgd", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"aqgd", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[20]:=",
+ CellLabel->"In[17]:=",
CellID->81713985],
Cell[BoxData[
@@ -790,29 +860,31 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"4", "-",
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
+ RowBox[{"8", " ", "x"}]}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-", "4"}],
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-", "4"}],
")"}]}], TraditionalForm]], "Output",
- ImageSize->{357, 18},
+ ImageSize->{217, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[20]=",
- CellID->32591320]
+ CellLabel->"Out[17]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "agg", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"agg", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[21]:=",
+ CellLabel->"In[18]:=",
CellID->1048960999],
Cell[BoxData[
@@ -830,59 +902,55 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], ")"}], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "4"}], ")"}], " ",
+ RowBox[{"8", " ", "x"}], "-", "4"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-",
RowBox[{"4", " ",
RowBox[{"(",
RowBox[{
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+",
+ RowBox[{"log", "(", "x", ")"}],
+ RowBox[{"1", "-", "x"}]], "+",
SubscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}],
- ")"}]}], "+", "2"}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], ")"}]}], "+", "2"}],
+ ")"}]}], "-",
RowBox[{
FractionBox["20", "9"], " ",
SubscriptBox["T", "f"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{555, 96},
+ ImageSize->{376, 78},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[21]=",
- CellID->1114151464]
+ CellLabel->"Out[18]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "aggd", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"aggd", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[22]:=",
+ CellLabel->"In[19]:=",
CellID->1079830623],
Cell[BoxData[
@@ -900,59 +968,55 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], ")"}], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "4"}], ")"}], " ",
+ RowBox[{"8", " ", "x"}], "-", "4"}], ")"}], " ",
RowBox[{"log", "(",
RowBox[{
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}], " ", "x"}], ")"}]}], "-",
RowBox[{"4", " ",
RowBox[{"(",
RowBox[{
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+",
+ RowBox[{"log", "(", "x", ")"}],
+ RowBox[{"1", "-", "x"}]], "+",
SubscriptBox[
RowBox[{"(",
FractionBox[
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}],
- ")"}]}], "+", "2"}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], ")"}]}], "+", "2"}],
+ ")"}]}], "-",
RowBox[{
FractionBox["20", "9"], " ",
SubscriptBox["T", "f"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{555, 96},
+ ImageSize->{376, 78},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[22]=",
- CellID->1637836671]
+ CellLabel->"Out[19]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "PQQS", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"PQQS", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[23]:=",
+ CellLabel->"In[20]:=",
CellID->1747750059],
Cell[BoxData[
@@ -964,37 +1028,37 @@ Cell[BoxData[
RowBox[{
RowBox[{"16", " ",
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}]}], "-",
RowBox[{"16", " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"48", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "16"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}],
- TraditionalForm]], "Output",
- ImageSize->{489, 42},
+ RowBox[{"48", " ", "x"}], "-", "16"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}], TraditionalForm]], "Output",\
+
+ ImageSize->{394, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[23]=",
- CellID->28847461]
+ CellLabel->"Out[20]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "PQQNS", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"PQQNS", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[24]:=",
+ CellLabel->"In[21]:=",
CellID->111584241],
Cell[BoxData[
@@ -1010,53 +1074,50 @@ Cell[BoxData[
SubscriptBox["C", "A"], "2"]}], ")"}], " ",
RowBox[{"(",
RowBox[{
- RowBox[{
- FractionBox["1",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]],
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- RowBox[{"2", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], "-",
- RowBox[{"4", " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
- "PolyLog"]}], "+",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], "-",
- RowBox[{"4", " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}], "+",
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], "-",
+ RowBox[{"4", " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
+ "PolyLog"]}], "+",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"log", "(",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}],
+ RowBox[{"x", "+", "1"}]], "+",
RowBox[{"4", " ",
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{"2", " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}], "+",
RowBox[{
SubscriptBox["C", "A"], " ",
SubscriptBox["C", "F"], " ",
RowBox[{"(",
RowBox[{
+ FractionBox[
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]], "+",
RowBox[{"8", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}], "+",
+ RowBox[{"x", "+", "1"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -1066,9 +1127,12 @@ Cell[BoxData[
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
RowBox[{
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}], " ",
RowBox[{"(",
RowBox[{
FractionBox[
@@ -1077,46 +1141,35 @@ Cell[BoxData[
RowBox[{"24", " ",
TemplateBox[{"3"},
"Zeta"]}], "+",
- FractionBox["17", "3"]}], ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "+",
+ FractionBox["17", "3"]}], ")"}]}], "+",
RowBox[{
FractionBox["4", "9"], " ",
RowBox[{"(",
RowBox[{"53", "-",
- RowBox[{"187", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}]}], "+",
- FractionBox[
- RowBox[{"4", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "-",
+ RowBox[{"187", " ", "x"}]}], ")"}]}], "-",
RowBox[{
FractionBox["4", "3"], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"5", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
+ RowBox[{"5", " ", "x"}], "-",
FractionBox["22",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+", "5"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}]], "+", "5"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}], "+",
RowBox[{
SubscriptBox["C", "F"], " ",
SubscriptBox["N", "f"], " ",
RowBox[{"(",
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"8", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"3", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "x"}], ")"}]}]]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -1127,38 +1180,36 @@ Cell[BoxData[
FractionBox["2", "3"]}], ")"}], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
FractionBox[
- RowBox[{"88", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "9"], "-",
+ RowBox[{"88", " ", "x"}], "9"], "-",
RowBox[{
FractionBox["80", "9"], " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "-",
- FractionBox[
- RowBox[{"8", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"3", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}]], "-",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "-",
FractionBox["8", "9"]}], ")"}]}], "+",
RowBox[{
SubsuperscriptBox["C", "F", "2"], " ",
RowBox[{"(",
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"16", " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["x", "2"], "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "x"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}],
+ RowBox[{"1", "-", "x"}]]}], "+",
RowBox[{
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"-",
@@ -1166,62 +1217,42 @@ Cell[BoxData[
RowBox[{"\[Zeta]", "(", "2", ")"}]}]}], "+",
RowBox[{"48", " ",
TemplateBox[{"3"},
- "Zeta"]}], "+", "3"}], ")"}], " ",
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
- TraditionalForm], ")"}]}], "-",
+ "Zeta"]}], "+", "3"}], ")"}]}], "-",
RowBox[{"40", " ",
RowBox[{"(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}]}], "-",
RowBox[{"4", " ",
RowBox[{"(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "-",
RowBox[{"8", " ",
RowBox[{"(",
RowBox[{
- RowBox[{"2", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"2", " ", "x"}], "+",
FractionBox["3",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
- FractionBox[
- RowBox[{"16", " ",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "2"], "+", "1"}], ")"}],
- " ",
- RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]]}], ")"}]}]}],
+ RowBox[{"1", "-", "x"}]]}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{579, 682},
+ ImageSize->{575, 373},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[24]=",
- CellID->502237986]
+ CellLabel->"Out[21]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "PQG", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"PQG", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[25]:=",
+ CellLabel->"In[22]:=",
CellID->1622861813],
Cell[BoxData[
@@ -1239,62 +1270,43 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-", "8"}], ")"}],
- " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
+ RowBox[{"16", " ", "x"}]}], "-", "8"}], ")"}], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
"PolyLog"]}], "-",
- RowBox[{"44", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"44", " ", "x"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"4", "-",
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
+ RowBox[{"8", " ", "x"}]}], ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-", "4"}], ")"}],
- " ",
+ RowBox[{"8", " ", "x"}]}], "-", "4"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "16"}], ")"}], " ",
-
+ RowBox[{"16", " ", "x"}], "-", "16"}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"32", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "4"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ RowBox[{"32", " ", "x"}], "+", "4"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-", "8"}], ")"}],
- " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
+ RowBox[{"16", " ", "x"}]}], "-", "8"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}], "+",
- "48"}], ")"}]}], "+",
+ RowBox[{"x", "+", "1"}], ")"}]}], "+", "48"}], ")"}]}], "+",
RowBox[{"4", " ",
SubscriptBox["C", "F"], " ",
SubscriptBox["T", "f"], " ",
@@ -1303,63 +1315,56 @@ Cell[BoxData[
RowBox[{"8", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}]}], "-",
RowBox[{"16", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
- RowBox[{"54", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ", "x"}], "+",
+ RowBox[{"54", " ", "x"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "4"}], ")"}], " ",
+ RowBox[{"8", " ", "x"}], "-", "4"}], ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "2"}], ")"}], " ",
+ RowBox[{"4", " ", "x"}], "-", "2"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"16", "-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
+ RowBox[{"16", " ", "x"}]}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"8", "-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
+ RowBox[{"16", " ", "x"}]}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}]}], "-",
RowBox[{"18", " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-", "44"}],
- ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{551, 148},
+ RowBox[{"log", "(", "x", ")"}]}], "-", "44"}], ")"}]}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{538, 110},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[25]=",
- CellID->2112286231]
+ CellLabel->"Out[22]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "PGQ", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"PGQ", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[26]:=",
+ CellLabel->"In[23]:=",
CellID->747834490],
Cell[BoxData[
@@ -1375,75 +1380,53 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "32"}], ")"}], " ",
-
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
+ RowBox[{"16", " ", "x"}], "+", "32"}], ")"}], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
"PolyLog"]}], "+",
RowBox[{"16", " ",
- RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"\[Zeta]", "(", "2", ")"}], " ", "x"}], "+",
FractionBox[
- RowBox[{"280", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "9"], "+",
+ RowBox[{"280", " ", "x"}], "9"], "+",
RowBox[{
RowBox[{"(",
RowBox[{"16", "-",
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
+ RowBox[{"8", " ", "x"}]}], ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "16"}], ")"}], " ",
-
+ RowBox[{"8", " ", "x"}], "+", "16"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
FractionBox[
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "3"], "+",
+ RowBox[{"8", " ", "x"}], "3"], "+",
FractionBox["80", "3"]}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "32"}], ")"}], " ",
-
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
+ RowBox[{"16", " ", "x"}], "-", "32"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"32", "-",
- RowBox[{"104", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ RowBox[{"104", " ", "x"}]}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "32"}], ")"}], " ",
-
+ RowBox[{"16", " ", "x"}], "+", "32"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}]}], "+",
+ RowBox[{"x", "+", "1"}], ")"}]}], "+",
FractionBox["328", "9"]}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
@@ -1454,84 +1437,71 @@ Cell[BoxData[
RowBox[{
RowBox[{"-",
FractionBox[
- RowBox[{"32", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "9"]}], "+",
+ RowBox[{"32", " ", "x"}], "9"]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
FractionBox[
- RowBox[{"32", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "3"], "-",
+ RowBox[{"32", " ", "x"}], "3"], "-",
FractionBox["64", "3"]}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}]}], "-",
FractionBox["128", "9"]}], ")"}]}], "+",
RowBox[{
SubsuperscriptBox["C", "F", "2"], ".",
RowBox[{"(",
RowBox[{
- RowBox[{"32", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"32", " ", "x"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "16"}], ")"}], " ",
-
+ RowBox[{"8", " ", "x"}], "-", "16"}], ")"}], " ",
RowBox[{
SuperscriptBox["log", "2"], "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"8", "-",
- RowBox[{"4", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], ")"}], " ",
+ RowBox[{"4", " ", "x"}]}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"8", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-", "16"}], ")"}],
- " ",
+ RowBox[{"8", " ", "x"}]}], "-", "16"}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}]}], "-",
+ RowBox[{"1", "-", "x"}], ")"}]}], "-",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"32", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "64"}], ")"}], " ",
-
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ RowBox[{"32", " ", "x"}], "+", "64"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"36", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+", "48"}], ")"}], " ",
-
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-", "68"}],
- ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{534, 308},
+ RowBox[{"36", " ", "x"}], "+", "48"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "-", "68"}], ")"}]}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{542, 205},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[26]=",
- CellID->691007042]
+ CellLabel->"Out[23]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"SplittingFunction", "[", "PGG", "]"}]], "Input",
+ RowBox[{
+ RowBox[{"SplittingFunction", "[",
+ RowBox[{"PGG", ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"SplittingFunction",
- CellLabel->"In[27]:=",
+ CellLabel->"In[24]:=",
CellID->1886436228],
Cell[BoxData[
@@ -1547,29 +1517,24 @@ Cell[BoxData[
FractionBox["32", "3"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}]}], "+",
FractionBox[
- RowBox[{"608", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "9"], "-",
+ RowBox[{"608", " ", "x"}], "9"], "-",
RowBox[{
FractionBox["160", "9"], " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-",
FractionBox[
- RowBox[{"32", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "3"]}], "-",
+ RowBox[{"32", " ", "x"}], "3"]}], "-",
FractionBox["32", "3"]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
+ RowBox[{"log", "(", "x", ")"}]}], "-",
FractionBox["448", "9"]}], ")"}]}], "+",
RowBox[{
SubsuperscriptBox["C", "A", "2"], " ",
@@ -1578,108 +1543,79 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"64", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"64", " ", "x"}], "+",
FractionBox["32",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+", "32"}],
- ")"}], " ",
- TemplateBox[{"2",RowBox[{"-",
- RowBox[{"FCGV", "(", "\"x\"", ")"}]}]},
+ RowBox[{"x", "+", "1"}]], "+", "32"}], ")"}], " ",
+ TemplateBox[{"2",RowBox[{"-", "x"}]},
"PolyLog"]}], "+",
RowBox[{
FractionBox["64", "3"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "+",
RowBox[{
RowBox[{"\[Zeta]", "(", "2", ")"}], " ",
RowBox[{"(",
RowBox[{
- RowBox[{"64", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
+ RowBox[{"64", " ", "x"}], "-",
RowBox[{"16", " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
-
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
FractionBox["16",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]]}], ")"}]}],
- "+",
+ RowBox[{"x", "+", "1"}]]}], ")"}]}], "+",
RowBox[{"24", " ",
TemplateBox[{"3"},
"Zeta"], " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}], "-",
FractionBox[
- RowBox[{"388", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "9"], "+",
+ RowBox[{"388", " ", "x"}], "9"], "+",
RowBox[{
FractionBox["536", "9"], " ",
SubscriptBox[
RowBox[{"(",
FractionBox["1",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], ")"}], "+"]}], "+",
+ RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-",
FractionBox["8",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]]}], "+",
+ RowBox[{"x", "+", "1"}]]}], "+",
FractionBox["8",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "+", "32"}], ")"}],
- " ",
+ RowBox[{"1", "-", "x"}]], "+", "32"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
FractionBox["232", "3"], "-",
FractionBox[
- RowBox[{"536", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "3"]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ RowBox[{"536", " ", "x"}], "3"]}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"64", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-",
+ RowBox[{"64", " ", "x"}], "-",
FractionBox["32",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]], "-", "32"}], ")"}],
- " ",
+ RowBox[{"1", "-", "x"}]], "-", "32"}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ RowBox[{"1", "-", "x"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"64", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"64", " ", "x"}], "+",
FractionBox["32",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}]], "+", "32"}],
- ")"}], " ",
+ RowBox[{"x", "+", "1"}]], "+", "32"}], ")"}], " ",
RowBox[{"log", "(",
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], "+", "1"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-",
+ RowBox[{"x", "+", "1"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "-",
FractionBox["148", "9"]}], ")"}]}], "+",
RowBox[{
SubscriptBox["C", "F"], " ",
@@ -1690,36 +1626,27 @@ Cell[BoxData[
RowBox[{"8", " ",
RowBox[{"\[Delta]", "(",
FormBox[
- RowBox[{"1", "-",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}],
+ RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}]}]}], "+",
- RowBox[{"80", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "+",
+ RowBox[{"80", " ", "x"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"-",
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}]}], "-", "16"}], ")"}],
- " ",
+ RowBox[{"16", " ", "x"}]}], "-", "16"}], ")"}], " ",
RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "+",
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
- RowBox[{"16", " ",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}]}], "-", "80"}], ")"}], " ",
-
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}], "-", "80"}],
- ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{549, 517},
+ RowBox[{"16", " ", "x"}], "-", "80"}], ")"}], " ",
+ RowBox[{"log", "(", "x", ")"}]}], "-", "80"}], ")"}]}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{569, 233},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SplittingFunction",
- CellLabel->"Out[27]=",
- CellID->318505242]
+ CellLabel->"Out[24]="]
}, Open ]]
}, Open ]],
@@ -1749,9 +1676,7 @@ Cell[TextData[{
ButtonNote->"AnomalousDimension"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SplittingFunction",
- CellID->828495950]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1759,7 +1684,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"SplittingFunction",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1768,22 +1693,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 18.561801}",
+ "built" -> "{2020, 1, 5, 19, 2, 27.743938}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SplittingFunction[pxy] is a database of splitting functions in the \
-OverscriptBox[MS, _] scheme.", "synonyms" -> {}, "title" ->
+OverscriptBox[MS, _] scheme.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"SplittingFunction", "titlemodifier" -> "", "windowtitle" ->
"SplittingFunction", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SplittingFunction"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1791,8 +1716,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1800,420 +1726,354 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3464, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1477549620]},
"SplittingFunction"->{
- Cell[4098, 127, 151, 4, 27, "Input",
+ Cell[5295, 162, 151, 4, 70, "Input",
CellTags->"SplittingFunction",
CellID->414842319],
- Cell[4252, 133, 286, 10, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->594696224],
- Cell[4553, 146, 86, 2, 32, "Text",
- CellTags->"SplittingFunction",
- CellID->1917658754],
- Cell[4642, 150, 238, 7, 27, "Input",
- CellTags->"SplittingFunction",
- CellID->665292837],
- Cell[4883, 159, 190, 5, 52, "Text",
+ Cell[5449, 168, 266, 9, 35, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[6424, 213, 214, 4, 48, "Notes",
CellTags->"SplittingFunction",
CellID->1814679407],
- Cell[5098, 168, 148, 4, 27, "Input",
+ Cell[6663, 221, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->2029473456],
- Cell[5249, 174, 776, 26, 65, "Output",
- CellTags->"SplittingFunction",
- CellID->1596392060],
- Cell[6062, 205, 148, 4, 27, "Input",
+ Cell[7013, 233, 616, 22, 57, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[7666, 260, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1960078762],
- Cell[6213, 211, 497, 17, 42, "Output",
- CellTags->"SplittingFunction",
- CellID->1245944145],
- Cell[6747, 233, 148, 4, 27, "Input",
+ Cell[8016, 272, 386, 13, 42, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[8439, 290, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1606503237],
- Cell[6898, 239, 464, 16, 65, "Output",
- CellTags->"SplittingFunction",
- CellID->1432653043],
- Cell[7399, 260, 148, 4, 27, "Input",
+ Cell[8789, 302, 354, 12, 55, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[9180, 319, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1592599209],
- Cell[7550, 266, 1211, 38, 114, "Output",
- CellTags->"SplittingFunction",
- CellID->1371632662],
- Cell[8798, 309, 148, 4, 27, "Input",
+ Cell[9530, 331, 944, 32, 57, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[10511, 368, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1202955773],
- Cell[8949, 315, 1658, 51, 136, "Output",
- CellTags->"SplittingFunction",
- CellID->1567961177],
- Cell[10644, 371, 147, 4, 27, "Input",
+ Cell[10861, 380, 1332, 45, 98, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[12230, 430, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->549448603],
- Cell[10794, 377, 977, 31, 118, "Output",
- CellTags->"SplittingFunction",
- CellID->1027460889],
- Cell[11808, 413, 147, 4, 27, "Input",
+ Cell[12579, 442, 588, 21, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[13204, 468, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->715685164],
- Cell[11958, 419, 832, 27, 42, "Output",
+ Cell[13553, 480, 832, 27, 42, "Output",
CellTags->"SplittingFunction",
CellID->700079032],
- Cell[12805, 449, 148, 4, 27, "Input",
+ Cell[14400, 510, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->443108438],
- Cell[12956, 455, 83, 2, 31, "Text",
- CellTags->"SplittingFunction",
- CellID->358761934],
- Cell[13042, 459, 239, 7, 27, "Input",
- CellTags->"SplittingFunction",
- CellID->804753879],
- Cell[13306, 470, 149, 4, 27, "Input",
+ Cell[14806, 526, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1751600770],
- Cell[13458, 476, 777, 26, 65, "Output",
- CellTags->"SplittingFunction",
- CellID->1771730461],
- Cell[14272, 507, 148, 4, 27, "Input",
+ Cell[15156, 538, 616, 22, 57, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[15809, 565, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->715841852],
- Cell[14423, 513, 388, 14, 39, "Output",
- CellTags->"SplittingFunction",
- CellID->932494684],
- Cell[14848, 532, 149, 4, 27, "Input",
+ Cell[16159, 577, 321, 11, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[16517, 593, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1646523691],
- Cell[15000, 538, 387, 14, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->288935917],
- Cell[15424, 557, 149, 4, 27, "Input",
+ Cell[16868, 605, 320, 11, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[17225, 621, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1231189034],
- Cell[15576, 563, 1108, 37, 114, "Output",
- CellTags->"SplittingFunction",
- CellID->1238950235],
- Cell[16721, 605, 147, 4, 27, "Input",
+ Cell[17576, 633, 897, 31, 57, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[18510, 669, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->98129728],
- Cell[16871, 611, 1815, 56, 136, "Output",
- CellTags->"SplittingFunction",
- CellID->721937427],
- Cell[18723, 672, 149, 4, 27, "Input",
+ Cell[18859, 681, 1333, 45, 98, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[20229, 731, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1908869685],
- Cell[18875, 678, 791, 26, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->707171378],
- Cell[19703, 709, 150, 4, 27, "Input",
+ Cell[20580, 743, 589, 21, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[21206, 769, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1649871241],
- Cell[19856, 715, 690, 23, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->1438562024],
- Cell[20583, 743, 149, 4, 27, "Input",
+ Cell[21558, 781, 531, 19, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[22126, 805, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1552619850],
- Cell[20735, 749, 689, 23, 39, "Output",
- CellTags->"SplittingFunction",
- CellID->991848500],
- Cell[21461, 777, 148, 4, 27, "Input",
+ Cell[22477, 817, 531, 19, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[23045, 841, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->81713985],
- Cell[21612, 783, 688, 23, 39, "Output",
- CellTags->"SplittingFunction",
- CellID->32591320],
- Cell[22337, 811, 149, 4, 27, "Input",
+ Cell[23395, 853, 531, 19, 37, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[23963, 877, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1048960999],
- Cell[22489, 817, 1901, 59, 117, "Output",
- CellTags->"SplittingFunction",
- CellID->1114151464],
- Cell[24427, 881, 150, 4, 27, "Input",
+ Cell[24314, 889, 1448, 49, 99, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[25799, 943, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1079830623],
- Cell[24580, 887, 1901, 59, 117, "Output",
- CellTags->"SplittingFunction",
- CellID->1637836671],
- Cell[26518, 951, 150, 4, 27, "Input",
+ Cell[26151, 955, 1448, 49, 99, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[27636, 1009, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1747750059],
- Cell[26671, 957, 967, 31, 63, "Output",
- CellTags->"SplittingFunction",
- CellID->28847461],
- Cell[27675, 993, 150, 4, 27, "Input",
+ Cell[27988, 1021, 723, 25, 42, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[28748, 1051, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->111584241],
- Cell[27828, 999, 7133, 216, 703, "Output",
- CellTags->"SplittingFunction",
- CellID->502237986],
- Cell[34998, 1220, 149, 4, 27, "Input",
+ Cell[29100, 1063, 5472, 177, 394, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[34609, 1245, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1622861813],
- Cell[35150, 1226, 4251, 127, 169, "Output",
- CellTags->"SplittingFunction",
- CellID->2112286231],
- Cell[39438, 1358, 148, 4, 27, "Input",
+ Cell[34960, 1257, 2993, 95, 131, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[37990, 1357, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->747834490],
- Cell[39589, 1364, 5232, 161, 329, "Output",
- CellTags->"SplittingFunction",
- CellID->691007042],
- Cell[44858, 1530, 149, 4, 27, "Input",
+ Cell[38340, 1369, 3671, 120, 226, "Output",
+ CellTags->"SplittingFunction"],
+ Cell[42048, 1494, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1886436228],
- Cell[45010, 1536, 6026, 185, 538, "Output",
- CellTags->"SplittingFunction",
- CellID->318505242],
- Cell[51404, 1744, 266, 9, 31, "Text",
- CellTags->"SplittingFunction",
- CellID->828495950]}
+ Cell[42399, 1506, 4345, 142, 254, "Output",
+ CellTags->"SplittingFunction"]},
+ "PrimaryExamplesSection"->{
+ Cell[5776, 184, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1337686776]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 53579, 1802},
- {"SplittingFunction", 53723, 1806}
+ {"SplittingFunction", 49273, 1728},
+ {"PrimaryExamplesSection", 53747, 1856}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[589, 21, 2282, 52, 51, "AnchorBarGrid",
+Cell[589, 21, 3059, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2874, 75, 60, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2937, 78, 502, 16, 85, "Usage",
- CellID->982511436],
+Cell[3651, 97, 294, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3464, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1477549620],
+Cell[3970, 112, 502, 16, 87, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3877, 117, 196, 6, 25, "ExampleSection",
- CellID->1135486383],
+Cell[4497, 132, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1521387340],
+Cell[5239, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4098, 127, 151, 4, 27, "Input",
+Cell[5295, 162, 151, 4, 70, "Input",
CellTags->"SplittingFunction",
CellID->414842319],
-Cell[4252, 133, 286, 10, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->594696224]
+Cell[5449, 168, 266, 9, 35, "Output",
+ CellTags->"SplittingFunction"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4553, 146, 86, 2, 32, "Text",
- CellTags->"SplittingFunction",
- CellID->1917658754],
-Cell[4642, 150, 238, 7, 27, "Input",
- CellTags->"SplittingFunction",
- CellID->665292837],
-Cell[4883, 159, 190, 5, 52, "Text",
+Cell[CellGroupData[{
+Cell[5776, 184, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1337686776],
+Cell[CellGroupData[{
+Cell[6189, 203, 195, 6, 26, "ExampleSection",
+ CellID->825458383],
+Cell[6387, 211, 34, 0, 32, "Notes"],
+Cell[6424, 213, 214, 4, 48, "Notes",
CellTags->"SplittingFunction",
CellID->1814679407],
Cell[CellGroupData[{
-Cell[5098, 168, 148, 4, 27, "Input",
+Cell[6663, 221, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->2029473456],
-Cell[5249, 174, 776, 26, 65, "Output",
- CellTags->"SplittingFunction",
- CellID->1596392060]
+Cell[7013, 233, 616, 22, 57, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6062, 205, 148, 4, 27, "Input",
+Cell[7666, 260, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1960078762],
-Cell[6213, 211, 497, 17, 42, "Output",
- CellTags->"SplittingFunction",
- CellID->1245944145]
+Cell[8016, 272, 386, 13, 42, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6747, 233, 148, 4, 27, "Input",
+Cell[8439, 290, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1606503237],
-Cell[6898, 239, 464, 16, 65, "Output",
- CellTags->"SplittingFunction",
- CellID->1432653043]
+Cell[8789, 302, 354, 12, 55, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7399, 260, 148, 4, 27, "Input",
+Cell[9180, 319, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1592599209],
-Cell[7550, 266, 1211, 38, 114, "Output",
- CellTags->"SplittingFunction",
- CellID->1371632662]
+Cell[9530, 331, 944, 32, 57, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8798, 309, 148, 4, 27, "Input",
+Cell[10511, 368, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1202955773],
-Cell[8949, 315, 1658, 51, 136, "Output",
- CellTags->"SplittingFunction",
- CellID->1567961177]
+Cell[10861, 380, 1332, 45, 98, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10644, 371, 147, 4, 27, "Input",
+Cell[12230, 430, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->549448603],
-Cell[10794, 377, 977, 31, 118, "Output",
- CellTags->"SplittingFunction",
- CellID->1027460889]
+Cell[12579, 442, 588, 21, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11808, 413, 147, 4, 27, "Input",
+Cell[13204, 468, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->715685164],
-Cell[11958, 419, 832, 27, 42, "Output",
+Cell[13553, 480, 832, 27, 42, "Output",
CellTags->"SplittingFunction",
CellID->700079032]
}, Open ]],
-Cell[12805, 449, 148, 4, 27, "Input",
+Cell[14400, 510, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->443108438],
-Cell[12956, 455, 83, 2, 31, "Text",
- CellTags->"SplittingFunction",
- CellID->358761934],
-Cell[13042, 459, 239, 7, 27, "Input",
- CellTags->"SplittingFunction",
- CellID->804753879],
+Cell[14749, 522, 32, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[13306, 470, 149, 4, 27, "Input",
+Cell[14806, 526, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1751600770],
-Cell[13458, 476, 777, 26, 65, "Output",
- CellTags->"SplittingFunction",
- CellID->1771730461]
+Cell[15156, 538, 616, 22, 57, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14272, 507, 148, 4, 27, "Input",
+Cell[15809, 565, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->715841852],
-Cell[14423, 513, 388, 14, 39, "Output",
- CellTags->"SplittingFunction",
- CellID->932494684]
+Cell[16159, 577, 321, 11, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[14848, 532, 149, 4, 27, "Input",
+Cell[16517, 593, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1646523691],
-Cell[15000, 538, 387, 14, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->288935917]
+Cell[16868, 605, 320, 11, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15424, 557, 149, 4, 27, "Input",
+Cell[17225, 621, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1231189034],
-Cell[15576, 563, 1108, 37, 114, "Output",
- CellTags->"SplittingFunction",
- CellID->1238950235]
+Cell[17576, 633, 897, 31, 57, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16721, 605, 147, 4, 27, "Input",
+Cell[18510, 669, 346, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->98129728],
-Cell[16871, 611, 1815, 56, 136, "Output",
- CellTags->"SplittingFunction",
- CellID->721937427]
+Cell[18859, 681, 1333, 45, 98, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[18723, 672, 149, 4, 27, "Input",
+Cell[20229, 731, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1908869685],
-Cell[18875, 678, 791, 26, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->707171378]
+Cell[20580, 743, 589, 21, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[19703, 709, 150, 4, 27, "Input",
+Cell[21206, 769, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1649871241],
-Cell[19856, 715, 690, 23, 36, "Output",
- CellTags->"SplittingFunction",
- CellID->1438562024]
+Cell[21558, 781, 531, 19, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[20583, 743, 149, 4, 27, "Input",
+Cell[22126, 805, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1552619850],
-Cell[20735, 749, 689, 23, 39, "Output",
- CellTags->"SplittingFunction",
- CellID->991848500]
+Cell[22477, 817, 531, 19, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[21461, 777, 148, 4, 27, "Input",
+Cell[23045, 841, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->81713985],
-Cell[21612, 783, 688, 23, 39, "Output",
- CellTags->"SplittingFunction",
- CellID->32591320]
+Cell[23395, 853, 531, 19, 37, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[22337, 811, 149, 4, 27, "Input",
+Cell[23963, 877, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1048960999],
-Cell[22489, 817, 1901, 59, 117, "Output",
- CellTags->"SplittingFunction",
- CellID->1114151464]
+Cell[24314, 889, 1448, 49, 99, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[24427, 881, 150, 4, 27, "Input",
+Cell[25799, 943, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1079830623],
-Cell[24580, 887, 1901, 59, 117, "Output",
- CellTags->"SplittingFunction",
- CellID->1637836671]
+Cell[26151, 955, 1448, 49, 99, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[26518, 951, 150, 4, 27, "Input",
+Cell[27636, 1009, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1747750059],
-Cell[26671, 957, 967, 31, 63, "Output",
- CellTags->"SplittingFunction",
- CellID->28847461]
+Cell[27988, 1021, 723, 25, 42, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[27675, 993, 150, 4, 27, "Input",
+Cell[28748, 1051, 349, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->111584241],
-Cell[27828, 999, 7133, 216, 703, "Output",
- CellTags->"SplittingFunction",
- CellID->502237986]
+Cell[29100, 1063, 5472, 177, 394, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[34998, 1220, 149, 4, 27, "Input",
+Cell[34609, 1245, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1622861813],
-Cell[35150, 1226, 4251, 127, 169, "Output",
- CellTags->"SplittingFunction",
- CellID->2112286231]
+Cell[34960, 1257, 2993, 95, 131, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[39438, 1358, 148, 4, 27, "Input",
+Cell[37990, 1357, 347, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->747834490],
-Cell[39589, 1364, 5232, 161, 329, "Output",
- CellTags->"SplittingFunction",
- CellID->691007042]
+Cell[38340, 1369, 3671, 120, 226, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[44858, 1530, 149, 4, 27, "Input",
+Cell[42048, 1494, 348, 10, 29, "Input",
CellTags->"SplittingFunction",
CellID->1886436228],
-Cell[45010, 1536, 6026, 185, 538, "Output",
- CellTags->"SplittingFunction",
- CellID->318505242]
+Cell[42399, 1506, 4345, 142, 254, "Output",
+ CellTags->"SplittingFunction"]
}, Open ]]
}, Open ]],
-Cell[51063, 1725, 31, 0, 29, "SectionFooterSpacer"]
+Cell[46771, 1652, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[51131, 1730, 270, 12, 31, "SeeAlsoSection",
+Cell[46839, 1657, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[51404, 1744, 266, 9, 31, "Text",
- CellTags->"SplittingFunction",
- CellID->828495950]
+Cell[47112, 1671, 217, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[51685, 1756, 23, 0, 42, "FooterCell"]
+Cell[47344, 1681, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SquareAmplitude.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SquareAmplitude.nb
new file mode 100644
index 000000000..91ea60f28
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SquareAmplitude.nb
@@ -0,0 +1,532 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15182, 522]
+NotebookOptionsPosition[ 11155, 394]
+NotebookOutlinePosition[ 13341, 452]
+CellTagsIndexPosition[ 13256, 447]
+WindowTitle->SquareAmplitude
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SquareAmplitude\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SquareAmplitude"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+SquareAmplitude.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$251173],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SquareAmplitude", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["SquareAmplitude", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"SquareAmplitude", "[",
+ RowBox[{"m1", ",", " ", "m2"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]multiplies the amplitudes from the list ",
+ Cell[BoxData["m1"], "InlineFormula"],
+ " with their complex conjugate from the list ",
+ Cell[BoxData["m2"], "InlineFormula"],
+ " to obtain the list of products ",
+ Cell[BoxData[
+ RowBox[{
+ SubscriptBox["m1", "i"],
+ SubscriptBox["m2", "j"]}]], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1247766488],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell["\<\
+This function can be useful when exporting amplitudes obtained with FeynCalc \
+to FORM.\
+\>", "Notes",
+ CellID->1502175831],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SquareAmplitude", "]"}]], "Input",
+ CellLabel->"In[62]:=",
+ CellID->428918938],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Indexed", "\[Rule]", "False"}], ",",
+ RowBox[{"Real", "\[Rule]", "False"}], ",",
+ RowBox[{"List", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{400, 34},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[62]=",
+ CellID->285651048]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->748835101],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(4)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->665919789],
+
+Cell[BoxData[
+ RowBox[{"Clear", "[",
+ RowBox[{"a1", ",", "a2", ",", "a3", ",", "b1", ",", "b2", ",", "b3"}],
+ "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1874998504],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SquareAmplitude", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"b1", ",", "b2", ",", "b3"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1954182245],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"a1", " ", "b1"}], ",",
+ RowBox[{"a1", " ", "b2"}], ",",
+ RowBox[{"a1", " ", "b3"}], ",",
+ RowBox[{"a2", " ", "b1"}], ",",
+ RowBox[{"a2", " ", "b2"}], ",",
+ RowBox[{"a2", " ", "b3"}], ",",
+ RowBox[{"a3", " ", "b1"}], ",",
+ RowBox[{"a3", " ", "b2"}], ",",
+ RowBox[{"a3", " ", "b3"}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{382, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->200339766]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->201964494],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SquareAmplitude", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"b1", ",", "b2", ",", "b3"}], "}"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->339727845],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"a1", " ", "b1"}], "+",
+ RowBox[{"a1", " ", "b2"}], "+",
+ RowBox[{"a1", " ", "b3"}], "+",
+ RowBox[{"a2", " ", "b1"}], "+",
+ RowBox[{"a2", " ", "b2"}], "+",
+ RowBox[{"a2", " ", "b3"}], "+",
+ RowBox[{"a3", " ", "b1"}], "+",
+ RowBox[{"a3", " ", "b2"}], "+",
+ RowBox[{"a3", " ", "b3"}]}], TraditionalForm]], "Output",
+ ImageSize->{426, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->320790960]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->567832013],
+
+Cell[TextData[{
+ "When the option ",
+ Cell[BoxData["Real"], "InlineFormula"],
+ " is set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ", the amplitudes are assumed to have no imaginary part"
+}], "Notes",
+ CellID->2020381572],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SquareAmplitude", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"b1", ",", "b2", ",", "b3"}], "}"}], ",",
+ RowBox[{"Real", "\[Rule]", "True"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1492913147],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"a1", " ", "b1"}], "+",
+ RowBox[{"2", " ", "a2", " ", "b1"}], "+",
+ RowBox[{"a2", " ", "b2"}], "+",
+ RowBox[{"2", " ", "a3", " ", "b1"}], "+",
+ RowBox[{"2", " ", "a3", " ", "b2"}], "+",
+ RowBox[{"a3", " ", "b3"}]}], TraditionalForm]], "Output",
+ ImageSize->{316, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->746137899]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->988148519],
+
+Cell[TextData[{
+ "The option ",
+ Cell[BoxData["Indexed"], "InlineFormula"],
+ " allows us to attach a marker to each contribution"
+}], "Notes",
+ CellID->2100077543],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SquareAmplitude", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a1", ",", "a2", ",", "a3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"b1", ",", "b2", ",", "b3"}], "}"}], ",",
+ RowBox[{"Real", "\[Rule]", "True"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}], ",",
+ RowBox[{"Indexed", "\[Rule]", "mark"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->253785260],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"a1", " ", "b1", " ",
+ RowBox[{"mark", "(",
+ RowBox[{"1", ",", "1"}], ")"}]}], "+",
+ RowBox[{"2", " ", "a2", " ", "b1", " ",
+ RowBox[{"mark", "(",
+ RowBox[{"2", ",", "1"}], ")"}]}], "+",
+ RowBox[{"a2", " ", "b2", " ",
+ RowBox[{"mark", "(",
+ RowBox[{"2", ",", "2"}], ")"}]}], "+",
+ RowBox[{"2", " ", "a3", " ", "b1", " ",
+ RowBox[{"mark", "(",
+ RowBox[{"3", ",", "1"}], ")"}]}], "+",
+ RowBox[{"2", " ", "a3", " ", "b2", " ",
+ RowBox[{"mark", "(",
+ RowBox[{"3", ",", "2"}], ")"}]}], "+",
+ RowBox[{"a3", " ", "b3", " ",
+ RowBox[{"mark", "(",
+ RowBox[{"3", ",", "3"}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{375, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1192527776]
+}, Open ]]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"SquareAmplitude",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 31.775865}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "SquareAmplitude[m1, m2] multiplies the amplitudes from the list m1 with \
+their complex conjugate from the list m2 to obtain the list of products m1i \
+m2j.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SquareAmplitude",
+ "titlemodifier" -> "", "windowtitle" -> "SquareAmplitude", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SquareAmplitude"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5612, 179, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->748835101]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13113, 440}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[587, 21, 2302, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2892, 76, 292, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3209, 91, 726, 21, 106, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3960, 116, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1247766488],
+Cell[4702, 142, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4736, 144, 133, 4, 70, "Notes",
+ CellID->1502175831],
+Cell[CellGroupData[{
+Cell[4894, 152, 118, 3, 70, "Input",
+ CellID->428918938],
+Cell[5015, 157, 536, 15, 55, "Output",
+ CellID->285651048]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5612, 179, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->748835101],
+Cell[CellGroupData[{
+Cell[6024, 198, 195, 6, 26, "ExampleSection",
+ CellID->665919789],
+Cell[6222, 206, 174, 5, 27, "Input",
+ CellID->1874998504],
+Cell[CellGroupData[{
+Cell[6421, 215, 259, 8, 27, "Input",
+ CellID->1954182245],
+Cell[6683, 225, 547, 17, 35, "Output",
+ CellID->200339766]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7267, 247, 125, 3, 9, "ExampleDelimiter",
+ CellID->201964494],
+Cell[CellGroupData[{
+Cell[7417, 254, 305, 9, 27, "Input",
+ CellID->339727845],
+Cell[7725, 265, 514, 16, 35, "Output",
+ CellID->320790960]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8288, 287, 125, 3, 9, "ExampleDelimiter",
+ CellID->567832013],
+Cell[8416, 292, 226, 7, 32, "Notes",
+ CellID->2020381572],
+Cell[CellGroupData[{
+Cell[8667, 303, 352, 10, 27, "Input",
+ CellID->1492913147],
+Cell[9022, 315, 436, 13, 35, "Output",
+ CellID->746137899]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9507, 334, 125, 3, 9, "ExampleDelimiter",
+ CellID->988148519],
+Cell[9635, 339, 163, 5, 32, "Notes",
+ CellID->2100077543],
+Cell[CellGroupData[{
+Cell[9823, 348, 400, 11, 45, "Input",
+ CellID->253785260],
+Cell[10226, 361, 851, 25, 56, "Output",
+ CellID->1192527776]
+}, Open ]]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11128, 392, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardMatrixElement.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardMatrixElement.nb
index 404e2360a..a8a43cb51 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardMatrixElement.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardMatrixElement.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6242, 188]
-NotebookOptionsPosition[ 3941, 122]
-NotebookOutlinePosition[ 5969, 177]
-CellTagsIndexPosition[ 5886, 172]
+NotebookDataLength[ 6933, 209]
+NotebookOptionsPosition[ 4877, 152]
+NotebookOutlinePosition[ 6726, 201]
+CellTagsIndexPosition[ 6683, 198]
WindowTitle->StandardMatrixElement
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/StandardMatrixElement\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/StandardMatrixElement"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/StandardMatrixElement\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/StandardMatrixElement"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
StandardMatrixElement.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$145428],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/StandardMatrixElement", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$251606],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/StandardMatrixElement", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ StandardMatrixElement.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["StandardMatrixElement", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["StandardMatrixElement", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"StandardMatrixElement",
- CellID->844790882]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,21 +162,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 23.661523}",
+ "built" -> "{2020, 1, 5, 19, 2, 32.929712}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"StandardMatrixElement[ ...] is the head for matrix element \
-abbreviations.", "synonyms" -> {}, "title" -> "StandardMatrixElement",
- "titlemodifier" -> "", "windowtitle" -> "StandardMatrixElement", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/StandardMatrixElement"}},
+abbreviations.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "StandardMatrixElement", "titlemodifier" -> "", "windowtitle" ->
+ "StandardMatrixElement", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/StandardMatrixElement"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "StandardMatrixElement"->{
- Cell[3662, 108, 237, 9, 70, "Text",
- CellTags->"StandardMatrixElement",
- CellID->844790882]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"StandardMatrixElement", 5763, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2298, 52, 70, "AnchorBarGrid",
+Cell[593, 21, 3053, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2894, 75, 64, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2961, 78, 403, 12, 70, "Usage",
+Cell[3649, 97, 298, 11, 70, "ObjectNameGrid"],
+Cell[3950, 110, 403, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3389, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4378, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3662, 108, 237, 9, 70, "Text",
- CellTags->"StandardMatrixElement",
- CellID->844790882]
+Cell[4651, 140, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3914, 120, 23, 0, 70, "FooterCell"]
+Cell[4850, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardPropagatorDenominator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardPropagatorDenominator.nb
new file mode 100644
index 000000000..5ab41fa16
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/StandardPropagatorDenominator.nb
@@ -0,0 +1,324 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10460, 314]
+NotebookOptionsPosition[ 7278, 227]
+NotebookOutlinePosition[ 9841, 290]
+CellTagsIndexPosition[ 9757, 285]
+WindowTitle->StandardPropagatorDenominator
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/StandardPropagatorDenominator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/StandardPropagatorDenominator"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+StandardPropagatorDenominator.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$252047],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/StandardPropagatorDenominator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["StandardPropagatorDenominator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q1", ",", "D"}], "]"}], "+"}], "..."}], ",",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"q1", ",", "D"}], "]"}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p1", ",", "D"}], "]"}], "+"}], "..."}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "s"}], "}"}]}], "]"}]}]}]], "InlineFormula"],
+ " \[LineSeparator]encodes a generic Lorentzian propagator denominator \
+1/[(q1+...)^2 + q1.p1 + ... + m^2 + s*I eta]^n. This allows to accomodate for \
+standard propagators of the type 1/(p^2-m^2) but also for propagators \
+encountered in manifestly Lorentz covariant effective field theories such as \
+HQET or SCET. StandardPropagatorDenominator is an internal object. To enter \
+such propagators in FeynCalc you should use SFAD."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->519354005],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1736729043],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",", "0", ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->127407996],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1047178842]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"StandardPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"p", ",", "D"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"q", ",", "D"}], "]"}]}], "]"}], ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "1"}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1886042593],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox["q", TraditionalForm], TraditionalForm]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{118, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->492218860]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"StandardPropagatorDenominator",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 34.021302}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "StandardPropagatorDenominator[Momentum[q1, D] + ..., Pair[Momentum[q1, \
+D], Momentum[p1, D] + ..., m^2, {n, s}] encodes a generic Lorentzian \
+propagator denominator 1/[(q1+...)^2 + q1.p1 + ... + m^2 + s*I eta]^n. This \
+allows to accomodate for standard propagators of the type 1/(p^2-m^2) but \
+also for propagators encountered in manifestly Lorentz covariant effective \
+field theories such as HQET or SCET. StandardPropagatorDenominator is an \
+internal object. To enter such propagators in FeynCalc you should use SFAD.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "StandardPropagatorDenominator", "titlemodifier" -> "", "windowtitle" ->
+ "StandardPropagatorDenominator", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/StandardPropagatorDenominator"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4627, 127, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->519354005]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9614, 278}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[601, 21, 2380, 55, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2984, 78, 306, 11, 45, "ObjectNameGrid"],
+Cell[3293, 91, 1309, 32, 171, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4627, 127, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->519354005],
+Cell[CellGroupData[{
+Cell[5039, 146, 196, 6, 26, "ExampleSection",
+ CellID->1736729043],
+Cell[CellGroupData[{
+Cell[5260, 156, 374, 11, 45, "Input",
+ CellID->127407996],
+Cell[5637, 169, 455, 13, 61, "Output",
+ CellID->1047178842]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6129, 187, 505, 15, 45, "Input",
+ CellID->1886042593],
+Cell[6637, 204, 575, 16, 61, "Output",
+ CellID->492218860]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7251, 225, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/StringChomp.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/StringChomp.nb
new file mode 100644
index 000000000..e5d5d02d0
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/StringChomp.nb
@@ -0,0 +1,257 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 7597, 247]
+NotebookOptionsPosition[ 4957, 168]
+NotebookOutlinePosition[ 6985, 223]
+CellTagsIndexPosition[ 6901, 218]
+WindowTitle->StringChomp
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/StringChomp\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/StringChomp"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+StringChomp.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$252477],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/StringChomp", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["StringChomp", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"StringChomp", "[", "str", "]"}]], "InlineFormula"],
+ " \[LineSeparator] chops initial and final white space of the string ",
+ Cell[BoxData["str"], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->98922809],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->189869183],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StringChomp", "[", "\"\< abc \>\"", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->296966363],
+
+Cell[BoxData[
+ FormBox["\<\"abc\"\>", TraditionalForm]], "Output",
+ ImageSize->{25, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1659907677]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "InputForm"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1353126443],
+
+Cell["\"abc\"", "Output",
+ ImageSize->{40, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//InputForm=",
+ CellID->1988507982]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"StringChomp",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 2, 35.134511}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "StringChomp[str] chops initial and final white space of the string str.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "StringChomp",
+ "titlemodifier" -> "", "windowtitle" -> "StringChomp", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/StringChomp"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3632, 106, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->98922809]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 6759, 211}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[583, 21, 2286, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2872, 76, 288, 11, 45, "ObjectNameGrid"],
+Cell[3163, 89, 444, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3632, 106, 386, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->98922809],
+Cell[CellGroupData[{
+Cell[4043, 125, 195, 6, 26, "ExampleSection",
+ CellID->189869183],
+Cell[CellGroupData[{
+Cell[4263, 135, 119, 3, 27, "Input",
+ CellID->296966363],
+Cell[4385, 140, 197, 6, 35, "Output",
+ CellID->1659907677]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4619, 151, 102, 3, 27, "Input",
+ CellID->1353126443],
+Cell[4724, 156, 167, 5, 51, "Output",
+ CellID->1988507982]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[4930, 166, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SubLoop.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SubLoop.nb
index 7da5fa09e..5c77af866 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SubLoop.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SubLoop.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6073, 188]
-NotebookOptionsPosition[ 3851, 122]
-NotebookOutlinePosition[ 5813, 177]
-CellTagsIndexPosition[ 5744, 172]
+NotebookDataLength[ 6833, 209]
+NotebookOptionsPosition[ 4802, 152]
+NotebookOutlinePosition[ 6626, 201]
+CellTagsIndexPosition[ 6583, 198]
WindowTitle->SubLoop
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SubLoop\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SubLoop"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SubLoop.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OPE1Loop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OPE1Loop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SubLoop\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SubLoop"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SubLoop.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$145772],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/SubLoop", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$252906],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/SubLoop", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SubLoop", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SubLoop", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"OPE1Loop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SubLoop",
- CellID->1624471809]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,21 +162,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 25.088892}",
+ "built" -> "{2020, 1, 5, 19, 2, 36.216913}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SubLoop is an option for OPE1Loop. If set to True, sub 1-loop \
-tensorintegral decomposition is performed.", "synonyms" -> {}, "title" ->
- "SubLoop", "titlemodifier" -> "", "windowtitle" -> "SubLoop", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/SubLoop"}},
+tensorintegral decomposition is performed.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "SubLoop", "titlemodifier" -> "",
+ "windowtitle" -> "SubLoop", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SubLoop"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -155,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "SubLoop"->{
- Cell[3582, 108, 227, 9, 70, "Text",
- CellTags->"SubLoop",
- CellID->1624471809]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"SubLoop", 5634, 165}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 70, "AnchorBarGrid",
+Cell[579, 21, 2998, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 408, 12, 70, "Usage",
+Cell[3580, 97, 284, 11, 70, "ObjectNameGrid"],
+Cell[3867, 110, 408, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3309, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4300, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3582, 108, 227, 9, 70, "Text",
- CellTags->"SubLoop",
- CellID->1624471809]
+Cell[4573, 140, 187, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3824, 120, 23, 0, 70, "FooterCell"]
+Cell[4775, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumP.nb
index cbdc8913a..f51f1d3bb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumP.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14855, 558]
-NotebookOptionsPosition[ 9663, 379]
-NotebookOutlinePosition[ 12966, 481]
-CellTagsIndexPosition[ 12858, 475]
+NotebookDataLength[ 15347, 563]
+NotebookOptionsPosition[ 10544, 403]
+NotebookOutlinePosition[ 13650, 496]
+CellTagsIndexPosition[ 13542, 490]
WindowTitle->SumP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SumP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SumP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SumP.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$146116],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SumP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SumS\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SumS"], "\<\"SumT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SumT"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SumP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SumP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SumP.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$253348],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SumP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SumP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SumP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -136,7 +169,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1789902905],
+ CellID->1669888550],
Cell[CellGroupData[{
@@ -146,7 +179,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->611814542],
+ CellID->434549626],
Cell[CellGroupData[{
@@ -165,12 +198,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], "\[NoBreak]", ")"}], TraditionalForm]], "Output",
- ImageSize->{67, 23},
+ ImageSize->{72, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[1]=",
- CellID->850869174]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -190,12 +222,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], "\[NoBreak]", ")"}], TraditionalForm]], "Output",
- ImageSize->{67, 23},
+ ImageSize->{72, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[2]=",
- CellID->1599542692]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -213,12 +244,11 @@ Cell[BoxData[
SubsuperscriptBox["S", "1", "'"], "\[NoBreak]", "(", "\[NoBreak]",
FormBox["m",
TraditionalForm], "\[NoBreak]", ")"}], TraditionalForm]], "Output",
- ImageSize->{45, 23},
+ ImageSize->{49, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[3]=",
- CellID->440466816]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -233,12 +263,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["25", "12"], TraditionalForm]], "Output",
- ImageSize->{24, 41},
+ ImageSize->{23, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[4]=",
- CellID->1429863848]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -261,12 +290,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["25", "12"], TraditionalForm]], "Output",
- ImageSize->{24, 41},
+ ImageSize->{23, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[5]=",
- CellID->1088247533]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -309,12 +337,11 @@ Cell[BoxData[
FormBox[
FractionBox["n", "2"],
TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{328, 43},
+ ImageSize->{335, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[6]=",
- CellID->703036669]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -329,12 +356,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
FractionBox["25", "12"], TraditionalForm]], "Output",
- ImageSize->{24, 41},
+ ImageSize->{23, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumP",
- CellLabel->"Out[7]=",
- CellID->454708211]
+ CellLabel->"Out[7]="]
}, Open ]]
}, Open ]],
@@ -370,17 +396,15 @@ Cell[TextData[{
ButtonNote->"SumT"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SumP",
- CellID->1699670739]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SumP",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -389,21 +413,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 26.501175}",
+ "built" -> "{2020, 1, 5, 19, 2, 37.315605}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"SumP[k, m] is 2 k - 1 \\[Sum]_i = 1^2 m(1 + (-1) i)/i^k",
- "synonyms" -> {}, "title" -> "SumP", "titlemodifier" -> "", "windowtitle" ->
- "SumP", "type" -> "Symbol", "uri" -> "FeynCalc/ref/SumP"},
- "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "SumP", "titlemodifier" ->
+ "", "windowtitle" -> "SumP", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/SumP"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -411,8 +435,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -421,145 +446,125 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4073, 123, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5134, 156, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1789902905]},
+ CellID->1669888550]},
"SumP"->{
- Cell[4706, 152, 167, 6, 27, "Input",
+ Cell[5767, 185, 167, 6, 27, "Input",
CellTags->"SumP",
CellID->2064705419],
- Cell[4876, 160, 367, 12, 44, "Output",
- CellTags->"SumP",
- CellID->850869174],
- Cell[5280, 177, 167, 6, 27, "Input",
+ Cell[5937, 193, 347, 11, 39, "Output",
+ CellTags->"SumP"],
+ Cell[6321, 209, 167, 6, 27, "Input",
CellTags->"SumP",
CellID->1846990318],
- Cell[5450, 185, 368, 12, 44, "Output",
- CellTags->"SumP",
- CellID->1599542692],
- Cell[5855, 202, 143, 5, 27, "Input",
+ Cell[6491, 217, 347, 11, 38, "Output",
+ CellTags->"SumP"],
+ Cell[6875, 233, 143, 5, 27, "Input",
CellTags->"SumP",
CellID->1164731188],
- Cell[6001, 209, 342, 11, 44, "Output",
- CellTags->"SumP",
- CellID->440466816],
- Cell[6380, 225, 143, 5, 27, "Input",
+ Cell[7021, 240, 322, 10, 39, "Output",
+ CellTags->"SumP"],
+ Cell[7380, 255, 143, 5, 27, "Input",
CellTags->"SumP",
CellID->1167358521],
- Cell[6526, 232, 229, 8, 62, "Output",
- CellTags->"SumP",
- CellID->1429863848],
- Cell[6792, 245, 319, 13, 56, "Input",
+ Cell[7526, 262, 208, 7, 56, "Output",
+ CellTags->"SumP"],
+ Cell[7771, 274, 319, 13, 58, "Input",
CellTags->"SumP",
CellID->1893183879],
- Cell[7114, 260, 229, 8, 62, "Output",
- CellTags->"SumP",
- CellID->1088247533],
- Cell[7380, 273, 204, 7, 27, "Input",
+ Cell[8093, 289, 208, 7, 56, "Output",
+ CellTags->"SumP"],
+ Cell[8338, 301, 204, 7, 27, "Input",
CellTags->"SumP",
CellID->1686985952],
- Cell[7587, 282, 897, 34, 64, "Output",
- CellTags->"SumP",
- CellID->703036669],
- Cell[8521, 321, 142, 5, 27, "Input",
+ Cell[8545, 310, 877, 33, 57, "Output",
+ CellTags->"SumP"],
+ Cell[9459, 348, 142, 5, 27, "Input",
CellTags->"SumP",
CellID->1663422834],
- Cell[8666, 328, 228, 8, 62, "Output",
- CellTags->"SumP",
- CellID->454708211],
- Cell[9262, 359, 359, 15, 31, "Text",
- CellTags->"SumP",
- CellID->1699670739]}
+ Cell[9604, 355, 208, 7, 56, "Output",
+ CellTags->"SumP"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11434, 422},
- {"SumP", 11566, 426}
+ {"PrimaryExamplesSection", 12359, 447},
+ {"SumP", 12491, 451}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3056, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 1190, 41, 89, "Usage",
+Cell[3635, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3919, 111, 1190, 41, 93, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4073, 123, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5134, 156, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1789902905],
+ CellID->1669888550],
Cell[CellGroupData[{
-Cell[4486, 142, 195, 6, 25, "ExampleSection",
- CellID->611814542],
+Cell[5547, 175, 195, 6, 26, "ExampleSection",
+ CellID->434549626],
Cell[CellGroupData[{
-Cell[4706, 152, 167, 6, 27, "Input",
+Cell[5767, 185, 167, 6, 27, "Input",
CellTags->"SumP",
CellID->2064705419],
-Cell[4876, 160, 367, 12, 44, "Output",
- CellTags->"SumP",
- CellID->850869174]
+Cell[5937, 193, 347, 11, 39, "Output",
+ CellTags->"SumP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5280, 177, 167, 6, 27, "Input",
+Cell[6321, 209, 167, 6, 27, "Input",
CellTags->"SumP",
CellID->1846990318],
-Cell[5450, 185, 368, 12, 44, "Output",
- CellTags->"SumP",
- CellID->1599542692]
+Cell[6491, 217, 347, 11, 38, "Output",
+ CellTags->"SumP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5855, 202, 143, 5, 27, "Input",
+Cell[6875, 233, 143, 5, 27, "Input",
CellTags->"SumP",
CellID->1164731188],
-Cell[6001, 209, 342, 11, 44, "Output",
- CellTags->"SumP",
- CellID->440466816]
+Cell[7021, 240, 322, 10, 39, "Output",
+ CellTags->"SumP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6380, 225, 143, 5, 27, "Input",
+Cell[7380, 255, 143, 5, 27, "Input",
CellTags->"SumP",
CellID->1167358521],
-Cell[6526, 232, 229, 8, 62, "Output",
- CellTags->"SumP",
- CellID->1429863848]
+Cell[7526, 262, 208, 7, 56, "Output",
+ CellTags->"SumP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6792, 245, 319, 13, 56, "Input",
+Cell[7771, 274, 319, 13, 58, "Input",
CellTags->"SumP",
CellID->1893183879],
-Cell[7114, 260, 229, 8, 62, "Output",
- CellTags->"SumP",
- CellID->1088247533]
+Cell[8093, 289, 208, 7, 56, "Output",
+ CellTags->"SumP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7380, 273, 204, 7, 27, "Input",
+Cell[8338, 301, 204, 7, 27, "Input",
CellTags->"SumP",
CellID->1686985952],
-Cell[7587, 282, 897, 34, 64, "Output",
- CellTags->"SumP",
- CellID->703036669]
+Cell[8545, 310, 877, 33, 57, "Output",
+ CellTags->"SumP"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8521, 321, 142, 5, 27, "Input",
+Cell[9459, 348, 142, 5, 27, "Input",
CellTags->"SumP",
CellID->1663422834],
-Cell[8666, 328, 228, 8, 62, "Output",
- CellTags->"SumP",
- CellID->454708211]
+Cell[9604, 355, 208, 7, 56, "Output",
+ CellTags->"SumP"]
}, Open ]]
}, Open ]],
-Cell[8921, 340, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9839, 366, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8989, 345, 270, 12, 31, "SeeAlsoSection",
+Cell[9907, 371, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9262, 359, 359, 15, 31, "Text",
- CellTags->"SumP",
- CellID->1699670739]
+Cell[10180, 385, 322, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[9636, 377, 23, 0, 42, "FooterCell"]
+Cell[10517, 401, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumS.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumS.nb
index 2d0dda92a..df0745b2c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumS.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumS.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21424, 833]
-NotebookOptionsPosition[ 13494, 555]
-NotebookOutlinePosition[ 18230, 702]
-CellTagsIndexPosition[ 18122, 696]
+NotebookDataLength[ 22612, 862]
+NotebookOptionsPosition[ 15095, 607]
+NotebookOutlinePosition[ 19501, 739]
+CellTagsIndexPosition[ 19393, 733]
WindowTitle->SumS
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SumS\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SumS"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SumS.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$146457],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SumS",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SumP\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SumP"], "\<\"SumT\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SumT"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SumS\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SumS"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SumS.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$253789],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SumS",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SumS", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SumS", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -147,6 +182,58 @@ n] is Sum[Sign[r]^k/k^Abs[r] Sign[s]^j/j^Abs[s], {k, 1, n}, {j, 1, k}] etc."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1742453114],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "SumS", "]"}]], "Input",
+ CellTags->"SumS",
+ CellLabel->"In[8]:=",
+ CellID->2012785240],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Reduce", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{108, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"SumS",
+ CellLabel->"Out[8]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -162,7 +249,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->997576810],
+ CellID->1952002760],
Cell[CellGroupData[{
@@ -172,28 +259,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1729221158],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "SumS", "]"}]], "Input",
- CellTags->"SumS",
- CellLabel->"In[1]:=",
- CellID->2012785240],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Reduce", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",\
-
- ImageSize->{118, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"SumS",
- CellLabel->"Out[1]=",
- CellID->35078957]
-}, Open ]],
+ CellID->1416377860],
Cell[CellGroupData[{
@@ -202,7 +268,7 @@ Cell[BoxData[
RowBox[{"1", ",",
RowBox[{"m", "-", "1"}]}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->632054675],
Cell[BoxData[
@@ -212,12 +278,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{67, 15},
+ ImageSize->{69, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[2]=",
- CellID->1556413384]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -227,7 +292,7 @@ Cell[BoxData[
RowBox[{"2", ",",
RowBox[{"m", "-", "1"}]}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1183001998],
Cell[BoxData[
@@ -237,12 +302,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{67, 15},
+ ImageSize->{70, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[3]=",
- CellID->1711872116]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -252,7 +316,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "1"}], ",", "m"}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->601997566],
Cell[BoxData[
@@ -262,12 +326,11 @@ Cell[BoxData[
RowBox[{"-", "1"}]], "(",
FormBox["m",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{53, 15},
+ ImageSize->{54, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[4]=",
- CellID->1598419711]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -277,7 +340,7 @@ Cell[BoxData[
RowBox[{"1", ",", "m", ",",
RowBox[{"Reduce", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1985675154],
Cell[BoxData[
@@ -289,12 +352,11 @@ Cell[BoxData[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], "+",
FractionBox["1", "m"]}], TraditionalForm]], "Output",
- ImageSize->{101, 41},
+ ImageSize->{104, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[5]=",
- CellID->1232098786]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -305,7 +367,7 @@ Cell[BoxData[
RowBox[{"m", "+", "2"}], ",",
RowBox[{"Reduce", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->723810100],
Cell[BoxData[
@@ -320,12 +382,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"m", "+", "2"}], ")"}], "3"]]}], TraditionalForm]], "Output",
- ImageSize->{144, 46},
+ ImageSize->{150, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[6]=",
- CellID->378956112]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[BoxData[
@@ -334,7 +395,7 @@ Cell[BoxData[
RowBox[{"SumS", ",",
RowBox[{"Reduce", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1121632488],
Cell[CellGroupData[{
@@ -344,7 +405,7 @@ Cell[BoxData[
RowBox[{"3", ",",
RowBox[{"m", "+", "2"}]}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->663420944],
Cell[BoxData[
@@ -365,12 +426,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"m", "+", "2"}], ")"}], "3"]]}], TraditionalForm]], "Output",
- ImageSize->{260, 46},
+ ImageSize->{271, 40},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[8]=",
- CellID->1687595925]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[BoxData[
@@ -379,7 +439,7 @@ Cell[BoxData[
RowBox[{"SumS", ",",
RowBox[{"Reduce", "\[Rule]", "False"}]}], "]"}], ";"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->1754340999],
Cell[CellGroupData[{
@@ -388,18 +448,17 @@ Cell[BoxData[
RowBox[{"SumS", "[",
RowBox[{"1", ",", "4"}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[10]:=",
+ CellLabel->"In[9]:=",
CellID->913193894],
Cell[BoxData[
FormBox[
FractionBox["25", "12"], TraditionalForm]], "Output",
- ImageSize->{24, 41},
+ ImageSize->{23, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[10]=",
- CellID->205548473]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -410,18 +469,17 @@ Cell[BoxData[
RowBox[{"i", "=", "1"}], "4"],
RowBox[{"1", "/", "i"}]}]], "Input",
CellTags->"SumS",
- CellLabel->"In[11]:=",
+ CellLabel->"In[10]:=",
CellID->1966406647],
Cell[BoxData[
FormBox[
FractionBox["25", "12"], TraditionalForm]], "Output",
- ImageSize->{24, 41},
+ ImageSize->{23, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[11]=",
- CellID->1412895147]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -431,7 +489,7 @@ Cell[BoxData[
RowBox[{"1", ",", "2", ",",
RowBox[{"m", "-", "1"}]}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[12]:=",
+ CellLabel->"In[11]:=",
CellID->1336627111],
Cell[BoxData[
@@ -441,12 +499,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{72, 15},
+ ImageSize->{74, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[12]=",
- CellID->18182330]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -455,19 +512,18 @@ Cell[BoxData[
RowBox[{"SumS", "[",
RowBox[{"1", ",", "1", ",", "1", ",", "11"}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[13]:=",
+ CellLabel->"In[12]:=",
CellID->796483207],
Cell[BoxData[
FormBox[
FractionBox["31276937512951", "4260000729600"], TraditionalForm]], "Output",\
- ImageSize->{117, 41},
+ ImageSize->{115, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[13]=",
- CellID->2038617627]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -477,19 +533,18 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "1"}], ",", "4"}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[14]:=",
+ CellLabel->"In[13]:=",
CellID->324759887],
Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox["7", "12"]}], TraditionalForm]], "Output",
- ImageSize->{33, 41},
+ ImageSize->{34, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[14]=",
- CellID->549106078]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -498,19 +553,18 @@ Cell[BoxData[
RowBox[{"SumT", "[",
RowBox[{"1", ",", "4"}], "]"}]], "Input",
CellTags->"SumS",
- CellLabel->"In[15]:=",
+ CellLabel->"In[14]:=",
CellID->857412373],
Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox["7", "12"]}], TraditionalForm]], "Output",
- ImageSize->{33, 41},
+ ImageSize->{34, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumS",
- CellLabel->"Out[15]=",
- CellID->1019405443]
+ CellLabel->"Out[14]="]
}, Open ]]
}, Open ]],
@@ -546,9 +600,7 @@ Cell[TextData[{
ButtonNote->"SumT"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SumS",
- CellID->1388374666]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -556,7 +608,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SumS",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -565,10 +617,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 28.165293}",
+ "built" -> "{2020, 1, 5, 19, 2, 38.554768}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -578,11 +630,11 @@ TaggingRules->{
SumS[1,1,m] is \\[Sum]_i = 1^mS1(i)/i. SumS[k,l,m] is \\[Sum]_i = 1^m\\ \
Sl(i)/i^k. SumS[r, n] represents Sum[Sign[r]^i/i^Abs[r], {i, 1, n}]. \
SumS[r,s, n] is Sum[Sign[r]^k/k^Abs[r] Sign[s]^j/j^Abs[s], {k, 1, n}, {j, 1, \
-k}] etc.", "synonyms" -> {}, "title" -> "SumS", "titlemodifier" -> "",
- "windowtitle" -> "SumS", "type" -> "Symbol", "uri" ->
+k}] etc.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SumS",
+ "titlemodifier" -> "", "windowtitle" -> "SumS", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SumS"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -590,8 +642,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -599,242 +652,218 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4843, 149, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->997576810]},
"SumS"->{
- Cell[5476, 178, 126, 4, 27, "Input",
+ Cell[6724, 214, 126, 4, 70, "Input",
CellTags->"SumS",
CellID->2012785240],
- Cell[5605, 184, 269, 10, 36, "Output",
- CellTags->"SumS",
- CellID->35078957],
- Cell[5911, 199, 166, 6, 27, "Input",
+ Cell[6853, 220, 250, 9, 35, "Output",
+ CellTags->"SumS"],
+ Cell[7798, 265, 166, 6, 27, "Input",
CellTags->"SumS",
CellID->632054675],
- Cell[6080, 207, 316, 12, 36, "Output",
- CellTags->"SumS",
- CellID->1556413384],
- Cell[6433, 224, 167, 6, 27, "Input",
+ Cell[7967, 273, 295, 11, 38, "Output",
+ CellTags->"SumS"],
+ Cell[8299, 289, 167, 6, 27, "Input",
CellTags->"SumS",
CellID->1183001998],
- Cell[6603, 232, 316, 12, 36, "Output",
- CellTags->"SumS",
- CellID->1711872116],
- Cell[6956, 249, 161, 6, 27, "Input",
+ Cell[8469, 297, 295, 11, 37, "Output",
+ CellTags->"SumS"],
+ Cell[8801, 313, 161, 6, 27, "Input",
CellTags->"SumS",
CellID->601997566],
- Cell[7120, 257, 311, 12, 36, "Output",
- CellTags->"SumS",
- CellID->1598419711],
- Cell[7468, 274, 191, 6, 27, "Input",
+ Cell[8965, 321, 290, 11, 38, "Output",
+ CellTags->"SumS"],
+ Cell[9292, 337, 191, 6, 27, "Input",
CellTags->"SumS",
CellID->1985675154],
- Cell[7662, 282, 367, 14, 62, "Output",
- CellTags->"SumS",
- CellID->1232098786],
- Cell[8066, 301, 214, 7, 27, "Input",
+ Cell[9486, 345, 346, 13, 56, "Output",
+ CellTags->"SumS"],
+ Cell[9869, 363, 214, 7, 27, "Input",
CellTags->"SumS",
CellID->723810100],
- Cell[8283, 310, 445, 17, 67, "Output",
- CellTags->"SumS",
- CellID->378956112],
- Cell[8743, 330, 210, 7, 27, "Input",
+ Cell[10086, 372, 425, 16, 61, "Output",
+ CellTags->"SumS"],
+ Cell[10526, 391, 210, 7, 27, "Input",
CellTags->"SumS",
CellID->1121632488],
- Cell[8978, 341, 166, 6, 27, "Input",
+ Cell[10761, 402, 166, 6, 27, "Input",
CellTags->"SumS",
CellID->663420944],
- Cell[9147, 349, 615, 23, 67, "Output",
- CellTags->"SumS",
- CellID->1687595925],
- Cell[9777, 375, 211, 7, 27, "Input",
+ Cell[10930, 410, 594, 22, 61, "Output",
+ CellTags->"SumS"],
+ Cell[11539, 435, 211, 7, 27, "Input",
CellTags->"SumS",
CellID->1754340999],
- Cell[10013, 386, 143, 5, 27, "Input",
+ Cell[11775, 446, 142, 5, 27, "Input",
CellTags->"SumS",
CellID->913193894],
- Cell[10159, 393, 229, 8, 62, "Output",
- CellTags->"SumS",
- CellID->205548473],
- Cell[10425, 406, 193, 7, 56, "Input",
+ Cell[11920, 453, 208, 7, 56, "Output",
+ CellTags->"SumS"],
+ Cell[12165, 465, 193, 7, 58, "Input",
CellTags->"SumS",
CellID->1966406647],
- Cell[10621, 415, 230, 8, 62, "Output",
- CellTags->"SumS",
- CellID->1412895147],
- Cell[10888, 428, 178, 6, 27, "Input",
+ Cell[12361, 474, 209, 7, 56, "Output",
+ CellTags->"SumS"],
+ Cell[12607, 486, 178, 6, 27, "Input",
CellTags->"SumS",
CellID->1336627111],
- Cell[11069, 436, 316, 12, 36, "Output",
- CellTags->"SumS",
- CellID->18182330],
- Cell[11422, 453, 164, 5, 27, "Input",
+ Cell[12788, 494, 297, 11, 38, "Output",
+ CellTags->"SumS"],
+ Cell[13122, 510, 164, 5, 27, "Input",
CellTags->"SumS",
CellID->796483207],
- Cell[11589, 460, 256, 9, 62, "Output",
- CellTags->"SumS",
- CellID->2038617627],
- Cell[11882, 474, 162, 6, 27, "Input",
+ Cell[13289, 517, 235, 8, 56, "Output",
+ CellTags->"SumS"],
+ Cell[13561, 530, 162, 6, 27, "Input",
CellTags->"SumS",
CellID->324759887],
- Cell[12047, 482, 247, 9, 62, "Output",
- CellTags->"SumS",
- CellID->549106078],
- Cell[12331, 496, 143, 5, 27, "Input",
+ Cell[13726, 538, 227, 8, 55, "Output",
+ CellTags->"SumS"],
+ Cell[13990, 551, 143, 5, 27, "Input",
CellTags->"SumS",
CellID->857412373],
- Cell[12477, 503, 248, 9, 62, "Output",
- CellTags->"SumS",
- CellID->1019405443],
- Cell[13093, 535, 359, 15, 31, "Text",
- CellTags->"SumS",
- CellID->1388374666]}
+ Cell[14136, 558, 227, 8, 55, "Output",
+ CellTags->"SumS"]},
+ "PrimaryExamplesSection"->{
+ Cell[7164, 236, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1952002760]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15512, 601},
- {"SumS", 15643, 605}
+ {"SumS", 17137, 654},
+ {"PrimaryExamplesSection", 19249, 726}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3056, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 1960, 67, 123, "Usage",
- CellID->982511436],
+Cell[3635, 98, 281, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4843, 149, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->997576810],
+Cell[3941, 113, 1960, 67, 130, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[5255, 168, 196, 6, 25, "ExampleSection",
- CellID->1729221158],
+Cell[5926, 184, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1742453114],
+Cell[6668, 210, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[5476, 178, 126, 4, 27, "Input",
+Cell[6724, 214, 126, 4, 70, "Input",
CellTags->"SumS",
CellID->2012785240],
-Cell[5605, 184, 269, 10, 36, "Output",
- CellTags->"SumS",
- CellID->35078957]
+Cell[6853, 220, 250, 9, 35, "Output",
+ CellTags->"SumS"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5911, 199, 166, 6, 27, "Input",
+Cell[7164, 236, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1952002760],
+Cell[CellGroupData[{
+Cell[7577, 255, 196, 6, 26, "ExampleSection",
+ CellID->1416377860],
+Cell[CellGroupData[{
+Cell[7798, 265, 166, 6, 27, "Input",
CellTags->"SumS",
CellID->632054675],
-Cell[6080, 207, 316, 12, 36, "Output",
- CellTags->"SumS",
- CellID->1556413384]
+Cell[7967, 273, 295, 11, 38, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6433, 224, 167, 6, 27, "Input",
+Cell[8299, 289, 167, 6, 27, "Input",
CellTags->"SumS",
CellID->1183001998],
-Cell[6603, 232, 316, 12, 36, "Output",
- CellTags->"SumS",
- CellID->1711872116]
+Cell[8469, 297, 295, 11, 37, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6956, 249, 161, 6, 27, "Input",
+Cell[8801, 313, 161, 6, 27, "Input",
CellTags->"SumS",
CellID->601997566],
-Cell[7120, 257, 311, 12, 36, "Output",
- CellTags->"SumS",
- CellID->1598419711]
+Cell[8965, 321, 290, 11, 38, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7468, 274, 191, 6, 27, "Input",
+Cell[9292, 337, 191, 6, 27, "Input",
CellTags->"SumS",
CellID->1985675154],
-Cell[7662, 282, 367, 14, 62, "Output",
- CellTags->"SumS",
- CellID->1232098786]
+Cell[9486, 345, 346, 13, 56, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8066, 301, 214, 7, 27, "Input",
+Cell[9869, 363, 214, 7, 27, "Input",
CellTags->"SumS",
CellID->723810100],
-Cell[8283, 310, 445, 17, 67, "Output",
- CellTags->"SumS",
- CellID->378956112]
+Cell[10086, 372, 425, 16, 61, "Output",
+ CellTags->"SumS"]
}, Open ]],
-Cell[8743, 330, 210, 7, 27, "Input",
+Cell[10526, 391, 210, 7, 27, "Input",
CellTags->"SumS",
CellID->1121632488],
Cell[CellGroupData[{
-Cell[8978, 341, 166, 6, 27, "Input",
+Cell[10761, 402, 166, 6, 27, "Input",
CellTags->"SumS",
CellID->663420944],
-Cell[9147, 349, 615, 23, 67, "Output",
- CellTags->"SumS",
- CellID->1687595925]
+Cell[10930, 410, 594, 22, 61, "Output",
+ CellTags->"SumS"]
}, Open ]],
-Cell[9777, 375, 211, 7, 27, "Input",
+Cell[11539, 435, 211, 7, 27, "Input",
CellTags->"SumS",
CellID->1754340999],
Cell[CellGroupData[{
-Cell[10013, 386, 143, 5, 27, "Input",
+Cell[11775, 446, 142, 5, 27, "Input",
CellTags->"SumS",
CellID->913193894],
-Cell[10159, 393, 229, 8, 62, "Output",
- CellTags->"SumS",
- CellID->205548473]
+Cell[11920, 453, 208, 7, 56, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10425, 406, 193, 7, 56, "Input",
+Cell[12165, 465, 193, 7, 58, "Input",
CellTags->"SumS",
CellID->1966406647],
-Cell[10621, 415, 230, 8, 62, "Output",
- CellTags->"SumS",
- CellID->1412895147]
+Cell[12361, 474, 209, 7, 56, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10888, 428, 178, 6, 27, "Input",
+Cell[12607, 486, 178, 6, 27, "Input",
CellTags->"SumS",
CellID->1336627111],
-Cell[11069, 436, 316, 12, 36, "Output",
- CellTags->"SumS",
- CellID->18182330]
+Cell[12788, 494, 297, 11, 38, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11422, 453, 164, 5, 27, "Input",
+Cell[13122, 510, 164, 5, 27, "Input",
CellTags->"SumS",
CellID->796483207],
-Cell[11589, 460, 256, 9, 62, "Output",
- CellTags->"SumS",
- CellID->2038617627]
+Cell[13289, 517, 235, 8, 56, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11882, 474, 162, 6, 27, "Input",
+Cell[13561, 530, 162, 6, 27, "Input",
CellTags->"SumS",
CellID->324759887],
-Cell[12047, 482, 247, 9, 62, "Output",
- CellTags->"SumS",
- CellID->549106078]
+Cell[13726, 538, 227, 8, 55, "Output",
+ CellTags->"SumS"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12331, 496, 143, 5, 27, "Input",
+Cell[13990, 551, 143, 5, 27, "Input",
CellTags->"SumS",
CellID->857412373],
-Cell[12477, 503, 248, 9, 62, "Output",
- CellTags->"SumS",
- CellID->1019405443]
+Cell[14136, 558, 227, 8, 55, "Output",
+ CellTags->"SumS"]
}, Open ]]
}, Open ]],
-Cell[12752, 516, 31, 0, 29, "SectionFooterSpacer"]
+Cell[14390, 570, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12820, 521, 270, 12, 31, "SeeAlsoSection",
+Cell[14458, 575, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13093, 535, 359, 15, 31, "Text",
- CellTags->"SumS",
- CellID->1388374666]
+Cell[14731, 589, 322, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[13467, 553, 23, 0, 42, "FooterCell"]
+Cell[15068, 605, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumT.nb
index e08aaec79..569486b52 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SumT.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 21968, 861]
-NotebookOptionsPosition[ 13753, 569]
-NotebookOutlinePosition[ 18546, 720]
-CellTagsIndexPosition[ 18438, 714]
+NotebookDataLength[ 21951, 842]
+NotebookOptionsPosition[ 14469, 585]
+NotebookOutlinePosition[ 18885, 719]
+CellTagsIndexPosition[ 18777, 713]
WindowTitle->SumT
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/SumT\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/SumT"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/SumT.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$146806],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/SumT",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SumP\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SumP"], "\<\"SumS\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/SumS"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/SumT\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/SumT"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/SumT.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$254238],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/SumT",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SumT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SumT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,7 +153,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1610909660],
+ CellID->1671028843],
Cell[CellGroupData[{
@@ -130,7 +163,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1065203739],
+ CellID->853025860],
Cell[CellGroupData[{
@@ -150,12 +183,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{70, 18},
+ ImageSize->{73, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[1]=",
- CellID->405969020]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -176,12 +208,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{70, 18},
+ ImageSize->{74, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[2]=",
- CellID->7209567]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -200,12 +231,11 @@ Cell[BoxData[
OverscriptBox["S", "~"], "1"], "(",
FormBox["m",
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{48, 18},
+ ImageSize->{50, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[3]=",
- CellID->1837745290]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -231,12 +261,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "m"], "m"]}], TraditionalForm]], "Output",
- ImageSize->{132, 43},
+ ImageSize->{136, 36},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[4]=",
- CellID->1964068780]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -252,12 +281,11 @@ Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox["7", "12"]}], TraditionalForm]], "Output",
- ImageSize->{33, 41},
+ ImageSize->{34, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[5]=",
- CellID->627215383]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -278,12 +306,11 @@ Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox["7", "12"]}], TraditionalForm]], "Output",
- ImageSize->{33, 41},
+ ImageSize->{34, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[6]=",
- CellID->1602884528]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -304,12 +331,11 @@ Cell[BoxData[
FormBox[
RowBox[{"m", "-", "1"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- ImageSize->{75, 18},
+ ImageSize->{78, 20},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[7]=",
- CellID->1069824481]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -327,12 +353,11 @@ Cell[BoxData[
FractionBox["38987958697055013360489864298703621429610152138683927",
"10512121660702378405316004964483761080879190528000000"]}],
TraditionalForm]], "Output",
- ImageSize->{429, 41},
+ ImageSize->{425, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[8]=",
- CellID->1350292495]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -348,12 +373,11 @@ Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox["7", "12"]}], TraditionalForm]], "Output",
- ImageSize->{33, 41},
+ ImageSize->{34, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[9]=",
- CellID->1565575302]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
@@ -370,12 +394,11 @@ Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox["7", "12"]}], TraditionalForm]], "Output",
- ImageSize->{33, 41},
+ ImageSize->{34, 34},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[10]=",
- CellID->1734591901]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -404,12 +427,11 @@ Cell[BoxData[
TemplateBox[{RowBox[{"-", "1"}],"1","m"},
"LerchPhi"]}], "-",
RowBox[{"log", "(", "2", ")"}]}], TraditionalForm]], "Output",
- ImageSize->{199, 18},
+ ImageSize->{202, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[11]=",
- CellID->1972297222]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -426,12 +448,11 @@ Cell[BoxData[
RowBox[{"-",
FractionBox["57561743656913", "21300003648000"]}],
TraditionalForm]], "Output",
- ImageSize->{127, 41},
+ ImageSize->{127, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[12]=",
- CellID->1330421141]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -450,12 +471,11 @@ Cell[BoxData[
FractionBox["38987958697055013360489864298703621429610152138683927",
"10512121660702378405316004964483761080879190528000000"]}],
TraditionalForm]], "Output",
- ImageSize->{429, 41},
+ ImageSize->{425, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[13]=",
- CellID->833938013]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -482,12 +502,11 @@ Cell[BoxData[
FractionBox["170603", "216000"]}], ",",
RowBox[{"-",
FractionBox["155903", "216000"]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{300, 41},
+ ImageSize->{309, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[14]=",
- CellID->540691812]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
@@ -519,12 +538,11 @@ Cell[BoxData[
FractionBox["170603", "216000"]}], ",",
RowBox[{"-",
FractionBox["155903", "216000"]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{300, 41},
+ ImageSize->{309, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"SumT",
- CellLabel->"Out[15]=",
- CellID->1165392017]
+ CellLabel->"Out[15]="]
}, Open ]]
}, Open ]],
@@ -560,17 +578,15 @@ Cell[TextData[{
ButtonNote->"SumS"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"SumT",
- CellID->183277524]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"SumT",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -579,10 +595,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 29.799484}",
+ "built" -> "{2020, 1, 5, 19, 2, 39.831517}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -590,11 +606,11 @@ TaggingRules->{
"None", "summary" ->
"SumT[1, m] is the alternative harmonic number \\[Sum]_i = 1^m\\ (-1)^i/i\
\\ SumT[r, n] represents Sum[(-1)^i/i^r, {i,1,n}], SumT[r,s, n] is Sum[1/k^r \
-(-1)^j/j^s, {k, 1, n}, {j, 1, k}].", "synonyms" -> {}, "title" -> "SumT",
- "titlemodifier" -> "", "windowtitle" -> "SumT", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SumT"}, "SearchTextTranslated" -> ""},
+(-1)^j/j^s, {k, 1, n}, {j, 1, k}].", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SumT", "titlemodifier" -> "", "windowtitle" -> "SumT", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SumT"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -602,8 +618,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -612,257 +629,221 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3699, 107, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4760, 140, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1610909660]},
+ CellID->1671028843]},
"SumT"->{
- Cell[4333, 136, 166, 6, 27, "Input",
+ Cell[5393, 169, 166, 6, 27, "Input",
CellTags->"SumT",
CellID->716286522],
- Cell[4502, 144, 340, 13, 39, "Output",
- CellTags->"SumT",
- CellID->405969020],
- Cell[4879, 162, 167, 6, 27, "Input",
+ Cell[5562, 177, 320, 12, 41, "Output",
+ CellTags->"SumT"],
+ Cell[5919, 194, 167, 6, 27, "Input",
CellTags->"SumT",
CellID->1536455290],
- Cell[5049, 170, 338, 13, 39, "Output",
- CellTags->"SumT",
- CellID->7209567],
- Cell[5424, 188, 142, 5, 27, "Input",
+ Cell[6089, 202, 320, 12, 40, "Output",
+ CellTags->"SumT"],
+ Cell[6446, 219, 142, 5, 27, "Input",
CellTags->"SumT",
CellID->330440840],
- Cell[5569, 195, 316, 12, 39, "Output",
- CellTags->"SumT",
- CellID->1837745290],
- Cell[5922, 212, 191, 6, 27, "Input",
+ Cell[6591, 226, 295, 11, 41, "Output",
+ CellTags->"SumT"],
+ Cell[6923, 242, 191, 6, 27, "Input",
CellTags->"SumT",
CellID->1249829069],
- Cell[6116, 220, 467, 18, 64, "Output",
- CellTags->"SumT",
- CellID->1964068780],
- Cell[6620, 243, 143, 5, 27, "Input",
+ Cell[7117, 250, 446, 17, 57, "Output",
+ CellTags->"SumT"],
+ Cell[7600, 272, 143, 5, 27, "Input",
CellTags->"SumT",
CellID->2000365696],
- Cell[6766, 250, 246, 9, 62, "Output",
- CellTags->"SumT",
- CellID->627215383],
- Cell[7049, 264, 262, 10, 56, "Input",
+ Cell[7746, 279, 226, 8, 55, "Output",
+ CellTags->"SumT"],
+ Cell[8009, 292, 262, 10, 58, "Input",
CellTags->"SumT",
CellID->1658021019],
- Cell[7314, 276, 247, 9, 62, "Output",
- CellTags->"SumT",
- CellID->1602884528],
- Cell[7598, 290, 176, 6, 27, "Input",
+ Cell[8274, 304, 226, 8, 55, "Output",
+ CellTags->"SumT"],
+ Cell[8537, 317, 176, 6, 27, "Input",
CellTags->"SumT",
CellID->231090065],
- Cell[7777, 298, 342, 13, 39, "Output",
- CellTags->"SumT",
- CellID->1069824481],
- Cell[8156, 316, 154, 5, 27, "Input",
+ Cell[8716, 325, 321, 12, 41, "Output",
+ CellTags->"SumT"],
+ Cell[9074, 342, 154, 5, 27, "Input",
CellTags->"SumT",
CellID->1022041702],
- Cell[8313, 323, 359, 11, 62, "Output",
- CellTags->"SumT",
- CellID->1350292495],
- Cell[8709, 339, 142, 5, 27, "Input",
+ Cell[9231, 349, 338, 10, 56, "Output",
+ CellTags->"SumT"],
+ Cell[9606, 364, 142, 5, 27, "Input",
CellTags->"SumT",
CellID->803956266],
- Cell[8854, 346, 247, 9, 62, "Output",
- CellTags->"SumT",
- CellID->1565575302],
- Cell[9138, 360, 163, 6, 27, "Input",
+ Cell[9751, 371, 226, 8, 55, "Output",
+ CellTags->"SumT"],
+ Cell[10014, 384, 163, 6, 27, "Input",
CellTags->"SumT",
CellID->1947579277],
- Cell[9304, 368, 248, 9, 62, "Output",
- CellTags->"SumT",
- CellID->1734591901],
- Cell[9589, 382, 287, 11, 56, "Input",
+ Cell[10180, 392, 227, 8, 55, "Output",
+ CellTags->"SumT"],
+ Cell[10444, 405, 287, 11, 58, "Input",
CellTags->"SumT",
CellID->1900986557],
- Cell[9879, 395, 446, 16, 39, "Output",
- CellTags->"SumT",
- CellID->1972297222],
- Cell[10362, 416, 155, 5, 27, "Input",
+ Cell[10734, 418, 425, 15, 40, "Output",
+ CellTags->"SumT"],
+ Cell[11196, 438, 155, 5, 27, "Input",
CellTags->"SumT",
CellID->1051047228],
- Cell[10520, 423, 277, 10, 62, "Output",
- CellTags->"SumT",
- CellID->1330421141],
- Cell[10834, 438, 174, 6, 27, "Input",
+ Cell[11354, 445, 256, 9, 56, "Output",
+ CellTags->"SumT"],
+ Cell[11647, 459, 174, 6, 27, "Input",
CellTags->"SumT",
CellID->1748540903],
- Cell[11011, 446, 359, 11, 62, "Output",
- CellTags->"SumT",
- CellID->833938013],
- Cell[11407, 462, 147, 5, 27, "Input",
+ Cell[11824, 467, 339, 10, 56, "Output",
+ CellTags->"SumT"],
+ Cell[12200, 482, 147, 5, 27, "Input",
CellTags->"SumT",
CellID->629628077],
- Cell[11557, 469, 564, 20, 62, "Output",
- CellTags->"SumT",
- CellID->540691812],
- Cell[12158, 494, 259, 10, 27, "Input",
+ Cell[12350, 489, 544, 19, 56, "Output",
+ CellTags->"SumT"],
+ Cell[12931, 513, 259, 10, 27, "Input",
CellTags->"SumT",
CellID->1141337976],
- Cell[12420, 506, 565, 20, 62, "Output",
- CellTags->"SumT",
- CellID->1165392017],
- Cell[13353, 549, 358, 15, 31, "Text",
- CellTags->"SumT",
- CellID->183277524]}
+ Cell[13193, 525, 544, 19, 56, "Output",
+ CellTags->"SumT"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 15653, 613},
- {"SumT", 15785, 617}
+ {"PrimaryExamplesSection", 16411, 630},
+ {"SumT", 16543, 634}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3056, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 816, 25, 101, "Usage",
+Cell[3635, 98, 281, 11, 45, "ObjectNameGrid"],
+Cell[3919, 111, 816, 25, 105, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3699, 107, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4760, 140, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1610909660],
+ CellID->1671028843],
Cell[CellGroupData[{
-Cell[4112, 126, 196, 6, 25, "ExampleSection",
- CellID->1065203739],
+Cell[5173, 159, 195, 6, 26, "ExampleSection",
+ CellID->853025860],
Cell[CellGroupData[{
-Cell[4333, 136, 166, 6, 27, "Input",
+Cell[5393, 169, 166, 6, 27, "Input",
CellTags->"SumT",
CellID->716286522],
-Cell[4502, 144, 340, 13, 39, "Output",
- CellTags->"SumT",
- CellID->405969020]
+Cell[5562, 177, 320, 12, 41, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4879, 162, 167, 6, 27, "Input",
+Cell[5919, 194, 167, 6, 27, "Input",
CellTags->"SumT",
CellID->1536455290],
-Cell[5049, 170, 338, 13, 39, "Output",
- CellTags->"SumT",
- CellID->7209567]
+Cell[6089, 202, 320, 12, 40, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5424, 188, 142, 5, 27, "Input",
+Cell[6446, 219, 142, 5, 27, "Input",
CellTags->"SumT",
CellID->330440840],
-Cell[5569, 195, 316, 12, 39, "Output",
- CellTags->"SumT",
- CellID->1837745290]
+Cell[6591, 226, 295, 11, 41, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5922, 212, 191, 6, 27, "Input",
+Cell[6923, 242, 191, 6, 27, "Input",
CellTags->"SumT",
CellID->1249829069],
-Cell[6116, 220, 467, 18, 64, "Output",
- CellTags->"SumT",
- CellID->1964068780]
+Cell[7117, 250, 446, 17, 57, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6620, 243, 143, 5, 27, "Input",
+Cell[7600, 272, 143, 5, 27, "Input",
CellTags->"SumT",
CellID->2000365696],
-Cell[6766, 250, 246, 9, 62, "Output",
- CellTags->"SumT",
- CellID->627215383]
+Cell[7746, 279, 226, 8, 55, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7049, 264, 262, 10, 56, "Input",
+Cell[8009, 292, 262, 10, 58, "Input",
CellTags->"SumT",
CellID->1658021019],
-Cell[7314, 276, 247, 9, 62, "Output",
- CellTags->"SumT",
- CellID->1602884528]
+Cell[8274, 304, 226, 8, 55, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7598, 290, 176, 6, 27, "Input",
+Cell[8537, 317, 176, 6, 27, "Input",
CellTags->"SumT",
CellID->231090065],
-Cell[7777, 298, 342, 13, 39, "Output",
- CellTags->"SumT",
- CellID->1069824481]
+Cell[8716, 325, 321, 12, 41, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8156, 316, 154, 5, 27, "Input",
+Cell[9074, 342, 154, 5, 27, "Input",
CellTags->"SumT",
CellID->1022041702],
-Cell[8313, 323, 359, 11, 62, "Output",
- CellTags->"SumT",
- CellID->1350292495]
+Cell[9231, 349, 338, 10, 56, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8709, 339, 142, 5, 27, "Input",
+Cell[9606, 364, 142, 5, 27, "Input",
CellTags->"SumT",
CellID->803956266],
-Cell[8854, 346, 247, 9, 62, "Output",
- CellTags->"SumT",
- CellID->1565575302]
+Cell[9751, 371, 226, 8, 55, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9138, 360, 163, 6, 27, "Input",
+Cell[10014, 384, 163, 6, 27, "Input",
CellTags->"SumT",
CellID->1947579277],
-Cell[9304, 368, 248, 9, 62, "Output",
- CellTags->"SumT",
- CellID->1734591901]
+Cell[10180, 392, 227, 8, 55, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9589, 382, 287, 11, 56, "Input",
+Cell[10444, 405, 287, 11, 58, "Input",
CellTags->"SumT",
CellID->1900986557],
-Cell[9879, 395, 446, 16, 39, "Output",
- CellTags->"SumT",
- CellID->1972297222]
+Cell[10734, 418, 425, 15, 40, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10362, 416, 155, 5, 27, "Input",
+Cell[11196, 438, 155, 5, 27, "Input",
CellTags->"SumT",
CellID->1051047228],
-Cell[10520, 423, 277, 10, 62, "Output",
- CellTags->"SumT",
- CellID->1330421141]
+Cell[11354, 445, 256, 9, 56, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10834, 438, 174, 6, 27, "Input",
+Cell[11647, 459, 174, 6, 27, "Input",
CellTags->"SumT",
CellID->1748540903],
-Cell[11011, 446, 359, 11, 62, "Output",
- CellTags->"SumT",
- CellID->833938013]
+Cell[11824, 467, 339, 10, 56, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11407, 462, 147, 5, 27, "Input",
+Cell[12200, 482, 147, 5, 27, "Input",
CellTags->"SumT",
CellID->629628077],
-Cell[11557, 469, 564, 20, 62, "Output",
- CellTags->"SumT",
- CellID->540691812]
+Cell[12350, 489, 544, 19, 56, "Output",
+ CellTags->"SumT"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12158, 494, 259, 10, 27, "Input",
+Cell[12931, 513, 259, 10, 27, "Input",
CellTags->"SumT",
CellID->1141337976],
-Cell[12420, 506, 565, 20, 62, "Output",
- CellTags->"SumT",
- CellID->1165392017]
+Cell[13193, 525, 544, 19, 56, "Output",
+ CellTags->"SumT"]
}, Open ]]
}, Open ]],
-Cell[13012, 530, 31, 0, 29, "SectionFooterSpacer"]
+Cell[13764, 548, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[13080, 535, 270, 12, 31, "SeeAlsoSection",
+Cell[13832, 553, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[13353, 549, 358, 15, 31, "Text",
- CellTags->"SumT",
- CellID->183277524]
+Cell[14105, 567, 322, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[13726, 567, 23, 0, 42, "FooterCell"]
+Cell[14442, 583, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum2.nb
index 758f0c30a..881b71bf6 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum2.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5531, 150]
-NotebookOptionsPosition[ 3472, 96]
-NotebookOutlinePosition[ 5453, 146]
-CellTagsIndexPosition[ 5410, 143]
+NotebookDataLength[ 5763, 160]
+NotebookOptionsPosition[ 3734, 107]
+NotebookOutlinePosition[ 5699, 157]
+CellTagsIndexPosition[ 5656, 154]
WindowTitle->SymbolicSum2
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ SymbolicSum2.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$151346],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$262445],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/SymbolicSum2", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ SymbolicSum2.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SymbolicSum2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SymbolicSum2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,10 +117,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 49.879190}",
+ "built" -> "{2020, 1, 5, 19, 3, 2.864271}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -118,11 +129,11 @@ TaggingRules->{
"SymbolicSum2 is similar to SymbolicSum (Algegra`SymbolicSum`SymbolicSum \
was a function to do symbolic summation. It was obsolete from version 3 - all \
functionality is now autoloaded by Sum), but extended to several double \
-sums.", "synonyms" -> {}, "title" -> "SymbolicSum2", "titlemodifier" -> "",
- "windowtitle" -> "SymbolicSum2", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/SymbolicSum2"}},
+sums.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "SymbolicSum2",
+ "titlemodifier" -> "", "windowtitle" -> "SymbolicSum2", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/SymbolicSum2"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -131,7 +142,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -145,13 +156,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 2290, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 535, 14, 70, "Usage",
+Cell[2877, 76, 289, 11, 70, "ObjectNameGrid"],
+Cell[3169, 89, 535, 14, 70, "Usage",
CellID->982511436],
-Cell[3445, 94, 23, 0, 70, "FooterCell"]
+Cell[3707, 105, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum3.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum3.nb
index 9b4e97e08..2f8d927fb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum3.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/SymbolicSum3.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5611, 151]
-NotebookOptionsPosition[ 3528, 96]
-NotebookOutlinePosition[ 5533, 147]
-CellTagsIndexPosition[ 5490, 144]
+NotebookDataLength[ 5840, 160]
+NotebookOptionsPosition[ 3790, 107]
+NotebookOutlinePosition[ 5776, 157]
+CellTagsIndexPosition[ 5733, 154]
WindowTitle->SymbolicSymbolicSum3
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ SymbolicSymbolicSum3.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$151688],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$262881],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/SymbolicSymbolicSum3", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ SymbolicSymbolicSum3.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["SymbolicSymbolicSum3", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["SymbolicSymbolicSum3", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -106,10 +117,9 @@ TaggingRules->{
ButtonBox[
"Wolfram Language", ButtonData -> "paclet:guide/WolframRoot",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "ExampleCounter" -> 1, "ExamplePageLinks" -> {}, "NeedPlatMsgIn" ->
- None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 51.085218}",
+ Left], "ExampleCounter" -> 1, "NeedPlatMsgIn" -> None, "RootCaptions" ->
+ "", "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 3.771265}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -118,12 +128,12 @@ TaggingRules->{
"SymbolicSymbolicSum3 is similar to SymbolicSum \
(Algegra`SymbolicSum`SymbolicSum was a function to do symbolic summation. It \
was obsolete from version 3 - all functionality is now autoloaded by Sum), \
-but extended to several double sums.", "synonyms" -> {}, "title" ->
- "SymbolicSymbolicSum3", "titlemodifier" -> "", "windowtitle" ->
+but extended to several double sums.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "SymbolicSymbolicSum3", "titlemodifier" -> "", "windowtitle" ->
"SymbolicSymbolicSum3", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/SymbolicSymbolicSum3"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -132,7 +142,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -146,13 +156,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[592, 21, 2294, 52, 70, "AnchorBarGrid",
+Cell[592, 21, 2322, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2889, 75, 63, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2955, 78, 543, 14, 70, "Usage",
+Cell[2917, 76, 297, 11, 70, "ObjectNameGrid"],
+Cell[3217, 89, 543, 14, 70, "Usage",
CellID->982511436],
-Cell[3501, 94, 23, 0, 70, "FooterCell"]
+Cell[3763, 105, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Symmetrize.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Symmetrize.nb
deleted file mode 100644
index 5f767e6f2..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Symmetrize.nb
+++ /dev/null
@@ -1,338 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.2' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9635, 328]
-NotebookOptionsPosition[ 6121, 219]
-NotebookOutlinePosition[ 8668, 291]
-CellTagsIndexPosition[ 8556, 285]
-WindowTitle->Symmetrize
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Symmetrize\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Symmetrize"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Symmetrize.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$146002],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Symmetrize", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Symmetrize", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"Symmetrize", "[",
- RowBox[{"expr", ",", " ",
- RowBox[{"{",
- RowBox[{"a1", ",", " ", "a2", ",", " ", "..."}], "}"}]}], "]"}]],
- "InlineFormula"],
- " \[LineSeparator]",
- "antisymmetrizes expr with respect to the variables a1,a2, ... "
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
- WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1569778869],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1682927475],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Symmetrize", "[",
- RowBox[{
- RowBox[{"f", "[",
- RowBox[{"a", ",", "b"}], "]"}], ",",
- RowBox[{"{",
- RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
- CellTags->"Symmetrize",
- CellLabel->"In[1]:=",
- CellID->848650980],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"Symmetrize", "[",
- RowBox[{
- RowBox[{"f", "(",
- RowBox[{"a", ",", "b"}], ")"}], ",",
- RowBox[{"{",
- RowBox[{"a", ",", "b"}], "}"}]}], "]"}], TraditionalForm]], "Output",
- ImageSize->{182, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Symmetrize",
- CellLabel->"Out[1]=",
- CellID->1555303152]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Symmetrize", "[",
- RowBox[{
- RowBox[{"f", "[",
- RowBox[{"x", ",", "y", ",", "z"}], "]"}], ",",
- RowBox[{"{",
- RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}]], "Input",
- CellTags->"Symmetrize",
- CellLabel->"In[2]:=",
- CellID->1287424961],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"Symmetrize", "[",
- RowBox[{
- RowBox[{"f", "(",
- RowBox[{"x", ",", "y", ",", "z"}], ")"}], ",",
- RowBox[{"{",
- RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], "]"}],
- TraditionalForm]], "Output",
- ImageSize->{216, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Symmetrize",
- CellLabel->"Out[2]=",
- CellID->1214783964]
-}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["AntiSymmetrize",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/AntiSymmetrize",
- ButtonNote->"AntiSymmetrize"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Symmetrize",
- CellID->714962705]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-WindowTitle->"Symmetrize",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2015, 11, 6, 23, 7, 42.061391}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Symmetrize[expr, {a1, a2, ...}] antisymmetrizes expr with respect to the \
-variables a1,a2, ... ", "synonyms" -> {}, "title" -> "Symmetrize",
- "titlemodifier" -> "", "windowtitle" -> "Symmetrize", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Symmetrize"}, "SearchTextTranslated" -> ""},
-CellContext->"Global`",
-FrontEndVersion->"10.2 for Linux x86 (64-bit) (July 6, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.2 for Linux x86 (64-bit) (July 6, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3452, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1569778869]},
- "Symmetrize"->{
- Cell[4086, 127, 257, 9, 27, "Input",
- CellTags->"Symmetrize",
- CellID->848650980],
- Cell[4346, 138, 381, 13, 36, "Output",
- CellTags->"Symmetrize",
- CellID->1555303152],
- Cell[4764, 156, 278, 9, 27, "Input",
- CellTags->"Symmetrize",
- CellID->1287424961],
- Cell[5045, 167, 404, 14, 36, "Output",
- CellTags->"Symmetrize",
- CellID->1214783964],
- Cell[5817, 204, 262, 10, 32, "Text",
- CellTags->"Symmetrize",
- CellID->714962705]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"PrimaryExamplesSection", 7943, 262},
- {"Symmetrize", 8080, 266}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
- CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 533, 16, 82, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3452, 98, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1569778869],
-Cell[CellGroupData[{
-Cell[3865, 117, 196, 6, 25, "ExampleSection",
- CellID->1682927475],
-Cell[CellGroupData[{
-Cell[4086, 127, 257, 9, 27, "Input",
- CellTags->"Symmetrize",
- CellID->848650980],
-Cell[4346, 138, 381, 13, 36, "Output",
- CellTags->"Symmetrize",
- CellID->1555303152]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4764, 156, 278, 9, 27, "Input",
- CellTags->"Symmetrize",
- CellID->1287424961],
-Cell[5045, 167, 404, 14, 36, "Output",
- CellTags->"Symmetrize",
- CellID->1214783964]
-}, Open ]]
-}, Open ]],
-Cell[5476, 185, 31, 0, 29, "SectionFooterSpacer"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5544, 190, 270, 12, 31, "SeeAlsoSection",
- CellID->1255426704],
-Cell[5817, 204, 262, 10, 32, "Text",
- CellTags->"Symmetrize",
- CellID->714962705]
-}, Open ]],
-Cell[6094, 217, 23, 0, 42, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
-
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TBox.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TBox.nb
index af13757bb..361f83eb5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TBox.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TBox.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5473, 150]
-NotebookOptionsPosition[ 3470, 97]
-NotebookOutlinePosition[ 5395, 146]
-CellTagsIndexPosition[ 5352, 143]
+NotebookDataLength[ 5710, 161]
+NotebookOptionsPosition[ 3732, 108]
+NotebookOutlinePosition[ 5646, 158]
+CellTagsIndexPosition[ 5603, 155]
WindowTitle->TBox
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$152029],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$263317],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/TBox",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TBox", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TBox", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,10 +118,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 52.301633}",
+ "built" -> "{2020, 1, 5, 19, 3, 4.840638}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -119,10 +130,11 @@ TaggingRules->{
"TBox[a, b, ...] or Tbox[a, b, ...] produces a RowBox[{a,b, ...}] where \
a, b, ... are boxed in TraditionalForm. TBox and Tbox are used internally by \
FeynCalc to produce the typeset output in TraditionalForm", "synonyms" -> {},
- "title" -> "TBox", "titlemodifier" -> "", "windowtitle" -> "TBox", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/TBox"}},
+ "tabletags" -> {}, "title" -> "TBox", "titlemodifier" -> "",
+ "windowtitle" -> "TBox", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TBox"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -131,7 +143,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -145,13 +157,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 2257, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 582, 15, 70, "Usage",
+Cell[2836, 76, 281, 11, 70, "ObjectNameGrid"],
+Cell[3120, 89, 582, 15, 70, "Usage",
CellID->982511436],
-Cell[3443, 95, 23, 0, 70, "FooterCell"]
+Cell[3705, 106, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TC.nb
new file mode 100644
index 000000000..f0bdb5cd6
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TC.nb
@@ -0,0 +1,337 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9399, 327]
+NotebookOptionsPosition[ 6356, 233]
+NotebookOutlinePosition[ 8424, 289]
+CellTagsIndexPosition[ 8340, 284]
+WindowTitle->TC
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TC.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$263761],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TC",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["TC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"TC", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the temporal component of a 4-vector and is \
+transformed into TemporalPair[TemporalMomentum[p], ExplicitLorentzIndex[0]] \
+by FeynCalcInternal."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1745351820],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->54384102],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TC", "[", "p", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1427443703],
+
+Cell[BoxData[
+ FormBox["t", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1496335197]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TC", "[",
+ RowBox[{"p", "-", "q"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1005269200],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], ")"}], "0"], TraditionalForm]], "Output",
+ ImageSize->{64, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->403293147]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"TC", "[", "p", "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1218510342],
+
+Cell[BoxData["t"], "Output",
+ ImageSize->{13, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1739212129]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in TC", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"TC", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"t", "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"]}], TraditionalForm]], "Output",
+ ImageSize->{49, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1280518817]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"TC",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 5.662115}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "TC[p] is the temporal component of a 4-vector and is transformed into \
+TemporalPair[TemporalMomentum[p], ExplicitLorentzIndex[0]] by \
+FeynCalcInternal.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "TC",
+ "titlemodifier" -> "", "windowtitle" -> "TC", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TC"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3621, 106, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1745351820]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8196, 277}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[574, 21, 2262, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2839, 76, 279, 11, 45, "ObjectNameGrid"],
+Cell[3121, 89, 475, 13, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3621, 106, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1745351820],
+Cell[CellGroupData[{
+Cell[4034, 125, 194, 6, 26, "ExampleSection",
+ CellID->54384102],
+Cell[CellGroupData[{
+Cell[4253, 135, 99, 3, 27, "Input",
+ CellID->1427443703],
+Cell[4355, 140, 187, 6, 35, "Output",
+ CellID->1496335197]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4579, 151, 122, 4, 27, "Input",
+ CellID->1005269200],
+Cell[4704, 157, 560, 23, 39, "Output",
+ CellID->403293147]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5301, 185, 165, 5, 27, "Input",
+ CellID->1218510342],
+Cell[5469, 192, 173, 5, 51, "Output",
+ CellID->1739212129]
+}, Open ]],
+Cell[5657, 200, 87, 1, 32, "Notes",
+ CellID->97927264],
+Cell[CellGroupData[{
+Cell[5769, 205, 169, 5, 27, "Input",
+ CellID->1140711302],
+Cell[5941, 212, 349, 14, 39, "Output",
+ CellID->1280518817]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6329, 231, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TFIOrder.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TFIOrder.nb
new file mode 100644
index 000000000..5d0e39e4d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TFIOrder.nb
@@ -0,0 +1,783 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 24027, 773]
+NotebookOptionsPosition[ 21011, 681]
+NotebookOutlinePosition[ 23095, 737]
+CellTagsIndexPosition[ 23010, 732]
+WindowTitle->TFIOrder
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TFIOrder\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TFIOrder"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TFIOrder.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$265937],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TFIOrder", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["TFIOrder", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"TFIOrder", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] orders the arguments of some TFI functions in exp in \
+a standard way."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1902021877],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->357937628],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Tarcer`TFI", "[",
+ RowBox[{"D", ",",
+ RowBox[{"p", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "M2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "M1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "M3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "M4"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "M5"}], "}"}]}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->2090101523],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"Tarcer`TFI", "(",
+ RowBox[{"D", ",",
+ SuperscriptBox["p", "2"], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"1", "M2"},
+ {"1", "M1"},
+ {"1", "M3"},
+ {"1", "M4"},
+ {"1", "M5"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{187, 87},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->385222805]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TFIOrder", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->339387350],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"Tarcer`TFI", "(",
+ RowBox[{"D", ",",
+ SuperscriptBox["p", "2"], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"1", "M1"},
+ {"1", "M2"},
+ {"1", "M4"},
+ {"1", "M3"},
+ {"1", "M5"}
+ },
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ")"}],
+ TraditionalForm]], "Output",
+ ImageSize->{187, 87},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->847054476]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "*",
+ RowBox[{"m2", "^", "4"}], "*",
+ RowBox[{"m3", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"m2", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m1", "^", "2"}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "6"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m3", "^", "2"}]}]}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"m4", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m1", "^", "4"}]}], "+",
+ RowBox[{
+ RowBox[{"m3", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m3", "^", "2"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "4"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "3"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m3", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}]}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"m2", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"4", "*",
+ RowBox[{"m3", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "6"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}]}], ")"}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"m4", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "6"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m1", "^", "2"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m3", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}]}], ")"}]}]}], ")"}], "*",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "*",
+ RowBox[{"m3", "^", "2"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}]}], ")"}], "*",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], "^", "2"}]}]}], ")"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"Tarcer`TFI", "[",
+ RowBox[{"D", ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m4"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m3"}], "}"}]}], "}"}]}], "]"}], "-",
+ RowBox[{"Tarcer`TFI", "[",
+ RowBox[{"D", ",",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"1", ",", "m3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m4"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",", "m3"}], "}"}]}], "}"}]}], "]"}]}], ")"}]}],
+ ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"4", "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"m2", "^", "4"}], "*",
+ RowBox[{"m3", "^", "2"}]}], "-",
+ RowBox[{
+ RowBox[{"m2", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], "+",
+ RowBox[{"m3", "^", "2"}]}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"m4", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"m1", "^", "4"}], "+",
+ RowBox[{"m3", "^", "4"}], "+",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "2"}], "*",
+ RowBox[{"m3", "^", "2"}]}], "+",
+ RowBox[{"m4", "^", "2"}]}], ")"}]}]}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"m1", "^", "2"}], "+",
+ RowBox[{"m3", "^", "2"}]}], ")"}], "*",
+ RowBox[{"m4", "^", "2"}]}], "+",
+ RowBox[{
+ RowBox[{"m2", "^", "2"}], "*",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", "*",
+ RowBox[{"m3", "^", "2"}]}], "-",
+ RowBox[{"m4", "^", "2"}]}], ")"}]}]}], ")"}], "*",
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"m3", "^", "2"}], "*",
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"p", ",", "p"}], "]"}], "^", "2"}]}]}], ")"}]}],
+ ")"}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2139733482],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["m4", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "6"}], ")"}], " ",
+ SuperscriptBox["m1", "2"]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox["m3", "2"]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}], " ",
+ SuperscriptBox["m4", "2"]}]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox["m2", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "6"}], ")"}], " ",
+ SuperscriptBox["m4", "2"]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["m3", "2"]}]}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["m2", "2"], " ",
+ SuperscriptBox["m4", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "6"}], ")"}], " ",
+ SuperscriptBox["m3", "2"]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox["m1", "2"]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["m4", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "3"}], ")"}], " ",
+ SuperscriptBox["m1", "4"]}], "+",
+ RowBox[{
+ SuperscriptBox["m1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox["m4", "2"]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "3"}], ")"}], " ",
+ SuperscriptBox["m3", "2"]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["m3", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "3"}], ")"}], " ",
+ SuperscriptBox["m3", "2"]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}], " ",
+ SuperscriptBox["m4", "2"]}]}], ")"}]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["m3", "2"]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "4"}], ")"}], " ",
+ SuperscriptBox["m4", "2"]}]}], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["m2", "4"], " ",
+ SuperscriptBox["m3", "2"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"Tarcer`TFI", "(",
+ RowBox[{"D", ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"1", "m1"},
+ {"1", "m2"},
+ {"1", "m3"},
+ {"1", "m4"},
+ {"1", "m3"}
+ },
+
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
+ ")"}], "-",
+ RowBox[{"Tarcer`TFI", "(",
+ RowBox[{"D", ",",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ RowBox[{"(", "\[NoBreak]", GridBox[{
+ {"1", "m3"},
+ {"1", "m4"},
+ {"1", "m1"},
+ {"1", "m2"},
+ {"1", "m3"}
+ },
+
+ GridBoxAlignment->{
+ "Columns" -> {{Center}}, "ColumnsIndexed" -> {},
+ "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+ GridBoxSpacings->{"Columns" -> {
+ Offset[0.27999999999999997`], {
+ Offset[0.7]},
+ Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+ Offset[0.2], {
+ Offset[0.4]},
+ Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
+ ")"}]}], ")"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["m4", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m1", "2"], "+",
+ SuperscriptBox["m3", "2"]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["m2", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox["m3", "2"]}], "-",
+ SuperscriptBox["m4", "2"]}], ")"}]}]}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox["m2", "2"], " ",
+ SuperscriptBox["m4", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m1", "2"], "+",
+ SuperscriptBox["m3", "2"]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["m4", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m1", "4"], "+",
+ RowBox[{
+ SuperscriptBox["m1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m4", "2"], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["m3", "2"]}]}], ")"}]}], "+",
+ SuperscriptBox["m3", "4"]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["m2", "4"], " ",
+ SuperscriptBox["m3", "2"]}], "+",
+ RowBox[{
+ SuperscriptBox["m3", "2"], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]}], ")"}]}], ")"}]}],
+ TraditionalForm]], "Output",
+ ImageSize->{573, 341},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1501141062]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TFIOrder", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->335983448],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1189820737]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"TFIOrder",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 11.322077}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "TFIOrder[exp] orders the arguments of some TFI functions in exp in a \
+standard way.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "TFIOrder",
+ "titlemodifier" -> "", "windowtitle" -> "TFIOrder", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/TFIOrder"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3576, 105, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1902021877]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 22866, 725}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[580, 21, 2273, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2856, 76, 285, 11, 45, "ObjectNameGrid"],
+Cell[3144, 89, 407, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3576, 105, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1902021877],
+Cell[CellGroupData[{
+Cell[3989, 124, 195, 6, 26, "ExampleSection",
+ CellID->357937628],
+Cell[CellGroupData[{
+Cell[4209, 134, 513, 17, 27, "Input",
+ CellID->2090101523],
+Cell[4725, 153, 872, 27, 108, "Output",
+ CellID->385222805]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5634, 185, 104, 3, 27, "Input",
+ CellID->339387350],
+Cell[5741, 190, 872, 27, 108, "Output",
+ CellID->847054476]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6650, 222, 6469, 202, 232, "Input",
+ CellID->2139733482],
+Cell[13122, 426, 7492, 232, 362, "Output",
+ CellID->1501141062]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[20651, 663, 104, 3, 27, "Input",
+ CellID->335983448],
+Cell[20758, 668, 187, 6, 35, "Output",
+ CellID->1189820737]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[20984, 679, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TGA.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TGA.nb
new file mode 100644
index 000000000..fab679020
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TGA.nb
@@ -0,0 +1,297 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8535, 287]
+NotebookOptionsPosition[ 5652, 200]
+NotebookOutlinePosition[ 7774, 257]
+CellTagsIndexPosition[ 7690, 252]
+WindowTitle->TGA
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TGA\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TGA"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TGA.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$266819],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TGA",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["TGA", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"TGA", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator] can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "0"]], "InlineFormula"],
+ " in 4 dimensions and is transformed into \
+DiracGamma[ExplicitLorentzIndex[0]] by FeynCalcInternal"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1544211338],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->588808452],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TGA", "[", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->119105896],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{23, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->89968456]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"TGA", "[", "]"}], "//", "FCI"}], "//", "StandardForm"}]], "Input",\
+
+ CellLabel->"In[2]:=",
+ CellID->1381819423],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], "]"}]], "Output",
+ ImageSize->{288, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->80537985]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"TGA", "[", "]"}], ".",
+ RowBox[{"TGA", "[", "]"}]}], "//", "DiracSimplify"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->858599894],
+
+Cell[BoxData[
+ FormBox["1", TraditionalForm]], "Output",
+ ImageSize->{11, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->704259393]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"TGA",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 13.434294}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "TGA[] can be used as input for \\[Gamma]^0 in 4 dimensions and is \
+transformed into DiracGamma[ExplicitLorentzIndex[0]] by FeynCalcInternal",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TGA", "titlemodifier" ->
+ "", "windowtitle" -> "TGA", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TGA"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3686, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1544211338]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7546, 245}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[575, 21, 2266, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2844, 76, 280, 11, 45, "ObjectNameGrid"],
+Cell[3127, 89, 534, 15, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3686, 108, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1544211338],
+Cell[CellGroupData[{
+Cell[4099, 127, 195, 6, 26, "ExampleSection",
+ CellID->588808452],
+Cell[CellGroupData[{
+Cell[4319, 137, 94, 3, 27, "Input",
+ CellID->119105896],
+Cell[4416, 142, 310, 12, 39, "Output",
+ CellID->89968456]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4763, 159, 159, 6, 27, "Input",
+ CellID->1381819423],
+Cell[4925, 167, 255, 7, 51, "Output",
+ CellID->80537985]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5217, 179, 180, 6, 27, "Input",
+ CellID->858599894],
+Cell[5400, 187, 186, 6, 35, "Output",
+ CellID->704259393]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5625, 198, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TID.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TID.nb
index 46fbd8bff..bbc97a76d 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TID.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TID.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 68276, 2099]
-NotebookOptionsPosition[ 63371, 1936]
-NotebookOutlinePosition[ 66181, 2019]
-CellTagsIndexPosition[ 66036, 2012]
+NotebookDataLength[ 66982, 2114]
+NotebookOptionsPosition[ 62032, 1951]
+NotebookOutlinePosition[ 64724, 2030]
+CellTagsIndexPosition[ 64579, 2023]
WindowTitle->TID
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TID\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TID"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TID.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$154110],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TID",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoopSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoopSimplify"], "\<\"TIDL\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/TIDL"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TID\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TID"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/TID.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$268141],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TID",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TID", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TID", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,76 +130,115 @@ with loop momentum q"
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->167494522],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->957893331],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->535579332],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "TID", "]"}]], "Input",
CellTags->"TID",
- CellLabel->"In[1]:=",
+ CellLabel->"In[26]:=",
CellID->1576573941],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- RowBox[{"ChangeDimension", "\[Rule]", "D"}], ",",
+ RowBox[{"ApartFF", "\[Rule]", "True"}], ",",
+ RowBox[{"Check", "\[Rule]", "True"}], ",",
RowBox[{"Collecting", "\[Rule]", "True"}], ",",
RowBox[{"Contract", "\[Rule]", "True"}], ",",
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"DimensionalReduction", "\[Rule]", "False"}], ",",
RowBox[{"DiracSimplify", "\[Rule]", "True"}], ",",
RowBox[{"DiracTrace", "\[Rule]", "True"}], ",",
- RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
RowBox[{"EpsEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCLoopRemoveNegativePropagatorPowers", "\[Rule]", "True"}], ",",
+
+ RowBox[{"FCLoopMixedToCartesianAndTemporal", "\[Rule]", "True"}], ",",
RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}], ",",
RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Factor2", ",", "5000"}], "}"}]}], ",",
+ RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}], ",",
RowBox[{"GenPaVe", "\[Rule]", "False"}], ",",
+ RowBox[{"Isolate", "\[Rule]", "False"}], ",",
RowBox[{"PaVeAutoOrder", "\[Rule]", "True"}], ",",
RowBox[{"PaVeAutoReduce", "\[Rule]", "True"}], ",",
- RowBox[{"ApartFF", "\[Rule]", "True"}], ",",
- RowBox[{"Isolate", "\[Rule]", "False"}], ",",
+ RowBox[{"PauliTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"ToPaVe", "\[Rule]", "False"}], ",",
RowBox[{"UsePaVeBasis", "\[Rule]", "False"}], ",",
- RowBox[{"ToPaVe", "\[Rule]", "False"}]}], "}"}],
+ RowBox[{"TimeConstrained", "\[Rule]", "3"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{518, 130},
+ ImageSize->{471, 166},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TID",
- CellLabel->"Out[1]=",
- CellID->1697860323]
+ CellLabel->"Out[26]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1140297004],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->742260497],
+
+Cell[CellGroupData[{
+
Cell[BoxData[{
RowBox[{
RowBox[{"FCClearScalarProducts", "[", "]"}], ";"}], "\[IndentingNewLine]",
@@ -180,7 +256,7 @@ Cell[BoxData[{
RowBox[{"FVD", "[",
RowBox[{"k", ",", "\[Mu]"}], "]"}]}], "//", "FCI"}]}]}], "Input",
CellTags->"TID",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1762979144],
Cell[BoxData[
@@ -230,11 +306,11 @@ Cell[BoxData[
TraditionalForm],
FormBox["2",
TraditionalForm]]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{206, 51},
+ ImageSize->{218, 45},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TID",
- CellLabel->"Out[2]=",
+ CellLabel->"Out[1]=",
CellID->618277373]
}, Open ]],
@@ -261,320 +337,261 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TID", "[",
RowBox[{"int", ",", "k"}], "]"}]], "Input",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->972857906],
Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
-1:eJztnQlUFFf2/zOZ/2RycpyT5CCyKEiQfVFApIkgKiqKgv7ixsFf1MTkp5HE
-+bkHNTFxA0xOohgSklEHo6MT1yTCT0xQIC5EcEEQUDCgssjedLc0NL0U/25k
-kO6uqq5X/aq7Gu7nnJlDkL733fuWfvXqVn1fW/a/c5c//9xzz617Uf1/c9/+
-cPLatW9vmvf/1P8Rvmn9/yz7s/qHTvX/zvzpuec0P3cDAAAAgA7Ek9tfrXgr
-/su9Hy36n9TyDnM3BwAAwAy03/zfWVvvdHSrmn6a4B5zTYLFKCHMigr8e5G0
-96fVmp9MhBldAwBg8cirkgO93r+NZ93oKI0PnPZzk6q7u7NsS1DE2SYCi1me
-uwYAwMLpenTsf6I3ZDQqsFhTNZwKD9xU2qnelzWnRwRtKevEYhafa0XDud0p
-tyV8WSQJ8c29iWfr5eZuBwAMahQN57dv2H/7iQqXwfaby/0if21VLzTtt+IC
-ZmUJTbfkMHGtqD++MOiDPDFfFkLNhXz2Mr/ow7V4vogAAEBG1XYlYdWhCs3W
-SSVrkuFYDRXV+8e5LMyTqJecMzHOYxIrZBiM4nMtyY/zCd5Xxa8dmKwi0d9j
-xe+82aYCgGUjb7x4IH6Gt2v4kQd1Od989O4UZ8/Y0/XUew1ZRcKYYW5jBWqC
-AgT/TXrHBNWm+OrCUe4TQsKnz45dHj1mwWWR6cIx7JpoOR/tLDhYrWMD1RH2
-lsurkv2d5vTsZgEAMB5V40+hth4b0hKS0qu7lI1nQpyjrohNabPrfpIg9IDu
-UsMX16LL80d6bb2rf3zILm/y5uvZN1tJHSIa7CjZ4O4Uk2dsVwEA0EP7jWVO
-1oFLEgtEqp6rRYH3e4XSbpWk6PiuxX7uMy6x2aGR2ySvRSRaf5kZEFeIq3gF
-JRwGrrvuf+ZjO+H/WvS3Xqzy1lka7/qyO9nCipa07p47PKF2o7+s7GKYGAAA
-aOiq3DN6yNDInjqSnktBt4izTU9P/9pyJjlNymWxElLZNKIWUZIf6/jSX/vz
-N4/1d/QLu3GH01G8xsVuxmX9nRdLR4SsuVZEuiVETpr4StRw13UkOQAAABWi
-JXOqtf3C3DbNpkfVlD7HZ35mS+9tEFEuu5WQzmYPLGoRCVlT9cMH/XlY2yrX
-26lhD0dWvsPLNixTb0+I3RF60oRZk+28E0x4ewkABi7SwrjXbKZmNKvnn0qY
-u04w8+vKvqnFdiWks9mNuxaRuWt2C1RrVuQI7+33dNcb7I6Qk9Z1f7evw6wL
-Jqw4AoABi/xhqv+QFx0iVmzeumnVkvdTrrUpn/0jy5WQ1ib2WkTmrtmFo6w/
-PtFx/JE6pdZvsTtCTpqq/sREp8kn65V6pgAAQIQQXphp67CY4sSO3dJBY5OD
-WkSmrrtZL+yqlsx5rhMOaVUxY3eEnDTl42PhHgvOt3DzjQIAg4uO4rUudtPI
-7oyqJCUZqSudXxkVl5pRIkGZb9Q2mdQiGgUX4ajpLE8KGbettN/9XuyOUJPW
-WbZDEPY5nBECAA4UNWlBI0LSanCe2HFh09yuCWnpvpU7rvc9bofdEaJBQlyw
-fWVKGbw1BwDwQCgU2A/cubDJN9fYHZkxaQAAAAAAAAAAAAAAAAAAAACAwnMA
-AJiQ4uJic096gAQhAAAmRKmEx2cAAADIYfpWIgAAgIELw7cSAQAAAAAAAAAA
-AAAAAAAAAAAAAAAAAADAR6iEGi0dE8c1UNPIHHNlgAu/0JuDEIbqlvKGC6dy
-mszwilO2GKHaicmdSnLnx5/L2+mqySwuqzSYOOGc+mXXm8CAgFbdUtWcETP2
-7d9EFjgOWKh24nInq0h6PSy5ilL+3IKzSoOJE86pX5TeBCwBZVvB91uifRx9
-VxW2k/4BvbplZ9kn/r4bi3WvEhQN53an3Jb0TWSDXjiBEN/cm3i2Xk76j1yq
-dhp2p6g9NNHzzWwKsUuGWeUdfEo4p36RehPgBSpJ0T9WvbFo3acfr46N3f6b
-kOT58CcFSxxsZ2aR9aMBdUtCdHnxKJ+tdzt1PlV/fGHQB3liLYM0XjiDEGYv
-84s+XKs3CbhV7dSDxJ1GhtNp4pE6kvmJklWewZeEc+oXrTcBfiAtWjXKduq/
-H6sXwK7KPUEBH+vOL/Xevnynl3XQ97V6a6RBdUv1uJ/r4LZWd+8iyY/zCd5X
-pb0zoPTCLbKKRH+PFb9r7aO4Vu3UgcKdeh8RZDfuu0d6kwclq/yDBwnn1C9q
-bwI8QSm6eerk3SeacUk0nQ19bfolXUFbZd3R4GGe2+7JCGnF8fURHvYB64p7
-Tz8MqVtKrr3pMHzeZbHWL4mW89HOgoPV2mOC0osuhPhW8s5vK/XW6/8gb7x4
-IH6Gt2v4kQd1Od989O4UZ8/Y0/XUA1BelezvNOfX1mczE4tqJyH942zy8lB3
-36WXHt1I27oi2t117o8NcknhwTUxswK85p1u+M+ST+mu8+4nHsPGH3us+92A
-kNV+YSKmxSCsDXKUcBZNYuIXm02q3gT4h+T35V6CL/7QPddty5lt77j02uNb
-exfPjUv6Lu3Y+XsMryVkFbu8hgbofg+KLs8f6aV3acfYi/LxMYFjOJ0Auarx
-p1Bbjw1pCUnp1V3KxjMhzlFXxNR/3lGywd0pJo/mL1jSWRrvMTw8+YvdR+9J
-paWbx/h/nJ4cF3+m5knVV4Kxn96jXMv7EP0WZWM/P09ngqJktT+IaelF3nw9
-+2Yr6cxnZ5DDhLNvkilskvcmwDeUzb9ujFiUUqJ3r196e5XzsNeTtq/Ymd2M
-+H0mvjrHZlikziaz6/5nPrYTdMXAmXsxvBK231jmZB24JLFApF5KFdX7Bd7v
-FUo156HHdy32c5+hu+klmtND7UZ/WYn7zp6i+uBYK/voD3NalJpGj7cZMTsm
-5W6HZk+3yHvaORI1dF06y7a4WY09oLPPQ8iqFohp6W1Cabzry+7kKyy5QcMF
-dVwlnLJJBmJkZRO9bpC8NwFeoTnbWLrxTDXJ2FRfy4yxdn5TYDN8QU4b4lm8
-MCvMyn5R/hOtX3YUr3Gxm6FzbcfES9+rLP/y/J+ef4H6VZZdlXtGDxka+XOT
-ZkupuWh0izjb9HR72ZYzyWmS3iIqvhI13HUdwksxGb1Uk2g9P33oqxP+qZE9
-J4QXoqxfcovvuS8uf/BV8LiECplhP12VX/haeSfq/CnzrOoYQ0xLbxiy5loR
-6eSlMmi4SI+bhLOPkRb2YeoZIutNgD+oxAV7PtiRRV6kq2r8caKN24d5F94a
-aRt5plGpEfNmfLAsujTd2mb2Ve3pKSvf4WUblqm1e2HkpfdVlpX5yX72438o
-pnqVJdGSOdXafmFuz4Kqakqf4zM/s6XXmCiXbDoIsybbeTNamrRbQv9SzfYb
-74wcNuWnngnUfuNdx1fHpj6UP83KG74LLjV3KA1+r8jubfO08vvqgfZNEMZZ
-1W4zcloMQGewB+oiPW4SzkGMBmz2wLgWkbw3Ab4grzk0L+yTQolCg7ztfk6D
-1gCV5MU6jIi5KpYWrXd9dXTCXdEfh7dkNtBdv3bVnNh9oqZnd9lxZ72LVdC/
-6rT+nGjNihzhvf1efzcoXgxdHUsL416zmZrRrB65KmHuOsHMryv7XJFOh677
-u30dZl3AXL0jq9jlbRv6Q70mCM0cGBq4/+l1kdqdIHjn/i1HHhq8OpTkzbez
-jrgo1P4t46xqgZwWQ9AZ7KYt0uMm4QaaxHYlZB+mLuS9CfAEadFq5xeeCW/9
-2eYNrSPdzrufBnrPPdes6la1Zq8OcfKMXHm4iv67XHp77bQ1T78iidZfpts4
-LL2ufSGnKa1yHH+k30xG8qJqzV371uY7VPXX8oep/kNedIhYsXnrplVL3k+5
-1tZvxSCbDqr6ExOdJp+sx3tPT1l/cprvzKM99WOK2sOTPKek9q58svufB7tF
-bcsXGdxayyoSvKz0z9OYZlUL5LQYgtYgbZEeNwk31CSWKyH7MHWh6E1gUKCs
-OzreRu86SNWSOc91wiH96loMEMILM20dFlMc25BMB/UWM9xjwfkWk9WwMUbV
-eHrCMNeNJXrHYSyyipwWQ9AYNFCkx1nCscdIbxOxFpGyN4FBgXrShg0P1Ksn
-7SxPChm3rdRwHQkyHcVrXeymkd1DVUlKMlJXOr8yKi41o0Tyn4HbWbZDEPY5
-H0+xCeHFOQ4em0pJpg56VlHTYhBqgwaK9LhLOPYYaW0i1kDS9CYwKFC1/rLA
-RdB7r+AZhLR038od17E/GKaoSQsaEZJWw3C7SYgLtq9MKTP5E/8MIIRZc0cF
-p5Cfr6NmFTEthmFrkMOEY48Rp03a3gQGB7LypOCArWUc7P/IIBQKPj92yxhl
-/cnIMe/kUtYtIWYVe1p4mGcumoTJpqHeBAYFhCg/4cPDj+CkGAGV8PK2Tafq
-aLYQkFXLwXBvAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMBg
-AflV5zyzzze/JgM6DgAwgvyqc57ZN7NfQpgVFfj3ImnvT6uLTPbOCOg4ozBf
-xwHYkTdcOJVD/mp/FsZoXnWOwxHjV6ljpp9fleTOjz+X6wljGUVHaXzgtB4l
-jc6yLUERZ5tM/ig/dBwrzN9xACZUzRkxY9/+TYSlB+ledY7DEcKr1LGi7VdW
-kfR6WHIVxncjqBpOhQdu0rx4kGhOjwjaYqoX+/QBHccOs3ccgIvOsk/8fTcW
-4zhHoX/VufGOkF6ljhF9v4raQxM938zGp9PRfnO5X2SPVHr7rbiAWVn4FUDo
-gI5jjXk7DsAGIbq8eJQPrZw4Qwy86txoR4ivUscGuV+NpojTxCN1mLY4iur9
-41wW5km6FfVnYpzHmFQnEjrOCMzZcQBGCGH2XAe3tRh2hAZedW60I8RXqWOD
-yq96cxFkN07v9fosEV9dOMp9Qkj49Nmxy6PHLLjMRr6cJdBxxmDGjgNwIrn2
-psPweWRq4vLGiwfiZ3i7hh95UJfzzUfvTnH2jD1dz3r4UDgipH+cTV4e6u67
-9NKjG2lbV0S7u879sUEuKTy4JmZWgNe807Rqo2QQ4lvJO7+tpNzBYIur8+4n
-HsPGH3tM2kBEL133kwShB6oZtcJkAT4FOs5UHQeYEVnFLq+hARTfj6rGn0Jt
-PTakJSSlV3cpG8+EOEddIVkyjXXUWRrvMTw8+YvdR+9JpaWbx/h/nJ4cF3+m
-5knVV4Kxn95DHTiGtJLxxSX6LcrGfn4exR4HxQvR+svMgLhCZndVTRegBug4
-E3YcYDbEV+fYDIu8RN457TeWOVkHLkks0Mj2Kqr3C7zf0/Q5q4JVakeK6oNj
-reyjP8xpUWrGynibEbNjUu52aDYji7ynnSORHKPH8Hgjj0slKTq+a7Gf+wyK
-bOjTWbbFzWos1YYAlxc9TBegBv53HPqAZNNxGOq0YSXkMcKsMCv7RflPyP6t
-q3LP6CFDI3sqpbqJlvPRbhFnNT+zKlildES0np8+9NUJ/9RoixHCC1HWL7nF
-F2ok3+UPvgoepyv4S4ckP9bxpb+q+cvzf3r+Bc0Pf/NYf0d/yFLFpaYtB0Uw
-t6vyC18rb4ozcmxezBigBgvoOOQByarjjKjTZhogYD5El6Zb28y+Srb5J1oy
-p1rbL3wq1qVqSp/jMz9TS8obqVCW0lH7jXdGDpvyU8+4a7/xruOrY3uFLUWX
-3vBdcKm5Q8l0b0HImqofPnhQmZ/sZz/+h+IHDx48rG2V632aLi406XDZvW2e
-Vn5fkco64vNixgB7PmERHdcD4wHJtuPQvCAHCJiRjjvrXayC/lVHcngsLYx7
-zWZqRjOh0e3KXSeY+XVl/+9QxEJZKkeyil3etqE/1Gt+rxmgQwP3P71o6bq/
-WxC8c/+WIw8Rq2ANXYPQxYW2UEjy5ttZR1wUcutFD9MFqMEyOq4baUCy7Tg0
-L3rA1TGPIVp/mW7jsPS6/sWP/GGq/5AXHSJWbN66adWS91OutfWbC+iFshSO
-lPUnp/nOPNpT3KWoPTzJc0pq7wSS3f882C1qW74ItfxM1Zq79q3Nd9op/pk2
-LqSFQlaR4GU1+stKsgmPz4s+JguwB8voOKQBybrjjKwPNxAgYFaUdUfH23jr
-n+oQwgszbR0Wkx2HsCuUpXJkYmji6kZbKFSNpycMc91YQnbcg88LMthd87/j
-EAcky44zV304YCLUAz1seKBelURH8VoXu2n/R3IDkG2hLIUjE0Mdl0pSkpG6
-0vmVUXGpGSUSgwOdEF6c4+CxqZT03BubF3Twu+Z7xyEOSJYdZ676cMBkqFp/
-WeAi6D3t/g+KmrSgESFpNThHP6kjE4MtLkKYNXdUcArpoTsn2WMIdJwB+Npx
-AA+QlScFB2zVfocGoVDgv7dF5sjEYIpLWX8ycsw7T28wcueFDdBxtPC34wAe
-QIjyEz48/Ajjq4rM7YhjVMLL2zadqjPnJsm0QMcBAAAAAAAAAAAAAAAAAAAA
-AAAAAMA7QD8X4AgYWoAFMcD1c1kAkruYGOBDC8YJ/xg8+rlYtaQpIJXc5ULb
-1xIYPEMLmYEhzcwkM7Kqb5b9PUfI+6fDB49+LlYtaUon5JK7+LV9LYDBM7TQ
-GSjSzIYzI3/0bUjw53/wfugPHv1cjFrSNFBJ7hrS9lU0nNudclvCl40BIb65
-N/FsvVEPgAyeocUCZtLMFjAqDGVG1XBy6tgNvH8r+ODRz8WnJU0LteQurbav
-ov74wqAP8sR8GfI9gqLL/KIP17Leiw2eocUGRtLMljEq6DNDCLP+y+9tck0S
-HjF49HPxaUnTQyO5S6PtK8mP8wneV8WvR3BlFYn+Hit+Z7khGTxDixVMpJkt
-ZVTQZkaS/5bff13At5fmiMGjn0utJU0PTsldqrZppIqcBQd1P4VZKxndoLwq
-2d9pTs8VHDqDZ2ix8cJAmtmCRgVNZjrurBs79WQD3++WDB79XFotaXowSu5S
-aPuKLs8f6UV2GckuJ/Lm69k3W3GoZneUbHB3islj0w2DZ2ix8cJEmtmSRgVl
-ZjRCOiHfPuLXtpYE/uvn4hI+ptWSpgej5C5527ruf+ZjO4Hs3cyscqJeaFxf
-dic/n0OMhWhOD7WjEBkxAP+HlmmkmVlralvUqKDKjKLmn2Hjtt8zs9gEAyxA
-P7cbj/AxVaR9zetDt3k4JXfJ29ZRvMbFbgbJhTvLnBCy5loR6WxFjkV8JWq4
-6zqS7jKYNwsYWqaRZu5mqaltUaOCIjOqpp+n+39g+kpQdCxDPxeH8DFVpL3N
-64dO87BK7pK3TVa+w8s2LFPv2x+7TDN6LMKsyXakAlIG82YZQ4s8aipMqqlt
-UaOCIjNtufPHxLI6iDA1lqGfi0P4mEZLmh6skrvkbSNasyJHeOtfQ2CXaUaO
-Rd3dvg6zWN34s4yh1W0SaWZ2C5QljQryzLTfWO43C/24wxxYhn4uDuFjai1p
-erBK7lJp+2oKshzHH9FZNbDLNCPHoqo/MdFp8sl65K+PbksZWqaRZmanJGtB
-o4I8M52lm8dOYrH5MAv818/txiR8zC5SrJK71Nq+qpbMea4TDmnVq2LXSkaO
-Rb3ZCvdYcL4FdWnq/TTvh5ZppJm7WWtqW8yoIM+MvGpvcPAeNnfbzALf9XPx
-CR+zihSn5C6ttm9neVLIuG2l/e7sYddKRo2ls2yHIOxz9isZ34eWaaSZjdLU
-toxRQZ4ZdfdPGrup1HKeph48+rksIsUpuUvbNk3Fcem+lTuu9z1YhV3tF9Eg
-IS7YvjKlzJjbfoNnaHEmzWwJo4I8M0TLuVl+7yKfRpmVQaOfyyJSfJK7htrG
-oWuuDBpm0Awtk+WWf6OCIjPiq4vGzMthPtx5weDRzzVfpINU23fwDK3BCkVm
-Osq2Tp2f3sT3h+wAAAAAAAAAAAAAAAAAAAAAAAAApphY+HVA6swOgKAGQAhI
-DCSd5cHWdxxhYsFZ/koYG8EACGoAhIDEQNJZHgx9x05JltWnTCw4y7HOrHkw
-l2gvRuhCMIWQtKnhgc4yFzb155RFzzJ2SrKsPmViwVmudWbNgrlEezFCF4JJ
-hKRNDD90lrmwqT+nLHiWsVOSJf2Usq3g+y3RPo6+qwpJXmxkYsFZVjqzupqw
-9BFxBbVAMIMcWnYIFKORZ1q9+hjVZZzAhV8mcwq7mrOJoFKSVUmK/rHqjUXr
-Pv14dWzs9t+ESkaf6u5+UrDEwXamvva0iQVn2enMkmrCUkXEJeQCwUxyaNkh
-UIwr/mn16sO+y7iAC79M5xRmNWcTQaUkKy1aNcp26r81WntdlXuCAj7WGpzU
-+rOy8p1e1kHf1+q/XtikgrPsdGZJNWGpIuIYEilYJjm07BAoxhUvtXr1Ydll
-3DQFv1/mcwqvmrOJoJLuVYpunjp594mmU4mms6GvTddSuaIU/FXWHQ0e5rnt
-noyQVhxfH+FhH7CuGN9pLQZ9Wxo1VXJNWGwRmUIg2NJDIB1XFFq9rFtlENYG
-jdJ05qZJprCpP6do1Zz5CRPpXsnvy70EX/yhdShK9am2nNn2jkuvPb61d/Hc
-uKTv0o6dv4f3fMRofVtqnVlyTViMEXEvEGzhIZCPK0qtXrat6gWfaG8fRmg6
-GwKXzjIXNvXnFL2aMx8xKN2rbP51Y8SilBKt2+KUn5LeXuU87PWk7St2Zjdz
-8n1gvL4tpc4suSYszogQtWXRBYLNFQIujWPScUWt1WugVaYT7WUbLwqYFZBp
-bOLQbqZXc+YjlEqyPWiOSJduPFOt27FUn1JfHYyxdn5TYDN8AfJ7FQ2LBXdj
-0bel1Jkl1YRlEhGjlnez0JalFAimwmwhoGsck0I6rii1eg22qttkor19IHcZ
-Z4OHARxqN1POMqbxmhxKJVn1Migu2PPBjiyyCleKT6kaf5xo4/Zh3oW3RtpG
-nmlUal5iy/gqzKDorQYM+raUOrNkmrCMImLUcjbaspQCwZSxmTGEHphrHJNC
-Oq6otHoZtcpEor19IHcZZ4OHgWsOtZspZxnDeE0PpXSvvObQvLBPCiUKDfK2
-+zkNMoOfkuTFOoyIuSqWFq13fXV0wl3RH4e3ZBq+icEcHPq22mqqXTUndp+o
-6fkQmSYszoiQtWUZCgTzJIRuDBrHpOOKSquXUatMI9r77J/YazqzbxLblZBL
-7WY6NWd+QiXdKy1a7fzCc3382eaN/qef5J/qvPtpoPfcc82qblVr9uoQJ8/I
-lYercOoy4tC31VFTld5eO21N77eeviYszoiQtWWZCgTzJAQcGsfk44pcq5dZ
-q0wi2tuHMZrO7JvEciXkUruZTs2Zr7BTkuWJ/iw6dDqzpJqwuEDWlmUnEGym
-EHBpHJOPK9qgzC/a+6z1Rmk6s2tSN9uVkEvtZtpZxlvYKcnyQ38WGVqd2W4y
-TVhcoGrLshYINkcI+DSOKcYVTVBmF+191kgjNZ3ZNIm9AjKH2s2GZhlfYack
-ywf9WWQMyAR362vC4sKEAsGWHQLFuKIMytyivX1g0HTG3SST2NSfU4ZnGW9h
-pyTLA/1ZRJBlgjFiBoFg3JgoBMRxxT/RXvxw0STOtJvNOcuMhp2SrKXpz4LO
-rGVgaeNqMKM/p2CWAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-AMDAAvkV7gAAWAqEMCsq8O9F0t6fVhdx8cD8wAD5Fe5MgPwDAB/oKI0PnNaj
-29BZtiUo4myTRT4mblIYv8KdCZB/AOABqoZT4YGbNK+5I5rTI4K2kL/wRNFw
-bnfKbQlfJikhvrk38Wy9eR5pR3iFOwOY5R8AAG5pv7ncL7JHmLv9VlzArCwy
-vQlF/fGFQR/kYX+9H3sIYfYyv+jDnLyHmhakV7gzgUn+AQDgGEX1/nEuC/Mk
-6tXuTIzzGBINQo0KYZxP8L4qfr1USFaR6O+x4neTblMRX+HOBCb5BwAAFXnj
-xQPxM7xdw488qMv55qN3pzh7xp6up946ia8uHOU+ISR8+uzY5dFjFlzWl37Q
-iL46Cw7qClajOsLecnlVsr/TnJ7dlIk8MnmFO/78AwDABlXjT6G2HhvSEpLS
-q7uUjWdCnKOuUEqEd91PEoQe0F3ltBBdnj/Sa+td/eMrJEd9yJuvZ99sJXWI
-aLCjZIO7U0yeYZfUsAsBo00G+QcAgA3tN5Y5WQcuSSzQyHuqL74E3u8VSilq
-4YjWX2YGxBXS3QTtuv+Zj+0EMpUbckcqSdHxXYv93GdcIt3edJbGu77sTraw
-orW8u+cOQ6idcbKJiB6NsEmeFgb5BwCADV2Ve0YPGRrZU5bRc2XrFnFW8zPb
-WriO4jUudjMu6+9qqBypacuh1lgkZM21ItI9EHLLxVeihruuu6O/UknyYx1f
-+mt//uaxnuTvcOfKiLQAAIAToiVzqrX9wqfiMaqm9Dk+8zO1xGZRa+Fk5Tu8
-bMMy9faEdI5Yqc2it1yYNdmOVGCakDVVP3zQn4e1rXK9XS32XBmwyVKOHAAA
-ZKSFca/ZTM1oJjQ6MrnrBDO/ruy/UqDXwhGtWZEjvLff011v6ByxmvLILe+6
-v9vXYdYF9mUn2HNlwCashABgIuQPU/2HvOgQsWLz1k2rlryfcq1N+ewf2dXC
-KeuPT3Qcf6ROqfVbWkdspjxyy1X1JyY6TT5Zr9QzxZVHY23CSggApoEQXphp
-67CY7GSLfS2cqiVznuuEQ1pVzDSOullNeeSWKx8fC/dYcL6FdVEfF7nCnhYA
-AFjQUbzWxW4a2Y1eJrVwlHSWJ4WM21ba734vtSOVpCQjdaXzK6PiUjNKJIwX
-EdSWd5btEIR9bkwdMhe5wp4WAADQUdSkBY0ISavBXp5GSEv3rdxxve9xO+yO
-EA0S4oLtK1PKjKk+4SJXnOUfAAAUCIXCNE+fYXdkspZz6tH0UQAAAAAAAAAA
-AAAAAAAAAACAcTwHAIAJKS4uNvekB0gQAgBgQpRK1k8DAQAADGSYvjUIAABg
-4MLwrUEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPARoyQgeYyJ4xqoaWSOuTLA
-hV/ozUEIQwlIecOFUzlNFvTOTmOkLfG4U0nu/PhzeTtdNZnFZZUGEyecU7/s
-ehMYENBKQKqaM2LGvv2byALHAQtpS1zuZBVJr4clV1FKuVtwVmkwccI59YvS
-m4AloGwr+H5LtI+j76rCdtI/oJeA7Cz7xN93Y7HuVYKi4dzulNuSvols0Asn
-EOKbexPP1stJ/5GVtCV7dNwpag9N9Hwzm0K4k2FWeQefEs6pX6TeBHiBSlL0
-j1VvLFr36cerY2O3/yYkeTj8ScESB9uZWWT9aEACkhBdXjzKZ+vdTp1P1R9f
-GPRBnljLII0XziCE2cv8og/X6k0CltKWbCFxp5EUdZp4pI5kfqJklWfwJeGc
-+kXrTYAfSItWjbKd+u/H6gWwq3JPUMDHuvNLvbcv3+llHfR9rd4aaVACUj3u
-5zq4rdXdu0jy43yC91Vp7wwovXCLrCLR32PF71r7KPYyoKygcKfeRwTZjfvu
-kd7kQckq/+BBwjn1i9qbAE9Qim6eOnn3iWZcEk1nQ1+bfklXhVZZdzR4mOe2
-ezJCWnF8fYSHfcC64t7TD0MSkJJrbzoMn3dZrPVLouV8tLPgYLX2mKD0ogsh
-vpW889tKvfX6P8gbLx6In+HtGn7kQV3ONx+9O8XZM/Z0PfUAlFcl+zvN+bX1
-2cw0Sga0r5nSP84mLw9191166dGNtK0rot1d5/7YIJcUHlwTMyvAa97phv8s
-+ZTuOu9+4jFs/LHHut8NCFntFyZiWgzC2iBHCWfRJCZ+sdmk6k2Af0h+X+4l
-+OIP3XPdtpzZ9o5Lrz2+tXfx3Lik79KOnb/H8FpCVrHLa2iA7veg6PL8kV56
-l3aMvSgfHxM4htOphqsafwq19diQlpCUXt2lbDwT4hx1RUz95x0lG9ydYvJo
-/oIlnaXxHsPDk7/YffSeVFq6eYz/x+nJcfFnap5UfSUY++k9yrW8D9FvUTb2
-8/N0JihKVvuDmJZe5M3Xs2+2ks58dgY5TDj7JpnCJnlvAnxD2fzrxohFKSV6
-9/qlt1c5D3s9afuKndnNiN9n4qtzbIZF6mwyu+5/5mM7QVcSnLkXwyth+41l
-TtaBSxILROqlVFG9X+D9XqGUutCLaE4PtRv9ZSXuO3uK6oNjreyjP8xpUWoa
-Pd5mxOyYlLsdmj3dIu9p50g00XXpLNviZjX2gM4+DyGrWpCnRSUpOr5rsZ/7
-DL1rgadNKI13fdmdfIVFzHMfXCWcskkGYmRlE71ukLw3AV6hOdtYuvFMNcnY
-VF/LjLF2flNgM3xBThviWbwwK8zKflH+E61fdhSvcbGboXNtx8RL36ss//L8
-n55/gfpVll2Ve0YPGRr5c5NmS6m5aHSLOKv5mbJ4THwlarjrOoSXYjJ6qSbR
-en760Fcn/FMjfk4IL0RZv+QW33NfXP7gq+BxCRUyw366Kr/wtfJO1PlT5lnV
-MUaelm7NfnyS0ySK7xZC1lwrIp28yHnug5uEs4+RFvZh6hki602AP6jEBXs+
-2JFFXqSravxxoo3bh3kX3hppG3mmUamR9GZ8sCy6NN3aZvZV7ekpK9/hZRuW
-qbV7YeSl91WWlfnJfvbjfyimepUl0ZI51dp+YW7PgqpqSp/jMz+zpb8xveIx
-YdZkO29GS5N2S+hfqtl+452Rw6b81DOB2m+86/jq2NSH8qdZecN3waXmDqXB
-7xXZvW2eVn5fPdC+CcI4q9ptpkmLKJfFKoGe5z64STgHMRqw2QPjWkTy3gT4
-grzm0LywTwolCg3ytvs5DVoDVJIX6zAi5qpYWrTe9dXRCXdFfxzektlAd/3a
-VXNi94mant1lx531LlZB/6rT+nOiNStyhPf2e/3doHgxdHUsLYx7zWZqRrN6
-5KqEuesEM7+u7O9Kv3is6/5uX4dZFzBX78gqdnnbhv5QrwlCMweGBu5/el2k
-dicI3rl/y5GHBq8OJXnz7awjLgq1f8s4q1rQpYXVKoGc52f/xEnCDTSJ7UrI
-PkxdyHsT4AnSotXOLzxT3fqzzRtaR7qddz8N9J57rlnVrWrNXh3i5Bm58nAV
-/Xe59PbaaWuefkUSrb9Mt3FYel37Qk5TWuU4/ki/mYzkRdWau/atzXeo6q/l
-D1P9h7zoELFi89ZNq5a8n3Ktrd+KQVY8pqo/MdFp8sl6vPf0lPUnp/nOPNpT
-P6aoPTzJc0pq78onu/95sFvUtnyRwa21rCLBy0r/PI1pVrWgTQubVQI5z31w
-k3BDTWK5ErIPUxeK3gQGBcq6o+Nt9K6DVC2Z81wnHNKvrsUAIbww09ZhMdmx
-DXmhl3qLGe6x4HwLlloyrKgaT08Y5rqxRO84jEVWadLSzWqVQM7zs9ZzlXDs
-MdLbRKxFpOxNYFCgnrRhwwP16kk7y5NCxm0rNVxHgkxH8VoXu2lk91DJC706
-y3YIwj7n4yk2Ibw4x8FjUynJ1EHPKnVaVJKSjNSVzq+MikvNKJEwXp5Q8/ys
-kZwlHHuMtDYRayBpehMYFKhaf1ngIui9V/AMQlq6b+WO69gfDFPUpAWNCEmr
-YbjdJMQF21emlJn8iX8GEMKsuaOCU8jP11GzipgWw7A1yGHCsceI0yZtbwKD
-A1l5UnDA1jIO9n9kEAoFnx+7ZYyy/mTkmHdyKeuWELOKPS08zDMXTcJk01Bv
-AoMCQpSf8OHhR3BSjIBKeHnbplN1NFsIyKrlYLg3AQAAAAAAAAAAAAAAAAAA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMAiQdY35DcDLBwA
-AEwDsr4hEwhhVlTg34ukvT+tLjLZ61MHWDjmdG1xQK4ADDDWN2RCR2l84LQe
-UdnOsi1BEWebTP5Wy4ESjvkzaTlArgCjQdA3ZICq4VR44CaNBgfRnB4RtMVU
-77juY8CEw8y1ouHc7pTbEr5MfEJ8c2/i2XpTv8sUcgUYCZK+IRPaby73i/y1
-VT3a2m/FBczKwi+GS8dACoeJa0X98YVBH+Rhl5FhDyHMXuYXfZgTvUNqIFeA
-MSDqGzJBUb1/nMvCPIl63J2JcR6TaEqxuYEVDhPXkvw4n+B9VfzaVcgqEv09
-Vvxuyq0X5Aroj7zx4oH4Gd6u4Uce1OV889G7U5w9Y0/XU3/hMNE3RLUpvrpw
-lPuEkPDps2OXR49ZcJlGl5YQ30re+W0l5eWmhYVjCPyuiZbz0c6Cg9U6NlAd
-YW+5vCrZ32lOzw7NRB4Hc64AMlSNP4XaemxIS0hKr+5SNp4JcY66Ijalza77
-SYLQA7rjjRzl42MCx3A6DW+LCsf0rkWX54/02npX/6uEXd7kzdezb7aSOkQ0
-2FGywd0pJs+YroJcAcbQfmOZk3XgksQCkarnkkHg/V6htFslKTq+a7Gf+4xL
-bLY05DbJi/eI1l9mBsQVMrtra3glRHFtXDjkKUIKx+Suu+5/5mM7gUzMnNUw
-6CyNd33ZnWyxQO4Iojk91G70l5VG6PVhHnUDOleAHl2Ve0YPGRrZU0zQcz3g
-FnG26elxWVvOJKdJdKsOqk0jivck+bGOL/1VzV+e/9PzL2h++JvH+jv6KxoH
-rrlIUV84faCFw9Z1R/EaF7sZl/V3EywdEbLmWhHpNge5I8RXooa7riPJgbG5
-Ytv1lpgrgDVES+ZUa/uFT3WpVU3pc3zmZ7b03jcQ5bKb5nQ2e2BRvEfImqof
-PnhQmZ/sZz/+h+IHDx48rG2V631dc+KaixQ9DacfyOGwci0r3+FlG5apt8/B
-7gi9I4RZk+28E0juW2DIFblHA1hirgDWSAvjXrOZmtFMaCSqc9cJZn5d2Zdf
-ttOczma3ccV7hq6OuXDNRYrM5ZpozYoc4b39nu4cwu4IuSO67u/2dZh1gX3F
-EfauH8C5AvSQP0z1H/KiQ8SKzVs3rVryfsq1NuWzf2Q5zWltGlm8p2rNXfvW
-5jvtJnTNRYrM51pZf3yi4/gjdUqt32J3hNwRqvoTE50mn6xX6pniyqNhBmyu
-AD0I4YWZtg6LKc5O2M01GpscFO9x7pqLFJnTtaolc57rhENalbnYHSF3hHqv
-H+6x4HwL6yHByagboLkC9OkoXutiN43s9phKUpKRutL5lVFxqRklEpSkU9tk
-UrxnFFy45iJF5nXdWZ4UMm5bab97mNgdoXZEZ9kOQdjnxpx7cTTqBmSuAD0U
-NWlBI0LSanA+ucOFTTO6HmDh9EBIS/et3HG97xEy7I4QDRLigu0rU8qMKTyC
-XAFGQSgU2E9dubBpRtcDLBzTODJ90iBXAAAAAAAAAAAAAAAAAAAAgHE8BwCA
-xVJcXGzuJWSAIAQAwGJRKuFJEwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-AAAAAMvHKOXNwcFgS5G54uXC72DrO4A1xihvDhKYpEjecOFUTpMZXiXLAeYa
-Elz4JbGpktz58efydngfIUAKC+XNwQZ1ilTNGTFj3/5NNLBml7mGBBd++9uU
-VSS9HpZcBZLtgxBlW8H3W6J9HH1XFZIr0hmSX1Q0nNudclvSN9MNGrRICPHN
-vYln6+Wk/0iTos6yT/x9NxbrXnvpJo13sI2XU7jwq2NTUXtooueb2SDQOfBQ
-SYr+seqNRes+/Xh1bOz234QkD4Q/KVjiYDszi6z3DcovKuqPLwz6IE+s9Vka
-gxYLIcxe5hd9uFZvFtKliBBdXjzKZ+vdTp2PkCWNZ7CKl0u48EtiUyMd6jTx
-SN3AOM0A+pAWrRplO/Xfj9ULYFflnqCAj3VnpfqKoHynl3XQ97V6ayQD+UVJ
-fpxP8L4q7a0DpUHLRlaR6O+x4netjRx9itSryVwHt7W6O0LSpPEP9Hi5gwu/
-FDbVu8Igu3HfPYKlcGChFN08dfLuE81oJprOhr42/ZKu2Kuy7mjwMM9t92SE
-tOL4+ggP+4B1xb1nJobkF4mW89HOgoPVCmYGUZE3XjwQP8PbNfzIg7qcbz56
-d4qzZ+zpeuYjlBDfSt75baXe0s/Wvrwq2d9pzq+tz5YGAymSXHvTYfi8y2Lt
-VpEmjX2rDMLaIHK8nDWJiV9sNjvvfuIxbPyxxwPsixzoQ/L7ci/BF3/onga3
-5cy2d1x67fGtvYvnxiV9l3bs/D2mVyCiy/NHeuld+xlhUBdV40+hth4b0hKS
-0qu7lI1nQpyjrogNf6wX5eNjAsdwOp1vRPsdJRvcnWLymLZAVrHLa2iA7u6C
-PGlGtKoXefP17JutpDOfbRoR40XBuJ7l1qbotygb+/l5UCsxIFE2/7oxYlFK
-iV6FgPT2KudhrydtX7EzuxnxW7Dr/mc+thN0NbGNMKhH+41lTtaBSxILROql
-VFG9X+D9XqFUc/R5fNdiP/cZevtbbQyvhOT2KSvNiOb0ULvRX1YyvLUovjrH
-ZlikTiPJk8agVQai7iyNd33ZnXyFRQyTbbwoGNezKDbR6wY7y7a4WY09QLlr
-BywWzYnI0o1nqklGtPoKaIy185sCm+ELctoQT/A7ite42M3QufhjYlCSH+v4
-0l/78zeP9Xf0x2hX5Z7RQ4ZG/tyk2VJqrirdIs42Pd1etuVMcppEtcj12f/L
-8396/gV0+5TVa+IrUcNd15FYIkWYFWZlvyj/idYvSZOGI2pC1lwrIp28yGH2
-gRZvN/c9Swf7MPUMfeFr5Z1YIUNvA8BjVOKCPR/syCIv7VU1/jjRxu3DvAtv
-jbSNPNOo1AhdM76SlZXv8LINy9Ta3jAySMiaqh8+6M/D2la53rJJtGROtbZf
-mNuzoKqa0uf4zM9s6TUmyqWZL732K/OT/ezH/1DMxn4PetVrwqzJdt4JTKeI
-6NJ0a5vZV7UXPbKk4YmajcEeqIv00OLt5r5n6VyzD1MH2b1tnlZ+Xz3g+y0t
-AAV5zaF5YZ8UShQa5G33cxq0hrUkL9ZhRMxVsbRoveuroxPuiv44vCWzge6i
-tqvmxO4TNT27S6I1K3KE9/Z7/S2iG6RGWhj3ms3UjGb10FYJc9cJZn5d2eeK
-yXwxdHVMZ7+brHqt6/5uX4dZF5hWB3XcWe9iFfSvOq3oyZLGuFWsVgnkMJ/9
-E1q8eJrEdiVkH6Yukrz5dtYRF4XITQD4i7RotfMLz5S2/mzzhtZBcOfdTwO9
-555rVnWrWrNXhzh5Rq48XEW/A5DeXjttTe8Xq6b2ynH8kX5TnYVBSuQPU/2H
-vOgQsWLz1k2rlryfcq2t35LCZL6oWnPXvrX5DlV9N619suo1Vf2JiU6TT9Yz
-XdeJ1l+m2zgsva59eayfNOatYrNKIIfZB2q8eJrEciVkH6YusooELytuTkeB
-gYqqJXOe64RD+uW3GCCEF2baOiymONdhu3NgZJ+80ky9xQz3WHC+hfl9cGXd
-0fE2eleXtEnDHjVymM9ajxyv8U3qZtuz7MPU+/PG0xOGuW4sgVcyACh0lieF
-jNtWSlMTwpaO4rUudtPIbrKqJCUZqSudXxkVl5pRImE7Uantk1eadZbtEIR9
-jnaMrl4Kw4YH6lXp0iQNe9SoYT5rJIt4jW0S+55lHaYuhPDiHAePTaWwEAJo
-ENLSfSt3XMf+5JiiJi1oREhaDVelDIj2CXHB9pUpZagV4qrWXxa4CFIf6hy+
-UyYNe9RsDbKMl8smmcQmIcyaOyo4Be6WALyBUCg4fS6Xa/u9yMqTggO2ljHd
-NGNvlYnCRIGLJmGyqaw/GTnmnVzUejIAAAxBiPITPjz8CM7fLQCV8PK2Tafq
-YEMIAAAAmID/DzJj7ns=
- "], {{0, 247}, {430, 0}}, {0, 255},
+1:eJztnXlUVEfa8JPv+yczx5PJMs5wRlxABBTFAMkIOqJEjcaNiMwbNcI5OCS+
+bkRJYkyMyeho0GDQGB2jcY0f7o5hmEFF44oG1CgiCIKAoGxCy94b3be/Bo20
+fW/dvlV96y7N8zvnfY8ToJ77PFV1u7pvdf08Zr0f8d7/eeaZZz54zvr/ImI+
+DouPj/lk6gvW//HXuA/mzI57N/bNuA/fnf1ufPCs/2v9j2XW/zv47DPPtP/b
+AgAAAAA2mBuyvn5v4rD+Hq/M2JTXysh9OQAAANKgK/1/O35pNFsMpd+H9p1w
+up5OFLOsd1V5owMAoEwYk9bUcXNovR43LPZys2gNt5XvmjrrQoPF0nI9LjT6
+UqNoDasgOgAAKqL15lfvbi3Wi9YeU3ds6vh9lSaL/vbK4NGHqs2itaz86AAA
+qAamOXfvtvN1JhGbbLk6942E23qLqWLPyOCEQvFuq2JGN1Sc3vOvWy1KeWNs
+brx+eO/F2ja5rwMAugqMruzEkXM1RuvsaykrahLnFmhdc4WMSatjDMVbwgZE
+ZTVJu/gSFL2tOmVh9PciLnfFQJu3fuYnpzRivg4BAMCN8f7eKB9PHz8rAwYO
+/yxXK0qrpsp9Yb4jXp+5cHniuvCg8LUppVoJF1hCopvrjs0MnpfVJN1VCYN5
+eHrmkDkXG5WyHgUA1WGqz9z1UWTY6CVJK+ZN8Hvp5UGzjlQ59Y4Kq0Gm7njk
+qE2lRmcCkl+AkOjWG+QI3+k/c9385C2d9fZ3coLvxBMauP0BACGM5sS4P3kt
+PFVrsphr/zOp+wtD9leZLUzr3evlZMswrgbbuPcKtt9+QhbfFGcZyXsBXBkJ
+it6cNc0rcEMJ5x2SoHS6ksPfbM1AvWHFKF17W/nL/P3ic0SuHgB0HRouvO0x
+YNktXfu/W67N9nCfcramMmv7FK8h28qJVjLsBs9VO7lXsK3y0KyxI+wYP/9i
+A+c9RtSM6s+G9XxtTwXn7Qo/UFtF8tievnOutXAHwyudoTgpwGtGlnh7jwCg
+a9F8eVZfn4WPFhC6/L8P8o7NsN5TrBMr5C9kdz+uBs209goKvQDyjJouRXgG
+/fMu19pP7tLpC1b495+f3UoQCQAAS2t2nLdnTMekaqvYP2P4guMd21nIpzCi
+wcc/FHmvIMYFkGZkKP46yG8B1y1G9tI1ZU73Gba3Eh77AgAJultLB7j9+Z34
+Ves3JC7/dMOZB48nLfEURjVoobJXEOMCiDPSF64KHvZdGWvxJ3vp9LdXBY8i
+/HQCALo8hqLV/n0iztSzPj4jXimhGqSyVxDnAsiXZOb68x9PWWO/w0fu0jFN
+l5dG/ONaMzzxBQASjKUbA3uNTatjzyDCKYxqkM5eQYwLcObuZ0Vfnrp+65lq
+m/WfzKXTl6dt/Ca9StSdQgDQVWB09y7s+JtHN7fwLRcq9U/POaMmOzmyj/fc
+lPxG4Ys0vgYlQfSMnm7dUKcxMHQCYZfOrKupN8CqDwAAAAAAAAAAAAAAgIjR
+AAAogJKSErlvBgAAAAoC7/uPAAAAAAAAAAAAAAAAYuPyGlxZEnT5qvIjV/o0
+4nbxrnRpcDS4+vL0I7lNKut/aTy/AoIyTblH0sv5D5BRZYXZyFJzSnFJuxJQ
+AYI1uExz9rr4A/dV99VNap5f/KDG+wfj12Ujv/iv1gqzkaXmlOISdSWgLhwd
+bWcs2xm9MkfFJ1VKcXafw6CtOSujd7JPo+pA9RVmI0vNKcXF6UqAOoy2aE/c
+697du73o8Zd5uwuRkgtGV37+4MbPF312VoPSMTo+2k5XkDB5eZ7O7r9yaWQF
+hKMFWiMrzdl9AoLq8pZPSiiwr2PHTwRXWFEorOaU4uJ1JUAd7a2k9zdl1hiM
+mqubJrv9bvBXRQbUr5qrD4e4DVp7h/sXhBxtpy9aE/qW3ecoSI0sfzi6cGlk
+pTq77ylQQetPh4dydRVWhZWFYmpOKS5uVwLUMVafOVX1uPKt2fM9e0zKaET9
+bruMxu+LfM6XKUFH25kf/Dgq4P0btu/KeDSyfOE4MNWkzl5wWSwfLUsjK9nZ
+fbagg7beiAsYk1prv5jDq7DCUEbNKcXF7kpAWpqvxPQP4Tjc/NcfZ8X09YnP
+0Zo0Py0ZN23Z7pPXKjDPt9PlfeIfmFBoswjh0cjihjPd/2HMRAfP5zBMsjQ1
+soy25PjqGSND3/v+h81fxAzt4TvjUEbqjsQPIgf2CPooGyFCexp94ZeBr3zO
+emnAqnDn78hr7H0CZXWvUtK0A9GVgJQw9efnjvogA/ntQevKsJ9X7LkrKTt3
+p90h26/UlPl238BvbbXaaI0sdjghdz8cNS1Vjaw292Nf94n7yqyrbk162B97
+x6ZWt1kz2PVaz5HHOA5SZmMs/TaoXxTrcSROhW2Q2djb2Shdda+cTmc0iK4E
+pMNcfylh0fYC9CCwzlefl3oH9A/dSv6AqjFjQu+gLWU2L49IjazgcJ3fAQ/x
+ffHlwcNEc+Bia2Qxvo1uKPrKv9fE9PZFTsu1Of36dZhvrSufyX0C1ju4Uf0a
+rOy7Vz2nXLJf0mFU2BaZjb1PoFlzojQdIIrTGdGVgEQw2qK9a7bf4Nseqy9Y
+4dfrzR1rh/7BezGxWrXp56meQZttpbEojSxBOCFrPxw1LUWNrPHupsCeo1Me
+mNvv8ot9PaMz24e+dSp5Dlp5W9jDCWPpxiCv6az7hPAK2yK3sfcJdNW9iknz
+aRBdCUiC4d6/12293NCxr8TckPvjsUr28yfrEBncc9x/a+p+mu7u9uahKoyH
+YKb6K4ePXm9o/wttzqKBryYV2zSP0MiShBNw98NS09LTyLbd2znEffj+9qys
+031gn4iz7Yaz5qwYr/5L8gS+67OuHoP8F7M+jxdcYVtkN/Y+gaq6VzlpPg2i
+KwH6mGrT5vj85tlnHvPsb/0T7beYmFuLz26L9Xi+z+yj+ZrC5LG/f84tPOnk
+faFPPBoyonx8os63vxcxVSaHBi29Zfv5LlsjSxrO8d0PS01LSyNrfHD1QJz3
+8+4zDuQ/LL+47R33br1jj96pu53+9RvdXwhIuvhQWETtzQ8DRhyost8KKajC
+dshu7O28VJrqXuWkaQeiKwFXQ5u7ZHhU5lOfcHBrZGmAo6ZVvEa2MSNy6BKO
+quFXWG5jb+ePqdZcMWmyQHUl4Gq0/LJofGKh3fsBtkaWBhhqWuVrZA1FSRPi
+f+F65IBbYaXIjinXXClpskF3JeBqaPO+jEgsYH0cYqORpQGemlb5GllD8eZp
+qxEfEWJUWH5j7xNo1lxBabLh60rA1TDVnlgcf7IWPuUgx6w599mn6bWo2QoV
+Vg8OuhJwOcwNV3bsylb/6XMywTTfTN59tYHv5gYVVgcCuhIAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAxMWMe8q3wtpXWlzJcNWOkzc0oCb0
+5elHcp34wpRO0Cnf5FGEtS8+XHGZptwj6eUUrZFmCSeqq3YcIjT1vrNI232A
+0zDN2eviD9x35sghxvEp305FEdA+FbjjGu8fjF+XLebxdG3lu6bOutBgsbRc
+jwuNvoRUjYqOq3YcMrT4fWeRsfsAZzGW7YxemSOOYQF9yrc4UYSfIi4u9nFb
+c1ZG7ySXPtnD1B2bOn5fpcmiv70yePShaum/De+qHccRWuS+syih+wBCdAUJ
+k5fnieEY5TvlW4woWKeIiwhXXF3e8kkJBWKZWVuuzn0j4bbeYqrYMzI4wf7E
+Uuq4aschQovbdxbZuw8gRl+0JvQtET6P4T/l2/kouKeIiwUqbv3p8NCvithW
+KBKsS4aQMWl1jKF4S9iAqKwmSdcOrtpxPKHF7DuLzN0HOIH5wY+jAt6/4ewb
+GwenfDsdBeMUcVNN6uwFl0VypqLjtt6ICxiTWivG50emyn1hviNen7lweeK6
+8KDwtSmlvMZtiRLsQLUdxxtaxL6zyNt9gFPo8j7xD+RerJvqM3d9FBk2eknS
+inkT/F56edCsI1WEEi5UFEZbcnz1jJGh733/w+YvYob28J1xKCN1R+IHkQN7
+BH2UTWZAEGL7FSE1feGXga98no98/yQ8BFN3PHLUplLBH0RJlGAHLthxFjH7
+zkKn+wBpaMp8u2/gt9x9x2hOjPuT18JTtSaLufY/k7q/MGR/VRvRHip0FG3u
+x77uE/eVWd+GaNLD/tg7NrW6zTpAdr3Wc+QxDjGNAASNLq7UzBam9e71ct4X
+7k6Mpd8G9YvieYgpNET77AlZfFO470GiBDtQRcdhj0mivkNEodN9gCQ0Zkzo
+HbSljPOVreHC2x4Dlj1SxrZcm+3hPuVcNdn2LWQUQ9FX/r0mpmuY9ghz+vWb
+c826bmAenpzcJ2B9CdZjubbKQ7PGjmgnxPfFlwcP6/jn+PkXGzhnAzu1szWV
+WduneA0R6vxqK/vuVc8pl9DvYJwPYRdQ4gQ7UEHHEYxJgr4jHfmEaQKS0PTz
+VM+gzXe5xmvz5Vl9fRbmdLyq6fL/Psg7NqPBTLZ9CxXFeHdTYM/RKQ/M7WuJ
+xb6e0R1+WuvY8xy08jbhozMhr61cqTF4xkNj6cYgr+lZyAqIEAKBRAl2oIaO
+wx+TJH1HOPLZwNpPOWhzFg18NamY4/lXa3act2dMRze3VeyfMXzBcZt9A5jb
+txBR2u7tHOI+fH+VtV19wYqBfSLOthujm7NivPovIVb/CRhdiNSwbg7WxU+Q
+/2Lkp/hihEAgUYIdqKPjHv9Q8Jgk6zvcKAjg7qccTJXJoUFLb7E/ANbdWjrA
+7c/vxK9avyFx+acbzjzonDP427e4ohgfXD0Q5/28+4wD+Q/LL257x71b79ij
+d+pup3/9RvcXApIuPiS8RTgeXajUsG4O2psfBow4UIXY3SBKCAQSJfgolio6
+zoI5Jsn6DjcKArj7KQht7pLhUZmsj0AMRav9+0ScqWd9KkG2fQsRRRaQqWHd
+HBozIocuQS0fxAlBipjRVdFxuGOSrO9k3LgI0KLll0XjE+33NBhLNwb2GpvG
+eniHsX1LQBRZQKWGd3MwFCVNiP8FsbVDnBCkiBtd+R2HPSaJ+o545AOKRpv3
+ZURiQef4ZnT3Luz4m0c3t/AtFyr1Yj2Sso8iC3ypGTXZyZF9vOem5Dc6flk3
+FG+etprzEy7RQhBBIbriOw4Xsr4DXBRT7YnF8SdrKX9BR5ookmDWnPvs0/Ta
+LvLex4U6ztLV+g4QgLnhyo5d2U6c76egKNRhmm8m777a4CJ3AyG4SMdZumLf
+AQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgC2DyBagCxmGALuoTwpLaYJ01IxPw
+q0BWClmtUlHfAEOEdilbtKgIrIzx7vboFQr6IqIqhbBENlgRzMjCQAhkqchq
+lY8qBxgytAvZokVGSGWMd7eFL0Af3Sg56hbC4thgxTQj84IWyIovq1U+6h5g
+HKFdzhYtGg4r01a++605Crq/q1kIi2eDFc+M7AgegSy/rNZQcXrPv261KGVx
+aG68fnjvxVrnjrxR8wBDhJbFFq2KseGgMqb7eyPebV/lKgT1CmFxbbBimZEd
+wyuQRctq26pTFkZ/L8/yBok2b/3MT05pyHtVvQOMJ7TktmjVjA3eypgqD06N
+4TiaUS5UK4TFtsGKZEYWAL9AFiWrNdcdmxk8L0sZB5XawDw8PXPInIuNhENW
+tQOMN7TEtmgVjQ2+ypirj/41+pRGMTc/VxTCImywPGZkh4gpkEVcnnUSjPCd
+/jPXABdR3EzSIPPw5ATfiScIB60LDjCL1LZoNY0NnsqYH6ROe+c4mU6VDqoQ
+wopi8uUzIztERIEs4vKas6Z5BW7glk0S1ERXcvibrRmoN6x41l1d/jJ/v/gc
+sk0Kqhhg0hiHiW3Rahob6MowtcfemZ76QEnPdFQghBXJ5MuZaee12cBxbSIK
+ZBGXV382rOdreyo4hyR+Tdoqksf29O3oM2EN8qVjKE4K8JrBsUtBSPVUMMCk
+MQ47YYtW09hAVobRnIz+n6PKeqCtBiGsOCZfHjOyQ8QUyKIu71KEZ9A/BYub
+nVIPY6ajL1jh339+NtlHd2oYYNIYh8m7TE1jA1UZ5uHpmMhDVco6s1sdQlgx
+TL5oM7JDRBXIIi7PUPx1kN8CrluM6Oph3HSaMqf7DNtbSTZw1THAHv+QsnGY
+tMvUNDZQlWk4Hxuxl3v5Kh/qEMKKYfJFmpEdIq5AFiWr1ReuCh72HXunqOjq
+Ydx09LdXBY8i9typY4BZJDEOE3eZisYGojKNl/53yg/36JpiCVCFEFYUky9p
+piILZJGyWnP9+Y+nrLH/iejqYcx0mKbLSyP+cY38i12qGGDSGIfJl2TqGRvc
+lWnKmh++XYlfcVK+EFYsky9ZpiILZHlltfry1PVbz1TbjBLR1cN46ejL0zZ+
+k17l1LBV/gCTxjjspC1aHWODuzItVxdN3ky43YIyihfCimTyJchUfIEs3+U9
+Cmmo0xgYh9GJ5L/Y6Zh1NfUGp9NW/ADDRS5btPLHBndlWq9/NOlbok/cJcCF
+hLAObLByZ9pFZbVyl11cumgnCgBRmdacTyd9rYjFPzcuIoQVYIOVM9MuLKt1
+kQFm6dKd6ABUZXT5CX9NJN3EBAAAAAAAAAAAAAAAAAAAAAAAAAAAAADiIIvh
+1OW1qq6XoOtlxIMrKa1V2XFkvlTsv5JFriqLVlVKZFTWUkJYRjK4lWmgJKU1
+jTbZc01Rs4/Ml0ryV7LIVaXSqsqGjMpaSgjISDK3MnWUpbSm0SZ7riln9pH5
+Up2yrMoiV6WsVZUfGZW1lEBnJJlbWTqUorSm0SZ7rilk9nH5Uhlt0Z641727
+d3vR4y/zdhdynPCPsqwyuvLzBzd+vuizsxrUt3lkkauSalW5LKgCcqQF2pAr
+rKoKS8dCmhH38FOYspaNs90nPjTiCptr4kqNCeHypWpvJb2/KbPGYNRc3TTZ
+7XeD2YJNHsuqufpwiNugtXe4z2SQRa5KqlVFWlD5c6QLlwVVWFUVmY6FJCOu
+4adIZS0b8u4THxpxhc81MaXGhHD5Uo3VZ05VPb6q1uz5nj0mZTQ6/qtfadea
++H3BbesjPNTOOUi1qjwWVL4cqcOyoAqrqlLTseBnxDH8lKqsZUPYfeJDIy7O
+XBNRakyKI01t85WY/iGsQ7F5/qo5K6avT3yO1qT5acm4act2n7xWIcrJdixE
+MLryalV5LKg0csQQoRIZcpWbjgU7I/bw48mO8JIEQNigc4JjWldFu0H2XHMk
+NZYAfk0tU39+7qgPMlhuP/RfWdeK/bxiz11J2bk77Q7l/T5OG115tapoCyqd
+HDHMqiSGXCWkI5bzlz38+JS1vJckobu2s1FnBMeOcV5pLaBBERTGDqXG9EH6
+Ui3tNoBLCYu2F3CUDPlX1huSz0u9A/qHbiV8nCPUkGsRw+jKq1VFWlAF54iR
+iwXLrIo05PIgfzpEzl9O2MOPT1nLc0mSumufgN191AaSMCgpjNGzDy9fJ0Bq
+ahlt0d41229wbyZF/ZW+YIVfrzd3rB36B+/FhAJXwYhgdOXVqqIsqJRyxDGr
+khhyFZCOaM5f9vDjUdbyXpKU7tonOCU4JroqWdJ8GvZccyQ1lgCEL9Vw79/r
+tl5+dNCquSH3x2OVBiF/VZw0uOe4/9bU/TTd3e1Nuu5hMYyubHmoqf7K4aPX
+Gx5JTTktqJRyxDKrCjbkKi2dxz901vnLHn5oZa2jS5LOXfsEpwTHhFclQ5pP
+w55rDqTGUsDlSzXVps3x+c2zzzzm2d/6J9pthuD4K3Nr8dltsR7P95l9NF9T
+mDz298+5hSedvE/niYdIRle2PLQhI8rHJ+p8xxKbbUGllyOWWVW4IVdp6VjE
+cf5yDD+UstbhJUnmru28VKcEx4RXJX2adrDnGr/UWBrIfKlKsqySw6tVRVlQ
+aYBjViU25CogHbGcvxzDz0F2crtrO3/srOCY7KqkTpMFe645mH3SQOZLVY5l
+lRxereoj2BZUGmCYVZ0z5MqbjojOX87hx5OdzO5am0t0XnBMcFVSp8mGPdcE
+zD4pIPOlKsKy6hQO3biPsLGg0gDPrOq8IVfGdDghzAgx/Liyk99d+wRxBMf4
+VyVxmmzYc03g7KMPmS9V5ZZV0KqqG5UPvy4Fe64pavaR+VJVbFkFrar6UfHw
+61Kw5xrMPgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQCTPu
+eeYAAKgDM8xnXnTY55ljA10AAFLRVr5r6qwLDRZLy/W40OhLjY7/ogvDYJ9n
+LgToAgCQA6bu2NTx+ypNFv3tlcGjD1XDF6+FIPw8cwFAFwCALLRcnftGwm29
+xVSxZ2QwWmtsqDi951+3WpTyrszceP3w3ou1dM5GdwTWeeYCENgFAACIinW5
+ETImrY4xFG8JGxCV1cS57mirTlkY/b1YSx2R0Oatn/nJKZRolhq455k7RlAX
+AAAgMqbKfWG+I16fuXB54rrwoPC1KaVsd7G57tjM4HlZilOYMA9Pzxwy52Kj
+lOtR7PPMHSOkCwAAEICpPnPXR5Fho5ckrZg3we+llwfNOlKFfIPI1B2PHLWp
+lFeyYJ2dI3yn/8x188OKJfrFt3vbJ/hOPKFx8mYhehZYbQrpAgAABMFoToz7
+k9fCU7Umi7n2P5O6vzBkf1Ub9y619pkXsvgm/wKmOWuaV+CGEs7pyRXLbGFa
+714vRy1gdCWHv9magXrDinHx7W3lL/P3i89xdgGGF5S8Ta7KCOoCAAAE0XDh
+bY8Byx6pXluuzfZwn3Ku2pldavVnw3q+tqeC83bFjnW2pjJr+xSvISh5VltF
+8tievnOuIUxWeBdvKE4K8JqRxd530lZ5aNbYEXaMn3+xgfM2JnbFuNt0VBkA
+AJyk+fKsvj4LH62HdPl/H+Qdm9FgdmaXWtOlCM+gf97lWvtxxWLItdHYF68v
+WOHff352K0Ek8qDEbTpVGQAAHNGaHeftGdMxXdsq9s8YvuC4zc4Mol1qhuKv
+g/wWcN1iELHI5zjuxTdlTvcZtrfSueeu4leMQmUAAHCE7tbSAW5/fid+1foN
+ics/3XDmQedMI96lpi9cFTzsuzLW4g8Vi3iO4168/vaq4FHO3kxoVEz0ygAA
+4AhD0Wr/PhFn6lkfbzm1S81cf/7jKWvsd3cgY5HOccyLZ5ouL434x7VmJyXT
+FComemUAAHCEsXRjYK+xaXX20875XWr68tT1W89U26z/ULGI5zjexevL0zZ+
+k17l7EYRGhUTvTIAAPDC6O5d2PE3j25u4VsuVOop7JdlDHUaA+MwllGTnRzZ
+x3tuSn6j8PUS9sWbdTX1BieTpFEx0SsDAAAAAAAAAAAAAAAACGA0AADKoKSk
+RO77AQAAgFLA+4oiAAAAAAAAAAAAAACAqHQFo6ssOXaFwvIgV/o04nbxrnRd
+cIyu+vL0I7lN6ut8Cay1woIyTblH0sv5j1hRa5HtkKXmlOKSdiWgdAQbXZnm
+7HXxB+6r8chyOtZaoqDG+wfj12UjjzJQcZHtkKXmlOISdSWgIhyd/GYs2xm9
+MsfJgzdlRlRrLWnQ1pyV0TvZ52t14ApFtkOWmlOKi9OVAF0YbdGeuNe9u3d7
+0eMv83YXIs1ZjK78/MGNny/67KwGJRd0fPKbriBh8vI8nd1/5bLiCghHEbQY
+V2xrrSC4gurylk9KKLAvZcdPBBdZUSis5pTi4nUlQBftraT3N2XWGIyaq5sm
+u/1u8FdFBtSvmqsPh7gNWnuH+xeEnPymL1oT+pbdhyhIKy5/OOpwiXHFt9YK
+ABW0/nR4KFdvYRVZWSim5pTi4nYlQBdj9ZlTVY/L3po937PHpIxG1O+2K2n8
+vsjnfI0SdPKb+cGPowLev2H7lozHissXjgNTTersBZdF1OuyxLgUrLWOQQdt
+vREXMCa11n4xh1dkhaGMmlOKi92VgIQ0X4npH8JxVvuvP86K6esTn6M1aX5a
+Mm7ast0nr1VgHv+my/vEPzCh0GYFwmPFxQ1nuv/DmIkOHs7JIsblbltbcnz1
+jJGh733/w+YvYob28J1xKCN1R+IHkQN7BH2UjVC7PY2+8MvAVz5nvTpgFbnz
+d+R1ED+BZs3Jr4p2g4iuBCSDqT8/d9QHGcivDlpXhv28Ys9dSdm5O+0O2Wal
+psy3+wZ+a6uoRltxscMJufvJI8blRpv7sa/7xH1l1oW3Jj3sj71jU6vbrEns
+eq3nyGMcByCzMZZ+G9QvivU4EqfINsjsIO5slGbNidLEbxDbeozoSkAizPWX
+EhZtL0CPAOtk9Xmpd0D/0K3kT6caMyb0DtpSZvPaiLTiCg7X+QXwEN8XXx48
+TExHLVKM6/hiHH4b3VD0lX+vienti5yWa3P69etw+VpXPpP7BKx3cKP6NVjZ
+d696Trlkv6TDKLItMjuIn0Cz5kRpOkAU6zGiKwEpYLRFe9dsv8G3N1ZfsMKv
+15s71g79g/diYlNs089TPYM22zpwUVZcgnBC1n6yiHE5Md7dFNhzdMoDc/uN
+frGvZ3Rm+9C3TiXPQStvC3s4YSzdGOQ1nXWfEF5kW+R2ED+BYs0RVyVLmk+D
+6EqAPoZ7/1639XJDx74Sc0Puj8cq2Q+frONjcM9x/62p+2m6u9ubh6ownoCZ
+6q8cPnq9of0vtDmLBr6aVGzTPMKKSxJOwN1PFjEuJ233dg5xH76/PTHrdB/Y
+J+Jsu+qsOSvGq/+SPIHv+qyrxyD/xazP4wUX2RbZHcRPoFdz9FXJkObTILoS
+oIypNm2Oz2+efeYxz/7WP9F+i4m5tfjstliP5/vMPpqvKUwe+/vn3MKTTt4X
++sSjISPKxyfqfPsbEVNlcmjQ0lu2H+6yrbik4Rzf/WQR43JgfHD1QJz38+4z
+DuQ/LL+47R33br1jj96pu53+9RvdXwhIuvhQWETtzQ8DRhyost8NKajIdsju
+IO68VEo1570q6dO0A9GVgEuhzV0yPCrzqY83uK24NJBFjEuRxozIoUs4Codf
+ZLkdxJ0/plpzxaTJAtWVgEvR8sui8YmFdm8G2FZcGsgixqWIoShpQvwvXI8c
+cIsss4PY5hKp1lwpabJBdyXgUmjzvoxILGB9FmJjxaWBLGJcuhiKN09bjfiI
+EKPI8juIn0Cz5gpKkw1fVwIuhan2xOL4k7XwEYdTmDXnPvs0vRY1W6HI6sFB
+VwKuhbnhyo5d2eo/ek4+mOabybuvNvDd3KDI6kBAVwIAAAAAAAAAAAAAAAAA
+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHRlzLi+KjXgkkkBACAq
+OmxfFQlmaW9AEiQlcUaKiq5GoGIAGwbbVyWQtvJdU2ddaLBYWq7HhUZfahSt
+YQHQSUrOjOSOrkagYoBAhPuqhMHUHZs6fl+lyaK/vTJ49KFqWQ48EzUpeTNS
+RD1VBVQMEASWr0oYLVfnvpFwW28xVewZGZxgL6WQArGTkjcjgdENFaf3/OtW
+i1Le5pkbrx/ee7GWjtHNAVAxwDG4vipBWF9vQ8ak1TGG4i1hA6KymqR+4RU/
+KXkzEhS9rTplYfT3Ii7gxUCbt37mJ6c0kh/0DhUDHILtqxKEqXJfmO+I12cu
+XJ64LjwofG1KqZbvxdVUkzp7weUmnt/Ag0JSmBmJjJDo5rpjM4PnZYlXRZFg
+Hp6eOWTOxUZpV1dQsS6MqT5z10eRYaOXJK2YN8HvpZcHzTpS5dRqGqtBpu54
+5KhNpYJVho7F5RQywmoTNyPpo1un+wjf6T9zTWV5B4N1Mp+c4DvxhMbJySz6
+CHT5inVdGM2JcX/yWniq1mQx1/5nUvcXhuyvMluY1rvXy8kWLVwNtnFvq2sf
+eiGLbwpfcQm5++FcgFNJcVUJOyPpozdnTfMK3FDCOd8JBoOu5PA3WzNQb7/w
++kKXv8zfLz7H2eqJPQJdv2JdloYLb3sMWHZL1/7vlmuzPdynnK2pzNo+xWsI
+geOeu8Fz1U5uq2urPDRr7Ih2QnxffHnwsI5/jp9/sYFzfFG4ANGr1JmRDRgZ
+ORG9/mxYz9f2VHBOPvxAbRXJY3v6zrmGMHLj9YWhOCnAa0YWe+ORs+VybgCo
+sWKAEJovz+rrs/DRi4cu/++DvGMzrEOK0HGPatAs1rY6IWs/GhcgepVkjN50
+KcIz6J93uVYycg8GfcEK//7zs1sJIpEHdYzLV6yr0pod5+0Z01HQtor9M4Yv
+ON6x84O8+xANPv6hs9vqBNz9aFyA6FWSM7qh+OsgvwVcE0b2wdCUOd1n2N5K
+5x5iij8AXL1iXRXdraUD3P78Tvyq9RsSl3+64cyDxx1G3H2oBi3ibKtzfPej
+cQGiV0ne6PrCVcHDvitjLWVkHwz626uCRzlbTxoDwLUr1lUxFK327xNxpp71
+6QnxugLVIJW9ghJdgOhVwoJCdHP9+Y+nrLHf3iP3YGCaLi+N+Me1ZueeX9IZ
+ga5csa6KsXRjYK+xaXXs6hF2H6pBOnsFJboA0auEBaXo+vLU9VvPVNusZmQe
+DPrytI3fpFc5u1OI3gh01Yp1SRjdvQs7/ubRzS18y4VK/dP1NmqykyP7eM9N
+yW8U/hLJ16Ak0LgA0aukoOiMoU5jYOgEwu4Ls66m3uBkn1EfgS5XMQAAAAAA
+AAAAAAAAXJfRAAC4BCUlJXLfTgAAAAAAAAAAAAAAAAAAALo6oNPFpUtVTK5k
+acTtUh0HCEAaR7ArIaxi+vL0I7lNqp9hcg0PGnG52mSaco+klyvLFQJIBjVH
+sMsioGJMc/a6+AP3XeD7n3INDxpxuds03j8Yvy4bjino0ojtCHZ90BUzlu2M
+XpnjUsddyjU8aMS1b7M1Z2X0TvbZWYCSYbRFe+Je9+7e7UWPv8zbXYg0gDC6
+8vMHN36+6LOzGpTZUdipa1w2VQGNqxi0sJWvYrqChMnL83R2/1VhLlo2ZMnS
+hEZcrjZ1ecsnJRTYdxigYLS3kt7flFljMGqubprs9rvBXxUZUL9qrj4c4jZo
+7R3uXxB26hrSpsrfuOrhErbyV0xftCb0LbtPqhTpomWDnyw9aMRFtVl/OjyU
+Z/4ASsNYfeZU1eP+as2e79ljUkYj6nfbLS1+X+RzvrgJO3WNx6bK17gMiK0b
+ZgtbHVTM/ODHUQHv37B936tUFy0b3GSpQSMuus3WG3EBY1JrlbsuB9A0X4np
+H8Jx6vevP86K6esTn6M1aX5aMm7ast0nr1VgHr3GY1N1vnGOcE4YWsXXDWMK
+W3V5n/gHJhTaLPN4qkd4SQIgbJCynVYpadqhL/wy8JXPFfMKDgiHqT8/d9QH
+GdxmQUvHyrCfV+y5Kyk7d6fdIdvlhLapitA4B04IjinohvGErU2Zb/cN/NbW
+zc3nouW9JAmltJ2N0rXTyqmuRmMs/TaoXxRseFAd5vpLCYu2F6CHjjb3Y5+X
+egf0D91K/lgLaVMV3DhteS5N3TCesLUxY0LvoC1lNpfJ56J1JmUxpbRPwLbT
+yqhF5m6QQBzcVvbdq55TLqngowmgE0ZbtHfN9ht8m2r1BSv8er25Y+3QP3gv
+JnaOomyqojTOxhlDKwXdMJ6wtennqZ5Bm21rxeOi5b0kWZzOdO20iknzaYyl
+G4O8poOQXE0Y7v173dbLDR07TcwNuT8eq2Q/tbIOrME9x/23pu6n6e5ubx6q
+wnh0Zqq/cvjo9YZHclROm6oTjfPhlKGVgm4YT9iqzVk08NWkYpuuQLtoHV2S
+DE5nqnZa5aT5NIair4L8F0v2SAdwFlNt2hyf3zz7zGOe/a1/ov2mE3Nr8dlt
+sR7P95l9NF9TmDz298+5hSedvC/0oURDRpSPT9T5jncwbJuqk43z4JyhVXzd
+MKaw1VSZHBq09JbtJ+goF63DS5Le6UzVTqucNO3Q3vwwYMSBKhfcsQqIAbdN
+lQa01b3Uha3a3CXDozKf+gzJQfXkltJ2/piqnVYxabJozIgcugSWfgAatk2V
+BrTVvRIIW1t+WTQ+sdDuHRdP9ZTidKZsp1VKmmwMRUkT4n9BPD0CgEfY2FSp
+NE9Z3SuVsFWb92VEYgHrAyeu6skvpX0CTTutgtJkYyjePG11Hqz8AEAMTLUn
+FsefrIXPkVSAWXPus0/TayX/EjMAuCrmhis7dmWr/3w/V4dpvpm8+2oDvE4B
+AAAAAAAAAAn/H0QOd6s=
+ "], {{0, 225}, {426, 0}}, {0, 255},
ColorFunction->RGBColor],
BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
Selectable->False],
- BaseStyle->"ImageGraphics",
+ DefaultBaseStyle->"ImageGraphics",
ImageSize->Automatic,
- ImageSizeRaw->{430, 247},
- PlotRange->{{0, 430}, {0, 247}}]], "Output",
- ImageSize->{434, 247},
+ ImageSizeRaw->{426, 225},
+ PlotRange->{{0, 426}, {0, 225}}]], "Output",
+ ImageSize->{430, 225},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"RasterizedOutput",
- CellLabel->"Out[3]=",
- CellID->105953080]
+ CellLabel->"Out[2]=",
+ CellID->947775240]
}, Open ]],
Cell[TextData[{
@@ -590,7 +607,7 @@ Cell[BoxData[
RowBox[{"TID", "[",
RowBox[{"int", ",", "k", ",",
RowBox[{"ToPaVe", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1927433685],
Cell[BoxData[
@@ -1474,10 +1491,10 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm], "2"]}]}], ")"}]}], ")"}]}]}],
TraditionalForm]], "Output",
- ImageSize->{552, 239},
+ ImageSize->{554, 227},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[4]=",
+ CellLabel->"Out[3]=",
CellID->1959355442]
}, Open ]],
@@ -1495,7 +1512,7 @@ Cell[BoxData[
RowBox[{"int", ",", "k", ",",
RowBox[{"UsePaVeBasis", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"TID",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1686437767],
Cell[BoxData[
@@ -1682,11 +1699,11 @@ Cell[BoxData[
TraditionalForm], "2"], ",",
SuperscriptBox["m", "2"], ",", "0", ",", "0"}], ")"}],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{395, 45},
+ ImageSize->{401, 45},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TID",
- CellLabel->"Out[5]=",
+ CellLabel->"Out[4]=",
CellID->2009295439]
}, Open ]],
@@ -1724,7 +1741,7 @@ Cell[BoxData[{
";"}], "\[IndentingNewLine]",
RowBox[{"TID", "[",
RowBox[{"int", ",", "k"}], "]"}]}], "Input",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->1842388488],
Cell[BoxData[
@@ -1776,10 +1793,10 @@ Cell[BoxData[
RowBox[{"0", ",", "0", ",", "0", ",",
SuperscriptBox["m", "2"], ",", "0", ",", "0"}], ")"}],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{261, 21},
+ ImageSize->{272, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[6]=",
+ CellLabel->"Out[5]=",
CellID->2014366627]
}, Open ]],
@@ -1797,7 +1814,7 @@ Cell[BoxData[
RowBox[{"TID", "[",
RowBox[{"int", ",", "k", ",",
RowBox[{"GenPaVe", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->1244684528],
Cell[BoxData[
@@ -1887,10 +1904,10 @@ Cell[BoxData[
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}],
")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{470, 53},
+ ImageSize->{464, 49},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellLabel->"Out[7]=",
+ CellLabel->"Out[6]=",
CellID->2601191]
}, Open ]]
}, Open ]],
@@ -1927,9 +1944,7 @@ Cell[TextData[{
ButtonNote->"TIDL"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TID",
- CellID->930175642]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1937,7 +1952,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"TID",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -1946,21 +1961,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 0.807643}",
+ "built" -> "{2020, 1, 5, 19, 3, 16.637628}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TID[amp, q] performs tensor decomposition of 1-loop integrals with loop \
-momentum q", "synonyms" -> {}, "title" -> "TID", "titlemodifier" -> "",
- "windowtitle" -> "TID", "type" -> "Symbol", "uri" -> "FeynCalc/ref/TID"},
- "SearchTextTranslated" -> ""},
+momentum q", "synonyms" -> {}, "tabletags" -> {}, "title" -> "TID",
+ "titlemodifier" -> "", "windowtitle" -> "TID", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TID"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1969,7 +1984,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1977,130 +1992,130 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3322, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->167494522]},
"TID"->{
- Cell[3954, 124, 124, 4, 27, "Input",
+ Cell[5236, 162, 125, 4, 70, "Input",
CellTags->"TID",
CellID->1576573941],
- Cell[4081, 130, 1355, 30, 151, "Output",
- CellTags->"TID",
- CellID->1697860323],
- Cell[5473, 165, 571, 18, 45, "Input",
+ Cell[5364, 168, 1703, 37, 187, "Output",
+ CellTags->"TID"],
+ Cell[7761, 241, 571, 18, 45, "Input",
CellTags->"TID",
CellID->1762979144],
- Cell[6047, 185, 1235, 52, 72, "Output",
+ Cell[8335, 261, 1235, 52, 66, "Output",
CellTags->"TID",
CellID->618277373],
- Cell[51735, 1492, 197, 6, 27, "Input",
+ Cell[50431, 1509, 197, 6, 70, "Input",
CellTags->"TID",
CellID->1686437767],
- Cell[51935, 1500, 5110, 189, 66, "Output",
- CellTags->"TID",
- CellID->2009295439],
- Cell[62939, 1916, 390, 15, 32, "Text",
+ Cell[50631, 1517, 5110, 189, 66, "Output",
CellTags->"TID",
- CellID->930175642]},
+ CellID->2009295439]},
+ "PrimaryExamplesSection"->{
+ Cell[7128, 212, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1140297004]},
"RasterizedOutput"->{
- Cell[7866, 266, 18416, 310, 268, "Output",
+ Cell[10154, 342, 14824, 251, 246, "Output",
CellTags->"RasterizedOutput",
- CellID->105953080]}
+ CellID->947775240]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 65161, 1979},
- {"TID", 65290, 1983},
- {"RasterizedOutput", 65911, 2005}
+ {"TID", 63789, 1994},
+ {"PrimaryExamplesSection", 64309, 2012},
+ {"RasterizedOutput", 64453, 2016}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3099, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 432, 13, 82, "Usage",
- CellID->982511436],
+Cell[3677, 100, 280, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3322, 95, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->167494522],
+Cell[3982, 115, 432, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3734, 114, 195, 6, 25, "ExampleSection",
- CellID->535579332],
+Cell[4439, 132, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->957893331],
+Cell[5180, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[3954, 124, 124, 4, 27, "Input",
+Cell[5236, 162, 125, 4, 70, "Input",
CellTags->"TID",
CellID->1576573941],
-Cell[4081, 130, 1355, 30, 151, "Output",
- CellTags->"TID",
- CellID->1697860323]
+Cell[5364, 168, 1703, 37, 187, "Output",
+ CellTags->"TID"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5473, 165, 571, 18, 45, "Input",
+Cell[7128, 212, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1140297004],
+Cell[CellGroupData[{
+Cell[7541, 231, 195, 6, 26, "ExampleSection",
+ CellID->742260497],
+Cell[CellGroupData[{
+Cell[7761, 241, 571, 18, 45, "Input",
CellTags->"TID",
CellID->1762979144],
-Cell[6047, 185, 1235, 52, 72, "Output",
+Cell[8335, 261, 1235, 52, 66, "Output",
CellTags->"TID",
CellID->618277373]
}, Open ]],
-Cell[7297, 240, 417, 16, 47, "Notes",
+Cell[9585, 316, 417, 16, 49, "Notes",
CellID->538152640],
Cell[CellGroupData[{
-Cell[7739, 260, 124, 4, 27, "Input",
+Cell[10027, 336, 124, 4, 27, "Input",
CellID->972857906],
-Cell[7866, 266, 18416, 310, 268, "Output",
+Cell[10154, 342, 14824, 251, 246, "Output",
CellTags->"RasterizedOutput",
- CellID->105953080]
+ CellID->947775240]
}, Open ]],
-Cell[26297, 579, 174, 5, 31, "Notes",
+Cell[24993, 596, 174, 5, 70, "Notes",
CellID->1396066519],
Cell[CellGroupData[{
-Cell[26496, 588, 173, 5, 27, "Input",
+Cell[25192, 605, 173, 5, 70, "Input",
CellID->1927433685],
-Cell[26672, 595, 24828, 885, 260, "Output",
+Cell[25368, 612, 24828, 885, 248, "Output",
CellID->1959355442]
}, Open ]],
-Cell[51515, 1483, 195, 5, 45, "Notes",
+Cell[50211, 1500, 195, 5, 70, "Notes",
CellID->709228680],
Cell[CellGroupData[{
-Cell[51735, 1492, 197, 6, 27, "Input",
+Cell[50431, 1509, 197, 6, 70, "Input",
CellTags->"TID",
CellID->1686437767],
-Cell[51935, 1500, 5110, 189, 66, "Output",
+Cell[50631, 1517, 5110, 189, 66, "Output",
CellTags->"TID",
CellID->2009295439]
}, Open ]],
-Cell[57060, 1692, 157, 4, 45, "Notes",
+Cell[55756, 1709, 157, 4, 70, "Notes",
CellID->933246479],
Cell[CellGroupData[{
-Cell[57242, 1700, 746, 27, 96, "Input",
+Cell[55938, 1717, 746, 27, 70, "Input",
CellID->1842388488],
-Cell[57991, 1729, 1363, 53, 42, "Output",
+Cell[56687, 1746, 1363, 53, 42, "Output",
CellID->2014366627]
}, Open ]],
-Cell[59369, 1785, 307, 6, 60, "Notes",
+Cell[58065, 1802, 307, 6, 70, "Notes",
CellID->310028709],
Cell[CellGroupData[{
-Cell[59701, 1795, 174, 5, 27, "Input",
+Cell[58397, 1812, 174, 5, 70, "Input",
CellID->1244684528],
-Cell[59878, 1802, 2693, 91, 74, "Output",
+Cell[58574, 1819, 2693, 91, 70, "Output",
CellID->2601191]
}, Open ]]
}, Open ]],
-Cell[62598, 1897, 31, 0, 29, "SectionFooterSpacer"]
+Cell[61294, 1914, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[62666, 1902, 270, 12, 31, "SeeAlsoSection",
+Cell[61362, 1919, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[62939, 1916, 390, 15, 32, "Text",
- CellTags->"TID",
- CellID->930175642]
+Cell[61635, 1933, 355, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[63344, 1934, 23, 0, 42, "FooterCell"]
+Cell[62005, 1949, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TIDL.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TIDL.nb
index e01951ff7..c70ff5c14 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TIDL.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TIDL.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5885, 183]
-NotebookOptionsPosition[ 3744, 118]
-NotebookOutlinePosition[ 5629, 172]
-CellTagsIndexPosition[ 5563, 167]
+NotebookDataLength[ 6652, 204]
+NotebookOptionsPosition[ 4688, 148]
+NotebookOutlinePosition[ 6445, 196]
+CellTagsIndexPosition[ 6402, 193]
WindowTitle->TIDL
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TIDL\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TIDL"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TIDL.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$153755],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TIDL",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TID\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TID"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TIDL\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TIDL"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TIDL.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$267688],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TIDL",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TIDL", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TIDL", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,9 +141,7 @@ Cell[TextData[StyleBox[ButtonBox["TID",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/TID",
ButtonNote->"TID"],
- FontFamily->"Verdana"]], "Text",
- CellTags->"TIDL",
- CellID->627317385]
+ FontFamily->"Verdana"]], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -128,20 +158,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 59.481989}",
+ "built" -> "{2020, 1, 5, 19, 3, 15.583754}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TIDL is a database of tensorial reduction formalae.", "synonyms" -> {},
- "title" -> "TIDL", "titlemodifier" -> "", "windowtitle" -> "TIDL", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/TIDL"}},
+ "tabletags" -> {}, "title" -> "TIDL", "titlemodifier" -> "",
+ "windowtitle" -> "TIDL", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TIDL"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -150,41 +181,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "TIDL"->{
- Cell[3509, 107, 193, 6, 70, "Text",
- CellTags->"TIDL",
- CellID->627317385]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"TIDL", 5457, 160}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 2975, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 353, 11, 70, "Usage",
+Cell[3554, 97, 281, 11, 70, "ObjectNameGrid"],
+Cell[3838, 110, 353, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3236, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4216, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3509, 107, 193, 6, 70, "Text",
- CellTags->"TIDL",
- CellID->627317385]
+Cell[4489, 139, 157, 4, 70, "SeeAlso"]
}, Open ]],
-Cell[3717, 116, 23, 0, 70, "FooterCell"]
+Cell[4661, 146, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI.nb
index 4b407bf71..237170618 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9404, 297]
-NotebookOptionsPosition[ 5856, 195]
-NotebookOutlinePosition[ 8657, 268]
-CellTagsIndexPosition[ 8552, 262]
+NotebookDataLength[ 10144, 316]
+NotebookOptionsPosition[ 6945, 226]
+NotebookOutlinePosition[ 9517, 292]
+CellTagsIndexPosition[ 9452, 287]
WindowTitle->TLI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TLI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TLI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TLI.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$156164],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI2FC\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI2FC"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TLI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TLI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TLI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$270787],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TLI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TLI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,32 +142,33 @@ TLI[{a,b,c,d,e}, {al,be,ga,de,ep}]."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1532521566],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2113120269],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->2094721579],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -151,16 +186,14 @@ Cell[BoxData[
RowBox[{"Momentum", "\[Rule]",
RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{292, 15},
+ ImageSize->{273, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TLI",
CellLabel->"Out[1]=",
CellID->1974374076]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -186,9 +219,7 @@ Cell[TextData[{
ButtonNote->"TLI2FC"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TLI",
- CellID->1589173280]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -205,10 +236,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 9.721614}",
+ "built" -> "{2020, 1, 5, 19, 3, 22.896311}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -222,11 +253,11 @@ dl.(p-k2), e: dl.(k1-k2). TLI[{mu1, ...}, {nu1, \
mu1 belongs to k1 and nu1 to k2. TLI[any___,{a,b,c,d,e,0,0}, \
{al,be,ga,de,ep}] simplifies to TLI[any, {a,b,c,d,e}, {al,be,ga,de,ep}]. \
TLI[{0,0,0,0,0},{a,b,c,d,e}, {al,be,ga,de,ep}] simplifies to TLI[{a,b,c,d,e}, \
-{al,be,ga,de,ep}].", "synonyms" -> {}, "title" -> "TLI", "titlemodifier" ->
- "", "windowtitle" -> "TLI", "type" -> "Symbol", "uri" ->
+{al,be,ga,de,ep}].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "TLI",
+ "titlemodifier" -> "", "windowtitle" -> "TLI", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/TLI"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -234,8 +265,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -243,62 +275,49 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4090, 110, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1532521566]},
"TLI"->{
- Cell[4724, 139, 124, 4, 27, "Input",
+ Cell[5883, 174, 124, 4, 70, "Input",
CellTags->"TLI",
CellID->1958640232],
- Cell[4851, 145, 378, 13, 36, "Output",
- CellTags->"TLI",
- CellID->1974374076],
- Cell[5597, 181, 217, 9, 31, "Text",
+ Cell[6010, 180, 378, 13, 37, "Output",
CellTags->"TLI",
- CellID->1589173280]}
+ CellID->1974374076]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8147, 245},
- {"TLI", 8278, 249}
+ {"TLI", 9260, 277}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 2977, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 1200, 28, 189, "Usage",
- CellID->982511436],
+Cell[3555, 97, 280, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4090, 110, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1532521566],
+Cell[3860, 112, 1200, 28, 197, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4503, 129, 196, 6, 25, "ExampleSection",
- CellID->2094721579],
+Cell[5085, 144, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->2113120269],
+Cell[5827, 170, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4724, 139, 124, 4, 27, "Input",
+Cell[5883, 174, 124, 4, 70, "Input",
CellTags->"TLI",
CellID->1958640232],
-Cell[4851, 145, 378, 13, 36, "Output",
+Cell[6010, 180, 378, 13, 37, "Output",
CellTags->"TLI",
CellID->1974374076]
}, Open ]]
-}, Open ]],
-Cell[5256, 162, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5324, 167, 270, 12, 31, "SeeAlsoSection",
+Cell[6449, 200, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5597, 181, 217, 9, 31, "Text",
- CellTags->"TLI",
- CellID->1589173280]
+Cell[6722, 214, 181, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5829, 193, 23, 0, 42, "FooterCell"]
+Cell[6918, 224, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2.nb
index 7eac7d31c..bef2d5df2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5909, 186]
-NotebookOptionsPosition[ 3764, 121]
-NotebookOutlinePosition[ 5653, 175]
-CellTagsIndexPosition[ 5587, 170]
+NotebookDataLength[ 6677, 207]
+NotebookOptionsPosition[ 4708, 151]
+NotebookOutlinePosition[ 6470, 199]
+CellTagsIndexPosition[ 6427, 196]
WindowTitle->TLI2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TLI2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TLI2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TLI2.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$155135],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLI2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TLI2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TLI2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TLI2.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$269461],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLI2",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TLI2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TLI2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"TLI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TLI2",
- CellID->573712863]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,20 +161,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 5.449964}",
+ "built" -> "{2020, 1, 5, 19, 3, 19.878359}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TLI2 is like TLI, but without any functional properties.",
- "synonyms" -> {}, "title" -> "TLI2", "titlemodifier" -> "", "windowtitle" ->
- "TLI2", "type" -> "Symbol", "uri" -> "FeynCalc/ref/TLI2"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TLI2", "titlemodifier" ->
+ "", "windowtitle" -> "TLI2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TLI2"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -153,41 +184,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "TLI2"->{
- Cell[3514, 107, 208, 9, 70, "Text",
- CellTags->"TLI2",
- CellID->573712863]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"TLI2", 5481, 163}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 2975, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 358, 11, 70, "Usage",
+Cell[3554, 97, 281, 11, 70, "ObjectNameGrid"],
+Cell[3838, 110, 358, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3241, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4221, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3514, 107, 208, 9, 70, "Text",
- CellTags->"TLI2",
- CellID->573712863]
+Cell[4494, 139, 172, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3737, 119, 23, 0, 70, "FooterCell"]
+Cell[4681, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2FC.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2FC.nb
index dc5aa287d..59f0c2d32 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2FC.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLI2FC.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8743, 296]
-NotebookOptionsPosition[ 5516, 195]
-NotebookOutlinePosition[ 7913, 264]
-CellTagsIndexPosition[ 7805, 258]
+NotebookDataLength[ 9188, 301]
+NotebookOptionsPosition[ 6578, 221]
+NotebookOutlinePosition[ 8579, 278]
+CellTagsIndexPosition[ 8511, 273]
WindowTitle->TLI2FC
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TLI2FC\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TLI2FC"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TLI2FC.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI"], "\<\"FC2TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FC2TLI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TLI2FC\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TLI2FC"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TLI2FC.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$154794],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLI2FC",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$269021],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TLI2FC", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TLI2FC", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TLI2FC", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -92,39 +127,40 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->2131826391],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->720851657],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->541322616],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "TLI2FC", "]"}]], "Input",
CellTags->"TLI2FC",
- CellLabel->"In[1]:=",
+ CellLabel->"In[5]:=",
CellID->972870614],
Cell[BoxData[
@@ -140,21 +176,13 @@ Cell[BoxData[
RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}], ",",
RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}]}], "}"}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{338, 35},
+ ImageSize->{326, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TLI2FC",
- CellLabel->"Out[1]=",
- CellID->1369959726]
-}, Open ]],
-
-Cell[BoxData[""], "Input",
- CellTags->"TLI2FC",
- CellLabel->"In[2]:=",
- CellID->1527451776]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+ CellLabel->"Out[5]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -179,16 +207,14 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/TLI",
ButtonNote->"TLI"],
FontFamily->"Verdana"],
- ". ",
+ ", ",
StyleBox[ButtonBox["FC2TLI",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FC2TLI",
ButtonNote->"FC2TLI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TLI2FC",
- CellID->708615958]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -196,7 +222,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"TLI2FC",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -205,21 +231,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 3.941357}",
+ "built" -> "{2020, 1, 5, 19, 3, 18.904498}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TLI2FC[exp] transforms all TLI-integrals in exp to the FAD form.",
- "synonyms" -> {}, "title" -> "TLI2FC", "titlemodifier" -> "",
- "windowtitle" -> "TLI2FC", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TLI2FC", "titlemodifier" ->
+ "", "windowtitle" -> "TLI2FC", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/TLI2FC"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -228,7 +254,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -236,68 +262,47 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3290, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2131826391]},
"TLI2FC"->{
- Cell[3923, 123, 129, 4, 27, "Input",
+ Cell[5172, 159, 129, 4, 70, "Input",
CellTags->"TLI2FC",
CellID->972870614],
- Cell[4055, 129, 593, 18, 56, "Output",
- CellTags->"TLI2FC",
- CellID->1369959726],
- Cell[4663, 150, 91, 3, 27, "Input",
- CellTags->"TLI2FC",
- CellID->1527451776],
- Cell[5110, 175, 364, 15, 31, "Text",
- CellTags->"TLI2FC",
- CellID->708615958]}
+ Cell[5304, 165, 572, 17, 56, "Output",
+ CellTags->"TLI2FC"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7305, 238},
- {"TLI2FC", 7438, 242}
+ {"TLI2FC", 8337, 264}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3066, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 395, 12, 82, "Usage",
- CellID->982511436],
+Cell[3647, 98, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3290, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2131826391],
+Cell[3955, 113, 395, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3703, 113, 195, 6, 25, "ExampleSection",
- CellID->541322616],
+Cell[4375, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->720851657],
+Cell[5116, 155, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[3923, 123, 129, 4, 27, "Input",
+Cell[5172, 159, 129, 4, 70, "Input",
CellTags->"TLI2FC",
CellID->972870614],
-Cell[4055, 129, 593, 18, 56, "Output",
- CellTags->"TLI2FC",
- CellID->1369959726]
-}, Open ]],
-Cell[4663, 150, 91, 3, 27, "Input",
- CellTags->"TLI2FC",
- CellID->1527451776]
-}, Open ]],
-Cell[4769, 156, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5304, 165, 572, 17, 56, "Output",
+ CellTags->"TLI2FC"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4837, 161, 270, 12, 31, "SeeAlsoSection",
+Cell[5937, 189, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5110, 175, 364, 15, 31, "Text",
- CellTags->"TLI2FC",
- CellID->708615958]
+Cell[6210, 203, 326, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5489, 193, 23, 0, 42, "FooterCell"]
+Cell[6551, 219, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIFP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIFP.nb
index b0e4b82c3..c3c8832b5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIFP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIFP.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8746, 294]
-NotebookOptionsPosition[ 5544, 193]
-NotebookOutlinePosition[ 7922, 262]
-CellTagsIndexPosition[ 7815, 256]
+NotebookDataLength[ 9180, 299]
+NotebookOptionsPosition[ 6528, 218]
+NotebookOutlinePosition[ 8572, 276]
+CellTagsIndexPosition[ 8505, 271]
WindowTitle->TLIFP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TLIFP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TLIFP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TLIFP.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TLIFP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TLIFP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TLIFP.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$155485],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLIFP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$269909],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLIFP",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TLIFP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TLIFP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -92,39 +126,40 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1884722070],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1385056397],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->330522789],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "TLIFP", "]"}]], "Input",
CellTags->"TLIFP",
- CellLabel->"In[1]:=",
+ CellLabel->"In[6]:=",
CellID->1039512168],
Cell[BoxData[
@@ -144,21 +179,13 @@ Cell[BoxData[
RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}]}], ",",
RowBox[{"Print", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
- ImageSize->{536, 35},
+ ImageSize->{514, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TLIFP",
- CellLabel->"Out[1]=",
- CellID->266885943]
-}, Open ]],
-
-Cell[BoxData[""], "Input",
- CellTags->"TLIFP",
- CellLabel->"In[2]:=",
- CellID->12061026]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+ CellLabel->"Out[6]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -184,17 +211,15 @@ Cell[TextData[{
ButtonNote->"TLI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TLIFP",
- CellID->1633359984]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"TLIFP",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -203,21 +228,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 6.757556}",
+ "built" -> "{2020, 1, 5, 19, 3, 20.870965}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TLIFP[exp] does Feynman-Parametrizations of TLI's in exp.",
- "synonyms" -> {}, "title" -> "TLIFP", "titlemodifier" -> "",
- "windowtitle" -> "TLIFP", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TLIFP", "titlemodifier" ->
+ "", "windowtitle" -> "TLIFP", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/TLIFP"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -225,8 +250,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -234,68 +260,47 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3277, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1884722070]},
"TLIFP"->{
- Cell[3910, 123, 128, 4, 27, "Input",
+ Cell[5077, 158, 128, 4, 70, "Input",
CellTags->"TLIFP",
CellID->1039512168],
- Cell[4041, 129, 792, 22, 56, "Output",
- CellTags->"TLIFP",
- CellID->266885943],
- Cell[4848, 154, 88, 3, 27, "Input",
- CellTags->"TLIFP",
- CellID->12061026],
- Cell[5292, 179, 210, 9, 31, "Text",
- CellTags->"TLIFP",
- CellID->1633359984]}
+ Cell[5208, 164, 772, 21, 56, "Output",
+ CellTags->"TLIFP"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7322, 236},
- {"TLIFP", 7454, 240}
+ {"TLIFP", 8332, 262}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[577, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[577, 21, 2979, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2813, 75, 48, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 388, 12, 82, "Usage",
- CellID->982511436],
+Cell[3559, 97, 282, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3277, 94, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1884722070],
+Cell[3866, 112, 388, 12, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3690, 113, 195, 6, 25, "ExampleSection",
- CellID->330522789],
+Cell[4279, 128, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1385056397],
+Cell[5021, 154, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[3910, 123, 128, 4, 27, "Input",
+Cell[5077, 158, 128, 4, 70, "Input",
CellTags->"TLIFP",
CellID->1039512168],
-Cell[4041, 129, 792, 22, 56, "Output",
- CellTags->"TLIFP",
- CellID->266885943]
-}, Open ]],
-Cell[4848, 154, 88, 3, 27, "Input",
- CellTags->"TLIFP",
- CellID->12061026]
-}, Open ]],
-Cell[4951, 160, 31, 0, 29, "SectionFooterSpacer"]
+Cell[5208, 164, 772, 21, 56, "Output",
+ CellTags->"TLIFP"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5019, 165, 270, 12, 31, "SeeAlsoSection",
+Cell[6041, 192, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5292, 179, 210, 9, 31, "Text",
- CellTags->"TLIFP",
- CellID->1633359984]
+Cell[6314, 206, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5517, 191, 23, 0, 42, "FooterCell"]
+Cell[6501, 216, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIHYP.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIHYP.nb
index 367af181a..221ee7f52 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIHYP.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TLIHYP.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8222, 276]
-NotebookOptionsPosition[ 5136, 181]
-NotebookOutlinePosition[ 7470, 247]
-CellTagsIndexPosition[ 7362, 241]
+NotebookDataLength[ 8963, 295]
+NotebookOptionsPosition[ 6229, 212]
+NotebookOutlinePosition[ 8333, 271]
+CellTagsIndexPosition[ 8265, 266]
WindowTitle->TLIHYP
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TLIHYP\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TLIHYP"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TLIHYP.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TLI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TLI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TLIHYP\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TLIHYP"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TLIHYP.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$155825],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TLIHYP",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$270348],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TLIHYP", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TLIHYP", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TLIHYP", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -93,32 +127,33 @@ possible."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1190045159],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->213045481],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1841621955],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -137,16 +172,14 @@ Cell[BoxData[
RowBox[{"Momentum", "\[Rule]",
RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}]}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{425, 15},
+ ImageSize->{389, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TLIHYP",
CellLabel->"Out[1]=",
CellID->1697792562]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -172,9 +205,7 @@ Cell[TextData[{
ButtonNote->"TLI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TLIHYP",
- CellID->827493739]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -182,7 +213,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"TLIHYP",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -191,21 +222,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 8.209733}",
+ "built" -> "{2020, 1, 5, 19, 3, 21.876659}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TLIHYP[exp] expresses TLI's in exp. in terms of hypergeometric \
-functions, where possible.", "synonyms" -> {}, "title" -> "TLIHYP",
- "titlemodifier" -> "", "windowtitle" -> "TLIHYP", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/TLIHYP"}, "SearchTextTranslated" -> ""},
+functions, where possible.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "TLIHYP", "titlemodifier" -> "", "windowtitle" -> "TLIHYP", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/TLIHYP"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -213,8 +244,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -222,62 +254,49 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3317, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1190045159]},
"TLIHYP"->{
- Cell[3951, 124, 130, 4, 27, "Input",
+ Cell[5116, 159, 130, 4, 70, "Input",
CellTags->"TLIHYP",
CellID->1476708263],
- Cell[4084, 130, 432, 14, 36, "Output",
- CellTags->"TLIHYP",
- CellID->1697792562],
- Cell[4884, 167, 210, 9, 31, "Text",
+ Cell[5249, 165, 432, 14, 37, "Output",
CellTags->"TLIHYP",
- CellID->827493739]}
+ CellID->1697792562]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 6947, 224},
- {"TLIHYP", 7080, 228}
+ {"TLIHYP", 8067, 256}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 2983, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 422, 13, 82, "Usage",
- CellID->982511436],
+Cell[3564, 97, 283, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3317, 95, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1190045159],
+Cell[3872, 112, 422, 13, 85, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3730, 114, 196, 6, 25, "ExampleSection",
- CellID->1841621955],
+Cell[4319, 129, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->213045481],
+Cell[5060, 155, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[3951, 124, 130, 4, 27, "Input",
+Cell[5116, 159, 130, 4, 70, "Input",
CellTags->"TLIHYP",
CellID->1476708263],
-Cell[4084, 130, 432, 14, 36, "Output",
+Cell[5249, 165, 432, 14, 37, "Output",
CellTags->"TLIHYP",
CellID->1697792562]
}, Open ]]
-}, Open ]],
-Cell[4543, 148, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4611, 153, 270, 12, 31, "SeeAlsoSection",
+Cell[5742, 186, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[4884, 167, 210, 9, 31, "Text",
- CellTags->"TLIHYP",
- CellID->827493739]
+Cell[6015, 200, 172, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5109, 179, 23, 0, 42, "FooterCell"]
+Cell[6202, 210, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TR.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TR.nb
index 7a68e0bd9..b8db67bc7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TR.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TR.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 54601, 1751]
-NotebookOptionsPosition[ 39263, 1253]
-NotebookOutlinePosition[ 49902, 1572]
-CellTagsIndexPosition[ 49675, 1563]
+NotebookDataLength[ 32510, 1189]
+NotebookOptionsPosition[ 22740, 877]
+NotebookOutlinePosition[ 29296, 1068]
+CellTagsIndexPosition[ 29169, 1061]
WindowTitle->TR
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TR\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TR"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TR.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$159891],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/TR",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"FermionSpinSum\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FermionSpinSum"], "\<\"SUNTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TR\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TR"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/TR.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$278675],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/TR",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,27 +101,38 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TR", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TR", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"TR", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "calculates the Dirac trace of exp. Depending on the setting of the \
-option SUNTrace also a trace over SU(",
+ " \[LineSeparator]calculates the Dirac trace of exp. Depending on the \
+setting of the option SUNTrace also a trace over SU(",
StyleBox["N",
FontSlant->"Italic"],
") objects is performed. The ",
StyleBox["Mathematica",
FontSlant->"Italic"],
" build-in function Tr is overloaded to call TR if any of DiracGamma, \
-DiracSlash, GA, GAD, GS or GSD are in the expression.\nTr[list] finds the \
-trace of the matrix or tensor list. Tr[list, f] finds a generalized trace, \
-combining terms with f instead of Plus. Tr[list, f, n] goes down to level n \
-in list.\nTr[ expression ] calculates the DiracTrace, i.e., TR[ expression ] \
-if any of DiracGamma, DiracSlash, GA, GAD, GS or GSD is present in expression."
+GA, GAD, GS or GSD are in the expression.\nTr[list] finds the trace of the \
+matrix or tensor list. Tr[list, f] finds a generalized trace, combining terms \
+with f instead of Plus. Tr[list, f, n] goes down to level n in list.\nTr[ \
+expression ] calculates the DiracTrace, i.e., TR[ expression ] if any of \
+DiracGamma, GA, GAD, GS or GSD is present in expression."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -104,6 +143,71 @@ if any of DiracGamma, DiracSlash, GA, GAD, GS or GSD is present in expression."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->717093042],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "TR", "]"}]], "Input",
+ CellLabel->"In[14]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "True"}], ",",
+ RowBox[{"Expand", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Automatic"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Mandelstam", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"PairCollect", "\[Rule]", "False"}], ",",
+ RowBox[{"SUNNToCACF", "\[Rule]", "False"}], ",",
+ RowBox[{"SUNTrace", "\[Rule]", "False"}], ",",
+ RowBox[{"Schouten", "\[Rule]", "0"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}], ",",
+ RowBox[{"West", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",\
+
+ ImageSize->{548, 72},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[14]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -119,7 +223,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->432077144],
+ CellID->274607088],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -127,13 +233,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->2108646959],
-
-Cell[CellGroupData[{
-
-Cell["Examples", "Subsubsection",
- CellTags->{"TR", "Tr"},
- CellID->1530902763],
+ CellID->535896717],
Cell[CellGroupData[{
@@ -163,12 +263,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{45, 17},
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[1]=",
- CellID->69652991]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -182,29 +281,22 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"4", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{47, 17},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{49, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[2]=",
- CellID->924683987]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -232,111 +324,82 @@ Cell[BoxData[
RowBox[{
RowBox[{
SuperscriptBox["m", "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox["p",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
FormBox[
- FormBox["q",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}], ")"}]}], "-",
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox["q",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["q",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{289, 21},
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{315, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[3]=",
- CellID->918332859]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -354,7 +417,8 @@ Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -372,322 +436,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{87, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"TR", "Tr"},
- CellLabel->"Out[4]=",
- CellID->1839075278]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[{
- RowBox[{
- RowBox[{"$Larin", "=", "True"}], ";"}], "\[IndentingNewLine]",
- RowBox[{
- RowBox[{"$BreitMaison", "=", "False"}], ";"}], "\[IndentingNewLine]",
- RowBox[{"TR", "[",
- RowBox[{
- RowBox[{"GAD", "[",
- RowBox[{
- "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
- "\[Xi]"}], "]"}], ".",
- RowBox[{"GA", "[", "5", "]"}]}], "]"}]}], "Input",
- CellTags->{"TR", "Tr"},
- CellLabel->"In[5]:=",
- CellID->476260756],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQtUVNXewM373dJWXY2lllwxQ0CQkNfwmEFREMXikQaYkB/y8MOVYrLS
-bimaiS0FURPzZl0pH/dW9hBMrAQtEa8ihfhaKjKC8hIEhmFgRuZ1znwMIA5n
-mD1n5px9Hrl/a+UaPc3Z//Pb/332nH3OPvulpFWvpwwfNmzY6hE9f7ye+F7Q
-O+8kro36n56/BK9d839Jf+n54NvzH/bEsGH6zzoEAoFAIKxDcXP3BwfuKtkO
-YwBt+7nt8bOFAi//qAN1araj4RvIHhmQJWOQEzL8SSzh0uI3PRcVS3G2A3mI
-UpwlCtlfp6G6H6y7TVx2oY2/NWMV5O3xwg+kIOnKsT8TqN2R4U/SvnBJ0YKp
-EYUSS876ePvJcMHbVxT9n9L0n/q3tB6f7ZF6Wf/37hubRPP211uRRd3i3Fj7
-Uc9NCNh484HxVkz2x85Yv5enTp7knXioVkXYqmr4eXNskL+fj4fjKBvP5My8
-esOrGHXtl68LnGyeHu3oNiP5LLSezrQfModgZt/mDIPt8cIPOEhSJVCzZKqC
-WPdDJQBITvqgXmV0HQWVxtVbgJnk5EH7Mk/PWT/SIfC7JsySLz24/r5gzo8t
-mN58uu/cYy2P4ldcXukZ2tOJYC0FbwhXl3dZHpGm5XhaSNTmn2rkQ8WES08n
-u8/bW/kAV4p3+7osvSg33Kq4ukEoTC+WaHU66W9zphG29oLdzw/x3Xiz2/LA
-yAPwY/YQzAI2DLbHCz8kgjQPFUvACmLdj/UBQHNCT5XRchQUG5fOXHLyon2Z
-p+PsQnv37NsWdYpY8w/BgrXXu/Vdb8Fc3/QbBsegbfz3TOH227LKLTMjv2q0
-/Kc+3n5qsSDxlMREN4RLCiO9l5f32uwqi3OL/K/M8GBKFnnEnu7tRLVNh2cK
-1t8wtqu4tMI78td2iwOzAJAfc4dgHpBhM/Z44YdMkOahYAlcQaz7sT4AaE7o
-qTKSAM8wVBuXGfn8aF8P0bSV5H6cnb3r4MUOQsCKy6kOL8X/btmPcvnFFI9X
-ivTDQvKK5V5hJ9sN+8Ousnif+F++Xxy47rLC5B4A+65ImRZ8QmJqc0+87kHH
-W/UFqqp3+ot21xgMnSkrM3wCcnuH3XBp8SL36N+ML6O0DYcC/beJLb/2swCg
-H/AhkAFgGGyPF37IBEkGqy2BK4h1P1QCgOSEriojCegMQ7lxgeVzqn0pxTv9
-JgYXd5j8H2SlyQLHyY4+Sy8Q+j71nU88nvf9T6PWkuI0dft8HBae79RpmvLe
-sHffWjVoFE9dk+PvFC6I+aHJop0+RHV7h/cE0aq9BeWNSuPc0TYcEIxzy65S
-4qrab+O9FuY1Gxaiqtnl7Zxc0oFjstIMkdea8i7jPcjLkzznl5hWRQNgP+BD
-IAPAMNgeL/yQCZIMVlsCVxDrfqgEAMkJXVVG/SioNy4zycmd9qWu/zY+cvwL
-swCnfZN0FIeNfzGpnMT4F6bs0vQfhOzcwslTZgQEh0bGpkS4x5wllNtxJsxu
-6oZrQ9zuIAWurCv8dF3SHPuJ4QUtxIupztI4F+/IAFfXaZ7CuO2lUsJ2bWvR
-u0FTnFzdPYNXHKp6MFTyqetyIxxco/MtzgczkPZj5hDIADAMtMcLP2SCJIW1
-lsAVxLofSgHAcUJblQEw8AM4CuqNy0xycqV9aVt+Wb3ux7zASaZP+5rGw9EC
-V1fPeVlVhKGmns7Lbazn3rvECyFNa8melXHL/rExI2N9WnxYRMxroaEJeU19
-42gqcabf9FyKz3lpJSXZsQI7m1F6Rk98leAQk/z6liCqiPh4kUq8zT/wYAPN
-Lc4YXFaR89Fn1SYHKCn4IX8IZhQBMGGPOeDnzwC0W6IjxyDmDxk46cQSgH4A
-UG9cpORDb1/m8geX/ndDan5TW/EswGm/o2S+4/RP/hUVc6KNEKi8PNFubNBJ
-wv0Fde3nwU6RX/VPRdDe+8bPLujRznFJ4ateyy9ZM24/gLJ616zJodvONg85
-8Ia1FSXNmLf6SANxAAyXFIV5pVp1y8AytPe+BoyaUfFD+hDAigCYtMcY8PNn
-APot0ZJj8PKHBBx1Qh6wHwDUGxcJ+Uy0L3D+6ORXspL3Vat0HaDTfveNdHfP
-9Uc/iNpj9LxOx5mQsbaLyjoH/2tnabSj6HD/I53apiNR9t4f3aLzKVzZ+SUO
-bpsquTMtmAhYO3Q/Oh4oAsCEnz64aonN/OGqE/Kg8w8wf5TiT5dkXdX3TKDT
-Ptb07XSnqLz90Sv+MHpeR1IYOMYukTi0j8uv7Qh3Fi5Y9v6mD99bGpOQcZTe
-qReKS8snjXjq2d7rq1HP2UefkdK5d0p0lsVOfPqpHv46/InhT+o/POu8hjiI
-CNuPjruKBvwMwI6fPrhnif384Z4TQziRPxxWRCJ/pMULnte/lO0RfxMdNR7F
-6yp7c4rw0/yUmPxmo23S00FjbOPKCN1Bd9XWEP+MywpIQ1d4y7GAvwusmr4L
-HVzZUnf3zp3qshwPW9Hhq3fu3LnbIFETRED2o+Owon4/BrDipz8Y7lliPX84
-6MQQLuQPlxWRyp8BAL/2VeIsL7fU/MyozCEmhnWVLbIdN5f4RXXd/hi7kSPH
-T5sdl5Z58FRVlxUPm4CQFkfY2r15tJGbL6vQY2ZsFrIfHR8UAWDATx+ctcRi
-/nDWCXnQ+cfM2L4edcvpr3ckTRr9Uso/C+8bHQneejzI5sm/2bwYPdR0te7K
-D53HEDo+zf0TW1LTc74v+G5fdvpb0b4vPGMbuv2qnMauF1dcz4lysRkx8hn9
-XXTbwC8490YsTFL8TsK6a0M+1wrfj44PikzCiJ8+OGuJxfzhrBOyoPMPOH9o
-AG/7edY4+5WGLxuSlye4iAzmb2GyC+kuLy443znU9x9DkB8wyA8Y5AcM8sMA
-3Tc/cH5+ev79R5dRiiurnJ3TSmUPe1dMdm6taMGBeu5eETEL8gMG+QGD/IBB
-fpig42yUncNKw0ddsc6KPSlh85PXbMzelfNxdtbWnGM1UObd8RTkBwzyAwb5
-AYP8MADWfCRwgoB7o1sIBAKBgIOm/gu/Sa9YtsoKAoFAIPiLuvZzf+clF9At
-EwQCgXhM0DQcmOX+NmNv3EAgEAgEy2CtvyyJyLzF8jJfCAQCgUAgEAgEAoFA
-IBAIBAKBQCAQCAQCgUAgEAgEAoFAIBAIfqJtP7c9frZQ4OUfdaAOvb+pF+SE
-LpBJY5ATMlhsCe/4feuHx8wvG88jsO42cdmFNgg5ohRniUL2o1cMGUKXE3i1
-ZgWsBIOyyxjyThiuMk6lqxWZo67JEfpnG61/zjHw1uOzPfqWre++sUk0z2jV
-MlXDz5tjg/z9fDwcR9l4JmfmWbVCJt5+Mlzwtn6FgN5PaVcIs4u7xbmx9qOe
-mxCw8eYD429jsj92xvq9PHXyJO/EQ7WPjKprv3xd4GTz9GhHtxnJZ6VQ1gQx
-7Ydq6XCc9EFPrZGGiWBM6zKbw6ZMMpA/fcBKYAhO+mA4f8DFcdbSkNWqvLXZ
-yzODwyu996K4vNIztFCCYy0FbwhXlxMW6FVc3SAUphdLtDqd9Lc505ZetHLp
-mAfX3xfM+VG/ZHD3jXTfucdaBtWdpuV4WkjU5p9q5EMtxIZLTye7z9tb+QBX
-inf7ugyOAbufH+K7cYiVJ+kC6IdS6dCc0FZrJGEmGIAucA4DTULPHx3MBIbj
-hOn8IVEcFy2Zqtaefbq4c/28r23890zh9tuyyi0zI79qJHR2HSWLPGJP9/av
-2qbDMwXrb1gnHmv+IViw9nq3vn8tmOubPmg3ePupxYLEUxITa2/iksJI7+Xl
-vU67yuLcIgetM6m4tMI78td2q6IiBdAPldLhOaGr1kjCTDAgXaA6MmMSev7A
-TGBIThjOHzLFcdCS6WqVFr82yWNnNbfHebrK4n3if/l+ceA6o/e6KSszfAJy
-e4e2cGnxIvfo36y8EJZfTPF4pUj/mmh5xXKvsJPthruRV6RMCz4hMfVdxeVU
-96DjrfpvqKp3+ot21xiM+2kbDgX6bxPDNAzwQ6l0aE5oqzWSMBMMUBegjsAm
-GcgfiAkMxwnD+UOmOA5aAlSrpv5Lga3om3taU1/lAuqaHH+ncEHMD01GYapq
-dnk7J5d04JisNEPktaa8y7r619Tt83FYeL5Tp2nKe8PefWvVoAsg1e0d3hNE
-q/YWlDcqjfevbTggGOeWXaXEVbXfxnstzGs2DFNenuQ5vwS0Vj1lAH6olA7P
-CV21RhJmggHrAuUw0CQD+QMvgSE5YTh/yBTHQUugapVXLLO3izknM/oS22DK
-Ls3DQ+k4E2Y3dcO1IW5Z6LStRe8GTXFydfcMXnGoyupF0mTnFk6eMiMgODQy
-NiXCPeYsof5wZV3hp+uS5thPDC9oIV5SdZbGuXhHBri6TvMUxm0vlQ7erq7L
-jXBwjc5vprlnJeeHSunwnNBVayAM/DATjBldgBwGmmQgf+AlMCQnDOcPmeI4
-aAlUrdp73/iNezkL7kWkWTStJXtWxi37x8aMjPVp8WERMa+Fhibk0f9sqVZS
-kh0rsLMZpWf0xFcfulKJM/2m55p5DAqT/PqWIKqIuF6YSrzNP/BgA9TrJZh+
-+OAEl1XkfPRZtckBXKAfeoOhpAuACZP0ANkP551Qyh+6YNgSuFq7fl9sN37w
-PRymUdd+HuwU+VX/ZAN9R2QXVAzhslZZvWvW5NBtZ5uJj9ziksJXvZZfAi0I
-g7UVJc2Yt/pIA7F/xCVFYV6pUBeTgemHH0609772mxhs6pjBfmgNhoouACZN
-0gJkPzxwQiV/aIJpS2aqVXlr89SxPofg/loF01ka7Sg63NTX92mbjkTZe390
-i/6ni2Tnlzi4beL4Y0tDAdEPT5yAmy1D+aPjjS4CcP3wwQn7+cM1S5r6L7zH
-ToXUTMiBy6/tCHcWLlj2/qYP31sak5BxFMbUC8Wl5ZNGPPVs7yXWqOfso89I
-6S/DYjrLYic+/ZQhzzqvIQ7jwfPDSSeGDPj56/Anhj/JuB8C3NPFcv7ouOjE
-EK7kD+cs6a9pxjj1PjTKFt1VW0P8My4roN6Ox1uOBfxdYDTJjWVwZUvd3TuG
-3G2QqAkioPnhphND+v1Ul+V42IoOX2XYDzEY7uliN390nHRiCEfyh3uWNPX7
-BWNcWL38UNftj7EbOXL8tNlxaZkHT1V1mZh+QA1pcYSt3ZtHG7nxLg1LgOeH
-L07MjM0ykj86/ugiANUPL5ywnj+cs6QUZ7qO8fyslrWANPdPbElNz/m+4Lt9
-2elvRfu+8Ixt6Parcvp/2iqu50S52IwY+Yz+Rrpt4Bc8efMVTD98cYJJit9J
-WHdtyBn4TOWPjj+6BgHZDy+csJ4/nLMkL0+0Gzf7JNTJ3+DyE1xE/2kcuKOM
-yS6ku7y44HwnWwFxDOQHDPIDBvkB83j6wZqPiMY6vDvkZABGUFxZ5eycVip7
-2LtisnNrRQsO1HPmcohlkB8wyA8Y5AfM4+nnwdW0yc8H/9QK+3aYabDOij0p
-YfOT12zM3pXzcXbW1pxjNVDm3fEU5AcM8gMG+QHzOPrBmr4TvuDG+XfuIxAI
-BIIeun7/35cc4c4xRSAQCARnUFZucnNYcuHPffsCgUAgEP1oaj/3c044z73X
-byIQCAQCAvqFWzxWXYK7HhkCgUAgOAIuORkfvqWSxbcyIBAIBIJ1/h9eyTfy
-
- "], {{0, 54}, {509, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{509, 54},
- PlotRange->{{0, 509}, {0, 54}}]], "Output",
- ImageSize->{513, 54},
+ ImageSize->{86, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellLabel->"Out[5]=",
- CellID->327034179]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"?", "West"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[6]:=",
- CellID->1811278693],
-
-Cell[BoxData[
- StyleBox["\<\"West is an option for DiracTrace, TR and other functions that \
-deal with traces of Dirac matrices. It applies only to the computation of \
-D-dimensional chiral traces (i.e. those that involve one gamma5) in the \
-Breitenlohner-Maison-t'Hooft-Veltman (BMHV) scheme. If set to True, such \
-traces will be computed according to formula (A.5) from Comp. Phys. Comm 77 \
-(1993) 286-298, which is also known as West's formula.\"\>", "MSG"]], "Print",\
- "PrintUsage",
- CellTags->{"Info-1f727a11-0560-42a1-a906-fd285e6773a9", "Tr", "TR"},
- CellID->756420129]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"TR", "[",
- RowBox[{
- RowBox[{
- RowBox[{"GAD", "[",
- RowBox[{
- SubscriptBox["\[Nu]", "1"], ",",
- SubscriptBox["\[Nu]", "2"], ",",
- SubscriptBox["\[Nu]", "3"], ",",
- SubscriptBox["\[Nu]", "4"], ",",
- SubscriptBox["\[Nu]", "5"], ",",
- SubscriptBox["\[Nu]", "6"]}], "]"}], ".",
- RowBox[{"GA", "[", "5", "]"}]}], ",",
- RowBox[{"West", "\[Rule]", "False"}]}], "]"}]], "Input",
- CellTags->{"TR", "Tr"},
- CellLabel->"In[7]:=",
- CellID->346772021],
-
-Cell[BoxData[
- GraphicsBox[
- TagBox[RasterBox[CompressedData["
-1:eJztnQlUE9fewFu/16o9+tz6XLBYlYpAP1vESDC2uPUUn7gUgXoUiyhVXMCt
-WBFUClJcoEIOfiDlufSrIgpaEDyKr+8VwRZRa9nqEoWyGJYgQsIWk8zkhSi+
-NMssIQOXzP93jj3a3Jn87/3d/8ydmZu5E9ZsWbqu3yuvvPLFANV/lq7eOWf7
-9tW73P+i+sfcXYFr1/yP6i+zVX8+VJXp/LsSAAAAAIDugzdkzbP3L2xT/bXj
-bhhv/olquUnLIxIDCtWkCAqhgpHufDVDoTIdBiLVpAIKoSLYvL1opJvI6n5M
-+0lEI9q2woCpLtmNOCbKXDbji9stpi6PSAwoVJMiKIQKRrrz1QyFynQYiFST
-CiiEimDz9qKR7oA1ZC2btvpaM059E4Xw+1kzoh+J70fOWnxaqD7fYZKis19/
-Zj95fm4zpfJKvKUwzs8n6HDs7hVrEx600w5b3z4x8c2oNav3xiVGb1oTcb0J
-IyuvpuP+wemWc3Iohv3s0WGurb0jl8vlue4ubiVtFvGto4FBsceOx4WsXHe0
-XEq7mhQxhRGi1jMyBkLLYISsamoMt4aRYdCWQjetzNgIUdWMjIFxHWpo5VRP
-GSFB/iT3HzFRUbHf/dqsczDquBs6dcqXxfTOGy0F3tO9L6eudA5WX12+oOmn
-2eNn680vPeVbf93iurekXYmJ0j+cvOyGhNb3G9in4kneqau1MtWFb6azzj71
-xyytSNkVbPcW5bDbSw8E5Bs6hGiXxyX5Gzjulxo6G13WWCZspzE0oIkJjBC2
-npExEFoGI+TlCVvDyDDoSqGbVmZshLBqRsbAtA4lzZzqKSPSh4e54+YSdGxx
-vi9nktWk6Z/fEGt9gjfnfWb1v3vvddD7Rlk538l6IcczrVah8X+bcwx1AP3l
-uz7i2G3SbOPuxIB3VFw69W3Mnu1hZwRaza2vvKzqXGhK0VUaYbcUhUZcykpO
-TDqb+1iq7VO7fFuh/xTH6BOBc8cPedNmyaHbYtpXMJQxiRGC1jM+hq6PdC2D
-EbLyJK1hfBhdH1GTQjOtzNgIYdWMj6HrI0Z00M2pnjEiqz7rvXjMaKM6Nv70
-30strbdTu9bCpC3yrjZqvuZqaben5M/bGe4A+sureFaZvHbRjqx6Yx4DGton
-3i446cZbe6VBQVJeLrwQFH+vvYlO2O0PE+KzBY31t2Lm2H6aXk/8Fc25H48e
-6xGXL2x+nBPGGeNwuOyZEfU0DBNGDLUeFehaBiMEoVJpDSp0W8oLKKeVGRsh
-qRoVelwH7Zxi2kgnCtHlL4IzLjgTdGy5MMWD8+67U+cfFGhfVElurLQc656n
-fQ3WuVFD7pGAFX5fhoaH797q7brIc4mLi8+FWsLTC0EH0B9Y3ZXwHUmFLYRn
-c0VjbtRyjuXwIZ0MHbcgU0R+8sdFGR9YLbyup1oaYE8uezt57QzfF+I7YdgE
-3/AT91ppDJ+wurSZk5b+QnwnTXJj2WTniyJcXT6VN2GBvpamSk8YUUPWejSN
-ULKsBjUjuPgOP+JomcE7EcwaodcajEnRgFJaaWDGOUJWNWR0GJFTJs0R/Rs1
-Xd/j/0PtE8KWb879ZNIHcd+6e155ohWxVPC13ZsOiZU6WmWViXOtF5+ukqn/
-pag5w6XyUJhWB8CarkcGnFSfSDGpSGpAmLQsdraVy6G8OhmFXcpr0nzXn1d1
-Unn1cZ59oO4Ipftht91LiMyoUQUjq4h3cthzl1gXJspw5wWXdsahuhLncvY9
-MPrpJvNGKLYeLSMULXcnbAaNKGqSCW6+90COUN6EUSl008qMc4Ri1ZDS8QIa
-4yXT5Yh+WosO+iapLuEIQ+q4G/L+1N3pe92PPNK+2BP/vGTUyL/rmUUjyfeY
-xEupfd6Citrz7hOnRRB3J0xSmpWwYeJQq40JWaUS8sOTVBD5/kjraVwVjg5c
-LwMTAMS/rHpnSth9qh1ZWpG82W1VCJ8f7B2UQTzG6kJWnx3vpwp78+kHbRSG
-9rKatG1uXjtjEmMC1x/Ke0p6k0BamRq8cV/88aSobf78m924S8y8EWqtR88I
-Nct/Bh0jxCnZA0aUFFuDYSk008qMc4Ra1dDSoY6bXk51M0ckBcvHvdFfk8E2
-/z29Sh/GrzpY3PkEj+i0hdWe/cDa/cIJj023dKbkP/2n8wiLFQW6U/Xx1pJv
-FtrMcPMLCvtq5+eePuHp1b0xC7Ltt43jB/QfrL7SHjJsose1pl4IgnGILb8A
-jPQgL4281u/Vfq+jbUTJCimQI6hBkCO4VFRV8YcmFY8bZS9Ol005bqM6XwL1
-X/7KS9e9hdpS4DV5RvwP6zx/qNP5rDnX5W+jFv+se+uyQ7D/I6fwQipnZgbB
-RRdnjuX0nZ9tGwmh5S7ASA/ywkhZAd/egpdSjLIRJTukQI6gBqUcIYbgauvZ
-w4MOU/x/OOB+QM8k9/aSwHdGOJ4S6s7FrDrhaTlw4Jj35q3YeuC7HwX0nhWa
-jKacRRaWXulCSreIzRsw0vOQPNtCw4iSZVIIQMQIq3QY82yrE5nop+Rv1owf
-OmHd/2XX67QU3pA1Z/jrfx3+toe+GSd4Y7bLKMtV2ncP5fVXIv1D+KmZ55Ki
-QjZ4OI4eZOESXUxnVpeJwNt+57vbDh8wcFDnfBwL52NVZj6EMQQY6Q2wxpzt
-PsElet+FgIwRJcukGAQZI6zSQZQjjKEQnuaNejdS8KdbwK23fWx5GpdgmPhG
-iO3bbiQTWQHmACOoAUZQA4ywCNV5y3ks589T4NuKttjYbM0Xd41TMPHPu3hu
-J6tZcdGLJGAENcAIaoARNoE1Znu+w02o0LSLSe4cWef6iW9gaFQsPybq4H7+
-xXIGXxUGkAJGUAOMoAYYYRXSBwecHPaS/CgQAAAAABABby6I3Pn/laZ/8RQA
-AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGYE3pA1z95fvWh0x90w3nyy
-t0XSLY9IDChUkyKIhMp0GIhUkwoohIpg8/aiEYDttBUGTHXJbsQxUeayGV/c
-1l3vpJvlEYkBhWpSBJFQmQ4DkWpSAYVQEWzeXjQCsByF8PtZM6Ifie9Hzlp8
-Wvh8vIS3FMb5+QQdjt29Ym3Cg3bS8pj4ZtSa1XvjEqM3rYm43kT7Hc169olJ
-is5+/Zn95Pl61rvUG4OajvsHp+tf/FTfJs8eHeba2jtyuVye6+7iVrLymPjW
-0cCg2GPH40JWrjtaztiqP6YwosZwaxgZBm0pRB2DZUaIqmZkDIzrUEMrp3rK
-CMB2Wgq8p3tfTl3pHKy+3u+k9dctrntL2pWYKP3Dycu0lubUU17xJO/U1VqZ
-Em/IdNYpb2QMKpp+MrR0i/7y0oqUXcF2b1HepL30QEC+oYO6dnlckr+B436p
-oTPXZY1lQgZfMWMCI0qS1jAyDCVNKYQdg11GCKtmZAxKhnUoaeZUDxoBWI6s
-nO9kvZDjmVaru0JXOZ9jt0mzFxsqj3dUXDr1bcye7WFnBEZ0Vv0xGF5xTF95
-WdW50JSiqzQ2aSkKjbiUlZyYdDb3sVQ7aO3ybYX+UxyjTwTOHT/kTZslh253
-Y51xMkxhhKQ1jA+DnhSijsEuI4RVMz4GRnXQzakeNAKwEUzaIu/qtc3XXC3t
-9mgvhq1UPqtMXrtoR1a99oNWQ+XxdsFJN97aKw06qU2O3n0SLJSpU14uvBAU
-f6+9icYmyvaHCfHZgsb6WzFzbD9Nr1cQlm/O/Xj0WI+4fGHz45wwzhiHw2Wm
-fXGWSY2QtwYVui3lBYY6BpuMkFSNCj2ug3ZOMW0EYBPyhtwjASv8vgwND9+9
-1dt1kecSFxefC7WE837kdVfCdyQV0ltLFBdlfGC1UN/alc9RNOZGLedYDh/S
-ydBxCzJFhLsnSEktsCeXvZ28dobvC/GdMGyCb/iJe3RWksPq0mZOWkqyiI/k
-xrLJzhdFuLp8Km/CgjyD1SSHWSP0WoMxKRqQdQxtTG8EF9/hRxwtM/hu6R7L
-EbKqIaPDiJwyqRGA1cgqE+daLz5d9XwVE0XNGS7pY3qs6XpkwElBZ4/CpCIp
-WVrKa9J8159Xpbi8+jjPPlB3fPccaVnsbCuXQ3l1VFfLMSIl6WzSdi8hMqNG
-FYysIt7JYQ/J6/IxUYY7L7i0s26ycj6Xs++B0c+bmTfyAgqtwagUih3jJQwa
-IV5nnHkjFKuGlA7aX2FCIwDLkeR7TOKl1D7PK0XtefeJ0yKID7lSQeT7I62n
-cVU4OnC9yKdYSCuSN7utCuHzg72DMgyNUMW/rHpnSth9igd7TFKalbBh4lCr
-jQlZpRJqh2lZfXa8n2qTzacftFG42JLVpG1z89oZkxgTuP5Q3lPS2zbSytTg
-jfvijydFbfPn3+zGffseMKKk2BoMS6HUMTRCZs4I8UGSeSPUqoaWDnXc9HLK
-ZEYAloO3lnyz0GaGm19Q2Fc7P/f0CU+v7o15qW2/bRw/oP9g9b2PIcMmelxr
-6oUgGEdSsHzcG/01GWyjM6xFxIiSFVJeGnmt36v9XkfbCAt0KCkaAVhOh2D/
-R07hhVTGSgyCiy7OHMsx+x/S41JRVcUfmlQ8bpRpNT0aRpTskPLCSFkB396C
-l1KMshE26FBSNAKwHFnVCU/LgQPHvDdvxdYD3/0ooPcE2WQ05SyysPRKF1K9
-aW/GIGJEySYpJM+20DDCHh1KuEkIECCvvxLpH8JPzTyXFBWywcNx9CALl+hi
-OvPsTATe9jvf3Xb4gIGDOmdIWTgfqzLzQaUhkDGiZJMUrDFnu09wid63UyBj
-hD06lMRGAHbTetvHlndK+PIJMCa+EWL7thvJ1GKAOcAIaoARAECKtqItNjZb
-88VdI0dM/PMuntvJalbchkASMIIaYAQA0AKT3DmyzvUT38DQqFh+TNTB/fyL
-5fCqsN4EjKAGGAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgN3gDVnz7P3V
-q9x13A3jzSd7tQzd8oiEgUg1qYBCqAg2bx8yYtwmJg8DtfIAYDLaCgOmumQ3
-4pgoc9mML263mLo8ImEgUk0qoBAqgs3bh4wYt4nJ94lOeUxS8kPGg955Ewxg
-jiiE38+aEf1IfD9y1uLTwufjJUx8M2rN6r1xidGb1kRcb8LIyqvpuH9wOukq
-RXTCwCRFZ7/+zH7y/Fw9+9QXBt5SGOfnE3Q4dveKtQkP2knLP3t0mGtr78jl
-cnmuu4tbycpj4ltHA4Nijx2PC1m57mg5Y68IN4URoqoZGQPjOtQY7kWIGaEf
-bZ+UQrPjGTIiFRyY4cwvh8WOARPRUuA93fty6krnYPX1fieKJ3mnrtbKlHhD
-pvPkZVprCekpr+xcyidlV7DdW8YvAa9/t00/GVqiTk/51l+3uO4taVdiovQP
-qYTdXnogIN9QvNrlcUn+Bo77pYbOxJU1lgkZ/D2qCYwQVs3IGJQM61CS9CK0
-jNCNVtk3pdDqeARG5I9PzrJd+e+ncMEFmARZOd/JeiHHM61WY+06vKPi0qlv
-Y/ZsDzsj0Doc6CsvqzoXmlJ01Yj1wYnDIFhZVX/5ro84dps0M1t/+Zai0IhL
-WcmJSWdzH0u180m7fFuh/xTH6BOBc8cPedNmyaHb3VgmkgwTGCGsmtExMKuD
-rBchZoRmtMo+KoVOxyMyoqg9O2v8rO+F8PwLMBpM2iLv6oLN11wt7fbortOG
-twtOuvHWXmnQ6vM65eXCC0Hx99qbaKwPrge9YRAsCG4o7GeVyWsX7ciq184P
-3fLtDxPiswWN9bdi5th+ml5PXM3m3I9Hj/WIyxc2P84J44xxOFxm2jseJjVC
-UjUq9LgO8l6EkhHa0Sr7pJQXUOx4hEZU11uOY6YnVsJ5C6CEvCH3SMAKvy9D
-w8N3b/V2XeS5xMXF5wKFRblxUcYHVguviwkLYU8uezt57QzfF+I7YdgE3/AT
-94gevSoac6OWcyyHqxdwHTpuQaaIcIxMkJJ6kdddCd+RVEhvvSSsLm3mpKUk
-b/yW3Fg22fmiCFeXT+VNWJBH3CzEYTJqRAOyqiGjg14vUkPLCC6+w484WtZh
-MFJaRoyIVnPrviJFA0odj9hIx71Qm5G85BojTtcA65BVJs61Xny66vkLrRU1
-Z7hkEyfkNWm+68+rUlZefZxnT3m9bArpIy2LnW3lciivjurbtWmlJNZ0PTLg
-pKDz0IRJRVKytGy7lxCZUaOKRFYR7+Sw567BQ9rznYsy3HnBpZ1tISvnczn7
-Hhg9A4B5IxSrhpQO2l9BywjJMpG0jdCOtm9KodfxSIw0X1s4ysIDFoQBKCDJ
-95jES6l93kEVtefdJ06LIDnkSiuSN7utCuHzg72DMihcA6iQ1WfH+00carX5
-9APDS5uLf1n1zpSw+xSP95ikNCthg2qfGxOySiXkRz2pIPL9kdbTuCocHbhe
-N8jSQ1aTts3Na2dMYkzg+kN5T0kHgdLK1OCN++KPJ0Vt8+ff7MaTFOaNUKsa
-WjrUcVPpRRpfQd0I8WnLCCP0o+2TUmh2PEIjHXdDrEdM+4c5r30JmAq8teSb
-hTYz3PyCwr7a+bmnT3h6NWMzhYlp+23j+AH9B6vvfQwZNtHjWlPvxMEgkoLl
-497or8lgG50xKiJGWKBDqWHktX6v9nsdbSNK85byrOybKSPe3S/opaYF+hId
-gv0fOYUXUhkPMgsuujhzLMe8f0uPS0VVFX9oUvG4UabV9GgYYYMO5UsjZQV8
-ewteSjHKRpRmLkV6P8x2hH3cH7D+JkCKrOqEp+XAgWPem7di64HvfhTQexRr
-SppyFllYeqUL2d5tETHCKh0kz7bQMKI0bymSXzzG/O3jfz3t7TgA5JHXX4n0
-D+GnZp5LigrZ4OE4epCFS3Rx77xmBW/7ne9uO3zAwEGdM6QsnI+x8i43MkZY
-pQNrzNnuE1yi99UUyBhRmrUUqSDSbsR7pv6ZAmCGtN72seWdEr58/IuJb4TY
-vu0Gs3l6DTCCGmCkR8Dqz384ctKXpRTnJQMspq1oi43N1nxx18gRE/+8i+d2
-stoc70H0DcAIaoCRngB/+q8llja7foezFkAOJrlzZJ3rJ76BoVGx/Jiog/v5
-F8sZfHkbQAoYQQ0wwjz4038utXI6AtMxAAAAgD6Aojb17+/75jTBYAAAAABA
-H+xpXtiuNLOcHgkAAAAAAFr8B81C2Lw=
- "], {{0, 64}, {573, 0}}, {0, 255},
- ColorFunction->RGBColor],
- BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
- Selectable->False],
- BaseStyle->"ImageGraphics",
- ImageSize->Automatic,
- ImageSizeRaw->{573, 64},
- PlotRange->{{0, 573}, {0, 64}}]], "Output",
- ImageSize->{577, 64},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellLabel->"Out[7]=",
- CellID->1134360499]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -697,7 +450,7 @@ Cell[BoxData[
RowBox[{"GS", "[",
RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[8]:=",
+ CellLabel->"In[5]:=",
CellID->458206387],
Cell[BoxData[
@@ -792,12 +545,11 @@ Cell[BoxData[
FormBox["s",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{323, 18},
+ ImageSize->{357, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[8]=",
- CellID->1197967590]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -816,7 +568,7 @@ Cell[BoxData[
RowBox[{"GA", "[", "\[Mu]", "]"}]}], ",",
RowBox[{"Factoring", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[9]:=",
+ CellLabel->"In[6]:=",
CellID->1692893205],
Cell[BoxData[
@@ -839,12 +591,11 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{106, 21},
+ ImageSize->{117, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[9]=",
- CellID->876711937]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -856,138 +607,45 @@ Cell[BoxData[
RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ",",
RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[10]:=",
+ CellLabel->"In[7]:=",
CellID->18313474],
Cell[BoxData[
FormBox[
RowBox[{"4", " ",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{50, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"TR", "Tr"},
- CellLabel->"Out[10]=",
- CellID->1133602947]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->{"TR", "Tr"},
- CellLabel->"In[11]:=",
- CellID->288461758],
-
-Cell[BoxData[
- RowBox[{"4", " ",
- RowBox[{"MT", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}]}]], "Output",
- ImageSize->{83, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"TR", "Tr"},
- CellLabel->"Out[11]//StandardForm=",
- CellID->749025554]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"TR", "[",
- RowBox[{
- RowBox[{
- RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
- RowBox[{"GA", "[", "\[Alpha]", "]"}], ".",
- RowBox[{"GA", "[", "\[Beta]", "]"}], ".",
- RowBox[{"GAD", "[", "\[Mu]", "]"}]}], ",",
- RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->{"TR", "Tr"},
- CellLabel->"In[12]:=",
- CellID->1390091586],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"4", " ", "D", " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{65, 19},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->{"TR", "Tr"},
- CellLabel->"Out[12]=",
- CellID->395116332]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->{"TR", "Tr"},
- CellLabel->"In[13]:=",
- CellID->1345196880],
-
-Cell[BoxData[
- RowBox[{"4", " ", "D", " ",
- RowBox[{"MT", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}]}]], "Output",
- ImageSize->{97, 15},
+ ImageSize->{51, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[13]//StandardForm=",
- CellID->1804637060]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
- RowBox[{
- RowBox[{"SUNT", "[", "b", "]"}], ".",
- RowBox[{"SUNT", "[", "c", "]"}]}], " ",
- RowBox[{"SUNDelta", "[",
- RowBox[{"c", ",", "b"}], "]"}]}]}]], "Input",
+ RowBox[{"SUNT", "[", "b", "]"}], ".",
+ RowBox[{"SUNT", "[", "c", "]"}]}], " ",
+ RowBox[{"SUNDelta", "[",
+ RowBox[{"c", ",", "b"}], "]"}]}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[14]:=",
+ CellLabel->"In[8]:=",
CellID->496024133],
Cell[BoxData[
@@ -1023,92 +681,77 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{122, 19},
+ ImageSize->{138, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[14]=",
- CellID->868021023]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TR", "[",
- RowBox[{"t", ",",
+ RowBox[{"%", ",",
RowBox[{"SUNTrace", "\[Rule]", "False"}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[15]:=",
+ CellLabel->"In[9]:=",
CellID->1457315131],
Cell[BoxData[
FormBox[
RowBox[{"4", " ",
SubscriptBox["C", "F"], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{70, 17},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{74, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[15]=",
- CellID->1886506871]
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TR", "[",
- RowBox[{"t", ",",
+ RowBox[{"%%", ",",
RowBox[{"SUNTrace", "\[Rule]", "True"}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[16]:=",
+ CellLabel->"In[10]:=",
CellID->73677015],
Cell[BoxData[
FormBox[
RowBox[{"4", " ",
SubscriptBox["C", "F"], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{70, 17},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{74, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[16]=",
- CellID->300302100]
+ CellLabel->"Out[10]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1119,17 +762,16 @@ Cell[BoxData[
RowBox[{"SUNTrace", "\[Rule]", "False"}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[17]:=",
+ CellLabel->"In[11]:=",
CellID->1407727695],
Cell[BoxData[
FormBox["4", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[17]=",
- CellID->120665714]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1140,17 +782,16 @@ Cell[BoxData[
RowBox[{"SUNTrace", "\[Rule]", "True"}], ",",
RowBox[{"SUNNToCACF", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->{"TR", "Tr"},
- CellLabel->"In[18]:=",
+ CellLabel->"In[12]:=",
CellID->806303782],
Cell[BoxData[
FormBox["4", TraditionalForm]], "Output",
- ImageSize->{13, 15},
+ ImageSize->{13, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->{"TR", "Tr"},
- CellLabel->"Out[18]=",
- CellID->1048410919]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1160,46 +801,32 @@ Cell[BoxData[
RowBox[{"GA", "[",
RowBox[{"m", ",", "n"}], "]"}], "]"}]], "Input",
CellTags->"Tr",
- CellLabel->"In[19]:=",
+ CellLabel->"In[13]:=",
CellID->864240014],
Cell[BoxData[
FormBox[
RowBox[{"4", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["m",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["n",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{53, 17},
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["m",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["n",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{55, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tr",
- CellLabel->"Out[19]=",
- CellID->1937521482]
+ CellLabel->"Out[13]="]
+}, Open ]]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[", "t", "]"}], ";"}]], "Input",
- CellTags->{"TR", "Tr"},
- CellLabel->"In[20]:=",
- CellID->1619609299],
-
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -1219,7 +846,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
@@ -1244,9 +870,7 @@ Cell[TextData[{
ButtonNote->"SUNTrace"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->{"TR", "Tr"},
- CellID->1296151753]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1263,10 +887,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 26.969497}",
+ "built" -> "{2020, 1, 5, 19, 3, 42.859189}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1275,16 +899,16 @@ TaggingRules->{
"TR[exp] calculates the Dirac trace of exp. Depending on the setting of \
the option SUNTrace also a trace over SU(N) objects is performed. The \
Mathematica build-in function Tr is overloaded to call TR if any of \
-DiracGamma, DiracSlash, GA, GAD, GS or GSD are in the expression. Tr[list] \
-finds the trace of the matrix or tensor list. Tr[list, f] finds a generalized \
-trace, combining terms with f instead of Plus. Tr[list, f, n] goes down to \
-level n in list. Tr[expression ] calculates the DiracTrace, i.e., \
-TR[expression ] if any of DiracGamma, DiracSlash, GA, GAD, GS or GSD is \
-present in expression.", "synonyms" -> {}, "title" -> "TR", "titlemodifier" ->
+DiracGamma, GA, GAD, GS or GSD are in the expression. Tr[list] finds the \
+trace of the matrix or tensor list. Tr[list, f] finds a generalized trace, \
+combining terms with f instead of Plus. Tr[list, f, n] goes down to level n \
+in list. Tr[expression ] calculates the DiracTrace, i.e., TR[expression ] if \
+any of DiracGamma, GA, GAD, GS or GSD is present in expression.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TR", "titlemodifier" ->
"", "windowtitle" -> "TR", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/TR"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1293,7 +917,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1302,457 +926,271 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3939, 106, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[7183, 210, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->432077144]},
+ CellID->274607088]},
"TR"->{
- Cell[4550, 133, 79, 2, 35, "Subsubsection",
- CellTags->{"TR", "Tr"},
- CellID->1530902763],
- Cell[4654, 139, 155, 5, 27, "Input",
+ Cell[7815, 239, 155, 5, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1115707365],
- Cell[4812, 146, 583, 24, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->69652991],
- Cell[5432, 175, 123, 4, 27, "Input",
+ Cell[7973, 246, 564, 23, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[8574, 274, 123, 4, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->796428219],
- Cell[5558, 181, 601, 25, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->924683987],
- Cell[6196, 211, 400, 13, 27, "Input",
+ Cell[8700, 280, 448, 18, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[9185, 303, 400, 13, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->934056232],
- Cell[6599, 226, 2735, 112, 42, "Output",
- CellTags->{"TR", "Tr"},
- CellID->918332859],
- Cell[9371, 343, 231, 7, 27, "Input",
+ Cell[9588, 318, 2027, 83, 42, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[11652, 406, 231, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1809199539],
- Cell[9605, 352, 672, 27, 39, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1839075278],
- Cell[10314, 384, 473, 14, 62, "Input",
- CellTags->{"TR", "Tr"},
- CellID->476260756],
- Cell[10790, 400, 6267, 111, 75, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->327034179],
- Cell[17094, 516, 116, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1811278693],
- Cell[17213, 522, 581, 9, 122, "Print",
- CellTags->{"Info-1f727a11-0560-42a1-a906-fd285e6773a9", "Tr", "TR"},
- CellID->756420129],
- Cell[17831, 536, 516, 16, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->346772021],
- Cell[18350, 554, 7764, 135, 78, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->1134360499],
- Cell[26151, 694, 196, 6, 27, "Input",
+ Cell[11886, 415, 676, 27, 35, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[12599, 447, 196, 6, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->458206387],
- Cell[26350, 702, 2545, 97, 39, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1197967590],
- Cell[28932, 804, 470, 15, 27, "Input",
+ Cell[12798, 455, 2524, 96, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[15359, 556, 470, 15, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1692893205],
- Cell[29405, 821, 647, 25, 42, "Output",
- CellTags->{"TR", "Tr"},
- CellID->876711937],
- Cell[30089, 851, 249, 8, 27, "Input",
+ Cell[15832, 573, 627, 24, 42, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[16496, 602, 248, 8, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->18313474],
- Cell[30341, 861, 659, 27, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1133602947],
- Cell[31037, 893, 130, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->288461758],
- Cell[31170, 899, 286, 9, 49, "Output",
- CellTags->{"TR", "Tr"},
- CellID->749025554],
- Cell[31493, 913, 374, 11, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1390091586],
- Cell[31870, 926, 668, 27, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->395116332],
- Cell[32575, 958, 131, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1345196880],
- Cell[32709, 964, 297, 9, 49, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1804637060],
- Cell[33043, 978, 365, 12, 27, "Input",
+ Cell[16747, 612, 498, 20, 39, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[17282, 637, 334, 11, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->496024133],
- Cell[33411, 992, 916, 38, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->868021023],
- Cell[34364, 1035, 241, 7, 27, "Input",
+ Cell[17619, 650, 895, 37, 40, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[18551, 692, 240, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1457315131],
- Cell[34608, 1044, 636, 26, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1886506871],
- Cell[35281, 1075, 238, 7, 27, "Input",
+ Cell[18794, 701, 481, 19, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[19312, 725, 239, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->73677015],
- Cell[35522, 1084, 635, 26, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->300302100],
- Cell[36194, 1115, 241, 7, 27, "Input",
+ Cell[19554, 734, 482, 19, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[20073, 758, 241, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1407727695],
- Cell[36438, 1124, 212, 7, 36, "Output",
- CellTags->{"TR", "Tr"},
- CellID->120665714],
- Cell[36687, 1136, 239, 7, 27, "Input",
+ Cell[20317, 767, 192, 6, 35, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[20546, 778, 239, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->806303782],
- Cell[36929, 1145, 213, 7, 36, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1048410919],
- Cell[37958, 1193, 146, 5, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1619609299],
- Cell[38460, 1220, 761, 28, 32, "Text",
- CellTags->{"TR", "Tr"},
- CellID->1296151753]},
+ Cell[20788, 787, 192, 6, 35, "Output",
+ CellTags->{"TR", "Tr"}]},
"Tr"->{
- Cell[4550, 133, 79, 2, 35, "Subsubsection",
- CellTags->{"TR", "Tr"},
- CellID->1530902763],
- Cell[4654, 139, 155, 5, 27, "Input",
+ Cell[7815, 239, 155, 5, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1115707365],
- Cell[4812, 146, 583, 24, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->69652991],
- Cell[5432, 175, 123, 4, 27, "Input",
+ Cell[7973, 246, 564, 23, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[8574, 274, 123, 4, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->796428219],
- Cell[5558, 181, 601, 25, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->924683987],
- Cell[6196, 211, 400, 13, 27, "Input",
+ Cell[8700, 280, 448, 18, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[9185, 303, 400, 13, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->934056232],
- Cell[6599, 226, 2735, 112, 42, "Output",
- CellTags->{"TR", "Tr"},
- CellID->918332859],
- Cell[9371, 343, 231, 7, 27, "Input",
+ Cell[9588, 318, 2027, 83, 42, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[11652, 406, 231, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1809199539],
- Cell[9605, 352, 672, 27, 39, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1839075278],
- Cell[10314, 384, 473, 14, 62, "Input",
- CellTags->{"TR", "Tr"},
- CellID->476260756],
- Cell[10790, 400, 6267, 111, 75, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->327034179],
- Cell[17094, 516, 116, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1811278693],
- Cell[17213, 522, 581, 9, 122, "Print",
- CellTags->{"Info-1f727a11-0560-42a1-a906-fd285e6773a9", "Tr", "TR"},
- CellID->756420129],
- Cell[17831, 536, 516, 16, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->346772021],
- Cell[18350, 554, 7764, 135, 78, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->1134360499],
- Cell[26151, 694, 196, 6, 27, "Input",
+ Cell[11886, 415, 676, 27, 35, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[12599, 447, 196, 6, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->458206387],
- Cell[26350, 702, 2545, 97, 39, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1197967590],
- Cell[28932, 804, 470, 15, 27, "Input",
+ Cell[12798, 455, 2524, 96, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[15359, 556, 470, 15, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1692893205],
- Cell[29405, 821, 647, 25, 42, "Output",
- CellTags->{"TR", "Tr"},
- CellID->876711937],
- Cell[30089, 851, 249, 8, 27, "Input",
+ Cell[15832, 573, 627, 24, 42, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[16496, 602, 248, 8, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->18313474],
- Cell[30341, 861, 659, 27, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1133602947],
- Cell[31037, 893, 130, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->288461758],
- Cell[31170, 899, 286, 9, 49, "Output",
- CellTags->{"TR", "Tr"},
- CellID->749025554],
- Cell[31493, 913, 374, 11, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1390091586],
- Cell[31870, 926, 668, 27, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->395116332],
- Cell[32575, 958, 131, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1345196880],
- Cell[32709, 964, 297, 9, 49, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1804637060],
- Cell[33043, 978, 365, 12, 27, "Input",
+ Cell[16747, 612, 498, 20, 39, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[17282, 637, 334, 11, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->496024133],
- Cell[33411, 992, 916, 38, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->868021023],
- Cell[34364, 1035, 241, 7, 27, "Input",
+ Cell[17619, 650, 895, 37, 40, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[18551, 692, 240, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1457315131],
- Cell[34608, 1044, 636, 26, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1886506871],
- Cell[35281, 1075, 238, 7, 27, "Input",
+ Cell[18794, 701, 481, 19, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[19312, 725, 239, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->73677015],
- Cell[35522, 1084, 635, 26, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->300302100],
- Cell[36194, 1115, 241, 7, 27, "Input",
+ Cell[19554, 734, 482, 19, 37, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[20073, 758, 241, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1407727695],
- Cell[36438, 1124, 212, 7, 36, "Output",
- CellTags->{"TR", "Tr"},
- CellID->120665714],
- Cell[36687, 1136, 239, 7, 27, "Input",
+ Cell[20317, 767, 192, 6, 35, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[20546, 778, 239, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->806303782],
- Cell[36929, 1145, 213, 7, 36, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1048410919],
- Cell[37179, 1157, 174, 6, 27, "Input",
+ Cell[20788, 787, 192, 6, 35, "Output",
+ CellTags->{"TR", "Tr"}],
+ Cell[21017, 798, 174, 6, 27, "Input",
CellTags->"Tr",
CellID->864240014],
- Cell[37356, 1165, 587, 25, 38, "Output",
- CellTags->"Tr",
- CellID->1937521482],
- Cell[37958, 1193, 146, 5, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1619609299],
- Cell[38460, 1220, 761, 28, 32, "Text",
- CellTags->{"TR", "Tr"},
- CellID->1296151753]},
- "RasterizedOutput"->{
- Cell[10790, 400, 6267, 111, 75, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->327034179],
- Cell[18350, 554, 7764, 135, 78, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->1134360499]},
- "Info-1f727a11-0560-42a1-a906-fd285e6773a9"->{
- Cell[17213, 522, 581, 9, 122, "Print",
- CellTags->{"Info-1f727a11-0560-42a1-a906-fd285e6773a9", "Tr", "TR"},
- CellID->756420129]}
+ Cell[21194, 806, 433, 18, 37, "Output",
+ CellTags->"Tr"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 41581, 1303},
- {"TR", 41710, 1307},
- {"Tr", 45382, 1425},
- {"RasterizedOutput", 49237, 1549},
- {"Info-1f727a11-0560-42a1-a906-fd285e6773a9", 49515, 1556}
+ {"PrimaryExamplesSection", 25022, 927},
+ {"TR", 25151, 931},
+ {"Tr", 27081, 992}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 51, "AnchorBarGrid",
+Cell[574, 21, 3300, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 1055, 24, 195, "Usage",
+Cell[3877, 103, 279, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4181, 118, 1022, 23, 206, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3939, 106, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5228, 145, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->717093042],
+Cell[5969, 171, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[6025, 175, 85, 2, 70, "Input"],
+Cell[6113, 179, 1009, 24, 93, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7183, 210, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->432077144],
-Cell[4329, 123, 196, 6, 25, "ExampleSection",
- CellID->2108646959],
+ CellID->274607088],
Cell[CellGroupData[{
-Cell[4550, 133, 79, 2, 35, "Subsubsection",
- CellTags->{"TR", "Tr"},
- CellID->1530902763],
+Cell[7595, 229, 195, 6, 26, "ExampleSection",
+ CellID->535896717],
Cell[CellGroupData[{
-Cell[4654, 139, 155, 5, 27, "Input",
+Cell[7815, 239, 155, 5, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1115707365],
-Cell[4812, 146, 583, 24, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->69652991]
+Cell[7973, 246, 564, 23, 37, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[5432, 175, 123, 4, 27, "Input",
+Cell[8574, 274, 123, 4, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->796428219],
-Cell[5558, 181, 601, 25, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->924683987]
+Cell[8700, 280, 448, 18, 37, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[6196, 211, 400, 13, 27, "Input",
+Cell[9185, 303, 400, 13, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->934056232],
-Cell[6599, 226, 2735, 112, 42, "Output",
- CellTags->{"TR", "Tr"},
- CellID->918332859]
+Cell[9588, 318, 2027, 83, 42, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[9371, 343, 231, 7, 27, "Input",
+Cell[11652, 406, 231, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1809199539],
-Cell[9605, 352, 672, 27, 39, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1839075278]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10314, 384, 473, 14, 62, "Input",
- CellTags->{"TR", "Tr"},
- CellID->476260756],
-Cell[10790, 400, 6267, 111, 75, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->327034179]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[17094, 516, 116, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1811278693],
-Cell[17213, 522, 581, 9, 122, "Print",
- CellTags->{"Info-1f727a11-0560-42a1-a906-fd285e6773a9", "Tr", "TR"},
- CellID->756420129]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[17831, 536, 516, 16, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->346772021],
-Cell[18350, 554, 7764, 135, 78, "Output",
- CellTags->{"TR", "Tr", "RasterizedOutput"},
- CellID->1134360499]
+Cell[11886, 415, 676, 27, 35, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[26151, 694, 196, 6, 27, "Input",
+Cell[12599, 447, 196, 6, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->458206387],
-Cell[26350, 702, 2545, 97, 39, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1197967590]
+Cell[12798, 455, 2524, 96, 37, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[28932, 804, 470, 15, 27, "Input",
+Cell[15359, 556, 470, 15, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1692893205],
-Cell[29405, 821, 647, 25, 42, "Output",
- CellTags->{"TR", "Tr"},
- CellID->876711937]
+Cell[15832, 573, 627, 24, 42, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[30089, 851, 249, 8, 27, "Input",
+Cell[16496, 602, 248, 8, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->18313474],
-Cell[30341, 861, 659, 27, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1133602947]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[31037, 893, 130, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->288461758],
-Cell[31170, 899, 286, 9, 49, "Output",
- CellTags->{"TR", "Tr"},
- CellID->749025554]
+Cell[16747, 612, 498, 20, 39, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[31493, 913, 374, 11, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1390091586],
-Cell[31870, 926, 668, 27, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->395116332]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[32575, 958, 131, 4, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1345196880],
-Cell[32709, 964, 297, 9, 49, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1804637060]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[33043, 978, 365, 12, 27, "Input",
+Cell[17282, 637, 334, 11, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->496024133],
-Cell[33411, 992, 916, 38, 40, "Output",
- CellTags->{"TR", "Tr"},
- CellID->868021023]
+Cell[17619, 650, 895, 37, 40, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[34364, 1035, 241, 7, 27, "Input",
+Cell[18551, 692, 240, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1457315131],
-Cell[34608, 1044, 636, 26, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1886506871]
+Cell[18794, 701, 481, 19, 37, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[35281, 1075, 238, 7, 27, "Input",
+Cell[19312, 725, 239, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->73677015],
-Cell[35522, 1084, 635, 26, 38, "Output",
- CellTags->{"TR", "Tr"},
- CellID->300302100]
+Cell[19554, 734, 482, 19, 37, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[36194, 1115, 241, 7, 27, "Input",
+Cell[20073, 758, 241, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->1407727695],
-Cell[36438, 1124, 212, 7, 36, "Output",
- CellTags->{"TR", "Tr"},
- CellID->120665714]
+Cell[20317, 767, 192, 6, 35, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[36687, 1136, 239, 7, 27, "Input",
+Cell[20546, 778, 239, 7, 27, "Input",
CellTags->{"TR", "Tr"},
CellID->806303782],
-Cell[36929, 1145, 213, 7, 36, "Output",
- CellTags->{"TR", "Tr"},
- CellID->1048410919]
+Cell[20788, 787, 192, 6, 35, "Output",
+ CellTags->{"TR", "Tr"}]
}, Open ]],
Cell[CellGroupData[{
-Cell[37179, 1157, 174, 6, 27, "Input",
+Cell[21017, 798, 174, 6, 27, "Input",
CellTags->"Tr",
CellID->864240014],
-Cell[37356, 1165, 587, 25, 38, "Output",
- CellTags->"Tr",
- CellID->1937521482]
-}, Open ]],
-Cell[37958, 1193, 146, 5, 27, "Input",
- CellTags->{"TR", "Tr"},
- CellID->1619609299],
-Cell[38107, 1200, 31, 0, 29, "SectionFooterSpacer"]
+Cell[21194, 806, 433, 18, 37, "Output",
+ CellTags->"Tr"]
}, Open ]]
}, Open ]],
+Cell[21654, 828, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[38187, 1206, 270, 12, 31, "SeeAlsoSection",
+Cell[21722, 833, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[38460, 1220, 761, 28, 32, "Text",
- CellTags->{"TR", "Tr"},
- CellID->1296151753]
+Cell[21995, 847, 703, 25, 56, "SeeAlso"]
}, Open ]],
-Cell[39236, 1251, 23, 0, 42, "FooterCell"]
+Cell[22713, 875, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tdec.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tdec.nb
index ce24ee0c8..9cfaf1d3f 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tdec.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tdec.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 38473, 1448]
-NotebookOptionsPosition[ 33148, 1271]
-NotebookOutlinePosition[ 36628, 1375]
-CellTagsIndexPosition[ 36518, 1369]
+NotebookDataLength[ 38252, 1417]
+NotebookOptionsPosition[ 33570, 1268]
+NotebookOutlinePosition[ 36544, 1353]
+CellTagsIndexPosition[ 36434, 1347]
WindowTitle->Tdec
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Tdec\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Tdec"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Tdec.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$152374],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Tdec",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"TID\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TID"], "\<\"TIDL\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/TIDL"], "\<\"OneLoopSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoopSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Tdec\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Tdec"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Tdec.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$264194],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Tdec",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Tdec", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Tdec", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,9 +133,9 @@ Cell[BoxData[GridBox[{
RowBox[{"{",
RowBox[{"p1", ",", " ", "p2", ",", " ", "..."}], "}"}]}], "]"}]}]],
"InlineFormula"],
- " \[LineSeparator]",
- "or Tdec[exp, {{qi, mu}, {qj, nu}, ...}, {p1, p2, ...}] calculates the \
-tensorial decomposition formulas. The more common ones are saved in TIDL."
+ " \[LineSeparator]or Tdec[exp, {{qi, mu}, {qj, nu}, ...}, {p1, p2, ...}] \
+calculates the tensorial decomposition formulas for Lorentzian integrals. The \
+more common ones are saved in TIDL."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -110,39 +146,40 @@ tensorial decomposition formulas. The more common ones are saved in TIDL."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1647057939],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1466909563],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->390806926],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Options", "[", "Tdec", "]"}]], "Input",
CellTags->"Tdec",
- CellLabel->"In[1]:=",
+ CellLabel->"In[252]:=",
CellID->1946686101],
Cell[BoxData[
@@ -152,20 +189,53 @@ Cell[BoxData[
RowBox[{"FeynCalc`Package`BasisOnly", "\[Rule]", "False"}], ",",
RowBox[{"Dimension", "\[Rule]", "D"}], ",",
RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"Factoring", "\[Rule]", "Factor2"}], ",",
+ RowBox[{"Factoring", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Factor2", ",", "Factor"}], "}"}]}], ",",
RowBox[{"FeynCalcExternal", "\[Rule]", "True"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
RowBox[{"List", "\[Rule]", "True"}], ",",
RowBox[{"UseParallelization", "\[Rule]", "True"}], ",",
RowBox[{"UseTIDL", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{447, 54},
+ ImageSize->{470, 54},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tdec",
- CellLabel->"Out[1]=",
- CellID->635728207]
+ CellLabel->"Out[252]="]
+}, Open ]]
+}, Closed]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->326893928],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1039168438],
+
Cell[TextData[{
"Check that ",
Cell[BoxData[
@@ -187,9 +257,7 @@ Cell[TextData[{
RowBox[{"f", "(",
RowBox[{"p", ",", "q"}], ")"}],
RowBox[{"p", "\[CenterDot]", "q"}]}]}]}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"Tdec",
- CellID->1358527070],
+}], "Notes"],
Cell[CellGroupData[{
@@ -200,7 +268,7 @@ Cell[BoxData[
RowBox[{"q", ",", "\[Mu]"}], "}"}], ",",
RowBox[{"{", "p", "}"}]}], "]"}]], "Input",
CellTags->"Tdec",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->1371643363],
Cell[BoxData[
@@ -234,26 +302,21 @@ Cell[BoxData[
FractionBox[
RowBox[{"X1", " ",
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], "X2"]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{216, 44},
+ ImageSize->{228, 37},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tdec",
- CellLabel->"Out[2]=",
- CellID->1644480081]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -265,7 +328,7 @@ Cell[BoxData[
RowBox[{"%", "[",
RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
CellTags->"Tdec",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1861786454],
Cell[BoxData[
@@ -308,11 +371,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{72, 49},
+ ImageSize->{80, 42},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tdec",
- CellLabel->"Out[3]=",
+ CellLabel->"Out[2]=",
CellID->920674629]
}, Open ]],
@@ -343,80 +406,57 @@ Cell[TextData[{
SubsuperscriptBox["q", "2", "\[Nu]"],
SubsuperscriptBox["q", "3", "\[Rho]"]}], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"Tdec",
- CellID->2118815883],
+}], "Notes"],
+
+Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"t", "=",
- RowBox[{"Tdec", "[",
+ RowBox[{"Tdec", "[",
+ RowBox[{
+ RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
- RowBox[{"{",
- RowBox[{
- SubscriptBox["q", "1"], ",", "\[Mu]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- SubscriptBox["q", "2"], ",", "\[Nu]"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- SubscriptBox["q", "3"], ",", "\[Rho]"}], "}"}]}], "}"}], ",",
- RowBox[{"{", "p", "}"}]}], "]"}]}], ";"}]], "Input",
+ SubscriptBox["q", "1"], ",", "\[Mu]"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "2"], ",", "\[Nu]"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "3"], ",", "\[Rho]"}], "}"}]}], "}"}], ",",
+ RowBox[{"{", "p", "}"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"Tdec",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->739868135],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"t", "[",
- RowBox[{"[", "2", "]"}], "]"}], "/.",
- RowBox[{"t", "[",
- RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
- CellTags->"Tdec",
- CellLabel->"In[5]:=",
- CellID->1848782179],
-
Cell[BoxData[
FormBox[
RowBox[{
FractionBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox["p",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], " ",
RowBox[{"(",
FormBox[
@@ -524,37 +564,27 @@ Cell[BoxData[
FractionBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox["p",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], " ",
RowBox[{"(",
FormBox[
@@ -662,37 +692,27 @@ Cell[BoxData[
FractionBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox["p",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], " ",
RowBox[{"(",
FormBox[
@@ -812,49 +832,37 @@ Cell[BoxData[
TraditionalForm], "3"]}]],
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
RowBox[{"(",
RowBox[{
@@ -1128,12 +1136,11 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ")"}]}]}], ")"}]}]}]}],
TraditionalForm]], "Output",
- ImageSize->{518, 258},
+ ImageSize->{562, 223},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tdec",
- CellLabel->"Out[5]=",
- CellID->1940044369]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1151,7 +1158,7 @@ Cell[BoxData[
RowBox[{"p", ",", "\[Rho]"}], "]"}]}], "]"}], "//", "Factor"}]], "Input",\
CellTags->"Tdec",
- CellLabel->"In[6]:=",
+ CellLabel->"In[4]:=",
CellID->1116880881],
Cell[BoxData[
@@ -1208,20 +1215,12 @@ Cell[BoxData[
FormBox["3",
TraditionalForm]],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- ImageSize->{151, 17},
+ ImageSize->{165, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tdec",
- CellLabel->"Out[6]=",
- CellID->902166348]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[", "t", "]"}], ";"}]], "Input",
- CellTags->"Tdec",
- CellLabel->"In[7]:=",
- CellID->1835029182]
+ CellLabel->"Out[4]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -1262,9 +1261,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Tdec",
- CellID->562924165]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -1281,10 +1278,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 53.552505}",
+ "built" -> "{2020, 1, 5, 19, 3, 6.786373}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -1292,12 +1289,12 @@ TaggingRules->{
"None", "summary" ->
"Tdec[{q, mu}, {p}]; Tdec[{{qi, mu}, {qj, nu}, ...}, {p1, p2, ...}] or \
Tdec[exp, {{qi, mu}, {qj, nu}, ...}, {p1, p2, ...}] calculates the tensorial \
-decomposition formulas. The more common ones are saved in TIDL.",
- "synonyms" -> {}, "title" -> "Tdec", "titlemodifier" -> "", "windowtitle" ->
- "Tdec", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Tdec"},
- "SearchTextTranslated" -> ""},
+decomposition formulas for Lorentzian integrals. The more common ones are \
+saved in TIDL.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Tdec",
+ "titlemodifier" -> "", "windowtitle" -> "Tdec", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Tdec"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -1306,7 +1303,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -1314,142 +1311,114 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3925, 112, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1647057939]},
"Tdec"->{
- Cell[4558, 141, 126, 4, 27, "Input",
+ Cell[5922, 178, 128, 4, 70, "Input",
CellTags->"Tdec",
CellID->1946686101],
- Cell[4687, 147, 680, 18, 75, "Output",
- CellTags->"Tdec",
- CellID->635728207],
- Cell[5382, 168, 629, 23, 49, "Text",
- CellTags->"Tdec",
- CellID->1358527070],
- Cell[6036, 195, 220, 8, 27, "Input",
+ Cell[6053, 184, 771, 20, 75, "Output",
+ CellTags->"Tdec"],
+ Cell[8111, 263, 220, 8, 27, "Input",
CellTags->"Tdec",
CellID->1371643363],
- Cell[6259, 205, 1268, 50, 65, "Output",
- CellTags->"Tdec",
- CellID->1644480081],
- Cell[7564, 260, 217, 8, 27, "Input",
+ Cell[8334, 273, 1146, 45, 58, "Output",
+ CellTags->"Tdec"],
+ Cell[9517, 323, 217, 8, 27, "Input",
CellTags->"Tdec",
CellID->1861786454],
- Cell[7784, 270, 1035, 45, 70, "Output",
+ Cell[9737, 333, 1035, 45, 63, "Output",
CellTags->"Tdec",
CellID->920674629],
- Cell[8834, 318, 797, 29, 60, "Text",
- CellTags->"Tdec",
- CellID->2118815883],
- Cell[9634, 349, 546, 19, 27, "Input",
+ Cell[11570, 412, 525, 18, 27, "Input",
CellTags->"Tdec",
CellID->739868135],
- Cell[10205, 372, 217, 8, 27, "Input",
- CellTags->"Tdec",
- CellID->1848782179],
- Cell[10425, 382, 19831, 753, 279, "Output",
- CellTags->"Tdec",
- CellID->1940044369],
- Cell[30293, 1140, 398, 14, 27, "Input",
+ Cell[12098, 432, 18778, 710, 244, "Output",
+ CellTags->"Tdec"],
+ Cell[30913, 1147, 398, 14, 27, "Input",
CellTags->"Tdec",
CellID->1116880881],
- Cell[30694, 1156, 1367, 59, 38, "Output",
- CellTags->"Tdec",
- CellID->902166348],
- Cell[32076, 1218, 139, 5, 27, "Input",
- CellTags->"Tdec",
- CellID->1835029182],
- Cell[32571, 1245, 535, 21, 32, "Text",
- CellTags->"Tdec",
- CellID->562924165]}
+ Cell[31314, 1163, 1347, 58, 38, "Output",
+ CellTags->"Tdec"]},
+ "PrimaryExamplesSection"->{
+ Cell[6885, 211, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->326893928]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 35078, 1316},
- {"Tdec", 35210, 1320}
+ {"Tdec", 35490, 1313},
+ {"PrimaryExamplesSection", 36291, 1340}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 51, "AnchorBarGrid",
+Cell[576, 21, 3154, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 1042, 30, 98, "Usage",
- CellID->982511436],
+Cell[3733, 99, 281, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3925, 112, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1647057939],
+Cell[4039, 114, 1060, 30, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4338, 131, 195, 6, 25, "ExampleSection",
- CellID->390806926],
+Cell[5124, 148, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1466909563],
+Cell[5866, 174, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4558, 141, 126, 4, 27, "Input",
+Cell[5922, 178, 128, 4, 70, "Input",
CellTags->"Tdec",
CellID->1946686101],
-Cell[4687, 147, 680, 18, 75, "Output",
- CellTags->"Tdec",
- CellID->635728207]
+Cell[6053, 184, 771, 20, 75, "Output",
+ CellTags->"Tdec"]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[5382, 168, 629, 23, 49, "Text",
- CellTags->"Tdec",
- CellID->1358527070],
Cell[CellGroupData[{
-Cell[6036, 195, 220, 8, 27, "Input",
+Cell[6885, 211, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->326893928],
+Cell[CellGroupData[{
+Cell[7297, 230, 196, 6, 26, "ExampleSection",
+ CellID->1039168438],
+Cell[7496, 238, 590, 21, 56, "Notes"],
+Cell[CellGroupData[{
+Cell[8111, 263, 220, 8, 27, "Input",
CellTags->"Tdec",
CellID->1371643363],
-Cell[6259, 205, 1268, 50, 65, "Output",
- CellTags->"Tdec",
- CellID->1644480081]
+Cell[8334, 273, 1146, 45, 58, "Output",
+ CellTags->"Tdec"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7564, 260, 217, 8, 27, "Input",
+Cell[9517, 323, 217, 8, 27, "Input",
CellTags->"Tdec",
CellID->1861786454],
-Cell[7784, 270, 1035, 45, 70, "Output",
+Cell[9737, 333, 1035, 45, 63, "Output",
CellTags->"Tdec",
CellID->920674629]
}, Open ]],
-Cell[8834, 318, 797, 29, 60, "Text",
- CellTags->"Tdec",
- CellID->2118815883],
-Cell[9634, 349, 546, 19, 27, "Input",
- CellTags->"Tdec",
- CellID->739868135],
+Cell[10787, 381, 758, 27, 38, "Notes"],
Cell[CellGroupData[{
-Cell[10205, 372, 217, 8, 27, "Input",
+Cell[11570, 412, 525, 18, 27, "Input",
CellTags->"Tdec",
- CellID->1848782179],
-Cell[10425, 382, 19831, 753, 279, "Output",
- CellTags->"Tdec",
- CellID->1940044369]
+ CellID->739868135],
+Cell[12098, 432, 18778, 710, 244, "Output",
+ CellTags->"Tdec"]
}, Open ]],
Cell[CellGroupData[{
-Cell[30293, 1140, 398, 14, 27, "Input",
+Cell[30913, 1147, 398, 14, 27, "Input",
CellTags->"Tdec",
CellID->1116880881],
-Cell[30694, 1156, 1367, 59, 38, "Output",
- CellTags->"Tdec",
- CellID->902166348]
-}, Open ]],
-Cell[32076, 1218, 139, 5, 27, "Input",
- CellTags->"Tdec",
- CellID->1835029182]
+Cell[31314, 1163, 1347, 58, 38, "Output",
+ CellTags->"Tdec"]
+}, Open ]]
}, Open ]],
-Cell[32230, 1226, 31, 0, 29, "SectionFooterSpacer"]
+Cell[32688, 1225, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[32298, 1231, 270, 12, 31, "SeeAlsoSection",
+Cell[32756, 1230, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[32571, 1245, 535, 21, 32, "Text",
- CellTags->"Tdec",
- CellID->562924165]
+Cell[33029, 1244, 499, 19, 56, "SeeAlso"]
}, Open ]],
-Cell[33121, 1269, 23, 0, 42, "FooterCell"]
+Cell[33543, 1266, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TemporalMomentum.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TemporalMomentum.nb
new file mode 100644
index 000000000..383219bef
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TemporalMomentum.nb
@@ -0,0 +1,367 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10436, 357]
+NotebookOptionsPosition[ 7059, 254]
+NotebookOutlinePosition[ 9314, 313]
+CellTagsIndexPosition[ 9230, 308]
+WindowTitle->TemporalMomentum
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TemporalMomentum\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TemporalMomentum"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+TemporalMomentum.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$264632],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TemporalMomentum", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["TemporalMomentum", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"TemporalMomentum", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator] is the head of the temporal component of a four \
+momentum ",
+ Cell[BoxData[
+ SuperscriptBox["p", "0"]], "InlineFormula"],
+ ". The internal representation of the temporal component ",
+ Cell[BoxData[
+ SuperscriptBox["p", "0"]], "InlineFormula"],
+ " is TemporalMomentum[p]. TemporalMomentum may appear only inside \
+TemporalPair"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->931447114],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->86841959],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TemporalMomentum", "[", "p", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->725881102],
+
+Cell[BoxData[
+ FormBox[
+ FormBox["p",
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{16, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->840506171]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"TemporalMomentum", "[",
+ RowBox[{"-", "q"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1422787809],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{27, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->814079182],
+
+Cell[BoxData[
+ RowBox[{"-",
+ RowBox[{"TemporalMomentum", "[", "q", "]"}]}]], "Output",
+ ImageSize->{169, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->1315072307]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TemporalMomentum", "[",
+ RowBox[{"p", "+", "q"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1886426636],
+
+Cell[BoxData[
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], TraditionalForm]], "Output",
+ ImageSize->{44, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->833454644]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "MomentumExpand"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1915692055],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"TemporalMomentum", "[", "p", "]"}], "+",
+ RowBox[{"TemporalMomentum", "[", "q", "]"}]}]], "Output",
+ ImageSize->{330, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]//StandardForm=",
+ CellID->14215335]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "MomentumCombine"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->928717436],
+
+Cell[BoxData[
+ RowBox[{"TemporalMomentum", "[",
+ RowBox[{"p", "+", "q"}], "]"}]], "Output",
+ ImageSize->{184, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]//StandardForm=",
+ CellID->2413350]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"TemporalMomentum",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 7.975558}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "TemporalMomentum[p] is the head of the temporal component of a four \
+momentum p^0. The internal representation of the temporal component p^0 is \
+TemporalMomentum[p]. TemporalMomentum may appear only inside TemporalPair",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TemporalMomentum",
+ "titlemodifier" -> "", "windowtitle" -> "TemporalMomentum", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/TemporalMomentum"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3913, 112, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->931447114]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9087, 301}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[588, 21, 2306, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2897, 76, 293, 11, 45, "ObjectNameGrid"],
+Cell[3193, 89, 695, 19, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3913, 112, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->931447114],
+Cell[CellGroupData[{
+Cell[4325, 131, 194, 6, 26, "ExampleSection",
+ CellID->86841959],
+Cell[CellGroupData[{
+Cell[4544, 141, 112, 3, 27, "Input",
+ CellID->725881102],
+Cell[4659, 146, 218, 8, 37, "Output",
+ CellID->840506171]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4914, 159, 195, 5, 45, "Input",
+ CellID->1422787809],
+Cell[5112, 166, 274, 11, 37, "Output",
+ CellID->814079182],
+Cell[5389, 179, 234, 7, 51, "Output",
+ CellID->1315072307]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5660, 191, 136, 4, 27, "Input",
+ CellID->1886426636],
+Cell[5799, 197, 314, 13, 37, "Output",
+ CellID->833454644]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6150, 215, 142, 4, 27, "Input",
+ CellID->1915692055],
+Cell[6295, 221, 280, 8, 51, "Output",
+ CellID->14215335]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6612, 234, 142, 4, 27, "Input",
+ CellID->928717436],
+Cell[6757, 240, 236, 7, 51, "Output",
+ CellID->2413350]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7032, 252, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TemporalPair.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TemporalPair.nb
new file mode 100644
index 000000000..e2fcc099e
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TemporalPair.nb
@@ -0,0 +1,318 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 9215, 308]
+NotebookOptionsPosition[ 6250, 220]
+NotebookOutlinePosition[ 8447, 278]
+CellTagsIndexPosition[ 8363, 273]
+WindowTitle->TemporalPair
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TemporalPair\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TemporalPair"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+TemporalPair.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$265063],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TemporalPair", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["TemporalPair", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"TemporalPair", "[",
+ RowBox[{
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], ",",
+ RowBox[{"TemporalMomentum", "[", "p", "]"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]is a special pairing used in the internal \
+representation to denote p^0, the temporal components of a four momentum p."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1397856466],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1733671442],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TemporalPair", "[",
+ RowBox[{
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], ",",
+ RowBox[{"TemporalMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1437571233],
+
+Cell[BoxData[
+ FormBox["t", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1045892106]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TemporalPair", "[",
+ RowBox[{
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], ",",
+ RowBox[{"TemporalMomentum", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->709609387],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], ")"}], "0"], TraditionalForm]], "Output",
+ ImageSize->{64, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1861657056]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "ExpandScalarProduct"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->15450687],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], "+", "t"}], TraditionalForm]], "Output",
+ ImageSize->{49, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1889582975]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"TemporalPair",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 9.082738}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "TemporalPair[ExplicitLorentzIndex[0], TemporalMomentum[p]] is a special \
+pairing used in the internal representation to denote p^0, the temporal \
+components of a four momentum p.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "TemporalPair", "titlemodifier" -> "", "windowtitle" ->
+ "TemporalPair", "type" -> "Symbol", "uri" -> "FeynCalc/ref/TemporalPair"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3788, 109, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1397856466]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8219, 266}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[584, 21, 2290, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2877, 76, 289, 11, 45, "ObjectNameGrid"],
+Cell[3169, 89, 594, 16, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3788, 109, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1397856466],
+Cell[CellGroupData[{
+Cell[4201, 128, 196, 6, 26, "ExampleSection",
+ CellID->1733671442],
+Cell[CellGroupData[{
+Cell[4422, 138, 224, 6, 27, "Input",
+ CellID->1437571233],
+Cell[4649, 146, 187, 6, 35, "Output",
+ CellID->1045892106]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4873, 157, 248, 7, 27, "Input",
+ CellID->709609387],
+Cell[5124, 166, 561, 23, 39, "Output",
+ CellID->1861657056]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5722, 194, 110, 3, 27, "Input",
+ CellID->15450687],
+Cell[5835, 199, 349, 14, 39, "Output",
+ CellID->1889582975]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[6223, 218, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TensorFunction.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TensorFunction.nb
index b9acbdc78..cb1e36d82 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TensorFunction.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TensorFunction.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16081, 566]
-NotebookOptionsPosition[ 9727, 364]
-NotebookOutlinePosition[ 13747, 478]
-CellTagsIndexPosition[ 13629, 472]
+NotebookDataLength[ 16407, 567]
+NotebookOptionsPosition[ 10513, 386]
+NotebookOutlinePosition[ 14298, 490]
+CellTagsIndexPosition[ 14180, 484]
WindowTitle->Tensorfunction
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Tensorfunction\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Tensorfunction"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FCSymmetrize\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FCSymmetrize"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Tensorfunction\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Tensorfunction"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Tensorfunction.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$152715],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Tensorfunction", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$265493],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Tensorfunction", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Tensorfunction.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Tensorfunction", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Tensorfunction", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1316648944],
+ CellID->672248374],
Cell[CellGroupData[{
@@ -122,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1148341805],
+ CellID->1096616352],
Cell[CellGroupData[{
@@ -143,12 +175,11 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["\[Tau]",
TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{67, 15},
+ ImageSize->{71, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[1]=",
- CellID->221028640]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -165,12 +196,11 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Tau]", "]"}]}], "]"}]], "Output",
- ImageSize->{421, 15},
+ ImageSize->{425, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[2]//StandardForm=",
- CellID->2056952905]
+ CellLabel->"Out[2]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -195,12 +225,11 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["\[Tau]",
TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{69, 18},
+ ImageSize->{75, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[3]=",
- CellID->974516100]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -217,12 +246,11 @@ Cell[BoxData[
RowBox[{"Momentum", "[", "p", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Tau]", "]"}]}], "]"}]], "Output",
- ImageSize->{391, 15},
+ ImageSize->{393, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1570637008]
+ CellLabel->"Out[4]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -245,12 +273,11 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["\[Beta]",
TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{54, 15},
+ ImageSize->{57, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[5]=",
- CellID->1735854485]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -273,12 +300,11 @@ Cell[BoxData[
TraditionalForm], ",",
FormBox["\[Beta]",
TraditionalForm]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{54, 15},
+ ImageSize->{57, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[6]=",
- CellID->1376266618]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -294,12 +320,11 @@ Cell[BoxData[
RowBox[{
RowBox[{"LorentzIndex", "[", "\[Alpha]", "]"}], ",",
RowBox[{"LorentzIndex", "[", "\[Beta]", "]"}]}], "]"}]], "Output",
- ImageSize->{288, 15},
+ ImageSize->{289, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[7]//StandardForm=",
- CellID->1120370784]
+ CellLabel->"Out[7]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -313,12 +338,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{"{", "Orderless", "}"}], TraditionalForm]], "Output",
- ImageSize->{76, 15},
+ ImageSize->{69, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TensorFunction",
- CellLabel->"Out[8]=",
- CellID->1209640957]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[BoxData[
@@ -355,9 +379,7 @@ Cell[TextData[{
ButtonNote->"FCSymmetrize"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TensorFunction",
- CellID->323898927]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -365,7 +387,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Tensorfunction",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -374,10 +396,9 @@ TaggingRules->{
ButtonBox[
"Wolfram Language", ButtonData -> "paclet:guide/WolframRoot",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "ExampleCounter" -> 1, "ExamplePageLinks" -> {}, "NeedPlatMsgIn" ->
- None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 55.320570}",
+ Left], "ExampleCounter" -> 1, "NeedPlatMsgIn" -> None, "RootCaptions" ->
+ "", "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 10.177863}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -387,11 +408,12 @@ TaggingRules->{
LorentzIndex[nu], ...], i.e., it can be used as an unspecified tensoriell \
function t. A symmetric tensor can be obtained by Tensorfunction[{t, \"S\"}, \
mu, nu, ...], and an antisymmteric one by Tensorfunction[{t, \"A\"}, mu, nu, \
-...].", "synonyms" -> {}, "title" -> "Tensorfunction", "titlemodifier" -> "",
- "windowtitle" -> "Tensorfunction", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Tensorfunction"}, "SearchTextTranslated" -> ""},
+...].", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Tensorfunction",
+ "titlemodifier" -> "", "windowtitle" -> "Tensorfunction", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Tensorfunction"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -399,8 +421,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -409,165 +432,143 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3641, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4640, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1316648944]},
+ CellID->672248374]},
"TensorFunction"->{
- Cell[4275, 128, 196, 5, 27, "Input",
+ Cell[5273, 160, 196, 5, 27, "Input",
CellTags->"TensorFunction",
CellID->1402713189],
- Cell[4474, 135, 398, 15, 36, "Output",
- CellTags->"TensorFunction",
- CellID->221028640],
- Cell[4909, 155, 133, 4, 27, "Input",
+ Cell[5472, 167, 378, 14, 37, "Output",
+ CellTags->"TensorFunction"],
+ Cell[5887, 186, 133, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->608128480],
- Cell[5045, 161, 396, 11, 49, "Output",
- CellTags->"TensorFunction",
- CellID->2056952905],
- Cell[5478, 177, 216, 7, 27, "Input",
+ Cell[6023, 192, 375, 10, 51, "Output",
+ CellTags->"TensorFunction"],
+ Cell[6435, 207, 216, 7, 27, "Input",
CellTags->"TensorFunction",
CellID->1580634540],
- Cell[5697, 186, 421, 16, 39, "Output",
- CellTags->"TensorFunction",
- CellID->974516100],
- Cell[6155, 207, 134, 4, 27, "Input",
+ Cell[6654, 216, 401, 15, 37, "Output",
+ CellTags->"TensorFunction"],
+ Cell[7092, 236, 134, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->1813534641],
- Cell[6292, 213, 388, 11, 49, "Output",
- CellTags->"TensorFunction",
- CellID->1570637008],
- Cell[6717, 229, 246, 8, 27, "Input",
+ Cell[7229, 242, 367, 10, 51, "Output",
+ CellTags->"TensorFunction"],
+ Cell[7633, 257, 246, 8, 27, "Input",
CellTags->"TensorFunction",
CellID->1404961078],
- Cell[6966, 239, 353, 13, 36, "Output",
- CellTags->"TensorFunction",
- CellID->1735854485],
- Cell[7356, 257, 244, 8, 27, "Input",
+ Cell[7882, 267, 332, 12, 37, "Output",
+ CellTags->"TensorFunction"],
+ Cell[8251, 284, 244, 8, 27, "Input",
CellTags->"TensorFunction",
CellID->65548372],
- Cell[7603, 267, 353, 13, 36, "Output",
- CellTags->"TensorFunction",
- CellID->1376266618],
- Cell[7993, 285, 133, 4, 27, "Input",
+ Cell[8498, 294, 332, 12, 37, "Output",
+ CellTags->"TensorFunction"],
+ Cell[8867, 311, 133, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->645212918],
- Cell[8129, 291, 346, 10, 49, "Output",
- CellTags->"TensorFunction",
- CellID->1120370784],
- Cell[8512, 306, 136, 4, 27, "Input",
+ Cell[9003, 317, 325, 9, 51, "Output",
+ CellTags->"TensorFunction"],
+ Cell[9365, 331, 136, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->1446205961],
- Cell[8651, 312, 247, 8, 36, "Output",
- CellTags->"TensorFunction",
- CellID->1209640957],
- Cell[8913, 323, 171, 5, 27, "Input",
+ Cell[9504, 337, 226, 7, 35, "Output",
+ CellTags->"TensorFunction"],
+ Cell[9745, 347, 171, 5, 27, "Input",
CellTags->"TensorFunction",
- CellID->682846608],
- Cell[9440, 350, 245, 9, 32, "Text",
- CellTags->"TensorFunction",
- CellID->323898927]}
+ CellID->682846608]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11766, 410},
- {"TensorFunction", 11907, 414}
+ {"PrimaryExamplesSection", 12592, 433},
+ {"TensorFunction", 12733, 437}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3035, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 697, 17, 115, "Usage",
+Cell[3624, 97, 291, 11, 45, "ObjectNameGrid"],
+Cell[3918, 110, 697, 17, 119, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3641, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4640, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1316648944],
+ CellID->672248374],
Cell[CellGroupData[{
-Cell[4054, 118, 196, 6, 25, "ExampleSection",
- CellID->1148341805],
+Cell[5052, 150, 196, 6, 26, "ExampleSection",
+ CellID->1096616352],
Cell[CellGroupData[{
-Cell[4275, 128, 196, 5, 27, "Input",
+Cell[5273, 160, 196, 5, 27, "Input",
CellTags->"TensorFunction",
CellID->1402713189],
-Cell[4474, 135, 398, 15, 36, "Output",
- CellTags->"TensorFunction",
- CellID->221028640]
+Cell[5472, 167, 378, 14, 37, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4909, 155, 133, 4, 27, "Input",
+Cell[5887, 186, 133, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->608128480],
-Cell[5045, 161, 396, 11, 49, "Output",
- CellTags->"TensorFunction",
- CellID->2056952905]
+Cell[6023, 192, 375, 10, 51, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5478, 177, 216, 7, 27, "Input",
+Cell[6435, 207, 216, 7, 27, "Input",
CellTags->"TensorFunction",
CellID->1580634540],
-Cell[5697, 186, 421, 16, 39, "Output",
- CellTags->"TensorFunction",
- CellID->974516100]
+Cell[6654, 216, 401, 15, 37, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6155, 207, 134, 4, 27, "Input",
+Cell[7092, 236, 134, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->1813534641],
-Cell[6292, 213, 388, 11, 49, "Output",
- CellTags->"TensorFunction",
- CellID->1570637008]
+Cell[7229, 242, 367, 10, 51, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6717, 229, 246, 8, 27, "Input",
+Cell[7633, 257, 246, 8, 27, "Input",
CellTags->"TensorFunction",
CellID->1404961078],
-Cell[6966, 239, 353, 13, 36, "Output",
- CellTags->"TensorFunction",
- CellID->1735854485]
+Cell[7882, 267, 332, 12, 37, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7356, 257, 244, 8, 27, "Input",
+Cell[8251, 284, 244, 8, 27, "Input",
CellTags->"TensorFunction",
CellID->65548372],
-Cell[7603, 267, 353, 13, 36, "Output",
- CellTags->"TensorFunction",
- CellID->1376266618]
+Cell[8498, 294, 332, 12, 37, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7993, 285, 133, 4, 27, "Input",
+Cell[8867, 311, 133, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->645212918],
-Cell[8129, 291, 346, 10, 49, "Output",
- CellTags->"TensorFunction",
- CellID->1120370784]
+Cell[9003, 317, 325, 9, 51, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8512, 306, 136, 4, 27, "Input",
+Cell[9365, 331, 136, 4, 27, "Input",
CellTags->"TensorFunction",
CellID->1446205961],
-Cell[8651, 312, 247, 8, 36, "Output",
- CellTags->"TensorFunction",
- CellID->1209640957]
+Cell[9504, 337, 226, 7, 35, "Output",
+ CellTags->"TensorFunction"]
}, Open ]],
-Cell[8913, 323, 171, 5, 27, "Input",
+Cell[9745, 347, 171, 5, 27, "Input",
CellTags->"TensorFunction",
CellID->682846608]
}, Open ]],
-Cell[9099, 331, 31, 0, 29, "SectionFooterSpacer"]
+Cell[9931, 355, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9167, 336, 270, 12, 31, "SeeAlsoSection",
+Cell[9999, 360, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[9440, 350, 245, 9, 32, "Text",
- CellTags->"TensorFunction",
- CellID->323898927]
+Cell[10272, 374, 199, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[9700, 362, 23, 0, 42, "FooterCell"]
+Cell[10486, 384, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tf.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tf.nb
index 84aff9b38..ee267cf26 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tf.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tf.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6398, 205]
-NotebookOptionsPosition[ 4277, 141]
-NotebookOutlinePosition[ 6141, 194]
-CellTagsIndexPosition[ 6077, 189]
+NotebookDataLength[ 7366, 228]
+NotebookOptionsPosition[ 5417, 173]
+NotebookOutlinePosition[ 7157, 220]
+CellTagsIndexPosition[ 7114, 217]
WindowTitle->Tf
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Tf\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Tf"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Tf.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$153057],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Tf",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Tr2\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Tr2"], "\<\"GluonPropagator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/GluonPropagator"], "\<\"GluonSelfEnergy\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/GluonSelfEnergy"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Tf\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Tf"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Tf.html"],
+ StandardForm]], "Input", TextClipboardType -> "PlainText"]},
+ Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$266370],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Tf",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Tf", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Tf", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,7 +148,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Tr2",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Tr2",
@@ -132,9 +166,7 @@ Cell[TextData[{
ButtonNote->"GluonSelfEnergy"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Tf",
- CellID->1687215104]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -151,19 +183,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 56.927721}",
+ "built" -> "{2020, 1, 5, 19, 3, 12.482373}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "Tf is the color factor Tf. It is 1/2 for SU(N).",
- "synonyms" -> {}, "title" -> "Tf", "titlemodifier" -> "", "windowtitle" ->
- "Tf", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Tf"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Tf", "titlemodifier" ->
+ "", "windowtitle" -> "Tf", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Tf"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -172,41 +205,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Tf"->{
- Cell[3653, 114, 582, 22, 70, "Text",
- CellTags->"Tf",
- CellID->1687215104]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Tf", 5971, 182}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[574, 21, 2234, 52, 70, "AnchorBarGrid",
+Cell[574, 21, 3190, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2811, 75, 45, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2859, 78, 496, 18, 70, "Usage",
+Cell[3767, 100, 279, 11, 70, "ObjectNameGrid"],
+Cell[4049, 113, 496, 18, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3380, 100, 270, 12, 70, "SeeAlsoSection",
+Cell[4570, 135, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3653, 114, 582, 22, 70, "Text",
- CellTags->"Tf",
- CellID->1687215104]
+Cell[4843, 149, 532, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4250, 139, 23, 0, 70, "FooterCell"]
+Cell[5390, 171, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ThreeDivergence.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ThreeDivergence.nb
new file mode 100644
index 000000000..4c824e05d
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ThreeDivergence.nb
@@ -0,0 +1,606 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16610, 596]
+NotebookOptionsPosition[ 11759, 442]
+NotebookOutlinePosition[ 14766, 526]
+CellTagsIndexPosition[ 14648, 520]
+WindowTitle->ThreeDivergence
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ThreeDivergence\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ThreeDivergence"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+ThreeDivergence.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$267248],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ThreeDivergence", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ThreeDivergence", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ThreeDivergence", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] calculates the partial derivative of exp w.r.t. ",
+ Cell[BoxData[
+ SuperscriptBox["p", "i"]], "InlineFormula"],
+ ". ThreeDivergence[exp, CV[p, i], CV[p,i], ...] gives the multiple \
+derivative."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->562980888],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ThreeDivergence", "]"}]], "Input",
+ CellLabel->"In[299]:=",
+ CellID->1897893490],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Abort", "\[Rule]", "True"}], ",",
+ RowBox[{"ApartFF", "\[Rule]", "False"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{445, 54},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[299]=",
+ CellID->1768309366]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1581051720],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1522001485],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellTags->"FourDivergence",
+ CellLabel->"In[1]:=",
+ CellID->1686706616],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{45, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FourDivergence",
+ CellLabel->"Out[1]=",
+ CellID->1220009152]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ThreeDivergence", "[",
+ RowBox[{"%", ",",
+ RowBox[{"CV", "[",
+ RowBox[{"q", ",", "i"}], "]"}]}], "]"}]], "Input",
+ CellTags->"FourDivergence",
+ CellLabel->"In[2]:=",
+ CellID->1594453358],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ ImageSize->{28, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FourDivergence",
+ CellLabel->"Out[2]=",
+ CellID->1633407757]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{
+ RowBox[{"p", "-", "k"}], ",", "q"}], "]"}]], "Input",
+ CellTags->"FourDivergence",
+ CellLabel->"In[3]:=",
+ CellID->1521326595],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{94, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FourDivergence",
+ CellLabel->"Out[3]=",
+ CellID->622756803]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ThreeDivergence", "[",
+ RowBox[{"%", ",",
+ RowBox[{"CV", "[",
+ RowBox[{"k", ",", "i"}], "]"}]}], "]"}]], "Input",
+ CellTags->"FourDivergence",
+ CellLabel->"In[4]:=",
+ CellID->822682822],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{39, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"FourDivergence",
+ CellLabel->"Out[4]=",
+ CellID->1912109557]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1112899700],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->234224878]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ThreeDivergence", "[",
+ RowBox[{"%", ",",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->703915902],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}],
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]]}], TraditionalForm]], "Output",
+ ImageSize->{122, 44},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->2017197915]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"ThreeDivergence",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 14.498927}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ThreeDivergence[exp, CV[p, i]] calculates the partial derivative of exp \
+w.r.t. p^i. ThreeDivergence[exp, CV[p, i], CV[p,i], ...] gives the multiple \
+derivative.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "ThreeDivergence", "titlemodifier" -> "", "windowtitle" ->
+ "ThreeDivergence", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ThreeDivergence"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5624, 174, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1581051720]},
+ "FourDivergence"->{
+ Cell[6258, 203, 152, 5, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->1686706616],
+ Cell[6413, 210, 626, 26, 37, "Output",
+ CellTags->"FourDivergence",
+ CellID->1220009152],
+ Cell[7076, 241, 219, 7, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->1594453358],
+ Cell[7298, 250, 544, 23, 40, "Output",
+ CellTags->"FourDivergence",
+ CellID->1633407757],
+ Cell[7879, 278, 176, 6, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->1521326595],
+ Cell[8058, 286, 938, 39, 39, "Output",
+ CellTags->"FourDivergence",
+ CellID->622756803],
+ Cell[9033, 330, 218, 7, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->822682822],
+ Cell[9254, 339, 578, 24, 40, "Output",
+ CellTags->"FourDivergence",
+ CellID->1912109557]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13724, 488},
+ {"FourDivergence", 13866, 492}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[587, 21, 2302, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2892, 76, 292, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3209, 91, 643, 18, 103, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3877, 113, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->562980888],
+Cell[4618, 139, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4674, 143, 120, 3, 70, "Input",
+ CellID->1897893490],
+Cell[4797, 148, 766, 19, 75, "Output",
+ CellID->1768309366]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5624, 174, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1581051720],
+Cell[CellGroupData[{
+Cell[6037, 193, 196, 6, 26, "ExampleSection",
+ CellID->1522001485],
+Cell[CellGroupData[{
+Cell[6258, 203, 152, 5, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->1686706616],
+Cell[6413, 210, 626, 26, 37, "Output",
+ CellTags->"FourDivergence",
+ CellID->1220009152]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7076, 241, 219, 7, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->1594453358],
+Cell[7298, 250, 544, 23, 40, "Output",
+ CellTags->"FourDivergence",
+ CellID->1633407757]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7879, 278, 176, 6, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->1521326595],
+Cell[8058, 286, 938, 39, 39, "Output",
+ CellTags->"FourDivergence",
+ CellID->622756803]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9033, 330, 218, 7, 27, "Input",
+ CellTags->"FourDivergence",
+ CellID->822682822],
+Cell[9254, 339, 578, 24, 40, "Output",
+ CellTags->"FourDivergence",
+ CellID->1912109557]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9869, 368, 173, 6, 27, "Input",
+ CellID->1112899700],
+Cell[10045, 376, 495, 14, 61, "Output",
+ CellID->234224878]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10577, 395, 190, 6, 27, "Input",
+ CellID->703915902],
+Cell[10770, 403, 923, 32, 65, "Output",
+ CellID->2017197915]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11732, 440, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ThreeVector.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ThreeVector.nb
deleted file mode 100644
index cf69ba4d3..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ThreeVector.nb
+++ /dev/null
@@ -1,203 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6240, 194]
-NotebookOptionsPosition[ 4043, 129]
-NotebookOutlinePosition[ 5976, 183]
-CellTagsIndexPosition[ 5903, 178]
-WindowTitle->ThreeVector
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ThreeVector\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ThreeVector"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
-ThreeVector.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$153404],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ThreeVector", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["ThreeVector", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"ThreeVector", "[", "p", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the three dimensional vector p."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["DotProduct",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DotProduct",
- ButtonNote->"DotProduct"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["CrossProduct",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/CrossProduct",
- ButtonNote->"CrossProduct"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ThreeVector",
- CellID->930921791]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"ThreeVector",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 25, 58.300101}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" -> "ThreeVector[p] is the three dimensional vector p.",
- "synonyms" -> {}, "title" -> "ThreeVector", "titlemodifier" -> "",
- "windowtitle" -> "ThreeVector", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ThreeVector"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "ThreeVector"->{
- Cell[3579, 108, 422, 16, 70, "Text",
- CellTags->"ThreeVector",
- CellID->930921791]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"ThreeVector", 5789, 171}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[583, 21, 2258, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2844, 75, 54, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2901, 78, 380, 12, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3306, 94, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3579, 108, 422, 16, 70, "Text",
- CellTags->"ThreeVector",
- CellID->930921791]
-}, Open ]],
-Cell[4016, 127, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TimedIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TimedIntegrate.nb
index 8702b2c57..9ae6dd1ec 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TimedIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TimedIntegrate.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10715, 351]
-NotebookOptionsPosition[ 6628, 225]
-NotebookOutlinePosition[ 9587, 308]
-CellTagsIndexPosition[ 9471, 302]
+NotebookDataLength[ 11518, 383]
+NotebookOptionsPosition[ 7594, 264]
+NotebookOutlinePosition[ 10314, 339]
+CellTagsIndexPosition[ 10197, 333]
WindowTitle->TimedIntegrate
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ TimedIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$154453],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$268584],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/TimedIntegrate", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,20 @@ TimedIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TimedIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TimedIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -94,32 +107,33 @@ the option Timing. Options of Integrate can be given and are passed on."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1720236480],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->504061400],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->513374704],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -141,17 +155,46 @@ Cell[BoxData[
RowBox[{"Integrate", "\[Rule]", "Integrate"}], ",",
RowBox[{"Expand", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{489, 15},
+ ImageSize->{454, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TimedIntegrate",
CellLabel->"Out[1]=",
CellID->1160941869]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell["This should reach to be done", "Text",
- CellTags->"TimedIntegrate",
- CellID->2077974742],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1378897368],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->461202344],
+
+Cell["This should reach to be done", "Notes"],
Cell[CellGroupData[{
@@ -164,23 +207,20 @@ Cell[BoxData[
RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"Timing", "\[Rule]", "1"}]}], "]"}]], "Input",
CellTags->"TimedIntegrate",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->2109784600],
Cell[BoxData[
FormBox[
RowBox[{"-", "5"}], TraditionalForm]], "Output",
- ImageSize->{22, 15},
+ ImageSize->{23, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TimedIntegrate",
- CellLabel->"Out[2]=",
- CellID->2016361212]
+ CellLabel->"Out[1]="]
}, Open ]],
-Cell["This shouldn't", "Text",
- CellTags->"TimedIntegrate",
- CellID->1118158911],
+Cell["This shouldn't", "Notes"],
Cell[CellGroupData[{
@@ -195,7 +235,7 @@ Cell[BoxData[
RowBox[{"Timing", "\[Rule]", "10"}], ",",
RowBox[{"Integrate", "\[Rule]", "int"}]}], "]"}]], "Input",
CellTags->"TimedIntegrate",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->2007698884],
Cell[BoxData[
@@ -211,12 +251,11 @@ Cell[BoxData[
RowBox[{
TagBox["\[CurlyEpsilon]",
TraditionalForm], ">", "0"}]}]}], ")"}], TraditionalForm]], "Output",
- ImageSize->{325, 21},
+ ImageSize->{317, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TimedIntegrate",
- CellLabel->"Out[3]=",
- CellID->176617232]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -226,7 +265,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"TimedIntegrate",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -235,10 +274,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 2.431230}",
+ "built" -> "{2020, 1, 5, 19, 3, 17.826767}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -246,12 +285,12 @@ TaggingRules->{
"None", "summary" ->
"TimedIntegrate[exp, vars] is like Integrate, but stops after the number \
of seconds specified by the option Timing. Options of Integrate can be given \
-and are passed on.", "synonyms" -> {}, "title" -> "TimedIntegrate",
- "titlemodifier" -> "", "windowtitle" -> "TimedIntegrate", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/TimedIntegrate"}, "SearchTextTranslated" ->
- ""},
+and are passed on.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "TimedIntegrate", "titlemodifier" -> "", "windowtitle" ->
+ "TimedIntegrate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TimedIntegrate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -260,7 +299,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -268,91 +307,84 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3474, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1720236480]},
"TimedIntegrate"->{
- Cell[4107, 125, 144, 4, 27, "Input",
+ Cell[4555, 139, 144, 4, 70, "Input",
CellTags->"TimedIntegrate",
CellID->92169636],
- Cell[4254, 131, 530, 17, 36, "Output",
+ Cell[4702, 145, 530, 17, 37, "Output",
CellTags->"TimedIntegrate",
CellID->1160941869],
- Cell[4799, 151, 94, 2, 31, "Text",
- CellTags->"TimedIntegrate",
- CellID->2077974742],
- Cell[4918, 157, 323, 10, 27, "Input",
+ Cell[5974, 200, 323, 10, 27, "Input",
CellTags->"TimedIntegrate",
CellID->2109784600],
- Cell[5244, 169, 234, 8, 36, "Output",
- CellTags->"TimedIntegrate",
- CellID->2016361212],
- Cell[5493, 180, 80, 2, 31, "Text",
- CellTags->"TimedIntegrate",
- CellID->1118158911],
- Cell[5598, 186, 407, 12, 27, "Input",
+ Cell[6300, 212, 213, 7, 35, "Output",
+ CellTags->"TimedIntegrate"],
+ Cell[6584, 226, 407, 12, 27, "Input",
CellTags->"TimedIntegrate",
CellID->2007698884],
- Cell[6008, 200, 554, 18, 42, "Output",
- CellTags->"TimedIntegrate",
- CellID->176617232]}
+ Cell[6994, 240, 534, 17, 43, "Output",
+ CellTags->"TimedIntegrate"]},
+ "PrimaryExamplesSection"->{
+ Cell[5293, 169, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1378897368]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8554, 270},
- {"TimedIntegrate", 8695, 274}
+ {"TimedIntegrate", 9500, 309},
+ {"PrimaryExamplesSection", 10053, 326}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 2298, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 530, 14, 97, "Usage",
- CellID->982511436],
+Cell[2887, 76, 291, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3474, 96, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1720236480],
+Cell[3203, 91, 530, 14, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3887, 115, 195, 6, 25, "ExampleSection",
- CellID->513374704],
+Cell[3758, 109, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->504061400],
+Cell[4499, 135, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4107, 125, 144, 4, 27, "Input",
+Cell[4555, 139, 144, 4, 70, "Input",
CellTags->"TimedIntegrate",
CellID->92169636],
-Cell[4254, 131, 530, 17, 36, "Output",
+Cell[4702, 145, 530, 17, 37, "Output",
CellTags->"TimedIntegrate",
CellID->1160941869]
+}, Open ]]
+}, Closed]]
}, Open ]],
-Cell[4799, 151, 94, 2, 31, "Text",
- CellTags->"TimedIntegrate",
- CellID->2077974742],
Cell[CellGroupData[{
-Cell[4918, 157, 323, 10, 27, "Input",
+Cell[5293, 169, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1378897368],
+Cell[CellGroupData[{
+Cell[5706, 188, 195, 6, 26, "ExampleSection",
+ CellID->461202344],
+Cell[5904, 196, 45, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[5974, 200, 323, 10, 27, "Input",
CellTags->"TimedIntegrate",
CellID->2109784600],
-Cell[5244, 169, 234, 8, 36, "Output",
- CellTags->"TimedIntegrate",
- CellID->2016361212]
+Cell[6300, 212, 213, 7, 35, "Output",
+ CellTags->"TimedIntegrate"]
}, Open ]],
-Cell[5493, 180, 80, 2, 31, "Text",
- CellTags->"TimedIntegrate",
- CellID->1118158911],
+Cell[6528, 222, 31, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[5598, 186, 407, 12, 27, "Input",
+Cell[6584, 226, 407, 12, 27, "Input",
CellTags->"TimedIntegrate",
CellID->2007698884],
-Cell[6008, 200, 554, 18, 42, "Output",
- CellTags->"TimedIntegrate",
- CellID->176617232]
+Cell[6994, 240, 534, 17, 43, "Output",
+ CellTags->"TimedIntegrate"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[6601, 223, 23, 0, 42, "FooterCell"]
+Cell[7567, 262, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDiracGamma67.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDiracGamma67.nb
new file mode 100644
index 000000000..62048ca42
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDiracGamma67.nb
@@ -0,0 +1,592 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16086, 582]
+NotebookOptionsPosition[ 12292, 462]
+NotebookOutlinePosition[ 14402, 519]
+CellTagsIndexPosition[ 14317, 514]
+WindowTitle->ToDiracGamma67
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSubstitute5\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute5"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/ToDiracGamma67"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToDiracGamma67\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToDiracGamma67"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+ToDiracGamma67.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$271230],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToDiracGamma67", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToDiracGamma67", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToDiracGamma67", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitutes ",
+ Cell[BoxData[
+ RowBox[{
+ FractionBox["1", "2"],
+ RowBox[{"(",
+ RowBox[{"1", "+",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}]}]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ RowBox[{
+ FractionBox["1", "2"],
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}]}]], "InlineFormula"],
+ " by the chirality projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->650552010],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ToDiracGamma67", "]"}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->1244957086],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"All", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{525, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]=",
+ CellID->1120530329]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->998811706],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(2)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1710988442],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->119316199],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"], "+",
+ FractionBox["1", "2"]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{120, 46},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->456223256]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToDiracGamma67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1777747913],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{73, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->2019607797]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->887106529],
+
+Cell[TextData[{
+ "When the option ",
+ Cell[BoxData["All"], "InlineFormula"],
+ " is set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ", also standalone ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " will be replaced"
+}], "Notes",
+ CellID->1359052355],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "5", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->386162109],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{73, 19},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1261413630]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToDiracGamma67", "[",
+ RowBox[{"%", ",",
+ RowBox[{"All", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->805294007],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{120, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1465454235]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"ToDiracGamma67",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 23.919250}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToDiracGamma67[exp] substitutes 1/2 (1 + \\[Gamma]^5) and 1/2 (1 - \
+\\[Gamma]^5) by the chirality projectors \\[Gamma]^6 and \\[Gamma]^7.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ToDiracGamma67",
+ "titlemodifier" -> "", "windowtitle" -> "ToDiracGamma67", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ToDiracGamma67"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6551, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->998811706]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 14174, 507}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[586, 21, 3247, 78, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3836, 101, 291, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4152, 116, 954, 31, 95, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[5131, 151, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->650552010],
+Cell[5872, 177, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5928, 181, 118, 3, 70, "Input",
+ CellID->1244957086],
+Cell[6049, 186, 441, 13, 37, "Output",
+ CellID->1120530329]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6551, 206, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->998811706],
+Cell[CellGroupData[{
+Cell[6963, 225, 196, 6, 26, "ExampleSection",
+ CellID->1710988442],
+Cell[CellGroupData[{
+Cell[7184, 235, 297, 10, 27, "Input",
+ CellID->119316199],
+Cell[7484, 247, 816, 33, 67, "Output",
+ CellID->456223256]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8337, 285, 111, 3, 27, "Input",
+ CellID->1777747913],
+Cell[8451, 290, 583, 23, 39, "Output",
+ CellID->2019607797]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9071, 318, 125, 3, 9, "ExampleDelimiter",
+ CellID->887106529],
+Cell[9199, 323, 280, 10, 32, "Notes",
+ CellID->1359052355],
+Cell[CellGroupData[{
+Cell[9504, 337, 139, 4, 27, "Input",
+ CellID->386162109],
+Cell[9646, 343, 701, 29, 40, "Output",
+ CellID->1261413630]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10384, 377, 168, 5, 27, "Input",
+ CellID->805294007],
+Cell[10555, 384, 742, 29, 42, "Output",
+ CellID->1465454235]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11336, 418, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11404, 423, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[11677, 437, 573, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[12265, 460, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDiracSigma.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDiracSigma.nb
new file mode 100644
index 000000000..a0ed99b65
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDiracSigma.nb
@@ -0,0 +1,627 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 16994, 617]
+NotebookOptionsPosition[ 13339, 503]
+NotebookOutlinePosition[ 15470, 560]
+CellTagsIndexPosition[ 15385, 555]
+WindowTitle->ToDiracSigma
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracGamma\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"DiracSigma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSigma"], "\<\"DiracSigmaExplicit\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracSigmaExplicit"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToDiracSigma\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToDiracSigma"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+ToDiracSigma.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$271672],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToDiracSigma", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToDiracSigma", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToDiracSigma", "[",
+ RowBox[{"exp", ",", "x", ",", " ", "y"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitutes the neighboring Dirac matrices ",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["y"], "InlineFormula"],
+ " by ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ " and the metric tensor."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->704936112],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ToDiracSigma", "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1520368517],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{444, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[10]=",
+ CellID->1507997613]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->318237621],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2037882370],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->864481271],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{49, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->496690367]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToDiracSigma", "[",
+ RowBox[{"%", ",",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1509824786],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ ImageSize->{93, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->442883623]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Rho]", ",",
+ "\[Sigma]"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1643927540],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{152, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->300463402]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToDiracSigma", "[",
+ RowBox[{"%", ",",
+ RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Beta]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1066498563],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}]}]}], TraditionalForm]], "Output",
+ ImageSize->{297, 18},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->2115098949]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracSigmaExplicit",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExplicit",
+ ButtonNote->"DiracSigmaExplicit"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"ToDiracSigma",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 25.107040}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToDiracSigma[exp, x, y] substitutes the neighboring Dirac matrices x and \
+y by DiracSigma and the metric tensor.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ToDiracSigma", "titlemodifier" -> "", "windowtitle" ->
+ "ToDiracSigma", "type" -> "Symbol", "uri" -> "FeynCalc/ref/ToDiracSigma"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[6231, 194, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->318237621]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 15242, 548}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[584, 21, 3227, 77, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3814, 100, 289, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4128, 115, 708, 21, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4861, 140, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->704936112],
+Cell[5602, 166, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5658, 170, 116, 3, 70, "Input",
+ CellID->1520368517],
+Cell[5777, 175, 393, 12, 37, "Output",
+ CellID->1507997613]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6231, 194, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->318237621],
+Cell[CellGroupData[{
+Cell[6643, 213, 196, 6, 26, "ExampleSection",
+ CellID->2037882370],
+Cell[CellGroupData[{
+Cell[6864, 223, 129, 4, 27, "Input",
+ CellID->864481271],
+Cell[6996, 229, 559, 23, 37, "Output",
+ CellID->496690367]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7592, 257, 210, 6, 27, "Input",
+ CellID->1509824786],
+Cell[7805, 265, 705, 29, 37, "Output",
+ CellID->442883623]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8547, 299, 202, 6, 27, "Input",
+ CellID->1643927540],
+Cell[8752, 307, 1309, 55, 39, "Output",
+ CellID->300463402]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[10098, 367, 215, 6, 27, "Input",
+ CellID->1066498563],
+Cell[10316, 375, 2046, 80, 39, "Output",
+ CellID->2115098949]
+}, Open ]]
+}, Open ]],
+Cell[12389, 459, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12457, 464, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[12730, 478, 567, 20, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[13312, 501, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDistribution.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDistribution.nb
index 60bac8de6..104a09787 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDistribution.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToDistribution.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 18998, 666]
-NotebookOptionsPosition[ 12704, 469]
-NotebookOutlinePosition[ 16735, 581]
-CellTagsIndexPosition[ 16617, 575]
+NotebookDataLength[ 17750, 607]
+NotebookOptionsPosition[ 12704, 456]
+NotebookOutlinePosition[ 16029, 545]
+CellTagsIndexPosition[ 15911, 539]
WindowTitle->ToDistribution
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ToDistribution\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ToDistribution"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PlusDistribution\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PlusDistribution"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToDistribution\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToDistribution"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ToDistribution.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$156497],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ToDistribution", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$272112],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToDistribution", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ ToDistribution.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ToDistribution", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ToDistribution", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -97,32 +131,33 @@ Epsilon^2/2 Log[1-x]^2/(1-x)^2 + a^3 Epsilon^3/6 Log[1-x]^3/(1-x)^2."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->1180526592],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1744104550],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1758559147],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -137,37 +172,44 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{192, 15},
+ ImageSize->{172, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToDistribution",
CellLabel->"Out[1]=",
CellID->1934939097]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"ToDistribution", ",",
- RowBox[{"PlusDistribution", "\[Rule]", "PlusDistribution"}]}],
- "]"}]], "Input",
- CellTags->"ToDistribution",
- CellLabel->"In[2]:=",
- CellID->1230244334],
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1249684736],
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"PlusDistribution", "\[Rule]", "PlusDistribution"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{244, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ToDistribution",
- CellLabel->"Out[2]=",
- CellID->1029752620]
-}, Open ]],
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2124724330],
Cell[CellGroupData[{
@@ -178,87 +220,60 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"1", "-", "x"}], ")"}], "^",
RowBox[{"(",
- RowBox[{"Epsilon", "-", "1"}], ")"}]}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"Epsilon", "-", "1"}], ")"}]}], ",", "x", ",",
+ RowBox[{"PlusDistribution", "\[Rule]", "pd"}]}], "]"}]], "Input",
CellTags->"ToDistribution",
- CellLabel->"In[3]:=",
+ CellLabel->"In[1]:=",
CellID->1094502312],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- RowBox[{"\[Delta]", "(",
- FormBox[
- RowBox[{"1", "-", "x"}],
- TraditionalForm], ")"}],
- TagBox["\[CurlyEpsilon]",
- TraditionalForm]], "+",
RowBox[{
FractionBox["1", "6"], " ",
SuperscriptBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], "3"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox[
- RowBox[{
- SuperscriptBox["log", "3"], "(",
- RowBox[{"1", "-", "x"}], ")"}],
- RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
+ RowBox[{"pd", "(",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["log", "3"], "(",
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}]}], "+",
RowBox[{
FractionBox["1", "2"], " ",
SuperscriptBox[
TagBox["\[CurlyEpsilon]",
TraditionalForm], "2"], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox[
- RowBox[{
- SuperscriptBox["log", "2"], "(",
- RowBox[{"1", "-", "x"}], ")"}],
- RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
+ RowBox[{"pd", "(",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["log", "2"], "(",
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}]}], "+",
RowBox[{
TagBox["\[CurlyEpsilon]",
TraditionalForm], " ",
- SubscriptBox[
- RowBox[{"(",
- FractionBox[
- RowBox[{"log", "(",
- RowBox[{"1", "-", "x"}], ")"}],
- RowBox[{"1", "-", "x"}]], ")"}], "+"]}], "+",
- SubscriptBox[
- RowBox[{"(",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ")"}], "+"]}], TraditionalForm]], "Output",
- ImageSize->{549, 49},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ToDistribution",
- CellLabel->"Out[3]=",
- CellID->271495299]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"ToDistribution", ",",
- RowBox[{"PlusDistribution", "\[Rule]", "Identity"}]}], "]"}]], "Input",
- CellTags->"ToDistribution",
- CellLabel->"In[4]:=",
- CellID->94609941],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{192, 15},
+ RowBox[{"pd", "(",
+ FractionBox[
+ RowBox[{"log", "(",
+ RowBox[{"1", "-", "x"}], ")"}],
+ RowBox[{"1", "-", "x"}]], ")"}]}], "+",
+ RowBox[{"pd", "(",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ")"}], "+",
+ FractionBox[
+ RowBox[{"\[Delta]", "(",
+ FormBox[
+ RowBox[{"1", "-", "x"}],
+ TraditionalForm], ")"}],
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{319, 82},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToDistribution",
- CellLabel->"Out[4]=",
- CellID->430041707]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -270,9 +285,10 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"1", "-", "x"}], ")"}], "^",
RowBox[{"(",
- RowBox[{"Epsilon", "-", "2"}], ")"}]}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"Epsilon", "-", "2"}], ")"}]}], ",", "x", ",",
+ RowBox[{"PlusDistribution", "\[Rule]", "Identity"}]}], "]"}]], "Input",
CellTags->"ToDistribution",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->1034527004],
Cell[BoxData[
@@ -324,12 +340,11 @@ Cell[BoxData[
SuperscriptBox[
RowBox[{"(",
RowBox[{"1", "-", "x"}], ")"}], "2"]]}], TraditionalForm]], "Output",
- ImageSize->{465, 50},
+ ImageSize->{479, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToDistribution",
- CellLabel->"Out[5]=",
- CellID->454332293]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -348,7 +363,7 @@ Cell[BoxData[
RowBox[{"GenerateConditions", "\[Rule]", "False"}]}], "]"}], ",",
"Epsilon", ",", "3"}], "]"}]], "Input",
CellTags->"ToDistribution",
- CellLabel->"In[6]:=",
+ CellLabel->"In[3]:=",
CellID->941654875],
Cell[BoxData[
@@ -363,36 +378,11 @@ Cell[BoxData[
TraditionalForm], "2"], "-",
TagBox["\[CurlyEpsilon]",
TraditionalForm], "-", "1"}], TraditionalForm]], "Output",
- ImageSize->{109, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ToDistribution",
- CellLabel->"Out[6]=",
- CellID->1061431105]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "@", "Integrate"}]], "Input",
- CellTags->"ToDistribution",
- CellLabel->"In[7]:=",
- CellID->1737951035],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Assumptions", "\[RuleDelayed]", "$Assumptions"}], ",",
- RowBox[{"GenerateConditions", "\[Rule]", "Automatic"}], ",",
- RowBox[{"PrincipalValue", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{577, 15},
+ ImageSize->{113, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToDistribution",
- CellLabel->"Out[7]=",
- CellID->1658308803]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -410,7 +400,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"ToDistribution",
- CellLabel->"In[8]:=",
+ CellLabel->"In[4]:=",
CellID->1539995997],
Cell[BoxData[
@@ -425,12 +415,11 @@ Cell[BoxData[
TraditionalForm], "2"], "-",
TagBox["\[CurlyEpsilon]",
TraditionalForm], "-", "1"}], TraditionalForm]], "Output",
- ImageSize->{109, 18},
+ ImageSize->{113, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToDistribution",
- CellLabel->"Out[8]=",
- CellID->2114127907]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -460,9 +449,7 @@ Cell[TextData[{
ButtonNote->"PlusDistribution"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ToDistribution",
- CellID->277620007]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -470,7 +457,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"ToDistribution",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -479,10 +466,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 11.228565}",
+ "built" -> "{2020, 1, 5, 19, 3, 26.212225}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -493,11 +480,12 @@ Epsilon) DeltaFunction[1-x] + 1/(1-x) + a Epsilon Log[1-x]/(1-x) + 1/2 a^2 \
Epsilon^2 Log[1-x]^2/(1-x)] and (1-x)^(a Epsilon - 2) in exp by -1/(a \
Epsilon) DeltaFunctionPrime[1-x] + 1/(1-x)^2 + (a Epsilon) Log[1-x]/(1-x)^2 + \
a^2 Epsilon^2/2 Log[1-x]^2/(1-x)^2 + a^3 Epsilon^3/6 Log[1-x]^3/(1-x)^2.",
- "synonyms" -> {}, "title" -> "ToDistribution", "titlemodifier" -> "",
- "windowtitle" -> "ToDistribution", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ToDistribution"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ToDistribution",
+ "titlemodifier" -> "", "windowtitle" -> "ToDistribution", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ToDistribution"}, "SearchTextTranslated" ->
+ ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -505,8 +493,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -514,160 +503,112 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3672, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1180526592]},
"ToDistribution"->{
- Cell[4306, 128, 146, 4, 27, "Input",
+ Cell[5499, 163, 146, 4, 70, "Input",
CellTags->"ToDistribution",
CellID->1833387073],
- Cell[4455, 134, 295, 10, 36, "Output",
+ Cell[5648, 169, 295, 10, 37, "Output",
CellTags->"ToDistribution",
CellID->1934939097],
- Cell[4787, 149, 235, 7, 27, "Input",
- CellTags->"ToDistribution",
- CellID->1230244334],
- Cell[5025, 158, 303, 10, 36, "Output",
- CellTags->"ToDistribution",
- CellID->1029752620],
- Cell[5365, 173, 295, 10, 27, "Input",
+ Cell[6638, 215, 351, 11, 27, "Input",
CellTags->"ToDistribution",
CellID->1094502312],
- Cell[5663, 185, 1443, 52, 70, "Output",
- CellTags->"ToDistribution",
- CellID->271495299],
- Cell[7143, 242, 222, 6, 27, "Input",
- CellTags->"ToDistribution",
- CellID->94609941],
- Cell[7368, 250, 294, 10, 36, "Output",
- CellTags->"ToDistribution",
- CellID->430041707],
- Cell[7699, 265, 295, 10, 27, "Input",
+ Cell[6992, 228, 1332, 47, 103, "Output",
+ CellTags->"ToDistribution"],
+ Cell[8361, 280, 357, 11, 27, "Input",
CellTags->"ToDistribution",
CellID->1034527004],
- Cell[7997, 277, 1485, 54, 71, "Output",
- CellTags->"ToDistribution",
- CellID->454332293],
- Cell[9519, 336, 478, 15, 53, "Input",
+ Cell[8721, 293, 1465, 53, 64, "Output",
+ CellTags->"ToDistribution"],
+ Cell[10223, 351, 478, 15, 54, "Input",
CellTags->"ToDistribution",
CellID->941654875],
- Cell[10000, 353, 477, 17, 39, "Output",
- CellTags->"ToDistribution",
- CellID->1061431105],
- Cell[10514, 375, 136, 4, 27, "Input",
- CellTags->"ToDistribution",
- CellID->1737951035],
- Cell[10653, 381, 440, 13, 36, "Output",
- CellTags->"ToDistribution",
- CellID->1658308803],
- Cell[11130, 399, 427, 14, 27, "Input",
+ Cell[10704, 368, 456, 16, 37, "Output",
+ CellTags->"ToDistribution"],
+ Cell[11197, 389, 427, 14, 27, "Input",
CellTags->"ToDistribution",
CellID->1539995997],
- Cell[11560, 415, 477, 17, 39, "Output",
- CellTags->"ToDistribution",
- CellID->2114127907],
- Cell[12405, 455, 257, 9, 31, "Text",
- CellTags->"ToDistribution",
- CellID->277620007]}
+ Cell[11627, 405, 456, 16, 37, "Output",
+ CellTags->"ToDistribution"]},
+ "PrimaryExamplesSection"->{
+ Cell[6004, 186, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1249684736]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 14834, 516},
- {"ToDistribution", 14975, 520}
+ {"ToDistribution", 14869, 505},
+ {"PrimaryExamplesSection", 15767, 532}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3043, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 728, 17, 131, "Usage",
- CellID->982511436],
+Cell[3632, 97, 291, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3672, 99, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1180526592],
+Cell[3948, 112, 728, 17, 136, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4085, 118, 196, 6, 25, "ExampleSection",
- CellID->1758559147],
+Cell[4701, 133, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1744104550],
+Cell[5443, 159, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4306, 128, 146, 4, 27, "Input",
+Cell[5499, 163, 146, 4, 70, "Input",
CellTags->"ToDistribution",
CellID->1833387073],
-Cell[4455, 134, 295, 10, 36, "Output",
+Cell[5648, 169, 295, 10, 37, "Output",
CellTags->"ToDistribution",
CellID->1934939097]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4787, 149, 235, 7, 27, "Input",
- CellTags->"ToDistribution",
- CellID->1230244334],
-Cell[5025, 158, 303, 10, 36, "Output",
- CellTags->"ToDistribution",
- CellID->1029752620]
-}, Open ]],
+Cell[6004, 186, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1249684736],
Cell[CellGroupData[{
-Cell[5365, 173, 295, 10, 27, "Input",
- CellTags->"ToDistribution",
- CellID->1094502312],
-Cell[5663, 185, 1443, 52, 70, "Output",
- CellTags->"ToDistribution",
- CellID->271495299]
-}, Open ]],
+Cell[6417, 205, 196, 6, 26, "ExampleSection",
+ CellID->2124724330],
Cell[CellGroupData[{
-Cell[7143, 242, 222, 6, 27, "Input",
+Cell[6638, 215, 351, 11, 27, "Input",
CellTags->"ToDistribution",
- CellID->94609941],
-Cell[7368, 250, 294, 10, 36, "Output",
- CellTags->"ToDistribution",
- CellID->430041707]
+ CellID->1094502312],
+Cell[6992, 228, 1332, 47, 103, "Output",
+ CellTags->"ToDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7699, 265, 295, 10, 27, "Input",
+Cell[8361, 280, 357, 11, 27, "Input",
CellTags->"ToDistribution",
CellID->1034527004],
-Cell[7997, 277, 1485, 54, 71, "Output",
- CellTags->"ToDistribution",
- CellID->454332293]
+Cell[8721, 293, 1465, 53, 64, "Output",
+ CellTags->"ToDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9519, 336, 478, 15, 53, "Input",
+Cell[10223, 351, 478, 15, 54, "Input",
CellTags->"ToDistribution",
CellID->941654875],
-Cell[10000, 353, 477, 17, 39, "Output",
- CellTags->"ToDistribution",
- CellID->1061431105]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[10514, 375, 136, 4, 27, "Input",
- CellTags->"ToDistribution",
- CellID->1737951035],
-Cell[10653, 381, 440, 13, 36, "Output",
- CellTags->"ToDistribution",
- CellID->1658308803]
+Cell[10704, 368, 456, 16, 37, "Output",
+ CellTags->"ToDistribution"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11130, 399, 427, 14, 27, "Input",
+Cell[11197, 389, 427, 14, 27, "Input",
CellTags->"ToDistribution",
CellID->1539995997],
-Cell[11560, 415, 477, 17, 39, "Output",
- CellTags->"ToDistribution",
- CellID->2114127907]
+Cell[11627, 405, 456, 16, 37, "Output",
+ CellTags->"ToDistribution"]
}, Open ]]
}, Open ]],
-Cell[12064, 436, 31, 0, 29, "SectionFooterSpacer"]
+Cell[12110, 425, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12132, 441, 270, 12, 31, "SeeAlsoSection",
+Cell[12178, 430, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[12405, 455, 257, 9, 31, "Text",
- CellTags->"ToDistribution",
- CellID->277620007]
+Cell[12451, 444, 211, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[12677, 467, 23, 0, 42, "FooterCell"]
+Cell[12677, 454, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToFI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToFI.nb
new file mode 100644
index 000000000..faaa09a77
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToFI.nb
@@ -0,0 +1,169 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 5570, 160]
+NotebookOptionsPosition[ 3695, 109]
+NotebookOutlinePosition[ 5506, 157]
+CellTagsIndexPosition[ 5463, 154]
+WindowTitle->ToFI
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToFI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToFI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/ToFI.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$272548],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/ToFI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToFI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToFI", "[",
+ RowBox[{"expr", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}], ",",
+ RowBox[{"{", "p", "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]translates all non-tensorial loop integrals in expr \
+into TFI notation from TARCER."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowTitle->"ToFI",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 27.314407}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToFI[expr, {q1, q2}, {p}] translates all non-tensorial loop integrals in \
+expr into TFI notation from TARCER.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ToFI", "titlemodifier" -> "", "windowtitle" -> "ToFI", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ToFI"}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[576, 21, 2257, 53, 70, "AnchorBarGrid",
+ CellID->1],
+Cell[2836, 76, 281, 11, 70, "ObjectNameGrid"],
+Cell[3120, 89, 545, 16, 70, "Usage",
+ CellID->982511436],
+Cell[3668, 107, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToHypergeometric.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToHypergeometric.nb
index 564a3a58b..f05602105 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToHypergeometric.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToHypergeometric.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 14207, 491]
-NotebookOptionsPosition[ 9715, 353]
-NotebookOutlinePosition[ 12781, 438]
-CellTagsIndexPosition[ 12661, 432]
+NotebookDataLength[ 14967, 508]
+NotebookOptionsPosition[ 10812, 383]
+NotebookOutlinePosition[ 13681, 462]
+CellTagsIndexPosition[ 13561, 456]
WindowTitle->ToHypergeometric
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ToHypergeometric\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ToHypergeometric"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"HypergeometricAC\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricAC"], "\<\"HypergeometricIR\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/HypergeometricIR"], "\<\"HypergeometricSE\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/HypergeometricSE"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToHypergeometric\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToHypergeometric"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ToHypergeometric.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$156839],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ToHypergeometric", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$272987],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToHypergeometric", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ ToHypergeometric.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ToHypergeometric", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ToHypergeometric", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -127,7 +163,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1144328894],
+ CellID->994477369],
Cell[CellGroupData[{
@@ -137,7 +173,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->592550042],
+ CellID->835872530],
Cell[CellGroupData[{
@@ -171,12 +207,11 @@ Cell[BoxData[
"Hypergeometric2F1"]}],
TemplateBox[{RowBox[{"b", "+", "c", "+", "2"}]},
"Gamma"]], TraditionalForm]], "Output",
- ImageSize->{302, 45},
+ ImageSize->{324, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToHypergeometric",
- CellLabel->"Out[1]=",
- CellID->309474484]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -212,12 +247,11 @@ Cell[BoxData[
"Hypergeometric2F1"]}],
TemplateBox[{"c"},
"Gamma"]], TraditionalForm]], "Output",
- ImageSize->{208, 45},
+ ImageSize->{225, 39},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToHypergeometric",
- CellLabel->"Out[2]=",
- CellID->730361964]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -254,12 +288,11 @@ Cell[BoxData[
"Hypergeometric2F1"]}],
TemplateBox[{RowBox[{"b", "+", "c", "+", "2"}]},
"Gamma"]], TraditionalForm]], "Output",
- ImageSize->{327, 57},
+ ImageSize->{355, 55},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToHypergeometric",
- CellLabel->"Out[3]=",
- CellID->602855066]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -297,12 +330,11 @@ Cell[BoxData[
"Hypergeometric2F1"]}],
TemplateBox[{"c"},
"Gamma"]], TraditionalForm]], "Output",
- ImageSize->{241, 57},
+ ImageSize->{264, 55},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToHypergeometric",
- CellLabel->"Out[4]=",
- CellID->1693879110]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -344,9 +376,7 @@ Cell[TextData[{
ButtonNote->"HypergeometricSE"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ToHypergeometric",
- CellID->811059910]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -363,10 +393,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 12.919277}",
+ "built" -> "{2020, 1, 5, 19, 3, 28.241229}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -374,11 +404,12 @@ TaggingRules->{
"None", "summary" ->
"ToHypergeometric[t^b (1 - t)^c (1+tz)^a,t] returns Null. Remember that \
Re b >0 and Re (c-b) > 0 should hold (need not be set in Mathematica).",
- "synonyms" -> {}, "title" -> "ToHypergeometric", "titlemodifier" -> "",
- "windowtitle" -> "ToHypergeometric", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/ToHypergeometric"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ToHypergeometric",
+ "titlemodifier" -> "", "windowtitle" -> "ToHypergeometric", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/ToHypergeometric"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -387,7 +418,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -396,103 +427,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3840, 114, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5067, 150, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1144328894]},
+ CellID->994477369]},
"ToHypergeometric"->{
- Cell[4473, 143, 413, 14, 31, "Input",
+ Cell[5699, 179, 413, 14, 33, "Input",
CellTags->"ToHypergeometric",
CellID->1435030479],
- Cell[4889, 159, 594, 19, 66, "Output",
- CellTags->"ToHypergeometric",
- CellID->309474484],
- Cell[5520, 183, 504, 17, 31, "Input",
+ Cell[6115, 195, 574, 18, 60, "Output",
+ CellTags->"ToHypergeometric"],
+ Cell[6726, 218, 504, 17, 33, "Input",
CellTags->"ToHypergeometric",
CellID->26355220],
- Cell[6027, 202, 461, 17, 66, "Output",
- CellTags->"ToHypergeometric",
- CellID->730361964],
- Cell[6525, 224, 412, 14, 31, "Input",
+ Cell[7233, 237, 441, 16, 60, "Output",
+ CellTags->"ToHypergeometric"],
+ Cell[7711, 258, 412, 14, 33, "Input",
CellTags->"ToHypergeometric",
CellID->994646256],
- Cell[6940, 240, 657, 21, 78, "Output",
- CellTags->"ToHypergeometric",
- CellID->602855066],
- Cell[7634, 266, 506, 17, 31, "Input",
+ Cell[8126, 274, 637, 20, 76, "Output",
+ CellTags->"ToHypergeometric"],
+ Cell[8800, 299, 506, 17, 33, "Input",
CellTags->"ToHypergeometric",
CellID->1770257143],
- Cell[8143, 285, 537, 19, 78, "Output",
- CellTags->"ToHypergeometric",
- CellID->1693879110],
- Cell[9048, 327, 625, 21, 70, "Text",
- CellTags->"ToHypergeometric",
- CellID->811059910]}
+ Cell[9309, 318, 516, 18, 76, "Output",
+ CellTags->"ToHypergeometric"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 11624, 397},
- {"ToHypergeometric", 11768, 401}
+ {"PrimaryExamplesSection", 12709, 428},
+ {"ToHypergeometric", 12852, 432}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[588, 21, 2278, 52, 51, "AnchorBarGrid",
+Cell[588, 21, 3271, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2869, 75, 59, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2931, 78, 884, 32, 99, "Usage",
+Cell[3862, 101, 293, 11, 45, "ObjectNameGrid"],
+Cell[4158, 114, 884, 32, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3840, 114, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5067, 150, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1144328894],
+ CellID->994477369],
Cell[CellGroupData[{
-Cell[4253, 133, 195, 6, 25, "ExampleSection",
- CellID->592550042],
+Cell[5479, 169, 195, 6, 26, "ExampleSection",
+ CellID->835872530],
Cell[CellGroupData[{
-Cell[4473, 143, 413, 14, 31, "Input",
+Cell[5699, 179, 413, 14, 33, "Input",
CellTags->"ToHypergeometric",
CellID->1435030479],
-Cell[4889, 159, 594, 19, 66, "Output",
- CellTags->"ToHypergeometric",
- CellID->309474484]
+Cell[6115, 195, 574, 18, 60, "Output",
+ CellTags->"ToHypergeometric"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5520, 183, 504, 17, 31, "Input",
+Cell[6726, 218, 504, 17, 33, "Input",
CellTags->"ToHypergeometric",
CellID->26355220],
-Cell[6027, 202, 461, 17, 66, "Output",
- CellTags->"ToHypergeometric",
- CellID->730361964]
+Cell[7233, 237, 441, 16, 60, "Output",
+ CellTags->"ToHypergeometric"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6525, 224, 412, 14, 31, "Input",
+Cell[7711, 258, 412, 14, 33, "Input",
CellTags->"ToHypergeometric",
CellID->994646256],
-Cell[6940, 240, 657, 21, 78, "Output",
- CellTags->"ToHypergeometric",
- CellID->602855066]
+Cell[8126, 274, 637, 20, 76, "Output",
+ CellTags->"ToHypergeometric"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7634, 266, 506, 17, 31, "Input",
+Cell[8800, 299, 506, 17, 33, "Input",
CellTags->"ToHypergeometric",
CellID->1770257143],
-Cell[8143, 285, 537, 19, 78, "Output",
- CellTags->"ToHypergeometric",
- CellID->1693879110]
+Cell[9309, 318, 516, 18, 76, "Output",
+ CellTags->"ToHypergeometric"]
}, Open ]]
}, Open ]],
-Cell[8707, 308, 31, 0, 70, "SectionFooterSpacer"]
+Cell[9852, 340, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8775, 313, 270, 12, 70, "SeeAlsoSection",
+Cell[9920, 345, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[9048, 327, 625, 21, 70, "Text",
- CellTags->"ToHypergeometric",
- CellID->811059910]
+Cell[10193, 359, 577, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[9688, 351, 23, 0, 70, "FooterCell"]
+Cell[10785, 381, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToLarin.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToLarin.nb
index bf8052ce5..53296fe42 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToLarin.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToLarin.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10290, 355]
-NotebookOptionsPosition[ 6724, 244]
-NotebookOutlinePosition[ 9342, 318]
-CellTagsIndexPosition[ 9233, 312]
+NotebookDataLength[ 13162, 464]
+NotebookOptionsPosition[ 9701, 358]
+NotebookOutlinePosition[ 12012, 422]
+CellTagsIndexPosition[ 11901, 416]
WindowTitle->ToLarin
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ToLarin\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ToLarin"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/ToLarin.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Eps\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Eps"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracGamma"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToLarin\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToLarin"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+
+ "http://reference.wolfram.com/language/FeynCalc/ref/ToLarin.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$157176],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ToLarin", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$273426],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToLarin", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,31 +97,41 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ToLarin", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ToLarin", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData[
RowBox[{"ToLarin", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "translates all ",
+ " \[LineSeparator] substitutes ",
Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"], " ",
- SuperscriptBox["\[Gamma]", "5"]}], TraditionalForm]]],
- " in exp into ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SuperscriptBox["\[Gamma]", "5"]}]], "InlineFormula"],
+ " with ",
Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- RowBox[{"-", "\[ImaginaryI]"}], "/", "6"}], " ",
- SuperscriptBox["\[CurlyEpsilon]", "\[Mu]\[Nu]\[Lambda]\[Sigma]"],
- SuperscriptBox["\[Gamma]", "\[Nu]"], " ",
- SuperscriptBox["\[Gamma]", "\[Lambda]"], " ",
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Sigma]"], "."}]}], TraditionalForm]]]
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["I", "6"]}],
+ SuperscriptBox["\[Epsilon]",
+ RowBox[{"\[Mu]", " ", "\[Nu]", " ", "\[Lambda]", " ", "\[Sigma]"}]],
+ SuperscriptBox["\[Gamma]", "\[Nu]"],
+ SuperscriptBox["\[Gamma]", "\[Lambda]"],
+ SuperscriptBox["\[Gamma]", "\[Sigma]"]}]], "InlineFormula"],
+ "."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -108,6 +142,57 @@ Cell[BoxData[GridBox[{
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->649489056],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ToLarin", "]"}]], "Input",
+ CellLabel->"In[60]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{266, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[60]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -123,7 +208,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1976681236],
+ CellID->2091093721],
Cell[CellGroupData[{
@@ -133,15 +218,15 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->13268987],
+ CellID->590410759],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracMatrix", "[", "\[Nu]", "]"}], ".",
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
- RowBox[{"DiracMatrix", "[", "5", "]"}]}]], "Input",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}]], "Input",
CellTags->"ToLarin",
CellLabel->"In[1]:=",
CellID->975355057],
@@ -149,63 +234,88 @@ Cell[BoxData[
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{71, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToLarin",
- CellLabel->"Out[1]=",
- CellID->1694360393]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ToLarin", "[", "%", "]"}]], "Input",
- CellTags->"ToLarin",
- CellLabel->"In[2]:=",
- CellID->24926200],
+ CellLabel->"In[2]:="],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "6"]}], " ", "\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["du28",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["du29",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["du30",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], TraditionalForm]], "Output",
- ImageSize->{67, 18},
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["du28",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["du29",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["du30",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ ImageSize->{266, 35},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"ToLarin",
- CellLabel->"Out[2]=",
- CellID->758627970]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -234,10 +344,14 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/Eps",
ButtonNote->"Eps"],
FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"ToLarin",
- CellID->2133763221]
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"]
+}], "SeeAlso",
+ CellID->655647701]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -245,7 +359,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"ToLarin",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -254,23 +368,23 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 14.545667}",
+ "built" -> "{2020, 1, 5, 19, 3, 29.319505}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "ToLarin[exp] translates all \\[Gamma]^\\[Mu] \\[Gamma]^5 in exp into \
--I/6 \\[CurlyEpsilon]^\\[Mu]\\[Nu]\\[Lambda]\\[Sigma] \\[Gamma]^\\[Nu] \\ \
-\\[Gamma]^\\[Lambda] \\[Gamma]^\\[Sigma].", "synonyms" -> {}, "title" ->
- "ToLarin", "titlemodifier" -> "", "windowtitle" -> "ToLarin", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/ToLarin"}, "SearchTextTranslated" ->
- ""},
+ "ToLarin[exp] substitutes \\[Gamma]^\\[Mu] \\[Gamma]^5 with -(I/6) \
+\\[Epsilon] \\[Mu] \\[Nu] \\[Lambda] \\[Sigma] \\[Gamma]^\\[Nu] \\ \\[Gamma]^\
+\\[Lambda] \\[Gamma]^\\[Sigma].", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ToLarin", "titlemodifier" -> "", "windowtitle" -> "ToLarin",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/ToLarin"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -279,7 +393,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -288,75 +402,70 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3848, 110, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6148, 195, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1976681236]},
+ CellID->2091093721]},
"ToLarin"->{
- Cell[4480, 139, 246, 7, 27, "Input",
+ Cell[6781, 224, 205, 7, 27, "Input",
CellTags->"ToLarin",
CellID->975355057],
- Cell[4729, 148, 605, 24, 39, "Output",
- CellTags->"ToLarin",
- CellID->1694360393],
- Cell[5371, 177, 124, 4, 27, "Input",
- CellTags->"ToLarin",
- CellID->24926200],
- Cell[5498, 183, 604, 24, 39, "Output",
- CellTags->"ToLarin",
- CellID->758627970],
- Cell[6470, 230, 212, 9, 32, "Text",
- CellTags->"ToLarin",
- CellID->2133763221]}
+ Cell[6989, 233, 650, 27, 40, "Output",
+ CellTags->"ToLarin"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8640, 289},
- {"ToLarin", 8775, 293}
+ {"PrimaryExamplesSection", 11590, 403},
+ {"ToLarin", 11725, 407}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 51, "AnchorBarGrid",
+Cell[579, 21, 3095, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 947, 28, 87, "Usage",
+Cell[3677, 99, 284, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3986, 114, 879, 26, 95, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3848, 110, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4890, 144, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->649489056],
+Cell[5631, 170, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[5687, 174, 90, 2, 70, "Input"],
+Cell[5780, 178, 307, 10, 37, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6148, 195, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1976681236],
+ CellID->2091093721],
Cell[CellGroupData[{
-Cell[4261, 129, 194, 6, 25, "ExampleSection",
- CellID->13268987],
+Cell[6561, 214, 195, 6, 26, "ExampleSection",
+ CellID->590410759],
Cell[CellGroupData[{
-Cell[4480, 139, 246, 7, 27, "Input",
+Cell[6781, 224, 205, 7, 27, "Input",
CellTags->"ToLarin",
CellID->975355057],
-Cell[4729, 148, 605, 24, 39, "Output",
- CellTags->"ToLarin",
- CellID->1694360393]
+Cell[6989, 233, 650, 27, 40, "Output",
+ CellTags->"ToLarin"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5371, 177, 124, 4, 27, "Input",
- CellTags->"ToLarin",
- CellID->24926200],
-Cell[5498, 183, 604, 24, 39, "Output",
- CellTags->"ToLarin",
- CellID->758627970]
+Cell[7676, 265, 83, 2, 27, "Input"],
+Cell[7762, 269, 1178, 48, 56, "Output"]
}, Open ]]
}, Open ]],
-Cell[6129, 211, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8967, 321, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6197, 216, 270, 12, 31, "SeeAlsoSection",
+Cell[9035, 326, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6470, 230, 212, 9, 32, "Text",
- CellTags->"ToLarin",
- CellID->2133763221]
+Cell[9308, 340, 351, 13, 56, "SeeAlso",
+ CellID->655647701]
}, Open ]],
-Cell[6697, 242, 23, 0, 42, "FooterCell"]
+Cell[9674, 356, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToPaVe.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToPaVe.nb
new file mode 100644
index 000000000..afba68765
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToPaVe.nb
@@ -0,0 +1,839 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 23425, 829]
+NotebookOptionsPosition[ 19667, 710]
+NotebookOutlinePosition[ 21812, 767]
+CellTagsIndexPosition[ 21727, 762]
+WindowTitle->ToPaVe
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToPaVe\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToPaVe"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/ToPaVe.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$274293],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/ToPaVe",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToPaVe", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToPaVe", "[",
+ RowBox[{"exp", ",", " ", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] converts all scalar 1-loop integrals in exp that \
+depend on the momentum q to scalar Passarino Veltman functions A0, B0, C0, D0 \
+etc."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1179219212],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ToPaVe", "]"}]], "Input",
+ CellLabel->"In[37]:=",
+ CellID->1519444881],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"GenPaVe", "\[Rule]", "False"}], ",",
+ RowBox[{"OtherLoopMomenta", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"PaVeAutoOrder", "\[Rule]", "True"}], ",",
+ RowBox[{"PaVeAutoReduce", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{467, 35},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[37]=",
+ CellID->1645940451]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1570407572],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->921389483],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"q", ",", "m1"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->28034708],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m1^2],
+ Editable->False]], TraditionalForm]], "Output",
+ ImageSize->{64, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->491799088]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToPaVe", "[",
+ RowBox[{"%", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1888986121],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Pi]", "2"], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m1", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{92, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->325767706]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p1"}], ",", "m2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->953110084],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p1 + $CellContext`q, D]],
+ "-", $CellContext`m2^2],
+ Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ ImageSize->{198, 43},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->2075001828]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToPaVe", "[",
+ RowBox[{"%", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->731784057],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Pi]", "2"], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{157, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->218378781]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p1"}], ",", "m2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p2"}], ",", "m3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p3"}], ",", "m4"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "+", "p4"}], ",", "m5"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1811741937],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"1", "/",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m1", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m1^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m2", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p1 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p1 + $CellContext`q, D]],
+ "-", $CellContext`m2^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p2",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m3", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p2 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p2 + $CellContext`q, D]],
+ "-", $CellContext`m3^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p3",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m4", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p3 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p3 + $CellContext`q, D]],
+ "-", $CellContext`m4^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p4",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m5", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p4 + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p4 + $CellContext`q, D]],
+ "-", $CellContext`m5^2],
+ Editable->False], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{388, 45},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->1830847816]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToPaVe", "[",
+ RowBox[{"%", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->992313328],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Pi]", "2"], " ",
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"E\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p2",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p3",
+ TraditionalForm],
+ TraditionalForm], "2"], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p1",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p4",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ",",
+ SuperscriptBox["m1", "2"], ",",
+ SuperscriptBox["m2", "2"], ",",
+ SuperscriptBox["m3", "2"], ",",
+ SuperscriptBox["m4", "2"], ",",
+ SuperscriptBox["m5", "2"]}], ")"}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ ImageSize->{558, 66},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]=",
+ CellID->627176445]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"ToPaVe",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 31.551843}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToPaVe[exp, q] converts all scalar 1-loop integrals in exp that depend \
+on the momentum q to scalar Passarino Veltman functions A0, B0, C0, D0 etc.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ToPaVe", "titlemodifier" ->
+ "", "windowtitle" -> "ToPaVe", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ToPaVe"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[5234, 167, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1570407572]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 21583, 755}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3154, 91, 503, 14, 102, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3682, 109, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1179219212],
+Cell[4424, 135, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4480, 139, 110, 3, 70, "Input",
+ CellID->1519444881],
+Cell[4593, 144, 580, 16, 56, "Output",
+ CellID->1645940451]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5234, 167, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1570407572],
+Cell[CellGroupData[{
+Cell[5647, 186, 195, 6, 26, "ExampleSection",
+ CellID->921389483],
+Cell[CellGroupData[{
+Cell[5867, 196, 146, 5, 27, "Input",
+ CellID->28034708],
+Cell[6016, 203, 622, 21, 61, "Output",
+ CellID->491799088]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6675, 229, 126, 4, 27, "Input",
+ CellID->1888986121],
+Cell[6804, 235, 465, 17, 42, "Output",
+ CellID->325767706]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7306, 257, 249, 9, 27, "Input",
+ CellID->953110084],
+Cell[7558, 268, 1491, 49, 64, "Output",
+ CellID->2075001828]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9086, 322, 125, 4, 27, "Input",
+ CellID->731784057],
+Cell[9214, 328, 661, 24, 42, "Output",
+ CellID->218378781]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9912, 357, 511, 18, 27, "Input",
+ CellID->1811741937],
+Cell[10426, 377, 3893, 127, 66, "Output",
+ CellID->1830847816]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[14356, 509, 125, 4, 27, "Input",
+ CellID->992313328],
+Cell[14484, 515, 5117, 188, 87, "Output",
+ CellID->627176445]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[19640, 708, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToPaVe2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToPaVe2.nb
new file mode 100644
index 000000000..c17ff4ba1
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToPaVe2.nb
@@ -0,0 +1,388 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10726, 378]
+NotebookOptionsPosition[ 7384, 273]
+NotebookOutlinePosition[ 9504, 330]
+CellTagsIndexPosition[ 9420, 325]
+WindowTitle->ToPaVe2
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToPaVe2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToPaVe2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/ToPaVe2.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$273861],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToPaVe2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToPaVe2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToPaVe2", "[", "expr", "]"}]], "InlineFormula"],
+ " \[LineSeparator]converts all the direct Passarino-Veltman functions \
+(A0, A00, B0, B1, B00, B11, C0, D0) to PaVe-functions."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1007426684],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1487821411],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"A0", "[",
+ RowBox[{"m", "^", "2"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1548390831],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{59, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1548568580]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToPaVe2", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->58410193],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}], TraditionalForm]], "Output",
+ ImageSize->{59, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->87291641]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->328098477],
+
+Cell[BoxData[
+ RowBox[{"PaVe", "[",
+ RowBox[{"0", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ SuperscriptBox["m", "2"], "}"}]}], "]"}]], "Output",
+ ImageSize->{138, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->1350910498]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{"pp", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"M", "^", "2"}], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->989488639],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{"pp", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ ImageSize->{120, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1934662114]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToPaVe2", "[", "%", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->1490614159],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{"pp", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}], TraditionalForm]], "Output",
+ ImageSize->{120, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->289430078]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->1630168000],
+
+Cell[BoxData[
+ RowBox[{"PaVe", "[",
+ RowBox[{"1", ",", "1", ",",
+ RowBox[{"{", "pp", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], "}"}]}], "]"}]], "Output",
+ ImageSize->{208, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[6]//StandardForm=",
+ CellID->1162089280]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"ToPaVe2",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 30.420278}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToPaVe2[expr] converts all the direct Passarino-Veltman functions (A0, \
+A00, B0, B1, B00, B11, C0, D0) to PaVe-functions.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "ToPaVe2", "titlemodifier" -> "",
+ "windowtitle" -> "ToPaVe2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ToPaVe2"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3607, 105, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1007426684]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9276, 318}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[579, 21, 2269, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2851, 76, 284, 11, 45, "ObjectNameGrid"],
+Cell[3138, 89, 444, 12, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3607, 105, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1007426684],
+Cell[CellGroupData[{
+Cell[4020, 124, 196, 6, 26, "ExampleSection",
+ CellID->1487821411],
+Cell[CellGroupData[{
+Cell[4241, 134, 122, 4, 27, "Input",
+ CellID->1548390831],
+Cell[4366, 140, 343, 13, 42, "Output",
+ CellID->1548568580]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4746, 158, 102, 3, 27, "Input",
+ CellID->58410193],
+Cell[4851, 163, 277, 9, 42, "Output",
+ CellID->87291641]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5165, 177, 130, 4, 27, "Input",
+ CellID->328098477],
+Cell[5298, 183, 306, 10, 57, "Output",
+ CellID->1350910498]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5641, 198, 231, 7, 27, "Input",
+ CellID->989488639],
+Cell[5875, 207, 411, 15, 42, "Output",
+ CellID->1934662114]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6323, 227, 104, 3, 27, "Input",
+ CellID->1490614159],
+Cell[6430, 232, 342, 11, 42, "Output",
+ CellID->289430078]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6809, 248, 131, 4, 27, "Input",
+ CellID->1630168000],
+Cell[6943, 254, 375, 12, 57, "Output",
+ CellID->1162089280]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7357, 271, 23, 0, 70, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToSFAD.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToSFAD.nb
new file mode 100644
index 000000000..c04aaa52b
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToSFAD.nb
@@ -0,0 +1,452 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 12984, 442]
+NotebookOptionsPosition[ 9503, 335]
+NotebookOutlinePosition[ 11654, 392]
+CellTagsIndexPosition[ 11569, 387]
+WindowTitle->ToSFAD
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToSFAD\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToSFAD"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/ToSFAD.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$274726],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/ToSFAD",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToSFAD", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToSFAD", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]converts all propagator denominators written as FAD or \
+FeynAmpDenmoninator[...,PropagatorDenominator[...],...] to SFAD or \
+FeynAmpDenmoninator[...,StandardPropagatorDenominator[...],...] \
+respectively."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->553737049],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ToSFAD", "]"}]], "Input",
+ CellLabel->"In[236]:=",
+ CellID->180907155],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"EtaSign", "\[Rule]", "1"}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{87, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[236]=",
+ CellID->1656373949]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->380817255],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->2061686487],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"ToSFAD", "[",
+ RowBox[{"FAD", "[", "p", "]"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1857913877],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{69, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1578335482],
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"0", ",", "1"}], "}"}], ",", "1"}], "}"}], "]"}]], "Output",
+ ImageSize->{195, 15},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]//StandardForm=",
+ CellID->1388339789]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"ToSFAD", "[",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",", "m"}], "}"}], "]"}], "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[2]:=",
+ CellID->487294439],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ ImageSize->{103, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1666061286],
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "1"}], "}"}], ",", "1"}], "}"}],
+ "]"}]], "Output",
+ ImageSize->{205, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]//StandardForm=",
+ CellID->904185419]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"ToSFAD", "[",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p", "+", "q"}], ",", "m", ",", "2"}], "}"}], "]"}],
+ "]"}], "\[IndentingNewLine]",
+ RowBox[{"%", "//", "StandardForm"}]}], "Input",
+ CellLabel->"In[3]:=",
+ CellID->2042326245],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ SuperscriptBox[
+ TemplateBox[{"\"(\"",RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\"(\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p", TraditionalForm], "+",
+ FormBox["q", TraditionalForm]}], TraditionalForm],
+ TraditionalForm],
+ FormBox["\")\"", TraditionalForm]}], 2]}],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"], "2"]], TraditionalForm]], "Output",
+ ImageSize->{157, 40},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1069233690],
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p", "+", "q"}], ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "1"}], "}"}], ",", "1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"p", "+", "q"}], ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "1"}], "}"}], ",", "1"}], "}"}]}],
+ "]"}]], "Output",
+ ImageSize->{418, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]//StandardForm=",
+ CellID->627635075]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"ToSFAD",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 32.761281}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToSFAD[exp] converts all propagator denominators written as FAD or \
+FeynAmpDenmoninator[...,PropagatorDenominator[...],...] to SFAD or \
+FeynAmpDenmoninator[...,StandardPropagatorDenominator[...],...] \
+respectively.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "ToSFAD",
+ "titlemodifier" -> "", "windowtitle" -> "ToSFAD", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/ToSFAD"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[4937, 159, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->380817255]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 11426, 380}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3154, 91, 539, 14, 119, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3718, 109, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->553737049],
+Cell[4459, 135, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[CellGroupData[{
+Cell[4515, 139, 110, 3, 70, "Input",
+ CellID->180907155],
+Cell[4628, 144, 248, 8, 37, "Output",
+ CellID->1656373949]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4937, 159, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->380817255],
+Cell[CellGroupData[{
+Cell[5349, 178, 196, 6, 26, "ExampleSection",
+ CellID->2061686487],
+Cell[CellGroupData[{
+Cell[5570, 188, 197, 5, 45, "Input",
+ CellID->1857913877],
+Cell[5770, 195, 406, 12, 61, "Output",
+ CellID->1578335482],
+Cell[6179, 209, 363, 12, 51, "Output",
+ CellID->1388339789]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6579, 226, 245, 7, 45, "Input",
+ CellID->487294439],
+Cell[6827, 235, 455, 13, 61, "Output",
+ CellID->1666061286],
+Cell[7285, 250, 393, 14, 57, "Output",
+ CellID->904185419]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7715, 269, 285, 9, 45, "Input",
+ CellID->2042326245],
+Cell[8003, 280, 758, 22, 61, "Output",
+ CellID->1069233690],
+Cell[8764, 304, 673, 24, 57, "Output",
+ CellID->627635075]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[9476, 333, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToStandardMatrixElement.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToStandardMatrixElement.nb
new file mode 100644
index 000000000..479dbbdbd
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToStandardMatrixElement.nb
@@ -0,0 +1,645 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 21604, 635]
+NotebookOptionsPosition[ 18006, 526]
+NotebookOutlinePosition[ 20310, 588]
+CellTagsIndexPosition[ 20190, 582]
+WindowTitle->ToStandardMatrixElement
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSubstitute5\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSubstitute5"], "\<\"DiracGamma\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracGamma"], "\<\"ToDiracGamma67\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/ToDiracGamma67"], "\<\"Spinor\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Spinor"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToStandardMatrixElement\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToStandardMatrixElement"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+ToStandardMatrixElement.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$275161],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ToStandardMatrixElement", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["ToStandardMatrixElement", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"ToStandardMatrixElement", "[", "exp", "]"}]], "InlineFormula"],
+
+ " \[LineSeparator]wraps Dirac structures, color structures and \
+polarization vectors with the head StandardMatrixElement."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1295997546],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The idea of having standard matrix elements stems from A. Denner's \
+\"Techniques for the calculation of electroweak radiative corrections at the \
+one-loop level and results for W-physics at LEP200\", cf. ",
+ Cell[BoxData[
+ TemplateBox[{Cell[
+ TextData["arXiv:0709.1075"]],"https://arxiv.org/abs/0709.1075"},
+ "WebLink",
+ BaseStyle->{"Notes"}]]],
+ "."
+}], "Notes",
+ CellID->244417769],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ToStandardMatrixElement", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1473107891],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"ChangeDimension", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSubstitute5", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSubstitute67", "\[Rule]", "False"}], ",",
+ RowBox[{"FCColorIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Factor", ",", "5000"}], "}"}]}], ",",
+ RowBox[{"Polarization", "\[Rule]", "True"}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}], ",",
+ RowBox[{"Spinor", "\[Rule]", "False"}], ",",
+ RowBox[{"SpinorChainChiralSplit", "\[Rule]", "True"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "False"}], ",",
+ RowBox[{"TimeConstrained", "\[Rule]", "3"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{538, 91},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1328592495],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->418264240],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"k2", ",", "D"}], "]"}], ",", "0", ",", "1"}], "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"k1", ",", "D"}], "]"}]}], ",", "0", ",", "1"}], "]"}]}], "*",
+
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[",
+ RowBox[{"ps", ",", "D"}], "]"}]}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"pd", ",", "D"}], "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}]}]], "Input",\
+
+ CellLabel->"In[1]:=",
+ CellID->779626914],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["k2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["k1",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ FormBox["ps",
+ TraditionalForm]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "s"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["pd",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "d"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{387, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1972655282]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ToStandardMatrixElement", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->626624448],
+
+Cell[BoxData[
+ GraphicsBox[
+ TagBox[RasterBox[CompressedData["
+1:eJztnXlYVOUex637R/feeirv1ZYr5MYmKmRaQSqCGiaBFpgKLlfNXJJwV1xL
+09zXtDINU9QUy7XELVITBUURAxURVJRh34YBZp97ZtTLDPOedbaj8/08Tz30
+xvuec37v7/w45z0z59N61MTwMU83adJk6t+pf4WPnBk0ZcrIWREvUv/xUczU
+8WNjPhndN2baJ2M/meI36m9UYyT1z19PNWmi/1kHAAAAPHbI75+I27w7MTnz
+fr3W0fsCAAGkqNiov7E4bFxajU5XnRwV9nWewtH74wA0FqWi/PbW0R9vz5Nb
+a28AMAMp6iBsVx7rMmO7Dj4n1emqTvXtujTHSSZHlf9jxKg/q3Q6WXpMwPBz
+1YIH0hQfCPPo/vm6ZZMHBn60Mr0GlxPAOiBFxYDtyqNTFl5tWWJEyE8StU6e
+vciv994ijeCRpCkDvYISy7Q6bcWJcM+gny0Yyu5oVTgHRYuzpKhamp8jVTt6
+L2ixe+FVFCTF77sm439mkjtqaq4lxn01OeabXNNd19blxMf09Gj+XNPW3SZs
+u1nXuFt1+s+7kktVTC1CkKV9GrwkW65TF8QH+i25aUE4pecHeAYdL6d+Uuat
+83trWQ79zYiVQ8oKXcypqCskZzdPfq/LB2erGvcREHB7H5e4QIoK76gsPb32
+/Zdf6n26cRraA24TZ9/Cqyo6OGn4ZrPzlR2GjtqKpHDXttFXak02fm31xI0p
+xQpledrGfq+84LvcPCnqstYOnXWyXM3UwhfqIsL/3SNlWkXupiDvYalSCy4B
+1JJdwV2mZVBHVX9tfsCwU5U0uWeLkLJCjDnVLC+5L7k42e3V4DOEjOcXcIcc
+l8hAigqeSsWtFR1bOKbw6jhNnD0Lr6YscajfhFQp76GYO8oujW7rbloElEV/
+nCx8WGprr0S3aRF21nwpi6oeQ98en1ytZWjhh1ryU5BXj55DJy1YsaZ/5/4r
+D95ufKVtwkwShYWFD/93/a24CSPmfbdj86IF++8ryUPYKKSsEGL+EOrE9m5B
+LLx8Au6o4xIZSFGhU6m4tdKBhZfDxHErvOriw2M/u8AvBGYjU3PewyvyfONR
+tLKbSWkVap22NmvNB96tPDuHLmq0Tk/T8RGPioC6Iml2936ztiddrTC+qK+5
+OLKd/3d3CWmhrTjxvlfosXItQ4sp9Xm7ogNaNn3tvVXX6vS/XpOxds7m3PpH
+vcuODui18TZNAvIaiiO2Cikr9DFnKLzcA+6Y49LUZO6eHd6tR+yqaUODX3dt
+7Td+1x3qhNBKL62dvjI+4Yc5YQFLs3lcmmjr8o4ujQoMGLN5+7efj3ynhVfU
+3rOH41ZMHdChRefpV2SchkCKkgalmSkq++4cWDx/fdyPW9ZM78N7qcEK89Uw
+FtvEcSy897e/G5pUyWvTZiPXpA52e2N9numka8pPzVt0mfot1b1tYf2+zqrV
+VKfOX5JpcilF7NiAoQhMSMk8sHr9MUnjFQVt5ZlPe009W0XM0/rr83zaT7la
+x9RihDx/75azpYrq1Lm+bpHUkakKdoQGfnXdOKn9Z/xF7stvKK7YKqSs0Mec
+qfByDrijjktbfrT7S60/01+XqAoSIl5t3nNPoVqaEtkp8kiZRn8fdaSA1z1h
+XeZML5fQn+5SESo/HvRyy9GHi1TUyfTjm66B+odSHECKkoclzpTsSqx/H/1z
+QypKWbM8XuV9xct5vpSlFw98v37PPfpVbbaJs2PhrTwV5PpmfIHJ+pQyb+P7
+o1OoX1Le3hQxN10feer2Je6WyfSSOhpBFYHWzdp39gjZfq/xcwdN5bklk3+4
+QXc3pchd3cktKrWGqcVkOKVhRUx1Ly7gnXW5ZSkz+s5OlQq76bPOUDYKqUqy
+d1SfHo0IiU5u+PNFH3PGwss14A47rqpTgf/xWfvgU5XS84NcW318SaYu/W1E
+2xdb9pm+M6Oa34qoIme5z2uhx/UXObLL493dx1+WGa58+rXqtJbjHwekKM24
+hJkqSR/n0X5WlmEUQUsNPOZLljbmjf5Hae872CeOsfA2JKq/V9N/+3Y1T1QG
+zEaWngtv0/mbOyYHUJkU8uaMzDqd6u7WiBnp+sOsvrDmq3TT+wtSR+MYUFdf
+bYdtjX3LtfvyzFqja/u6nF3LfshgyBX5jYU+7UxWKs1bSNSkjugxNeHLyIUX
+BOa0tYayVUhZoYs5S+HlGnCHHZfx6Sy7PMajw3z9JZ5GVXkxbmJPlxfcRhwu
+4f5gS3ln4xuuvQ+WaPQnwwyvNsP1tUZX9eegNh0XGZYstNKr2zb9cuyXJQOm
+XKIppEhRmnEJM1WS8pFLq1FphjUBIYWXdb4aqL/+uX/I/mKGv8NsE2fHK15F
+7qrO7T8zzZiai6Pc243fmXJ+S0j/HedTDm+YGDEmoaDRRRSpoxEPbnvTK/K+
+C3ZpF32y/EE0FPcOrfn+QpXhPzRVmQcSzVYh9B9EjPTsukuiZmhRV178eX96
+lenZVntlYnvvXkuv1vJKRGsNZTSOrULKCjnmeuTZX9IXXg4Bp909uxyX/nTu
+uPKWPlWUtzd066b/3FX1lS8O67dD3RZ39RxidqmpKEpNTLopMz8HVfe2vu3S
+fXeh2nDOdWgVbnjsX5M60q1dbJb+hlNTcug9/wUXpIrqG6V0KxhIUZpNEGZK
+LdkV+JLrsEPFan31me3xcg/DZ90aIXy+DMcV/+32A/u2TA9xDzTLWhPYJs6O
+hVcnv7nYr2ujx1zqst8X9vdu9szTTz/zwmtdIub9kkf4yjep40M0shu/LerS
+tFnghtN5RSmzPZ9t6j95W7JEcmS85z+eavKQp/7ps+KWed2VZy/267UlX8XU
+UnV2mKfnsDOm1/i1GbEfrMjitFJmhLWGMh7HFiFlhRzzYqV+6SsjcVnAv551
+n5qQkltrlttcAk6/ezY/Lp3hdG7+SsiMpes2rPli4ty9hic2VX+Gefedu3X/
+vriFUzdlNS4/8ptLujz/D4/YLNPFT2VJ2p4Yj+ddovZcr8hP3jLE5bmWo/ff
+Kss+viq4+YudVicbnkUq7sUPcW/eccxeCd3+IkXpppI0Uzr57R1j/Fq7dY+c
+OGfOyLffCY/debXx5+UsmC95zvqI4QeK1Dpl3vquAZvNs9Z4M2wTZ8/Cq9NU
+npn54bJMszmUpU8J28i06EXX0RK00gtzwr+8bPQo1byFiKowYcSHe2gXn/hg
++VCiCikzvALuoOMyvoHljFpyaObufL61XiPNPlOs0JQdH/V62IkKYs4hRemn
+UtBMPUDYfFF/gId2+a++oKkL4nt1Y9w0h4mz9zfX5PmH137/R5HJUddf+6J3
+9CWWj2uQOlqAPP/IhnXHC5VMLUQ0pb8OcutiwQcCrD6UWELKtjG+AXfEcRlO
+59W5fE5nVckfe38nrGOxoC0/GRU8L+HYwbjlO7OJT3+RokxTKWCmHiBwvnSK
+nGWdffWP7tSFCX38F96gL5WcJs4B72rQKsrKFUZ/C6rPjfUN/rWUfQWpUUdL
+0NQXV5oOZd5C3ofyY307RiQUWvi9TWsPJYKQMiMs4PY9LrX0akJM22eb9V55
+5Gq1w7/ljxQldjTgiJnSSi/O8GvTbezSDQve7Tls4wXaT7hwmzi8JAcAAOyM
+7cpjfdbcIMMHMqpO9wsiPdsCAADnBOURAAAAAAAAAAAAAAAAAAAAAPAkoy7a
+F9qhnY+vr6+Pp4v3dG4v+gPAzkD+LjYgf7fErK2tvXv6juGtAeqCPUPmZgh+
+KQwADED+7iAgf7cuVjNrP4Kqu1Gx6fxejg8APZC/iwF8r82qWM+s/RCq7kZO
+S6N5latYgfxdxED+Lgogf6dtEYL1zNoPoOru4ElsKjzI363VUUyIP0UhfycC
++ftjLX83oJYkDIo+z3gzCPm7tTqKD5GnKOTvdED+rhOz/F3HJtem6u7AcWYX
+j8ZA/m6tjqJE7CkK+TsNkL9D/g75O1cgf+czFEcgfye3QP4Os7YAIH/nBOTv
+kL/TtED+DrO2GZC/63+G/F3EKQr5Oy2Qv3NBnGZtViB/5wDk7zrI3+laIH+H
+WVsAkL83bBLyd6ZxIH8nt0D+DrM2XyB/N9kg5O+M40D+TmyB/B1mbTsB+bsJ
+kL9D/g75O7GFiFOYtW0A5O+mQP4O+Tvk78QW8j48+WZtmwD5O1+QosSOBiB/
+Z8ApX5IDAADsQP4OAAB2BuURAAAAAAAAAAAAAAAAAAAAAPAEAHc2EC/qon2h
+Hdr5+Pr6+ni6eE/n9rZJYGugd4c7G4gdC1JUW3v39B3DqyvUBXuGzM0Q/GYi
+pwR6d+sCdzYQOVZL0UdQdTcqNp2focHpwTfXrIqzuLOZgd5dxFgvRR9C1d3I
+aWk07xN2HNC7Q+8uBPG6s6F3twviT9EHUHV38CQ2HyP07tC7//9X4M6G3l3c
+iDxFDaglCYOizzOuV0DvDr27MXBnQ+8ucsSeooa6O3Cc2f2NMdC7E1ugd4c7
+WwDQu3MAencd9O50LdC7w50tAOjdOQG9O/TuNC3Qu8OdbQb07vqfoXcXcYpC
+704L9O5cEKc7mxXo3TkAvbsOene6Fujd4c4WAPTuDZuE3p1pHOjdyS3Qu8Od
+zRfo3U02CL074zjQuxNboHeHO9tOQO9uAvTu0LtD705sIeIU7mwbAL27KdC7
+Q+8OvTuxhbwPT7472yZA784XpCixowHo3RlwypfkAAAAO9C7AwCAnUF5BAAA
+AAAAAAAAAAAAAAAAAAA83sCdDUQOUlSUQO8OdzYQO0hRBwG9u3WBOxuIHKSo
+GMA316yKs7izmYHeXcQ4S4pC7w69u3DE6M6G3t0uIEWFd4TeHXp3ixCpOxt6
+d/uAFIXeXcDGoXd/Ut3Z0LvbCaSok+vdhQC9OyPidWdzAXp3DkDvroPena7F
+joUXenfOQ3EFenfo3U1wmhR1Er27EKB3Z0LU7mzo3fU/Q+8u4hR9svXuFgG9
+OxfE6c5mBXp3DkDvroPena7FjoUXevfHxp3NCvTuDZuE3p1pHOjdyS32/FQD
+9O6PizubGejdTTYIvTvjONC7E1vs+jleUbnI4c6G3t0M6N2tPxT07qQW6N3p
+W4g4hTvbBkDvbgr07tC7Q+9ObCHvw5PvzrYJ0LvzBSlK7GgAencGnPIlOQAA
+wA707gAAYGdQHgEA4PHhfwEGIAc=
+ "], {{0, 89}, {467, 0}}, {0, 255},
+ ColorFunction->RGBColor],
+ BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True],
+ Selectable->False],
+ DefaultBaseStyle->"ImageGraphics",
+ ImageSize->Automatic,
+ ImageSizeRaw->{467, 89},
+ PlotRange->{{0, 467}, {0, 89}}]], "Output",
+ ImageSize->{471, 89},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"RasterizedOutput",
+ CellLabel->"Out[2]=",
+ CellID->527411267]
+}, Open ]]
+}, Open ]],
+
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[{
+ StyleBox[ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ FontFamily->"Verdana"],
+ ", ",
+ StyleBox[ButtonBox["Spinor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Spinor",
+ ButtonNote->"Spinor"],
+ FontFamily->"Verdana"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"ToStandardMatrixElement",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 34.127295}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "ToStandardMatrixElement[exp] wraps Dirac structures, color structures \
+and polarization vectors with the head StandardMatrixElement.",
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "ToStandardMatrixElement",
+ "titlemodifier" -> "", "windowtitle" -> "ToStandardMatrixElement",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/ToStandardMatrixElement"},
+ "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[7368, 217, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1328592495]},
+ "RasterizedOutput"->{
+ Cell[11131, 370, 5739, 102, 110, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->527411267]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 19921, 571},
+ {"RasterizedOutput", 20065, 575}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[595, 21, 3387, 81, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3985, 104, 300, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[4310, 119, 461, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[4796, 136, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1295997546],
+Cell[5538, 162, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5572, 164, 412, 11, 70, "Notes",
+ CellID->244417769],
+Cell[CellGroupData[{
+Cell[6009, 179, 126, 3, 70, "Input",
+ CellID->1473107891],
+Cell[6138, 184, 1169, 26, 112, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7368, 217, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1328592495],
+Cell[CellGroupData[{
+Cell[7781, 236, 195, 6, 26, "ExampleSection",
+ CellID->418264240],
+Cell[CellGroupData[{
+Cell[8001, 246, 905, 29, 64, "Input",
+ CellID->779626914],
+Cell[8909, 277, 2063, 83, 38, "Output",
+ CellID->1972655282]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[11009, 365, 119, 3, 27, "Input",
+ CellID->626624448],
+Cell[11131, 370, 5739, 102, 110, "Output",
+ CellTags->"RasterizedOutput",
+ CellID->527411267]
+}, Open ]]
+}, Open ]],
+Cell[16897, 476, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[16965, 481, 270, 12, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[17238, 495, 726, 26, 56, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[17979, 524, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToTFI.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToTFI.nb
index 83a848291..09ba83f4a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToTFI.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ToTFI.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 15724, 541]
-NotebookOptionsPosition[ 11382, 402]
-NotebookOutlinePosition[ 14392, 488]
-CellTagsIndexPosition[ 14283, 482]
+NotebookDataLength[ 19373, 667]
+NotebookOptionsPosition[ 15340, 541]
+NotebookOutlinePosition[ 18169, 621]
+CellTagsIndexPosition[ 18060, 615]
WindowTitle->ToTFI
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ToTFI\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ToTFI"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/ToTFI.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FromTFI\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FromTFI"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ToTFI\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ToTFI"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/ToTFI.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$157511],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/ToTFI",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$275602],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/ToTFI",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ToTFI", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ToTFI", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->295635739],
+ CellID->1789794839],
Cell[CellGroupData[{
@@ -122,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1041942674],
+ CellID->1139115897],
Cell[CellGroupData[{
@@ -144,56 +176,105 @@ Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q1", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q1^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
+ RowBox[{
SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q1)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q2", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
"\[InvisibleSpace]",
- SuperscriptBox["M", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q2^2, "-", $CellContext`M^2, "]"],
+ SuperscriptBox["M", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`M^2],
Editable->False], ")"}], ".",
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
+ RowBox[{
SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q2", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"-\"\>", "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
SequenceForm[
- "[", (-$CellContext`p + $CellContext`q2)^2, "-", $CellContext`m^2, "]"],
-
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]],
+ "-", $CellContext`m^2],
Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "q2"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q1 - $CellContext`q2)^2, "]"],
- Editable->False], ")"}]}]], TraditionalForm]], "Output",
- ImageSize->{440, 48},
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{378, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToTFI",
- CellLabel->"Out[1]=",
- CellID->1537933132]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -234,12 +315,11 @@ Cell[BoxData[
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}]}], ")"}],
TraditionalForm]], "Output",
- ImageSize->{138, 87},
+ ImageSize->{145, 87},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToTFI",
- CellLabel->"Out[2]=",
- CellID->777497565]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -267,12 +347,11 @@ Cell[BoxData[
RowBox[{"1", ",", "m"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}]}], "}"}]}], "]"}]], "Output",
- ImageSize->{456, 15},
+ ImageSize->{452, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToTFI",
- CellLabel->"Out[3]//StandardForm=",
- CellID->234884685]
+ CellLabel->"Out[3]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -324,45 +403,108 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}],
RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], ".",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["M", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`M^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]], TraditionalForm]], "Output",
- ImageSize->{358, 49},
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ ImageSize->{378, 43},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"ToTFI",
- CellLabel->"Out[4]=",
- CellID->544347485]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -386,16 +528,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["FromTFI",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FromTFI",
ButtonNote->"FromTFI"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ToTFI",
- CellID->1170025384]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -412,10 +551,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 16.122002}",
+ "built" -> "{2020, 1, 5, 19, 3, 35.242673}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -424,11 +563,12 @@ TaggingRules->{
"ToTFI[expr, q1, q2, p] translates FeynCalc 2-loop self energy type \
integrals into the TFI notation, which can be used as input for the function \
TarcerRecurse from the TARCER package. See the TARCER documenatation on TFI \
-for details on the conventions.", "synonyms" -> {}, "title" -> "ToTFI",
- "titlemodifier" -> "", "windowtitle" -> "ToTFI", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/ToTFI"}, "SearchTextTranslated" -> ""},
+for details on the conventions.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "ToTFI", "titlemodifier" -> "", "windowtitle" -> "ToTFI",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/ToTFI"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -437,7 +577,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -446,103 +586,89 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3539, 99, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4528, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->295635739]},
+ CellID->1789794839]},
"ToTFI"->{
- Cell[4172, 128, 350, 12, 27, "Input",
+ Cell[5162, 160, 350, 12, 27, "Input",
CellTags->"ToTFI",
CellID->891689049],
- Cell[4525, 142, 1976, 53, 69, "Output",
- CellTags->"ToTFI",
- CellID->1537933132],
- Cell[6538, 200, 167, 5, 27, "Input",
+ Cell[5515, 174, 2981, 102, 64, "Output",
+ CellTags->"ToTFI"],
+ Cell[8533, 281, 167, 5, 27, "Input",
CellTags->"ToTFI",
CellID->1439987751],
- Cell[6708, 207, 999, 34, 108, "Output",
- CellTags->"ToTFI",
- CellID->777497565],
- Cell[7744, 246, 124, 4, 27, "Input",
+ Cell[8703, 288, 979, 33, 108, "Output",
+ CellTags->"ToTFI"],
+ Cell[9719, 326, 124, 4, 27, "Input",
CellTags->"ToTFI",
CellID->798922700],
- Cell[7871, 252, 655, 22, 49, "Output",
- CellTags->"ToTFI",
- CellID->234884685],
- Cell[8563, 279, 484, 16, 27, "Input",
+ Cell[9846, 332, 635, 21, 51, "Output",
+ CellTags->"ToTFI"],
+ Cell[10518, 358, 484, 16, 27, "Input",
CellTags->"ToTFI",
CellID->47366036],
- Cell[9050, 297, 1685, 67, 70, "Output",
- CellTags->"ToTFI",
- CellID->544347485],
- Cell[11103, 387, 237, 10, 70, "Text",
- CellTags->"ToTFI",
- CellID->1170025384]}
+ Cell[11005, 376, 3741, 130, 64, "Output",
+ CellTags->"ToTFI"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13356, 447},
- {"ToTFI", 13487, 451}
+ {"PrimaryExamplesSection", 17302, 587},
+ {"ToTFI", 17435, 591}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[577, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[577, 21, 2988, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2813, 75, 48, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 650, 17, 112, "Usage",
+Cell[3568, 97, 282, 11, 45, "ObjectNameGrid"],
+Cell[3853, 110, 650, 17, 118, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3539, 99, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4528, 131, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->295635739],
+ CellID->1789794839],
Cell[CellGroupData[{
-Cell[3951, 118, 196, 6, 25, "ExampleSection",
- CellID->1041942674],
+Cell[4941, 150, 196, 6, 26, "ExampleSection",
+ CellID->1139115897],
Cell[CellGroupData[{
-Cell[4172, 128, 350, 12, 27, "Input",
+Cell[5162, 160, 350, 12, 27, "Input",
CellTags->"ToTFI",
CellID->891689049],
-Cell[4525, 142, 1976, 53, 69, "Output",
- CellTags->"ToTFI",
- CellID->1537933132]
+Cell[5515, 174, 2981, 102, 64, "Output",
+ CellTags->"ToTFI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6538, 200, 167, 5, 27, "Input",
+Cell[8533, 281, 167, 5, 27, "Input",
CellTags->"ToTFI",
CellID->1439987751],
-Cell[6708, 207, 999, 34, 108, "Output",
- CellTags->"ToTFI",
- CellID->777497565]
+Cell[8703, 288, 979, 33, 108, "Output",
+ CellTags->"ToTFI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7744, 246, 124, 4, 27, "Input",
+Cell[9719, 326, 124, 4, 27, "Input",
CellTags->"ToTFI",
CellID->798922700],
-Cell[7871, 252, 655, 22, 49, "Output",
- CellTags->"ToTFI",
- CellID->234884685]
+Cell[9846, 332, 635, 21, 51, "Output",
+ CellTags->"ToTFI"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8563, 279, 484, 16, 27, "Input",
+Cell[10518, 358, 484, 16, 27, "Input",
CellTags->"ToTFI",
CellID->47366036],
-Cell[9050, 297, 1685, 67, 70, "Output",
- CellTags->"ToTFI",
- CellID->544347485]
+Cell[11005, 376, 3741, 130, 64, "Output",
+ CellTags->"ToTFI"]
}, Open ]]
}, Open ]],
-Cell[10762, 368, 31, 0, 70, "SectionFooterSpacer"]
+Cell[14773, 510, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10830, 373, 270, 12, 70, "SeeAlsoSection",
+Cell[14841, 515, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[11103, 387, 237, 10, 70, "Text",
- CellTags->"ToTFI",
- CellID->1170025384]
+Cell[15114, 529, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[11355, 400, 23, 0, 70, "FooterCell"]
+Cell[15313, 539, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tr2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tr2.nb
index c6536bf42..a5d080628 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tr2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Tr2.nb
@@ -3,69 +3,97 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9936, 339]
-NotebookOptionsPosition[ 6311, 227]
-NotebookOutlinePosition[ 9004, 302]
-CellTagsIndexPosition[ 8899, 296]
+NotebookDataLength[ 10161, 326]
+NotebookOptionsPosition[ 7235, 240]
+NotebookOutlinePosition[ 9534, 302]
+CellTagsIndexPosition[ 9469, 297]
WindowTitle->Tr2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Tr2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Tr2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Tr2.html"],
- StandardForm]], "Input", TextClipboardType -> "PlainText"]},
- Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$157851],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Tr2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Tr\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Tr"], "\<\"Tf\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Tf"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"], "\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"SUNTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SUNTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Tr2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Tr2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Tr2.html"]\
+, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$276042],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Tr2",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +101,20 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Tr2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Tr2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -95,32 +135,33 @@ trace."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->2018846072],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1912467664],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1443338775],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -135,39 +176,14 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"Factoring", "\[Rule]", "False"}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{133, 15},
+ ImageSize->{119, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Tr2",
CellLabel->"Out[1]=",
CellID->1087832967]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"TR", "[",
- RowBox[{
- RowBox[{"a", " ", "Tf"}], ",",
- RowBox[{"SUNTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"Tr2",
- CellLabel->"In[2]:=",
- CellID->1913639318],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"4", " ", "a", " ",
- SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
- ImageSize->{45, 18},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Tr2",
- CellLabel->"Out[2]=",
- CellID->1821071798]
}, Open ]]
-}, Open ]],
-
-Cell["", "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
@@ -187,7 +203,6 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["Tr",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Tr",
@@ -218,9 +233,7 @@ Cell[TextData[{
ButtonNote->"SUNTrace"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Tr2",
- CellID->762070093]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -237,10 +250,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 17.706596}",
+ "built" -> "{2020, 1, 5, 19, 3, 36.343107}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -250,11 +263,11 @@ TaggingRules->{
Dirac traces unless more that 4 gamma matrices and DiracGamma[5] occur. \
Tr2[exp] also separates the color-strucure, and takes the color trace if Tf \
occurs in exp. If exp does not contain DiracTrace's, Tr2[exp] takes the Dirac \
-trace.", "synonyms" -> {}, "title" -> "Tr2", "titlemodifier" -> "",
- "windowtitle" -> "Tr2", "type" -> "Symbol", "uri" -> "FeynCalc/ref/Tr2"},
- "SearchTextTranslated" -> ""},
+trace.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Tr2",
+ "titlemodifier" -> "", "windowtitle" -> "Tr2", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Tr2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -262,8 +275,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -271,76 +285,49 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3503, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2018846072]},
"Tr2"->{
- Cell[4137, 126, 123, 4, 27, "Input",
+ Cell[5651, 167, 123, 4, 70, "Input",
CellTags->"Tr2",
CellID->111461302],
- Cell[4263, 132, 274, 10, 36, "Output",
- CellTags->"Tr2",
- CellID->1087832967],
- Cell[4574, 147, 205, 7, 27, "Input",
- CellTags->"Tr2",
- CellID->1913639318],
- Cell[4782, 156, 261, 9, 39, "Output",
+ Cell[5777, 173, 274, 10, 37, "Output",
CellTags->"Tr2",
- CellID->1821071798],
- Cell[5411, 188, 858, 34, 32, "Text",
- CellTags->"Tr2",
- CellID->762070093]}
+ CellID->1087832967]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 8329, 273},
- {"Tr2", 8459, 277}
+ {"Tr2", 9278, 287}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 51, "AnchorBarGrid",
+Cell[575, 21, 3332, 80, 53, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 613, 15, 115, "Usage",
- CellID->982511436],
+Cell[3910, 103, 280, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3503, 97, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->2018846072],
+Cell[4215, 118, 613, 15, 119, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3916, 116, 196, 6, 25, "ExampleSection",
- CellID->1443338775],
+Cell[4853, 137, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1912467664],
+Cell[5595, 163, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4137, 126, 123, 4, 27, "Input",
+Cell[5651, 167, 123, 4, 70, "Input",
CellTags->"Tr2",
CellID->111461302],
-Cell[4263, 132, 274, 10, 36, "Output",
+Cell[5777, 173, 274, 10, 37, "Output",
CellTags->"Tr2",
CellID->1087832967]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4574, 147, 205, 7, 27, "Input",
- CellTags->"Tr2",
- CellID->1913639318],
-Cell[4782, 156, 261, 9, 39, "Output",
- CellTags->"Tr2",
- CellID->1821071798]
}, Open ]]
-}, Open ]],
-Cell[5070, 169, 31, 0, 29, "SectionFooterSpacer"]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5138, 174, 270, 12, 31, "SeeAlsoSection",
+Cell[6112, 190, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5411, 188, 858, 34, 32, "Text",
- CellTags->"Tr2",
- CellID->762070093]
+Cell[6385, 204, 808, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[6284, 225, 23, 0, 42, "FooterCell"]
+Cell[7208, 238, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceDimension.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceDimension.nb
index d1ca73cba..841c13d1a 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceDimension.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceDimension.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6155, 187]
-NotebookOptionsPosition[ 3896, 121]
-NotebookOutlinePosition[ 5889, 176]
-CellTagsIndexPosition[ 5813, 171]
+NotebookDataLength[ 6893, 208]
+NotebookOptionsPosition[ 4851, 151]
+NotebookOutlinePosition[ 6686, 200]
+CellTagsIndexPosition[ 6643, 197]
WindowTitle->TraceDimension
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TraceDimension\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TraceDimension"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc2FORM\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FeynCalc2FORM"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TraceDimension\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TraceDimension"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
TraceDimension.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$158189],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/TraceDimension", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$276479],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TraceDimension", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ TraceDimension.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TraceDimension", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TraceDimension", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,9 +144,7 @@ Cell[TextData[{
ButtonNote->"FeynCalc2FORM"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TraceDimension",
- CellID->623790716]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -131,21 +161,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 19.225708}",
+ "built" -> "{2020, 1, 5, 19, 3, 37.416275}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TraceDimension is an option for FeynCalc2FORM. If set to 4: trace, if \
-set to n: tracen.", "synonyms" -> {}, "title" -> "TraceDimension",
- "titlemodifier" -> "", "windowtitle" -> "TraceDimension", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/TraceDimension"}},
+set to n: tracen.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "TraceDimension", "titlemodifier" -> "", "windowtitle" ->
+ "TraceDimension", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TraceDimension"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -154,41 +185,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "TraceDimension"->{
- Cell[3606, 107, 248, 9, 70, "Text",
- CellTags->"TraceDimension",
- CellID->623790716]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"TraceDimension", 5697, 164}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 70, "AnchorBarGrid",
+Cell[586, 21, 3037, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 389, 11, 70, "Usage",
+Cell[3626, 97, 291, 11, 70, "ObjectNameGrid"],
+Cell[3920, 110, 389, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3333, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4334, 125, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3606, 107, 248, 9, 70, "Text",
- CellTags->"TraceDimension",
- CellID->623790716]
+Cell[4607, 139, 202, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3869, 119, 23, 0, 70, "FooterCell"]
+Cell[4824, 149, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceOfOne.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceOfOne.nb
index 8f232e427..f2d36c0ef 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceOfOne.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TraceOfOne.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9324, 315]
-NotebookOptionsPosition[ 5804, 206]
-NotebookOutlinePosition[ 8362, 278]
-CellTagsIndexPosition[ 8250, 272]
+NotebookDataLength[ 10213, 348]
+NotebookOptionsPosition[ 7161, 257]
+NotebookOutlinePosition[ 9269, 314]
+CellTagsIndexPosition[ 9185, 309]
WindowTitle->TraceOfOne
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TraceOfOne\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TraceOfOne"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/TraceOfOne.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$158534],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/TraceOfOne", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracSimplify"], "\<\"DiracTrace\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TraceOfOne\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TraceOfOne"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+TraceOfOne.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$276922],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TraceOfOne", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TraceOfOne", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TraceOfOne", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -107,7 +141,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->728832718],
+ CellID->2002840320],
Cell[CellGroupData[{
@@ -117,50 +151,70 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->741598411],
+ CellID->1104752518],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[", "1", "]"}]], "Input",
+ CellLabel->"In[1]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox["1",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]="]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"TR", "[",
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[2]:="],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
RowBox[{"1", ",",
- RowBox[{"SUNTrace", "\[Rule]", "False"}], ",",
- RowBox[{"SUNNToCACF", "\[Rule]", "True"}], ",",
RowBox[{"TraceOfOne", "\[Rule]", "tr1"}]}], "]"}]], "Input",
- CellTags->"TraceOfOne",
- CellLabel->"In[1]:=",
- CellID->223402463],
+ CellLabel->"In[3]:="],
Cell[BoxData[
- FormBox["tr1", TraditionalForm]], "Output",
- ImageSize->{22, 15},
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox["1",
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"TraceOfOne",
- CellLabel->"Out[1]=",
- CellID->2044201134]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"TR", "[",
- RowBox[{"1", ",",
- RowBox[{"SUNTrace", "\[Rule]", "True"}], ",",
- RowBox[{"SUNNToCACF", "\[Rule]", "True"}], ",",
- RowBox[{"TraceOfOne", "\[Rule]", "tr2"}]}], "]"}]], "Input",
- CellTags->"TraceOfOne",
- CellLabel->"In[2]:=",
- CellID->1954279511],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[4]:="],
Cell[BoxData[
- FormBox["tr2", TraditionalForm]], "Output",
- ImageSize->{22, 15},
+ FormBox["tr1", TraditionalForm]], "Output",
+ ImageSize->{20, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"TraceOfOne",
- CellLabel->"Out[2]=",
- CellID->803728852]
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -184,11 +238,10 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
- StyleBox[ButtonBox["TR",
+ StyleBox[ButtonBox["DiracSimplify",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/TR",
- ButtonNote->"Tr"],
+ ButtonData->"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
FontFamily->"Verdana"],
", ",
StyleBox[ButtonBox["DiracTrace",
@@ -197,9 +250,7 @@ Cell[TextData[{
ButtonNote->"DiracTrace"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TraceOfOne",
- CellID->622050208]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -207,7 +258,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"TraceOfOne",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -216,21 +267,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 20.459944}",
+ "built" -> "{2020, 1, 5, 19, 3, 38.370305}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"TraceOfOne is an option for Tr and DiracTrace. Its setting determines \
-the value of the unit trace.", "synonyms" -> {}, "title" -> "TraceOfOne",
- "titlemodifier" -> "", "windowtitle" -> "TraceOfOne", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/TraceOfOne"}, "SearchTextTranslated" -> ""},
+the value of the unit trace.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "TraceOfOne", "titlemodifier" -> "", "windowtitle" -> "TraceOfOne",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/TraceOfOne"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -238,8 +290,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -248,75 +301,55 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3321, 94, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4421, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->728832718]},
- "TraceOfOne"->{
- Cell[3953, 123, 290, 8, 27, "Input",
- CellTags->"TraceOfOne",
- CellID->223402463],
- Cell[4246, 133, 214, 7, 36, "Output",
- CellTags->"TraceOfOne",
- CellID->2044201134],
- Cell[4497, 145, 290, 8, 27, "Input",
- CellTags->"TraceOfOne",
- CellID->1954279511],
- Cell[4790, 155, 213, 7, 36, "Output",
- CellTags->"TraceOfOne",
- CellID->803728852],
- Cell[5371, 185, 391, 16, 31, "Text",
- CellTags->"TraceOfOne",
- CellID->622050208]}
+ CellID->2002840320]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7641, 249},
- {"TraceOfOne", 7777, 253}
+ {"PrimaryExamplesSection", 9041, 302}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3119, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 402, 12, 82, "Usage",
+Cell[3704, 99, 287, 11, 45, "ObjectNameGrid"],
+Cell[3994, 112, 402, 12, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3321, 94, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4421, 128, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->728832718],
+ CellID->2002840320],
Cell[CellGroupData[{
-Cell[3733, 113, 195, 6, 25, "ExampleSection",
- CellID->741598411],
+Cell[4834, 147, 196, 6, 26, "ExampleSection",
+ CellID->1104752518],
+Cell[CellGroupData[{
+Cell[5055, 157, 86, 2, 27, "Input"],
+Cell[5144, 161, 229, 8, 37, "Output"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5410, 174, 89, 2, 27, "Input"],
+Cell[5502, 178, 166, 5, 35, "Output"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[3953, 123, 290, 8, 27, "Input",
- CellTags->"TraceOfOne",
- CellID->223402463],
-Cell[4246, 133, 214, 7, 36, "Output",
- CellTags->"TraceOfOne",
- CellID->2044201134]
+Cell[5705, 188, 150, 4, 27, "Input"],
+Cell[5858, 194, 229, 8, 37, "Output"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4497, 145, 290, 8, 27, "Input",
- CellTags->"TraceOfOne",
- CellID->1954279511],
-Cell[4790, 155, 213, 7, 36, "Output",
- CellTags->"TraceOfOne",
- CellID->803728852]
+Cell[6124, 207, 89, 2, 27, "Input"],
+Cell[6216, 211, 168, 5, 35, "Output"]
}, Open ]]
}, Open ]],
-Cell[5030, 166, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6411, 220, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5098, 171, 270, 12, 31, "SeeAlsoSection",
+Cell[6479, 225, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5371, 185, 391, 16, 31, "Text",
- CellTags->"TraceOfOne",
- CellID->622050208]
+Cell[6752, 239, 367, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[5777, 204, 23, 0, 42, "FooterCell"]
+Cell[7134, 255, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Trick.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Trick.nb
index 978e5684d..444f028f1 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Trick.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Trick.nb
@@ -3,69 +3,98 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 16279, 613]
-NotebookOptionsPosition[ 11352, 449]
-NotebookOutlinePosition[ 14590, 546]
-CellTagsIndexPosition[ 14481, 540]
+NotebookDataLength[ 16420, 598]
+NotebookOptionsPosition[ 12097, 460]
+NotebookOutlinePosition[ 15006, 544]
+CellTagsIndexPosition[ 14897, 538]
WindowTitle->Trick
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Trick\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Trick"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Trick.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Calc\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Calc"], "\<\"Contract\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrick"], "\<\"DotSimplify\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DotSimplify"], "\<\"DiracTrick\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DiracTrick"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Trick\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Trick"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Trick.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$159539],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Trick",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$278225],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Trick",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +102,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Trick", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Trick", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -108,7 +147,9 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1991856433],
+ CellID->1172406000],
+
+Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
@@ -116,13 +157,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->525356883],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"Trick",
- CellID->890627813],
+ CellID->558656035],
Cell[TextData[{
"This calculates ",
@@ -137,10 +172,7 @@ Cell[TextData[{
FormBox[
SubsuperscriptBox["g", "\[Nu]", "\[Nu]"], TraditionalForm]]],
" in D dimensions."
-}], "Text",
- ZeroWidthTimes->True,
- CellTags->"Trick",
- CellID->1624506888],
+}], "Notes"],
Cell[CellGroupData[{
@@ -168,12 +200,11 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ",", "D"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{56, 20},
+ ImageSize->{59, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Trick",
- CellLabel->"Out[1]=",
- CellID->472477170]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -196,76 +227,61 @@ Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{155, 20},
+ ImageSize->{170, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Trick",
- CellLabel->"Out[2]=",
- CellID->379098985]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -324,12 +340,11 @@ Cell[BoxData[
FormBox["r",
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
- ImageSize->{158, 20},
+ ImageSize->{185, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Trick",
- CellLabel->"Out[3]=",
- CellID->1886505726]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -359,12 +374,11 @@ Cell[BoxData[
FormBox["e",
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
- ImageSize->{79, 19},
+ ImageSize->{94, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Trick",
- CellLabel->"Out[4]=",
- CellID->272166616]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
@@ -381,16 +395,15 @@ Cell[BoxData[
RowBox[{
RowBox[{"GA", "[", "d", "]"}], ".",
RowBox[{"GA", "[", "e", "]"}]}]}]], "Output",
- ImageSize->{137, 15},
+ ImageSize->{142, 15},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Trick",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1559426683]
+ CellLabel->"Out[5]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
-}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -440,17 +453,15 @@ Cell[TextData[{
ButtonNote->"DiracTrick"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Trick",
- CellID->633331234]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Trick",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -459,10 +470,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 25.273573}",
+ "built" -> "{2020, 1, 5, 19, 3, 41.642366}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -470,11 +481,11 @@ TaggingRules->{
"None", "summary" ->
"Trick[exp] performs several basic simplifications without expansion. \
Trick[exp] uses Contract, DotSimplify and SUNDeltaContract.",
- "synonyms" -> {}, "title" -> "Trick", "titlemodifier" -> "",
- "windowtitle" -> "Trick", "type" -> "Symbol", "uri" ->
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Trick", "titlemodifier" ->
+ "", "windowtitle" -> "Trick", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Trick"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -482,8 +493,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -492,129 +504,102 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3350, 95, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4715, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1991856433]},
+ CellID->1172406000]},
"Trick"->{
- Cell[3961, 122, 82, 2, 35, "Subsubsection",
- CellTags->"Trick",
- CellID->890627813],
- Cell[4046, 126, 397, 16, 35, "Text",
- CellTags->"Trick",
- CellID->1624506888],
- Cell[4468, 146, 368, 12, 27, "Input",
+ Cell[5685, 178, 368, 12, 27, "Input",
CellTags->"Trick",
CellID->1470455200],
- Cell[4839, 160, 394, 15, 41, "Output",
- CellTags->"Trick",
- CellID->472477170],
- Cell[5270, 180, 348, 12, 27, "Input",
+ Cell[6056, 192, 374, 14, 37, "Output",
+ CellTags->"Trick"],
+ Cell[6467, 211, 348, 12, 27, "Input",
CellTags->"Trick",
CellID->1607408478],
- Cell[5621, 194, 1722, 73, 41, "Output",
- CellTags->"Trick",
- CellID->379098985],
- Cell[7380, 272, 122, 4, 27, "Input",
+ Cell[6818, 225, 1369, 58, 37, "Output",
+ CellTags->"Trick"],
+ Cell[8224, 288, 122, 4, 27, "Input",
CellTags->"Trick",
CellID->1357228781],
- Cell[7505, 278, 1227, 53, 41, "Output",
- CellTags->"Trick",
- CellID->1886505726],
- Cell[8769, 336, 244, 7, 27, "Input",
+ Cell[8349, 294, 1206, 52, 39, "Output",
+ CellTags->"Trick"],
+ Cell[9592, 351, 244, 7, 27, "Input",
CellTags->"Trick",
CellID->542077909],
- Cell[9016, 345, 547, 21, 40, "Output",
- CellTags->"Trick",
- CellID->272166616],
- Cell[9600, 371, 151, 5, 27, "Input",
+ Cell[9839, 360, 527, 20, 40, "Output",
+ CellTags->"Trick"],
+ Cell[10403, 385, 151, 5, 27, "Input",
CellTags->"Trick",
CellID->1364919880],
- Cell[9754, 378, 319, 10, 49, "Output",
- CellTags->"Trick",
- CellID->1559426683],
- Cell[10441, 411, 869, 33, 70, "Text",
- CellTags->"Trick",
- CellID->633331234]}
+ Cell[10557, 392, 298, 9, 51, "Output",
+ CellTags->"Trick"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 13204, 493},
- {"Trick", 13336, 497}
+ {"PrimaryExamplesSection", 13991, 505},
+ {"Trick", 14124, 509}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[577, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[577, 21, 3364, 81, 53, "AnchorBarGrid",
CellID->1],
-Cell[2813, 75, 48, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 461, 13, 98, "Usage",
+Cell[3944, 104, 282, 11, 45, "ObjectNameGrid"],
+Cell[4229, 117, 461, 13, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3350, 95, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4715, 134, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1991856433],
-Cell[3741, 112, 195, 6, 25, "ExampleSection",
- CellID->525356883],
+ CellID->1172406000],
Cell[CellGroupData[{
-Cell[3961, 122, 82, 2, 35, "Subsubsection",
- CellTags->"Trick",
- CellID->890627813],
-Cell[4046, 126, 397, 16, 35, "Text",
- CellTags->"Trick",
- CellID->1624506888],
+Cell[5128, 153, 195, 6, 26, "ExampleSection",
+ CellID->558656035],
+Cell[5326, 161, 334, 13, 35, "Notes"],
Cell[CellGroupData[{
-Cell[4468, 146, 368, 12, 27, "Input",
+Cell[5685, 178, 368, 12, 27, "Input",
CellTags->"Trick",
CellID->1470455200],
-Cell[4839, 160, 394, 15, 41, "Output",
- CellTags->"Trick",
- CellID->472477170]
+Cell[6056, 192, 374, 14, 37, "Output",
+ CellTags->"Trick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5270, 180, 348, 12, 27, "Input",
+Cell[6467, 211, 348, 12, 27, "Input",
CellTags->"Trick",
CellID->1607408478],
-Cell[5621, 194, 1722, 73, 41, "Output",
- CellTags->"Trick",
- CellID->379098985]
+Cell[6818, 225, 1369, 58, 37, "Output",
+ CellTags->"Trick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7380, 272, 122, 4, 27, "Input",
+Cell[8224, 288, 122, 4, 27, "Input",
CellTags->"Trick",
CellID->1357228781],
-Cell[7505, 278, 1227, 53, 41, "Output",
- CellTags->"Trick",
- CellID->1886505726]
+Cell[8349, 294, 1206, 52, 39, "Output",
+ CellTags->"Trick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8769, 336, 244, 7, 27, "Input",
+Cell[9592, 351, 244, 7, 27, "Input",
CellTags->"Trick",
CellID->542077909],
-Cell[9016, 345, 547, 21, 40, "Output",
- CellTags->"Trick",
- CellID->272166616]
+Cell[9839, 360, 527, 20, 40, "Output",
+ CellTags->"Trick"]
}, Open ]],
Cell[CellGroupData[{
-Cell[9600, 371, 151, 5, 27, "Input",
+Cell[10403, 385, 151, 5, 27, "Input",
CellTags->"Trick",
CellID->1364919880],
-Cell[9754, 378, 319, 10, 49, "Output",
- CellTags->"Trick",
- CellID->1559426683]
-}, Open ]],
-Cell[10088, 391, 31, 0, 70, "SectionFooterSpacer"]
+Cell[10557, 392, 298, 9, 51, "Output",
+ CellTags->"Trick"]
}, Open ]]
}, Open ]],
+Cell[10882, 405, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[10168, 397, 270, 12, 70, "SeeAlsoSection",
+Cell[10950, 410, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[10441, 411, 869, 33, 70, "Text",
- CellTags->"Trick",
- CellID->633331234]
+Cell[11223, 424, 832, 31, 56, "SeeAlso"]
}, Open ]],
-Cell[11325, 447, 23, 0, 70, "FooterCell"]
+Cell[12070, 458, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickIntegrate.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickIntegrate.nb
index 6ea6816cc..d5571d875 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickIntegrate.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickIntegrate.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11858, 393]
-NotebookOptionsPosition[ 7967, 279]
-NotebookOutlinePosition[ 10868, 356]
-CellTagsIndexPosition[ 10750, 350]
+NotebookDataLength[ 12503, 411]
+NotebookOptionsPosition[ 8867, 307]
+NotebookOutlinePosition[ 11616, 379]
+CellTagsIndexPosition[ 11498, 373]
WindowTitle->TrickIntegrate
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TrickIntegrate\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TrickIntegrate"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Epsilon\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Epsilon"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TrickIntegrate\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TrickIntegrate"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
TrickIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$158869],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/TrickIntegrate", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$277359],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TrickIntegrate", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ TrickIntegrate.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TrickIntegrate", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TrickIntegrate", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -151,7 +183,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1642198825],
+ CellID->415536027],
Cell[CellGroupData[{
@@ -161,7 +193,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->667432360],
+ CellID->854168379],
Cell[CellGroupData[{
@@ -197,12 +229,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"t", ",", "0", ",", "1"}], "}"}]}], "]"}],
TraditionalForm]], "Output",
- ImageSize->{286, 21},
+ ImageSize->{284, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TrickIntegrate",
- CellLabel->"Out[1]=",
- CellID->308907212]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -235,12 +266,11 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"t", ",", "0", ",", "1"}], "}"}]}], "]"}],
TraditionalForm]], "Output",
- ImageSize->{252, 21},
+ ImageSize->{249, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TrickIntegrate",
- CellLabel->"Out[2]=",
- CellID->1473267114]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]],
@@ -270,9 +300,7 @@ Cell[TextData[{
ButtonNote->"Epsilon"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TrickIntegrate",
- CellID->1095920169]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -280,7 +308,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{278, Automatic}, {Automatic, 28}},
WindowTitle->"TrickIntegrate",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -289,10 +317,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 22.012411}",
+ "built" -> "{2020, 1, 5, 19, 3, 39.483603}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -303,12 +331,12 @@ trick for the definite integral of ((1 - t) a Epsilon - 1 g[t]) from 0 to 1, \
yielding g[1]/a/Epsilon + Hold[Integrate][(1 - t) a Epsilon - 1 \
(g[t]-g[1]),{t,0,1}]. TrickIntegrate[t a Epsilon - 1 g[t], t] gives g[0]/(a \
Epsilon)+ Hold[Integrate][t a Epsilon - 1 (g[t]-g[0]),{t,0,1}], provided g[1] \
-and g[0] exist.", "synonyms" -> {}, "title" -> "TrickIntegrate",
- "titlemodifier" -> "", "windowtitle" -> "TrickIntegrate", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/TrickIntegrate"}, "SearchTextTranslated" ->
- ""},
+and g[0] exist.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "TrickIntegrate", "titlemodifier" -> "", "windowtitle" ->
+ "TrickIntegrate", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TrickIntegrate"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -317,7 +345,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -326,75 +354,65 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4750, 138, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[5739, 170, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1642198825]},
+ CellID->415536027]},
"TrickIntegrate"->{
- Cell[5383, 167, 382, 13, 27, "Input",
+ Cell[6371, 199, 382, 13, 27, "Input",
CellTags->"TrickIntegrate",
CellID->1216797415],
- Cell[5768, 182, 622, 22, 42, "Output",
- CellTags->"TrickIntegrate",
- CellID->308907212],
- Cell[6427, 209, 328, 11, 27, "Input",
+ Cell[6756, 214, 602, 21, 42, "Output",
+ CellTags->"TrickIntegrate"],
+ Cell[7395, 240, 328, 11, 27, "Input",
CellTags->"TrickIntegrate",
CellID->256517011],
- Cell[6758, 222, 568, 20, 42, "Output",
- CellTags->"TrickIntegrate",
- CellID->1473267114],
- Cell[7694, 265, 231, 9, 32, "Text",
- CellTags->"TrickIntegrate",
- CellID->1095920169]}
+ Cell[7726, 253, 547, 19, 42, "Output",
+ CellTags->"TrickIntegrate"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 10111, 327},
- {"TrickIntegrate", 10253, 331}
+ {"PrimaryExamplesSection", 10998, 355},
+ {"TrickIntegrate", 11139, 359}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[586, 21, 2270, 52, 51, "AnchorBarGrid",
+Cell[586, 21, 3025, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2859, 75, 57, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2919, 78, 1806, 56, 159, "Usage",
+Cell[3614, 97, 291, 11, 45, "ObjectNameGrid"],
+Cell[3908, 110, 1806, 56, 165, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4750, 138, 388, 15, 31, "PrimaryExamplesSection",
+Cell[5739, 170, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1642198825],
+ CellID->415536027],
Cell[CellGroupData[{
-Cell[5163, 157, 195, 6, 25, "ExampleSection",
- CellID->667432360],
+Cell[6151, 189, 195, 6, 26, "ExampleSection",
+ CellID->854168379],
Cell[CellGroupData[{
-Cell[5383, 167, 382, 13, 27, "Input",
+Cell[6371, 199, 382, 13, 27, "Input",
CellTags->"TrickIntegrate",
CellID->1216797415],
-Cell[5768, 182, 622, 22, 42, "Output",
- CellTags->"TrickIntegrate",
- CellID->308907212]
+Cell[6756, 214, 602, 21, 42, "Output",
+ CellTags->"TrickIntegrate"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6427, 209, 328, 11, 27, "Input",
+Cell[7395, 240, 328, 11, 27, "Input",
CellTags->"TrickIntegrate",
CellID->256517011],
-Cell[6758, 222, 568, 20, 42, "Output",
- CellTags->"TrickIntegrate",
- CellID->1473267114]
+Cell[7726, 253, 547, 19, 42, "Output",
+ CellTags->"TrickIntegrate"]
}, Open ]]
}, Open ]],
-Cell[7353, 246, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8300, 276, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7421, 251, 270, 12, 31, "SeeAlsoSection",
+Cell[8368, 281, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[7694, 265, 231, 9, 32, "Text",
- CellTags->"TrickIntegrate",
- CellID->1095920169]
+Cell[8641, 295, 184, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[7940, 277, 23, 0, 42, "FooterCell"]
+Cell[8840, 305, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickMandelstam.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickMandelstam.nb
index 220f1c9d0..4915242af 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickMandelstam.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TrickMandelstam.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10482, 339]
-NotebookOptionsPosition[ 7013, 238]
-NotebookOutlinePosition[ 9729, 310]
-CellTagsIndexPosition[ 9612, 304]
+NotebookDataLength[ 10638, 344]
+NotebookOptionsPosition[ 7224, 246]
+NotebookOutlinePosition[ 9940, 318]
+CellTagsIndexPosition[ 9823, 312]
WindowTitle->TrickMandelstam
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ TrickMandelstam.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$159202],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$277792],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/TrickMandelstam", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ TrickMandelstam.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TrickMandelstam", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TrickMandelstam", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -88,9 +99,8 @@ Cell[BoxData[GridBox[{
RowBox[{"m2", "^", "2"}], "+",
RowBox[{"m3", "^", "2"}], "+",
RowBox[{"m4", "^", "2"}]}]}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "simplifies all sums in expr so that one of the \nMandelstam variables \
-s, t or u is eliminated by the relation ",
+ " \[LineSeparator]simplifies all sums in expr so that one of the \
+Mandelstam variables s, t or u is eliminated by the relation ",
StyleBox["s",
FontSlant->"Italic"],
" + ",
@@ -144,7 +154,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->2111662586],
+ CellID->668257312],
Cell[CellGroupData[{
@@ -154,7 +164,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->556438600],
+ CellID->1120472139],
Cell[CellGroupData[{
@@ -187,12 +197,11 @@ Cell[BoxData[
RowBox[{"u", "-",
SubsuperscriptBox["M", "W", "2"]}], ")"}]}], TraditionalForm]], "Output",\
- ImageSize->{101, 21},
+ ImageSize->{107, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TrickMandelstam",
- CellLabel->"Out[1]=",
- CellID->1660674587]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -224,12 +233,11 @@ Cell[BoxData[
SuperscriptBox["M", "4"]}], "-",
SuperscriptBox["s", "2"], "-", "st", "-", "su"}],
TraditionalForm]], "Output",
- ImageSize->{127, 18},
+ ImageSize->{131, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"TrickMandelstam",
- CellLabel->"Out[2]=",
- CellID->26761965]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -248,10 +256,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 23.720203}",
+ "built" -> "{2020, 1, 5, 19, 3, 40.529219}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -261,11 +269,12 @@ TaggingRules->{
all sums in expr so that one of the Mandelstam variables s, t or u is \
eliminated by the relation s + t + u = m_1^2 + m_2^2+ m_3^2+ m_4^2 . The \
trick is that the resulting sum has the most short number of terms.",
- "synonyms" -> {}, "title" -> "TrickMandelstam", "titlemodifier" -> "",
- "windowtitle" -> "TrickMandelstam", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/TrickMandelstam"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "TrickMandelstam",
+ "titlemodifier" -> "", "windowtitle" -> "TrickMandelstam", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/TrickMandelstam"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -273,8 +282,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -283,64 +293,59 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4445, 131, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[4696, 141, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2111662586]},
+ CellID->668257312]},
"TrickMandelstam"->{
- Cell[5078, 160, 545, 19, 31, "Input",
+ Cell[5329, 170, 545, 19, 33, "Input",
CellTags->"TrickMandelstam",
CellID->576381697],
- Cell[5626, 181, 356, 13, 42, "Output",
- CellTags->"TrickMandelstam",
- CellID->1660674587],
- Cell[6019, 199, 586, 18, 45, "Input",
+ Cell[5877, 191, 335, 12, 42, "Output",
+ CellTags->"TrickMandelstam"],
+ Cell[6249, 208, 586, 18, 45, "Input",
CellTags->"TrickMandelstam",
CellID->2075024335],
- Cell[6608, 219, 339, 12, 39, "Output",
- CellTags->"TrickMandelstam",
- CellID->26761965]}
+ Cell[6838, 228, 320, 11, 37, "Output",
+ CellTags->"TrickMandelstam"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9062, 284},
- {"TrickMandelstam", 9205, 288}
+ {"PrimaryExamplesSection", 9318, 294},
+ {"TrickMandelstam", 9460, 298}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 51, "AnchorBarGrid",
+Cell[587, 21, 2302, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 1495, 49, 124, "Usage",
+Cell[2892, 76, 292, 11, 45, "ObjectNameGrid"],
+Cell[3187, 89, 1484, 48, 107, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4445, 131, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4696, 141, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->2111662586],
+ CellID->668257312],
Cell[CellGroupData[{
-Cell[4858, 150, 195, 6, 25, "ExampleSection",
- CellID->556438600],
+Cell[5108, 160, 196, 6, 26, "ExampleSection",
+ CellID->1120472139],
Cell[CellGroupData[{
-Cell[5078, 160, 545, 19, 31, "Input",
+Cell[5329, 170, 545, 19, 33, "Input",
CellTags->"TrickMandelstam",
CellID->576381697],
-Cell[5626, 181, 356, 13, 42, "Output",
- CellTags->"TrickMandelstam",
- CellID->1660674587]
+Cell[5877, 191, 335, 12, 42, "Output",
+ CellTags->"TrickMandelstam"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6019, 199, 586, 18, 45, "Input",
+Cell[6249, 208, 586, 18, 45, "Input",
CellTags->"TrickMandelstam",
CellID->2075024335],
-Cell[6608, 219, 339, 12, 39, "Output",
- CellTags->"TrickMandelstam",
- CellID->26761965]
+Cell[6838, 228, 320, 11, 37, "Output",
+ CellTags->"TrickMandelstam"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[6986, 236, 23, 0, 42, "FooterCell"]
+Cell[7197, 244, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2AlienOperator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2AlienOperator.nb
index ed3d1abc7..a2a7010d7 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2AlienOperator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2AlienOperator.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13717, 449]
-NotebookOptionsPosition[ 10343, 350]
-NotebookOutlinePosition[ 12948, 420]
-CellTagsIndexPosition[ 12825, 414]
+NotebookDataLength[ 13799, 451]
+NotebookOptionsPosition[ 10476, 355]
+NotebookOutlinePosition[ 13083, 425]
+CellTagsIndexPosition[ 12960, 419]
WindowTitle->Twist2AlienOperator
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Twist2AlienOperator.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$160245],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$279123],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Twist2AlienOperator", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Twist2AlienOperator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Twist2AlienOperator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Twist2AlienOperator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +120,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1055910193],
+ CellID->1711570411],
Cell[CellGroupData[{
@@ -119,7 +130,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1997862075],
+ CellID->1110479619],
Cell[CellGroupData[{
@@ -165,12 +176,11 @@ Cell[BoxData[
RowBox[{"m", "-", "1"}]]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{311, 54},
+ ImageSize->{348, 56},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist2AlienOperator",
- CellLabel->"Out[1]=",
- CellID->891789414]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -198,19 +208,15 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "m"], "+", "1"}], ")"}], " ",
SubsuperscriptBox["g", "s", "3"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]], " ",
SubscriptBox["S", "n"], " ",
RowBox[{
SuperscriptBox["T",
@@ -336,12 +342,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}], ")"}],
RowBox[{"m", "-", "2"}]]}]}], ")"}]}]}], TraditionalForm]], "Output",
- ImageSize->{420, 154},
+ ImageSize->{424, 142},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist2AlienOperator",
- CellLabel->"Out[2]=",
- CellID->589738199]
+ CellLabel->"Out[2]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -360,10 +365,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 28.694522}",
+ "built" -> "{2020, 1, 5, 19, 3, 44.037246}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -371,11 +376,12 @@ TaggingRules->{
"None", "summary" ->
"Twist2AlienOperator[p, 0] : (7); Twist2AlienOperator[p1,p2,{p3,mu,a}, 0] \
(p1: incoming quark momentum, p3: incoming gluon (count1)).",
- "synonyms" -> {}, "title" -> "Twist2AlienOperator", "titlemodifier" -> "",
- "windowtitle" -> "Twist2AlienOperator", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Twist2AlienOperator"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Twist2AlienOperator",
+ "titlemodifier" -> "", "windowtitle" -> "Twist2AlienOperator", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Twist2AlienOperator"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -383,8 +389,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -393,64 +400,59 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3471, 96, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3733, 107, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1055910193]},
+ CellID->1711570411]},
"Twist2AlienOperator"->{
- Cell[4105, 125, 177, 5, 27, "Input",
+ Cell[4367, 136, 177, 5, 27, "Input",
CellTags->"Twist2AlienOperator",
CellID->902933513],
- Cell[4285, 132, 1124, 40, 75, "Output",
- CellTags->"Twist2AlienOperator",
- CellID->891789414],
- Cell[5446, 177, 263, 8, 27, "Input",
+ Cell[4547, 143, 1104, 39, 77, "Output",
+ CellTags->"Twist2AlienOperator"],
+ Cell[5688, 187, 263, 8, 27, "Input",
CellTags->"Twist2AlienOperator",
CellID->581588333],
- Cell[5712, 187, 4565, 156, 175, "Output",
- CellTags->"Twist2AlienOperator",
- CellID->589738199]}
+ Cell[5954, 197, 4456, 151, 163, "Output",
+ CellTags->"Twist2AlienOperator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 12255, 394},
- {"Twist2AlienOperator", 12401, 398}
+ {"PrimaryExamplesSection", 12433, 401},
+ {"Twist2AlienOperator", 12580, 405}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 51, "AnchorBarGrid",
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 497, 14, 99, "Usage",
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
+Cell[3211, 89, 497, 14, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3471, 96, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3733, 107, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1055910193],
+ CellID->1711570411],
Cell[CellGroupData[{
-Cell[3884, 115, 196, 6, 25, "ExampleSection",
- CellID->1997862075],
+Cell[4146, 126, 196, 6, 26, "ExampleSection",
+ CellID->1110479619],
Cell[CellGroupData[{
-Cell[4105, 125, 177, 5, 27, "Input",
+Cell[4367, 136, 177, 5, 27, "Input",
CellTags->"Twist2AlienOperator",
CellID->902933513],
-Cell[4285, 132, 1124, 40, 75, "Output",
- CellTags->"Twist2AlienOperator",
- CellID->891789414]
+Cell[4547, 143, 1104, 39, 77, "Output",
+ CellTags->"Twist2AlienOperator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5446, 177, 263, 8, 27, "Input",
+Cell[5688, 187, 263, 8, 27, "Input",
CellTags->"Twist2AlienOperator",
CellID->581588333],
-Cell[5712, 187, 4565, 156, 175, "Output",
- CellTags->"Twist2AlienOperator",
- CellID->589738199]
+Cell[5954, 197, 4456, 151, 163, "Output",
+ CellTags->"Twist2AlienOperator"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[10316, 348, 23, 0, 42, "FooterCell"]
+Cell[10449, 353, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2CounterOperator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2CounterOperator.nb
index 27025bcab..530dc9511 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2CounterOperator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2CounterOperator.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 20006, 674]
-NotebookOptionsPosition[ 16108, 560]
-NotebookOutlinePosition[ 18995, 637]
-CellTagsIndexPosition[ 18870, 631]
+NotebookDataLength[ 19173, 642]
+NotebookOptionsPosition[ 15375, 534]
+NotebookOutlinePosition[ 18237, 609]
+CellTagsIndexPosition[ 18112, 603]
WindowTitle->Twist2CounterOperator
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Twist2CounterOperator.html"], StandardForm]], "Input", TextClipboardType ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$160577],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$279551],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/ref/Twist2CounterOperator", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Twist2CounterOperator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Twist2CounterOperator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Twist2CounterOperator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -112,7 +123,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1882335034],
+ CellID->1185385773],
Cell[CellGroupData[{
@@ -122,7 +133,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1747945603],
+ CellID->1655180484],
Cell[CellGroupData[{
@@ -173,22 +184,16 @@ Cell[BoxData[
RowBox[{"m", "+", "2"}]], "-",
FractionBox["8",
RowBox[{"m", "-", "1"}]]}], ")"}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -217,32 +222,24 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]], " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
@@ -285,66 +282,49 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["nu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}]}]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["nu",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}]}], ")"}]}]}]}],
TraditionalForm]], "Output",
- ImageSize->{544, 143},
+ ImageSize->{566, 118},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist2CounterOperator",
- CellLabel->"Out[1]=",
- CellID->246528770]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
@@ -396,12 +376,11 @@ Cell[BoxData[
RowBox[{"m", "-", "1"}]]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], TraditionalForm]], "Output",
- ImageSize->{379, 54},
+ ImageSize->{417, 56},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist2CounterOperator",
- CellLabel->"Out[2]=",
- CellID->773930559]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -442,19 +421,15 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], " ",
SubsuperscriptBox["g", "s", "3"], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["mu",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]], " ",
SubscriptBox["S", "n"], " ",
RowBox[{"(",
RowBox[{
@@ -546,12 +521,11 @@ Cell[BoxData[
FormBox["p2",
TraditionalForm],
TraditionalForm]}]}]]}], ")"}]}]}]}], TraditionalForm]], "Output",
- ImageSize->{432, 100},
+ ImageSize->{439, 89},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist2CounterOperator",
- CellLabel->"Out[3]=",
- CellID->1953247697]
+ CellLabel->"Out[3]="]
}, Open ]]
}, Open ]]
}, Open ]],
@@ -561,7 +535,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
WindowTitle->"Twist2CounterOperator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -570,10 +544,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 30.212380}",
+ "built" -> "{2020, 1, 5, 19, 3, 45.164331}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -581,12 +555,12 @@ TaggingRules->{
"None", "summary" ->
"Twist2CounterOperator[p, mu, nu, a, b, 5]; Twist2CounterOperator[p, 7] : \
(7); Twist2CounterOperator[p1,p2,{p3,mu,a}, 1] (p1: incoming quark momentum, \
-p3: incoming gluon (count1)).", "synonyms" -> {}, "title" ->
+p3: incoming gluon (count1)).", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"Twist2CounterOperator", "titlemodifier" -> "", "windowtitle" ->
"Twist2CounterOperator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Twist2CounterOperator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -594,8 +568,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -604,78 +579,71 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3586, 99, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[3848, 110, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1882335034]},
+ CellID->1185385773]},
"Twist2CounterOperator"->{
- Cell[4220, 128, 222, 6, 27, "Input",
+ Cell[4482, 139, 222, 6, 27, "Input",
CellTags->"Twist2CounterOperator",
CellID->1762178901],
- Cell[4445, 136, 5992, 210, 164, "Output",
- CellTags->"Twist2CounterOperator",
- CellID->246528770],
- Cell[10474, 351, 177, 5, 27, "Input",
+ Cell[4707, 147, 5132, 179, 139, "Output",
+ CellTags->"Twist2CounterOperator"],
+ Cell[9876, 331, 177, 5, 27, "Input",
CellTags->"Twist2CounterOperator",
CellID->1568458682],
- Cell[10654, 358, 1257, 45, 75, "Output",
- CellTags->"Twist2CounterOperator",
- CellID->773930559],
- Cell[11948, 408, 260, 7, 27, "Input",
+ Cell[10056, 338, 1237, 44, 77, "Output",
+ CellTags->"Twist2CounterOperator"],
+ Cell[11330, 387, 260, 7, 27, "Input",
CellTags->"Twist2CounterOperator",
CellID->1910103980],
- Cell[12211, 417, 3831, 136, 121, "Output",
- CellTags->"Twist2CounterOperator",
- CellID->1953247697]}
+ Cell[11593, 396, 3716, 131, 110, "Output",
+ CellTags->"Twist2CounterOperator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 18077, 605},
- {"Twist2CounterOperator", 18225, 609}
+ {"PrimaryExamplesSection", 17386, 580},
+ {"Twist2CounterOperator", 17535, 584}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2298, 52, 51, "AnchorBarGrid",
+Cell[593, 21, 2326, 53, 53, "AnchorBarGrid",
CellID->1],
-Cell[2894, 75, 64, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2961, 78, 600, 17, 99, "Usage",
+Cell[2922, 76, 298, 11, 45, "ObjectNameGrid"],
+Cell[3223, 89, 600, 17, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3586, 99, 388, 15, 31, "PrimaryExamplesSection",
+Cell[3848, 110, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1882335034],
+ CellID->1185385773],
Cell[CellGroupData[{
-Cell[3999, 118, 196, 6, 25, "ExampleSection",
- CellID->1747945603],
+Cell[4261, 129, 196, 6, 26, "ExampleSection",
+ CellID->1655180484],
Cell[CellGroupData[{
-Cell[4220, 128, 222, 6, 27, "Input",
+Cell[4482, 139, 222, 6, 27, "Input",
CellTags->"Twist2CounterOperator",
CellID->1762178901],
-Cell[4445, 136, 5992, 210, 164, "Output",
- CellTags->"Twist2CounterOperator",
- CellID->246528770]
+Cell[4707, 147, 5132, 179, 139, "Output",
+ CellTags->"Twist2CounterOperator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[10474, 351, 177, 5, 27, "Input",
+Cell[9876, 331, 177, 5, 27, "Input",
CellTags->"Twist2CounterOperator",
CellID->1568458682],
-Cell[10654, 358, 1257, 45, 75, "Output",
- CellTags->"Twist2CounterOperator",
- CellID->773930559]
+Cell[10056, 338, 1237, 44, 77, "Output",
+ CellTags->"Twist2CounterOperator"]
}, Open ]],
Cell[CellGroupData[{
-Cell[11948, 408, 260, 7, 27, "Input",
+Cell[11330, 387, 260, 7, 27, "Input",
CellTags->"Twist2CounterOperator",
CellID->1910103980],
-Cell[12211, 417, 3831, 136, 121, "Output",
- CellTags->"Twist2CounterOperator",
- CellID->1953247697]
+Cell[11593, 396, 3716, 131, 110, "Output",
+ CellTags->"Twist2CounterOperator"]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[16081, 558, 23, 0, 70, "FooterCell"]
+Cell[15348, 532, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2GluonOperator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2GluonOperator.nb
index 5e7a3a7c3..f7923912e 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2GluonOperator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2GluonOperator.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 10624, 310]
-NotebookOptionsPosition[ 6466, 199]
-NotebookOutlinePosition[ 9792, 280]
-CellTagsIndexPosition[ 9671, 274]
+NotebookDataLength[ 12549, 381]
+NotebookOptionsPosition[ 8607, 280]
+NotebookOutlinePosition[ 11804, 355]
+CellTagsIndexPosition[ 11681, 349]
WindowTitle->Twist2GluonOperator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Twist2GluonOperator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Twist2GluonOperator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2QuarkOperator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2QuarkOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Twist2GluonOperator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Twist2GluonOperator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Twist2GluonOperator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$160913],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Twist2GluonOperator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$279983],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Twist2GluonOperator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Twist2GluonOperator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Twist2GluonOperator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Twist2GluonOperator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -123,7 +155,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1],
+ CellID->1700890378],
Cell[CellGroupData[{
@@ -133,41 +165,92 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1],
+ CellID->45328809],
-Cell["The setting All for Explicit performs the sums.", "Text",
- CellTags->"Twist2GluonOperator",
- CellID->820989411],
+Cell["The setting All for Explicit performs the sums.", "Notes"],
+
+Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Twist2GluonOperator", ",", " ",
- RowBox[{"Polarization", " ", "\[Rule]", " ", "1"}], ",", " ",
- RowBox[{"Explicit", "\[Rule]", "All"}]}], "]"}], ";"}]], "Input",
+ RowBox[{"Twist2GluonOperator", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}], ",", " ",
+ RowBox[{"Polarization", " ", "\[Rule]", " ", "1"}], ",", " ",
+ RowBox[{"Explicit", "\[Rule]", "All"}]}], "]"}]], "Input",
CellTags->"Twist2GluonOperator",
CellLabel->"In[1]:=",
- CellID->1824993691],
+ CellID->1893252067],
Cell[BoxData[
- RowBox[{
- RowBox[{"Twist2GluonOperator", "[",
- RowBox[{
- RowBox[{"{",
- RowBox[{"p", ",", "\[Mu]", ",", "a"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"q", ",", "\[Nu]", ",", "b"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"r", ",", "\[Rho]", ",", "c"}], "}"}]}], "]"}], ";"}]], "Input",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"-", "1"}], ")"}], "m"],
+ TraditionalForm]}], ")"}], " ",
+ SubscriptBox["g", "s"], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["c",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox["O",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm], "\[VeryThinSpace]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm], "\[VeryThinSpace]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}], "G3"], "(",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], ",",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm], ",",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{266, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist2GluonOperator",
- CellLabel->"In[2]:=",
- CellID->1893252067]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
-Cell[CellGroupData[{
+Cell["", "SectionFooterSpacer"]
+}, Open ]],
-Cell["", "SectionFooterSpacer"],
+Cell[CellGroupData[{
Cell[TextData[{
Cell[BoxData[
@@ -190,9 +273,7 @@ Cell[TextData[{
ButtonNote->"Twist2QuarkOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Twist2GluonOperator",
- CellID->171220448]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -200,7 +281,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
WindowTitle->"Twist2GluonOperator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -209,10 +290,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 31.779510}",
+ "built" -> "{2020, 1, 5, 19, 3, 46.332445}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -230,12 +311,12 @@ setting of the option Polarization (unpolarized: 0; polarized: 1) determines \
whether the unpolarized or polarized feynman rule is returned. With the \
setting Explicit to False the color-structure and the (1+(-1)^OPEm) (for \
polarized: (1-(-1)^OPEm)) is extracted and the color indices are omitted in \
-the arguments of Twist2GluonOperator.", "synonyms" -> {}, "title" ->
- "Twist2GluonOperator", "titlemodifier" -> "", "windowtitle" ->
+the arguments of Twist2GluonOperator.", "synonyms" -> {}, "tabletags" -> {},
+ "title" -> "Twist2GluonOperator", "titlemodifier" -> "", "windowtitle" ->
"Twist2GluonOperator", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Twist2GluonOperator"}},
+ "FeynCalc/ref/Twist2GluonOperator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -243,8 +324,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 0}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -253,67 +335,57 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[4369, 110, 379, 15, 70, "PrimaryExamplesSection",
+ Cell[5382, 142, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1]},
+ CellID->1700890378]},
"Twist2GluonOperator"->{
- Cell[4963, 137, 117, 2, 70, "Text",
- CellTags->"Twist2GluonOperator",
- CellID->820989411],
- Cell[5083, 141, 313, 8, 70, "Input",
- CellTags->"Twist2GluonOperator",
- CellID->1824993691],
- Cell[5399, 151, 398, 12, 70, "Input",
+ Cell[6081, 173, 493, 13, 45, "Input",
CellTags->"Twist2GluonOperator",
CellID->1893252067],
- Cell[6153, 185, 271, 9, 70, "Text",
- CellTags->"Twist2GluonOperator",
- CellID->171220448]}
+ Cell[6577, 188, 1400, 57, 43, "Output",
+ CellTags->"Twist2GluonOperator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9116, 254},
- {"Twist2GluonOperator", 9254, 258}
+ {"PrimaryExamplesSection", 11331, 336},
+ {"Twist2GluonOperator", 11478, 340}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 70, "AnchorBarGrid",
+Cell[591, 21, 3069, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 1395, 28, 70, "Usage",
+Cell[3663, 97, 296, 11, 45, "ObjectNameGrid"],
+Cell[3962, 110, 1395, 28, 222, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4369, 110, 379, 15, 70, "PrimaryExamplesSection",
+Cell[5382, 142, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1],
+ CellID->1700890378],
Cell[CellGroupData[{
-Cell[4773, 129, 187, 6, 70, "ExampleSection",
- CellID->1],
-Cell[4963, 137, 117, 2, 70, "Text",
- CellTags->"Twist2GluonOperator",
- CellID->820989411],
-Cell[5083, 141, 313, 8, 70, "Input",
- CellTags->"Twist2GluonOperator",
- CellID->1824993691],
-Cell[5399, 151, 398, 12, 70, "Input",
+Cell[5795, 161, 194, 6, 26, "ExampleSection",
+ CellID->45328809],
+Cell[5992, 169, 64, 0, 32, "Notes"],
+Cell[CellGroupData[{
+Cell[6081, 173, 493, 13, 45, "Input",
CellTags->"Twist2GluonOperator",
- CellID->1893252067]
+ CellID->1893252067],
+Cell[6577, 188, 1400, 57, 43, "Output",
+ CellTags->"Twist2GluonOperator"]
}, Open ]]
}, Open ]],
+Cell[8004, 249, 31, 0, 29, "SectionFooterSpacer"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[5846, 169, 31, 0, 70, "SectionFooterSpacer"],
-Cell[5880, 171, 270, 12, 70, "SeeAlsoSection",
+Cell[8072, 254, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6153, 185, 271, 9, 70, "Text",
- CellTags->"Twist2GluonOperator",
- CellID->171220448]
+Cell[8345, 268, 220, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[6439, 197, 23, 0, 70, "FooterCell"]
+Cell[8580, 278, 23, 0, 41, "FooterCell"]
}
]
*)
(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2QuarkOperator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2QuarkOperator.nb
index 4cec60243..8f88b8ffb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2QuarkOperator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist2QuarkOperator.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 7955, 212]
-NotebookOptionsPosition[ 4814, 134]
-NotebookOutlinePosition[ 7681, 201]
-CellTagsIndexPosition[ 7600, 196]
+NotebookDataLength[ 8671, 232]
+NotebookOptionsPosition[ 5775, 164]
+NotebookOutlinePosition[ 8463, 224]
+CellTagsIndexPosition[ 8420, 221]
WindowTitle->Twist2QuarkOperator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Twist2QuarkOperator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Twist2QuarkOperator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2GluonOperator\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2GluonOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Twist2QuarkOperator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Twist2QuarkOperator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Twist2QuarkOperator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$161259],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Twist2QuarkOperator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$280416],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Twist2QuarkOperator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ Twist2QuarkOperator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Twist2QuarkOperator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Twist2QuarkOperator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -125,9 +157,7 @@ Cell[TextData[{
ButtonNote->"Twist2GluonOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Twist2QuarkOperator",
- CellID->1216439856]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -144,10 +174,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 33.108820}",
+ "built" -> "{2020, 1, 5, 19, 3, 47.454937}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -165,12 +195,12 @@ a}, {p4, nu, b}] or Twist2QuarkOperator[{p1,___}, {p2,___}, {p3, mu, a}, {p4, \
nu, b}] or Twist2QuarkOperator[p1,_,_, p2,_,_, p3,mu,a, p4, nu, b] gives the \
Quark-Quark-Gluon-Gluon-operator. The setting of the option Polarization \
(unpolarized: 0; polarized: 1) determines whether the unpolarized or \
-polarized operator is returned", "synonyms" -> {}, "title" ->
+polarized operator is returned", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"Twist2QuarkOperator", "titlemodifier" -> "", "windowtitle" ->
"Twist2QuarkOperator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Twist2QuarkOperator"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -179,41 +209,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Twist2QuarkOperator"->{
- Cell[4500, 120, 272, 9, 70, "Text",
- CellTags->"Twist2QuarkOperator",
- CellID->1216439856]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Twist2QuarkOperator", 7478, 189}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 70, "AnchorBarGrid",
+Cell[591, 21, 3069, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 1253, 24, 70, "Usage",
+Cell[3663, 97, 296, 11, 70, "ObjectNameGrid"],
+Cell[3962, 110, 1253, 24, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[4227, 106, 270, 12, 70, "SeeAlsoSection",
+Cell[5240, 138, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4500, 120, 272, 9, 70, "Text",
- CellTags->"Twist2QuarkOperator",
- CellID->1216439856]
+Cell[5513, 152, 220, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4787, 132, 23, 0, 70, "FooterCell"]
+Cell[5748, 162, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist3QuarkOperator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist3QuarkOperator.nb
index 9e88db0df..60956e7e5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist3QuarkOperator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist3QuarkOperator.nb
@@ -3,69 +3,93 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 11526, 360]
-NotebookOptionsPosition[ 7250, 242]
-NotebookOutlinePosition[ 10515, 323]
-CellTagsIndexPosition[ 10394, 317]
+NotebookDataLength[ 13425, 423]
+NotebookOptionsPosition[ 9125, 306]
+NotebookOutlinePosition[ 12291, 383]
+CellTagsIndexPosition[ 12168, 377]
WindowTitle->Twist3QuarkOperator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Twist3QuarkOperator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Twist3QuarkOperator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2QuarkOperator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Twist2QuarkOperator"], "\<\"Twist2GluonOperator\"\
+\>":>Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2GluonOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Twist3QuarkOperator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Twist3QuarkOperator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Twist3QuarkOperator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$161604],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Twist3QuarkOperator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$280859],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Twist3QuarkOperator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +97,20 @@ Twist3QuarkOperator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Twist3QuarkOperator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Twist3QuarkOperator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -101,6 +137,62 @@ uppolarized or polarized operator is returned."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->995518247],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Twist3QuarkOperator", "]"}]], "Input",
+ CellTags->"Twist3QuarkOperator",
+ CellLabel->"In[4]:=",
+ CellID->336849087],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Polarization", "\[Rule]", "1"}]}], "}"}],
+ TraditionalForm]], "Output",
+ ImageSize->{364, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellTags->"Twist3QuarkOperator",
+ CellLabel->"Out[4]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -116,7 +208,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1138662884],
+ CellID->732625942],
Cell[CellGroupData[{
@@ -126,39 +218,14 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->468637050],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Twist3QuarkOperator", "]"}]], "Input",
- CellTags->"Twist3QuarkOperator",
- CellLabel->"In[1]:=",
- CellID->336849087],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"CouplingConstant", "\[Rule]",
- SubscriptBox["g", "s"]}], ",",
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"Polarization", "\[Rule]", "1"}]}], "}"}],
- TraditionalForm]], "Output",
- ImageSize->{388, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Twist3QuarkOperator",
- CellLabel->"Out[1]=",
- CellID->1826060487]
-}, Open ]],
+ CellID->1615736382],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Twist3QuarkOperator", "[", "p", "]"}]], "Input",
CellTags->"Twist3QuarkOperator",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->645443038],
Cell[BoxData[
@@ -192,12 +259,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}],
RowBox[{"m", "-", "1"}]]}], TraditionalForm]], "Output",
- ImageSize->{185, 20},
+ ImageSize->{192, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist3QuarkOperator",
- CellLabel->"Out[2]=",
- CellID->32412919]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -233,9 +299,7 @@ Cell[TextData[{
ButtonNote->"Twist2GluonOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Twist3QuarkOperator",
- CellID->325391970]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -252,10 +316,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 34.433694}",
+ "built" -> "{2020, 1, 5, 19, 3, 48.363974}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -270,12 +334,12 @@ where p1 is the incoming quark, p2 the incoming antiquark and p3 denotes the \
a}, {p4, nu, b}] or Twist3QuarkOperator[p1,_,_, p2,_,_, p3,mu,a, p4, nu, b] \
gives the Quark-Quark-Gluon-Gluon-operator. The setting of the option \
Polarization (unpolarized: 0; polarized: 1) determines whether the \
-uppolarized or polarized operator is returned.", "synonyms" -> {}, "title" ->
- "Twist3QuarkOperator", "titlemodifier" -> "", "windowtitle" ->
- "Twist3QuarkOperator", "type" -> "Symbol", "uri" ->
+uppolarized or polarized operator is returned.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Twist3QuarkOperator", "titlemodifier" ->
+ "", "windowtitle" -> "Twist3QuarkOperator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Twist3QuarkOperator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -283,8 +347,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -292,76 +357,74 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[4015, 103, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1138662884]},
"Twist3QuarkOperator"->{
- Cell[4648, 132, 155, 4, 27, "Input",
+ Cell[5957, 169, 155, 4, 70, "Input",
CellTags->"Twist3QuarkOperator",
CellID->336849087],
- Cell[4806, 138, 434, 14, 36, "Output",
- CellTags->"Twist3QuarkOperator",
- CellID->1826060487],
- Cell[5277, 157, 149, 4, 27, "Input",
+ Cell[6115, 175, 413, 13, 37, "Output",
+ CellTags->"Twist3QuarkOperator"],
+ Cell[7222, 224, 149, 4, 27, "Input",
CellTags->"Twist3QuarkOperator",
CellID->645443038],
- Cell[5429, 163, 948, 36, 41, "Output",
- CellTags->"Twist3QuarkOperator",
- CellID->32412919],
- Cell[6745, 222, 463, 15, 32, "Text",
- CellTags->"Twist3QuarkOperator",
- CellID->325391970]}
+ Cell[7374, 230, 929, 35, 40, "Output",
+ CellTags->"Twist3QuarkOperator"]},
+ "PrimaryExamplesSection"->{
+ Cell[6589, 195, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->732625942]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9729, 294},
- {"Twist3QuarkOperator", 9876, 298}
+ {"Twist3QuarkOperator", 11643, 359},
+ {"PrimaryExamplesSection", 12025, 370}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 51, "AnchorBarGrid",
+Cell[591, 21, 3179, 76, 53, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 1041, 21, 194, "Usage",
- CellID->982511436],
+Cell[3773, 99, 296, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[4015, 103, 388, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->1138662884],
+Cell[4094, 114, 1041, 21, 188, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[4428, 122, 195, 6, 25, "ExampleSection",
- CellID->468637050],
+Cell[5160, 139, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->995518247],
+Cell[5901, 165, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4648, 132, 155, 4, 27, "Input",
+Cell[5957, 169, 155, 4, 70, "Input",
CellTags->"Twist3QuarkOperator",
CellID->336849087],
-Cell[4806, 138, 434, 14, 36, "Output",
- CellTags->"Twist3QuarkOperator",
- CellID->1826060487]
+Cell[6115, 175, 413, 13, 37, "Output",
+ CellTags->"Twist3QuarkOperator"]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[5277, 157, 149, 4, 27, "Input",
+Cell[6589, 195, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->732625942],
+Cell[CellGroupData[{
+Cell[7001, 214, 196, 6, 26, "ExampleSection",
+ CellID->1615736382],
+Cell[CellGroupData[{
+Cell[7222, 224, 149, 4, 27, "Input",
CellTags->"Twist3QuarkOperator",
CellID->645443038],
-Cell[5429, 163, 948, 36, 41, "Output",
- CellTags->"Twist3QuarkOperator",
- CellID->32412919]
+Cell[7374, 230, 929, 35, 40, "Output",
+ CellTags->"Twist3QuarkOperator"]
}, Open ]]
}, Open ]],
-Cell[6404, 203, 31, 0, 29, "SectionFooterSpacer"]
+Cell[8330, 269, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6472, 208, 270, 12, 31, "SeeAlsoSection",
+Cell[8398, 274, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[6745, 222, 463, 15, 32, "Text",
- CellTags->"Twist3QuarkOperator",
- CellID->325391970]
+Cell[8671, 288, 412, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[7223, 240, 23, 0, 42, "FooterCell"]
+Cell[9098, 304, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist4GluonOperator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist4GluonOperator.nb
index 547334236..0fb173fbb 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist4GluonOperator.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Twist4GluonOperator.nb
@@ -3,69 +3,95 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 246372, 9403]
-NotebookOptionsPosition[ 243074, 9307]
-NotebookOutlinePosition[ 245560, 9374]
-CellTagsIndexPosition[ 245433, 9368]
+NotebookDataLength[ 210647, 7989]
+NotebookOptionsPosition[ 207516, 7900]
+NotebookOutlinePosition[ 209919, 7964]
+CellTagsIndexPosition[ 209792, 7958]
WindowTitle->Twist4GluonOperator
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Twist4GluonOperator\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Twist4GluonOperator"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Twist2QuarkOperator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Twist2QuarkOperator"], "\<\"Twist3QuarkOperator\"\
+\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Twist3QuarkOperator"], "\<\"Twist2GluonOperator\"\
+\>":>Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2GluonOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Twist4GluonOperator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Twist4GluonOperator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
Twist4GluonOperator.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$161941],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Twist4GluonOperator", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$281296],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Twist4GluonOperator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +99,18 @@ Twist4GluonOperator.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Twist4GluonOperator", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Twist4GluonOperator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -120,7 +156,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->787342298],
+ CellID->1916907731],
Cell[CellGroupData[{
@@ -130,7 +166,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1068912265],
+ CellID->1286362992],
Cell[CellGroupData[{
@@ -159,33 +195,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -200,23 +228,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -244,33 +266,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -285,32 +299,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -328,33 +334,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -369,23 +367,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -413,33 +405,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -454,32 +438,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -538,33 +514,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -579,23 +547,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -623,33 +585,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -664,32 +618,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -707,33 +653,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -748,23 +686,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -792,33 +724,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -833,32 +757,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -917,33 +833,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -958,23 +866,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1002,33 +904,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1043,32 +937,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1086,33 +972,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1127,23 +1005,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1171,73 +1043,57 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p4",
+ FormBox["p4",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1296,33 +1152,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1337,23 +1185,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1381,33 +1223,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1422,32 +1256,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1465,33 +1291,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1506,23 +1324,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1550,33 +1362,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1591,32 +1395,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1675,33 +1471,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1716,23 +1504,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1760,33 +1542,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1801,32 +1575,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1844,33 +1610,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1885,23 +1643,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1929,33 +1681,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -1970,32 +1714,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2054,33 +1790,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2095,23 +1823,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2139,33 +1861,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2180,32 +1894,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2223,35 +1929,27 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
@@ -2264,23 +1962,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2308,33 +2000,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2349,32 +2033,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2433,33 +2109,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2474,23 +2142,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2518,33 +2180,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2559,32 +2213,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2602,33 +2248,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2643,23 +2281,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2687,33 +2319,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2728,32 +2352,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2812,33 +2428,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2853,23 +2461,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2897,33 +2499,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2938,32 +2532,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -2981,33 +2567,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3022,23 +2600,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3066,33 +2638,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3107,32 +2671,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3191,33 +2747,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3232,23 +2780,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3276,33 +2818,93 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
OverscriptBox[
FormBox["p1",
TraditionalForm], "_"],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3313,111 +2915,21 @@ Cell[BoxData[
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["p4",
+ FormBox["p2",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["la2",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["la3",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3445,33 +2957,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3486,32 +2990,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3570,33 +3066,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3611,23 +3099,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3655,33 +3137,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3696,32 +3170,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3739,33 +3205,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3780,23 +3238,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3824,33 +3276,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3865,32 +3309,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3949,33 +3385,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -3990,23 +3418,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4034,33 +3456,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4075,32 +3489,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4118,33 +3524,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4159,23 +3557,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4203,33 +3595,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4244,32 +3628,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4328,33 +3704,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4369,23 +3737,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4413,33 +3775,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4454,32 +3808,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4497,33 +3843,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4538,23 +3876,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4582,33 +3914,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4623,32 +3947,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4707,33 +4023,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4748,23 +4056,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4792,33 +4094,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4833,32 +4127,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4876,33 +4162,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4917,36 +4195,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox["la2",
TraditionalForm],
TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -4957,37 +4216,42 @@ Cell[BoxData[
TraditionalForm],
FormBox[
OverscriptBox[
- FormBox["p2",
+ FormBox["p4",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p2",
TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5002,32 +4266,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5086,33 +4342,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5127,23 +4375,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5171,33 +4413,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5212,32 +4446,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5255,33 +4481,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5296,23 +4514,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5340,33 +4552,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5381,32 +4585,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5465,33 +4661,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5506,23 +4694,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5550,33 +4732,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5591,32 +4765,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5634,33 +4800,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5675,23 +4833,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5719,33 +4871,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5760,32 +4904,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5844,33 +4980,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5885,23 +5013,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5929,33 +5051,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -5970,32 +5084,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6011,35 +5117,27 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], ")"}], " ",
RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6054,23 +5152,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6098,33 +5190,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6139,32 +5223,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6223,33 +5299,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6264,23 +5332,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6308,33 +5370,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6349,32 +5403,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6392,33 +5438,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6433,23 +5471,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6477,33 +5509,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6518,32 +5542,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6602,33 +5618,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6643,23 +5651,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6687,33 +5689,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6728,32 +5722,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6771,33 +5757,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6812,23 +5790,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6856,33 +5828,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6897,32 +5861,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -6981,33 +5937,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7022,77 +5970,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
+ FormBox["la1",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
+ FormBox["la4",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7105,34 +5993,72 @@ Cell[BoxData[
OverscriptBox[
FormBox["p4",
TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7150,33 +6076,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7191,23 +6109,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7235,33 +6147,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7276,32 +6180,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7360,33 +6256,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7401,23 +6289,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7445,33 +6327,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7486,32 +6360,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7529,33 +6395,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7570,23 +6428,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7614,33 +6466,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7655,32 +6499,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7739,33 +6575,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7780,23 +6608,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7824,33 +6646,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7865,32 +6679,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7908,33 +6714,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7949,23 +6747,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -7993,33 +6785,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8034,32 +6818,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8118,33 +6894,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8159,23 +6927,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8203,33 +6965,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8244,32 +6998,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8287,33 +7033,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8328,23 +7066,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8372,33 +7104,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8413,32 +7137,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8497,33 +7213,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8538,23 +7246,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8582,33 +7284,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8623,32 +7317,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8666,33 +7352,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8707,23 +7385,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8751,33 +7423,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8792,32 +7456,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8876,33 +7532,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8917,23 +7565,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -8961,33 +7603,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -9002,32 +7636,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la1",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la2",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -9045,33 +7671,25 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p4",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p4",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -9086,23 +7704,17 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -9130,33 +7742,25 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p3",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p3",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -9171,32 +7775,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["la4",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la3",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["la4",
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{"(",
RowBox[{
FormBox[
@@ -9251,12 +7847,11 @@ Cell[BoxData[
FormBox["od",
TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- ImageSize->{561, 2084},
+ ImageSize->{565, 1797},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Twist4GluonOperator",
- CellLabel->"Out[1]=",
- CellID->198500674]
+ CellLabel->"Out[1]="]
}, Open ]]
}, Open ]],
@@ -9298,9 +7893,7 @@ Cell[TextData[{
ButtonNote->"Twist2GluonOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Twist4GluonOperator",
- CellID->1816755712]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -9308,7 +7901,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Twist4GluonOperator",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -9317,22 +7910,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 36.318297}",
+ "built" -> "{2020, 1, 5, 19, 3, 49.644037}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"Twist4GluonOperator[{oa, ob, oc, od}, {p1, la1, a1}, {p2, la2, a2}, {p3, \
-la3, a3}, {p4, la4, a4}] ...", "synonyms" -> {}, "title" ->
+la3, a3}, {p4, la4, a4}] ...", "synonyms" -> {}, "tabletags" -> {}, "title" ->
"Twist4GluonOperator", "titlemodifier" -> "", "windowtitle" ->
"Twist4GluonOperator", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Twist4GluonOperator"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -9340,8 +7933,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -9350,61 +7944,53 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3816, 107, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[5049, 143, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->787342298]},
+ CellID->1916907731]},
"Twist4GluonOperator"->{
- Cell[4449, 136, 546, 16, 45, "Input",
+ Cell[5683, 172, 546, 16, 45, "Input",
CellTags->"Twist4GluonOperator",
CellID->456251569],
- Cell[4998, 154, 237010, 9104, 2105, "Output",
- CellTags->"Twist4GluonOperator",
- CellID->198500674],
- Cell[242376, 9281, 656, 21, 70, "Text",
- CellTags->"Twist4GluonOperator",
- CellID->1816755712]}
+ Cell[6232, 190, 200270, 7663, 1818, "Output",
+ CellTags->"Twist4GluonOperator"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 244955, 9351},
- {"Twist4GluonOperator", 245101, 9355}
+ {"PrimaryExamplesSection", 209437, 7945},
+ {"Twist4GluonOperator", 209584, 7949}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[591, 21, 2290, 52, 51, "AnchorBarGrid",
+Cell[591, 21, 3289, 78, 53, "AnchorBarGrid",
CellID->1],
-Cell[2884, 75, 62, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2949, 78, 842, 25, 100, "Usage",
+Cell[3883, 101, 296, 11, 45, "ObjectNameGrid"],
+Cell[4182, 114, 842, 25, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3816, 107, 387, 15, 31, "PrimaryExamplesSection",
+Cell[5049, 143, 388, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->787342298],
+ CellID->1916907731],
Cell[CellGroupData[{
-Cell[4228, 126, 196, 6, 25, "ExampleSection",
- CellID->1068912265],
+Cell[5462, 162, 196, 6, 26, "ExampleSection",
+ CellID->1286362992],
Cell[CellGroupData[{
-Cell[4449, 136, 546, 16, 45, "Input",
+Cell[5683, 172, 546, 16, 45, "Input",
CellTags->"Twist4GluonOperator",
CellID->456251569],
-Cell[4998, 154, 237010, 9104, 2105, "Output",
- CellTags->"Twist4GluonOperator",
- CellID->198500674]
+Cell[6232, 190, 200270, 7663, 1818, "Output",
+ CellTags->"Twist4GluonOperator"]
}, Open ]]
}, Open ]],
-Cell[242035, 9262, 31, 0, 70, "SectionFooterSpacer"]
+Cell[206529, 7857, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[242103, 9267, 270, 12, 70, "SeeAlsoSection",
+Cell[206597, 7862, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[242376, 9281, 656, 21, 70, "Text",
- CellTags->"Twist4GluonOperator",
- CellID->1816755712]
+Cell[206870, 7876, 604, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[243047, 9305, 23, 0, 70, "FooterCell"]
+Cell[207489, 7898, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TwoLoopSimplify.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TwoLoopSimplify.nb
index 7c67db910..33f3507cd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TwoLoopSimplify.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TwoLoopSimplify.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 8106, 256]
-NotebookOptionsPosition[ 4991, 166]
-NotebookOutlinePosition[ 7467, 232]
-CellTagsIndexPosition[ 7350, 226]
+NotebookDataLength[ 8892, 280]
+NotebookOptionsPosition[ 5948, 196]
+NotebookOutlinePosition[ 8315, 259]
+CellTagsIndexPosition[ 8198, 253]
WindowTitle->TwoLoopSimplify
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/TwoLoopSimplify\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/TwoLoopSimplify"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoopSimplify\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoopSimplify"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/TwoLoopSimplify\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TwoLoopSimplify"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
TwoLoopSimplify.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$162276],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/TwoLoopSimplify", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$281731],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TwoLoopSimplify", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ TwoLoopSimplify.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["TwoLoopSimplify", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["TwoLoopSimplify", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -157,9 +189,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSimplify"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"TwoLoopSimplify",
- CellID->1583084019]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -176,10 +206,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 38.283767}",
+ "built" -> "{2020, 1, 5, 19, 3, 50.968292}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -189,11 +219,11 @@ TaggingRules->{
(qu1 and qu2 denote the integration momenta). TwoLoopSimplify[amplitude] \
transforms to TwoLoopSimplify[amplitude, {Global`q1, Global`q2}], i.e., the \
integration momenta in amplitude must be named q1 and q2.", "synonyms" -> {},
- "title" -> "TwoLoopSimplify", "titlemodifier" -> "", "windowtitle" ->
- "TwoLoopSimplify", "type" -> "Symbol", "uri" ->
+ "tabletags" -> {}, "title" -> "TwoLoopSimplify", "titlemodifier" -> "",
+ "windowtitle" -> "TwoLoopSimplify", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/TwoLoopSimplify"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -202,7 +232,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -211,53 +241,47 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3643, 100, 379, 15, 70, "PrimaryExamplesSection",
+ Cell[4648, 132, 379, 15, 70, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
CellID->1]},
"TwoLoopSimplify"->{
- Cell[4237, 127, 100, 3, 70, "Input",
- CellTags->"TwoLoopSimplify",
- CellID->1805823321],
- Cell[4693, 152, 256, 9, 70, "Text",
+ Cell[5242, 159, 100, 3, 70, "Input",
CellTags->"TwoLoopSimplify",
- CellID->1583084019]}
+ CellID->1805823321]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7003, 212},
- {"TwoLoopSimplify", 7137, 216}
+ {"PrimaryExamplesSection", 7945, 242},
+ {"TwoLoopSimplify", 8079, 246}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[587, 21, 2274, 52, 70, "AnchorBarGrid",
+Cell[587, 21, 3045, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2864, 75, 58, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2925, 78, 693, 18, 70, "Usage",
+Cell[3635, 97, 292, 11, 70, "ObjectNameGrid"],
+Cell[3930, 110, 693, 18, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3643, 100, 379, 15, 70, "PrimaryExamplesSection",
+Cell[4648, 132, 379, 15, 70, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
CellID->1],
Cell[CellGroupData[{
-Cell[4047, 119, 187, 6, 70, "ExampleSection",
+Cell[5052, 151, 187, 6, 70, "ExampleSection",
CellID->1],
-Cell[4237, 127, 100, 3, 70, "Input",
+Cell[5242, 159, 100, 3, 70, "Input",
CellTags->"TwoLoopSimplify",
CellID->1805823321]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4386, 136, 31, 0, 70, "SectionFooterSpacer"],
-Cell[4420, 138, 270, 12, 70, "SeeAlsoSection",
+Cell[5391, 168, 31, 0, 70, "SectionFooterSpacer"],
+Cell[5425, 170, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[4693, 152, 256, 9, 70, "Text",
- CellTags->"TwoLoopSimplify",
- CellID->1583084019]
+Cell[5698, 184, 208, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[4964, 164, 23, 0, 70, "FooterCell"]
+Cell[5921, 194, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/TypesettingExplicitLorentzIndex.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TypesettingExplicitLorentzIndex.nb
new file mode 100644
index 000000000..9962bee47
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/TypesettingExplicitLorentzIndex.nb
@@ -0,0 +1,495 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14539, 485]
+NotebookOptionsPosition[ 11267, 386]
+NotebookOutlinePosition[ 13475, 445]
+CellTagsIndexPosition[ 13390, 440]
+WindowTitle->TypesettingExplicitLorentzIndex
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->
+ False], {"\<\"FeynCalc/ref/TypesettingExplicitLorentzIndex\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/TypesettingExplicitLorentzIndex"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+TypesettingExplicitLorentzIndex.html"], StandardForm]], "Input",
+ TextClipboardType -> "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$282181],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/TypesettingExplicitLorentzIndex", ".html"]],
+ None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["TypesettingExplicitLorentzIndex", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["TypesettingExplicitLorentzIndex"], "InlineFormula"],
+ " \[LineSeparator] determines the TraditionalForm typesetting of \
+explicit Lorentz indices."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1996553637],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1831110570],
+
+Cell["Current setting", "Notes",
+ CellID->2059846880],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"TypesettingExplicitLorentzIndex", "\[IndentingNewLine]",
+ RowBox[{"%", "//", "InputForm"}]}], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1930861280],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ "FeynCalc`SharedObjects`Private`x", "\[Function]",
+ "FeynCalc`SharedObjects`Private`x"}], TraditionalForm]], "Output",
+ ImageSize->{409, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->608983385],
+
+Cell["\<\
+Function[FeynCalc`SharedObjects`Private`x,
+ FeynCalc`SharedObjects`Private`x]\
+\>", "Output",
+ ImageSize->{344, 31},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]//InputForm=",
+ CellID->1300783929]
+}, Open ]],
+
+Cell["Make explicit Lorentz indices look red", "Notes",
+ CellID->2081420506],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"TypesettingExplicitLorentzIndex", "=",
+ RowBox[{"Function", "[",
+ RowBox[{"x", ",",
+ RowBox[{"Style", "[",
+ RowBox[{"x", ",", "Red"}], "]"}]}], "]"}]}], ";"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->240390894],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"4", " ",
+ RowBox[{"M", "^", "2"}], " ", "u", " ",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "0"}], "]"}], "^", "2"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"M", "^", "2"}], " ", "u", " ",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "3"}], "]"}], "^", "2"}]}], "-",
+ RowBox[{"4", " ", "M", " ",
+ RowBox[{"SP", "[",
+ RowBox[{"k", ",", "k"}], "]"}]}], "-",
+ RowBox[{"2", " ", "M", " ", "u", " ",
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "0"}], "]"}], " ",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "3"}], "]"}], "^", "2"}]}], "+",
+ RowBox[{"4", " ", "M", " ", "u", " ",
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "0"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "2"}], "]"}]}], "-",
+ RowBox[{
+ RowBox[{"u", "^", "2"}], " ",
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"k", ",", "2"}], "]"}], "^", "2"}]}]}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1698479077],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"4", " ",
+ SuperscriptBox["M", "2"], " ", "u", " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["3",
+ StripOnInput->False,
+ FontColor->RGBColor[1, 0, 0],
+ $CellContext`LineColor -> RGBColor[1, 0, 0],
+ $CellContext`FrontFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`BackFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`GraphicsColor -> RGBColor[1, 0, 0]],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}], "2"],
+ TraditionalForm]}]}], "-",
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"],
+ TraditionalForm], " ", "M", " ", "u", " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["3",
+ StripOnInput->False,
+ FontColor->RGBColor[1, 0, 0],
+ $CellContext`LineColor -> RGBColor[1, 0, 0],
+ $CellContext`FrontFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`BackFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`GraphicsColor -> RGBColor[1, 0, 0]],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}], "2"],
+ TraditionalForm]}], "+",
+ RowBox[{"4", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"],
+ TraditionalForm], " ", "M", " ", "u", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["2",
+ StripOnInput->False,
+ FontColor->RGBColor[1, 0, 0],
+ $CellContext`LineColor -> RGBColor[1, 0, 0],
+ $CellContext`FrontFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`BackFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`GraphicsColor -> RGBColor[1, 0, 0]],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{"4", " ", "M", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ SuperscriptBox["u", "2"], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["k",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["2",
+ StripOnInput->False,
+ FontColor->RGBColor[1, 0, 0],
+ $CellContext`LineColor -> RGBColor[1, 0, 0],
+ $CellContext`FrontFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`BackFaceColor -> RGBColor[1, 0, 0],
+ $CellContext`GraphicsColor -> RGBColor[1, 0, 0]],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}], "2"],
+ TraditionalForm]}], "+",
+ RowBox[{"4", " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], ")"}], "2"],
+ TraditionalForm], " ",
+ SuperscriptBox["M", "2"], " ", "u"}]}], TraditionalForm]], "Output",
+ ImageSize->{366, 42},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->705495845]
+}, Open ]],
+
+Cell["Back to the standard settings", "Notes",
+ CellID->1802886925],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TypesettingExplicitLorentzIndex", "=",
+ RowBox[{"Function", "[",
+ RowBox[{"x", ",", "x"}], "]"}]}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->585981240],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"x", "\[Function]", "x"}], TraditionalForm]], "Output",
+ ImageSize->{51, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->692314547]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+WindowTitle->"TypesettingExplicitLorentzIndex",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 51.868264}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "TypesettingExplicitLorentzIndex determines the TraditionalForm \
+typesetting of explicit Lorentz indices.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "TypesettingExplicitLorentzIndex",
+ "titlemodifier" -> "", "windowtitle" -> "TypesettingExplicitLorentzIndex",
+ "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/TypesettingExplicitLorentzIndex"}, "SearchTextTranslated" ->
+ ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 60}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3740, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1996553637]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 13246, 433}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[603, 21, 2399, 56, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[3005, 79, 308, 11, 45, "ObjectNameGrid"],
+Cell[3316, 92, 399, 11, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3740, 107, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1996553637],
+Cell[CellGroupData[{
+Cell[4153, 126, 196, 6, 26, "ExampleSection",
+ CellID->1831110570],
+Cell[4352, 134, 53, 1, 32, "Notes",
+ CellID->2059846880],
+Cell[CellGroupData[{
+Cell[4430, 139, 162, 3, 45, "Input",
+ CellID->1930861280],
+Cell[4595, 144, 289, 9, 37, "Output",
+ CellID->608983385],
+Cell[4887, 155, 247, 8, 67, "Output",
+ CellID->1300783929]
+}, Open ]],
+Cell[5149, 166, 76, 1, 32, "Notes",
+ CellID->2081420506],
+Cell[5228, 169, 265, 8, 27, "Input",
+ CellID->240390894],
+Cell[CellGroupData[{
+Cell[5518, 181, 997, 32, 45, "Input",
+ CellID->1698479077],
+Cell[6518, 215, 4173, 142, 63, "Output",
+ CellID->705495845]
+}, Open ]],
+Cell[10706, 360, 67, 1, 32, "Notes",
+ CellID->1802886925],
+Cell[CellGroupData[{
+Cell[10798, 365, 181, 5, 27, "Input",
+ CellID->585981240],
+Cell[10982, 372, 219, 7, 35, "Output",
+ CellID->692314547]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[11240, 384, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UVPart.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UVPart.nb
deleted file mode 100644
index 35dd2d326..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UVPart.nb
+++ /dev/null
@@ -1,156 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5226, 147]
-NotebookOptionsPosition[ 3342, 95]
-NotebookOutlinePosition[ 5148, 143]
-CellTagsIndexPosition[ 5105, 140]
-WindowTitle->UVPart
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/UVPart\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/UVPart"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/UVPart.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$163662],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/UVPart",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["UVPart", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData[
- RowBox[{"UVPart", "[",
- RowBox[{"exp", ",", " ", "q"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "discards ultraviolet finite integrals (q = integration momentum)."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"UVPart",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 44.454518}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "UVPart[exp, q] discards ultraviolet finite integrals (q = integration \
-momentum).", "synonyms" -> {}, "title" -> "UVPart", "titlemodifier" -> "",
- "windowtitle" -> "UVPart", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/UVPart"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{}
-*)
-(*CellTagsIndex
-CellTagsIndex->{}
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[578, 21, 2237, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2818, 75, 49, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 442, 13, 70, "Usage",
- CellID->982511436],
-Cell[3315, 93, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareAntiCommutator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareAntiCommutator.nb
new file mode 100644
index 000000000..26ef23325
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareAntiCommutator.nb
@@ -0,0 +1,359 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10310, 349]
+NotebookOptionsPosition[ 7270, 258]
+NotebookOutlinePosition[ 9428, 315]
+CellTagsIndexPosition[ 9344, 310]
+WindowTitle->UnDeclareAntiCommutator
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/UnDeclareAntiCommutator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/UnDeclareAntiCommutator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+UnDeclareAntiCommutator.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$283056],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/UnDeclareAntiCommutator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["UnDeclareAntiCommutator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"UnDeclareAntiCommutator", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]undeclares the value assigned to the anticommutator of \
+a and b."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->962288157],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->819973676],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"AntiCommutator", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{
+ RowBox[{"FCPartialD", "[",
+ RowBox[{"LorentzIndex", "[", "xxx_", "]"}], "]"}], ",", "A"}], "]"}],
+ ",",
+ RowBox[{"QuantumField", "[", "A", "]"}]}], "]"}], "=", "0"}],
+ ";"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1775428703],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"LeftPartialD", "[", "\[Nu]", "]"}]}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->823372504],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["A",
+ TraditionalForm], ".",
+ FormBox["A",
+ TraditionalForm], ".",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[LeftArrow]"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{61, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->363675977]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->256646598],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ ImageSize->{13, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->773141921]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"UnDeclareAntiCommutator", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{
+ RowBox[{"FCPartialD", "[",
+ RowBox[{"LorentzIndex", "[", "xxx_", "]"}], "]"}], ",", "A"}], "]"}],
+ ",",
+ RowBox[{"QuantumField", "[", "A", "]"}]}], "]"}], ";"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->369842680],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"LeftPartialD", "[", "\[Nu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->2024321215],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox["A",
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["A",
+ TraditionalForm], ")"}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["A",
+ TraditionalForm], ")"}], ")"}], ".",
+ FormBox["A",
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{178, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[5]=",
+ CellID->643410288]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"UnDeclareAntiCommutator",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 54.129196}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "UnDeclareAntiCommutator[a, b] undeclares the value assigned to the \
+anticommutator of a and b.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "UnDeclareAntiCommutator", "titlemodifier" -> "", "windowtitle" ->
+ "UnDeclareAntiCommutator", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/UnDeclareAntiCommutator"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3702, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->962288157]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 9201, 303}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[595, 21, 2334, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2932, 76, 300, 11, 45, "ObjectNameGrid"],
+Cell[3235, 89, 442, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3702, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->962288157],
+Cell[CellGroupData[{
+Cell[4114, 125, 195, 6, 26, "ExampleSection",
+ CellID->819973676],
+Cell[4312, 133, 388, 13, 46, "Input",
+ CellID->1775428703],
+Cell[CellGroupData[{
+Cell[4725, 150, 223, 6, 27, "Input",
+ CellID->823372504],
+Cell[4951, 158, 434, 17, 43, "Output",
+ CellID->363675977]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5422, 180, 110, 3, 27, "Input",
+ CellID->256646598],
+Cell[5535, 185, 186, 6, 35, "Output",
+ CellID->773141921]
+}, Open ]],
+Cell[5736, 194, 362, 11, 46, "Input",
+ CellID->369842680],
+Cell[CellGroupData[{
+Cell[6123, 209, 268, 7, 27, "Input",
+ CellID->2024321215],
+Cell[6394, 218, 810, 33, 38, "Output",
+ CellID->643410288]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[7243, 256, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareCommutator.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareCommutator.nb
new file mode 100644
index 000000000..1419bcea4
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareCommutator.nb
@@ -0,0 +1,368 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 10560, 358]
+NotebookOptionsPosition[ 7750, 275]
+NotebookOutlinePosition[ 9692, 325]
+CellTagsIndexPosition[ 9649, 322]
+WindowTitle->UnDeclareCommutator
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/UnDeclareCommutator\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/UnDeclareCommutator"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+UnDeclareCommutator.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$283487],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/UnDeclareCommutator", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["UnDeclareCommutator", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"UnDeclareCommutator", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]undeclares the value assigned to the commutator of a \
+and b"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1241007059],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"Commutator", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{
+ RowBox[{"FCPartialD", "[",
+ RowBox[{"LorentzIndex", "[", "xxx_", "]"}], "]"}], ",", "A"}], "]"}],
+ ",",
+ RowBox[{"QuantumField", "[", "A", "]"}]}], "]"}], "=", "0"}],
+ ";"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->998380912],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"LeftPartialD", "[", "\[Nu]", "]"}]}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->1290101569],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["A",
+ TraditionalForm], ".",
+ FormBox["A",
+ TraditionalForm], ".",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[LeftArrow]"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{61, 22},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[11]=",
+ CellID->1973031172]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[", "%", "]"}]], "Input",
+ CellLabel->"In[12]:=",
+ CellID->1836484146],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ RowBox[{
+ FormBox["A",
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["A",
+ TraditionalForm], ")"}], ")"}]}]}], TraditionalForm]], "Output",
+ ImageSize->{95, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[12]=",
+ CellID->1532752690]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"UnDeclareCommutator", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[",
+ RowBox[{
+ RowBox[{"FCPartialD", "[",
+ RowBox[{"LorentzIndex", "[", "xxx_", "]"}], "]"}], ",", "A"}], "]"}],
+ ",",
+ RowBox[{"QuantumField", "[", "A", "]"}]}], "]"}], ";"}]], "Input",
+ CellLabel->"In[13]:=",
+ CellID->628014083],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandPartialD", "[",
+ RowBox[{
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"QuantumField", "[", "A", "]"}], ".",
+ RowBox[{"LeftPartialD", "[", "\[Nu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[14]:=",
+ CellID->1097074650],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox["A",
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["A",
+ TraditionalForm], ")"}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(", "\[PartialD]"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ FormBox["A",
+ TraditionalForm], ")"}], ")"}], ".",
+ FormBox["A",
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ ImageSize->{178, 17},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[14]=",
+ CellID->47185932]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"UnDeclareCommutator",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 55.258354}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "UnDeclareCommutator[a, b] undeclares the value assigned to the \
+commutator of a and b", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "UnDeclareCommutator", "titlemodifier" -> "", "windowtitle" ->
+ "UnDeclareCommutator", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/UnDeclareCommutator"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[591, 21, 2318, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2912, 76, 296, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3233, 91, 433, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3691, 108, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1241007059],
+Cell[4433, 134, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[4467, 136, 384, 13, 70, "Input",
+ CellID->998380912],
+Cell[CellGroupData[{
+Cell[4876, 153, 225, 6, 70, "Input",
+ CellID->1290101569],
+Cell[5104, 161, 436, 17, 43, "Output",
+ CellID->1973031172]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5577, 183, 112, 3, 70, "Input",
+ CellID->1836484146],
+Cell[5692, 188, 511, 20, 38, "Output",
+ CellID->1532752690]
+}, Open ]],
+Cell[6218, 211, 359, 11, 70, "Input",
+ CellID->628014083],
+Cell[CellGroupData[{
+Cell[6602, 226, 269, 7, 70, "Input",
+ CellID->1097074650],
+Cell[6874, 235, 810, 33, 38, "Output",
+ CellID->47185932]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[7723, 273, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareFCTensor.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareFCTensor.nb
new file mode 100644
index 000000000..690957258
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareFCTensor.nb
@@ -0,0 +1,298 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8905, 288]
+NotebookOptionsPosition[ 6107, 207]
+NotebookOutlinePosition[ 8268, 264]
+CellTagsIndexPosition[ 8184, 259]
+WindowTitle->UnDeclareFCTensor
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/UnDeclareFCTensor\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/UnDeclareFCTensor"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+UnDeclareFCTensor.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$283914],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/UnDeclareFCTensor", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["UnDeclareFCTensor", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"UnDeclareFCTensor", "[",
+ RowBox[{"a", ",", " ", "b", ",", " ", "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]undeclares a,b, ... to be tensor heads, i.e., \
+DataType[a,b, ..., FCTensor] is set to False."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->727272174],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->675330349],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->459227138],
+
+Cell[BoxData[
+ RowBox[{"DeclareFCTensor", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->384608883],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"myTens", "[",
+ RowBox[{"z", ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"a", "+", "b"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"c", "+", "d"}], "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->816959797],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{496, 21},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->435772380]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"UnDeclareFCTensor", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->2018380174]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"UnDeclareFCTensor",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 3, 56.244774}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" ->
+ "UnDeclareFCTensor[a, b, ...] undeclares a,b, ... to be tensor heads, \
+i.e., DataType[a,b, ..., FCTensor] is set to False.", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "UnDeclareFCTensor", "titlemodifier" -> "",
+ "windowtitle" -> "UnDeclareFCTensor", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/UnDeclareFCTensor"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3711, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->727272174]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 8041, 252}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[589, 21, 2310, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2902, 76, 294, 11, 45, "ObjectNameGrid"],
+Cell[3199, 89, 487, 13, 85, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3711, 106, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->727272174],
+Cell[CellGroupData[{
+Cell[4123, 125, 195, 6, 26, "ExampleSection",
+ CellID->675330349],
+Cell[4321, 133, 109, 3, 27, "Input",
+ CellID->459227138],
+Cell[4433, 138, 116, 3, 27, "Input",
+ CellID->384608883],
+Cell[CellGroupData[{
+Cell[4574, 145, 308, 9, 27, "Input",
+ CellID->816959797],
+Cell[4885, 156, 1034, 39, 42, "Output",
+ CellID->435772380]
+}, Open ]],
+Cell[5934, 198, 119, 3, 27, "Input",
+ CellID->2018380174]
+}, Open ]]
+}, Open ]],
+Cell[6080, 205, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareNonCommutative.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareNonCommutative.nb
index 74989dd98..15b4cce29 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareNonCommutative.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/UnDeclareNonCommutative.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13608, 452]
-NotebookOptionsPosition[ 7789, 278]
-NotebookOutlinePosition[ 11553, 381]
-CellTagsIndexPosition[ 11428, 375]
+NotebookDataLength[ 13818, 454]
+NotebookOptionsPosition[ 8665, 303]
+NotebookOutlinePosition[ 12025, 394]
+CellTagsIndexPosition[ 11898, 388]
WindowTitle->UnDeclareNonCommutative
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/UnDeclareNonCommutative\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/UnDeclareNonCommutative"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DataType\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DataType"], "\<\"DeclareNonCommutative\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/DeclareNonCommutative"]},
+
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/UnDeclareNonCommutative\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/UnDeclareNonCommutative"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
UnDeclareNonCommutative.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$162974],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/UnDeclareNonCommutative", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$284352],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/UnDeclareNonCommutative", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ UnDeclareNonCommutative.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["UnDeclareNonCommutative", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["UnDeclareNonCommutative", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -109,7 +144,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->686793750],
+ CellID->198275930],
Cell[CellGroupData[{
@@ -119,7 +154,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->989163990],
+ CellID->1142808201],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[", "x", "]"}]], "Input",
@@ -130,9 +165,7 @@ Cell[BoxData[
Cell["\<\
As a side-effect of DeclareNonCommutative x is declared to be of DataType \
NonCommutative.\
-\>", "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->467320049],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -143,17 +176,14 @@ Cell["DataType[x,NonCommutative]", "Input",
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
- ImageSize->{33, 15},
+ ImageSize->{31, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"UnDeclareNonCommutative",
- CellLabel->"Out[2]=",
- CellID->415876422]
+ CellLabel->"Out[2]="]
}, Open ]],
-Cell["The inverse operation is UnDeclareNonCommutative.", "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->568029723],
+Cell["The inverse operation is UnDeclareNonCommutative.", "Notes"],
Cell[BoxData[
RowBox[{"UnDeclareNonCommutative", "[", "x", "]"}]], "Input",
@@ -172,12 +202,11 @@ Cell[BoxData[
Cell[BoxData[
FormBox["False", TraditionalForm]], "Output",
- ImageSize->{37, 15},
+ ImageSize->{34, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"UnDeclareNonCommutative",
- CellLabel->"Out[4]=",
- CellID->1002154582]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[BoxData[
@@ -200,12 +229,11 @@ Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"True", ",", "True"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{83, 15},
+ ImageSize->{79, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"UnDeclareNonCommutative",
- CellLabel->"Out[6]=",
- CellID->799895096]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[BoxData[
@@ -228,12 +256,11 @@ Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}], TraditionalForm]], "Output",
- ImageSize->{91, 15},
+ ImageSize->{85, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"UnDeclareNonCommutative",
- CellLabel->"Out[8]=",
- CellID->493928013]
+ CellLabel->"Out[8]="]
}, Open ]]
}, Open ]],
@@ -269,9 +296,7 @@ Cell[TextData[{
ButtonNote->"DeclareNonCommutative"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->349709371]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -279,7 +304,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"UnDeclareNonCommutative",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -288,10 +313,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 41.388763}",
+ "built" -> "{2020, 1, 5, 19, 3, 57.273913}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -299,11 +324,12 @@ TaggingRules->{
"None", "summary" ->
"UnDeclareNonCommutative[a, b, ...] undeclares a,b, ... to be \
noncommutative, i.e., DataType[a,b, ..., NonCommutative] is set to False.",
- "synonyms" -> {}, "title" -> "UnDeclareNonCommutative", "titlemodifier" ->
- "", "windowtitle" -> "UnDeclareNonCommutative", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/UnDeclareNonCommutative"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "UnDeclareNonCommutative",
+ "titlemodifier" -> "", "windowtitle" -> "UnDeclareNonCommutative",
+ "type" -> "Symbol", "uri" -> "FeynCalc/ref/UnDeclareNonCommutative"},
+ "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -312,7 +338,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -321,139 +347,115 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3507, 96, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4632, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->686793750]},
+ CellID->198275930]},
"UnDeclareNonCommutative"->{
- Cell[4117, 123, 156, 4, 27, "Input",
+ Cell[5243, 158, 156, 4, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1470795437],
- Cell[4276, 129, 173, 5, 51, "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->467320049],
- Cell[4474, 138, 123, 3, 27, "Input",
+ Cell[5543, 171, 123, 3, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->88675667],
- Cell[4600, 143, 227, 7, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->415876422],
- Cell[4842, 153, 123, 2, 32, "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->568029723],
- Cell[4968, 157, 157, 4, 27, "Input",
+ Cell[5669, 176, 207, 6, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"],
+ Cell[5960, 187, 157, 4, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->669742468],
- Cell[5150, 165, 178, 5, 27, "Input",
+ Cell[6142, 195, 178, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->294586102],
- Cell[5331, 172, 229, 7, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->1002154582],
- Cell[5575, 182, 179, 5, 27, "Input",
+ Cell[6323, 202, 208, 6, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"],
+ Cell[6546, 211, 179, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1907752862],
- Cell[5779, 191, 189, 5, 27, "Input",
+ Cell[6750, 220, 189, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1458539742],
- Cell[5971, 198, 277, 9, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->799895096],
- Cell[6263, 210, 181, 5, 27, "Input",
+ Cell[6942, 227, 257, 8, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"],
+ Cell[7214, 238, 181, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1096625129],
- Cell[6469, 219, 188, 5, 27, "Input",
+ Cell[7420, 247, 188, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->702684679],
- Cell[6660, 226, 279, 9, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->493928013],
- Cell[7307, 258, 440, 15, 70, "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->349709371]}
+ Cell[7611, 254, 259, 8, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 9719, 322},
- {"UnDeclareNonCommutative", 9868, 326}
+ {"PrimaryExamplesSection", 10581, 348},
+ {"UnDeclareNonCommutative", 10731, 352}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[595, 21, 2306, 52, 51, "AnchorBarGrid",
+Cell[595, 21, 3197, 77, 53, "AnchorBarGrid",
CellID->1],
-Cell[2904, 75, 66, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2973, 78, 509, 14, 83, "Usage",
+Cell[3795, 100, 300, 11, 45, "ObjectNameGrid"],
+Cell[4098, 113, 509, 14, 85, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3507, 96, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4632, 131, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->686793750],
+ CellID->198275930],
Cell[CellGroupData[{
-Cell[3919, 115, 195, 6, 25, "ExampleSection",
- CellID->989163990],
-Cell[4117, 123, 156, 4, 27, "Input",
+Cell[5044, 150, 196, 6, 26, "ExampleSection",
+ CellID->1142808201],
+Cell[5243, 158, 156, 4, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1470795437],
-Cell[4276, 129, 173, 5, 51, "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->467320049],
+Cell[5402, 164, 116, 3, 32, "Notes"],
Cell[CellGroupData[{
-Cell[4474, 138, 123, 3, 27, "Input",
+Cell[5543, 171, 123, 3, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->88675667],
-Cell[4600, 143, 227, 7, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->415876422]
+Cell[5669, 176, 207, 6, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"]
}, Open ]],
-Cell[4842, 153, 123, 2, 32, "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->568029723],
-Cell[4968, 157, 157, 4, 27, "Input",
+Cell[5891, 185, 66, 0, 32, "Notes"],
+Cell[5960, 187, 157, 4, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->669742468],
Cell[CellGroupData[{
-Cell[5150, 165, 178, 5, 27, "Input",
+Cell[6142, 195, 178, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->294586102],
-Cell[5331, 172, 229, 7, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->1002154582]
+Cell[6323, 202, 208, 6, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"]
}, Open ]],
-Cell[5575, 182, 179, 5, 27, "Input",
+Cell[6546, 211, 179, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1907752862],
Cell[CellGroupData[{
-Cell[5779, 191, 189, 5, 27, "Input",
+Cell[6750, 220, 189, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1458539742],
-Cell[5971, 198, 277, 9, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->799895096]
+Cell[6942, 227, 257, 8, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"]
}, Open ]],
-Cell[6263, 210, 181, 5, 27, "Input",
+Cell[7214, 238, 181, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->1096625129],
Cell[CellGroupData[{
-Cell[6469, 219, 188, 5, 27, "Input",
+Cell[7420, 247, 188, 5, 27, "Input",
CellTags->"UnDeclareNonCommutative",
CellID->702684679],
-Cell[6660, 226, 279, 9, 36, "Output",
- CellTags->"UnDeclareNonCommutative",
- CellID->493928013]
+Cell[7611, 254, 259, 8, 35, "Output",
+ CellTags->"UnDeclareNonCommutative"]
}, Open ]]
}, Open ]],
-Cell[6966, 239, 31, 0, 29, "SectionFooterSpacer"]
+Cell[7897, 266, 31, 0, 70, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7034, 244, 270, 12, 70, "SeeAlsoSection",
+Cell[7965, 271, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[7307, 258, 440, 15, 70, "Text",
- CellTags->"UnDeclareNonCommutative",
- CellID->349709371]
+Cell[8238, 285, 385, 13, 70, "SeeAlso"]
}, Open ]],
-Cell[7762, 276, 23, 0, 70, "FooterCell"]
+Cell[8638, 301, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Uncontract.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Uncontract.nb
index 493b547e1..73419902c 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Uncontract.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Uncontract.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 22426, 848]
-NotebookOptionsPosition[ 15575, 621]
-NotebookOutlinePosition[ 19784, 746]
-CellTagsIndexPosition[ 19670, 740]
+NotebookDataLength[ 22354, 832]
+NotebookOptionsPosition[ 16212, 635]
+NotebookOutlinePosition[ 19872, 740]
+CellTagsIndexPosition[ 19758, 734]
WindowTitle->Uncontract
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Uncontract\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Uncontract"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Uncontract.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$162625],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Uncontract", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Contract\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Contract"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Uncontract\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Uncontract"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
+Uncontract.html"], StandardForm]], "Input", TextClipboardType ->
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$282616],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Uncontract", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Uncontract", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Uncontract", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -96,32 +130,33 @@ all momenta except OPEDelta."
Cell[CellGroupData[{
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "PrimaryExamplesSection",
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
WholeCellGroupOpener->True,
- CellTags->"PrimaryExamplesSection",
- CellID->538819923],
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->434876890],
-Cell[CellGroupData[{
-
-Cell[TextData[{
- "Basic Examples",
- "\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
-}], "ExampleSection", "ExampleSection",
- WholeCellGroupOpener->True,
- CellID->1212192788],
+Cell["", "SectionHeaderSpacer"],
Cell[CellGroupData[{
@@ -141,29 +176,61 @@ Cell[BoxData[
RowBox[{"{", "}"}]}], ",",
RowBox[{"Unique", "\[Rule]", "True"}]}], "}"}],
TraditionalForm]], "Output",
- ImageSize->{552, 15},
+ ImageSize->{506, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
CellLabel->"Out[1]=",
CellID->659553310]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1177662485],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->101891162],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
+ RowBox[{" ",
RowBox[{
- RowBox[{"LeviCivita", "[",
+ RowBox[{"LC", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
RowBox[{"p", ",", "q"}], "]"}]}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[2]:=",
+ CellLabel->"In[1]:=",
CellID->851114003],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -183,43 +250,39 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]], TraditionalForm]], "Output",
- ImageSize->{54, 21},
+ ImageSize->{61, 17},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[2]=",
- CellID->1899728699]
+ CellLabel->"Out[1]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Uncontract", "[",
- RowBox[{"t1", ",", " ", "p"}], "]"}]], "Input",
+ RowBox[{"%", ",", " ", "p"}], "]"}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[3]:=",
+ CellLabel->"In[2]:=",
CellID->1865320721],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$44995", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$343", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -231,8 +294,8 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"$AL$44995", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$343", ")"}]}],
TraditionalForm],
TraditionalForm],
FormBox[
@@ -240,21 +303,19 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{194, 23},
+ ImageSize->{173, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[3]=",
- CellID->203669378]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"DiracSlash", "[", "p", "]"}]}]], "Input",
+ RowBox[{"GS", "[", "p", "]"}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[4]:=",
+ CellLabel->"In[3]:=",
CellID->1250693732],
Cell[BoxData[
@@ -266,21 +327,20 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{33, 17},
+ ImageSize->{38, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[4]=",
- CellID->581231134]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Uncontract", "[",
- RowBox[{"t2", ",", " ", "p"}], "]"}]], "Input",
+ RowBox[{"%", ",", " ", "p"}], "]"}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[5]:=",
+ CellLabel->"In[4]:=",
CellID->1980864082],
Cell[BoxData[
@@ -290,121 +350,113 @@ Cell[BoxData[
OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox[
- RowBox[{"$AL$45000", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$344", ")"}]}],
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45000", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{164, 22},
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$344", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{140, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[5]=",
- CellID->382965877]
+ CellLabel->"Out[4]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Uncontract", "[",
- RowBox[{"t1", ",", " ", "p", ",", "q"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}], ",", " ", "p", ",", "q"}], "]"}]], "Input",\
+
CellTags->"Uncontract",
- CellLabel->"In[6]:=",
+ CellLabel->"In[5]:=",
CellID->1016696995],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$347", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$346", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{"(",
+ RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
- RowBox[{"$AL$45005", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"$AL$45004", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"$AL$45005", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"$AL$45004", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- ImageSize->{335, 22},
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$346", ")"}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$347", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{307, 22},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[6]=",
- CellID->337635539]
+ CellLabel->"Out[5]="]
}, Open ]],
-Cell["By default scalar products are not uncontracted.", "Text",
- CellTags->"Uncontract",
- CellID->1308085383],
+Cell["By default scalar products are not uncontracted.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Uncontract", "[",
RowBox[{
- RowBox[{"ScalarProduct", "[",
+ RowBox[{"SP", "[",
RowBox[{"p", ",", "q"}], "]"}], ",", " ", "q"}], "]"}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[7]:=",
+ CellLabel->"In[6]:=",
CellID->618827731],
Cell[BoxData[
@@ -422,72 +474,60 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{35, 17},
+ ImageSize->{43, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[7]=",
- CellID->545272743]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell["With the option Pair\[Rule]All they are \
-\[OpenCurlyDoubleQuote]uncontracted \[CloseCurlyDoubleQuote].", "Text",
- CellTags->"Uncontract",
- CellID->1560681362],
+\[OpenCurlyDoubleQuote]uncontracted \[CloseCurlyDoubleQuote].", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Uncontract", "[",
RowBox[{
- RowBox[{"ScalarProduct", "[",
+ RowBox[{"SP", "[",
RowBox[{"p", ",", "q"}], "]"}], ",", "q", ",",
RowBox[{"Pair", "\[Rule]", "All"}]}], "]"}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[8]:=",
+ CellLabel->"In[7]:=",
CellID->765993198],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45013", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$349", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45013", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{164, 22},
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$349", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{143, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[8]=",
- CellID->7406466]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -496,94 +536,70 @@ Cell[BoxData[
RowBox[{"Uncontract", "[",
RowBox[{
RowBox[{
- RowBox[{"ScalarProduct", "[",
+ RowBox[{"SP", "[",
RowBox[{"p", ",", "q"}], "]"}], "^", "2"}], ",", "q", ",",
RowBox[{"Pair", "\[Rule]", "All"}]}], "]"}]], "Input",
CellTags->"Uncontract",
- CellLabel->"In[9]:=",
+ CellLabel->"In[8]:=",
CellID->1461988505],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45017", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45017", "\[InvisibleApplication]",
- RowBox[{"(", "2", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$350", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45017", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$351", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$350", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$45017", "\[InvisibleApplication]",
- RowBox[{"(", "2", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- ImageSize->{327, 22},
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$351", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ ImageSize->{285, 19},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Uncontract",
- CellLabel->"Out[9]=",
- CellID->1916509902]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2"}], "]"}]], "Input",
- CellTags->"Uncontract",
- CellLabel->"In[10]:=",
- CellID->1699220508]
+ CellLabel->"Out[8]="]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -612,9 +628,7 @@ Cell[TextData[{
ButtonNote->"Contract"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Uncontract",
- CellID->1158023183]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -622,7 +636,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Uncontract",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
@@ -631,10 +645,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 39.650508}",
+ "built" -> "{2020, 1, 5, 19, 3, 52.967433}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -643,11 +657,11 @@ TaggingRules->{
"Uncontract[exp, q1, q2, ...] uncontracts Eps and DiracGamma. \
Uncontract[exp, q1, q2, Pair -> {p}] uncontracts also p.q1 and p.q2; the \
option Pair -> All uncontracts all momenta except OPEDelta.",
- "synonyms" -> {}, "title" -> "Uncontract", "titlemodifier" -> "",
- "windowtitle" -> "Uncontract", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Uncontract"}, "SearchTextTranslated" -> ""},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "Uncontract",
+ "titlemodifier" -> "", "windowtitle" -> "Uncontract", "type" -> "Symbol",
+ "uri" -> "FeynCalc/ref/Uncontract"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -656,7 +670,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -664,192 +678,162 @@ StyleDefinitions->Notebook[{
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
- "PrimaryExamplesSection"->{
- Cell[3519, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->538819923]},
"Uncontract"->{
- Cell[4152, 127, 138, 4, 27, "Input",
+ Cell[5330, 162, 138, 4, 70, "Input",
CellTags->"Uncontract",
CellID->1318320011],
- Cell[4293, 133, 477, 15, 36, "Output",
+ Cell[5471, 168, 477, 15, 37, "Output",
CellTags->"Uncontract",
CellID->659553310],
- Cell[4807, 153, 251, 8, 27, "Input",
+ Cell[6642, 219, 227, 8, 27, "Input",
CellTags->"Uncontract",
CellID->851114003],
- Cell[5061, 163, 634, 27, 42, "Output",
- CellTags->"Uncontract",
- CellID->1899728699],
- Cell[5732, 195, 161, 5, 27, "Input",
+ Cell[6872, 229, 637, 27, 38, "Output",
+ CellTags->"Uncontract"],
+ Cell[7546, 261, 160, 5, 27, "Input",
CellTags->"Uncontract",
CellID->1865320721],
- Cell[5896, 202, 1111, 45, 44, "Output",
- CellTags->"Uncontract",
- CellID->203669378],
- Cell[7044, 252, 156, 5, 27, "Input",
+ Cell[7709, 268, 1020, 41, 40, "Output",
+ CellTags->"Uncontract"],
+ Cell[8766, 314, 124, 4, 27, "Input",
CellTags->"Uncontract",
CellID->1250693732],
- Cell[7203, 259, 373, 14, 38, "Output",
- CellTags->"Uncontract",
- CellID->581231134],
- Cell[7613, 278, 161, 5, 27, "Input",
+ Cell[8893, 320, 353, 13, 37, "Output",
+ CellTags->"Uncontract"],
+ Cell[9283, 338, 160, 5, 27, "Input",
CellTags->"Uncontract",
CellID->1980864082],
- Cell[7777, 285, 827, 32, 43, "Output",
- CellTags->"Uncontract",
- CellID->382965877],
- Cell[8641, 322, 171, 5, 27, "Input",
+ Cell[9446, 345, 711, 27, 40, "Output",
+ CellTags->"Uncontract"],
+ Cell[10194, 377, 291, 10, 27, "Input",
CellTags->"Uncontract",
CellID->1016696995],
- Cell[8815, 329, 1555, 62, 43, "Output",
- CellTags->"Uncontract",
- CellID->337635539],
- Cell[10385, 394, 110, 2, 32, "Text",
- CellTags->"Uncontract",
- CellID->1308085383],
- Cell[10520, 400, 225, 7, 27, "Input",
+ Cell[10488, 389, 1458, 56, 43, "Output",
+ CellTags->"Uncontract"],
+ Cell[12051, 452, 214, 7, 27, "Input",
CellTags->"Uncontract",
CellID->618827731],
- Cell[10748, 409, 481, 20, 38, "Output",
- CellTags->"Uncontract",
- CellID->545272743],
- Cell[11244, 432, 165, 3, 32, "Text",
- CellTags->"Uncontract",
- CellID->1560681362],
- Cell[11434, 439, 265, 8, 27, "Input",
+ Cell[12268, 461, 461, 19, 37, "Output",
+ CellTags->"Uncontract"],
+ Cell[12889, 488, 254, 8, 27, "Input",
CellTags->"Uncontract",
CellID->765993198],
- Cell[11702, 449, 985, 40, 43, "Output",
- CellTags->"Uncontract",
- CellID->7406466],
- Cell[12724, 494, 292, 9, 27, "Input",
+ Cell[13146, 498, 781, 31, 40, "Output",
+ CellTags->"Uncontract"],
+ Cell[13964, 534, 281, 9, 27, "Input",
CellTags->"Uncontract",
CellID->1461988505],
- Cell[13019, 505, 1760, 72, 43, "Output",
- CellTags->"Uncontract",
- CellID->1916509902],
- Cell[14794, 580, 153, 5, 27, "Input",
- CellTags->"Uncontract",
- CellID->1699220508],
- Cell[15303, 607, 230, 9, 31, "Text",
- CellTags->"Uncontract",
- CellID->1158023183]}
+ Cell[14248, 545, 1367, 55, 40, "Output",
+ CellTags->"Uncontract"]},
+ "PrimaryExamplesSection"->{
+ Cell[6009, 190, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1177662485]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 17514, 666},
- {"Uncontract", 17650, 670}
+ {"Uncontract", 18122, 680},
+ {"PrimaryExamplesSection", 19614, 727}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[582, 21, 2253, 52, 51, "AnchorBarGrid",
+Cell[582, 21, 3011, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2838, 75, 53, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2894, 78, 600, 16, 98, "Usage",
- CellID->982511436],
+Cell[3596, 97, 287, 11, 45, "ObjectNameGrid"],
Cell[CellGroupData[{
-Cell[3519, 98, 387, 15, 31, "PrimaryExamplesSection",
- CellTags->"PrimaryExamplesSection",
- CellID->538819923],
+Cell[3908, 112, 600, 16, 102, "Usage",
+ CellID->982511436],
Cell[CellGroupData[{
-Cell[3931, 117, 196, 6, 25, "ExampleSection",
- CellID->1212192788],
+Cell[4533, 132, 738, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->434876890],
+Cell[5274, 158, 31, 0, 70, "SectionHeaderSpacer"],
Cell[CellGroupData[{
-Cell[4152, 127, 138, 4, 27, "Input",
+Cell[5330, 162, 138, 4, 70, "Input",
CellTags->"Uncontract",
CellID->1318320011],
-Cell[4293, 133, 477, 15, 36, "Output",
+Cell[5471, 168, 477, 15, 37, "Output",
CellTags->"Uncontract",
CellID->659553310]
+}, Open ]]
+}, Closed]]
}, Open ]],
Cell[CellGroupData[{
-Cell[4807, 153, 251, 8, 27, "Input",
+Cell[6009, 190, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1177662485],
+Cell[CellGroupData[{
+Cell[6422, 209, 195, 6, 26, "ExampleSection",
+ CellID->101891162],
+Cell[CellGroupData[{
+Cell[6642, 219, 227, 8, 27, "Input",
CellTags->"Uncontract",
CellID->851114003],
-Cell[5061, 163, 634, 27, 42, "Output",
- CellTags->"Uncontract",
- CellID->1899728699]
+Cell[6872, 229, 637, 27, 38, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5732, 195, 161, 5, 27, "Input",
+Cell[7546, 261, 160, 5, 27, "Input",
CellTags->"Uncontract",
CellID->1865320721],
-Cell[5896, 202, 1111, 45, 44, "Output",
- CellTags->"Uncontract",
- CellID->203669378]
+Cell[7709, 268, 1020, 41, 40, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7044, 252, 156, 5, 27, "Input",
+Cell[8766, 314, 124, 4, 27, "Input",
CellTags->"Uncontract",
CellID->1250693732],
-Cell[7203, 259, 373, 14, 38, "Output",
- CellTags->"Uncontract",
- CellID->581231134]
+Cell[8893, 320, 353, 13, 37, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[7613, 278, 161, 5, 27, "Input",
+Cell[9283, 338, 160, 5, 27, "Input",
CellTags->"Uncontract",
CellID->1980864082],
-Cell[7777, 285, 827, 32, 43, "Output",
- CellTags->"Uncontract",
- CellID->382965877]
+Cell[9446, 345, 711, 27, 40, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[8641, 322, 171, 5, 27, "Input",
+Cell[10194, 377, 291, 10, 27, "Input",
CellTags->"Uncontract",
CellID->1016696995],
-Cell[8815, 329, 1555, 62, 43, "Output",
- CellTags->"Uncontract",
- CellID->337635539]
+Cell[10488, 389, 1458, 56, 43, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
-Cell[10385, 394, 110, 2, 32, "Text",
- CellTags->"Uncontract",
- CellID->1308085383],
+Cell[11961, 448, 65, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[10520, 400, 225, 7, 27, "Input",
+Cell[12051, 452, 214, 7, 27, "Input",
CellTags->"Uncontract",
CellID->618827731],
-Cell[10748, 409, 481, 20, 38, "Output",
- CellTags->"Uncontract",
- CellID->545272743]
+Cell[12268, 461, 461, 19, 37, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
-Cell[11244, 432, 165, 3, 32, "Text",
- CellTags->"Uncontract",
- CellID->1560681362],
+Cell[12744, 483, 120, 1, 32, "Notes"],
Cell[CellGroupData[{
-Cell[11434, 439, 265, 8, 27, "Input",
+Cell[12889, 488, 254, 8, 27, "Input",
CellTags->"Uncontract",
CellID->765993198],
-Cell[11702, 449, 985, 40, 43, "Output",
- CellTags->"Uncontract",
- CellID->7406466]
+Cell[13146, 498, 781, 31, 40, "Output",
+ CellTags->"Uncontract"]
}, Open ]],
Cell[CellGroupData[{
-Cell[12724, 494, 292, 9, 27, "Input",
+Cell[13964, 534, 281, 9, 27, "Input",
CellTags->"Uncontract",
CellID->1461988505],
-Cell[13019, 505, 1760, 72, 43, "Output",
- CellTags->"Uncontract",
- CellID->1916509902]
-}, Open ]],
-Cell[14794, 580, 153, 5, 27, "Input",
- CellTags->"Uncontract",
- CellID->1699220508]
+Cell[14248, 545, 1367, 55, 40, "Output",
+ CellTags->"Uncontract"]
+}, Open ]]
}, Open ]],
-Cell[14962, 588, 31, 0, 29, "SectionFooterSpacer"]
+Cell[15642, 604, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[15030, 593, 270, 12, 31, "SeeAlsoSection",
+Cell[15710, 609, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[15303, 607, 230, 9, 31, "Text",
- CellTags->"Uncontract",
- CellID->1158023183]
+Cell[15983, 623, 187, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[15548, 619, 23, 0, 42, "FooterCell"]
+Cell[16185, 633, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Upper.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Upper.nb
deleted file mode 100644
index a7d3de616..000000000
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Upper.nb
+++ /dev/null
@@ -1,209 +0,0 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6321, 200]
-NotebookOptionsPosition[ 4137, 134]
-NotebookOutlinePosition[ 6062, 189]
-CellTagsIndexPosition[ 5995, 184]
-WindowTitle->Upper
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
-Notebook[{
-Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Upper\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Upper"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Upper.\
-html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$163317],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Upper",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
- }]], "AnchorBarGrid",
- GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
- Scaled[0.65], {
- Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
- "RowsIndexed" -> {}}},
- CellID->1],
-
-Cell["Upper", "ObjectName",
- CellID->1224892054],
-
-Cell[BoxData[GridBox[{
- {"", Cell[TextData[{
- Cell[BoxData["Upper"], "InlineFormula"],
- " \[LineSeparator]",
- "may be used inside LorentzIndex to indicate an contravariant \
-LorentzIndex."
- }]]}
- }]], "Usage",
- GridBoxOptions->{
- GridBoxBackground->{
- "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
- "RowsIndexed" -> {}}},
- CellID->982511436],
-
-Cell[CellGroupData[{
-
-Cell[TextData[{
- Cell[BoxData[
- InterpretationBox[
- StyleBox[
- GraphicsBox[{},
- BaselinePosition->Baseline,
- ImageSize->{6, 0}],
- CacheGraphics->False],
- Spacer[6]]]],
- "See Also"
-}], "SeeAlsoSection",
- WholeCellGroupOpener->True,
- CellID->1255426704],
-
-Cell[TextData[{
- StyleBox[ButtonBox["LorentzIndex",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LorentzIndex",
- ButtonNote->"LorentzIndex"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Lower",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Lower",
- ButtonNote->"Lower"],
- FontFamily->"Verdana"],
- ", ",
- StyleBox[ButtonBox["Contract1",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Contract1",
- ButtonNote->"Contract1"],
- FontFamily->"Verdana"],
- "."
-}], "Text",
- CellTags->"Upper",
- CellID->1540043735]
-}, Open ]],
-
-Cell[" ", "FooterCell"]
-},
-Saveable->False,
-ScreenStyleEnvironment->"Working",
-WindowSize->{725, 750},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
-WindowTitle->"Upper",
-TaggingRules->{
- "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
- GridBox[{{
- RowBox[{
- ButtonBox[
- "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
- BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 43.071817}",
- "history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
- "keywords" -> {}, "specialkeywords" -> {},
- "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
- "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Upper may be used inside LorentzIndex to indicate an contravariant \
-LorentzIndex.", "synonyms" -> {}, "title" -> "Upper", "titlemodifier" -> "",
- "windowtitle" -> "Upper", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/Upper"}},
-CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
-StyleDefinitions->Notebook[{
- Cell[
- StyleData[
- StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
- Cell[
- StyleData["Input"], CellContext -> "Global`"],
- Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
- StyleDefinitions -> "Default.nb"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "Upper"->{
- Cell[3546, 108, 549, 21, 70, "Text",
- CellTags->"Upper",
- CellID->1540043735]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"Upper", 5886, 177}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[577, 21, 2233, 52, 70, "AnchorBarGrid",
- CellID->1],
-Cell[2813, 75, 48, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 384, 12, 70, "Usage",
- CellID->982511436],
-Cell[CellGroupData[{
-Cell[3273, 94, 270, 12, 70, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3546, 108, 549, 21, 70, "Text",
- CellTags->"Upper",
- CellID->1540043735]
-}, Open ]],
-Cell[4110, 132, 23, 0, 70, "FooterCell"]
-}
-]
-*)
-
-(* End of internal cache information *)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Vectors.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Vectors.nb
index 715ff6619..6a8f9f2a5 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Vectors.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Vectors.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6192, 189]
-NotebookOptionsPosition[ 3917, 122]
-NotebookOutlinePosition[ 5932, 178]
-CellTagsIndexPosition[ 5863, 173]
+NotebookDataLength[ 6957, 209]
+NotebookOptionsPosition[ 4878, 152]
+NotebookOutlinePosition[ 6750, 201]
+CellTagsIndexPosition[ 6707, 198]
WindowTitle->Vectors
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Vectors\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Vectors"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Vectors.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FORM2FeynCalc\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/FORM2FeynCalc"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Vectors\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Vectors"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Vectors.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$164005],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/Vectors", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$284793],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Vectors", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Vectors", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Vectors", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -113,9 +145,7 @@ Cell[TextData[{
ButtonNote->"FORM2FeynCalc"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Vectors",
- CellID->1205329040]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -132,10 +162,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 45.778003}",
+ "built" -> "{2020, 1, 5, 19, 3, 58.351530}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -143,11 +173,11 @@ TaggingRules->{
"None", "summary" ->
"Vectors is an option for FORM2FeynCalc. Its default setting is \
Automatic. It may be set to a list, if the FORM-file does not contain a \
-V(ectors) statement.", "synonyms" -> {}, "title" -> "Vectors",
- "titlemodifier" -> "", "windowtitle" -> "Vectors", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/Vectors"}},
+V(ectors) statement.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "Vectors", "titlemodifier" -> "", "windowtitle" -> "Vectors", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/Vectors"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -156,41 +186,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "Vectors"->{
- Cell[3633, 108, 242, 9, 70, "Text",
- CellTags->"Vectors",
- CellID->1205329040]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"Vectors", 5753, 166}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[579, 21, 2241, 52, 70, "AnchorBarGrid",
+Cell[579, 21, 3008, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2823, 75, 50, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2876, 78, 459, 12, 70, "Usage",
+Cell[3590, 97, 284, 11, 70, "ObjectNameGrid"],
+Cell[3877, 110, 459, 12, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3360, 94, 270, 12, 70, "SeeAlsoSection",
+Cell[4361, 126, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3633, 108, 242, 9, 70, "Text",
- CellTags->"Vectors",
- CellID->1205329040]
+Cell[4634, 140, 202, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3890, 120, 23, 0, 70, "FooterCell"]
+Cell[4851, 150, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/West.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/West.nb
index 0287d89c4..8cdff8aba 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/West.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/West.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5911, 155]
-NotebookOptionsPosition[ 3686, 99]
-NotebookOutlinePosition[ 5833, 151]
-CellTagsIndexPosition[ 5790, 148]
+NotebookDataLength[ 8835, 277]
+NotebookOptionsPosition[ 6502, 211]
+NotebookOutlinePosition[ 8306, 259]
+CellTagsIndexPosition[ 8263, 256]
WindowTitle->West
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/West\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/West"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/West.html"]\
-, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$164348],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/West",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"DiracTrace\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/DiracTrace"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/West\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/West"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/West.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$285237],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/West",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,20 +95,28 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["West", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["West", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["West"], "InlineFormula"],
- " \[LineSeparator]West is an option for DiracTrace, TR and other \
-functions that deal with traces of Dirac matrices. It applies only to the \
-computation of D-dimensional chiral traces (i.e. those that involve one ",
- Cell[BoxData[
- SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
- ") in the Breitenlohner-Maison-t'Hooft-Veltman (BMHV) scheme. If set to \
-True, such traces will be computed according to formula (A.5) from Comp. \
-Phys. Comm 77 (1993) 286-298, which is also known as West's formula."
+ " \[LineSeparator]is an option for ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ " and several other functions that deal with traces of Dirac matrices."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -95,6 +125,88 @@ Phys. Comm 77 (1993) 286-298, which is also known as West's formula."
"RowsIndexed" -> {}}},
CellID->982511436],
+Cell[CellGroupData[{
+
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "The option applies only to the computation of ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional traces with an odd number of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in the Breitenlohner-Maison-t'Hooft-Veltman (BMHV) scheme."
+}], "Notes"],
+
+Cell[TextData[{
+ "With ",
+ Cell[BoxData[
+ RowBox[{"West", "->", "True"}]], "InlineFormula"],
+ " (default setting), such traces are computed according to formula (A.5) \
+from Comp. Phys. Comm 77 (1993) 286-298, which is also known as West's \
+formula. "
+}], "Notes"],
+
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ "."
+}], "Notes",
+ CellID->1067943069]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "See Also"
+}], "SeeAlsoSection",
+ WholeCellGroupOpener->True,
+ CellID->1255426704],
+
+Cell[TextData[StyleBox[ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ FontFamily->"Verdana"]], "SeeAlso"]
+}, Open ]],
+
Cell[" ", "FooterCell"]
},
Saveable->False,
@@ -109,25 +221,21 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 47.252367}",
+ "built" -> "{2020, 1, 5, 19, 3, 59.302288}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
- "West West is an option for DiracTrace, TR and other functions that deal \
-with traces of Dirac matrices. It applies only to the computation of \
-D-dimensional chiral traces (i.e. those that involve one \\[Gamma]^5) in the \
-Breitenlohner-Maison-t'Hooft-Veltman (BMHV) scheme. If set to True, such \
-traces will be computed according to formula (A.5) from Comp. Phys. Comm 77 \
-(1993) 286-298, which is also known as West's formula.", "synonyms" -> {},
- "title" -> "West", "titlemodifier" -> "", "windowtitle" -> "West", "type" ->
+ "West is an option for DiracTrace and several other functions that deal \
+with traces of Dirac matrices.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "West", "titlemodifier" -> "", "windowtitle" -> "West", "type" ->
"Symbol", "uri" -> "FeynCalc/ref/West"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -136,7 +244,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -150,13 +258,27 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[576, 21, 2229, 52, 70, "AnchorBarGrid",
+Cell[576, 21, 2990, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2808, 75, 47, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2858, 78, 798, 17, 70, "Usage",
+Cell[3569, 97, 281, 11, 70, "ObjectNameGrid"],
+Cell[3853, 110, 532, 15, 70, "Usage",
CellID->982511436],
-Cell[3659, 97, 23, 0, 70, "FooterCell"]
+Cell[CellGroupData[{
+Cell[4410, 129, 730, 24, 70, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1],
+Cell[5143, 155, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5177, 157, 296, 7, 70, "Notes"],
+Cell[5476, 166, 267, 7, 70, "Notes"],
+Cell[5746, 175, 226, 8, 70, "Notes",
+ CellID->1067943069]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[6009, 188, 270, 12, 70, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[6282, 202, 178, 4, 70, "SeeAlso"]
+}, Open ]],
+Cell[6475, 209, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Write2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Write2.nb
index 8ec4e3143..2a2642cfd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Write2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Write2.nb
@@ -3,69 +3,92 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 24443, 861]
-NotebookOptionsPosition[ 16738, 598]
-NotebookOutlinePosition[ 21405, 741]
-CellTagsIndexPosition[ 21295, 735]
+NotebookDataLength[ 23681, 821]
+NotebookOptionsPosition[ 17789, 630]
+NotebookOutlinePosition[ 21122, 728]
+CellTagsIndexPosition[ 21012, 722]
WindowTitle->Write2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Write2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Write2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Write2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"Isolate\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Isolate"], "\<\"PaVeReduce\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/PaVeReduce"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Write2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Write2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Write2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$164701],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Write2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$285699],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/Write2", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +96,20 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Write2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Write2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[CellGroupData[{
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -84,10 +119,12 @@ Cell[BoxData[GridBox[{
RowBox[{"val1", " ", "=", " ", "expr1"}], ",", " ",
RowBox[{"val2", " ", "=", " ", "expr2"}], ",", " ", "..."}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "writes the settings val1 = expr1, val2 = expr2 in sequence followed by \
-a newline, to the specified output file. Setting the option FormatType of \
-Write2 to FortranForm results in FORTRAN syntax output."
+ " \[LineSeparator]writes the settings ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"val1", " ", "=", " ", "expr1"}], ",", " ",
+ RowBox[{"val2", " ", "=", " ", "expr2"}]}]], "InlineFormula"],
+ " in sequence followed by a newline, to the specified output file."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -98,6 +135,81 @@ Write2 to FortranForm results in FORTRAN syntax output."
Cell[CellGroupData[{
+Cell[TextData[Cell[BoxData[
+ ButtonBox[Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Details"
+ }], "NotesFrameText"],
+ Appearance->{Automatic, None},
+ BaseStyle->None,
+ ButtonFunction:>(FrontEndExecute[{
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], All, ButtonCell],
+ FrontEndToken["OpenCloseGroup"],
+ FrontEnd`SelectionMove[
+ FrontEnd`SelectedNotebook[], After, CellContents]}]& ),
+ Evaluator->None,
+ Method->"Preemptive"]]]], "NotesSection",
+ WholeCellGroupOpener->True,
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1529498728],
+
+Cell["", "SectionHeaderSpacer"],
+
+Cell[TextData[{
+ "Setting the option ",
+ Cell[BoxData["FormatType"], "InlineFormula"],
+ " of ",
+ ButtonBox["Write2",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Write2",
+ ButtonNote->"Write2"],
+ " to ",
+ Cell[BoxData["FortranForm"], "InlineFormula"],
+ " results in Fortran syntax output."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Write2", "]"}]], "Input",
+ CellLabel->"In[150]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"D0Convention", "\[Rule]", "0"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"FormatType", "\[Rule]", "InputForm"}], ",",
+ RowBox[{"FortranFormatDoublePrecision", "\[Rule]", "True"}], ",",
+ RowBox[{"PageWidth", "\[Rule]", "62"}], ",",
+ RowBox[{"PostFortranFile", "\[Rule]",
+ RowBox[{"{", "\<\"\"\>", "}"}]}], ",",
+ RowBox[{"PreFortranFile", "\[Rule]",
+ RowBox[{"{", "\<\"\"\>", "}"}]}], ",",
+ RowBox[{"Precision", "\[Rule]", "15"}], ",",
+ RowBox[{"StringReplace", "\[Rule]",
+ RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ ImageSize->{499, 53},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[150]="]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell[TextData[{
Cell[BoxData[
InterpretationBox[
@@ -109,21 +221,21 @@ Cell[TextData[{
Spacer[6]]]],
"Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->1897199636],
+ CellID->866533242],
Cell[CellGroupData[{
Cell[TextData[{
"Basic Examples",
"\[NonBreakingSpace]\[NonBreakingSpace]",
- Cell["(1)", "ExampleCount"]
+ Cell["(2)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1995411025],
+ CellID->115796692],
Cell[CellGroupData[{
@@ -141,62 +253,18 @@ Cell[BoxData[
ShowStringCharacters->True,
NumberMarks->True],
FullForm], TraditionalForm]], "Output",
- ImageSize->{27, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Write2",
- CellLabel->"Out[1]//FullForm=",
- CellID->296766764]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "Write2", "]"}]], "Input",
- CellTags->"Write2",
- CellLabel->"In[2]:=",
- CellID->2021664467],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"D0Convention", "\[Rule]", "0"}], ",",
- RowBox[{"FinalSubstitutions", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"FormatType", "\[Rule]", "InputForm"}], ",",
- RowBox[{"FortranFormatDoublePrecision", "\[Rule]", "True"}], ",",
- RowBox[{"PageWidth", "\[Rule]", "62"}], ",",
- RowBox[{"PostFortranFile", "\[Rule]", "\<\"\"\>"}], ",",
- RowBox[{"PreFortranFile", "\[Rule]", "\<\"\"\>"}], ",",
- RowBox[{"StringReplace", "\[Rule]",
- RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- ImageSize->{465, 54},
+ ImageSize->{28, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Write2",
- CellLabel->"Out[2]=",
- CellID->426630983]
+ CellLabel->"Out[1]//FullForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Attributes", "[", "Write2", "]"}]], "Input",
- CellTags->"Write2",
- CellLabel->"In[3]:=",
- CellID->653070552],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{", "HoldRest", "}"}], TraditionalForm]], "Output",
- ImageSize->{76, 15},
- ImageMargins->{{0, 0}, {0, 0}},
- ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Write2",
- CellLabel->"Out[3]=",
- CellID->930779746]
-}, Open ]],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
Cell[CellGroupData[{
@@ -215,7 +283,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b"}], ")"}], "2"]}], ")"}], "2"], ",", "a", ",",
"Factor"}], "]"}]}]], "Input",
CellTags->"Write2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[1]:=",
CellID->568187661],
Cell[BoxData[
@@ -246,14 +314,15 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["b", "2"], "+",
SuperscriptBox["c", "2"]}], ")"}], "2"]}], TraditionalForm]], "Output",
- ImageSize->{495, 21},
+ ImageSize->{537, 21},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Write2",
- CellLabel->"Out[4]=",
- CellID->1801200835]
+ CellLabel->"Out[1]="]
}, Open ]],
+Cell["This writes the assignment r=t to a file.", "Notes"],
+
Cell[BoxData[
RowBox[{
RowBox[{"tempfilename", "=",
@@ -261,25 +330,17 @@ Cell[BoxData[
RowBox[{"ToString", "[", "$SessionID", "]"}], "<>", "\"\<.s\>\""}]}],
";"}]], "Input",
CellTags->"Write2",
- CellLabel->"In[5]:=",
+ CellLabel->"In[2]:=",
CellID->158339237],
-Cell["This writes the assignment r=t to a file.", "Text",
- CellTags->"Write2",
- CellID->956230713],
-
Cell[BoxData[
RowBox[{
RowBox[{"Write2", "[",
RowBox[{"tempfilename", ",",
RowBox[{"r", "=", "t"}]}], "]"}], ";"}]], "Input",
- CellTags->"Write2",
- CellLabel->"In[6]:=",
- CellID->1599031587],
+ CellLabel->"In[3]:="],
-Cell["This shows the contents of the file.", "Text",
- CellTags->"Write2",
- CellID->304283335],
+Cell["This shows the contents of the file.", "Notes"],
Cell[CellGroupData[{
@@ -293,17 +354,14 @@ Cell[BoxData[
RowBox[{"$OperatingSystem", "===", "\"\\""}], ",", "\"\<:\>\"",
",", "\"\<\>\""}], "]"}], "<>", "tempfilename"}], ",", "String"}],
"]"}], "]"}]], "Input",
- CellTags->"Write2",
- CellLabel->"In[7]:=",
- CellID->1505586368],
+ CellLabel->"In[4]:="],
Cell[BoxData[
FormBox[
TagBox[
TagBox[GridBox[{
- {"\<\"r = ( 4*a^4 - 8*a^3*(b + c) - 4*a*(b + c)*(b^2 + c^2) + (b^2 + \
-c^2)^2 + \"\>"},
- {"\<\" 8*a^2*(b^2 + b*c + c^2)\"\>"},
+ {"\<\"r = ( 4*a^4 - 8*a^3*(b + c) - 4*a*(b + c)*(b^2 + c^2) + \"\>"},
+ {"\<\" (b^2 + c^2)^2 + 8*a^2*(b^2 + b*c + c^2)\"\>"},
{"\<\" );\"\>"}
},
GridBoxAlignment->{
@@ -319,12 +377,10 @@ c^2)^2 + \"\>"},
Column],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]], TraditionalForm]], "Output",
- ImageSize->{497, 51},
+ ImageSize->{399, 50},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
- CellTags->"Write2",
- CellLabel->"Out[7]//TableForm=",
- CellID->432817826]
+ CellLabel->"Out[4]//TableForm="]
}, Open ]],
Cell[BoxData[
@@ -334,9 +390,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"$OperatingSystem", "===", "\"\\""}], ",", "\"\<:\>\"",
",", "\"\<\>\""}], "]"}], "<>", "tempfilename"}], "]"}]], "Input",
- CellTags->"Write2",
- CellLabel->"In[8]:=",
- CellID->62208628],
+ CellLabel->"In[5]:="],
Cell[CellGroupData[{
@@ -347,7 +401,7 @@ Cell[BoxData[
RowBox[{"t", ",", "a", ",",
RowBox[{"IsolateNames", "\[Rule]", "w"}]}], "]"}]}]}]], "Input",
CellTags->"Write2",
- CellLabel->"In[9]:=",
+ CellLabel->"In[6]:=",
CellID->170691261],
Cell[BoxData[
@@ -358,30 +412,29 @@ Cell[BoxData[
RowBox[{"8", " ",
SuperscriptBox["a", "3"], " ",
TagBox[
- RowBox[{"w", "(", "1423", ")"}],
+ RowBox[{"w", "(", "24", ")"}],
HoldForm]}], "+",
RowBox[{"8", " ",
SuperscriptBox["a", "2"], " ",
TagBox[
- RowBox[{"w", "(", "1425", ")"}],
+ RowBox[{"w", "(", "26", ")"}],
HoldForm]}], "-",
RowBox[{"4", " ", "a", " ",
TagBox[
- RowBox[{"w", "(", "1423", ")"}],
+ RowBox[{"w", "(", "24", ")"}],
HoldForm], " ",
TagBox[
- RowBox[{"w", "(", "1424", ")"}],
+ RowBox[{"w", "(", "25", ")"}],
HoldForm]}], "+",
SuperscriptBox[
TagBox[
- RowBox[{"w", "(", "1424", ")"}],
+ RowBox[{"w", "(", "25", ")"}],
HoldForm], "2"], "+", "x"}], TraditionalForm]], "Output",
- ImageSize->{475, 18},
+ ImageSize->{433, 18},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Write2",
- CellLabel->"Out[9]=",
- CellID->1764933631]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[BoxData[
@@ -390,7 +443,7 @@ Cell[BoxData[
RowBox[{"tempfilename", ",",
RowBox[{"r", "=", "t2"}]}], "]"}], ";"}]], "Input",
CellTags->"Write2",
- CellLabel->"In[10]:=",
+ CellLabel->"In[7]:=",
CellID->2074608494],
Cell[CellGroupData[{
@@ -406,23 +459,23 @@ Cell[BoxData[
",", "\"\<\>\""}], "]"}], "<>", "tempfilename"}], ",", "String"}],
"]"}], "]"}]], "Input",
CellTags->"Write2",
- CellLabel->"In[11]:=",
+ CellLabel->"In[8]:=",
CellID->1647925835],
Cell[BoxData[
FormBox[
TagBox[
TagBox[GridBox[{
- {"\<\"w[1423] = (b + c\"\>"},
+ {"\<\"w[24] = (b + c\"\>"},
{"\<\" );\"\>"},
- {"\<\"w[1424] = (b^2 + c^2\"\>"},
+ {"\<\"w[25] = (b^2 + c^2\"\>"},
{"\<\" );\"\>"},
- {"\<\"w[1425] = (b^2 + b*c + c^2\"\>"},
+ {"\<\"w[26] = (b^2 + b*c + c^2\"\>"},
{"\<\" );\"\>"},
- {"\<\"r = ( 4*a^4 + x - 8*a^3*HoldForm[w[1423]] - \
-4*a*HoldForm[w[1423]]*\"\>"},
- {"\<\" HoldForm[w[1424]] + HoldForm[w[1424]]^2 + \
-8*a^2*HoldForm[w[1425]]\"\>"},
+ {"\<\"r = ( 4*a^4 + x - 8*a^3*HoldForm[w[24]] - \
+4*a*HoldForm[w[24]]*\"\>"},
+ {"\<\" HoldForm[w[25]] + HoldForm[w[25]]^2 + \
+8*a^2*HoldForm[w[26]]\"\>"},
{"\<\" );\"\>"}
},
GridBoxAlignment->{
@@ -438,12 +491,11 @@ Cell[BoxData[
Column],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]], TraditionalForm]], "Output",
- ImageSize->{496, 159},
+ ImageSize->{451, 155},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Write2",
- CellLabel->"Out[11]//TableForm=",
- CellID->342974912]
+ CellLabel->"Out[8]//TableForm="]
}, Open ]],
Cell[BoxData[
@@ -454,16 +506,14 @@ Cell[BoxData[
RowBox[{"$OperatingSystem", "===", "\"\\""}], ",", "\"\<:\>\"",
",", "\"\<\>\""}], "]"}], "<>", "tempfilename"}], "]"}]], "Input",
CellTags->"Write2",
- CellLabel->"In[12]:=",
+ CellLabel->"In[9]:=",
CellID->1908725708],
-Cell["\<\
-This is how to write out the expression t2 in Fortran format.\
-\>", "Text",
- CellTags->"Write2",
- CellID->422363964],
-
-Cell[CellGroupData[{
+Cell[TextData[{
+ "This is how to write out the expression ",
+ Cell[BoxData["t2"], "InlineFormula"],
+ " in Fortran format."
+}], "Notes"],
Cell[BoxData[
RowBox[{
@@ -473,24 +523,9 @@ Cell[BoxData[
RowBox[{"FormatType", "\[Rule]", "FortranForm"}]}], "]"}], ";"}]], "Input",\
CellTags->"Write2",
- CellLabel->"In[13]:=",
+ CellLabel->"In[10]:=",
CellID->1416932507],
-Cell[BoxData[
- FormBox[
- InterpretationBox[
- RowBox[{"\<\"FORTRAN generation WARNING!\\n\\t\\t\\t\\t\\tLine encountered \
-with more than 72 characters. Check line \"\>", "\[InvisibleSpace]", "3",
- "\[InvisibleSpace]", "\<\" and \"\>", "\[InvisibleSpace]", "4"}],
- SequenceForm[
- "FORTRAN generation WARNING!\n\t\t\t\t\tLine encountered with more than 72 \
-characters. Check line ", 3, " and ", 4],
- Editable->False], TraditionalForm]], "Print",
- CellTags->"Write2",
- CellLabel->"During evaluation of In[13]:=",
- CellID->1570874226]
-}, Open ]],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -504,20 +539,19 @@ Cell[BoxData[
",", "\"\<\>\""}], "]"}], "<>", "tempfilename"}], ",", "String"}],
"]"}], "]"}]], "Input",
CellTags->"Write2",
- CellLabel->"In[14]:=",
+ CellLabel->"In[11]:=",
CellID->2122464458],
Cell[BoxData[
FormBox[
TagBox[
TagBox[GridBox[{
- {"\<\" w(1423)= b + c\"\>"},
- {"\<\" w(1424)= b^2 + c^2\"\>"},
- {"\<\" w(1425)= b^2 + b*c + c^2\"\>"},
- {"\<\" r = 4.*a^4 + x - 8.*a^3*HoldForm[w[1423]] - \
-4.*a*HoldForm[w[1423]]*\"\>"},
- {"\<\" HoldForm[w[1424]] + HoldForm[w[1424]]^2 + \
-8.*a^2*HoldForm[w[1425]]\"\>"},
+ {"\<\" w(24)= b + c\"\>"},
+ {"\<\" w(25)= b**2 + c**2\"\>"},
+ {"\<\" w(26)= b**2 + b*c + c**2\"\>"},
+ {"\<\" r = x + a**4*4D0 - a**3*8D0*w(24) - a*4D0*w(24)*w(25) + \
+\"\>"},
+ {"\<\" & w(25)**2 + a**2*8D0*w(26)\"\>"},
{"\<\" \"\>"}
},
GridBoxAlignment->{
@@ -533,12 +567,11 @@ Cell[BoxData[
Column],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]], TraditionalForm]], "Output",
- ImageSize->{508, 105},
+ ImageSize->{454, 104},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Write2",
- CellLabel->"Out[14]//TableForm=",
- CellID->1300360264]
+ CellLabel->"Out[11]//TableForm="]
}, Open ]],
Cell[BoxData[
@@ -553,8 +586,9 @@ Cell[BoxData[
RowBox[{"w", ",", "t", ",", "t2", ",", "r", ",", "tempfilename"}], "]"}],
";"}]], "Input",
CellTags->"Write2",
- CellLabel->"In[15]:=",
+ CellLabel->"In[12]:=",
CellID->1809491647]
+}, Open ]]
}, Open ]],
Cell["", "SectionFooterSpacer"]
@@ -589,9 +623,7 @@ Cell[TextData[{
ButtonNote->"PaVeReduce"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Write2",
- CellID->1387459580]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -608,10 +640,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 48.718211}",
+ "built" -> "{2020, 1, 5, 19, 4, 0.258764}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -619,12 +651,11 @@ TaggingRules->{
"None", "summary" ->
"Write2[file, val1 = expr1, val2 = expr2, ...] writes the settings val1 = \
expr1, val2 = expr2 in sequence followed by a newline, to the specified \
-output file. Setting the option FormatType of Write2 to FortranForm results \
-in FORTRAN syntax output.", "synonyms" -> {}, "title" -> "Write2",
+output file.", "synonyms" -> {}, "tabletags" -> {}, "title" -> "Write2",
"titlemodifier" -> "", "windowtitle" -> "Write2", "type" -> "Symbol",
"uri" -> "FeynCalc/ref/Write2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -633,7 +664,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -642,227 +673,156 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3607, 100, 388, 15, 31, "PrimaryExamplesSection",
+ Cell[6880, 212, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1897199636]},
+ CellID->866533242]},
"Write2"->{
- Cell[4241, 129, 154, 4, 27, "Input",
+ Cell[7512, 241, 154, 4, 27, "Input",
CellTags->"Write2",
CellID->1324211307],
- Cell[4398, 135, 352, 13, 49, "Output",
- CellTags->"Write2",
- CellID->296766764],
- Cell[4787, 153, 130, 4, 27, "Input",
- CellTags->"Write2",
- CellID->2021664467],
- Cell[4920, 159, 742, 19, 75, "Output",
- CellTags->"Write2",
- CellID->426630983],
- Cell[5699, 183, 132, 4, 27, "Input",
- CellTags->"Write2",
- CellID->653070552],
- Cell[5834, 189, 237, 8, 36, "Output",
- CellTags->"Write2",
- CellID->930779746],
- Cell[6108, 202, 446, 16, 33, "Input",
+ Cell[7669, 247, 332, 12, 50, "Output",
+ CellTags->"Write2"],
+ Cell[8168, 270, 446, 16, 33, "Input",
CellTags->"Write2",
CellID->568187661],
- Cell[6557, 220, 961, 33, 42, "Output",
- CellTags->"Write2",
- CellID->1801200835],
- Cell[7533, 256, 225, 8, 27, "Input",
+ Cell[8617, 288, 940, 32, 42, "Output",
+ CellTags->"Write2"],
+ Cell[9633, 325, 225, 8, 27, "Input",
CellTags->"Write2",
CellID->158339237],
- Cell[7761, 266, 98, 2, 32, "Text",
- CellTags->"Write2",
- CellID->956230713],
- Cell[7862, 270, 202, 7, 27, "Input",
- CellTags->"Write2",
- CellID->1599031587],
- Cell[8067, 279, 93, 2, 31, "Text",
- CellTags->"Write2",
- CellID->304283335],
- Cell[8185, 285, 381, 12, 45, "Input",
- CellTags->"Write2",
- CellID->1505586368],
- Cell[8569, 299, 908, 27, 85, "Output",
- CellTags->"Write2",
- CellID->432817826],
- Cell[9492, 329, 302, 9, 27, "Input",
- CellTags->"Write2",
- CellID->62208628],
- Cell[9819, 342, 250, 8, 27, "Input",
+ Cell[11611, 396, 250, 8, 27, "Input",
CellTags->"Write2",
CellID->170691261],
- Cell[10072, 352, 821, 31, 39, "Output",
- CellTags->"Write2",
- CellID->1764933631],
- Cell[10908, 386, 204, 7, 27, "Input",
+ Cell[11864, 406, 790, 30, 39, "Output",
+ CellTags->"Write2"],
+ Cell[12669, 439, 203, 7, 27, "Input",
CellTags->"Write2",
CellID->2074608494],
- Cell[11137, 397, 382, 12, 45, "Input",
+ Cell[12897, 450, 381, 12, 45, "Input",
CellTags->"Write2",
CellID->1647925835],
- Cell[11522, 411, 1158, 34, 193, "Output",
- CellTags->"Write2",
- CellID->342974912],
- Cell[12695, 448, 305, 9, 27, "Input",
+ Cell[13281, 464, 1121, 33, 191, "Output",
+ CellTags->"Write2"],
+ Cell[14417, 500, 304, 9, 27, "Input",
CellTags->"Write2",
CellID->1908725708],
- Cell[13003, 459, 126, 4, 32, "Text",
- CellTags->"Write2",
- CellID->422363964],
- Cell[13154, 467, 266, 9, 27, "Input",
+ Cell[14862, 517, 266, 9, 27, "Input",
CellTags->"Write2",
CellID->1416932507],
- Cell[13423, 478, 544, 12, 62, "Print",
- CellTags->"Write2",
- CellID->1570874226],
- Cell[14004, 495, 382, 12, 45, "Input",
+ Cell[15153, 530, 382, 12, 45, "Input",
CellTags->"Write2",
CellID->2122464458],
- Cell[14389, 509, 1109, 31, 139, "Output",
- CellTags->"Write2",
- CellID->1300360264],
- Cell[15513, 543, 439, 13, 45, "Input",
+ Cell[15538, 544, 1038, 29, 140, "Output",
+ CellTags->"Write2"],
+ Cell[16591, 576, 439, 13, 45, "Input",
CellTags->"Write2",
- CellID->1809491647],
- Cell[16308, 578, 388, 15, 31, "Text",
- CellTags->"Write2",
- CellID->1387459580]}
+ CellID->1809491647]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 18711, 643},
- {"Write2", 18845, 647}
+ {"PrimaryExamplesSection", 19655, 674},
+ {"Write2", 19788, 678}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[578, 21, 2237, 52, 51, "AnchorBarGrid",
+Cell[578, 21, 3082, 75, 53, "AnchorBarGrid",
CellID->1],
-Cell[2818, 75, 49, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2870, 78, 712, 18, 97, "Usage",
+Cell[3663, 98, 283, 11, 45, "ObjectNameGrid"],
+Cell[CellGroupData[{
+Cell[3971, 113, 757, 20, 102, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3607, 100, 388, 15, 31, "PrimaryExamplesSection",
+Cell[4753, 137, 739, 24, 31, "NotesSection",
+ CellGroupingRules->{"SectionGrouping", 50},
+ CellID->1529498728],
+Cell[5495, 163, 31, 0, 70, "SectionHeaderSpacer"],
+Cell[5529, 165, 314, 11, 70, "Notes"],
+Cell[CellGroupData[{
+Cell[5868, 180, 90, 2, 70, "Input"],
+Cell[5961, 184, 858, 21, 74, "Output"]
+}, Open ]]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6880, 212, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->1897199636],
+ CellID->866533242],
Cell[CellGroupData[{
-Cell[4020, 119, 196, 6, 25, "ExampleSection",
- CellID->1995411025],
+Cell[7292, 231, 195, 6, 26, "ExampleSection",
+ CellID->115796692],
Cell[CellGroupData[{
-Cell[4241, 129, 154, 4, 27, "Input",
+Cell[7512, 241, 154, 4, 27, "Input",
CellTags->"Write2",
CellID->1324211307],
-Cell[4398, 135, 352, 13, 49, "Output",
- CellTags->"Write2",
- CellID->296766764]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4787, 153, 130, 4, 27, "Input",
- CellTags->"Write2",
- CellID->2021664467],
-Cell[4920, 159, 742, 19, 75, "Output",
- CellTags->"Write2",
- CellID->426630983]
+Cell[7669, 247, 332, 12, 50, "Output",
+ CellTags->"Write2"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5699, 183, 132, 4, 27, "Input",
- CellTags->"Write2",
- CellID->653070552],
-Cell[5834, 189, 237, 8, 36, "Output",
- CellTags->"Write2",
- CellID->930779746]
-}, Open ]],
+Cell[8038, 264, 105, 2, 9, "ExampleDelimiter"],
Cell[CellGroupData[{
-Cell[6108, 202, 446, 16, 33, "Input",
+Cell[8168, 270, 446, 16, 33, "Input",
CellTags->"Write2",
CellID->568187661],
-Cell[6557, 220, 961, 33, 42, "Output",
- CellTags->"Write2",
- CellID->1801200835]
+Cell[8617, 288, 940, 32, 42, "Output",
+ CellTags->"Write2"]
}, Open ]],
-Cell[7533, 256, 225, 8, 27, "Input",
+Cell[9572, 323, 58, 0, 32, "Notes"],
+Cell[9633, 325, 225, 8, 27, "Input",
CellTags->"Write2",
CellID->158339237],
-Cell[7761, 266, 98, 2, 32, "Text",
- CellTags->"Write2",
- CellID->956230713],
-Cell[7862, 270, 202, 7, 27, "Input",
- CellTags->"Write2",
- CellID->1599031587],
-Cell[8067, 279, 93, 2, 31, "Text",
- CellTags->"Write2",
- CellID->304283335],
+Cell[9861, 335, 160, 5, 27, "Input"],
+Cell[10024, 342, 53, 0, 32, "Notes"],
Cell[CellGroupData[{
-Cell[8185, 285, 381, 12, 45, "Input",
- CellTags->"Write2",
- CellID->1505586368],
-Cell[8569, 299, 908, 27, 85, "Output",
- CellTags->"Write2",
- CellID->432817826]
+Cell[10102, 346, 339, 10, 45, "Input"],
+Cell[10444, 358, 865, 24, 86, "Output"]
}, Open ]],
-Cell[9492, 329, 302, 9, 27, "Input",
- CellTags->"Write2",
- CellID->62208628],
+Cell[11324, 385, 262, 7, 27, "Input"],
Cell[CellGroupData[{
-Cell[9819, 342, 250, 8, 27, "Input",
+Cell[11611, 396, 250, 8, 27, "Input",
CellTags->"Write2",
CellID->170691261],
-Cell[10072, 352, 821, 31, 39, "Output",
- CellTags->"Write2",
- CellID->1764933631]
+Cell[11864, 406, 790, 30, 39, "Output",
+ CellTags->"Write2"]
}, Open ]],
-Cell[10908, 386, 204, 7, 27, "Input",
+Cell[12669, 439, 203, 7, 27, "Input",
CellTags->"Write2",
CellID->2074608494],
Cell[CellGroupData[{
-Cell[11137, 397, 382, 12, 45, "Input",
+Cell[12897, 450, 381, 12, 45, "Input",
CellTags->"Write2",
CellID->1647925835],
-Cell[11522, 411, 1158, 34, 193, "Output",
- CellTags->"Write2",
- CellID->342974912]
+Cell[13281, 464, 1121, 33, 191, "Output",
+ CellTags->"Write2"]
}, Open ]],
-Cell[12695, 448, 305, 9, 27, "Input",
+Cell[14417, 500, 304, 9, 27, "Input",
CellTags->"Write2",
CellID->1908725708],
-Cell[13003, 459, 126, 4, 32, "Text",
- CellTags->"Write2",
- CellID->422363964],
-Cell[CellGroupData[{
-Cell[13154, 467, 266, 9, 27, "Input",
+Cell[14724, 511, 135, 4, 32, "Notes"],
+Cell[14862, 517, 266, 9, 27, "Input",
CellTags->"Write2",
CellID->1416932507],
-Cell[13423, 478, 544, 12, 62, "Print",
- CellTags->"Write2",
- CellID->1570874226]
-}, Open ]],
Cell[CellGroupData[{
-Cell[14004, 495, 382, 12, 45, "Input",
+Cell[15153, 530, 382, 12, 45, "Input",
CellTags->"Write2",
CellID->2122464458],
-Cell[14389, 509, 1109, 31, 139, "Output",
- CellTags->"Write2",
- CellID->1300360264]
+Cell[15538, 544, 1038, 29, 140, "Output",
+ CellTags->"Write2"]
}, Open ]],
-Cell[15513, 543, 439, 13, 45, "Input",
+Cell[16591, 576, 439, 13, 45, "Input",
CellTags->"Write2",
CellID->1809491647]
+}, Open ]]
}, Open ]],
-Cell[15967, 559, 31, 0, 29, "SectionFooterSpacer"]
+Cell[17057, 593, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[16035, 564, 270, 12, 31, "SeeAlsoSection",
+Cell[17125, 598, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[16308, 578, 388, 15, 31, "Text",
- CellTags->"Write2",
- CellID->1387459580]
+Cell[17398, 612, 349, 13, 56, "SeeAlso"]
}, Open ]],
-Cell[16711, 596, 23, 0, 42, "FooterCell"]
+Cell[17762, 628, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOut.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOut.nb
index 6adbc1604..967aad328 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOut.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOut.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6207, 190]
-NotebookOptionsPosition[ 3917, 123]
-NotebookOutlinePosition[ 5947, 179]
-CellTagsIndexPosition[ 5877, 174]
+NotebookDataLength[ 6957, 210]
+NotebookOptionsPosition[ 4866, 153]
+NotebookOutlinePosition[ 6750, 202]
+CellTagsIndexPosition[ 6707, 199]
WindowTitle->WriteOut
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/WriteOut\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/WriteOut"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/WriteOut.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"OneLoop\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/OneLoop"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/WriteOut\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/WriteOut"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/WriteOut.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$165049],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/WriteOut", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$286147],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/WriteOut", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +95,18 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["WriteOut", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["WriteOut", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -114,9 +146,7 @@ Cell[TextData[{
ButtonNote->"OneLoop"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"WriteOut",
- CellID->917997182]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -133,10 +163,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 50.394654}",
+ "built" -> "{2020, 1, 5, 19, 4, 1.458060}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -144,11 +174,11 @@ TaggingRules->{
"None", "summary" ->
"WriteOut is an option for OneLoop. If set to True, the result of OneLoop \
will be written to a file called \"name.res\", where name is the first \
-argument of OneLoop.", "synonyms" -> {}, "title" -> "WriteOut",
- "titlemodifier" -> "", "windowtitle" -> "WriteOut", "type" -> "Symbol",
- "uri" -> "FeynCalc/ref/WriteOut"}},
+argument of OneLoop.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "WriteOut", "titlemodifier" -> "", "windowtitle" -> "WriteOut", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/WriteOut"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -157,41 +187,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "WriteOut"->{
- Cell[3651, 109, 224, 9, 70, "Text",
- CellTags->"WriteOut",
- CellID->917997182]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"WriteOut", 5767, 167}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[580, 21, 2245, 52, 70, "AnchorBarGrid",
+Cell[580, 21, 3000, 74, 70, "AnchorBarGrid",
CellID->1],
-Cell[2828, 75, 51, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2882, 78, 471, 13, 70, "Usage",
+Cell[3583, 97, 285, 11, 70, "ObjectNameGrid"],
+Cell[3871, 110, 471, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3378, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4367, 127, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3651, 109, 224, 9, 70, "Text",
- CellTags->"WriteOut",
- CellID->917997182]
+Cell[4640, 141, 184, 7, 70, "SeeAlso"]
}, Open ]],
-Cell[3890, 121, 23, 0, 70, "FooterCell"]
+Cell[4839, 151, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOutPaVe.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOutPaVe.nb
index 19264d0a5..3bbb8eb35 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOutPaVe.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/WriteOutPaVe.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6677, 203]
-NotebookOptionsPosition[ 4307, 135]
-NotebookOutlinePosition[ 6412, 192]
-CellTagsIndexPosition[ 6338, 187]
+NotebookDataLength[ 7589, 226]
+NotebookOptionsPosition[ 5434, 168]
+NotebookOutlinePosition[ 7380, 218]
+CellTagsIndexPosition[ 7337, 215]
WindowTitle->WriteOutPaVe
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/WriteOutPaVe\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/WriteOutPaVe"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"PaVeReduce\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVeReduce"], "\<\"PaVe\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/PaVe"], "\<\"OneLoopSum\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/OneLoopSum"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/WriteOutPaVe\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/WriteOutPaVe"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
WriteOutPaVe.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$165395],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/WriteOutPaVe", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$286591],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/WriteOutPaVe", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ WriteOutPaVe.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["WriteOutPaVe", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["WriteOutPaVe", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -126,9 +161,7 @@ Cell[TextData[{
ButtonNote->"OneLoopSum"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"WriteOutPaVe",
- CellID->806653014]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -145,10 +178,10 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 51.741736}",
+ "built" -> "{2020, 1, 5, 19, 4, 2.547367}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -157,11 +190,11 @@ TaggingRules->{
"WriteOutPaVe is an option for PaVeReduce and OneLoopSum. If set to a \
string, the results of all Passarino-Veltman PaVe's are stored in files with \
names generated from this string and the arguments of PaVe.",
- "synonyms" -> {}, "title" -> "WriteOutPaVe", "titlemodifier" -> "",
- "windowtitle" -> "WriteOutPaVe", "type" -> "Symbol", "uri" ->
- "FeynCalc/ref/WriteOutPaVe"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "WriteOutPaVe",
+ "titlemodifier" -> "", "windowtitle" -> "WriteOutPaVe", "type" ->
+ "Symbol", "uri" -> "FeynCalc/ref/WriteOutPaVe"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -170,41 +203,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "WriteOutPaVe"->{
- Cell[3716, 109, 549, 21, 70, "Text",
- CellTags->"WriteOutPaVe",
- CellID->806653014]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"WriteOutPaVe", 6223, 180}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[584, 21, 2262, 52, 70, "AnchorBarGrid",
+Cell[584, 21, 3199, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2849, 75, 55, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2907, 78, 511, 13, 70, "Usage",
+Cell[3786, 100, 289, 11, 70, "ObjectNameGrid"],
+Cell[4078, 113, 511, 13, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3443, 95, 270, 12, 70, "SeeAlsoSection",
+Cell[4614, 130, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3716, 109, 549, 21, 70, "Text",
- CellTags->"WriteOutPaVe",
- CellID->806653014]
+Cell[4887, 144, 505, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4280, 133, 23, 0, 70, "FooterCell"]
+Cell[5407, 166, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/XYT.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/XYT.nb
index b8a633ff0..38f1a1fd3 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/XYT.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/XYT.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 5281, 151]
-NotebookOptionsPosition[ 3454, 101]
-NotebookOutlinePosition[ 5203, 147]
-CellTagsIndexPosition[ 5160, 144]
+NotebookDataLength[ 5518, 162]
+NotebookOptionsPosition[ 3716, 112]
+NotebookOutlinePosition[ 5454, 159]
+CellTagsIndexPosition[ 5411, 156]
WindowTitle->XYT
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ Cell[BoxData[GridBox[{
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$165746],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$287040],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"], "FeynCalc/ref/XYT",
".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -73,8 +74,18 @@ Cell[BoxData[GridBox[{
"RowsIndexed" -> {}}},
CellID->1],
-Cell["XYT", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["XYT", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -111,19 +122,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 53.051387}",
+ "built" -> "{2020, 1, 5, 19, 4, 3.645517}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" -> "XYT[exp, x, y] transforms (x y) m away ...",
- "synonyms" -> {}, "title" -> "XYT", "titlemodifier" -> "", "windowtitle" ->
- "XYT", "type" -> "Symbol", "uri" -> "FeynCalc/ref/XYT"}},
+ "synonyms" -> {}, "tabletags" -> {}, "title" -> "XYT", "titlemodifier" ->
+ "", "windowtitle" -> "XYT", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/XYT"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -132,7 +144,7 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -146,13 +158,12 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[575, 21, 2238, 52, 70, "AnchorBarGrid",
+Cell[575, 21, 2266, 53, 70, "AnchorBarGrid",
CellID->1],
-Cell[2816, 75, 46, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2865, 78, 559, 19, 70, "Usage",
+Cell[2844, 76, 280, 11, 70, "ObjectNameGrid"],
+Cell[3127, 89, 559, 19, 70, "Usage",
CellID->982511436],
-Cell[3427, 99, 23, 0, 70, "FooterCell"]
+Cell[3689, 110, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ZeroMomentumInsertion.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ZeroMomentumInsertion.nb
index ddcdff818..28d8c27bd 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/ZeroMomentumInsertion.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/ZeroMomentumInsertion.nb
@@ -3,69 +3,94 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 6641, 199]
-NotebookOptionsPosition[ 4319, 133]
-NotebookOutlinePosition[ 6367, 188]
-CellTagsIndexPosition[ 6284, 183]
+NotebookDataLength[ 7551, 223]
+NotebookOptionsPosition[ 5475, 166]
+NotebookOutlinePosition[ 7342, 215]
+CellTagsIndexPosition[ 7299, 212]
WindowTitle->ZeroMomentumInsertion
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/ZeroMomentumInsertion\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/ZeroMomentumInsertion"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynRule\"\>":>Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/FeynRule"], "\<\"Twist2GluonOperator\"\>":>
+ Documentation`HelpLookup[
+ "paclet:FeynCalc/ref/Twist2GluonOperator"], "\<\"Twist2QuarkOperator\"\
+\>":>Documentation`HelpLookup["paclet:FeynCalc/ref/Twist2QuarkOperator"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/ZeroMomentumInsertion\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/ZeroMomentumInsertion"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/\
ZeroMomentumInsertion.html"], StandardForm]], "Input", TextClipboardType ->
- "PlainText"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$166091],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"],
- "FeynCalc/ref/ZeroMomentumInsertion", ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ "PlainText"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$287479],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"],
+ "FeynCalc/ref/ZeroMomentumInsertion", ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,8 +98,18 @@ ZeroMomentumInsertion.html"], StandardForm]], "Input", TextClipboardType ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["ZeroMomentumInsertion", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["ZeroMomentumInsertion", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
@@ -124,9 +159,7 @@ Cell[TextData[{
ButtonNote->"Twist2QuarkOperator"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"ZeroMomentumInsertion",
- CellID->237936766]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -143,21 +176,22 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 54.477094}",
+ "built" -> "{2020, 1, 5, 19, 4, 4.479317}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
"None", "summary" ->
"ZeroMomentumInsertion is an option of FeynRule, Twist2GluonOperator and \
-Twist2QuarkOperator.", "synonyms" -> {}, "title" -> "ZeroMomentumInsertion",
- "titlemodifier" -> "", "windowtitle" -> "ZeroMomentumInsertion", "type" ->
- "Symbol", "uri" -> "FeynCalc/ref/ZeroMomentumInsertion"}},
+Twist2QuarkOperator.", "synonyms" -> {}, "tabletags" -> {}, "title" ->
+ "ZeroMomentumInsertion", "titlemodifier" -> "", "windowtitle" ->
+ "ZeroMomentumInsertion", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/ZeroMomentumInsertion"}},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -166,41 +200,31 @@ StyleDefinitions->Notebook[{
StyleData["Input"], CellContext -> "Global`"],
Cell[
StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
-CellTagsIndex->{
- "ZeroMomentumInsertion"->{
- Cell[3653, 107, 624, 21, 70, "Text",
- CellTags->"ZeroMomentumInsertion",
- CellID->237936766]}
- }
+CellTagsIndex->{}
*)
(*CellTagsIndex
-CellTagsIndex->{
- {"ZeroMomentumInsertion", 6160, 176}
- }
+CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[593, 21, 2298, 52, 70, "AnchorBarGrid",
+Cell[593, 21, 3273, 77, 70, "AnchorBarGrid",
CellID->1],
-Cell[2894, 75, 64, 1, 70, "ObjectName",
- CellID->1224892054],
-Cell[2961, 78, 394, 11, 70, "Usage",
+Cell[3869, 100, 298, 11, 70, "ObjectNameGrid"],
+Cell[4170, 113, 394, 11, 70, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3380, 93, 270, 12, 70, "SeeAlsoSection",
+Cell[4589, 128, 270, 12, 70, "SeeAlsoSection",
CellID->1255426704],
-Cell[3653, 107, 624, 21, 70, "Text",
- CellTags->"ZeroMomentumInsertion",
- CellID->237936766]
+Cell[4862, 142, 571, 19, 70, "SeeAlso"]
}, Open ]],
-Cell[4292, 131, 23, 0, 70, "FooterCell"]
+Cell[5448, 164, 23, 0, 70, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta10.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta10.nb
new file mode 100644
index 000000000..774c738e3
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta10.nb
@@ -0,0 +1,305 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8602, 295]
+NotebookOptionsPosition[ 5672, 204]
+NotebookOutlinePosition[ 7686, 259]
+CellTagsIndexPosition[ 7602, 254]
+WindowTitle->Zeta10
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Zeta10\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Zeta10"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Zeta10.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$287922],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Zeta10",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["Zeta10", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"Zeta10", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes Zeta[10]"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->554421080],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1425189277],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["Zeta10"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->200433303],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "10", ")"}], TraditionalForm]], "Output",
+ ImageSize->{40, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1818507146]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"N", "[",
+ RowBox[{"Zeta", "[", "10", "]"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1700915442],
+
+Cell[BoxData[
+ FormBox["1.000994575127818`", TraditionalForm]], "Output",
+ ImageSize->{50, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1418962907]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SimplifyPolyLog", "[",
+ RowBox[{"Pi", "^", "10"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1737149642],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"93555", " ",
+ RowBox[{"\[Zeta]", "(", "10", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{81, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1066570387]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Conjugate", "[", "Zeta10", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->598568302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "10", ")"}], TraditionalForm]], "Output",
+ ImageSize->{40, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1293514538]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"Zeta10",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 5.401423}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "Zeta10[] denotes Zeta[10]", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Zeta10", "titlemodifier" -> "",
+ "windowtitle" -> "Zeta10", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Zeta10"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3500, 104, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->554421080]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7459, 247}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[578, 21, 2265, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2846, 76, 283, 11, 45, "ObjectNameGrid"],
+Cell[3132, 89, 343, 11, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3500, 104, 387, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->554421080],
+Cell[CellGroupData[{
+Cell[3912, 123, 196, 6, 26, "ExampleSection",
+ CellID->1425189277],
+Cell[CellGroupData[{
+Cell[4133, 133, 75, 2, 27, "Input",
+ CellID->200433303],
+Cell[4211, 137, 222, 7, 37, "Output",
+ CellID->1818507146]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4470, 149, 130, 4, 27, "Input",
+ CellID->1700915442],
+Cell[4603, 155, 204, 6, 35, "Output",
+ CellID->1418962907]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4844, 166, 137, 4, 27, "Input",
+ CellID->1737149642],
+Cell[4984, 172, 250, 8, 37, "Output",
+ CellID->1066570387]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5271, 185, 110, 3, 27, "Input",
+ CellID->598568302],
+Cell[5384, 190, 222, 7, 37, "Output",
+ CellID->1293514538]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5645, 202, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta2.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta2.nb
index c1fc35d67..7f76c2bd2 100644
--- a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta2.nb
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta2.nb
@@ -3,69 +3,91 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 9499, 335]
-NotebookOptionsPosition[ 5736, 212]
-NotebookOutlinePosition[ 8371, 290]
-CellTagsIndexPosition[ 8264, 284]
+NotebookDataLength[ 10709, 376]
+NotebookOptionsPosition[ 6972, 255]
+NotebookOutlinePosition[ 9524, 330]
+CellTagsIndexPosition[ 9417, 324]
WindowTitle->Zeta2
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
- {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
- ActionMenuBox[
- FrameBox[
- InterpretationBox[Cell[TextData[{
- "URL",
- StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
- StripOnInput->False]
- }]],
- TextCell[
- Row[{"URL",
- Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
- StripOnInput->False], {"\<\"FeynCalc/ref/Zeta2\"\>":>
- None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell["FeynCalc/ref/Zeta2"]}, Visible -> False]];
- SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$]; Null],
- Delimiter, "\<\"Copy web URL\"\>":>
- Module[{DocumentationSearch`Private`nb$},
- DocumentationSearch`Private`nb$ = NotebookPut[
- Notebook[{
- Cell[
- BoxData[
- MakeBoxes[
- Hyperlink[
- "http://reference.wolfram.com/language/FeynCalc/ref/Zeta2.\
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[{
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "See Also",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"See Also",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"SimplifyPolyLog\"\>":>
+ Documentation`HelpLookup["paclet:FeynCalc/ref/SimplifyPolyLog"]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"SeeAlso"]],
+ LineSpacing->{1.4, 0}],
+ "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
+\[ThickSpace]",
+ Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Zeta2\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Zeta2"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Zeta2.\
html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
- False]]; SelectionMove[
- DocumentationSearch`Private`nb$, All, Notebook];
- FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
- NotebookClose[DocumentationSearch`Private`nb$];
- Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
- NotebookLocate[{
- URL[
- StringJoin[
- If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$166437],
- "http://reference.wolfram.com/system-modeler/",
- "http://reference.wolfram.com/language/"], "FeynCalc/ref/Zeta2",
- ".html"]], None}]}]},
- Appearance->None,
- MenuAppearance->Automatic]],
- LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$288353],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Zeta2",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]
+ }], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
Scaled[0.65], {
@@ -73,14 +95,23 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
"RowsIndexed" -> {}}},
CellID->1],
-Cell["Zeta2", "ObjectName",
- CellID->1224892054],
+Cell[TextData[{
+ Cell["Zeta2", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
Cell[BoxData[GridBox[{
{"", Cell[TextData[{
Cell[BoxData["Zeta2"], "InlineFormula"],
- " \[LineSeparator]",
- "denotes Zeta[2]. N[Zeta[2]] evaluates to N[Zeta[2]]."
+ " \[LineSeparator]denotes Zeta[2]."
}]]}
}]], "Usage",
GridBoxOptions->{
@@ -106,7 +137,7 @@ Cell[TextData[{
}], "PrimaryExamplesSection",
WholeCellGroupOpener->True,
CellTags->"PrimaryExamplesSection",
- CellID->795404074],
+ CellID->832889734],
Cell[CellGroupData[{
@@ -116,7 +147,7 @@ Cell[TextData[{
Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
WholeCellGroupOpener->True,
- CellID->1631755319],
+ CellID->829028169],
Cell[CellGroupData[{
@@ -128,7 +159,7 @@ Cell[BoxData["Zeta2"], "Input",
Cell[BoxData[
FormBox[
RowBox[{"\[Zeta]", "(", "2", ")"}], TraditionalForm]], "Output",
- ImageSize->{35, 15},
+ ImageSize->{34, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Zeta2",
@@ -146,7 +177,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["1.6449340668482262`", TraditionalForm]], "Output",
- ImageSize->{50, 15},
+ ImageSize->{49, 14},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Zeta2",
@@ -167,12 +198,27 @@ Cell[BoxData[
FormBox[
RowBox[{"6", " ",
RowBox[{"\[Zeta]", "(", "2", ")"}]}], TraditionalForm]], "Output",
- ImageSize->{45, 15},
+ ImageSize->{46, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellTags->"Zeta2",
CellLabel->"Out[3]=",
CellID->494970297]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Conjugate", "[", "Zeta2", "]"}]], "Input",
+ CellLabel->"In[4]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "2", ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]="]
}, Open ]]
}, Open ]],
@@ -196,16 +242,13 @@ Cell[TextData[{
CellID->1255426704],
Cell[TextData[{
- "See also: ",
StyleBox[ButtonBox["SimplifyPolyLog",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/SimplifyPolyLog",
ButtonNote->"SimplifyPolyLog"],
FontFamily->"Verdana"],
"."
-}], "Text",
- CellTags->"Zeta2",
- CellID->798811969]
+}], "SeeAlso"]
}, Open ]],
Cell[" ", "FooterCell"]
@@ -222,21 +265,20 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "HasOptions" -> False, "ExampleCounter" -> 1,
- "ExamplePageLinks" -> {}, "NeedPlatMsgIn" -> None, "RootCaptions" -> "",
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
"Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 26, 55.920962}",
+ "built" -> "{2020, 1, 5, 19, 4, 6.489791}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
"Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
- "None", "summary" ->
- "Zeta2 denotes Zeta[2]. N[Zeta[2]] evaluates to N[Zeta[2]].",
- "synonyms" -> {}, "title" -> "Zeta2", "titlemodifier" -> "",
+ "None", "summary" -> "Zeta2 denotes Zeta[2].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Zeta2", "titlemodifier" -> "",
"windowtitle" -> "Zeta2", "type" -> "Symbol", "uri" ->
"FeynCalc/ref/Zeta2"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -244,8 +286,9 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["Input"], CellContext -> "Global`"],
Cell[
- StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{428, Automatic}, {Automatic, 29}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -254,89 +297,87 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"PrimaryExamplesSection"->{
- Cell[3249, 93, 387, 15, 31, "PrimaryExamplesSection",
+ Cell[4209, 124, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->795404074]},
+ CellID->832889734]},
"Zeta2"->{
- Cell[3882, 122, 95, 3, 27, "Input",
+ Cell[4841, 153, 95, 3, 27, "Input",
CellTags->"Zeta2",
CellID->1322156795],
- Cell[3980, 127, 241, 8, 36, "Output",
+ Cell[4939, 158, 241, 8, 37, "Output",
CellTags->"Zeta2",
CellID->1170410673],
- Cell[4258, 140, 122, 4, 27, "Input",
+ Cell[5217, 171, 122, 4, 27, "Input",
CellTags->"Zeta2",
CellID->1445114635],
- Cell[4383, 146, 224, 7, 36, "Output",
+ Cell[5342, 177, 224, 7, 35, "Output",
CellTags->"Zeta2",
CellID->829124917],
- Cell[4644, 158, 155, 5, 27, "Input",
+ Cell[5603, 189, 155, 5, 27, "Input",
CellTags->"Zeta2",
CellID->312992098],
- Cell[4802, 165, 264, 9, 36, "Output",
- CellTags->"Zeta2",
- CellID->494970297],
- Cell[5434, 197, 260, 10, 32, "Text",
+ Cell[5761, 196, 264, 9, 37, "Output",
CellTags->"Zeta2",
- CellID->798811969]}
+ CellID->494970297]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
- {"PrimaryExamplesSection", 7516, 255},
- {"Zeta2", 7647, 259}
+ {"PrimaryExamplesSection", 8752, 298},
+ {"Zeta2", 8884, 302}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[577, 21, 2233, 52, 51, "AnchorBarGrid",
+Cell[577, 21, 3004, 74, 53, "AnchorBarGrid",
CellID->1],
-Cell[2813, 75, 48, 1, 42, "ObjectName",
- CellID->1224892054],
-Cell[2864, 78, 360, 11, 83, "Usage",
+Cell[3584, 97, 282, 11, 45, "ObjectNameGrid"],
+Cell[3869, 110, 315, 10, 84, "Usage",
CellID->982511436],
Cell[CellGroupData[{
-Cell[3249, 93, 387, 15, 31, "PrimaryExamplesSection",
+Cell[4209, 124, 387, 15, 31, "PrimaryExamplesSection",
CellTags->"PrimaryExamplesSection",
- CellID->795404074],
+ CellID->832889734],
Cell[CellGroupData[{
-Cell[3661, 112, 196, 6, 25, "ExampleSection",
- CellID->1631755319],
+Cell[4621, 143, 195, 6, 26, "ExampleSection",
+ CellID->829028169],
Cell[CellGroupData[{
-Cell[3882, 122, 95, 3, 27, "Input",
+Cell[4841, 153, 95, 3, 27, "Input",
CellTags->"Zeta2",
CellID->1322156795],
-Cell[3980, 127, 241, 8, 36, "Output",
+Cell[4939, 158, 241, 8, 37, "Output",
CellTags->"Zeta2",
CellID->1170410673]
}, Open ]],
Cell[CellGroupData[{
-Cell[4258, 140, 122, 4, 27, "Input",
+Cell[5217, 171, 122, 4, 27, "Input",
CellTags->"Zeta2",
CellID->1445114635],
-Cell[4383, 146, 224, 7, 36, "Output",
+Cell[5342, 177, 224, 7, 35, "Output",
CellTags->"Zeta2",
CellID->829124917]
}, Open ]],
Cell[CellGroupData[{
-Cell[4644, 158, 155, 5, 27, "Input",
+Cell[5603, 189, 155, 5, 27, "Input",
CellTags->"Zeta2",
CellID->312992098],
-Cell[4802, 165, 264, 9, 36, "Output",
+Cell[5761, 196, 264, 9, 37, "Output",
CellTags->"Zeta2",
CellID->494970297]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[6062, 210, 89, 2, 27, "Input"],
+Cell[6154, 214, 200, 6, 37, "Output"]
}, Open ]]
}, Open ]],
-Cell[5093, 178, 31, 0, 29, "SectionFooterSpacer"]
+Cell[6381, 224, 31, 0, 29, "SectionFooterSpacer"]
}, Open ]],
Cell[CellGroupData[{
-Cell[5161, 183, 270, 12, 31, "SeeAlsoSection",
+Cell[6449, 229, 270, 12, 31, "SeeAlsoSection",
CellID->1255426704],
-Cell[5434, 197, 260, 10, 32, "Text",
- CellTags->"Zeta2",
- CellID->798811969]
+Cell[6722, 243, 208, 7, 56, "SeeAlso"]
}, Open ]],
-Cell[5709, 210, 23, 0, 42, "FooterCell"]
+Cell[6945, 253, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta4.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta4.nb
new file mode 100644
index 000000000..f323c3471
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta4.nb
@@ -0,0 +1,302 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8469, 292]
+NotebookOptionsPosition[ 5602, 202]
+NotebookOutlinePosition[ 7553, 256]
+CellTagsIndexPosition[ 7469, 251]
+WindowTitle->Zeta4
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Zeta4\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Zeta4"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Zeta4.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$288788],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Zeta4",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["Zeta4", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData["Zeta4"], "InlineFormula"],
+ " \[LineSeparator]denotes Zeta[4]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1961085994],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->396976497],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["Zeta4"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->2145953237],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "4", ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->295183914]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"N", "[", "Zeta4", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1074821223],
+
+Cell[BoxData[
+ FormBox["1.0823232337111381`", TraditionalForm]], "Output",
+ ImageSize->{50, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1685714215]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SimplifyPolyLog", "[",
+ RowBox[{"Pi", "^", "4"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->654832119],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"90", " ",
+ RowBox[{"\[Zeta]", "(", "4", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{53, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->1077677758]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Conjugate", "[", "Zeta4", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1145501275],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "4", ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->1493857494]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{808, 911},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"Zeta4",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 7.597953}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "Zeta4 denotes Zeta[4].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Zeta4", "titlemodifier" -> "",
+ "windowtitle" -> "Zeta4", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Zeta4"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3466, 103, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1961085994]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7325, 244}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2261, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2841, 76, 282, 11, 45, "ObjectNameGrid"],
+Cell[3126, 89, 315, 10, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3466, 103, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1961085994],
+Cell[CellGroupData[{
+Cell[3879, 122, 195, 6, 26, "ExampleSection",
+ CellID->396976497],
+Cell[CellGroupData[{
+Cell[4099, 132, 75, 2, 27, "Input",
+ CellID->2145953237],
+Cell[4177, 136, 220, 7, 37, "Output",
+ CellID->295183914]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4434, 148, 102, 3, 27, "Input",
+ CellID->1074821223],
+Cell[4539, 153, 205, 6, 35, "Output",
+ CellID->1685714215]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4781, 164, 135, 4, 27, "Input",
+ CellID->654832119],
+Cell[4919, 170, 246, 8, 37, "Output",
+ CellID->1077677758]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5202, 183, 110, 3, 27, "Input",
+ CellID->1145501275],
+Cell[5315, 188, 221, 7, 37, "Output",
+ CellID->1493857494]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5575, 200, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta6.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta6.nb
new file mode 100644
index 000000000..11f68731f
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta6.nb
@@ -0,0 +1,304 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8548, 294]
+NotebookOptionsPosition[ 5626, 203]
+NotebookOutlinePosition[ 7635, 258]
+CellTagsIndexPosition[ 7551, 253]
+WindowTitle->Zeta6
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Zeta6\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Zeta6"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Zeta6.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$289218],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Zeta6",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["Zeta6", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"Zeta6", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes Zeta[6]"
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->1939507788],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->998988119],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["Zeta6"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1856484468],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "6", ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->1728558046]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"N", "[", "Zeta6", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->1282246417],
+
+Cell[BoxData[
+ FormBox["1.0173430619844488`", TraditionalForm]], "Output",
+ ImageSize->{50, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->435632762]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SimplifyPolyLog", "[",
+ RowBox[{"Pi", "^", "6"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->206823002],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"945", " ",
+ RowBox[{"\[Zeta]", "(", "6", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{59, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->10434320]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Conjugate", "[", "Zeta6", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1474562519],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "6", ")"}], TraditionalForm]], "Output",
+ ImageSize->{34, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->169368657]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{268, Automatic}, {Automatic, 20}},
+WindowTitle->"Zeta6",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 8.764818}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "Zeta6[] denotes Zeta[6]", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Zeta6", "titlemodifier" -> "",
+ "windowtitle" -> "Zeta6", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Zeta6"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3492, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1939507788]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7407, 246}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2261, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2841, 76, 282, 11, 45, "ObjectNameGrid"],
+Cell[3126, 89, 341, 11, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3492, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->1939507788],
+Cell[CellGroupData[{
+Cell[3905, 123, 195, 6, 26, "ExampleSection",
+ CellID->998988119],
+Cell[CellGroupData[{
+Cell[4125, 133, 75, 2, 27, "Input",
+ CellID->1856484468],
+Cell[4203, 137, 221, 7, 37, "Output",
+ CellID->1728558046]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4461, 149, 102, 3, 27, "Input",
+ CellID->1282246417],
+Cell[4566, 154, 204, 6, 35, "Output",
+ CellID->435632762]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4807, 165, 135, 4, 27, "Input",
+ CellID->206823002],
+Cell[4945, 171, 245, 8, 37, "Output",
+ CellID->10434320]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5227, 184, 110, 3, 27, "Input",
+ CellID->1474562519],
+Cell[5340, 189, 220, 7, 37, "Output",
+ CellID->169368657]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5599, 201, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta8.nb b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta8.nb
new file mode 100644
index 000000000..9f4572d81
--- /dev/null
+++ b/FeynCalc/DocOutput/English/ReferencePages/Symbols/Zeta8.nb
@@ -0,0 +1,304 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 8553, 294]
+NotebookOptionsPosition[ 5629, 203]
+NotebookOutlinePosition[ 7639, 258]
+CellTagsIndexPosition[ 7555, 253]
+WindowTitle->Zeta8
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[GridBox[{
+ {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
+ ActionMenuBox[
+ FrameBox[
+ InterpretationBox[Cell[TextData[{
+ "URL",
+ StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
+ StripOnInput->False]
+ }]],
+ TextCell[
+ Row[{"URL",
+ Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
+ StripOnInput->False], {"\<\"FeynCalc/ref/Zeta8\"\>":>
+ None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell["FeynCalc/ref/Zeta8"]}, Visible -> False]];
+ SelectionMove[DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$]; Null],
+ Delimiter, "\<\"Copy web URL\"\>":>
+ Module[{DocumentationSearch`Private`nb$},
+ DocumentationSearch`Private`nb$ = NotebookPut[
+ Notebook[{
+ Cell[
+ BoxData[
+ MakeBoxes[
+ Hyperlink[
+ "http://reference.wolfram.com/language/FeynCalc/ref/Zeta8.\
+html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
+ False]]; SelectionMove[
+ DocumentationSearch`Private`nb$, All, Notebook];
+ FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"];
+ NotebookClose[DocumentationSearch`Private`nb$];
+ Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
+ NotebookLocate[{
+ URL[
+ StringJoin[
+ If[
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$289648],
+ "http://reference.wolfram.com/system-modeler/",
+ "http://reference.wolfram.com/language/"], "FeynCalc/ref/Zeta8",
+ ".html"]], None}]}]},
+ Appearance->None,
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
+ LineSpacing->{1.4, 0}]], "AnchorBar"]}
+ }]], "AnchorBarGrid",
+ GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
+ Scaled[0.65], {
+ Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
+ "RowsIndexed" -> {}}},
+ CellID->1],
+
+Cell[TextData[{
+ Cell["Zeta8", "ObjectName"],
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{8, 0}],
+ CacheGraphics->False],
+ Spacer[8]]]],
+ Cell[BoxData[""], "ObjectNameTranslation"]
+}], "ObjectNameGrid"],
+
+Cell[BoxData[GridBox[{
+ {"", Cell[TextData[{
+ Cell[BoxData[
+ RowBox[{"Zeta8", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes Zeta[8]."
+ }]]}
+ }]], "Usage",
+ GridBoxOptions->{
+ GridBoxBackground->{
+ "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}},
+ "RowsIndexed" -> {}}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ Cell[BoxData[
+ InterpretationBox[
+ StyleBox[
+ GraphicsBox[{},
+ BaselinePosition->Baseline,
+ ImageSize->{6, 0}],
+ CacheGraphics->False],
+ Spacer[6]]]],
+ "Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "PrimaryExamplesSection",
+ WholeCellGroupOpener->True,
+ CellTags->"PrimaryExamplesSection",
+ CellID->2052156981],
+
+Cell[CellGroupData[{
+
+Cell[TextData[{
+ "Basic Examples",
+ "\[NonBreakingSpace]\[NonBreakingSpace]",
+ Cell["(1)", "ExampleCount"]
+}], "ExampleSection", "ExampleSection",
+ WholeCellGroupOpener->True,
+ CellID->1492914518],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["Zeta8"], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1703408912],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "8", ")"}], TraditionalForm]], "Output",
+ ImageSize->{33, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[1]=",
+ CellID->834197268]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"N", "[", "Zeta8", "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->338259293],
+
+Cell[BoxData[
+ FormBox["1.0040773561979441`", TraditionalForm]], "Output",
+ ImageSize->{49, 14},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[2]=",
+ CellID->1014223200]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SimplifyPolyLog", "[",
+ RowBox[{"Pi", "^", "8"}], "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->576611201],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"9450", " ",
+ RowBox[{"\[Zeta]", "(", "8", ")"}]}], TraditionalForm]], "Output",
+ ImageSize->{66, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[3]=",
+ CellID->310609169]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Conjugate", "[", "Zeta8", "]"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->1121680981],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Zeta]", "(", "8", ")"}], TraditionalForm]], "Output",
+ ImageSize->{33, 16},
+ ImageMargins->{{0, 0}, {0, 0}},
+ ImageRegion->{{0, 1}, {0, 1}},
+ CellLabel->"Out[4]=",
+ CellID->120897136]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[" ", "FooterCell"]
+},
+Saveable->False,
+ScreenStyleEnvironment->"Working",
+WindowSize->{725, 750},
+WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowTitle->"Zeta8",
+TaggingRules->{
+ "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" ->
+ GridBox[{{
+ RowBox[{
+ ButtonBox[
+ "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
+ BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
+ Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" ->
+ None, "RootCaptions" -> "",
+ "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 9.877153}",
+ "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`",
+ "keywords" -> {}, "specialkeywords" -> {},
+ "tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
+ "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" ->
+ "None", "summary" -> "Zeta8[] denotes Zeta[8].", "synonyms" -> {},
+ "tabletags" -> {}, "title" -> "Zeta8", "titlemodifier" -> "",
+ "windowtitle" -> "Zeta8", "type" -> "Symbol", "uri" ->
+ "FeynCalc/ref/Zeta8"}, "SearchTextTranslated" -> ""},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->Notebook[{
+ Cell[
+ StyleData[
+ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]],
+ Cell[
+ StyleData["Input"], CellContext -> "Global`"],
+ Cell[
+ StyleData["Output"], CellContext -> "Global`"]},
+ WindowMargins -> {{418, Automatic}, {Automatic, -8}}, Visible -> False,
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
+ StyleDefinitions -> "Default.nb"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "PrimaryExamplesSection"->{
+ Cell[3493, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2052156981]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"PrimaryExamplesSection", 7411, 246}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[577, 21, 2261, 53, 53, "AnchorBarGrid",
+ CellID->1],
+Cell[2841, 76, 282, 11, 45, "ObjectNameGrid"],
+Cell[3126, 89, 342, 11, 84, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3493, 104, 388, 15, 31, "PrimaryExamplesSection",
+ CellTags->"PrimaryExamplesSection",
+ CellID->2052156981],
+Cell[CellGroupData[{
+Cell[3906, 123, 196, 6, 26, "ExampleSection",
+ CellID->1492914518],
+Cell[CellGroupData[{
+Cell[4127, 133, 75, 2, 27, "Input",
+ CellID->1703408912],
+Cell[4205, 137, 220, 7, 37, "Output",
+ CellID->834197268]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4462, 149, 101, 3, 27, "Input",
+ CellID->338259293],
+Cell[4566, 154, 205, 6, 35, "Output",
+ CellID->1014223200]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4808, 165, 135, 4, 27, "Input",
+ CellID->576611201],
+Cell[4946, 171, 247, 8, 37, "Output",
+ CellID->310609169]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5230, 184, 110, 3, 27, "Input",
+ CellID->1121680981],
+Cell[5343, 189, 220, 7, 37, "Output",
+ CellID->120897136]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+Cell[5602, 201, 23, 0, 41, "FooterCell"]
+}
+]
+*)
+
+(* End of internal cache information *)
+
diff --git a/FeynCalc/DocOutput/English/SpellIndex/_j.cfs b/FeynCalc/DocOutput/English/SpellIndex/_j.cfs
deleted file mode 100644
index b55719958..000000000
Binary files a/FeynCalc/DocOutput/English/SpellIndex/_j.cfs and /dev/null differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/_k.cfs b/FeynCalc/DocOutput/English/SpellIndex/_k.cfs
deleted file mode 100644
index d31654c53..000000000
Binary files a/FeynCalc/DocOutput/English/SpellIndex/_k.cfs and /dev/null differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/_l.cfs b/FeynCalc/DocOutput/English/SpellIndex/_l.cfs
deleted file mode 100644
index f7d41f897..000000000
Binary files a/FeynCalc/DocOutput/English/SpellIndex/_l.cfs and /dev/null differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/_q.cfs b/FeynCalc/DocOutput/English/SpellIndex/_q.cfs
new file mode 100644
index 000000000..376995fec
Binary files /dev/null and b/FeynCalc/DocOutput/English/SpellIndex/_q.cfs differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/_r.cfs b/FeynCalc/DocOutput/English/SpellIndex/_r.cfs
new file mode 100644
index 000000000..6ecf89551
Binary files /dev/null and b/FeynCalc/DocOutput/English/SpellIndex/_r.cfs differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/segments.gen b/FeynCalc/DocOutput/English/SpellIndex/segments.gen
index 9e548425b..be7035f3b 100644
Binary files a/FeynCalc/DocOutput/English/SpellIndex/segments.gen and b/FeynCalc/DocOutput/English/SpellIndex/segments.gen differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/segments_15 b/FeynCalc/DocOutput/English/SpellIndex/segments_15
deleted file mode 100644
index cebafba5a..000000000
Binary files a/FeynCalc/DocOutput/English/SpellIndex/segments_15 and /dev/null differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/segments_17 b/FeynCalc/DocOutput/English/SpellIndex/segments_17
deleted file mode 100644
index b5a0796ec..000000000
Binary files a/FeynCalc/DocOutput/English/SpellIndex/segments_17 and /dev/null differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/segments_19 b/FeynCalc/DocOutput/English/SpellIndex/segments_19
deleted file mode 100644
index 78acf4247..000000000
Binary files a/FeynCalc/DocOutput/English/SpellIndex/segments_19 and /dev/null differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/segments_1j b/FeynCalc/DocOutput/English/SpellIndex/segments_1j
new file mode 100644
index 000000000..1e34a0ace
Binary files /dev/null and b/FeynCalc/DocOutput/English/SpellIndex/segments_1j differ
diff --git a/FeynCalc/DocOutput/English/SpellIndex/segments_1l b/FeynCalc/DocOutput/English/SpellIndex/segments_1l
new file mode 100644
index 000000000..20a1d3d13
Binary files /dev/null and b/FeynCalc/DocOutput/English/SpellIndex/segments_1l differ
diff --git a/FeynCalc/DocOutput/English/Tutorials/Intro.nb b/FeynCalc/DocOutput/English/Tutorials/Intro.nb
index b6bf10b47..64937a3d1 100644
--- a/FeynCalc/DocOutput/English/Tutorials/Intro.nb
+++ b/FeynCalc/DocOutput/English/Tutorials/Intro.nb
@@ -3,17 +3,17 @@
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
-(* CreatedBy='Mathematica 10.3' *)
+(* CreatedBy='Mathematica 10.4' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 42465, 1241]
-NotebookOptionsPosition[ 32796, 930]
-NotebookOutlinePosition[ 38226, 1084]
-CellTagsIndexPosition[ 37928, 1071]
+NotebookDataLength[ 41730, 1213]
+NotebookOptionsPosition[ 32206, 908]
+NotebookOutlinePosition[ 37579, 1059]
+CellTagsIndexPosition[ 37285, 1046]
WindowTitle->Short introduction
WindowFrame->Normal*)
@@ -59,12 +59,13 @@ html"], StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible ->
URL[
StringJoin[
If[
- TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$173992],
+ TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$298881],
"http://reference.wolfram.com/system-modeler/",
"http://reference.wolfram.com/language/"],
"FeynCalc/tutorial/Intro", ".html"]], None}]}]},
Appearance->None,
- MenuAppearance->Automatic]],
+ MenuAppearance->Automatic,
+ MenuStyle->"URLMenu"]],
LineSpacing->{1.4, 0}]], "AnchorBar"]}
}]], "AnchorBarGrid",
GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
@@ -84,118 +85,124 @@ Cell[BoxData[GridBox[{
Cell["Starting FeynCalc"],"paclet:FeynCalc/tutorial/Intro#1726202394",
GraphicsBox[
TagBox[
- RasterBox[{{{128, 128, 128, 32}, {128, 128, 128, 16}, {128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128,
- 128, 128, 0}, {128, 128, 128, 48}}, {{128, 128, 128, 48}, {128, 128,
- 128, 239}, {128, 128, 128, 112}, {128, 128, 128, 0}, {128, 128, 128,
- 0}, {128, 128, 128, 16}, {128, 128, 128, 143}, {128, 128, 128,
- 239}}, {{128, 128, 128, 0}, {128, 128, 128, 64}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 112}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 32}}, {{128, 128, 128,
- 32}, {128, 128, 128, 16}, {128, 128, 128, 16}, {128, 128, 128,
- 175}, {128, 128, 128, 255}, {128, 128, 128, 127}, {128, 128, 128,
- 0}, {128, 128, 128, 48}}, {{128, 128, 128, 48}, {128, 128, 128,
- 239}, {128, 128, 128, 112}, {128, 128, 128, 0}, {128, 128, 128,
- 16}, {128, 128, 128, 16}, {128, 128, 128, 143}, {128, 128, 128,
- 239}}, {{128, 128, 128, 0}, {128, 128, 128, 64}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 112}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 32}}, {{128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128, 128, 175}, {
- 128, 128, 128, 255}, {128, 128, 128, 127}, {128, 128, 128, 0}, {128,
- 128, 128, 0}}, {{128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128,
- 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 0}}}, {{0, 8}, {8, 0}}, {0,
- 255}, ColorFunction -> RGBColor],
+ RasterBox[
+ RawArray["UnsignedInteger8",{{{128, 128, 128, 32}, {128, 128, 128,
+ 16}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {
+ 128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 48}}, {{128,
+ 128, 128, 48}, {128, 128, 128, 239}, {128, 128, 128, 112}, {128,
+ 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128,
+ 128, 143}, {128, 128, 128, 239}}, {{128, 128, 128, 0}, {128, 128,
+ 128, 64}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128,
+ 128, 112}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128,
+ 128, 32}}, {{128, 128, 128, 32}, {128, 128, 128, 16}, {128, 128,
+ 128, 16}, {128, 128, 128, 175}, {128, 128, 128, 255}, {128, 128,
+ 128, 127}, {128, 128, 128, 0}, {128, 128, 128, 48}}, {{128, 128,
+ 128, 48}, {128, 128, 128, 239}, {128, 128, 128, 112}, {128, 128,
+ 128, 0}, {128, 128, 128, 16}, {128, 128, 128, 16}, {128, 128, 128,
+ 143}, {128, 128, 128, 239}}, {{128, 128, 128, 0}, {128, 128, 128,
+ 64}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128, 128,
+ 112}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128, 128,
+ 32}}, {{128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128,
+ 16}, {128, 128, 128, 175}, {128, 128, 128, 255}, {128, 128, 128,
+ 127}, {128, 128, 128, 0}, {128, 128, 128, 0}}, {{128, 128, 128,
+ 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {
+ 128, 128, 128, 16}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128,
+ 128, 128, 0}}}], {{0, 8}, {8, 0}}, {0, 255}, ColorFunction ->
+ RGBColor],
BoxForm`ImageTag[
"Byte", ColorSpace -> "RGB", Interleaving -> True, Magnification ->
- Automatic], Selectable -> False], BaseStyle -> "ImageGraphics",
- ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
- ImageSize -> {8, 9}],GraphicsBox[
+ Automatic], Selectable -> False], DefaultBaseStyle ->
+ "ImageGraphics", ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
+ ImageSize -> {8, 9}],GraphicsBox[
TagBox[
- RasterBox[{{{229, 95, 28, 32}, {229, 95, 28, 16}, {229, 95, 28, 0}, {
- 229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
- 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229, 95, 28, 239}, {229,
- 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
- 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{229, 95, 28, 0}, {
- 229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95,
- 28, 112}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95, 28,
- 32}}, {{229, 95, 28, 32}, {229, 95, 28, 16}, {229, 95, 28, 16}, {229,
- 95, 28, 175}, {229, 95, 28, 255}, {229, 95, 28, 127}, {229, 95, 28,
- 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229, 95, 28, 239}, {229,
- 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229, 95, 28,
- 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{229, 95, 28, 0}, {
- 229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95,
- 28, 112}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95, 28,
- 32}}, {{229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229,
- 95, 28, 175}, {229, 95, 28, 255}, {229, 95, 28, 127}, {229, 95, 28,
- 0}, {229, 95, 28, 0}}, {{229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95,
- 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229, 95, 28, 0}, {229,
- 95, 28, 0}, {229, 95, 28, 0}}}, {{0, 8}, {8, 0}}, {0, 255},
- ColorFunction -> RGBColor],
+ RasterBox[
+ RawArray["UnsignedInteger8",{{{229, 95, 28, 32}, {229, 95, 28, 16}, {
+ 229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229,
+ 95, 28, 239}, {229, 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{
+ 229, 95, 28, 0}, {229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95,
+ 28, 191}, {229, 95, 28, 112}, {229, 95, 28, 223}, {229, 95, 28,
+ 191}, {229, 95, 28, 32}}, {{229, 95, 28, 32}, {229, 95, 28, 16}, {
+ 229, 95, 28, 16}, {229, 95, 28, 175}, {229, 95, 28, 255}, {229, 95,
+ 28, 127}, {229, 95, 28, 0}, {229, 95, 28, 48}}, {{229, 95, 28,
+ 48}, {229, 95, 28, 239}, {229, 95, 28, 112}, {229, 95, 28, 0}, {229,
+ 95, 28, 16}, {229, 95, 28, 16}, {229, 95, 28, 143}, {229, 95, 28,
+ 239}}, {{229, 95, 28, 0}, {229, 95, 28, 64}, {229, 95, 28, 223}, {
+ 229, 95, 28, 191}, {229, 95, 28, 112}, {229, 95, 28, 223}, {229, 95,
+ 28, 191}, {229, 95, 28, 32}}, {{229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 16}, {229, 95, 28, 175}, {229, 95, 28, 255}, {229,
+ 95, 28, 127}, {229, 95, 28, 0}, {229, 95, 28, 0}}, {{229, 95, 28,
+ 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95,
+ 28, 16}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}}}], {{
+ 0, 8}, {8, 0}}, {0, 255}, ColorFunction -> RGBColor],
BoxForm`ImageTag[
"Byte", ColorSpace -> "RGB", Interleaving -> True, Magnification ->
- Automatic], Selectable -> False], BaseStyle -> "ImageGraphics",
- ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
- ImageSize -> {8, 9}]},
+ Automatic], Selectable -> False], DefaultBaseStyle ->
+ "ImageGraphics", ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
+ ImageSize -> {8, 9}]},
"GrayLinkWithIcon",
BaseStyle->{"TutorialJumpBoxLink"}],
TemplateBox[{
Cell["Example Calculations"],"paclet:FeynCalc/tutorial/Intro#1007300369",
GraphicsBox[
TagBox[
- RasterBox[{{{128, 128, 128, 32}, {128, 128, 128, 16}, {128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128,
- 128, 128, 0}, {128, 128, 128, 48}}, {{128, 128, 128, 48}, {128, 128,
- 128, 239}, {128, 128, 128, 112}, {128, 128, 128, 0}, {128, 128, 128,
- 0}, {128, 128, 128, 16}, {128, 128, 128, 143}, {128, 128, 128,
- 239}}, {{128, 128, 128, 0}, {128, 128, 128, 64}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 112}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 32}}, {{128, 128, 128,
- 32}, {128, 128, 128, 16}, {128, 128, 128, 16}, {128, 128, 128,
- 175}, {128, 128, 128, 255}, {128, 128, 128, 127}, {128, 128, 128,
- 0}, {128, 128, 128, 48}}, {{128, 128, 128, 48}, {128, 128, 128,
- 239}, {128, 128, 128, 112}, {128, 128, 128, 0}, {128, 128, 128,
- 16}, {128, 128, 128, 16}, {128, 128, 128, 143}, {128, 128, 128,
- 239}}, {{128, 128, 128, 0}, {128, 128, 128, 64}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 112}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 32}}, {{128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128, 128, 175}, {
- 128, 128, 128, 255}, {128, 128, 128, 127}, {128, 128, 128, 0}, {128,
- 128, 128, 0}}, {{128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128,
- 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 0}}}, {{0, 8}, {8, 0}}, {0,
- 255}, ColorFunction -> RGBColor],
+ RasterBox[
+ RawArray["UnsignedInteger8",{{{128, 128, 128, 32}, {128, 128, 128,
+ 16}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {
+ 128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 48}}, {{128,
+ 128, 128, 48}, {128, 128, 128, 239}, {128, 128, 128, 112}, {128,
+ 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128,
+ 128, 143}, {128, 128, 128, 239}}, {{128, 128, 128, 0}, {128, 128,
+ 128, 64}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128,
+ 128, 112}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128,
+ 128, 32}}, {{128, 128, 128, 32}, {128, 128, 128, 16}, {128, 128,
+ 128, 16}, {128, 128, 128, 175}, {128, 128, 128, 255}, {128, 128,
+ 128, 127}, {128, 128, 128, 0}, {128, 128, 128, 48}}, {{128, 128,
+ 128, 48}, {128, 128, 128, 239}, {128, 128, 128, 112}, {128, 128,
+ 128, 0}, {128, 128, 128, 16}, {128, 128, 128, 16}, {128, 128, 128,
+ 143}, {128, 128, 128, 239}}, {{128, 128, 128, 0}, {128, 128, 128,
+ 64}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128, 128,
+ 112}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128, 128,
+ 32}}, {{128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128,
+ 16}, {128, 128, 128, 175}, {128, 128, 128, 255}, {128, 128, 128,
+ 127}, {128, 128, 128, 0}, {128, 128, 128, 0}}, {{128, 128, 128,
+ 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {
+ 128, 128, 128, 16}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128,
+ 128, 128, 0}}}], {{0, 8}, {8, 0}}, {0, 255}, ColorFunction ->
+ RGBColor],
BoxForm`ImageTag[
"Byte", ColorSpace -> "RGB", Interleaving -> True, Magnification ->
- Automatic], Selectable -> False], BaseStyle -> "ImageGraphics",
- ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
- ImageSize -> {8, 9}],GraphicsBox[
+ Automatic], Selectable -> False], DefaultBaseStyle ->
+ "ImageGraphics", ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
+ ImageSize -> {8, 9}],GraphicsBox[
TagBox[
- RasterBox[{{{229, 95, 28, 32}, {229, 95, 28, 16}, {229, 95, 28, 0}, {
- 229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
- 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229, 95, 28, 239}, {229,
- 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
- 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{229, 95, 28, 0}, {
- 229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95,
- 28, 112}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95, 28,
- 32}}, {{229, 95, 28, 32}, {229, 95, 28, 16}, {229, 95, 28, 16}, {229,
- 95, 28, 175}, {229, 95, 28, 255}, {229, 95, 28, 127}, {229, 95, 28,
- 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229, 95, 28, 239}, {229,
- 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229, 95, 28,
- 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{229, 95, 28, 0}, {
- 229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95,
- 28, 112}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95, 28,
- 32}}, {{229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229,
- 95, 28, 175}, {229, 95, 28, 255}, {229, 95, 28, 127}, {229, 95, 28,
- 0}, {229, 95, 28, 0}}, {{229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95,
- 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229, 95, 28, 0}, {229,
- 95, 28, 0}, {229, 95, 28, 0}}}, {{0, 8}, {8, 0}}, {0, 255},
- ColorFunction -> RGBColor],
+ RasterBox[
+ RawArray["UnsignedInteger8",{{{229, 95, 28, 32}, {229, 95, 28, 16}, {
+ 229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229,
+ 95, 28, 239}, {229, 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{
+ 229, 95, 28, 0}, {229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95,
+ 28, 191}, {229, 95, 28, 112}, {229, 95, 28, 223}, {229, 95, 28,
+ 191}, {229, 95, 28, 32}}, {{229, 95, 28, 32}, {229, 95, 28, 16}, {
+ 229, 95, 28, 16}, {229, 95, 28, 175}, {229, 95, 28, 255}, {229, 95,
+ 28, 127}, {229, 95, 28, 0}, {229, 95, 28, 48}}, {{229, 95, 28,
+ 48}, {229, 95, 28, 239}, {229, 95, 28, 112}, {229, 95, 28, 0}, {229,
+ 95, 28, 16}, {229, 95, 28, 16}, {229, 95, 28, 143}, {229, 95, 28,
+ 239}}, {{229, 95, 28, 0}, {229, 95, 28, 64}, {229, 95, 28, 223}, {
+ 229, 95, 28, 191}, {229, 95, 28, 112}, {229, 95, 28, 223}, {229, 95,
+ 28, 191}, {229, 95, 28, 32}}, {{229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 16}, {229, 95, 28, 175}, {229, 95, 28, 255}, {229,
+ 95, 28, 127}, {229, 95, 28, 0}, {229, 95, 28, 0}}, {{229, 95, 28,
+ 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95,
+ 28, 16}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}}}], {{
+ 0, 8}, {8, 0}}, {0, 255}, ColorFunction -> RGBColor],
BoxForm`ImageTag[
"Byte", ColorSpace -> "RGB", Interleaving -> True, Magnification ->
- Automatic], Selectable -> False], BaseStyle -> "ImageGraphics",
- ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
- ImageSize -> {8, 9}]},
+ Automatic], Selectable -> False], DefaultBaseStyle ->
+ "ImageGraphics", ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
+ ImageSize -> {8, 9}]},
"GrayLinkWithIcon",
BaseStyle->{"TutorialJumpBoxLink"}]},
{
@@ -203,59 +210,62 @@ Cell[BoxData[GridBox[{
Cell["Extra subpackages"],"paclet:FeynCalc/tutorial/Intro#2100607586",
GraphicsBox[
TagBox[
- RasterBox[{{{128, 128, 128, 32}, {128, 128, 128, 16}, {128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128,
- 128, 128, 0}, {128, 128, 128, 48}}, {{128, 128, 128, 48}, {128, 128,
- 128, 239}, {128, 128, 128, 112}, {128, 128, 128, 0}, {128, 128, 128,
- 0}, {128, 128, 128, 16}, {128, 128, 128, 143}, {128, 128, 128,
- 239}}, {{128, 128, 128, 0}, {128, 128, 128, 64}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 112}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 32}}, {{128, 128, 128,
- 32}, {128, 128, 128, 16}, {128, 128, 128, 16}, {128, 128, 128,
- 175}, {128, 128, 128, 255}, {128, 128, 128, 127}, {128, 128, 128,
- 0}, {128, 128, 128, 48}}, {{128, 128, 128, 48}, {128, 128, 128,
- 239}, {128, 128, 128, 112}, {128, 128, 128, 0}, {128, 128, 128,
- 16}, {128, 128, 128, 16}, {128, 128, 128, 143}, {128, 128, 128,
- 239}}, {{128, 128, 128, 0}, {128, 128, 128, 64}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 112}, {128, 128, 128,
- 223}, {128, 128, 128, 191}, {128, 128, 128, 32}}, {{128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128, 128, 175}, {
- 128, 128, 128, 255}, {128, 128, 128, 127}, {128, 128, 128, 0}, {128,
- 128, 128, 0}}, {{128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128,
- 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128, 128,
- 0}, {128, 128, 128, 0}, {128, 128, 128, 0}}}, {{0, 8}, {8, 0}}, {0,
- 255}, ColorFunction -> RGBColor],
+ RasterBox[
+ RawArray["UnsignedInteger8",{{{128, 128, 128, 32}, {128, 128, 128,
+ 16}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {
+ 128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 48}}, {{128,
+ 128, 128, 48}, {128, 128, 128, 239}, {128, 128, 128, 112}, {128,
+ 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 16}, {128, 128,
+ 128, 143}, {128, 128, 128, 239}}, {{128, 128, 128, 0}, {128, 128,
+ 128, 64}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128,
+ 128, 112}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128,
+ 128, 32}}, {{128, 128, 128, 32}, {128, 128, 128, 16}, {128, 128,
+ 128, 16}, {128, 128, 128, 175}, {128, 128, 128, 255}, {128, 128,
+ 128, 127}, {128, 128, 128, 0}, {128, 128, 128, 48}}, {{128, 128,
+ 128, 48}, {128, 128, 128, 239}, {128, 128, 128, 112}, {128, 128,
+ 128, 0}, {128, 128, 128, 16}, {128, 128, 128, 16}, {128, 128, 128,
+ 143}, {128, 128, 128, 239}}, {{128, 128, 128, 0}, {128, 128, 128,
+ 64}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128, 128,
+ 112}, {128, 128, 128, 223}, {128, 128, 128, 191}, {128, 128, 128,
+ 32}}, {{128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128,
+ 16}, {128, 128, 128, 175}, {128, 128, 128, 255}, {128, 128, 128,
+ 127}, {128, 128, 128, 0}, {128, 128, 128, 0}}, {{128, 128, 128,
+ 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128, 128, 128, 0}, {
+ 128, 128, 128, 16}, {128, 128, 128, 0}, {128, 128, 128, 0}, {128,
+ 128, 128, 0}}}], {{0, 8}, {8, 0}}, {0, 255}, ColorFunction ->
+ RGBColor],
BoxForm`ImageTag[
"Byte", ColorSpace -> "RGB", Interleaving -> True, Magnification ->
- Automatic], Selectable -> False], BaseStyle -> "ImageGraphics",
- ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
- ImageSize -> {8, 9}],GraphicsBox[
+ Automatic], Selectable -> False], DefaultBaseStyle ->
+ "ImageGraphics", ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
+ ImageSize -> {8, 9}],GraphicsBox[
TagBox[
- RasterBox[{{{229, 95, 28, 32}, {229, 95, 28, 16}, {229, 95, 28, 0}, {
- 229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
- 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229, 95, 28, 239}, {229,
- 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
- 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{229, 95, 28, 0}, {
- 229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95,
- 28, 112}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95, 28,
- 32}}, {{229, 95, 28, 32}, {229, 95, 28, 16}, {229, 95, 28, 16}, {229,
- 95, 28, 175}, {229, 95, 28, 255}, {229, 95, 28, 127}, {229, 95, 28,
- 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229, 95, 28, 239}, {229,
- 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229, 95, 28,
- 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{229, 95, 28, 0}, {
- 229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95,
- 28, 112}, {229, 95, 28, 223}, {229, 95, 28, 191}, {229, 95, 28,
- 32}}, {{229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229,
- 95, 28, 175}, {229, 95, 28, 255}, {229, 95, 28, 127}, {229, 95, 28,
- 0}, {229, 95, 28, 0}}, {{229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95,
- 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 16}, {229, 95, 28, 0}, {229,
- 95, 28, 0}, {229, 95, 28, 0}}}, {{0, 8}, {8, 0}}, {0, 255},
- ColorFunction -> RGBColor],
+ RasterBox[
+ RawArray["UnsignedInteger8",{{{229, 95, 28, 32}, {229, 95, 28, 16}, {
+ 229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 0}, {229, 95, 28, 48}}, {{229, 95, 28, 48}, {229,
+ 95, 28, 239}, {229, 95, 28, 112}, {229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 16}, {229, 95, 28, 143}, {229, 95, 28, 239}}, {{
+ 229, 95, 28, 0}, {229, 95, 28, 64}, {229, 95, 28, 223}, {229, 95,
+ 28, 191}, {229, 95, 28, 112}, {229, 95, 28, 223}, {229, 95, 28,
+ 191}, {229, 95, 28, 32}}, {{229, 95, 28, 32}, {229, 95, 28, 16}, {
+ 229, 95, 28, 16}, {229, 95, 28, 175}, {229, 95, 28, 255}, {229, 95,
+ 28, 127}, {229, 95, 28, 0}, {229, 95, 28, 48}}, {{229, 95, 28,
+ 48}, {229, 95, 28, 239}, {229, 95, 28, 112}, {229, 95, 28, 0}, {229,
+ 95, 28, 16}, {229, 95, 28, 16}, {229, 95, 28, 143}, {229, 95, 28,
+ 239}}, {{229, 95, 28, 0}, {229, 95, 28, 64}, {229, 95, 28, 223}, {
+ 229, 95, 28, 191}, {229, 95, 28, 112}, {229, 95, 28, 223}, {229, 95,
+ 28, 191}, {229, 95, 28, 32}}, {{229, 95, 28, 0}, {229, 95, 28,
+ 0}, {229, 95, 28, 16}, {229, 95, 28, 175}, {229, 95, 28, 255}, {229,
+ 95, 28, 127}, {229, 95, 28, 0}, {229, 95, 28, 0}}, {{229, 95, 28,
+ 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95,
+ 28, 16}, {229, 95, 28, 0}, {229, 95, 28, 0}, {229, 95, 28, 0}}}], {{
+ 0, 8}, {8, 0}}, {0, 255}, ColorFunction -> RGBColor],
BoxForm`ImageTag[
"Byte", ColorSpace -> "RGB", Interleaving -> True, Magnification ->
- Automatic], Selectable -> False], BaseStyle -> "ImageGraphics",
- ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
- ImageSize -> {8, 9}]},
+ Automatic], Selectable -> False], DefaultBaseStyle ->
+ "ImageGraphics", ImageSizeRaw -> {8, 8}, PlotRange -> {{0, 8}, {0, 8}},
+ ImageSize -> {8, 9}]},
"GrayLinkWithIcon",
BaseStyle->{"TutorialJumpBoxLink"}], ""}
}]], "TutorialJumpBox"],
@@ -473,7 +483,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["\<\"/media/Data/Projects/Physics/FeynCalc/FeynCalc/Examples\"\>",
TraditionalForm]], "Output",
- ImageSize->{397, 15},
+ ImageSize->{367, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[24]=",
@@ -557,7 +567,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["\<\"/home/vs/.Mathematica/Applications\"\>",
TraditionalForm]], "Output",
- ImageSize->{247, 15},
+ ImageSize->{226, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[26]=",
@@ -641,47 +651,12 @@ The directory \"FeynCalc\" contains various files and subdirectories \
belonging to third-party packages which are not necessary to run 'standard' \
FeynCalc calculations and which do not use the autoloading conventions of \
FeynCalc. These packages are not initialized by default when starting \
-FeynCalc. Loading them can be switched on and off by setting appropiate \
+FeynCalc. Loading them can be switched on and off by setting appropriate \
variables to False or True before loading FeynCalc.\
\>", "Text",
CellTags->"About Extras",
CellID->953459903],
-Cell[BoxData[
- FormBox[
- StyleBox[
- FrameBox[
- StyleBox[GridBox[{
- {
- StyleBox["$LoadTARCER",
- FontFamily->"Courier"],
- RowBox[{
- "Specifies", " ", "if", " ", "TARCER", " ", "should", " ", "be", " ",
- "loaded", " ", "by", " ", "FeynCalc"}]},
- {
- StyleBox["$LoadPhi",
- FontFamily->"Courier"],
- RowBox[{
- "Specifies", " ", "if", " ", "PHI", " ", "should", " ", "be", " ",
- "loaded", " ", "by", " ", "FeynCalc"}]},
- {
- StyleBox["$LoadFeynArts",
- FontFamily->"Courier"],
- RowBox[{
- "Specifies", " ", "if", " ", "FeynArts", " ", "should", " ", "be",
- " ", "loaded", " ", "by", " ", "FeynCalc"}]}
- },
- GridBoxAlignment->{
- "Columns" -> {Right, {Left}}, "ColumnsIndexed" -> {},
- "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}],
- GridBoxOptions->{
- GridBoxDividers->{
- "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
- "RowsIndexed" -> {}}}]], "2ColumnBox"], TraditionalForm]], "Text",
- Background->None,
- CellTags->"About Extras",
- CellID->2108182812],
-
Cell[CellGroupData[{
Cell["TARCER", "Subsection",
@@ -710,7 +685,8 @@ TARCER is distributed with FeynCalc. To have FeynCalc load TARCER, evaluate\
Cell[BoxData[
RowBox[{
- RowBox[{"$LoadTARCER", "=", "True"}], ";"}]], "Input",
+ RowBox[{"$LoadAddOns", "=",
+ RowBox[{"{", "\"\\"", "}"}]}], ";"}]], "Input",
CellTags->"tarcer",
CellID->843778896],
@@ -851,7 +827,7 @@ Cell[BoxData["$FeynArtsDirectory"], "Input",
Cell[BoxData[
FormBox["\<\"/media/Data/Projects/Physics/FeynCalc/FeynCalc/FeynArts\"\>",
TraditionalForm]], "Output",
- ImageSize->{393, 15},
+ ImageSize->{364, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[13]=",
@@ -868,7 +844,8 @@ Cell[TextData[{
Cell[BoxData[
RowBox[{
- RowBox[{"$LoadFeynArts", "=", "True"}], ";"}]], "Input",
+ RowBox[{"$LoadAddOns", "=",
+ RowBox[{"{", "\"\\"", "}"}]}], ";"}]], "Input",
CellLabel->"In[16]:=",
CellID->342627804],
@@ -883,7 +860,8 @@ appear. Hit OK. Wait until the patching process finishes. Then restart ",
Cell[BoxData[
RowBox[{
- RowBox[{"$LoadFeynArts", "=", "True"}], ";"}]], "Input",
+ RowBox[{"$LoadAddOns", "=",
+ RowBox[{"{", "\"\\"", "}"}]}], ";"}]], "Input",
CellLabel->"In[18]:=",
CellID->1900750623],
@@ -917,7 +895,7 @@ Cell[BoxData[
Cell[BoxData[
FormBox["\<\"/media/Data/Projects/Physics/FeynCalc/FeynCalc/Examples\"\>",
TraditionalForm]], "Output",
- ImageSize->{397, 15},
+ ImageSize->{367, 16},
ImageMargins->{{0, 0}, {0, 0}},
ImageRegion->{{0, 1}, {0, 1}},
CellLabel->"Out[24]=",
@@ -931,7 +909,7 @@ Cell[" ", "FooterCell"]
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
WindowTitle->"Short introduction",
TaggingRules->{
"ModificationHighlight" -> False, "ColorType" -> "TutorialColor",
@@ -940,10 +918,9 @@ TaggingRules->{
ButtonBox[
"FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc",
BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments ->
- Left], "ExampleCounter" -> 1, "ExamplePageLinks" -> {}, "NeedPlatMsgIn" ->
- None, "RootCaptions" -> "",
- "Metadata" -> {
- "built" -> "{2016, 8, 21, 21, 27, 29.193972}",
+ Left], "ExampleCounter" -> 1, "NeedPlatMsgIn" -> None, "RootCaptions" ->
+ "", "Metadata" -> {
+ "built" -> "{2020, 1, 5, 19, 4, 31.052818}",
"history" -> {"9.0", "", "", ""}, "context" -> "FeynCalc`",
"keywords" -> {}, "specialkeywords" -> {},
"tutorialcollectionlinks" -> {}, "index" -> True, "label" ->
@@ -961,11 +938,12 @@ code. Some functions for input of objects like p^\[Mu],\[Gamma]^\[Nu],g^\[Mu] \
\[Nu], \[CurlyEpsilon]^\[Mu] \[Nu] \[Rho] \[Sigma], etc. (abbreviations in \
parentheses) are: GA (Dirac matrix), GS (Dirac slash), FV (4-vector), LC \
(Levi-Civita tensor), MT (metric tensor), Spinor, SUNDelta, SUNFDelta, SUNF, \
-SP (scalar product)", "synonyms" -> {}, "title" -> "Short introduction",
- "titlemodifier" -> "", "windowtitle" -> "Short introduction", "type" ->
- "Tutorial", "uri" -> "FeynCalc/tutorial/Intro"}, "SearchTextTranslated" ->
- ""},
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+SP (scalar product)", "synonyms" -> {}, "tabletags" ->
+ DocumentationBuild`Make`Private`tabletaggingrules$298733, "title" ->
+ "Short introduction", "titlemodifier" -> "", "windowtitle" ->
+ "Short introduction", "type" -> "Tutorial", "uri" ->
+ "FeynCalc/tutorial/Intro"}, "SearchTextTranslated" -> ""},
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->Notebook[{
Cell[
StyleData[
@@ -983,7 +961,7 @@ StyleDefinitions->Notebook[{
Cell[
StyleData["TutorialRelatedLinksSection"],
CellGroupingRules -> {"SectionGrouping", 30}]}, Visible -> False,
- FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)",
+ FrontEndVersion -> "10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)
@@ -992,77 +970,74 @@ StyleDefinitions->Notebook[{
(*CellTagsOutline
CellTagsIndex->{
"intro"->{
- Cell[17139, 345, 94, 2, 32, "Text",
+ Cell[17584, 355, 94, 2, 33, "Text",
CellTags->"intro",
CellID->1227796187],
- Cell[18986, 420, 111, 2, 32, "Text",
+ Cell[19431, 430, 111, 2, 33, "Text",
CellTags->"intro",
CellID->1006364145],
- Cell[20750, 489, 559, 21, 54, "Text",
+ Cell[21195, 499, 559, 21, 61, "Text",
CellTags->"intro",
CellID->716203363],
- Cell[21312, 512, 114, 2, 32, "Text",
+ Cell[21757, 522, 114, 2, 33, "Text",
CellTags->"intro",
CellID->1566592169],
- Cell[21429, 516, 470, 13, 39, "SmallText",
+ Cell[21874, 526, 470, 13, 39, "SmallText",
CellTags->{"intro", "introfoot"},
CellID->721081683]},
"introfoot"->{
- Cell[21429, 516, 470, 13, 39, "SmallText",
+ Cell[21874, 526, 470, 13, 39, "SmallText",
CellTags->{"intro", "introfoot"},
CellID->721081683]},
"Load FeynCalc"->{
- Cell[21924, 533, 96, 2, 62, "Section",
+ Cell[22369, 543, 96, 2, 63, "Section",
CellTags->{"Load FeynCalc", "start"},
CellID->1726202394]},
"start"->{
- Cell[21924, 533, 96, 2, 62, "Section",
+ Cell[22369, 543, 96, 2, 63, "Section",
CellTags->{"Load FeynCalc", "start"},
CellID->1726202394]},
"About Extras"->{
- Cell[24450, 633, 107, 3, 62, "Section",
+ Cell[24895, 643, 107, 3, 63, "Section",
PageBreakAbove->True,
CellTags->"About Extras",
CellID->2100607586],
- Cell[24560, 638, 494, 9, 112, "Text",
+ Cell[25005, 648, 495, 9, 117, "Text",
CellTags->"About Extras",
- CellID->953459903],
- Cell[25057, 649, 1147, 33, 64, "Text",
- CellTags->"About Extras",
- CellID->2108182812]},
+ CellID->953459903]},
"tarcer"->{
- Cell[26229, 686, 69, 2, 51, "Subsection",
+ Cell[25525, 661, 69, 2, 52, "Subsection",
CellTags->"tarcer",
CellID->906844505],
- Cell[26825, 710, 121, 4, 27, "Input",
+ Cell[26121, 685, 155, 5, 27, "Input",
CellTags->"tarcer",
CellID->843778896]},
"phi"->{
- Cell[27231, 729, 64, 2, 51, "Subsection",
+ Cell[26561, 705, 64, 2, 52, "Subsection",
CellTags->"phi",
CellID->932055296],
- Cell[27298, 733, 501, 11, 112, "Text",
+ Cell[26628, 709, 501, 11, 117, "Text",
CellTags->"phi",
CellID->1893421836],
- Cell[27802, 746, 89, 2, 32, "Text",
+ Cell[27132, 722, 89, 2, 33, "Text",
CellTags->"phi",
CellID->528666319],
- Cell[27894, 750, 115, 4, 27, "Input",
+ Cell[27224, 726, 115, 4, 27, "Input",
CellTags->"phi",
CellID->798844745],
- Cell[28012, 756, 146, 5, 32, "Text",
+ Cell[27342, 732, 146, 5, 33, "Text",
CellTags->"phi",
CellID->1295431310],
- Cell[28161, 763, 289, 10, 32, "Text",
+ Cell[27491, 739, 289, 10, 33, "Text",
CellTags->"phi",
CellID->1431249758]},
"Example Calculations"->{
- Cell[32017, 896, 126, 3, 62, "Section",
+ Cell[31427, 874, 126, 3, 63, "Section",
PageBreakAbove->True,
CellTags->{"Example Calculations", "ex"},
CellID->1007300369]},
"ex"->{
- Cell[32017, 896, 126, 3, 62, "Section",
+ Cell[31427, 874, 126, 3, 63, "Section",
PageBreakAbove->True,
CellTags->{"Example Calculations", "ex"},
CellID->1007300369]}
@@ -1070,179 +1045,176 @@ CellTagsIndex->{
*)
(*CellTagsIndex
CellTagsIndex->{
- {"intro", 35752, 993},
- {"introfoot", 36213, 1009},
- {"Load FeynCalc", 36339, 1013},
- {"start", 36458, 1017},
- {"About Extras", 36584, 1021},
- {"tarcer", 36904, 1032},
- {"phi", 37091, 1039},
- {"Example Calculations", 37622, 1058},
- {"ex", 37768, 1063}
+ {"intro", 35203, 971},
+ {"introfoot", 35664, 987},
+ {"Load FeynCalc", 35790, 991},
+ {"start", 35909, 995},
+ {"About Extras", 36035, 999},
+ {"tarcer", 36261, 1007},
+ {"phi", 36448, 1014},
+ {"Example Calculations", 36979, 1033},
+ {"ex", 37125, 1038}
}
*)
(*NotebookFileOutline
Notebook[{
-Cell[590, 21, 2255, 52, 51, "AnchorBarGrid",
+Cell[590, 21, 2283, 53, 53, "AnchorBarGrid",
CellID->1],
Cell[CellGroupData[{
-Cell[2870, 77, 55, 1, 46, "Title",
+Cell[2898, 78, 55, 1, 47, "Title",
CellID->509267359],
-Cell[2928, 80, 11800, 180, 64, "TutorialJumpBox"],
-Cell[14731, 262, 855, 20, 156, "Text",
+Cell[2956, 81, 12217, 189, 66, "TutorialJumpBox"],
+Cell[15176, 272, 855, 20, 164, "Text",
CellID->1534169418],
-Cell[15589, 284, 508, 15, 53, "Text",
+Cell[16034, 294, 508, 15, 55, "Text",
CellID->1157525339],
-Cell[16100, 301, 1036, 42, 52, "Text",
+Cell[16545, 311, 1036, 42, 54, "Text",
CellID->757206658],
-Cell[17139, 345, 94, 2, 32, "Text",
+Cell[17584, 355, 94, 2, 33, "Text",
CellTags->"intro",
CellID->1227796187],
-Cell[17236, 349, 1747, 69, 72, "Text",
+Cell[17681, 359, 1747, 69, 75, "Text",
CellID->833014432],
-Cell[18986, 420, 111, 2, 32, "Text",
+Cell[19431, 430, 111, 2, 33, "Text",
CellTags->"intro",
CellID->1006364145],
-Cell[19100, 424, 741, 30, 32, "Text",
+Cell[19545, 434, 741, 30, 33, "Text",
CellID->571834673],
-Cell[19844, 456, 177, 4, 52, "Text",
+Cell[20289, 466, 177, 4, 54, "Text",
CellID->4750988],
Cell[CellGroupData[{
-Cell[20046, 464, 192, 6, 27, "Input",
+Cell[20491, 474, 192, 6, 27, "Input",
CellID->1220639322],
-Cell[20241, 472, 254, 7, 36, "Output",
+Cell[20686, 482, 254, 7, 37, "Output",
CellID->1760930313]
}, Open ]],
-Cell[20510, 482, 237, 5, 72, "Text",
+Cell[20955, 492, 237, 5, 75, "Text",
CellID->1833132382],
-Cell[20750, 489, 559, 21, 54, "Text",
+Cell[21195, 499, 559, 21, 61, "Text",
CellTags->"intro",
CellID->716203363],
-Cell[21312, 512, 114, 2, 32, "Text",
+Cell[21757, 522, 114, 2, 33, "Text",
CellTags->"intro",
CellID->1566592169],
-Cell[21429, 516, 470, 13, 39, "SmallText",
+Cell[21874, 526, 470, 13, 39, "SmallText",
CellTags->{"intro", "introfoot"},
CellID->721081683],
Cell[CellGroupData[{
-Cell[21924, 533, 96, 2, 62, "Section",
+Cell[22369, 543, 96, 2, 63, "Section",
CellTags->{"Load FeynCalc", "start"},
CellID->1726202394],
-Cell[22023, 537, 253, 7, 52, "Text",
+Cell[22468, 547, 253, 7, 54, "Text",
CellID->846823627],
Cell[CellGroupData[{
-Cell[22301, 548, 196, 6, 27, "Input",
+Cell[22746, 558, 196, 6, 27, "Input",
CellID->1006438652],
-Cell[22500, 556, 232, 7, 36, "Output",
+Cell[22945, 566, 232, 7, 37, "Output",
CellID->205843633]
}, Open ]],
-Cell[22747, 566, 390, 11, 72, "Text",
+Cell[23192, 576, 390, 11, 95, "Text",
CellID->469196418],
-Cell[23140, 579, 484, 14, 91, "Text",
+Cell[23585, 589, 484, 14, 95, "Text",
CellID->434623157],
-Cell[23627, 595, 173, 6, 32, "Text",
+Cell[24072, 605, 173, 6, 33, "Text",
CellID->13342743],
-Cell[23803, 603, 135, 4, 27, "Input",
+Cell[24248, 613, 135, 4, 27, "Input",
CellID->2016141554],
-Cell[23941, 609, 50, 1, 32, "Text",
+Cell[24386, 619, 50, 1, 33, "Text",
CellID->491195527],
-Cell[23994, 612, 36, 1, 31, "Text",
+Cell[24439, 622, 36, 1, 32, "Text",
CellID->351638376],
-Cell[24033, 615, 380, 13, 52, "Text",
+Cell[24478, 625, 380, 13, 75, "Text",
CellID->430968534]
}, Open ]],
Cell[CellGroupData[{
-Cell[24450, 633, 107, 3, 62, "Section",
+Cell[24895, 643, 107, 3, 63, "Section",
PageBreakAbove->True,
CellTags->"About Extras",
CellID->2100607586],
-Cell[24560, 638, 494, 9, 112, "Text",
+Cell[25005, 648, 495, 9, 117, "Text",
CellTags->"About Extras",
CellID->953459903],
-Cell[25057, 649, 1147, 33, 64, "Text",
- CellTags->"About Extras",
- CellID->2108182812],
Cell[CellGroupData[{
-Cell[26229, 686, 69, 2, 51, "Subsection",
+Cell[25525, 661, 69, 2, 52, "Subsection",
CellTags->"tarcer",
CellID->906844505],
-Cell[26301, 690, 398, 13, 53, "Text",
+Cell[25597, 665, 398, 13, 55, "Text",
CellID->1972678903],
-Cell[26702, 705, 120, 3, 32, "Text",
+Cell[25998, 680, 120, 3, 33, "Text",
CellID->1513547103],
-Cell[26825, 710, 121, 4, 27, "Input",
+Cell[26121, 685, 155, 5, 27, "Input",
CellTags->"tarcer",
CellID->843778896],
-Cell[26949, 716, 245, 8, 32, "Text",
+Cell[26279, 692, 245, 8, 53, "Text",
CellID->998781867]
}, Open ]],
Cell[CellGroupData[{
-Cell[27231, 729, 64, 2, 51, "Subsection",
+Cell[26561, 705, 64, 2, 52, "Subsection",
CellTags->"phi",
CellID->932055296],
-Cell[27298, 733, 501, 11, 112, "Text",
+Cell[26628, 709, 501, 11, 117, "Text",
CellTags->"phi",
CellID->1893421836],
-Cell[27802, 746, 89, 2, 32, "Text",
+Cell[27132, 722, 89, 2, 33, "Text",
CellTags->"phi",
CellID->528666319],
-Cell[27894, 750, 115, 4, 27, "Input",
+Cell[27224, 726, 115, 4, 27, "Input",
CellTags->"phi",
CellID->798844745],
-Cell[28012, 756, 146, 5, 32, "Text",
+Cell[27342, 732, 146, 5, 33, "Text",
CellTags->"phi",
CellID->1295431310],
-Cell[28161, 763, 289, 10, 32, "Text",
+Cell[27491, 739, 289, 10, 33, "Text",
CellTags->"phi",
CellID->1431249758]
}, Open ]],
Cell[CellGroupData[{
-Cell[28487, 778, 51, 1, 51, "Subsection",
+Cell[27817, 754, 51, 1, 52, "Subsection",
CellID->1026891602],
-Cell[28541, 781, 987, 29, 115, "Text",
+Cell[27871, 757, 987, 29, 120, "Text",
CellID->1730838623],
-Cell[29531, 812, 343, 6, 92, "Text",
+Cell[28861, 788, 343, 6, 96, "Text",
CellID->1031127518],
-Cell[29877, 820, 380, 7, 92, "Text",
+Cell[29207, 796, 380, 7, 96, "Text",
CellID->791617764],
-Cell[30260, 829, 327, 6, 91, "Text",
+Cell[29590, 805, 327, 6, 95, "Text",
CellID->895418169],
-Cell[30590, 837, 218, 5, 52, "Text",
+Cell[29920, 813, 218, 5, 54, "Text",
CellID->2088550082],
Cell[CellGroupData[{
-Cell[30833, 846, 88, 2, 27, "Input",
+Cell[30163, 822, 88, 2, 27, "Input",
CellID->606741564],
-Cell[30924, 850, 254, 7, 36, "Output",
+Cell[30254, 826, 254, 7, 37, "Output",
CellID->1253899115]
}, Open ]],
-Cell[31193, 860, 141, 6, 32, "Text",
+Cell[30523, 836, 141, 6, 33, "Text",
CellID->1310937107],
-Cell[31337, 868, 126, 4, 27, "Input",
+Cell[30667, 844, 166, 5, 27, "Input",
CellID->342627804],
-Cell[31466, 874, 283, 7, 72, "Text",
+Cell[30836, 851, 283, 7, 75, "Text",
CellID->570125418],
-Cell[31752, 883, 127, 4, 27, "Input",
+Cell[31122, 860, 167, 5, 27, "Input",
CellID->1900750623],
-Cell[31882, 889, 86, 1, 32, "Text",
+Cell[31292, 867, 86, 1, 33, "Text",
CellID->1315560355]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[32017, 896, 126, 3, 62, "Section",
+Cell[31427, 874, 126, 3, 63, "Section",
PageBreakAbove->True,
CellTags->{"Example Calculations", "ex"},
CellID->1007300369],
-Cell[32146, 901, 111, 3, 32, "Text",
+Cell[31556, 879, 111, 3, 33, "Text",
CellID->1268182373],
Cell[CellGroupData[{
-Cell[32282, 908, 192, 6, 27, "Input",
+Cell[31692, 886, 192, 6, 27, "Input",
CellID->1877395502],
-Cell[32477, 916, 253, 7, 36, "Output",
+Cell[31887, 894, 253, 7, 37, "Output",
CellID->727521100]
}, Open ]]
}, Open ]]
}, Open ]],
-Cell[32769, 928, 23, 0, 42, "FooterCell"]
+Cell[32179, 906, 23, 0, 41, "FooterCell"]
}
]
*)
diff --git a/FeynCalc/DocSource/English/Guides/FeynCalc.nb b/FeynCalc/DocSource/English/Guides/FeynCalc.nb
index 4e51abf59..f8ab30da7 100644
--- a/FeynCalc/DocSource/English/Guides/FeynCalc.nb
+++ b/FeynCalc/DocSource/English/Guides/FeynCalc.nb
@@ -1,22 +1,3 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 188936, 4884]
-NotebookOptionsPosition[ 170790, 4314]
-NotebookOutlinePosition[ 171203, 4330]
-CellTagsIndexPosition[ 171160, 4327]
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
Notebook[{
Cell[TextData[{
"New in: ",
@@ -74,12 +55,10 @@ Cell["XXXX", "Details",
CellID->795394057],
Cell["Rolf Mertig, Frederik Orellana and Vladyslav Shtabovenko", "Details",
- CellChangeTimes->{{3.6591077670693293`*^9, 3.6591077814455*^9}},
CellLabel->"Developers",
CellID->350963985],
Cell["Rolf Mertig, Frederik Orellana and Vladyslav Shtabovenko", "Details",
- CellChangeTimes->{{3.6591077587895947`*^9, 3.659107783367198*^9}},
CellLabel->"Authors",
CellID->802101],
@@ -120,25 +99,17 @@ Cell[TextData[{
" package for algebraic calculations in Quantum Field Theory and \
semi-automatic evaluation of Feynman Diagrams"
}], "GuideAbstract",
- CellChangeTimes->{{3.6591077391094418`*^9, 3.65910774261277*^9}, {
- 3.6591077924053907`*^9, 3.659107798572674*^9}, {3.6591159775573263`*^9,
- 3.6591160017335377`*^9}, 3.680782637981247*^9},
CellID->2001916300]
}, Open ]],
Cell[CellGroupData[{
Cell["", "GuideFunctionsSection",
- CellChangeTimes->{3.6591160671690817`*^9},
CellID->1866139230],
Cell[CellGroupData[{
Cell["Basic objects", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6600619749746017`*^9, 3.660061996697213*^9}, {3.6600675568660383`*^9,
- 3.6600675730380583`*^9}},
CellID->1344981135],
Cell[TextData[{
@@ -153,48 +124,8 @@ Cell[TextData[{
ButtonData->"/ref/HoldForm"]], "InlineFunctionSans"],
")"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660685293123752*^9, 3.660685315489977*^9}},
CellID->552658513],
-Cell[TextData[{
- Cell[TextData[ButtonBox["AlphaStrong",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/AlphaStrong"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " ",
- Cell[BoxData[
- SubscriptBox["\[Alpha]", "s"]], "InlineFormula"],
- " in QCD"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685412672666*^9}},
- CellID->1235023741],
-
-Cell[TextData[{
- Cell[TextData[ButtonBox["AlphaFS",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/AlphaFS"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " fine-strucutre constant"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.66068542376897*^9, 3.6606854414408503`*^9}},
- CellID->1076523595],
-
Cell[TextData[{
Cell[TextData[ButtonBox["AntiQuarkField",
BaseStyle->"Link",
@@ -203,17 +134,27 @@ Cell[TextData[{
Cell[TextData[ButtonBox["QuarkField",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/QuarkField"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["QuarkFieldPsi",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuarkFieldPsi"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["QuarkFieldPsiDagger",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuarkFieldPsiDagger"]],
+ "InlineFunctionSans"],
+ Cell[TextData[ButtonBox["QuarkFieldChi",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuarkFieldChi"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["QuarkFieldChiDagger",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/QuarkFieldChiDagger"]],
+ "InlineFunctionSans"],
" ",
StyleBox["\[LongDash] ", "GuideEmDash"],
"name of a fermionic field"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, 3.660685460952847*^9, {3.660726126286809*^9,
- 3.660726135218418*^9}},
CellID->917048888],
Cell[TextData[{
@@ -228,35 +169,136 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
"Casimir operator eigenvalues of SU(N)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606854821871233`*^9, 3.6606854950361967`*^9}},
CellID->1033282217],
Cell[TextData[{
- Cell[TextData[ButtonBox["ChiralityProjector",
+ Cell[TextData[ButtonBox["CGA",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChiralityProjector"]],
- "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/CGA"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CGS",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CGS"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CGAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CGAD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CGSD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CGSD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CGAE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CGAE"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CGSE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CGSE"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Dirac matrices with Cartesian indices or Dirac matrices \
+contracted to 3-momenta"
+}], "GuideText",
+ CellID->747406905],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CSI",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSI"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSID",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSID"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSIE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSIE"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSIS",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSIS"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSISD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSISD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSISE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSISE"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Pauli matrices with Cartesian indices or Pauli matrices \
+contracted to 3-momenta"
+}], "GuideText",
+ CellID->1899175563],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CSP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSP"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSPD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CSPE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CSPE"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes ",
- Cell[BoxData[
- SubscriptBox["P", "L"]], "InlineFormula"],
- " or ",
- Cell[BoxData[
- SubscriptBox["P", "R"]], "InlineFormula"]
+ " denotes scalar products of 3-momenta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660685523680896*^9, 3.660685541121378*^9}},
- CellID->745071340],
+ CellID->2127308002],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CV"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CVD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CVE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CVE"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of 3-vectors"
+}], "GuideText",
+ CellID->1787264376],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianIndex"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " Cartesian index"
+}], "GuideText",
+ CellID->1483374883],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianMomentum"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " internal representation of 3-momenta"
+}], "GuideText",
+ CellID->1693164442],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianPair"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " special pairing used in the internal representation to represent Kronecker \
+deltas, 3-vectors or Cartesian scalar products"
+}], "GuideText",
+ CellID->40531547],
Cell[TextData[{
Cell[TextData[ButtonBox["DeltaFunction",
@@ -276,12 +318,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Dirac delta function and its derivatives"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660685567648719*^9, 3.660685589681037*^9}},
CellID->1851196232],
Cell[TextData[{
@@ -289,14 +325,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracGamma"]], "InlineFunctionSans"],
", ",
- Cell[TextData[ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracMatrix"]], "InlineFunctionSans"],
- ", ",
- Cell[TextData[ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSlash"]], "InlineFunctionSans"],
- ", ",
Cell[TextData[ButtonBox["GA",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/GA"]], "InlineFunctionSans"],
@@ -328,32 +356,21 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" representation of Dirac matrices and slashes"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660685614200405*^9, 3.660685623255899*^9}, {
- 3.660685665735458*^9, 3.660685675387671*^9}, 3.6606859897924767`*^9, {
- 3.660686045398682*^9, 3.660686054055194*^9}, {3.660724886983316*^9,
- 3.660724889800495*^9}},
CellID->1686448459],
Cell[TextData[{
- Cell[TextData[ButtonBox["DiracGammaT",
+ Cell[TextData[ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndexDelta"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DIDelta",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracGammaT"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/DIDelta"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " tranpose of a Dirac matrix"
+ " Kronecker delta in the Dirac space"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.66068564001637*^9, 3.66068564547943*^9}},
- CellID->264840152],
+ CellID->1098539957],
Cell[TextData[{
Cell[TextData[ButtonBox["DiracSigma",
@@ -363,56 +380,13 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" denotes ",
Cell[BoxData[
- RowBox[{
- FractionBox["I", "2"], "[",
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"], ",",
- SuperscriptBox["\[Gamma]", "\[Nu]"]}], "]"}]], "InlineFormula"]
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660685930503107*^9, 3.660685958751593*^9}},
- CellID->1624859494],
-
-Cell[TextData[{
- Cell[TextData[ButtonBox["DiracSpinor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/DiracSpinor"]], "InlineFunctionSans"],
- ", ",
- Cell[TextData[ButtonBox["Spinor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Spinor"]], "InlineFunctionSans"],
- ", ",
- Cell[TextData[ButtonBox["SpinorU",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SpinorU"]], "InlineFunctionSans"],
- ", ",
- Cell[TextData[ButtonBox["SpinorUBar",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SpinorUBar"]], "InlineFunctionSans"],
- ", ",
- Cell[TextData[ButtonBox["SpinorV",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SpinorV"]], "InlineFunctionSans"],
- ", ",
- Cell[TextData[ButtonBox["SpinorVBar",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SpinorVBar"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes spinors"
+ RowBox[{"I", "/",
+ RowBox[{"2", "[",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"], ",",
+ SuperscriptBox["\[Gamma]", "\[Nu]"]}], "]"}]}]], "InlineFormula"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660686021686049*^9, 3.660686036373721*^9}, {
- 3.6607265092680893`*^9, 3.66072651202944*^9}},
- CellID->307637975],
+ CellID->1624859494],
Cell[TextData[{
Cell[TextData[ButtonBox["Eps",
@@ -427,23 +401,28 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/LCD"]], "InlineFunctionSans"],
", ",
- Cell[TextData[ButtonBox["LeviCivita",
+ Cell[TextData[ButtonBox["CLC",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/LeviCivita"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/CLC"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CLCD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CLCD"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash] ", "GuideEmDash"],
"totally antisymmetric epsilon (Levi-Civita) tensor"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606861221227837`*^9, 3.6606861459183187`*^9}, {
- 3.660686466916157*^9, 3.660686468639553*^9}},
CellID->1680708588],
Cell[TextData[{
+ Cell[TextData[ButtonBox["EpsilonUV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsilonUV"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["EpsilonIR",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsilonIR"]], "InlineFunctionSans"],
+ ", ",
Cell[TextData[ButtonBox["Epsilon",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Epsilon"]], "InlineFunctionSans"],
@@ -451,12 +430,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" \[Epsilon] from dimensional regularization"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660686174501232*^9, 3.6606861888609867`*^9}},
CellID->1891570253],
Cell[TextData[{
@@ -472,15 +445,23 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Lorentz index"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606862270926743`*^9, 3.660686287476725*^9}, {
- 3.660686341308567*^9, 3.660686344212399*^9}},
CellID->1483552361],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ExplicitDiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExplicitDiracIndex"]],
+ "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracIndex"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " Dirac index"
+}], "GuideText",
+ CellID->1133806213],
+
Cell[TextData[{
Cell[TextData[ButtonBox["ExplicitSUNIndex",
BaseStyle->"Link",
@@ -494,14 +475,6 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"SU(N) adjoint index"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606862270926743`*^9, 3.660686287476725*^9}, {
- 3.660686341308567*^9, 3.660686344212399*^9}, {3.660686389300864*^9,
- 3.66068639708391*^9}},
CellID->476236246],
Cell[TextData[{
@@ -516,14 +489,6 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"SU(N) fundamental index"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606862270926743`*^9, 3.660686287476725*^9}, {
- 3.660686341308567*^9, 3.660686344212399*^9}, {3.660686389300864*^9,
- 3.660686407020059*^9}},
CellID->2139347147],
Cell[TextData[{
@@ -531,6 +496,18 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FAD"]], "InlineFunctionSans"],
", ",
+ Cell[TextData[ButtonBox["SFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SFAD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CFAD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["GFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GFAD"]], "InlineFunctionSans"],
+ ", ",
Cell[TextData[ButtonBox["FeynAmpDenominator",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]],
@@ -539,14 +516,22 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" denominator of Feynman amplitudes "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606862270926743`*^9, 3.660686287476725*^9}},
CellID->1131303773],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DCHN"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChain"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] ", "GuideEmDash"],
+ "a Dirac chain with explicit open Dirac indices"
+}], "GuideText",
+ CellID->1183747723],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCPartialD",
BaseStyle->"Link",
@@ -572,21 +557,19 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" partial derivatives acting on operators"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725010662611*^9, 3.6607250380876093`*^9}, {
- 3.660725099856341*^9, 3.6607251010066547`*^9}, {3.660725225590807*^9,
- 3.660725240637322*^9}},
CellID->1476055339],
Cell[TextData[{
- Cell[TextData[ButtonBox["FourVector",
+ Cell[TextData[ButtonBox["FCTopology",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FourVector"]], "InlineFunctionSans"],
- ", ",
+ ButtonData->"paclet:FeynCalc/ref/FCTopology"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of a loop integral family topology"
+}], "GuideText",
+ CellID->351247141],
+
+Cell[TextData[{
Cell[TextData[ButtonBox["FV",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FV"]], "InlineFunctionSans"],
@@ -602,13 +585,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" representation of 4-vectors"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6606864407889433`*^9, 3.660686446580234*^9}, {
- 3.660724813728554*^9, 3.660724828264448*^9}},
CellID->495428205],
Cell[TextData[{
@@ -619,12 +595,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" name of a gauge field"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607249357351027`*^9, 3.660724938238369*^9}},
CellID->1403563110],
Cell[TextData[{
@@ -635,12 +605,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" gauge parameter \[Xi]"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660724945254963*^9, 3.660724950974524*^9}},
CellID->1275284258],
Cell[TextData[{
@@ -651,61 +615,43 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"name of a gluon field"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607249644923267`*^9, 3.6607249686222153`*^9}},
CellID->1257907745],
Cell[TextData[{
- Cell[TextData[ButtonBox["Gstrong",
+ Cell[TextData[ButtonBox["KD",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Gstrong"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/KD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["KDD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/KDD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["KDE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/KDE"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " QCD coupling constant"
+ " representation of the Cartesian Kronecker delta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660724982078603*^9, 3.6607249882013474`*^9}},
- CellID->1005983702],
+ CellID->279506458],
Cell[TextData[{
Cell[TextData[ButtonBox["Li2",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Li2"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " dilog function"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725253149151*^9, 3.660725255508046*^9}},
- CellID->832103768],
-
-Cell[TextData[{
+ ", ",
Cell[TextData[ButtonBox["Li3",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Li3"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["Li4",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Li4"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " trilog function"
+ " polylogarithms of different weghts"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725253149151*^9, 3.660725271236425*^9}},
- CellID->431072089],
+ CellID->1843949061],
Cell[TextData[{
Cell[TextData[ButtonBox["Momentum",
@@ -713,22 +659,11 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/Momentum"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " internal representation of momenta"
+ " internal representation of 4-momenta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725253149151*^9, 3.660725271236425*^9}, {
- 3.6607259941678667`*^9, 3.660725998575553*^9}},
CellID->316776695],
Cell[TextData[{
- Cell[TextData[ButtonBox["MetricTensor",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MetricTensor"]], "InlineFunctionSans"],
- ", ",
Cell[TextData[ButtonBox["MT",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/MT"]], "InlineFunctionSans"],
@@ -744,13 +679,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" representation of the metric tensor"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725291180572*^9, 3.66072532572503*^9}, {
- 3.660725847785334*^9, 3.6607258486573753`*^9}},
CellID->651468345],
Cell[TextData[{
@@ -761,14 +689,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" denotes the number of flavors"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725253149151*^9, 3.660725271236425*^9}, {
- 3.6607259941678667`*^9, 3.660725998575553*^9}, {3.660726042319613*^9,
- 3.660726048567294*^9}, {3.660727642549692*^9, 3.6607276431732903`*^9}},
CellID->1386416972],
Cell[TextData[{
@@ -778,16 +698,34 @@ Cell[TextData[{
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" special pairing used in the internal representation to represent the \
-metric, 4-vectors or scalar products"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.66072586362116*^9, 3.660725876880106*^9}},
+metric, scalar products or 4-vectors"
+}], "GuideText",
CellID->1889374617],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigma"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " internal representation of Pauli matrices"
+}], "GuideText",
+ CellID->1326672219],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliEta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliEta"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["PauliXi",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliXi"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Pauli spinors"
+}], "GuideText",
+ CellID->339455499],
+
Cell[TextData[{
Cell[TextData[ButtonBox["Polarization",
BaseStyle->"Link",
@@ -796,13 +734,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" internal representation of polarizations"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725253149151*^9, 3.660725271236425*^9}, {
- 3.6607259941678667`*^9, 3.660726007343363*^9}},
CellID->1384558840],
Cell[TextData[{
@@ -814,12 +745,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" polarization vector"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725910144628*^9, 3.660725913351838*^9}},
CellID->2003827822],
Cell[TextData[{
@@ -831,12 +756,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" a special distribution"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725943160453*^9, 3.6607259467357273`*^9}},
CellID->827330458],
Cell[TextData[{
@@ -848,17 +767,25 @@ Cell[TextData[{
Cell[TextData[ButtonBox["PD",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/PD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["StandardPropagatorDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/StandardPropagatorDenominator"]],
+ "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["CartesianPropagatorDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianPropagatorDenominator"]],
+ "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["GenericPropagatorDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/GenericPropagatorDenominator"]],
+ "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" internal representation of propagator denominators"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660725910144628*^9, 3.660725913351838*^9}, {
- 3.660726072743157*^9, 3.660726102723506*^9}},
CellID->1486910634],
Cell[TextData[{
@@ -869,12 +796,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" generic name of a quantum field"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726151887074*^9, 3.660726159094552*^9}},
CellID->1015009742],
Cell[TextData[{
@@ -885,13 +806,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" \[Mu] scale in dimensional regularization"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726151887074*^9, 3.660726159094552*^9}, {
- 3.6607262415343113`*^9, 3.660726256054014*^9}},
CellID->146220986],
Cell[TextData[{
@@ -906,13 +820,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Kronecker delta for adjoint SU(N) indices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726291813901*^9, 3.660726305293376*^9}, {
- 3.660726618931054*^9, 3.660726619432239*^9}},
CellID->522984542],
Cell[TextData[{
@@ -927,15 +834,39 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Kronecker delta for fundamental SU(N) indices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726291813901*^9, 3.660726320205372*^9},
- 3.6607267359325247`*^9},
CellID->1059337536],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SI",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SI"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SID",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SID"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SIE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SIE"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SIS",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SIS"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SISD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SISD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SISE",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SISE"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " external representation of Pauli matrices with Lorentz indices or Pauli \
+matrices contracted to 4-momenta"
+}], "GuideText",
+ CellID->1616434352],
+
Cell[TextData[{
Cell[TextData[ButtonBox["SmallDelta",
BaseStyle->"Link",
@@ -948,12 +879,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" denotes some small positive numbers"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726361989624*^9, 3.660726372753294*^9}},
CellID->137238398],
Cell[TextData[{
@@ -964,22 +889,58 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" small variable to be used as a regulator in PaVe functions"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726393293583*^9, 3.660726413708804*^9}},
CellID->590785021],
Cell[TextData[{
- Cell[TextData[ButtonBox["SP",
+ Cell[TextData[ButtonBox["Spinor",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SP"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/Spinor"]], "InlineFunctionSans"],
", ",
- Cell[TextData[ButtonBox["SPD",
+ Cell[TextData[ButtonBox["SpinorU",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SPD"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/SpinorU"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorUBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBar"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorV",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorV"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorVBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBar"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorUD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorUBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorUBarD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorVD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVD"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SpinorVBarD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorVBarD"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes Dirac spinors"
+}], "GuideText",
+ CellID->307637975],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SP"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["SPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SPD"]], "InlineFunctionSans"],
", ",
Cell[TextData[ButtonBox["SPE",
BaseStyle->"Link",
@@ -988,13 +949,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" denotes scalar products of 4-momenta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.660726440933383*^9, 3.6607264587968273`*^9}, {
- 3.660726489197226*^9, 3.6607264901649857`*^9}},
CellID->305275299],
Cell[TextData[{
@@ -1008,14 +962,6 @@ Cell[TextData[{
SubscriptBox["d", "abc"]], "InlineFormula"],
" in SU(N)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607265588125277`*^9, 3.66072660645157*^9}, {
- 3.6607266404116087`*^9, 3.660726644619417*^9}, {3.6607267080678473`*^9,
- 3.660726710854051*^9}},
CellID->1136659773],
Cell[TextData[{
@@ -1029,13 +975,6 @@ Cell[TextData[{
SubscriptBox["f", "abc"]], "InlineFormula"],
" in SU(N)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607265588125277`*^9, 3.660726603299541*^9}, {
- 3.660726694826408*^9, 3.660726717300178*^9}},
CellID->920034572],
Cell[TextData[{
@@ -1045,18 +984,9 @@ Cell[TextData[{
" ",
StyleBox["\[LongDash] number of colors ", "GuideEmDash"],
Cell[BoxData[
- SubscriptBox["N", "c"]], "InlineFormula",
- FormatType->"StandardForm"],
+ SubscriptBox["N", "c"]], "InlineFormula"],
"in SU(N)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607265588125277`*^9, 3.660726603299541*^9}, {
- 3.660726694826408*^9, 3.660726717300178*^9}, {3.660726780979018*^9,
- 3.6607267894109287`*^9}},
CellID->1328328343],
Cell[TextData[{
@@ -1071,21 +1001,58 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
Cell[BoxData[
SubscriptBox[
- SuperscriptBox["T", "a"], "ij"]], "InlineFormula",
- FormatType->"StandardForm"],
+ SuperscriptBox["T", "a"], "ij"]], "InlineFormula"],
StyleBox[" generator ", "GuideEmDash"],
"of SU(N) in the fundamental representation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607265588125277`*^9, 3.660726603299541*^9}, {
- 3.660726694826408*^9, 3.660726717300178*^9}, {3.660726780979018*^9,
- 3.6607268583220787`*^9}},
CellID->1428923217],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["TC",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TC"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes the temporal component of a 4-vector, e.g. ",
+ Cell[BoxData[
+ SuperscriptBox["p", "0"]], "InlineFormula"]
+}], "GuideText",
+ CellID->1810653371],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["TGA",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CGA"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes the temporal component of a Dirac matrix, i.e. ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "0"]], "InlineFormula"]
+}], "GuideText",
+ CellID->564637115],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["TemporalMomentum",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TemporalMomentum"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " internal representation of temporal components of 4-momenta"
+}], "GuideText",
+ CellID->579398612],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["TemporalPair",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TemporalPair"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " special pairing used in the internal representation to represent temporal \
+components of 4-vectors"
+}], "GuideText",
+ CellID->461177124],
+
Cell[TextData[{
Cell[TextData[ButtonBox["Tf",
BaseStyle->"Link",
@@ -1093,49 +1060,43 @@ Cell[TextData[{
" ",
StyleBox["\[LongDash] ", "GuideEmDash"],
Cell[BoxData[
- SubscriptBox["T", "F"]], "InlineFormula",
- FormatType->"StandardForm"],
+ SubscriptBox["T", "F"]], "InlineFormula"],
" group constant ",
StyleBox["i", "GuideEmDash"],
"n SU(N)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607265588125277`*^9, 3.660726603299541*^9}, {
- 3.660726694826408*^9, 3.660726717300178*^9}, {3.660726780979018*^9,
- 3.6607267894109287`*^9}, {3.660726924697864*^9, 3.660726933137542*^9}, {
- 3.660726966850278*^9, 3.660726966850363*^9}},
CellID->1763987334],
Cell[TextData[{
Cell[TextData[ButtonBox["Zeta2",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Zeta2"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["Zeta4",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Zeta4"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["Zeta6",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Zeta6"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["Zeta8",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Zeta8"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["Zeta10",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Zeta10"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " denotes ",
- Cell[BoxData[
- SubscriptBox["\[Zeta]", "2"]], "InlineFormula"]
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660685343945683*^9,
- 3.660685344785533*^9}, {3.6607269893537188`*^9, 3.660726994258456*^9}},
- CellID->1924638314]
-}, Closed]],
+ " Riemann zeta functions of different weghts"
+}], "GuideText",
+ CellID->495570479]
+}, Open ]],
Cell[CellGroupData[{
Cell["Basic functions", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6600619749746017`*^9, 3.660061996697213*^9}, {3.6600675568660383`*^9,
- 3.66006757837396*^9}},
CellID->218620916],
Cell[TextData[{
@@ -1148,13 +1109,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Cases"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9, {3.660324220219956*^9,
- 3.660324225812112*^9}},
CellID->1010301503],
Cell[TextData[{
@@ -1167,13 +1121,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Together"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9, {3.660324220219956*^9,
- 3.660324225812112*^9}},
CellID->1271388718],
Cell[TextData[{
@@ -1186,13 +1133,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Complement"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9, {3.660324220219956*^9,
- 3.660324225812112*^9}},
CellID->1736502128],
Cell[TextData[{
@@ -1210,12 +1150,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Collect"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9},
CellID->1287756566],
Cell[TextData[{
@@ -1226,13 +1160,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" defines data types"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.660062035212628*^9, 3.660062050048617*^9}, {
- 3.660067132787849*^9, 3.660067138053027*^9}, {3.660323545576874*^9,
- 3.66032355704276*^9}},
CellID->1747124358],
Cell[TextData[{
@@ -1245,15 +1172,20 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Expand"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9, {3.660324220219956*^9,
- 3.660324225812112*^9}},
CellID->1504394922],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ExpandAll2",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ExpandAll2"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[TextData[ButtonBox["ExpandAll",
+ BaseStyle->"Link",
+ ButtonData->"/ref/ExpandAll"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1363219802],
+
Cell[TextData[{
Cell[TextData[ButtonBox["Explicit",
BaseStyle->"Link",
@@ -1262,12 +1194,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" inserts explicit expressions for certain objects"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.6603236053468523`*^9,
- 3.660323609838052*^9}, {3.6603236651025763`*^9, 3.660323668789824*^9}},
CellID->1596546686],
Cell[TextData[{
@@ -1285,15 +1211,17 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Factor"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, {3.660323704340766*^9, 3.660323705075439*^9},
- 3.660323757888474*^9},
CellID->187460383],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCAbbreviate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCAbbreviate"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " introduces abbreviations"
+}], "GuideText",
+ CellID->250574594],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCAntiSymmetrize",
BaseStyle->"Link",
@@ -1302,16 +1230,71 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" antisymmetrizes with respect to the given variables"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9, {3.660324220219956*^9,
- 3.660324225812112*^9}, {3.660324434962124*^9, 3.660324448186789*^9},
- 3.660683675969205*^9},
CellID->333715746],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCDuplicateFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCDuplicateFreeQ"]],
+ "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[TextData[ButtonBox["DuplicateFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"/ref/DuplicateFreeQ"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1948712237],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCFactorOut",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCFactorOut"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " factor out the given prefactor"
+}], "GuideText",
+ CellID->457240651],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCCheckSyntax",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCheckSyntax"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " attempts to detect syntax errors in the input expressions"
+}], "GuideText",
+ CellID->1944469376],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCCheckVersion",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCheckVersion"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks the FeynCalc version"
+}], "GuideText",
+ CellID->999406468],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCCompareResults",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCompareResults"]],
+ "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " compares results of different calculations"
+}], "GuideText",
+ CellID->1139098210],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCGetNotebookDirectory",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetNotebookDirectory"]],
+ "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[TextData[ButtonBox["NotebookDirectory",
+ BaseStyle->"Link",
+ ButtonData->"/ref/NotebookDirectory"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->959045627],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCE",
BaseStyle->"Link",
@@ -1325,11 +1308,6 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"converts the expression to the external FeynCalc representation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591170990744333`*^9,
- 3.6591171071001472`*^9}, {3.6593761334711313`*^9, 3.659376168159514*^9}, {
- 3.660066773892817*^9, 3.660066784205843*^9}, {3.660323819957704*^9,
- 3.660323823212842*^9}, {3.6603238539304953`*^9, 3.660323869830174*^9}},
CellID->27396530],
Cell[TextData[{
@@ -1344,11 +1322,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" changes the printed output to an easy to read form."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.65937583456279*^9, 3.6593758612790728`*^9}, {
- 3.659376087242784*^9, 3.659376088016487*^9}, {3.660062077144836*^9,
- 3.660062093950714*^9}, {3.660323955497254*^9, 3.6603239884760227`*^9}},
CellID->1283386980],
Cell[TextData[{
@@ -1364,19 +1337,68 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"converts the expression to the internal FeynCalc representation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591170990744333`*^9,
- 3.6591171071001472`*^9}, {3.6593761334711313`*^9, 3.659376168159514*^9}, {
- 3.660066773892817*^9, 3.660066784205843*^9}, {3.660323819957704*^9,
- 3.660323823212842*^9}, {3.6603238539304953`*^9, 3.660323869830174*^9}, {
- 3.660324039284524*^9, 3.660324040363975*^9}},
CellID->2100021916],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCMakeIndex",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCMakeIndex"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " generates indices from strings (useful e.g. for QGRAF input)"
+}], "GuideText",
+ CellID->1710347762],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCPatternFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCPatternFreeQ"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains any patterns"
+}], "GuideText",
+ CellID->912750390],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCProgressBar",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCProgressBar"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " a simplistic progress bar"
+}], "GuideText",
+ CellID->639244384],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCReplaceAll",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCReplaceAll"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[TextData[ButtonBox["ReplaceAll",
+ BaseStyle->"Link",
+ ButtonData->"/ref/ReplaceAll"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1734464827],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCReplaceRepeated",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCReplaceRepeated"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[TextData[ButtonBox["ReplaceRepeated",
+ BaseStyle->"Link",
+ ButtonData->"/ref/ReplaceRepeated"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1126439252],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCSplit",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/FCSplit"]], "InlineFunctionSans"],
", ",
+ Cell[TextData[ButtonBox["FCProductSplit",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCProductSplit"]], "InlineFunctionSans"],
+ ", ",
Cell[TextData[ButtonBox["PartitHead",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/PartitHead"]], "InlineFunctionSans"],
@@ -1390,19 +1412,25 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/SelectNotFree"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " alternative to ",
+ " alternatives to ",
Cell[TextData[ButtonBox["Select",
BaseStyle->"Link",
ButtonData->"/ref/Select"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, {3.660684150727318*^9,
- 3.660684176743204*^9}, {3.660684215166634*^9, 3.660684237399208*^9},
- 3.660730109741976*^9},
CellID->898863791],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCSubsetQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSubsetQ"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " alternative to ",
+ Cell[TextData[ButtonBox["SubsetQ",
+ BaseStyle->"Link",
+ ButtonData->"/ref/SubsetQ"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1409575124],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCSymmetrize",
BaseStyle->"Link",
@@ -1410,14 +1438,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" symmetrizes with respect to the given variables"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9, {3.660324220219956*^9,
- 3.660324225812112*^9}, {3.660324434962124*^9, 3.660324448186789*^9}, {
- 3.660683664466333*^9, 3.660683681441082*^9}},
CellID->1647672763],
Cell[TextData[{
@@ -1431,10 +1451,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/FreeQ"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9},
CellID->683465492],
Cell[TextData[{
@@ -1448,10 +1464,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/ReleaseHold"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9},
CellID->1650215271],
Cell[TextData[{
@@ -1462,10 +1474,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" replaces expressions by abbreviations"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}, 3.660062130444875*^9, {3.660324099280199*^9,
- 3.6603241076473618`*^9}},
CellID->1498216592],
Cell[TextData[{
@@ -1479,10 +1487,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Map"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9},
CellID->253353205],
Cell[TextData[{
@@ -1493,11 +1497,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" memoization depending on the amount of free RAM"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, {3.660683867368712*^9,
- 3.660683878168182*^9}},
CellID->1212078011],
Cell[TextData[{
@@ -1511,10 +1510,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Length"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9},
CellID->178528196],
Cell[TextData[{
@@ -1525,11 +1520,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" gives overall numerical factor"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, {3.660683939160241*^9,
- 3.660683943103567*^9}},
CellID->1298957094],
Cell[TextData[{
@@ -1543,10 +1533,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/NumericQ"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9},
CellID->1374272511],
Cell[TextData[{
@@ -1560,10 +1546,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Power"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9},
CellID->1627933292],
Cell[TextData[{
@@ -1578,12 +1560,6 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"simplification of expressions with exponents"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, {3.66068407583892*^9,
- 3.6606840762588663`*^9}, {3.6606841082865458`*^9, 3.660684118103298*^9},
- 3.660730025712138*^9},
CellID->1708462303],
Cell[TextData[{
@@ -1601,12 +1577,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Series"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660323432819963*^9, 3.660323461133366*^9},
- 3.660323506133806*^9, 3.660323734597391*^9},
CellID->1659205566],
Cell[TextData[{
@@ -1624,11 +1594,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Solve"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, 3.6606837482982693`*^9, {
- 3.660684295118382*^9, 3.660684317517757*^9}},
CellID->1809157918],
Cell[TextData[{
@@ -1647,19 +1612,12 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" different summations"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}, {3.660684272542748*^9,
- 3.660684273110468*^9}, {3.660684334422124*^9, 3.660684353614984*^9}},
CellID->869117662]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
-Cell["Lorentz tensors", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9},
+Cell["Lorentz and Cartesian tensors", "GuideFunctionsSubsection",
CellID->385817707],
Cell[TextData[{
@@ -1670,21 +1628,27 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" amputates 4-vectors, Dirac matrices or Levi-Civita tensors"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}},
CellID->2009629793],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["CartesianToLorentz",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CartesianToLorentz"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrties certain Cartesian tensors in terms of Lorentz tensors"
+}], "GuideText",
+ CellID->912975989],
+
Cell[TextData[{
Cell[TextData[ButtonBox["ChangeDimension",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/ChangeDimension"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " changes dimension of Lorentz indices and momenta"
+ " changes dimension of Lorentz or Cartesian indices and momenta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}},
CellID->512359346],
Cell[TextData[{
@@ -1693,11 +1657,9 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/CompleteSquare"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " completes the square of a second order polynomial in the momentum x"
+ " completes the square of a second order polynomial in the momentum ",
+ Cell[BoxData["x"], "InlineFormula"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.659966060005329*^9, 3.659966116423707*^9}},
CellID->1524292158],
Cell[TextData[{
@@ -1706,12 +1668,51 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/Contract"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " contracts Lorentz indices of tensors and Dirac matrices"
+ " contracts Lorentz or Cartesian indices of tensors and Dirac matrices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}},
CellID->231212511],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DeclareFCTensor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DeclareFCTensor"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " declares the given head to be a tensor"
+}], "GuideText",
+ CellID->462667998],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DummyIndexFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DummyIndexFreeQ"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains dummy indices"
+}], "GuideText",
+ CellID->1666870466],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["EpsContract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsContract"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites products of Levi-Civita tensors in terms of scalar products"
+}], "GuideText",
+ CellID->1913592904],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["EpsContractFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/EpsContractFreeQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains products of LeviCivita tensors"
+}], "GuideText",
+ CellID->1678264313],
+
Cell[TextData[{
Cell[TextData[ButtonBox["EpsEvaluate",
BaseStyle->"Link",
@@ -1720,10 +1721,7 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" applies total antisymmetry and linearity to all Levi-Civita tensors"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}},
- CellID->1913592904],
+ CellID->1041255969],
Cell[TextData[{
Cell[TextData[ButtonBox["ExpandScalarProduct",
@@ -1734,11 +1732,19 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" expands scalar products of sums of momenta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}},
CellID->693139341],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCCanonicalizeDummyIndices",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCCanonicalizeDummyIndices"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " canonicalizes dummy indices"
+}], "GuideText",
+ CellID->530074450],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCClearScalarProducts",
BaseStyle->"Link",
@@ -1746,13 +1752,31 @@ Cell[TextData[{
"InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " removes all user-specific specific definitions of scalar products"
+ " removes all user-specific definitions of scalar products"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}},
CellID->343872275],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCGetDimensions",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetDimensions"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " returns the space-time dimensions of objects in the expression"
+}], "GuideText",
+ CellID->1454317304],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCPermuteMomentaRules",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCPermuteMomentaRules"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " generates rules for permutations of momenta"
+}], "GuideText",
+ CellID->458315879],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCRenameDummyIndices",
BaseStyle->"Link",
@@ -1760,13 +1784,44 @@ Cell[TextData[{
"InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " renames dummy Lorentz and SU(N) indices"
+ " renames dummy indices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591170990744333`*^9,
- 3.6591171071001472`*^9}},
CellID->548161550],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCReplaceMomenta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCReplaceMomenta"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " replaces momenta in the expression"
+}], "GuideText",
+ CellID->956858169],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCRerouteMomenta",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCRerouteMomenta"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " improves routing of the external momenta using momentum conservation"
+}], "GuideText",
+ CellID->1163869201],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCSchoutenBruteForce",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSchoutenBruteForce"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " brute force application of the Schouten identity to minimize the number of \
+terms"
+}], "GuideText",
+ CellID->1554099869],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FourDivergence",
BaseStyle->"Link",
@@ -1775,9 +1830,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" calculates partial derivative with respect to a 4-vector"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117185121663*^9,
- 3.659117210145059*^9}, {3.65937540009513*^9, 3.6593754009545593`*^9}},
CellID->987343741],
Cell[TextData[{
@@ -1788,22 +1840,35 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" calculates the Laplacian"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}},
CellID->1285601191],
Cell[TextData[{
- Cell[TextData[ButtonBox["MomentumCombine",
+ Cell[TextData[ButtonBox["FreeIndexFreeQ",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumCombine"]], "InlineFunctionSans"],
- ",",
- Cell[TextData[ButtonBox[" MomentumCombine2",
+ ButtonData->"paclet:FeynCalc/ref/FreeIndexFreeQ"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the expression contains free indices"
+}], "GuideText",
+ CellID->894822474],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["LorentzToCartesian",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/MomentumCombine"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/LorentzToCartesian"]],
+ "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " inverse operations to ",
+ " rewrties Lorentz tensors in terms of Cartesian tensors"
+}], "GuideText",
+ CellID->2030923756],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["MomentumCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/MomentumCombine"]], "InlineFunctionSans"],
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " inverse operation to ",
Cell[TextData[ButtonBox["MomentumExpand",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/MomentumExpand"]], "InlineFunctionSans"],
@@ -1813,10 +1878,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/ExpandScalarProduct"]],
"InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.659117430209364*^9, 3.659117491089279*^9}, {
- 3.659117549748453*^9, 3.659117561333036*^9}},
CellID->1809925827],
Cell[TextData[{
@@ -1831,9 +1892,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/Momentum"],
"[a+b+ ...]"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}},
CellID->344422616],
Cell[TextData[{
@@ -1852,9 +1910,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" like Pair but with local contraction properties"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591177169687862`*^9,
- 3.6591177344417343`*^9}},
CellID->2009219923],
Cell[TextData[{
@@ -1865,11 +1920,18 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" defines scalar products of 4-vectors"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117800085536*^9,
- 3.659117820572358*^9}, {3.6593754082122793`*^9, 3.659375408890279*^9}},
CellID->874103215],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["Schouten",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Schouten"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " applies Schouten identity (random guess)"
+}], "GuideText",
+ CellID->218430270],
+
Cell[TextData[{
Cell[TextData[ButtonBox["SetMandelstam",
BaseStyle->"Link",
@@ -1878,9 +1940,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" defines the Mandelstam variables"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375432416728*^9,
- 3.659375438172764*^9}},
CellID->579030092],
Cell[TextData[{
@@ -1891,11 +1950,18 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" defines an unspecified Lorentz tensor"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375465747943*^9,
- 3.659375472105674*^9}},
CellID->1156270314],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ThreeDivergence",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ThreeDivergence"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates partial derivative with respect to a 3-vector"
+}], "GuideText",
+ CellID->1174118505],
+
Cell[TextData[{
Cell[TextData[ButtonBox["TrickMandelstam",
BaseStyle->"Link",
@@ -1904,9 +1970,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" simplifies the expression by eliminating one of the Mandelstam variables"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6593755318507633`*^9,
- 3.659375548904402*^9}},
CellID->629389521],
Cell[TextData[{
@@ -1917,17 +1980,22 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" uncontracts Lorentz indices of tensors and Dirac matrices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6593755601464*^9,
- 3.6593755610647087`*^9}},
- CellID->715481727]
-}, Closed]],
+ CellID->715481727],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["UnDeclareFCTensor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/UnDeclareFCTensor"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " undeclares the given head to be a tensor"
+}], "GuideText",
+ CellID->397784278]
+}, Open ]],
Cell[CellGroupData[{
Cell["Dirac algebra", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}},
CellID->46643246],
Cell[TextData[{
@@ -1941,11 +2009,6 @@ Cell[TextData[{
SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
" matrices to the left or to the right"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}},
CellID->2131819227],
Cell[TextData[{
@@ -1956,10 +2019,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" substitutes products of 3 Dirac matrices by the Chisholm identity"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.65937583456279*^9, 3.6593758612790728`*^9}, {
- 3.659376087242784*^9, 3.659376088016487*^9}},
CellID->1211971239],
Cell[TextData[{
@@ -1970,9 +2029,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" applies the Dirac equation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}},
CellID->333117850],
Cell[TextData[{
@@ -1986,10 +2042,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracGammaExpand"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}},
CellID->615769661],
Cell[TextData[{
@@ -2001,10 +2053,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" expands sums of momenta contracted with Dirac matrices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9},
CellID->1531032786],
Cell[TextData[{
@@ -2013,12 +2061,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/DiracOrder"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " orders the Dirac matrices in expression alphabetically"
+ " orders the Dirac matrices in expression lexicographically"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}},
CellID->688938496],
Cell[TextData[{
@@ -2030,11 +2074,22 @@ Cell[TextData[{
" reduces all 4-dimensional Dirac matrices to the standard basis \
(SPVAT-decomposition) "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591170990744333`*^9,
- 3.6591171071001472`*^9}, {3.6593761334711313`*^9, 3.659376168159514*^9}},
CellID->1740429042],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExpand"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " applies linearity to the arguments of ",
+ Cell[TextData[ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigma"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->766933896],
+
Cell[TextData[{
Cell[TextData[ButtonBox["DiracSigmaExplicit",
BaseStyle->"Link",
@@ -2047,10 +2102,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DiracSigma"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117185121663*^9,
- 3.659117210145059*^9}, {3.65937540009513*^9, 3.6593754009545593`*^9}, {
- 3.659376188832139*^9, 3.659376207898769*^9}},
CellID->297775359],
Cell[TextData[{
@@ -2062,11 +2113,41 @@ Cell[TextData[{
" simplifies products of Dirac matrices and expands non-commutative \
products"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}},
CellID->255459663],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute5"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " as ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "6"], "-",
+ SuperscriptBox["\[Gamma]", "7"]}]], "InlineFormula"]
+}], "GuideText",
+ CellID->1930796468],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSubstitute67"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " inserts explicit definitions of the chirality projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"]
+}], "GuideText",
+ CellID->859911226],
+
Cell[TextData[{
Cell[TextData[ButtonBox["DiracTrace",
BaseStyle->"Link",
@@ -2075,11 +2156,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" computes traces of Dirac matrices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.659117430209364*^9, 3.659117491089279*^9}, {
- 3.659117549748453*^9, 3.659117561333036*^9}, {3.659376330987714*^9,
- 3.6593763440561047`*^9}},
CellID->1463755561],
Cell[TextData[{
@@ -2091,10 +2167,6 @@ Cell[TextData[{
" contracts Dirac matrices with each other and performs several \
simplifications but no expansions"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}, {
- 3.659376369131332*^9, 3.659376386735157*^9}},
CellID->1334035786],
Cell[TextData[{
@@ -2106,24 +2178,171 @@ Cell[TextData[{
" substitutes Chisholm identity for a Dirac matrix contracted with a \
Levi-Civita tensor"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591177169687862`*^9,
- 3.6591177344417343`*^9}, {3.659376401427566*^9, 3.659376441905574*^9}},
CellID->525715973],
Cell[TextData[{
- Cell[TextData[ButtonBox["Schouten",
+ Cell[TextData[ButtonBox["FCCCT",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/Schouten"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/FCCCT"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["FCChargeConjugateTransposed",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCChargeConjugateTransposed"]],
+ "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " applies Schouten identity"
+ " transposes chains of Dirac matrices and applies change conjugation, e.g. \
+",
+ Cell[BoxData["x"], "InlineFormula"],
+ " becomes ",
+ Cell[BoxData[
+ RowBox[{"C", " ",
+ SuperscriptBox["x", "T"],
+ SuperscriptBox["C",
+ RowBox[{"-", "1"}]]}]], "InlineFormula"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117800085536*^9,
- 3.659117820572358*^9}, {3.6593754082122793`*^9, 3.659375408890279*^9}, {
- 3.6593764610027122`*^9, 3.6593764651450033`*^9}},
- CellID->218430270],
+ CellID->731234667],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCDiracIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCDiracIsolate"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Dirac matrices and spinors into specified heads "
+}], "GuideText",
+ CellID->264220763],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCGetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetDiracGammaScheme"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " shows the current scheme for treating Dirac matrices in dimensional \
+regularization."
+}], "GuideText",
+ CellID->1841016351],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainJoin"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["FCFADiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCFADiracChainJoin"]],
+ "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainCombine"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainExpand"]],
+ "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracChainFactor"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " manipulations of matrix chains with explicit Dirac indices"
+}], "GuideText",
+ CellID->2051310471],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCSetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetDiracGammaScheme"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " sets the current scheme for treating Dirac matrices in dimensional \
+regularization."
+}], "GuideText",
+ CellID->1516554292],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SirlinSimplify"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " applies Sirlin's relations to products of spinor chains"
+}], "GuideText",
+ CellID->599004464],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SpinorChainChiralSplit",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainChiralSplit"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " introduces chirality projectors in spinor chains free of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"]
+}], "GuideText",
+ CellID->249077307],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SpinorChainTranspose",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTranspose"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " tranposes a closed spinor chains"
+}], "GuideText",
+ CellID->666948297],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SpinorChainTrick"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " simplifies products of spinor chains"
+}], "GuideText",
+ CellID->544222991],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracGamma67"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " replaces ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "2"}],
+ RowBox[{"(",
+ RowBox[{"1", "\[PlusMinus]",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}]}]], "InlineFormula"],
+ " with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]",
+ RowBox[{"6", "/", "7"}]]], "InlineFormula"]
+}], "GuideText",
+ CellID->829753496],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ToDiracSigma",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToDiracSigma"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " inverse operation to ",
+ Cell[TextData[ButtonBox["DiracSigmaExplicit",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSigmaExplicit"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->803577072],
Cell[TextData[{
Cell[TextData[ButtonBox["ToLarin",
@@ -2138,18 +2357,100 @@ Cell[TextData[{
SuperscriptBox["\[Gamma]", "5"]}]], "InlineFormula"],
" according to the Larin scheme"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375432416728*^9,
- 3.659375438172764*^9}, {3.659376487947612*^9, 3.659376529721629*^9}},
CellID->1707494307]
-}, Closed]],
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Pauli algebra", "GuideFunctionsSubsection",
+ CellID->1019637263],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCGetPauliSigmaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCGetPauliSigmaScheme"]],
+ "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["FCSetPauliSigmaScheme",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCSetPauliSigmaScheme"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " specifies the threatment of Pauli matrices in dimensional regularization"
+}], "GuideText",
+ CellID->1574223047],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCPauliIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCPauliIsolate"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Pauli matrices and spinors into specified heads "
+}], "GuideText",
+ CellID->1157786320],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliOrder",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliOrder"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " orders the Pauli matrices in expression lexicographically"
+}], "GuideText",
+ CellID->1399324995],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliSigmaCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigmaCombine"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " inverse operation to ",
+ Cell[TextData[ButtonBox["PauliSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigmaExpand"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->552290354],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSigmaExpand"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " expands sums of momenta contracted with Pauli matrices"
+}], "GuideText",
+ CellID->719502163],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliSimplify",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliSimplify"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " simplifies products of Pauli matrices and expands non-commutative \
+products"
+}], "GuideText",
+ CellID->88133699],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["PauliTrick",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PauliTrick"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " contracts Pauli matrices with each other and performs several \
+simplifications but no expansions"
+}], "GuideText",
+ CellID->1853386914]
+}, Open ]],
Cell[CellGroupData[{
Cell["Algebra of non-commutative objects", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6600619749746017`*^9, 3.660061996697213*^9}, 3.660727136976419*^9},
CellID->1113739100],
Cell[TextData[{
@@ -2160,11 +2461,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" defines an anti-commutator"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}},
CellID->1482543113],
Cell[TextData[{
@@ -2179,12 +2475,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" multiple simplifications for Dirac and SU(N) algebra"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.660062035212628*^9, 3.660062050048617*^9}, {
- 3.660067132787849*^9, 3.660067138053027*^9}},
CellID->1937939922],
Cell[TextData[{
@@ -2195,10 +2485,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" defines a commutator"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}},
CellID->526201837],
Cell[TextData[{
@@ -2217,11 +2503,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/AntiCommutator"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}},
CellID->369276061],
Cell[TextData[{
@@ -2231,12 +2512,8 @@ Cell[TextData[{
"InlineFunctionSans"],
" ",
StyleBox["\[LongDash] ", "GuideEmDash"],
- "declares non-commutative objects"
+ "declares noncommutative objects"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591170990744333`*^9,
- 3.6591171071001472`*^9}, {3.6593761334711313`*^9, 3.659376168159514*^9}, {
- 3.660066773892817*^9, 3.660066784205843*^9}},
CellID->795497081],
Cell[TextData[{
@@ -2251,11 +2528,6 @@ Cell[TextData[{
ButtonData->"/ref/Dot"]], "InlineFunctionSans"],
" products"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.65937583456279*^9, 3.6593758612790728`*^9}, {
- 3.659376087242784*^9, 3.659376088016487*^9}, {3.660062077144836*^9,
- 3.660062093950714*^9}},
CellID->284457576],
Cell[TextData[{
@@ -2267,11 +2539,38 @@ Cell[TextData[{
" ",
"expands and reorders noncommutative terms "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}, 3.660062130444875*^9},
CellID->1861924278],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCMatrixIsolate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCMatrixIsolate"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Dirac, Pauli and SU(N) objects into specified heads "
+}], "GuideText",
+ CellID->1313775346],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCTraceExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCTraceExpand"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " expands traces using linearity wihtout calculating them"
+}], "GuideText",
+ CellID->570329733],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCTraceFactor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCTraceFactor"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " pulls c-numbers out of traces"
+}], "GuideText",
+ CellID->563873312],
+
Cell[TextData[{
Cell[TextData[ButtonBox["NonCommFreeQ",
BaseStyle->"Link",
@@ -2282,13 +2581,8 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/NonCommQ"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " checks if the expression contains non-commutative quantities"
+ " checks if the expression contains noncommutative quantities"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117185121663*^9,
- 3.659117210145059*^9}, {3.65937540009513*^9, 3.6593754009545593`*^9}, {
- 3.659376188832139*^9, 3.659376207898769*^9}, {3.660066817156439*^9,
- 3.660066833146699*^9}, {3.660066873675291*^9, 3.660066876567691*^9}},
CellID->1355907511],
Cell[TextData[{
@@ -2303,13 +2597,30 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" calculates Dirac and possibly also SU(N) traces"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.659117430209364*^9, 3.659117491089279*^9}, {
- 3.659117549748453*^9, 3.659117561333036*^9}, {3.659376330987714*^9,
- 3.6593763440561047`*^9}, {3.660067074332703*^9, 3.660067108393858*^9}},
CellID->1719074274],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["UnDeclareAntiCommutator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/UnDeclareAntiCommutator"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " removes definitions of anticommutators"
+}], "GuideText",
+ CellID->1938046161],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["UnDeclareCommutator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/UnDeclareCommutator"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " removes definitions of commutators"
+}], "GuideText",
+ CellID->899466843],
+
Cell[TextData[{
Cell[TextData[ButtonBox["UnDeclareNonCommutative",
BaseStyle->"Link",
@@ -2317,22 +2628,14 @@ Cell[TextData[{
"InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " undeclares non-commutative objects"
+ " undeclares noncommutative objects"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9}, {
- 3.6600669661363287`*^9, 3.660066969747725*^9}},
CellID->1309406098]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
Cell["SU(N) algebra", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6600619749746017`*^9, 3.660061996697213*^9}, {3.6600675568660383`*^9,
- 3.660067564032303*^9}},
CellID->121380019],
Cell[TextData[{
@@ -2343,11 +2646,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" calculates the color factor"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660067621677038*^9, 3.6600676279841413`*^9}},
CellID->821249197],
Cell[TextData[{
@@ -2359,31 +2657,16 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" contracts Kronecker deltas with adjoint color indices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.660062035212628*^9, 3.660062050048617*^9}, {
- 3.660067132787849*^9, 3.660067138053027*^9}, {3.660067643683642*^9,
- 3.660067681191443*^9}},
CellID->1593535902],
Cell[TextData[{
Cell[TextData[ButtonBox["SUNFDeltaContract",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/SUNDeltaContract"]],
- "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/SUNFDeltaContract"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" contracts Kronecker deltas with fundamental color indices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.660062035212628*^9, 3.660062050048617*^9}, {
- 3.660067132787849*^9, 3.660067138053027*^9}, {3.660067643683642*^9,
- 3.6600676970555143`*^9}},
CellID->210505242],
Cell[TextData[{
@@ -2398,11 +2681,6 @@ Cell[TextData[{
StyleBox["\[LongDash] ", "GuideEmDash"],
"simplifies expressions that contain SU(N) matrices "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.6600677309090767`*^9, 3.6600677604289227`*^9}},
CellID->1595578132],
Cell[TextData[{
@@ -2413,22 +2691,12 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" computes traces over SU(N) matrices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.660066657669406*^9, 3.66006672725428*^9}, {
- 3.6600671961004333`*^9, 3.660067196739399*^9}, {3.660067785195331*^9,
- 3.660067797284644*^9}},
CellID->1561361899]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
Cell["Loop integrals", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6593765631678143`*^9, 3.659376567623287*^9}, {3.659979662542192*^9,
- 3.6599796660962763`*^9}},
CellID->1137355821],
Cell[TextData[{
@@ -2439,12 +2707,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Passarino-Veltman 1-point integral (tadpole)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660041171291065*^9, 3.660041181235921*^9}},
CellID->484191528],
Cell[TextData[{
@@ -2455,12 +2717,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" partial fractions loop integrals (only very simple cases)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.659376585640555*^9, 3.659376592208912*^9}, {
- 3.659979723181094*^9, 3.659979735284017*^9}},
CellID->1364110476],
Cell[TextData[{
@@ -2471,11 +2727,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" partial fractions arbitrary loop integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.65937583456279*^9, 3.6593758612790728`*^9}, {
- 3.659376087242784*^9, 3.659376088016487*^9}, {3.6593766108640747`*^9,
- 3.659376623777948*^9}, {3.659979752939345*^9, 3.659979760178582*^9}},
CellID->863977560],
Cell[TextData[{
@@ -2498,12 +2749,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Passarino-Veltman 2-point integrals (bubbles)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660041171291065*^9, 3.660041231060339*^9}},
CellID->512824359],
Cell[TextData[{
@@ -2514,12 +2759,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Passarino-Veltman 3-point integrals (triangles)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660060476425185*^9, 3.660060485072611*^9}},
CellID->1115857362],
Cell[TextData[{
@@ -2530,13 +2769,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" Passarino-Veltman 4-point integrals (boxes)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9, 3.6600605112875967`*^9}},
-
CellID->143835829],
Cell[TextData[{
@@ -2551,12 +2783,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/B0"]], "InlineFunctionSans"],
" with respect to the external momentum"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605723946743`*^9, 3.660060612935883*^9}},
CellID->883206687],
Cell[TextData[{
@@ -2571,12 +2797,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/B1"]], "InlineFunctionSans"],
" with respect to the external momentum"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605723946743`*^9, 3.660060612935883*^9}},
CellID->439407944],
Cell[TextData[{
@@ -2591,78 +2811,166 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/ApartFF"]], "InlineFunctionSans"],
", works only on single loop integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}, {3.659376640775605*^9, 3.659376654967103*^9}, {
- 3.6599798849230413`*^9, 3.659979904850588*^9}},
CellID->1595882694],
Cell[TextData[{
- Cell[TextData[ButtonBox["FCIntegral",
+ Cell[TextData[ButtonBox["FCGramMatrix",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FCIntegral"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/FCGramMatrix"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " head of loop integrals"
+ " generates the Gram matrix from the given momenta"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.659376680753563*^9,
- 3.659376698052153*^9}, {3.65997995068524*^9, 3.6599799541141577`*^9}},
- CellID->333845561],
+ CellID->649428922],
Cell[TextData[{
- Cell[TextData[ButtonBox["FCLoopBasisIncompleteQ",
+ Cell[TextData[ButtonBox["FCGramDeterminant",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FCLoopBasisIncompleteQ"]],
- "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/FCGramDeterminant"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " checks if the propagators of a loop integral do not form a basis"
+ " calculates the Gram determinant"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}},
- CellID->1110841143],
+ CellID->1635464308],
Cell[TextData[{
- Cell[TextData[ButtonBox["FCLoopBasisOverdeterminedQ",
+ Cell[TextData[ButtonBox["FCHideEpsilon",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FCLoopBasisOverdeterminedQ"]],
- "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/FCHideEpsilon"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " checks if the propagators of a loop integral are linearly dependent"
+ " substitutes ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "\[Epsilon]"}], "-",
+ SubscriptBox["\[Gamma]", "E"], "+",
+ RowBox[{"Log",
+ RowBox[{"(",
+ RowBox[{"4", "\[Pi]"}], ")"}]}]}]], "InlineFormula"],
+ " with ",
+ Cell[BoxData["\[CapitalDelta]"], "InlineFormula"]
+}], "GuideText",
+ CellID->1893254602],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCShowEpsilon",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCShowEpsilon"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " substitutes ",
+ Cell[BoxData["\[CapitalDelta]"], "InlineFormula"],
+ " with ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"1", "/", "\[Epsilon]"}], "-",
+ SubscriptBox["\[Gamma]", "E"], "+",
+ RowBox[{"Log",
+ RowBox[{"(",
+ RowBox[{"4", "\[Pi]"}], ")"}]}]}]], "InlineFormula"]
+}], "GuideText",
+ CellID->157928460],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCIntegral",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCIntegral"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " head of loop integrals"
+}], "GuideText",
+ CellID->333845561],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisIncompleteQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisIncompleteQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the propagators of a loop integral do not form a basis"
+}], "GuideText",
+ CellID->1110841143],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisOverdeterminedQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisOverdeterminedQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the propagators of a loop integral are linearly dependent"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980067346792*^9,
- 3.6599800704770117`*^9}},
CellID->714568367],
Cell[TextData[{
- Cell[TextData[ButtonBox["FCLoopBasisFindCompletion",
+ Cell[TextData[ButtonBox["FCLoopBasisSplit",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FCLoopBasisFindCompletion"]],
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisSplit"]],
"InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " determines propagators that need to be included in the loop integral to \
-ensure that its propagators form a basis"
+ " checks if the loop integral factorizes into a product of separate integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980104077729*^9,
- 3.6599801281915216`*^9}},
CellID->251142308],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisGetSize",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisGetSize"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " returns the number of propagators in a topology"
+}], "GuideText",
+ CellID->316443304],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisPropagatorsToTopology",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisPropagatorsToTopology"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliary function that generates a list of propagators to describe a \
+topology"
+}], "GuideText",
+ CellID->298868397],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisCreateScalarProducts",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisCreateScalarProducts"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliary function that generates all possible loop momenta dependent \
+scalar products"
+}], "GuideText",
+ CellID->1836590028],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisExtract",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisExtract"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliart function that extracts the scalar products from a loop integral"
+}], "GuideText",
+ CellID->1180959289],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopBasisIntegralToPropagators",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopBasisIntegralToPropagators"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " auxiliary function that converts a loop integral into a list of propagators"
+}], "GuideText",
+ CellID->145221909],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCLoopCanonicalize",
BaseStyle->"Link",
@@ -2673,14 +2981,19 @@ Cell[TextData[{
" auxiliary function that canonicalizes free Lorentz indices of 1-loop \
integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980170138186*^9,
- 3.659980189247121*^9}},
CellID->1336937891],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopEikonalPropagatorFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopEikonalPropagatorFreeQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the integral contains eikonal propagators"
+}], "GuideText",
+ CellID->1371085902],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCLoopExtract",
BaseStyle->"Link",
@@ -2689,14 +3002,19 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" extracts loop integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.65998022089809*^9,
- 3.65998022544014*^9}},
CellID->1906541245],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopIBPReducableQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopIBPReducableQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the integral contains propagators raised to integer powers"
+}], "GuideText",
+ CellID->1217639042],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCLoopIsolate",
BaseStyle->"Link",
@@ -2705,14 +3023,88 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" wraps loop integrals into specified heads"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980248369177*^9,
- 3.659980257176857*^9}},
CellID->757005022],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopMixedIntegralQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopMixedIntegralQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the integral depends on both 4-vectors and 3-vectors"
+}], "GuideText",
+ CellID->659374071],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopMixedToCartesianAndTemporal",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopMixedToCartesianAndTemporal"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " eliminates the dependence on 4-vectors by trading them for temporal \
+components and 3-vectors."
+}], "GuideText",
+ CellID->246441420],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopNonIntegerPropagatorPowersFreeQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopNonIntegerPropagatorPowersFreeQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the integral has propagators raised to noninteger powers."
+}], "GuideText",
+ CellID->1419686490],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopPropagatorPowersCombine",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopPropagatorPowersCombine"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " combines same propagators into one raised to the corresponding integer \
+power"
+}], "GuideText",
+ CellID->1595269881],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopPropagatorPowersExpand",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopPropagatorPowersExpand"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites propagators raised to ineger powers as a products of \
+propagators."
+}], "GuideText",
+ CellID->253977384],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopSamePropagatorHeadsQ",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopSamePropagatorHeadsQ"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " checks if the integral contains different types of propagators."
+}], "GuideText",
+ CellID->1024109807],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FCLoopRemoveNegativePropagatorPowers",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FCLoopRemoveNegativePropagatorPowers"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites propagators rasied to negative integer powers as numerators."
+}], "GuideText",
+ CellID->2097424491],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FCLoopSolutionList",
BaseStyle->"Link",
@@ -2727,12 +3119,6 @@ Cell[TextData[{
"InlineFunctionSans"],
" "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.6599802871381483`*^9,
- 3.659980302970479*^9}},
CellID->284159366],
Cell[TextData[{
@@ -2744,12 +3130,6 @@ Cell[TextData[{
" splits the expressions into pieces that contain different types of loop \
integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.6599803326602783`*^9,
- 3.659980350076234*^9}},
CellID->1711785091],
Cell[TextData[{
@@ -2761,12 +3141,6 @@ Cell[TextData[{
" tensor reduction of multi-loop integrals (only for non-zero Gram \
determinants)"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980377752409*^9,
- 3.6599803980313168`*^9}},
CellID->777565246],
Cell[TextData[{
@@ -2778,14 +3152,24 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" combines products of propagators"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980437279376*^9,
- 3.659980452504985*^9}, {3.659980587860775*^9, 3.659980627296444*^9}},
CellID->127777310],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FeynAmpDenominatorExplicit",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominatorExplicit"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " rewrites ",
+ Cell[TextData[ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]],
+ "InlineFunctionSans"],
+ " in terms of scalar products and masses"
+}], "GuideText",
+ CellID->2037908586],
+
Cell[TextData[{
Cell[TextData[ButtonBox["FeynAmpDenominatorSimplify",
BaseStyle->"Link",
@@ -2796,12 +3180,6 @@ Cell[TextData[{
" simplifies loop integrals by doing shifts and detects integrals that \
vanish by symmetry."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980510377067*^9,
- 3.659980527783904*^9}},
CellID->164601953],
Cell[TextData[{
@@ -2817,12 +3195,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"],
"'s into products of single propagators"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.659980574556958*^9,
- 3.6599806368237762`*^9}},
CellID->1822975320],
Cell[TextData[{
@@ -2834,12 +3206,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" introduces Feynman parametrization for some 1-loop integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.6599807008079348`*^9,
- 3.6599807114362793`*^9}, {3.660040006447524*^9, 3.660040007733903*^9}},
CellID->727371440],
Cell[TextData[{
@@ -2850,12 +3216,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" ranslates TFI, TVI and TJI Tarcer-notation to FeynCalc notation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040060937771*^9,
- 3.660040077231886*^9}},
CellID->1377966861],
Cell[TextData[{
@@ -2865,21 +3225,15 @@ Cell[TextData[{
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" rewrites ",
- Cell[TextData[{
- ButtonBox["Gamma",
- BaseStyle->"Link",
- ButtonData->"/ref/Gamma"],
- "[n + m]"
- }], "InlineFunctionSans"],
- " where n is an integer"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.6600401446765337`*^9,
- 3.660040156668858*^9}, {3.660040367409254*^9, 3.660040369535551*^9},
- 3.660061895137766*^9},
+ Cell[TextData[Cell[BoxData[
+ FormBox[
+ RowBox[{"Gamma", "[",
+ RowBox[{"n", "+", "m"}], "]"}], TraditionalForm]], "InlineFormula"]],
+ "InlineFunctionSans"],
+ " where ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " is an integer"
+}], "GuideText",
CellID->1684971587],
Cell[TextData[{
@@ -2894,12 +3248,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" denote invariant Passarino-Veltman integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660041084022374*^9, 3.660041124974852*^9}},
CellID->1716225519],
Cell[TextData[{
@@ -2910,12 +3258,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" gives the Hill identity"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040194367309*^9,
- 3.660040197854924*^9}},
CellID->671837658],
Cell[TextData[{
@@ -2931,12 +3273,6 @@ Cell[TextData[{
ButtonData->"/ref/Hypergeometric2F1"]], "InlineFunctionSans"],
" functions"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}},
CellID->1636252055],
Cell[TextData[{
@@ -2952,12 +3288,6 @@ Cell[TextData[{
ButtonData->"/ref/Hypergeometric2F1"]], "InlineFunctionSans"],
"[a,b,c,d]"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040332361073*^9, 3.660040384407106*^9}},
CellID->1675333030],
Cell[TextData[{
@@ -2969,12 +3299,6 @@ Cell[TextData[{
StyleBox["\[LongDash] expresses hypergeometric functions by their series \
expansion", "GuideEmDash"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.6600404141372013`*^9,
- 3.660040439218997*^9}, {3.660040488559249*^9, 3.660040488720935*^9}},
CellID->373844893],
Cell[TextData[{
@@ -2987,12 +3311,6 @@ Cell[TextData[{
StyleBox[" hypergeometric functions by their definition in terms of a sum",
"GuideEmDash"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.66004048170944*^9, 3.660040509206464*^9}},
CellID->1693861457],
Cell[TextData[{
@@ -3007,64 +3325,8 @@ Cell[TextData[{
ButtonData->"/ref/Hypergeometric2F1"]], "InlineFunctionSans"],
" functions by their integral definition"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040605296949*^9, 3.660040621708107*^9}},
CellID->305598727],
-Cell[TextData[{
- Cell[TextData[ButtonBox["IFPDOff",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/IFPDOff"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " changes from ",
- Cell[TextData[ButtonBox["IFPD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/IFPD"]], "InlineFunctionSans"],
- " representation to ",
- Cell[TextData[ButtonBox["FeynAmpDenominator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]], "InlineFunctionSans"]
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040684343672*^9, 3.660040722660904*^9}, {
- 3.660040767937501*^9, 3.660040771890275*^9}},
- CellID->554636843],
-
-Cell[TextData[{
- Cell[TextData[ButtonBox["IFPDOn",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/IFPDOn"]], "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " changes from ",
- Cell[TextData[ButtonBox["FeynAmpDenominator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]],
- "InlineFunctionSans"],
- " representation to ",
- Cell[TextData[ButtonBox["IFPD",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/IFPD"]], "InlineFunctionSans"]
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040684343672*^9, 3.660040722660904*^9}, {
- 3.660040767937501*^9, 3.660040771890275*^9}, {3.660040825575098*^9,
- 3.660040832823546*^9}},
- CellID->1378134869],
-
Cell[TextData[{
Cell[TextData[ButtonBox["IntegrateByParts",
BaseStyle->"Link",
@@ -3078,30 +3340,17 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" integration by parts for particular Feynman parameter integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040884769636*^9, 3.6600408952571163`*^9}, {
- 3.6600410247758417`*^9, 3.660041053259265*^9}},
CellID->136967693],
Cell[TextData[{
- Cell[TextData[ButtonBox["OneLoop",
+ Cell[TextData[ButtonBox["NPointTo4Point",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/OneLoop"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/NPointTo4Point"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " calculates 1-loop Feynman diagram amplitudes"
+ " rewrites IR-finite 1-loop pentagons in terms of box integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600409393882713`*^9, 3.660040964570401*^9}},
- CellID->965355169],
+ CellID->842283836],
Cell[TextData[{
Cell[TextData[ButtonBox["OneLoopSimplify",
@@ -3111,12 +3360,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" simplifies 1-loop Feynman diagram amplitudes"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040974943404*^9, 3.66004097827907*^9}},
CellID->479804421],
Cell[TextData[{
@@ -3131,18 +3374,12 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"/ref/Hypergeometric2F1"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.660040645466316*^9, 3.6600406517801037`*^9}},
CellID->932281504],
Cell[TextData[{
- Cell[TextData[ButtonBox["PaveOrder",
+ Cell[TextData[ButtonBox["PaVeOrder",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/PaveOrder"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/PaVeOrder"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
" orders the arguments of ",
@@ -3151,13 +3388,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/D0"]], "InlineFunctionSans"],
" in a standard way"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660060671316168*^9, 3.660060697485465*^9}},
CellID->200996743],
Cell[TextData[{
@@ -3183,37 +3413,17 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/D0"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660060734300934*^9, 3.660060778213792*^9}},
CellID->1268052330],
Cell[TextData[{
- Cell[TextData[ButtonBox["PropagatorDenominatorExplicit",
+ Cell[TextData[ButtonBox["PaVeUVPart",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/PropagatorDenominatorExplicit"]],
- "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/PaVeUVPart"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " rewrites ",
- Cell[TextData[ButtonBox["FeynAmpDenominator",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]],
- "InlineFunctionSans"],
- " in terms of scalar products and masses"
+ " returns the UV-divergent pieces of arbitrary Passarino-Veltman functions."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660060823069096*^9, 3.660060867999896*^9}},
- CellID->2037908586],
+ CellID->2127045206],
Cell[TextData[{
Cell[TextData[ButtonBox["RussianTrick",
@@ -3223,33 +3433,8 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" derives IBP relations for 2-loop self-energy integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660060901480198*^9, 3.660060921284019*^9}},
CellID->334277431],
-Cell[TextData[{
- Cell[TextData[ButtonBox["ScalarProductCancel",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ScalarProductCancel"]],
- "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " cancels scalar products with propagators"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660060953460239*^9, 3.660060960263939*^9}},
- CellID->839585187],
-
Cell[TextData[{
Cell[TextData[ButtonBox["SimplifyDeltaFunction",
BaseStyle->"Link",
@@ -3262,15 +3447,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/DeltaFunction"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660061008261033*^9, 3.660061013347975*^9}, {
- 3.6600610436437263`*^9, 3.660061044864787*^9}, {3.6600611021211653`*^9,
- 3.6600611088896017`*^9}},
CellID->1574102580],
Cell[TextData[{
@@ -3288,18 +3464,13 @@ Cell[TextData[{
RowBox[{"(",
RowBox[{"2", "\[Pi]"}], ")"}], "n"]}]], "InlineFormula"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.66006106778195*^9, 3.660061099802722*^9}, {
- 3.660061149197035*^9, 3.6600611938285513`*^9}, {3.660061236980442*^9,
- 3.6600612801744013`*^9}},
CellID->1554094936],
Cell[TextData[{
+ Cell[TextData[ButtonBox["CTdec",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/CTdec"]], "InlineFunctionSans"],
+ ", ",
Cell[TextData[ButtonBox["Tdec",
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/Tdec"]], "InlineFunctionSans"],
@@ -3307,13 +3478,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" calculates tensor decomposition formulas for loop integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660061314176797*^9, 3.660061324814345*^9}},
CellID->1979909722],
Cell[TextData[{
@@ -3324,13 +3488,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" orders the arguments of some TFI functions in a standard way"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.66006133845433*^9, 3.660061340637938*^9}},
CellID->613914279],
Cell[TextData[{
@@ -3342,13 +3499,6 @@ Cell[TextData[{
" ",
"does a 1-loop tensor integral decomposition"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9, 3.6600605112875967`*^9},
- 3.660061385736773*^9},
CellID->1765084008],
Cell[TextData[{
@@ -3359,13 +3509,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" library of tensor integral decomposition formulas"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.6600614134359922`*^9, 3.660061416879509*^9}},
CellID->982645341],
Cell[TextData[{
@@ -3388,14 +3531,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/PlusDistribution"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660061472042507*^9, 3.660061490629407*^9}, {
- 3.660061531919285*^9, 3.660061563452361*^9}},
CellID->2096516005],
Cell[TextData[{
@@ -3411,13 +3546,6 @@ Cell[TextData[{
" converts 1- and 2-loop scalar self-energy integrals to the Tarcer \
notation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9,
- 3.6600605112875967`*^9}, {3.660061605057825*^9, 3.6600616555127563`*^9}},
CellID->1860467462],
Cell[TextData[{
@@ -3426,59 +3554,89 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/ToPaVe"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " converts scalar 1-loop integrals to Passarino Veltman scalar functions "
+ " converts scalar 1-loop integrals to Passarino-Veltman scalar functions "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9, 3.6600605112875967`*^9},
- 3.660061385736773*^9, {3.660061686091832*^9, 3.660061697306765*^9}},
CellID->242380689],
Cell[TextData[{
- Cell[TextData[ButtonBox["TrickIntegrate",
+ Cell[TextData[ButtonBox["ToPaVe2",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/TrickIntegrate"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/ToPaVe2"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " integration of some special distributions"
+ " rewrites Passarino-Veltman functions ",
+ Cell[TextData[ButtonBox["A0",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/A0"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["A00",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/A00"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["B0",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/B0"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["B1",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/B1"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["B00",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/B00"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["B11",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/B11"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["C0",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/C0"]], "InlineFunctionSans"],
+ " and ",
+ Cell[TextData[ButtonBox["D0",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/D0"]], "InlineFunctionSans"],
+ " as ",
+ ButtonBox["PaVe",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/PaVe"],
+ " objects."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9, 3.6600605112875967`*^9},
- 3.660061385736773*^9, {3.6600617757981033`*^9, 3.6600617886552353`*^9}},
- CellID->485753619],
+ CellID->94253587],
Cell[TextData[{
- Cell[TextData[ButtonBox["UVPart",
+ Cell[TextData[ButtonBox["ToSFAD",
BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/UVPart"]], "InlineFunctionSans"],
+ ButtonData->"paclet:FeynCalc/ref/ToSFAD"]], "InlineFunctionSans"],
" ",
StyleBox["\[LongDash]", "GuideEmDash"],
- " discards UV-finite integrals"
+ " converts ",
+ Cell[TextData[ButtonBox["FAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FAD"]], "InlineFunctionSans"],
+ "'s to ",
+ Cell[TextData[ButtonBox["SFAD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SFAD"]], "InlineFunctionSans"],
+ "'s "
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}, {
- 3.6599799944523706`*^9, 3.659980017615363*^9}, {3.660040228563959*^9,
- 3.6600402399076147`*^9}, {3.6600605042571507`*^9, 3.6600605112875967`*^9},
- 3.660061385736773*^9, {3.660061832105694*^9, 3.66006184897401*^9}},
- CellID->91877457]
-}, Closed]],
+ CellID->43212878],
-Cell[CellGroupData[{
-
-Cell["Export and import", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6593765631678143`*^9, 3.659376567623287*^9}},
- CellID->198236928],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["TrickIntegrate",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/TrickIntegrate"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " integration of some special distributions"
+}], "GuideText",
+ CellID->485753619]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Export and import", "GuideFunctionsSubsection",
+ CellID->198236928],
Cell[TextData[{
Cell[TextData[ButtonBox["FeynCalc2FORM",
@@ -3488,11 +3646,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" displays expression in FORM syntax"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.659376585640555*^9, 3.659376592208912*^9}},
CellID->1077126346],
Cell[TextData[{
@@ -3503,11 +3656,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" generates LaTeX"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.65937583456279*^9, 3.6593758612790728`*^9}, {
- 3.659376087242784*^9, 3.659376088016487*^9}, {3.6593766108640747`*^9,
- 3.659376623777948*^9}},
CellID->1438938037],
Cell[TextData[{
@@ -3518,9 +3666,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" translates teh FORM expression in file into FeynCalc notation"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}, {3.659376640775605*^9, 3.659376654967103*^9}},
CellID->1856631784],
Cell[TextData[{
@@ -3531,13 +3676,22 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" chops initial and final white space of a string"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.659376680753563*^9,
- 3.659376698052153*^9}},
CellID->440214481],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SMPToSymbol",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMPToSymbol"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " converts ",
+ Cell[TextData[ButtonBox["SMP",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SMP"]], "InlineFunctionSans"],
+ "'s to symbols"
+}], "GuideText",
+ CellID->849708221],
+
Cell[TextData[{
Cell[TextData[ButtonBox["Write2",
BaseStyle->"Link",
@@ -3547,20 +3701,12 @@ Cell[TextData[{
" writes the given settings in sequence followed by a newline to the \
specified output file"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.659376751718225*^9, 3.659376778189101*^9}},
CellID->390527761]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
Cell["Feynman rules and amplitudes", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.659376806948522*^9, 3.659376809302905*^9}, {3.65996637945457*^9,
- 3.659966390466487*^9}},
CellID->1448855878],
Cell[TextData[{
@@ -3573,48 +3719,8 @@ Cell[TextData[{
" ",
"3-gluon vertex in the background field gauge"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}, 3.659377024668138*^9},
CellID->594655451],
-Cell[TextData[{
- Cell[TextData[ButtonBox["ChargeConjugationMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChargeConjugationMatrix"]],
- "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " charge conjugation matrix"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, 3.659376836398978*^9, {3.659376938083646*^9,
- 3.6593769432399197`*^9}, {3.659966173244042*^9, 3.659966174165619*^9}},
- CellID->231184642],
-
-Cell[TextData[{
- Cell[TextData[ButtonBox["ChargeConjugationMatrixInv",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChargeConjugationMatrixInv"]],
- "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " inverse of ",
- Cell[TextData[ButtonBox["ChargeConjugationMatrix",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/ChargeConjugationMatrix"]],
- "InlineFunctionSans"]
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.659116584247678*^9, 3.659116635885686*^9}, {3.6591167945737467`*^9,
- 3.659116797583357*^9}, {3.65937583456279*^9, 3.6593758612790728`*^9}, {
- 3.659376087242784*^9, 3.659376088016487*^9}, {3.6593769777940893`*^9,
- 3.659376986217664*^9}},
- CellID->2057902261],
-
Cell[TextData[{
Cell[TextData[ButtonBox["ComplexConjugate",
BaseStyle->"Link",
@@ -3624,9 +3730,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" complex conjugates Feynman amplitudes"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375887903363*^9,
- 3.6593758921047897`*^9}, {3.6599662223023157`*^9, 3.659966233278023*^9}},
CellID->1847839027],
Cell[TextData[{
@@ -3637,11 +3740,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" generic covariant derivative"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.659966267800029*^9,
- 3.65996627285061*^9}},
CellID->2013380245],
Cell[TextData[{
@@ -3653,10 +3751,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" covariant field derivative"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.6599663032131767`*^9, 3.6599663082244263`*^9}},
CellID->2016043479],
Cell[TextData[{
@@ -3668,10 +3762,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" sums over physical polarizations of external massless vector bosons"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, 3.65911700607797*^9, {
- 3.659117038521891*^9, 3.659117057896707*^9}, {3.659376071051255*^9,
- 3.6593760976017523`*^9}, {3.65996635970056*^9, 3.6599663674189043`*^9}},
CellID->397456419],
Cell[TextData[{
@@ -3686,10 +3776,6 @@ Cell[TextData[{
ButtonData->"paclet:FeynCalc/ref/QuantumField"]], "InlineFunctionSans"],
"'s using the Leibniz rule"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591170990744333`*^9,
- 3.6591171071001472`*^9}, {3.6593761334711313`*^9, 3.659376168159514*^9}, {
- 3.659966431157195*^9, 3.659966454851845*^9}, 3.659966599707499*^9},
CellID->747107785],
Cell[TextData[{
@@ -3708,11 +3794,6 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData->"paclet:FeynCalc/ref/LeftRightPartialD2"]], "InlineFunctionSans"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117185121663*^9,
- 3.659117210145059*^9}, {3.65937540009513*^9, 3.6593754009545593`*^9}, {
- 3.659376188832139*^9, 3.659376207898769*^9}, {3.659966524513445*^9,
- 3.659966595586412*^9}},
CellID->599890035],
Cell[TextData[{
@@ -3723,10 +3804,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" patches FeynArts to be compatible with FeynCalc"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9},
- 3.659966653640254*^9, {3.659984425462306*^9, 3.659984434757062*^9}},
CellID->593077025],
Cell[TextData[{
@@ -3738,10 +3815,6 @@ Cell[TextData[{
" ",
"converts a FeynArts amplitude to FeynCalc"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117295534918*^9,
- 3.659117301800735*^9}, {3.659376279332294*^9, 3.6593762972447147`*^9},
- 3.659966653640254*^9},
CellID->1711779075],
Cell[TextData[{
@@ -3753,11 +3826,6 @@ Cell[TextData[{
" auxiliary function for a partial conversion of a FeynArts amplitude to \
FeynCalc."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.659117430209364*^9, 3.659117491089279*^9}, {
- 3.659117549748453*^9, 3.659117561333036*^9}, {3.659376330987714*^9,
- 3.6593763440561047`*^9}, {3.659966731003573*^9, 3.659966747511581*^9}},
CellID->1327458149],
Cell[TextData[{
@@ -3769,11 +3837,6 @@ Cell[TextData[{
" constructs Dirac traces out of squared ampliudes with external Dirac \
fermions."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}, {
- 3.659376369131332*^9, 3.659376386735157*^9}, {3.659966800042688*^9,
- 3.659966820660865*^9}},
CellID->2002786353],
Cell[TextData[{
@@ -3784,10 +3847,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" determines Feynman rules from Lagrangians"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591177169687862`*^9,
- 3.6591177344417343`*^9}, {3.659376401427566*^9, 3.659376441905574*^9}, {
- 3.659966870599478*^9, 3.659966895977743*^9}},
CellID->1230786365],
Cell[TextData[{
@@ -3798,11 +3857,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" field derivative"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117800085536*^9,
- 3.659117820572358*^9}, {3.6593754082122793`*^9, 3.659375408890279*^9}, {
- 3.6593764610027122`*^9, 3.6593764651450033`*^9}, {3.659979003056191*^9,
- 3.6599790153438187`*^9}},
CellID->837206947],
Cell[TextData[{
@@ -3815,10 +3869,6 @@ Cell[TextData[{
Cell[BoxData[
SuperscriptBox["F", "\[Mu]\[Nu]"]], "InlineFormula"]
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375432416728*^9,
- 3.659375438172764*^9}, {3.659376487947612*^9, 3.659376529721629*^9}, {
- 3.659979050429055*^9, 3.659979058381625*^9}},
CellID->1427392211],
Cell[TextData[{
@@ -3829,11 +3879,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
"functional derivative"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}, {
- 3.659376369131332*^9, 3.659376386735157*^9}, {3.659966800042688*^9,
- 3.659966820660865*^9}, 3.659979111009007*^9},
CellID->866592844],
Cell[TextData[{
@@ -3844,11 +3889,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" ghost propagator"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591177169687862`*^9,
- 3.6591177344417343`*^9}, {3.659376401427566*^9, 3.659376441905574*^9}, {
- 3.659966870599478*^9, 3.659966895977743*^9}, {3.659979139613963*^9,
- 3.659979142703264*^9}},
CellID->30813872],
Cell[TextData[{
@@ -3860,11 +3900,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" gluon ghost vertex"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117800085536*^9,
- 3.659117820572358*^9}, {3.6593754082122793`*^9, 3.659375408890279*^9}, {
- 3.6593764610027122`*^9, 3.6593764651450033`*^9}, {3.659979183024323*^9,
- 3.659979186617907*^9}},
CellID->660953776],
Cell[TextData[{
@@ -3875,10 +3910,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" gluon propagator"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375432416728*^9,
- 3.659375438172764*^9}, {3.659376487947612*^9, 3.659376529721629*^9}, {
- 3.659979210556514*^9, 3.659979214077533*^9}},
CellID->183769818],
Cell[TextData[{
@@ -3889,12 +3920,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" 1-loop gluon self-energy"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}, {
- 3.659376369131332*^9, 3.659376386735157*^9}, {3.659966800042688*^9,
- 3.659966820660865*^9}, {3.659979230580275*^9, 3.6599792352604513`*^9},
- 3.659979399110828*^9},
CellID->2139004592],
Cell[TextData[{
@@ -3905,11 +3930,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" 3- and 4-gluon vertices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591177169687862`*^9,
- 3.6591177344417343`*^9}, {3.659376401427566*^9, 3.659376441905574*^9}, {
- 3.659966870599478*^9, 3.659966895977743*^9}, {3.659979270838559*^9,
- 3.6599792799447737`*^9}},
CellID->819406206],
Cell[TextData[{
@@ -3920,28 +3940,8 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" sums over polarizations of vector bosons"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117800085536*^9,
- 3.659117820572358*^9}, {3.6593754082122793`*^9, 3.659375408890279*^9}, {
- 3.6593764610027122`*^9, 3.6593764651450033`*^9}, {3.6599793264488497`*^9,
- 3.659979334925282*^9}},
CellID->202849658],
-Cell[TextData[{
- Cell[TextData[ButtonBox["QCDFeynmanRuleConvention",
- BaseStyle->"Link",
- ButtonData->"paclet:FeynCalc/ref/QCDFeynmanRuleConvention"]],
- "InlineFunctionSans"],
- " ",
- StyleBox["\[LongDash]", "GuideEmDash"],
- " sign convention for QCD Feynman rules"
-}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375432416728*^9,
- 3.659375438172764*^9}, {3.659376487947612*^9, 3.659376529721629*^9}, {
- 3.6599793661038303`*^9, 3.6599793726319923`*^9}},
- CellID->1044703852],
-
Cell[TextData[{
Cell[TextData[ButtonBox["QuarkGluonVertex",
BaseStyle->"Link",
@@ -3951,11 +3951,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" quark gluon vertex"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}, {
- 3.659376369131332*^9, 3.659376386735157*^9}, {3.659966800042688*^9,
- 3.659966820660865*^9}, {3.659979392349732*^9, 3.659979396764011*^9}},
CellID->1894290270],
Cell[TextData[{
@@ -3966,11 +3961,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" quark propagator"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591177169687862`*^9,
- 3.6591177344417343`*^9}, {3.659376401427566*^9, 3.659376441905574*^9}, {
- 3.659966870599478*^9, 3.659966895977743*^9}, {3.659979428281844*^9,
- 3.659979430410935*^9}},
CellID->1081498198],
Cell[TextData[{
@@ -3982,12 +3972,22 @@ Cell[TextData[{
" ",
"scalar-scalar-gluon vertex"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117800085536*^9,
- 3.659117820572358*^9}, {3.6593754082122793`*^9, 3.659375408890279*^9}, {
- 3.6593764610027122`*^9, 3.6593764651450033`*^9}, 3.65997946073678*^9},
CellID->1449625308],
+Cell[TextData[{
+ Cell[TextData[ButtonBox["SquareAmplitude",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/SquareAmplitude"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " writes ",
+ Cell[BoxData[
+ RowBox[{"|", " ", "\[ScriptCapitalM]", " ",
+ SuperscriptBox["|", "2"]}]], "InlineFormula"],
+ " as a list of amplitude products"
+}], "GuideText",
+ CellID->390518825],
+
Cell[TextData[{
Cell[TextData[ButtonBox["SMP",
BaseStyle->"Link",
@@ -3996,10 +3996,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" substitutes symbols for various SM paremeters"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375432416728*^9,
- 3.659375438172764*^9}, {3.659376487947612*^9, 3.659376529721629*^9}, {
- 3.659979491596233*^9, 3.65997950026755*^9}},
CellID->1907820234],
Cell[TextData[{
@@ -4010,21 +4006,24 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" some SM vertices"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659117395010775*^9,
- 3.659117396645508*^9}, {3.6591176541678667`*^9, 3.659117678614196*^9}, {
- 3.659376369131332*^9, 3.659376386735157*^9}, {3.659966800042688*^9,
- 3.659966820660865*^9}, {3.6599795280331383`*^9, 3.659979530420363*^9}},
- CellID->1716995820]
-}, Closed]],
+ CellID->1716995820],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ToStandardMatrixElement",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ToStandardMatrixElement"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " wraps Dirac structures, color structures and polarization vectors with a \
+special head"
+}], "GuideText",
+ CellID->847406609]
+}, Open ]],
Cell[CellGroupData[{
Cell["Tables", "GuideFunctionsSubsection",
- CellChangeTimes->{{3.659116089530608*^9, 3.659116104448001*^9},
- 3.659116246619213*^9, {3.65937566684091*^9, 3.6593756701709137`*^9}, {
- 3.6600619749746017`*^9, 3.660061996697213*^9}, {3.6600675568660383`*^9,
- 3.660067592285407*^9}},
CellID->16428002],
Cell[TextData[{
@@ -4035,11 +4034,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" database of Feynman amplitudes"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.6591168244907846`*^9,
- 3.6591168286235943`*^9}, {3.659116858979171*^9, 3.659116872853922*^9}, {
- 3.659375925668168*^9, 3.659375966992425*^9}, {3.660062175001932*^9,
- 3.6600621794763527`*^9}, {3.660067866365831*^9, 3.660067872841845*^9}},
CellID->573273780],
Cell[TextData[{
@@ -4054,13 +4048,6 @@ Cell[TextData[{
OverscriptBox["MS", "_"]], "InlineFormula"],
" scheme"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.659375694499777*^9,
- 3.659375697868294*^9}, {3.659375746049945*^9, 3.659375749947781*^9}, {
- 3.659375785318116*^9, 3.659375789501054*^9}, {3.659375852430387*^9,
- 3.659375853476532*^9}, {3.660062035212628*^9, 3.660062050048617*^9}, {
- 3.660067132787849*^9, 3.660067138053027*^9}, {3.660067898456408*^9,
- 3.660067945283762*^9}},
CellID->58857743],
Cell[TextData[{
@@ -4071,11 +4058,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" saves or retrieves expressions from the database"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660067994396201*^9, 3.66006800692446*^9}},
CellID->2085845974],
Cell[TextData[{
@@ -4090,11 +4072,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" convolution of functions"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660684676508939*^9, 3.660684712135565*^9}},
CellID->113893828],
Cell[TextData[{
@@ -4105,11 +4082,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" database of counter terms."
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.6606847419313793`*^9, 3.660684749364154*^9}},
CellID->398578851],
Cell[TextData[{
@@ -4136,12 +4108,6 @@ Cell[TextData[{
ButtonData->"/ref/Gamma"]], "InlineFunctionSans"],
" functions"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660684781540256*^9, 3.660684821348604*^9}, {3.660684851795927*^9,
- 3.660684864039056*^9}},
CellID->1016459733],
Cell[TextData[{
@@ -4164,11 +4130,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" some integrals"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660684898003284*^9, 3.660684931755934*^9}},
CellID->1266157],
Cell[TextData[{
@@ -4179,11 +4140,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" inverse Mellin transform for some polynomials"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660684989850149*^9, 3.660684998554537*^9}},
CellID->1817035294],
Cell[TextData[{
@@ -4194,11 +4150,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" applies Kummer relations"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.66068503373899*^9, 3.6606850372380667`*^9}},
CellID->1052156503],
Cell[TextData[{
@@ -4209,11 +4160,6 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" database of Lagrangians"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.6606850692268476`*^9, 3.660685075498158*^9}},
CellID->1278270450],
Cell[TextData[{
@@ -4225,11 +4171,6 @@ Cell[TextData[{
" ",
"denotes Nielsen's polylogarithm"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9},
- 3.660685100725348*^9},
CellID->1690213129],
Cell[TextData[{
@@ -4248,11 +4189,6 @@ Cell[TextData[{
ButtonData->"/ref/PolyLog"]], "InlineFunctionSans"],
" functions under certain assumptions"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660685148938139*^9, 3.660685196393509*^9}},
CellID->1901226625],
Cell[TextData[{
@@ -4263,21 +4199,162 @@ Cell[TextData[{
StyleBox["\[LongDash]", "GuideEmDash"],
" database of splitting functiosn"
}], "GuideText",
- CellChangeTimes->{{3.659116526647481*^9, 3.659116531948105*^9}, {
- 3.6591166592136993`*^9, 3.65911672980119*^9}, {3.65911690315954*^9,
- 3.659116933740312*^9}, {3.659376018036332*^9, 3.659376045485579*^9},
- 3.659376094878495*^9, {3.660066608886417*^9, 3.6600666121454372`*^9}, {
- 3.660685213290331*^9, 3.660685218220524*^9}},
CellID->2052229439]
-}, Closed]],
+}, Open ]],
Cell[CellGroupData[{
-Cell["\t", "GuideDelimiter",
- CellID->311258892],
+Cell["Deprecated or legacy functions", "GuideFunctionsSubsection",
+ CellID->1393825317],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["AlphaStrong",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/AlphaStrong"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " ",
+ Cell[BoxData[
+ SubscriptBox["\[Alpha]", "s"]], "InlineFormula"],
+ " in QCD"
+}], "GuideText",
+ CellID->1235023741],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["AlphaFS",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/AlphaFS"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " fine-strucutre constant"
+}], "GuideText",
+ CellID->1076523595],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ChiralityProjector",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ChiralityProjector"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " denotes ",
+ Cell[BoxData[
+ SubscriptBox["P", "L"]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ SubscriptBox["P", "R"]], "InlineFormula"]
+}], "GuideText",
+ CellID->745071340],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["DiracMatrix",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracMatrix"]], "InlineFunctionSans"],
+ ", ",
+ Cell[TextData[ButtonBox["DiracSlash",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/DiracSlash"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of Dirac matrices and slashes"
+}], "GuideText",
+ CellID->878821469],
-Cell["XXXX . XXXX . ", "InlineGuideFunctionListing",
- CellID->58033752]
+Cell[TextData[{
+ Cell[TextData[ButtonBox["FourVector",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FourVector"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of 4-vectors"
+}], "GuideText",
+ CellID->2116157651],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["Gstrong",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/Gstrong"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " QCD coupling constant"
+}], "GuideText",
+ CellID->1005983702],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["IFPDOff",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/IFPDOff"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " changes from ",
+ Cell[TextData[ButtonBox["IFPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/IFPD"]], "InlineFunctionSans"],
+ " representation to ",
+ Cell[TextData[ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->554636843],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["IFPDOn",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/IFPDOn"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " changes from ",
+ Cell[TextData[ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/FeynAmpDenominator"]],
+ "InlineFunctionSans"],
+ " representation to ",
+ Cell[TextData[ButtonBox["IFPD",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/IFPD"]], "InlineFunctionSans"]
+}], "GuideText",
+ CellID->1378134869],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["LeviCivita",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/LeviCivita"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash] ", "GuideEmDash"],
+ "totally antisymmetric epsilon (Levi-Civita) tensor"
+}], "GuideText",
+ CellID->2081581299],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["MetricTensor",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/MetricTensor"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " representation of the metric tensor"
+}], "GuideText",
+ CellID->458785969],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["OneLoop",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/OneLoop"]], "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " calculates 1-loop Feynman diagram amplitudes"
+}], "GuideText",
+ CellID->965355169],
+
+Cell[TextData[{
+ Cell[TextData[ButtonBox["ScalarProductCancel",
+ BaseStyle->"Link",
+ ButtonData->"paclet:FeynCalc/ref/ScalarProductCancel"]],
+ "InlineFunctionSans"],
+ " ",
+ StyleBox["\[LongDash]", "GuideEmDash"],
+ " cancels scalar products with propagators"
+}], "GuideText",
+ CellID->839585187]
}, Open ]]
}, Open ]],
@@ -4289,8 +4366,7 @@ Cell["Tutorials", "GuideTutorialsSection",
Cell[TextData[Cell[TextData[ButtonBox["Short introduction",
BaseStyle->"Link",
ButtonData->
- "paclet:FeynCalc/ref/Intro"]], "InlineFunctionSans"]], "GuideTutorial",
- CellChangeTimes->{{3.664359733384458*^9, 3.664359780479166*^9}},
+ "paclet:FeynCalc/Tutorials/Intro"]], "InlineFunctionSans"]], "GuideTutorial",
CellID->806871991],
Cell["XXXX", "GuideTutorial",
@@ -4312,582 +4388,14 @@ Cell["XXXX", "GuideMoreAbout",
Cell["Related Links", "GuideRelatedLinksSection",
CellID->415694148]
},
-WindowSize->{1117, 889},
-WindowMargins->{{Automatic, 327}, {Automatic, -8}},
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+WindowSize->{1194, 889},
+WindowMargins->{{Automatic, 577}, {196, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "GuidePageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{}
-*)
-(*CellTagsIndex
-CellTagsIndex->{}
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[558, 20, 325, 14, 23, "History",
- CellID->1247902091],
-Cell[CellGroupData[{
-Cell[908, 38, 68, 1, 28, "CategorizationSection",
- CellID->1122911449],
-Cell[979, 41, 78, 2, 32, "Categorization",
- CellID->686433507],
-Cell[1060, 45, 81, 2, 32, "Categorization",
- CellID->605800465],
-Cell[1144, 49, 78, 2, 32, "Categorization",
- CellID->468444828],
-Cell[1225, 53, 68, 1, 32, "Categorization"]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[1330, 59, 56, 1, 28, "KeywordsSection",
- CellID->1427428552],
-Cell[1389, 62, 45, 1, 18, "Keywords",
- CellID->1251852827]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1471, 68, 53, 1, 18, "DetailsSection",
- CellID->307771771],
-Cell[1527, 71, 63, 2, 32, "Details",
- CellID->795394057],
-Cell[1593, 75, 187, 3, 32, "Details",
- CellID->350963985],
-Cell[1783, 80, 183, 3, 32, "Details",
- CellID->802101],
-Cell[1969, 85, 71, 2, 32, "Details",
- CellID->509823116],
-Cell[2043, 89, 61, 2, 32, "Details",
- CellID->199884516],
-Cell[2107, 93, 61, 2, 32, "Details",
- CellID->463951815],
-Cell[2171, 97, 61, 2, 32, "Details",
- CellID->8237523],
-Cell[2235, 101, 78, 2, 32, "Details",
- CellID->813936640],
-Cell[2316, 105, 67, 2, 32, "Details",
- CellID->240026365]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[2420, 112, 50, 1, 77, "GuideTitle",
- CellID->942062912],
-Cell[2473, 115, 435, 10, 41, "GuideAbstract",
- CellID->2001916300]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[2945, 130, 98, 2, 69, "GuideFunctionsSection",
- CellID->1866139230],
-Cell[CellGroupData[{
-Cell[3068, 136, 315, 5, 34, "GuideFunctionsSubsection",
- CellID->1344981135],
-Cell[3386, 143, 753, 17, 21, "GuideText",
- CellID->552658513],
-Cell[4142, 162, 706, 17, 22, "GuideText",
- CellID->1235023741],
-Cell[4851, 181, 689, 14, 21, "GuideText",
- CellID->1076523595],
-Cell[5543, 197, 869, 19, 21, "GuideText",
- CellID->917048888],
-Cell[6415, 218, 819, 18, 21, "GuideText",
- CellID->1033282217],
-Cell[7237, 238, 826, 20, 22, "GuideText",
- CellID->745071340],
-Cell[8066, 260, 1047, 24, 36, "GuideText",
- CellID->1851196232],
-Cell[9116, 286, 2050, 53, 36, "GuideText",
- CellID->1686448459],
-Cell[11169, 341, 696, 14, 21, "GuideText",
- CellID->264840152],
-Cell[11868, 357, 865, 20, 33, "GuideText",
- CellID->1624859494],
-Cell[12736, 379, 1418, 35, 21, "GuideText",
- CellID->307637975],
-Cell[14157, 416, 1151, 27, 21, "GuideText",
- CellID->1680708588],
-Cell[15311, 445, 709, 14, 21, "GuideText",
- CellID->1891570253],
-Cell[16023, 461, 903, 20, 21, "GuideText",
- CellID->1483552361],
-Cell[16929, 483, 941, 21, 21, "GuideText",
- CellID->476236246],
-Cell[17873, 506, 948, 20, 21, "GuideText",
- CellID->2139347147],
-Cell[18824, 528, 852, 19, 21, "GuideText",
- CellID->1131303773],
-Cell[19679, 549, 1418, 33, 36, "GuideText",
- CellID->1476055339],
-Cell[21100, 584, 1125, 27, 21, "GuideText",
- CellID->495428205],
-Cell[22228, 613, 694, 14, 21, "GuideText",
- CellID->1403563110],
-Cell[22925, 629, 686, 14, 22, "GuideText",
- CellID->1275284258],
-Cell[23614, 645, 696, 14, 21, "GuideText",
- CellID->1257907745],
-Cell[24313, 661, 688, 14, 21, "GuideText",
- CellID->1005983702],
-Cell[25004, 677, 670, 14, 21, "GuideText",
- CellID->832103768],
-Cell[25677, 693, 671, 14, 21, "GuideText",
- CellID->431072089],
-Cell[26351, 709, 752, 15, 21, "GuideText",
- CellID->316776695],
-Cell[27106, 726, 1136, 27, 21, "GuideText",
- CellID->651468345],
-Cell[28245, 755, 834, 16, 21, "GuideText",
- CellID->1386416972],
-Cell[29082, 773, 765, 15, 36, "GuideText",
- CellID->1889374617],
-Cell[29850, 790, 767, 15, 21, "GuideText",
- CellID->1384558840],
-Cell[30620, 807, 709, 15, 21, "GuideText",
- CellID->2003827822],
-Cell[31332, 824, 709, 15, 21, "GuideText",
- CellID->827330458],
-Cell[32044, 841, 920, 20, 36, "GuideText",
- CellID->1486910634],
-Cell[32967, 863, 706, 14, 21, "GuideText",
- CellID->1015009742],
-Cell[33676, 879, 757, 15, 22, "GuideText",
- CellID->146220986],
-Cell[34436, 896, 881, 19, 21, "GuideText",
- CellID->522984542],
-Cell[35320, 917, 868, 19, 21, "GuideText",
- CellID->1059337536],
-Cell[36191, 938, 849, 18, 21, "GuideText",
- CellID->137238398],
-Cell[37043, 958, 734, 14, 21, "GuideText",
- CellID->590785021],
-Cell[37780, 974, 996, 23, 21, "GuideText",
- CellID->305275299],
-Cell[38779, 999, 877, 19, 22, "GuideText",
- CellID->1136659773],
-Cell[39659, 1020, 827, 18, 22, "GuideText",
- CellID->920034572],
-Cell[40489, 1040, 878, 19, 22, "GuideText",
- CellID->1328328343],
-Cell[41370, 1061, 1093, 25, 25, "GuideText",
- CellID->1428923217],
-Cell[42466, 1088, 1004, 22, 22, "GuideText",
- CellID->1763987334],
-Cell[43473, 1112, 737, 16, 22, "GuideText",
- CellID->1924638314]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[44247, 1133, 313, 5, 34, "GuideFunctionsSubsection",
- CellID->218620916],
-Cell[44563, 1140, 810, 17, 21, "GuideText",
- CellID->1010301503],
-Cell[45376, 1159, 818, 17, 21, "GuideText",
- CellID->1271388718],
-Cell[46197, 1178, 830, 17, 21, "GuideText",
- CellID->1736502128],
-Cell[47030, 1197, 911, 21, 21, "GuideText",
- CellID->1287756566],
-Cell[47944, 1220, 704, 15, 21, "GuideText",
- CellID->1747124358],
-Cell[48651, 1237, 814, 17, 21, "GuideText",
- CellID->1504394922],
-Cell[49468, 1256, 719, 14, 21, "GuideText",
- CellID->1596546686],
-Cell[50190, 1272, 954, 22, 21, "GuideText",
- CellID->187460383],
-Cell[51147, 1296, 832, 16, 21, "GuideText",
- CellID->333715746],
-Cell[51982, 1314, 803, 18, 36, "GuideText",
- CellID->27396530],
-Cell[52788, 1334, 778, 17, 21, "GuideText",
- CellID->1283386980],
-Cell[53569, 1353, 854, 19, 36, "GuideText",
- CellID->2100021916],
-Cell[54426, 1374, 1171, 29, 21, "GuideText",
- CellID->898863791],
-Cell[55600, 1405, 842, 15, 21, "GuideText",
- CellID->1647672763],
-Cell[56445, 1422, 643, 15, 21, "GuideText",
- CellID->683465492],
-Cell[57091, 1439, 650, 15, 21, "GuideText",
- CellID->1650215271],
-Cell[57744, 1456, 512, 12, 21, "GuideText",
- CellID->1498216592],
-Cell[58259, 1470, 635, 15, 21, "GuideText",
- CellID->253353205],
-Cell[58897, 1487, 590, 13, 21, "GuideText",
- CellID->1212078011],
-Cell[59490, 1502, 645, 15, 21, "GuideText",
- CellID->178528196],
-Cell[60138, 1519, 591, 13, 21, "GuideText",
- CellID->1298957094],
-Cell[60732, 1534, 656, 15, 21, "GuideText",
- CellID->1374272511],
-Cell[61391, 1551, 644, 15, 21, "GuideText",
- CellID->1627933292],
-Cell[62038, 1568, 822, 18, 21, "GuideText",
- CellID->1708462303],
-Cell[62863, 1588, 905, 21, 21, "GuideText",
- CellID->1659205566],
-Cell[63771, 1611, 828, 20, 21, "GuideText",
- CellID->1809157918],
-Cell[64602, 1633, 860, 21, 21, "GuideText",
- CellID->869117662]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[65499, 1659, 163, 3, 34, "GuideFunctionsSubsection",
- CellID->385817707],
-Cell[65665, 1664, 408, 10, 21, "GuideText",
- CellID->2009629793],
-Cell[66076, 1676, 461, 11, 21, "GuideText",
- CellID->512359346],
-Cell[66540, 1689, 525, 11, 36, "GuideText",
- CellID->1524292158],
-Cell[67068, 1702, 404, 10, 21, "GuideText",
- CellID->231212511],
-Cell[67475, 1714, 522, 11, 21, "GuideText",
- CellID->1913592904],
-Cell[68000, 1727, 464, 12, 21, "GuideText",
- CellID->693139341],
-Cell[68467, 1741, 515, 12, 36, "GuideText",
- CellID->343872275],
-Cell[68985, 1755, 468, 12, 21, "GuideText",
- CellID->548161550],
-Cell[69456, 1769, 513, 11, 21, "GuideText",
- CellID->987343741],
-Cell[69972, 1782, 433, 11, 21, "GuideText",
- CellID->1285601191],
-Cell[70408, 1795, 986, 24, 36, "GuideText",
- CellID->1809925827],
-Cell[71397, 1821, 572, 15, 21, "GuideText",
- CellID->344422616],
-Cell[71972, 1838, 750, 19, 36, "GuideText",
- CellID->2009219923],
-Cell[72725, 1859, 492, 11, 21, "GuideText",
- CellID->874103215],
-Cell[73220, 1872, 440, 11, 21, "GuideText",
- CellID->579030092],
-Cell[73663, 1885, 448, 11, 21, "GuideText",
- CellID->1156270314],
-Cell[74114, 1898, 486, 11, 36, "GuideText",
- CellID->629389521],
-Cell[74603, 1911, 459, 11, 21, "GuideText",
- CellID->715481727]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[75099, 1927, 207, 3, 34, "GuideFunctionsSubsection",
- CellID->46643246],
-Cell[75309, 1932, 665, 16, 22, "GuideText",
- CellID->2131819227],
-Cell[75977, 1950, 561, 12, 21, "GuideText",
- CellID->1211971239],
-Cell[76541, 1964, 436, 11, 21, "GuideText",
- CellID->333117850],
-Cell[76980, 1977, 681, 15, 21, "GuideText",
- CellID->615769661],
-Cell[77664, 1994, 545, 13, 21, "GuideText",
- CellID->1531032786],
-Cell[78212, 2009, 531, 12, 21, "GuideText",
- CellID->688938496],
-Cell[78746, 2023, 544, 12, 36, "GuideText",
- CellID->1740429042],
-Cell[79293, 2037, 685, 16, 21, "GuideText",
- CellID->297775359],
-Cell[79981, 2055, 532, 12, 36, "GuideText",
- CellID->255459663],
-Cell[80516, 2069, 582, 13, 21, "GuideText",
- CellID->1463755561],
-Cell[81101, 2084, 597, 13, 36, "GuideText",
- CellID->1334035786],
-Cell[81701, 2099, 541, 12, 36, "GuideText",
- CellID->525715973],
-Cell[82245, 2113, 524, 12, 21, "GuideText",
- CellID->218430270],
-Cell[82772, 2127, 614, 16, 22, "GuideText",
- CellID->1707494307]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[83423, 2148, 304, 4, 34, "GuideFunctionsSubsection",
- CellID->1113739100],
-Cell[83730, 2154, 587, 13, 21, "GuideText",
- CellID->1482543113],
-Cell[84320, 2169, 812, 18, 21, "GuideText",
- CellID->1937939922],
-Cell[85135, 2189, 543, 12, 21, "GuideText",
- CellID->526201837],
-Cell[85681, 2203, 913, 21, 35, "GuideText",
- CellID->369276061],
-Cell[86597, 2226, 560, 13, 21, "GuideText",
- CellID->795497081],
-Cell[87160, 2241, 672, 17, 21, "GuideText",
- CellID->284457576],
-Cell[87835, 2260, 478, 12, 21, "GuideText",
- CellID->1861924278],
-Cell[88316, 2274, 795, 17, 36, "GuideText",
- CellID->1355907511],
-Cell[89114, 2293, 754, 17, 21, "GuideText",
- CellID->1719074274],
-Cell[89871, 2312, 565, 13, 21, "GuideText",
- CellID->1309406098]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[90473, 2330, 312, 5, 34, "GuideFunctionsSubsection",
- CellID->121380019],
-Cell[90788, 2337, 637, 13, 21, "GuideText",
- CellID->821249197],
-Cell[91428, 2352, 759, 16, 21, "GuideText",
- CellID->1593535902],
-Cell[92190, 2370, 765, 16, 21, "GuideText",
- CellID->210505242],
-Cell[92958, 2388, 775, 17, 21, "GuideText",
- CellID->1595578132],
-Cell[93736, 2407, 656, 14, 21, "GuideText",
- CellID->1561361899]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[94429, 2426, 314, 5, 34, "GuideFunctionsSubsection",
- CellID->1137355821],
-Cell[94746, 2433, 701, 14, 21, "GuideText",
- CellID->484191528],
-Cell[95450, 2449, 691, 14, 21, "GuideText",
- CellID->1364110476],
-Cell[96144, 2465, 632, 13, 21, "GuideText",
- CellID->863977560],
-Cell[96779, 2480, 1078, 26, 21, "GuideText",
- CellID->512824359],
-Cell[97860, 2508, 705, 14, 21, "GuideText",
- CellID->1115857362],
-Cell[98568, 2524, 706, 15, 21, "GuideText",
- CellID->143835829],
-Cell[99277, 2541, 835, 18, 21, "GuideText",
- CellID->883206687],
-Cell[100115, 2561, 835, 18, 21, "GuideText",
- CellID->439407944],
-Cell[100953, 2581, 676, 16, 21, "GuideText",
- CellID->1595882694],
-Cell[101632, 2599, 619, 13, 21, "GuideText",
- CellID->333845561],
-Cell[102254, 2614, 667, 14, 36, "GuideText",
- CellID->1110841143],
-Cell[102924, 2630, 729, 15, 36, "GuideText",
- CellID->714568367],
-Cell[103656, 2647, 774, 16, 36, "GuideText",
- CellID->251142308],
-Cell[104433, 2665, 725, 16, 36, "GuideText",
- CellID->1336937891],
-Cell[105161, 2683, 653, 14, 21, "GuideText",
- CellID->1906541245],
-Cell[105817, 2699, 672, 14, 21, "GuideText",
- CellID->757005022],
-Cell[106492, 2715, 852, 20, 36, "GuideText",
- CellID->284159366],
-Cell[107347, 2737, 713, 15, 36, "GuideText",
- CellID->1711785091],
-Cell[108063, 2754, 715, 15, 36, "GuideText",
- CellID->777565246],
-Cell[108781, 2771, 736, 15, 21, "GuideText",
- CellID->127777310],
-Cell[109520, 2788, 750, 16, 36, "GuideText",
- CellID->164601953],
-Cell[110273, 2806, 822, 19, 36, "GuideText",
- CellID->1822975320],
-Cell[111098, 2827, 754, 15, 36, "GuideText",
- CellID->727371440],
-Cell[111855, 2844, 683, 14, 21, "GuideText",
- CellID->1377966861],
-Cell[112541, 2860, 868, 22, 21, "GuideText",
- CellID->1684971587],
-Cell[113412, 2884, 840, 18, 21, "GuideText",
- CellID->1716225519],
-Cell[114255, 2904, 636, 14, 21, "GuideText",
- CellID->671837658],
-Cell[114894, 2920, 813, 19, 21, "GuideText",
- CellID->1636252055],
-Cell[115710, 2941, 893, 19, 36, "GuideText",
- CellID->1675333030],
-Cell[116606, 2962, 745, 15, 36, "GuideText",
- CellID->373844893],
-Cell[117354, 2979, 781, 16, 36, "GuideText",
- CellID->1693861457],
-Cell[118138, 2997, 853, 18, 21, "GuideText",
- CellID->305598727],
-Cell[118994, 3017, 1024, 22, 21, "GuideText",
- CellID->554636843],
-Cell[120021, 3041, 1076, 24, 21, "GuideText",
- CellID->1378134869],
-Cell[121100, 3067, 919, 20, 36, "GuideText",
- CellID->136967693],
-Cell[122022, 3089, 714, 14, 21, "GuideText",
- CellID->965355169],
-Cell[122739, 3105, 727, 14, 21, "GuideText",
- CellID->479804421],
-Cell[123469, 3121, 833, 18, 21, "GuideText",
- CellID->932281504],
-Cell[124305, 3141, 889, 19, 21, "GuideText",
- CellID->200996743],
-Cell[125197, 3162, 1264, 30, 21, "GuideText",
- CellID->1268052330],
-Cell[126464, 3194, 974, 21, 36, "GuideText",
- CellID->2037908586],
-Cell[127441, 3217, 785, 15, 21, "GuideText",
- CellID->334277431],
-Cell[128229, 3234, 788, 16, 21, "GuideText",
- CellID->839585187],
-Cell[129020, 3252, 1030, 21, 21, "GuideText",
- CellID->1574102580],
-Cell[130053, 3275, 1011, 24, 28, "GuideText",
- CellID->1554094936],
-Cell[131067, 3301, 775, 15, 21, "GuideText",
- CellID->1979909722],
-Cell[131845, 3318, 782, 15, 21, "GuideText",
- CellID->613914279],
-Cell[132630, 3335, 738, 16, 21, "GuideText",
- CellID->1765084008],
-Cell[133371, 3353, 766, 15, 21, "GuideText",
- CellID->982645341],
-Cell[134140, 3370, 1250, 28, 35, "GuideText",
- CellID->2096516005],
-Cell[135393, 3400, 924, 20, 36, "GuideText",
- CellID->1860467462],
-Cell[136320, 3422, 812, 15, 21, "GuideText",
- CellID->242380689],
-Cell[137135, 3439, 802, 15, 21, "GuideText",
- CellID->485753619],
-Cell[137940, 3456, 767, 15, 21, "GuideText",
- CellID->91877457]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[138744, 3476, 264, 4, 34, "GuideFunctionsSubsection",
- CellID->198236928],
-Cell[139011, 3482, 633, 13, 21, "GuideText",
- CellID->1077126346],
-Cell[139647, 3497, 576, 13, 21, "GuideText",
- CellID->1438938037],
-Cell[140226, 3512, 518, 11, 21, "GuideText",
- CellID->1856631784],
-Cell[140747, 3525, 599, 13, 21, "GuideText",
- CellID->440214481],
-Cell[141349, 3540, 605, 13, 36, "GuideText",
- CellID->390527761]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[141991, 3558, 323, 5, 34, "GuideFunctionsSubsection",
- CellID->1448855878],
-Cell[142317, 3565, 502, 13, 21, "GuideText",
- CellID->594655451],
-Cell[142822, 3580, 724, 15, 21, "GuideText",
- CellID->231184642],
-Cell[143549, 3597, 759, 18, 21, "GuideText",
- CellID->2057902261],
-Cell[144311, 3617, 505, 12, 21, "GuideText",
- CellID->1847839027],
-Cell[144819, 3631, 578, 13, 21, "GuideText",
- CellID->2013380245],
-Cell[145400, 3646, 583, 13, 21, "GuideText",
- CellID->2016043479],
-Cell[145986, 3661, 610, 13, 36, "GuideText",
- CellID->397456419],
-Cell[146599, 3676, 727, 16, 21, "GuideText",
- CellID->747107785],
-Cell[147329, 3694, 894, 21, 21, "GuideText",
- CellID->599890035],
-Cell[148226, 3717, 565, 12, 21, "GuideText",
- CellID->593077025],
-Cell[148794, 3731, 527, 13, 21, "GuideText",
- CellID->1711779075],
-Cell[149324, 3746, 685, 14, 36, "GuideText",
- CellID->1327458149],
-Cell[150012, 3762, 637, 14, 36, "GuideText",
- CellID->2002786353],
-Cell[150652, 3778, 539, 12, 21, "GuideText",
- CellID->1230786365],
-Cell[151194, 3792, 580, 13, 21, "GuideText",
- CellID->837206947],
-Cell[151777, 3807, 597, 14, 22, "GuideText",
- CellID->1427392211],
-Cell[152377, 3823, 596, 13, 21, "GuideText",
- CellID->866592844],
-Cell[152976, 3838, 575, 13, 21, "GuideText",
- CellID->30813872],
-Cell[153554, 3853, 585, 14, 21, "GuideText",
- CellID->660953776],
-Cell[154142, 3869, 523, 12, 21, "GuideText",
- CellID->183769818],
-Cell[154668, 3883, 661, 14, 21, "GuideText",
- CellID->2139004592],
-Cell[155332, 3899, 577, 13, 21, "GuideText",
- CellID->819406206],
-Cell[155912, 3914, 604, 13, 21, "GuideText",
- CellID->202849658],
-Cell[156519, 3929, 570, 13, 21, "GuideText",
- CellID->1044703852],
-Cell[157092, 3944, 628, 14, 21, "GuideText",
- CellID->1894290270],
-Cell[157723, 3960, 577, 13, 21, "GuideText",
- CellID->1081498198],
-Cell[158303, 3975, 573, 13, 21, "GuideText",
- CellID->1449625308],
-Cell[158879, 3990, 528, 12, 21, "GuideText",
- CellID->1907820234],
-Cell[159410, 4004, 609, 13, 21, "GuideText",
- CellID->1716995820]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[160056, 4022, 304, 5, 34, "GuideFunctionsSubsection",
- CellID->16428002],
-Cell[160363, 4029, 626, 13, 21, "GuideText",
- CellID->573273780],
-Cell[160992, 4044, 850, 19, 39, "GuideText",
- CellID->58857743],
-Cell[161845, 4065, 615, 13, 21, "GuideText",
- CellID->2085845974],
-Cell[162463, 4080, 743, 17, 21, "GuideText",
- CellID->113893828],
-Cell[163209, 4099, 603, 13, 21, "GuideText",
- CellID->398578851],
-Cell[163815, 4114, 1183, 30, 36, "GuideText",
- CellID->1016459733],
-Cell[165001, 4146, 1005, 25, 21, "GuideText",
- CellID->1266157],
-Cell[166009, 4173, 625, 13, 21, "GuideText",
- CellID->1817035294],
-Cell[166637, 4188, 591, 13, 21, "GuideText",
- CellID->1052156503],
-Cell[167231, 4203, 599, 13, 21, "GuideText",
- CellID->1278270450],
-Cell[167833, 4218, 580, 14, 21, "GuideText",
- CellID->1690213129],
-Cell[168416, 4234, 879, 21, 36, "GuideText",
- CellID->1901226625],
-Cell[169298, 4257, 619, 13, 21, "GuideText",
- CellID->2052229439]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[169954, 4275, 48, 1, 26, "GuideDelimiter",
- CellID->311258892],
-Cell[170005, 4278, 71, 1, 22, "InlineGuideFunctionListing",
- CellID->58033752]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[170125, 4285, 62, 1, 71, "GuideTutorialsSection",
- CellID->415694126],
-Cell[170190, 4288, 253, 5, 21, "GuideTutorial",
- CellID->806871991],
-Cell[170446, 4295, 50, 1, 21, "GuideTutorial",
- CellID->1885805579]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[170533, 4301, 62, 1, 71, "GuideMoreAboutSection",
- CellID->23220180],
-Cell[170598, 4304, 51, 1, 21, "GuideMoreAbout",
- CellID->1567025153],
-Cell[170652, 4307, 50, 1, 21, "GuideMoreAbout",
- CellID->252299663]
-}, Open ]],
-Cell[170717, 4311, 69, 1, 71, "GuideRelatedLinksSection",
- CellID->415694148]
-}
+ CharacterEncoding -> "UTF-8"],
+$CellContext`FileOutlineCache -> False
]
-*)
-(* End of internal cache information *)
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$AL.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$AL.nb
index 3352e54c1..c2851607a 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$AL.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$AL.nb
@@ -170,9 +170,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Uncontract",
ButtonNote->"Uncontract"],
"."
-}], "Text",
- CellTags->"$AL",
- CellID->1837478580]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -394,12 +392,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Abbreviations.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Abbreviations.nb
index 8be7833bd..10aa6025f 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Abbreviations.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Abbreviations.nb
@@ -187,9 +187,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/WriteOutPaVe",
ButtonNote->"WriteOutPaVe"],
"."
-}], "Text",
- CellTags->"$Abbreviations",
- CellID->1391380109]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -275,12 +273,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$BreitMaison.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$BreitMaison.nb
index 1cab8e27f..baebdfd49 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$BreitMaison.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$BreitMaison.nb
@@ -117,14 +117,10 @@ Cell["$BreitMaison", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData["$BreitMaison"], "InlineFormula"],
- " \[LineSeparator]",
- "The Breitenlohner-Maison ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " scheme is currently not supported by the Dirac algebra functions.Use \
-Tracer if you need it (PHI supplies the functions FCToTracer and \
-TracerToFC)."
+ " \[LineSeparator]is a legacy switch for the \
+Breitenlohner-Maison-t'Hooft-Veltman scheme. Use FCSetDiracGammaScheme to \
+specify a scheme for handling Dirac matrices in dimensional regularization \
+and FCGetDiracGammaScheme to check the current setting."
}], "Usage",
CellID->982511436],
@@ -165,24 +161,17 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["Tr",
+ ButtonBox["FCSetDiracGammaScheme",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Tr",
- ButtonNote->"Tr"],
+ ButtonData:>"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
", ",
- ButtonBox["$Larin",
+ ButtonBox["FCGetDiracGammaScheme",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/$Larin",
- ButtonNote->"$Larin"],
- ", ",
- ButtonBox["West",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/West",
- ButtonNote->"West"],
+ ButtonData:>"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCGetDiracGammaScheme"],
"."
-}], "Text",
- CellTags->"$BreitMaison",
- CellID->1928344928]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -268,12 +257,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 741},
-WindowMargins->{{Automatic, 961}, {84, Automatic}},
+WindowMargins->{{934, Automatic}, {20, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Covariant.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Covariant.nb
deleted file mode 100644
index f2fabb3ef..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Covariant.nb
+++ /dev/null
@@ -1,257 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/$Covariant", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["$Covariant", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["$Covariant"], "InlineFormula"],
- " \[LineSeparator]",
- "the boolean setting of $Covariant determines whether Lorentz indices are \
-displayed as lower indices (True) or as upper ones (False)."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell["XXXX", "SeeAlso",
- CellID->929782353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCMemoryAvailable.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCMemoryAvailable.nb
new file mode 100644
index 000000000..4fe4f3c30
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCMemoryAvailable.nb
@@ -0,0 +1,282 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.0", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/$FCMemoryAvailable", "Categorization",
+ CellLabel->"URI"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["$FCMemoryAvailable", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["$FCMemoryAvailable"], "InlineFormula"],
+ " \[LineSeparator]",
+ "is a global variable which is set to an integer ",
+ StyleBox["n",
+ FontSlant->"Italic"],
+ ", where ",
+ StyleBox["n",
+ FontSlant->"Italic"],
+ " is the available amount of main memory in MB. The default is 128. It \
+should be increased if possible. The higher $FCMemoryAvailable can be, the \
+more intermediate steps do not have to be repeated by FeynCalc."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["$FCMemoryAvailable"], "Input",
+ CellTags->"$FCMemoryAvailable",
+ CellLabel->"In[53]:=",
+ CellID->695439641],
+
+Cell[BoxData[
+ FormBox["4096", TraditionalForm]], "Output",
+ CellTags->"$FCMemoryAvailable",
+ CellLabel->"Out[53]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
+Visible->True,
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCS.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCS.nb
index 993b5edfe..210ec75e1 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCS.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCS.nb
@@ -280,12 +280,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCShowIEta.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCShowIEta.nb
new file mode 100644
index 000000000..a1ff7ef1d
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCShowIEta.nb
@@ -0,0 +1,345 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/$FCShowIEta", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["$FCShowIEta", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["$FCShowIEta"], "InlineFormula"],
+ " \[LineSeparator]The boolean setting of $FCShowIEta detrmines whether I \
+\[Eta] should be displayed in the typesetting of GFAD and \
+GenericPropagatorDenominator objects or not. This setting affects only the \
+TraditionalForm typesetting and has absolutely no influence on the internal \
+handling of propagator denominators in FeynCalc."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["$FCShowIEta"], "Input",
+ CellLabel->"In[330]:=",
+ CellID->710731682],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[330]=",
+ CellID->2143783398]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[331]:=",
+ CellID->1378639796],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[331]=",
+ CellID->427014609]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"$FCShowIEta", "=", "False"}]], "Input",
+ CellLabel->"In[332]:=",
+ CellID->462213996],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ CellLabel->"Out[332]=",
+ CellID->1909211131]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SFAD", "[",
+ RowBox[{"{",
+ RowBox[{"p", ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[333]:=",
+ CellID->2000350143],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox["p", TraditionalForm], TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[333]=",
+ CellID->92097782]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"$FCShowIEta", "=", "True"}]], "Input",
+ CellLabel->"In[334]:=",
+ CellID->942085505],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[334]=",
+ CellID->1291376477]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{480, Automatic}, {Automatic, 55}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCT.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCT.nb
index 665adf838..9c51240fe 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCT.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCT.nb
@@ -187,10 +187,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$FCT",
- CellID->1394179374],
-
Cell[BoxData[
RowBox[{
RowBox[{"$FCT", " ", "=", " ", "True"}], ";"}]], "Input",
@@ -335,12 +331,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCTraditionalFormOutput.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCTraditionalFormOutput.nb
new file mode 100644
index 000000000..bd4e10185
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FCTraditionalFormOutput.nb
@@ -0,0 +1,272 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/$FCTraditionalFormOutput", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["$FCTraditionalFormOutput", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["$FCTraditionalFormOutput"], "InlineFormula"],
+ " \[LineSeparator]The boolean setting of $FCTraditionalFormOutput determines \
+which output format type should be used in the notebook front end when \
+FeynCalc is loaded. If set to True, FeynCalc will activate the \
+TraditionalForm output. Otherwise, the StandardForm output (Mathematica's \
+default) will be used. This setting only changes the output format of the \
+current notebook, i.e. it is not persistent and will not modify the global \
+options of Mathematica. If unsure, it is recommended to set \
+$FCTraditionalFormOutput to True, so that you can benefit from the nice \
+FeynCalc typesetting for various QFT quantities."
+}], "Usage",
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["$FCTraditionalFormOutput"], "Input",
+ CellLabel->"In[13]:=",
+ CellID->1499223899],
+
+Cell[BoxData[
+ FormBox["False", TraditionalForm]], "Output",
+ CellLabel->"Out[13]=",
+ CellID->825857747]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{244, Automatic}, {Automatic, 106}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcStuff.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcStuff.nb
deleted file mode 100644
index d315553f6..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcStuff.nb
+++ /dev/null
@@ -1,256 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/$FeynCalcStuff", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["$FeynCalcStuff", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["$FeynCalcStuff"], "InlineFormula"],
- " \[LineSeparator]",
- "is the list of availabe stuff in FeynCalc."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell["XXXX", "SeeAlso",
- CellID->929782353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcVersion.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcVersion.nb
index bb48a003f..44396269d 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcVersion.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FeynCalcVersion.nb
@@ -186,22 +186,17 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$FeynCalcVersion",
- CellID->1483320671],
-
Cell[CellGroupData[{
Cell[BoxData["$FeynCalcVersion"], "Input",
CellTags->"$FeynCalcVersion",
- CellLabel->"In[1]:=",
+ CellLabel->"In[188]:=",
CellID->806604709],
Cell[BoxData[
- FormBox["\<\"9.0.0\"\>", TraditionalForm]], "Output",
+ FormBox["\<\"9.3.0\"\>", TraditionalForm]], "Output",
CellTags->"$FeynCalcVersion",
- CellLabel->"Out[1]=",
- CellID->1396918294]
+ CellLabel->"Out[188]="]
}, Open ]]
}, Open ]],
@@ -266,12 +261,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb
index 6ed68cdbf..a173ef389 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$FortranContinuationCharacter.nb
@@ -164,9 +164,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Write2",
ButtonNote->"Write2"],
"."
-}], "Text",
- CellTags->"$FortranContinuationCharacter",
- CellID->1130623945]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -193,10 +191,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$FortranContinuationCharacter",
- CellID->1942758352],
-
Cell[CellGroupData[{
Cell[BoxData["$FortranContinuationCharacter"], "Input",
@@ -273,12 +267,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Gauge.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Gauge.nb
index 7d95245b5..299c07e53 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Gauge.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Gauge.nb
@@ -166,9 +166,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Gauge",
ButtonNote->"Gauge"],
"."
-}], "Text",
- CellTags->"$Gauge",
- CellID->1591453554]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -254,12 +252,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Larin.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Larin.nb
index 7fa5e8ffb..29c58176d 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$Larin.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$Larin.nb
@@ -117,35 +117,11 @@ Cell["$Larin", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData["$Larin"], "InlineFormula"],
- " \[LineSeparator]",
- "If set to True, the Larin-Gorishny-Atkyampo-DelBurgo-scheme for ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " in ",
- StyleBox["D",
- FontSlant->"Italic"],
- "-dimensions is used, i.e. before evaluating traces (but after moving ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " anticommuting in all dimensions to the right of the Dirac string) a \
-product gamma[mu].gamma5 is substituted to -I/6 Eps[mu,al,be,si] \
-gamma[al,be,si], where all indices live in ",
- StyleBox["D",
- FontSlant->"Italic"],
- "-dimensions now. Especially the Levic-Civita tensor is taken to be ",
- StyleBox["D",
- FontSlant->"Italic"],
- "-dimensional, i.e., contraction of two Eps's results in ",
- StyleBox["D",
- FontSlant->"Italic"],
- "'s. This has (FOR ONE AXIAL-VECTOR-CURRENT ONLY, it is not so clear if this \
-scheme also works for more than one fermion line involving ",
- Cell[BoxData[
- FormBox[
- SubscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- ") the same effect as the Breitenlohner-Maison-'t Hooft-Veltman scheme."
+ " \[LineSeparator] is a legacy switch for the \
+Larin-Gorishny-Atkyampo-DelBurgo scheme. The modern way is to use \
+FCSetDiracGammaScheme to specify a scheme for handling Dirac matrices in \
+dimensional regularization and FCGetDiracGammaScheme to check the current \
+setting."
}], "Usage",
CellID->982511436],
@@ -185,29 +161,18 @@ Cell[CellGroupData[{
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[RawData["\<\
Cell[TextData[{
- ButtonBox[\"Tr\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/Tr\",
- ButtonNote->\"Tr\"],
- \", \",
- ButtonBox[\"$BreitMaison\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/$BreitMaison\",
- ButtonNote->\"$BreitMaison\"],
- \", \",
- ButtonBox[\"West\",
- BaseStyle->\"Link\",
- ButtonData:>\"paclet:FeynCalc/ref/West\",
- ButtonNote->\"West\"],
- \".\"
-}], \"Text\",
- CellTags->\"$Larin\",
- CellID->181403197]\
-\>"], "Text",
- CellTags->"$Larin",
- CellID->181403197]
+ ButtonBox["FCSetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ ", ",
+ ButtonBox["FCGetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCGetDiracGammaScheme"],
+ "."
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -219,8 +184,6 @@ Cell["XXXX", "MoreAbout",
CellID->1665078683]
}, Open ]],
-Cell[CellGroupData[{
-
Cell[BoxData[
InterpretationBox[GridBox[{
{
@@ -234,25 +197,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$Larin",
- CellID->1690224764],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["$Larin"], "Input",
- CellTags->"$Larin",
- CellLabel->"In[1]:=",
- CellID->1245299015],
-
-Cell[BoxData[
- FormBox["True", TraditionalForm]], "Output",
- CellTags->"$Larin",
- CellLabel->"Out[1]=",
- CellID->1660409352]
-}, Open ]]
-}, Open ]],
-
Cell[CellGroupData[{
Cell["More Examples", "ExtendedExamplesSection",
@@ -314,12 +258,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 741},
-WindowMargins->{{Automatic, 943}, {Automatic, 79}},
+WindowMargins->{{905, Automatic}, {Automatic, 106}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LeviCivitaSign.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LeviCivitaSign.nb
index 9a4e69d34..1dec2b2f0 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LeviCivitaSign.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LeviCivitaSign.nb
@@ -1,22 +1,3 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 13682, 554]
-NotebookOptionsPosition[ 9031, 387]
-NotebookOutlinePosition[ 9644, 411]
-CellTagsIndexPosition[ 9566, 406]
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
Notebook[{
Cell[TextData[{
"New in: ",
@@ -138,15 +119,13 @@ Cell[TextData[{
Cell[BoxData["$LeviCivitaSign"], "InlineFormula"],
" \[LineSeparator]is a global variable that determines the sign in the \
result of a Dirac trace of four gamma matrices and gamma5. $LeviCivitaSign \
-is by default set to -1 which corresponds to the convention \
-Tr[LeviCivita[a,b,c,d,5]] = -4*I*Eps[a,b,c,d]. Setting $LeviCivitaSign=-I \
-will switch to the FORM-convention."
+is by default set to -1 which corresponds to the convention Tr[LC[a,b,c,d,5]] \
+= -4*I*Eps[a,b,c,d]. Setting $LeviCivitaSign=-I will switch to the \
+FORM-convention."
}], "Usage",
- CellChangeTimes->{{3.677083863597835*^9, 3.677083881575591*^9}},
CellID->982511436],
Cell["XXXX", "Notes",
- CellChangeTimes->{{3.677083896911336*^9, 3.6770839265668697`*^9}},
CellID->1067943069]
}, Open ]],
@@ -213,15 +192,12 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData["$LeviCivitaSign"], "Input",
- CellChangeTimes->{{3.677083940452142*^9, 3.6770839418053417`*^9}},
CellLabel->"In[4]:=",
CellID->1712420789],
Cell[BoxData[
FormBox[
RowBox[{"-", "1"}], TraditionalForm]], "Output",
- CellChangeTimes->{3.677083942268503*^9, 3.677084042541326*^9,
- 3.677084190399844*^9},
CellLabel->"Out[4]=",
CellID->2017735240]
}, Open ]],
@@ -233,8 +209,6 @@ Cell[BoxData[
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "5"}],
"]"}], "]"}]], "Input",
- CellChangeTimes->{{3.677083949336968*^9, 3.677083986550789*^9}, {
- 3.6770843934493504`*^9, 3.6770844011427383`*^9}},
CellLabel->"In[21]:=",
CellID->722943498],
@@ -260,14 +234,11 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- CellChangeTimes->{{3.677084393967458*^9, 3.677084401925448*^9}},
CellLabel->"Out[21]=",
CellID->24019145]
}, Open ]],
Cell["This sets the same convention as in FORM", "Notes",
- CellChangeTimes->{{3.677083896911336*^9, 3.6770839265668697`*^9}, {
- 3.677084159749695*^9, 3.67708416680619*^9}},
CellID->1734027625],
Cell[CellGroupData[{
@@ -280,8 +251,6 @@ Cell[BoxData[{
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "5"}],
"]"}], "]"}]}], "Input",
- CellChangeTimes->{{3.677084138294552*^9, 3.677084148526932*^9},
- 3.677084408798975*^9},
CellLabel->"In[22]:=",
CellID->1075951969],
@@ -306,21 +275,17 @@ Cell[BoxData[
FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
- CellChangeTimes->{3.677084410012164*^9},
CellLabel->"Out[23]=",
CellID->1430392236]
}, Open ]],
Cell["Back to the standard value", "Notes",
- CellChangeTimes->{{3.677083896911336*^9, 3.6770839265668697`*^9}, {
- 3.677084159749695*^9, 3.6770841814135723`*^9}},
CellID->223764811],
Cell[BoxData[
RowBox[{
RowBox[{"$LeviCivitaSign", "=",
RowBox[{"-", "1"}]}], ";"}]], "Input",
- CellChangeTimes->{{3.677084182886092*^9, 3.677084188213874*^9}},
CellLabel->"In[24]:=",
CellID->955635605]
}, Open ]],
@@ -386,178 +351,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{883, Automatic}, {Automatic, 55}},
+WindowMargins->{{1000, Automatic}, {231, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
+TrackCellChangeTimes->False,
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "ExtendedExamples"->{
- Cell[7511, 329, 100, 2, 54, "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"ExtendedExamples", 9428, 399}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[558, 20, 325, 14, 23, "History",
- CellID->1247902091],
-Cell[CellGroupData[{
-Cell[908, 38, 68, 1, 28, "CategorizationSection",
- CellID->1122911449],
-Cell[979, 41, 79, 2, 70, "Categorization",
- CellID->686433507],
-Cell[1061, 45, 81, 2, 70, "Categorization",
- CellID->605800465],
-Cell[1145, 49, 78, 2, 70, "Categorization",
- CellID->468444828],
-Cell[1226, 53, 73, 1, 70, "Categorization"]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1336, 59, 55, 1, 18, "KeywordsSection",
- CellID->477174294],
-Cell[1394, 62, 45, 1, 70, "Keywords",
- CellID->1164421360]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1476, 68, 65, 1, 18, "TemplatesSection",
- CellID->1872225408],
-Cell[1544, 71, 94, 2, 70, "Template",
- CellID->1562036412],
-Cell[1641, 75, 82, 2, 70, "Template",
- CellID->158391909],
-Cell[1726, 79, 81, 2, 70, "Template",
- CellID->1360575930],
-Cell[1810, 83, 82, 2, 70, "Template",
- CellID->793782254]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1929, 90, 53, 1, 18, "DetailsSection",
- CellID->307771771],
-Cell[1985, 93, 63, 2, 70, "Details",
- CellID->670882175],
-Cell[2051, 97, 69, 2, 70, "Details",
- CellID->350963985],
-Cell[2123, 101, 64, 2, 70, "Details",
- CellID->8391405],
-Cell[2190, 105, 69, 2, 70, "Details",
- CellID->3610269],
-Cell[2262, 109, 61, 2, 70, "Details",
- CellID->401364205],
-Cell[2326, 113, 61, 2, 70, "Details",
- CellID->350204745],
-Cell[2390, 117, 63, 2, 70, "Details",
- CellID->732958810],
-Cell[2456, 121, 78, 2, 70, "Details",
- CellID->222905350],
-Cell[2537, 125, 67, 2, 70, "Details",
- CellID->240026365]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[2641, 132, 58, 1, 63, "ObjectName",
- CellID->1224892054],
-Cell[2702, 135, 519, 10, 117, "Usage",
- CellID->982511436],
-Cell[3224, 147, 110, 2, 24, "Notes",
- CellID->1067943069]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3371, 154, 57, 1, 43, "TutorialsSection",
- CellID->250839057],
-Cell[3431, 157, 45, 1, 16, "Tutorials",
- CellID->341631938]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3513, 163, 83, 1, 30, "RelatedDemonstrationsSection",
- CellID->1268215905],
-Cell[3599, 166, 58, 1, 16, "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3694, 172, 65, 1, 30, "RelatedLinksSection",
- CellID->1584193535],
-Cell[3762, 175, 49, 1, 16, "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3848, 181, 55, 1, 30, "SeeAlsoSection",
- CellID->1255426704],
-Cell[3906, 184, 43, 1, 16, "SeeAlso",
- CellID->929782353]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[3986, 190, 57, 1, 30, "MoreAboutSection",
- CellID->38303248],
-Cell[4046, 193, 46, 1, 16, "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4129, 199, 356, 11, 68, "PrimaryExamplesSection",
- CellID->880084151],
-Cell[CellGroupData[{
-Cell[4510, 214, 153, 3, 26, "Input",
- CellID->1712420789],
-Cell[4666, 219, 207, 6, 25, "Output",
- CellID->2017735240]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4910, 230, 325, 8, 26, "Input",
- CellID->722943498],
-Cell[5238, 240, 625, 24, 28, "Output",
- CellID->24019145]
-}, Open ]],
-Cell[5878, 267, 194, 3, 24, "Notes",
- CellID->1734027625],
-Cell[CellGroupData[{
-Cell[6097, 274, 402, 11, 46, "Input",
- CellID->1075951969],
-Cell[6502, 287, 562, 23, 28, "Output",
- CellID->1430392236]
-}, Open ]],
-Cell[7079, 313, 182, 3, 24, "Notes",
- CellID->223764811],
-Cell[7264, 318, 210, 6, 26, "Input",
- CellID->955635605]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7511, 329, 100, 2, 54, "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-Cell[7614, 333, 125, 3, 32, "ExampleSection",
- CellID->1293636265],
-Cell[7742, 338, 148, 3, 20, "ExampleSection",
- CellID->1020263627],
-Cell[CellGroupData[{
-Cell[7915, 345, 127, 3, 20, "ExampleSection",
- CellID->2061341341],
-Cell[8045, 350, 130, 3, 70, "ExampleSubsection",
- CellID->1757724783],
-Cell[8178, 355, 130, 3, 70, "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-Cell[8323, 361, 131, 3, 20, "ExampleSection",
- CellID->258228157],
-Cell[8457, 366, 142, 3, 20, "ExampleSection",
- CellID->2123667759],
-Cell[8602, 371, 135, 3, 20, "ExampleSection",
- CellID->1305812373],
-Cell[8740, 376, 140, 3, 20, "ExampleSection",
- CellID->1653164318],
-Cell[8883, 381, 132, 3, 20, "ExampleSection",
- CellID->589267740]
-}, Open ]]
-}
-]
-*)
-(* End of internal cache information *)
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LimitTo4.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LimitTo4.nb
index 7fee061c5..80432efbd 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LimitTo4.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LimitTo4.nb
@@ -175,9 +175,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/OneLoop",
ButtonNote->"OneLoop"],
"."
-}], "Text",
- CellTags->"$LimitTo4",
- CellID->1267840867]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -204,10 +202,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$LimitTo4",
- CellID->1433837082],
-
Cell[CellGroupData[{
Cell[BoxData["$LimitTo4"], "Input",
@@ -284,12 +278,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LoadAddOns.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LoadAddOns.nb
new file mode 100644
index 000000000..b699e979a
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LoadAddOns.nb
@@ -0,0 +1,258 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/$LoadAddOns", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["$LoadAddOns", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"$LoadAddOns", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]specifies which addons should be loaded with FeynCalc. \
+E.g. $LoadAddOns={\"FeynHelpers\"}. The value must be set before loading \
+FeynCalc. The default value is False."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{883, Automatic}, {Automatic, 241}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LorentzIndices.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$LorentzIndices.nb
deleted file mode 100644
index 07f53f813..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$LorentzIndices.nb
+++ /dev/null
@@ -1,454 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/$LorentzIndices", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["$LorentzIndices", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["$LorentzIndices"], "InlineFormula"],
- " \[LineSeparator]",
- "is a global variable. If set to True the dimension of LorentzIndex is \
-displayed as an index."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell["XXXX", "SeeAlso",
- CellID->929782353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell["Examples", "Subsubsection",
- CellTags->"$LorentzIndices",
- CellID->1537148561],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "True"}], ";"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[1]:=",
- CellID->1716323912],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}]}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[2]:=",
- CellID->1846109645],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm]], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"$LorentzIndices",
- CellLabel->"Out[2]=",
- CellID->988227023]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[3]:=",
- CellID->1902297841],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",", "n"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "n"}], "]"}]}], "]"}]}]], "Output",
- CellTags->"$LorentzIndices",
- CellLabel->"Out[3]//StandardForm=",
- CellID->2067378900]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MTD", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], " ",
- RowBox[{"FVD", "[",
- RowBox[{"p", ",", "\[Beta]"}], "]"}],
- RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "//", "FCI"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[4]:=",
- CellID->1893710771],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- SubscriptBox[
- FormBox["\[Mu]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["D",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"$LorentzIndices",
- CellLabel->"Out[4]=",
- CellID->1671614812]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[5]:=",
- CellID->1327558227],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "D"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "D"}], "]"}]}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "D"}], "]"}], ",",
- RowBox[{"Momentum", "[",
- RowBox[{"p", ",", "D"}], "]"}]}], "]"}]}]], "Output",
- CellTags->"$LorentzIndices",
- CellLabel->"Out[5]//StandardForm=",
- CellID->1816548467]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "False"}], ";"}]], "Input",
- CellTags->"$LorentzIndices",
- CellLabel->"In[6]:=",
- CellID->326767008]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$MIntegrate.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$MIntegrate.nb
index 3bf445721..2089c83b2 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$MIntegrate.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$MIntegrate.nb
@@ -167,9 +167,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/OPEIntegrateDelta",
ButtonNote->"OPEIntegrateDelta"],
"."
-}], "Text",
- CellTags->"$MIntegrate",
- CellID->193164279]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -196,10 +194,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$MIntegrate",
- CellID->896374065],
-
Cell[CellGroupData[{
Cell[BoxData["$MIntegrate"], "Input",
@@ -213,19 +207,7 @@ Cell[BoxData[
CellTags->"$MIntegrate",
CellLabel->"Out[1]=",
CellID->1034422222]
-}, Open ]],
-
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["OPEIntegrateDelta",
- BaseStyle->"AddOnsLink",
- ButtonData:>"OPEIntegrateDelta",
- ButtonNote->"OPEIntegrateDelta"],
- "."
-}], "Text",
- CellTags->"$MIntegrate",
- CellID->404160805]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -289,12 +271,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$MU.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$MU.nb
index f2983e189..a9f860f04 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$MU.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$MU.nb
@@ -176,9 +176,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
"."
-}], "Text",
- CellTags->"$MU",
- CellID->58635825]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -205,10 +203,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$MU",
- CellID->1771415745],
-
Cell[CellGroupData[{
Cell[BoxData["$MU"], "Input",
@@ -221,29 +215,7 @@ Cell[BoxData[
CellTags->"$MU",
CellLabel->"Out[1]=",
CellID->418655578]
-}, Open ]],
-
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["Chisholm",
- BaseStyle->"AddOnsLink",
- ButtonData:>"Chisholm",
- ButtonNote->"Chisholm"],
- ", ",
- ButtonBox["Contract",
- BaseStyle->"AddOnsLink",
- ButtonData:>"Contract",
- ButtonNote->"Contract"],
- ", ",
- ButtonBox["DiracSimplify",
- BaseStyle->"AddOnsLink",
- ButtonData:>"DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"$MU",
- CellID->265635386]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -307,12 +279,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$MemoryAvailable.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$MemoryAvailable.nb
deleted file mode 100644
index c8eb29e4c..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$MemoryAvailable.nb
+++ /dev/null
@@ -1,285 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/$MemoryAvailable", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["$MemoryAvailable", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["$MemoryAvailable"], "InlineFormula"],
- " \[LineSeparator]",
- "is a global variable which is set to an integer ",
- StyleBox["n",
- FontSlant->"Italic"],
- ", where ",
- StyleBox["n",
- FontSlant->"Italic"],
- " is the available amount of main memory in MB. The default is 128. It \
-should be increased if possible. The higher $MemoryAvailable can be, the more \
-intermediate steps do not have to be repeated by FeynCalc."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell["XXXX", "SeeAlso",
- CellID->929782353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell["Examples", "Subsubsection",
- CellTags->"$MemoryAvailable",
- CellID->343639326],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["$MemoryAvailable"], "Input",
- CellTags->"$MemoryAvailable",
- CellLabel->"In[1]:=",
- CellID->695439641],
-
-Cell[BoxData[
- FormBox["4096", TraditionalForm]], "Output",
- CellTags->"$MemoryAvailable",
- CellLabel->"Out[1]=",
- CellID->1467745985]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$NonComm.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$NonComm.nb
index 1f1981882..d0fc2af2b 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$NonComm.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$NonComm.nb
@@ -117,8 +117,7 @@ Cell["$NonComm", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData["$NonComm"], "InlineFormula"],
- " \[LineSeparator]",
- "contains a list of all non-commutative heads present."
+ " \[LineSeparator]contains a list of all noncommutative heads present."
}], "Usage",
CellID->982511436],
@@ -169,9 +168,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/NonCommutative",
ButtonNote->"NonCommutative"],
"."
-}], "Text",
- CellTags->"$NonComm",
- CellID->1040108898]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -198,39 +195,37 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$NonComm",
- CellID->2045411989],
-
Cell[CellGroupData[{
Cell[BoxData["$NonComm"], "Input",
CellTags->"$NonComm",
- CellLabel->"In[1]:=",
+ CellLabel->"In[189]:=",
CellID->1876740578],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{
- "ChiralityProjector", ",", "DiracGamma", ",", "DiracGammaT", ",",
- "DiracMatrix", ",", "DiracSigma", ",", "DiracSlash", ",", "DiracSpinor",
- ",", "GA", ",",
+ "ChiralityProjector", ",", "DiracGamma", ",", "DiracMatrix", ",",
+ "DiracSigma", ",", "DiracSlash", ",", "Spinor", ",", "GA", ",",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]], ",", "GAD", ",", "GAE", ",", "GS", ",", "GSD", ",",
"GSE", ",", "LeftPartialD", ",", "LeftRightPartialD", ",",
- "LeftRightPartialD2", ",", "FCPartialD", ",", "PauliSigma", ",",
+ "LeftRightPartialD2", ",", "FCPartialD", ",", "OPESum", ",",
"QuantumField", ",", "RightPartialD", ",", "Spinor", ",", "SpinorU", ",",
- "SpinorUBar", ",", "SpinorV", ",", "SpinorVBar", ",", "SUNT", ",", "C",
- ",", "CovariantD", ",", "OPESum", ",", "FieldStrength", ",",
- "QuarkGluonVertex", ",", "QuarkPropagator", ",", "Twist2AlienOperator",
- ",", "Twist2CounterOperator", ",", "Twist2QuarkOperator"}], "}"}],
+ "SpinorUBar", ",", "SpinorV", ",", "SpinorVBar", ",", "SUNT", ",",
+ "PauliSigma", ",", "PauliXi", ",", "PauliEta", ",", "TGA", ",", "CGA",
+ ",", "CGAD", ",", "CGAE", ",", "CGS", ",", "CGSD", ",", "CGSE", ",", "SI",
+ ",", "SID", ",", "SIE", ",", "CSI", ",", "CSID", ",", "CSIE", ",",
+ "FeynCalc`Package`dotsimpHold", ",", "FCChargeConjugateTransposed", ",",
+ "CovariantD", ",", "FieldStrength", ",", "QuarkGluonVertex", ",",
+ "QuarkPropagator", ",", "Twist2AlienOperator", ",",
+ "Twist2CounterOperator", ",", "Twist2QuarkOperator"}], "}"}],
TraditionalForm]], "Output",
CellTags->"$NonComm",
- CellLabel->"Out[1]=",
- CellID->1539262372]
+ CellLabel->"Out[189]="]
}, Open ]]
}, Open ]],
@@ -295,12 +290,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$PairBrackets.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$PairBrackets.nb
deleted file mode 100644
index 75adcefbf..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$PairBrackets.nb
+++ /dev/null
@@ -1,420 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/$PairBrackets", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["$PairBrackets", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["$PairBrackets"], "InlineFormula"],
- " \[LineSeparator]",
- "determines whether brackets are drawn around scalar products in the \
-notebook interface."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell["XXXX", "SeeAlso",
- CellID->929782353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell["Examples", "Subsubsection",
- CellTags->"$PairBrackets",
- CellID->1808422763],
-
-Cell[CellGroupData[{
-
-Cell[BoxData["$PairBrackets"], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[1]:=",
- CellID->1003413520],
-
-Cell[BoxData[
- FormBox["False", TraditionalForm]], "Output",
- CellTags->"$PairBrackets",
- CellLabel->"Out[1]=",
- CellID->639679557]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{"p", ",", "q"}], "]"}],
- RowBox[{"SP", "[",
- RowBox[{"r", ",", "s"}], "]"}]}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[2]:=",
- CellID->768283968],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["s",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- CellTags->"$PairBrackets",
- CellLabel->"Out[2]=",
- CellID->150154476]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"$PairBrackets", "=", "True"}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[3]:=",
- CellID->2050781191],
-
-Cell[BoxData[
- FormBox["True", TraditionalForm]], "Output",
- CellTags->"$PairBrackets",
- CellLabel->"Out[3]=",
- CellID->1935357180]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SP", "[",
- RowBox[{"p", ",", "q"}], "]"}],
- RowBox[{"SP", "[",
- RowBox[{"r", ",", "s"}], "]"}]}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[4]:=",
- CellID->759242831],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["s",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- CellTags->"$PairBrackets",
- CellLabel->"Out[4]=",
- CellID->251865328]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"$PairBrackets", "=", "False"}]], "Input",
- CellTags->"$PairBrackets",
- CellLabel->"In[5]:=",
- CellID->1858587379],
-
-Cell[BoxData[
- FormBox["False", TraditionalForm]], "Output",
- CellTags->"$PairBrackets",
- CellLabel->"Out[5]=",
- CellID->8691638]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$RenameFeynCalcObjects.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$RenameFeynCalcObjects.nb
new file mode 100644
index 000000000..f2db7be2d
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$RenameFeynCalcObjects.nb
@@ -0,0 +1,281 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/$RenameFeynCalcObjects", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["$RenameFeynCalcObjects", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"$RenameFeynCalcObjects", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]specifies a List of replacement rules that allow to rename \
+FeynCalc objects on the run to avoid conflicts with other package before \
+FeynCalc is loaded (monkey patching). The value of $RenameFeynCalcObjects \
+must be specified before loading FeynCalc"
+}], "Usage",
+ CellID->982511436],
+
+Cell["\<\
+The following code (when executed on a fresh kernel with the last two lines \
+uncommented) allows to load FeynCalc and Roman Lee's LiteRed on the same \
+kernel without shadowing issues\
+\>", "Notes",
+ CellID->379603153],
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"$RenameFeynCalcObjects", "=",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"\"\\"", "\[Rule]", "\"\\""}],
+ ",",
+ RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",",
+ RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "}"}]}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{"(*",
+ RowBox[{"<<", "FeynCalc`"}], "*)"}]}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"(*",
+ RowBox[{"<<", "LiteRed`"}], "*)"}]}]}], "Input",
+ CellID->1698473390]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{653, Automatic}, {Automatic, 240}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$SpinorMinimal.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$SpinorMinimal.nb
deleted file mode 100644
index c9d2c23a4..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$SpinorMinimal.nb
+++ /dev/null
@@ -1,265 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/$SpinorMinimal", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["$SpinorMinimal", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["$SpinorMinimal"], "InlineFormula"],
- " \[LineSeparator]",
- "is a global switch for an additional simplification attempt in \
-DiracSimplify for more than one Spinor-line. The default is False, since \
-otherwise it costs too much time."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"$SpinorMinimal",
- CellID->329467642]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/$VeryVerbose.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/$VeryVerbose.nb
index 00565e528..0308bc808 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/$VeryVerbose.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/$VeryVerbose.nb
@@ -187,10 +187,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"$VeryVerbose",
- CellID->61376549],
-
Cell[CellGroupData[{
Cell[BoxData["$VeryVerbose"], "Input",
@@ -405,12 +401,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/A0.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/A0.nb
index 12f5010ff..b28f1518f 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/A0.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/A0.nb
@@ -185,9 +185,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVe",
ButtonNote->"PaVe"],
"."
-}], "Text",
- CellTags->"A0",
- CellID->70965860]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -242,9 +240,7 @@ Cell[TextData[{
FormBox[
SubscriptBox["B", "0"], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"A0",
- CellID->1026580483],
+}], "Notes"],
Cell[CellGroupData[{
@@ -325,9 +321,7 @@ Cell[TextData[{
RowBox[{
SubscriptBox["A", "0"], "(", "0", ")"}], TraditionalForm]]],
" is set to 0."
-}], "Text",
- CellTags->"A0",
- CellID->1221823578],
+}], "Notes"],
Cell[CellGroupData[{
@@ -423,12 +417,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 62}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/A0ToB0.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/A0ToB0.nb
index 8e5d494d2..94eabf54b 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/A0ToB0.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/A0ToB0.nb
@@ -208,9 +208,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVe",
ButtonNote->"PaVe"],
"."
-}], "Text",
- CellTags->"A0ToB0",
- CellID->1722982066]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -237,10 +235,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"A0ToB0",
- CellID->2064085766],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -257,39 +251,7 @@ Cell[BoxData[
CellTags->"A0ToB0",
CellLabel->"Out[1]=",
CellID->1727801355]
-}, Open ]],
-
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["A0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"A0",
- ButtonNote->"A0"],
- ", ",
- ButtonBox["B0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"B0",
- ButtonNote->"B0"],
- ", ",
- ButtonBox["C0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"C0",
- ButtonNote->"C0"],
- ", ",
- ButtonBox["D0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"D0",
- ButtonNote->"D0"],
- ", ",
- ButtonBox["PaVe",
- BaseStyle->"AddOnsLink",
- ButtonData:>"PaVe",
- ButtonNote->"PaVe"],
- "."
-}], "Text",
- CellTags->"A0ToB0",
- CellID->1120307520]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -353,12 +315,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Abbreviation.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Abbreviation.nb
index 965c7c71f..793f1759e 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Abbreviation.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Abbreviation.nb
@@ -202,9 +202,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/QuarkPropagator",
ButtonNote->"QuarkPropagator"],
"."
-}], "Text",
- CellTags->"Abbreviation",
- CellID->1098399815]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -327,12 +325,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/AlphaFS.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/AlphaFS.nb
new file mode 100644
index 000000000..a5492f1ef
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/AlphaFS.nb
@@ -0,0 +1,288 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/AlphaFS", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["AlphaFS", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["AlphaFS"], "InlineFormula"],
+ " \[LineSeparator] is a shortcut for SMP[\"alpha_fs\"] which represents the \
+fine-structure constant."
+}], "Usage",
+ CellID->982511436],
+
+Cell[TextData[{
+ "The shortcut AlphaFS is deprecated, please use ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " instead!"
+}], "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["AlphaFS"], "Input",
+ CellLabel->"In[4]:=",
+ CellID->527800968],
+
+Cell[BoxData[
+ FormBox["\[Alpha]", TraditionalForm]], "Output",
+ CellLabel->"Out[4]=",
+ CellID->1767187053]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "InputForm"}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->353669473],
+
+Cell["SMP[\"alpha_fs\"]", "Output",
+ CellLabel->"Out[6]//InputForm=",
+ CellID->1961649519]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{399, Automatic}, {Automatic, 158}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/AlphaStrong.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/AlphaStrong.nb
new file mode 100644
index 000000000..dae876e87
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/AlphaStrong.nb
@@ -0,0 +1,291 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/AlphaStrong", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["AlphaStrong", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["AlphaStrong"], "InlineFormula"],
+ " \[LineSeparator] is a shortcut for ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " which represents the strong coupling constant."
+}], "Usage",
+ CellID->982511436],
+
+Cell[TextData[{
+ "The shortcut AlphaStrong is deprecated, please use ",
+ Cell[BoxData[
+ RowBox[{"SMP", "[", "\"\\"", "]"}]], "InlineFormula"],
+ " instead!"
+}], "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["AlphaStrong"], "Input",
+ CellLabel->"In[2]:=",
+ CellID->242614212],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Alpha]", "s"], TraditionalForm]], "Output",
+ CellLabel->"Out[2]=",
+ CellID->757680076]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "InputForm"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1787119639],
+
+Cell["SMP[\"alpha_s\"]", "Output",
+ CellLabel->"Out[3]//InputForm=",
+ CellID->573753393]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{393, Automatic}, {Automatic, 261}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Amplitude.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Amplitude.nb
index c3dbed64d..b16cc9107 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Amplitude.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Amplitude.nb
@@ -170,9 +170,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/FeynAmp",
ButtonNote->"FeynAmp"],
"."
-}], "Text",
- CellTags->"Amplitude",
- CellID->587564717]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -215,16 +213,14 @@ Cell[BoxData[
CellID->680936529]
}, Open ]],
-Cell["This is the amplitude of a gluon self-energy diagram:", "Text",
- CellTags->"Amplitude",
- CellID->1145607079],
+Cell["This is the amplitude of a gluon self-energy diagram:", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Amplitude", "[", "\"\\"", "]"}]], "Input",
CellTags->"Amplitude",
- CellLabel->"In[2]:=",
+ CellLabel->"In[190]:=",
CellID->69921964],
Cell[BoxData[
@@ -396,8 +392,7 @@ Cell[BoxData[
RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}]}],
TraditionalForm], ")"}]}], ")"}], TraditionalForm]], "Output",
CellTags->"Amplitude",
- CellLabel->"Out[2]=",
- CellID->1321530464]
+ CellLabel->"Out[190]="]
}, Open ]],
Cell[CellGroupData[{
@@ -405,112 +400,94 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Explicit", "[", "%", "]"}]], "Input",
CellTags->"Amplitude",
- CellLabel->"In[3]:=",
+ CellLabel->"In[191]:=",
CellID->863772966],
Cell[BoxData[
FormBox[
- RowBox[{"-",
- RowBox[{"(",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubsuperscriptBox["g", "s", "2"], " ",
- FormBox[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]}]], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"d\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"f\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
RowBox[{
- FormBox[
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
SuperscriptBox[
FormBox[
FormBox[
@@ -519,13 +496,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
+ TraditionalForm]]}], "-",
SuperscriptBox[
FormBox[
FormBox[
@@ -534,35 +507,25 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -571,13 +534,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
+ TraditionalForm]]}], "-",
SuperscriptBox[
FormBox[
FormBox[
@@ -586,35 +545,25 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Alpha]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Beta]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -623,13 +572,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
+ TraditionalForm]]}], "-",
SuperscriptBox[
FormBox[
FormBox[
@@ -638,36 +583,26 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
+ TraditionalForm]]}], ")"}]}]}], ")"}], " ",
+ RowBox[{"(",
RowBox[{
- FormBox[
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
SuperscriptBox[
FormBox[
FormBox[
@@ -676,14 +611,10 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]], "-",
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -692,34 +623,24 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
SuperscriptBox[
FormBox[
FormBox[
@@ -728,13 +649,9 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- FormBox[
+ TraditionalForm]], "+",
SuperscriptBox[
FormBox[
FormBox[
@@ -743,34 +660,24 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
+ TraditionalForm]]}], ")"}]}], "+",
+ RowBox[{
SuperscriptBox["g",
RowBox[{
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Rho]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
SuperscriptBox[
FormBox[
FormBox[
@@ -779,14 +686,10 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
+ TraditionalForm]], "-",
+ RowBox[{"2", " ",
SuperscriptBox[
FormBox[
FormBox[
@@ -795,854 +698,51 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
- TraditionalForm],
+ RowBox[{"FCGV", "(", "\<\"\[Sigma]\"\>", ")"}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}], ")"}]}], ")"}]}],
- TraditionalForm]], "Output",
- CellTags->"Amplitude",
- CellLabel->"Out[3]=",
- CellID->377476222]
-}, Open ]],
-
-Cell[TextData[{
- "This is the amplitude for graph 6.2 from the paper Z.Phys C ",
- StyleBox["70:",
- FontWeight->"Bold"],
- "637-654, 1996:"
-}], "Text",
- CellTags->"Amplitude",
- CellID->1089097550],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"FeynAmp", "[",
- RowBox[{"q1", ",", "q2", ",",
- RowBox[{"EpsEvaluate", "[",
- RowBox[{"Trick", "[",
- RowBox[{"Explicit", "[",
- RowBox[{"Amplitude", "[", "\"\\"", "]"}], "]"}], "]"}], "]"}]}],
- "]"}]], "Input",
- CellTags->"Amplitude",
- CellLabel->"In[4]:=",
- CellID->657797482],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"\[Integral]",
- RowBox[{
- SuperscriptBox["\[DifferentialD]", "D"],
- FormBox["q1",
- TraditionalForm]}]}],
- RowBox[{"\[Integral]",
- RowBox[{
- SuperscriptBox["\[DifferentialD]", "D"],
- FormBox["q2",
- TraditionalForm]}]}], "(",
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"2", " ", "\[ImaginaryI]", " ",
- RowBox[{"(",
- RowBox[{"1", "-",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-", "1"}], ")"}], "m"],
- TraditionalForm]}], ")"}], " ",
- SubsuperscriptBox["g", "s", "4"], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci6",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci9",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci5",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci6",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci8",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci5",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"a\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["ci8",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["ci9",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"b\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}]], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
+ RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q"], D],
+ FeynCalc`Momentum[
+ FeynCalc`FCGV["q"], D]]],
+ Editable->False], " ",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}], ")"}],
- RowBox[{"m", "-", "1"}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "_"],
- TraditionalForm]}]], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
+ RowBox[{
FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
+ TraditionalForm], "-",
FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Mu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li5",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li8",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"\[Nu]\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li12",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], "+",
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}], ")"}], "/",
- RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}]}],
- TraditionalForm], ")"}], TraditionalForm]], "Output",
+ RowBox[{"FCGV", "(", "\<\"q\"\>", ")"}],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[FeynCalc`FCGV["p"] - FeynCalc`FCGV["q"], D],
+ FeynCalc`Momentum[FeynCalc`FCGV["p"] - FeynCalc`FCGV["q"], D]]],
+ Editable->False]}], ")"}]}], ")"}]}],
+ TraditionalForm], TraditionalForm]], "Output",
CellTags->"Amplitude",
- CellLabel->"Out[4]=",
- CellID->1560610372]
+ CellLabel->"Out[191]="]
}, Open ]]
}, Open ]],
@@ -1707,12 +807,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{0, Automatic}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Amputate.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Amputate.nb
index eff3acab0..2bf2e8f75 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Amputate.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Amputate.nb
@@ -125,8 +125,26 @@ also p.q1 and p.q2; Pair\[Rule]All amputates all except OPEDelta."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Amputate", "]"}]], "Input",
+ CellTags->"Amputate",
+ CellLabel->"In[194]:=",
+ CellID->1884550851],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"Pair", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"Unique", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"Amputate",
+ CellLabel->"Out[194]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -167,29 +185,27 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
ButtonNote->"DiracGamma"],
", ",
- ButtonBox["DiracMatrix",
+ ButtonBox["GA",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData:>"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
", ",
- ButtonBox["DiracSlash",
+ ButtonBox["GS",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
+ ButtonData:>"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
", ",
ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
"."
-}], "Text",
- CellTags->"Amputate",
- CellID->1266124166]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -218,58 +234,39 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Amputate", "]"}]], "Input",
- CellTags->"Amputate",
- CellLabel->"In[1]:=",
- CellID->1884550851],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"Pair", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"Unique", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"Amputate",
- CellLabel->"Out[1]=",
- CellID->697719830]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{
- RowBox[{"DiracSlash", "[", "p", "]"}], ".",
- RowBox[{"DiracSlash", "[", "q", "]"}]}]], "Input",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "q", "]"}]}]], "Input",
CellTags->"Amputate",
- CellLabel->"In[2]:=",
+ CellLabel->"In[27]:=",
CellID->479729855],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
CellTags->"Amputate",
- CellLabel->"Out[2]=",
- CellID->1732499360]
+ CellLabel->"Out[27]="]
}, Open ]],
Cell[CellGroupData[{
@@ -278,27 +275,23 @@ Cell[BoxData[
RowBox[{"Amputate", "[",
RowBox[{"%", ",", "q"}], "]"}]], "Input",
CellTags->"Amputate",
- CellLabel->"In[3]:=",
+ CellLabel->"In[28]:=",
CellID->1612122659],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- RowBox[{"$AL$2188", "\[InvisibleApplication]",
- RowBox[{"(", "1", ")"}]}],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ RowBox[{"$AL$41318", "\[InvisibleApplication]",
+ RowBox[{"(", "1", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], " ",
RowBox[{
RowBox[{"(",
RowBox[{
@@ -311,13 +304,12 @@ Cell[BoxData[
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- RowBox[{"$AL$2188", "\[InvisibleApplication]",
+ RowBox[{"$AL$41318", "\[InvisibleApplication]",
RowBox[{"(", "1", ")"}]}],
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
CellTags->"Amputate",
- CellLabel->"Out[3]=",
- CellID->42958207]
+ CellLabel->"Out[28]="]
}, Open ]]
}, Open ]],
@@ -382,12 +374,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{714, Automatic}, {Automatic, 143}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/AnomalousDimension.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/AnomalousDimension.nb
index 0e3ba0c13..b55039bf8 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/AnomalousDimension.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/AnomalousDimension.nb
@@ -123,8 +123,25 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "AnomalousDimension", "]"}]], "Input",
+ CellTags->"AnomalousDimension",
+ CellLabel->"In[1]:=",
+ CellID->1953214619],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Polarization", "\[Rule]", "1"}], ",",
+ RowBox[{"Simplify", "\[Rule]", "FullSimplify"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"AnomalousDimension",
+ CellLabel->"Out[1]=",
+ CellID->1686866166]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -176,9 +193,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/SumT",
ButtonNote->"SumT"],
"."
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1774979938]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -205,29 +220,7 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "AnomalousDimension", "]"}]], "Input",
- CellTags->"AnomalousDimension",
- CellLabel->"In[1]:=",
- CellID->1953214619],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Polarization", "\[Rule]", "1"}], ",",
- RowBox[{"Simplify", "\[Rule]", "FullSimplify"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"AnomalousDimension",
- CellLabel->"Out[1]=",
- CellID->1686866166]
-}, Open ]],
-
-Cell["Polarized case:", "Text",
- CellTags->"AnomalousDimension",
- CellID->2007063734],
+Cell["Polarized case:", "Notes"],
Cell[CellGroupData[{
@@ -236,7 +229,7 @@ Cell[BoxData[
RowBox[{"AnomalousDimension", ",",
RowBox[{"Polarization", "\[Rule]", "1"}]}], "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[2]:=",
+ CellLabel->"In[196]:=",
CellID->1676073016],
Cell[BoxData[
@@ -247,8 +240,7 @@ Cell[BoxData[
RowBox[{"Simplify", "\[Rule]", "FullSimplify"}]}], "}"}],
TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[2]=",
- CellID->455353582]
+ CellLabel->"Out[196]="]
}, Open ]],
Cell[TextData[{
@@ -259,16 +251,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1291876789],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gnsqq0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[3]:=",
+ CellLabel->"In[197]:=",
CellID->146201031],
Cell[BoxData[
@@ -288,8 +278,7 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}]], "-", "6"}], ")"}]}],
TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[3]=",
- CellID->615808229]
+ CellLabel->"Out[197]="]
}, Open ]],
Cell[TextData[{
@@ -300,16 +289,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1792202903],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsqg0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[4]:=",
+ CellLabel->"In[198]:=",
CellID->1170655896],
Cell[BoxData[
@@ -322,8 +309,7 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}]]}], ")"}], " ",
SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[4]=",
- CellID->2056489351]
+ CellLabel->"Out[198]="]
}, Open ]],
Cell[TextData[{
@@ -334,16 +320,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1242785256],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgq0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[5]:=",
+ CellLabel->"In[199]:=",
CellID->1302484886],
Cell[BoxData[
@@ -356,8 +340,7 @@ Cell[BoxData[
FractionBox["8", "m"]}], ")"}], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[5]=",
- CellID->339795493]
+ CellLabel->"Out[199]="]
}, Open ]],
Cell[TextData[{
@@ -368,16 +351,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->102826276],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgg0", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[6]:=",
+ CellLabel->"In[200]:=",
CellID->255541888],
Cell[BoxData[
@@ -401,8 +382,7 @@ Cell[BoxData[
RowBox[{"8", " ",
SubscriptBox["T", "f"]}], "3"]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[6]=",
- CellID->724940306]
+ CellLabel->"Out[200]="]
}, Open ]],
Cell[TextData[{
@@ -413,16 +393,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "0", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1117022044],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gpsqq1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[7]:=",
+ CellLabel->"In[201]:=",
CellID->1738556670],
Cell[BoxData[
@@ -448,8 +426,7 @@ Cell[BoxData[
SubscriptBox["C", "F"], " ",
SubscriptBox["T", "f"]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[7]=",
- CellID->297175504]
+ CellLabel->"Out[201]="]
}, Open ]],
Cell[TextData[{
@@ -460,16 +437,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1509439590],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gnsqq1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[8]:=",
+ CellLabel->"In[202]:=",
CellID->1025475425],
Cell[BoxData[
@@ -690,8 +665,7 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}], ")"}], "2"]}]], "-",
FractionBox["2", "3"]}], ")"}]}]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[8]=",
- CellID->1707320400]
+ CellLabel->"Out[202]="]
}, Open ]],
Cell[TextData[{
@@ -702,16 +676,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->26937910],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsqg1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[9]:=",
+ CellLabel->"In[204]:=",
CellID->1790656955],
Cell[BoxData[
@@ -854,8 +826,7 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}], ")"}], "3"]]}], ")"}]}]}],
TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[9]=",
- CellID->578210880]
+ CellLabel->"Out[204]="]
}, Open ]],
Cell[TextData[{
@@ -866,16 +837,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1644657872],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgq1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[10]:=",
+ CellLabel->"In[205]:=",
CellID->1820360375],
Cell[BoxData[
@@ -1090,8 +1059,7 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}], ")"}], "3"]]}], ")"}]}]}],
TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[10]=",
- CellID->1694165204]
+ CellLabel->"Out[205]="]
}, Open ]],
Cell[TextData[{
@@ -1102,16 +1070,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized:"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->462099557],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "gsgg1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[11]:=",
+ CellLabel->"In[206]:=",
CellID->1613754345],
Cell[BoxData[
@@ -1280,8 +1246,7 @@ Cell[BoxData[
SubscriptBox["C", "F"], " ",
SubscriptBox["T", "f"]}]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[11]=",
- CellID->1244918806]
+ CellLabel->"Out[206]="]
}, Open ]],
Cell[TextData[{
@@ -1292,16 +1257,14 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
"polarized (different representation):"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->721182810],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"AnomalousDimension", "[", "GSGG1", "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[12]:=",
+ CellLabel->"In[207]:=",
CellID->889064365],
Cell[BoxData[
@@ -1443,8 +1406,7 @@ Cell[BoxData[
RowBox[{"m", "+", "1"}], ")"}], "3"]}]]}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[12]=",
- CellID->1840404969]
+ CellLabel->"Out[207]="]
}, Open ]],
Cell[TextData[{
@@ -1456,9 +1418,7 @@ Cell[TextData[{
RowBox[{
RowBox[{"(", "1", ")"}], " "}]], TraditionalForm]]],
":"
-}], "Text",
- CellTags->"AnomalousDimension",
- CellID->1805318835],
+}], "Notes"],
Cell[CellGroupData[{
@@ -1471,7 +1431,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"ij", ",", "1", ",", "17", ",", "2"}], "}"}]}], "]"}]], "Input",
CellTags->"AnomalousDimension",
- CellLabel->"In[13]:=",
+ CellLabel->"In[208]:=",
CellID->621534472],
Cell[BoxData[
@@ -1481,8 +1441,7 @@ Cell[BoxData[
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0"}], "}"}], TraditionalForm]], "Output",
CellTags->"AnomalousDimension",
- CellLabel->"Out[13]=",
- CellID->494342750]
+ CellLabel->"Out[208]="]
}, Open ]]
}, Open ]],
@@ -1547,12 +1506,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{397, Automatic}, {Automatic, -8}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Anti5.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Anti5.nb
index 709e59942..adb7fa64d 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Anti5.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Anti5.nb
@@ -118,26 +118,45 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"Anti5", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "anticommutes all ",
+ " \[LineSeparator]anticommutes all ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "in exp to the right. Anti5[exp, n] anticommutes all ",
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in exp to the right.\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"Anti5", "[",
+ RowBox[{"exp", ",", "n"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]anticommutes all ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " ",
+ Cell[BoxData["n"], "InlineFormula"],
+ "-times to the right.\n",
+ Cell[" ", "ModInfo"],
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]",
- RowBox[{"5", " "}]], TraditionalForm]]],
- "n times to the right. Anti5[exp, -n] anticommutes all ",
+ RowBox[{"Anti5", "[",
+ RowBox[{"exp", ",",
+ RowBox[{"-", "n"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]anticommutes all ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " n times to the left."
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " ",
+ Cell[BoxData["n"], "InlineFormula"],
+ "-times to the left."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Anti5", "]"}]], "Input",
+ CellLabel->"In[54]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{", "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[54]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -188,9 +207,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
"."
-}], "Text",
- CellTags->"Anti5",
- CellID->1283449801]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -221,19 +238,31 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracMatrix", "[",
+ RowBox[{"GA", "[",
RowBox[{"5", ",", "\[Mu]"}], "]"}], " "}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[1]:=",
+ CellLabel->"In[42]:=",
CellID->2080632323],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"5", ",", "\[Mu]"}], ")"}], TraditionalForm]], "Output",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[1]=",
- CellID->294517214]
+ CellLabel->"Out[42]="]
}, Open ]],
Cell[CellGroupData[{
@@ -241,7 +270,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Anti5", "[", "%", "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[2]:=",
+ CellLabel->"In[43]:=",
CellID->1232582412],
Cell[BoxData[
@@ -259,18 +288,23 @@ Cell[BoxData[
FormBox["5",
TraditionalForm]]}]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[2]=",
- CellID->1246682665]
+ CellLabel->"Out[43]="]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"Anti5", "[",
RowBox[{"%", ",",
RowBox[{"-", "1"}]}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[3]:=",
+ CellLabel->"In[44]:=",
CellID->1609506190],
Cell[BoxData[
@@ -287,30 +321,63 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[3]=",
- CellID->741917191]
+ CellLabel->"Out[44]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracMatrix", "[",
+ RowBox[{"GA", "[",
RowBox[{
"5", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
"]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[4]:=",
+ CellLabel->"In[45]:=",
CellID->1286690073],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{
- "5", ",", "\[Alpha]", ",", "\[Beta]", ",", "\[Gamma]", ",", "\[Delta]"}],
- ")"}], TraditionalForm]], "Output",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Gamma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[4]=",
- CellID->733245772]
+ CellLabel->"Out[45]="]
}, Open ]],
Cell[CellGroupData[{
@@ -319,7 +386,7 @@ Cell[BoxData[
RowBox[{"Anti5", "[",
RowBox[{"%", ",", "2"}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[5]:=",
+ CellLabel->"In[46]:=",
CellID->197831622],
Cell[BoxData[
@@ -354,8 +421,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[5]=",
- CellID->446711059]
+ CellLabel->"Out[46]="]
}, Open ]],
Cell[CellGroupData[{
@@ -364,7 +430,7 @@ Cell[BoxData[
RowBox[{"Anti5", "[",
RowBox[{"%%", ",", "Infinity"}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[6]:=",
+ CellLabel->"In[47]:=",
CellID->1010214576],
Cell[BoxData[
@@ -399,8 +465,7 @@ Cell[BoxData[
FormBox["5",
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[6]=",
- CellID->1568263833]
+ CellLabel->"Out[47]="]
}, Open ]],
Cell[CellGroupData[{
@@ -410,7 +475,7 @@ Cell[BoxData[
RowBox[{"%", ",",
RowBox[{"-", "Infinity"}]}], "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[7]:=",
+ CellLabel->"In[48]:=",
CellID->1359760692],
Cell[BoxData[
@@ -445,26 +510,29 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[7]=",
- CellID->177899299]
+ CellLabel->"Out[48]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"In the naive ",
Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "- scheme D-dimensional ",
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ "-scheme ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional ",
+ Cell[BoxData["\[Gamma]"], "InlineFormula"],
+ "-matrices anticommute with",
Cell[BoxData[
- FormBox["\[Gamma]", TraditionalForm]]],
- "-matrices anticommute with ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
"."
-}], "Text",
- CellTags->"Anti5",
- CellID->1633748802],
+}], "Notes"],
Cell[CellGroupData[{
@@ -472,7 +540,7 @@ Cell[BoxData[
RowBox[{"GA5", ".",
RowBox[{"GAD", "[", "\[Mu]", "]"}]}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[8]:=",
+ CellLabel->"In[49]:=",
CellID->1799781971],
Cell[BoxData[
@@ -490,8 +558,7 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[8]=",
- CellID->1994871864]
+ CellLabel->"Out[49]="]
}, Open ]],
Cell[CellGroupData[{
@@ -499,7 +566,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Anti5", "[", "%", "]"}]], "Input",
CellTags->"Anti5",
- CellLabel->"In[9]:=",
+ CellLabel->"In[50]:=",
CellID->42617734],
Cell[BoxData[
@@ -516,8 +583,70 @@ Cell[BoxData[
FormBox["5",
TraditionalForm]]}]}], TraditionalForm]], "Output",
CellTags->"Anti5",
- CellLabel->"Out[9]=",
- CellID->1660721309]
+ CellLabel->"Out[50]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["Anti5",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Anti5",
+ ButtonNote->"Anti5"],
+ " also works in the t'Hooft-Veltman-Breitenlohner-Maison scheme"
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+ CellLabel->"In[62]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Anti5", "[",
+ RowBox[{"GA5", ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[63]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "^"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[63]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+
+ CellLabel->"In[64]:="]
}, Open ]]
}, Open ]],
@@ -581,13 +710,14 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{864, 877},
+WindowMargins->{{730, Automatic}, {-5, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiCommutator.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiCommutator.nb
index 914bbe7d7..b66b6af1b 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiCommutator.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiCommutator.nb
@@ -117,10 +117,15 @@ Cell["AntiCommutator", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"AntiCommutator", "[",
- RowBox[{"x", ",", " ", "y"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "= c defines the anti-commutator of the non commuting objects x and y."
+ RowBox[{
+ RowBox[{"AntiCommutator", "[",
+ RowBox[{"x", ",", " ", "y"}], "]"}], "=", "c"}]], "InlineFormula"],
+ " \[LineSeparator]defines the anti-commutator of the non commuting objects \
+",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["y"], "InlineFormula"],
+ "."
}], "Usage",
CellID->982511436],
@@ -181,9 +186,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
"."
-}], "Text",
- CellTags->"AntiCommutator",
- CellID->1793111208]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -218,15 +221,13 @@ Cell[TextData[{
StyleBox["b",
FontFamily->"Courier"],
" as noncommutative variables."
-}], "Text",
- CellTags->"AntiCommutator",
- CellID->1525212065],
+}], "Notes"],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[1]:=",
+ CellLabel->"In[209]:=",
CellID->756062925],
Cell[CellGroupData[{
@@ -235,7 +236,7 @@ Cell[BoxData[
RowBox[{"AntiCommutator", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[2]:=",
+ CellLabel->"In[210]:=",
CellID->1726378547],
Cell[BoxData[
@@ -254,8 +255,7 @@ Cell[BoxData[
FormBox["\<\"}\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[2]=",
- CellID->479481037]
+ CellLabel->"Out[210]="]
}, Open ]],
Cell[CellGroupData[{
@@ -263,7 +263,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CommutatorExplicit", "[", "%", "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[3]:=",
+ CellLabel->"In[211]:=",
CellID->693384404],
Cell[BoxData[
@@ -272,8 +272,7 @@ Cell[BoxData[
RowBox[{"a", ".", "b"}], "+",
RowBox[{"b", ".", "a"}]}], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[3]=",
- CellID->147684859]
+ CellLabel->"Out[211]="]
}, Open ]],
Cell[CellGroupData[{
@@ -286,7 +285,7 @@ Cell[BoxData[
RowBox[{"a", "-",
RowBox[{"2", "b"}]}]}], " ", "]"}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[4]:=",
+ CellLabel->"In[212]:=",
CellID->1495920503],
Cell[BoxData[
@@ -305,8 +304,7 @@ Cell[BoxData[
RowBox[{"a", "-",
RowBox[{"2", " ", "b"}]}], ")"}]}]}], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[4]=",
- CellID->1027223948]
+ CellLabel->"Out[212]="]
}, Open ]],
Cell[CellGroupData[{
@@ -319,27 +317,21 @@ Cell[BoxData[
RowBox[{"a", "-",
RowBox[{"2", "b"}]}]}], " ", "]"}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[5]:=",
+ CellLabel->"In[213]:=",
CellID->871283752],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "-",
- RowBox[{"2", " ", "b"}]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}]}], "+",
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"a", "-",
- RowBox[{"2", " ", "b"}]}], ")"}]}]}], TraditionalForm]], "Output",
+ RowBox[{"-",
+ RowBox[{"a", ".", "b"}]}], "-",
+ RowBox[{"b", ".", "a"}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"a", ".", "a"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"b", ".", "b"}]}]}], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[5]=",
- CellID->980600157]
+ CellLabel->"Out[213]="]
}, Open ]],
Cell[BoxData[
@@ -348,12 +340,10 @@ Cell[BoxData[
OverscriptBox["c", "~"], ",",
OverscriptBox["d", "~"]}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[6]:=",
+ CellLabel->"In[214]:=",
CellID->422937377],
-Cell["Defining {c,d} = z results in replacements of c.d by z-d.c.", "Text",
- CellTags->"AntiCommutator",
- CellID->405748459],
+Cell["Defining {c,d} = z results in replacements of c.d by z-d.c.", "Notes"],
Cell[CellGroupData[{
@@ -362,14 +352,13 @@ Cell[BoxData[
RowBox[{"AntiCommutator", "[",
RowBox[{"c", ",", "d"}], "]"}], " ", "=", " ", "z"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[7]:=",
+ CellLabel->"In[215]:=",
CellID->1154888291],
Cell[BoxData[
FormBox["z", TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[7]=",
- CellID->1400406202]
+ CellLabel->"Out[215]="]
}, Open ]],
Cell[CellGroupData[{
@@ -379,7 +368,7 @@ Cell[BoxData[
RowBox[{"d", " ", ".", " ", "c", " ", ".", " ", "d"}], " ", "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[8]:=",
+ CellLabel->"In[216]:=",
CellID->400792382],
Cell[BoxData[
@@ -388,8 +377,7 @@ Cell[BoxData[
RowBox[{"d", " ", "z"}], "-",
RowBox[{"d", ".", "d", ".", "c"}]}], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[8]=",
- CellID->1500489599]
+ CellLabel->"Out[216]="]
}, Open ]],
Cell[CellGroupData[{
@@ -402,15 +390,14 @@ Cell[BoxData[
OverscriptBox["c", "~"]}], "]"}], " ", "=", " ",
OverscriptBox["z", "~"]}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[9]:=",
+ CellLabel->"In[217]:=",
CellID->392638266],
Cell[BoxData[
FormBox[
OverscriptBox["z", "~"], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[9]=",
- CellID->225220528]
+ CellLabel->"Out[217]="]
}, Open ]],
Cell[CellGroupData[{
@@ -422,7 +409,7 @@ Cell[BoxData[
OverscriptBox["c", "~"], " ", ".", " ",
OverscriptBox["d", "~"]}], " ", "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[10]:=",
+ CellLabel->"In[218]:=",
CellID->598753128],
Cell[BoxData[
@@ -436,8 +423,7 @@ Cell[BoxData[
OverscriptBox["d", "~"], ".",
OverscriptBox["d", "~"]}]}], TraditionalForm]], "Output",
CellTags->"AntiCommutator",
- CellLabel->"Out[10]=",
- CellID->1740531218]
+ CellLabel->"Out[218]="]
}, Open ]],
Cell[BoxData[
@@ -446,7 +432,7 @@ Cell[BoxData[
OverscriptBox["c", "~"], ",",
OverscriptBox["d", "~"]}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[11]:=",
+ CellLabel->"In[219]:=",
CellID->108727372],
Cell[BoxData[
@@ -454,7 +440,7 @@ Cell[BoxData[
RowBox[{"AntiCommutator", "[",
RowBox[{"c", ",", "d"}], "]"}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[12]:=",
+ CellLabel->"In[220]:=",
CellID->873286670],
Cell[BoxData[
@@ -464,7 +450,7 @@ Cell[BoxData[
OverscriptBox["d", "~"], ",",
OverscriptBox["c", "~"]}], "]"}], "]"}]], "Input",
CellTags->"AntiCommutator",
- CellLabel->"In[13]:=",
+ CellLabel->"In[221]:=",
CellID->702830390]
}, Open ]],
@@ -529,12 +515,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{593, Automatic}, {Automatic, 76}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiQuarkField.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiQuarkField.nb
index c748fc902..dd2434c93 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiQuarkField.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/AntiQuarkField.nb
@@ -170,9 +170,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/QuarkField",
ButtonNote->"QuarkField"],
"."
-}], "Text",
- CellTags->"AntiQuarkField",
- CellID->1809382525]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -203,15 +201,14 @@ Cell[CellGroupData[{
Cell[BoxData["AntiQuarkField"], "Input",
CellTags->"AntiQuarkField",
- CellLabel->"In[1]:=",
+ CellLabel->"In[222]:=",
CellID->820739788],
Cell[BoxData[
FormBox[
OverscriptBox["\[Psi]", "_"], TraditionalForm]], "Output",
CellTags->"AntiQuarkField",
- CellLabel->"Out[1]=",
- CellID->1958170632]
+ CellLabel->"Out[222]="]
}, Open ]]
}, Open ]],
@@ -276,12 +273,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{256, Automatic}, {Automatic, -8}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart1.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart1.nb
index 0c3b7bec6..503b2c496 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart1.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart1.nb
@@ -169,9 +169,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Apart3",
ButtonNote->"Apart3"],
"."
-}], "Text",
- CellTags->"Apart1",
- CellID->104867705]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -257,12 +255,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{229, Automatic}, {Automatic, -8}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart2.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart2.nb
index b2fc46fa6..6efde5a57 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart2.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart2.nb
@@ -124,8 +124,24 @@ Please use ApartFF instead."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Apart2", "]"}]], "Input",
+ CellTags->"Apart2",
+ CellLabel->"In[223]:=",
+ CellID->1571464480],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"ExcludeMasses", "\[Rule]",
+ RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
+ CellTags->"Apart2",
+ CellLabel->"Out[223]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -176,9 +192,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/ApartFF",
ButtonNote->"ApartFF"],
"."
-}], "Text",
- CellTags->"Apart2",
- CellID->1960323984]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -207,26 +221,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Apart2", "]"}]], "Input",
- CellTags->"Apart2",
- CellLabel->"In[1]:=",
- CellID->1571464480],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factoring", "\[Rule]", "True"}], ",",
- RowBox[{"ExcludeMasses", "\[Rule]",
- RowBox[{"{", "}"}]}]}], "}"}], TraditionalForm]], "Output",
- CellTags->"Apart2",
- CellLabel->"Out[1]=",
- CellID->1842118848]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"FAD", "[",
RowBox[{
@@ -236,7 +230,7 @@ Cell[BoxData[
RowBox[{"q", ",", "M"}], "}"}], ",",
RowBox[{"q", "-", "p"}]}], "]"}]], "Input",
CellTags->"Apart2",
- CellLabel->"In[2]:=",
+ CellLabel->"In[224]:=",
CellID->1580962822],
Cell[BoxData[
@@ -245,32 +239,57 @@ Cell[BoxData[
RowBox[{
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
"\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`m^2, "]"],
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
Editable->False], ")"}], ".",
RowBox[{"(",
InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
"\[InvisibleSpace]",
- SuperscriptBox["M", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`M^2, "]"],
+ SuperscriptBox["M", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`M^2],
Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}]}]], TraditionalForm]], "Output",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
CellTags->"Apart2",
- CellLabel->"Out[2]=",
- CellID->1281611536]
+ CellLabel->"Out[224]="]
}, Open ]],
Cell[CellGroupData[{
@@ -278,49 +297,100 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Apart2", "[", "%", "]"}]], "Input",
CellTags->"Apart2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[225]:=",
CellID->867958772],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]], "-",
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]]}],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["M", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`M^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm]}],
RowBox[{
SuperscriptBox["m", "2"], "-",
SuperscriptBox["M", "2"]}]], TraditionalForm]], "Output",
CellTags->"Apart2",
- CellLabel->"Out[3]=",
- CellID->496976710]
+ CellLabel->"Out[225]="]
}, Open ]],
Cell[CellGroupData[{
@@ -329,7 +399,7 @@ Cell[BoxData[
RowBox[{"StandardForm", "[",
RowBox[{"FCE", "[", "%", "]"}], "]"}]], "Input",
CellTags->"Apart2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[226]:=",
CellID->168515472],
Cell[BoxData[
@@ -351,8 +421,7 @@ Cell[BoxData[
SuperscriptBox["m", "2"], "-",
SuperscriptBox["M", "2"]}]]], "Output",
CellTags->"Apart2",
- CellLabel->"Out[4]//StandardForm=",
- CellID->638625530]
+ CellLabel->"Out[226]//StandardForm="]
}, Open ]]
}, Open ]],
@@ -417,9 +486,10 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 741},
-WindowMargins->{{Automatic, 924}, {20, Automatic}},
+WindowMargins->{{296, Automatic}, {0, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart3.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart3.nb
index 813ec7deb..57e28d3a2 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart3.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Apart3.nb
@@ -166,9 +166,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Apart1",
ButtonNote->"Apart1"],
"."
-}], "Text",
- CellTags->"Apart3",
- CellID->13488114]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -254,12 +252,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{131, Automatic}, {Automatic, -8}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ApartFF.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ApartFF.nb
index eaea1fa1a..949606d92 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ApartFF.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/ApartFF.nb
@@ -1,22 +1,3 @@
-(* Content-type: application/vnd.wolfram.mathematica *)
-
-(*** Wolfram Notebook File ***)
-(* http://www.wolfram.com/nb *)
-
-(* CreatedBy='Mathematica 10.3' *)
-
-(*CacheID: 234*)
-(* Internal cache information:
-NotebookFileLineBreakTest
-NotebookFileLineBreakTest
-NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 34982, 1316]
-NotebookOptionsPosition[ 29909, 1135]
-NotebookOutlinePosition[ 30527, 1159]
-CellTagsIndexPosition[ 30447, 1154]
-WindowFrame->Normal*)
-
-(* Beginning of Notebook Content *)
Notebook[{
Cell[TextData[{
"New in: ",
@@ -147,9 +128,6 @@ FCApart as a backend and works and is suitable also for multiloop integrals. \
ApartFF effectively replaces the older function Apart2 and \
ScalarProductCancel which are now considered legacy."
}], "Usage",
- CellChangeTimes->{
- 3.6690197132862587`*^9, {3.669019746241928*^9, 3.669019760812505*^9}, {
- 3.669020142535486*^9, 3.669020150819665*^9}},
CellID->982511436],
Cell[TextData[{
@@ -169,9 +147,31 @@ multivariate polynomials,\t\t\t\t",
" objects, i.e. it is less general. For the original $Apart see ",
"https://github.com/F-Feng/APart"
}], "Notes",
- CellChangeTimes->{{3.66902161970112*^9, 3.669021741237609*^9}, {
- 3.669021800072906*^9, 3.669021852382724*^9}},
- CellID->610107001]
+ CellID->610107001],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ApartFF", "]"}]], "Input",
+ CellLabel->"In[42]:=",
+ CellID->1116592623],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"DropScaleless", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynAmpDenominator", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[42]=",
+ CellID->1861839595]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -210,7 +210,6 @@ Cell[TextData[ButtonBox["FCApart",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/FCApart",
ButtonNote->"FCApart"]], "SeeAlso",
- CellChangeTimes->{3.669022274355624*^9},
CellID->929782353]
}, Open ]],
@@ -238,89 +237,87 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "ApartFF", "]"}]], "Input",
- CellChangeTimes->{{3.669022150938936*^9, 3.669022151723551*^9}},
- CellLabel->"In[42]:=",
- CellID->1116592623],
-
Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Collecting", "\[Rule]", "True"}], ",",
- RowBox[{"DropScaleless", "\[Rule]", "True"}], ",",
- RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"FeynAmpDenominatorSimplify", "\[Rule]", "True"}], ",",
- RowBox[{"FeynAmpDenominator", "\[Rule]", "True"}], ",",
- RowBox[{"FeynAmpDenominatorCombine", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- CellChangeTimes->{3.669022152012895*^9},
- CellLabel->"Out[42]=",
- CellID->1861839595]
-}, Open ]],
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellLabel->"In[1]:="],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
RowBox[{
RowBox[{"SPD", "[",
RowBox[{"q", ",", "q"}], "]"}],
RowBox[{"FAD", "[",
RowBox[{"{",
- RowBox[{"q", ",", "m"}], "}"}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellChangeTimes->{{3.6690212570316963`*^9, 3.669021268199172*^9}},
- CellLabel->"In[20]:=",
+ RowBox[{"q", ",", "m"}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[25]:=",
CellID->591868896],
Cell[BoxData[
FormBox[
- RowBox[{
+ FractionBox[
FormBox[
SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm], " ",
- FormBox[
- FractionBox["1",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "-", $CellContext`m^2, "]"],
- Editable->False]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellChangeTimes->{{3.669021265199581*^9, 3.6690212686271877`*^9}},
- CellLabel->"Out[20]=",
- CellID->1506674849],
+ TraditionalForm],
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ CellLabel->"Out[25]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[26]:="],
Cell[BoxData[
FormBox[
FractionBox[
SuperscriptBox["m", "2"],
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
- CellChangeTimes->{{3.669021265199581*^9, 3.669021268658454*^9}},
- CellLabel->"Out[21]=",
- CellID->415169895]
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False]], TraditionalForm]], "Output",
+ CellLabel->"Out[26]="]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{
RowBox[{"SPD", "[",
RowBox[{"q", ",", "p"}], "]"}],
@@ -332,292 +329,533 @@ Cell[BoxData[{
RowBox[{"{",
RowBox[{"q", "-", "p"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"q", "-", "r"}], "}"}]}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellChangeTimes->{{3.669021460926227*^9, 3.669021495342286*^9}},
- CellLabel->"In[30]:=",
+ RowBox[{"q", "-", "r"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[27]:=",
CellID->1827687893],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- RowBox[{"(",
- FormBox[
- RowBox[{
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
FormBox[
FormBox["q",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "r"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q - $CellContext`r)^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellChangeTimes->{{3.66902147124557*^9, 3.669021495702406*^9}},
- CellLabel->"Out[30]=",
- CellID->2016661296],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["r",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q - $CellContext`r, D],
+ FeynCalc`Momentum[$CellContext`q - $CellContext`r, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[27]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[28]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"4", " ",
+ FormBox[
+ FractionBox[
RowBox[{
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], "+",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{"2", " ",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
SuperscriptBox[
FormBox[
FormBox["r",
TraditionalForm],
- TraditionalForm], "2"]}]}],
- RowBox[{"4", " ",
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["r",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D] -
+ FeynCalc`Momentum[$CellContext`r, D],
+ FeynCalc`Momentum[$CellContext`q, D] -
+ FeynCalc`Momentum[$CellContext`r, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
RowBox[{
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ RowBox[{"2", " ",
RowBox[{"(",
RowBox[{
- RowBox[{"-",
- FormBox["p",
- TraditionalForm]}], "+",
- FormBox["q",
- TraditionalForm], "+",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- FormBox[
- FormBox["r",
- TraditionalForm],
- TraditionalForm], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["p",
+ TraditionalForm]}], "+",
+ FormBox["q",
+ TraditionalForm], "+",
+ FormBox["r",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D] +
+ FeynCalc`Momentum[$CellContext`r, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D] +
+ FeynCalc`Momentum[$CellContext`r, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"-",
+ FractionBox[
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["r",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
-
- CellChangeTimes->{{3.66902147124557*^9, 3.6690214958583927`*^9}},
- CellLabel->"Out[31]=",
- CellID->1046578815]
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]]}],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["r",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D] -
+ FeynCalc`Momentum[$CellContext`r, D],
+ FeynCalc`Momentum[$CellContext`q, D] -
+ FeynCalc`Momentum[$CellContext`r, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[28]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{"FAD", "[",
RowBox[{
RowBox[{"{", "q", "}"}], ",",
RowBox[{"{",
RowBox[{"q", "-", "p"}], "}"}], ",",
RowBox[{"{",
- RowBox[{"q", "+", "p"}], "}"}]}], "]"}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{", "q", "}"}]}], "]"}]}], "Input",
- CellChangeTimes->{{3.669021197141284*^9, 3.669021247351454*^9}},
- CellLabel->"In[16]:=",
+ RowBox[{"q", "+", "p"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[29]:=",
CellID->1902480830],
Cell[BoxData[
FormBox[
FractionBox["1",
RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"p", "+", "q"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`p + $CellContext`q)^2, "]"],
- Editable->False], ")"}]}]], TraditionalForm]], "Output",
- CellChangeTimes->{{3.669021224421582*^9, 3.6690212476667843`*^9}},
- CellLabel->"Out[16]=",
- CellID->2016279001],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[29]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[30]:="],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
+ FormBox[
+ FractionBox["1",
RowBox[{
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox["1",
- RowBox[{
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], " ",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
RowBox[{
SuperscriptBox[
- FormBox["q",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- RowBox[{"2", " ",
- FormBox["p",
- TraditionalForm]}]}], ")"}], "2"]}]}]]}],
- TraditionalForm]], "Output",
- CellChangeTimes->{{3.669021224421582*^9, 3.669021247764662*^9}},
- CellLabel->"Out[17]=",
- CellID->370459499]
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ RowBox[{"2", " ",
+ FormBox["p",
+ TraditionalForm]}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[(-2) FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], (-2)
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[30]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[BoxData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
RowBox[{
RowBox[{"SPD", "[",
RowBox[{"p", ",", "q1"}], "]"}],
@@ -632,34 +870,14 @@ Cell[BoxData[{
RowBox[{"q2", ",", "m"}], "}"}], ",",
RowBox[{"q1", "-", "p"}], ",",
RowBox[{"q2", "-", "p"}], ",",
- RowBox[{"q1", "-", "q2"}]}], "]"}]}], "\[IndentingNewLine]",
- RowBox[{"ApartFF", "[",
- RowBox[{"%", ",",
- RowBox[{"{",
- RowBox[{"q1", ",", "q2", ",", "q3"}], "}"}]}], "]"}]}], "Input",
- CellChangeTimes->{{3.6690212965551767`*^9, 3.6690213215260477`*^9}, {
- 3.669021439295632*^9, 3.669021445270279*^9}},
- CellLabel->"In[24]:=",
+ RowBox[{"q1", "-", "q2"}]}], "]"}]}]], "Input",
+ CellLabel->"In[31]:=",
CellID->21286566],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- TraditionalForm], ")"}], " ",
- SuperscriptBox[
+ FractionBox[
+ RowBox[{
RowBox[{"(",
FormBox[
RowBox[{
@@ -670,200 +888,543 @@ Cell[BoxData[
FormBox["\<\"\[CenterDot]\"\>",
TraditionalForm],
FormBox[
- FormBox["q2",
+ FormBox["q1",
TraditionalForm],
TraditionalForm]}],
- TraditionalForm], ")"}], "2"], " ",
- FormBox[
- FractionBox["1",
- RowBox[{
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q1", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q1^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox["q2", "2"], "\[InvisibleSpace]", "\<\"-\"\>",
- "\[InvisibleSpace]",
- SuperscriptBox["m", "2"], "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", $CellContext`q2^2, "-", $CellContext`m^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q1)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q2", "-", "p"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", (-$CellContext`p + $CellContext`q2)^2, "]"],
- Editable->False], ")"}], ".",
- RowBox[{"(",
- InterpretationBox[
- RowBox[{"\<\"[\"\>", "\[InvisibleSpace]",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q1", "-", "q2"}], ")"}], "2"],
- "\[InvisibleSpace]", "\<\"]\"\>"}],
- SequenceForm["[", ($CellContext`q1 - $CellContext`q2)^2, "]"],
- Editable->False], ")"}]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellChangeTimes->{{3.669021431328766*^9, 3.669021446088846*^9}},
- CellLabel->"Out[24]=",
- CellID->1152232710],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
+ TraditionalForm], ")"}], " ",
SuperscriptBox[
RowBox[{"(",
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
+ FormBox[
+ RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "3"],
- RowBox[{"8", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], "2"]}],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
SuperscriptBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- SuperscriptBox[
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
SuperscriptBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], "2"],
- RowBox[{"4", " ",
- RowBox[{
- SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
- SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- RowBox[{"(",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
- SuperscriptBox[
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"], "-",
- RowBox[{
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1 - $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[31]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[32]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "3"],
+ RowBox[{"8", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
FormBox[
FormBox["p",
TraditionalForm],
@@ -873,203 +1434,1914 @@ Cell[BoxData[
FormBox[
FormBox["q1",
TraditionalForm],
- TraditionalForm]}]}], ")"}]}],
- RowBox[{"4", " ",
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], "+",
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "+",
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], ".",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"8", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[32]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "p"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q", "-", "p"}], ",", "0"}], "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[33]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[33]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{", "q", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[34]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[34]="]
+}, Open ]],
+
+Cell[TextData[{
+ "If the propagators should not altered via momentum shifts (e.g. because \
+they belong to a previously identified topology), use ",
+ Cell[BoxData[
+ RowBox[{"FDS", "\[Rule]", "False"}]], "InlineFormula"]
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{", "q", "}"}], ",",
+ RowBox[{"FDS", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[35]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"-",
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]]}],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ InterpretationBox[
+ SuperscriptBox[
RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q, D]]],
+ Editable->False]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[35]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SPD", "[",
+ RowBox[{"q2", ",", "p"}], "]"}],
+ RowBox[{"SPD", "[",
+ RowBox[{"q1", ",", "p"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"q1", ",", "m"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q2", ",", "m"}], "}"}], ",",
+ RowBox[{"q1", "-", "p"}], ",",
+ RowBox[{"q2", "-", "p"}], ",",
+ RowBox[{"q2", "-", "q1"}]}], "]"}]}]], "Input",
+ CellLabel->"In[36]:="],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
FormBox["q1",
- TraditionalForm], "-",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`p + $CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[-$CellContext`q1 + $CellContext`q2, D],
+ FeynCalc`Momentum[-$CellContext`q1 + $CellContext`q2, D]]],
+ Editable->False]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[36]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[37]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
RowBox[{"(",
RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}]}]}]], "-",
- FractionBox[
- RowBox[{
- RowBox[{"(",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
RowBox[{
- SuperscriptBox["m", "2"], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}], ")"}], " ",
- RowBox[{"(",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"2", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q1, D] -
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[37]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ApartFF", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"{",
+ RowBox[{"q1", ",", "q2"}], "}"}], ",",
+ RowBox[{"FDS", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[38]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}], ")"}], "2"],
+ RowBox[{"4", " ",
RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
FormBox[
FormBox["p",
TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
FormBox[
- FormBox["q1",
+ FormBox["p",
TraditionalForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"]}],
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"]}]}]], "-",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"4", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm]}], ")"}], "2"], ".",
- SuperscriptBox[
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
RowBox[{"(",
- RowBox[{
- FormBox["q1",
- TraditionalForm], "-",
- FormBox["q2",
- TraditionalForm]}], ")"}], "2"]}]}]], "+",
- FractionBox[
- RowBox[{
- SuperscriptBox["m", "2"], "+",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- FormBox["q1",
- TraditionalForm],
- TraditionalForm]}], ")"}]}], "+",
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm], "2"]}],
- RowBox[{"8", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q1, D],
+ FeynCalc`Momentum[$CellContext`q1, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["m", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`q2, D],
+ FeynCalc`Momentum[$CellContext`q2, D]], "-", $CellContext`m^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{
+ InterpretationBox[
SuperscriptBox[
- FormBox["q1",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["q1",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`q1, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False], ".",
+ InterpretationBox[
SuperscriptBox[
- FormBox["q2",
- TraditionalForm], "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], ".",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox["q2",
- TraditionalForm], "-",
- FormBox["q1",
- TraditionalForm]}], ")"}], "2"]}]}]]}], TraditionalForm]], "Output",\
-
- CellChangeTimes->{{3.669021431328766*^9, 3.669021446804216*^9}},
- CellLabel->"Out[25]=",
- CellID->1286760799]
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q1, D]]],
+ Editable->False], ".",
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q2",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[-FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D], -
+ FeynCalc`Momentum[$CellContext`p, D] +
+ FeynCalc`Momentum[$CellContext`q2, D]]],
+ Editable->False]}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[38]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -1133,193 +3405,14 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 741},
-WindowMargins->{{1985, Automatic}, {Automatic, 59}},
+WindowSize->{700, 740},
+WindowMargins->{{793, Automatic}, {Automatic, 241}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
+TrackCellChangeTimes->False,
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
-(* End of Notebook Content *)
-
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{
- "ExtendedExamples"->{
- Cell[28389, 1077, 100, 2, 54, "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968]}
- }
-*)
-(*CellTagsIndex
-CellTagsIndex->{
- {"ExtendedExamples", 30307, 1147}
- }
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[558, 20, 325, 14, 23, "History",
- CellID->1247902091],
-Cell[CellGroupData[{
-Cell[908, 38, 68, 1, 28, "CategorizationSection",
- CellID->1122911449],
-Cell[979, 41, 79, 2, 70, "Categorization",
- CellID->686433507],
-Cell[1061, 45, 81, 2, 70, "Categorization",
- CellID->605800465],
-Cell[1145, 49, 78, 2, 70, "Categorization",
- CellID->468444828],
-Cell[1226, 53, 65, 1, 70, "Categorization"]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1328, 59, 55, 1, 18, "KeywordsSection",
- CellID->477174294],
-Cell[1386, 62, 45, 1, 70, "Keywords",
- CellID->1164421360]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1468, 68, 65, 1, 18, "TemplatesSection",
- CellID->1872225408],
-Cell[1536, 71, 94, 2, 70, "Template",
- CellID->1562036412],
-Cell[1633, 75, 82, 2, 70, "Template",
- CellID->158391909],
-Cell[1718, 79, 81, 2, 70, "Template",
- CellID->1360575930],
-Cell[1802, 83, 82, 2, 70, "Template",
- CellID->793782254]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[1921, 90, 53, 1, 18, "DetailsSection",
- CellID->307771771],
-Cell[1977, 93, 63, 2, 70, "Details",
- CellID->670882175],
-Cell[2043, 97, 69, 2, 70, "Details",
- CellID->350963985],
-Cell[2115, 101, 64, 2, 70, "Details",
- CellID->8391405],
-Cell[2182, 105, 69, 2, 70, "Details",
- CellID->3610269],
-Cell[2254, 109, 61, 2, 70, "Details",
- CellID->401364205],
-Cell[2318, 113, 61, 2, 70, "Details",
- CellID->350204745],
-Cell[2382, 117, 63, 2, 70, "Details",
- CellID->732958810],
-Cell[2448, 121, 78, 2, 70, "Details",
- CellID->222905350],
-Cell[2529, 125, 67, 2, 70, "Details",
- CellID->240026365]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[2633, 132, 50, 1, 63, "ObjectName",
- CellID->1224892054],
-Cell[2686, 135, 735, 17, 117, "Usage",
- CellID->982511436],
-Cell[3424, 154, 834, 19, 101, "Notes",
- CellID->610107001]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4295, 178, 57, 1, 43, "TutorialsSection",
- CellID->250839057],
-Cell[4355, 181, 45, 1, 16, "Tutorials",
- CellID->341631938]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4437, 187, 83, 1, 30, "RelatedDemonstrationsSection",
- CellID->1268215905],
-Cell[4523, 190, 58, 1, 16, "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4618, 196, 65, 1, 30, "RelatedLinksSection",
- CellID->1584193535],
-Cell[4686, 199, 49, 1, 16, "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[4772, 205, 55, 1, 30, "SeeAlsoSection",
- CellID->1255426704],
-Cell[4830, 208, 197, 5, 16, "SeeAlso",
- CellID->929782353]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5064, 218, 57, 1, 30, "MoreAboutSection",
- CellID->38303248],
-Cell[5124, 221, 46, 1, 16, "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[5207, 227, 356, 11, 68, "PrimaryExamplesSection",
- CellID->880084151],
-Cell[CellGroupData[{
-Cell[5588, 242, 177, 4, 26, "Input",
- CellID->1116592623],
-Cell[5768, 248, 655, 15, 83, "Output",
- CellID->1861839595]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[6460, 268, 399, 12, 46, "Input",
- CellID->591868896],
-Cell[6862, 282, 717, 22, 57, "Output",
- CellID->1506674849],
-Cell[7582, 306, 326, 11, 61, "Output",
- CellID->415169895]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[7945, 322, 569, 18, 46, "Input",
- CellID->1827687893],
-Cell[8517, 342, 1836, 61, 58, "Output",
- CellID->2016661296],
-Cell[10356, 405, 2822, 114, 60, "Output",
- CellID->1046578815]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[13215, 524, 432, 13, 46, "Input",
- CellID->1902480830],
-Cell[13650, 539, 1102, 30, 58, "Output",
- CellID->2016279001],
-Cell[14755, 571, 1082, 43, 57, "Output",
- CellID->370459499]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[15874, 619, 761, 23, 46, "Input",
- CellID->21286566],
-Cell[16638, 644, 2745, 81, 83, "Output",
- CellID->1152232710],
-Cell[19386, 727, 8954, 344, 432, "Output",
- CellID->1286760799]
-}, Open ]]
-}, Open ]],
-Cell[CellGroupData[{
-Cell[28389, 1077, 100, 2, 54, "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-Cell[28492, 1081, 125, 3, 32, "ExampleSection",
- CellID->1293636265],
-Cell[28620, 1086, 148, 3, 20, "ExampleSection",
- CellID->1020263627],
-Cell[CellGroupData[{
-Cell[28793, 1093, 127, 3, 20, "ExampleSection",
- CellID->2061341341],
-Cell[28923, 1098, 130, 3, 70, "ExampleSubsection",
- CellID->1757724783],
-Cell[29056, 1103, 130, 3, 70, "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-Cell[29201, 1109, 131, 3, 20, "ExampleSection",
- CellID->258228157],
-Cell[29335, 1114, 142, 3, 20, "ExampleSection",
- CellID->2123667759],
-Cell[29480, 1119, 135, 3, 20, "ExampleSection",
- CellID->1305812373],
-Cell[29618, 1124, 140, 3, 20, "ExampleSection",
- CellID->1653164318],
-Cell[29761, 1129, 132, 3, 20, "ExampleSection",
- CellID->589267740]
-}, Open ]]
-}
-]
-*)
-(* End of internal cache information *)
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/B0.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/B0.nb
index f264f3159..eeea170fc 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/B0.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/B0.nb
@@ -133,7 +133,27 @@ B0Unique to True simplifies B0[a,0,a] and B0[0,0,a]."
CellID->982511436],
Cell["XXXX", "Notes",
- CellID->1067943069]
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B0", "]"}]], "Input",
+ CellTags->"B0",
+ CellLabel->"In[1]:=",
+ CellID->1219933183],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"BReduce", "\[Rule]", "False"}], ",",
+ RowBox[{"B0Unique", "\[Rule]", "False"}], ",",
+ RowBox[{"B0Real", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"B0",
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -189,9 +209,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVe",
ButtonNote->"PaVe"],
"."
-}], "Text",
- CellTags->"B0",
- CellID->1803724154]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -220,27 +238,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "B0", "]"}]], "Input",
- CellTags->"B0",
- CellLabel->"In[1]:=",
- CellID->1219933183],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"BReduce", "\[Rule]", "False"}], ",",
- RowBox[{"B0Unique", "\[Rule]", "False"}], ",",
- RowBox[{"B0Real", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"B0",
- CellLabel->"Out[1]=",
- CellID->1197548514]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{
@@ -249,7 +246,7 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[2]:=",
+ CellLabel->"In[10]:=",
CellID->1494166331],
Cell[BoxData[
@@ -272,28 +269,19 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"B0",
- CellLabel->"Out[2]=",
- CellID->1350980966]
+ CellLabel->"Out[10]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"B0", ",",
- RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
- CellTags->"B0",
- CellLabel->"In[3]:=",
- CellID->643767668],
-
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"0", ",", "0", ",",
- SuperscriptBox["m", "2"]}], "]"}]], "Input",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
+ RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[4]:=",
+ CellLabel->"In[7]:=",
CellID->510341898],
Cell[BoxData[
@@ -311,8 +299,7 @@ Cell[BoxData[
HoldForm],
TraditionalForm], "+", "1"}], TraditionalForm]], "Output",
CellTags->"B0",
- CellLabel->"Out[4]=",
- CellID->170690020]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -321,9 +308,11 @@ Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{
SuperscriptBox["m", "2"], ",", "0", ",",
- SuperscriptBox["m", "2"]}], "]"}]], "Input",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
+ RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[5]:=",
+ CellLabel->"In[8]:=",
CellID->1178094654],
Cell[BoxData[
@@ -341,8 +330,7 @@ Cell[BoxData[
HoldForm],
TraditionalForm], "+", "2"}], TraditionalForm]], "Output",
CellTags->"B0",
- CellLabel->"Out[5]=",
- CellID->2121507054]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -353,7 +341,7 @@ Cell[BoxData[
RowBox[{"m", "^", "2"}], ",",
RowBox[{"m", "^", "2"}]}], "]"}]], "Input",
CellTags->"B0",
- CellLabel->"In[6]:=",
+ CellLabel->"In[9]:=",
CellID->828170126],
Cell[BoxData[
@@ -368,8 +356,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"B0",
- CellLabel->"Out[6]=",
- CellID->271170246]
+ CellLabel->"Out[9]="]
}, Open ]]
}, Open ]],
@@ -434,12 +421,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{525, Automatic}, {Automatic, 81}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/B00.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/B00.nb
index 2e292795d..2abace2ba 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/B00.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/B00.nb
@@ -131,8 +131,23 @@ arguments are scalars and have dimension mass^2."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B00", "]"}]], "Input",
+ CellTags->"B00",
+ CellLabel->"In[1]:=",
+ CellID->356334892],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
+
+ CellTags->"B00",
+ CellLabel->"Out[1]=",
+ CellID->729895507]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -183,9 +198,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVe",
ButtonNote->"PaVe"],
"."
-}], "Text",
- CellTags->"B00",
- CellID->1890318949]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -214,228 +227,139 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "B00", "]"}]], "Input",
- CellTags->"B00",
- CellLabel->"In[1]:=",
- CellID->356334892],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
-
- CellTags->"B00",
- CellLabel->"Out[1]=",
- CellID->729895507]
-}, Open ]],
-
-Cell[TextData[{
- "See also: ",
- " ",
- ButtonBox["B0",
- BaseStyle->"AddOnsLink",
- ButtonData:>"B0",
- ButtonNote->"B0"],
- ", ",
- ButtonBox["B1",
- BaseStyle->"AddOnsLink",
- ButtonData:>"B1",
- ButtonNote->"B1"],
- ", ",
- ButtonBox["PaVe",
- BaseStyle->"AddOnsLink",
- ButtonData:>"PaVe",
- ButtonNote->"PaVe"],
- "."
-}], "Text",
- CellTags->"B00",
- CellID->2061897287],
-
-Cell[TextData[{
- "Remember that SP[p] is a short hand input for ScalarProduct[p,p], i.e., ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["p", "2"], TraditionalForm]]],
- "."
-}], "Text",
- CellTags->"B00",
- CellID->2041843191],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SP", "[", "p", "]"}]], "Input",
- CellTags->"B00",
- CellLabel->"In[2]:=",
- CellID->592752912],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- CellTags->"B00",
- CellLabel->"Out[2]=",
- CellID->2024988940]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"B00", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[3]:=",
+ CellLabel->"In[11]:=",
CellID->1556776794],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- RowBox[{"(",
- RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ RowBox[{"2", " ", "m", " ", "M"}], "+",
+ SuperscriptBox["M", "2"], "-",
+ FormBox[
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "+",
- SuperscriptBox["m", "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], " ",
- RowBox[{"(",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{"2", " ", "m", " ", "M"}], "+",
+ SuperscriptBox["M", "2"], "-",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}]], "-",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
RowBox[{
- FractionBox["1", "2"], " ",
FormBox[
- TagBox[
+ SuperscriptBox[
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["M", "2"], ")"}],
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "3"], " ",
- SuperscriptBox["m", "2"], " ",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ TraditionalForm], "2"],
+ TraditionalForm]}]], "+",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["M", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "-",
+ FormBox[
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "+",
- RowBox[{
- FractionBox["1", "18"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]], "-",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+",
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm]}], "+",
- RowBox[{"3", " ",
- SuperscriptBox["m", "2"]}], "+",
- RowBox[{"3", " ",
- SuperscriptBox["M", "2"]}]}], ")"}]}]}], TraditionalForm]], "Output",
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"B00",
- CellLabel->"Out[3]=",
- CellID->2088825026]
+ CellLabel->"Out[11]="]
}, Open ]],
Cell[CellGroupData[{
@@ -443,21 +367,19 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B00", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[4]:=",
+ CellLabel->"In[13]:=",
CellID->1244341296],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
+ RowBox[{"-",
+ FractionBox[
RowBox[{
- FractionBox["1", "2"], " ",
RowBox[{"(",
RowBox[{
RowBox[{"4", " ",
@@ -465,9 +387,8 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]}], ")"}], " ",
FormBox[
@@ -479,42 +400,33 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}], "+",
- RowBox[{
- FractionBox["1", "3"], " ",
+ TraditionalForm]}],
+ RowBox[{"4", " ",
RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- RowBox[{"6", " ",
- SuperscriptBox["m", "2"]}], "-",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["m", "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], TraditionalForm]], "Output",
CellTags->"B00",
- CellLabel->"Out[4]=",
- CellID->1967668942]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -522,33 +434,34 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B00", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"], ",",
RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[5]:=",
+ CellLabel->"In[15]:=",
CellID->1245211962],
Cell[BoxData[
FormBox[
- RowBox[{"FeynCalc`PaVeIntegrals`Private`b00", "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"00\"\>"], "(",
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"], ",",
- RowBox[{"BReduce", "\[Rule]", "False"}]}], ")"}],
- TraditionalForm]], "Output",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
CellTags->"B00",
- CellLabel->"Out[5]=",
- CellID->870366776]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
@@ -559,30 +472,43 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[6]:=",
+ CellLabel->"In[16]:=",
CellID->1891605192],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "1"}], ")"}]}], TraditionalForm]], "Output",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"0", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]]}], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], TraditionalForm]], "Output",
CellTags->"B00",
- CellLabel->"Out[6]=",
- CellID->1063864886]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
@@ -595,31 +521,44 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B00",
- CellLabel->"In[7]:=",
+ CellLabel->"In[20]:=",
CellID->1823175928],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "2"], " ",
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], " ",
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- SuperscriptBox["M", "2"], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "1"}], ")"}]}], TraditionalForm]], "Output",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"1", "-", "D"}]]}], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}]}]]}], TraditionalForm]], "Output",
CellTags->"B00",
- CellLabel->"Out[7]=",
- CellID->524392254]
+ CellLabel->"Out[20]="]
}, Open ]]
}, Open ]],
@@ -684,12 +623,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{Automatic, 552}, {Automatic, -35}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Real.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Real.nb
index fbe4c5f4b..1fbd37d0a 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Real.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Real.nb
@@ -160,15 +160,12 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
ButtonBox["B0",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/B0",
ButtonNote->"B0"],
"."
-}], "Text",
- CellTags->"B0Real",
- CellID->1839543320]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -195,9 +192,7 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["By default the arguments are not assumed real.", "Text",
- CellTags->"B0Real",
- CellID->130288840],
+Cell["By default the arguments are not assumed real.", "Notes"],
Cell[CellGroupData[{
@@ -205,59 +200,33 @@ Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"s", ",", "0", ",", "s"}], "]"}]], "Input",
CellTags->"B0Real",
- CellLabel->"In[1]:=",
+ CellLabel->"In[21]:=",
CellID->1048836421],
Cell[BoxData[
FormBox[
- RowBox[{
+ TagBox[
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "s", ",", "s"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "2"}], TraditionalForm]], "Output",
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"s", ",", "0", ",", "s"}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
CellTags->"B0Real",
- CellLabel->"Out[1]=",
- CellID->997660714]
+ CellLabel->"Out[21]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"B0", "//", "Options"}]], "Input",
- CellTags->"B0Real",
- CellLabel->"In[2]:=",
- CellID->168010706],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"BReduce", "\[Rule]", "False"}], ",",
- RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"B0Real",
- CellLabel->"Out[2]=",
- CellID->994724143]
-}, Open ]],
-
-Cell["With B0Real\[Rule]True, transformation is done.", "Text",
- CellTags->"B0Real",
- CellID->617964813],
+Cell["With B0Real\[Rule]True, transformation is done.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"s", ",", "0", ",", "s", ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "]"}]], "Input",
+ RowBox[{"B0Real", "\[Rule]", "True"}], ",",
+ RowBox[{"B0Unique", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0Real",
- CellLabel->"In[3]:=",
+ CellLabel->"In[26]:=",
CellID->848873063],
Cell[BoxData[
@@ -273,8 +242,7 @@ Cell[BoxData[
HoldForm],
TraditionalForm], "+", "2"}], TraditionalForm]], "Output",
CellTags->"B0Real",
- CellLabel->"Out[3]=",
- CellID->1655563844]
+ CellLabel->"Out[26]="]
}, Open ]]
}, Open ]],
@@ -339,12 +307,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1430, Automatic}, {Automatic, 225}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Unique.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Unique.nb
index fe1764c64..7f4db03d8 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Unique.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/B0Unique.nb
@@ -160,15 +160,12 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
ButtonBox["B0",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/B0",
ButtonNote->"B0"],
"."
-}], "Text",
- CellTags->"B0Unique",
- CellID->993329416]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -195,9 +192,7 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["By default transformation is done.", "Text",
- CellTags->"B0Unique",
- CellID->1633725722],
+Cell["By default no transformation is done.", "Notes"],
Cell[CellGroupData[{
@@ -205,73 +200,48 @@ Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"0", ",", "0", ",", "s"}], "]"}]], "Input",
CellTags->"B0Unique",
- CellLabel->"In[1]:=",
+ CellLabel->"In[28]:=",
CellID->539333149],
Cell[BoxData[
FormBox[
- RowBox[{
+ TagBox[
FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "s", ",", "s"}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "+", "1"}], TraditionalForm]], "Output",
- CellTags->"B0Unique",
- CellLabel->"Out[1]=",
- CellID->2030362910]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "B0", "]"}]], "Input",
- CellTags->"B0Unique",
- CellLabel->"In[2]:=",
- CellID->1904628151],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"BReduce", "\[Rule]", "False"}], ",",
- RowBox[{"B0Unique", "\[Rule]", "True"}], ",",
- RowBox[{"B0Real", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"0", ",", "0", ",", "s"}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
CellTags->"B0Unique",
- CellLabel->"Out[2]=",
- CellID->226407255]
+ CellLabel->"Out[28]="]
}, Open ]],
-Cell["With B0Real\[Rule]False, nothing happens.", "Text",
- CellTags->"B0Unique",
- CellID->1308469818],
+Cell["With B0Real\[Rule]True following transformation is applied", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"0", ",", "0", ",", "s", ",",
- RowBox[{"B0Unique", "\[Rule]", "False"}]}], "]"}]], "Input",
+ RowBox[{"B0Unique", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"B0Unique",
- CellLabel->"In[3]:=",
+ CellLabel->"In[30]:=",
CellID->224258616],
Cell[BoxData[
FormBox[
- TagBox[
+ RowBox[{
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",", "0", ",", "s"}], ")"}],
- TraditionalForm],
- HoldForm], TraditionalForm]], "Output",
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"0", ",", "s", ",", "s"}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], "+", "1"}], TraditionalForm]], "Output",
CellTags->"B0Unique",
- CellLabel->"Out[3]=",
- CellID->1908481089]
+ CellLabel->"Out[30]="]
}, Open ]]
}, Open ]],
@@ -336,12 +306,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{857, Automatic}, {Automatic, 183}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/B1.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/B1.nb
index 5770822cf..dd3501fec 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/B1.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/B1.nb
@@ -130,8 +130,22 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B1", "]"}]], "Input",
+ CellTags->"B1",
+ CellLabel->"In[31]:=",
+ CellID->1893937597],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
+
+ CellTags->"B1",
+ CellLabel->"Out[31]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -192,9 +206,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVeReduce",
ButtonNote->"PaVeReduce"],
"."
-}], "Text",
- CellTags->"B1",
- CellID->1961153968]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -223,108 +235,97 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "B1", "]"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[1]:=",
- CellID->1893937597],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
-
- CellTags->"B1",
- CellLabel->"Out[1]=",
- CellID->1980658046]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"B1", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"]}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[2]:=",
+ CellLabel->"In[71]:=",
CellID->1808836307],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], "+",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
RowBox[{"2", " ",
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm]}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
+ FractionBox[
FormBox[
TagBox[
FormBox[
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["M", "2"], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
+ TraditionalForm],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"B1",
- CellLabel->"Out[2]=",
- CellID->1988092032]
+ CellLabel->"Out[71]="]
}, Open ]],
Cell[CellGroupData[{
@@ -332,44 +333,36 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B1", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"], ",",
RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[3]:=",
+ CellLabel->"In[72]:=",
CellID->1461354182],
Cell[BoxData[
FormBox[
- RowBox[{"B1", "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"], ",",
- RowBox[{"BReduce", "\[Rule]", "False"}]}], ")"}],
- TraditionalForm]], "Output",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
CellTags->"B1",
- CellLabel->"Out[3]=",
- CellID->406770555]
+ CellLabel->"Out[72]="]
}, Open ]],
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"B1", ",",
- RowBox[{"BReduce", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[4]:=",
- CellID->630039750],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -378,9 +371,7 @@ Cell[BoxData[
RowBox[{"SP", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
- CellTags->"B1",
- CellLabel->"In[5]:=",
- CellID->300888921],
+ CellLabel->"In[73]:="],
Cell[BoxData[
FormBox[
@@ -406,9 +397,39 @@ Cell[BoxData[
TraditionalForm],
HoldForm],
TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"B1",
- CellLabel->"Out[5]=",
- CellID->1554458660]
+ CellLabel->"Out[73]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B1", "[",
+ RowBox[{
+ RowBox[{"SPD", "[", "p", "]"}], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[74]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ CellLabel->"Out[74]="]
}, Open ]],
Cell[CellGroupData[{
@@ -419,32 +440,61 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"], ",", "0"}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[6]:=",
+ CellLabel->"In[75]:=",
CellID->313475676],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-", "2"}], ")"}]}], "-",
- FractionBox["1", "2"]}], TraditionalForm]], "Output",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SuperscriptBox["m", "2"]}]], "-",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",", "0", ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"B1",
- CellLabel->"Out[6]=",
- CellID->363524267]
+ CellLabel->"Out[75]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B1", "[",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",", "0", ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[76]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",", "0"}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ CellLabel->"Out[76]="]
}, Open ]],
Cell[CellGroupData[{
@@ -454,32 +504,21 @@ Cell[BoxData[
RowBox[{"0", ",", "0", ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[7]:=",
+ CellLabel->"In[77]:=",
CellID->241881109],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-", "1"}], ")"}]}], "+",
- FractionBox["1", "4"]}], TraditionalForm]], "Output",
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"1\"\>"], "(",
+ RowBox[{"0", ",", "0", ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
CellTags->"B1",
- CellLabel->"Out[7]=",
- CellID->1652463561]
+ CellLabel->"Out[77]="]
}, Open ]],
Cell[CellGroupData[{
@@ -488,97 +527,47 @@ Cell[BoxData[
RowBox[{"B1", "[",
RowBox[{"pp", ",",
RowBox[{"SmallVariable", "[",
- SubsuperscriptBox["m", "e", "2"], "]"}], ",",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}], "]"}], ",",
SubsuperscriptBox["m", "2", "2"]}], "]"}]], "Input",
CellTags->"B1",
- CellLabel->"In[8]:=",
+ CellLabel->"In[78]:=",
CellID->2089704958],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"pp", "-",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{"pp", ",",
+ SubsuperscriptBox["m", "e", "2"], ",",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "pp"}]]}], "-",
FractionBox[
- RowBox[{
- SubsuperscriptBox["m", "2", "2"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ", "pp"}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
FormBox[
TagBox[
FormBox[
RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"pp", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SubsuperscriptBox["m", "2", "2"], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"B1",
- CellLabel->"Out[8]=",
- CellID->94888417]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"B1", "[",
- RowBox[{
- RowBox[{"SmallVariable", "[",
- SubsuperscriptBox["m", "e", "2"], "]"}], ",",
- RowBox[{"SmallVariable", "[",
- SubsuperscriptBox["m", "e", "2"], "]"}], ",", "0"}], "]"}]], "Input",
+ TraditionalForm],
+ RowBox[{"2", " ", "pp"}]]}], TraditionalForm]], "Output",
CellTags->"B1",
- CellLabel->"In[9]:=",
- CellID->2075391288],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SubsuperscriptBox["m", "e", "2"], ",",
- SubsuperscriptBox["m", "e", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], "-", "2"}], ")"}]}], "-",
- FractionBox["1", "2"]}], TraditionalForm]], "Output",
- CellTags->"B1",
- CellLabel->"Out[9]=",
- CellID->1940611723]
+ CellLabel->"Out[78]="]
}, Open ]]
}, Open ]],
@@ -643,12 +632,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{941, Automatic}, {Automatic, 191}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/B11.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/B11.nb
index 9fb112ad5..05394f831 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/B11.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/B11.nb
@@ -140,8 +140,19 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "B11", "]"}]], "Input",
+ CellLabel->"In[79]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
+
+ CellLabel->"Out[79]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -197,9 +208,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVe",
ButtonNote->"PaVe"],
"."
-}], "Text",
- CellTags->"B11",
- CellID->1685814901]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -228,202 +237,132 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "B11", "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[1]:=",
- CellID->1842812694],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
-
- CellTags->"B11",
- CellLabel->"Out[1]=",
- CellID->190457790]
-}, Open ]],
-
-Cell[TextData[{
- "Remember that SP[p] is a short hand input for ScalarProduct[p,p], i.e. ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["p", "2"], "."}], TraditionalForm]]]
-}], "Text",
- CellTags->"B11",
- CellID->629012065],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SP", "[", "p", "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[2]:=",
- CellID->401652515],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], TraditionalForm]], "Output",
- CellTags->"B11",
- CellLabel->"Out[2]=",
- CellID->329962251]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"B11", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["M", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[3]:=",
+ CellLabel->"In[80]:=",
CellID->63077265],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1",
- RowBox[{"3", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}]],
- RowBox[{"(",
+ RowBox[{"-",
RowBox[{
- RowBox[{
- SuperscriptBox["m", "2"], " ",
- RowBox[{"(",
- RowBox[{"-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{"2", " ",
- RowBox[{"(",
- RowBox[{
+ FractionBox["1",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm], "+",
- SuperscriptBox["m", "2"], "-",
- SuperscriptBox["M", "2"]}], ")"}], " ",
+ TraditionalForm], "2"]}]],
+ RowBox[{
RowBox[{"(",
RowBox[{
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["M", "2"], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
+ RowBox[{"D", " ",
+ SuperscriptBox["m", "4"]}], "-",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["m", "2"], " ",
+ SuperscriptBox["M", "2"]}], "+",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["m", "2"], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox["M", "4"]}], "-",
+ RowBox[{"2", " ", "D", " ",
+ SuperscriptBox["M", "2"], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "+",
+ RowBox[{"D", " ",
+ SuperscriptBox[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
- TraditionalForm]}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
+ TraditionalForm], "2"]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"], " ",
FormBox[
- TagBox[
+ SuperscriptBox[
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}]}], ")"}]}], "+",
- RowBox[{
- FractionBox["1", "6"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- RowBox[{"3", " ",
- SuperscriptBox["m", "2"]}], "-",
- RowBox[{"3", " ",
- SuperscriptBox["M", "2"]}]}], ")"}]}], "+",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}]}]}], "+",
+ FractionBox[
+ RowBox[{"D", " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox["m", "2"], "-",
+ SuperscriptBox["M", "2"], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]], "-",
+ FractionBox[
+ RowBox[{
FormBox[
TagBox[
FormBox[
@@ -432,10 +371,42 @@ Cell[BoxData[
SuperscriptBox["M", "2"], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"D", " ",
+ SuperscriptBox["m", "2"]}], "-",
+ RowBox[{"D", " ",
+ SuperscriptBox["M", "2"]}], "+",
+ RowBox[{"3", " ", "D", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], "-",
+ RowBox[{"4", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], ")"}]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]]}], TraditionalForm]], "Output",
CellTags->"B11",
- CellLabel->"Out[3]=",
- CellID->740537849]
+ CellLabel->"Out[80]="]
}, Open ]],
Cell[CellGroupData[{
@@ -443,29 +414,62 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B11", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[82]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["M", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ CellLabel->"Out[82]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[4]:=",
+ CellLabel->"In[81]:=",
CellID->10639178],
Cell[BoxData[
FormBox[
- FractionBox[
- RowBox[{
+ RowBox[{
+ FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
+ RowBox[{"4", " ",
+ SuperscriptBox["m", "2"]}], "-",
+ RowBox[{"D", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- SuperscriptBox["m", "2"]}], ")"}], " ",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], ")"}], " ",
FormBox[
TagBox[
FormBox[
@@ -475,70 +479,50 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm], ",",
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm],
- TraditionalForm]}], "+",
+ TraditionalForm]}],
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]], "+",
+ FractionBox[
RowBox[{
- FractionBox["1", "6"], " ",
RowBox[{"(",
- RowBox[{
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ FormBox[
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm], "-",
- RowBox[{"6", " ",
- SuperscriptBox["m", "2"]}]}], ")"}]}], "+",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
- SuperscriptBox["m", "2"], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}],
- RowBox[{"3", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"],
- TraditionalForm]}]], TraditionalForm]], "Output",
- CellTags->"B11",
- CellLabel->"Out[4]=",
- CellID->823230538]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"B11", ",",
- RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[5]:=",
- CellID->1279434093],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "False"}], "}"}], TraditionalForm]], "Output",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"B11",
- CellLabel->"Out[5]=",
- CellID->705577970]
+ CellLabel->"Out[81]="]
}, Open ]],
Cell[CellGroupData[{
@@ -546,12 +530,11 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"B11", "[",
RowBox[{
- RowBox[{"SP", "[", "p", "]"}], ",",
+ RowBox[{"SPD", "[", "p", "]"}], ",",
SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[6]:=",
- CellID->26512272],
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[83]:="],
Cell[BoxData[
FormBox[
@@ -563,38 +546,15 @@ Cell[BoxData[
FormBox[
SuperscriptBox[
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm], "2"],
TraditionalForm], ",",
SuperscriptBox["m", "2"], ",",
- SuperscriptBox["M", "2"]}], ")"}],
+ SuperscriptBox["m", "2"]}], ")"}],
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
- CellTags->"B11",
- CellLabel->"Out[6]=",
- CellID->1173768318]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"SetOptions", "[",
- RowBox[{"B11", ",",
- RowBox[{"BReduce", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"B11",
- CellLabel->"In[7]:=",
- CellID->1075715949],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"BReduce", "\[Rule]", "True"}], "}"}], TraditionalForm]], "Output",
-
- CellTags->"B11",
- CellLabel->"Out[7]=",
- CellID->832224142]
+ CellLabel->"Out[83]="]
}, Open ]],
Cell[CellGroupData[{
@@ -605,7 +565,7 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[8]:=",
+ CellLabel->"In[84]:=",
CellID->1384698038],
Cell[BoxData[
@@ -624,8 +584,31 @@ Cell[BoxData[
HoldForm],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"B11",
- CellLabel->"Out[8]=",
- CellID->303443152]
+ CellLabel->"Out[84]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{"0", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[85]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{"0", ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ CellLabel->"Out[85]="]
}, Open ]],
Cell[CellGroupData[{
@@ -638,28 +621,77 @@ Cell[BoxData[
SuperscriptBox["m", "2"], ",",
SuperscriptBox["m", "2"]}], "]"}]], "Input",
CellTags->"B11",
- CellLabel->"In[9]:=",
+ CellLabel->"In[86]:=",
CellID->1335567043],
Cell[BoxData[
FormBox[
RowBox[{
- FractionBox["1", "3"], " ",
- FormBox[
- TagBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["m", "2"], " ",
FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SuperscriptBox["M", "2"], ",",
- SuperscriptBox["m", "2"], ",",
- SuperscriptBox["m", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], TraditionalForm]], "Output",
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox["M", "2"]}]], "+",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SuperscriptBox["m", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ SuperscriptBox["M", "2"]}]]}], TraditionalForm]], "Output",
CellTags->"B11",
- CellLabel->"Out[9]=",
- CellID->2037163640]
+ CellLabel->"Out[86]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"B11", "[",
+ RowBox[{
+ RowBox[{"SmallVariable", "[",
+ SuperscriptBox["M", "2"], "]"}], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ RowBox[{"BReduce", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[87]:="],
+
+Cell[BoxData[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"11\"\>"], "(",
+ RowBox[{
+ SuperscriptBox["M", "2"], ",",
+ SuperscriptBox["m", "2"], ",",
+ SuperscriptBox["m", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm], TraditionalForm]], "Output",
+ CellLabel->"Out[87]="]
}, Open ]]
}, Open ]],
@@ -724,12 +756,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1012, Automatic}, {Automatic, 165}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/BReduce.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/BReduce.nb
index 2137ef8da..4beaa0bd3 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/BReduce.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/BReduce.nb
@@ -185,9 +185,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/B11",
ButtonNote->"B11"],
"."
-}], "Text",
- CellTags->"BReduce",
- CellID->1422133579]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -224,9 +222,7 @@ Cell[TextData[{
FormBox[
SubscriptBox["A", "0"], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"BReduce",
- CellID->233833972],
+}], "Notes"],
Cell[CellGroupData[{
@@ -234,7 +230,7 @@ Cell[BoxData[
RowBox[{"B0", "[",
RowBox[{"0", ",", "s", ",", "s"}], "]"}]], "Input",
CellTags->"BReduce",
- CellLabel->"In[1]:=",
+ CellLabel->"In[88]:=",
CellID->768966684],
Cell[BoxData[
@@ -247,13 +243,10 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"BReduce",
- CellLabel->"Out[1]=",
- CellID->1373932648]
+ CellLabel->"Out[88]="]
}, Open ]],
-Cell["With BReduce\[Rule]True, transformation is done.", "Text",
- CellTags->"BReduce",
- CellID->174829946],
+Cell["With BReduce\[Rule]True, transformation is done.", "Notes"],
Cell[CellGroupData[{
@@ -262,24 +255,27 @@ Cell[BoxData[
RowBox[{"0", ",", "s", ",", "s", ",",
RowBox[{"BReduce", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"BReduce",
- CellLabel->"In[2]:=",
+ CellLabel->"In[91]:=",
CellID->876027895],
Cell[BoxData[
FormBox[
- RowBox[{
+ RowBox[{"-",
FractionBox[
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", "s", ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "s"], "-", "1"}], TraditionalForm]], "Output",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", "s", ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "s"}]]}], TraditionalForm]], "Output",
CellTags->"BReduce",
- CellLabel->"Out[2]=",
- CellID->460346687]
+ CellLabel->"Out[91]="]
}, Open ]]
}, Open ]],
@@ -344,12 +340,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1028, Automatic}, {Automatic, 103}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/BackgroundGluonVertex.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/BackgroundGluonVertex.nb
index 909f8ad84..0cb006571 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/BackgroundGluonVertex.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/BackgroundGluonVertex.nb
@@ -125,27 +125,91 @@ Cell[TextData[{
RowBox[{"q", ",", "nu", ",", "b"}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"k", ",", "la", ",", "c"}], "}"}]}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "or BackgroundGluonVertex[ p,mu,a , q,nu,b , k,la,c ] yields the 3-gluon \
-vertex in the background field gauge, where the first set of arguments \
-corresponds to the external background field. BackgroundGluonVertex[{p,mu,a}, \
-{q,nu,b}, {k,la,c}, {s,si,d}] or BackgroundGluonVertex[{mu,a}, {nu,b}, \
-{la,c}, {si,d}] or BackgroundGluonVertex[p,mu,a , q,nu,b , k,la,c , s,si,d] \
-or BackgroundGluonVertex[ mu,a , nu,b , la,c , si,d ] yields the 4-gluon \
-vertex, with {p,mu,a} and {k,la,c} denoting the external background fields. \
-The gauge, dimension and the name of the coupling constant are determined by \
-the options Gauge, Dimension and CouplingConstant. The Feynman rules are \
-taken from L.Abbot ",
+ " \[LineSeparator]yields the 3-gluon vertex in the background field gauge, \
+where the first set of arguments corresponds to the external background \
+field.\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"BackgroundGluonVertex", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "mu", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "nu", ",", "b"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"k", ",", "la", ",", "c"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"s", ",", "si", ",", "d"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the 4-gluon vertex, with ",
+ Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"p", ",", "mu", ",", "a"}], "}"}]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{"k", ",", "la", ",", "c"}], "}"}]], "InlineFormula"],
+ " denoting the external background fields."
+}], "Usage",
+ CellID->2010081510],
+
+Cell[TextData[{
+ "The gauge, dimension and the name of the coupling constant are determined \
+by the options ",
+ ButtonBox["Gauge",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Gauge",
+ ButtonNote->"Gauge"],
+ ", ",
+ ButtonBox["Dimension",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Dimension",
+ ButtonNote->"Dimension"],
+ " and ",
+ ButtonBox["CouplingConstant",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "The Feynman rules are taken from L.Abbot ",
StyleBox["NPB ",
FontWeight->"Bold"],
- "185 (1981), 189-203; except that all momenta are incoming. Note that \
-Abbot's coupling constant convention is consistent with the default setting \
-of GluonVertex."
-}], "Usage",
- CellID->982511436],
+ "185 (1981), 189-203; except that all momenta are incoming. "
+}], "Notes"],
+
+Cell[TextData[{
+ "Note that Abbot's coupling constant convention is consistent with the \
+default setting of ",
+ ButtonBox["GluonVertex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GluonVertex",
+ ButtonNote->"GluonVertex"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "BackgroundGluonVertex", "]"}]], "Input",
+ CellTags->"BackgroundGluonVertex",
+ CellLabel->"In[1]:=",
+ CellID->236798928],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "D"}], ",",
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"Gauge", "\[Rule]", "1"}]}], "}"}], TraditionalForm]], "Output",
+ CellTags->"BackgroundGluonVertex",
+ CellLabel->"Out[1]=",
+ CellID->114339715]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -180,15 +244,10 @@ Cell[CellGroupData[{
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[TextData[{
- ButtonBox["GluonVertex",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/GluonVertex",
- ButtonNote->"GluonVertex"],
- "."
-}], "Text",
- CellTags->"BackgroundGluonVertex",
- CellID->648308599]
+Cell[TextData[ButtonBox["GluonVertex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GluonVertex",
+ ButtonNote->"GluonVertex"]], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -217,27 +276,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "BackgroundGluonVertex", "]"}]], "Input",
- CellTags->"BackgroundGluonVertex",
- CellLabel->"In[1]:=",
- CellID->236798928],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "D"}], ",",
- RowBox[{"CouplingConstant", "\[Rule]",
- SubscriptBox["g", "s"]}], ",",
- RowBox[{"Gauge", "\[Rule]", "1"}]}], "}"}], TraditionalForm]], "Output",
- CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[1]=",
- CellID->114339715]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"BackgroundGluonVertex", "[",
RowBox[{
@@ -248,7 +286,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"k", ",", "\[Lambda]", ",", "c"}], "}"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[2]:=",
+ CellLabel->"In[179]:=",
CellID->1056949570],
Cell[BoxData[
@@ -272,121 +310,84 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- RowBox[{"-",
- FormBox["k",
- TraditionalForm]}], "+",
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FormBox["k",
+ TraditionalForm]}], "+",
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm], "+",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["k",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[2]=",
- CellID->617960717]
+ CellLabel->"Out[179]="]
}, Open ]],
Cell[CellGroupData[{
@@ -403,7 +404,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[3]:=",
+ CellLabel->"In[180]:=",
CellID->196355292],
Cell[BoxData[
@@ -426,7 +427,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -441,110 +442,74 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -558,7 +523,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -573,77 +538,53 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -657,7 +598,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -672,114 +613,77 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u25\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u27\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[3]=",
- CellID->949247376]
+ CellLabel->"Out[180]="]
}, Open ]],
Cell[CellGroupData[{
@@ -795,7 +699,7 @@ Cell[BoxData[
RowBox[{"k", ",", "\[Lambda]", ",", "c"}], "}"}], ",",
RowBox[{"Gauge", "\[Rule]", "\[Alpha]"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[4]:=",
+ CellLabel->"In[182]:=",
CellID->410624714],
Cell[BoxData[
@@ -819,127 +723,86 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- RowBox[{"-",
- FormBox[
- FractionBox[
- FormBox["k",
- TraditionalForm], "\[Alpha]"],
- TraditionalForm]}], "+",
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
FormBox["k",
- TraditionalForm], "-",
- FormBox["p",
- TraditionalForm], "+",
- FormBox[
- FractionBox[
- FormBox["q",
- TraditionalForm], "\[Alpha]"],
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ TraditionalForm], "\[Alpha]"]}], "+",
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["p",
+ TraditionalForm], "+",
+ FractionBox[
+ FormBox["q",
+ TraditionalForm], "\[Alpha]"]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox["q",
- TraditionalForm], "-",
- FormBox["k",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["q",
+ TraditionalForm], "-",
+ FormBox["k",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[4]=",
- CellID->998908990]
+ CellLabel->"Out[182]="]
}, Open ]],
Cell[CellGroupData[{
@@ -957,7 +820,7 @@ Cell[BoxData[
RowBox[{"s", ",", "\[Sigma]", ",", "d"}], "}"}], ",",
RowBox[{"Gauge", "\[Rule]", "\[Alpha]"}]}], "]"}]], "Input",
CellTags->"BackgroundGluonVertex",
- CellLabel->"In[5]:=",
+ CellLabel->"In[183]:=",
CellID->1007521255],
Cell[BoxData[
@@ -980,7 +843,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -995,7 +858,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
@@ -1003,104 +866,68 @@ Cell[BoxData[
RowBox[{"-",
FractionBox[
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "\[Alpha]"]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
FormBox["\[Lambda]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ TraditionalForm]}]]}], "\[Alpha]"]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -1114,7 +941,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -1129,111 +956,75 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "\[Alpha]"], "-",
- RowBox[{
- FormBox[
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
+ FormBox["\[Lambda]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]}]], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ TraditionalForm]}]]}], "\[Alpha]"], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], "+",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], "+",
RowBox[{
SuperscriptBox["f",
RowBox[{
@@ -1247,7 +1038,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
SuperscriptBox["f",
@@ -1262,81 +1053,56 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- RowBox[{"FCGV", "(", "\<\"u26\"\>", ")"}],
+ RowBox[{"FCGV", "(", "\<\"u28\"\>", ")"}],
TraditionalForm],
TraditionalForm]}]], " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Lambda]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Lambda]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}]}], ")"}]}],
TraditionalForm]], "Output",
CellTags->"BackgroundGluonVertex",
- CellLabel->"Out[5]=",
- CellID->686414429]
+ CellLabel->"Out[183]="]
}, Open ]]
}, Open ]],
@@ -1401,12 +1167,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{924, Automatic}, {Automatic, 121}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Bracket.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Bracket.nb
index 3b96a1ca0..20b5a26bd 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Bracket.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Bracket.nb
@@ -165,9 +165,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Convolute",
ButtonNote->"Convolute"],
"."
-}], "Text",
- CellTags->"Bracket",
- CellID->442526235]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -252,13 +250,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{700, 773},
+WindowMargins->{{1532, Automatic}, {Automatic, 178}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/C0.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/C0.nb
index bdc3a7c66..c8f3fd491 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/C0.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/C0.nb
@@ -191,9 +191,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVeOrder",
ButtonNote->"PaVeOrder"],
"."
-}], "Text",
- CellTags->"C0",
- CellID->1972879175]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -227,7 +225,7 @@ Cell[BoxData[
RowBox[{"a", ",", "b", ",", "c", ",", " ", "m12", ",", "m22", ",", "m32"}],
"]"}]], "Input",
CellTags->"C0",
- CellLabel->"In[1]:=",
+ CellLabel->"In[93]:=",
CellID->929768353],
Cell[BoxData[
@@ -241,8 +239,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"C0",
- CellLabel->"Out[1]=",
- CellID->370674132]
+ CellLabel->"Out[93]="]
}, Open ]],
Cell[CellGroupData[{
@@ -253,7 +250,7 @@ Cell[BoxData[
RowBox[{"b", ",", "a", ",", "c", ",", "m32", ",", "m22", ",", "m12"}],
"]"}], "//", "PaVeOrder"}]], "Input",
CellTags->"C0",
- CellLabel->"In[2]:=",
+ CellLabel->"In[94]:=",
CellID->281164286],
Cell[BoxData[
@@ -267,8 +264,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"C0",
- CellLabel->"Out[2]=",
- CellID->240939187]
+ CellLabel->"Out[94]="]
}, Open ]],
Cell[CellGroupData[{
@@ -283,7 +279,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"c", ",", "a"}], "}"}]}]}], "]"}]], "Input",
CellTags->"C0",
- CellLabel->"In[3]:=",
+ CellLabel->"In[95]:=",
CellID->2033659557],
Cell[BoxData[
@@ -297,8 +293,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"C0",
- CellLabel->"Out[3]=",
- CellID->1857619476]
+ CellLabel->"Out[95]="]
}, Open ]]
}, Open ]],
@@ -363,12 +358,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1018, Automatic}, {Automatic, 147}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CA.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CA.nb
index cfb9e94af..ead5e188e 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CA.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CA.nb
@@ -175,9 +175,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/SUNSimplify",
ButtonNote->"SUNSimplify"],
"."
-}], "Text",
- CellTags->"CA",
- CellID->831413788]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -208,15 +206,14 @@ Cell[CellGroupData[{
Cell[BoxData["CA"], "Input",
CellTags->"CA",
- CellLabel->"In[1]:=",
+ CellLabel->"In[96]:=",
CellID->373196199],
Cell[BoxData[
FormBox[
SubscriptBox["C", "A"], TraditionalForm]], "Output",
CellTags->"CA",
- CellLabel->"Out[1]=",
- CellID->1618948920]
+ CellLabel->"Out[96]="]
}, Open ]],
Cell[CellGroupData[{
@@ -226,28 +223,26 @@ Cell[BoxData[
RowBox[{"CA", ",",
RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"CA",
- CellLabel->"In[2]:=",
+ CellLabel->"In[97]:=",
CellID->686554202],
Cell[BoxData[
FormBox["N", TraditionalForm]], "Output",
CellTags->"CA",
- CellLabel->"Out[2]=",
- CellID->2112958244]
+ CellLabel->"Out[97]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData["SUNN"], "Input",
CellTags->"CA",
- CellLabel->"In[3]:=",
+ CellLabel->"In[98]:=",
CellID->1806839104],
Cell[BoxData[
FormBox["N", TraditionalForm]], "Output",
CellTags->"CA",
- CellLabel->"Out[3]=",
- CellID->981411080]
+ CellLabel->"Out[98]="]
}, Open ]]
}, Open ]],
@@ -312,12 +307,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1108, Automatic}, {Automatic, 165}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CF.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CF.nb
index 137eacbc7..fc3238b62 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CF.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CF.nb
@@ -179,9 +179,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/SUNSimplify",
ButtonNote->"SUNSimplify"],
"."
-}], "Text",
- CellTags->"CF",
- CellID->856648073]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -212,15 +210,14 @@ Cell[CellGroupData[{
Cell[BoxData["CF"], "Input",
CellTags->"CF",
- CellLabel->"In[1]:=",
+ CellLabel->"In[99]:=",
CellID->606616156],
Cell[BoxData[
FormBox[
SubscriptBox["C", "F"], TraditionalForm]], "Output",
CellTags->"CF",
- CellLabel->"Out[1]=",
- CellID->1771246704]
+ CellLabel->"Out[99]="]
}, Open ]],
Cell[CellGroupData[{
@@ -230,7 +227,7 @@ Cell[BoxData[
RowBox[{"CF", ",", " ",
RowBox[{"SUNNToCACF", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"CF",
- CellLabel->"In[2]:=",
+ CellLabel->"In[100]:=",
CellID->943993167],
Cell[BoxData[
@@ -240,22 +237,20 @@ Cell[BoxData[
SuperscriptBox["N", "2"], "-", "1"}],
RowBox[{"2", " ", "N"}]], TraditionalForm]], "Output",
CellTags->"CF",
- CellLabel->"Out[2]=",
- CellID->1827752058]
+ CellLabel->"Out[100]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData["SUNN"], "Input",
CellTags->"CF",
- CellLabel->"In[3]:=",
+ CellLabel->"In[101]:=",
CellID->721736691],
Cell[BoxData[
FormBox["N", TraditionalForm]], "Output",
CellTags->"CF",
- CellLabel->"Out[3]=",
- CellID->2104582203]
+ CellLabel->"Out[101]="]
}, Open ]],
Cell[CellGroupData[{
@@ -267,7 +262,7 @@ Cell[BoxData[
RowBox[{"SUNN", "^", "2"}], "-", "1"}], ",", " ",
RowBox[{"SUNNToCACF", " ", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"CF",
- CellLabel->"In[4]:=",
+ CellLabel->"In[102]:=",
CellID->1669593560],
Cell[BoxData[
@@ -276,8 +271,7 @@ Cell[BoxData[
SubscriptBox["C", "A"], " ",
SubscriptBox["C", "F"]}], TraditionalForm]], "Output",
CellTags->"CF",
- CellLabel->"Out[4]=",
- CellID->2114118582]
+ CellLabel->"Out[102]="]
}, Open ]]
}, Open ]],
@@ -342,12 +336,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{779, Automatic}, {Automatic, 147}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CFAD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CFAD.nb
new file mode 100644
index 000000000..33b62b1e1
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CFAD.nb
@@ -0,0 +1,584 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CFAD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CFAD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"q1", "+"}], "..."}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"p1", ".", "q2"}], "+"}], "..."}], ","}], "}"}], " ",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], ",", "s"}], "}"}]}], ",", "n"}], "}"}], ",",
+ "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a Cartesian propagator given by 1/[(q1+...)^2 + \
+p1.q2 ... + m^2 + sign*I*eta]^n, where q1^2 and p1.q2 are Cartesian sclar \
+products in D-1 dimensions. For brevity one can also use shorter forms such \
+as CFAD[{q1+ ..., m^2}, ...], CFAD[{q1+ ..., m^2 , n}, ...], CFAD[{q1+ ..., \
+ {m^2, -1}}, ...], CFAD[q1,...] etc. If s is not explicitly specified, then \
+its value is determined by the option EtaSign, which has the default value \
++1. If n is not explicitly specified, then the default value 1 is assumed. \
+Translation into FeynCalc internal form is performed by FeynCalcInternal, \
+where a CFAD is encoded using the special head CartesianPropagatorDenominator."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["FAD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FAD",
+ ButtonNote->"FAD"],
+ ", ",
+ ButtonBox["SFAD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SFAD",
+ ButtonNote->"SFAD"],
+ ", ",
+ ButtonBox["GFAD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GFAD",
+ ButtonNote->"GFAD"],
+ ", ",
+ ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FeynAmpDenominator",
+ ButtonNote->"FeynAmpDenominator"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]",
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]}]], "Input",
+ CellLabel->"In[110]:=",
+ CellID->426610684],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[110]=",
+ CellID->148573723]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[111]:=",
+ CellID->1078402331],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[111]=",
+ CellID->996027667]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"m", "^", "2"}], ",", "1"}], "}"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[112]:=",
+ CellID->1458399229],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"+\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[112]=",
+ CellID->1725293840]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[113]:=",
+ CellID->975505501],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[113]=",
+ CellID->1140744502]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "0"}], "}"}], ",",
+ RowBox[{"-",
+ RowBox[{"m", "^", "2"}]}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[114]:=",
+ CellID->539052608],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],RowBox[{"-",
+ SuperscriptBox["m", "2"]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[114]=",
+ CellID->339884090]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[115]:=",
+ CellID->725889266],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["m", "2"]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[115]=",
+ CellID->1423715443]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], ",",
+ RowBox[{"m", "^", "2"}]}], "}"}], "]"}]], "Input",
+ CellLabel->"In[116]:=",
+ CellID->594476494],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[116]=",
+ CellID->83537025]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[117]:=",
+ CellID->816120209],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ SuperscriptBox["m", "2"], "+",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[117]=",
+ CellID->1655409690]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CFAD", "[",
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"0", ",",
+ RowBox[{"p", ".", "q"}]}], "}"}], "}"}], "]"}]], "Input",
+ CellLabel->"In[118]:=",
+ CellID->978317030],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[118]=",
+ CellID->1166254423]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominatorExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[119]:=",
+ CellID->2075220032],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[119]=",
+ CellID->1302611691]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1181, Automatic}, {Automatic, 191}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CGA.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGA.nb
new file mode 100644
index 000000000..87e5db809
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGA.nb
@@ -0,0 +1,703 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CGA", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CGA", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CGA", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "i"]], "InlineFormula"],
+ " in 4 dimensions, where i is a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i]] by FeynCalcInternal"
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["GA",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGA", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[120]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[120]=",
+ CellID->1181136955]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CGA", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[121]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[121]=",
+ CellID->522903436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CGA", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[122]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[122]//StandardForm=",
+ CellID->236332518]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[123]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[123]=",
+ CellID->1496950468]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[124]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}], ".",
+ RowBox[{"CGA", "[", "k", "]"}], ".",
+ RowBox[{"CGA", "[", "l", "]"}]}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[124]//StandardForm=",
+ CellID->260993590]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGA", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[125]:=",
+ CellID->246195830],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[125]=",
+ CellID->216887395]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[126]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[126]=",
+ CellID->92770746]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1129, Automatic}, {266, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CGAD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGAD.nb
new file mode 100644
index 000000000..54ad91a91
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGAD.nb
@@ -0,0 +1,688 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CGAD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CGAD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CGAD", "[", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "i"]], "InlineFormula"],
+ " in D dimensions, where i is a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i,D-1],D] by FeynCalcInternal"
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["GAD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GAD",
+ ButtonNote->"GAD"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAD", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[127]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[127]=",
+ CellID->897807242]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CGAD", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[128]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[128]=",
+ CellID->542846314]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CGAD", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[129]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",", "D"}], "]"}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[129]//StandardForm=",
+ CellID->965503574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[130]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[130]=",
+ CellID->2098626269]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[131]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAD", "[", "i", "]"}], ".",
+ RowBox[{"CGAD", "[", "j", "]"}], ".",
+ RowBox[{"CGAD", "[", "k", "]"}], ".",
+ RowBox[{"CGAD", "[", "l", "]"}]}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[131]//StandardForm=",
+ CellID->2090925108]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[132]:=",
+ CellID->246195830],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[132]=",
+ CellID->10296282]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAD", "[", "i", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGAD", "[", "j", "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[133]:=",
+ CellID->1527316325],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[133]=",
+ CellID->1872250288]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1131, Automatic}, {Automatic, 194}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CGAE.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGAE.nb
new file mode 100644
index 000000000..d4e69023d
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGAE.nb
@@ -0,0 +1,515 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CGAE", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CGAE", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CGAE", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "i"]], "InlineFormula"],
+ " in D-4 dimensions, where i is a Cartesian index, and is transformed into \
+DiracGamma[CartesianIndex[i,D-4],D-4] by FeynCalcInternal"
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["GAE",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GAE",
+ ButtonNote->"GAE"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAE", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[134]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[134]=",
+ CellID->588840135]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CGAE", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[135]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[135]=",
+ CellID->769200831]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CGAE", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[136]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[136]//StandardForm=",
+ CellID->1184963850]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGAE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[137]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[137]=",
+ CellID->1830924781]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CGAE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[138]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGAE", "[", "i", "]"}], ".",
+ RowBox[{"CGAE", "[", "j", "]"}], ".",
+ RowBox[{"CGAE", "[", "k", "]"}], ".",
+ RowBox[{"CGAE", "[", "l", "]"}]}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[138]//StandardForm=",
+ CellID->1039059380]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1194, Automatic}, {269, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CGS.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGS.nb
new file mode 100644
index 000000000..c94a15d7d
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGS.nb
@@ -0,0 +1,507 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CGS", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CGS", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CGS", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is transformed into DiracGamma[CartesianMomentum[p]] by \
+FeynCalcInternal. CGS[p,q, ...] is equivalent to CGS[p].CGS[q]. ..."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["GS",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGS", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[139]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[139]=",
+ CellID->775616537]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[140]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[140]//StandardForm=",
+ CellID->255576843]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[141]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[141]=",
+ CellID->14098872]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[142]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], ".",
+ RowBox[{"CGS", "[", "q", "]"}], ".",
+ RowBox[{"CGS", "[", "r", "]"}], ".",
+ RowBox[{"CGS", "[", "s", "]"}]}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[142]//StandardForm=",
+ CellID->636787894]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGS", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[143]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[143]=",
+ CellID->133254836]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1102, Automatic}, {Automatic, 186}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CGSD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGSD.nb
new file mode 100644
index 000000000..fdd1bf1c8
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGSD.nb
@@ -0,0 +1,495 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CGSD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CGSD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CGSD", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is transformed into DiracGamma[CartesianMomentum[p, D-1], \
+D] by FeynCalcInternal. CGSD[p,q, ...] is equivalent to CGSD[p].CGSD[q]. ..."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["GSD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GSD",
+ ButtonNote->"GSD"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSD", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[144]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[144]=",
+ CellID->1823526966]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[145]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",", "D"}], "]"}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[145]//StandardForm=",
+ CellID->564219023]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[146]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[146]=",
+ CellID->77165611]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[147]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], ".",
+ RowBox[{"CGSD", "[", "q", "]"}], ".",
+ RowBox[{"CGSD", "[", "r", "]"}], ".",
+ RowBox[{"CGSD", "[", "s", "]"}]}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[147]//StandardForm=",
+ CellID->1335862678]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSD", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGSD", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGSD", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[148]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[148]=",
+ CellID->652311159]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1300, Automatic}, {Automatic, 96}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CGSE.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGSE.nb
new file mode 100644
index 000000000..23be14a46
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CGSE.nb
@@ -0,0 +1,513 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CGSE", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CGSE", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CGSE", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is transformed into DiracGamma[CartesianMomentum[p, D-4], \
+D-4] by FeynCalcInternal. CGSE[p,q, ...] is equivalent to CGSE[p].CGSE[q]. ..."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["GSE",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/GSE",
+ ButtonNote->"GSE"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSE", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[149]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[149]=",
+ CellID->6667452]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGSE", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[150]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[150]//StandardForm=",
+ CellID->1391062662]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGSE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[151]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[151]=",
+ CellID->1872583708]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[152]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSE", "[", "p", "]"}], ".",
+ RowBox[{"CGSE", "[", "q", "]"}], ".",
+ RowBox[{"CGSE", "[", "r", "]"}], ".",
+ RowBox[{"CGSE", "[", "s", "]"}]}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[152]//StandardForm=",
+ CellID->1826053888]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGSE", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"CGSE", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"CGSE", "[", "q", "]"}]}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[153]:=",
+ CellID->2143558790],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[153]=",
+ CellID->17522737]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{846, Automatic}, {Automatic, 72}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CLC.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CLC.nb
new file mode 100644
index 000000000..9f6fdfd79
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CLC.nb
@@ -0,0 +1,480 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CLC", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CLC", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CLC", "[",
+ RowBox[{"m", ",", "n", ",", "r"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]evaluates to Eps[CartesianIndex[m], CartesianIndex[n], \
+CartesianIndex[r]] applying FeynCalcInternal. CLC[m,...][p, ...] evaluates to \
+Eps[CartesianIndex[m], ..., CartesianMomentum[p], ...] applying \
+FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["LC",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/LC",
+ ButtonNote->"LC"],
+ ", ",
+ ButtonBox["Eps",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]], "Input",
+ CellLabel->"In[154]:=",
+ CellID->1757486067],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[154]=",
+ CellID->208315074]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}],
+ "\[IndentingNewLine]"}]], "Input",
+ CellLabel->"In[155]:=",
+ CellID->1589908515],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "j", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "k", "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[155]//StandardForm=",
+ CellID->316674061]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CLC", "[", "i", "]"}], "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[156]:=",
+ CellID->361636248],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[156]=",
+ CellID->1081987388]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[157]:=",
+ CellID->404350264],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[157]//StandardForm=",
+ CellID->1245969654]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[",
+ RowBox[{
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}],
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "l", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[158]:=",
+ CellID->137597559],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["m",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["m",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[158]=",
+ CellID->1501883334]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1084, Automatic}, {Automatic, 161}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CLCD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CLCD.nb
new file mode 100644
index 000000000..ffa622b7f
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CLCD.nb
@@ -0,0 +1,450 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CLCD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CLCD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CLCD", "[",
+ RowBox[{"m", ",", "n", ",", "r"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] evaluates to Eps[CartesianIndex[m, D-1], \
+CartesianIndex[n, D-1], CartesianIndex[r,D-1]] applying FeynCalcInternal. \
+CLC[m,...][p, ...] evaluates to Eps[CartesianIndex[m, D-1], ..., \
+CartesianMomentum[p, D-1], ...] applying FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["LCD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/LCD",
+ ButtonNote->"LCD"],
+ ", ",
+ ButtonBox["Eps",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Eps",
+ ButtonNote->"Eps"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}]], "Input",
+ CellLabel->"In[159]:=",
+ CellID->1128293987],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[159]=",
+ CellID->1338362699]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[160]:=",
+ CellID->2002117803],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"k", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[160]//StandardForm=",
+ CellID->297611011]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "[", "p", "]"}]], "Input",
+ CellLabel->"In[161]:=",
+ CellID->1171293590],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[161]=",
+ CellID->315491501]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[162]:=",
+ CellID->1182317939],
+
+Cell[BoxData[
+ RowBox[{"Eps", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[162]//StandardForm=",
+ CellID->1130462414]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "[", "p", "]"}],
+ RowBox[{
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "[", "q", "]"}]}], "//", "Contract"}], "//",
+ "Factor2"}]], "Input",
+ CellLabel->"In[163]:=",
+ CellID->260548459],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[163]=",
+ CellID->235673394]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1695, Automatic}, {Automatic, 223}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSI.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSI.nb
new file mode 100644
index 000000000..48519dcb1
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSI.nb
@@ -0,0 +1,504 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSI", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSI", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSI", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for 3-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "i"]], "InlineFormula"],
+ " with 3-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i]] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSI", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[164]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[164]=",
+ CellID->298525666]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSI", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[165]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[165]=",
+ CellID->345041319]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CSI", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[166]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[166]//StandardForm=",
+ CellID->1902433105]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[167]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[167]=",
+ CellID->1347248762]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CSI", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[168]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSI", "[", "i", "]"}], ".",
+ RowBox[{"CSI", "[", "j", "]"}], ".",
+ RowBox[{"CSI", "[", "k", "]"}], ".",
+ RowBox[{"CSI", "[", "l", "]"}]}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[168]//StandardForm=",
+ CellID->1708148611]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 612}, {222, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSID.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSID.nb
new file mode 100644
index 000000000..39e83caaf
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSID.nb
@@ -0,0 +1,501 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSID", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSID", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSID", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "i"]], "InlineFormula"],
+ " with D-1-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i,D-1],D-1] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[169]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[169]=",
+ CellID->1337342997]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSID", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[170]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[170]=",
+ CellID->453413292]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CSID", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[171]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[171]//StandardForm=",
+ CellID->422929861]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[172]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[172]=",
+ CellID->1187800949]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CSID", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[173]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSID", "[", "i", "]"}], ".",
+ RowBox[{"CSID", "[", "j", "]"}], ".",
+ RowBox[{"CSID", "[", "k", "]"}], ".",
+ RowBox[{"CSID", "[", "l", "]"}]}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[173]//StandardForm=",
+ CellID->874098158]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1242, Automatic}, {Automatic, 102}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSIE.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSIE.nb
new file mode 100644
index 000000000..50fd334bf
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSIE.nb
@@ -0,0 +1,510 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSIE", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSIE", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSIE", "[", "i", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-4-dimensional ",
+ Cell[BoxData[
+ SuperscriptBox["\[Sigma]", "i"]], "InlineFormula"],
+ " with D-4-dimensional Cartesian index i and is transformed into \
+PauliSigma[CartesianIndex[i,D-4],D-4] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIE", "[", "i", "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[174]:=",
+ CellID->192317475],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[174]=",
+ CellID->1813105389]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIE", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "-",
+ RowBox[{"CSIE", "[",
+ RowBox[{"j", ",", "i"}], "]"}]}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[175]:=",
+ CellID->950175955],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[175]=",
+ CellID->539719871]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"FCI", "[",
+ RowBox[{"CSIE", "[", "i", "]"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[176]:=",
+ CellID->872281918],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[176]//StandardForm=",
+ CellID->1097057211]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[177]:=",
+ CellID->1064432869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[177]=",
+ CellID->714050867]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[",
+ RowBox[{"CSIE", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellTags->"GA",
+ CellLabel->"In[178]:=",
+ CellID->1945449635],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIE", "[", "i", "]"}], ".",
+ RowBox[{"CSIE", "[", "j", "]"}], ".",
+ RowBox[{"CSIE", "[", "k", "]"}], ".",
+ RowBox[{"CSIE", "[", "l", "]"}]}]], "Output",
+ CellTags->"GA",
+ CellLabel->"Out[178]//StandardForm=",
+ CellID->148881480]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{804, Automatic}, {Automatic, 74}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSIS.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSIS.nb
new file mode 100644
index 000000000..3be3f3e89
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSIS.nb
@@ -0,0 +1,431 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSIS", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSIS", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSIS", "[", "p", "]"}]], "InlineFormula"],
+ "\[LineSeparator]can be used as input for 3-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "i"],
+ SuperscriptBox["p", "i"]}]], "InlineFormula"],
+ " with 3-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p]] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIS", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[179]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[179]=",
+ CellID->549775037]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[180]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[180]//StandardForm=",
+ CellID->310280825]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSIS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[181]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[181]=",
+ CellID->1625280260]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[182]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSIS", "[", "p", "]"}], ".",
+ RowBox[{"CSIS", "[", "q", "]"}], ".",
+ RowBox[{"CSIS", "[", "r", "]"}], ".",
+ RowBox[{"CSIS", "[", "s", "]"}]}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[182]//StandardForm=",
+ CellID->781933207]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{808, Automatic}, {Automatic, 248}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSISD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSISD.nb
new file mode 100644
index 000000000..030cd8203
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSISD.nb
@@ -0,0 +1,427 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSISD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSISD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSISD", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-1-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "i"],
+ SuperscriptBox["p", "i"]}]], "InlineFormula"],
+ " with D-1-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p,D-1],D-1] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISD", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[183]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[183]=",
+ CellID->1910177905]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSISD", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[184]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[184]//StandardForm=",
+ CellID->839082628]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[185]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[185]=",
+ CellID->2078178866]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISD", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[186]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISD", "[", "p", "]"}], ".",
+ RowBox[{"CSISD", "[", "q", "]"}], ".",
+ RowBox[{"CSISD", "[", "r", "]"}], ".",
+ RowBox[{"CSISD", "[", "s", "]"}]}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[186]//StandardForm=",
+ CellID->2005860779]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1360, Automatic}, {Automatic, 226}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSISE.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSISE.nb
new file mode 100644
index 000000000..fe9276d5c
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSISE.nb
@@ -0,0 +1,437 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSISE", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSISE", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSISE", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]can be used as input for D-4-dimensional ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Sigma]", "i"],
+ SuperscriptBox["p", "i"]}]], "InlineFormula"],
+ " with D-4-dimensional Cartesian vector p and is transformed into \
+PauliSigma[CartesianMomentum[p,D-4],D-4] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["PauliSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/PauliSigma",
+ ButtonNote->"PauliSigma"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISE", "[", "p", "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[187]:=",
+ CellID->1176675883],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[187]=",
+ CellID->426328145]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSISE", "[", "p", "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[188]:=",
+ CellID->1027241244],
+
+Cell[BoxData[
+ RowBox[{"PauliSigma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[188]//StandardForm=",
+ CellID->2088369030]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSISE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[189]:=",
+ CellID->1339265647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["r",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Sigma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["s",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[189]=",
+ CellID->1418190781]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISE", "[",
+ RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"GS",
+ CellLabel->"In[190]:=",
+ CellID->837744205],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSISE", "[", "p", "]"}], ".",
+ RowBox[{"CSISE", "[", "q", "]"}], ".",
+ RowBox[{"CSISE", "[", "r", "]"}], ".",
+ RowBox[{"CSISE", "[", "s", "]"}]}]], "Output",
+ CellTags->"GS",
+ CellLabel->"Out[190]//StandardForm=",
+ CellID->1996481055]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1680, Automatic}, {Automatic, 226}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSP.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSP.nb
new file mode 100644
index 000000000..5a33b1480
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSP.nb
@@ -0,0 +1,577 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSP", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSP", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the 3-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p],CartesianMomentum[q]] by \
+FeynCalcInternal. CSP[p] is the same as CSP[p,p] (",
+ Cell[BoxData[
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}]], "InlineFormula"],
+ ")."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["SP",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SP",
+ ButtonNote->"SP"],
+ ", ",
+ ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ ", ",
+ ButtonBox["CartesianScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianScalarProduct",
+ ButtonNote->"CartesianScalarProduct"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CSP", "[", "q", "]"}]}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[191]:=",
+ CellID->1327327216],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[191]=",
+ CellID->1848840574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[192]:=",
+ CellID->903181536],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[192]=",
+ CellID->328532068]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CSP", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[193]:=",
+ CellID->1760867040],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[193]=",
+ CellID->1003652030]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CSP", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[194]:=",
+ CellID->1518821322],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[194]=",
+ CellID->353053941]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[195]:=",
+ CellID->1767436480],
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[195]//StandardForm=",
+ CellID->2133672679]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[196]:=",
+ CellID->736982087],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "a", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "b", "]"}]}], "]"}]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[196]//StandardForm=",
+ CellID->765609064]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SP",
+ CellLabel->"In[197]:=",
+ CellID->355867518],
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ CellTags->"SP",
+ CellLabel->"Out[197]//StandardForm=",
+ CellID->1556911516]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{941, Automatic}, {Automatic, 230}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSPD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSPD.nb
new file mode 100644
index 000000000..4bd6724b4
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSPD.nb
@@ -0,0 +1,590 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSPD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSPD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the D-1-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p, D-1],CartesianMomentum[q, \
+D-1]] by FeynCalcInternal. CSPD[p] is the same as CSPD[p,p] (",
+ Cell[BoxData[
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}]], "InlineFormula"],
+ ")."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["SPD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SPD",
+ ButtonNote->"SPD"],
+ ", ",
+ ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ ", ",
+ ButtonBox["CartesianScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianScalarProduct",
+ ButtonNote->"CartesianScalarProduct"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CSPD", "[", "q", "]"}]}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[198]:=",
+ CellID->1779475118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[198]=",
+ CellID->410944412]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[199]:=",
+ CellID->437622958],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "-",
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}], "+",
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[199]=",
+ CellID->1423636699]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CSPD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[200]:=",
+ CellID->1031117972],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[200]=",
+ CellID->415380754]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[201]:=",
+ CellID->87993462],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[201]=",
+ CellID->1057353478]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[202]:=",
+ CellID->2034315321],
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[202]//StandardForm=",
+ CellID->1921630357]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[203]:=",
+ CellID->1917897688],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"a", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[203]//StandardForm=",
+ CellID->739932073]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[204]:=",
+ CellID->980827421],
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[204]//StandardForm=",
+ CellID->942208087]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], ",", " ", "D"}], "]"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPD",
+ CellLabel->"In[205]:=",
+ CellID->1873446419],
+
+Cell[BoxData[
+ RowBox[{"CSPD", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Output",
+ CellTags->"SPD",
+ CellLabel->"Out[205]//StandardForm=",
+ CellID->25387914]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1340, Automatic}, {Automatic, 268}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CSPE.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSPE.nb
new file mode 100644
index 000000000..12d0f707c
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CSPE.nb
@@ -0,0 +1,605 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CSPE", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CSPE", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the D-4-dimensional scalar product of p with q and is \
+transformed into CartesianPair[CartesianMomentum[p, D-4],CartesianMomentum[q, \
+D-4]] by FeynCalcInternal. CSPE[p] is the same as CSPE[p,p] ( ",
+ Cell[BoxData[
+ RowBox[{"=",
+ SuperscriptBox["p", "2"]}]], "InlineFormula"],
+ ")."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["SPE",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SPE",
+ ButtonNote->"SPE"],
+ ", ",
+ ButtonBox["ScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ScalarProduct",
+ ButtonNote->"ScalarProduct"],
+ ", ",
+ ButtonBox["CartesianScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianScalarProduct",
+ ButtonNote->"CartesianScalarProduct"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CSPE", "[", "q", "]"}]}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[206]:=",
+ CellID->1779475118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[206]=",
+ CellID->1516094616]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[207]:=",
+ CellID->437622958],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[207]=",
+ CellID->1038841311]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CSPE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",",
+ RowBox[{"q", "+",
+ RowBox[{"2", "p"}]}]}], "]"}], " ", "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[208]:=",
+ CellID->1031117972],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[208]=",
+ CellID->1270490467]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "]"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[209]:=",
+ CellID->87993462],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"], "+",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[209]=",
+ CellID->2053769726]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[210]:=",
+ CellID->2034315321],
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[210]//StandardForm=",
+ CellID->49409289]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[211]:=",
+ CellID->1917897688],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"a", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"b", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[211]//StandardForm=",
+ CellID->1531168216]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}], "//", "FCI"}], "//", "FCE"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[212]:=",
+ CellID->980827421],
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[212]//StandardForm=",
+ CellID->919943670]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCE", "[",
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}], ",", " ",
+ RowBox[{"D", "-", "4"}]}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"SPE",
+ CellLabel->"In[213]:=",
+ CellID->1873446419],
+
+Cell[BoxData[
+ RowBox[{"CSPE", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Output",
+ CellTags->"SPE",
+ CellLabel->"Out[213]//StandardForm=",
+ CellID->1753753047]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1071, Automatic}, {280, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CTdec.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CTdec.nb
new file mode 100644
index 000000000..c9eea8361
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CTdec.nb
@@ -0,0 +1,1649 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CTdec", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CTdec", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CTdec", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"qi", ",", "a"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"qj", ",", "b"}], "}"}], ",", "..."}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"p1", ",", "p2", ",", "..."}], "}"}]}], "]"}]],
+ "InlineFormula"],
+ " \[LineSeparator]or CTdec[exp, {{qi, a}, {qj, b}, ...}, {p1, p2, ...}] \
+calculates the tensorial decomposition formulas for Cartesian integrals. The \
+more common ones are saved in TIDL."
+}], "Usage",
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CTdec", "]"}]], "Input",
+ CellLabel->"In[214]:=",
+ CellID->131732672],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalc`Package`BasisOnly", "\[Rule]", "False"}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"Factor2", ",", "Factor"}], "}"}]}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "True"}], ",",
+ RowBox[{"List", "\[Rule]", "True"}], ",",
+ RowBox[{"UseParallelization", "\[Rule]", "True"}], ",",
+ RowBox[{"UseTIDL", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[214]=",
+ CellID->1788246199]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["Tdec",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Tdec",
+ ButtonNote->"Tdec"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[TextData[{
+ "Check that ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"\[Integral]",
+ RowBox[{
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ RowBox[{"f", "(",
+ RowBox[{"p", ",", "q"}], ")"}],
+ SuperscriptBox["q", "i"]}]}], "=", " ",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox["p", "i"],
+ SuperscriptBox["p", "2"]],
+ RowBox[{"\[Integral]",
+ RowBox[{
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ RowBox[{"f", "(",
+ RowBox[{"p", ",", "q"}], ")"}],
+ RowBox[{"p", "\[CenterDot]", "q"}]}]}]}]}], TraditionalForm]]]
+}], "Notes",
+ CellID->76274125],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CTdec", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"{",
+ RowBox[{"q", ",", "i"}], "}"}], "}"}], ",",
+ RowBox[{"{", "p", "}"}]}], "]"}]], "Input",
+ CellLabel->"In[215]:=",
+ CellID->272441690],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"X1", "\[Rule]",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ",",
+ RowBox[{"X2", "\[Rule]",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]}]}], "}"}], ",",
+ FractionBox[
+ RowBox[{"X1", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], "X2"]}], "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[215]=",
+ CellID->1870429102]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "[",
+ RowBox[{"[", "2", "]"}], "]"}], "/.",
+ RowBox[{"%", "[",
+ RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellLabel->"In[216]:=",
+ CellID->1508196487],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}],
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[216]=",
+ CellID->1545941508]
+}, Open ]],
+
+Cell[TextData[{
+ "This calculates integral transformation for any ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Integral]",
+ RowBox[{
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ SubscriptBox["q", "1"],
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ SubscriptBox["q", "2"],
+ SuperscriptBox["d",
+ RowBox[{"D", "-", "1"}]],
+ SubscriptBox["q", "3"]}]}], TraditionalForm]]],
+ " ",
+ Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"f", "(",
+ RowBox[{"p", ",",
+ RowBox[{
+ SubscriptBox["q",
+ RowBox[{"1", ","}]],
+ SubscriptBox["q", "2"]}], ",",
+ SubscriptBox["q", "3"]}], ")"}], " ",
+ SubsuperscriptBox["q", "1", "i"],
+ SubsuperscriptBox["q", "2", "j"],
+ SubsuperscriptBox["q", "3", "k"]}], TraditionalForm]]],
+ "."
+}], "Notes",
+ CellID->1818046438],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CTdec", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "1"], ",", "i"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "2"], ",", "j"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ SubscriptBox["q", "3"], ",", "k"}], "}"}]}], "}"}], ",",
+ RowBox[{"{", "p", "}"}], ",",
+ RowBox[{"List", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[224]:=",
+ CellID->1616776154],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}]}], ")"}]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]], "+",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}]}], ")"}]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]], "+",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}]}], ")"}]}],
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "2"]}]], "-",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "3"]}]],
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"D", "-", "1"}], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], " ",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}]}], ")"}]}]}]}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[224]=",
+ CellID->1557829298]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Contract", "[",
+ RowBox[{"%", " ",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}],
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "j"}], "]"}], " ",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "k"}], "]"}]}], "]"}], "//", "Factor"}]], "Input",
+ CellLabel->"In[225]:=",
+ CellID->663614938],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[225]=",
+ CellID->1731509272]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{997, Automatic}, {277, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CV.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CV.nb
new file mode 100644
index 000000000..a78973e98
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CV.nb
@@ -0,0 +1,420 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CV", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CV", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a 3-dimensional Cartesian vector and is transformed \
+into CartesianPair[CartesianMomentum[p], CartesianIndex[i]] by \
+FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["FV",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FV",
+ ButtonNote->"FV"],
+ ", ",
+ ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ ", ",
+ ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[228]:=",
+ CellID->236026604],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[228]=",
+ CellID->799728704]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[229]:=",
+ CellID->585918220],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[229]=",
+ CellID->1869621672]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[230]:=",
+ CellID->921449288],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[230]//StandardForm=",
+ CellID->772928155]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in CV", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[231]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[231]=",
+ CellID->526558982]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1037, Automatic}, {Automatic, 166}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CVD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CVD.nb
new file mode 100644
index 000000000..cfcc30cf3
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CVD.nb
@@ -0,0 +1,421 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CVD", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CVD", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a D-1-dimensional Cartesian vector and is transformed \
+into CartesianPair[CartesianMomentum[p,D], CartesianIndex[i,D]] by \
+FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["FVD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FVD",
+ ButtonNote->"FVD"],
+ ", ",
+ ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ ", ",
+ ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[232]:=",
+ CellID->236026604],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[232]=",
+ CellID->276595871]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[233]:=",
+ CellID->585918220],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "-",
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[233]=",
+ CellID->1577923409]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"CVD", "[",
+ RowBox[{"p", ",", "i"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[234]:=",
+ CellID->921449288],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[234]//StandardForm=",
+ CellID->347562433]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in CVD", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CVD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[235]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[235]=",
+ CellID->463360865]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1445, Automatic}, {Automatic, 87}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CVE.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CVE.nb
new file mode 100644
index 000000000..4be9237d5
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CVE.nb
@@ -0,0 +1,426 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CVE", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CVE", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CVE", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a D-4-dimensional Cartesian vector and is transformed \
+into CartesianPair[CartesianMomentum[p,D-4], CartesianIndex[i,D-4]] by \
+FeynCalcInternal."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["FVE",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FVE",
+ ButtonNote->"FVE"],
+ ", ",
+ ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ ", ",
+ ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVE", "[",
+ RowBox[{"p", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[236]:=",
+ CellID->236026604],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[236]=",
+ CellID->805938732]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CVE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[237]:=",
+ CellID->585918220],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[237]=",
+ CellID->2024962651]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"CVE", "[",
+ RowBox[{"p", ",", "i"}], "]"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[238]:=",
+ CellID->921449288],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "4"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[238]//StandardForm=",
+ CellID->689002991]
+}, Open ]],
+
+Cell["ExpandScalarProduct is used to expand momenta in CVE", "Notes",
+ CellID->97927264],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CVE", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "i"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[239]:=",
+ CellID->1140711302],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "^"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[239]=",
+ CellID->1452036350]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1194, Automatic}, {273, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Calc.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Calc.nb
index 1d37876ad..620a253bf 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Calc.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Calc.nb
@@ -118,10 +118,9 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"Calc", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "performs several basic simplifications. Calc[exp] is the same as \
-DotSimplify[DiracSimplify[Contract[DiracSimplify[Explicit[ \
-SUNSimplify[Trick[exp], Explicit\[Rule]False] ]]]]]."
+ " \[LineSeparator] performs several simplifications that involve Contract, \
+DiracSimplify SUNSimplify, DotSimplify, EpsEvaluate, ExpandScalarProduct, \
+PowerSimplify, Expand2 and Trick."
}], "Usage",
CellID->982511436],
@@ -162,6 +161,11 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
+ ButtonBox["Trick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Trick",
+ ButtonNote->"Trick"],
+ ", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
@@ -171,15 +175,8 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
- ", ",
- ButtonBox["Trick",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Trick",
- ButtonNote->"Trick"],
"."
-}], "Text",
- CellTags->"Calc",
- CellID->573489970]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -206,49 +203,54 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"Calc",
- CellID->115873599],
-
Cell[TextData[{
"This calculates ",
Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Mu]"],
- SubscriptBox["\[Gamma]", "\[Mu]"]}], TraditionalForm]]],
- " in 4 dimensions and ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox["\[Gamma]", "\[Mu]"]}]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ " dimensions and ",
Cell[BoxData[
- FormBox[
- SubsuperscriptBox["g", "\[Nu]", "\[Nu]"], TraditionalForm]]],
- " in D dimensions."
-}], "Text",
- CellTags->"Calc",
- CellID->117745359],
+ SubsuperscriptBox["g", "\[Nu]", "\[Nu]"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " dimensions."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Calc", "[",
- RowBox[{"{",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Mu]"}], "]"}], ",", " ",
- RowBox[{"MTD", "[",
- RowBox[{"\[Nu]", ",", "\[Nu]"}], "]"}]}], "}"}], "]"}]], "Input",
- CellTags->"Calc",
- CellLabel->"In[1]:=",
- CellID->781527999],
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Mu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[116]:="],
Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"4", ",", "D"}], "}"}], TraditionalForm]], "Output",
- CellTags->"Calc",
- CellLabel->"Out[1]=",
- CellID->1798215567]
+ FormBox["4", TraditionalForm]], "Output",
+ CellLabel->"Out[116]="]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"MTD", "[",
+ RowBox[{"\[Nu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[117]:="],
+
+Cell[BoxData[
+ FormBox["D", TraditionalForm]], "Output",
+ CellLabel->"Out[117]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"This simplifies ",
Cell[BoxData[
@@ -257,9 +259,7 @@ Cell[TextData[{
SubscriptBox["f", "abc"], " ",
RowBox[{
SubscriptBox["f", "abe"], "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"Calc",
- CellID->1416000027],
+}], "Notes"],
Cell[CellGroupData[{
@@ -271,7 +271,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "b", ",", "e"}], "]"}]}], "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[2]:=",
+ CellLabel->"In[118]:=",
CellID->779661922],
Cell[BoxData[
@@ -289,12 +289,18 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"Calc",
- CellLabel->"Out[2]=",
- CellID->1521159153]
+ CellLabel->"Out[118]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
RowBox[{"FV", "[",
@@ -306,80 +312,65 @@ Cell[BoxData[
RowBox[{
RowBox[{"q", "-", "p"}], ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"Calc",
- CellLabel->"In[3]:=",
+ CellLabel->"In[121]:=",
CellID->281198835],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"], "-",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Calc",
- CellLabel->"Out[3]=",
- CellID->481463556]
+ CellLabel->"Out[121]="]
}, Open ]],
Cell[CellGroupData[{
@@ -387,7 +378,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Calc", "[", "%", "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[4]:=",
+ CellLabel->"In[122]:=",
CellID->1838519780],
Cell[BoxData[
@@ -439,79 +430,59 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
CellTags->"Calc",
- CellLabel->"Out[4]=",
- CellID->1244287531]
+ CellLabel->"Out[122]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{"GluonVertex", "[",
- RowBox[{"p", ",", "1", ",", "q", ",", "2", ",",
- RowBox[{
- RowBox[{"-", "p"}], "-", "q"}], ",", "3"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"p", ",", "li1"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"q", ",", "li2"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "p"}], "-", "q"}], ",", "li3"}], "}"}]}], "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[5]:=",
+ CellLabel->"In[127]:=",
CellID->1589340964],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["f",
+ SuperscriptBox["V",
RowBox[{
- FormBox[
- FormBox["ci1",
- TraditionalForm],
+ FormBox["li1",
TraditionalForm],
- FormBox[
- FormBox["ci2",
- TraditionalForm],
+ FormBox["li2",
TraditionalForm],
- FormBox[
- FormBox["ci3",
- TraditionalForm],
- TraditionalForm]}]], " ",
+ FormBox["li3",
+ TraditionalForm]}]], "(",
RowBox[{
- SuperscriptBox["V",
+ FormBox["p",
+ TraditionalForm],
+ FormBox["\<\", \"\>",
+ TraditionalForm],
+ FormBox["q",
+ TraditionalForm],
+ FormBox["\<\", \"\>",
+ TraditionalForm],
+ FormBox[
RowBox[{
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li2",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm]}]], "(",
- RowBox[{
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\", \"\>",
- TraditionalForm],
- FormBox[
- FormBox["q",
- TraditionalForm],
- TraditionalForm],
- FormBox["\<\", \"\>",
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{
- RowBox[{"-",
- FormBox["p",
- TraditionalForm]}], "-",
- FormBox["q",
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ RowBox[{"-", "p"}], "-", "q"}],
+ TraditionalForm]}], ")"}], TraditionalForm]], "Output",
CellTags->"Calc",
- CellLabel->"Out[5]=",
- CellID->706901544]
+ CellLabel->"Out[127]="]
}, Open ]],
Cell[CellGroupData[{
@@ -529,14 +500,14 @@ Cell[BoxData[
RowBox[{
RowBox[{"-", "p"}], "-", "q"}], ",", "li3"}], "]"}]}], "]"}]], "Input",
CellTags->"Calc",
- CellLabel->"In[6]:=",
+ CellLabel->"In[128]:=",
CellID->1411490249],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellTags->"Calc",
- CellLabel->"Out[6]=",
- CellID->1029776951]
+ CellLabel->"Out[128]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -601,12 +572,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{Automatic, 328}, {Automatic, -35}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CalcColorFactor.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CalcColorFactor.nb
index 272e626ed..cd853f753 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CalcColorFactor.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CalcColorFactor.nb
@@ -117,19 +117,34 @@ Cell["CalcColorFactor", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"CalcColorFactor", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "calculates the color factor of expr. CalcColorFactor is useful for \
-application on FeynArts produced amplitudes. CalcColorFactor is just a macro \
-function for CalcColorFactor[x_] := \nIf[FreeQ2[FeynCalcInternal[x], \
-SUNIndex], x, \n SUNSimplify[SUNSimplify[ (If[ \
-!FreeQ[#1, DiracGamma], DiracTrick[#1], #1] & )[ SUNSimplify[x]], Explicit \
--> False], Explicit -> True]]."
+ RowBox[{"CalcColorFactor", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]calculates the color factor of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ "."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[TextData[{
+ ButtonBox["CalcColorFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CalcColorFactor",
+ ButtonNote->"CalcColorFactor"],
+ " is useful for application on FeynArts produced amplitudes."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CalcColorFactor", "]"}]], "Input",
+ CellLabel->"In[41]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"SUNNToCACF", "\[Rule]", "True"}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[41]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -164,15 +179,10 @@ Cell[CellGroupData[{
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[TextData[{
- ButtonBox["SUNSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/SUNSimplify",
- ButtonNote->"SUNSimplify"],
- "."
-}], "Text",
- CellTags->"CalcColorFactor",
- CellID->1899752684]
+Cell[TextData[ButtonBox["SUNSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SUNSimplify",
+ ButtonNote->"SUNSimplify"]], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -199,10 +209,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"CalcColorFactor",
- CellID->86935840],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -213,7 +219,7 @@ Cell[BoxData[
RowBox[{"SUNF", "[",
RowBox[{"a", ",", "b", ",", "d"}], "]"}]}], "]"}]], "Input",
CellTags->"CalcColorFactor",
- CellLabel->"In[1]:=",
+ CellLabel->"In[42]:=",
CellID->1491586567],
Cell[BoxData[
@@ -231,253 +237,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"CalcColorFactor",
- CellLabel->"Out[1]=",
- CellID->1436200004]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Amplitude", "[", "\"\\"", "]"}]], "Input",
- CellTags->"CalcColorFactor",
- CellLabel->"In[2]:=",
- CellID->1818256691],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"SUNDeltaContract", "(",
- RowBox[{
- RowBox[{
- SubsuperscriptBox["\[CapitalPi]",
- RowBox[{
- FormBox["ci1",
- TraditionalForm],
- FormBox["ci3",
- TraditionalForm]}],
- RowBox[{
- FormBox["li1",
- TraditionalForm],
- FormBox["li3",
- TraditionalForm]}]], "(",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], ")"}], " ",
- RowBox[{
- SubsuperscriptBox["\[CapitalPi]",
- RowBox[{
- FormBox["ci9",
- TraditionalForm],
- FormBox["ci11",
- TraditionalForm]}],
- RowBox[{
- FormBox["li9",
- TraditionalForm],
- FormBox["li11",
- TraditionalForm]}]], "(",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], ")"}], " ",
- RowBox[{
- SubsuperscriptBox["Q",
- FormBox["ci11",
- TraditionalForm],
- FormBox["li11",
- TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[CapitalPi]", "q"], "(",
- FormBox[
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}], "-",
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}]}],
- TraditionalForm], ")"}], ".",
- SubsuperscriptBox["Q",
- FormBox["ci1",
- TraditionalForm],
- FormBox["li1",
- TraditionalForm]]}], " ",
- RowBox[{"(",
- RowBox[{"-",
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{"2", " ",
- SubscriptBox["T", "f"], " ",
- RowBox[{
- RowBox[{
- SubscriptBox["\[CapitalPi]", "q"], "(",
- FormBox[
- RowBox[{"-",
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}]}],
- TraditionalForm], ")"}], ".",
- SubsuperscriptBox["Q",
- FormBox["ci9",
- TraditionalForm],
- FormBox["li9",
- TraditionalForm]], ".",
- RowBox[{
- SubscriptBox["\[CapitalPi]", "q"], "(",
- FormBox[
- RowBox[{
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}], "-",
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}]}],
- TraditionalForm], ")"}], ".",
- SubsuperscriptBox["Q",
- FormBox["ci3",
- TraditionalForm],
- FormBox["li3",
- TraditionalForm]]}]}],
- TraditionalForm], ")"}]}], ")"}]}], ")"}], TraditionalForm]], "Output",
- CellTags->"CalcColorFactor",
- CellLabel->"Out[2]=",
- CellID->1553911339]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"CalcColorFactor", "@",
- RowBox[{"Explicit", "@", "%"}]}]], "Input",
- CellTags->"CalcColorFactor",
- CellLabel->"In[3]:=",
- CellID->361683152],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[ImaginaryI]", " ",
- SubscriptBox["C", "F"], " ",
- SubscriptBox["T", "f"], " ",
- SuperscriptBox[
- RowBox[{"(",
- FractionBox["1",
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "2"]], ")"}], "2"], " ",
- SubsuperscriptBox["g", "s", "4"], " ",
- RowBox[{"(",
- RowBox[{
- SubscriptBox["C", "A"], "-",
- RowBox[{"2", " ",
- SubscriptBox["C", "F"]}]}], ")"}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["li11",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li11",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li1",
- TraditionalForm],
- TraditionalForm]]}], " ",
- RowBox[{"tr", "(",
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]",
- FormBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm],
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li9",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"\[Gamma]", "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["li3",
- TraditionalForm],
- TraditionalForm]]}],
- TraditionalForm], ")"}]}], ")"}], "/",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"p\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q2\"\>", ")"}],
- TraditionalForm], "-",
- FormBox[
- RowBox[{"FCGV", "(", "\<\"q1\"\>", ")"}],
- TraditionalForm]}], ")"}], "2"]}], ")"}]}],
- TraditionalForm]], "Output",
- CellTags->"CalcColorFactor",
- CellLabel->"Out[3]=",
- CellID->1233692379]
+ CellLabel->"Out[42]="]
}, Open ]]
}, Open ]],
@@ -542,12 +302,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{591, Automatic}, {Automatic, 224}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CalculateCounterTerm.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CalculateCounterTerm.nb
index ceb436dca..f2f19b3ca 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CalculateCounterTerm.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CalculateCounterTerm.nb
@@ -124,8 +124,28 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell["\<\
+This is a rather special function designed for some specific OPE \
+calculations. Not a universal routine for daily use.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CalculateCounterTerm", "]"}]], "Input",
+ CellLabel->"In[240]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Chisholm", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"D", "\[Rule]", "4"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[240]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -247,12 +267,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1270, Automatic}, {Automatic, 247}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianIndex.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianIndex.nb
new file mode 100644
index 000000000..7cbdfa41e
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianIndex.nb
@@ -0,0 +1,336 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CartesianIndex", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CartesianIndex", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["CartesianIndex"], "InlineFormula"],
+ " \[LineSeparator]is the head of Cartesian indices. The internal \
+representation of a three-dimensional i is CartesianIndex[i]. For other than \
+three dimensions: CartesianIndex[i, Dimension]. CartesianIndex[i, 3] \
+simplifies to CartesianIndex[i]. The first argument cannot be an integer."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["LorentzIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/LorentzIndex",
+ ButtonNote->"LorentzIndex"],
+ ", ",
+ ButtonBox["ExplicitLorentzIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ExplicitLorentzIndex",
+ ButtonNote->"ExplicitLorentzIndex"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell["This denotes a 3-dimensional Cartesian index.", "Notes",
+ CellID->1041402073],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianIndex", "[", "i", "]"}]], "Input",
+ CellTags->"LorentzIndex",
+ CellLabel->"In[62]:=",
+ CellID->1526768444],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ CellTags->"LorentzIndex",
+ CellLabel->"Out[62]=",
+ CellID->1197436861]
+}, Open ]],
+
+Cell["\<\
+An optional second argument can be given for a dimension different from 3.\
+\>", "Notes",
+ CellID->512979420],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]], "Input",
+ CellTags->"LorentzIndex",
+ CellLabel->"In[241]:=",
+ CellID->1273197083],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ CellTags->"LorentzIndex",
+ CellLabel->"Out[241]=",
+ CellID->131600211]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "4"}]}], "]"}]], "Input",
+ CellLabel->"In[242]:=",
+ CellID->1172438313],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ CellLabel->"Out[242]=",
+ CellID->1014527091]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1226, Automatic}, {Automatic, 258}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianMomentum.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianMomentum.nb
new file mode 100644
index 000000000..ad7c6f9ef
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianMomentum.nb
@@ -0,0 +1,549 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CartesianMomentum", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CartesianMomentum", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the head of a three momentum (p). The internal \
+representation of a three-dimensional p is CartesianMomentum[p]. For other \
+than three dimensions: CartesianMomentum[p, Dimension]. CartesianMomentum[p, \
+3] simplifies to CartesianMomentum[p]."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Momentum",
+ ButtonNote->"Momentum"],
+ ", ",
+ ButtonBox["TemporalMomentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/TemporalMomentum",
+ ButtonNote->"TemporalMomentum"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell["This is a 3-dimensional momentum.", "Notes",
+ CellID->1432666781],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[37]:=",
+ CellID->600679238],
+
+Cell[BoxData[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], TraditionalForm]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[37]=",
+ CellID->1847189121]
+}, Open ]],
+
+Cell["\<\
+As an optional second argument the dimension must be specified if it is \
+different from 3.\
+\>", "Notes",
+ CellID->278592021],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[24]:=",
+ CellID->298033535],
+
+Cell[BoxData[
+ FormBox["p", TraditionalForm]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[24]=",
+ CellID->1288297410]
+}, Open ]],
+
+Cell["The dimension index is supressed in the output.", "Notes",
+ CellID->30302725],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"d", "-", "1"}]}], "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[243]:=",
+ CellID->22007276],
+
+Cell[BoxData[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold], TraditionalForm]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[243]=",
+ CellID->1337449591]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a1", "=",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"-", "q"}], "]"}]}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[244]:=",
+ CellID->1076166182],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}], TraditionalForm]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[244]=",
+ CellID->1841511383]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a1", "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[245]:=",
+ CellID->1156784400],
+
+Cell[BoxData[
+ RowBox[{"-",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[245]//StandardForm=",
+ CellID->1296577309]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a2", " ", "=", " ",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], " ", "+", " ",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"2", "q"}], "]"}]}]}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[246]:=",
+ CellID->1010535805],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm], ")"}], "+",
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}]}], TraditionalForm]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[246]=",
+ CellID->1027005270]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"a2", "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[247]:=",
+ CellID->856207433],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}]}]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[247]//StandardForm=",
+ CellID->51962391]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"a2", "//", "MomentumExpand"}], "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[248]:=",
+ CellID->265634009],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "+",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[248]//StandardForm=",
+ CellID->827290533]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"a2", "//", "MomentumCombine"}], "//", "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[249]:=",
+ CellID->168866988],
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "+", "q"}], "]"}]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[249]//StandardForm=",
+ CellID->630640997]
+}, Open ]],
+
+Cell["\<\
+Notice that when changing the dimension, one must specify its value as if the \
+the 3-vector were the spatial component of the corresponding 4-vector\
+\>", "Notes",
+ CellID->257067347],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"d", "-", "1"}]}], "]"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[250]:=",
+ CellID->2130880073],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"ChangeDimension", "::", "failmsg"}], "MessageName"], ":",
+ " ", "\<\"Error! ChangeDimension has encountered a fatal problem and must \
+abort the computation. The problem reads: \[NoBreak]\\!\\(\\*FormBox[\\\"\\\\\
+\\\"Unsupported choice of dimension!\\\\\\\"\\\", TraditionalForm]\\)\
+\[NoBreak] \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\
+\\\", ButtonFrame->None, \
+ButtonData:>\\\"paclet:FeynCalc/ref/ChangeDimension\\\", ButtonNote -> \
+\\\"FeynCalc`ChangeDimension::failmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[250]:=",
+ CellID->1857962247],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ CellLabel->"Out[250]=",
+ CellID->1904306707]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"ChangeDimension", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",", "d"}], "]"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[251]:=",
+ CellID->1679956191],
+
+Cell[BoxData[
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "d"}]}], "]"}]], "Output",
+ CellTags->"Momentum",
+ CellLabel->"Out[251]//StandardForm=",
+ CellID->1622166204]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"Clear", "[",
+ RowBox[{"a1", ",", "a2"}], "]"}]], "Input",
+ CellTags->"Momentum",
+ CellLabel->"In[252]:=",
+ CellID->919568834]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1188, Automatic}, {Automatic, 134}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianPair.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianPair.nb
new file mode 100644
index 000000000..b53641073
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianPair.nb
@@ -0,0 +1,834 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CartesianPair", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CartesianPair", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{"a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is a special pairing used in the internal \
+representation."
+}], "Usage",
+ CellID->982511436],
+
+Cell[TextData[{
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " may have heads ",
+ ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianIndex"],
+ " or ",
+ ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianMomentum"],
+ ". "
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "If both ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " have head ",
+ ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianIndex"],
+ ", the Kronecker delta is understood."
+}], "Notes",
+ CellID->2118799541],
+
+Cell[TextData[{
+ "If ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " have head ",
+ ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianMomentum"],
+ ", a Cartesian scalar product is meant."
+}], "Notes",
+ CellID->848101134],
+
+Cell[TextData[{
+ "If one of ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " has head ",
+ ButtonBox["CartesianIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianIndex"],
+ " and the other ",
+ ButtonBox["CartesianMomentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianMomentum"],
+ ", a Cartesian vector ",
+ Cell[BoxData[
+ SuperscriptBox["p", "i"]], "InlineFormula"],
+ " is understood."
+}], "Notes",
+ CellID->669577228]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["Pair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Pair",
+ ButtonNote->"Pair"],
+ ", ",
+ ButtonBox["TemporalPair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/TemporalPair",
+ ButtonNote->"TemporalPair"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell["This represents a three-dimensional Kronecker delta", "Notes",
+ CellID->108594348],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[253]:=",
+ CellID->1043747934],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[253]=",
+ CellID->492303314]
+}, Open ]],
+
+Cell["This is a D-1-dimensional Kronecker delta", "Notes",
+ CellID->1900001937],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[255]:=",
+ CellID->1359804749],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[255]=",
+ CellID->150522700]
+}, Open ]],
+
+Cell["\<\
+If the Cartesian indices live in different dimensions, this gets resolved \
+according to the t'Hoft-Veltman-Breitenlohner-Maison prescription\
+\>", "Notes",
+ CellID->1264095069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[256]:=",
+ CellID->1343625376],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[256]=",
+ CellID->127506986]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{"D", "-", "4"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[257]:=",
+ CellID->1397592277],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "^"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[257]=",
+ CellID->1695876987]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"j", ",",
+ RowBox[{"D", "-", "4"}]}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[258]:=",
+ CellID->1349044184],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellLabel->"Out[258]=",
+ CellID->1857718213]
+}, Open ]],
+
+Cell["A 3-dimensional Cartesian vector", "Notes",
+ CellID->721455208],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[", "i", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[259]:=",
+ CellID->958079821],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[259]=",
+ CellID->714556073]
+}, Open ]],
+
+Cell["A D-1-dimensional Cartesian vector", "Notes",
+ CellID->1682684397],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[260]:=",
+ CellID->106742008],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[260]=",
+ CellID->1365320302]
+}, Open ]],
+
+Cell["3-dimensional scalar products of Cartesian vectors", "Notes",
+ CellID->1100214782],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "q", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[261]:=",
+ CellID->1770091706],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[261]=",
+ CellID->1726621755]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[262]:=",
+ CellID->227830423],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[262]=",
+ CellID->563188072]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[263]:=",
+ CellID->25203155],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[263]=",
+ CellID->1222876519]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], "^",
+ "2"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[264]:=",
+ CellID->1431519685],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "4"], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[264]=",
+ CellID->1761928129]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], "^",
+ "3"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[265]:=",
+ CellID->721851127],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "6"], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[265]=",
+ CellID->282397427]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], "]"}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[266]:=",
+ CellID->294431519],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[266]=",
+ CellID->1642628671]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"-", "q"}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}], " ", "+", " ",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "q", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}]}], "]"}]}]], "Input",
+ CellTags->"Pair",
+ CellLabel->"In[267]:=",
+ CellID->1586756083],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellTags->"Pair",
+ CellLabel->"Out[267]=",
+ CellID->2130854097]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1381, Automatic}, {Automatic, 81}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianPropagatorDenominator.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianPropagatorDenominator.nb
new file mode 100644
index 000000000..34621f9e4
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianPropagatorDenominator.nb
@@ -0,0 +1,362 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CartesianPropagatorDenominator", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CartesianPropagatorDenominator", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], "+"}], "..."}], ",",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q1", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p1", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], "+"}], "..."}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "s"}], "}"}]}], "]"}]}]}]], "InlineFormula"],
+ " \[LineSeparator]encodes a generic Cartesian propagator denominator \
+1/[(q1+...)^2 + q1.p1 + ... + m^2 + s*I eta]^n. \
+CartesianPropagatorDenominator is an internal object. To enter such \
+propagators in FeynCalc you should use CFAD."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["CFAD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CFAD",
+ ButtonNote->"CFAD"],
+ ", ",
+ ButtonBox["FeynAmpDenominator",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FeynAmpDenominator",
+ ButtonNote->"FeynAmpDenominator"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "0", ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[268]:=",
+ CellID->127407996],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",SuperscriptBox[
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm], 2],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[268]=",
+ CellID->2117846260]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"FeynAmpDenominator", "[",
+ RowBox[{"CartesianPropagatorDenominator", "[",
+ RowBox[{"0", ",",
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}]}], "]"}], ",",
+ RowBox[{"m", "^", "2"}], ",",
+ RowBox[{"{",
+ RowBox[{"1", ",",
+ RowBox[{"-", "1"}]}], "}"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[269]:=",
+ CellID->754989132],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["1",
+ TemplateBox[{"\"(\"",RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["p", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm],
+ FormBox["\"\[CenterDot]\"", TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["q", Bold, StripOnInput -> False], TraditionalForm],
+ TraditionalForm]}],"\"+\"",SuperscriptBox["m", "2"],"\"-\"",
+ RowBox[{"\[ImaginaryI]", " ", "\"\[Eta]\""}],"\")\""},
+ "RowDefault"]], TraditionalForm]], "Output",
+ CellLabel->"Out[269]=",
+ CellID->718503863]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{1122, Automatic}, {Automatic, 149}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianScalarProduct.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianScalarProduct.nb
new file mode 100644
index 000000000..d4258ae19
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianScalarProduct.nb
@@ -0,0 +1,710 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CartesianScalarProduct", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CartesianScalarProduct", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] is the input for the scalar product of two Cartesian \
+vectors p and q. CartesianScalarProduct[p] is equivalent to \
+CartesianScalarProduct[p, p]. Expansion of sums of momenta in \
+CartesianScalarProduct is done with ExpandScalarProduct. Scalar products may \
+be set, e.g. via ScalarProduct[a, b] = m^2; but a and b may not contain sums. \
+Note that ScalarProduct[a, b] = m^2 actually sets Cartesian scalar products \
+in different dimensions specified by the value of the SetDimensions option. \
+It is highly recommended to set ScalarProduct's ",
+ StyleBox["before",
+ FontWeight->"Bold"],
+ " any calculation. This improves the performance of FeynCalc."
+}], "Usage",
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CartesianScalarProduct", "]"}]], "Input",
+ CellLabel->"In[323]:=",
+ CellID->791476525],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "3"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"3", ",",
+ RowBox[{"D", "-", "1"}]}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[323]=",
+ CellID->1156556837]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["CSP",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CSP",
+ ButtonNote->"CSP"],
+ ", ",
+ ButtonBox["CSPD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CSPD",
+ ButtonNote->"CSPD"],
+ ", ",
+ ButtonBox["CSPE",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CSPE",
+ ButtonNote->"CSPE"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[274]:=",
+ CellID->888961720],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[274]=",
+ CellID->409894593]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ RowBox[{"p", "+", "q"}], ",",
+ RowBox[{"-", "q"}]}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[275]:=",
+ CellID->2091143136],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[275]=",
+ CellID->1122861444]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "p"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[276]:=",
+ CellID->780031215],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[276]=",
+ CellID->294886574]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CartesianScalarProduct", "[", "q", "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[277]:=",
+ CellID->10314838],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[277]=",
+ CellID->1042753930]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q"}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[278]:=",
+ CellID->158991943],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], ",",
+ RowBox[{"CartesianMomentum", "[", "q", "]"}]}], "]"}]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[278]//StandardForm=",
+ CellID->1975139879]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{"p", ",", "q", ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{"D", "-", "1"}]}]}], "]"}], "//", "StandardForm"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[279]:=",
+ CellID->1173751525],
+
+Cell[BoxData[
+ RowBox[{"CartesianPair", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}], ",",
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"q", ",",
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "D"}]}], "]"}]}], "]"}]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[279]//StandardForm=",
+ CellID->161163745]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["p", "2"]}], "]"}], " ", "=", " ",
+ RowBox[{"s", "/", "2"}]}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[280]:=",
+ CellID->1579106051],
+
+Cell[BoxData[
+ FormBox[
+ FractionBox["s", "2"], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[280]=",
+ CellID->1362251681]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[", " ",
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ RowBox[{
+ SubscriptBox["p", "1"], "-", "q"}], ",",
+ RowBox[{
+ SubscriptBox["p", "2"], "-", "k"}]}], "]"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[281]:=",
+ CellID->373851414],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ FractionBox["s", "2"]}], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[281]=",
+ CellID->1239195328]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Calc", "[", " ",
+ RowBox[{"CartesianScalarProduct", "[",
+ RowBox[{
+ RowBox[{
+ SubscriptBox["p", "1"], "-", "q"}], ",",
+ RowBox[{
+ SubscriptBox["p", "2"], "-", "k"}]}], "]"}], "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[282]:=",
+ CellID->54231534],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ FractionBox["s", "2"]}], TraditionalForm]], "Output",
+ CellTags->"ScalarProduct",
+ CellLabel->"Out[282]=",
+ CellID->1518630571]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"FCClearScalarProducts", "[", "]"}]], "Input",
+ CellTags->"ScalarProduct",
+ CellLabel->"In[283]:=",
+ CellID->1715327028]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 818},
+WindowMargins->{{881, Automatic}, {Automatic, 154}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianToLorentz.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianToLorentz.nb
new file mode 100644
index 000000000..0e5ca14d7
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CartesianToLorentz.nb
@@ -0,0 +1,424 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/CartesianToLorentz", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["CartesianToLorentz", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CartesianToLorentz", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] rewrites Cartesian tensors in form of Lorentz tensors \
+(when possible). Using options one can specify which types of tensors should \
+be converted."
+}], "Usage",
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CartesianToLorentz", "]"}]], "Input",
+ CellLabel->"In[372]:=",
+ CellID->60038220],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"CSP", "\[Rule]", "True"}], ",",
+ RowBox[{"CGS", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[372]=",
+ CellID->762732505]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["LorentzToCartesian",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/LorentzToCartesian",
+ ButtonNote->"LorentzToCartesian"],
+ "."
+}], "SeeAlso",
+ CellID->119070656]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CGS", "[", "p", "]"}]], "Input",
+ CellLabel->"In[270]:=",
+ CellID->1645372086],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[270]=",
+ CellID->1831630166]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "CartesianToLorentz"}]], "Input",
+ CellLabel->"In[271]:=",
+ CellID->1489199171],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[271]=",
+ CellID->403299943]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CSP", "[",
+ RowBox[{"p", ",", "q"}], "]"}]], "Input",
+ CellLabel->"In[272]:=",
+ CellID->2122603265],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[272]=",
+ CellID->632170649]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "CartesianToLorentz"}]], "Input",
+ CellLabel->"In[273]:=",
+ CellID->1322835112],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ TraditionalForm], "0"]}], "-",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[273]=",
+ CellID->837370092]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{948, Automatic}, {Automatic, 156}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Cases2.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Cases2.nb
index 83d9e5a51..46f1cb40e 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Cases2.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Cases2.nb
@@ -191,10 +191,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[BoxData["Examples"], "Subsubsection",
- CellTags->"Cases2",
- CellID->645978510],
-
Cell[CellGroupData[{
Cell[BoxData[
@@ -207,7 +203,7 @@ Cell[BoxData[
RowBox[{"f", "[",
RowBox[{"c", ",", "d"}], "]"}]}], ",", "f"}], "]"}]], "Input",
CellTags->"Cases2",
- CellLabel->"In[1]:=",
+ CellLabel->"In[284]:=",
CellID->1924250367],
Cell[BoxData[
@@ -219,8 +215,7 @@ Cell[BoxData[
RowBox[{"f", "(",
RowBox[{"c", ",", "d"}], ")"}]}], "}"}], TraditionalForm]], "Output",
CellTags->"Cases2",
- CellLabel->"Out[1]=",
- CellID->1245535704]
+ CellLabel->"Out[284]="]
}, Open ]],
Cell[CellGroupData[{
@@ -235,7 +230,7 @@ Cell[BoxData[
RowBox[{"y", "-", "z"}], "]"}]}], "+",
RowBox[{"g", "[", "y", "]"}]}], ",", "Sin", ",", "g"}], "]"}]], "Input",
CellTags->"Cases2",
- CellLabel->"In[2]:=",
+ CellLabel->"In[285]:=",
CellID->1264635109],
Cell[BoxData[
@@ -247,8 +242,7 @@ Cell[BoxData[
RowBox[{"sin", "(",
RowBox[{"y", "-", "z"}], ")"}]}], "}"}], TraditionalForm]], "Output",
CellTags->"Cases2",
- CellLabel->"Out[2]=",
- CellID->1551461505]
+ CellLabel->"Out[285]="]
}, Open ]],
Cell[CellGroupData[{
@@ -267,7 +261,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"Sin", ",", "g"}], "}"}]}], "]"}]], "Input",
CellTags->"Cases2",
- CellLabel->"In[3]:=",
+ CellLabel->"In[286]:=",
CellID->1159301950],
Cell[BoxData[
@@ -281,8 +275,7 @@ Cell[BoxData[
RowBox[{"sin", "(",
RowBox[{"y", "-", "z"}], ")"}]}], "}"}], TraditionalForm]], "Output",
CellTags->"Cases2",
- CellLabel->"Out[3]=",
- CellID->1202203267]
+ CellLabel->"Out[286]="]
}, Open ]],
Cell[CellGroupData[{
@@ -292,12 +285,12 @@ Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
- RowBox[{"DiracSlash", "[", "p", "]"}], ".",
- RowBox[{"DiracSlash", "[", "q", "]"}]}], "+",
- RowBox[{"ScalarProduct", "[",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "q", "]"}]}], "+",
+ RowBox[{"SP", "[",
RowBox[{"p", ",", "p"}], "]"}]}], ",", "Dot"}], "]"}]], "Input",
CellTags->"Cases2",
- CellLabel->"In[4]:=",
+ CellLabel->"In[288]:=",
CellID->775837316],
Cell[BoxData[
@@ -305,24 +298,27 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], "}"}], TraditionalForm]], "Output",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "}"}], TraditionalForm]], "Output",
CellTags->"Cases2",
- CellLabel->"Out[4]=",
- CellID->896832184]
+ CellLabel->"Out[288]="]
}, Open ]]
}, Open ]],
@@ -387,12 +383,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{773, Automatic}, {Automatic, 240}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChangeDimension.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChangeDimension.nb
index a1e676134..ff40f1d28 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChangeDimension.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChangeDimension.nb
@@ -182,9 +182,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Eps",
ButtonNote->"Eps"],
"."
-}], "Text",
- CellTags->"ChangeDimension",
- CellID->1962733391]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -215,9 +213,7 @@ Cell["\<\
Remember that LorentzIndex[mu, 4] is simplified to LorentzIndex[mu] and \
Momentum[p, 4] to Momentum[p]. Thus the fullowing objects are defined in four \
dimensions.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->1522324479],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -227,7 +223,7 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",", " ",
RowBox[{"Momentum", "[", "p", "]"}]}], "}"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[1]:=",
+ CellLabel->"In[289]:=",
CellID->1127631822],
Cell[BoxData[
@@ -240,8 +236,7 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"]}], "}"}], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[1]=",
- CellID->621481036]
+ CellLabel->"Out[289]="]
}, Open ]],
Cell[CellGroupData[{
@@ -250,7 +245,7 @@ Cell[BoxData[
RowBox[{"ChangeDimension", "[",
RowBox[{"%", ",", " ", "D"}], "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[2]:=",
+ CellLabel->"In[290]:=",
CellID->2044492451],
Cell[BoxData[
@@ -262,8 +257,7 @@ Cell[BoxData[
FormBox["p",
TraditionalForm]}], "}"}], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[2]=",
- CellID->1291415822]
+ CellLabel->"Out[290]="]
}, Open ]],
Cell[CellGroupData[{
@@ -271,7 +265,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "StandardForm"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[3]:=",
+ CellLabel->"In[291]:=",
CellID->1689591331],
Cell[BoxData[
@@ -282,15 +276,12 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"p", ",", "D"}], "]"}]}], "}"}]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[3]//StandardForm=",
- CellID->2101335861]
+ CellLabel->"Out[291]//StandardForm="]
}, Open ]],
Cell["\<\
This changes all non-4-dimensional objects to 4-dimensional ones.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->906094166],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -300,7 +291,7 @@ Cell[BoxData[
RowBox[{"%%", ",", " ", "4"}], "]"}], " ", "//", " ",
"StandardForm"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[4]:=",
+ CellLabel->"In[292]:=",
CellID->898970803],
Cell[BoxData[
@@ -309,13 +300,10 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
RowBox[{"Momentum", "[", "p", "]"}]}], "}"}]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[4]//StandardForm=",
- CellID->2072157462]
+ CellLabel->"Out[292]//StandardForm="]
}, Open ]],
-Cell["Consider the following list of 4- and D-dimensional object.", "Text",
- CellTags->"ChangeDimension",
- CellID->169525226],
+Cell["Consider the following list of 4- and D-dimensional object.", "Notes"],
Cell[CellGroupData[{
@@ -334,7 +322,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
RowBox[{"f", "[", "D", "]"}]}]}], "}"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[5]:=",
+ CellLabel->"In[296]:=",
CellID->931498160],
Cell[BoxData[
@@ -360,23 +348,17 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], " ",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm]}], ",",
RowBox[{
RowBox[{"f", "(", "D", ")"}], " ",
@@ -396,35 +378,28 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], " ",
FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
TraditionalForm]}]}], "}"}], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[5]=",
- CellID->1897534885]
+ CellLabel->"Out[296]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[",
- RowBox[{"Contract", "[", "%", "]"}], "]"}]], "Input",
+ RowBox[{"DiracTrick", "/@",
+ RowBox[{"Contract", "/@", "%"}]}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[6]:=",
+ CellLabel->"In[297]:=",
CellID->2067421250],
Cell[BoxData[
@@ -434,20 +409,17 @@ Cell[BoxData[
RowBox[{"D", " ",
RowBox[{"f", "(", "D", ")"}]}]}], "}"}], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[6]=",
- CellID->1845092262]
+ CellLabel->"Out[297]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[",
- RowBox[{"Contract", "[",
+ RowBox[{"DiracTrick", "/@",
+ RowBox[{"Contract", "/@",
RowBox[{"ChangeDimension", "[",
- RowBox[{"%%", ",", "n"}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[7]:=",
- CellID->443072956],
+ RowBox[{"%%", ",", "n"}], "]"}]}]}]], "Input",
+ CellLabel->"In[298]:="],
Cell[BoxData[
FormBox[
@@ -455,57 +427,27 @@ Cell[BoxData[
RowBox[{"n", ",",
RowBox[{"n", " ",
RowBox[{"f", "(", "D", ")"}]}]}], "}"}], TraditionalForm]], "Output",
- CellTags->"ChangeDimension",
- CellLabel->"Out[7]=",
- CellID->1862585362]
+ CellLabel->"Out[298]="]
}, Open ]],
Cell["\<\
Any explicit occurence of D (like in f(D)) is not replaced by ChangeDimension.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->1415828575],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"LeviCivita", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[8]:=",
- CellID->1024340055],
-
-Cell["\<\
-The option Dimension of Eps must be changed too, since with the default \
-setting Dimension\[Rule]4 the arguments of Eps are automatically changed to 4 \
-dimensions.\
-\>", "Text",
- CellTags->"ChangeDimension",
- CellID->811356604],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[9]:=",
- CellID->1043083810],
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", " ", "=", " ",
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
- "]"}]}]], "Input",
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[10]:=",
+ CellLabel->"In[32]:=",
CellID->2013502188],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -524,23 +466,23 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[10]=",
- CellID->1195831407]
+ CellLabel->"Out[32]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"ChangeDimension", "[",
- RowBox[{"a1", ",", "4"}], "]"}]}]], "Input",
+ RowBox[{"%", ",", "D"}], "]"}]}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[11]:=",
+ CellLabel->"In[33]:=",
CellID->1364188329],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -559,8 +501,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[11]=",
- CellID->454924559]
+ CellLabel->"Out[33]="]
}, Open ]],
Cell[CellGroupData[{
@@ -568,9 +509,9 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Factor2", "[",
RowBox[{"Contract", "[",
- SuperscriptBox["a1", "2"], "]"}], "]"}]], "Input",
+ SuperscriptBox["%", "2"], "]"}], "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[12]:=",
+ CellLabel->"In[34]:=",
CellID->1260742676],
Cell[BoxData[
@@ -583,43 +524,27 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"3", "-", "D"}], ")"}], " ", "D"}], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[12]=",
- CellID->712801039]
+ CellLabel->"Out[34]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[",
- SuperscriptBox["a2", "2"], "]"}]], "Input",
+ SuperscriptBox[
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "2"], "]"}]], "Input",
CellTags->"ChangeDimension",
- CellLabel->"In[13]:=",
+ CellLabel->"In[35]:=",
CellID->1971885587],
Cell[BoxData[
FormBox[
RowBox[{"-", "24"}], TraditionalForm]], "Output",
CellTags->"ChangeDimension",
- CellLabel->"Out[13]=",
- CellID->1523338400]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[14]:=",
- CellID->1454834336],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2"}], "]"}], ";"}]], "Input",
- CellTags->"ChangeDimension",
- CellLabel->"In[15]:=",
- CellID->696058695]
+ CellLabel->"Out[35]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -683,12 +608,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{931, Automatic}, {Automatic, 74}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChargeConjugationMatrix.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChargeConjugationMatrix.nb
deleted file mode 100644
index 8a22ad03e..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChargeConjugationMatrix.nb
+++ /dev/null
@@ -1,384 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/ChargeConjugationMatrix", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["ChargeConjugationMatrix", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["ChargeConjugationMatrix"], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the charge conjugation matrix ",
- StyleBox["C",
- FontSlant->"Italic"],
- "."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["ChargeConjugationMatrixInv",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/ChargeConjugationMatrixInv",
- ButtonNote->"ChargeConjugationMatrixInv"],
- "."
-}], "Text",
- CellTags->"ChargeConjugationMatrix",
- CellID->269939317]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[1]:=",
- CellID->205239627],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[1]=",
- CellID->1893455024]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[2]:=",
- CellID->570632679],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-",
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ")"}], "T"]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[2]=",
- CellID->850295323]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracGamma", "[", "5", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[3]:=",
- CellID->970778569],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[3]=",
- CellID->1098980184]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[4]:=",
- CellID->2071243719],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[4]=",
- CellID->1607597675]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", "^", "2"}]], "Input",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"In[5]:=",
- CellID->953249607],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrix",
- CellLabel->"Out[5]=",
- CellID->56606698]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChargeConjugationMatrixInv.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChargeConjugationMatrixInv.nb
deleted file mode 100644
index e4314c656..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChargeConjugationMatrixInv.nb
+++ /dev/null
@@ -1,418 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/ChargeConjugationMatrixInv", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["ChargeConjugationMatrixInv", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["ChargeConjugationMatrixInv"], "InlineFormula"],
- " \[LineSeparator]",
- "is the inverse of ChargeConjugationMatrix. It is substituted immediately by \
--ChargeConjugationMatrix."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["ChargeConjugationMatrix",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/ChargeConjugationMatrix",
- ButtonNote->"ChargeConjugationMatrix"],
- "."
-}], "Text",
- CellTags->"ChargeConjugationMatrixInv",
- CellID->276945689]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[1]:=",
- CellID->1140927721],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[1]=",
- CellID->1029197353]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[2]:=",
- CellID->1785990666],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-",
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ")"}], "T"]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[2]=",
- CellID->168936533]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- RowBox[{"DiracGamma", "[", "5", "]"}], ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[3]:=",
- CellID->1805130692],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[3]=",
- CellID->923388841]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[", "%", "]"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[4]:=",
- CellID->520085018],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[4]=",
- CellID->1835032853]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrix", ".",
- "ChargeConjugationMatrixInv"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[5]:=",
- CellID->742166059],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"C", ".",
- RowBox[{"(",
- RowBox[{"-", "C"}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[5]=",
- CellID->1205242066]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "Calc"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[6]:=",
- CellID->812819391],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-",
- RowBox[{"C", ".", "C"}]}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[6]=",
- CellID->1846536639]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ChargeConjugationMatrixInv", "^", "2"}]], "Input",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"In[7]:=",
- CellID->1102040166],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"-", "1"}], TraditionalForm]], "Output",
- CellTags->"ChargeConjugationMatrixInv",
- CellLabel->"Out[7]=",
- CellID->209662305]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CheckDB.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CheckDB.nb
index 2e897de01..fce9990e0 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CheckDB.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CheckDB.nb
@@ -119,26 +119,60 @@ Cell[TextData[{
Cell[BoxData[
RowBox[{"CheckDB", "[",
RowBox[{"exp", ",", " ", "fil"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "saves [with Put] or retrieves [with Get] exp from a file fil. It checks if \
-the setting of the option Directory is a valid directory name and if fil is a \
-valid file name and does exist. If it does, Get[fil] is executed. If fil does \
-not exist, exp gets evaluated and saved to fil. Saving and evaluating can be \
-further controlled with the options ForceSave and NoSave. If the option Check \
-is set to False the return value is what is evaluated [see above]. If Check \
-is set to True the return value is True or False depending on whether the \
-evaluation of exp agrees with what is loaded from fil or fil does not exist. \
-Default value of Check : False.\nNOTICE : If fil ends with \".Gen\" or \".Mod\
-\", the setting of Directory is ignored and fil is saved in the \
-\"CouplingVectors\" subdirectory of \"Phi\". If fil ends with \".Fac\", the \
-setting of Directory is ignored and fil is saved in the \"Factors\" \
-subdirectory of \"Phi\". If fil is a file name with full path, the setting \
-of Directory is also ignored."
+ " \[LineSeparator]saves [with Put] or retrieves [with Get] exp from a file \
+fil. It checks if the setting of the option Directory is a valid directory \
+name and if fil is a valid file name and does exist. If it does, Get[fil] is \
+executed. If fil does not exist, exp gets evaluated and saved to fil. Saving \
+and evaluating can be further controlled with the options ForceSave and \
+NoSave. If the option Check is set to False the return value is what is \
+evaluated [see above]. If Check is set to True the return value is True or \
+False depending on whether the evaluation of exp agrees with what is loaded \
+from fil or fil does not exist. Default value of Check : False."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell["\<\
+If fil ends with \".Gen\" or \".Mod\", the setting of Directory is ignored \
+and fil is saved in the \"CouplingVectors\" subdirectory of \"Phi\". If fil \
+ends with \".Fac\", the setting of Directory is ignored and fil is saved in \
+the \"Factors\" subdirectory of \"Phi\". If fil is a file name with full \
+path, the setting of Directory is also ignored.\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CheckDB", "]"}]], "Input",
+ CellLabel->"In[305]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Directory", "\[RuleDelayed]",
+ RowBox[{"ToFileName", "[",
+ RowBox[{
+ RowBox[{"{", "$FeynCalcDirectory", "}"}], ",", "\<\"Database\"\>"}],
+ "]"}]}], ",",
+ RowBox[{"ForceSave", "\[Rule]", "False"}], ",",
+ RowBox[{"NoSave", "\[Rule]", "False"}], ",",
+ RowBox[{"Check", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[305]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Attributes", "[", "CheckDB", "]"}]], "Input",
+ CellLabel->"In[306]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{", "HoldFirst", "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[306]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -201,58 +235,10 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"CheckDB",
- CellID->647730640],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "CheckDB", "]"}]], "Input",
- CellTags->"CheckDB",
- CellLabel->"In[1]:=",
- CellID->2004487562],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Directory", "\[RuleDelayed]",
- RowBox[{"ToFileName", "[",
- RowBox[{
- RowBox[{"{", "$FeynCalcDirectory", "}"}], ",", "\<\"Database\"\>"}],
- "]"}]}], ",",
- RowBox[{"ForceSave", "\[Rule]", "False"}], ",",
- RowBox[{"NoSave", "\[Rule]", "False"}], ",",
- RowBox[{"Check", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"CheckDB",
- CellLabel->"Out[1]=",
- CellID->1735070400]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Attributes", "[", "CheckDB", "]"}]], "Input",
- CellTags->"CheckDB",
- CellLabel->"In[2]:=",
- CellID->62116505],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{", "HoldFirst", "}"}], TraditionalForm]], "Output",
- CellTags->"CheckDB",
- CellLabel->"Out[2]=",
- CellID->393414258]
-}, Open ]],
-
Cell["\<\
The first time the Table function is evaluated and the result saved into the \
test.s file.\
-\>", "Text",
- CellTags->"CheckDB",
- CellID->1632453918],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -269,29 +255,25 @@ Cell[BoxData[
RowBox[{"i", ",", "2"}], "}"}]}], "]"}], ",", "\"\\""}],
"]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[3]:=",
+ CellLabel->"In[307]:=",
CellID->1433287094],
Cell["test test ", "Print",
CellTags->"CheckDB",
- CellLabel->"During evaluation of In[3]:=",
- CellID->670482458],
+ CellLabel->"During evaluation of In[307]:="],
Cell[BoxData[
FormBox[
RowBox[{"{",
RowBox[{"1", ",", "2"}], "}"}], TraditionalForm]], "Output",
CellTags->"CheckDB",
- CellLabel->"Out[3]=",
- CellID->1976770700]
+ CellLabel->"Out[307]="]
}, Open ]],
Cell["\<\
Executing the same a second time will just load the result from test.s and \
not evaluate the Table function.\
-\>", "Text",
- CellTags->"CheckDB",
- CellID->342347170],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -308,7 +290,7 @@ Cell[BoxData[
RowBox[{"i", ",", "2"}], "}"}]}], "]"}], ",", "\"\\""}],
"]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[4]:=",
+ CellLabel->"In[308]:=",
CellID->1024102984],
Cell[BoxData[
@@ -316,13 +298,10 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"1", ",", "2"}], "}"}], TraditionalForm]], "Output",
CellTags->"CheckDB",
- CellLabel->"Out[4]=",
- CellID->129097795]
+ CellLabel->"Out[308]="]
}, Open ]],
-Cell["This shows the actual saved value of test.s.", "Text",
- CellTags->"CheckDB",
- CellID->277506706],
+Cell["This shows the actual saved value of test.s.", "Notes"],
Cell[CellGroupData[{
@@ -335,14 +314,13 @@ Cell[BoxData[
RowBox[{"Options", "[", "CheckDB", "]"}]}], ",", "\"\\""}],
"]"}], ",", "\"\\""}], "]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[5]:=",
+ CellLabel->"In[309]:=",
CellID->1578936180],
Cell[BoxData[
FormBox["\<\"{1, 2}\"\>", TraditionalForm]], "Output",
CellTags->"CheckDB",
- CellLabel->"Out[5]=",
- CellID->796644611]
+ CellLabel->"Out[309]="]
}, Open ]],
Cell[BoxData[
@@ -353,7 +331,7 @@ Cell[BoxData[
RowBox[{"Options", "[", "CheckDB", "]"}]}], ",", "\"\\""}],
"]"}], "]"}]], "Input",
CellTags->"CheckDB",
- CellLabel->"In[6]:=",
+ CellLabel->"In[310]:=",
CellID->1720430951]
}, Open ]],
@@ -418,12 +396,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{784, Automatic}, {Automatic, 51}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChiralityProjector.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChiralityProjector.nb
index ee6fa7254..59cad4a43 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChiralityProjector.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChiralityProjector.nb
@@ -140,7 +140,10 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
+Cell["\<\
+The shortcut ChiralityProjector is deprecated, please use GA[6] and GA[7] \
+instead!\
+\>", "Notes",
CellID->1067943069]
}, Open ]],
@@ -177,24 +180,17 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["DiracGamma",
+ ButtonBox["GA",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- ", ",
- ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData:>"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
", ",
ButtonBox["FCI",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/FCI",
ButtonNote->"FCI"],
"."
-}], "Text",
- CellTags->"ChiralityProjector",
- CellID->326424545]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -231,7 +227,7 @@ Cell[BoxData[
RowBox[{"ChiralityProjector", "[",
RowBox[{"-", "1"}], "]"}]}], "}"}]], "Input",
CellTags->"ChiralityProjector",
- CellLabel->"In[2]:=",
+ CellLabel->"In[313]:=",
CellID->336937517],
Cell[BoxData[
@@ -247,18 +243,20 @@ Cell[BoxData[
FormBox["7",
TraditionalForm]]}], "}"}], TraditionalForm]], "Output",
CellTags->"ChiralityProjector",
- CellLabel->"Out[2]=",
- CellID->1252517379]
+ CellLabel->"Out[313]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{"%", ",",
- RowBox[{"DiracSubstitute67", "\[Rule]", "True"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"#", ",",
+ RowBox[{"DiracSubstitute67", "\[Rule]", "True"}]}], "]"}], "&"}], "/@",
+ "%"}]], "Input",
CellTags->"ChiralityProjector",
- CellLabel->"In[3]:=",
+ CellLabel->"In[314]:=",
CellID->2102778570],
Cell[BoxData[
@@ -280,8 +278,70 @@ Cell[BoxData[
FormBox["5",
TraditionalForm]], "2"]}]}], "}"}], TraditionalForm]], "Output",
CellTags->"ChiralityProjector",
- CellLabel->"Out[3]=",
- CellID->1744568026]
+ CellLabel->"Out[314]="]
+}, Open ]],
+
+Cell["\<\
+ChiralityProjector is scheduled for removal in the future versions of \
+FeynCalc. The safe alternative is to use GA[6] and GA[7].\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"GA", "[", "6", "]"}], ",",
+ RowBox[{"GA", "[", "7", "]"}]}], "}"}]], "Input",
+ CellLabel->"In[319]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ",",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}], "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[319]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"GA", "[", "6", "]"}], "]"}], "===",
+ RowBox[{"ChiralityProjector", "[",
+ RowBox[{"+", "1"}], "]"}]}]], "Input",
+ CellLabel->"In[320]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[320]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"GA", "[", "7", "]"}], "]"}], "===",
+ RowBox[{"ChiralityProjector", "[",
+ RowBox[{"-", "1"}], "]"}]}]], "Input",
+ CellLabel->"In[321]:="],
+
+Cell[BoxData[
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[321]="]
}, Open ]]
}, Open ]],
@@ -345,10 +405,11 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{1221, 770},
+WindowMargins->{{Automatic, 303}, {116, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Chisholm.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Chisholm.nb
index 6ff927b1c..dc7aa039b 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Chisholm.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Chisholm.nb
@@ -117,15 +117,38 @@ Cell["Chisholm", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"Chisholm", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "substitutes products of three Dirac matrices or slashes by the Chisholm \
-identity."
+ RowBox[{"Chisholm", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]substitutes products of three Dirac matrices or slashes by \
+the Chisholm identity."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Chisholm", "]"}]], "Input",
+ CellLabel->"In[55]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Mode", "\[Rule]", "1"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "False"}], ",",
+ RowBox[{"NonCommutative", "\[Rule]", "True"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}], ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[55]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -160,20 +183,10 @@ Cell[CellGroupData[{
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[TextData[{
- ButtonBox["EpsChisholm",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/EpsChisholm",
- ButtonNote->"EpsChisholm"],
- ", ",
- ButtonBox["ChisholmSpinor",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/ChisholmSpinor",
- ButtonNote->"ChisholmSpinor"],
- "."
-}], "Text",
- CellTags->"Chisholm",
- CellID->1402112447]
+Cell[TextData[ButtonBox["EpsChisholm",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/EpsChisholm",
+ ButtonNote->"EpsChisholm"]], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -203,179 +216,51 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Chisholm", "[",
- RowBox[{"GA", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
- "]"}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[1]:=",
- CellID->1963239115],
+ CellLabel->"In[60]:=",
+ CellID->820852327],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["$MU$3638",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["$MU$3638",
- TraditionalForm],
- TraditionalForm]}]]}]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Chisholm",
- CellLabel->"Out[1]=",
- CellID->1878360355]
+ CellLabel->"Out[60]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[2]:=",
- CellID->820852327],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], ")"}],
- TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[2]=",
- CellID->1183629031]
-}, Open ]],
+Cell["Notice that the output contains dummy indices.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", " ", "=",
- RowBox[{"Chisholm", "[", "t1", "]"}]}]], "Input",
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[3]:=",
+ CellLabel->"In[61]:=",
CellID->1637229100],
Cell[BoxData[
@@ -386,14 +271,17 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3671",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$28", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -408,7 +296,9 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3671",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$28", ")"}]}],
TraditionalForm],
TraditionalForm]}]]}], "+",
RowBox[{
@@ -418,23 +308,17 @@ Cell[BoxData[
FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -442,23 +326,17 @@ Cell[BoxData[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -466,56 +344,74 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"Chisholm",
- CellLabel->"Out[3]=",
- CellID->1999653730]
+ CellLabel->"Out[61]="]
}, Open ]],
-Cell["The $MU$ variables are unique indices.", "Text",
- CellTags->"Chisholm",
- CellID->46337482],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"t1", ".", "t1"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[4]:=",
- CellID->648397183],
-
-Cell[BoxData[
- FormBox["16", TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[4]=",
- CellID->445477955]
-}, Open ]],
-
-Cell[CellGroupData[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}],
+ "]"}]], "Input",
+ CellLabel->"In[62]:="],
Cell[BoxData[
- RowBox[{"t3", " ", "=",
- RowBox[{"Chisholm", "[", "t1", "]"}]}]], "Input",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[62]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
CellTags->"Chisholm",
- CellLabel->"In[5]:=",
- CellID->429173445],
+ CellLabel->"In[63]:=",
+ CellID->1963239115],
Cell[BoxData[
FormBox[
@@ -525,1251 +421,1308 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3702",
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3702",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
TraditionalForm],
TraditionalForm]}]]}], "+",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]], " ",
- FormBox[
+ RowBox[{
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], " ",
- FormBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], " ",
- FormBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{
SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[5]=",
- CellID->536726068]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"t2", ".", "t3"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[6]:=",
- CellID->10063016],
-
-Cell[BoxData[
- FormBox["16", TraditionalForm]], "Output",
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"Chisholm",
- CellLabel->"Out[6]=",
- CellID->1250343813]
+ CellLabel->"Out[63]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"DiracSlash", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[7]:=",
- CellID->1067563039],
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
+ CellLabel->"In[67]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[7]=",
- CellID->102426516]
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[67]="]
}, Open ]],
+Cell[TextData[{
+ "Dummy Lorentz indices may also appear as ",
+ ButtonBox["FCGV",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCGV",
+ ButtonNote->"FCGV"],
+ "."
+}], "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Chisholm", "[", "t4", "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[8]:=",
- CellID->1495489925],
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[68]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox["$MU$3741",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ RowBox[{"FCGV", "(", "\<\"li361\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- FormBox[
- FormBox["$MU$3741",
- TraditionalForm],
+ FormBox["\<\"\[CurlyPhi]\"\>",
TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}]]}]}], "+",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}]}], "-",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], " ",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm]}]}], "+",
- RowBox[{
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"],
- TraditionalForm]}], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[8]=",
- CellID->1312947625]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"a1", "=",
- RowBox[{"GA", "[",
- RowBox[{
- "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
- "\[Kappa]"}], "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[9]:=",
- CellID->1800486413],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[9]=",
- CellID->547285677]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"a2", " ", "=",
- RowBox[{"Chisholm", "[", "a1", "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[10]:=",
- CellID->1694713808],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\<\",\"\>",
TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ FormBox["m1",
TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}]}], "+",
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li361\"\>", ")"}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]}]]}], "+",
- RowBox[{
+ TraditionalForm]}]], " ",
RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]], ".",
+ RowBox[{"(",
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"\[CurlyPhi]\"\>",
TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"\[CurlyPhi]\"\>",
TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]], ".",
+ RowBox[{"(",
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"\[CurlyPhi]\"\>",
TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- RowBox[{
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]], ".",
+ RowBox[{"(",
RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[68]="]
+}, Open ]],
+
+Cell[TextData[{
+ ButtonBox["Chisholm",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"],
+ " only works with Dirac matrices in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ " dimensions, ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional objects are ignored."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[66]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[66]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]"}], "]"}], "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]"}], "]"}],
+ "]"}]}]], "Input",
+ CellLabel->"In[72]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$44", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$44", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
+ TraditionalForm]}]]}]}], ")"}], ".",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$45", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$45", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
+ TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[72]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[73]:="],
+
+Cell[BoxData[
+ FormBox["16", TraditionalForm]], "Output",
+ CellLabel->"Out[73]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Mu]", ",", "\[Nu]"}], "]"}],
+ "]"}]}]], "Input",
+ CellLabel->"In[74]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$46", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$46", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}], ".",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$47", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$47", ")"}]}],
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
RowBox[{
- FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Alpha]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[74]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[75]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-", "128"}], TraditionalForm]], "Output",
+ CellLabel->"Out[75]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GS", "[",
+ RowBox[{"p", ",", "q", ",", "r"}], "]"}]], "Input",
+ CellLabel->"In[77]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[77]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[78]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$48", ")"}]}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
SuperscriptBox[
- OverscriptBox["g", "_"],
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$48", ")"}]}],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}]}], "+",
RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Mu]",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], "+",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[78]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}]], "Input",
+ CellTags->"Chisholm",
+ CellLabel->"In[92]:=",
+ CellID->1800486413],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"Chisholm",
+ CellLabel->"Out[92]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[", "%", "]"}]], "Input",
+ CellTags->"Chisholm",
+ CellLabel->"In[93]:=",
+ CellID->1694713808],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{"\[ImaginaryI]", " ",
+ TraditionalForm]}]], " ",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3762",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$69", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Kappa]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Tau]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3762",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$69", ")"}]}],
TraditionalForm],
TraditionalForm]}]]}], "-",
RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3784",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$71", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1777,191 +1730,138 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3784",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$71", ")"}]}],
TraditionalForm],
TraditionalForm]}]]}], "+",
RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3795",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$72", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3795",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$72", ")"}]}],
TraditionalForm],
- TraditionalForm]}]]}], "-",
+ TraditionalForm]}]]}], "+",
RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3806",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$73", ")"}]}],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Kappa]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3806",
- TraditionalForm],
- TraditionalForm]}]]}]}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[10]=",
- CellID->923274882]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"a3", " ", "=",
- RowBox[{"Chisholm", "[", "a1", "]"}]}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[11]:=",
- CellID->152524623],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}]}], "+",
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$73", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"\[ImaginaryI]", " ",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox["5",
TraditionalForm]]}], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Kappa]",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -1969,397 +1869,230 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
FormBox["\[Tau]",
TraditionalForm],
TraditionalForm]}]]}], "+",
- RowBox[{
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
FormBox[
FormBox["\[Kappa]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Kappa]",
- TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Tau]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
RowBox[{
SuperscriptBox[
@@ -2371,139 +2104,67 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Tau]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
RowBox[{
SuperscriptBox[
@@ -2515,49 +2176,37 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
@@ -2566,88 +2215,64 @@ Cell[BoxData[
FormBox["\[Kappa]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
RowBox[{
SuperscriptBox[
@@ -2659,49 +2284,37 @@ Cell[BoxData[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Kappa]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3889",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
@@ -2709,158 +2322,107 @@ Cell[BoxData[
FormBox[
FormBox["\[Kappa]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3889",
+ FormBox["\[Tau]",
TraditionalForm],
TraditionalForm]}]]}], "-",
- RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3911",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Kappa]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3911",
+ FormBox["\[Tau]",
TraditionalForm],
TraditionalForm]}]]}], "+",
- RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3922",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Kappa]",
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Kappa]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3922",
+ FormBox["\[Tau]",
TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{"\[ImaginaryI]", " ",
+ TraditionalForm]}]]}], "+",
+ RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["$MU$3933",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
@@ -2868,97 +2430,226 @@ Cell[BoxData[
FormBox[
FormBox["\[Kappa]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Sigma]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["$MU$3933",
+ FormBox["\[Tau]",
TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"Chisholm",
- CellLabel->"Out[11]=",
- CellID->1868130532]
+ CellLabel->"Out[93]="]
}, Open ]],
-Cell["Check that both a1.a1 and a2.a3 give the same.", "Text",
- CellTags->"Chisholm",
- CellID->1438490834],
+Cell[TextData[{
+ "Check the equality of the expressions before and after applying ",
+ ButtonBox["Chisholm.",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"]
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"a1", ".", "a1"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[12]:=",
- CellID->1805014734],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[94]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "2048"}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[12]=",
- CellID->100937461]
+ CellLabel->"Out[94]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"a2", ".", "a3"}], "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[13]:=",
- CellID->375938433],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]"}], "]"}], "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]"}], "]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[101]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "2048"}], TraditionalForm]], "Output",
- CellTags->"Chisholm",
- CellLabel->"Out[13]=",
- CellID->1603907719]
+ CellLabel->"Out[101]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracReduce", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]", ",",
+ "\[Kappa]"}], "]"}], ".",
+ RowBox[{"Chisholm", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Tau]",
+ ",", "\[Kappa]"}], "]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[103]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-", "2048"}], TraditionalForm]], "Output",
+ CellLabel->"Out[103]="]
}, Open ]],
+Cell[TextData[{
+ "Older FeynCalc versions had a function called Chisholm2 that acted on \
+expressions like ",
+ Cell[BoxData[
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SuperscriptBox["\[Gamma]", "\[Nu]"],
+ SuperscriptBox["\[Gamma]", "5"]}]], "InlineFormula"],
+ ". This functionality is now part of ",
+ ButtonBox["Chisholm",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"],
+ " and can be activated by setting the option Mode to 2."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "5"}], "]"}]], "Input",
+ CellLabel->"In[105]:="],
+
Cell[BoxData[
- RowBox[{"Clear", "[",
+ FormBox[
RowBox[{
- "t1", ",", "t2", ",", "t3", ",", "t4", ",", "a1", ",", "a2", ",", "a3"}],
- "]"}]], "Input",
- CellTags->"Chisholm",
- CellLabel->"In[14]:=",
- CellID->453091936]
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[105]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Chisholm", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Mode", "\[Rule]", "2"}]}], "]"}]], "Input",
+ CellLabel->"In[106]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$353", ")"}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$354", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$353", ")"}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$354", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[106]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -3021,13 +2712,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{971, 850},
+WindowMargins->{{1030, Automatic}, {Automatic, 146}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChisholmSpinor.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ChisholmSpinor.nb
deleted file mode 100644
index 9b3d42ac4..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ChisholmSpinor.nb
+++ /dev/null
@@ -1,616 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/ChisholmSpinor", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["ChisholmSpinor", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData[
- RowBox[{"ChisholmSpinor", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "uses the Chisholm identity on a DiraGamma between spinors. As an optional \
-second argument 1 or 2 may be given, indicating that ChisholmSpinor should \
-only act on the first resp. second part of a product of spinor chains."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["EpsChisholm",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/EpsChisholm",
- ButtonNote->"EpsChisholm"],
- ", ",
- ButtonBox["Chisholm",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Chisholm",
- ButtonNote->"Chisholm"],
- "."
-}], "Text",
- CellTags->"ChisholmSpinor",
- CellID->2143743981]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"Spinor", "[",
- RowBox[{"p1", ",", "m1"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
- RowBox[{"Spinor", "[",
- RowBox[{"p2", ",", "m2"}], "]"}]}]], "Input",
- CellTags->"ChisholmSpinor",
- CellLabel->"In[1]:=",
- CellID->30249209],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ChisholmSpinor",
- CellLabel->"Out[1]=",
- CellID->2055976112]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "ChisholmSpinor"}]], "Input",
- CellTags->"ChisholmSpinor",
- CellLabel->"In[2]:=",
- CellID->970486194],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["alpha42",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["alpha42",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], "-",
- FractionBox[
- RowBox[{"m1", " ", "m2", " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], "+",
- FractionBox[
- RowBox[{"m2", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]], "+",
- FractionBox[
- RowBox[{"m1", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m1",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
- RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m2",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}]}],
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["p2",
- TraditionalForm], "_"],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- CellTags->"ChisholmSpinor",
- CellLabel->"Out[2]=",
- CellID->1051632452]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect2.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect2.nb
index ea41d5740..5f00add42 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect2.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect2.nb
@@ -131,8 +131,37 @@ be set to False."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Collect2", "]"}]], "Input",
+ CellTags->"Collect2",
+ CellLabel->"In[375]:=",
+ CellID->538422816],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Denominator", "\[Rule]", "False"}], ",",
+ RowBox[{"Dot", "\[Rule]", "False"}], ",",
+ RowBox[{"FCFactorOut", "\[Rule]", "1"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
+ RowBox[{"FactoringDenominator", "\[Rule]", "False"}], ",",
+ RowBox[{"InitialFunction", "\[Rule]", "Identity"}], ",",
+ RowBox[{"IntermediateSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
+ RowBox[{"IsolateNames", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]", "Identity"}], ",",
+ RowBox[{"Numerator", "\[Rule]", "False"}], ",",
+ RowBox[{"TimeConstrained", "\[Rule]", "\[Infinity]"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"Collect2",
+ CellLabel->"Out[375]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -173,9 +202,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Isolate",
ButtonNote->"Isolate"],
"."
-}], "Text",
- CellTags->"Collect2",
- CellID->389701827]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -204,32 +231,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Collect2", "]"}]], "Input",
- CellTags->"Collect2",
- CellLabel->"In[90]:=",
- CellID->538422816],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Denominator", "\[Rule]", "False"}], ",",
- RowBox[{"Dot", "\[Rule]", "False"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"Expanding", "\[Rule]", "True"}], ",",
- RowBox[{"Factoring", "\[Rule]", "Factor"}], ",",
- RowBox[{"IsolateFast", "\[Rule]", "False"}], ",",
- RowBox[{"IsolateNames", "\[Rule]", "False"}], ",",
- RowBox[{"Head", "\[Rule]", "Identity"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"Collect2",
- CellLabel->"Out[90]=",
- CellID->1317311527]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"Collect2", "[",
RowBox[{
@@ -244,7 +245,7 @@ Cell[BoxData[
FractionBox["x", "2"], "-",
FractionBox["y", "w"]}]}], ",", "a"}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[91]:=",
+ CellLabel->"In[376]:=",
CellID->1914400776],
Cell[BoxData[
@@ -263,8 +264,7 @@ Cell[BoxData[
RowBox[{"2", " ", "y"}]}],
RowBox[{"2", " ", "w"}]]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[91]=",
- CellID->27818195]
+ CellLabel->"Out[376]="]
}, Open ]],
Cell[CellGroupData[{
@@ -274,7 +274,7 @@ Cell[BoxData[
RowBox[{"t1", ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "False"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[92]:=",
+ CellLabel->"In[377]:=",
CellID->269033150],
Cell[BoxData[
@@ -291,8 +291,7 @@ Cell[BoxData[
FractionBox["y", "w"], "+",
FractionBox["x", "2"]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[92]=",
- CellID->151726169]
+ CellLabel->"Out[377]="]
}, Open ]],
Cell[CellGroupData[{
@@ -302,7 +301,7 @@ Cell[BoxData[
RowBox[{"t1", ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "Factor"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[93]:=",
+ CellLabel->"In[378]:=",
CellID->772013483],
Cell[BoxData[
@@ -321,8 +320,7 @@ Cell[BoxData[
RowBox[{"2", " ", "y"}]}],
RowBox[{"2", " ", "w"}]]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[93]=",
- CellID->836248448]
+ CellLabel->"Out[378]="]
}, Open ]],
Cell[CellGroupData[{
@@ -331,7 +329,7 @@ Cell[BoxData[
RowBox[{"Collect2", "[",
RowBox[{"t1", ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "Simplify"}]}], "]"}]], "Input",
- CellLabel->"In[94]:=",
+ CellLabel->"In[379]:=",
CellID->321654602],
Cell[BoxData[
@@ -346,8 +344,7 @@ Cell[BoxData[
RowBox[{"r", "+", "1"}], ")"}]}], "-",
FractionBox["y", "w"], "+",
FractionBox["x", "2"]}], TraditionalForm]], "Output",
- CellLabel->"Out[94]=",
- CellID->1221933307]
+ CellLabel->"Out[379]="]
}, Open ]],
Cell[CellGroupData[{
@@ -370,7 +367,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[95]:=",
+ CellLabel->"In[380]:=",
CellID->708606765],
Cell[BoxData[
@@ -391,8 +388,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "+", "1"}], ")"}]}]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[95]=",
- CellID->2073132438]
+ CellLabel->"Out[380]="]
}, Open ]],
Cell[CellGroupData[{
@@ -405,9 +401,9 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"a", "-", "b", "-", "c", "-", "d"}], ")"}], "5"], "]"}], ",",
"a", ",",
- RowBox[{"IsolateNames", "\[Rule]", "l"}]}], "]"}]], "Input",
+ RowBox[{"IsolateNames", "\[Rule]", "KK"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[98]:=",
+ CellLabel->"In[381]:=",
CellID->741587872],
Cell[BoxData[
@@ -417,36 +413,35 @@ Cell[BoxData[
RowBox[{"5", " ",
SuperscriptBox["a", "4"], " ",
TagBox[
- RowBox[{"l", "(", "1398", ")"}],
+ RowBox[{"KK", "(", "114", ")"}],
HoldForm]}], "+",
RowBox[{"10", " ",
SuperscriptBox["a", "3"], " ",
TagBox[
- RowBox[{"l", "(", "1400", ")"}],
+ RowBox[{"KK", "(", "115", ")"}],
HoldForm]}], "-",
RowBox[{"10", " ",
SuperscriptBox["a", "2"], " ",
TagBox[
- RowBox[{"l", "(", "1402", ")"}],
+ RowBox[{"KK", "(", "117", ")"}],
HoldForm]}], "+",
RowBox[{"5", " ", "a", " ",
TagBox[
- RowBox[{"l", "(", "1401", ")"}],
+ RowBox[{"KK", "(", "116", ")"}],
HoldForm]}], "-",
TagBox[
- RowBox[{"l", "(", "1399", ")"}],
+ RowBox[{"KK", "(", "118", ")"}],
HoldForm]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[98]=",
- CellID->195196847]
+ CellLabel->"Out[381]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ReleaseHold", "[", "%", "]"}]], "Input",
+ RowBox[{"FRH", "[", "%", "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[99]:=",
+ CellLabel->"In[382]:=",
CellID->683646211],
Cell[BoxData[
@@ -460,27 +455,23 @@ Cell[BoxData[
RowBox[{"10", " ",
SuperscriptBox["a", "3"], " ",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "2"]}], "-",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "2"]}], "-",
RowBox[{"10", " ",
SuperscriptBox["a", "2"], " ",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "3"]}], "+",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "3"]}], "+",
RowBox[{"5", " ", "a", " ",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "4"]}], "-",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "4"]}], "-",
SuperscriptBox[
- TagBox[
- RowBox[{"l", "(", "1398", ")"}],
- HoldForm], "5"]}], TraditionalForm]], "Output",
+ RowBox[{"(",
+ RowBox[{"b", "+", "c", "+", "d"}], ")"}], "5"]}],
+ TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[99]=",
- CellID->1584671269]
+ CellLabel->"Out[382]="]
}, Open ]],
Cell[CellGroupData[{
@@ -494,7 +485,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "-", "c", "-", "d"}], ")"}], "5"], "]"}], ",",
"a", ",",
RowBox[{"Head", "\[Rule]", "h"}]}], "]"}]], "Input",
- CellLabel->"In[100]:=",
+ CellLabel->"In[383]:=",
CellID->1338628687],
Cell[BoxData[
@@ -528,15 +519,14 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"b", "+", "c", "+", "d"}], ")"}], "5"]}],
TraditionalForm]], "Output",
- CellLabel->"Out[100]=",
- CellID->638446957]
+ CellLabel->"Out[383]="]
}, Open ]],
Cell[BoxData[
RowBox[{"Clear", "[",
RowBox[{"t1", ",", "l"}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[101]:=",
+ CellLabel->"In[384]:=",
CellID->1111657644],
Cell[CellGroupData[{
@@ -550,7 +540,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "-", "c"}], ")"}], "3"], "]"}], ",", "a", ",",
RowBox[{"Factoring", "\[Rule]", "fun"}]}], "]"}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[102]:=",
+ CellLabel->"In[385]:=",
CellID->1492093352],
Cell[BoxData[
@@ -584,8 +574,7 @@ Cell[BoxData[
SuperscriptBox["c", "2"]}], "-",
SuperscriptBox["c", "3"]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[102]=",
- CellID->444068994]
+ CellLabel->"Out[385]="]
}, Open ]],
Cell[CellGroupData[{
@@ -594,7 +583,7 @@ Cell[BoxData[
RowBox[{"%", " ", "/.", " ",
RowBox[{"fun", "\[Rule]", "FactorTerms"}]}]], "Input",
CellTags->"Collect2",
- CellLabel->"In[103]:=",
+ CellLabel->"In[386]:=",
CellID->1964581263],
Cell[BoxData[
@@ -618,8 +607,7 @@ Cell[BoxData[
SuperscriptBox["c", "2"]}], "-",
SuperscriptBox["c", "3"]}], TraditionalForm]], "Output",
CellTags->"Collect2",
- CellLabel->"Out[103]=",
- CellID->1797163188]
+ CellLabel->"Out[386]="]
}, Open ]],
Cell[TextData[{
@@ -655,7 +643,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "200000"}], "}"}]}], "]"}], "*",
"c"}]}]}], ";"}]], "Input",
- CellLabel->"In[124]:=",
+ CellLabel->"In[387]:=",
CellID->18062506],
Cell[CellGroupData[{
@@ -669,28 +657,27 @@ Cell[BoxData[
RowBox[{"Factoring", "\[Rule]", "False"}], ",",
RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
RowBox[{"Expanding", "\[Rule]", "False"}]}], "]"}], "]"}]], "Input",
- CellLabel->"In[129]:=",
+ CellLabel->"In[388]:=",
CellID->908574489],
Cell[BoxData[
FormBox[
RowBox[{"{",
- RowBox[{"2.427166`", ",",
+ RowBox[{"2.648394`", ",",
RowBox[{
RowBox[{"a", " ",
TagBox[
- RowBox[{"KK", "(", "1416", ")"}],
+ RowBox[{"KK", "(", "123", ")"}],
HoldForm]}], "+",
RowBox[{"b", " ",
TagBox[
- RowBox[{"KK", "(", "1417", ")"}],
+ RowBox[{"KK", "(", "124", ")"}],
HoldForm]}], "+",
RowBox[{"c", " ",
TagBox[
- RowBox[{"KK", "(", "1415", ")"}],
+ RowBox[{"KK", "(", "122", ")"}],
HoldForm]}]}]}], "}"}], TraditionalForm]], "Output",
- CellLabel->"Out[129]=",
- CellID->428829446]
+ CellLabel->"Out[388]="]
}, Open ]],
Cell[CellGroupData[{
@@ -705,29 +692,32 @@ Cell[BoxData[
RowBox[{"IsolateNames", "\[Rule]", "KK"}], ",",
RowBox[{"IsolateFast", "\[Rule]", "True"}], ",",
RowBox[{"Expanding", "\[Rule]", "False"}]}], "]"}], "]"}]], "Input",
- CellLabel->"In[130]:=",
+ CellLabel->"In[389]:=",
CellID->1760353952],
Cell[BoxData[
FormBox[
RowBox[{"{",
- RowBox[{"1.824256`", ",",
+ RowBox[{"1.940384`", ",",
RowBox[{
RowBox[{"a", " ",
TagBox[
- RowBox[{"KK", "(", "1416", ")"}],
+ RowBox[{"KK", "(", "123", ")"}],
HoldForm]}], "+",
RowBox[{"b", " ",
TagBox[
- RowBox[{"KK", "(", "1417", ")"}],
+ RowBox[{"KK", "(", "124", ")"}],
HoldForm]}], "+",
RowBox[{"c", " ",
TagBox[
- RowBox[{"KK", "(", "1415", ")"}],
+ RowBox[{"KK", "(", "122", ")"}],
HoldForm]}]}]}], "}"}], TraditionalForm]], "Output",
- CellLabel->"Out[130]=",
- CellID->1586544186]
-}, Open ]]
+ CellLabel->"Out[389]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "exp", "]"}]], "Input",
+ CellLabel->"In[390]:="]
}, Open ]],
Cell[CellGroupData[{
@@ -791,9 +781,10 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 741},
-WindowMargins->{{Automatic, 1137}, {Automatic, 70}},
+WindowMargins->{{796, Automatic}, {Automatic, 131}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect3.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect3.nb
index 4bd0c9524..4ce5a322a 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect3.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Collect3.nb
@@ -146,8 +146,24 @@ to the list of monomials mulitplied by their coefficients."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Collect3", "]"}]], "Input",
+ CellTags->"Collect3",
+ CellLabel->"In[391]:=",
+ CellID->1015372413],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"Head", "\[Rule]", "Plus"}]}], "}"}], TraditionalForm]], "Output",
+
+ CellTags->"Collect3",
+ CellLabel->"Out[391]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -193,9 +209,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Isolate",
ButtonNote->"Isolate"],
"."
-}], "Text",
- CellTags->"Collect3",
- CellID->877664095]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -224,26 +238,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Collect3", "]"}]], "Input",
- CellTags->"Collect3",
- CellLabel->"In[1]:=",
- CellID->1015372413],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"Head", "\[Rule]", "Plus"}]}], "}"}], TraditionalForm]], "Output",
-
- CellTags->"Collect3",
- CellLabel->"Out[1]=",
- CellID->581070159]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"Collect3", "[",
RowBox[{
@@ -262,7 +256,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "Input",
CellTags->"Collect3",
- CellLabel->"In[2]:=",
+ CellLabel->"In[392]:=",
CellID->956954453],
Cell[BoxData[
@@ -281,8 +275,7 @@ Cell[BoxData[
SuperscriptBox["b", "2"], " ", "c"}], "+",
SuperscriptBox["b", "2"]}], TraditionalForm]], "Output",
CellTags->"Collect3",
- CellLabel->"Out[2]=",
- CellID->1763015133]
+ CellLabel->"Out[392]="]
}, Open ]],
Cell[CellGroupData[{
@@ -296,7 +289,7 @@ Cell[BoxData[
RowBox[{"a", "-", "b", "-", "c", "-", "d"}], ")"}], "5"], "]"}], ",",
RowBox[{"{", "a", "}"}]}], "]"}]], "Input",
CellTags->"Collect3",
- CellLabel->"In[3]:=",
+ CellLabel->"In[393]:=",
CellID->860117715],
Cell[BoxData[
@@ -435,8 +428,7 @@ Cell[BoxData[
SuperscriptBox["d", "4"]}], "-",
SuperscriptBox["d", "5"]}], TraditionalForm]], "Output",
CellTags->"Collect3",
- CellLabel->"Out[3]=",
- CellID->1558649070]
+ CellLabel->"Out[393]="]
}, Open ]]
}, Open ]],
@@ -501,12 +493,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1098, Automatic}, {Automatic, 194}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Collecting.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Collecting.nb
index 7fa6cab86..be0d4786a 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Collecting.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Collecting.nb
@@ -175,9 +175,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/TID",
ButtonNote->"TID"],
"."
-}], "Text",
- CellTags->"Collecting",
- CellID->782318945]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -263,12 +261,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{839, Automatic}, {Automatic, 93}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Combine.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Combine.nb
index ddf9e542f..6399cb387 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Combine.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Combine.nb
@@ -126,8 +126,22 @@ sums in the denominator."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Combine", "]"}]], "Input",
+ CellTags->"Combine",
+ CellLabel->"In[394]:=",
+ CellID->194899276],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"Expanding", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"Combine",
+ CellLabel->"Out[394]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -168,9 +182,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Factor2",
ButtonNote->"Factor2"],
"."
-}], "Text",
- CellTags->"Combine",
- CellID->2027442052]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -199,24 +211,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Combine", "]"}]], "Input",
- CellTags->"Combine",
- CellLabel->"In[1]:=",
- CellID->194899276],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{"Expanding", "\[Rule]", "False"}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"Combine",
- CellLabel->"Out[1]=",
- CellID->1836728683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"Combine", "[",
RowBox[{
@@ -227,7 +221,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "-", "d"}], ")"}]}], "e"], "+", "g"}], "]"}]], "Input",
CellTags->"Combine",
- CellLabel->"In[2]:=",
+ CellLabel->"In[395]:=",
CellID->809742744],
Cell[BoxData[
@@ -241,15 +235,12 @@ Cell[BoxData[
RowBox[{"c", "-", "d"}], ")"}]}], "+",
RowBox[{"e", " ", "g"}]}], "e"], TraditionalForm]], "Output",
CellTags->"Combine",
- CellLabel->"Out[2]=",
- CellID->1151883280]
+ CellLabel->"Out[395]="]
}, Open ]],
Cell["\<\
Here the result from Together where the numerator is automatically expanded.\
-\>", "Text",
- CellTags->"Combine",
- CellID->18145815],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -263,7 +254,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"c", "-", "d"}], ")"}]}], "e"], "+", "g"}], "]"}]], "Input",
CellTags->"Combine",
- CellLabel->"In[3]:=",
+ CellLabel->"In[396]:=",
CellID->990215666],
Cell[BoxData[
@@ -276,16 +267,13 @@ Cell[BoxData[
RowBox[{"b", " ", "d"}], "+",
RowBox[{"e", " ", "g"}]}], "e"], TraditionalForm]], "Output",
CellTags->"Combine",
- CellLabel->"Out[3]=",
- CellID->1980431254]
+ CellLabel->"Out[396]="]
}, Open ]],
Cell["\<\
If the option Expanding is set to True, the result of Combine is the same as \
Together, but uses a slightly different algorithm.\
-\>", "Text",
- CellTags->"Combine",
- CellID->484864717],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -301,7 +289,7 @@ Cell[BoxData[
RowBox[{"c", "-", "d"}], ")"}]}], "e"], "+", "g"}], ",",
RowBox[{"Expanding", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"Combine",
- CellLabel->"In[4]:=",
+ CellLabel->"In[397]:=",
CellID->758144630],
Cell[BoxData[
@@ -314,8 +302,7 @@ Cell[BoxData[
RowBox[{"b", " ", "d"}], "+",
RowBox[{"e", " ", "g"}]}], "e"], TraditionalForm]], "Output",
CellTags->"Combine",
- CellLabel->"Out[4]=",
- CellID->1932335260]
+ CellLabel->"Out[397]="]
}, Open ]]
}, Open ]],
@@ -380,12 +367,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{750, Automatic}, {Automatic, 101}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CombineGraphs.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CombineGraphs.nb
index eecbc020a..18e8f4be6 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CombineGraphs.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CombineGraphs.nb
@@ -164,9 +164,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/OneLoopSum",
ButtonNote->"OneLoopSum"],
"."
-}], "Text",
- CellTags->"CombineGraphs",
- CellID->1987423164]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -252,12 +250,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{934, Automatic}, {Automatic, 267}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Commutator.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Commutator.nb
index 05aaf7d76..3644da7fc 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Commutator.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Commutator.nb
@@ -117,10 +117,15 @@ Cell["Commutator", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"Commutator", "[",
- RowBox[{"x", ",", " ", "y"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "= c defines the commutator between the (non-commuting) objects x and y. "
+ RowBox[{
+ RowBox[{"Commutator", "[",
+ RowBox[{"x", ",", " ", "y"}], "]"}], "=", "c"}]], "InlineFormula"],
+ " \[LineSeparator]defines the commutator between the (non-commuting) objects \
+",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["y"], "InlineFormula"],
+ ". "
}], "Usage",
CellID->982511436],
@@ -181,9 +186,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
"."
-}], "Text",
- CellTags->"Commutator",
- CellID->1856568879]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -214,7 +217,7 @@ Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[1]:=",
+ CellLabel->"In[409]:=",
CellID->2000059968],
Cell[CellGroupData[{
@@ -223,7 +226,7 @@ Cell[BoxData[
RowBox[{"Commutator", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[2]:=",
+ CellLabel->"In[410]:=",
CellID->922767227],
Cell[BoxData[
@@ -234,8 +237,7 @@ Cell[BoxData[
FormBox["b",
TraditionalForm], "\[NoBreak]", "]"}], TraditionalForm]], "Output",
CellTags->"Commutator",
- CellLabel->"Out[2]=",
- CellID->803506141]
+ CellLabel->"Out[410]="]
}, Open ]],
Cell[CellGroupData[{
@@ -243,7 +245,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CommutatorExplicit", "[", "%", "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[3]:=",
+ CellLabel->"In[411]:=",
CellID->1899692439],
Cell[BoxData[
@@ -252,8 +254,7 @@ Cell[BoxData[
RowBox[{"a", ".", "b"}], "-",
RowBox[{"b", ".", "a"}]}], TraditionalForm]], "Output",
CellTags->"Commutator",
- CellLabel->"Out[3]=",
- CellID->114625701]
+ CellLabel->"Out[411]="]
}, Open ]],
Cell[CellGroupData[{
@@ -266,37 +267,32 @@ Cell[BoxData[
RowBox[{"a", "+", "b"}], ",",
RowBox[{"c", "+", "d"}]}], "]"}], "]"}], " "}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[4]:=",
+ CellLabel->"In[412]:=",
CellID->1084501087],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"c", "+", "d"}], ")"}]}], "-",
- RowBox[{
- RowBox[{"(",
- RowBox[{"c", "+", "d"}], ")"}], ".",
- RowBox[{"(",
- RowBox[{"a", "+", "b"}], ")"}]}]}], TraditionalForm]], "Output",
+ RowBox[{"a", ".", "c"}], "-",
+ RowBox[{"c", ".", "a"}], "+",
+ RowBox[{"a", ".", "d"}], "-",
+ RowBox[{"d", ".", "a"}], "+",
+ RowBox[{"b", ".", "c"}], "-",
+ RowBox[{"c", ".", "b"}], "+",
+ RowBox[{"b", ".", "d"}], "-",
+ RowBox[{"d", ".", "b"}]}], TraditionalForm]], "Output",
CellTags->"Commutator",
- CellLabel->"Out[4]=",
- CellID->1005990059]
+ CellLabel->"Out[412]="]
}, Open ]],
Cell[BoxData[
RowBox[{"UnDeclareNonCommutative", "[",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[5]:=",
+ CellLabel->"In[413]:=",
CellID->1895253329],
-Cell["Verify the Jacobi identity.", "Text",
- CellTags->"Commutator",
- CellID->1857726821],
+Cell["Verify the Jacobi identity.", "Notes"],
Cell[BoxData[
RowBox[{
@@ -304,7 +300,7 @@ Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
RowBox[{"x", ",", "y", ",", "z"}], "]"}], ";"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[6]:=",
+ CellLabel->"In[414]:=",
CellID->1446605314],
Cell[CellGroupData[{
@@ -324,7 +320,7 @@ Cell[BoxData[
RowBox[{"\[Chi]", "[",
RowBox[{"x", ",", "y"}], "]"}]}], "]"}]}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[7]:=",
+ CellLabel->"In[415]:=",
CellID->698764152],
Cell[BoxData[
@@ -361,8 +357,7 @@ Cell[BoxData[
TraditionalForm], "\[NoBreak]", "]"}],
TraditionalForm], "\[NoBreak]", "]"}]}], TraditionalForm]], "Output",
CellTags->"Commutator",
- CellLabel->"Out[7]=",
- CellID->1488542158]
+ CellLabel->"Out[415]="]
}, Open ]],
Cell[CellGroupData[{
@@ -370,27 +365,26 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DotSimplify", "[", "%", "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[8]:=",
+ CellLabel->"In[416]:=",
CellID->1391154075],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellTags->"Commutator",
- CellLabel->"Out[8]=",
- CellID->502281549]
+ CellLabel->"Out[416]="]
}, Open ]],
Cell[BoxData[
RowBox[{"Clear", "[", "\[Chi]", "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[9]:=",
+ CellLabel->"In[417]:=",
CellID->1837954422],
Cell[BoxData[
RowBox[{"UnDeclareNonCommutative", "[",
RowBox[{"x", ",", "y", ",", "z"}], "]"}]], "Input",
CellTags->"Commutator",
- CellLabel->"In[10]:=",
+ CellLabel->"In[418]:=",
CellID->2037252072]
}, Open ]],
@@ -455,12 +449,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{839, Automatic}, {Automatic, 183}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CommutatorExplicit.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CommutatorExplicit.nb
index e3af4e378..3311d4a49 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CommutatorExplicit.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CommutatorExplicit.nb
@@ -170,9 +170,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
"."
-}], "Text",
- CellTags->"CommutatorExplicit",
- CellID->763111899]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -203,7 +201,7 @@ Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[1]:=",
+ CellLabel->"In[419]:=",
CellID->596826267],
Cell[CellGroupData[{
@@ -212,7 +210,7 @@ Cell[BoxData[
RowBox[{"Commutator", "[",
RowBox[{"a", ",", "b"}], "]"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[2]:=",
+ CellLabel->"In[420]:=",
CellID->1546400369],
Cell[BoxData[
@@ -223,8 +221,7 @@ Cell[BoxData[
FormBox["b",
TraditionalForm], "\[NoBreak]", "]"}], TraditionalForm]], "Output",
CellTags->"CommutatorExplicit",
- CellLabel->"Out[2]=",
- CellID->1736741048]
+ CellLabel->"Out[420]="]
}, Open ]],
Cell[CellGroupData[{
@@ -232,7 +229,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CommutatorExplicit", "[", "%", "]"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[3]:=",
+ CellLabel->"In[421]:=",
CellID->1022077689],
Cell[BoxData[
@@ -241,8 +238,7 @@ Cell[BoxData[
RowBox[{"a", ".", "b"}], "-",
RowBox[{"b", ".", "a"}]}], TraditionalForm]], "Output",
CellTags->"CommutatorExplicit",
- CellLabel->"Out[3]=",
- CellID->1538616356]
+ CellLabel->"Out[421]="]
}, Open ]],
Cell[CellGroupData[{
@@ -253,7 +249,7 @@ Cell[BoxData[
RowBox[{"a", "-", "c"}], ",",
RowBox[{"b", "-", "d"}]}], "]"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[4]:=",
+ CellLabel->"In[422]:=",
CellID->1564234454],
Cell[BoxData[
@@ -274,8 +270,7 @@ Cell[BoxData[
FormBox["\<\"}\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"CommutatorExplicit",
- CellLabel->"Out[4]=",
- CellID->945514452]
+ CellLabel->"Out[422]="]
}, Open ]],
Cell[CellGroupData[{
@@ -283,7 +278,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CommutatorExplicit", "[", "%", "]"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[5]:=",
+ CellLabel->"In[423]:=",
CellID->631256546],
Cell[BoxData[
@@ -300,8 +295,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"a", "-", "c"}], ")"}]}]}], TraditionalForm]], "Output",
CellTags->"CommutatorExplicit",
- CellLabel->"Out[5]=",
- CellID->272209917]
+ CellLabel->"Out[423]="]
}, Open ]],
Cell[CellGroupData[{
@@ -311,7 +305,7 @@ Cell[BoxData[
RowBox[{"CommutatorExplicit", "[", "%%", "]"}], "//",
"DotSimplify"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[6]:=",
+ CellLabel->"In[424]:=",
CellID->1843011592],
Cell[BoxData[
@@ -326,15 +320,14 @@ Cell[BoxData[
RowBox[{"c", ".", "d"}], "+",
RowBox[{"d", ".", "c"}]}], TraditionalForm]], "Output",
CellTags->"CommutatorExplicit",
- CellLabel->"Out[6]=",
- CellID->1425635977]
+ CellLabel->"Out[424]="]
}, Open ]],
Cell[BoxData[
RowBox[{"UnDeclareNonCommutative", "[",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "]"}]], "Input",
CellTags->"CommutatorExplicit",
- CellLabel->"In[7]:=",
+ CellLabel->"In[425]:=",
CellID->1614014702]
}, Open ]],
@@ -399,12 +392,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{971, Automatic}, {Automatic, 216}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Complement1.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Complement1.nb
new file mode 100644
index 000000000..dfa173cdb
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Complement1.nb
@@ -0,0 +1,304 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/Complement1", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Complement1", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"Complement1", "[",
+ RowBox[{"l1", ",", "l2"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]where l1 and l2 are lists returns a list of elements from \
+l1 not in l2. Multiple occurences of an element in l1 are kept and multiple \
+occurences of an element in l2 are dropped multiply if present in l1."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell["XXXX", "SeeAlso",
+ CellID->929782353]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Complement", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f", ",", "e"}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[426]:=",
+ CellID->96347288],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"e", ",", "f"}], "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[426]=",
+ CellID->621941775]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Complement1", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e", ",", "f", ",", "e"}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}]}], "]"}]], "Input",
+ CellLabel->"In[427]:=",
+ CellID->1748046804],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"e", ",", "f", ",", "e"}], "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[427]=",
+ CellID->1849514241]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 769},
+WindowMargins->{{949, Automatic}, {Automatic, 176}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CompleteSquare.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CompleteSquare.nb
index f29f72d03..454b6b4a3 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CompleteSquare.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CompleteSquare.nb
@@ -32,7 +32,7 @@ Cell["FeynCalc`", "Categorization",
CellLabel->"Context",
CellID->468444828],
-Cell["FeynCalc/ref/Completes", "Categorization",
+Cell["FeynCalc/ref/CompleteSquare", "Categorization",
CellLabel->"URI"]
}, Open ]],
@@ -111,13 +111,13 @@ Cell["XXXX", "Details",
Cell[CellGroupData[{
-Cell["Completes", "ObjectName",
+Cell["CompleteSquare", "ObjectName",
CellID->1224892054],
Cell[TextData[{
Cell[" ", "ModInfo"],
- Cell[BoxData["Completes"], "InlineFormula"],
- " \[LineSeparator]",
+ Cell[BoxData["CompleteSquare"], "InlineFormula"],
+ " \[LineSeparator]completes ",
"the square of a second order polynomial in the momentum x. CompleteSquare[a \
",
Cell[BoxData[
@@ -220,105 +220,92 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{
- RowBox[{"5",
- RowBox[{"SP", "[",
- RowBox[{
- RowBox[{
- RowBox[{"2", "p"}], "+",
- RowBox[{"3", "r"}]}], ",",
- RowBox[{"p", "+", "r"}]}], "]"}]}], "//", "FCI"}]}]], "Input",
- CellLabel->"In[2]:=",
+ RowBox[{"5",
+ RowBox[{"SP", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", "p"}], "+",
+ RowBox[{"3", "r"}]}], ",",
+ RowBox[{"p", "+", "r"}]}], "]"}]}]], "Input",
+ CellLabel->"In[433]:=",
CellID->42990982],
Cell[BoxData[
FormBox[
RowBox[{"5", " ",
RowBox[{"(",
- RowBox[{
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- RowBox[{"2", " ",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}], "+",
- RowBox[{"3", " ",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- CellLabel->"Out[2]=",
- CellID->1644370118]
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}], "+",
+ RowBox[{"3", " ",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[433]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"CompleteSquare", "[",
- RowBox[{"t1", ",", "p"}], "]"}]}]], "Input",
+ RowBox[{"CompleteSquare", "[",
+ RowBox[{"%", ",", "p"}], "]"}]], "Input",
CellTags->"CompleteSquare",
- CellLabel->"In[3]:=",
+ CellLabel->"In[434]:=",
CellID->1825124248],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"10", " ",
- RowBox[{"(",
+ SuperscriptBox[
RowBox[{
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- FractionBox[
- RowBox[{"5", " ",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}], "4"]}],
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"], "+",
- FractionBox[
- RowBox[{"5", " ",
- OverscriptBox[
- FormBox["r",
- TraditionalForm], "_"]}], "4"]}],
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ FractionBox[
+ RowBox[{"5", " ",
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"]}], "4"]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], "-",
+ TraditionalForm]}], "2"]}], "-",
FractionBox[
RowBox[{"5", " ",
SuperscriptBox[
@@ -328,8 +315,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm], "2"]}], "8"]}], TraditionalForm]], "Output",
CellTags->"CompleteSquare",
- CellLabel->"Out[3]=",
- CellID->332224925]
+ CellLabel->"Out[434]="]
}, Open ]],
Cell[CellGroupData[{
@@ -337,26 +323,33 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
- RowBox[{"t1", "-", "t2"}], "//", "ScalarProductExpand"}], "//",
+ RowBox[{"%", "-", "%%"}], "//", "ScalarProductExpand"}], "//",
"Expand"}]], "Input",
CellTags->"CompleteSquare",
- CellLabel->"In[4]:=",
+ CellLabel->"In[435]:=",
CellID->1768514898],
Cell[BoxData[
FormBox["0", TraditionalForm]], "Output",
CellTags->"CompleteSquare",
- CellLabel->"Out[4]=",
- CellID->2142949469]
+ CellLabel->"Out[435]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CompleteSquare", "[",
- RowBox[{"t1", ",", "p", ",", "q"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"5",
+ RowBox[{"SP", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", "p"}], "+",
+ RowBox[{"3", "r"}]}], ",",
+ RowBox[{"p", "+", "r"}]}], "]"}]}], ",", "p", ",", "q"}],
+ "]"}]], "Input",
CellTags->"CompleteSquare",
- CellLabel->"In[5]:=",
+ CellLabel->"In[436]:=",
CellID->1850431752],
Cell[BoxData[
@@ -394,16 +387,8 @@ Cell[BoxData[
TraditionalForm], "_"]}], "4"]}]}]}], "}"}],
TraditionalForm]], "Output",
CellTags->"CompleteSquare",
- CellLabel->"Out[5]=",
- CellID->468779431]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2"}], "]"}]], "Input",
- CellTags->"CompleteSquare",
- CellLabel->"In[6]:=",
- CellID->1021144564]
+ CellLabel->"Out[436]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -467,12 +452,13 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1045, Automatic}, {Automatic, 164}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ComplexConjugate.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ComplexConjugate.nb
index 8d1d7d601..0eace1513 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ComplexConjugate.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/ComplexConjugate.nb
@@ -117,18 +117,43 @@ Cell["ComplexConjugate", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"ComplexConjugate", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "complex conjugates expr. It operates on fermion lines, i.e., products of \
-Spinor[..] .DiracMatrix[..] . Spinor[..], and changes all occuring \
-LorentzIndex[mu] into LorentzIndex[ComplexIndex[mu]]. For taking the spin sum \
-(i.e. constructing the traces) use FermionSpinSum. WARNING: In expr should be \
-NO explicit I's in denominators!"
+ RowBox[{"ComplexConjugate", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]returns the complex conjugate of ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ", where the input expression must be a proper matrix element. "
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell["\<\
+All Dirac matrices are assumed to be inside closed Dirac spinor chains. If \
+this is not the case, the result will be inconsistent. \
+\>", "Notes"],
+
+Cell[TextData[{
+ "Denominators may not contain explicit ",
+ Cell[BoxData["I"], "InlineFormula"],
+ "'s!"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "ComplexConjugate", "]"}]], "Input",
+ CellLabel->"In[184]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Conjugate", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCRenameDummyIndices", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[184]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -164,24 +189,22 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["ComplexIndex",
+ ButtonBox["FCRenameDummyIndices",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/ComplexIndex",
- ButtonNote->"ComplexIndex"],
+ ButtonData:>"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
", ",
ButtonBox["FermionSpinSum",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/FermionSpinSum",
ButtonNote->"FermionSpinSum"],
", ",
- ButtonBox["LorentzIndex",
+ ButtonBox["DiracGamma",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/LorentzIndex",
- ButtonNote->"LorentzIndex"],
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
"."
-}], "Text",
- CellTags->"ComplexConjugate",
- CellID->206503053]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -208,126 +231,515 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
+Cell[TextData[{
+ ButtonBox["ComplexConjugate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ComplexConjugate",
+ ButtonNote->"ComplexConjugate"],
+ " is meant to be applied to amplitudes, i.e. given a matrix element",
+ ButtonBox[" ",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ComplexConjugate",
+ ButtonNote->"ComplexConjugate"],
+ Cell[BoxData["\[ScriptCapitalM]"], "InlineFormula"],
+ ", it will return ",
+ Cell[BoxData[
+ SuperscriptBox["\[ScriptCapitalM]", "*"]], "InlineFormula"],
+ "."
+}], "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[1]:=",
- CellID->1414819233],
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"k1", "-", "p2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}], "-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "k2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",",
+ RowBox[{"SMP", "[", "\"\\"", "]"}], ",", "1"}], "]"}]}], "*",
+ RowBox[{"FAD", "[",
+ RowBox[{
+ RowBox[{"k2", "-", "p2"}], ",",
+ RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], "*",
+ RowBox[{
+ RowBox[{"SMP", "[", "\"\\"", "]"}], "^", "2"}]}]}]], "Input",
+ CellLabel->"In[192]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[1]=",
- CellID->1140505195]
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}],
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k1 - $CellContext`p2]]],
+ Editable->False]],
+ TraditionalForm], "-",
+ FormBox[
+ FractionBox[
+ RowBox[{
+ SuperscriptBox["\<\"e\"\>", "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "e"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}],
+ InterpretationBox[
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k2",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k2 - $CellContext`p2],
+ FeynCalc`Momentum[$CellContext`k2 - $CellContext`p2]]],
+ Editable->False]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[192]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[2]:=",
- CellID->138437204],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+Although one can also apply the function to standalone Dirac matrices, it \
+should be understood that the result is not equivalent to the complex \
+conjugation of such matrices.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}]}], "]"}]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[2]//StandardForm=",
- CellID->32067236]
+ RowBox[{"GA", "[", "\[Mu]", "]"}]], "Input",
+ CellLabel->"In[195]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[195]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "5"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[3]:=",
- CellID->1239389489],
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[196]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[3]=",
- CellID->1874159857]
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[196]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[", "5", "]"}]], "Input",
+ CellLabel->"In[197]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[197]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[4]:=",
- CellID->697323905],
+ CellLabel->"In[198]:="],
Cell[BoxData[
FormBox[
RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[198]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k1", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}], ".",
+ RowBox[{"(",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{"GS", "[",
+ RowBox[{"k1", "-", "p2"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"Polarization", "[",
+ RowBox[{"k2", ",",
+ RowBox[{"-", "\[ImaginaryI]"}], ",",
+ RowBox[{"Transversality", "\[Rule]", "True"}]}], "]"}], "]"}]}]], "Input",
+ CellLabel->"In[199]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "e"]}], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[199]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[200]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[4]=",
- CellID->1416373229]
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k2",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["k1",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], "+",
+ SubscriptBox["m", "e"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[CurlyEpsilon]", "_"], "(",
+ FormBox["k1",
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[200]="]
}, Open ]],
Cell[CellGroupData[{
@@ -337,8 +749,8 @@ Cell[BoxData[
RowBox[{"SUNT", "[",
RowBox[{"a", ",", "b", ",", "c"}], "]"}], "]"}]], "Input",
CellTags->"ComplexConjugate",
- CellLabel->"In[5]:=",
- CellID->1573088048],
+ CellLabel->"In[204]:=",
+ CellID->1865346448],
Cell[BoxData[
FormBox[
@@ -368,8 +780,7 @@ Cell[BoxData[
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"ComplexConjugate",
- CellLabel->"Out[5]=",
- CellID->964261874]
+ CellLabel->"Out[204]="]
}, Open ]],
Cell[CellGroupData[{
@@ -377,8 +788,8 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
CellTags->"ComplexConjugate",
- CellLabel->"In[6]:=",
- CellID->1138817196],
+ CellLabel->"In[205]:=",
+ CellID->1483149425],
Cell[BoxData[
FormBox[
@@ -408,172 +819,484 @@ Cell[BoxData[
FormBox["\<\")\"\>",
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"ComplexConjugate",
- CellLabel->"Out[6]=",
- CellID->1059122773]
+ CellLabel->"Out[205]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c"}], "]"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[7]:=",
- CellID->243405382],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Since FeynCalc 9.3 ",
+ ButtonBox["ComplexConjugate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ComplexConjugate",
+ ButtonNote->"ComplexConjugate"],
+ " will automatically rename dummy indices."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"PolarizationVector", "[",
+ RowBox[{"p1", ",", "\[Mu]"}], "]"}],
+ RowBox[{"PolarizationVector", "[",
+ RowBox[{"p2", ",", "\[Nu]"}], "]"}],
+ RowBox[{"MT", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
+ CellLabel->"In[189]:="],
Cell[BoxData[
FormBox[
- SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["c",
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[7]=",
- CellID->13446686]
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[189]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"FCE", "[",
- RowBox[{"ComplexConjugate", "[",
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}], "]"}], "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[8]:=",
- CellID->110906282],
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[190]:="],
Cell[BoxData[
- RowBox[{"MT", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[8]//StandardForm=",
- CellID->588930123]
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$30", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$29", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p1",
+ TraditionalForm], ")"}], " ",
+ RowBox[{
+ SuperscriptBox[
+ SuperscriptBox[
+ OverscriptBox["\[CurlyEpsilon]", "_"], "*"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$30", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], "(",
+ FormBox["p2",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[190]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"SpinorUBar", "[",
- RowBox[{"k1", ",", "m"}], "]"}], ".",
- RowBox[{"GA", "[", "\[Lambda]", "]"}], ".",
- RowBox[{"SpinorU", "[",
- RowBox[{"p1", ",", "m"}], "]"}]}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[9]:=",
- CellID->1286596517],
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}],
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}]], "Input",
+ CellLabel->"In[201]:="],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
- OverscriptBox["u", "_"], "(",
- FormBox["k1",
- TraditionalForm], ",",
- FormBox["m",
- TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], " ",
FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[201]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellLabel->"In[202]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Lambda]",
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- RowBox[{"(",
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
- FormBox["\<\"u\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox["p1",
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$32", ")"}]}],
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\",\"\>",
+ FormBox[
+ FormBox[
+ RowBox[{"$AL", "\[InvisibleApplication]",
+ RowBox[{"(", "$31", ")"}]}],
+ TraditionalForm],
TraditionalForm],
- FormBox["m",
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"ComplexConjugate",
- CellLabel->"Out[9]=",
- CellID->936868064]
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[202]="]
}, Open ]],
+Cell[TextData[{
+ "This behavior can be disabled by setting the option ",
+ ButtonBox["FCRenameDummyIndices",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCRenameDummyIndices",
+ ButtonNote->"FCRenameDummyIndices"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ "."
+}], "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
- CellTags->"ComplexConjugate",
- CellLabel->"In[10]:=",
- CellID->822445915],
+ RowBox[{"ComplexConjugate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}],
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "[",
+ RowBox[{"p1", ",", "p2"}], "]"}]}], ",",
+ RowBox[{"FCRenameDummyIndices", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[203]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\<\"(\"\>",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p1",
TraditionalForm], "_"],
TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[203]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "If particular variables must be replaced with their conjugate values, use \
+the option ",
+ Cell[BoxData["Conjugate"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}]], "Input",
+ CellLabel->"In[207]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{"c2", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[207]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[", "%", "]"}]], "Input",
+ CellTags->"ComplexConjugate",
+ CellLabel->"In[208]:=",
+ CellID->1414819233],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Lambda]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], ".",
RowBox[{"(",
RowBox[{
- FormBox["\<\"\[CurlyPhi]\"\>",
- TraditionalForm],
- FormBox["\<\"(\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["k1",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\",\"\>",
- TraditionalForm],
- FormBox["m",
- TraditionalForm],
- FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ RowBox[{"c1", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], "+",
+ RowBox[{"c2", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"ComplexConjugate",
- CellLabel->"Out[10]=",
- CellID->1665250585]
+ CellLabel->"Out[208]="]
}, Open ]],
-Cell["\<\
-Notice that SpinorUBar and SpinorU are only input functions. Internally they \
-are converted to Spinor objects.\
-\>", "Text",
- CellTags->"ComplexConjugate",
- CellID->833839056]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ComplexConjugate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"Conjugate", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"c1", ",", "c2"}], "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[209]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], " ",
+ TemplateBox[{"c1"},
+ "Conjugate"]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], " ",
+ TemplateBox[{"c2"},
+ "Conjugate"]}]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[209]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[210]:="],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Conjugate", "[", "c2", "]"}], " ",
+ RowBox[{"DiracGamma", "[", "6", "]"}]}], "+",
+ RowBox[{
+ RowBox[{"Conjugate", "[", "c1", "]"}], " ",
+ RowBox[{"DiracGamma", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]}]], "Output",
+ CellLabel->"Out[210]//StandardForm="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -636,13 +1359,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{1053, 777},
+WindowMargins->{{Automatic, 340}, {Automatic, 31}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract.nb
index fc52c7211..138c74a3d 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract.nb
@@ -127,8 +127,29 @@ products of sums of metric tensors and 4-vectors. "
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Contract", "]"}]], "Input",
+ CellLabel->"In[438]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Collecting", "\[Rule]", "True"}], ",",
+ RowBox[{"Contract3", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"MomentumCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"Rename", "\[Rule]", "False"}], ",",
+ RowBox[{"Schouten", "\[Rule]", "0"}]}], "}"}], TraditionalForm]], "Output",
+ CellLabel->"Out[438]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -169,6 +190,11 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Pair",
ButtonNote->"Pair"],
", ",
+ ButtonBox["CartesianPair",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CartesianPair",
+ ButtonNote->"CartesianPair"],
+ ", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
@@ -179,9 +205,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/MomentumCombine",
ButtonNote->"MomentumCombine"],
"."
-}], "Text",
- CellTags->"Contract",
- CellID->1189900625]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -210,40 +234,14 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Contract", "]"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[1]:=",
- CellID->269618302],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Collecting", "\[Rule]", "True"}], ",",
- RowBox[{"Contract3", "\[Rule]", "True"}], ",",
- RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
- RowBox[{"Expanding", "\[Rule]", "True"}], ",",
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
- RowBox[{"MomentumCombine", "\[Rule]", "True"}], ",",
- RowBox[{"Rename", "\[Rule]", "False"}], ",",
- RowBox[{"Schouten", "\[Rule]", "0"}]}], "}"}], TraditionalForm]], "Output",
- CellTags->"Contract",
- CellLabel->"Out[1]=",
- CellID->833332161]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{
- RowBox[{"MetricTensor", "[",
+ RowBox[{"MT", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[2]:=",
+ CellLabel->"In[439]:=",
CellID->2011968461],
Cell[BoxData[
@@ -257,9 +255,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
@@ -268,21 +264,16 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[2]=",
- CellID->2005708503]
+ CellLabel->"Out[439]="]
}, Open ]],
Cell[CellGroupData[{
@@ -290,7 +281,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[3]:=",
+ CellLabel->"In[440]:=",
CellID->26500400],
Cell[BoxData[
@@ -302,36 +293,35 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[3]=",
- CellID->246386443]
+ CellLabel->"Out[440]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}],
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}]}]], "Input",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[4]:=",
+ CellLabel->"In[441]:=",
CellID->2005973076],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
FormBox[
SuperscriptBox[
FormBox[
@@ -340,15 +330,12 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[4]=",
- CellID->163860977]
+ CellLabel->"Out[441]="]
}, Open ]],
Cell[CellGroupData[{
@@ -356,7 +343,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[5]:=",
+ CellLabel->"In[442]:=",
CellID->1342373134],
Cell[BoxData[
@@ -369,17 +356,16 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[5]=",
- CellID->1083734914]
+ CellLabel->"Out[442]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"MetricTensor", "[",
+ RowBox[{"MT", "[",
RowBox[{"\[Mu]", ",", "\[Mu]"}], "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[6]:=",
+ CellLabel->"In[449]:=",
CellID->2121383633],
Cell[BoxData[
@@ -388,103 +374,66 @@ Cell[BoxData[
OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[6]=",
- CellID->165921051]
+ CellLabel->"Out[449]="]
}, Open ]],
-Cell["The default dimension for MetricTensor is 4.", "Text",
- CellTags->"Contract",
- CellID->1017368063],
+Cell["The default dimension for a metric tensor is 4.", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[7]:=",
+ CellLabel->"In[450]:=",
CellID->1110085557],
Cell[BoxData[
FormBox["4", TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[7]=",
- CellID->1413622880]
+ CellLabel->"Out[450]="]
}, Open ]],
Cell["\<\
-A short way to enter D-dimensional metric tensors is given by MTD. The \".\" \
-as multiplication operator is not necessary but just convenient for \
-typesetting.\
-\>", "Text",
- CellTags->"Contract",
- CellID->607767486],
+A short way to enter D-dimensional metric tensors is given by MTD.\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ", ".", " ",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ",
RowBox[{"MTD", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[8]:=",
+ CellLabel->"In[451]:=",
CellID->1404498417],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ".",
+ SuperscriptBox[
FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], TraditionalForm]], "Output",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[8]=",
- CellID->1257189010]
+ CellLabel->"Out[451]="]
}, Open ]],
Cell[CellGroupData[{
@@ -492,82 +441,25 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[9]:=",
+ CellLabel->"In[452]:=",
CellID->587791315],
Cell[BoxData[
FormBox["D", TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[9]=",
- CellID->1587031926]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], " ", ".", " ",
- RowBox[{"MTD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[10]:=",
- CellID->1551578654],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], ".",
- FormBox[
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"Contract",
- CellLabel->"Out[10]=",
- CellID->698535686]
+ CellLabel->"Out[452]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"p", ",", "\[Mu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{"q", ",", "\[Mu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[11]:=",
+ CellLabel->"In[453]:=",
CellID->1721182838],
Cell[BoxData[
@@ -581,9 +473,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
@@ -595,15 +485,12 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[11]=",
- CellID->320652273]
+ CellLabel->"Out[453]="]
}, Open ]],
Cell[CellGroupData[{
@@ -611,7 +498,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", " ", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[12]:=",
+ CellLabel->"In[454]:=",
CellID->460754742],
Cell[BoxData[
@@ -630,22 +517,21 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[12]=",
- CellID->1322929815]
+ CellLabel->"Out[454]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{
RowBox[{"p", "-", "q"}], ",", "\[Mu]"}], "]"}], " ",
- RowBox[{"FourVector", "[",
+ RowBox[{"FV", "[",
RowBox[{
RowBox[{"a", "-", "b"}], ",", "\[Mu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[13]:=",
+ CellLabel->"In[455]:=",
CellID->1283410538],
Cell[BoxData[
@@ -666,9 +552,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
@@ -687,15 +571,12 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}],
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[13]=",
- CellID->1638933986]
+ CellLabel->"Out[455]="]
}, Open ]],
Cell[CellGroupData[{
@@ -703,7 +584,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[14]:=",
+ CellLabel->"In[456]:=",
CellID->803101401],
Cell[BoxData[
@@ -762,61 +643,62 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[14]=",
- CellID->2042392818]
+ CellLabel->"Out[456]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}], "]"}],
- " ",
- RowBox[{"FourVector", "[",
- RowBox[{"p", ",", "\[Sigma]"}], "]"}]}]], "Input",
+ RowBox[{"FVD", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "\[Nu]"}], "]"}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{
+ RowBox[{"a", "-", "b"}], ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[15]:=",
- CellID->1720608034],
+ CellLabel->"In[457]:=",
+ CellID->1863771818],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
+ RowBox[{"(",
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ RowBox[{
+ FormBox["a",
+ TraditionalForm], "-",
+ FormBox["b",
+ TraditionalForm]}],
TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[15]=",
- CellID->1740152652]
+ CellLabel->"Out[457]="]
}, Open ]],
Cell[CellGroupData[{
@@ -824,82 +706,322 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
CellTags->"Contract",
- CellLabel->"In[16]:=",
- CellID->634794036],
+ CellLabel->"In[458]:=",
+ CellID->2021554764],
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Epsilon]",
+ RowBox[{
RowBox[{
FormBox[
- FormBox["\[Alpha]",
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox["a",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Mu]",
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], "-",
+ RowBox[{
+ FormBox[
+ FormBox["b",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ FormBox["b",
TraditionalForm],
TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}]], TraditionalForm]], "Output",
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[16]=",
- CellID->1349165270]
+ CellLabel->"Out[458]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"LeviCivita", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
- " ",
- RowBox[{"LeviCivita", "[",
+ RowBox[{"LC", "[",
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}], "]"}],
- " "}]], "Input",
+ " ",
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Sigma]"}], "]"}]}]], "Input",
CellTags->"Contract",
- CellLabel->"In[17]:=",
- CellID->1343624460],
+ CellLabel->"In[459]:=",
+ CellID->1720608034],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
+ FormBox[
+ SuperscriptBox[
FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
TraditionalForm],
FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"Contract",
+ CellLabel->"Out[459]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[460]:=",
+ CellID->634794036],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellTags->"Contract",
+ CellLabel->"Out[460]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
+ " ",
+ RowBox[{"LC", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}], "]"}],
+ " "}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[465]:=",
+ CellID->1343624460],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"Contract",
+ CellLabel->"Out[465]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[466]:=",
+ CellID->530322977],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "6"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Alpha]",
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellTags->"Contract",
+ CellLabel->"Out[466]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
+ " ",
+ RowBox[{"LCD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}],
+ "]"}]}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[467]:=",
+ CellID->730363468],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"Contract",
+ CellLabel->"Out[467]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Contract", "[", "%", "]"}], "//", "Factor2"}]], "Input",
+ CellTags->"Contract",
+ CellLabel->"In[468]:=",
+ CellID->1284270864],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm],
FormBox[
@@ -907,211 +1029,683 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"Contract",
- CellLabel->"Out[17]=",
- CellID->595150790]
+ CellLabel->"Out[468]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Contractions of Cartesian tensors are also possible. They can live in ",
+ Cell[BoxData["3"], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "1"}]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ RowBox[{"D", "-", "4"}]], "InlineFormula"],
+ " dimensions."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}]}]], "Input",
+ CellLabel->"In[469]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[469]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[470]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[470]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "i"}], "]"}],
+ RowBox[{"CGA", "[", "i", "]"}]}]], "Input",
+ CellLabel->"In[471]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[471]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[472]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[472]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[473]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[473]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[474]:="],
+
+Cell[BoxData[
+ FormBox["3", TraditionalForm]], "Output",
+ CellLabel->"Out[474]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[475]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ CellLabel->"Out[475]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Contract", "[", "%", "]"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[18]:=",
- CellID->530322977],
+ CellLabel->"In[476]:="],
+
+Cell[BoxData[
+ FormBox["3", TraditionalForm]], "Output",
+ CellLabel->"Out[476]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"p", "-", "q"}], ",", "j"}], "]"}], " ",
+ RowBox[{"CV", "[",
+ RowBox[{
+ RowBox[{"a", "-", "b"}], ",", "j"}], "]"}]}]], "Input",
+ CellLabel->"In[478]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{
- SuperscriptBox["D", "3"], " ",
- RowBox[{"(",
- RowBox[{"-",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
FormBox[
- SuperscriptBox["g",
+ FormBox[
RowBox[{
- FormBox[
+ OverscriptBox[
FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ StyleBox["a",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], ")"}]}], "+",
- RowBox[{"6", " ",
- SuperscriptBox["D", "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["b",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ RowBox[{"(",
+ FormBox[
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{"11", " ", "D", " ",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[478]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[479]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- SuperscriptBox["g",
- RowBox[{
+ RowBox[{
+ OverscriptBox[
FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["a",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{"6", " ",
+ StyleBox["b",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
FormBox[
- SuperscriptBox["g",
- RowBox[{
+ RowBox[{
+ OverscriptBox[
FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"Contract",
- CellLabel->"Out[18]=",
- CellID->130923848]
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[479]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}], ";",
- RowBox[{
- RowBox[{"LCD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Beta]"}], "]"}],
- " ",
- RowBox[{"LCD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Alpha]", ",", "\[Sigma]"}],
- "]"}]}]}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[19]:=",
- CellID->730363468],
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CV", "[",
+ RowBox[{"p", ",", "k"}], "]"}]}]], "Input",
+ CellLabel->"In[482]:="],
Cell[BoxData[
FormBox[
RowBox[{
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Nu]",
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Alpha]",
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[482]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[483]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[483]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CLC", "[",
+ RowBox[{"i", ",", "j", ",", "l"}], "]"}], " "}]], "Input",
+ CellLabel->"In[484]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Beta]",
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]}]],
TraditionalForm], " ",
FormBox[
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Alpha]",
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Sigma]",
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"Contract",
- CellLabel->"Out[19]=",
- CellID->1753720306]
+ CellLabel->"Out[484]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Contract", "[", "%", "]"}]], "Input",
+ CellLabel->"In[485]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[485]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"Contract", "[", "%", "]"}], "//", "Factor2"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[20]:=",
- CellID->1284270864],
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "k"}], "]"}], " ",
+ RowBox[{"CLCD", "[",
+ RowBox[{"i", ",", "j", ",", "l"}], "]"}], " "}]], "Input",
+ CellLabel->"In[487]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
- RowBox[{"1", "-", "D"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"2", "-", "D"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"3", "-", "D"}], ")"}], " ",
FormBox[
- SuperscriptBox["g",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", ""],
RowBox[{
FormBox[
FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
TraditionalForm]}]],
TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"Contract",
- CellLabel->"Out[20]=",
- CellID->1474380358]
+ CellLabel->"Out[487]="]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
RowBox[{
- RowBox[{"SetOptions", "[",
- RowBox[{"Eps", ",",
- RowBox[{"Dimension", "\[Rule]", "4"}]}], "]"}], ";"}]], "Input",
- CellTags->"Contract",
- CellLabel->"In[21]:=",
- CellID->476845114]
+ RowBox[{"Contract", "[", "%", "]"}], "//", "Factor2"}]], "Input",
+ CellLabel->"In[489]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"2", "-", "D"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"3", "-", "D"}], ")"}], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[489]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -1175,12 +1769,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{824, Automatic}, {Automatic, 151}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract1.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract1.nb
deleted file mode 100644
index c8b8de2a9..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Contract1.nb
+++ /dev/null
@@ -1,425 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/Contract1", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Contract1", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData[
- RowBox[{"Contract1", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "For covariant calculations it is not necessary to distinguish between co- \
-and contravariant indices (except for the Levi-Civita tensor).\nTherefore \
-normally no distinction is made between upper and lower indices.\nHowere, if \
-needed, one can use Upper and Lower and then a distuction is made:\n\
-Contract1[exp] contracts Upper and Lower indices. Neither Upper and Upper nor \
-Lower and Lower indices are contracted."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["LorentzIndex",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/LorentzIndex",
- ButtonNote->"LorentzIndex"],
- ", ",
- ButtonBox["Lower",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Lower",
- ButtonNote->"Lower"],
- ", ",
- ButtonBox["Upper",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Upper",
- ButtonNote->"Upper"],
- "."
-}], "Text",
- CellTags->"Contract1",
- CellID->758167385]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"FV", "[",
- RowBox[{"p", ",",
- RowBox[{"Lower", "[", "\[Mu]", "]"}]}], "]"}],
- RowBox[{"FV", "[",
- RowBox[{"q", ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}]}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[1]:=",
- CellID->1540146054],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"Contract1",
- CellLabel->"Out[1]=",
- CellID->1390492923]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{
- RowBox[{"FV", "[",
- RowBox[{"p", ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}],
- RowBox[{"FV", "[",
- RowBox[{"q", ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}]}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[2]:=",
- CellID->1717156274],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]], " ",
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"Contract1",
- CellLabel->"Out[2]=",
- CellID->1102943132]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MT", "[",
- RowBox[{
- RowBox[{"Lower", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[3]:=",
- CellID->2955950],
-
-Cell[BoxData[
- FormBox["4", TraditionalForm]], "Output",
- CellTags->"Contract1",
- CellLabel->"Out[3]=",
- CellID->118522025]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MT", "[",
- RowBox[{
- RowBox[{"Upper", "[", "\[Mu]", "]"}], ",",
- RowBox[{"Upper", "[", "\[Mu]", "]"}]}], "]"}], "//", "FCI"}], "//",
- "Contract1"}]], "Input",
- CellTags->"Contract1",
- CellLabel->"In[4]:=",
- CellID->492376431],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]], TraditionalForm]], "Output",
- CellTags->"Contract1",
- CellLabel->"Out[4]=",
- CellID->49419999]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Convolute.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Convolute.nb
index 3f0759d23..93b3046d9 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Convolute.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Convolute.nb
@@ -171,7 +171,31 @@ algebra."
CellID->982511436],
Cell["XXXX", "Notes",
- CellID->1067943069]
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Convolute", "]"}]], "Input",
+ CellTags->"Convolute",
+ CellLabel->"In[490]:=",
+ CellID->846637972],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Bracket", "\[Rule]",
+ RowBox[{"{",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm], "}"}]}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"Convolute",
+ CellLabel->"Out[490]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -217,9 +241,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/ConvoluteTable",
ButtonNote->"ConvoluteTable"],
"."
-}], "Text",
- CellTags->"Convolute",
- CellID->573828711]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -249,55 +271,35 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "Convolute", "]"}]], "Input",
- CellTags->"Convolute",
- CellLabel->"In[1]:=",
- CellID->846637972],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Bracket", "\[Rule]",
- RowBox[{"{",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm], "}"}]}], ",",
- RowBox[{"FinalSubstitutions", "\[Rule]",
- RowBox[{"{",
- RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"Convolute",
- CellLabel->"Out[1]=",
- CellID->487844073]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",", "1"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",", "1"}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[2]:=",
+ CellLabel->"In[492]:=",
CellID->1183792130],
Cell[BoxData[
FormBox[
RowBox[{"-",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[2]=",
- CellID->2333332]
+ CellLabel->"Out[492]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"x", ",", "x"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"x", ",", "x"}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[3]:=",
+ CellLabel->"In[494]:=",
CellID->566730399],
Cell[BoxData[
@@ -305,139 +307,149 @@ Cell[BoxData[
RowBox[{
RowBox[{"-",
SuperscriptBox["x", "2"]}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[3]=",
- CellID->866957207]
+ CellLabel->"Out[494]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",", "x"}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",", "x"}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[4]:=",
+ CellLabel->"In[495]:=",
CellID->1354290721],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[4]=",
- CellID->1705056571]
+ CellLabel->"Out[495]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[5]:=",
+ CellLabel->"In[496]:=",
CellID->694658515],
Cell[BoxData[
FormBox[
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
+ RowBox[{"log", "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[5]=",
- CellID->212763543]
+ CellLabel->"Out[496]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"PlusDistribution", "[",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"PlusDistribution", "[",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[6]:=",
+ CellLabel->"In[497]:=",
CellID->1694510014],
Cell[BoxData[
FormBox[
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
+ RowBox[{"log", "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[6]=",
- CellID->527227095]
+ CellLabel->"Out[497]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[7]:=",
+ CellLabel->"In[498]:=",
CellID->640655392],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"x", " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[7]=",
- CellID->1663091308]
+ CellLabel->"Out[498]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- FractionBox["1",
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[8]:=",
+ CellLabel->"In[499]:=",
CellID->440037844],
Cell[BoxData[
FormBox[
RowBox[{"-",
FractionBox[
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}],
+ RowBox[{"log", "(", "x", ")"}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", "-", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[8]=",
- CellID->1364104380]
+ CellLabel->"Out[499]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[9]:=",
+ CellLabel->"In[500]:=",
CellID->151808165],
Cell[BoxData[
@@ -446,24 +458,25 @@ Cell[BoxData[
RowBox[{"-",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}]}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[9]=",
- CellID->461576513]
+ CellLabel->"Out[500]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[10]:=",
+ CellLabel->"In[501]:=",
CellID->1563371513],
Cell[BoxData[
@@ -472,25 +485,26 @@ Cell[BoxData[
RowBox[{"-", "x"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[10]=",
- CellID->535701029]
+ CellLabel->"Out[501]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[11]:=",
+ CellLabel->"In[502]:=",
CellID->1082077962],
Cell[BoxData[
@@ -499,26 +513,28 @@ Cell[BoxData[
RowBox[{
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[11]=",
- CellID->1354192503]
+ CellLabel->"Out[502]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[12]:=",
+ CellLabel->"In[503]:=",
CellID->1247483115],
Cell[BoxData[
@@ -527,25 +543,27 @@ Cell[BoxData[
RowBox[{"x", " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[12]=",
- CellID->1318550208]
+ CellLabel->"Out[503]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox[
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}],
+ RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}], "/.",
RowBox[{
- FractionBox[
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[13]:=",
+ CellLabel->"In[504]:=",
CellID->2055743895],
Cell[BoxData[
@@ -554,47 +572,50 @@ Cell[BoxData[
RowBox[{"x", " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[13]=",
- CellID->539579261]
+ CellLabel->"Out[504]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[14]:=",
+ CellLabel->"In[505]:=",
CellID->1292595425],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[14]=",
- CellID->278611380]
+ CellLabel->"Out[505]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}], "/.",
RowBox[{
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[15]:=",
+ CellLabel->"In[506]:=",
CellID->342391696],
Cell[BoxData[
@@ -603,26 +624,27 @@ Cell[BoxData[
RowBox[{"-", "x"}], " ",
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[15]=",
- CellID->1414596566]
+ CellLabel->"Out[506]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ FractionBox[
+ RowBox[{"Log", "[", "x", "]"}],
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- FractionBox[
- RowBox[{"Log", "[", "x", "]"}],
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[16]:=",
+ CellLabel->"In[507]:=",
CellID->1164478774],
Cell[BoxData[
@@ -630,49 +652,50 @@ Cell[BoxData[
RowBox[{"-",
FractionBox[
RowBox[{
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ SuperscriptBox["log", "2"], "(", "x", ")"}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", "-", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[16]=",
- CellID->1346944538]
+ CellLabel->"Out[507]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"Log", "[", "x", "]"}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Log", "[", "x", "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[17]:=",
+ CellLabel->"In[508]:=",
CellID->260971955],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{"log", "(", "x", ")"}]}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"-",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[17]=",
- CellID->552984683]
+ CellLabel->"Out[508]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"x", ",", " ",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"x", ",", " ",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[18]:=",
+ CellLabel->"In[509]:=",
CellID->935305016],
Cell[BoxData[
@@ -680,176 +703,185 @@ Cell[BoxData[
RowBox[{
RowBox[{"-",
SuperscriptBox["x", "2"]}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[18]=",
- CellID->1685360392]
+ CellLabel->"Out[509]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"Log", "[", "x", "]"}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"Log", "[", "x", "]"}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[19]:=",
+ CellLabel->"In[510]:=",
CellID->63581574],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ SuperscriptBox["log", "2"], "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[19]=",
- CellID->1099451359]
+ CellLabel->"Out[510]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- FractionBox[
- RowBox[{"Log", "[", "x", "]"}],
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ FractionBox[
+ RowBox[{"Log", "[", "x", "]"}],
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[20]:=",
+ CellLabel->"In[511]:=",
CellID->1271585721],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ SuperscriptBox["log", "2"], "(", "x", ")"}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[20]=",
- CellID->2099236631]
+ CellLabel->"Out[511]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[21]:=",
+ CellLabel->"In[512]:=",
CellID->1377475961],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"x", " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[21]=",
- CellID->1161095845]
+ CellLabel->"Out[512]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox[
+ RowBox[{"Log", "[", "x", "]"}],
+ RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}], "/.",
RowBox[{
- FractionBox[
- RowBox[{"Log", "[", "x", "]"}],
- RowBox[{"1", "-", "x"}]], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[22]:=",
+ CellLabel->"In[513]:=",
CellID->2045548358],
Cell[BoxData[
FormBox[
FractionBox[
RowBox[{"x", " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[22]=",
- CellID->1817134078]
+ CellLabel->"Out[513]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{"1", ",",
- RowBox[{"x", " ",
- RowBox[{"Log", "[", "x", "]"}]}]}], "]"}]], "Input",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{"1", ",",
+ RowBox[{"x", " ",
+ RowBox[{"Log", "[", "x", "]"}]}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[23]:=",
+ CellLabel->"In[514]:=",
CellID->1793379008],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[23]=",
- CellID->1394422583]
+ CellLabel->"Out[514]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Log", "[", "x", "]"}], ",", "x"}], "]"}], "/.",
RowBox[{
- RowBox[{"Log", "[", "x", "]"}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[24]:=",
+ CellLabel->"In[515]:=",
CellID->1760428538],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"-", "x"}], " ",
- RowBox[{"log", "(", "x", ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{
+ SuperscriptBox["log", "2"], "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[24]=",
- CellID->395731069]
+ CellLabel->"Out[515]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox["1",
+ RowBox[{"1", "-", "x"}]], ",",
+ FractionBox[
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}],
+ RowBox[{"1", "-", "x"}]]}], "]"}], "/.",
RowBox[{
- FractionBox["1",
- RowBox[{"1", "-", "x"}]], ",",
- FractionBox[
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]]}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[25]:=",
+ CellLabel->"In[516]:=",
CellID->379553048],
Cell[BoxData[
@@ -859,29 +891,31 @@ Cell[BoxData[
RowBox[{
RowBox[{"log", "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
SuperscriptBox[
RowBox[{"(",
RowBox[{"x", "-", "1"}], ")"}], "2"]]}], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[25]=",
- CellID->1955426678]
+ CellLabel->"Out[516]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
- RowBox[{
- FractionBox[
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ FractionBox[
+ RowBox[{"Log", "[",
+ RowBox[{"1", "-", "x"}], "]"}],
+ RowBox[{"1", "-", "x"}]], ",",
RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]], ",",
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}]}], "]"}]], "Input",
+ RowBox[{"1", "-", "x"}], "]"}]}], "]"}], "/.",
+ RowBox[{
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"Convolute",
- CellLabel->"In[26]:=",
+ CellLabel->"In[517]:=",
CellID->1743318528],
Cell[BoxData[
@@ -891,39 +925,10 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["log", "2"], "(",
RowBox[{"1", "-", "x"}], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
+ RowBox[{"log", "(", "x", ")"}]}],
RowBox[{"x", "-", "1"}]], TraditionalForm]], "Output",
CellTags->"Convolute",
- CellLabel->"Out[26]=",
- CellID->2109333521]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"ConvoluteTable", "[",
- RowBox[{
- FractionBox[
- RowBox[{"Log", "[",
- RowBox[{"1", "-", "x"}], "]"}],
- RowBox[{"1", "-", "x"}]], ",", "1"}], "]"}]], "Input",
- CellTags->"Convolute",
- CellLabel->"In[27]:=",
- CellID->1987067231],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"False", "[",
- RowBox[{
- FractionBox[
- RowBox[{"log", "(",
- RowBox[{"1", "-", "x"}], ")"}],
- RowBox[{"1", "-", "x"}]], ",", "1"}], "]"}], TraditionalForm]], "Output",
-
- CellTags->"Convolute",
- CellLabel->"Out[27]=",
- CellID->1326268935]
+ CellLabel->"Out[517]="]
}, Open ]]
}, Open ]],
@@ -988,12 +993,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{901, Automatic}, {Automatic, 158}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/ConvoluteTable.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/ConvoluteTable.nb
index 55573608c..064f70592 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/ConvoluteTable.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/ConvoluteTable.nb
@@ -124,8 +124,29 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "Convolute", "]"}]], "Input",
+ CellTags->"ConvoluteTable",
+ CellLabel->"In[521]:=",
+ CellID->1127190721],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Bracket", "\[Rule]",
+ RowBox[{"{",
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm], "}"}]}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"ConvoluteTable",
+ CellLabel->"Out[521]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -171,9 +192,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Convolute",
ButtonNote->"Convolute"],
"."
-}], "Text",
- CellTags->"ConvoluteTable",
- CellID->538606169]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -202,47 +221,19 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "Convolute", "]"}]], "Input",
- CellTags->"ConvoluteTable",
- CellLabel->"In[1]:=",
- CellID->1127190721],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Bracket", "\[Rule]",
- RowBox[{"{",
- TagBox["\[CurlyEpsilon]",
- TraditionalForm], "}"}]}], ",",
- RowBox[{"FinalSubstitutions", "\[Rule]",
- RowBox[{"{",
- RowBox[{"PlusDistribution", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"ConvoluteTable",
- CellLabel->"Out[1]=",
- CellID->1360987202]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"ConvoluteTable", "[",
- RowBox[{"1", ",", "1"}], "]"}]], "Input",
+ RowBox[{"1", ",", "1", ",", "x"}], "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[2]:=",
+ CellLabel->"In[528]:=",
CellID->1383961976],
Cell[BoxData[
FormBox[
RowBox[{"-",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x45\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"ConvoluteTable",
- CellLabel->"Out[2]=",
- CellID->1197018632]
+ CellLabel->"Out[528]="]
}, Open ]],
Cell[CellGroupData[{
@@ -251,7 +242,7 @@ Cell[BoxData[
RowBox[{"ConvoluteTable", "[",
RowBox[{"x", ",", "x"}], "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[3]:=",
+ CellLabel->"In[529]:=",
CellID->783988219],
Cell[BoxData[
@@ -259,26 +250,23 @@ Cell[BoxData[
RowBox[{"False", "[",
RowBox[{"x", ",", "x"}], "]"}], TraditionalForm]], "Output",
CellTags->"ConvoluteTable",
- CellLabel->"Out[3]=",
- CellID->289063823]
+ CellLabel->"Out[529]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ConvoluteTable", "[",
- RowBox[{"1", ",", "x"}], "]"}]], "Input",
+ RowBox[{"1", ",", "x", ",", "x"}], "]"}]], "Input",
CellTags->"ConvoluteTable",
- CellLabel->"In[4]:=",
+ CellLabel->"In[531]:=",
CellID->1430786364],
Cell[BoxData[
FormBox[
- RowBox[{"False", "[",
- RowBox[{"1", ",", "x"}], "]"}], TraditionalForm]], "Output",
+ RowBox[{"1", "-", "x"}], TraditionalForm]], "Output",
CellTags->"ConvoluteTable",
- CellLabel->"Out[4]=",
- CellID->1781441936]
+ CellLabel->"Out[531]="]
}, Open ]]
}, Open ]],
@@ -343,12 +331,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{831, Automatic}, {Automatic, 130}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterT.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterT.nb
index fe51ee5ca..167bbaa36 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterT.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterT.nb
@@ -175,9 +175,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/QuarkPropagator",
ButtonNote->"QuarkPropagator"],
"."
-}], "Text",
- CellTags->"CounterT",
- CellID->1128461713]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -212,7 +210,7 @@ Cell[BoxData[
RowBox[{"Explicit", "\[Rule]", "True"}], ",",
RowBox[{"CounterTerm", "\[Rule]", " ", "All"}]}], "]"}]], "Input",
CellTags->"CounterT",
- CellLabel->"In[1]:=",
+ CellLabel->"In[520]:=",
CellID->505594925],
Cell[BoxData[
@@ -240,32 +238,24 @@ Cell[BoxData[
RowBox[{
FractionBox[
RowBox[{"10", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"], "-",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"], "-",
RowBox[{
FractionBox["10", "3"], " ",
SuperscriptBox[
@@ -273,22 +263,16 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}],
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]], "+",
FractionBox[
@@ -315,86 +299,75 @@ Cell[BoxData[
FormBox["p",
TraditionalForm],
TraditionalForm], "2"], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
FractionBox[
RowBox[{"4", " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- FormBox[
- FormBox["p",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], "3"]}], ")"}]}],
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "3"]}], ")"}]}],
TagBox["\[CurlyEpsilon]",
TraditionalForm]]}], ")"}]}], "-",
- FractionBox[
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Delta]",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]}]], " ",
- FormBox[
+ FormBox[
+ FractionBox[
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
SuperscriptBox["g",
RowBox[{
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}],
- SuperscriptBox[
- FormBox["p",
- TraditionalForm], "2"]]}], TraditionalForm]], "Output",
+ TraditionalForm]}]]}],
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`p, D],
+ FeynCalc`Momentum[$CellContext`p, D]]],
+ Editable->False]],
+ TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"CounterT",
- CellLabel->"Out[1]=",
- CellID->1579672535]
+ CellLabel->"Out[520]="]
}, Open ]]
}, Open ]],
@@ -459,12 +432,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{988, Automatic}, {Automatic, 183}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterTerm.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterTerm.nb
index 6fed90585..fa4661eb0 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterTerm.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CounterTerm.nb
@@ -124,8 +124,28 @@ Feynman rule functions QuarkGluonVertex, GluonPropagator, QuarkPropagator."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CounterTerm", "]"}]], "Input",
+ CellLabel->"In[527]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"Dimension", "\[Rule]",
+ RowBox[{
+ TagBox["\[CurlyEpsilon]",
+ TraditionalForm], "+", "4"}]}], ",",
+ RowBox[{"Gauge", "\[Rule]", "1"}], ",",
+ RowBox[{"QuarkMass", "\[Rule]",
+ RowBox[{"FCGV", "(", "\<\"M\"\>", ")"}]}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[527]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -181,9 +201,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/QuarkPropagator",
ButtonNote->"QuarkPropagator"],
"."
-}], "Text",
- CellTags->"CounterTerm",
- CellID->257706146]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -215,7 +233,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"CounterTerm", "[", "Zm", "]"}]], "Input",
CellTags->"CounterTerm",
- CellLabel->"In[1]:=",
+ CellLabel->"In[526]:=",
CellID->1995023941],
Cell[BoxData[
@@ -270,8 +288,7 @@ Cell[BoxData[
TagBox["\[CurlyEpsilon]",
TraditionalForm]}]], "+", "1"}], TraditionalForm]], "Output",
CellTags->"CounterTerm",
- CellLabel->"Out[1]=",
- CellID->1407493113]
+ CellLabel->"Out[526]="]
}, Open ]]
}, Open ]],
@@ -336,12 +353,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{739, Automatic}, {Automatic, 77}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CouplingConstant.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CouplingConstant.nb
index dcf3ae8b5..082494aad 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CouplingConstant.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CouplingConstant.nb
@@ -117,19 +117,20 @@ Cell["CouplingConstant", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData["CouplingConstant"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for several Feynman rule functions and for CovariantD and \
-FieldStrength.\nIn the convention of the subpackage PHI, CouplingConstant is \
-also the head of coupling constants. CouplingConstant takes three extra \
-optional arguments, with head RenormalizationState, RenormalizationScheme and \
-ExpansionState respectively. E.g. CouplingConstant[QED[1]] is the unit \
-charge, CouplingConstant[ChPT2[4],1] is the first of the coupling constants \
-of the lagrangian ChPT2[4]. CouplingConstant[a_,b_,c___][i_] := \
-CouplingConstant[a,b,RenormalizationState[i],c]."
+ " \[LineSeparator]is an option for several Feynman rule functions and for \
+CovariantD and FieldStrength."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
+Cell["\<\
+In the convention of the subpackage PHI, CouplingConstant is also the head of \
+coupling constants. CouplingConstant takes three extra optional arguments, \
+with head RenormalizationState, RenormalizationScheme and ExpansionState \
+respectively. E.g. CouplingConstant[QED[1]] is the unit charge, \
+CouplingConstant[ChPT2[4],1] is the first of the coupling constants of the \
+lagrangian ChPT2[4]. CouplingConstant[a_,b_,c___][i_] := \
+CouplingConstant[a,b,RenormalizationState[i],c].\
+\>", "Notes",
CellID->1067943069]
}, Open ]],
@@ -175,15 +176,8 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/FieldStrength",
ButtonNote->"FieldStrength"],
- ", ",
- ButtonBox["\"PHI - A Mathematica package for ChPT calculations\"",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/phi",
- ButtonNote->"phi"],
"."
-}], "Text",
- CellTags->"CouplingConstant",
- CellID->1805142582]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -269,12 +263,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{630, Automatic}, {Automatic, 73}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantD.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantD.nb
index bdc3c8dd1..01d5bceea 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantD.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantD.nb
@@ -117,31 +117,136 @@ Cell["CovariantD", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"CovariantD", "[", "mu", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a generic covariant derivative with Lorentz index mu. With the \
-option-setting Explicit \[Rule] True, an explicit expression for a fermionic \
-field is returned, depending on the setting on the other options.\n\
-CovariantD[x, mu] is a generic covariant derivative with respect to x^mu.\n\
-CovariantD[mu, a, b] is a covariant derivative for a bosonic field; acting on \
-QuantumField[f,{},{a,b}], where f is some field name and a and b are two \
-SU(N) indices. Again, with the option-setting Explicit \[Rule] True, an \
-explicit expression is returned, depending on the setting on the other \
-options.\nCovariantD[OPEDelta, a, b] is a short form for \
-CovariantD[mu,a,b]*FourVector[OPEDelta, mu]. CovariantD[{OPEDelta, a, b}, \
-{n}] yields the product of n operators, where n is an integer. \
-CovariantD[OPEDelta, a, b, {m, n}] gives the expanded form of \
-CovariantD[OPEDelta, a, b]^m up to order g^n for the gluon, where n is an \
-integer and g the coupling constant indicated by the setting of the option \
-CouplingConstant. CovariantD[OPEDelta, {m, n}] gives the expanded form of \
-CovariantD[OPEDelta]^m up to order g^n of the fermionic field.\n\n Possible \
-settings of PartialD are: LeftPartialD, LeftRigthPartialD, RightPartialD. The \
-default setting of QuantumField is GaugeField."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
+ RowBox[{"CovariantD", "[", "\[Mu]", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a generic covariant derivative with Lorentz index \
+\[Mu].\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"x", ",", "\[Mu]"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a generic covariant derivative with respect to ",
+ Cell[BoxData[
+ SuperscriptBox["x", "\[Mu]"]], "InlineFormula"],
+ ".\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"\[Mu]", ",", "a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a covariant derivative for a bosonic field that acts on \
+",
+ Cell[BoxData[
+ RowBox[{"QuantumField", "[",
+ RowBox[{"f", ",",
+ RowBox[{"{", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"a", ",", "b"}], "}"}]}], "]"}]], "InlineFormula"],
+ ", where ",
+ Cell[BoxData["f"], "InlineFormula"],
+ " is some field name and ",
+ Cell[BoxData["a"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["b"], "InlineFormula"],
+ " are two ",
+ Cell[BoxData[
+ RowBox[{"SU",
+ RowBox[{"(", "N", ")"}]}]], "InlineFormula"],
+ " indices in the adjoint representation.\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", "a", ",", "b"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a short form for ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"CovariantD", "[",
+ RowBox[{"\[Mu]", ",", "a", ",", "b"}], "]"}], " ",
+ RowBox[{"FV", "[",
+ RowBox[{"OPEDelta", ",", " ", "\[Mu]"}], "]"}]}]], "InlineFormula"],
+ ".\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"OPEDelta", ",", "a", ",", "b"}], "}"}], ",",
+ RowBox[{"{", "n", "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]yields the product of ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " operators, where ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " is an integer.\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "n"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]gives the expanded form of ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", " ", "a", ",", " ", "b"}], "]"}], "^", "m"}]],
+ "InlineFormula"],
+ " up to order ",
+ Cell[BoxData[
+ RowBox[{"g", "^", "n"}]], "InlineFormula"],
+ " for the gluon, where ",
+ Cell[BoxData["n"], "InlineFormula"],
+ " is an integer and ",
+ Cell[BoxData["g"], "InlineFormula"],
+ " the coupling constant indicated by the setting of the option ",
+ ButtonBox["CouplingConstant.",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CouplingConstant",
+ ButtonNote->"CouplingConstant"],
+ "\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",",
+ RowBox[{"{",
+ RowBox[{"m", ",", "n"}], "}"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]gives the expanded form of ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{"CovariantD", "[", "OPEDelta", "]"}], "^", "m"}]], "InlineFormula"],
+ " up to order ",
+ Cell[BoxData[
+ RowBox[{"g", "^", "n"}]], "InlineFormula"],
+ " of the fermionic field."
+}], "Usage"],
+
+Cell[TextData[{
+ "To obtain the explicit expression for a particular covariant derivatine, \
+the option ",
+ Cell[BoxData["Explicit"], "InlineFormula"],
+ " must be set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "CovariantD", "]"}]], "Input",
+ CellTags->"CovariantD",
+ CellLabel->"In[211]:=",
+ CellID->1136125130],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"CouplingConstant", "\[Rule]",
+ SubscriptBox["g", "s"]}], ",",
+ RowBox[{"DummyIndex", "\[Rule]", "Automatic"}], ",",
+ RowBox[{"Explicit", "\[Rule]", "False"}], ",",
+ RowBox[{"FCPartialD", "\[Rule]", "RightPartialD"}], ",",
+ RowBox[{"QuantumField", "\[Rule]", "A"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"CovariantD",
+ CellLabel->"Out[211]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -171,32 +276,9 @@ Cell["XXXX", "RelatedLinks",
CellID->1038487239]
}, Open ]],
-Cell[CellGroupData[{
-
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[TextData[{
- ButtonBox["LeftPartialD",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/LeftPartialD",
- ButtonNote->"LeftPartialD"],
- ", ",
- ButtonBox["LeftRightPartialD",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/LeftRightPartialD",
- ButtonNote->"LeftRightPartialD"],
- ", ",
- ButtonBox["RightPartialD",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/RightPartialD",
- ButtonNote->"RightPartialD"],
- "."
-}], "Text",
- CellTags->"CovariantD",
- CellID->2075533712]
-}, Open ]],
-
Cell[CellGroupData[{
Cell["More About", "MoreAboutSection",
@@ -223,30 +305,6 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "CovariantD", "]"}]], "Input",
- CellTags->"CovariantD",
- CellLabel->"In[1]:=",
- CellID->1136125130],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"CouplingConstant", "\[Rule]",
- SubscriptBox["g", "s"]}], ",",
- RowBox[{"DummyIndex", "\[Rule]", "Automatic"}], ",",
- RowBox[{"Explicit", "\[Rule]", "False"}], ",",
- RowBox[{"FCPartialD", "\[Rule]", "RightPartialD"}], ",",
- RowBox[{"QuantumField", "\[Rule]", "A"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"CovariantD",
- CellLabel->"Out[1]=",
- CellID->580865857]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"CovariantD", "[", "\[Mu]", "]"}]], "Input",
CellTags->"CovariantD",
@@ -259,8 +317,7 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm]], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[2]=",
- CellID->1727860547]
+ CellLabel->"Out[2]="]
}, Open ]],
Cell[CellGroupData[{
@@ -283,8 +340,7 @@ Cell[BoxData[
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[3]=",
- CellID->78914476]
+ CellLabel->"Out[3]="]
}, Open ]],
Cell[CellGroupData[{
@@ -311,7 +367,7 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["T",
FormBox[
- FormBox["c48",
+ FormBox["c24",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -322,20 +378,42 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c48",
+ FormBox["c24",
TraditionalForm],
TraditionalForm]]}]}]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[4]=",
- CellID->606796247]
+ CellLabel->"Out[4]="]
}, Open ]],
-Cell["\<\
-The first argument of CovariantD is intepreted as type LorentzIndex, except \
-for OPEDelta, which is type Momentum.\
-\>", "Text",
- CellTags->"CovariantD",
- CellID->1590488263],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The first argument of ",
+ ButtonBox["CovariantD",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CovariantD",
+ ButtonNote->"CovariantD"],
+ " is intepreted as type ",
+ ButtonBox["LorentzIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/LorentzIndex",
+ ButtonNote->"LorentzIndex"],
+ ", except for ",
+ ButtonBox["OPEDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/OPEDelta",
+ ButtonNote->"OPEDelta"],
+ ", which is type ",
+ ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Momentum",
+ ButtonNote->"Momentum"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
@@ -351,8 +429,7 @@ Cell[BoxData[
FormBox["\[CapitalDelta]",
TraditionalForm]], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[5]=",
- CellID->855697737]
+ CellLabel->"Out[5]="]
}, Open ]],
Cell[CellGroupData[{
@@ -375,8 +452,7 @@ Cell[BoxData[
FormBox["b",
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[6]=",
- CellID->1737264679]
+ CellLabel->"Out[6]="]
}, Open ]],
Cell[CellGroupData[{
@@ -415,7 +491,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c49",
+ FormBox["c25",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
@@ -424,11 +500,10 @@ Cell[BoxData[
TraditionalForm],
FormBox["b",
TraditionalForm],
- FormBox["c49",
+ FormBox["c25",
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[7]=",
- CellID->1504792083]
+ CellLabel->"Out[7]="]
}, Open ]],
Cell[CellGroupData[{
@@ -455,7 +530,7 @@ Cell[BoxData[
RowBox[{
SuperscriptBox["T",
FormBox[
- FormBox["c50",
+ FormBox["c26",
TraditionalForm],
TraditionalForm]], ".",
SubsuperscriptBox[
@@ -466,12 +541,11 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["c50",
+ FormBox["c26",
TraditionalForm],
TraditionalForm]]}]}]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[8]=",
- CellID->1269153146]
+ CellLabel->"Out[8]="]
}, Open ]],
Cell[CellGroupData[{
@@ -494,7 +568,7 @@ Cell[BoxData[
RowBox[{
FormBox["a",
TraditionalForm],
- FormBox["c51",
+ FormBox["c27",
TraditionalForm]}]], " ",
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -512,16 +586,16 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e52",
+ FormBox["e28",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
FormBox["a",
TraditionalForm],
- FormBox["c51",
+ FormBox["c27",
TraditionalForm],
- FormBox["e52",
+ FormBox["e28",
TraditionalForm]}]]}]}], ")"}], ".",
RowBox[{"(",
RowBox[{
@@ -530,7 +604,7 @@ Cell[BoxData[
RowBox[{
FormBox["b",
TraditionalForm],
- FormBox["c51",
+ FormBox["c27",
TraditionalForm]}]], " ",
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"],
@@ -548,29 +622,35 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["e53",
+ FormBox["e29",
TraditionalForm],
TraditionalForm]], " ",
SuperscriptBox["f",
RowBox[{
- FormBox["c51",
+ FormBox["c27",
TraditionalForm],
FormBox["b",
TraditionalForm],
- FormBox["e53",
+ FormBox["e29",
TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[9]=",
- CellID->835776136]
+ CellLabel->"Out[9]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"This gives",
Cell[BoxData[
FormBox[
RowBox[{" ",
RowBox[{
- RowBox[{"m", " ", "times", " ",
+ RowBox[{"m", " ", "*", " ",
SubscriptBox[
OverscriptBox["\[PartialD]", "\[RightArrow]"], "\[CapitalDelta]"]}],
",", " "}]}], TraditionalForm]]],
@@ -585,9 +665,7 @@ Cell[TextData[{
FormBox[
RowBox[{
SuperscriptBox["\[CapitalDelta]", "\[Mu]"], "."}], TraditionalForm]]]
-}], "Text",
- CellTags->"CovariantD",
- CellID->35437719],
+}], "Notes"],
Cell[CellGroupData[{
@@ -622,22 +700,28 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], ")"}], "m"]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[10]=",
- CellID->985234851]
+ CellLabel->"Out[10]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
Cell[TextData[{
"The expansion up to first order in the coupling constant ",
Cell[BoxData[
FormBox[
- RowBox[{
- SubscriptBox["g", "s"], " ",
- RowBox[{
- RowBox[{"(", "thesumistheFeynCalcOPESum", ")"}], "."}]}],
- TraditionalForm]]]
-}], "Text",
- CellTags->"CovariantD",
- CellID->745433336],
+ SubscriptBox["g", "s"], TraditionalForm]]],
+ " (the sum is the ",
+ ButtonBox["FeynCalcOPESum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FeynCalcOPESum",
+ ButtonNote->"FeynCalcOPESum"],
+ ")"
+}], "Notes"],
Cell[CellGroupData[{
@@ -647,7 +731,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"OPEm", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[11]:=",
+ CellLabel->"In[12]:=",
CellID->1721350899],
Cell[BoxData[
@@ -674,94 +758,7 @@ Cell[BoxData[
TraditionalForm]], ")"}], "m"]}], "-",
RowBox[{
SubscriptBox["g", "s"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}],
- RowBox[{
- RowBox[{"-", "1"}], "+", "m"}]],
- RowBox[{
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c63", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c63", "1"],
- TraditionalForm],
- TraditionalForm]}]]}]}],
- HoldForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"CovariantD",
- CellLabel->"Out[11]=",
- CellID->1135690031]
-}, Open ]],
-
-Cell[TextData[{
- "The expansion up to second order in the ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SubscriptBox["g", "s"], "."}], TraditionalForm]]]
-}], "Text",
- CellTags->"CovariantD",
- CellID->972705137],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"CovariantD", "[",
- RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
- RowBox[{"{",
- RowBox[{"OPEm", ",", "2"}], "}"}]}], "]"}]], "Input",
- CellTags->"CovariantD",
- CellLabel->"In[12]:=",
- CellID->1002319987],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-",
- RowBox[{
- SubscriptBox["g", "s"], " ",
+ RowBox[{"(",
FormBox[
TagBox[
RowBox[{
@@ -788,7 +785,7 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- SubscriptBox["c71", "1"],
+ SubscriptBox["c47", "1"],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox[
@@ -813,116 +810,203 @@ Cell[BoxData[
TraditionalForm],
FormBox[
FormBox[
- SubscriptBox["c71", "1"],
+ SubscriptBox["c47", "1"],
TraditionalForm],
TraditionalForm]}]]}]}],
HoldForm],
- TraditionalForm]}]}], "-",
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ CellTags->"CovariantD",
+ CellLabel->"Out[12]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The expansion up to second order in the ",
+ Cell[BoxData[
+ FormBox[
RowBox[{
- SubsuperscriptBox["g", "s", "2"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"j", "=", "0"}],
+ SubscriptBox["g", "s"], "."}], TraditionalForm]]]
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"CovariantD", "[",
+ RowBox[{"OPEDelta", ",", "a", ",", "b", ",",
+ RowBox[{"{",
+ RowBox[{"OPEm", ",", "2"}], "}"}]}], "]"}]], "Input",
+ CellTags->"CovariantD",
+ CellLabel->"In[13]:=",
+ CellID->1002319987],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ SubscriptBox["g", "s"], " ",
+ RowBox[{"(",
+ FormBox[
+ TagBox[
RowBox[{
- RowBox[{"-", "2"}], "+", "m"}]],
- RowBox[{"(",
- FormBox[
- TagBox[
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}],
RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}], "j"],
- RowBox[{
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ RowBox[{"-", "1"}], "+", "m"}]],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c75", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "i"}], "+", "j"}]], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c55", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm],
- FormBox[
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}], " ",
+ SuperscriptBox["f",
+ RowBox[{
+ FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c55", "1"],
+ TraditionalForm],
+ TraditionalForm]}]]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}]}], "-",
+ RowBox[{
+ SubsuperscriptBox["g", "s", "2"], " ",
+ RowBox[{"(",
+ FormBox[
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"j", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "m"}]],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}], "j"],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SubscriptBox["c75", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm]], ")"}],
+ SubscriptBox["c59", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "i"}], "+", "j"}]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c59", "2"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}], " ",
+ SuperscriptBox["f",
RowBox[{
- RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm],
- FormBox[
FormBox[
- SubscriptBox["c75", "1"],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox["a",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SubscriptBox["e74", "1"],
- TraditionalForm],
- TraditionalForm]}]], " ",
- SuperscriptBox["f",
- RowBox[{
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ SubscriptBox["c59", "1"],
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SubscriptBox["c75", "2"],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ FormBox[
+ SubscriptBox["e58", "1"],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["f",
+ RowBox[{
FormBox[
- SubscriptBox["e74", "1"],
- TraditionalForm],
- TraditionalForm]}]]}]}],
- HoldForm],
- TraditionalForm], ")"}]}],
- HoldForm],
- TraditionalForm]}], "+",
+ FormBox["b",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c59", "2"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["e58", "1"],
+ TraditionalForm],
+ TraditionalForm]}]]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}], "+",
RowBox[{
SuperscriptBox["\[Delta]",
RowBox[{
@@ -943,8 +1027,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], ")"}], "m"]}]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[12]=",
- CellID->483146070]
+ CellLabel->"Out[13]="]
}, Open ]],
Cell[CellGroupData[{
@@ -954,7 +1037,7 @@ Cell[BoxData[
RowBox[{"CovariantD", "[",
RowBox[{"OPEDelta", ",", "a", ",", "b"}], "]"}], "OPEm"]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[13]:=",
+ CellLabel->"In[14]:=",
CellID->608320512],
Cell[BoxData[
@@ -970,8 +1053,7 @@ Cell[BoxData[
FormBox["b",
TraditionalForm]}]], ")"}], "m"], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[13]=",
- CellID->260858844]
+ CellLabel->"Out[14]="]
}, Open ]],
Cell[CellGroupData[{
@@ -982,7 +1064,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"OPEm", ",", "2"}], "}"}]}], "]"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[14]:=",
+ CellLabel->"In[15]:=",
CellID->512528140],
Cell[BoxData[
@@ -991,136 +1073,141 @@ Cell[BoxData[
RowBox[{"-",
RowBox[{"\[ImaginaryI]", " ",
SubscriptBox["g", "s"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}],
- RowBox[{
- RowBox[{"-", "1"}], "+", "m"}]],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
RowBox[{
- SuperscriptBox["T",
- FormBox[
- FormBox[
- SubscriptBox["c84", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "+", "m"}]],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c84", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ TraditionalForm],
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox[
+ SubscriptBox["c68", "1"],
TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}]}],
- HoldForm],
- TraditionalForm]}]}], "-",
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "-", "i", "+", "m"}]]}], " ",
+ SuperscriptBox["T",
+ FormBox[
+ FormBox[
+ SubscriptBox["c68", "1"],
+ TraditionalForm],
+ TraditionalForm]]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}]}], "-",
RowBox[{
SubsuperscriptBox["g", "s", "2"], " ",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"j", "=", "0"}],
- RowBox[{
- RowBox[{"-", "2"}], "+", "m"}]],
- RowBox[{"(",
- FormBox[
- TagBox[
- RowBox[{
- UnderoverscriptBox["\[Sum]",
- RowBox[{"i", "=", "0"}], "j"],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
+ RowBox[{
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"j", "=", "0"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "+", "m"}]],
+ RowBox[{"(",
+ FormBox[
+ TagBox[
RowBox[{
- SuperscriptBox["T",
- FormBox[
- FormBox[
- SubscriptBox["c88", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["T",
- FormBox[
- FormBox[
- SubscriptBox["c88", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ UnderoverscriptBox["\[Sum]",
+ RowBox[{"i", "=", "0"}], "j"],
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["T",
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox[
+ SubscriptBox["c72", "1"],
TraditionalForm],
- TraditionalForm]], ")"}], "i"], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c88", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ TraditionalForm]], ".",
+ SuperscriptBox["T",
FormBox[
- FormBox["\[CapitalDelta]",
+ FormBox[
+ SubscriptBox["c72", "2"],
TraditionalForm],
- TraditionalForm]], ")"}],
+ TraditionalForm]]}], " ",
RowBox[{
- RowBox[{"-", "i"}], "+", "j"}]], ".",
- SubsuperscriptBox[
- FormBox["A",
- TraditionalForm],
- FormBox[
- FormBox["\[CapitalDelta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox["c88", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- RowBox[{"(",
- SubscriptBox[
- OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}], "i"], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
FormBox[
FormBox["\[CapitalDelta]",
TraditionalForm],
- TraditionalForm]], ")"}],
- RowBox[{
- RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}]}],
- HoldForm],
- TraditionalForm], ")"}]}],
- HoldForm],
- TraditionalForm]}], "+",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c72", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "i"}], "+", "j"}]], ".",
+ SubsuperscriptBox[
+ FormBox["A",
+ TraditionalForm],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["c72", "2"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ RowBox[{"(",
+ SubscriptBox[
+ OverscriptBox["\[PartialD]", "\[RightArrow]"],
+ FormBox[
+ FormBox["\[CapitalDelta]",
+ TraditionalForm],
+ TraditionalForm]], ")"}],
+ RowBox[{
+ RowBox[{"-", "2"}], "-", "j", "+", "m"}]]}]}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}],
+ HoldForm],
+ TraditionalForm], ")"}]}], "+",
SuperscriptBox[
RowBox[{"(",
SubscriptBox[
@@ -1130,8 +1217,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], ")"}], "m"]}], TraditionalForm]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[14]=",
- CellID->2021495246]
+ CellLabel->"Out[15]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1143,25 +1229,24 @@ Cell[BoxData[
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[15]:=",
+ CellLabel->"In[16]:=",
CellID->790160491],
Cell[BoxData[
RowBox[{
- RowBox[{
- RowBox[{"-", "\[ImaginaryI]"}], " ", "Gstrong", " ",
+ RowBox[{"RightPartialD", "[",
+ RowBox[{"Momentum", "[", "OPEDelta", "]"}], "]"}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
RowBox[{
RowBox[{"SUNT", "[",
- RowBox[{"SUNIndex", "[", "c91", "]"}], "]"}], ".",
+ RowBox[{"SUNIndex", "[", "c75", "]"}], "]"}], ".",
RowBox[{"QuantumField", "[",
RowBox[{"GaugeField", ",",
RowBox[{"Momentum", "[", "OPEDelta", "]"}], ",",
- RowBox[{"SUNIndex", "[", "c91", "]"}]}], "]"}]}]}], "+",
- RowBox[{"RightPartialD", "[",
- RowBox[{"Momentum", "[", "OPEDelta", "]"}], "]"}]}]], "Output",
+ RowBox[{"SUNIndex", "[", "c75", "]"}]}], "]"}]}], " ",
+ RowBox[{"SMP", "[", "\<\"g_s\"\>", "]"}]}]}]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[15]//StandardForm=",
- CellID->1789369971]
+ CellLabel->"Out[16]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -1173,7 +1258,7 @@ Cell[BoxData[
RowBox[{"Explicit", "\[Rule]", "True"}]}], "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"CovariantD",
- CellLabel->"In[16]:=",
+ CellLabel->"In[17]:=",
CellID->160329117],
Cell[BoxData[
@@ -1183,16 +1268,17 @@ Cell[BoxData[
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], " ",
RowBox[{"SUNDelta", "[",
RowBox[{"a", ",", "b"}], "]"}]}], "-",
- RowBox[{"Gstrong", " ",
+ RowBox[{
RowBox[{"QuantumField", "[",
RowBox[{"GaugeField", ",",
RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], ",",
- RowBox[{"SUNIndex", "[", "c92", "]"}]}], "]"}], " ",
+ RowBox[{"SUNIndex", "[", "c76", "]"}]}], "]"}], " ",
+ RowBox[{"SMP", "[", "\<\"g_s\"\>", "]"}], " ",
RowBox[{"SUNF", "[",
- RowBox[{"a", ",", "b", ",", "c92"}], "]"}]}]}]], "Output",
+ RowBox[{"a", ",", "b", ",", "c76"}], "]"}]}]}]], "Output",
CellTags->"CovariantD",
- CellLabel->"Out[16]//StandardForm=",
- CellID->772324772]
+ CellLabel->"Out[17]//StandardForm="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -1256,13 +1342,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{1013, 770},
+WindowMargins->{{1100, Automatic}, {273, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantFieldDerivative.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantFieldDerivative.nb
index 012724329..6085f0426 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantFieldDerivative.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/CovariantFieldDerivative.nb
@@ -121,13 +121,23 @@ Cell[TextData[{
RowBox[{
RowBox[{"f", "[", "x", "]"}], ",", "x", ",",
RowBox[{"{",
- RowBox[{"li1", ",", "li2", ",", "..."}], "}"}], ",", "opts"}], "]"}]],
+ RowBox[{"li1", ",", "li2", ",", "..."}], "}"}]}], "]"}]],
"InlineFormula"],
- " \[LineSeparator]",
- "is a covariant derivative of f[x] with respect to space-time variables x \
-and with Lorentz indices li1, li2,... CovariantFieldDerivative has only \
-typesetting definitions by default. The user is must supply his/her own \
-definition of the actual function."
+ " \[LineSeparator]is a covariant derivative of ",
+ Cell[BoxData[
+ RowBox[{"f", "[", "x", "]"}]], "InlineFormula"],
+ " with respect to space-time variables ",
+ Cell[BoxData["x"], "InlineFormula"],
+ " and with Lorentz indices ",
+ Cell[BoxData[
+ RowBox[{"li1", ",", " ", "li2", ",", "..."}]], "InlineFormula"],
+ ". ",
+ ButtonBox["CovariantFieldDerivative",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/CovariantFieldDerivative",
+ ButtonNote->"CovariantFieldDerivative"],
+ " has only typesetting definitions by default. The user is must supply \
+his/her own definition of the actual function."
}], "Usage",
CellID->982511436],
@@ -183,9 +193,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/FieldDerivative",
ButtonNote->"FieldDerivative"],
"."
-}], "Text",
- CellTags->"CovariantFieldDerivative",
- CellID->1307362516]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -223,7 +231,7 @@ Cell[BoxData[
RowBox[{"{", "\[Mu]", "}"}]}], "]"}], "[", "x", "]"}], ",", "x", ",",
RowBox[{"{", "\[Mu]", "}"}]}], "]"}]], "Input",
CellTags->"CovariantFieldDerivative",
- CellLabel->"In[1]:=",
+ CellLabel->"In[18]:=",
CellID->2083449432],
Cell[BoxData[
@@ -251,8 +259,7 @@ Cell[BoxData[
TraditionalForm,
Editable->True], ")"}], TraditionalForm]], "Output",
CellTags->"CovariantFieldDerivative",
- CellLabel->"Out[1]=",
- CellID->1282830456]
+ CellLabel->"Out[18]="]
}, Open ]]
}, Open ]],
@@ -317,12 +324,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{560, Automatic}, {35, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/CrossProduct.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/CrossProduct.nb
deleted file mode 100644
index d88285cd1..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/CrossProduct.nb
+++ /dev/null
@@ -1,319 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/CrossProduct", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["CrossProduct", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData[
- RowBox[{"CrossProduct", "[",
- RowBox[{"a", ",", " ", "b"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the three-dimensional cross-product of the three-vectors a and b."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["DotProduct",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DotProduct",
- ButtonNote->"DotProduct"],
- ", ",
- ButtonBox["ThreeVector",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/ThreeVector",
- ButtonNote->"ThreeVector"],
- "."
-}], "Text",
- CellTags->"CrossProduct",
- CellID->1152724432]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"CrossProduct", "[",
- RowBox[{
- RowBox[{"ThreeVector", "[", "a", "]"}], ",",
- RowBox[{"CrossProduct", "[",
- RowBox[{
- RowBox[{"ThreeVector", "[", "b", "]"}], ",",
- RowBox[{"ThreeVector", "[", "c", "]"}]}], "]"}]}], "]"}]], "Input",
- CellTags->"CrossProduct",
- CellLabel->"In[1]:=",
- CellID->1337031083],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- OverscriptBox["b", "\[RightVector]"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox["a", "\[RightVector]"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox["c", "\[RightVector]"],
- TraditionalForm]}], ")"}]}], "-",
- RowBox[{
- OverscriptBox["c", "\[RightVector]"], " ",
- RowBox[{"(",
- RowBox[{
- FormBox[
- OverscriptBox["a", "\[RightVector]"],
- TraditionalForm],
- FormBox["\<\"\[CenterDot]\"\>",
- TraditionalForm],
- FormBox[
- OverscriptBox["b", "\[RightVector]"],
- TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
- CellTags->"CrossProduct",
- CellLabel->"Out[1]=",
- CellID->2076700373]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/D0.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/D0.nb
index 856d47f24..79b59b5cb 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/D0.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/D0.nb
@@ -195,9 +195,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/PaVeOrder",
ButtonNote->"PaVeOrder"],
"."
-}], "Text",
- CellTags->"D0",
- CellID->1437823057]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -235,7 +233,7 @@ Cell[BoxData[
RowBox[{"m3", "^", "2"}], ",",
RowBox[{"m4", "^", "2"}]}], "]"}]], "Input",
CellTags->"D0",
- CellLabel->"In[1]:=",
+ CellLabel->"In[532]:=",
CellID->1703594627],
Cell[BoxData[
@@ -253,8 +251,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"D0",
- CellLabel->"Out[1]=",
- CellID->2083359639]
+ CellLabel->"Out[532]="]
}, Open ]],
Cell[CellGroupData[{
@@ -273,7 +270,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"p13", ",", "p20"}], "}"}]}]}], "]"}]], "Input",
CellTags->"D0",
- CellLabel->"In[2]:=",
+ CellLabel->"In[533]:=",
CellID->493215523],
Cell[BoxData[
@@ -291,8 +288,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"D0",
- CellLabel->"Out[2]=",
- CellID->1336389725]
+ CellLabel->"Out[533]="]
}, Open ]],
Cell[CellGroupData[{
@@ -300,7 +296,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"PaVeOrder", "[", "%", "]"}]], "Input",
CellTags->"D0",
- CellLabel->"In[3]:=",
+ CellLabel->"In[534]:=",
CellID->1818800785],
Cell[BoxData[
@@ -318,8 +314,7 @@ Cell[BoxData[
TraditionalForm],
HoldForm], TraditionalForm]], "Output",
CellTags->"D0",
- CellLabel->"Out[3]=",
- CellID->871188946]
+ CellLabel->"Out[534]="]
}, Open ]]
}, Open ]],
@@ -384,12 +379,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{948, Automatic}, {Automatic, 160}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/D0Convention.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/D0Convention.nb
index 914a31328..ba98fed83 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/D0Convention.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/D0Convention.nb
@@ -162,7 +162,6 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
ButtonBox["D0",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/D0",
@@ -173,9 +172,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/Write2",
ButtonNote->"Write2"],
"."
-}], "Text",
- CellTags->"D0Convention",
- CellID->1599988993]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -261,12 +258,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1011, Automatic}, {Automatic, 159}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DB0.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DB0.nb
index 8df29492f..6034bb01e 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DB0.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DB0.nb
@@ -169,9 +169,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/B0",
ButtonNote->"B0"],
"."
-}], "Text",
- CellTags->"DB0",
- CellID->1206126123]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -212,7 +210,7 @@ Cell[BoxData[
SubscriptBox["m", "2"], "2"]}], "]"}], ",",
SubscriptBox["p", "2"]}], "]"}]], "Input",
CellTags->"DB0",
- CellLabel->"In[1]:=",
+ CellLabel->"In[535]:=",
CellID->1086692886],
Cell[BoxData[
@@ -223,8 +221,7 @@ Cell[BoxData[
SubsuperscriptBox["m", "1", "2"], ",",
SubsuperscriptBox["m", "2", "2"]}], ")"}], TraditionalForm]], "Output",
CellTags->"DB0",
- CellLabel->"Out[1]=",
- CellID->758313713]
+ CellLabel->"Out[535]="]
}, Open ]]
}, Open ]],
@@ -289,12 +286,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{964, Automatic}, {Automatic, 121}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DB1.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DB1.nb
index eac7f5a84..cb3b1bd45 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DB1.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DB1.nb
@@ -168,9 +168,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/B1",
ButtonNote->"B1"],
"."
-}], "Text",
- CellTags->"DB1",
- CellID->489076083]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -211,52 +209,55 @@ Cell[BoxData[
SubscriptBox["m", "2"], "2"]}], "]"}], ",",
SubscriptBox["p", "2"]}], "]"}]], "Input",
CellTags->"DB1",
- CellLabel->"In[1]:=",
+ CellLabel->"In[539]:=",
CellID->1972383299],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- FractionBox[
- RowBox[{
- RowBox[{"(",
- RowBox[{
- SubsuperscriptBox["m", "2", "2"], "-",
- SubsuperscriptBox["m", "1", "2"]}], ")"}], " ",
- RowBox[{"(",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox["m", "1", "2"], "-",
+ SubsuperscriptBox["m", "2", "2"], "+",
+ SubscriptBox["p", "2"]}], ")"}], " ",
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubsuperscriptBox["m", "1", "2"], ",",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm]}],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["p", "2", "2"]}]], "-",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
RowBox[{
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{
- SubscriptBox["p", "2"], ",",
- SubsuperscriptBox["m", "1", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm], "-",
- FormBox[
- TagBox[
- FormBox[
- RowBox[{
- SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
- RowBox[{"0", ",",
- SubsuperscriptBox["m", "1", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}],
- TraditionalForm],
- HoldForm],
- TraditionalForm]}], ")"}]}],
- RowBox[{"2", " ",
- SubsuperscriptBox["p", "2", "2"]}]]}], "+",
+ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubsuperscriptBox["m", "1", "2"], ",",
+ SubsuperscriptBox["m", "2", "2"]}], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SubscriptBox["p", "2"]}]], "-",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
- SubsuperscriptBox["m", "2", "2"], "-",
- SubsuperscriptBox["m", "1", "2"]}], ")"}], " ",
+ SubsuperscriptBox["m", "1", "2"], "-",
+ SubsuperscriptBox["m", "2", "2"], "+",
+ SubscriptBox["p", "2"]}], ")"}], " ",
RowBox[{"DB0", "(",
RowBox[{
SubscriptBox["p", "2"], ",",
@@ -264,17 +265,32 @@ Cell[BoxData[
SubsuperscriptBox["m", "2", "2"]}], ")"}]}],
RowBox[{"2", " ",
SubscriptBox["p", "2"]}]], "-",
- RowBox[{
- FractionBox["1", "2"], " ",
- RowBox[{"DB0", "(",
- RowBox[{
- SubscriptBox["p", "2"], ",",
- SubsuperscriptBox["m", "1", "2"], ",",
- SubsuperscriptBox["m", "2", "2"]}], ")"}]}]}],
- TraditionalForm]], "Output",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SubsuperscriptBox["m", "1", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["p", "2", "2"]}]], "+",
+ FractionBox[
+ FormBox[
+ TagBox[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(",
+ SubsuperscriptBox["m", "2", "2"], ")"}],
+ TraditionalForm],
+ HoldForm],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ SubsuperscriptBox["p", "2", "2"]}]]}], TraditionalForm]], "Output",
CellTags->"DB1",
- CellLabel->"Out[1]=",
- CellID->369404311]
+ CellLabel->"Out[539]="]
}, Open ]]
}, Open ]],
@@ -339,12 +355,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1144, Automatic}, {Automatic, 137}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DCHN.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DCHN.nb
new file mode 100644
index 000000000..b0217f493
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DCHN.nb
@@ -0,0 +1,751 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DCHN", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DCHN", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is a chain of Dirac matrices x and is transformed into \
+DiracChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal."
+}], "Usage",
+ CellID->982511436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell["A standalone Dirac matrix with open Dirac indices", "Notes",
+ CellID->562724937],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ",", "i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[231]:=",
+ CellID->883461262],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[231]="]
+}, Open ]],
+
+Cell["A chain of Dirac matrices with open Dirac indices", "Notes",
+ CellID->1618780636],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}],
+ "]"}]], "Input",
+ CellLabel->"In[232]:=",
+ CellID->2010253364],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[232]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData[
+ OverscriptBox["u", "-"]], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->1250331575],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[233]:=",
+ CellID->1134519360],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[233]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData[
+ OverscriptBox["v", "-"]], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->63600432],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[234]:=",
+ CellID->443709048],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[234]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->1458298795],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{"i", ",",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[235]:=",
+ CellID->791949561],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[235]="]
+}, Open ]],
+
+Cell[TextData[{
+ "A single ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinor with an open Dirac index"
+}], "Notes",
+ CellID->2030312156],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{"i", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[236]:=",
+ CellID->227593440],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[236]="]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData[
+ OverscriptBox["u", "-"]], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1268031370],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[237]:=",
+ CellID->1380755633],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[237]="]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData[
+ OverscriptBox["v", "-"]], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->867998080],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",",
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->1948837227],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[8]=",
+ CellID->1888289142]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData["u"], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1238042528],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1936823151],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[9]=",
+ CellID->658668713]
+}, Open ]],
+
+Cell[TextData[{
+ " ",
+ Cell[BoxData["v"], "InlineFormula"],
+ " spinor contracted with a chain of Dirac matrices"
+}], "Notes",
+ CellID->1861495104],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1335889439],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[10]=",
+ CellID->2035121680]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{1920, 989},
+WindowMargins->{{-1, Automatic}, {Automatic, -1}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DIDelta.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DIDelta.nb
new file mode 100644
index 000000000..e6bdc0aa5
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DIDelta.nb
@@ -0,0 +1,911 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DIDelta", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DIDelta", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta in the Dirac space. DIDelta[i,j] is \
+transformed into DiracDelta[DiracIndex[i],DiracIndex[j]] by \
+FeynCalcInternal."
+}], "Usage",
+ CellID->982511436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[1]:=",
+ CellID->1903212195],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[1]=",
+ CellID->1647206544]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "i"}], "]"}]], "Input",
+ CellLabel->"In[2]:=",
+ CellID->221486333],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["i",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[2]=",
+ CellID->1722328628]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[3]:=",
+ CellID->1175096586],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ CellLabel->"Out[3]=",
+ CellID->565415250]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[4]:=",
+ CellID->280996541],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}], "2"], TraditionalForm]], "Output",
+ CellLabel->"Out[4]=",
+ CellID->552874525]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[5]:=",
+ CellID->717719024],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ CellLabel->"Out[5]=",
+ CellID->1577326774]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"j", ",", "k"}], "]"}]}]], "Input",
+ CellLabel->"In[6]:=",
+ CellID->66063638],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i",
+ TraditionalForm],
+ FormBox["j",
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["j",
+ TraditionalForm],
+ FormBox["k",
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[6]=",
+ CellID->916684113]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[7]:=",
+ CellID->804321979],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[7]=",
+ CellID->1567272290]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i0"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ",", "i1", ",", "i2"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "+", "m"}], ",", "i3", ",", "i4"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ",", "i5", ",", "i6"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i2", ",", "i3"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i4", ",", "i5"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{"i7", ",",
+ RowBox[{"SpinorV", "[", "q", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[8]:=",
+ CellID->758241863],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i2",
+ TraditionalForm],
+ FormBox["i3",
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox["i4",
+ TraditionalForm],
+ FormBox["i5",
+ TraditionalForm]}]], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["q",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i2",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[8]=",
+ CellID->1481144973]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ",", "i0"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ",", "i1", ",", "i2"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "+", "m"}], ",", "i3", ",", "i4"}],
+ "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ",", "i5", ",", "i6"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i2", ",", "i3"}], "]"}],
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i4", ",", "i5"}], "]"}],
+ RowBox[{"DCHN", "[",
+ RowBox[{"i7", ",",
+ RowBox[{"SpinorV", "[", "q", "]"}]}], "]"}]}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1093996001],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i2", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}]}], "]"}], " ",
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i4", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i7", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "q", "]"}]}], ",", "0", ",", "1"}], "]"}]}],
+ "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i0", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i1", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i2", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i6", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i4", "]"}]}], "]"}]}]], "Output",
+ CellLabel->"Out[9]//StandardForm=",
+ CellID->1943025584]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->1092912350],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[10]=",
+ CellID->523514846]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i0", ",", "i1"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->654220270],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[11]=",
+ CellID->1345169628]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i7", ",", "i6"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[12]:=",
+ CellID->427410435],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[12]=",
+ CellID->1753713613]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 404}, {20, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DOT.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DOT.nb
index 5ccf1d44e..f2b60a14f 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DOT.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DOT.nb
@@ -119,17 +119,20 @@ Cell[TextData[{
Cell[BoxData[
RowBox[{"DOT", "[",
RowBox[{"a", ",", " ", "b", ",", " ", "..."}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the FeynCalc function for non-commutative multiplication. By default it \
-is set to the Mathematica Dot function. This can in principle be disabled by \
-setting DOT=. (or by commenting out \[OpenCurlyDoubleQuote]DOT = Dot;\
-\[CloseCurlyDoubleQuote] in the file \"FeynCalc.m\"), but then \
-non-commutative products should to be entered like DOT[ DiracMatrix[mu], m + \
-DiracSlash[p], DiracMatrix[mu] ] etc."
+ " \[LineSeparator]is the FeynCalc function for non-commutative \
+multiplication. By default it is set to the ",
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " Dot function. "
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
+Cell["\<\
+This can in principle be disabled by setting DOT=. (or by commenting out \
+\[OpenCurlyDoubleQuote]DOT = Dot;\[CloseCurlyDoubleQuote] in the file \
+\"FCConfig.m\"), but then non-commutative products should to be entered like \
+DOT[ GA[mu], m + GS[p], GA[mu] ] etc.\
+\>", "Notes",
CellID->1067943069]
}, Open ]],
@@ -166,15 +169,12 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
ButtonBox["DotSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DotSimplify",
ButtonNote->"DotSimplify"],
"."
-}], "Text",
- CellTags->"DOT",
- CellID->1131348229]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -260,12 +260,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{768, Automatic}, {Automatic, 114}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DataType.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DataType.nb
index 773fbe62d..4774b4f15 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DataType.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DataType.nb
@@ -117,14 +117,18 @@ Cell["DataType", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"DataType", "[",
- RowBox[{"exp", ",", " ", "type"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "= True defines the object exp to have data-type type. DataType[exp1, exp2, \
-..., type] defines the objects exp1, exp2, ...to have data-type type. The \
-default setting is DataType[__, _] := False. To assign a certain data-type, \
-do, e.g., DataType[x, PositiveInteger] = True.\n\nCurrently used DataTypes: \
-",
+ RowBox[{
+ RowBox[{"DataType", "[",
+ RowBox[{"exp", ",", " ", "type"}], "]"}], "=", "True"}]], "InlineFormula"],
+ " \[LineSeparator]defines the object exp to have data-type type. \
+DataType[exp1, exp2, ..., type] defines the objects exp1, exp2, ...to have \
+data-type type. The default setting is DataType[__, _] := False. To assign a \
+certain data-type, do, e.g., DataType[x, PositiveInteger] = True."
+}], "Usage",
+ CellID->982511436],
+
+Cell[TextData[{
+ "Currently used DataTypes: ",
ButtonBox["NonCommutative",
BaseStyle->"AddOnsLink",
ButtonData:>"NonCommutative",
@@ -150,11 +154,15 @@ do, e.g., DataType[x, PositiveInteger] = True.\n\nCurrently used DataTypes: \
ButtonData:>"FreeIndex",
ButtonNote->"FreeIndex"],
", ",
- ButtonBox["GrassmannParity\n\n",
+ ButtonBox["GrassmannParity",
BaseStyle->"AddOnsLink",
ButtonData:>"GrassmannParity",
- ButtonNote->"GrassmannParity"],
- "PHI adds the DataTypes: ",
+ ButtonNote->"GrassmannParity"]
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "If loaded, PHI adds the DataTypes: ",
ButtonBox["UMatrix",
BaseStyle->"AddOnsLink",
ButtonData:>"UMatrix",
@@ -165,11 +173,7 @@ do, e.g., DataType[x, PositiveInteger] = True.\n\nCurrently used DataTypes: \
ButtonData:>"UScalar",
ButtonNote->"UScalar"],
"."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
+}], "Notes"]
}, Open ]],
Cell[CellGroupData[{
@@ -209,15 +213,8 @@ Cell[TextData[{
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DeclareNonCommutative",
ButtonNote->"DeclareNonCommutative"],
- ", ",
- ButtonBox["\"PHI - A Mathematica package for ChPT calculations\"",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/phi",
- ButtonNote->"phi"],
"."
-}], "Text",
- CellTags->"DataType",
- CellID->1742681066]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -244,9 +241,7 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["NonCommutative is just a data-type.", "Text",
- CellTags->"DataType",
- CellID->1046565146],
+Cell["NonCommutative is just a data-type.", "Notes"],
Cell[BoxData[
RowBox[{
@@ -255,7 +250,7 @@ Cell[BoxData[
RowBox[{"f", ",", "g", ",", " ", "NonCommutative"}], "]"}], " ", "=", " ",
"True"}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[1]:=",
+ CellLabel->"In[561]:=",
CellID->1643430273],
Cell[CellGroupData[{
@@ -268,7 +263,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"2", "a"}], ")"}], ".", "f"}]}]}]], "Input",
CellTags->"DataType",
- CellLabel->"In[2]:=",
+ CellLabel->"In[562]:=",
CellID->370505351],
Cell[BoxData[
@@ -279,14 +274,13 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"2", " ", "a"}], ")"}], ".", "f"}]}], TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[2]=",
- CellID->353088944]
+ CellLabel->"Out[562]="]
}, Open ]],
Cell["\<\
Since \"f \"and \"g\" have DataType NonCommutative the function DotSimplify \
extracts only \"a\" out of the noncommutative product.\
-\>", "Text",
+\>", "Notes",
CellTags->"DataType",
CellID->2142748174],
@@ -295,7 +289,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DotSimplify", "[", "t", "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[3]:=",
+ CellLabel->"In[563]:=",
CellID->1089346644],
Cell[BoxData[
@@ -305,8 +299,7 @@ Cell[BoxData[
RowBox[{"2", " ", "a", " ",
RowBox[{"g", ".", "f"}]}]}], TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[3]=",
- CellID->1728093744]
+ CellLabel->"Out[563]="]
}, Open ]],
Cell[BoxData[
@@ -318,7 +311,7 @@ Cell[BoxData[
RowBox[{"DataType", "[",
RowBox[{"a", ",", "even"}], "]"}], "=", "True"}]}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[4]:=",
+ CellLabel->"In[564]:=",
CellID->2121249133],
Cell[BoxData[
@@ -335,7 +328,7 @@ Cell[BoxData[
RowBox[{"n", ",", "odd"}], "]"}]}], "\[RuleDelayed]",
RowBox[{"-", "1"}]}]}]}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[5]:=",
+ CellLabel->"In[565]:=",
CellID->1782213069],
Cell[BoxData[
@@ -352,7 +345,7 @@ Cell[BoxData[
RowBox[{"n", ",", "even"}], "]"}]}], "\[RuleDelayed]", "1"}]}]}],
";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[6]:=",
+ CellLabel->"In[566]:=",
CellID->1543768294],
Cell[CellGroupData[{
@@ -370,7 +363,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "^", "z"}]}]}]], "Input",
CellTags->"DataType",
- CellLabel->"In[7]:=",
+ CellLabel->"In[567]:=",
CellID->1135363295],
Cell[BoxData[
@@ -386,8 +379,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "z"]}], TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[7]=",
- CellID->538518934]
+ CellLabel->"Out[567]="]
}, Open ]],
Cell[CellGroupData[{
@@ -395,7 +387,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ptest1", "[", "t", "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[8]:=",
+ CellLabel->"In[568]:=",
CellID->703322505],
Cell[BoxData[
@@ -409,8 +401,7 @@ Cell[BoxData[
RowBox[{"-", "1"}], ")"}], "z"], "-", "1"}], TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[8]=",
- CellID->1174286962]
+ CellLabel->"Out[568]="]
}, Open ]],
Cell[CellGroupData[{
@@ -418,7 +409,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ptest2", "[", "%", "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[9]:=",
+ CellLabel->"In[569]:=",
CellID->1711798640],
Cell[BoxData[
@@ -427,8 +418,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "z"], TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[9]=",
- CellID->1170774235]
+ CellLabel->"Out[569]="]
}, Open ]],
Cell[BoxData[
@@ -437,16 +427,16 @@ Cell[BoxData[
RowBox[{"ptest1", ",", "ptest2", ",", "t", ",", "a", ",", "m"}], "]"}],
";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[10]:=",
+ CellLabel->"In[570]:=",
CellID->1299043006],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"DataType", "[",
- RowBox[{"m", ",", "ganzeZahl"}], "]"}], "=", "True"}], ";"}]], "Input",
+ RowBox[{"m", ",", "integer"}], "]"}], "=", "True"}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[11]:=",
+ CellLabel->"In[571]:=",
CellID->585585082],
Cell[BoxData[
@@ -461,10 +451,10 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "^", "p_"}], "/;",
RowBox[{"DataType", "[",
- RowBox[{"p", ",", "ganzeZahl"}], "]"}]}], "\[RuleDelayed]", "1"}],
+ RowBox[{"p", ",", "integer"}], "]"}]}], "\[RuleDelayed]", "1"}],
"}"}]}]}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[12]:=",
+ CellLabel->"In[572]:=",
CellID->846476868],
Cell[CellGroupData[{
@@ -480,7 +470,7 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"-", "1"}], ")"}], "^", "n"}], " ", "x"}]}]}]], "Input",
CellTags->"DataType",
- CellLabel->"In[13]:=",
+ CellLabel->"In[573]:=",
CellID->1533391272],
Cell[BoxData[
@@ -495,8 +485,7 @@ Cell[BoxData[
RowBox[{"-", "1"}], ")"}], "n"], " ", "x"}]}],
TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[13]=",
- CellID->41432149]
+ CellLabel->"Out[573]="]
}, Open ]],
Cell[CellGroupData[{
@@ -504,7 +493,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"f", "[", "test", "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[14]:=",
+ CellLabel->"In[574]:=",
CellID->1293981643],
Cell[BoxData[
@@ -516,8 +505,7 @@ Cell[BoxData[
RowBox[{"-", "1"}], ")"}], "n"], " ", "x"}], "+", "1"}],
TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[14]=",
- CellID->1117139634]
+ CellLabel->"Out[574]="]
}, Open ]],
Cell[BoxData[
@@ -525,7 +513,7 @@ Cell[BoxData[
RowBox[{"Clear", "[",
RowBox[{"f", ",", "test"}], "]"}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[15]:=",
+ CellLabel->"In[575]:=",
CellID->943541195],
Cell[BoxData[
@@ -535,7 +523,7 @@ Cell[BoxData[
RowBox[{"f", ",", "g", ",", " ", "NonCommutative"}], "]"}], " ", "=", " ",
"False"}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[16]:=",
+ CellLabel->"In[576]:=",
CellID->1739727758],
Cell[BoxData[
@@ -547,14 +535,12 @@ Cell[BoxData[
RowBox[{"DataType", "[",
RowBox[{"a", ",", "even"}], "]"}], "=", "False"}]}], ";"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[17]:=",
+ CellLabel->"In[577]:=",
CellID->1265503982],
Cell["\<\
Certain FeynCalc objects have DataType PositiveInteger set to True.\
-\>", "Text",
- CellTags->"DataType",
- CellID->1789811013],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -562,19 +548,16 @@ Cell[BoxData[
RowBox[{"DataType", "[",
RowBox[{"OPEm", ",", "PositiveInteger"}], "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[18]:=",
+ CellLabel->"In[578]:=",
CellID->693329232],
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[18]=",
- CellID->1327437721]
+ CellLabel->"Out[578]="]
}, Open ]],
-Cell["PowerSimplify uses the DataType information.", "Text",
- CellTags->"DataType",
- CellID->2130197226],
+Cell["PowerSimplify uses the DataType information.", "Notes"],
Cell[CellGroupData[{
@@ -586,14 +569,13 @@ Cell[BoxData[
RowBox[{"(",
RowBox[{"2", "OPEm"}], ")"}]}], "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[19]:=",
+ CellLabel->"In[579]:=",
CellID->1014422116],
Cell[BoxData[
FormBox["1", TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[19]=",
- CellID->410693850]
+ CellLabel->"Out[579]="]
}, Open ]],
Cell[CellGroupData[{
@@ -605,7 +587,7 @@ Cell[BoxData[
RowBox[{"-", " ",
RowBox[{"SO", "[", "q", "]"}]}], ")"}], "^", "OPEm"}], "]"}]], "Input",
CellTags->"DataType",
- CellLabel->"In[20]:=",
+ CellLabel->"In[580]:=",
CellID->1682583494],
Cell[BoxData[
@@ -635,8 +617,7 @@ Cell[BoxData[
RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", "m"}]}]]}],
TraditionalForm]], "Output",
CellTags->"DataType",
- CellLabel->"Out[20]=",
- CellID->359212449]
+ CellLabel->"Out[580]="]
}, Open ]]
}, Open ]],
@@ -701,12 +682,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{874, Automatic}, {Automatic, 54}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareFCTensor.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareFCTensor.nb
new file mode 100644
index 000000000..5b9f18ce3
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareFCTensor.nb
@@ -0,0 +1,339 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DeclareFCTensor", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DeclareFCTensor", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DeclareFCTensor", "[",
+ RowBox[{"a", ",", " ", "b", ",", " ", "..."}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]declares a,b, ... to be tensor heads, i.e., DataType[a,b, \
+..., FCTensor] is set to True."
+}], "Usage",
+ CellID->982511436],
+
+Cell["XXXX", "Notes",
+ CellID->1067943069]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["ExpandScalarProduct",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ExpandScalarProduct",
+ ButtonNote->"ExpandScalarProduct"],
+ ", ",
+ ButtonBox["Uncontract",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Uncontract",
+ ButtonNote->"Uncontract"],
+ "."
+}], "SeeAlso",
+ CellID->1253676121]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[BoxData[
+ RowBox[{"ClearAll", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[582]:=",
+ CellID->1149397665],
+
+Cell[BoxData[
+ RowBox[{"DeclareFCTensor", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[583]:=",
+ CellID->384608883],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ExpandScalarProduct", "[",
+ RowBox[{"myTens", "[",
+ RowBox[{"z", ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"a", "+", "b"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"c", "+", "d"}], "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[584]:=",
+ CellID->816959797],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"]}], ")"}], "+",
+ RowBox[{"myTens", "(",
+ RowBox[{"z", ",",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"], ",",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[584]=",
+ CellID->919476301]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{"UnDeclareFCTensor", "[", "myTens", "]"}]], "Input",
+ CellLabel->"In[585]:=",
+ CellID->2018380174]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{834, Automatic}, {Automatic, 99}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareNonCommutative.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareNonCommutative.nb
index afb164dfd..5e7730901 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareNonCommutative.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeclareNonCommutative.nb
@@ -172,9 +172,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/UnDeclareNonCommutative",
ButtonNote->"UnDeclareNonCommutative"],
"."
-}], "Text",
- CellTags->"DeclareNonCommutative",
- CellID->716831943]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -210,9 +208,7 @@ Cell[BoxData[
Cell["\<\
As a side effect of DeclareNonCommutative x is declared to be of data type \
NonCommutative.\
-\>", "Text",
- CellTags->"DeclareNonCommutative",
- CellID->836055796],
+\>", "Notes"],
Cell[CellGroupData[{
@@ -220,21 +216,20 @@ Cell[BoxData[
RowBox[{"DataType", "[",
RowBox[{"x", ",", "NonCommutative"}], "]"}]], "Input",
CellTags->"DeclareNonCommutative",
- CellLabel->"In[2]:=",
+ CellLabel->"In[587]:=",
CellID->903276535],
Cell[BoxData[
FormBox["True", TraditionalForm]], "Output",
CellTags->"DeclareNonCommutative",
- CellLabel->"Out[2]=",
- CellID->2100185008]
+ CellLabel->"Out[587]="]
}, Open ]],
Cell[BoxData[
RowBox[{"DeclareNonCommutative", "[",
RowBox[{"y", ",", "z"}], "]"}]], "Input",
CellTags->"DeclareNonCommutative",
- CellLabel->"In[3]:=",
+ CellLabel->"In[588]:=",
CellID->429692038],
Cell[CellGroupData[{
@@ -244,7 +239,7 @@ Cell[BoxData[
RowBox[{"a", ",", "x", ",", "y", ",", "z", ",", "NonCommutative"}],
"]"}]], "Input",
CellTags->"DeclareNonCommutative",
- CellLabel->"In[4]:=",
+ CellLabel->"In[589]:=",
CellID->498899039],
Cell[BoxData[
@@ -253,15 +248,14 @@ Cell[BoxData[
RowBox[{"False", ",", "True", ",", "True", ",", "True"}], "}"}],
TraditionalForm]], "Output",
CellTags->"DeclareNonCommutative",
- CellLabel->"Out[4]=",
- CellID->1479757554]
+ CellLabel->"Out[589]="]
}, Open ]],
Cell[BoxData[
RowBox[{"UnDeclareNonCommutative", "[",
RowBox[{"x", ",", "y", ",", "z"}], "]"}]], "Input",
CellTags->"DeclareNonCommutative",
- CellLabel->"In[5]:=",
+ CellLabel->"In[590]:=",
CellID->660830730],
Cell[CellGroupData[{
@@ -271,7 +265,7 @@ Cell[BoxData[
RowBox[{"a", ",", "x", ",", "y", ",", "z", ",", "NonCommutative"}],
"]"}]], "Input",
CellTags->"DeclareNonCommutative",
- CellLabel->"In[6]:=",
+ CellLabel->"In[591]:=",
CellID->1927435284],
Cell[BoxData[
@@ -280,8 +274,7 @@ Cell[BoxData[
RowBox[{"False", ",", "False", ",", "False", ",", "False"}], "}"}],
TraditionalForm]], "Output",
CellTags->"DeclareNonCommutative",
- CellLabel->"Out[6]=",
- CellID->1909095440]
+ CellLabel->"Out[591]="]
}, Open ]]
}, Open ]],
@@ -346,12 +339,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{692, Automatic}, {Automatic, 218}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunction.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunction.nb
index cccd9cac0..e281a7408 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunction.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunction.nb
@@ -118,19 +118,21 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DeltaFunction", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the Dirac delta-function ",
+ " \[LineSeparator]is the Dirac delta-function ",
Cell[BoxData[
FormBox[
RowBox[{"\[Delta]", "(", "x", ")"}], TraditionalForm]]],
- ".\nNOTICE: After version 4 of ",
- StyleBox["Mathematica",
- FontSlant->"Italic"],
- " there is a built-in function, DiracDelta, with comparable properties."
+ "."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
+Cell[TextData[{
+ StyleBox["Mathematica",
+ FontSlant->"Italic"],
+ " also provides a built-in function ",
+ Cell[BoxData["DiracDelta"], "InlineFormula"],
+ " with comparable properties."
+}], "Notes",
CellID->1067943069]
}, Open ]],
@@ -187,9 +189,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/SimplifyDeltaFunction",
ButtonNote->"SimplifyDeltaFunction"],
"."
-}], "Text",
- CellTags->"DeltaFunction",
- CellID->1180269291]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -222,7 +222,7 @@ Cell[BoxData[
RowBox[{"DeltaFunction", "[",
RowBox[{"1", "-", "x"}], "]"}]], "Input",
CellTags->"DeltaFunction",
- CellLabel->"In[1]:=",
+ CellLabel->"In[592]:=",
CellID->1276544329],
Cell[BoxData[
@@ -232,8 +232,7 @@ Cell[BoxData[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
CellTags->"DeltaFunction",
- CellLabel->"Out[1]=",
- CellID->1935055166]
+ CellLabel->"Out[592]="]
}, Open ]],
Cell[CellGroupData[{
@@ -248,15 +247,14 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"DeltaFunction",
- CellLabel->"In[2]:=",
+ CellLabel->"In[593]:=",
CellID->656921459],
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
CellTags->"DeltaFunction",
- CellLabel->"Out[2]=",
- CellID->904672527]
+ CellLabel->"Out[593]="]
}, Open ]],
Cell[CellGroupData[{
@@ -270,15 +268,14 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"DeltaFunction",
- CellLabel->"In[3]:=",
+ CellLabel->"In[594]:=",
CellID->146135859],
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "0", ")"}], TraditionalForm]], "Output",
CellTags->"DeltaFunction",
- CellLabel->"Out[3]=",
- CellID->694516034]
+ CellLabel->"Out[594]="]
}, Open ]],
Cell[CellGroupData[{
@@ -293,26 +290,29 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"DeltaFunction",
- CellLabel->"In[4]:=",
+ CellLabel->"In[595]:=",
CellID->77885451],
Cell[BoxData[
FormBox[
RowBox[{"f", "(", "1", ")"}], TraditionalForm]], "Output",
CellTags->"DeltaFunction",
- CellLabel->"Out[4]=",
- CellID->877420351]
+ CellLabel->"Out[595]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"Convolute", "[",
+ RowBox[{
+ RowBox[{"DeltaFunction", "[",
+ RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}], "/.",
RowBox[{
- RowBox[{"DeltaFunction", "[",
- RowBox[{"1", "-", "x"}], "]"}], ",", "x"}], "]"}]], "Input",
+ RowBox[{"FCGV", "[", "z_", "]"}], "\[RuleDelayed]",
+ RowBox[{"ToExpression", "[", "z", "]"}]}]}]], "Input",
CellTags->"DeltaFunction",
- CellLabel->"In[5]:=",
+ CellLabel->"In[597]:=",
CellID->2128349],
Cell[BoxData[
@@ -323,12 +323,9 @@ Cell[BoxData[
FormBox[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], " ",
- RowBox[{"log", "(",
- RowBox[{"FCGV", "(", "\<\"x\"\>", ")"}], ")"}]}],
- TraditionalForm]], "Output",
+ RowBox[{"log", "(", "x", ")"}]}], TraditionalForm]], "Output",
CellTags->"DeltaFunction",
- CellLabel->"Out[5]=",
- CellID->984049833]
+ CellLabel->"Out[597]="]
}, Open ]]
}, Open ]],
@@ -393,12 +390,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1080, Automatic}, {Automatic, 240}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb
index 58d6cfa44..3b0e9d003 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionDoublePrime.nb
@@ -165,15 +165,12 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
ButtonBox["DeltaFunctionPrime",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DeltaFunctionPrime",
ButtonNote->"DeltaFunctionPrime"],
"."
-}], "Text",
- CellTags->"DeltaFunctionDoublePrime",
- CellID->1988601213]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -259,12 +256,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{963, Automatic}, {Automatic, 140}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionPrime.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionPrime.nb
index 6655b99cb..7d2fc97b0 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionPrime.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DeltaFunctionPrime.nb
@@ -165,7 +165,6 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
ButtonBox["Convolute",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/Convolute",
@@ -191,9 +190,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/SimplifyDeltaFunction",
ButtonNote->"SimplifyDeltaFunction"],
"."
-}], "Text",
- CellTags->"DeltaFunctionPrime",
- CellID->1121609320]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -226,7 +223,7 @@ Cell[BoxData[
RowBox[{"DeltaFunctionPrime", "[",
RowBox[{"1", "-", "x"}], "]"}]], "Input",
CellTags->"DeltaFunctionPrime",
- CellLabel->"In[1]:=",
+ CellLabel->"In[598]:=",
CellID->677883424],
Cell[BoxData[
@@ -237,8 +234,7 @@ Cell[BoxData[
RowBox[{"1", "-", "x"}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
CellTags->"DeltaFunctionPrime",
- CellLabel->"Out[1]=",
- CellID->1329619670]
+ CellLabel->"Out[598]="]
}, Open ]],
Cell[CellGroupData[{
@@ -253,7 +249,7 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"DeltaFunctionPrime",
- CellLabel->"In[2]:=",
+ CellLabel->"In[599]:=",
CellID->666771914],
Cell[BoxData[
@@ -262,8 +258,7 @@ Cell[BoxData[
SuperscriptBox["f", "\[Prime]",
MultilineFunction->None], "(", "1", ")"}], TraditionalForm]], "Output",
CellTags->"DeltaFunctionPrime",
- CellLabel->"Out[2]=",
- CellID->1211576646]
+ CellLabel->"Out[599]="]
}, Open ]],
Cell[CellGroupData[{
@@ -278,14 +273,13 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
CellTags->"DeltaFunctionPrime",
- CellLabel->"In[3]:=",
+ CellLabel->"In[600]:=",
CellID->1722060708],
Cell[BoxData[
FormBox["2", TraditionalForm]], "Output",
CellTags->"DeltaFunctionPrime",
- CellLabel->"Out[3]=",
- CellID->1114808117]
+ CellLabel->"Out[600]="]
}, Open ]]
}, Open ]],
@@ -350,12 +344,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1011, Automatic}, {Automatic, 185}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DenominatorOrder.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DenominatorOrder.nb
deleted file mode 100644
index 4390c8882..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DenominatorOrder.nb
+++ /dev/null
@@ -1,270 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DenominatorOrder", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DenominatorOrder", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["DenominatorOrder"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for OneLoop, if set to True the PropagatorDenominator will be \
-ordered in a standard way."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- ButtonBox["OneLoop",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/OneLoop",
- ButtonNote->"OneLoop"],
- ", ",
- ButtonBox["PropagatorDenominator",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/PropagatorDenominator",
- ButtonNote->"PropagatorDenominator"],
- "."
-}], "Text",
- CellTags->"DenominatorOrder",
- CellID->1578744187]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/Dimension.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/Dimension.nb
index 459b8d873..680e2fa09 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/Dimension.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/Dimension.nb
@@ -188,16 +188,12 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell["Examples", "Subsubsection",
- CellTags->"Dimension",
- CellID->269185513],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "MetricTensor", "]"}]], "Input",
+ RowBox[{"Options", "[", "ScalarProduct", "]"}]], "Input",
CellTags->"Dimension",
- CellLabel->"In[1]:=",
+ CellLabel->"In[601]:=",
CellID->48360105],
Cell[BoxData[
@@ -205,193 +201,56 @@ Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}], ",",
+ RowBox[{"SetDimensions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"4", ",", "D"}], "}"}]}]}], "}"}], TraditionalForm]], "Output",
CellTags->"Dimension",
- CellLabel->"Out[1]=",
- CellID->1017306369]
+ CellLabel->"Out[601]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"m", ",", "n", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}]}]], "Input",
+ RowBox[{"ScalarProduct", "[",
+ RowBox[{"m", ",", "n", ",",
+ RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}]], "Input",
CellTags->"Dimension",
- CellLabel->"In[2]:=",
+ CellLabel->"In[602]:=",
CellID->1811829745],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], " ",
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox["m",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["n",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"Dimension",
- CellLabel->"Out[2]=",
- CellID->1365396948]
-}, Open ]],
-
-Cell["\<\
-The dimension of the indices is not shown by default but can be inspected \
-easily.\
-\>", "Text",
- CellTags->"Dimension",
- CellID->1652643284],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"m", ",", "n", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "d"}]}], "]"}]}], "//",
- "StandardForm"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[3]:=",
- CellID->799099233],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "d"}], "]"}], ",", "d"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"m", ",", "d"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"n", ",", "d"}], "]"}]}], "]"}]}]], "Output",
- CellTags->"Dimension",
- CellLabel->"Out[3]//StandardForm=",
- CellID->379657902]
-}, Open ]],
-
-Cell["\<\
-Setting the global variable $LorentzIndices to True will display the \
-dimension (if different from 4) as a subscript.\
-\>", "Text",
- CellTags->"Dimension",
- CellID->1658312621],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "True"}], ";"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[4]:=",
- CellID->136991377],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"MetricTensor", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}],
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Alpha]", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}]}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[5]:=",
- CellID->1877198136],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm]], " ",
+ FormBox["m",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- SubscriptBox[
- FormBox["\[Beta]",
- TraditionalForm],
- FormBox["n",
- TraditionalForm]],
- TraditionalForm],
- TraditionalForm]}]],
+ FormBox["n",
+ TraditionalForm],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"Dimension",
- CellLabel->"Out[5]=",
- CellID->1953179545]
+ CellLabel->"Out[602]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[6]:=",
- CellID->40947459],
+ CellLabel->"In[603]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",", "n"}], "]"}], " ",
- RowBox[{"Pair", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Alpha]", ",", "n"}], "]"}], ",",
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Beta]", ",", "n"}], "]"}]}], "]"}]}]], "Output",
- CellTags->"Dimension",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1903897849]
-}, Open ]],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"$LorentzIndices", "=", "False"}], ";"}]], "Input",
- CellTags->"Dimension",
- CellLabel->"In[7]:=",
- CellID->889371773]
+ RowBox[{"Pair", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"m", ",", "d"}], "]"}], ",",
+ RowBox[{"Momentum", "[",
+ RowBox[{"n", ",", "d"}], "]"}]}], "]"}]], "Output",
+ CellLabel->"Out[603]//StandardForm="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -455,12 +314,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{939, Automatic}, {Automatic, 156}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DimensionalReduction.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DimensionalReduction.nb
deleted file mode 100644
index a181935a4..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DimensionalReduction.nb
+++ /dev/null
@@ -1,269 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DimensionalReduction", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DimensionalReduction", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["DimensionalReduction"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for TID and OneLoopSimplify."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- ButtonBox["TID",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/TID",
- ButtonNote->"TID"],
- ", ",
- ButtonBox["OneLoopSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/OneLoopSimplify",
- ButtonNote->"OneLoopSimplify"],
- "."
-}], "Text",
- CellTags->"DimensionalReduction",
- CellID->1470280518]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracBasis.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracBasis.nb
index 31d7f0f8b..ee80d2070 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracBasis.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracBasis.nb
@@ -118,14 +118,24 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DiracBasis", "[", "any", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is a head which is wrapped around Dirac structures (and the 1) as a result \
-of the function DiracReduce. Eventually you want to substitute DiracBasis by \
-Identity (or set: DiracBasis[1] = S; DiracBasis[DiracMatrix[mu]] = P; etc.)."
+ " \[LineSeparator]is a head which is wrapped around Dirac structures (and \
+the 1) as a result of the function ",
+ ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ "."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
+Cell[TextData[{
+ "For more details, see the documentation for ",
+ ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ "."
+}], "Notes",
CellID->1067943069]
}, Open ]],
@@ -161,16 +171,10 @@ Cell[CellGroupData[{
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[TextData[{
- "See also: ",
- ButtonBox["DiracReduce",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracReduce",
- ButtonNote->"DiracReduce"],
- "."
-}], "Text",
- CellTags->"DiracBasis",
- CellID->1805198737]
+Cell[TextData[ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"]], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -256,12 +260,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1358, Automatic}, {Automatic, 247}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracCanonical.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracCanonical.nb
deleted file mode 100644
index 3cb941bbe..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracCanonical.nb
+++ /dev/null
@@ -1,265 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DiracCanonical", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DiracCanonical", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["DiracCanonical"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracSimplify. If set to True DiracSimplify uses the \
-function DiracOrder internally."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"DiracCanonical",
- CellID->12780681]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChain.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChain.nb
new file mode 100644
index 000000000..d3cb54ac8
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChain.nb
@@ -0,0 +1,859 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracChain", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracChain", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]denotes a chain of Dirac matrices x, where the Dirac \
+indices i and j are explicit."
+}], "Usage",
+ CellID->982511436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell["A standalone Dirac matrix", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[226]:=",
+ CellID->1948609293],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[226]="]
+}, Open ]],
+
+Cell["A chain of Dirac matrices with open indices", "Notes",
+ CellID->976984379],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"LorentzIndex", "[",
+ RowBox[{"\[Nu]", ",", "D"}], "]"}], ",", "D"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[227]:=",
+ CellID->699845331],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[227]="]
+}, Open ]],
+
+Cell["\<\
+A DiracChain with only two arguments denotes a spinor component\
+\>", "Notes",
+ CellID->1440903900],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[228]:=",
+ CellID->1523270401],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[228]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "p"}], "]"}], ",", "m"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[219]:=",
+ CellID->2053038750],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[219]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[220]:=",
+ CellID->10435576],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[220]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{"-", "p"}], "]"}], ",", "m"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[221]:=",
+ CellID->213074326],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[221]="]
+}, Open ]],
+
+Cell["The chain may also be partially open or closed", "Notes",
+ CellID->853429857],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[222]:=",
+ CellID->943655043],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[222]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[223]:=",
+ CellID->1504197659],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[223]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ")"}], ".",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}]}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1", ",", "1"}], "]"}], ",",
+
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[224]:=",
+ CellID->765104786],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[224]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChain", "[",
+ RowBox[{"1", ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p1", "]"}], ",", "m1", ",", "1"}], "]"}], ",",
+
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p2", "]"}], ",", "m2", ",", "1"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[225]:=",
+ CellID->322314800],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[225]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 327}, {-10, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainCombine.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainCombine.nb
new file mode 100644
index 000000000..18c5a28b0
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainCombine.nb
@@ -0,0 +1,901 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 23230, 893]
+NotebookOptionsPosition[ 18789, 734]
+NotebookOutlinePosition[ 19402, 758]
+CellTagsIndexPosition[ 19323, 753]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracChainCombine", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracChainCombine", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracChainCombine", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]",
+ " is (nearly) the inverse operation to DiracChainExpand."
+}], "Usage",
+ CellChangeTimes->{{3.774115721375019*^9, 3.77411572289812*^9}, {
+ 3.774115759739462*^9, 3.774115760887486*^9}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainCombine", "]"}]], "Input",
+ CellChangeTimes->{{3.7741157293326406`*^9, 3.774115733274345*^9}},
+ CellLabel->"In[22]:=",
+ CellID->670437197],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellChangeTimes->{3.774115733653843*^9},
+ CellLabel->"Out[22]=",
+ CellID->1598248678]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellChangeTimes->{{3.7779951099681683`*^9, 3.777995110476942*^9}},
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",", "Dir3", ",", "Dir4"}], "]"}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"{",
+ RowBox[{"k", ",", "me"}], "}"}], "]"}]}], ")"}], "/",
+ RowBox[{"(",
+ RowBox[{"2", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"1", "/",
+ RowBox[{"(",
+ RowBox[{"2", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}], " ",
+ RowBox[{"FAD", "[",
+ RowBox[{"k", ",",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"k", "-", "q"}], ",", "me"}], "}"}]}], "]"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "2"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",", "Dir3", ",", "Dir4"}], "]"}],
+ " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{"1", ",", "Dir3", ",", "Dir4"}], "]"}], " ", "me", " ",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], "+",
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",", "Dir3", ",", "Dir4"}], "]"}],
+ " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"me", "^", "2"}]}], "+",
+ RowBox[{"SPD", "[",
+ RowBox[{"q", ",", "q"}], "]"}]}], ")"}]}]}], ")"}]}]}]], "Input",
+ CellChangeTimes->{{3.7741156985425587`*^9, 3.7741156985436773`*^9}},
+ CellLabel->"In[238]:=",
+ CellID->1233377850],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], "-",
+ SuperscriptBox["me", "2"]}], ")"}], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], "+",
+ RowBox[{"2", " ", "me", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox["1",
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}], "-",
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm]}]}],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k - $CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k - $CellContext`q, D]],
+ "-", $CellContext`me^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm],
+ RowBox[{"2", " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ TraditionalForm], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellChangeTimes->{3.7741157002370768`*^9, 3.777994801124071*^9,
+ 3.77799485527008*^9},
+ CellLabel->"Out[238]=",
+ CellID->1716418003]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainCombine", "[", "%", "]"}]], "Input",
+ CellChangeTimes->{{3.774115708562398*^9, 3.774115714116384*^9}},
+ CellLabel->"In[239]:=",
+ CellID->1961255087],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ FractionBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], "-",
+ SuperscriptBox["me", "2"]}], ")"}], " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], "+",
+ RowBox[{"2", " ", "me", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ InterpretationBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]]],
+ Editable->False], ".",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["k",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D],
+ FeynCalc`Momentum[$CellContext`k, D] -
+ FeynCalc`Momentum[$CellContext`q, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}]}]}]],
+ TraditionalForm], "+",
+ FormBox[
+ FractionBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["Dir3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["Dir4",
+ TraditionalForm],
+ TraditionalForm]}]],
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{"(",
+ InterpretationBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm], "2"], "\[InvisibleSpace]", "\<\"-\"\>",
+ "\[InvisibleSpace]",
+ SuperscriptBox["me", "2"]}],
+ SequenceForm[
+ FeynCalc`Pair[
+ FeynCalc`Momentum[$CellContext`k, D],
+ FeynCalc`Momentum[$CellContext`k, D]], "-", $CellContext`me^2],
+ Editable->False], ")"}]}]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellChangeTimes->{3.774115715916849*^9, 3.777994802113214*^9,
+ 3.7779948559371367`*^9},
+ CellLabel->"Out[239]=",
+ CellID->1277579139]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 431}, {-10, Automatic}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "ExtendedExamples"->{
+ Cell[17269, 676, 100, 2, 55, "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"ExtendedExamples", 19184, 746}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 325, 14, 25, "History",
+ CellID->1247902091],
+Cell[CellGroupData[{
+Cell[908, 38, 68, 1, 29, "CategorizationSection",
+ CellID->1122911449],
+Cell[979, 41, 79, 2, 70, "Categorization",
+ CellID->686433507],
+Cell[1061, 45, 81, 2, 70, "Categorization",
+ CellID->605800465],
+Cell[1145, 49, 78, 2, 70, "Categorization",
+ CellID->468444828],
+Cell[1226, 53, 75, 1, 70, "Categorization"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1338, 59, 55, 1, 19, "KeywordsSection",
+ CellID->477174294],
+Cell[1396, 62, 45, 1, 70, "Keywords",
+ CellID->1164421360]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1478, 68, 65, 1, 19, "TemplatesSection",
+ CellID->1872225408],
+Cell[1546, 71, 94, 2, 70, "Template",
+ CellID->1562036412],
+Cell[1643, 75, 82, 2, 70, "Template",
+ CellID->158391909],
+Cell[1728, 79, 81, 2, 70, "Template",
+ CellID->1360575930],
+Cell[1812, 83, 82, 2, 70, "Template",
+ CellID->793782254]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1931, 90, 53, 1, 19, "DetailsSection",
+ CellID->307771771],
+Cell[1987, 93, 63, 2, 70, "Details",
+ CellID->670882175],
+Cell[2053, 97, 69, 2, 70, "Details",
+ CellID->350963985],
+Cell[2125, 101, 64, 2, 70, "Details",
+ CellID->8391405],
+Cell[2192, 105, 69, 2, 70, "Details",
+ CellID->3610269],
+Cell[2264, 109, 61, 2, 70, "Details",
+ CellID->401364205],
+Cell[2328, 113, 61, 2, 70, "Details",
+ CellID->350204745],
+Cell[2392, 117, 63, 2, 70, "Details",
+ CellID->732958810],
+Cell[2458, 121, 78, 2, 70, "Details",
+ CellID->222905350],
+Cell[2539, 125, 67, 2, 70, "Details",
+ CellID->240026365]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[2643, 132, 60, 1, 64, "ObjectName",
+ CellID->1224892054],
+Cell[2706, 135, 352, 9, 75, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3083, 148, 188, 4, 26, "Input",
+ CellID->670437197],
+Cell[3274, 154, 354, 10, 26, "Output",
+ CellID->1598248678]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[3677, 170, 57, 1, 44, "TutorialsSection",
+ CellID->250839057],
+Cell[3737, 173, 45, 1, 17, "Tutorials",
+ CellID->341631938]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[3819, 179, 83, 1, 31, "RelatedDemonstrationsSection",
+ CellID->1268215905],
+Cell[3905, 182, 58, 1, 17, "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4000, 188, 65, 1, 31, "RelatedLinksSection",
+ CellID->1584193535],
+Cell[4068, 191, 49, 1, 17, "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4154, 197, 55, 1, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[4212, 200, 1198, 43, 31, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5447, 248, 57, 1, 31, "MoreAboutSection",
+ CellID->38303248],
+Cell[5507, 251, 46, 1, 17, "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5590, 257, 356, 11, 69, "PrimaryExamplesSection",
+ CellID->880084151],
+Cell[CellGroupData[{
+Cell[5971, 272, 1668, 54, 103, "Input",
+ CellID->1233377850],
+Cell[7642, 328, 5268, 190, 107, "Output",
+ CellID->1716418003]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[12947, 523, 182, 4, 26, "Input",
+ CellID->1961255087],
+Cell[13132, 529, 4088, 141, 58, "Output",
+ CellID->1277579139]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[17269, 676, 100, 2, 55, "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+Cell[17372, 680, 125, 3, 33, "ExampleSection",
+ CellID->1293636265],
+Cell[17500, 685, 148, 3, 21, "ExampleSection",
+ CellID->1020263627],
+Cell[CellGroupData[{
+Cell[17673, 692, 127, 3, 21, "ExampleSection",
+ CellID->2061341341],
+Cell[17803, 697, 130, 3, 70, "ExampleSubsection",
+ CellID->1757724783],
+Cell[17936, 702, 130, 3, 70, "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+Cell[18081, 708, 131, 3, 21, "ExampleSection",
+ CellID->258228157],
+Cell[18215, 713, 142, 3, 21, "ExampleSection",
+ CellID->2123667759],
+Cell[18360, 718, 135, 3, 21, "ExampleSection",
+ CellID->1305812373],
+Cell[18498, 723, 140, 3, 21, "ExampleSection",
+ CellID->1653164318],
+Cell[18641, 728, 132, 3, 21, "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+}
+]
+*)
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainExpand.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainExpand.nb
new file mode 100644
index 000000000..efdc31d21
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainExpand.nb
@@ -0,0 +1,618 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 14859, 610]
+NotebookOptionsPosition[ 10437, 451]
+NotebookOutlinePosition[ 11048, 475]
+CellTagsIndexPosition[ 10969, 470]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracChainExpand", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracChainExpand", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracChainExpand", "[", "exp", "]"}]], "InlineFormula"],
+ "\[LineSeparator]expands all Dirac chains with explicit indices using \
+linearity, e.g. DCHN[GA[p1]+GA[p2]+m,i,j] becomes \
+DCHN[GA[p1],i,j]+DCHN[GA[p2],i,j]+m*DCHN[1,i,j]"
+}], "Usage",
+ CellChangeTimes->{{3.7741158252225513`*^9, 3.7741158354834337`*^9}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainExpand", "]"}]], "Input",
+ CellChangeTimes->{{3.774115843419463*^9, 3.774115847043434*^9}},
+ CellLabel->"In[23]:=",
+ CellID->1618853500],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracChainFactor", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellChangeTimes->{3.774115847512218*^9},
+ CellLabel->"Out[23]=",
+ CellID->291092421]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellChangeTimes->{3.777995121635717*^9},
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GA", "[", "mu", "]"}]}], ",", "i", ",", "j"}], "]"}]], "Input",
+ CellLabel->"In[24]:=",
+ CellID->254261735],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellChangeTimes->{3.77411588192798*^9},
+ CellLabel->"Out[24]=",
+ CellID->2116847820]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainExpand", "[", "%", "]"}]], "Input",
+ CellChangeTimes->{{3.77411588302066*^9, 3.77411588650101*^9}},
+ CellLabel->"In[25]:=",
+ CellID->2006590315],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"m", " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["mu",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellChangeTimes->{3.774115887123929*^9},
+ CellLabel->"Out[25]=",
+ CellID->1568837503]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 556}, {Automatic, 63}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "ExtendedExamples"->{
+ Cell[8917, 393, 100, 2, 55, "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"ExtendedExamples", 10831, 463}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 325, 14, 25, "History",
+ CellID->1247902091],
+Cell[CellGroupData[{
+Cell[908, 38, 68, 1, 29, "CategorizationSection",
+ CellID->1122911449],
+Cell[979, 41, 79, 2, 70, "Categorization",
+ CellID->686433507],
+Cell[1061, 45, 81, 2, 70, "Categorization",
+ CellID->605800465],
+Cell[1145, 49, 78, 2, 70, "Categorization",
+ CellID->468444828],
+Cell[1226, 53, 74, 1, 70, "Categorization"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1337, 59, 55, 1, 19, "KeywordsSection",
+ CellID->477174294],
+Cell[1395, 62, 45, 1, 70, "Keywords",
+ CellID->1164421360]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1477, 68, 65, 1, 19, "TemplatesSection",
+ CellID->1872225408],
+Cell[1545, 71, 94, 2, 70, "Template",
+ CellID->1562036412],
+Cell[1642, 75, 82, 2, 70, "Template",
+ CellID->158391909],
+Cell[1727, 79, 81, 2, 70, "Template",
+ CellID->1360575930],
+Cell[1811, 83, 82, 2, 70, "Template",
+ CellID->793782254]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1930, 90, 53, 1, 19, "DetailsSection",
+ CellID->307771771],
+Cell[1986, 93, 63, 2, 70, "Details",
+ CellID->670882175],
+Cell[2052, 97, 69, 2, 70, "Details",
+ CellID->350963985],
+Cell[2124, 101, 64, 2, 70, "Details",
+ CellID->8391405],
+Cell[2191, 105, 69, 2, 70, "Details",
+ CellID->3610269],
+Cell[2263, 109, 61, 2, 70, "Details",
+ CellID->401364205],
+Cell[2327, 113, 61, 2, 70, "Details",
+ CellID->350204745],
+Cell[2391, 117, 63, 2, 70, "Details",
+ CellID->732958810],
+Cell[2457, 121, 78, 2, 70, "Details",
+ CellID->222905350],
+Cell[2538, 125, 67, 2, 70, "Details",
+ CellID->240026365]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[2642, 132, 59, 1, 64, "ObjectName",
+ CellID->1224892054],
+Cell[2704, 135, 400, 9, 108, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3129, 148, 186, 4, 26, "Input",
+ CellID->1618853500],
+Cell[3318, 154, 514, 13, 45, "Output",
+ CellID->291092421]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[3881, 173, 57, 1, 44, "TutorialsSection",
+ CellID->250839057],
+Cell[3941, 176, 45, 1, 17, "Tutorials",
+ CellID->341631938]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4023, 182, 83, 1, 31, "RelatedDemonstrationsSection",
+ CellID->1268215905],
+Cell[4109, 185, 58, 1, 17, "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4204, 191, 65, 1, 31, "RelatedLinksSection",
+ CellID->1584193535],
+Cell[4272, 194, 49, 1, 17, "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4358, 200, 55, 1, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[4416, 203, 1175, 43, 31, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5628, 251, 57, 1, 31, "MoreAboutSection",
+ CellID->38303248],
+Cell[5688, 254, 46, 1, 17, "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5771, 260, 356, 11, 69, "PrimaryExamplesSection",
+ CellID->880084151],
+Cell[CellGroupData[{
+Cell[6152, 275, 274, 9, 26, "Input",
+ CellID->254261735],
+Cell[6429, 286, 923, 37, 29, "Output",
+ CellID->2116847820]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[7389, 328, 178, 4, 26, "Input",
+ CellID->2006590315],
+Cell[7570, 334, 1298, 53, 29, "Output",
+ CellID->1568837503]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8917, 393, 100, 2, 55, "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+Cell[9020, 397, 125, 3, 33, "ExampleSection",
+ CellID->1293636265],
+Cell[9148, 402, 148, 3, 21, "ExampleSection",
+ CellID->1020263627],
+Cell[CellGroupData[{
+Cell[9321, 409, 127, 3, 21, "ExampleSection",
+ CellID->2061341341],
+Cell[9451, 414, 130, 3, 70, "ExampleSubsection",
+ CellID->1757724783],
+Cell[9584, 419, 130, 3, 70, "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+Cell[9729, 425, 131, 3, 21, "ExampleSection",
+ CellID->258228157],
+Cell[9863, 430, 142, 3, 21, "ExampleSection",
+ CellID->2123667759],
+Cell[10008, 435, 135, 3, 21, "ExampleSection",
+ CellID->1305812373],
+Cell[10146, 440, 140, 3, 21, "ExampleSection",
+ CellID->1653164318],
+Cell[10289, 445, 132, 3, 21, "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+}
+]
+*)
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainFactor.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainFactor.nb
new file mode 100644
index 000000000..24eedf911
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainFactor.nb
@@ -0,0 +1,636 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 10.4' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[ 158, 7]
+NotebookDataLength[ 15422, 628]
+NotebookOptionsPosition[ 10995, 469]
+NotebookOutlinePosition[ 11607, 493]
+CellTagsIndexPosition[ 11528, 488]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracChainFactor", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracChainFactor", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracChainFactor", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]factors out all expressions inside a DiracChain to which \
+the chain doesn't apply. For example, all objects that are not Dirac matrices \
+can be safely factrored out from every Dirac chain."
+}], "Usage",
+ CellChangeTimes->{{3.774115388964108*^9, 3.774115412415765*^9}},
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainJoin", "]"}]], "Input",
+ CellChangeTimes->{{3.774115434263421*^9, 3.774115441766728*^9}},
+ CellLabel->"In[12]:=",
+ CellID->1799551006],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Drop", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellChangeTimes->{3.774115442182407*^9},
+ CellLabel->"Out[12]=",
+ CellID->2082475804]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ "."
+}], "SeeAlso",
+ CellChangeTimes->{3.77799509555969*^9},
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"FV", "[",
+ RowBox[{"p", ",", "\[Nu]"}], "]"}],
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}]}], ",", "i", ",", "j"}], "]"}],
+ " "}]], "Input",
+ CellChangeTimes->{{3.774115541776832*^9, 3.774115572705309*^9}},
+ CellLabel->"In[18]:=",
+ CellID->1596067813],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellChangeTimes->{{3.774115543891904*^9, 3.774115577695663*^9}},
+ CellLabel->"Out[18]=",
+ CellID->989974940]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainFactor", "[", "%", "]"}]], "Input",
+ CellChangeTimes->{{3.774115579284494*^9, 3.774115582584903*^9}},
+ CellLabel->"In[19]:=",
+ CellID->745783464],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellChangeTimes->{3.7741155830753517`*^9},
+ CellLabel->"Out[19]=",
+ CellID->35851775]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{377, Automatic}, {-10, Automatic}},
+CellContext->"Global`",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{
+ "ExtendedExamples"->{
+ Cell[9475, 411, 100, 2, 55, "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968]}
+ }
+*)
+(*CellTagsIndex
+CellTagsIndex->{
+ {"ExtendedExamples", 11390, 481}
+ }
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 325, 14, 25, "History",
+ CellID->1247902091],
+Cell[CellGroupData[{
+Cell[908, 38, 68, 1, 29, "CategorizationSection",
+ CellID->1122911449],
+Cell[979, 41, 79, 2, 70, "Categorization",
+ CellID->686433507],
+Cell[1061, 45, 81, 2, 70, "Categorization",
+ CellID->605800465],
+Cell[1145, 49, 78, 2, 70, "Categorization",
+ CellID->468444828],
+Cell[1226, 53, 74, 1, 70, "Categorization"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1337, 59, 55, 1, 19, "KeywordsSection",
+ CellID->477174294],
+Cell[1395, 62, 45, 1, 70, "Keywords",
+ CellID->1164421360]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1477, 68, 65, 1, 19, "TemplatesSection",
+ CellID->1872225408],
+Cell[1545, 71, 94, 2, 70, "Template",
+ CellID->1562036412],
+Cell[1642, 75, 82, 2, 70, "Template",
+ CellID->158391909],
+Cell[1727, 79, 81, 2, 70, "Template",
+ CellID->1360575930],
+Cell[1811, 83, 82, 2, 70, "Template",
+ CellID->793782254]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[1930, 90, 53, 1, 19, "DetailsSection",
+ CellID->307771771],
+Cell[1986, 93, 63, 2, 70, "Details",
+ CellID->670882175],
+Cell[2052, 97, 69, 2, 70, "Details",
+ CellID->350963985],
+Cell[2124, 101, 64, 2, 70, "Details",
+ CellID->8391405],
+Cell[2191, 105, 69, 2, 70, "Details",
+ CellID->3610269],
+Cell[2263, 109, 61, 2, 70, "Details",
+ CellID->401364205],
+Cell[2327, 113, 61, 2, 70, "Details",
+ CellID->350204745],
+Cell[2391, 117, 63, 2, 70, "Details",
+ CellID->732958810],
+Cell[2457, 121, 78, 2, 70, "Details",
+ CellID->222905350],
+Cell[2538, 125, 67, 2, 70, "Details",
+ CellID->240026365]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[2642, 132, 59, 1, 64, "ObjectName",
+ CellID->1224892054],
+Cell[2704, 135, 433, 9, 108, "Usage",
+ CellID->982511436],
+Cell[CellGroupData[{
+Cell[3162, 148, 184, 4, 26, "Input",
+ CellID->1799551006],
+Cell[3349, 154, 552, 14, 45, "Output",
+ CellID->2082475804]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[3950, 174, 57, 1, 44, "TutorialsSection",
+ CellID->250839057],
+Cell[4010, 177, 45, 1, 17, "Tutorials",
+ CellID->341631938]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4092, 183, 83, 1, 31, "RelatedDemonstrationsSection",
+ CellID->1268215905],
+Cell[4178, 186, 58, 1, 17, "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4273, 192, 65, 1, 31, "RelatedLinksSection",
+ CellID->1584193535],
+Cell[4341, 195, 49, 1, 17, "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4427, 201, 55, 1, 31, "SeeAlsoSection",
+ CellID->1255426704],
+Cell[4485, 204, 1174, 43, 31, "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5696, 252, 57, 1, 31, "MoreAboutSection",
+ CellID->38303248],
+Cell[5756, 255, 46, 1, 17, "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[5839, 261, 356, 11, 69, "PrimaryExamplesSection",
+ CellID->880084151],
+Cell[CellGroupData[{
+Cell[6220, 276, 453, 14, 26, "Input",
+ CellID->1596067813],
+Cell[6676, 292, 1384, 55, 32, "Output",
+ CellID->989974940]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[8097, 352, 179, 4, 26, "Input",
+ CellID->745783464],
+Cell[8279, 358, 1147, 47, 32, "Output",
+ CellID->35851775]
+}, Open ]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[9475, 411, 100, 2, 55, "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+Cell[9578, 415, 125, 3, 33, "ExampleSection",
+ CellID->1293636265],
+Cell[9706, 420, 148, 3, 21, "ExampleSection",
+ CellID->1020263627],
+Cell[CellGroupData[{
+Cell[9879, 427, 127, 3, 21, "ExampleSection",
+ CellID->2061341341],
+Cell[10009, 432, 130, 3, 70, "ExampleSubsection",
+ CellID->1757724783],
+Cell[10142, 437, 130, 3, 70, "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+Cell[10287, 443, 131, 3, 21, "ExampleSection",
+ CellID->258228157],
+Cell[10421, 448, 142, 3, 21, "ExampleSection",
+ CellID->2123667759],
+Cell[10566, 453, 135, 3, 21, "ExampleSection",
+ CellID->1305812373],
+Cell[10704, 458, 140, 3, 21, "ExampleSection",
+ CellID->1653164318],
+Cell[10847, 463, 132, 3, 21, "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+}
+]
+*)
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainJoin.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainJoin.nb
new file mode 100644
index 000000000..7a5661304
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracChainJoin.nb
@@ -0,0 +1,477 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracChainJoin", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracChainJoin", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]joins chains of Dirac matrices with explicit Dirac indices \
+wrapped with a head DiracChain."
+}], "Usage",
+ CellID->982511436],
+
+Cell["\<\
+Notice that DiracChainJoin is not suitable for creating closed Dirac chains \
+out of the FeynArts output with explicit Dirac indices, e.g. when the model \
+contains 4-fermion operators. Use FCFADiracChainJoin for that.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracChainJoin", "]"}]], "Input",
+ CellLabel->"In[9]:=",
+ CellID->1965709680],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Drop", "\[Rule]", "True"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "True"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[9]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ ", ",
+ ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ ", ",
+ ButtonBox["FCFADiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCFADiracChainJoin",
+ ButtonNote->"FCFADiracChainJoin"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p1", ",", "m1"}], "]"}], ",", "i"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}], "]"}], " ",
+ RowBox[{"DCHN", "[",
+ RowBox[{"j", ",",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p2", ",", "m2"}], "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[10]:=",
+ CellID->857331981],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"v", "(",
+ FormBox["p2",
+ TraditionalForm], ",",
+ FormBox["m2",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ FormBox[
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p1",
+ TraditionalForm], ",",
+ FormBox["m1",
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[10]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[11]:=",
+ CellID->1834507663],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m1",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m2",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[11]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 322}, {Automatic, 86}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracEquation.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracEquation.nb
index a9f59828d..7d43d0129 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracEquation.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracEquation.nb
@@ -118,14 +118,30 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DiracEquation", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "applies the Dirac equation without expanding exp. If that is needed, use \
-DiracSimplify."
+ " \[LineSeparator]applies the Dirac equation without expanding ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ ". If expansions are necessary, use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracEquation", "]"}]], "Input",
+ CellLabel->"In[129]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[129]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -160,15 +176,10 @@ Cell[CellGroupData[{
Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
-Cell[TextData[{
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"DiracEquation",
- CellID->1088896111]
+Cell[TextData[ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"]], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -199,18 +210,41 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"Spinor", "[",
- RowBox[{
- RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "p", "]"}], "]"}]}]], "Input",
- CellTags->"DiracEquation",
- CellLabel->"In[1]:=",
- CellID->1948002457],
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}]], "Input",
+ CellLabel->"In[125]:="],
Cell[BoxData[
FormBox[
RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[125]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[126]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"m", " ",
RowBox[{"(",
RowBox[{
FormBox["\<\"\[CurlyPhi]\"\>",
@@ -227,31 +261,162 @@ Cell[BoxData[
FormBox["m",
TraditionalForm],
FormBox["\<\")\"\>",
- TraditionalForm]}], ")"}], ".",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[126]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{"p", ",", "m"}], "]"}]}]], "Input",
+ CellLabel->"In[123]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"v", "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[123]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[124]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "m"}], " ",
RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracEquation",
- CellLabel->"Out[1]=",
- CellID->1390956545]
+ CellLabel->"Out[124]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{"p", ",", "0"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[121]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[121]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
- CellTags->"DiracEquation",
- CellLabel->"In[2]:=",
- CellID->831374241],
+ CellLabel->"In[122]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellLabel->"Out[122]="]
+}, Open ]],
+
+Cell[TextData[{
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ " also works in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBarD", "[",
+ RowBox[{"p", ",", "m"}], "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[127]:="],
Cell[BoxData[
FormBox[
- RowBox[{"m", " ",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ",",
+ FormBox["m",
+ TraditionalForm], ")"}],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[127]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracEquation", "[", "%", "]"}]], "Input",
+ CellLabel->"In[128]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "m"}], " ",
RowBox[{"(",
RowBox[{
FormBox["\<\"\[CurlyPhi]\"\>",
@@ -259,9 +424,9 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- OverscriptBox[
+ RowBox[{"-",
FormBox["p",
- TraditionalForm], "_"],
+ TraditionalForm]}],
TraditionalForm],
FormBox["\<\",\"\>",
TraditionalForm],
@@ -269,9 +434,7 @@ Cell[BoxData[
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracEquation",
- CellLabel->"Out[2]=",
- CellID->1802781574]
+ CellLabel->"Out[128]="]
}, Open ]]
}, Open ]],
@@ -335,13 +498,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{898, 897},
+WindowMargins->{{1083, Automatic}, {Automatic, 159}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGamma.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGamma.nb
index d3fa5401e..49ae7d0fa 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGamma.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGamma.nb
@@ -119,15 +119,23 @@ Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"x", ",", " ", "dim"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of all Dirac matrices and slashes (in the internal \
-representation). Use DiracMatrix (or GA, GAD) and DiracSlash (or GS, GSD) for \
-manual (short) input. DiracGamma[x, 4] simplifies to DiracGamma[x]. \
-DiracGamma[5] is ",
+ " \[LineSeparator]is the head of all Dirac matrices and slashes (in the \
+internal representation). Use GA, GAD, GS or GSD for manual (short) input."
+}], "Usage",
+ CellID->982511436],
+
+Cell["DiracGamma[x, 4] simplifies to DiracGamma[x].", "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "DiracGamma[5] is ",
Cell[BoxData[
FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- ". DiracGamma[6] is ",
+ SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]]
+}], "Notes"],
+
+Cell[TextData[{
+ "DiracGamma[6] is ",
Cell[BoxData[
FormBox[
RowBox[{
@@ -135,18 +143,18 @@ DiracGamma[5] is ",
RowBox[{"1", "+",
SuperscriptBox["\[Gamma]", "5"]}], ")"}], "/", "2."}],
TraditionalForm]]],
- " DiracGamma[7] is ",
+ " "
+}], "Notes"],
+
+Cell[TextData[{
+ "DiracGamma[7] is ",
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(",
RowBox[{"1", "-",
SuperscriptBox["\[Gamma]", "5"]}], ")"}], "/", "2."}], TraditionalForm]]]
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
+}], "Notes"]
}, Open ]],
Cell[CellGroupData[{
@@ -187,29 +195,27 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
ButtonNote->"DiracGammaExpand"],
", ",
- ButtonBox["DiracMatrix",
+ ButtonBox["GA",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
+ ButtonData:>"paclet:FeynCalc/ref/GA",
+ ButtonNote->"GA"],
", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
", ",
- ButtonBox["DiracSlash",
+ ButtonBox["GS",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
+ ButtonData:>"paclet:FeynCalc/ref/GS",
+ ButtonNote->"GS"],
", ",
ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
"."
-}], "Text",
- CellTags->"DiracGamma",
- CellID->1692507192]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -241,7 +247,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracGamma", "[", "5", "]"}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[1]:=",
+ CellLabel->"In[604]:=",
CellID->1046278698],
Cell[BoxData[
@@ -251,8 +257,7 @@ Cell[BoxData[
FormBox["5",
TraditionalForm]], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[1]=",
- CellID->842552946]
+ CellLabel->"Out[604]="]
}, Open ]],
Cell[CellGroupData[{
@@ -261,7 +266,7 @@ Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"LorentzIndex", "[", "\[Alpha]", "]"}], "]"}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[2]:=",
+ CellLabel->"In[605]:=",
CellID->1161111346],
Cell[BoxData[
@@ -273,8 +278,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[2]=",
- CellID->1687472527]
+ CellLabel->"Out[605]="]
}, Open ]],
Cell[TextData[{
@@ -289,9 +293,7 @@ Cell[TextData[{
FormBox[
RowBox[{"\[Gamma]", "\[CenterDot]", "q"}], TraditionalForm]]],
"."
-}], "Text",
- CellTags->"DiracGamma",
- CellID->299092642],
+}], "Notes"],
Cell[CellGroupData[{
@@ -300,7 +302,7 @@ Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"Momentum", "[", "q", "]"}], "]"}], " "}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[3]:=",
+ CellLabel->"In[606]:=",
CellID->1887452273],
Cell[BoxData[
@@ -313,8 +315,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[3]=",
- CellID->1138458552]
+ CellLabel->"Out[606]="]
}, Open ]],
Cell[CellGroupData[{
@@ -327,7 +328,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[4]:=",
+ CellLabel->"In[607]:=",
CellID->1345474698],
Cell[BoxData[
@@ -356,8 +357,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[4]=",
- CellID->1631372749]
+ CellLabel->"Out[607]="]
}, Open ]],
Cell[CellGroupData[{
@@ -369,7 +369,7 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"q", ",", "D"}], "]"}], ",", "D"}], "]"}], " "}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[5]:=",
+ CellLabel->"In[608]:=",
CellID->38879465],
Cell[BoxData[
@@ -380,20 +380,18 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[5]=",
- CellID->567019698]
+ CellLabel->"Out[608]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a1", "=",
- RowBox[{
- RowBox[{"GS", "[",
- RowBox[{"p", "-", "q"}], "]"}], ".",
- RowBox[{"GS", "[", "p", "]"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[6]:=",
+ CellLabel->"In[610]:=",
CellID->294479801],
Cell[BoxData[
@@ -426,17 +424,15 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[6]=",
- CellID->445474776]
+ CellLabel->"Out[610]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a2", "=",
- RowBox[{"DiracGammaExpand", "[", "a1", "]"}]}]], "Input",
+ RowBox[{"DiracGammaExpand", "[", "%", "]"}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[7]:=",
+ CellLabel->"In[611]:=",
CellID->324312499],
Cell[BoxData[
@@ -467,22 +463,20 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[7]=",
- CellID->754251999]
+ CellLabel->"Out[611]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a3", "=",
- RowBox[{
- RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
- RowBox[{"GSD", "[",
- RowBox[{"p", "-", "q"}], "]"}], ".",
- RowBox[{"GSD", "[", "q", "]"}], ".",
- RowBox[{"GAD", "[", "\[Mu]", "]"}]}]}]], "Input",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ".",
+ RowBox[{"GSD", "[", "q", "]"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[8]:=",
+ CellLabel->"In[612]:=",
CellID->667969280],
Cell[BoxData[
@@ -524,17 +518,15 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[8]=",
- CellID->712838090]
+ CellLabel->"Out[612]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a4", "=",
- RowBox[{"DiracTrick", "[", "a3", "]"}]}]], "Input",
+ RowBox[{"DiracTrick", "[", "%", "]"}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[9]:=",
+ CellLabel->"In[613]:=",
CellID->1907296195],
Cell[BoxData[
@@ -546,11 +538,13 @@ Cell[BoxData[
FormBox["\<\"(\"\>",
TraditionalForm],
FormBox[
- RowBox[{
- FormBox["p",
- TraditionalForm], "-",
- FormBox["q",
- TraditionalForm]}],
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
TraditionalForm],
FormBox["\<\")\"\>",
TraditionalForm],
@@ -582,17 +576,15 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[9]=",
- CellID->1654426864]
+ CellLabel->"Out[613]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"a5", "=",
- RowBox[{"DiracSimplify", "[", "a4", "]"}]}]], "Input",
+ RowBox[{"DiracSimplify", "[", "%%", "]"}]], "Input",
CellTags->"DiracGamma",
- CellLabel->"In[10]:=",
+ CellLabel->"In[614]:=",
CellID->41068363],
Cell[BoxData[
@@ -646,17 +638,144 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
CellTags->"DiracGamma",
- CellLabel->"Out[10]=",
- CellID->1950498776]
+ CellLabel->"Out[614]="]
}, Open ]],
+Cell["\<\
+DiracGamma may also carry Cartesian indices or appear contracted with \
+Cartesian momenta.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"a1", ",", "a2", ",", "a3", ",", "a4", ",", "a5"}], "]"}]], "Input",
-
- CellTags->"DiracGamma",
- CellLabel->"In[11]:=",
- CellID->2054807508]
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianIndex", "[", "i", "]"}], "]"}]], "Input",
+ CellLabel->"In[616]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[616]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianIndex", "[",
+ RowBox[{"i", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "D"}], "]"}]], "Input",
+ CellLabel->"In[619]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[619]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"CartesianMomentum", "[", "p", "]"}], "]"}]], "Input",
+ CellLabel->"In[617]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[617]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{
+ RowBox[{"CartesianMomentum", "[",
+ RowBox[{"p", ",",
+ RowBox[{"D", "-", "1"}]}], "]"}], ",", "D"}], "]"}]], "Input",
+ CellLabel->"In[620]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "\[CenterDot]",
+ FormBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[620]="]
+}, Open ]],
+
+Cell["\<\
+Temporal indices are represented using ExplicitLorentzIndex[0]\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"ExplicitLorentzIndex", "[", "0", "]"}], "]"}]], "Input",
+ CellLabel->"In[618]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["0",
+ TraditionalForm],
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[618]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -719,13 +838,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{700, 767},
+WindowMargins->{{911, Automatic}, {Automatic, 189}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaCombine.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaCombine.nb
index 58a961c33..3b5dc93cc 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaCombine.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaCombine.nb
@@ -118,13 +118,30 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DiracGammaCombine", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is (nearly) the inverse operation to DiracGammaExpand."
+ " \[LineSeparator]is (nearly) the inverse operation to ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ "."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracGammaCombine", "]"}]], "Input",
+ CellLabel->"In[130]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[130]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -170,29 +187,17 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
ButtonNote->"DiracGammaExpand"],
", ",
- ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
- ", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
", ",
- ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- ", ",
ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
"."
-}], "Text",
- CellTags->"DiracGammaCombine",
- CellID->269406671]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -222,12 +227,41 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracGammaCombine", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], " ", "+", " ",
+ RowBox[{"GS", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[134]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
- RowBox[{"GS", "[", "p", "]"}], " ", "+", " ",
- RowBox[{"GS", "[", "q", "]"}]}], "]"}]], "Input",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[134]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaCombine", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[1]:=",
+ CellLabel->"In[135]:=",
CellID->69726605],
Cell[BoxData[
@@ -246,8 +280,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm], ")"}], TraditionalForm]], "Output",
CellTags->"DiracGammaCombine",
- CellLabel->"Out[1]=",
- CellID->1673904001]
+ CellLabel->"Out[135]="]
}, Open ]],
Cell[CellGroupData[{
@@ -255,7 +288,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[2]:=",
+ CellLabel->"In[136]:=",
CellID->919953934],
Cell[BoxData[
@@ -263,43 +296,71 @@ Cell[BoxData[
RowBox[{"Momentum", "[",
RowBox[{"p", "+", "q"}], "]"}], "]"}]], "Output",
CellTags->"DiracGammaCombine",
- CellLabel->"Out[2]//StandardForm=",
- CellID->1515539427]
+ CellLabel->"Out[136]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracGammaCombine", "[",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"GSD", "[", "p", "]"}]}], " ", "-", " ",
+ RowBox[{"3", " ",
+ RowBox[{"GSD", "[", "q", "]"}]}]}]], "Input",
+ CellLabel->"In[137]:="],
+
+Cell[BoxData[
+ FormBox[
RowBox[{
RowBox[{"2", " ",
- RowBox[{"GS", "[", "p", "]"}]}], " ", "-", " ",
- RowBox[{"2", " ",
- RowBox[{"GS", "[", "q", "]"}]}]}], "]"}]], "Input",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], "-",
+ RowBox[{"3", " ",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[137]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaCombine", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[3]:=",
+ CellLabel->"In[138]:=",
CellID->2255714],
Cell[BoxData[
FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
FormBox[
FormBox[
RowBox[{
RowBox[{"2", " ",
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"]}], "-",
- RowBox[{"2", " ",
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"]}]}],
+ FormBox["p",
+ TraditionalForm]}], "-",
+ RowBox[{"3", " ",
+ FormBox["q",
+ TraditionalForm]}]}],
TraditionalForm],
TraditionalForm], ")"}], TraditionalForm]], "Output",
CellTags->"DiracGammaCombine",
- CellLabel->"Out[3]=",
- CellID->801597804]
+ CellLabel->"Out[138]="]
}, Open ]],
Cell[CellGroupData[{
@@ -307,18 +368,20 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[4]:=",
+ CellLabel->"In[139]:=",
CellID->1011380579],
Cell[BoxData[
RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{
- RowBox[{"2", " ", "p"}], "-",
- RowBox[{"2", " ", "q"}]}], "]"}], "]"}]], "Output",
+ RowBox[{
+ RowBox[{"Momentum", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"2", " ", "p"}], "-",
+ RowBox[{"3", " ", "q"}]}], ",", "D"}], "]"}], ",", "D"}],
+ "]"}]], "Output",
CellTags->"DiracGammaCombine",
- CellLabel->"Out[4]//StandardForm=",
- CellID->1276677678]
+ CellLabel->"Out[139]//StandardForm="]
}, Open ]],
Cell[CellGroupData[{
@@ -326,31 +389,27 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracGammaExpand", "[", "%%", "]"}]], "Input",
CellTags->"DiracGammaCombine",
- CellLabel->"In[5]:=",
+ CellLabel->"In[140]:=",
CellID->365053477],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"2", " ",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
+ FormBox["p",
+ TraditionalForm],
TraditionalForm]}]}], "-",
- RowBox[{"2", " ",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ RowBox[{"3", " ",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
+ FormBox["q",
+ TraditionalForm],
TraditionalForm]}]}]}], TraditionalForm]], "Output",
CellTags->"DiracGammaCombine",
- CellLabel->"Out[5]=",
- CellID->1799332421]
+ CellLabel->"Out[140]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -415,12 +474,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{Automatic, 731}, {Automatic, 269}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaExpand.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaExpand.nb
index ced3d57d7..14bb10b32 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaExpand.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaExpand.nb
@@ -118,14 +118,50 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DiracGammaExpand", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "expands all DiracGamma[Momentum[a+b+..]] in exp into \
-(DiracGamma[Momentum[a]] + DiracGamma[Momentum[b]] + ...)."
+ " \[LineSeparator]expands Dirac matrices contracted to linear combinations \
+of ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-vectors."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[TextData[{
+ "All ",
+ Cell[BoxData[
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[",
+ RowBox[{
+ RowBox[{"a", "+", "b", "+"}], ".."}], "]"}], "]"}]], "InlineFormula"],
+ " will be expanded to ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "a", "]"}], "]"}], "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "b", "]"}], "]"}], "+"}], "..."}], ")"}]],
+ "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracGammaExpand", "]"}]], "Input",
+ CellLabel->"In[141]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracSigmaExpand", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[141]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -171,29 +207,17 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracGammaCombine",
ButtonNote->"DiracGammaCombine"],
", ",
- ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
- ", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
", ",
- ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- ", ",
ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
"."
-}], "Text",
- CellTags->"DiracGammaExpand",
- CellID->1587243701]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -223,16 +247,190 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t", "=",
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[144]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[144]="]
+}, Open ]],
+
+Cell[TextData[{
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " rewrites ",
+ Cell[BoxData[
RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}], " ", ".", " ",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{"p", "-", "q"}], "]"}], "]"}]}]}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[1]:=",
- CellID->808958256],
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox[
+ RowBox[{"(",
+ RowBox[{"p", "-", "q"}], ")"}], "\[Mu]"]}]], "InlineFormula"],
+ " as ",
+ Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox["p", "\[Mu]"]}], "-",
+ RowBox[{
+ SuperscriptBox["\[Gamma]", "\[Mu]"],
+ SubscriptBox["q", "\[Mu]"]}]}]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[147]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "-",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[147]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[148]:="],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "q", "]"}], "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}], "-",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "q", "]"}], "]"}]}], ")"}]}]], "Output",
+ CellLabel->"Out[148]//StandardForm="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The inverse operation is ",
+ ButtonBox["DiracGammaCombine",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], "-",
+ RowBox[{"GS", "[", "q", "]"}]}], ")"}]}]], "Input",
+ CellLabel->"In[149]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], "-",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[149]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaCombine", "[", "%", "]"}]], "Input",
+ CellLabel->"In[150]:="],
Cell[BoxData[
FormBox[
@@ -259,24 +457,14 @@ Cell[BoxData[
TraditionalForm], "_"]}],
TraditionalForm],
TraditionalForm], ")"}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[1]=",
- CellID->922918740]
+ CellLabel->"Out[150]="]
}, Open ]],
-Cell["\<\
-Momentum is the head of p-q, i.e., it is treated as one four-momentum.\
-\>", "Text",
- CellTags->"DiracGammaExpand",
- CellID->2029354787],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[2]:=",
- CellID->1573863723],
+ RowBox[{"StandardForm", "[", "%", "]"}]], "Input",
+ CellLabel->"In[151]:="],
Cell[BoxData[
RowBox[{
@@ -285,116 +473,333 @@ Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"Momentum", "[",
RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Output",
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[2]//StandardForm=",
- CellID->50723928]
+ CellLabel->"Out[151]//StandardForm="]
+}, Open ]]
}, Open ]],
-Cell["With DiracGammaExpand the Momentum[p-q] gets expanded.", "Text",
- CellTags->"DiracGammaExpand",
- CellID->2014620015],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+It is possible to perform the expansions only on Dirac matrices contracted \
+with particular momenta.\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracGammaExpand", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[3]:=",
- CellID->260673945],
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p1", "+", "p2"}], "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}]}], "+", "\[IndentingNewLine]",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"q1", "+", "q2"}], "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}]}]}]], "Input",
+ CellLabel->"In[44]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
+ RowBox[{"c1", " ",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}], ")"}], ".",
- RowBox[{"(",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}], "+",
+ RowBox[{"c2", " ",
RowBox[{
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["q1",
+ TraditionalForm], "+",
+ FormBox["q2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[44]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaExpand", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "q1", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[45]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}], "-",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p1",
+ TraditionalForm], "+",
+ FormBox["p2",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
FormBox[
- OverscriptBox[
- FormBox["q",
- TraditionalForm], "_"],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[3]=",
- CellID->511724887]
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"m", "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q1",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q2",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[45]="]
+}, Open ]]
}, Open ]],
-Cell["The inverse operation is DiracGammaCombine.", "Text",
- CellTags->"DiracGammaExpand",
- CellID->1184042108],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "If the input expression contains ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ ", ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " will expand Feynman slashes inside ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ " and call ",
+ ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigmaExpand",
+ ButtonNote->"DiracSigma"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"DiracGammaCombine", "[",
- RowBox[{"DiracGammaExpand", "[", "t", "]"}], "]"}], "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[4]:=",
- CellID->1327296799],
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[48]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[",
- RowBox[{"p", "-", "q"}], "]"}], "]"}]}]], "Output",
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[4]//StandardForm=",
- CellID->264621103]
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ RowBox[{"p", "+", "q"}],
+ TraditionalForm],
+ FormBox["r",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[48]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"StandardForm", "[",
- RowBox[{"DiracGammaExpand", "[", "t", "]"}], "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[5]:=",
- CellID->447085558],
+ RowBox[{"DiracGammaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[49]:="],
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}], ".",
- RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[49]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The call to ",
+ ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigmaExpand",
+ ButtonNote->"DiracSigma"],
+ " can be inhibited by disabling the corresponding option."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGammaExpand", "[",
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}], ",",
+ RowBox[{"DiracSigmaExpand", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[47]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"DiracSigma", "(",
RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "p", "]"}], "]"}], "-",
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}]}], ")"}]}]], "Output",
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[5]//StandardForm=",
- CellID->85762253]
+ RowBox[{
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], ",",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[47]="]
+}, Open ]]
}, Open ]],
-Cell["In order to do non-commutative expansion use DiracSimplify.", "Text",
- CellTags->"DiracGammaExpand",
- CellID->56861818],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " f",
+ ButtonBox["or",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " noncommutative expansions with the corresponding simplifications."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[6]:=",
- CellID->103977295],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ")"}]}], "]"}]], "Input",
+ CellLabel->"In[156]:="],
Cell[BoxData[
FormBox[
@@ -422,16 +827,75 @@ Cell[BoxData[
FormBox["q",
TraditionalForm], "_"],
TraditionalForm], "2"]}], TraditionalForm]], "Output",
- CellTags->"DiracGammaExpand",
- CellLabel->"Out[6]=",
- CellID->703741666]
+ CellLabel->"Out[156]="]
}, Open ]],
+Cell[TextData[{
+ "If simplifications are not required, you may also combine ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ " with ",
+ ButtonBox["DotSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DotSimplify",
+ ButtonNote->"DotSimplify"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[", "t", "]"}]], "Input",
- CellTags->"DiracGammaExpand",
- CellLabel->"In[7]:=",
- CellID->2056643915]
+ RowBox[{"DotSimplify", "[",
+ RowBox[{"DiracGammaExpand", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "q", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "-", "q"}], "]"}], ")"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[158]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[158]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -494,13 +958,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{700, 760},
+WindowMargins->{{1516, Automatic}, {Automatic, 246}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaT.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaT.nb
deleted file mode 100644
index f498c9a83..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracGammaT.nb
+++ /dev/null
@@ -1,343 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DiracGammaT", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DiracGammaT", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData[
- RowBox[{"DiracGammaT", "[", "x", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "denotes the transpose of DiracGamma[x]. Transpose[DiracGammaT[x]] gives \
-DiracGamma[x]. Note that x must have Head LorentzIndex or Momentum."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["DiracGamma",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- "."
-}], "Text",
- CellTags->"DiracGammaT",
- CellID->1110341394]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracGammaT", "[",
- RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}]], "Input",
- CellTags->"DiracGammaT",
- CellLabel->"In[1]:=",
- CellID->1057699724],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- CellTags->"DiracGammaT",
- CellLabel->"Out[1]=",
- CellID->848934058]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Transpose", "[", "%", "]"}]], "Input",
- CellTags->"DiracGammaT",
- CellLabel->"In[2]:=",
- CellID->1231382405],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], TraditionalForm]], "Output",
- CellTags->"DiracGammaT",
- CellLabel->"Out[2]=",
- CellID->490097123]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{
- RowBox[{"GS", "[", "p", "]"}], "//", "FCI"}], "//", "Transpose"}]], "Input",
- CellTags->"DiracGammaT",
- CellLabel->"In[3]:=",
- CellID->865153604],
-
-Cell[BoxData[
- FormBox[
- SuperscriptBox[
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], "T"], TraditionalForm]], "Output",
- CellTags->"DiracGammaT",
- CellLabel->"Out[3]=",
- CellID->1938967993]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracIndex.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracIndex.nb
new file mode 100644
index 000000000..4d75529ce
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracIndex.nb
@@ -0,0 +1,419 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracIndex", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracIndex", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData["DiracIndex"], "InlineFormula"],
+ " \[LineSeparator]",
+ "is the head of Dirac indices."
+}], "Usage",
+ CellID->982511436],
+
+Cell[TextData[{
+ "The internal representation of a four-dimensional spinorial index ",
+ Cell[BoxData["i"], "InlineFormula"],
+ " is ",
+ Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "If the first argument is an integer, ",
+ Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "InlineFormula"],
+ " turns into ",
+ Cell[BoxData[
+ RowBox[{"ExplicitDiracIndex", "[", "i", "]"}]], "InlineFormula"],
+ "."
+}], "Notes",
+ CellID->1624463599],
+
+Cell[TextData[{
+ "Dirac indices are the indices that denote the components of Dirac matrices \
+or spinors. They should not be confused with the Lorentz indices attached to \
+the Dirac matrices. For example \nin case of ",
+ Cell[BoxData[
+ SuperscriptBox[
+ SubscriptBox["\[Gamma]", "ij"], "\[Mu]"]], "InlineFormula"],
+ ", ",
+ Cell[BoxData["\[Mu]"], "InlineFormula"],
+ " is a Lorentz index, while ",
+ Cell[BoxData["i"], "InlineFormula"],
+ " and ",
+ Cell[BoxData["j"], "InlineFormula"],
+ " are Dirac (spinorial) indices."
+}], "Notes",
+ CellID->1835295214]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["ExplicitDiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ExplicitDiracIndex",
+ ButtonNote->"ExplicitDiracIndex"],
+ ", ",
+ ButtonBox["DiracIndexDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndexDelta",
+ ButtonNote->"DiracIndexDelta"],
+ ", ",
+ ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[30]:=",
+ CellID->973923672],
+
+Cell[BoxData[
+ FormBox["i", TraditionalForm]], "Output",
+ CellTags->"SUNIndex",
+ CellLabel->"Out[30]=",
+ CellID->2017526493]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[31]:=",
+ CellID->293124345],
+
+Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "i", "]"}]], "Output",
+ CellTags->"SUNIndex",
+ CellLabel->"Out[31]//StandardForm=",
+ CellID->1562880488]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracIndex", "[", "2", "]"}]], "Input",
+ CellLabel->"In[32]:=",
+ CellID->1927371187],
+
+Cell[BoxData[
+ FormBox["2", TraditionalForm]], "Output",
+ CellLabel->"Out[32]=",
+ CellID->1717337875]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "StandardForm"}]], "Input",
+ CellLabel->"In[33]:=",
+ CellID->1807480238],
+
+Cell[BoxData[
+ RowBox[{"ExplicitDiracIndex", "[", "2", "]"}]], "Output",
+ CellLabel->"Out[33]//StandardForm=",
+ CellID->125060963]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i", ",", "j"}], "]"}], "//", "FCI"}], "//",
+ "StandardForm"}]], "Input",
+ CellTags->"SUNIndex",
+ CellLabel->"In[34]:=",
+ CellID->874008605],
+
+Cell[BoxData[
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Output",
+ CellTags->"SUNIndex",
+ CellLabel->"Out[34]//StandardForm=",
+ CellID->270559869]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 70}, {26, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracIndexDelta.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracIndexDelta.nb
new file mode 100644
index 000000000..449fe4767
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracIndexDelta.nb
@@ -0,0 +1,876 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracIndexDelta", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracIndexDelta", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the Kronecker-delta in the Dirac space with two \
+explicit Dirac indices i and j."
+}], "Usage",
+ CellID->982511436]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracChain",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChain",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DCHN",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DCHN",
+ ButtonNote->"DiracChain"],
+ ", ",
+ ButtonBox["DiracIndex",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracIndex",
+ ButtonNote->"DiracIndex"],
+ ", ",
+ ButtonBox["DIDelta",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DIDelta",
+ ButtonNote->"DIDelta"],
+ ", ",
+ ButtonBox["DiracChainJoin",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainJoin",
+ ButtonNote->"DiracChainJoin"],
+ ", ",
+ ButtonBox["DiracChainCombine",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainCombine",
+ ButtonNote->"DiracChainCombine"],
+ ", ",
+ ButtonBox["DiracChainExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainExpand",
+ ButtonNote->"DiracChainExpand"],
+ ", ",
+ ButtonBox["DiracChainFactor",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracChainFactor",
+ ButtonNote->"DiracChainFactor"],
+ "."
+}], "SeeAlso",
+ CellID->979184841]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[633]:=",
+ CellID->334232589],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[633]=",
+ CellID->20772612]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}], "^", "2"}]], "Input",
+ CellLabel->"In[634]:=",
+ CellID->1160563166],
+
+Cell[BoxData[
+ FormBox[
+ SubsuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}], "2"], TraditionalForm]], "Output",
+ CellLabel->"Out[634]=",
+ CellID->843930386]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[635]:=",
+ CellID->1638726287],
+
+Cell[BoxData[
+ FormBox["4", TraditionalForm]], "Output",
+ CellLabel->"Out[635]=",
+ CellID->1241539029]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%%", ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "D"}]}], "]"}]], "Input",
+ CellLabel->"In[636]:=",
+ CellID->1419299763],
+
+Cell[BoxData[
+ FormBox["D", TraditionalForm]], "Output",
+ CellLabel->"Out[636]=",
+ CellID->1731780001]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "j", "]"}]}], "]"}],
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "j", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "k", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[637]:=",
+ CellID->483228122],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["j",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[637]=",
+ CellID->1915476533]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[638]:=",
+ CellID->1782586861],
+
+Cell[BoxData[
+ FormBox[
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["k",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[638]=",
+ CellID->600762965]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i2", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}]}], "]"}], " ",
+ RowBox[{"DiracIndexDelta", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i4", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracIndex", "[", "i7", "]"}], ",",
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"Momentum", "[", "q", "]"}]}], ",", "0", ",", "1"}], "]"}]}],
+ "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"Spinor", "[",
+ RowBox[{
+ RowBox[{"Momentum", "[", "p", "]"}], ",", "m", ",", "1"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i0", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Mu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i1", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i2", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"LorentzIndex", "[", "\[Nu]", "]"}], "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i5", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i6", "]"}]}], "]"}], " ",
+ RowBox[{"DiracChain", "[",
+ RowBox[{
+ RowBox[{"m", "+",
+ RowBox[{"DiracGamma", "[",
+ RowBox[{"Momentum", "[", "p", "]"}], "]"}]}], ",",
+ RowBox[{"DiracIndex", "[", "i3", "]"}], ",",
+ RowBox[{"DiracIndex", "[", "i4", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[629]:=",
+ CellID->343925321],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i2",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i3",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox["i4",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i5",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i2",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i5",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i3",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i4",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[629]=",
+ CellID->1928929144]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[", "%", "]"}]], "Input",
+ CellLabel->"In[630]:=",
+ CellID->1092912350],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i0",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ RowBox[{
+ FormBox[
+ FormBox["i1",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[630]=",
+ CellID->1955736589]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i0", ",", "i1"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[631]:=",
+ CellID->654220270],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i7",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SubscriptBox[
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}],
+ TraditionalForm], ".",
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}],
+ FormBox[
+ FormBox["i6",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[631]=",
+ CellID->359616923]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracChainJoin", "[",
+ RowBox[{"%", " ",
+ RowBox[{"DIDelta", "[",
+ RowBox[{"i7", ",", "i6"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[632]:=",
+ CellID->427410435],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox["m",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+", "m"}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[632]=",
+ CellID->1386750926]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 928},
+WindowMargins->{{Automatic, 405}, {Automatic, -8}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracMatrix.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracMatrix.nb
index 1c972cbc3..78954a67d 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracMatrix.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracMatrix.nb
@@ -163,8 +163,29 @@ Cell[TextData[{
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell["\<\
+The shortcut DiracMatrix is deprecated, please use GA instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracMatrix", "]"}]], "Input",
+ CellTags->"DiracMatrix",
+ CellLabel->"In[322]:=",
+ CellID->1215792887],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"DiracMatrix",
+ CellLabel->"Out[322]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -200,54 +221,17 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["DiracGammaExpand",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
- ", ",
- ButtonBox["DiracGamma",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- ", ",
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- ", ",
- ButtonBox["DiracSlash",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSlash",
- ButtonNote->"DiracSlash"],
- ", ",
- ButtonBox["DiracTrick",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
- ButtonNote->"DiracTrick"],
- ", ",
ButtonBox["GA",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/GA",
ButtonNote->"GA"],
", ",
- ButtonBox["GAD",
+ ButtonBox["FCI",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/GAD",
- ButtonNote->"GAD"],
- ", ",
- ButtonBox["GS",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/GS",
- ButtonNote->"GS"],
- ", ",
- ButtonBox["GSD",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/GSD",
- ButtonNote->"GSD"],
+ ButtonData:>"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
"."
-}], "Text",
- CellTags->"DiracMatrix",
- CellID->703033103]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -276,30 +260,10 @@ Cell[BoxData[
Cell[CellGroupData[{
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracMatrix", "]"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[1]:=",
- CellID->1215792887],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[1]=",
- CellID->462215683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
Cell[BoxData[
RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}]], "Input",
CellTags->"DiracMatrix",
- CellLabel->"In[2]:=",
+ CellLabel->"In[323]:=",
CellID->888527237],
Cell[BoxData[
@@ -311,19 +275,15 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
CellTags->"DiracMatrix",
- CellLabel->"Out[2]=",
- CellID->1128455616]
+ CellLabel->"Out[323]="]
}, Open ]],
Cell[TextData[{
- "This is how to enter the non-commutative product of two ",
- Cell[BoxData[
- FormBox["Null", TraditionalForm]]],
- ". The ",
+ "This is how to enter the non-commutative product of two. The ",
StyleBox["Mathematica",
FontSlant->"Italic"],
" Dot \".\" is used as non-commutative multiplication operator."
-}], "Text",
+}], "Notes",
CellTags->"DiracMatrix",
CellID->477550014],
@@ -334,7 +294,7 @@ Cell[BoxData[
RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], ".",
RowBox[{"DiracMatrix", "[", "\[Nu]", "]"}]}]], "Input",
CellTags->"DiracMatrix",
- CellLabel->"In[3]:=",
+ CellLabel->"In[324]:=",
CellID->216003987],
Cell[BoxData[
@@ -353,8 +313,7 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"DiracMatrix",
- CellLabel->"Out[3]=",
- CellID->527384282]
+ CellLabel->"Out[324]="]
}, Open ]],
Cell[CellGroupData[{
@@ -364,25 +323,26 @@ Cell[BoxData[
RowBox[{"DiracMatrix", "[", "\[Alpha]", "]"}], "//",
"StandardForm"}]], "Input",
CellTags->"DiracMatrix",
- CellLabel->"In[4]:=",
+ CellLabel->"In[328]:=",
CellID->1775640770],
Cell[BoxData[
RowBox[{"DiracGamma", "[",
RowBox[{"LorentzIndex", "[", "\[Alpha]", "]"}], "]"}]], "Output",
CellTags->"DiracMatrix",
- CellLabel->"Out[4]//StandardForm=",
- CellID->209169397]
+ CellLabel->"Out[328]//StandardForm="]
}, Open ]],
+Cell["\<\
+DiracMatrix is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use GA.\
+\>", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}], "//", "FCE"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[5]:=",
- CellID->1489042033],
+ RowBox[{"GA", "[", "\[Mu]", "]"}]], "Input",
+ CellLabel->"In[337]:="],
Cell[BoxData[
FormBox[
@@ -392,33 +352,14 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[5]=",
- CellID->1529249901]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[6]:=",
- CellID->80209945],
-
-Cell[BoxData[
- RowBox[{"GA", "[", "\[Mu]", "]"}]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1573455068]
+ CellLabel->"Out[337]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"GAD", "[", "\[Mu]", "]"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[7]:=",
- CellID->512840116],
+ CellLabel->"In[338]:="],
Cell[BoxData[
FormBox[
@@ -427,118 +368,37 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]], TraditionalForm]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[7]=",
- CellID->999762340]
+ CellLabel->"Out[338]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"%", "//", "FCI"}], "//", "StandardForm"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[8]:=",
- CellID->1503246496],
+ RowBox[{"FCI", "[",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], "]"}], "===",
+ RowBox[{"DiracMatrix", "[", "\[Mu]", "]"}]}]], "Input",
+ CellLabel->"In[339]:="],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"LorentzIndex", "[",
- RowBox[{"\[Mu]", ",", "D"}], "]"}], ",", "D"}], "]"}]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[8]//StandardForm=",
- CellID->1842955890]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[9]:=",
- CellID->1134451921],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[9]=",
- CellID->625741566]
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[339]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"a", " ", ".", " ", "b"}], "]"}], "//", "FCI"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[10]:=",
- CellID->241194804],
+ RowBox[{"FCI", "[",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], "]"}], "===",
+ RowBox[{"DiracMatrix", "[",
+ RowBox[{"\[Mu]", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[340]:="],
Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["a",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["b",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[10]=",
- CellID->1051855483]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", "//", "StandardForm"}]], "Input",
- CellTags->"DiracMatrix",
- CellLabel->"In[11]:=",
- CellID->256970123],
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"DiracGamma", "[",
- RowBox[{"LorentzIndex", "[", "a", "]"}], "]"}], ".",
- RowBox[{"DiracGamma", "[",
- RowBox[{"LorentzIndex", "[", "b", "]"}], "]"}]}]], "Output",
- CellTags->"DiracMatrix",
- CellLabel->"Out[11]//StandardForm=",
- CellID->94050778]
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[340]="]
}, Open ]]
}, Open ]],
@@ -602,13 +462,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{905, 910},
+WindowMargins->{{Automatic, 1292}, {164, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracOrder.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracOrder.nb
index aeaf36b9a..7a51ae183 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracOrder.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracOrder.nb
@@ -117,16 +117,59 @@ Cell["DiracOrder", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "orders the Dirac matrices in expr alphabetically. \
-DiracOrder[expr,orderlist] orders the Dirac matrices in expr according to \
-orderlist."
+ RowBox[{"DiracOrder", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]orders the Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " lexicographically.\n",
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracOrder", "[",
+ RowBox[{"exp", ",", " ", "orderlist"}], "]"}]], "InlineFormula"],
+ " \[LineSeparator] orders the Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " according to ",
+ Cell[BoxData["orderlist"], "InlineFormula"],
+ "."
}], "Usage",
- CellID->982511436],
+ CellID->2090318364],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[TextData[{
+ "DiracOrder is also an option of ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " and some other functions dealing with Dirac algebra. If set to True, the \
+function ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " will be applied to the intermediate result to reorder the Dirac matrices \
+lexicographically."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracOrder", "]"}]], "Input",
+ CellLabel->"In[159]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCJoinDOTs", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"MaxIterations", "\[Rule]", "\[Infinity]"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[159]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -172,9 +215,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
"."
-}], "Text",
- CellTags->"DiracOrder",
- CellID->2147102830]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -204,11 +245,11 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"GA", "[",
RowBox[{"\[Beta]", ",", "\[Alpha]"}], "]"}]}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[1]:=",
+ CellLabel->"In[163]:=",
CellID->1559113060],
Cell[BoxData[
@@ -231,39 +272,32 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[1]=",
- CellID->1026687398]
+ CellLabel->"Out[163]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[2]:=",
+ CellLabel->"In[164]:=",
CellID->1074180519],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -278,22 +312,33 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[2]=",
- CellID->1702463614]
+ CellLabel->"Out[164]="]
}, Open ]],
-Cell["This is a string of Dirac matrices in D dimensions. ", "Text",
- CellTags->"DiracOrder",
- CellID->1050749108],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " also works with Dirac matrices in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Rho]", ",", "\[Nu]", ",", "\[Mu]", ",", "\[Nu]"}],
+ "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[3]:=",
+ CellLabel->"In[169]:=",
CellID->1789420924],
Cell[BoxData[
@@ -302,7 +347,7 @@ Cell[BoxData[
FormBox[
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
@@ -319,67 +364,81 @@ Cell[BoxData[
FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[3]=",
- CellID->147339604]
+ CellLabel->"Out[169]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[4]:=",
+ CellLabel->"In[170]:=",
CellID->1481569664],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{"D", "-", "2"}], ")"}], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[4]=",
- CellID->1627969090]
+ CellLabel->"Out[170]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"GA", "[",
- RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "By default ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " is moved to the right."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[5]:=",
+ CellLabel->"In[174]:=",
CellID->2005079104],
Cell[BoxData[
@@ -408,27 +467,15 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[5]=",
- CellID->2004576322]
+ CellLabel->"Out[174]="]
}, Open ]],
-Cell[TextData[{
- "By default ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]",
- RowBox[{"5", " "}]], TraditionalForm]]],
- "is moved to the right."
-}], "Text",
- CellTags->"DiracOrder",
- CellID->2082752140],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t3", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[6]:=",
+ CellLabel->"In[175]:=",
CellID->1342940029],
Cell[BoxData[
@@ -451,18 +498,16 @@ Cell[BoxData[
FormBox["5",
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[6]=",
- CellID->1359695729]
+ CellLabel->"Out[175]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"GA", "[",
- RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[7]:=",
+ CellLabel->"In[176]:=",
CellID->71636230],
Cell[BoxData[
@@ -489,16 +534,15 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[7]=",
- CellID->729653201]
+ CellLabel->"Out[176]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "t4", "]"}]], "Input",
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[8]:=",
+ CellLabel->"In[177]:=",
CellID->332885129],
Cell[BoxData[
@@ -515,18 +559,28 @@ Cell[BoxData[
FormBox["7",
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[8]=",
- CellID->534859922]
+ CellLabel->"Out[177]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t5", "=",
- RowBox[{"GA", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]"}], "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ Cell[BoxData["orderlist"], "InlineFormula"],
+ " comes into play when we need an ordering that is not lexicographic"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]"}], "]"}]], "Input",
CellTags->"DiracOrder",
- CellLabel->"In[9]:=",
+ CellLabel->"In[181]:=",
CellID->1751727580],
Cell[BoxData[
@@ -557,34 +611,50 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracOrder",
- CellLabel->"Out[9]=",
- CellID->70359997]
+ CellLabel->"Out[181]="]
}, Open ]],
-Cell[TextData[{
- "This orders the ",
- Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]", "\[Alpha]"],
- SuperscriptBox["\[Gamma]", "\[Beta]"],
- SuperscriptBox["\[Gamma]", "\[Delta]"]}], TraditionalForm]]],
- " in reverse order."
-}], "Text",
- CellTags->"DiracOrder",
- CellID->238119482],
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
+ CellLabel->"In[183]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[183]="]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracOrder", "[",
- RowBox[{"t5", ",",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Delta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"\[Delta]", ",", "\[Beta]", ",", "\[Alpha]"}], "}"}]}],
"]"}]], "Input",
- CellTags->"DiracOrder",
- CellLabel->"In[10]:=",
- CellID->203704442],
+ CellLabel->"In[184]:="],
Cell[BoxData[
FormBox[
@@ -616,23 +686,17 @@ Cell[BoxData[
FormBox["\[Delta]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"2", " ",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -640,23 +704,17 @@ Cell[BoxData[
FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"2", " ",
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
@@ -664,70 +722,114 @@ Cell[BoxData[
FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"DiracOrder",
- CellLabel->"Out[10]=",
- CellID->586951928]
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[184]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracOrder", "[", "%", "]"}]], "Input",
- CellTags->"DiracOrder",
- CellLabel->"In[11]:=",
- CellID->1795976011],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Reordering of Dirac matrices in long chains is expensive, so that ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " does not do it by default."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[NoBreak]", "\[Nu]"}], "]"}], "+",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}], "]"}]], "Input",
+ CellLabel->"In[186]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"DiracOrder",
- CellLabel->"Out[11]=",
- CellID->291364117]
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[186]="]
}, Open ]],
+Cell[TextData[{
+ "However, if you know that it can lead to simpler expressions, you can \
+activate the reordering via the option ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3", ",", "t4", ",", "t5"}], "]"}],
- ";"}]], "Input",
- CellTags->"DiracOrder",
- CellLabel->"In[12]:=",
- CellID->1260437833]
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[NoBreak]", "\[Nu]"}], "]"}], "+",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}]}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[5]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[5]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -790,13 +892,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{833, 873},
+WindowMargins->{{1285, Automatic}, {Automatic, 207}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracReduce.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracReduce.nb
index 6b385ce35..c00868c73 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracReduce.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracReduce.nb
@@ -118,21 +118,106 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DiracReduce", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "reduces all four-dimensional Dirac matrices in exp to the standard basis \
-(S,P,V,A,T) using the Chisholm identity (see Chisholm). In the result the \
-basic Dirac structures are wrapped with a head DiracBasis. I.e., S \
-corresponds to DiracBasis[1], P : DiracBasis[DiracMatrix[5]], V: \
-DiracBasis[DiracMatrix[mu]], A: DiracBasis[DiracMatrix[mu, 5]], T: \
-DiracBasis[DiracSigma[DiracMatrix[mu, nu]]]. By default DiracBasis is \
-substituted to Identity. Notice that the result of DiracReduce is given in \
-the FeynCalcExternal-way, i.e.,evtl. you may have to use FeynCalcInternal on \
-the result."
+ " \[LineSeparator]reduces all ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " to the standard basis ",
+ Cell[BoxData[
+ RowBox[{"(",
+ RowBox[{"S", ",", "P", ",", "V", ",", "A", ",", "T"}], ")"}]],
+ "InlineFormula"],
+ " using the Chisholm identity. "
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[TextData[{
+ "In the result the basic Dirac structures are wrapped with a head ",
+ ButtonBox["DiracBasis",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracBasis",
+ ButtonNote->"DiracBasis"],
+ ", that is"
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ Cell[BoxData["S"], "InlineFormula"],
+ ": ",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[", "1", "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ Cell[BoxData["P"], "InlineFormula"],
+ ": ",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"GA", "[", "5", "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ Cell[BoxData["V"], "InlineFormula"],
+ ":",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ Cell[BoxData["A"], "InlineFormula"],
+ ":",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", " ", "5"}], "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ Cell[BoxData["T"], "InlineFormula"],
+ ":",
+ Cell[BoxData[
+ RowBox[{"DiracBasis", "[",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}], "]"}]], "InlineFormula"]
+}], "SeeAlso"],
+
+Cell[TextData[{
+ "By default ",
+ ButtonBox["DiracBasis",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracBasis",
+ ButtonNote->"DiracBasis"],
+ " is substituted to ",
+ Cell[BoxData["Identity"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracReduce", "]"}]], "Input",
+ CellLabel->"In[189]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracSimplify", "\[Rule]", "False"}], ",",
+ RowBox[{"DotSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "True"}], ",",
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{"DiracBasis", "\[Rule]", "Identity"}], "}"}]}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[189]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -168,14 +253,22 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
+ ButtonBox["Chisholm",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Chisholm",
+ ButtonNote->"Chisholm"],
+ ", ",
ButtonBox["DiracSimplify",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
ButtonNote->"DiracSimplify"],
+ ", ",
+ ButtonBox["EpsChisholm",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/EpsChisholm",
+ ButtonNote->"EpsChisholm"],
"."
-}], "Text",
- CellTags->"DiracReduce",
- CellID->2097841964]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -205,33 +298,11 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Options", "[", "DiracReduce", "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[1]:=",
- CellID->646521382],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"FinalSubstitutions", "\[Rule]",
- RowBox[{"{",
- RowBox[{"DiracBasis", "\[Rule]", "Identity"}], "}"}]}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"DiracReduce",
- CellLabel->"Out[1]=",
- CellID->1909713385]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t1", " ", "=", " ",
+ RowBox[{" ",
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[2]:=",
+ CellLabel->"In[190]:=",
CellID->176343206],
Cell[BoxData[
@@ -254,594 +325,1088 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracReduce",
- CellLabel->"Out[2]=",
- CellID->1169679224]
+ CellLabel->"Out[190]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracReduce", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[3]:=",
+ CellLabel->"In[191]:=",
CellID->1863378816],
Cell[BoxData[
FormBox[
RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], "-",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Sigma]",
RowBox[{
- FormBox["\[Mu]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Nu]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"DiracReduce",
- CellLabel->"Out[3]=",
- CellID->1304770013]
+ CellLabel->"Out[191]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[4]:=",
- CellID->1405125223],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["DiracReduce",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracReduce",
+ ButtonNote->"DiracReduce"],
+ " only works with Dirac matrices in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ " dimensions, ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional objects are ignored."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellLabel->"In[9]:="],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], ")"}],
- TraditionalForm]], "Output",
- CellTags->"DiracReduce",
- CellLabel->"Out[4]=",
- CellID->971985531]
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[9]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracReduce", "[", "t2", "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[5]:=",
- CellID->1093135858],
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
+ CellLabel->"In[10]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"\[ImaginaryI]", " ",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox[
- RowBox[{"$AL", "\[InvisibleApplication]",
- RowBox[{"(", "$102", ")"}]}],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm]}], " ",
- FormBox[
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- RowBox[{"$AL", "\[InvisibleApplication]",
- RowBox[{"(", "$102", ")"}]}],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
+ FormBox["\[Mu]",
TraditionalForm],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], " ",
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"DiracReduce",
- CellLabel->"Out[5]=",
- CellID->1278508135]
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[10]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"DiracMatrix", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
- "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"SpinorV", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[6]:=",
- CellID->1144474685],
+ CellLabel->"In[12]:=",
+ CellID->1405125223],
Cell[BoxData[
FormBox[
- RowBox[{"DiracMatrix", "(",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], ")"}],
- TraditionalForm]], "Output",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"v", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracReduce",
- CellLabel->"Out[6]=",
- CellID->2001677937]
+ CellLabel->"Out[12]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"DiracReduce", "[", "t3", "]"}]}]], "Input",
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
CellTags->"DiracReduce",
- CellLabel->"In[7]:=",
- CellID->654035869],
+ CellLabel->"In[13]:=",
+ CellID->1093135858],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"\[ImaginaryI]", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], "-",
RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Sigma]",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
RowBox[{
- FormBox["\[Rho]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Sigma]",
- TraditionalForm]}]], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "+",
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Sigma]",
- RowBox[{
- FormBox["\[Nu]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Sigma]",
- TraditionalForm]}]], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "-",
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Sigma]",
- RowBox[{
- FormBox["\[Nu]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Rho]",
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$24", ")"}]}],
+ TraditionalForm],
TraditionalForm]}]], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"$MU", "\[InvisibleApplication]",
+ RowBox[{"(", "$24", ")"}]}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "-",
- RowBox[{"\[ImaginaryI]", " ",
- SuperscriptBox["\[Sigma]",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
- FormBox["\[Mu]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Sigma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
TraditionalForm]}]], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "+",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellTags->"DiracReduce",
+ CellLabel->"Out[13]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellTags->"DiracReduce",
+ CellLabel->"In[14]:=",
+ CellID->1144474685],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"DiracReduce",
+ CellLabel->"Out[14]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracReduce", "[", "%", "]"}]], "Input",
+ CellTags->"DiracReduce",
+ CellLabel->"In[15]:=",
+ CellID->654035869],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "-",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Sigma]",
RowBox[{
- FormBox["\[Mu]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Rho]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
TraditionalForm]}]], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"\[ImaginaryI]", " ",
SuperscriptBox["\[Sigma]",
RowBox[{
- FormBox["\[Mu]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
TraditionalForm],
- FormBox["\[Nu]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
TraditionalForm]}]], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "-",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}], "+",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm], " ",
- FormBox[
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm],
- TraditionalForm]}]}], TraditionalForm]], "Output",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
CellTags->"DiracReduce",
- CellLabel->"Out[7]=",
- CellID->1189522129]
+ CellLabel->"Out[15]="]
}, Open ]],
+Cell["Do some checks of the results", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t5", " ", "=",
- RowBox[{"Calc", "[",
- RowBox[{"DiracSimplify", "[",
- RowBox[{"DiracSigmaExplicit", "[",
- RowBox[{"t4", ".", "t4"}], "]"}], "]"}], "]"}]}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[8]:=",
- CellID->1302843775],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}]}],
+ "]"}]], "Input",
+ CellLabel->"In[16]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "128"}], TraditionalForm]], "Output",
- CellTags->"DiracReduce",
- CellLabel->"Out[8]=",
- CellID->2142207150]
+ CellLabel->"Out[16]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Calc", "[",
- RowBox[{"t4", ".", "t4"}], "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[9]:=",
- CellID->1419075428],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"DiracReduce", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}], ".",
+ RowBox[{"DiracReduce", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]}], "]"}]], "Input",
+ CellLabel->"In[17]:="],
Cell[BoxData[
FormBox[
RowBox[{"-", "128"}], TraditionalForm]], "Output",
- CellTags->"DiracReduce",
- CellLabel->"Out[9]=",
- CellID->474875609]
+ CellLabel->"Out[17]="]
+}, Open ]]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3", ",", "t4"}], "]"}]], "Input",
- CellTags->"DiracReduce",
- CellLabel->"In[10]:=",
- CellID->156497246]
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "We may also keep the head ",
+ ButtonBox["DiracBasis ",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracBasis",
+ ButtonNote->"DiracBasis"],
+ "in the final result"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracReduce", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ",",
+ RowBox[{"FinalSubstitutions", "\[Rule]",
+ RowBox[{"{", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[18]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}]}], "-",
+ RowBox[{"\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"DiracBasis", "(",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"DiracBasis", "(", "1", ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ RowBox[{"DiracBasis", "(", "1", ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{
+ RowBox[{"DiracBasis", "(", "1", ")"}], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[18]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -904,13 +1469,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{728, 807},
+WindowMargins->{{748, Automatic}, {Automatic, 190}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigma.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigma.nb
index 6262931ed..0068ab491 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigma.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigma.nb
@@ -119,9 +119,8 @@ Cell[TextData[{
Cell[BoxData[
RowBox[{"DiracSigma", "[",
RowBox[{"a", ",", " ", "b"}], "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "stands for i/2*(a . b - b . a) in 4 dimensions. a and b must have Head \
-DiracGamma, DiracMatrix or DiracSlash. Only antisymmetry is implemented."
+ " \[LineSeparator]stands for i/2*(a . b - b . a) in 4 dimensions. a and b \
+must have Head DiracGamma, GA or GS. Only antisymmetry is implemented."
}], "Usage",
CellID->982511436],
@@ -167,9 +166,7 @@ Cell[TextData[{
ButtonData:>"paclet:FeynCalc/ref/DiracSigmaExplicit",
ButtonNote->"DiracSigmaExplicit"],
"."
-}], "Text",
- CellTags->"DiracSigma",
- CellID->94805766]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -199,13 +196,12 @@ Cell[BoxData[
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"DiracSigma", "[",
- RowBox[{
- RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
- RowBox[{"GA", "[", "\[Beta]", "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Beta]", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigma",
- CellLabel->"In[1]:=",
+ CellLabel->"In[639]:=",
CellID->1797257280],
Cell[BoxData[
@@ -217,16 +213,15 @@ Cell[BoxData[
FormBox["\[Beta]",
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"DiracSigma",
- CellLabel->"Out[1]=",
- CellID->669982831]
+ CellLabel->"Out[639]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSigmaExplicit", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
CellTags->"DiracSigma",
- CellLabel->"In[2]:=",
+ CellLabel->"In[640]:=",
CellID->350892177],
Cell[BoxData[
@@ -262,20 +257,18 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracSigma",
- CellLabel->"Out[2]=",
- CellID->249746681]
+ CellLabel->"Out[640]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"DiracSigma", "[",
- RowBox[{
- RowBox[{"GA", "[", "\[Beta]", "]"}], ",",
- RowBox[{"GA", "[", "\[Alpha]", "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Beta]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Alpha]", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigma",
- CellLabel->"In[3]:=",
+ CellLabel->"In[642]:=",
CellID->334267816],
Cell[BoxData[
@@ -288,20 +281,18 @@ Cell[BoxData[
FormBox["\[Beta]",
TraditionalForm]}]]}], TraditionalForm]], "Output",
CellTags->"DiracSigma",
- CellLabel->"Out[3]=",
- CellID->838537027]
+ CellLabel->"Out[642]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"DiracSigma", "[",
- RowBox[{
- RowBox[{"GS", "[", "p", "]"}], ",",
- RowBox[{"GS", "[", "q", "]"}]}], "]"}]}]], "Input",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ",",
+ RowBox[{"GS", "[", "q", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigma",
- CellLabel->"In[4]:=",
+ CellLabel->"In[643]:=",
CellID->938175920],
Cell[BoxData[
@@ -313,16 +304,15 @@ Cell[BoxData[
FormBox["q",
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"DiracSigma",
- CellLabel->"Out[4]=",
- CellID->1981550461]
+ CellLabel->"Out[643]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSigmaExplicit", "[", "t3", "]"}]], "Input",
+ RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
CellTags->"DiracSigma",
- CellLabel->"In[5]:=",
+ CellLabel->"In[644]:=",
CellID->493035408],
Cell[BoxData[
@@ -366,16 +356,24 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracSigma",
- CellLabel->"Out[5]=",
- CellID->360348225]
+ CellLabel->"Out[644]="]
}, Open ]],
+Cell["The antisymmetry propery is built-in", "Notes"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3"}], "]"}]], "Input",
- CellTags->"DiracSigma",
- CellLabel->"In[6]:=",
- CellID->1941239189]
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
+ RowBox[{"GA", "[", "\[Alpha]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[646]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellLabel->"Out[646]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -438,13 +436,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{700, 718},
+WindowMargins->{{959, Automatic}, {Automatic, 233}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExpand.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExpand.nb
new file mode 100644
index 000000000..f47b48893
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExpand.nb
@@ -0,0 +1,665 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracSigmaExpand", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracSigmaExpand", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]applies linearity to the arguments of ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ "."
+}], "Usage",
+ CellID->982511436],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSigmaExpand", "]"}]], "Input",
+ CellLabel->"In[20]:=",
+ CellID->374282664],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"DiracGammaExpand", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Momentum", "\[Rule]", "All"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[20]=",
+ CellID->1173846990]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ ", ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ "."
+}], "SeeAlso",
+ CellID->1822030255]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], "+",
+ RowBox[{"GSD", "[", "q", "]"}]}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[36]:=",
+ CellID->525630839],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ",",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[36]=",
+ CellID->401856684]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"%", "//", "DiracSigmaExpand"}]], "Input",
+ CellLabel->"In[37]:=",
+ CellID->2122869292],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[37]=",
+ CellID->1368035139]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"%", "//", "FCE"}], "//", "StandardForm"}]], "Input",
+ CellLabel->"In[38]:=",
+ CellID->1621111317],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}], "+",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "q", "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]}]], "Output",
+ CellLabel->"Out[38]//StandardForm=",
+ CellID->2128932345]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->904766219],
+
+Cell[TextData[{
+ "Notice that ",
+ ButtonBox["DiracSigmaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigmaExpand",
+ ButtonNote->"DiracSigmaExpand"],
+ " does not expand Dirac matrices contracted to linear combinations of ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-vectors by default."
+}], "Notes",
+ CellID->1591912985],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[27]:=",
+ CellID->1872384147],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ RowBox[{"p", "+", "q"}],
+ TraditionalForm],
+ FormBox["r",
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[27]=",
+ CellID->2031816583]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[", "%", "]"}]], "Input",
+ CellLabel->"In[28]:=",
+ CellID->1982135918],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "+",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], TraditionalForm]], "Output",
+ CellLabel->"Out[28]=",
+ CellID->1642061710]
+}, Open ]],
+
+Cell[TextData[{
+ "If such expansions are required, use the option ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
+ ButtonNote->"DiracGammaExpand"],
+ "."
+}], "Notes",
+ CellID->1529300486],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[",
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "+", "q"}], "]"}], ",",
+ RowBox[{"GSD", "[", "r", "]"}]}], "]"}], ",",
+ RowBox[{"DiracGammaExpand", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[31]:=",
+ CellID->863128085],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[31]=",
+ CellID->640891865]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->2124164560],
+
+Cell[TextData[{
+ "The option ",
+ ButtonBox["Momentum",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Momentum",
+ ButtonNote->"Momentum"],
+ " allows us to perform more fine-grained expansions of ",
+ ButtonBox["DiracSigma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigma",
+ ButtonNote->"DiracSigma"],
+ "."
+}], "Notes",
+ CellID->1389942884],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ",",
+ RowBox[{
+ RowBox[{"GSD", "[", "r", "]"}], "+",
+ RowBox[{"GSD", "[", "t", "]"}]}]}], "]"}], "+",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GSD", "[", "l", "]"}], "+",
+ RowBox[{"GSD", "[", "n", "]"}]}], ",",
+ RowBox[{"GSD", "[", "p", "]"}]}], "]"}]}]], "Input",
+ CellLabel->"In[58]:=",
+ CellID->2037164471],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["n",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ",",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], "+",
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ",",
+ RowBox[{
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["t",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[58]=",
+ CellID->992813878]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExpand", "[",
+ RowBox[{"%", ",",
+ RowBox[{"Momentum", "\[Rule]",
+ RowBox[{"{", "r", "}"}]}]}], "]"}]], "Input",
+ CellLabel->"In[59]:=",
+ CellID->1102856647],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"DiracSigma", "(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["l",
+ TraditionalForm],
+ TraditionalForm]}], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["n",
+ TraditionalForm],
+ TraditionalForm]}]}], ",",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["r",
+ TraditionalForm],
+ TraditionalForm]}]], "+",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["t",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[59]=",
+ CellID->1534302668]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 795},
+WindowMargins->{{829, Automatic}, {Automatic, 261}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExplicit.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExplicit.nb
index 79cd6d67a..778e6ac39 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExplicit.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSigmaExplicit.nb
@@ -124,8 +124,26 @@ an option of DiracSimplify."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell["\<\
+DiracSigmaExplict is also an option of various FeynCalc functions that handle \
+the Dirac algebra\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSigmaExplicit", "]"}]], "Input",
+ CellLabel->"In[60]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[60]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -161,14 +179,18 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ ", ",
ButtonBox["DiracSigma",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracSigma",
ButtonNote->"DiracSigma"],
"."
-}], "Text",
- CellTags->"DiracSigmaExplicit",
- CellID->1461748259]
+}], "SeeAlso",
+ CellID->1822030255]
}, Open ]],
Cell[CellGroupData[{
@@ -203,7 +225,7 @@ Cell[BoxData[
RowBox[{"GA", "[", "\[Alpha]", "]"}], ",",
RowBox[{"GA", "[", "\[Beta]", "]"}]}], "]"}]], "Input",
CellTags->"DiracSigmaExplicit",
- CellLabel->"In[1]:=",
+ CellLabel->"In[61]:=",
CellID->535100858],
Cell[BoxData[
@@ -215,8 +237,7 @@ Cell[BoxData[
FormBox["\[Beta]",
TraditionalForm]}]], TraditionalForm]], "Output",
CellTags->"DiracSigmaExplicit",
- CellLabel->"Out[1]=",
- CellID->1064329329]
+ CellLabel->"Out[61]="]
}, Open ]],
Cell[CellGroupData[{
@@ -224,7 +245,7 @@ Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
CellTags->"DiracSigmaExplicit",
- CellLabel->"In[2]:=",
+ CellLabel->"In[62]:=",
CellID->280405798],
Cell[BoxData[
@@ -260,8 +281,115 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracSigmaExplicit",
- CellLabel->"Out[2]=",
- CellID->1384105478]
+ CellLabel->"Out[62]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"DiracSigma", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ",",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}]}], "]"}], ".",
+ RowBox[{"GSD", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[63]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ SuperscriptBox["\[Sigma]",
+ RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ FormBox["\[Nu]",
+ TraditionalForm]}]], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[63]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSigmaExplicit", "[", "%", "]"}]], "Input",
+ CellLabel->"In[64]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1", "2"], " ", "\[ImaginaryI]", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[64]="]
+}, Open ]]
}, Open ]]
}, Open ]],
@@ -326,12 +454,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1207, Automatic}, {Automatic, 137}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimpCombine.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimpCombine.nb
deleted file mode 100644
index 7dd6cddf2..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimpCombine.nb
+++ /dev/null
@@ -1,265 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DiracSimpCombine", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DiracSimpCombine", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["DiracSimpCombine"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracSimplify. If set to True, sums of DiracGamma's will \
-be merged as much as possible in DiracGamma[ .. + .. + ]'s."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"DiracSimpCombine",
- CellID->1079786131]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify.nb
index 1b7c3e78f..83526b0a7 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify.nb
@@ -117,18 +117,106 @@ Cell["DiracSimplify", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "simplifies products of Dirac matrices in expr and expands non-commutative \
-products. Double Lorentz indices and four vectors are contracted. The Dirac \
-equation is applied. All DiracMatrix[5], DiracMatrix[6] and DiracMatrix[7] \
-are moved to the right. The order of the other Dirac matrices is not \
-changed."
+ RowBox[{"DiracSimplify", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]simplifies products of Dirac matrices in ",
+ Cell[BoxData["exp"], "InlineFormula"],
+ " and expands non-commutative products."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[TextData[{
+ "The simplifications are done by applying ",
+ ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ ", ",
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ ", ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ ", ",
+ ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ " and ",
+ ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ "."
+}], "Notes",
+ CellID->1067943069],
+
+Cell[TextData[{
+ "All ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ", ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ " are moved to the right ."
+}], "Notes"],
+
+Cell[TextData[{
+ "The order of the other Dirac matrices is not changed, unless the option ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ " is set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSimplify", "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[1]:=",
+ CellID->2098245619],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracEquation", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracSigmaExplicit", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracGammaCombine", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracSubstitute5", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracSubstitute67", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrace", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "True"}], ",",
+ RowBox[{"Expand2", "\[Rule]", "True"}], ",",
+ RowBox[{"ExpandScalarProduct", "\[Rule]", "True"}], ",",
+ RowBox[{"Expanding", "\[Rule]", "True"}], ",",
+ RowBox[{"FCCheckSyntax", "\[Rule]", "False"}], ",",
+ RowBox[{"FCDiracIsolate", "\[Rule]", "True"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "False"}], ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "False"}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "True"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "True"}], ",",
+ RowBox[{"ToDiracGamma67", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[1]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -164,24 +252,82 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["Calc",
+ ButtonBox["Contract",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ ", ",
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ ", ",
+ ButtonBox["DiracSigmaExplicit",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Calc",
- ButtonNote->"Calc"],
+ ButtonData:>"paclet:FeynCalc/ref/DiracSigmaExplicit",
+ ButtonNote->"DiracSigmaExplicit"],
+ ", ",
+ ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ ", ",
+ ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
", ",
ButtonBox["DiracGammaExpand",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ ", ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ ", ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ ", ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
", ",
ButtonBox["DiracTrick",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
ButtonNote->"DiracTrick"],
+ ", ",
+ ButtonBox["FCDiracIsolate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCDiracIsolate",
+ ButtonNote->"FCDiracIsolate"],
+ ", ",
+ ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ ", ",
+ ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ ", ",
+ ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
"."
-}], "Text",
- CellTags->"DiracSimplify",
- CellID->1981859865]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -208,45 +354,17 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracSimplify", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[1]:=",
- CellID->2098245619],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"DiracCanonical", "\[Rule]", "False"}], ",",
- RowBox[{"DiracSigmaExplicit", "\[Rule]", "True"}], ",",
- RowBox[{"DiracSimpCombine", "\[Rule]", "False"}], ",",
- RowBox[{"DiracSubstitute67", "\[Rule]", "False"}], ",",
- RowBox[{"Expanding", "\[Rule]", "True"}], ",",
- RowBox[{"Factoring", "\[Rule]", "False"}], ",",
- RowBox[{"SirlinRelations", "\[Rule]", "True"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
- RowBox[{"InsideDiracTrace", "\[Rule]", "False"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[1]=",
- CellID->1444421220]
-}, Open ]],
-
-Cell["This is a string of Dirac matrices in four dimensions. ", "Text",
- CellTags->"DiracSimplify",
- CellID->1154366536],
+Cell["\<\
+Simplify a 4-dimensional Dirac matrix chain with a dummy Lorentz index\
+\>", "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t1", "=",
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]], "Input",
CellTags->"DiracSimplify",
- CellLabel->"In[2]:=",
+ CellLabel->"In[137]:=",
CellID->201005194],
Cell[BoxData[
@@ -277,16 +395,15 @@ Cell[BoxData[
TraditionalForm]],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracSimplify",
- CellLabel->"Out[2]=",
- CellID->642203150]
+ CellLabel->"Out[137]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t1", "]"}]], "Input",
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
CellTags->"DiracSimplify",
- CellLabel->"In[3]:=",
+ CellLabel->"In[138]:=",
CellID->28604534],
Cell[BoxData[
@@ -300,314 +417,197 @@ Cell[BoxData[
TraditionalForm],
TraditionalForm]]}], TraditionalForm]], "Output",
CellTags->"DiracSimplify",
- CellLabel->"Out[3]=",
- CellID->1608459635]
+ CellLabel->"Out[138]="]
}, Open ]],
-Cell["This is a string of Dirac matrices in D dimensions. ", "Text",
- CellTags->"DiracSimplify",
- CellID->321850317],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t2", "=",
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[4]:=",
- CellID->149362799],
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[4]=",
- CellID->786634532]
-}, Open ]],
+Cell[TextData[{
+ "Another common concerns Dirac matrices contracted to the same ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-vector"
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t1", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[5]:=",
- CellID->1129253480],
+ RowBox[{
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[139]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-", "2"}], " ",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{"(",
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[5]=",
- CellID->120098280]
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[139]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t3", "=",
- RowBox[{"GA", "[",
- RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[6]:=",
- CellID->570896083],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[140]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
+ SuperscriptBox[
FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[6]=",
- CellID->333412029]
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], TraditionalForm]], "Output",
+ CellLabel->"Out[140]="]
}, Open ]],
Cell[TextData[{
- "By default ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "is moved to the right."
-}], "Text",
- CellTags->"DiracSimplify",
- CellID->766299813],
+ "Unlike ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ ", ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " does noncommutative expansion."
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t3", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[7]:=",
- CellID->264425668],
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"c", "+", "d"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[141]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{"(",
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[7]=",
- CellID->1845106993]
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[141]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"t4", "=",
- RowBox[{"GA", "[",
- RowBox[{"6", ",", "\[Mu]", ",", "7"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[8]:=",
- CellID->1307415504],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["6",
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["7",
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[8]=",
- CellID->1842675018]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t4", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[9]:=",
- CellID->1923692276],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["7",
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[9]=",
- CellID->312699584]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t5", "=",
- RowBox[{
- RowBox[{"GS", "[",
- RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
- RowBox[{"GS", "[", "p", "]"}], ".",
- RowBox[{"GS", "[", "p", "]"}], ".",
- RowBox[{"GS", "[",
- RowBox[{"c", "+", "d"}], "]"}]}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[10]:=",
- CellID->1879344534],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[142]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
- FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
+ RowBox[{"2", " ",
+ RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
OverscriptBox[
- FormBox["p",
+ FormBox["c",
TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["c",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["d",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}],
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[10]=",
- CellID->1520402677]
-}, Open ]],
-
-Cell["\<\
-Contrary to DiracTrick DiracSimplify does non-commutative expansion.\
-\>", "Text",
- CellTags->"DiracSimplify",
- CellID->1032130436],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t5", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[11]:=",
- CellID->697887732],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -632,6 +632,38 @@ Cell[BoxData[
FormBox["c",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -656,6 +688,38 @@ Cell[BoxData[
FormBox["d",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -680,6 +744,38 @@ Cell[BoxData[
FormBox["c",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
RowBox[{
SuperscriptBox[
FormBox[
@@ -704,46 +800,53 @@ Cell[BoxData[
FormBox["d",
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[11]=",
- CellID->865972170]
+ CellLabel->"Out[142]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrick", "[", "t5", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[12]:=",
- CellID->1805591394],
+ RowBox[{"DiracTrick", "[",
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"c", "+", "d"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[143]:="],
Cell[BoxData[
FormBox[
RowBox[{
- SuperscriptBox[
- FormBox[
- OverscriptBox[
- FormBox["p",
- TraditionalForm], "_"],
- TraditionalForm], "2"], " ",
- RowBox[{
- RowBox[{"(",
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
- FormBox[
+ RowBox[{"2", " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
FormBox[
- RowBox[{
- OverscriptBox[
- FormBox["a",
- TraditionalForm], "_"], "+",
- OverscriptBox[
- FormBox["b",
- TraditionalForm], "_"]}],
- TraditionalForm],
- TraditionalForm], ")"}], ")"}], ".",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], " ",
RowBox[{"(",
RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
FormBox[
FormBox[
RowBox[{
@@ -754,81 +857,200 @@ Cell[BoxData[
FormBox["d",
TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm], ")"}], ")"}]}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[12]=",
- CellID->1568743885]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"t6", " ", "=", " ",
- RowBox[{
- RowBox[{"SpinorVBar", "[", "p", "]"}], " ", ".", " ",
- RowBox[{"GS", "[", "p", "]"}], " ", ".", " ",
- RowBox[{"SpinorUBar", "[", "q", "]"}]}]}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[13]:=",
- CellID->106324036],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{
- OverscriptBox["v", "_"], "(",
- FormBox["p",
- TraditionalForm], ")"}], ".",
- RowBox[{"(",
- FormBox[
- RowBox[{
- OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
FormBox[
OverscriptBox[
FormBox["p",
TraditionalForm], "_"],
- TraditionalForm]}],
- TraditionalForm], ")"}], ".",
+ TraditionalForm]}], ")"}]}], "-",
RowBox[{
- OverscriptBox["u", "_"], "(",
- FormBox["q",
- TraditionalForm], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[13]=",
- CellID->759706260]
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[143]="]
}, Open ]],
+Cell[TextData[{
+ "Some of those expansions can be inhibited via the option ",
+ ButtonBox["Expanding",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Expanding",
+ ButtonNote->"Expanding"],
+ "."
+}], "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[", "t6", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[14]:=",
- CellID->1935005981],
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GS", "[",
+ RowBox[{"a", "+", "b"}], "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"c", "+", "d"}], "]"}], ".",
+ RowBox[{"GS", "[", "p", "]"}]}], ",",
+ RowBox[{"Expanding", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[144]:="],
Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[14]=",
- CellID->1632860123]
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["a",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["b",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["c",
+ TraditionalForm], "_"],
+ TraditionalForm]}], "+",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["d",
+ TraditionalForm], "_"],
+ TraditionalForm]}]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[144]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"GAD", "@@",
- RowBox[{"Join", "[",
- RowBox[{
- RowBox[{"{", "\[Mu]", "}"}], ",",
- RowBox[{"Table", "[",
- RowBox[{
- SubscriptBox["\[Nu]", "i"], ",",
- RowBox[{"{",
- RowBox[{"i", ",", "6"}], "}"}]}], "]"}], ",",
- RowBox[{"{", "\[Mu]", "}"}]}], "]"}]}]], "Input",
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The matrix chain may also live in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}]], "Input",
CellTags->"DiracSimplify",
- CellLabel->"In[15]:=",
- CellID->1949590828],
+ CellLabel->"In[145]:=",
+ CellID->149362799],
Cell[BoxData[
FormBox[
@@ -843,153 +1065,312 @@ Cell[BoxData[
FormBox[
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
FormBox[
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[145]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[146]:=",
+ CellID->1129253480],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
+ TraditionalForm]]}], "-",
+ RowBox[{"D", " ",
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
+ FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[146]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GSD", "[", "p", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Alpha]", ",", "\[Beta]"}], "]"}], ".",
+ RowBox[{"GSD", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[147]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
FormBox[
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]],
TraditionalForm], ".",
FormBox[
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox["\[Mu]",
+ FormBox["\[Beta]",
TraditionalForm],
TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[15]=",
- CellID->376958677]
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[147]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[16]:=",
- CellID->789913816],
+ CellLabel->"In[148]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"-",
- RowBox[{"12", " ",
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
- TraditionalForm]]}]}]}], "+",
- RowBox[{"D", " ",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
RowBox[{
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox["\[Gamma]",
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
+ FormBox["\[Beta]",
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
+ TraditionalForm]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
FormBox[
- SubscriptBox["\[Nu]", "4"],
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
TraditionalForm],
TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[148]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GAD", "@@",
+ RowBox[{"Join", "[",
+ RowBox[{
+ RowBox[{"{", "\[Mu]", "}"}], ",",
+ RowBox[{"Table", "[",
+ RowBox[{
+ SubscriptBox["\[Nu]", "i"], ",",
+ RowBox[{"{",
+ RowBox[{"i", ",", "6"}], "}"}]}], "]"}], ",",
+ RowBox[{"{", "\[Mu]", "}"}]}], "]"}]}]], "Input",
+ CellLabel->"In[149]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[149]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[150]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"12", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]]}]}]}], "+",
+ RowBox[{"D", " ",
+ RowBox[{
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "5"],
+ SubscriptBox["\[Nu]", "1"],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "6"],
+ SubscriptBox["\[Nu]", "2"],
TraditionalForm],
- TraditionalForm]]}]}], "+",
- RowBox[{"4", " ",
- RowBox[{
+ TraditionalForm]], ".",
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
@@ -1013,31 +1394,13 @@ Cell[BoxData[
FormBox[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
- FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ TraditionalForm]]}]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "2"],
+ SubscriptBox["\[Nu]", "3"],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox["\[Gamma]",
@@ -1058,24 +1421,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1087,7 +1444,7 @@ Cell[BoxData[
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "3"],
+ SubscriptBox["\[Nu]", "4"],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox["\[Gamma]",
@@ -1102,24 +1459,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1137,7 +1488,7 @@ Cell[BoxData[
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "4"],
+ SubscriptBox["\[Nu]", "5"],
TraditionalForm],
TraditionalForm]], ".",
SuperscriptBox["\[Gamma]",
@@ -1146,24 +1497,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1187,27 +1532,59 @@ Cell[BoxData[
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "5"],
+ SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "1"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "1"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1234,24 +1611,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1278,24 +1649,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1322,24 +1687,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1366,24 +1725,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "5"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "2"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "2"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1410,24 +1763,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1454,24 +1801,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1498,24 +1839,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "5"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "3"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1542,24 +1877,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "6"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1586,24 +1915,18 @@ Cell[BoxData[
SubscriptBox["\[Nu]", "5"],
TraditionalForm],
TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
- RowBox[{
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "4"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
FormBox[
- FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
RowBox[{"4", " ",
RowBox[{
SuperscriptBox["\[Gamma]",
@@ -1621,254 +1944,4642 @@ Cell[BoxData[
SuperscriptBox["\[Gamma]",
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "3"],
+ SubscriptBox["\[Nu]", "3"],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "4"],
+ TraditionalForm],
+ TraditionalForm]]}], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "5"],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ SubscriptBox["\[Nu]", "6"],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[150]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "2"}], " ",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GSD", "[", "v", "]"}]}], "-",
+ RowBox[{"FVD", "[",
+ RowBox[{"v", ",", "\[Mu]"}], "]"}]}], ")"}]}], " ",
+ RowBox[{"FVD", "[",
+ RowBox[{"v", ",", "\[Mu]"}], "]"}]}]], "Input",
+ CellLabel->"In[151]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox["1", "2"]}], " ",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["v",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["v",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm], ")"}]}], "-",
+ FormBox[
+ SuperscriptBox[
+ FormBox[
+ FormBox["v",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[151]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[152]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellLabel->"Out[152]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " and the chirality projectors are always moved to the right"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[153]:=",
+ CellID->570896083],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[153]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[154]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[154]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "6", "]"}], ".",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[155]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[155]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[156]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[156]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "The properties of the chirality projectors are taken into account without \
+substituting explicit expressions for ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GA", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c3", " ",
+ RowBox[{"GA", "[", "6", "]"}]}], "+",
+ RowBox[{"c4", " ",
+ RowBox[{"GA", "[", "7", "]"}]}]}], ")"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}]}]], "Input",
+ CellLabel->"In[157]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c1", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{"c2", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"c3", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}], "+",
+ RowBox[{"c4", " ",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[157]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Moreover, ",
+ Cell[BoxData[
+ RowBox[{" ",
+ RowBox[{
+ FractionBox["1", "2"],
+ RowBox[{"(",
+ RowBox[{"1", "\[PlusMinus]",
+ SuperscriptBox["\[Gamma]", "5"]}], ")"}]}]}]], "InlineFormula"],
+ " is automatically replaced by ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]",
+ RowBox[{"6", "/", "7"}]]], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}], ")"}],
+ ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}]], "Input",
+ CellLabel->"In[158]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], "+", "a"}], "b"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], "2"], "+",
+ FractionBox["1", "2"]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[158]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[159]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "b"]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "b"]}], TraditionalForm]], "Output",
+ CellLabel->"Out[159]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Suitable combinations of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " will not be rewritten in terms of chirality projectors, if the option ",
+ ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ " is set to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}], ",",
+ RowBox[{"ToDiracGamma67", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[160]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[160]="]
+}, Open ]],
+
+Cell[TextData[{
+ "However, it the final result must contain only ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " but not ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " or ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ ", it is better to invoke the option ",
+ ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ ". This way ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " can perform more intermediate simplifications before presenting the final \
+result."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "-",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"a", "+",
+ RowBox[{"GS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}], ")"}], "/", "b"}], ")"}]}],
+ ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"1", "/", "2"}], "+",
+ RowBox[{
+ RowBox[{"GA", "[", "5", "]"}], "/", "2"}]}], ")"}]}], ",",
+ RowBox[{"DiracSubstitute67", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[161]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]]}], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ RowBox[{"2", " ", "b"}]], "-",
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ RowBox[{"2", " ", "b"}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[161]="]
+}, Open ]],
+
+Cell[TextData[{
+ "It is also possible to eliminate ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " by rewriting it in terms of the chirality projectors"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"5", ",", "\[Mu]", ",", "\[Nu]"}], "]"}], ",",
+ RowBox[{"DiracSubstitute5", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[162]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[162]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+The Dirac equation is routinely used to simplify closed spinor chains.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBar", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}], " ", ".", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GS", "[",
+ SubscriptBox["p", "1"], "]"}], "+",
+ SubscriptBox["m", "1"]}], ")"}], " ", ".", " ",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}]], "Input",
+ CellLabel->"In[163]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], "+",
+ SubscriptBox["m", "1"]}], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[163]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[164]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"2", " ",
+ SubscriptBox["m", "1"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]]}],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[164]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorVBar", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"SpinorU", "[", "q", "]"}]}]], "Input",
+ CellLabel->"In[165]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["v", "_"], "(",
+ FormBox["p",
+ TraditionalForm], ")"}], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ RowBox[{"u", "(",
+ FormBox["q",
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[165]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[166]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellLabel->"Out[166]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Use the option ",
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ " to deactivate this type of simplifications."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorVBar", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"GS", "[", "p", "]"}], " ", ".", " ",
+ RowBox[{"SpinorU", "[", "q", "]"}]}], ",",
+ RowBox[{"DiracEquation", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[167]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ RowBox[{"-",
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox["\[Gamma]", "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[167]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Suitable products of ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional spinor chains are simplified using Sirlin's identities"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}]], "Input",
+ CellLabel->"In[168]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "3"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "4"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[168]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[169]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["liS98",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["liS98",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[169]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The applications of Sirlin's identities can be disabled by setting the \
+option ",
+ ButtonBox["SirlinSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SirlinSimplify",
+ ButtonNote->"SirlinSimplify"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[170]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li991\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li992\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li991\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li992\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[170]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Even when the usage of Sirlin's identities is disabled, ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will still try to perform some simplficiations on the spinor chains, e.g. \
+by canonicalizing the dummy indices."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}]}]], "Input",
+ CellLabel->"In[171]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "3"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "4"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "3"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm], ")"}]}], " ",
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "4"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ",",
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[171]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}]}], "]"}], "//",
+ "Factor"}]], "Input",
+ CellLabel->"In[172]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"c1", "+", "c2"}], ")"}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1061\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1062\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1061\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox[
+ RowBox[{"FCGV", "(", "\<\"li1062\"\>", ")"}],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[172]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Setting ",
+ ButtonBox["SpinorChainTrick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/SpinorChainTrick",
+ ButtonNote->"SpinorChainTrick"],
+ " to ",
+ Cell[BoxData["False"], "InlineFormula"],
+ " disables this behavior."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "3"], ",",
+ SubscriptBox["m", "3"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Rho]", ",", "\[Nu]", ",", "6"}], "]"}],
+ ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "1"], ",",
+ SubscriptBox["m", "1"]}], "]"}]}],
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ RowBox[{
+ SubscriptBox["p", "4"], ",",
+ SubscriptBox["m", "4"]}], "]"}], ".",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Alpha]", ",", "\[Tau]", ",", "\[Nu]", ",", "6"}], "]"}],
+ ".",
+ RowBox[{"SpinorU", "[",
+ RowBox[{
+ SubscriptBox["p", "2"], ",",
+ SubscriptBox["m", "2"]}], "]"}]}]}]}], ",",
+ RowBox[{"SirlinSimplify", "\[Rule]", "False"}], ",",
+ RowBox[{"SpinorChainTrick", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[173]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"c1", " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{"c2", " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["3",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "3"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "1"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["4",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "4"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\",\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox["m", "2"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[173]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will not reorder Dirac matrices lexicographically, but can be forced to do \
+so via the option ",
+ ButtonBox["DiracOrder",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracOrder",
+ ButtonNote->"DiracOrder"],
+ "."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[174]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[174]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GA", "[",
+ RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}], ",",
+ RowBox[{"DiracOrder", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellTags->"DiracSimplify",
+ CellLabel->"In[175]:=",
+ CellID->990886795],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellTags->"DiracSimplify",
+ CellLabel->"Out[175]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Setting ",
+ Cell[BoxData[
+ RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]], "InlineFormula"],
+ " makes the function assume that it is acting inside a Dirac trace. For \
+instance, chains with an odd number of Dirac matrices will be set to zero."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}]], "Input",
+ CellLabel->"In[176]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[176]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[177]:="],
+
+Cell[BoxData[
+ FormBox["0", TraditionalForm]], "Output",
+ CellLabel->"Out[177]="]
+}, Open ]],
+
+Cell["Yet, it will not explicitly calculate the trace", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}],
+ "]"}]], "Input",
+ CellLabel->"In[178]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[178]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"%", ",",
+ RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
+ CellLabel->"In[179]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[179]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Since FeynCalc 9.3, ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will automatically evaluate Dirac traces in the input expression "
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}]], "Input",
+ CellLabel->"In[180]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[180]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[181]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[181]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " "}]], "Input",
+ CellLabel->"In[182]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[182]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[183]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SubsuperscriptBox["m", "e", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[183]="]
+}, Open ]],
+
+Cell[TextData[{
+ "This will not happen in the option ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
+ " is set to False. However, ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " will still perform some simplifications inside the trace, without \
+evaluating it explicitly."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " ", ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[184]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SubsuperscriptBox["m", "e", "2"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{
+ SubscriptBox["m", "e"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ SubscriptBox["m", "e"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ SubscriptBox["m", "e"], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}]}]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[184]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Set ",
+ Cell[BoxData[
+ RowBox[{"DiracTrace", "\[Rule]", "False"}]], "InlineFormula"],
+ " if you want ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " not to touch the Dirac traces."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " ", ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}], ",",
+ RowBox[{"DiracTrace", "\[Rule]", "False"}]}], "]"}]], "Input",
+ CellLabel->"In[185]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "+",
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}]}], ")"}], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[185]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "When doing calculations at one loop and above, you may encounter \
+expressions that contain ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "- and ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensional objects."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GA", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}]], "Input",
+ CellLabel->"In[186]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], "+", "m"}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[186]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Although ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ " can handle such terms effortlessly, it will not do so unless you certify \
+that you fully understand what you are doing: being sloppy with the \
+dimensions easily leads to inconsistencies and wrong results!"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[187]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ StyleBox[
+ RowBox[{"DiracTrace", "::", "mixmsg"}], "MessageName"],
+ RowBox[{
+ ":", " "}], "\<\"Expressions that mix D-, 4- and D-4-dimensional \
+quantities are forbidden in Dirac matrix chains unless you are using the \
+t'Hooft-Veltman scheme. For every other scheme, please recheck your input \
+expressions and ensure that all matrices, spinors and tensors are purely \
+D-dimensional. You might want to use FCGetDimensions[exp] to find the \
+offending terms and fix them by hand or ChangeDimension[exp,D] to convert the \
+whole expression to D-dimensions. If you explicitly intend to use the \
+t'Hooft-Veltman scheme, please activate it via FCSetDiracGammaScheme[\\\"BMHV\
+\\\"]. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
+ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
+ButtonData:>\\\"paclet:FeynCalc/ref/DiracTrace\\\", ButtonNote -> \
+\\\"FeynCalc`DiracTrace::mixmsg\\\"]\\)\"\>"}],
+ TraditionalForm]], "Message", "MSG",
+ CellLabel->"During evaluation of In[187]:="],
+
+Cell[BoxData[
+ FormBox["$Aborted", TraditionalForm]], "Output",
+ CellLabel->"Out[187]="]
+}, Open ]],
+
+Cell[TextData[{
+ "By default, FeynCalc uses the naive dimensional regularization (NDR) \
+scheme, where all Dirac matrices are taken to be ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional. Therefore, in NDR you may not have mixtures of Dirac matrices \
+living in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ " and 4 dimensions. However, such expressions are possible in the \
+t'Hooft-Veltman-Breitenlohner-Maison (BMHV) scheme."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+ CellLabel->"In[188]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{
+ RowBox[{"GAD", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GA", "[", "p", "]"}], "+", "m"}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[189]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"D", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"D", " ", "m"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[189]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+
+ CellLabel->"In[190]:="],
+
+Cell[TextData[{
+ "The BMHV scheme is a special prescription for handling ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization. Do not activate this scheme mindlessly just \
+to get rid of errors from ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "! If you are doing a calculation in NDR or a calculation that does not \
+involve ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ", better make sure that your input expressions are correctly written to be ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional objects."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces that contain an odd number of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " or chirality projectors cannot be calculated unambigously in NDR. To \
+avoid inconsistencies, ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ " will refuse to evaluate such traces in NDR."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Alpha]",
+ ",", "\[Beta]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[191]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[191]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[192]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[192]="]
+}, Open ]],
+
+Cell["\<\
+Such traces can be consistently calculated in the BMHV scheme. Our scheme \
+choice as of course also possible, but those are not implemented in FeynCalc.\
+\
+\>", "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+ CellLabel->"In[193]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Alpha]",
+ ",", "\[Beta]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[194]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Alpha]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Beta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[194]="]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+
+ CellLabel->"In[195]:="],
+
+Cell[TextData[{
+ "Keep in mind that the BMHV scheme violates axial Ward identities and \
+requires special model-dependent counter-terms to restore those. Therefore, \
+just setting ",
+ ButtonBox["FCSetDiracGammaScheme[\"BMHV\"]",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ " does not automatically resolve all your troubles with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions. The proper treatment of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization is an intricate issue that cannot be boiled \
+down to a simple and universal recipe. FeynCalc merely carries out the \
+algebraic operations that you request, but it is still your task to ensure \
+that what you do makes sense."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell["\<\
+Since FeynCalc 9.3 it is also possible to simplify Dirac matrices with \
+Cartesian or temporal indices. However, the support of nonrelativistic \
+calculations is a very new feature, so that things may not work as smooth as \
+they do for manifestly Lorentz covariant expressions.\
+\>", "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGA", "[", "i", "]"}]}]], "Input",
+ CellLabel->"In[196]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[196]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[197]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"-", "3"}], TraditionalForm]], "Output",
+ CellLabel->"Out[197]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGS", "[", "p", "]"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}], ".",
+ RowBox[{"CGS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}]], "Input",
+ CellLabel->"In[198]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[198]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[199]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], " ",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], "+",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[199]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"CGS", "[", "p", "]"}], ".",
+ RowBox[{"CGA", "[", "j", "]"}], ".",
+ RowBox[{"CGS", "[",
+ RowBox[{"p", "+", "q"}], "]"}]}],
+ RowBox[{"KD", "[",
+ RowBox[{"i", ",", "j"}], "]"}]}]], "Input",
+ CellLabel->"In[200]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Delta]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]],
+ TraditionalForm], " ",
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
FormBox[
FormBox[
- SubscriptBox["\[Nu]", "4"],
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]]}], " ",
- FormBox[
- SuperscriptBox["g",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ FormBox[
RowBox[{
- FormBox[
+ OverscriptBox[
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "5"],
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]", "(",
FormBox[
FormBox[
- FormBox[
- SubscriptBox["\[Nu]", "6"],
- TraditionalForm],
+ RowBox[{
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "+",
+ OverscriptBox[
+ FormBox[
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"]}],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[16]=",
- CellID->1001867930]
+ TraditionalForm], ")"}],
+ TraditionalForm], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[200]="]
}, Open ]],
-Cell["\<\
- With the option DiracCanonical an alphabetic ordering is done.\
-\>", "Text",
- CellTags->"DiracSimplify",
- CellID->1099320763],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Nu]", ",", "\[Mu]"}], "]"}], ",",
- RowBox[{"DiracCanonical", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[17]:=",
- CellID->990886795],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[201]:="],
Cell[BoxData[
FormBox[
RowBox[{
- RowBox[{"2", " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ OverscriptBox[
FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"], "\[CenterDot]",
+ FormBox[
+ OverscriptBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
+ StyleBox["q",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ SuperscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["p",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ TraditionalForm], "2"]}], TraditionalForm]], "Output",
+ CellLabel->"Out[201]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"TGA", "[", "]"}], ".",
+ RowBox[{"CGA", "[", "i", "]"}], ".",
+ RowBox[{"TGA", "[", "]"}]}]], "Input",
+ CellLabel->"In[202]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Mu]",
+ FormBox["0",
TraditionalForm],
- TraditionalForm]], ".",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
SuperscriptBox[
OverscriptBox["\[Gamma]", "_"],
FormBox[
- FormBox["\[Nu]",
+ FormBox["0",
TraditionalForm],
- TraditionalForm]]}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[17]=",
- CellID->611510418]
+ TraditionalForm]],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[202]="]
}, Open ]],
-Cell["\<\
-Setting InsideDiracTrace\[Rule]True assumes that a trace is still to be taken \
-later on.\
-\>", "Text",
- CellTags->"DiracSimplify",
- CellID->120600204],
-
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
- ",",
- RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[18]:=",
- CellID->634548915],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[203]:="],
Cell[BoxData[
FormBox[
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
+ RowBox[{"-",
+ SuperscriptBox[
+ OverscriptBox[
+ FormBox[
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm], "_"],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[203]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"CGAD", "[",
+ RowBox[{"i", ",", "j", ",", "k", ",", "l"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[204]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
+ StyleBox["\<\"\[Gamma]\"\>",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
FormBox[
FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[18]=",
- CellID->665614645]
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[204]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracSimplify", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ",",
- RowBox[{"InsideDiracTrace", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[19]:=",
- CellID->1157409425],
-
-Cell[BoxData[
- FormBox["0", TraditionalForm]], "Output",
- CellTags->"DiracSimplify",
- CellLabel->"Out[19]=",
- CellID->1005658115]
-}, Open ]],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[205]:="],
Cell[BoxData[
- RowBox[{"Clear", "[",
- RowBox[{"t1", ",", "t2", ",", "t3", ",", "t4", ",", "t5", ",", "t6"}],
- "]"}]], "Input",
- CellTags->"DiracSimplify",
- CellLabel->"In[20]:=",
- CellID->1926028871]
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["i",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["j",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["\[Delta]",
+ RowBox[{
+ FormBox[
+ FormBox[
+ StyleBox["k",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox[
+ StyleBox["l",
+ StripOnInput->False,
+ FontWeight->Bold],
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[205]="]
+}, Open ]]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -1931,13 +6642,15 @@ Cell[BoxData[
CellID->589267740]
}, Open ]]
},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowSize->{894, 989},
+WindowMargins->{{Automatic, 210}, {Automatic, -8}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.4 for Linux x86 (64-bit) (April 11, 2016)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify2.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify2.nb
deleted file mode 100644
index f12e87878..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSimplify2.nb
+++ /dev/null
@@ -1,387 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DiracSimplify2", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DiracSimplify2", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData[
- RowBox[{"DiracSimplify2", "[", "exp", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "simplifies the Dirac structure but leaves any ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- " untouched."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- "."
-}], "Text",
- CellTags->"DiracSimplify2",
- CellID->482305006]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{
- RowBox[{"GAD", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Mu]"}], "]"}], ".", "GA5", ".",
- RowBox[{"GAD", "[",
- RowBox[{"\[Alpha]", ",", "\[Beta]", ",", "\[Alpha]"}], "]"}]}]], "Input",
- CellTags->"DiracSimplify2",
- CellLabel->"In[1]:=",
- CellID->439314570],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm], ".",
- FormBox[
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]],
- TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify2",
- CellLabel->"Out[1]=",
- CellID->1049863911]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracSimplify2", "[", "%", "]"}]], "Input",
- CellTags->"DiracSimplify2",
- CellLabel->"In[2]:=",
- CellID->535525902],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox[
- OverscriptBox["\[Gamma]", "_"],
- FormBox["5",
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Beta]",
- TraditionalForm],
- TraditionalForm]], ".",
- SuperscriptBox["\[Gamma]",
- FormBox[
- FormBox["\[Alpha]",
- TraditionalForm],
- TraditionalForm]]}], TraditionalForm]], "Output",
- CellTags->"DiracSimplify2",
- CellLabel->"Out[2]=",
- CellID->1933714897]
-}, Open ]]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSlash.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSlash.nb
index 329bd45bb..4e81c247c 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSlash.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSlash.nb
@@ -118,26 +118,44 @@ Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
RowBox[{"DiracSlash", "[", "p", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the contraction ",
+ " \[LineSeparator]is the contraction ",
Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["p", "\[Mu]"],
SubscriptBox["\[Gamma]",
RowBox[{"\[Mu]", " "}]]}], TraditionalForm]]],
- "(FourVector[p, ",
+ "(FV[p, ",
Cell[BoxData[
FormBox["\[Mu]", TraditionalForm]]],
- "] DiracMatrix[",
+ "] GA[",
Cell[BoxData[
FormBox["\[Mu]", TraditionalForm]]],
- "]). Products of those can be entered in the form DiracSlash[p1, p2, ...]."
+ "]). Products of those can be entered in the form GS[p1, p2, ...]."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell["\<\
+The shortcut DiracSlash is deprecated, please use GS instead!\
+\>", "Notes",
+ CellID->1067943069],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSlash", "]"}]], "Input",
+ CellLabel->"In[83]:=",
+ CellID->1215792887],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Dimension", "\[Rule]", "4"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[83]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -173,44 +191,17 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["DiracGammaExpand",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGammaExpand",
- ButtonNote->"DiracGammaExpand"],
- ", ",
- ButtonBox["DiracGamma",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
- ButtonNote->"DiracGamma"],
- ", ",
- ButtonBox["DiracMatrix",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracMatrix",
- ButtonNote->"DiracMatrix"],
- ", ",
- ButtonBox["DiracSimplify",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
- ", ",
- ButtonBox["DiracTrick",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
- ButtonNote->"DiracTrick"],
- ", ",
ButtonBox["GS",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/GS",
ButtonNote->"GS"],
", ",
- ButtonBox["GSD",
+ ButtonBox["FCI",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/GSD",
- ButtonNote->"GSD"],
+ ButtonData:>"paclet:FeynCalc/ref/FCI",
+ ButtonNote->"FCI"],
"."
-}], "Text",
- CellTags->"DiracSlash",
- CellID->1970754340]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -237,26 +228,6 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracSlash", "]"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[1]:=",
- CellID->1930775738],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Dimension", "\[Rule]", "4"}], ",",
- RowBox[{"FeynCalcInternal", "\[Rule]", "True"}]}], "}"}],
- TraditionalForm]], "Output",
- CellTags->"DiracSlash",
- CellLabel->"Out[1]=",
- CellID->286229782]
-}, Open ]],
-
Cell[TextData[{
"This is q-slash, i.e., ",
Cell[BoxData[
@@ -265,16 +236,14 @@ Cell[TextData[{
SuperscriptBox["\[Gamma]", "\[Mu]"],
RowBox[{
SubscriptBox["q", "\[Mu]"], "."}]}], TraditionalForm]]]
-}], "Text",
- CellTags->"DiracSlash",
- CellID->754243775],
+}], "Notes"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DiracSlash", "[", "q", "]"}]], "Input",
CellTags->"DiracSlash",
- CellLabel->"In[2]:=",
+ CellLabel->"In[333]:=",
CellID->1250007007],
Cell[BoxData[
@@ -287,8 +256,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
CellTags->"DiracSlash",
- CellLabel->"Out[2]=",
- CellID->302151266]
+ CellLabel->"Out[333]="]
}, Open ]],
Cell[CellGroupData[{
@@ -298,7 +266,7 @@ Cell[BoxData[
RowBox[{"DiracSlash", "[", "p", "]"}], ".",
RowBox[{"DiracSlash", "[", "q", "]"}]}]], "Input",
CellTags->"DiracSlash",
- CellLabel->"In[3]:=",
+ CellLabel->"In[334]:=",
CellID->751525159],
Cell[BoxData[
@@ -321,8 +289,7 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracSlash",
- CellLabel->"Out[3]=",
- CellID->1980224843]
+ CellLabel->"Out[334]="]
}, Open ]],
Cell[CellGroupData[{
@@ -331,7 +298,7 @@ Cell[BoxData[
RowBox[{"DiracSlash", "[",
RowBox[{"p", ",", "q"}], "]"}]], "Input",
CellTags->"DiracSlash",
- CellLabel->"In[4]:=",
+ CellLabel->"In[335]:=",
CellID->1690251158],
Cell[BoxData[
@@ -354,17 +321,19 @@ Cell[BoxData[
TraditionalForm], "_"],
TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
CellTags->"DiracSlash",
- CellLabel->"Out[4]=",
- CellID->1504514628]
+ CellLabel->"Out[335]="]
}, Open ]],
+Cell["\<\
+DiracSlash is scheduled for removal in the future versions of FeynCalc. The \
+safe alternative is to use GS.\
+\>", "Notes"],
+
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"GS", "[", "p", "]"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[5]:=",
- CellID->2044929662],
+ CellLabel->"In[341]:="],
Cell[BoxData[
FormBox[
@@ -375,48 +344,53 @@ Cell[BoxData[
FormBox["p",
TraditionalForm], "_"],
TraditionalForm]}], TraditionalForm]], "Output",
- CellTags->"DiracSlash",
- CellLabel->"Out[5]=",
- CellID->1319428342]
+ CellLabel->"Out[341]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GSD", "[", "p", "]"}]], "Input",
+ CellLabel->"In[342]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm]}], TraditionalForm]], "Output",
+ CellLabel->"Out[342]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
- RowBox[{"DiracSlash", "[", "q", "]"}], "//", "StandardForm"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[6]:=",
- CellID->1554186442],
+ RowBox[{"FCI", "[",
+ RowBox[{"GS", "[", "p", "]"}], "]"}], "===",
+ RowBox[{"DiracSlash", "[", "p", "]"}]}]], "Input",
+ CellLabel->"In[345]:="],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{"Momentum", "[", "q", "]"}], "]"}]], "Output",
- CellTags->"DiracSlash",
- CellLabel->"Out[6]//StandardForm=",
- CellID->1796628764]
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[345]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
+ RowBox[{"FCI", "[",
+ RowBox[{"GSD", "[", "p", "]"}], "]"}], "===",
RowBox[{"DiracSlash", "[",
- RowBox[{"q", ",",
- RowBox[{"Dimension", "\[Rule]", "n"}]}], "]"}], "//",
- "StandardForm"}]], "Input",
- CellTags->"DiracSlash",
- CellLabel->"In[7]:=",
- CellID->841649305],
+ RowBox[{"p", ",",
+ RowBox[{"Dimension", "\[Rule]", "D"}]}], "]"}]}]], "Input",
+ CellLabel->"In[346]:="],
Cell[BoxData[
- RowBox[{"DiracGamma", "[",
- RowBox[{
- RowBox[{"Momentum", "[",
- RowBox[{"q", ",", "n"}], "]"}], ",", "n"}], "]"}]], "Output",
- CellTags->"DiracSlash",
- CellLabel->"Out[7]//StandardForm=",
- CellID->59747004]
+ FormBox["True", TraditionalForm]], "Output",
+ CellLabel->"Out[346]="]
}, Open ]]
}, Open ]],
@@ -452,7 +426,7 @@ Cell[BoxData[
InterpretationBox[Cell["XXXX", "ExampleSubsection"],
$Line = 0; Null]], "ExampleSubsection",
CellID->1295379749]
-}, Closed]],
+}, Open ]],
Cell[BoxData[
InterpretationBox[Cell["Applications", "ExampleSection"],
@@ -481,12 +455,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1320, Automatic}, {Automatic, 160}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSpinor.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSpinor.nb
deleted file mode 100644
index ba28607d0..000000000
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSpinor.nb
+++ /dev/null
@@ -1,267 +0,0 @@
-Notebook[{
-Cell[TextData[{
- "New in: ",
- Cell["9.0", "HistoryData",
- CellTags->"New"],
- " | Modified in: ",
- Cell[" ", "HistoryData",
- CellTags->"Modified"],
- " | Obsolete in: ",
- Cell[" ", "HistoryData",
- CellTags->"Obsolete"],
- " | Excised in: ",
- Cell[" ", "HistoryData",
- CellTags->"Excised"]
-}], "History",
- CellID->1247902091],
-
-Cell[CellGroupData[{
-
-Cell["Categorization", "CategorizationSection",
- CellID->1122911449],
-
-Cell["Symbol", "Categorization",
- CellLabel->"Entity Type",
- CellID->686433507],
-
-Cell["FeynCalc", "Categorization",
- CellLabel->"Paclet Name",
- CellID->605800465],
-
-Cell["FeynCalc`", "Categorization",
- CellLabel->"Context",
- CellID->468444828],
-
-Cell["FeynCalc/ref/DiracSpinor", "Categorization",
- CellLabel->"URI"]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Keywords", "KeywordsSection",
- CellID->477174294],
-
-Cell["XXXX", "Keywords",
- CellID->1164421360]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Syntax Templates", "TemplatesSection",
- CellID->1872225408],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Additional Function Template",
- CellID->1562036412],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Arguments Pattern",
- CellID->158391909],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Local Variables",
- CellID->1360575930],
-
-Cell[BoxData[""], "Template",
- CellLabel->"Color Equal Signs",
- CellID->793782254]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["Details", "DetailsSection",
- CellID->307771771],
-
-Cell["XXXX", "Details",
- CellLabel->"Lead",
- CellID->670882175],
-
-Cell["XXXX", "Details",
- CellLabel->"Developers",
- CellID->350963985],
-
-Cell["XXXX", "Details",
- CellLabel->"Authors",
- CellID->8391405],
-
-Cell["XXXX", "Details",
- CellLabel->"Feature Name",
- CellID->3610269],
-
-Cell["XXXX", "Details",
- CellLabel->"QA",
- CellID->401364205],
-
-Cell["XXXX", "Details",
- CellLabel->"DA",
- CellID->350204745],
-
-Cell["XXXX", "Details",
- CellLabel->"Docs",
- CellID->732958810],
-
-Cell["XXXX", "Details",
- CellLabel->"Features Page Notes",
- CellID->222905350],
-
-Cell["XXXX", "Details",
- CellLabel->"Comments",
- CellID->240026365]
-}, Closed]],
-
-Cell[CellGroupData[{
-
-Cell["DiracSpinor", "ObjectName",
- CellID->1224892054],
-
-Cell[TextData[{
- Cell[" ", "ModInfo"],
- Cell[BoxData["DiracSpinor"], "InlineFormula"],
- " \[LineSeparator]",
- "is simply a quantity defined as noncommutative (with \
-DeclareNonCommutative[DiracSpinor]). The convention intended is that \
-DiracSpinor[p, m, ind] is a Dirac spinor for a fermion with momentum p and \
-mass m and indices ind."
-}], "Usage",
- CellID->982511436],
-
-Cell["XXXX", "Notes",
- CellID->1067943069]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Tutorials", "TutorialsSection",
- CellID->250839057],
-
-Cell["XXXX", "Tutorials",
- CellID->341631938]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Demonstrations", "RelatedDemonstrationsSection",
- CellID->1268215905],
-
-Cell["XXXX", "RelatedDemonstrations",
- CellID->1129518860]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["Related Links", "RelatedLinksSection",
- CellID->1584193535],
-
-Cell["XXXX", "RelatedLinks",
- CellID->1038487239]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["See Also", "SeeAlsoSection",
- CellID->1255426704],
-
-Cell[TextData[{
- "See also: ",
- ButtonBox["Spinor",
- BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/Spinor",
- ButtonNote->"Spinor"],
- "."
-}], "Text",
- CellTags->"DiracSpinor",
- CellID->1151148018]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell["More About", "MoreAboutSection",
- CellID->38303248],
-
-Cell["XXXX", "MoreAbout",
- CellID->1665078683]
-}, Open ]],
-
-Cell[BoxData[
- InterpretationBox[GridBox[{
- {
- StyleBox["Examples", "PrimaryExamplesSection"],
- ButtonBox[
- RowBox[{
- RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
- BaseStyle->"ExtendedExamplesLink",
- ButtonData:>"ExtendedExamples"]}
- }],
- $Line = 0; Null]], "PrimaryExamplesSection",
- CellID->880084151],
-
-Cell[CellGroupData[{
-
-Cell["More Examples", "ExtendedExamplesSection",
- CellTags->"ExtendedExamples",
- CellID->1854448968],
-
-Cell[BoxData[
- InterpretationBox[Cell["Scope", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1293636265],
-
-Cell[BoxData[
- InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1020263627],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- InterpretationBox[Cell["Options", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2061341341],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1757724783],
-
-Cell[BoxData[
- InterpretationBox[Cell["XXXX", "ExampleSubsection"],
- $Line = 0; Null]], "ExampleSubsection",
- CellID->1295379749]
-}, Closed]],
-
-Cell[BoxData[
- InterpretationBox[Cell["Applications", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->258228157],
-
-Cell[BoxData[
- InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->2123667759],
-
-Cell[BoxData[
- InterpretationBox[Cell["Possible Issues", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1305812373],
-
-Cell[BoxData[
- InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->1653164318],
-
-Cell[BoxData[
- InterpretationBox[Cell["Neat Examples", "ExampleSection"],
- $Line = 0; Null]], "ExampleSection",
- CellID->589267740]
-}, Open ]]
-},
-WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
-Visible->True,
-PrivateNotebookOptions->{"FileOutlineCache"->False},
-CellContext->"Global`",
-TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
-StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
- CharacterEncoding -> "UTF-8"]
-]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute5.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute5.nb
new file mode 100644
index 000000000..913894c0e
--- /dev/null
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute5.nb
@@ -0,0 +1,481 @@
+Notebook[{
+Cell[TextData[{
+ "New in: ",
+ Cell["9.3", "HistoryData",
+ CellTags->"New"],
+ " | Modified in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Modified"],
+ " | Obsolete in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Obsolete"],
+ " | Excised in: ",
+ Cell[" ", "HistoryData",
+ CellTags->"Excised"]
+}], "History",
+ CellID->1247902091],
+
+Cell[CellGroupData[{
+
+Cell["Categorization", "CategorizationSection",
+ CellID->1122911449],
+
+Cell["Symbol", "Categorization",
+ CellLabel->"Entity Type",
+ CellID->686433507],
+
+Cell["FeynCalc", "Categorization",
+ CellLabel->"Paclet Name",
+ CellID->605800465],
+
+Cell["FeynCalc`", "Categorization",
+ CellLabel->"Context",
+ CellID->468444828],
+
+Cell["FeynCalc/ref/DiracSubstitute5", "Categorization",
+ CellLabel->"URI"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Keywords", "KeywordsSection",
+ CellID->477174294],
+
+Cell["XXXX", "Keywords",
+ CellID->1164421360]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Syntax Templates", "TemplatesSection",
+ CellID->1872225408],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Additional Function Template",
+ CellID->1562036412],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Arguments Pattern",
+ CellID->158391909],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Local Variables",
+ CellID->1360575930],
+
+Cell[BoxData[""], "Template",
+ CellLabel->"Color Equal Signs",
+ CellID->793782254]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["Details", "DetailsSection",
+ CellID->307771771],
+
+Cell["XXXX", "Details",
+ CellLabel->"Lead",
+ CellID->670882175],
+
+Cell["XXXX", "Details",
+ CellLabel->"Developers",
+ CellID->350963985],
+
+Cell["XXXX", "Details",
+ CellLabel->"Authors",
+ CellID->8391405],
+
+Cell["XXXX", "Details",
+ CellLabel->"Feature Name",
+ CellID->3610269],
+
+Cell["XXXX", "Details",
+ CellLabel->"QA",
+ CellID->401364205],
+
+Cell["XXXX", "Details",
+ CellLabel->"DA",
+ CellID->350204745],
+
+Cell["XXXX", "Details",
+ CellLabel->"Docs",
+ CellID->732958810],
+
+Cell["XXXX", "Details",
+ CellLabel->"Features Page Notes",
+ CellID->222905350],
+
+Cell["XXXX", "Details",
+ CellLabel->"Comments",
+ CellID->240026365]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell["DiracSubstitute5", "ObjectName",
+ CellID->1224892054],
+
+Cell[TextData[{
+ Cell[" ", "ModInfo"],
+ Cell[BoxData[
+ RowBox[{"DiracSubstitute5", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]rewrites ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in terms of the chirality projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
+}], "Usage",
+ CellID->982511436],
+
+Cell[TextData[{
+ " ",
+ ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ " is also an option of various FeynCalc functions that handle Dirac \
+algebra."
+}], "Notes",
+ CellID->1827982253],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSubstitute5", "]"}]], "Input",
+ CellLabel->"In[126]:=",
+ CellID->1278888852],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[126]=",
+ CellID->1990816724]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Tutorials", "TutorialsSection",
+ CellID->250839057],
+
+Cell["XXXX", "Tutorials",
+ CellID->341631938]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Demonstrations", "RelatedDemonstrationsSection",
+ CellID->1268215905],
+
+Cell["XXXX", "RelatedDemonstrations",
+ CellID->1129518860]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["Related Links", "RelatedLinksSection",
+ CellID->1584193535],
+
+Cell["XXXX", "RelatedLinks",
+ CellID->1038487239]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["See Also", "SeeAlsoSection",
+ CellID->1255426704],
+
+Cell[TextData[{
+ ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ ", ",
+ ButtonBox["ToDiracGamma67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
+ "."
+}], "SeeAlso",
+ CellID->655647701]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More About", "MoreAboutSection",
+ CellID->38303248],
+
+Cell["XXXX", "MoreAbout",
+ CellID->1665078683]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+ {
+ StyleBox["Examples", "PrimaryExamplesSection"],
+ ButtonBox[
+ RowBox[{
+ RowBox[{"More", " ", "Examples"}], " ", "\[RightTriangle]"}],
+ BaseStyle->"ExtendedExamplesLink",
+ ButtonData:>"ExtendedExamples"]}
+ }],
+ $Line = 0; Null]], "PrimaryExamplesSection",
+ CellID->880084151],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"GA", "[", "5", "]"}]], "Input",
+ CellLabel->"In[36]:=",
+ CellID->268105944],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[36]=",
+ CellID->1850589136]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute5", "[", "%", "]"}]], "Input",
+ CellLabel->"In[37]:=",
+ CellID->807644320],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[37]=",
+ CellID->1941686393]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter",
+ CellID->887828418],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ SubscriptBox["p", "1"], "]"}], ".",
+ RowBox[{"GA", "[", "\[Mu]", "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GA", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ SubscriptBox["p", "2"], "]"}]}]], "Input",
+ CellLabel->"In[52]:=",
+ CellID->523334398],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[52]=",
+ CellID->1747475379]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute5", "[", "%", "]"}]], "Input",
+ CellLabel->"In[53]:=",
+ CellID->201004118],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], "-",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]]}], ")"}], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[53]=",
+ CellID->1592911965]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell["More Examples", "ExtendedExamplesSection",
+ CellTags->"ExtendedExamples",
+ CellID->1854448968],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Scope", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1293636265],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Generalizations & Extensions", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1020263627],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["Options", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2061341341],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1757724783],
+
+Cell[BoxData[
+ InterpretationBox[Cell["XXXX", "ExampleSubsection"],
+ $Line = 0; Null]], "ExampleSubsection",
+ CellID->1295379749]
+}, Closed]],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Applications", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->258228157],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Properties & Relations", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->2123667759],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Possible Issues", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1305812373],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Interactive Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->1653164318],
+
+Cell[BoxData[
+ InterpretationBox[Cell["Neat Examples", "ExampleSection"],
+ $Line = 0; Null]], "ExampleSection",
+ CellID->589267740]
+}, Open ]]
+},
+WindowSize->{700, 770},
+WindowMargins->{{Automatic, 410}, {197, Automatic}},
+PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
+CellContext->"Global`",
+TrackCellChangeTimes->False,
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
+StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
+ CharacterEncoding -> "UTF-8"]
+]
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute67.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute67.nb
index c59b4fd5c..972e1b54b 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute67.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracSubstitute67.nb
@@ -116,15 +116,45 @@ Cell["DiracSubstitute67", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
- Cell[BoxData["DiracSubstitute67"], "InlineFormula"],
- " \[LineSeparator]",
- "is an option for DiracSimplify. If set to True the chirality-projectors \
-DiracGamma[6] and DiracGamma[7] are substituted by their definitions."
+ Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator] inserts the explicit definitions of the chirality \
+projectors ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "6"]], "InlineFormula"],
+ " and ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "7"]], "InlineFormula"],
+ "."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[TextData[{
+ " ",
+ ButtonBox["DiracSubstitute67",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute67",
+ ButtonNote->"DiracSubstitute67"],
+ " is also an option of various FeynCalc functions that handle Dirac \
+algebra."
+}], "Notes",
+ CellID->1827982253],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracSubstitute67", "]"}]], "Input",
+ CellLabel->"In[40]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}]}], "}"}],
+ TraditionalForm]], "Output",
+ CellLabel->"Out[40]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -160,20 +190,23 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- "See also: ",
+ ButtonBox["DiracSubstitute5",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSubstitute5",
+ ButtonNote->"DiracSubstitute5"],
+ ", ",
ButtonBox["DiracGamma",
BaseStyle->"Link",
ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
ButtonNote->"DiracGamma"],
", ",
- ButtonBox["DiracSimplify",
+ ButtonBox["ToDiracGamma67",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
- ButtonNote->"DiracSimplify"],
+ ButtonData:>"paclet:FeynCalc/ref/ToDiracGamma67",
+ ButtonNote->"ToDiracGamma67"],
"."
-}], "Text",
- CellTags->"DiracSubstitute67",
- CellID->966852186]
+}], "SeeAlso",
+ CellID->655647701]
}, Open ]],
Cell[CellGroupData[{
@@ -185,6 +218,8 @@ Cell["XXXX", "MoreAbout",
CellID->1665078683]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
InterpretationBox[GridBox[{
{
@@ -200,6 +235,260 @@ Cell[BoxData[
Cell[CellGroupData[{
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[", "6", "]"}]], "Input",
+ CellLabel->"In[45]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[45]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[46]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"], "+",
+ FractionBox["1", "2"]}], TraditionalForm]], "Output",
+ CellLabel->"Out[46]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracGamma", "[", "7", "]"}]], "Input",
+ CellLabel->"In[47]:="],
+
+Cell[BoxData[
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]], TraditionalForm]], "Output",
+ CellLabel->"Out[47]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[48]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"]}], TraditionalForm]], "Output",
+ CellLabel->"Out[48]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ SubscriptBox["p", "1"], "]"}], ".",
+ RowBox[{"GA", "[", "6", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ SubscriptBox["p", "2"], "]"}]}]], "Input",
+ CellLabel->"In[49]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[49]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[42]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p1",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"], "+",
+ FractionBox["1", "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["p2",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[42]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"SpinorUBar", "[",
+ SubscriptBox["p", "1"], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}], ".",
+ RowBox[{"SpinorU", "[",
+ SubscriptBox["p", "2"], "]"}]}]], "Input",
+ CellLabel->"In[50]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{
+ OverscriptBox["u", "_"], "(",
+ FormBox[
+ SubscriptBox["p", "1"],
+ TraditionalForm], ")"}], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"u", "(",
+ FormBox[
+ SubscriptBox["p", "2"],
+ TraditionalForm], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[50]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSubstitute67", "[", "%", "]"}]], "Input",
+ CellLabel->"In[51]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["1",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox["1", "2"], "-",
+ FractionBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]], "2"]}], ")"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ FormBox["\<\"\[CurlyPhi]\"\>",
+ TraditionalForm],
+ FormBox["\<\"(\"\>",
+ TraditionalForm],
+ FormBox[
+ SubscriptBox[
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["2",
+ TraditionalForm]],
+ TraditionalForm],
+ FormBox["\<\")\"\>",
+ TraditionalForm]}], ")"}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[51]="]
+}, Open ]]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
Cell["More Examples", "ExtendedExamplesSection",
CellTags->"ExtendedExamples",
CellID->1854448968],
@@ -259,12 +548,14 @@ Cell[BoxData[
}, Open ]]
},
WindowSize->{700, 770},
-WindowMargins->{{-10, Automatic}, {Automatic, -8}},
+WindowMargins->{{1213, Automatic}, {260, Automatic}},
Visible->True,
PrivateNotebookOptions->{"FileOutlineCache"->False},
+CreateCellID->False,
CellContext->"Global`",
TrackCellChangeTimes->False,
-FrontEndVersion->"10.3 for Linux x86 (64-bit) (October 9, 2015)",
+FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionPageStyles.nb",
CharacterEncoding -> "UTF-8"]
]
+
diff --git a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracTrace.nb b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracTrace.nb
index d156127c8..204bd7abf 100644
--- a/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracTrace.nb
+++ b/FeynCalc/DocSource/English/ReferencePages/Symbols/DiracTrace.nb
@@ -117,26 +117,53 @@ Cell["DiracTrace", "ObjectName",
Cell[TextData[{
Cell[" ", "ModInfo"],
Cell[BoxData[
- RowBox[{"DiracTrace", "[", "expr", "]"}]], "InlineFormula"],
- " \[LineSeparator]",
- "is the head of Dirac traces. Whether the trace is evaluated depends on the \
-option DiracTraceEvaluate. Direct trace evaluation should be performed with \
-TR (or Tr). The argument expr may be a product of Dirac matrices or slashes \
-separated by the Mathematica Dot (.).\n\nFor comments regarding ",
- Cell[BoxData[
- FormBox[
- SuperscriptBox["\[Gamma]", "5"], TraditionalForm]]],
- "schemes see the notes for ",
- ButtonBox["TR",
- BaseStyle->"AddOnsLink",
- ButtonData:>"TR",
- ButtonNote->"TR"],
- "."
+ RowBox[{"DiracTrace", "[", "exp", "]"}]], "InlineFormula"],
+ " \[LineSeparator]is the head of Dirac traces. By default the trace is not \
+evaluated. The evaluation occurs only when the option ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
+ " is set to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ ". It is recommended to use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ ", which will automatically evaluate all Dirac traces in the input \
+expression."
}], "Usage",
CellID->982511436],
-Cell["XXXX", "Notes",
- CellID->1067943069]
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Options", "[", "DiracTrace", "]"}]], "Input",
+ CellLabel->"In[72]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Contract", "\[Rule]", "True"}], ",",
+ RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}], ",",
+ RowBox[{"EpsContract", "\[Rule]", "False"}], ",",
+ RowBox[{"Expand", "\[Rule]", "True"}], ",",
+ RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
+ RowBox[{"Factoring", "\[Rule]", "Automatic"}], ",",
+ RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
+ RowBox[{"FeynCalcInternal", "\[Rule]", "False"}], ",",
+ RowBox[{"Mandelstam", "\[Rule]",
+ RowBox[{"{", "}"}]}], ",",
+ RowBox[{"PairCollect", "\[Rule]", "False"}], ",",
+ RowBox[{"Sort", "\[Rule]", "True"}], ",",
+ RowBox[{"Schouten", "\[Rule]", "0"}], ",",
+ RowBox[{"TraceOfOne", "\[Rule]", "4"}], ",",
+ RowBox[{"West", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",
+
+ CellLabel->"Out[72]="]
+}, Open ]]
}, Open ]],
Cell[CellGroupData[{
@@ -172,14 +199,42 @@ Cell["See Also", "SeeAlsoSection",
CellID->1255426704],
Cell[TextData[{
- ButtonBox["TR",
+ ButtonBox["Contract",
BaseStyle->"Link",
- ButtonData:>"paclet:FeynCalc/ref/TR",
- ButtonNote->"TR"],
+ ButtonData:>"paclet:FeynCalc/ref/Contract",
+ ButtonNote->"Contract"],
+ ", ",
+ ButtonBox["DiracEquation",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracEquation",
+ ButtonNote->"DiracEquation"],
+ ", ",
+ ButtonBox["DiracGamma",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGamma",
+ ButtonNote->"DiracGamma"],
+ ", ",
+ ButtonBox["DiracGammaExpand",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracGammaCombine",
+ ButtonNote->"DiracGammaCombine"],
+ ", ",
+ ButtonBox["DiracTrick",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTrick",
+ ButtonNote->"DiracTrick"],
+ ", ",
+ ButtonBox["FCGetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ ", ",
+ ButtonBox["FCSetDiracGammaScheme",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCGetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
"."
-}], "Text",
- CellTags->"DiracTrace",
- CellID->2123270018]
+}], "SeeAlso"]
}, Open ]],
Cell[CellGroupData[{
@@ -206,35 +261,7 @@ Cell[BoxData[
$Line = 0; Null]], "PrimaryExamplesSection",
CellID->880084151],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"Options", "[", "DiracTrace", "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[1]:=",
- CellID->1024967943],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"{",
- RowBox[{
- RowBox[{"Contract", "\[Rule]", "400000"}], ",",
- RowBox[{"EpsContract", "\[Rule]", "False"}], ",",
- RowBox[{"Factoring", "\[Rule]", "Automatic"}], ",",
- RowBox[{"FeynCalcExternal", "\[Rule]", "False"}], ",",
- RowBox[{"Mandelstam", "\[Rule]",
- RowBox[{"{", "}"}]}], ",",
- RowBox[{"PairCollect", "\[Rule]", "False"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "False"}], ",",
- RowBox[{"Schouten", "\[Rule]", "0"}], ",",
- RowBox[{"TraceOfOne", "\[Rule]", "4"}], ",",
- RowBox[{"FCVerbose", "\[Rule]", "False"}], ",",
- RowBox[{"West", "\[Rule]", "True"}]}], "}"}], TraditionalForm]], "Output",
-
- CellTags->"DiracTrace",
- CellLabel->"Out[1]=",
- CellID->606139332]
-}, Open ]],
+Cell["There is no automatic evaluation of Dirac traces", "Notes"],
Cell[CellGroupData[{
@@ -243,7 +270,7 @@ Cell[BoxData[
RowBox[{"GA", "[",
RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], "]"}]], "Input",
CellTags->"DiracTrace",
- CellLabel->"In[2]:=",
+ CellLabel->"In[82]:=",
CellID->60676203],
Cell[BoxData[
@@ -269,8 +296,7 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
CellTags->"DiracTrace",
- CellLabel->"Out[2]=",
- CellID->47904170]
+ CellLabel->"Out[82]="]
}, Open ]],
Cell[CellGroupData[{
@@ -281,7 +307,7 @@ Cell[BoxData[
RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
"]"}]], "Input",
CellTags->"DiracTrace",
- CellLabel->"In[3]:=",
+ CellLabel->"In[83]:=",
CellID->1088537337],
Cell[BoxData[
@@ -323,173 +349,24 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
CellTags->"DiracTrace",
- CellLabel->"Out[3]=",
- CellID->206648847]
-}, Open ]],
-
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"%", " ", "/.", " ",
- RowBox[{"DiracTrace", "\[Rule]", "Tr"}]}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[4]:=",
- CellID->710007181],
-
-Cell[BoxData[
- FormBox[
- RowBox[{"4", " ",
- RowBox[{"(",
- RowBox[{
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "-",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm]}]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracTrace",
- CellLabel->"Out[4]=",
- CellID->697793381]
+ CellLabel->"Out[83]="]
}, Open ]],
-Cell[CellGroupData[{
-
-Cell[BoxData[
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "5"}],
- "]"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[5]:=",
- CellID->196468068],
-
-Cell[BoxData[
- FormBox[
- RowBox[{
- RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], TraditionalForm]], "Output",
- CellTags->"DiracTrace",
- CellLabel->"Out[5]=",
- CellID->72676319]
-}, Open ]],
+Cell[TextData[{
+ "You can either set the option ",
+ ButtonBox["DiracTraceEvaluate",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTraceEvaluate",
+ ButtonNote->"DiracTraceEvaluate"],
+ " to ",
+ Cell[BoxData["True"], "InlineFormula"],
+ " or use ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ "."
+}], "Notes"],
Cell[CellGroupData[{
@@ -497,74 +374,44 @@ Cell[BoxData[
RowBox[{"DiracTrace", "[",
RowBox[{
RowBox[{"GA", "[",
- RowBox[{
- "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Delta]",
- ",", "\[Tau]", ",", "5"}], "]"}], ",",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ ",",
RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}]}], "]"}]], "Input",
CellTags->"DiracTrace",
- CellLabel->"In[6]:=",
- CellID->261281630],
+ CellLabel->"In[84]:=",
+ CellID->710007181],
Cell[BoxData[
FormBox[
- RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ RowBox[{"4", " ",
RowBox[{"(",
RowBox[{
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- FormBox["\[Nu]",
+ FormBox["\[Mu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Rho]",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
- FormBox["\[Sigma]",
+ FormBox["\[Nu]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Rho]",
TraditionalForm],
TraditionalForm]}]]}], "-",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -573,39 +420,10 @@ Cell[BoxData[
FormBox[
FormBox["\[Rho]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "+",
- RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
FormBox[
FormBox["\[Nu]",
TraditionalForm],
@@ -613,30 +431,10 @@ Cell[BoxData[
FormBox[
FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
+ TraditionalForm]}]]}], "+",
RowBox[{
- FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
FormBox["\[Mu]",
@@ -645,414 +443,105 @@ Cell[BoxData[
FormBox[
FormBox["\[Nu]",
TraditionalForm],
- TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
FormBox[
FormBox["\[Rho]",
TraditionalForm],
TraditionalForm],
FormBox[
- FormBox["\[Tau]",
+ FormBox["\[Sigma]",
TraditionalForm],
- TraditionalForm]}]]}], "-",
+ TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
+ CellTags->"DiracTrace",
+ CellLabel->"Out[84]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]"}], "]"}],
+ "]"}], "]"}]], "Input",
+ CellLabel->"In[85]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "+",
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "+",
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "+",
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
- RowBox[{
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm]}]]}], "+",
- RowBox[{
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm]}]]}], "-",
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
RowBox[{
FormBox[
- SuperscriptBox[
- OverscriptBox["g", "_"],
- RowBox[{
- FormBox[
- FormBox[
- FormBox["\[Sigma]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox[
- FormBox["\[Tau]",
- TraditionalForm],
- TraditionalForm],
- TraditionalForm]}]],
- TraditionalForm], " ",
- SuperscriptBox["\[Epsilon]",
- RowBox[{
- FormBox[
- FormBox["\[Delta]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Mu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Nu]",
- TraditionalForm],
- TraditionalForm],
- FormBox[
- FormBox["\[Rho]",
- TraditionalForm],
- TraditionalForm]}]]}]}], ")"}]}], TraditionalForm]], "Output",
- CellTags->"DiracTrace",
- CellLabel->"Out[6]=",
- CellID->2072440944]
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[85]="]
}, Open ]],
Cell[CellGroupData[{
@@ -1061,9 +550,7 @@ Cell[BoxData[
RowBox[{"DiracTrace", "[",
RowBox[{"GS", "[",
RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "]"}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[7]:=",
- CellID->825892025],
+ CellLabel->"In[86]:="],
Cell[BoxData[
FormBox[
@@ -1111,66 +598,8063 @@ Cell[BoxData[
TraditionalForm]}],
TraditionalForm], ")"}]}],
TraditionalForm], ")"}], TraditionalForm]], "Output",
- CellTags->"DiracTrace",
- CellLabel->"Out[7]=",
- CellID->274287736]
+ CellLabel->"Out[86]="]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"DiracTrace", "[",
- RowBox[{
- RowBox[{"GA", "[",
- RowBox[{"\[Mu]", ",", "\[Nu]"}], "]"}], ",",
- RowBox[{"DiracTraceEvaluate", "\[Rule]", "True"}], ",",
- RowBox[{"FCE", "\[Rule]", "True"}]}], "]"}]], "Input",
- CellTags->"DiracTrace",
- CellLabel->"In[8]:=",
- CellID->1341931123],
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[87]:="],
Cell[BoxData[
FormBox[
- RowBox[{"4", " ",
- FormBox[
- FormBox[
- SuperscriptBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}], "+",
+ RowBox[{"4", " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["p",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["q",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ OverscriptBox[
+ FormBox["r",
+ TraditionalForm], "_"],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ OverscriptBox[
+ FormBox["s",
+ TraditionalForm], "_"],
+ TraditionalForm]}], ")"}]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[87]="]
+}, Open ]],
+
+Cell[TextData[{
+ "The old methods of evaluating traces by replacing ",
+ ButtonBox["DiracTrace",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracTrace",
+ ButtonNote->"DiracTrace"],
+ " with ",
+ ButtonBox["Tr",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/Tr",
+ ButtonNote->"Tr"],
+ " or ",
+ ButtonBox["TR",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/TR",
+ ButtonNote->"TR"],
+ " are deprecated and should not be used anymore. In particular, they are \
+slower are less efficient than using ",
+ ButtonBox["DiracSimplify",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/DiracSimplify",
+ ButtonNote->"DiracSimplify"],
+ ". "
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces involving ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " or chirality projectors in ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "-dimensions are also possible"
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "5"}],
+ "]"}], "]"}]], "Input",
+ CellTags->"DiracTrace",
+ CellLabel->"In[88]:=",
+ CellID->196468068],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellTags->"DiracTrace",
+ CellLabel->"Out[88]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[89]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-", "4"}], " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], TraditionalForm]], "Output",
+ CellLabel->"Out[89]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Delta]",
+ ",", "\[Tau]", ",", "5"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[90]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[90]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[91]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
OverscriptBox["g", "_"],
RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[91]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{"GA", "[",
+ RowBox[{
+ "\[Mu]", ",", "\[Nu]", ",", "\[Rho]", ",", "\[Sigma]", ",", "\[Delta]",
+ ",", "\[Tau]", ",", "6"}], "]"}], "]"}]], "Input",
+ CellLabel->"In[92]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["6",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[92]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[93]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[93]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional traces that do not involve ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " are unambiguous."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Nu]", "]"}], ".",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"GSD", "[",
+ RowBox[{"p", "-", "q"}], "]"}], "+",
+ RowBox[{"SMP", "[", "\"\\"", "]"}]}], ")"}], ".",
+ RowBox[{"GAD", "[", "\[Mu]", "]"}]}], "]"}], " "}]], "Input",
+ CellLabel->"In[94]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "-",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]",
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox["m", "e"], "+",
+ FormBox[
+ RowBox[{"\[Gamma]", "\[CenterDot]", "(",
+ FormBox[
+ FormBox[
+ RowBox[{
+ FormBox["p",
+ TraditionalForm], "-",
+ FormBox["q",
+ TraditionalForm]}],
+ TraditionalForm],
+ TraditionalForm], ")"}],
+ TraditionalForm]}], ")"}], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[94]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[95]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ",
+ SubsuperscriptBox["m", "e", "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ RowBox[{"(",
+ RowBox[{
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox["\<\"\[CenterDot]\"\>",
+ TraditionalForm],
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm]}], ")"}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm], "2"], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["p",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], " ",
+ SuperscriptBox[
+ FormBox[
+ FormBox["q",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[95]="]
+}, Open ]]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces that contain ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions are scheme-dependent. The default scheme used in FeynCalc is \
+the naive dimension regularization (NDR), where ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " is assumed to anticommute with all other Dirac matrices. However, chiral \
+traces are ambiguous NDR, unless the trace contains an even number of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ ". This is why FeynCalc will leave such traces unevaluated."
+}], "Notes"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[100]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[100]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[101]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[101]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], "]"}]], "Input",
+ CellLabel->"In[102]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]],
+ TraditionalForm], ".",
+ FormBox[
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["7",
+ TraditionalForm]],
+ TraditionalForm]}],
+ TraditionalForm], ")"}], TraditionalForm]], "Output",
+ CellLabel->"Out[102]="]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[", "%", "]"}]], "Input",
+ CellLabel->"In[103]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"tr", "(",
+ FormBox[
+ RowBox[{
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox["\[Gamma]",
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]], ".",
+ SuperscriptBox[
+ OverscriptBox["\[Gamma]", "_"],
+ FormBox["5",
+ TraditionalForm]]}],
+ TraditionalForm], ")"}]}]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[103]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Over the years people invented many different schemes to deal with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization. Currently, only the \
+t'Hooft-Veltman-Breitenlohner-Maison (BMHV) prescription is fully supported \
+in FeynCalc."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+ CellLabel->"In[104]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"DiracSimplify", "[",
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Rho]"}], "]"}], ".",
+ RowBox[{"GA", "[", "5", "]"}], ".",
+ RowBox[{"GAD", "[",
+ RowBox[{"\[Sigma]", ",", "\[Delta]", ",", "\[Tau]"}], "]"}], ".",
+ RowBox[{"GA", "[", "7", "]"}]}], "]"}], "]"}]], "Input",
+ CellLabel->"In[105]:="],
+
+Cell[BoxData[
+ FormBox[
+ RowBox[{
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"16", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"16", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"16", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"16", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"16", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"16", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"8", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ", "\[ImaginaryI]", " ",
+ SuperscriptBox[
+ OverscriptBox["\[Epsilon]", "_"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"4", " ",
+ SuperscriptBox[
+ OverscriptBox["g", "^"],
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "+",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}], "-",
+ RowBox[{"2", " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Delta]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Mu]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Nu]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Rho]",
+ TraditionalForm],
+ TraditionalForm]}]], " ",
+ SuperscriptBox["g",
+ RowBox[{
+ FormBox[
+ FormBox["\[Sigma]",
+ TraditionalForm],
+ TraditionalForm],
+ FormBox[
+ FormBox["\[Tau]",
+ TraditionalForm],
+ TraditionalForm]}]]}]}], TraditionalForm]], "Output",
+ CellLabel->"Out[105]="]
+}, Open ]],
+
+Cell[TextData[{
+ "Keep in mind that the BMHV scheme violates axial Ward identities and \
+requires special model-dependent counter-terms to restore those. Therefore, \
+just setting ",
+ ButtonBox["FCSetDiracGammaScheme[\"BMHV\"]",
+ BaseStyle->"Link",
+ ButtonData:>"paclet:FeynCalc/ref/FCSetDiracGammaScheme",
+ ButtonNote->"FCSetDiracGammaScheme"],
+ " does not automatically resolve all your troubles with ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensions. The proper treatment of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " in dimensional regularization is an intricate issue that cannot be boiled \
+down to a simple and universal recipe. FeynCalc merely carries out the \
+algebraic operations that you request, but it is still your task to ensure \
+that what you do makes sense."
+}], "Notes"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[Cell["\t", "ExampleDelimiter"],
+ $Line = 0; Null]], "ExampleDelimiter"],
+
+Cell[TextData[{
+ "Traces that are free of ",
+ Cell[BoxData[
+ SuperscriptBox["\[Gamma]", "5"]], "InlineFormula"],
+ " but contain both ",
+ Cell[BoxData["4"], "InlineFormula"],
+ "- and ",
+ Cell[BoxData["D"], "InlineFormula"],
+ "-dimensional Dirac matrices may appear in calculations that use the BMHV \
+prescription, but they do not make sense in NDR. Therefore, their evaluation \
+will be succesful only if the correct scheme is used."
+}], "Notes"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"FCSetDiracGammaScheme", "[", "\"\\"", "]"}], ";"}]], "Input",
+
+ CellLabel->"In[109]:="],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"DiracTrace", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"GSD", "[", "q", "]"}]}], "+",
+ RowBox[{"SMP", "[", "\"\